Aegisub/devel/vsfilter/include/virtualdub/ScriptValue.h

89 lines
2.7 KiB
C++

#ifndef f_SYLIA_SCRIPTVALUE_H
#define f_SYLIA_SCRIPTVALUE_H
class CScriptArray;
struct CScriptObject;
class CScriptValue;
class IScriptInterpreter;
class VariableTableEntry;
typedef CScriptValue (*ScriptObjectLookupFuncPtr)(IScriptInterpreter *, CScriptObject *, void *lpVoid, char *szName);
typedef CScriptValue (*ScriptFunctionPtr)(IScriptInterpreter *, void *, CScriptValue *, int);
typedef void (*ScriptVoidFunctionPtr)(IScriptInterpreter *, void *, CScriptValue *, int);
typedef int (*ScriptIntFunctionPtr)(IScriptInterpreter *, void *, CScriptValue *, int);
typedef CScriptValue (*ScriptArrayFunctionPtr)(IScriptInterpreter *, void *, int);
typedef struct ScriptFunctionDef {
ScriptFunctionPtr func_ptr;
char *name;
char *arg_list;
} ScriptFunctionDef;
typedef struct ScriptObjectDef {
char *name;
CScriptObject *obj;
} ScriptObjectDef;
typedef struct CScriptObject {
ScriptObjectLookupFuncPtr Lookup;
ScriptFunctionDef *func_list;
ScriptObjectDef *obj_list;
} CScriptObject;
class CScriptValue {
public:
enum { T_VOID, T_INT, T_PINT, T_STR, T_ARRAY, T_OBJECT, T_FNAME, T_FUNCTION, T_VARLV } type;
CScriptObject *thisPtr;
union {
int i;
int *pi;
char **s;
ScriptArrayFunctionPtr ary;
CScriptObject *obj;
ScriptFunctionPtr func;
ScriptFunctionDef *fname;
VariableTableEntry *vte;
} u;
void *lpVoid;
CScriptValue() { type = T_VOID; }
CScriptValue(int i) { type = T_INT; u.i = i; }
CScriptValue(int *pi) { type = T_PINT; u.pi = pi; }
CScriptValue(char **s) { type = T_STR; u.s = s; }
CScriptValue(CScriptObject *obj) { type = T_OBJECT; u.obj = obj; }
CScriptValue(CScriptObject *_thisPtr, ScriptArrayFunctionPtr csa) {
type = T_ARRAY;
u.ary = csa;
thisPtr = _thisPtr;
}
CScriptValue(CScriptObject *_thisPtr, ScriptFunctionDef *sfd) {
type = T_FNAME;
u.fname = sfd;
thisPtr = _thisPtr;
}
CScriptValue(CScriptObject *_thisPtr, ScriptFunctionPtr fn) {
type = T_FUNCTION;
u.func = fn;
thisPtr = _thisPtr;
}
CScriptValue(VariableTableEntry *vte) { type = T_VARLV; u.vte = vte; }
bool isVoid() { return type == T_VOID; }
bool isInt() { return type == T_INT; }
bool isString() { return type == T_STR; }
bool isArray() { return type == T_ARRAY; }
bool isObject() { return type == T_OBJECT; }
bool isFName() { return type == T_FNAME; }
bool isFunction() { return type == T_FUNCTION; }
bool isVarLV() { return type == T_VARLV; }
int asInt() { return u.i; }
char ** asString() { return u.s; }
ScriptArrayFunctionPtr asArray() { return u.ary; }
CScriptObject * asObject() { return u.obj; }
ScriptFunctionPtr asFunction() { return u.func; }
VariableTableEntry* asVarLV() { return u.vte; }
};
#endif