virtualx-engine/core/class_db.cpp

1304 lines
29 KiB
C++

/*************************************************************************/
/* class_db.cpp */
/*************************************************************************/
/* This file is part of: */
/* GODOT ENGINE */
/* http://www.godotengine.org */
/*************************************************************************/
/* Copyright (c) 2007-2017 Juan Linietsky, Ariel Manzur. */
/* */
/* Permission is hereby granted, free of charge, to any person obtaining */
/* a copy of this software and associated documentation files (the */
/* "Software"), to deal in the Software without restriction, including */
/* without limitation the rights to use, copy, modify, merge, publish, */
/* distribute, sublicense, and/or sell copies of the Software, and to */
/* permit persons to whom the Software is furnished to do so, subject to */
/* the following conditions: */
/* */
/* The above copyright notice and this permission notice shall be */
/* included in all copies or substantial portions of the Software. */
/* */
/* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, */
/* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF */
/* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.*/
/* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY */
/* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, */
/* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE */
/* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */
/*************************************************************************/
#include "class_db.h"
#include "os/mutex.h"
#ifdef NO_THREADS
#define OBJTYPE_RLOCK
#define OBJTYPE_WLOCK
#else
#define OBJTYPE_RLOCK RWLockRead _rw_lockr_(lock);
#define OBJTYPE_WLOCK RWLockWrite _rw_lockw_(lock);
#endif
#ifdef DEBUG_METHODS_ENABLED
ParamDef::ParamDef(const Variant& p_variant) { used=true; val=p_variant; }
MethodDefinition D_METHOD(const char* p_name) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.push_back(StaticCString::create(p_arg1));
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1,const char *p_arg2) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.resize(2);
md.args[0]=StaticCString::create(p_arg1);
md.args[1]=StaticCString::create(p_arg2);
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1,const char *p_arg2,const char *p_arg3) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.resize(3);
md.args[0]=StaticCString::create(p_arg1);
md.args[1]=StaticCString::create(p_arg2);
md.args[2]=StaticCString::create(p_arg3);
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1,const char *p_arg2,const char *p_arg3,const char *p_arg4) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.resize(4);
md.args[0]=StaticCString::create(p_arg1);
md.args[1]=StaticCString::create(p_arg2);
md.args[2]=StaticCString::create(p_arg3);
md.args[3]=StaticCString::create(p_arg4);
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1,const char *p_arg2,const char *p_arg3,const char *p_arg4,const char *p_arg5) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.resize(5);
md.args[0]=StaticCString::create(p_arg1);
md.args[1]=StaticCString::create(p_arg2);
md.args[2]=StaticCString::create(p_arg3);
md.args[3]=StaticCString::create(p_arg4);
md.args[4]=StaticCString::create(p_arg5);
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1,const char *p_arg2,const char *p_arg3,const char *p_arg4,const char *p_arg5,const char *p_arg6) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.resize(6);
md.args[0]=StaticCString::create(p_arg1);
md.args[1]=StaticCString::create(p_arg2);
md.args[2]=StaticCString::create(p_arg3);
md.args[3]=StaticCString::create(p_arg4);
md.args[4]=StaticCString::create(p_arg5);
md.args[5]=StaticCString::create(p_arg6);
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1,const char *p_arg2,const char *p_arg3,const char *p_arg4,const char *p_arg5,const char *p_arg6,const char *p_arg7) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.resize(7);
md.args[0]=StaticCString::create(p_arg1);
md.args[1]=StaticCString::create(p_arg2);
md.args[2]=StaticCString::create(p_arg3);
md.args[3]=StaticCString::create(p_arg4);
md.args[4]=StaticCString::create(p_arg5);
md.args[5]=StaticCString::create(p_arg6);
md.args[6]=StaticCString::create(p_arg7);
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1,const char *p_arg2,const char *p_arg3,const char *p_arg4,const char *p_arg5,const char *p_arg6,const char *p_arg7,const char *p_arg8) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.resize(8);
md.args[0]=StaticCString::create(p_arg1);
md.args[1]=StaticCString::create(p_arg2);
md.args[2]=StaticCString::create(p_arg3);
md.args[3]=StaticCString::create(p_arg4);
md.args[4]=StaticCString::create(p_arg5);
md.args[5]=StaticCString::create(p_arg6);
md.args[6]=StaticCString::create(p_arg7);
md.args[7]=StaticCString::create(p_arg8);
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1,const char *p_arg2,const char *p_arg3,const char *p_arg4,const char *p_arg5,const char *p_arg6,const char *p_arg7,const char *p_arg8,const char *p_arg9) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.resize(9);
md.args[0]=StaticCString::create(p_arg1);
md.args[1]=StaticCString::create(p_arg2);
md.args[2]=StaticCString::create(p_arg3);
md.args[3]=StaticCString::create(p_arg4);
md.args[4]=StaticCString::create(p_arg5);
md.args[5]=StaticCString::create(p_arg6);
md.args[6]=StaticCString::create(p_arg7);
md.args[7]=StaticCString::create(p_arg8);
md.args[8]=StaticCString::create(p_arg9);
return md;
}
MethodDefinition D_METHOD(const char* p_name,const char *p_arg1,const char *p_arg2,const char *p_arg3,const char *p_arg4,const char *p_arg5,const char *p_arg6,const char *p_arg7,const char *p_arg8,const char *p_arg9,const char *p_arg10) {
MethodDefinition md;
md.name=StaticCString::create(p_name);
md.args.resize(10);
md.args[0]=StaticCString::create(p_arg1);
md.args[1]=StaticCString::create(p_arg2);
md.args[2]=StaticCString::create(p_arg3);
md.args[3]=StaticCString::create(p_arg4);
md.args[4]=StaticCString::create(p_arg5);
md.args[5]=StaticCString::create(p_arg6);
md.args[6]=StaticCString::create(p_arg7);
md.args[7]=StaticCString::create(p_arg8);
md.args[8]=StaticCString::create(p_arg9);
md.args[9]=StaticCString::create(p_arg10);
return md;
}
#endif
ClassDB::APIType ClassDB::current_api=API_CORE;
void ClassDB::set_current_api(APIType p_api) {
current_api=p_api;
}
HashMap<StringName,ClassDB::ClassInfo,StringNameHasher> ClassDB::classes;
HashMap<StringName,StringName,StringNameHasher> ClassDB::resource_base_extensions;
HashMap<StringName,StringName,StringNameHasher> ClassDB::compat_classes;
ClassDB::ClassInfo::ClassInfo() {
creation_func=NULL;
inherits_ptr=NULL;
disabled=false;
}
ClassDB::ClassInfo::~ClassInfo() {
}
bool ClassDB::is_parent_class(const StringName &p_class,const StringName& p_inherits) {
OBJTYPE_RLOCK;
StringName inherits=p_class;
while (inherits.operator String().length()) {
if (inherits==p_inherits)
return true;
inherits=get_parent_class(inherits);
}
return false;
}
void ClassDB::get_class_list( List<StringName> *p_classes) {
OBJTYPE_RLOCK;
const StringName *k=NULL;
while((k=classes.next(k))) {
p_classes->push_back(*k);
}
p_classes->sort();
}
void ClassDB::get_inheriters_from_class( const StringName& p_class,List<StringName> *p_classes) {
OBJTYPE_RLOCK;
const StringName *k=NULL;
while((k=classes.next(k))) {
if (*k!=p_class && is_parent_class(*k,p_class))
p_classes->push_back(*k);
}
}
StringName ClassDB::get_parent_class_nocheck(const StringName& p_class) {
OBJTYPE_RLOCK;
ClassInfo *ti = classes.getptr(p_class);
if (!ti)
return StringName();
return ti->inherits;
}
StringName ClassDB::get_parent_class(const StringName& p_class) {
OBJTYPE_RLOCK;
ClassInfo *ti = classes.getptr(p_class);
ERR_FAIL_COND_V(!ti,StringName());
return ti->inherits;
}
ClassDB::APIType ClassDB::get_api_type(const StringName &p_class) {
OBJTYPE_RLOCK;
ClassInfo *ti = classes.getptr(p_class);
ERR_FAIL_COND_V(!ti,API_NONE);
return ti->api;
}
uint64_t ClassDB::get_api_hash(APIType p_api) {
OBJTYPE_RLOCK;
#ifdef DEBUG_METHODS_ENABLED
uint64_t hash = hash_djb2_one_64(HashMapHahserDefault::hash(VERSION_FULL_NAME));
List<StringName> names;
const StringName *k=NULL;
while((k=classes.next(k))) {
names.push_back(*k);
}
//must be alphabetically sorted for hash to compute
names.sort_custom<StringName::AlphCompare>();
for (List<StringName>::Element *E=names.front();E;E=E->next()) {
ClassInfo *t = classes.getptr(E->get());
ERR_FAIL_COND_V(!t,0);
if (t->api!=p_api)
continue;
hash = hash_djb2_one_64(t->name.hash(),hash);
hash = hash_djb2_one_64(t->inherits.hash(),hash);
{ //methods
List<StringName> snames;
k=NULL;
while((k=t->method_map.next(k))) {
snames.push_back(*k);
}
snames.sort_custom<StringName::AlphCompare>();
for (List<StringName>::Element *F=snames.front();F;F=F->next()) {
MethodBind *mb = t->method_map[F->get()];
hash = hash_djb2_one_64( mb->get_name().hash(), hash);
hash = hash_djb2_one_64( mb->get_argument_count(), hash);
hash = hash_djb2_one_64( mb->get_argument_type(-1), hash); //return
for(int i=0;i<mb->get_argument_count();i++) {
hash = hash_djb2_one_64( mb->get_argument_info(i).type, hash );
hash = hash_djb2_one_64( mb->get_argument_info(i).name.hash(), hash );
hash = hash_djb2_one_64( mb->get_argument_info(i).hint, hash );
hash = hash_djb2_one_64( mb->get_argument_info(i).hint_string.hash(), hash );
}
hash = hash_djb2_one_64( mb->get_default_argument_count(), hash);
for(int i=0;i<mb->get_default_argument_count();i++) {
//hash should not change, i hope for tis
Variant da = mb->get_default_argument(i);
hash = hash_djb2_one_64( da.hash(), hash );
}
hash = hash_djb2_one_64( mb->get_hint_flags(), hash);
}
}
{ //constants
List<StringName> snames;
k=NULL;
while((k=t->constant_map.next(k))) {
snames.push_back(*k);
}
snames.sort_custom<StringName::AlphCompare>();
for (List<StringName>::Element *F=snames.front();F;F=F->next()) {
hash = hash_djb2_one_64(F->get().hash(), hash);
hash = hash_djb2_one_64( t->constant_map[F->get()], hash);
}
}
{ //signals
List<StringName> snames;
k=NULL;
while((k=t->signal_map.next(k))) {
snames.push_back(*k);
}
snames.sort_custom<StringName::AlphCompare>();
for (List<StringName>::Element *F=snames.front();F;F=F->next()) {
MethodInfo &mi = t->signal_map[F->get()];
hash = hash_djb2_one_64( F->get().hash(), hash);
for(int i=0;i<mi.arguments.size();i++) {
hash = hash_djb2_one_64( mi.arguments[i].type, hash);
}
}
}
{ //properties
List<StringName> snames;
k=NULL;
while((k=t->property_setget.next(k))) {
snames.push_back(*k);
}
snames.sort_custom<StringName::AlphCompare>();
for (List<StringName>::Element *F=snames.front();F;F=F->next()) {
PropertySetGet *psg=t->property_setget.getptr(F->get());
hash = hash_djb2_one_64( F->get().hash(), hash);
hash = hash_djb2_one_64( psg->setter.hash(), hash);
hash = hash_djb2_one_64( psg->getter.hash(), hash);
}
}
//property list
for (List<PropertyInfo>::Element *F=t->property_list.front();F;F=F->next()) {
hash = hash_djb2_one_64( F->get().name.hash(), hash);
hash = hash_djb2_one_64( F->get().type, hash);
hash = hash_djb2_one_64( F->get().hint, hash);
hash = hash_djb2_one_64( F->get().hint_string.hash(), hash);
hash = hash_djb2_one_64( F->get().usage, hash);
}
}
return hash;
#else
return 0;
#endif
}
bool ClassDB::class_exists(const StringName &p_class) {
OBJTYPE_RLOCK;
return classes.has(p_class);
}
void ClassDB::add_compatibility_class(const StringName& p_class,const StringName& p_fallback) {
OBJTYPE_WLOCK;
compat_classes[p_class]=p_fallback;
}
Object *ClassDB::instance(const StringName &p_class) {
ClassInfo *ti;
{
OBJTYPE_RLOCK;
ti=classes.getptr(p_class);
if (!ti || ti->disabled || !ti->creation_func) {
if (compat_classes.has(p_class)) {
ti=classes.getptr(compat_classes[p_class]);
}
}
ERR_FAIL_COND_V(!ti,NULL);
ERR_FAIL_COND_V(ti->disabled,NULL);
ERR_FAIL_COND_V(!ti->creation_func,NULL);
}
return ti->creation_func();
}
bool ClassDB::can_instance(const StringName &p_class) {
OBJTYPE_RLOCK;
ClassInfo *ti = classes.getptr(p_class);
ERR_FAIL_COND_V(!ti,false);
return (!ti->disabled && ti->creation_func!=NULL);
}
void ClassDB::_add_class2(const StringName& p_class, const StringName& p_inherits) {
OBJTYPE_WLOCK;
StringName name = p_class;
ERR_FAIL_COND(classes.has(name));
classes[name]=ClassInfo();
ClassInfo &ti=classes[name];
ti.name=name;
ti.inherits=p_inherits;
ti.api=current_api;
if (ti.inherits) {
ERR_FAIL_COND( !classes.has(ti.inherits) ); //it MUST be registered.
ti.inherits_ptr = &classes[ti.inherits];
} else {
ti.inherits_ptr=NULL;
}
}
void ClassDB::get_method_list(StringName p_class,List<MethodInfo> *p_methods,bool p_no_inheritance) {
OBJTYPE_RLOCK;
ClassInfo *type=classes.getptr(p_class);
while(type) {
if (type->disabled) {
if (p_no_inheritance)
break;
type=type->inherits_ptr;
continue;
}
#ifdef DEBUG_METHODS_ENABLED
for( List<MethodInfo>::Element *E=type->virtual_methods.front();E;E=E->next()) {
p_methods->push_back(E->get());
}
for( List<StringName>::Element *E=type->method_order.front();E;E=E->next()) {
MethodBind *method=type->method_map.get(E->get());
MethodInfo minfo;
minfo.name=E->get();
minfo.id=method->get_method_id();
for (int i=0;i<method->get_argument_count();i++) {
//Variant::Type t=method->get_argument_type(i);
minfo.arguments.push_back(method->get_argument_info(i));
}
if (method->get_argument_type(-1)!=Variant::NIL) {
minfo.return_val=method->get_argument_info(-1);
}
minfo.flags=method->get_hint_flags();
p_methods->push_back(minfo);
}
#else
const StringName *K=NULL;
while((K=type->method_map.next(K))) {
MethodBind*m = type->method_map[*K];
MethodInfo mi;
mi.name=m->get_name();
p_methods->push_back(mi);
}
#endif
if (p_no_inheritance)
break;
type=type->inherits_ptr;
}
}
MethodBind *ClassDB::get_method(StringName p_class, StringName p_name) {
OBJTYPE_RLOCK;
ClassInfo *type=classes.getptr(p_class);
while(type) {
MethodBind **method=type->method_map.getptr(p_name);
if (method && *method)
return *method;
type=type->inherits_ptr;
}
return NULL;
}
void ClassDB::bind_integer_constant(const StringName& p_class, const StringName &p_name, int p_constant) {
OBJTYPE_WLOCK;
ClassInfo *type=classes.getptr(p_class);
if (!type) {
ERR_FAIL_COND(!type);
}
if (type->constant_map.has(p_name)) {
ERR_FAIL();
}
type->constant_map[p_name]=p_constant;
#ifdef DEBUG_METHODS_ENABLED
type->constant_order.push_back(p_name);
#endif
}
void ClassDB::get_integer_constant_list(const StringName& p_class, List<String> *p_constants, bool p_no_inheritance) {
OBJTYPE_RLOCK;
ClassInfo *type=classes.getptr(p_class);
while(type) {
#ifdef DEBUG_METHODS_ENABLED
for(List<StringName>::Element *E=type->constant_order.front();E;E=E->next())
p_constants->push_back(E->get());
#else
const StringName *K=NULL;
while((K=type->constant_map.next(K))) {
p_constants->push_back(*K);
}
#endif
if (p_no_inheritance)
break;
type=type->inherits_ptr;
}
}
int ClassDB::get_integer_constant(const StringName& p_class, const StringName &p_name, bool *p_success) {
OBJTYPE_RLOCK;
ClassInfo *type=classes.getptr(p_class);
while(type) {
int *constant=type->constant_map.getptr(p_name);
if (constant) {
if (p_success)
*p_success=true;
return *constant;
}
type=type->inherits_ptr;
}
if (p_success)
*p_success=false;
return 0;
}
void ClassDB::add_signal(StringName p_class,const MethodInfo& p_signal) {
OBJTYPE_WLOCK;
ClassInfo *type=classes.getptr(p_class);
ERR_FAIL_COND(!type);
ClassInfo *check=type;
StringName sname = p_signal.name;
#ifdef DEBUG_METHODS_ENABLED
while(check) {
if (check->signal_map.has(sname)) {
ERR_EXPLAIN("Type "+String(p_class)+" already has signal: "+String(sname));
ERR_FAIL();
}
check=check->inherits_ptr;
}
#endif
type->signal_map[sname]=p_signal;
}
void ClassDB::get_signal_list(StringName p_class,List<MethodInfo> *p_signals,bool p_no_inheritance) {
OBJTYPE_RLOCK;
ClassInfo *type=classes.getptr(p_class);
ERR_FAIL_COND(!type);
ClassInfo *check=type;
while(check) {
const StringName *S=NULL;
while((S=check->signal_map.next(S))) {
p_signals->push_back(check->signal_map[*S]);
}
if (p_no_inheritance)
return;
check=check->inherits_ptr;
}
}
bool ClassDB::has_signal(StringName p_class,StringName p_signal) {
OBJTYPE_RLOCK;
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
if (check->signal_map.has(p_signal))
return true;
check=check->inherits_ptr;
}
return false;
}
bool ClassDB::get_signal(StringName p_class,StringName p_signal,MethodInfo *r_signal) {
OBJTYPE_RLOCK;
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
if (check->signal_map.has(p_signal)) {
if (r_signal) {
*r_signal=check->signal_map[p_signal];
}
return true;
}
check=check->inherits_ptr;
}
return false;
}
void ClassDB::add_property_group(StringName p_class,const String& p_name,const String& p_prefix) {
OBJTYPE_WLOCK;
ClassInfo *type=classes.getptr(p_class);
ERR_FAIL_COND(!type);
type->property_list.push_back(PropertyInfo(Variant::NIL,p_name,PROPERTY_HINT_NONE,p_prefix,PROPERTY_USAGE_GROUP));
}
void ClassDB::add_property(StringName p_class,const PropertyInfo& p_pinfo, const StringName& p_setter, const StringName& p_getter, int p_index) {
#ifndef NO_THREADS
lock->read_lock();
#endif
ClassInfo *type=classes.getptr(p_class);
#ifndef NO_THREADS
lock->read_unlock();
#endif
ERR_FAIL_COND(!type);
MethodBind *mb_set=NULL;
if (p_setter) {
mb_set = get_method(p_class,p_setter);
#ifdef DEBUG_METHODS_ENABLED
if (!mb_set) {
ERR_EXPLAIN("Invalid Setter: "+p_class+"::"+p_setter+" for property: "+p_pinfo.name);
ERR_FAIL_COND(!mb_set);
} else {
int exp_args=1+(p_index>=0?1:0);
if (mb_set->get_argument_count()!=exp_args) {
ERR_EXPLAIN("Invalid Function for Setter: "+p_class+"::"+p_setter+" for property: "+p_pinfo.name);
ERR_FAIL();
}
}
#endif
}
MethodBind *mb_get=NULL;
if (p_getter) {
MethodBind *mb_get = get_method(p_class,p_getter);
#ifdef DEBUG_METHODS_ENABLED
if (!mb_get) {
ERR_EXPLAIN("Invalid Getter: "+p_class+"::"+p_getter+" for property: "+p_pinfo.name);
ERR_FAIL_COND(!mb_get);
} else {
int exp_args=0+(p_index>=0?1:0);
if (mb_get->get_argument_count()!=exp_args) {
ERR_EXPLAIN("Invalid Function for Getter: "+p_class+"::"+p_getter+" for property: "+p_pinfo.name);
ERR_FAIL();
}
}
#endif
}
#ifdef DEBUG_METHODS_ENABLED
if (type->property_setget.has(p_pinfo.name)) {
ERR_EXPLAIN("Object already has property: "+p_class);
ERR_FAIL();
}
#endif
OBJTYPE_WLOCK
type->property_list.push_back(p_pinfo);
PropertySetGet psg;
psg.setter=p_setter;
psg.getter=p_getter;
psg._setptr=mb_set;
psg._getptr=mb_get;
psg.index=p_index;
psg.type=p_pinfo.type;
type->property_setget[p_pinfo.name]=psg;
}
void ClassDB::get_property_list(StringName p_class, List<PropertyInfo> *p_list, bool p_no_inheritance,const Object *p_validator) {
OBJTYPE_RLOCK;
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
for(List<PropertyInfo>::Element *E=check->property_list.front();E;E=E->next()) {
if (p_validator) {
PropertyInfo pi = E->get();
p_validator->_validate_property(pi);
p_list->push_back(pi);
} else {
p_list->push_back(E->get());
}
}
if (p_no_inheritance)
return ;
check=check->inherits_ptr;
}
}
bool ClassDB::set_property(Object* p_object,const StringName& p_property, const Variant& p_value,bool *r_valid) {
ClassInfo *type=classes.getptr(p_object->get_class_name());
ClassInfo *check=type;
while(check) {
const PropertySetGet *psg = check->property_setget.getptr(p_property);
if (psg) {
if (!psg->setter) {
if (r_valid)
*r_valid=false;
return true; //return true but do nothing
}
Variant::CallError ce;
if (psg->index>=0) {
Variant index=psg->index;
const Variant* arg[2]={&index,&p_value};
//p_object->call(psg->setter,arg,2,ce);
if (psg->_setptr) {
psg->_setptr->call(p_object,arg,2,ce);
} else {
p_object->call(psg->setter,arg,2,ce);
}
} else {
const Variant* arg[1]={&p_value};
if (psg->_setptr) {
psg->_setptr->call(p_object,arg,1,ce);
} else {
p_object->call(psg->setter,arg,1,ce);
}
}
if (r_valid)
*r_valid=ce.error==Variant::CallError::CALL_OK;
return true;
}
check=check->inherits_ptr;
}
return false;
}
bool ClassDB::get_property(Object* p_object,const StringName& p_property, Variant& r_value) {
ClassInfo *type=classes.getptr(p_object->get_class_name());
ClassInfo *check=type;
while(check) {
const PropertySetGet *psg = check->property_setget.getptr(p_property);
if (psg) {
if (!psg->getter)
return true; //return true but do nothing
if (psg->index>=0) {
Variant index=psg->index;
const Variant* arg[1]={&index};
Variant::CallError ce;
r_value = p_object->call(psg->getter,arg,1,ce);
} else {
Variant::CallError ce;
if (psg->_getptr) {
r_value = psg->_getptr->call(p_object,NULL,0,ce);
} else {
r_value = p_object->call(psg->getter,NULL,0,ce);
}
}
return true;
}
const int *c =check->constant_map.getptr(p_property);
if (c) {
r_value=*c;
return true;
}
//if (check->constant_map.fin)
check=check->inherits_ptr;
}
return false;
}
Variant::Type ClassDB::get_property_type(const StringName& p_class, const StringName& p_property,bool *r_is_valid) {
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
const PropertySetGet *psg = check->property_setget.getptr(p_property);
if (psg) {
if (r_is_valid)
*r_is_valid=true;
return psg->type;
}
check=check->inherits_ptr;
}
if (r_is_valid)
*r_is_valid=false;
return Variant::NIL;
}
StringName ClassDB::get_property_setter(StringName p_class,const StringName p_property) {
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
const PropertySetGet *psg = check->property_setget.getptr(p_property);
if (psg) {
return psg->setter;
}
check=check->inherits_ptr;
}
return StringName();
}
StringName ClassDB::get_property_getter(StringName p_class,const StringName p_property) {
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
const PropertySetGet *psg = check->property_setget.getptr(p_property);
if (psg) {
return psg->getter;
}
check=check->inherits_ptr;
}
return StringName();
}
bool ClassDB::has_property(const StringName& p_class, const StringName& p_property, bool p_no_inheritance) {
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
if (check->property_setget.has(p_property))
return true;
if (p_no_inheritance)
break;
check=check->inherits_ptr;
}
return false;
}
void ClassDB::set_method_flags(StringName p_class,StringName p_method,int p_flags) {
OBJTYPE_WLOCK;
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
ERR_FAIL_COND(!check);
ERR_FAIL_COND(!check->method_map.has(p_method));
check->method_map[p_method]->set_hint_flags(p_flags);
}
bool ClassDB::has_method(StringName p_class,StringName p_method,bool p_no_inheritance) {
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
if (check->method_map.has(p_method))
return true;
if (p_no_inheritance)
return false;
check=check->inherits_ptr;
}
return false;
}
bool ClassDB::get_setter_and_type_for_property(const StringName& p_class, const StringName& p_prop, StringName& r_class, StringName& r_setter) {
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
if (check->property_setget.has(p_prop)) {
r_class=check->name;
r_setter=check->property_setget[p_prop].setter;
return true;
}
check=check->inherits_ptr;
}
return false;
}
#ifdef DEBUG_METHODS_ENABLED
MethodBind* ClassDB::bind_methodfi(uint32_t p_flags, MethodBind *p_bind , const MethodDefinition &method_name, const Variant **p_defs, int p_defcount) {
StringName mdname=method_name.name;
#else
MethodBind* ClassDB::bind_methodfi(uint32_t p_flags, MethodBind *p_bind , const char *method_name, const Variant **p_defs, int p_defcount) {
StringName mdname=StaticCString::create(method_name);
#endif
StringName rettype;
if (mdname.operator String().find(":")!=-1) {
rettype = mdname.operator String().get_slice(":",1);
mdname = mdname.operator String().get_slice(":",0);
}
OBJTYPE_WLOCK;
ERR_FAIL_COND_V(!p_bind,NULL);
p_bind->set_name(mdname);
String instance_type=p_bind->get_instance_class();
#ifdef DEBUG_ENABLED
if (has_method(instance_type,mdname)) {
ERR_EXPLAIN("Class "+String(instance_type)+" already has a method "+String(mdname));
ERR_FAIL_V(NULL);
}
#endif
ClassInfo *type=classes.getptr(instance_type);
if (!type) {
ERR_PRINTS("Couldn't bind method '"+mdname+"' for instance: "+instance_type);
memdelete(p_bind);
ERR_FAIL_COND_V(!type,NULL);
}
if (type->method_map.has(mdname)) {
memdelete(p_bind);
// overloading not supported
ERR_EXPLAIN("Method already bound: "+instance_type+"::"+mdname);
ERR_FAIL_V(NULL);
}
#ifdef DEBUG_METHODS_ENABLED
p_bind->set_argument_names(method_name.args);
p_bind->set_return_type(rettype);
type->method_order.push_back(mdname);
#endif
type->method_map[mdname]=p_bind;
Vector<Variant> defvals;
defvals.resize(p_defcount);
for(int i=0;i<p_defcount;i++) {
defvals[i]=*p_defs[p_defcount-i-1];
}
p_bind->set_default_arguments(defvals);
p_bind->set_hint_flags(p_flags);
return p_bind;
}
void ClassDB::add_virtual_method(const StringName& p_class, const MethodInfo& p_method , bool p_virtual) {
ERR_FAIL_COND(!classes.has(p_class));
OBJTYPE_WLOCK;
#ifdef DEBUG_METHODS_ENABLED
MethodInfo mi=p_method;
if (p_virtual)
mi.flags|=METHOD_FLAG_VIRTUAL;
classes[p_class].virtual_methods.push_back(mi);
#endif
}
void ClassDB::get_virtual_methods(const StringName& p_class, List<MethodInfo> * p_methods , bool p_no_inheritance) {
ERR_FAIL_COND(!classes.has(p_class));
#ifdef DEBUG_METHODS_ENABLED
ClassInfo *type=classes.getptr(p_class);
ClassInfo *check=type;
while(check) {
for(List<MethodInfo>::Element *E=check->virtual_methods.front();E;E=E->next()) {
p_methods->push_back(E->get());
}
if (p_no_inheritance)
return;
check=check->inherits_ptr;
}
#endif
}
void ClassDB::set_class_enabled(StringName p_class,bool p_enable) {
OBJTYPE_WLOCK;
ERR_FAIL_COND(!classes.has(p_class));
classes[p_class].disabled=!p_enable;
}
bool ClassDB::is_class_enabled(StringName p_class) {
OBJTYPE_RLOCK;
ClassInfo *ti=classes.getptr(p_class);
if (!ti || !ti->creation_func) {
if (compat_classes.has(p_class)) {
ti=classes.getptr(compat_classes[p_class]);
}
}
ERR_FAIL_COND_V(!ti,false);
return !ti->disabled;
}
StringName ClassDB::get_category(const StringName& p_node) {
ERR_FAIL_COND_V(!classes.has(p_node),StringName());
#ifdef DEBUG_ENABLED
return classes[p_node].category;
#else
return StringName();
#endif
}
void ClassDB::add_resource_base_extension(const StringName& p_extension,const StringName& p_class) {
if (resource_base_extensions.has(p_extension))
return;
resource_base_extensions[p_extension]=p_class;
}
void ClassDB::get_resource_base_extensions(List<String> *p_extensions) {
const StringName *K=NULL;
while((K=resource_base_extensions.next(K))) {
p_extensions->push_back(*K);
}
}
void ClassDB::get_extensions_for_type(const StringName& p_class,List<String> *p_extensions) {
const StringName *K=NULL;
while((K=resource_base_extensions.next(K))) {
StringName cmp = resource_base_extensions[*K];
if (is_parent_class(p_class,cmp))
p_extensions->push_back(*K);
}
}
RWLock *ClassDB::lock=NULL;
void ClassDB::init() {
#ifndef NO_THREADS
lock = RWLock::create();
#endif
}
void ClassDB::cleanup() {
//OBJTYPE_LOCK; hah not here
const StringName *k=NULL;
while((k=classes.next(k))) {
ClassInfo &ti=classes[*k];
const StringName *m=NULL;
while((m=ti.method_map.next(m))) {
memdelete( ti.method_map[*m] );
}
}
classes.clear();
resource_base_extensions.clear();
compat_classes.clear();
#ifndef NO_THREADS
memdelete(lock);
#endif
}
//