77d1f89df0c2d30d08e07d20bdee675d9ea1df06
[swftools.git] / 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
85 classinfo_t* registry_findclass(const char*package, const char*name);
86 memberinfo_t* registry_findmember(classinfo_t*cls, const char*name);
87
88 void registry_fill_multiname(multiname_t*m, namespace_t*n, classinfo_t*c);
89 multiname_t* classinfo_to_multiname(classinfo_t*cls);
90
91 char registry_isfunctionclass();
92 /* convenience functions */
93 #define sig2mname(x) classinfo_to_multiname(x)
94 #define TYPE_ANY                  registry_getanytype()
95 #define TYPE_IS_ANY(t)    ((t) == registry_getanytype())
96 #define TYPE_INT                  registry_getintclass()
97 #define TYPE_IS_INT(t)    ((t) == registry_getintclass())
98 #define TYPE_UINT                 registry_getuintclass()
99 #define TYPE_IS_UINT(t)   ((t) == registry_getuintclass())
100 #define TYPE_NUMBER               registry_getnumberclass()
101 #define TYPE_IS_NUMBER(t) ((t) == registry_getnumberclass())
102 #define TYPE_FLOAT                registry_getnumberclass()
103 #define TYPE_IS_FLOAT(t)  ((t) == registry_getnumberclass())
104 #define TYPE_BOOLEAN              registry_getbooleanclass()
105 #define TYPE_IS_BOOLEAN(t)((t) == registry_getbooleanclass())
106 #define TYPE_STRING               registry_getstringclass()
107 #define TYPE_IS_STRING(t) ((t) == registry_getstringclass())
108
109 #define TYPE_FUNCTION(f)          registry_getfunctionclass(f)
110 #define TYPE_IS_FUNCTION(t)       registry_isfunctionclass(t)
111
112 #define TYPE_NULL                 registry_getnullclass()
113 #define TYPE_IS_NULL(t)   ((t) == registry_getnullclass())
114         
115 #define TYPE_IS_BUILTIN_SIMPLE(type) (TYPE_IS_INT(type) || \
116                                       TYPE_IS_UINT(type) || \
117                                       TYPE_IS_FLOAT(type) || \
118                                       TYPE_IS_BOOLEAN(type) || \
119                                       TYPE_IS_STRING(type))
120
121
122 #endif