X-Git-Url: http://git.asbjorn.biz/?a=blobdiff_plain;f=lib%2Fas3%2Fregistry.h;h=b2a8084652f902c850510f534c210f7896d2a437;hb=639ac6b9f7a89f10d02c5d9ef41bca3bad4eaf2b;hp=148958e0ab8988c83fe439406fdf5e7d18533d23;hpb=434d5040b814eae784d080c695fe8c3d370a166b;p=swftools.git diff --git a/lib/as3/registry.h b/lib/as3/registry.h index 148958e..b2a8084 100644 --- a/lib/as3/registry.h +++ b/lib/as3/registry.h @@ -30,6 +30,7 @@ DECLARE(slotinfo); DECLARE(classinfo); DECLARE(memberinfo); DECLARE(methodinfo); +DECLARE(unresolvedinfo); DECLARE(varinfo); DECLARE_LIST(classinfo); DECLARE_LIST(slotinfo); @@ -42,14 +43,16 @@ DECLARE_LIST(slotinfo); #define FLAG_STATIC 2 #define FLAG_OVERRIDE 8 #define FLAG_NATIVE 16 +#define FLAG_CONST 32 /* class flags */ #define FLAG_DYNAMIC 8 #define FLAG_INTERFACE 16 -#define INFOTYPE_SLOT 1 +#define INFOTYPE_VAR 1 #define INFOTYPE_METHOD 2 #define INFOTYPE_CLASS 3 +#define INFOTYPE_UNRESOLVED 4 #define SUBTYPE_GET 1 #define SUBTYPE_SET 2 #define SUBTYPE_GETSET 3 @@ -60,6 +63,13 @@ struct _slotinfo { const char*name; int slot; }; +struct _unresolvedinfo { + U8 kind,subtype,flags,access; + const char*package; + const char*name; + int slot; + namespace_list_t*nsset; +}; struct _classinfo { U8 kind,subtype,flags,access; const char*package; @@ -81,7 +91,7 @@ struct _memberinfo { }; classinfo_t*parent; }; -struct _methodinfo { +struct _methodinfo /*extends memberinfo*/ { U8 kind,subtype,flags,access; const char*package; const char*name; @@ -90,7 +100,7 @@ struct _methodinfo { classinfo_t*parent; classinfo_list_t*params; }; -struct _varinfo { +struct _varinfo /*extends memberinfo*/ { U8 kind,subtype,flags,access; const char*package; const char*name; @@ -100,6 +110,7 @@ struct _varinfo { constant_t*value; }; +extern type_t memberinfo_type; extern type_t slotinfo_type; char slotinfo_equals(slotinfo_t*c1, slotinfo_t*c2); @@ -111,12 +122,21 @@ methodinfo_t* methodinfo_register_global(U8 access, const char*package, const ch varinfo_t* varinfo_register_onclass(classinfo_t*cls, U8 access, const char*ns, const char*name); varinfo_t* varinfo_register_global(U8 access, const char*package, const char*name); +slotinfo_t* registry_resolve(slotinfo_t*s); +void registry_resolve_all(); + slotinfo_t* registry_find(const char*package, const char*name); void registry_dump(); memberinfo_t* registry_findmember(classinfo_t*cls, const char*ns, const char*name, char superclasses); memberinfo_t* registry_findmember_nsset(classinfo_t*cls, namespace_list_t*ns, const char*name, char superclasses); void registry_fill_multiname(multiname_t*m, namespace_t*n, slotinfo_t*c); +#define MULTINAME(m,x) \ + multiname_t m;\ + namespace_t m##_ns;\ + (x)->package; \ + registry_fill_multiname(&m, &m##_ns, (slotinfo_t*)(x)); + multiname_t* classinfo_to_multiname(slotinfo_t*cls); char registry_isfunctionclass(); @@ -127,6 +147,8 @@ classinfo_t* slotinfo_gettype(slotinfo_t*); namespace_t access2namespace(U8 access, char*package); +char registry_ispackage(char*package); + // static multinames classinfo_t* registry_getanytype(); classinfo_t* registry_getarrayclass(); @@ -136,42 +158,57 @@ classinfo_t* registry_getstringclass(); classinfo_t* registry_getintclass(); classinfo_t* registry_getuintclass(); classinfo_t* registry_getnullclass(); +classinfo_t* registry_getvoidclass(); +classinfo_t* registry_getarrayclass(); classinfo_t* registry_getregexpclass(); +classinfo_t* registry_getxmlclass(); +classinfo_t* registry_getxmllistclass(); classinfo_t* registry_getbooleanclass(); classinfo_t* registry_getMovieClip(); classinfo_t* registry_getclassclass(classinfo_t*a); +classinfo_t* registry_getnamespaceclass(); +extern classinfo_t voidclass; char* infotypename(slotinfo_t*s); +void slotinfo_dump(slotinfo_t*s); /* convenience functions */ #define sig2mname(x) (x->superclass,classinfo_to_multiname((slotinfo_t*)(x))) -#define TYPE_ANY registry_getanytype() -#define TYPE_IS_ANY(t) ((t) == registry_getanytype()) -#define TYPE_INT registry_getintclass() -#define TYPE_IS_INT(t) ((t) == registry_getintclass()) -#define TYPE_UINT registry_getuintclass() -#define TYPE_IS_UINT(t) ((t) == registry_getuintclass()) -#define TYPE_NUMBER registry_getnumberclass() -#define TYPE_IS_NUMBER(t) ((t) == registry_getnumberclass()) -#define TYPE_FLOAT registry_getnumberclass() -#define TYPE_IS_FLOAT(t) ((t) == registry_getnumberclass()) -#define TYPE_BOOLEAN registry_getbooleanclass() -#define TYPE_IS_BOOLEAN(t)((t) == registry_getbooleanclass()) -#define TYPE_STRING registry_getstringclass() -#define TYPE_IS_STRING(t) ((t) == registry_getstringclass()) -#define TYPE_REGEXP registry_getregexpclass() -#define TYPE_IS_REGEXP(t) ((t) == registry_getregexpclass()) - -#define TYPE_OBJECT registry_getobjectclass() - -#define TYPE_FUNCTION(f) ((f)->return_type,slotinfo_asclass((slotinfo_t*)(f))) -#define TYPE_IS_FUNCTION(t) registry_isfunctionclass(t) - -#define TYPE_CLASS(f) ((f)->superclass,slotinfo_asclass((slotinfo_t*)(f))) -#define TYPE_IS_CLASS(t) registry_isclassclass(t) - -#define TYPE_NULL registry_getnullclass() -#define TYPE_IS_NULL(t) ((t) == registry_getnullclass()) + +#define TYPE_ANY (0) +#define TYPE_IS_ANY(t) ((t) == 0) +#define TYPE_INT registry_getintclass() +#define TYPE_IS_INT(t) ((t) == registry_getintclass()) +#define TYPE_UINT registry_getuintclass() +#define TYPE_IS_UINT(t) ((t) == registry_getuintclass()) +#define TYPE_NUMBER registry_getnumberclass() +#define TYPE_IS_NUMBER(t) ((t) == registry_getnumberclass()) +#define TYPE_FLOAT registry_getnumberclass() +#define TYPE_IS_FLOAT(t) ((t) == registry_getnumberclass()) +#define TYPE_BOOLEAN registry_getbooleanclass() +#define TYPE_IS_BOOLEAN(t) ((t) == registry_getbooleanclass()) +#define TYPE_STRING registry_getstringclass() +#define TYPE_IS_STRING(t) ((t) == registry_getstringclass()) +#define TYPE_OBJECT registry_getobjectclass() +#define TYPE_IS_OBJECT(t) ((t) == registry_getobjectclass()) +#define TYPE_REGEXP registry_getregexpclass() +#define TYPE_IS_REGEXP(t) ((t) == registry_getregexpclass()) +#define TYPE_ARRAY registry_getarrayclass() +#define TYPE_IS_ARRAY(t) ((t) == registry_getarrayclass()) +#define TYPE_NAMESPACE registry_getnamespaceclass() +#define TYPE_IS_NAMESPACE(t) ((t) == registry_getnamespaceclass()) +#define TYPE_FUNCTION(f) ((f)->return_type,slotinfo_asclass((slotinfo_t*)(f))) +#define TYPE_IS_FUNCTION(t) registry_isfunctionclass(t) +#define TYPE_CLASS(f) ((f)->superclass,slotinfo_asclass((slotinfo_t*)(f))) +#define TYPE_IS_CLASS(t) registry_isclassclass(t) +#define TYPE_NULL registry_getnullclass() +#define TYPE_IS_NULL(t) ((t) == registry_getnullclass()) +#define TYPE_VOID registry_getvoidclass() +#define TYPE_IS_VOID(t) ((t) == registry_getvoidclass()) +#define TYPE_XML registry_getxmlclass() +#define TYPE_IS_XML(t) ((t) == registry_getxmlclass()) +#define TYPE_XMLLIST registry_getxmllistclass() +#define TYPE_IS_XMLLIST(t) ((t) == registry_getxmllistclass()) #define TYPE_IS_BUILTIN_SIMPLE(type) (TYPE_IS_INT(type) || \ TYPE_IS_UINT(type) || \ @@ -179,5 +216,7 @@ char* infotypename(slotinfo_t*s); TYPE_IS_BOOLEAN(type) || \ TYPE_IS_STRING(type)) +#define IS_NUMBER_OR_INT(a) (TYPE_IS_INT((a)) || TYPE_IS_UINT((a)) || TYPE_IS_NUMBER((a))) + #endif