lib/as3/registry.h

   1 /* registry.h
   2
   3    Routines for compiling Flash2 AVM2 ABC Actionscript
   4
   5    Extension module for the rfxswf library.
   6    Part of the swftools package.
   7
   8    Copyright (c) 2008 Matthias Kramm <kramm@quiss.org>
   9
  10    This program is free software; you can redistribute it and/or modify
  11    it under the terms of the GNU General Public License as published by
  12    the Free Software Foundation; either version 2 of the License, or
  13    (at your option) any later version.
  14
  15    This program is distributed in the hope that it will be useful,
  16    but WITHOUT ANY WARRANTY; without even the implied warranty of
  17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18    GNU General Public License for more details.
  19
  20    You should have received a copy of the GNU General Public License
  21    along with this program; if not, write to the Free Software
  22    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
  23
  24 #ifndef __abc_registry_h__
  25 #define __abc_registry_h__
  26
  27 #include "pool.h"
  28
  29 DECLARE(classinfo);
  30 DECLARE_LIST(classinfo);
  31 DECLARE(memberinfo);
  32
  33 struct _classinfo {
  34     U8 access;
  35     U8 flags;
  36     const char*package;
  37     const char*name;
  38     union {
  39         int slot;        // slot nr in initscript traits
  40         classinfo_t*cls; // specific class of a Class type
  41         memberinfo_t*function; //specific function of a Function type
  42     };
  43
  44     classinfo_t*superclass;
  45     dict_t members;
  46     classinfo_t*interfaces[];
  47 };
  48 char classinfo_equals(classinfo_t*c1, classinfo_t*c2);
  49
  50 #define MEMBER_SLOT 1
  51 #define MEMBER_GET 2
  52 #define MEMBER_SET 4
  53 #define MEMBER_GETSET 6
  54 #define MEMBER_METHOD 8
  55
  56 struct _memberinfo {
  57     U8 kind;
  58     U8 flags;
  59     const char*name;
  60     union {
  61         classinfo_t*return_type;
  62         classinfo_t*type;
  63     };
  64     classinfo_list_t*params;
  65     int slot;
  66 };
  67
  68 extern type_t classinfo_type;
  69 extern type_t function_signature_type;
  70
  71 void registry_init();
  72
  73 classinfo_t* classinfo_register(int access, char*package, char*name, int num_interfaces);
  74 memberinfo_t* memberinfo_register(classinfo_t*cls, const char*name, U8 type);
  75
  76 // static multinames
  77 classinfo_t* registry_getanytype();
  78 classinfo_t* registry_getobjectclass();
  79 classinfo_t* registry_getnumberclass();
  80 classinfo_t* registry_getstringclass();
  81 classinfo_t* registry_getintclass();
  82 classinfo_t* registry_getuintclass();
  83 classinfo_t* registry_getnullclass();
  84 classinfo_t* registry_getbooleanclass();
  85 classinfo_t* memberinfo_asclass();
  86 classinfo_t* registry_getMovieClip();
  87 classinfo_t* memberinfo_asclass(memberinfo_t*f);
  88 classinfo_t* registry_getclassclass(classinfo_t*a);
  89
  90 classinfo_t* registry_findclass(const char*package, const char*name);
  91 memberinfo_t* registry_findmember(classinfo_t*cls, const char*name);
  92
  93 void registry_fill_multiname(multiname_t*m, namespace_t*n, classinfo_t*c);
  94 multiname_t* classinfo_to_multiname(classinfo_t*cls);
  95
  96 char registry_isfunctionclass();
  97 char registry_isclassclass();
  98
  99 classinfo_t* memberinfo_gettype(memberinfo_t*);
 100
 101 /* convenience functions */
 102 #define sig2mname(x) classinfo_to_multiname(x)
 103 #define TYPE_ANY                  registry_getanytype()
 104 #define TYPE_IS_ANY(t)    ((t) == registry_getanytype())
 105 #define TYPE_INT                  registry_getintclass()
 106 #define TYPE_IS_INT(t)    ((t) == registry_getintclass())
 107 #define TYPE_UINT                 registry_getuintclass()
 108 #define TYPE_IS_UINT(t)   ((t) == registry_getuintclass())
 109 #define TYPE_NUMBER               registry_getnumberclass()
 110 #define TYPE_IS_NUMBER(t) ((t) == registry_getnumberclass())
 111 #define TYPE_FLOAT                registry_getnumberclass()
 112 #define TYPE_IS_FLOAT(t)  ((t) == registry_getnumberclass())
 113 #define TYPE_BOOLEAN              registry_getbooleanclass()
 114 #define TYPE_IS_BOOLEAN(t)((t) == registry_getbooleanclass())
 115 #define TYPE_STRING               registry_getstringclass()
 116 #define TYPE_IS_STRING(t) ((t) == registry_getstringclass())
 117
 118 #define TYPE_OBJECT               registry_getobjectclass()
 119
 120 #define TYPE_FUNCTION(f)          memberinfo_asclass(f)
 121 #define TYPE_IS_FUNCTION(t)       registry_isfunctionclass(t)
 122
 123 #define TYPE_CLASS(f)             registry_getclassclass(f)
 124 #define TYPE_IS_CLASS(t)          registry_isclassclass(t)
 125
 126 #define TYPE_NULL                 registry_getnullclass()
 127 #define TYPE_IS_NULL(t)   ((t) == registry_getnullclass())
 128
 129 #define TYPE_IS_BUILTIN_SIMPLE(type) (TYPE_IS_INT(type) || \
 130                                       TYPE_IS_UINT(type) || \
 131                                       TYPE_IS_FLOAT(type) || \
 132                                       TYPE_IS_BOOLEAN(type) || \
 133                                       TYPE_IS_STRING(type))
 134
 135
 136 #endif