bool CgDxShader::setIntVariable(const char* name, uint32 len, const int* vals) {
if(mProgram) {
CGparameter param = cgGetNamedParameter(mProgram, name);
if(_check_error(mContext) && param) {
cgSetParameterValueic(param, len, (const int*)vals);
return _check_error(mContext);
}
}
return false;
}
static int PubCGparam_func (PState pstate,PubFunction_t *fn, int n)
{
CGparameter cgparam = NULL;
if ((int)fn->upvalue > PCG_GET && (n<1 || FunctionPublish_getArg(pstate,1,LUXI_CLASS_CGPARAM,(void*)&cgparam)<1))
return FunctionPublish_returnError(pstate,"1 cgparam required");
switch((int)fn->upvalue){
case PCG_NEW:
{
char *name;
char *nametype;
CGtype cgtype;
CGtype basetype;
int cnt = 1;
if (n < 2 || FunctionPublish_getArg(pstate,3,LUXI_CLASS_STRING,(void*)&name,LUXI_CLASS_STRING,(void*)&nametype,LUXI_CLASS_INT,(void*)&cnt)<2)
return FunctionPublish_returnError(pstate,"2 strings required");
cgtype = cgGetType(nametype);
basetype = cgGetTypeBase(cgtype);
if (VIDCg_getConnector(name) || cgtype==CG_UNKNOWN_TYPE ||
(basetype != CG_FLOAT && basetype != CG_INT && basetype != CG_BOOL))
return FunctionPublish_returnError(pstate,"name already in use, or illegal cg base type (float, bool, int)");
if (cgGetTypeClass(cgtype) == CG_PARAMETERCLASS_MATRIX && basetype != CG_FLOAT)
return FunctionPublish_returnError(pstate,"only float matrix parameters allowed");
cgparam = cnt > 1 ? cgCreateParameterArray(g_VID.cg.context,cgtype,cnt) : cgCreateParameter(g_VID.cg.context,cgtype);
VIDCg_setConnector(name,cgparam);
return FunctionPublish_returnType(pstate,LUXI_CLASS_CGPARAM,(void*)cgparam);
}
break;
case PCG_DELETE:
{
int linked = cgGetNumConnectedToParameters(cgparam);
if (linked == 0){
VIDCg_setConnector(cgGetParameterName(cgparam),NULL);
cgDestroyParameter(cgparam);
}
return FunctionPublish_returnInt(pstate,linked);
}
break;
case PCG_GET:
{
char *name;
if (n < 1 || !FunctionPublish_getArg(pstate,1,LUXI_CLASS_STRING,(void*)&name))
return FunctionPublish_returnError(pstate,"1 string required");
cgparam = VIDCg_getConnector(name);
if (cgparam)
return FunctionPublish_returnType(pstate,LUXI_CLASS_CGPARAM,(void*)cgparam);
else
return 0;
}
break;
case PCG_VALUE:
{
CGtype cgtype = cgGetParameterType(cgparam);
CGtype basetype = cgGetTypeBase(cgtype);
CGtype classtype = cgGetTypeClass(cgtype);
lxClassType ctype;
Reference ref;
float *matrix;
StaticArray_t *starray;
int read = 0;
int offset = 0;
int size;
int into = (int)fn->upvalue == PCG_VALUEINTO;
if (n==1 || into){
int vector[4];
switch(classtype){
case CG_PARAMETERCLASS_SCALAR:
case CG_PARAMETERCLASS_VECTOR:
switch(basetype){
case CG_FLOAT:
ctype = LUXI_CLASS_FLOAT;
read = cgGetParameterValuefc(cgparam,4,(float*)vector);
break;
case CG_BOOL:
ctype = LUXI_CLASS_BOOLEAN;
read = cgGetParameterValueic(cgparam,4,vector);
break;
case CG_INT:
ctype = LUXI_CLASS_INT;
read = cgGetParameterValueic(cgparam,4,vector);
break;
default:
return 0;
}
return FunctionPublish_setRet(pstate,read,ctype,(void*)vector[0],ctype,(void*)vector[1],ctype,(void*)vector[2],ctype,(void*)vector[3]);
break;
case CG_PARAMETERCLASS_MATRIX:
if (into){
// get matrix first
if (!FunctionPublish_getNArg(pstate,1,LUXI_CLASS_MATRIX44,(void*)&ref) || !Reference_get(ref,matrix))
return FunctionPublish_returnError(pstate,"1 matrix4x4 required");
}
else{
// create matrix
matrix = PubMatrix4x4_alloc();
ref = Reference_new(LUXI_CLASS_MATRIX44,matrix);
Reference_makeVolatile(ref);
}
cgGetMatrixParameterfc(cgparam,matrix);
return FunctionPublish_returnType(pstate,LUXI_CLASS_MATRIX44,REF2VOID(ref));
break;
case CG_PARAMETERCLASS_ARRAY:
ctype = basetype == CG_FLOAT ? LUXI_CLASS_FLOATARRAY : LUXI_CLASS_INTARRAY;
size = cgGetParameterColumns(cgparam)*cgGetParameterRows(cgparam)*cgGetArrayTotalSize(cgparam);
if (into){
// get array first
if (FunctionPublish_getArgOffset(pstate,1,3,ctype,(void*)&ref,LUXI_CLASS_INT,(void*)&offset)<1 || !Reference_get(ref,starray) ||
offset+size > starray->count)
return FunctionPublish_returnError(pstate,"1 staticarray [1 int] required (with enough space)");
}
else{
// create array
starray = StaticArray_new(size,ctype,NULL,NULL);
}
offset = LUX_MIN(offset,(starray->count-1));
read = LUX_MIN(read,(starray->count-offset));
if (ctype == LUXI_CLASS_FLOATARRAY)
cgGetParameterValuefc(cgparam,read,starray->floats);
else
cgGetParameterValueic(cgparam,read,starray->ints);
return FunctionPublish_returnType(pstate,ctype,REF2VOID(starray->ref));
}
}
else {
// set
lxVector4 vector;
switch(classtype){
case CG_PARAMETERCLASS_SCALAR:
case CG_PARAMETERCLASS_VECTOR:
ctype = basetype == CG_FLOAT ? LUXI_CLASS_FLOAT : LUXI_CLASS_INT;
read = FunctionPublish_getArgOffset(pstate,1,n-1,ctype,(void*)&vector[0],ctype,(void*)&vector[1],ctype,(void*)&vector[2],ctype,(void*)&vector[3]);
if (read > 0){
switch(basetype){
case CG_FLOAT:
cgSetParameterValuefc(cgparam,n-1,vector);
return 0;
case CG_BOOL:
case CG_INT:
cgSetParameterValueic(cgparam,n-1,(int*)vector);
return 0;
default:
return 0;
}
}
break;
case CG_PARAMETERCLASS_MATRIX:
if (!FunctionPublish_getNArg(pstate,1,LUXI_CLASS_MATRIX44,(void*)&ref) || !Reference_get(ref,matrix))
return FunctionPublish_returnError(pstate,"1 matrix4x4 required");
cgSetMatrixParameterfc(cgparam,matrix);
return 0;
case CG_PARAMETERCLASS_ARRAY:
ctype = basetype == CG_FLOAT ? LUXI_CLASS_FLOATARRAY : LUXI_CLASS_INTARRAY;
size = cgGetParameterColumns(cgparam)*cgGetParameterRows(cgparam)*cgGetArrayTotalSize(cgparam);
if (FunctionPublish_getArgOffset(pstate,1,3,ctype,(void*)&ref,LUXI_CLASS_INT,(void*)&offset) || !Reference_get(ref,starray)
|| offset+size > starray->count)
return FunctionPublish_returnError(pstate,"1 staticarray [2 ints] required, with enough space");
offset = LUX_MIN(offset,(starray->count-1));
if (ctype == LUXI_CLASS_FLOATARRAY)
cgSetParameterValuefc(cgparam,size,&starray->floats[offset]);
else
cgSetParameterValueic(cgparam,size,&starray->ints[offset]);
return 0;
default:
return 0;
}
}
}
case PCG_SIZES:
return FunctionPublish_setRet(pstate,3,LUXI_CLASS_INT,(void*)cgGetParameterColumns(cgparam),LUXI_CLASS_INT,(void*)cgGetParameterRows(cgparam),LUXI_CLASS_INT,(void*)cgGetArrayTotalSize(cgparam));
default:
break;
}
return 0;
}
