Initial community commit
This commit is contained in:
Jef
parent
537bcbc862
commit
fc06254474
16440 changed files with 4239995 additions and 2 deletions
305
Src/Wasabi/api/script/scriptobji.cpp
Normal file
305
Src/Wasabi/api/script/scriptobji.cpp
Normal file
|
|
@ -0,0 +1,305 @@
|
|||
#include "api.h"
|
||||
#include <api/script/scriptobji.h>
|
||||
#include <api/script/objcontroller.h>
|
||||
#include <api/script/scriptguid.h>
|
||||
|
||||
ScriptObjectI::ScriptObjectI(const wchar_t *class_name, ScriptObjectController *object_controller)
|
||||
{
|
||||
classname = class_name;
|
||||
controller = object_controller;
|
||||
cache_count = -1;
|
||||
membercachegid = -1;
|
||||
membercachesid = -1;
|
||||
ingetinterface = 0;
|
||||
vcpu_init();
|
||||
}
|
||||
|
||||
ScriptObjectI::~ScriptObjectI()
|
||||
{
|
||||
assignedVariables.deleteAll();
|
||||
memberVariables.deleteAll();
|
||||
interfaceslist.deleteAll();
|
||||
WASABI_API_MAKI->vcpu_removeScriptObject(this);
|
||||
}
|
||||
|
||||
void *ScriptObjectI::vcpu_getInterface(GUID g, int *interfacetype)
|
||||
{
|
||||
if (g == scriptObjectGuid) return this;
|
||||
InterfaceEntry *entry = 0;
|
||||
int n=0;
|
||||
while (entry = interfaceslist.enumItem(n++))
|
||||
{
|
||||
if (entry->getGuid() == g)
|
||||
{
|
||||
if (interfacetype != NULL)
|
||||
*interfacetype = entry->getType();
|
||||
return entry->getInterface();
|
||||
}
|
||||
}
|
||||
|
||||
if (ingetinterface) return NULL;
|
||||
ingetinterface = 1;
|
||||
|
||||
void *i = NULL;
|
||||
ScriptObjectController *c = controller;
|
||||
//CUT: ScriptObject *no = NULL;
|
||||
while (i == NULL && c != NULL)
|
||||
{
|
||||
i = c->cast(this, g);
|
||||
if (i != NULL) break;
|
||||
c = c->getAncestorController();
|
||||
}
|
||||
|
||||
if (interfacetype != NULL)
|
||||
*interfacetype = INTERFACE_SCRIPTOBJECT;
|
||||
ingetinterface = 0;
|
||||
return i;
|
||||
}
|
||||
|
||||
void *ScriptObjectI::vcpu_getInterfaceObject(GUID g, ScriptObject **o)
|
||||
{
|
||||
if (g == scriptObjectGuid) return this;
|
||||
InterfaceEntry *entry = 0;
|
||||
int n=0;
|
||||
while (entry = interfaceslist.enumItem(n++))
|
||||
{
|
||||
if (entry && entry->getGuid() == g)
|
||||
{
|
||||
*o = NULL;
|
||||
return entry->getInterface();
|
||||
}
|
||||
}
|
||||
if (ingetinterface) return NULL;
|
||||
ingetinterface = 1;
|
||||
|
||||
void *i = NULL;
|
||||
ScriptObjectController *c = controller;
|
||||
//CUT: ScriptObject *no = NULL;
|
||||
while (i == NULL && c != NULL)
|
||||
{
|
||||
i = c->cast(this, g);
|
||||
if (i != NULL)
|
||||
{
|
||||
if (o != NULL)
|
||||
*o = (ScriptObject *)i;
|
||||
break;
|
||||
}
|
||||
c = c->getAncestorController();
|
||||
}
|
||||
|
||||
ingetinterface = 0;
|
||||
return i;
|
||||
}
|
||||
|
||||
int ScriptObjectI::vcpu_getAssignedVariable(int start, int scriptid, int functionId, int *next, int *globalevententry, int *inheritedevent)
|
||||
{
|
||||
if (start < 0) start = 0;
|
||||
if (start >= assignedVariables.getNumItems()) return -1;
|
||||
for (int i = start;i < assignedVariables.getNumItems();i++)
|
||||
{
|
||||
assvar *v = assignedVariables.enumItem(i);
|
||||
if (WASABI_API_MAKI->vcpu_getCacheCount() != cache_count)
|
||||
{
|
||||
if (!WASABI_API_MAKI->vcpu_isValidScriptId(v->scriptid))
|
||||
{
|
||||
vcpu_removeAssignedVariable(v->varid, v->scriptid);
|
||||
i--;
|
||||
continue;
|
||||
}
|
||||
}
|
||||
if (scriptid == -1 || v->scriptid == scriptid)
|
||||
{
|
||||
int r = getEventForVar(v, functionId, inheritedevent);
|
||||
if (r == -1) continue;
|
||||
if (next) *next = i + 1;
|
||||
if (globalevententry) *globalevententry = r;
|
||||
return WASABI_API_MAKI->vcpu_mapVarId(v->varid, v->scriptid);
|
||||
}
|
||||
}
|
||||
return -1;
|
||||
}
|
||||
|
||||
void ScriptObjectI::vcpu_removeAssignedVariable(int var, int id)
|
||||
{
|
||||
for (int i = 0;i < assignedVariables.getNumItems();i++)
|
||||
{
|
||||
assvar *v = assignedVariables.enumItem(i);
|
||||
if (v->varid == var && v->scriptid == id)
|
||||
{
|
||||
delete v;
|
||||
assignedVariables.removeItem(v);
|
||||
return ;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void ScriptObjectI::vcpu_addAssignedVariable(int var, int scriptid)
|
||||
{
|
||||
do
|
||||
{
|
||||
assvar *v = new assvar;
|
||||
v->scriptid = scriptid;
|
||||
v->varid = var;
|
||||
assignedVariables.addItem(v);
|
||||
computeEventList(v);
|
||||
var = WASABI_API_MAKI->vcpu_getUserAncestorId(var, scriptid);
|
||||
}
|
||||
while (var != -1);
|
||||
}
|
||||
|
||||
const wchar_t *ScriptObjectI::vcpu_getClassName()
|
||||
{
|
||||
return classname;
|
||||
}
|
||||
|
||||
ScriptObjectController *ScriptObjectI::vcpu_getController()
|
||||
{
|
||||
return controller;
|
||||
}
|
||||
|
||||
int ScriptObjectI::vcpu_getScriptId()
|
||||
{
|
||||
return id;
|
||||
}
|
||||
|
||||
void ScriptObjectI::vcpu_setScriptId(int i)
|
||||
{
|
||||
id = i;
|
||||
}
|
||||
|
||||
int ScriptObjectI::vcpu_getMember(const wchar_t *id, int scriptid, int rettype)
|
||||
{
|
||||
if (membercachesid == scriptid && !WCSICMP(membercacheid, id))
|
||||
return membercachegid;
|
||||
membercacheid = id;
|
||||
membercachesid = scriptid;
|
||||
for (int i = 0;i < memberVariables.getNumItems();i++)
|
||||
{
|
||||
MemberVar *m = memberVariables.enumItem(i);
|
||||
if (m->getScriptId() == scriptid && !WCSICMP(m->getName(), id))
|
||||
{
|
||||
membercachegid = m->getGlobalId();
|
||||
return membercachegid;
|
||||
}
|
||||
}
|
||||
MemberVar *m = new MemberVar(id, scriptid, rettype);
|
||||
memberVariables.addItem(m);
|
||||
membercachegid = m->getGlobalId();
|
||||
return membercachegid;
|
||||
}
|
||||
|
||||
void ScriptObjectI::vcpu_delMembers(int scriptid)
|
||||
{
|
||||
for (int i = 0;i < memberVariables.getNumItems();i++)
|
||||
if (memberVariables.enumItem(i)->getScriptId() == scriptid)
|
||||
{
|
||||
delete memberVariables.enumItem(i);
|
||||
memberVariables.removeByPos(i--);
|
||||
}
|
||||
}
|
||||
|
||||
void ScriptObjectI::vcpu_setInterface(GUID g, void *v, int interfacetype)
|
||||
{
|
||||
for (int i = 0;i < interfaceslist.getNumItems();i++)
|
||||
if (interfaceslist.enumItem(i)->getGuid() == g)
|
||||
{
|
||||
InterfaceEntry *p = interfaceslist.enumItem(i);
|
||||
delete p;
|
||||
interfaceslist.removeByPos(i);
|
||||
i--;
|
||||
}
|
||||
interfaceslist.addItem(new InterfaceEntry(g, v, interfacetype));
|
||||
}
|
||||
|
||||
void ScriptObjectI::vcpu_setClassName(const wchar_t *name)
|
||||
{
|
||||
classname = name;
|
||||
}
|
||||
|
||||
void ScriptObjectI::vcpu_setController(ScriptObjectController *c)
|
||||
{
|
||||
controller = c;
|
||||
}
|
||||
|
||||
void ScriptObjectI::vcpu_init()
|
||||
{
|
||||
WASABI_API_MAKI->vcpu_addScriptObject(this);
|
||||
}
|
||||
|
||||
int ScriptObjectI::getEventForVar(assvar *var, int funcid, int *inheritedevent)
|
||||
{
|
||||
if (WASABI_API_MAKI->vcpu_getCacheCount() != cache_count)
|
||||
{
|
||||
for (int i = 0;i < assignedVariables.getNumItems();i++)
|
||||
{
|
||||
assvar* ass = assignedVariables.enumItem(i);
|
||||
// Martin> We need to ensure here that a valid script is called
|
||||
// There are a few circumstances where the script is already deleted from SOM but we want to call it.
|
||||
// Example: onMouseWheelDown() in a script embedded in a customobject and another script.
|
||||
// another script can hide the customobject and thus the custom object's embedded script gets unloaded.
|
||||
// the old scriptID is still cached and wants to be invoked! this will lead to an guru but the guru cannot be thrown
|
||||
// since the ScriptID isn't valid anymore. this leads to a nullpointer assert crash.
|
||||
if (!WASABI_API_MAKI->vcpu_isValidScriptId(ass->scriptid))
|
||||
{
|
||||
continue;
|
||||
}
|
||||
computeEventList(ass);
|
||||
}
|
||||
cache_count = WASABI_API_MAKI->vcpu_getCacheCount();
|
||||
}
|
||||
TList<int> *list = &var->dlfs;
|
||||
for (int i = 0;i < list->getNumItems();i += 4)
|
||||
if (list->enumItem(i) == funcid && list->enumItem(i + 1) == var->varid)
|
||||
{
|
||||
*inheritedevent = list->enumItem(i + 3);
|
||||
return list->enumItem(i + 2);
|
||||
}
|
||||
|
||||
return -1;
|
||||
}
|
||||
|
||||
void ScriptObjectI::computeEventList(assvar *a)
|
||||
{
|
||||
a->dlfs.removeAll();
|
||||
|
||||
int dlfid;
|
||||
int scriptid;
|
||||
int varid;
|
||||
|
||||
int var = a->varid;
|
||||
int inheritedevent = 0;
|
||||
|
||||
do
|
||||
{
|
||||
for (int i = 0;i < WASABI_API_MAKI->vcpu_getNumEvents();i++)
|
||||
{
|
||||
WASABI_API_MAKI->vcpu_getEvent(i, &dlfid, &scriptid, &varid);
|
||||
if (scriptid == a->scriptid && varid == var)
|
||||
{
|
||||
a->dlfs.addItem(dlfid);
|
||||
a->dlfs.addItem(varid);
|
||||
a->dlfs.addItem(i);
|
||||
a->dlfs.addItem(inheritedevent);
|
||||
}
|
||||
}
|
||||
var = WASABI_API_MAKI->vcpu_getUserAncestorId(var, a->scriptid);
|
||||
inheritedevent = 1;
|
||||
}
|
||||
while (var != -1);
|
||||
}
|
||||
|
||||
|
||||
|
||||
ScriptObjectI::MemberVar::MemberVar(const wchar_t *_name, int _scriptid, int _rettype)
|
||||
{
|
||||
name = _name;
|
||||
rettype = _rettype;
|
||||
scriptid = _scriptid;
|
||||
globalid = WASABI_API_MAKI->maki_createOrphan(rettype);
|
||||
}
|
||||
|
||||
ScriptObjectI::MemberVar::~MemberVar()
|
||||
{
|
||||
WASABI_API_MAKI->maki_killOrphan(globalid); // heh :)
|
||||
}
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue