nsz Git - libfirm/blob - scripts/gen_ir_io.py

   1 #!/usr/bin/python
   2 import sys
   3 from jinja2 import Environment, Template
   4 import ir_spec
   5
   6 def format_args(arglist):
   7         #argstrings = map(lambda arg : arg["name"], arglist)
   8         #return ", ".join(argstrings)
   9         s = ", ".join(arglist)
  10         if len(s) == 0:
  11           return "";
  12         return ", " + s;
  13
  14 def format_ifnset(string, node, key):
  15         if key in node:
  16                 return ""
  17         return string
  18
  19 def format_block(node):
  20         if node.get("knownBlock"):
  21                 return ""
  22         else:
  23                 return ", get_node(env, preds[0])"
  24
  25 env = Environment()
  26 env.filters['args']   = format_args
  27 env.filters['ifnset'] = format_ifnset
  28 env.filters['block']  = format_block
  29
  30 def get_io_type(type, attrname, nodename):
  31         if type == "tarval*":
  32                 importcmd = "tarval *%s = read_tv(env);" % attrname
  33                 exportcmd = """
  34                         write_mode(env, get_tarval_mode(%(val)s));
  35                         tarval_snprintf(buf, sizeof(buf), %(val)s);
  36                         fprintf(env->file, "%%s ", buf);"""
  37         elif type == "ir_mode*":
  38                 importcmd = "ir_mode *%s = read_mode(env);" % attrname
  39                 exportcmd = "write_mode(env, %(val)s);"
  40         elif type == "ir_entity*":
  41                 importcmd = "ir_entity *%s = read_entity(env);" % attrname
  42                 exportcmd = """fprintf(env->file, "%%ld ", get_entity_nr(%(val)s));"""
  43         elif type == "ir_type*":
  44                 importcmd = "ir_type *%s = read_type(env);" % attrname
  45                 exportcmd = """fprintf(env->file, "%%ld ", get_type_nr(%(val)s));"""
  46         elif type == "long" and nodename == "Proj":
  47                 importcmd = "long %s = read_long(env);" % attrname
  48                 exportcmd = """fprintf(env->file, "%%ld ", %(val)s);"""
  49         elif type == "pn_Cmp" or type == "ir_where_alloc":
  50                 importcmd = "%s %s = (%s) read_long(env);" % (type, attrname, type)
  51                 exportcmd = """fprintf(env->file, "%%ld ", (long) %(val)s);"""
  52         elif type == "cons_flags" and nodename == "Store":
  53                 importcmd = "ir_cons_flags %s = get_cons_flags(env);" % attrname
  54                 exportcmd = """write_pin_state(env, irn);
  55                         write_volatility(env, irn);
  56                         write_align(env, irn);"""
  57         elif type == "cons_flags" and nodename == "Load":
  58                 importcmd = "ir_cons_flags %s = get_cons_flags(env);" % attrname
  59                 exportcmd = """write_pin_state(env, irn);
  60                         write_volatility(env, irn);
  61                         write_align(env, irn);"""
  62         elif type == "op_pin_state":
  63                 importcmd = "op_pin_state %s = read_pin_state(env);" % attrname
  64                 exportcmd = "write_pin_state(env, irn);"
  65         else:
  66                 print "UNKNOWN TYPE: %s" % type
  67                 importcmd = """// BAD: %s %s
  68                         %s %s = (%s) 0;""" % (type, attrname, type, attrname, type)
  69                 exportcmd = "// BAD: %s" % type
  70         return (importcmd, exportcmd)
  71
  72 """     if type == "ir_type*":
  73                 java_type    = "firm.Type"
  74                 wrap_type    = "Pointer"
  75                 to_wrapper   = "%s.ptr"
  76                 from_wrapper = "firm.Type.createWrapper(%s)"
  77         elif type == "ir_mode*":
  78                 java_type    = "firm.Mode"
  79                 wrap_type    = "Pointer"
  80                 to_wrapper   = "%s.ptr"
  81                 from_wrapper = "new firm.Mode(%s)"
  82         elif type == "tarval*":
  83                 java_type    = "firm.TargetValue"
  84                 wrap_type    = "Pointer"
  85                 to_wrapper   = "%s.ptr"
  86                 from_wrapper = "new firm.TargetValue(%s)"
  87         elif type == "pn_Cmp":
  88                 java_type    = "int"
  89                 wrap_type    = "int"
  90                 to_wrapper   = "%s"
  91                 from_wrapper = "%s"
  92         elif type == "long":
  93                 java_type    = "int"
  94                 wrap_type    = "com.sun.jna.NativeLong"
  95                 to_wrapper   = "new com.sun.jna.NativeLong(%s)"
  96                 from_wrapper = "%s.intValue()"
  97         elif type == "cons_flags":
  98                 java_type    = "firm.bindings.binding_ircons.ir_cons_flags"
  99                 wrap_type    = "int"
 100                 to_wrapper   = "%s.val"
 101                 from_wrapper = "firm.bindings.binding_ircons.ir_cons_flags.getEnum(%s)"
 102         elif type == "ir_where_alloc":
 103                 java_type    = "firm.bindings.binding_ircons.ir_where_alloc"
 104                 wrap_type    = "int"
 105                 to_wrapper   = "%s.val"
 106                 from_wrapper = "firm.bindings.binding_ircons.ir_where_alloc.getEnum(%s)"
 107         elif type == "ir_entity*":
 108                 java_type    = "firm.Entity"
 109                 wrap_type    = "Pointer"
 110                 to_wrapper   = "%s.ptr"
 111                 from_wrapper = "new firm.Entity(%s)"
 112         else:
 113                 print "UNKNOWN TYPE"
 114                 java_type    = "BAD"
 115                 wrap_type    = "BAD"
 116                 to_wrapper   = "BAD"
 117                 from_wrapper = "BAD"
 118         return (java_type,wrap_type,to_wrapper,from_wrapper)"""
 119
 120 def prepare_attr(nodename, attr):
 121         (importcmd,exportcmd) = get_io_type(attr["type"], attr["name"], nodename)
 122         attr["importcmd"] = importcmd
 123         attr["exportcmd"] = exportcmd % {"val": "get_%s_%s(irn)" % (nodename, attr["name"])}
 124
 125 def preprocess_node(nodename, node):
 126         if "is_a" in node:
 127                 parent = ir_spec.nodes[node["is_a"]]
 128                 node["ins"] = parent["ins"]
 129                 if "outs" in parent:
 130                         node["outs"] = parent["outs"]
 131         if "ins" not in node:
 132                 node["ins"] = []
 133         if "outs" in node:
 134                 node["mode"] = "mode_T"
 135         if "arity" not in node:
 136                 node["arity"] = len(node["ins"])
 137         if "attrs" not in node:
 138                 node["attrs"] = []
 139         if "constructor_args" not in node:
 140                 node["constructor_args"] = []
 141
 142         # construct node arguments
 143         arguments = [ ]
 144         i = 0
 145         for input in node["ins"]:
 146                 arguments.append("prednodes[%i]" % i)
 147                 i += 1
 148
 149         if node["arity"] == "variable" or node["arity"] == "dynamic":
 150                 arguments.append("numpreds - %i" % (i + 1))
 151                 arguments.append("prednodes + %i" % i)
 152
 153         if "mode" not in node:
 154                 arguments.append("mode")
 155
 156         for attr in node["attrs"]:
 157                 prepare_attr(nodename, attr)
 158                 arguments.append(attr["name"])
 159
 160         for arg in node["constructor_args"]:
 161                 prepare_attr(nodename, arg)
 162                 arguments.append(arg["name"])
 163
 164         node["arguments"] = arguments
 165
 166 export_attrs_template = env.from_string('''
 167         case iro_{{nodename}}:
 168                 {{"write_mode(env, get_irn_mode(irn));"|ifnset(node,"mode")}}
 169                 {% for attr in node.attrs %}{{attr.exportcmd}}
 170                 {% endfor %}
 171                 {% for attr in node.constructor_args %}{{attr.exportcmd}}
 172                 {% endfor %}break;''')
 173
 174 import_attrs_template = env.from_string('''
 175         case iro_{{nodename}}:
 176         {
 177                 {{"ir_mode *mode = read_mode(env);"|ifnset(node,"mode")}}
 178                 {% for attr in node.attrs %}{{attr.importcmd}}
 179                 {% endfor %}
 180                 {% for attr in node.constructor_args %}{{attr.importcmd}}
 181                 {% endfor %}newnode = new_r_{{nodename}}(current_ir_graph{{node|block}}{{node["arguments"]|args}});
 182                 break;
 183         }
 184 ''')
 185
 186 def main(argv):
 187         """the main function"""
 188
 189         if len(argv) < 3:
 190                 print "usage: %s specname(ignored) destdirectory" % argv[0]
 191                 sys.exit(1)
 192
 193         gendir = argv[2]
 194
 195         file = open(gendir + "/gen_irio_export.inl", "w");
 196         for nodename, node in ir_spec.nodes.iteritems():
 197                 preprocess_node(nodename, node)
 198                 if not "abstract" in node:
 199                         file.write(export_attrs_template.render(vars()))
 200         file.write("\n")
 201         file.close()
 202
 203         file = open(gendir + "/gen_irio_import.inl", "w");
 204         for nodename, node in ir_spec.nodes.iteritems():
 205                 if not "abstract" in node and nodename != "Start" and nodename != "End" and nodename != "Anchor" and nodename != "SymConst" and nodename != "Block":
 206                         file.write(import_attrs_template.render(vars()))
 207         # TODO: SymConst
 208         file.write("\n")
 209         file.close()
 210
 211         file = open(gendir + "/gen_irio_lex.inl", "w");
 212         for nodename, node in ir_spec.nodes.iteritems():
 213                 if not "abstract" in node:
 214                         file.write("\tINSERT(\"" + nodename + "\", tt_iro, iro_" + nodename + ");\n");
 215         file.close()
 216
 217 if __name__ == "__main__":
 218         main(sys.argv)