fixed masked image bug
[swftools.git] / lib / as3 / mkabc.py
1 #!/usr/bin/python
2 #
3 # mkops.py
4 #
5 # Generate opcodes.h, opcodes.h
6 #
7 # Copyright (c) 2008 Matthias Kramm <kramm@quiss.org>
8 #
9 # This program is free software; you can redistribute it and/or modify
10 # it under the terms of the GNU General Public License as published by
11 # the Free Software Foundation; either version 2 of the License, or
12 # (at your option) any later version.
13 #
14 # This program is distributed in the hope that it will be useful,
15 # but WITHOUT ANY WARRANTY; without even the implied warranty of
16 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17 # GNU General Public License for more details.
18 #
19 # You should have received a copy of the GNU General Public License
20 # along with this program; if not, write to the Free Software
21 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
22
23 import re
24
25 fi = open("code.c", "rb")
26 foc = open("opcodes.c", "wb")
27 foh = open("opcodes.h", "wb")
28
29 foh.write("#ifndef __opcodes_h__\n")
30 foh.write("#define __opcodes_h__\n")
31 foh.write("#include \"abc.h\"\n")
32 foh.write("#include \"pool.h\"\n")
33 foh.write("#include \"code.h\"\n")
34
35 foc.write("#include \"opcodes.h\"\n")
36
37 R = re.compile('{(0x..),\s*"([^"]*)"\s*,\s*"([^"]*)"[^}]*}\s*')
38
39 for line in fi.readlines():
40     line = line.strip()
41     m = R.match(line)
42     if m:
43         op,name,params = m.group(1),m.group(2),m.group(3)
44
45         iterations=1
46         if "2" in params or "s" in params:
47             iterations=2
48
49         for iteration in range(iterations):
50             if iteration==1:
51                 name=name+"2"
52             params = params.strip()
53             paramstr = ""
54             seen = {}
55             names = []
56
57             for c in params:
58                 paramstr += ", "
59                 if c == "2":
60                     if iteration==0:
61                         type,pname="char*","name"
62                     else:
63                         type,pname="multiname_t*","name"
64                 elif c == "s":
65                     if iteration==0:
66                         type,pname="char*","name"
67                     else:
68                         type,pname="string_t*","s"
69                 elif c == "N":
70                     type,pname="namespace_t*","ns"
71                 elif c in "nubs":
72                     type,pname="int","v"
73                 elif c == "m":
74                     type,pname="abc_method_t*","m"
75                 elif c == "i":
76                     type,pname="abc_method_body_t*","m"
77                 elif c == "c":
78                     type,pname="abc_class_t*","m"
79                 elif c == "j":
80                     type,pname="code_t*","label"
81                 elif c == "S":
82                     type,pname="lookupswitch_t*","l"
83                 elif c == "D":
84                     type,pname="void*","debuginfo"
85                 elif c == "r":
86                     type,pname="int","reg"
87                 elif c == "f":
88                     type,pname="double","f"
89                 elif c == "I":
90                     type,pname="int","i"
91                 elif c == "U":
92                     type,pname="unsigned int","u"
93                 else:
94                     raise "Unknown type "+c
95                 paramstr += type
96                 paramstr += " "
97                 if pname in seen:
98                     seen[pname]+=1
99                     pname += str(seen[pname])
100                 else:
101                     seen[pname]=1
102                 paramstr += pname
103                 names += [pname]
104
105             foh.write("code_t* abc_%s(code_t*prev%s);\n" % (name, paramstr))
106
107             foc.write("code_t* abc_%s(code_t*prev%s)\n" % (name, paramstr))
108             foc.write("{\n")
109             foc.write("    code_t*self = add_opcode(prev, %s);\n" % op)
110             i = 0
111             for pname,c in zip(names,params):
112                 if(c == "2"):
113                     if iteration==0:
114                      foc.write("    self->data[%d] = multiname_fromstring(%s);\n" % (i,pname));
115                     else:
116                      foc.write("    self->data[%d] = multiname_clone(%s);\n" % (i,pname));
117                 elif(c in "nur"):
118                     foc.write("    self->data[%d] = (void*)(ptroff_t)%s;\n" % (i,pname))
119                 elif(c in "IU"):
120                     foc.write("    self->data[%d] = (void*)(ptroff_t)%s;\n" % (i,pname))
121                 elif(c in "N"):
122                     foc.write("    self->data[%d] = namespace_clone(%s);\n" % (i,pname))
123                 elif(c in "f"):
124                     foc.write("    double*fp = malloc(sizeof(double));\n")
125                     foc.write("    *fp = %s;\n" % (pname))
126                     foc.write("    self->data[%d] = fp;\n" % (i))
127                 elif(c == "b"):
128                     foc.write("    self->data[%d] = (void*)(ptroff_t)%s;\n" % (i,pname))
129                 elif(c == "s"):
130                     if iteration==0:
131                         foc.write("    self->data[%d] = string_new4(%s);\n" % (i,pname))
132                     else:
133                         foc.write("    self->data[%d] = string_dup3(%s);\n" % (i,pname))
134                 elif(c == "m"):
135                     foc.write("    self->data[%d] = %s;\n" % (i,pname))
136                 elif(c == "c"):
137                     foc.write("    self->data[%d] = %s;\n" % (i,pname))
138                 elif(c == "i"):
139                     foc.write("    self->data[%d] = %s;\n" % (i,pname))
140                 elif(c == "j"):
141                     foc.write("    self->data[%d] = 0; //placeholder\n" % i)
142                     foc.write("    self->branch = %s;\n" % pname)
143                 elif(c == "S"):
144                     foc.write("    self->data[%d] = %s;\n" % (i,pname))
145                 elif(c == "D"):
146                     foc.write("    /* FIXME: write debuginfo %s */\n" % pname)
147                 else:
148                     raise "Unknown type "+c
149                 i = i+1
150             foc.write("    return self;\n")
151             foc.write("}\n")
152
153             foh.write("#define "+name+"(")
154             foh.write(",".join(["method"]+names))
155             foh.write(") (method->code = abc_"+name+"(")
156             foh.write(",".join(["method->code"]+names))
157             foh.write("))\n")
158
159             foh.write("#define OPCODE_"+name.upper()+" "+op+"\n")
160
161 foh.write("#endif\n")
162
163 foh.close()
164 foc.close()
165 fi.close()
166 #{0x75, "convert_d", ""},
167