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     int slot;
  39
  40     classinfo_t*superclass;
  41     dict_t members;
  42     classinfo_t*interfaces[];
  43 };
  44 char classinfo_equals(classinfo_t*c1, classinfo_t*c2);
  45
  46 #define MEMBER_SLOT 1
  47 #define MEMBER_GET 2
  48 #define MEMBER_SET 4
  49 #define MEMBER_GETSET 6
  50 #define MEMBER_METHOD 8
  51
  52 struct _memberinfo {
  53     U8 kind;
  54     U8 flags;
  55     const char*name;
  56     union {
  57         classinfo_t*return_type;
  58         classinfo_t*type;
  59     };
  60     classinfo_list_t*params;
  61     int slot;
  62 };
  63
  64 extern type_t classinfo_type;
  65 extern type_t function_signature_type;
  66
  67 void registry_init();
  68
  69 classinfo_t* classinfo_register(int access, char*package, char*name, int num_interfaces);
  70 memberinfo_t* memberinfo_register(classinfo_t*cls, const char*name, U8 type);
  71
  72 // static multinames
  73 classinfo_t* registry_getanytype();
  74 classinfo_t* registry_getobjectclass();
  75 classinfo_t* registry_getnumberclass();
  76 classinfo_t* registry_getstringclass();
  77 classinfo_t* registry_getintclass();
  78 classinfo_t* registry_getuintclass();
  79 classinfo_t* registry_getnullclass();
  80 classinfo_t* registry_getbooleanclass();
  81 classinfo_t* registry_getfunctionclass();
  82 classinfo_t* registry_getMovieClip();
  83 classinfo_t* registry_getfunctionclass(memberinfo_t*f);
  84 classinfo_t* registry_getclassclass(classinfo_t*a);
  85
  86 classinfo_t* registry_findclass(const char*package, const char*name);
  87 memberinfo_t* registry_findmember(classinfo_t*cls, const char*name);
  88
  89 void registry_fill_multiname(multiname_t*m, namespace_t*n, classinfo_t*c);
  90 multiname_t* classinfo_to_multiname(classinfo_t*cls);
  91
  92 char registry_isfunctionclass();
  93 char registry_isclassclass();
  94
  95 /* convenience functions */
  96 #define sig2mname(x) classinfo_to_multiname(x)
  97 #define TYPE_ANY                  registry_getanytype()
  98 #define TYPE_IS_ANY(t)    ((t) == registry_getanytype())
  99 #define TYPE_INT                  registry_getintclass()
 100 #define TYPE_IS_INT(t)    ((t) == registry_getintclass())
 101 #define TYPE_UINT                 registry_getuintclass()
 102 #define TYPE_IS_UINT(t)   ((t) == registry_getuintclass())
 103 #define TYPE_NUMBER               registry_getnumberclass()
 104 #define TYPE_IS_NUMBER(t) ((t) == registry_getnumberclass())
 105 #define TYPE_FLOAT                registry_getnumberclass()
 106 #define TYPE_IS_FLOAT(t)  ((t) == registry_getnumberclass())
 107 #define TYPE_BOOLEAN              registry_getbooleanclass()
 108 #define TYPE_IS_BOOLEAN(t)((t) == registry_getbooleanclass())
 109 #define TYPE_STRING               registry_getstringclass()
 110 #define TYPE_IS_STRING(t) ((t) == registry_getstringclass())
 111
 112 #define TYPE_FUNCTION(f)          registry_getfunctionclass(f)
 113 #define TYPE_IS_FUNCTION(t)       registry_isfunctionclass(t)
 114
 115 #define TYPE_CLASS(f)             registry_getclassclass(f)
 116 #define TYPE_IS_CLASS(t)          registry_isclassclass(t)
 117
 118 #define TYPE_NULL                 registry_getnullclass()
 119 #define TYPE_IS_NULL(t)   ((t) == registry_getnullclass())
 120
 121 #define TYPE_IS_BUILTIN_SIMPLE(type) (TYPE_IS_INT(type) || \
 122                                       TYPE_IS_UINT(type) || \
 123                                       TYPE_IS_FLOAT(type) || \
 124                                       TYPE_IS_BOOLEAN(type) || \
 125                                       TYPE_IS_STRING(type))
 126
 127
 128 #endif