lib/as3/registry.c

   1 #include "pool.h"
   2 #include "registry.h"
   3
   4 static namespace_t static_empty_ns = {
   5     ACCESS_PACKAGE, ""
   6 };
   7 static namespace_t static_flash_display_ns = {
   8     ACCESS_PACKAGE, "flash.display"
   9 };
  10 static multiname_t static_object_class = {
  11     QNAME, &static_empty_ns, 0, "Object"
  12 };
  13 static multiname_t static_anytype_class = {
  14     QNAME, &static_empty_ns, 0, 0
  15 };
  16 static multiname_t static_string_class = {
  17     QNAME, &static_empty_ns, 0, "String"
  18 };
  19 static multiname_t static_boolean_class = {
  20     QNAME, &static_empty_ns, 0, "Boolean"
  21 };
  22 static multiname_t static_number_class = {
  23     QNAME, &static_empty_ns, 0, "Number"
  24 };
  25 static multiname_t static_int_class = {
  26     QNAME, &static_empty_ns, 0, "int"
  27 };
  28 static multiname_t static_uint_class = {
  29     QNAME, &static_empty_ns, 0, "uint"
  30 };
  31 static multiname_t static_movieclip_class = {
  32     QNAME, &static_flash_display_ns, 0, "MovieClip"
  33 };
  34
  35 multiname_t* registry_getobjectclass() {return &static_object_class;}
  36 multiname_t* registry_getanytype() {return &static_anytype_class;}
  37 multiname_t* registry_getstringclass() {return &static_string_class;}
  38 multiname_t* registry_getintclass() {return &static_int_class;}
  39 multiname_t* registry_getuintclass() {return &static_uint_class;}
  40 multiname_t* registry_getbooleanclass() {return &static_boolean_class;}
  41 multiname_t* registry_getnumberclass() {return &static_number_class;}
  42 multiname_t* registry_getMovieClip() {return &static_movieclip_class;}
  43
  44
  45 multiname_t* registry_findclass(const char*package, const char*name)
  46 {
  47     multiname_t*m=0;
  48     if(!package) {
  49         m = multiname_new(0, name);
  50     } else {
  51         namespace_t*ns = 0;
  52
  53         /* things in the "flash" package are usually public */
  54         if(!strncmp(package, "flash", 5))
  55             ns =namespace_new_package(package);
  56         else
  57             ns = namespace_new_packageinternal(package);
  58
  59         m = multiname_new(ns,name);
  60         namespace_destroy(ns);
  61     }
  62     return m;
  63 }
  64 multiname_t* registry_getsuperclass(multiname_t*m)
  65 {
  66     if(!m->name)
  67         return 0;
  68     if(!strcmp(m->name, "Object"))
  69         return 0;
  70
  71     else if(!strcmp(m->name, "MovieClip"))
  72         return multiname_fromstring("[package]flash.display::Sprite");
  73     else if(!strcmp(m->name, "Sprite"))
  74         return multiname_fromstring("[package]flash.display::DisplayObjectContainer");
  75     else if(!strcmp(m->name, "DisplayObjectContainer"))
  76         return multiname_fromstring("[package]flash.display::InteractiveObject");
  77     else if(!strcmp(m->name, "InteractiveObject"))
  78         return multiname_fromstring("[package]flash.display::DisplayObject");
  79     else if(!strcmp(m->name, "DisplayObject"))
  80         return multiname_fromstring("[package]flash.events::EventDispatcher");
  81     else
  82         return &static_object_class;
  83 }
  84