nsz Git - libfirm/blob - ir/be/ia32/ia32_spec.pl

   1 # Creation: 2005/10/19
   2 # $Id$
   3 # This is the specification for the ia32 assembler Firm-operations
   4
   5 use File::Basename;
   6
   7 $new_emit_syntax = 1;
   8 my $myname = $0;
   9
  10 # the cpu architecture (ia32, ia64, mips, sparc, ppc, ...)
  11 $arch = "ia32";
  12
  13 # The node description is done as a perl hash initializer with the
  14 # following structure:
  15 #
  16 # %nodes = (
  17 #
  18 # <op-name> => {
  19 #   op_flags  => "N|L|C|X|I|F|Y|H|c|K",
  20 #   irn_flags => "R|N|I|S"
  21 #   arity     => "0|1|2|3 ... |variable|dynamic|any",
  22 #   state     => "floats|pinned|mem_pinned|exc_pinned",
  23 #   args      => [
  24 #                    { type => "type 1", name => "name 1" },
  25 #                    { type => "type 2", name => "name 2" },
  26 #                    ...
  27 #                  ],
  28 #   comment   => "any comment for constructor",
  29 #   reg_req   => { in => [ "reg_class|register" ], out => [ "reg_class|register|in_rX" ] },
  30 #   cmp_attr  => "c source code for comparing node attributes",
  31 #   emit      => "emit code with templates",
  32 #   attr      => "attitional attribute arguments for constructor"
  33 #   init_attr => "emit attribute initialization template"
  34 #   rd_constructor => "c source code which constructs an ir_node"
  35 #   attr_type => "name of the attribute struct",
  36 # },
  37 #
  38 # ... # (all nodes you need to describe)
  39 #
  40 # ); # close the %nodes initializer
  41
  42 # op_flags: flags for the operation, OPTIONAL (default is "N")
  43 # the op_flags correspond to the firm irop_flags:
  44 #   N   irop_flag_none
  45 #   L   irop_flag_labeled
  46 #   C   irop_flag_commutative
  47 #   X   irop_flag_cfopcode
  48 #   I   irop_flag_ip_cfopcode
  49 #   F   irop_flag_fragile
  50 #   Y   irop_flag_forking
  51 #   H   irop_flag_highlevel
  52 #   c   irop_flag_constlike
  53 #   K   irop_flag_keep
  54 #
  55 # irn_flags: special node flags, OPTIONAL (default is 0)
  56 # following irn_flags are supported:
  57 #   R   rematerializeable
  58 #   N   not spillable
  59 #   I   ignore for register allocation
  60 #   S   modifies stack pointer
  61 #
  62 # state: state of the operation, OPTIONAL (default is "floats")
  63 #
  64 # arity: arity of the operation, MUST NOT BE OMITTED
  65 #
  66 # args:  the OPTIONAL arguments of the node constructor (debug, irg and block
  67 #        are always the first 3 arguments and are always autmatically
  68 #        created)
  69 #        If this key is missing the following arguments will be created:
  70 #        for i = 1 .. arity: ir_node *op_i
  71 #        ir_mode *mode
  72 #
  73 # outs:  if a node defines more than one output, the names of the projections
  74 #        nodes having outs having automatically the mode mode_T
  75 #        One can also annotate some flags for each out, additional to irn_flags.
  76 #        They are separated from name with a colon ':', and concatenated by pipe '|'
  77 #        Only I and S are available at the moment (same meaning as in irn_flags).
  78 #        example: [ "frame:I", "stack:I|S", "M" ]
  79 #
  80 # comment: OPTIONAL comment for the node constructor
  81 #
  82 # rd_constructor: for every operation there will be a
  83 #      new_rd_<arch>_<op-name> function with the arguments from above
  84 #      which creates the ir_node corresponding to the defined operation
  85 #      you can either put the complete source code of this function here
  86 #
  87 #      This key is OPTIONAL. If omitted, the following constructor will
  88 #      be created:
  89 #      if (!op_<arch>_<op-name>) assert(0);
  90 #      for i = 1 to arity
  91 #         set in[i] = op_i
  92 #      done
  93 #      res = new_ir_node(db, irg, block, op_<arch>_<op-name>, mode, arity, in)
  94 #      return res
  95 #
  96 # NOTE: rd_constructor and args are only optional if and only if arity is 0,1,2 or 3
  97 #
  98
  99 # register types:
 100 #   0 - no special type
 101 #   1 - caller save (register must be saved by the caller of a function)
 102 #   2 - callee save (register must be saved by the called function)
 103 #   4 - ignore (do not assign this register)
 104 #   8 - emitter can choose an arbitrary register of this class
 105 #  16 - the register is a virtual one
 106 #  32 - register represents a state
 107 # NOTE: Last entry of each class is the largest Firm-Mode a register can hold
 108 %reg_classes = (
 109         gp => [
 110                 { name => "edx", type => 1 },
 111                 { name => "ecx", type => 1 },
 112                 { name => "eax", type => 1 },
 113                 { name => "ebx", type => 2 },
 114                 { name => "esi", type => 2 },
 115                 { name => "edi", type => 2 },
 116                 { name => "ebp", type => 2 },
 117                 { name => "esp", type => 4 },
 118                 { name => "gp_NOREG", type => 4 | 8 | 16 }, # we need a dummy register for NoReg nodes
 119                 { name => "gp_UKNWN", type => 4 | 8 | 16 },  # we need a dummy register for Unknown nodes
 120                 { mode => "mode_Iu" }
 121         ],
 122         mmx => [
 123                 { name => "mm0", type => 4 },
 124                 { name => "mm1", type => 4 },
 125                 { name => "mm2", type => 4 },
 126                 { name => "mm3", type => 4 },
 127                 { name => "mm4", type => 4 },
 128                 { name => "mm5", type => 4 },
 129                 { name => "mm6", type => 4 },
 130                 { name => "mm7", type => 4 },
 131                 { mode => "mode_E", flags => "manual_ra" }
 132         ],
 133         xmm => [
 134                 { name => "xmm0", type => 1 },
 135                 { name => "xmm1", type => 1 },
 136                 { name => "xmm2", type => 1 },
 137                 { name => "xmm3", type => 1 },
 138                 { name => "xmm4", type => 1 },
 139                 { name => "xmm5", type => 1 },
 140                 { name => "xmm6", type => 1 },
 141                 { name => "xmm7", type => 1 },
 142                 { name => "xmm_NOREG", type => 4 | 16 },     # we need a dummy register for NoReg nodes
 143                 { name => "xmm_UKNWN", type => 4 | 8 | 16},  # we need a dummy register for Unknown nodes
 144                 { mode => "mode_E" }
 145         ],
 146         vfp => [
 147                 { name => "vf0", type => 1 | 16 },
 148                 { name => "vf1", type => 1 | 16 },
 149                 { name => "vf2", type => 1 | 16 },
 150                 { name => "vf3", type => 1 | 16 },
 151                 { name => "vf4", type => 1 | 16 },
 152                 { name => "vf5", type => 1 | 16 },
 153                 { name => "vf6", type => 1 | 16 },
 154                 { name => "vf7", type => 1 | 16 },
 155                 { name => "vfp_NOREG", type => 4 | 8 | 16 }, # we need a dummy register for NoReg nodes
 156                 { name => "vfp_UKNWN", type => 4 | 8 | 16 },  # we need a dummy register for Unknown nodes
 157                 { mode => "mode_E" }
 158         ],
 159         st => [
 160                 { name => "st0", realname => "st",    type => 4 },
 161                 { name => "st1", realname => "st(1)", type => 4 },
 162                 { name => "st2", realname => "st(2)", type => 4 },
 163                 { name => "st3", realname => "st(3)", type => 4 },
 164                 { name => "st4", realname => "st(4)", type => 4 },
 165                 { name => "st5", realname => "st(5)", type => 4 },
 166                 { name => "st6", realname => "st(6)", type => 4 },
 167                 { name => "st7", realname => "st(7)", type => 4 },
 168                 { mode => "mode_E", flags => "manual_ra" }
 169         ],
 170         fp_cw => [      # the floating point control word
 171                 { name => "fpcw", type => 4|32 },
 172                 { mode => "mode_fpcw", flags => "manual_ra|state" }
 173         ],
 174         flags => [
 175                 { name => "eflags", type => 0 },
 176                 { mode => "mode_Iu", flags => "manual_ra" }
 177         ],
 178 ); # %reg_classes
 179
 180 %cpu = (
 181         GP     => [ 1, "GP_EAX", "GP_EBX", "GP_ECX", "GP_EDX", "GP_ESI", "GP_EDI", "GP_EBP" ],
 182         SSE    => [ 1, "SSE_XMM0", "SSE_XMM1", "SSE_XMM2", "SSE_XMM3", "SSE_XMM4", "SSE_XMM5", "SSE_XMM6", "SSE_XMM7" ],
 183         VFP    => [ 1, "VFP_VF0", "VFP_VF1", "VFP_VF2", "VFP_VF3", "VFP_VF4", "VFP_VF5", "VFP_VF6", "VFP_VF7" ],
 184         BRANCH => [ 1, "BRANCH1", "BRANCH2" ],
 185 ); # %cpu
 186
 187 %vliw = (
 188         bundle_size       => 1,
 189         bundels_per_cycle => 1
 190 ); # vliw
 191
 192 %emit_templates = (
 193         S0 => "${arch}_emit_source_register(node, 0);",
 194         S1 => "${arch}_emit_source_register(node, 1);",
 195         S2 => "${arch}_emit_source_register(node, 2);",
 196         S3 => "${arch}_emit_source_register(node, 3);",
 197         SB1 => "${arch}_emit_8bit_source_register_or_immediate(node, 1);",
 198         SB2 => "${arch}_emit_8bit_source_register_or_immediate(node, 2);",
 199         SB3 => "${arch}_emit_8bit_source_register_or_immediate(node, 3);",
 200         SI1 => "${arch}_emit_source_register_or_immediate(node, 1);",
 201         SI3 => "${arch}_emit_source_register_or_immediate(node, 3);",
 202         D0 => "${arch}_emit_dest_register(node, 0);",
 203         D1 => "${arch}_emit_dest_register(node, 1);",
 204         DB0 => "${arch}_emit_8bit_dest_register(node, 0);",
 205         X0 => "${arch}_emit_x87_register(node, 0);",
 206         X1 => "${arch}_emit_x87_register(node, 1);",
 207         SE => "${arch}_emit_extend_suffix(get_ia32_ls_mode(node));",
 208         ME => "if(get_mode_size_bits(get_ia32_ls_mode(node)) != 32)\n
 209                    ia32_emit_mode_suffix(node);",
 210         M  => "${arch}_emit_mode_suffix(node);",
 211         XM => "${arch}_emit_x87_mode_suffix(node);",
 212         XXM => "${arch}_emit_xmm_mode_suffix(node);",
 213         XSD => "${arch}_emit_xmm_mode_suffix_s(node);",
 214         AM => "${arch}_emit_am(node);",
 215         unop3 => "${arch}_emit_unop(node, 3);",
 216         unop4 => "${arch}_emit_unop(node, 4);",
 217         unop5 => "${arch}_emit_unop(node, 5);",
 218         binop => "${arch}_emit_binop(node);",
 219         x87_binop => "${arch}_emit_x87_binop(node);",
 220         CMP0  => "${arch}_emit_cmp_suffix_node(node, 0);",
 221         CMP3  => "${arch}_emit_cmp_suffix_node(node, 3);",
 222 );
 223
 224 #--------------------------------------------------#
 225 #                        _                         #
 226 #                       (_)                        #
 227 #  _ __   _____      __  _ _ __    ___  _ __  ___  #
 228 # | '_ \ / _ \ \ /\ / / | | '__|  / _ \| '_ \/ __| #
 229 # | | | |  __/\ V  V /  | | |    | (_) | |_) \__ \ #
 230 # |_| |_|\___| \_/\_/   |_|_|     \___/| .__/|___/ #
 231 #                                      | |         #
 232 #                                      |_|         #
 233 #--------------------------------------------------#
 234
 235 $default_op_attr_type = "ia32_op_attr_t";
 236 $default_attr_type    = "ia32_attr_t";
 237 $default_copy_attr    = "ia32_copy_attr";
 238
 239 sub ia32_custom_init_attr {
 240         my $node = shift;
 241         my $name = shift;
 242         my $res = "";
 243
 244         if(defined($node->{modified_flags})) {
 245                 $res .= "\tset_ia32_flags(res, get_ia32_flags(res) | arch_irn_flags_modify_flags);\n";
 246         }
 247         if(defined($node->{am})) {
 248                 my $am = $node->{am};
 249                 if($am eq "source,unary") {
 250                         $res .= "\tset_ia32_am_support(res, ia32_am_Source, ia32_am_unary);";
 251                 } elsif($am eq "source,binary") {
 252                         $res .= "\tset_ia32_am_support(res, ia32_am_Source, ia32_am_binary);";
 253                 } elsif($am eq "source,ternary") {
 254                         $res .= "\tset_ia32_am_support(res, ia32_am_Source, ia32_am_ternary);";
 255                 } elsif($am eq "none") {
 256                         # nothing to do
 257                 } else {
 258                         die("Invalid address mode '$am' specified on op $name");
 259                 }
 260                 if($am ne "none") {
 261                         if($node->{state} ne "exc_pinned"
 262                                         and $node->{state} ne "pinned") {
 263                                 die("AM nodes must have pinned or AM pinned state ($name)");
 264                         }
 265                 }
 266         }
 267         return $res;
 268 }
 269 $custom_init_attr_func = \&ia32_custom_init_attr;
 270
 271 %init_attr = (
 272         ia32_attr_t     => "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);",
 273         ia32_x87_attr_t =>
 274                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 275                 "\tinit_ia32_x87_attributes(res);",
 276         ia32_asm_attr_t =>
 277                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 278                 "\tinit_ia32_x87_attributes(res);".
 279                 "\tinit_ia32_asm_attributes(res);",
 280         ia32_immediate_attr_t =>
 281                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 282                 "\tinit_ia32_immediate_attributes(res, symconst, symconst_sign, offset);",
 283         ia32_copyb_attr_t =>
 284                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 285                 "\tinit_ia32_copyb_attributes(res, size);",
 286         ia32_condcode_attr_t =>
 287                 "\tinit_ia32_attributes(res, flags, in_reqs, out_reqs, exec_units, n_res);\n".
 288                 "\tinit_ia32_condcode_attributes(res, pnc);",
 289 );
 290
 291 %compare_attr = (
 292         ia32_attr_t           => "ia32_compare_nodes_attr",
 293         ia32_x87_attr_t       => "ia32_compare_x87_attr",
 294         ia32_asm_attr_t       => "ia32_compare_asm_attr",
 295         ia32_immediate_attr_t => "ia32_compare_immediate_attr",
 296         ia32_copyb_attr_t     => "ia32_compare_copyb_attr",
 297         ia32_condcode_attr_t  => "ia32_compare_condcode_attr",
 298 );
 299
 300 %operands = (
 301 );
 302
 303 $mode_xmm     = "mode_E";
 304 $mode_gp      = "mode_Iu";
 305 $mode_flags   = "mode_Iu";
 306 $mode_fpcw    = "mode_fpcw";
 307 $status_flags = [ "CF", "PF", "AF", "ZF", "SF", "OF" ];
 308 $fpcw_flags   = [ "FP_IM", "FP_DM", "FP_ZM", "FP_OM", "FP_UM", "FP_PM",
 309                   "FP_PC0", "FP_PC1", "FP_RC0", "FP_RC1", "FP_X" ];
 310
 311 %nodes = (
 312
 313 Immediate => {
 314         state     => "pinned",
 315         op_flags  => "c",
 316         irn_flags => "I",
 317         reg_req   => { out => [ "gp_NOREG" ] },
 318         attr      => "ir_entity *symconst, int symconst_sign, long offset",
 319         attr_type => "ia32_immediate_attr_t",
 320         latency   => 0,
 321         mode      => $mode_gp,
 322 },
 323
 324 Asm => {
 325         mode      => "mode_T",
 326         arity     => "variable",
 327         out_arity => "variable",
 328         attr_type => "ia32_asm_attr_t",
 329         attr      => "ident *asm_text, const ia32_asm_reg_t *register_map",
 330         init_attr => "attr->asm_text = asm_text;\n".
 331                      "\tattr->register_map = register_map;\n",
 332         latency   => 10,
 333         modified_flags => 1,
 334 },
 335
 336 ProduceVal => {
 337         op_flags  => "c",
 338         irn_flags => "R",
 339         reg_req   => { out => [ "gp" ] },
 340         emit      => "",
 341         units     => [ ],
 342         latency   => 0,
 343         mode      => $mode_gp,
 344         cmp_attr  => "return 1;",
 345 },
 346
 347 #-----------------------------------------------------------------#
 348 #  _       _                                         _            #
 349 # (_)     | |                                       | |           #
 350 #  _ _ __ | |_ ___  __ _  ___ _ __   _ __   ___   __| | ___  ___  #
 351 # | | '_ \| __/ _ \/ _` |/ _ \ '__| | '_ \ / _ \ / _` |/ _ \/ __| #
 352 # | | | | | ||  __/ (_| |  __/ |    | | | | (_) | (_| |  __/\__ \ #
 353 # |_|_| |_|\__\___|\__, |\___|_|    |_| |_|\___/ \__,_|\___||___/ #
 354 #                   __/ |                                         #
 355 #                  |___/                                          #
 356 #-----------------------------------------------------------------#
 357
 358 # commutative operations
 359
 360 Add => {
 361         irn_flags => "R",
 362         state     => "exc_pinned",
 363         reg_req   => { in  => [ "gp", "gp", "none", "gp", "gp" ],
 364                        out => [ "in_r4 in_r5", "flags", "none" ] },
 365         ins       => [ "base", "index", "mem", "left", "right" ],
 366         outs      => [ "res", "flags", "M" ],
 367         emit      => '. add%M %binop',
 368         am        => "source,binary",
 369         units     => [ "GP" ],
 370         latency   => 1,
 371         mode      => $mode_gp,
 372         modified_flags => $status_flags
 373 },
 374
 375 AddMem => {
 376         irn_flags => "R",
 377         state     => "exc_pinned",
 378         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 379         ins       => [ "base", "index", "mem", "val" ],
 380         emit      => ". add%M %SI3, %AM",
 381         units     => [ "GP" ],
 382         latency   => 1,
 383         mode      => "mode_M",
 384         modified_flags => $status_flags
 385 },
 386
 387 AddMem8Bit => {
 388         irn_flags => "R",
 389         state     => "exc_pinned",
 390         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
 391         ins       => [ "base", "index", "mem", "val" ],
 392         emit      => ". add%M %SB3, %AM",
 393         units     => [ "GP" ],
 394         latency   => 1,
 395         mode      => "mode_M",
 396         modified_flags => $status_flags
 397 },
 398
 399 Adc => {
 400         state     => "exc_pinned",
 401         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp", "flags" ],
 402                        out => [ "in_r4 in_r5", "flags", "none" ] },
 403         ins       => [ "base", "index", "mem", "left", "right", "eflags" ],
 404         outs      => [ "res", "flags", "M" ],
 405         emit      => '. adc%M %binop',
 406         am        => "source,binary",
 407         units     => [ "GP" ],
 408         latency   => 1,
 409         mode      => $mode_gp,
 410         modified_flags => $status_flags
 411 },
 412
 413 l_Add => {
 414         op_flags  => "C",
 415         reg_req   => { in => [ "none", "none" ], out => [ "none" ] },
 416         ins       => [ "left", "right" ],
 417 },
 418
 419 l_Adc => {
 420         reg_req   => { in => [ "none", "none", "none" ], out => [ "none" ] },
 421         ins       => [ "left", "right", "eflags" ],
 422 },
 423
 424 Mul => {
 425         # we should not rematrialize this node. It produces 2 results and has
 426         # very strict constrains
 427         state     => "exc_pinned",
 428         reg_req   => { in => [ "gp", "gp", "none", "eax", "gp" ],
 429                        out => [ "eax", "edx", "none" ] },
 430         ins       => [ "base", "index", "mem", "val_high", "val_low" ],
 431         emit      => '. mul%M %unop4',
 432         outs      => [ "res_low", "res_high", "M" ],
 433         am        => "source,binary",
 434         latency   => 10,
 435         units     => [ "GP" ],
 436         modified_flags => $status_flags
 437 },
 438
 439 l_Mul => {
 440         # we should not rematrialize this node. It produces 2 results and has
 441         # very strict constrains
 442         op_flags  => "C",
 443         cmp_attr  => "return 1;",
 444         outs      => [ "EAX", "EDX", "M" ],
 445         arity     => 2
 446 },
 447
 448 IMul => {
 449         irn_flags => "R",
 450         state     => "exc_pinned",
 451         # TODO: adjust out requirements for the 3 operand form
 452         # (no need for should_be_same then)
 453         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 454                            out => [ "in_r4 in_r5", "flags", "none" ] },
 455         ins       => [ "base", "index", "mem", "left", "right" ],
 456         outs      => [ "res", "flags", "M" ],
 457         am        => "source,binary",
 458         latency   => 5,
 459         units     => [ "GP" ],
 460         mode      => $mode_gp,
 461         modified_flags => $status_flags
 462 },
 463
 464 IMul1OP => {
 465         irn_flags => "R",
 466         state     => "exc_pinned",
 467         reg_req   => { in => [ "gp", "gp", "none", "eax", "gp" ],
 468                        out => [ "eax", "edx", "none" ] },
 469         ins       => [ "base", "index", "mem", "val_high", "val_low" ],
 470         emit      => '. imul%M %unop4',
 471         outs      => [ "res_low", "res_high", "M" ],
 472         am        => "source,binary",
 473         latency   => 5,
 474         units     => [ "GP" ],
 475         modified_flags => $status_flags
 476 },
 477
 478 l_IMul => {
 479         op_flags  => "C",
 480         cmp_attr  => "return 1;",
 481         outs      => [ "res_low", "res_high", "M" ],
 482         arity     => 2
 483 },
 484
 485 And => {
 486         irn_flags => "R",
 487         state     => "exc_pinned",
 488         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 489                            out => [ "in_r4 in_r5", "flags", "none" ] },
 490         ins       => [ "base", "index", "mem", "left", "right" ],
 491         outs      => [ "res", "flags", "M" ],
 492         op_modes  => "commutative | am | immediate | mode_neutral",
 493         am        => "source,binary",
 494         emit      => '. and%M %binop',
 495         units     => [ "GP" ],
 496         latency   => 1,
 497         mode      => $mode_gp,
 498         modified_flags => $status_flags
 499 },
 500
 501 AndMem => {
 502         irn_flags => "R",
 503         state     => "exc_pinned",
 504         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 505         ins       => [ "base", "index", "mem", "val" ],
 506         emit      => '. and%M %SI3, %AM',
 507         units     => [ "GP" ],
 508         latency   => 1,
 509         mode      => "mode_M",
 510         modified_flags => $status_flags
 511 },
 512
 513 AndMem8Bit => {
 514         irn_flags => "R",
 515         state     => "exc_pinned",
 516         reg_req   => { in => [ "gp", "gp", "none",  "eax ebx ecx edx" ], out => [ "none" ] },
 517         ins       => [ "base", "index", "mem", "val" ],
 518         emit      => '. and%M %SB3, %AM',
 519         units     => [ "GP" ],
 520         latency   => 1,
 521         mode      => "mode_M",
 522         modified_flags => $status_flags
 523 },
 524
 525 Or => {
 526         irn_flags => "R",
 527         state     => "exc_pinned",
 528         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 529                        out => [ "in_r4 in_r5", "flags", "none" ] },
 530         ins       => [ "base", "index", "mem", "left", "right" ],
 531         outs      => [ "res", "flags", "M" ],
 532         am        => "source,binary",
 533         emit      => '. or%M %binop',
 534         units     => [ "GP" ],
 535         latency   => 1,
 536         mode      => $mode_gp,
 537         modified_flags => $status_flags
 538 },
 539
 540 OrMem => {
 541         irn_flags => "R",
 542         state     => "exc_pinned",
 543         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 544         ins       => [ "base", "index", "mem", "val" ],
 545         emit      => '. or%M %SI3, %AM',
 546         units     => [ "GP" ],
 547         latency   => 1,
 548         mode      => "mode_M",
 549         modified_flags => $status_flags
 550 },
 551
 552 OrMem8Bit => {
 553         irn_flags => "R",
 554         state     => "exc_pinned",
 555         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
 556         ins       => [ "base", "index", "mem", "val" ],
 557         emit      => '. or%M %SB3, %AM',
 558         units     => [ "GP" ],
 559         latency   => 1,
 560         mode      => "mode_M",
 561         modified_flags => $status_flags
 562 },
 563
 564 Xor => {
 565         irn_flags => "R",
 566         state     => "exc_pinned",
 567         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 568                        out => [ "in_r4 in_r5", "flags", "none" ] },
 569         ins       => [ "base", "index", "mem", "left", "right" ],
 570         outs      => [ "res", "flags", "M" ],
 571         am        => "source,binary",
 572         emit      => '. xor%M %binop',
 573         units     => [ "GP" ],
 574         latency   => 1,
 575         mode      => $mode_gp,
 576         modified_flags => $status_flags
 577 },
 578
 579 XorMem => {
 580         irn_flags => "R",
 581         state     => "exc_pinned",
 582         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 583         ins       => [ "base", "index", "mem", "val" ],
 584         emit      => '. xor%M %SI3, %AM',
 585         units     => [ "GP" ],
 586         latency   => 1,
 587         mode      => "mode_M",
 588         modified_flags => $status_flags
 589 },
 590
 591 XorMem8Bit => {
 592         irn_flags => "R",
 593         state     => "exc_pinned",
 594         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
 595         ins       => [ "base", "index", "mem", "val" ],
 596         emit      => '. xor%M %SB3, %AM',
 597         units     => [ "GP" ],
 598         latency   => 1,
 599         mode      => "mode_M",
 600         modified_flags => $status_flags
 601 },
 602
 603 # not commutative operations
 604
 605 Sub => {
 606         irn_flags => "R",
 607         state     => "exc_pinned",
 608         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ],
 609                        out => [ "in_r4", "flags", "none" ] },
 610         ins       => [ "base", "index", "mem", "left", "right" ],
 611         outs      => [ "res", "flags", "M" ],
 612         am        => "source,binary",
 613         emit      => '. sub%M %binop',
 614         units     => [ "GP" ],
 615         latency   => 1,
 616         mode      => $mode_gp,
 617         modified_flags => $status_flags
 618 },
 619
 620 SubMem => {
 621         irn_flags => "R",
 622         state     => "exc_pinned",
 623         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
 624         ins       => [ "base", "index", "mem", "val" ],
 625         emit      => '. sub%M %SI3, %AM',
 626         units     => [ "GP" ],
 627         latency   => 1,
 628         mode      => 'mode_M',
 629         modified_flags => $status_flags
 630 },
 631
 632 SubMem8Bit => {
 633         irn_flags => "R",
 634         state     => "exc_pinned",
 635         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
 636         ins       => [ "base", "index", "mem", "val" ],
 637         emit      => '. sub%M %SB3, %AM',
 638         units     => [ "GP" ],
 639         latency   => 1,
 640         mode      => 'mode_M',
 641         modified_flags => $status_flags
 642 },
 643
 644 Sbb => {
 645         state     => "exc_pinned",
 646         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp", "flags" ],
 647                        out => [ "in_r4 !in_r5", "flags", "none" ] },
 648         ins       => [ "base", "index", "mem", "left", "right", "eflags" ],
 649         outs      => [ "res", "flags", "M" ],
 650         am        => "source,binary",
 651         emit      => '. sbb%M %binop',
 652         units     => [ "GP" ],
 653         latency   => 1,
 654         mode      => $mode_gp,
 655         modified_flags => $status_flags
 656 },
 657
 658 l_Sub => {
 659         reg_req   => { in => [ "none", "none" ], out => [ "none" ] },
 660         ins       => [ "left", "right" ],
 661 },
 662
 663 l_Sbb => {
 664         reg_req   => { in => [ "none", "none", "none" ], out => [ "none" ] },
 665         ins       => [ "left", "right", "eflags" ],
 666 },
 667
 668 IDiv => {
 669         op_flags  => "F|L",
 670         state     => "exc_pinned",
 671         reg_req   => { in => [ "gp", "gp", "none", "eax", "edx", "gp" ],
 672                        out => [ "eax", "flags", "none", "edx", "none" ] },
 673         ins       => [ "base", "index", "mem", "left_low", "left_high", "right" ],
 674         outs      => [ "div_res", "flags", "M", "mod_res", "X_exc" ],
 675         am        => "source,ternary",
 676         emit      => ". idiv%M %unop5",
 677         latency   => 25,
 678         units     => [ "GP" ],
 679         modified_flags => $status_flags
 680 },
 681
 682 Div => {
 683         op_flags  => "F|L",
 684         state     => "exc_pinned",
 685         reg_req   => { in => [ "gp", "gp", "none", "eax", "edx", "gp" ],
 686                        out => [ "eax", "flags", "none", "edx", "none" ] },
 687         ins       => [ "base", "index", "mem", "left_low", "left_high", "right" ],
 688         outs      => [ "div_res", "flags", "M", "mod_res", "X_exc" ],
 689         am        => "source,ternary",
 690         emit      => ". div%M %unop5",
 691         latency   => 25,
 692         units     => [ "GP" ],
 693         modified_flags => $status_flags
 694 },
 695
 696 Shl => {
 697         irn_flags => "R",
 698         reg_req   => { in => [ "gp", "ecx" ],
 699                        out => [ "in_r1 !in_r2", "flags" ] },
 700         ins       => [ "val", "count" ],
 701         outs      => [ "res", "flags" ],
 702         emit      => '. shl %SB1, %S0',
 703         units     => [ "GP" ],
 704         latency   => 1,
 705         mode      => $mode_gp,
 706         modified_flags => $status_flags
 707 },
 708
 709 ShlMem => {
 710         irn_flags => "R",
 711         state     => "exc_pinned",
 712         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 713         ins       => [ "base", "index", "mem", "count" ],
 714         emit      => '. shl%M %SB3, %AM',
 715         units     => [ "GP" ],
 716         latency   => 1,
 717         mode      => "mode_M",
 718         modified_flags => $status_flags
 719 },
 720
 721 l_ShlDep => {
 722         cmp_attr => "return 1;",
 723         ins      => [ "val", "count", "dep" ],
 724         arity    => 3
 725 },
 726
 727 ShlD => {
 728         irn_flags => "R",
 729         reg_req   => { in => [ "gp", "gp", "ecx" ],
 730                        out => [ "in_r1 !in_r2 !in_r3", "flags" ] },
 731         ins       => [ "val_high", "val_low", "count" ],
 732         outs      => [ "res", "flags" ],
 733         emit      => ". shld%M %SB2, %S1, %D0",
 734         latency   => 6,
 735         units     => [ "GP" ],
 736         mode      => $mode_gp,
 737         modified_flags => $status_flags
 738 },
 739
 740 l_ShlD => {
 741         cmp_attr  => "return 1;",
 742         ins       => [ "val_high", "val_low", "count" ],
 743         arity     => 3,
 744 },
 745
 746 Shr => {
 747         irn_flags => "R",
 748         reg_req   => { in => [ "gp", "ecx" ],
 749                        out => [ "in_r1 !in_r2", "flags" ] },
 750         ins       => [ "val", "count" ],
 751         outs      => [ "res", "flags" ],
 752         emit      => '. shr %SB1, %S0',
 753         units     => [ "GP" ],
 754         mode      => $mode_gp,
 755         latency   => 1,
 756         modified_flags => $status_flags
 757 },
 758
 759 ShrMem => {
 760         irn_flags => "R",
 761         state     => "exc_pinned",
 762         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 763         ins       => [ "base", "index", "mem", "count" ],
 764         emit      => '. shr%M %SB3, %AM',
 765         units     => [ "GP" ],
 766         mode      => "mode_M",
 767         latency   => 1,
 768         modified_flags => $status_flags
 769 },
 770
 771 l_ShrDep => {
 772         cmp_attr  => "return 1;",
 773         ins       => [ "val", "count", "dep" ],
 774         arity     => 3
 775 },
 776
 777 ShrD => {
 778         irn_flags => "R",
 779         reg_req   => { in => [ "gp", "gp", "ecx" ],
 780                        out => [ "in_r1 !in_r2 !in_r3", "flags" ] },
 781         ins       => [ "val_high", "val_low", "count" ],
 782         outs      => [ "res", "flags" ],
 783         emit      => ". shrd%M %SB2, %S1, %D0",
 784         latency   => 6,
 785         units     => [ "GP" ],
 786         mode      => $mode_gp,
 787         modified_flags => $status_flags
 788 },
 789
 790 l_ShrD => {
 791         cmp_attr  => "return 1;",
 792         arity     => 3,
 793         ins       => [ "val_high", "val_low", "count" ],
 794 },
 795
 796 Sar => {
 797         irn_flags => "R",
 798         reg_req   => { in => [ "gp", "ecx" ],
 799                        out => [ "in_r1 !in_r2", "flags" ] },
 800         ins       => [ "val", "count" ],
 801         outs      => [ "res", "flags" ],
 802         emit      => '. sar %SB1, %S0',
 803         units     => [ "GP" ],
 804         latency   => 1,
 805         mode      => $mode_gp,
 806         modified_flags => $status_flags
 807 },
 808
 809 SarMem => {
 810         irn_flags => "R",
 811         state     => "exc_pinned",
 812         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 813         ins       => [ "base", "index", "mem", "count" ],
 814         emit      => '. sar%M %SB3, %AM',
 815         units     => [ "GP" ],
 816         latency   => 1,
 817         mode      => "mode_M",
 818         modified_flags => $status_flags
 819 },
 820
 821 l_SarDep => {
 822         cmp_attr  => "return 1;",
 823         ins       => [ "val", "count", "dep" ],
 824         arity     => 3
 825 },
 826
 827 Ror => {
 828         irn_flags => "R",
 829         reg_req   => { in => [ "gp", "ecx" ],
 830                        out => [ "in_r1 !in_r2", "flags" ] },
 831         ins       => [ "val", "count" ],
 832         outs      => [ "res", "flags" ],
 833         emit      => '. ror %SB1, %S0',
 834         units     => [ "GP" ],
 835         latency   => 1,
 836         mode      => $mode_gp,
 837         modified_flags => $status_flags
 838 },
 839
 840 RorMem => {
 841         irn_flags => "R",
 842         state     => "exc_pinned",
 843         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 844         ins       => [ "base", "index", "mem", "count" ],
 845         emit      => '. ror%M %SB3, %AM',
 846         units     => [ "GP" ],
 847         latency   => 1,
 848         mode      => "mode_M",
 849         modified_flags => $status_flags
 850 },
 851
 852 Rol => {
 853         irn_flags => "R",
 854         reg_req   => { in => [ "gp", "ecx" ],
 855                        out => [ "in_r1 !in_r2", "flags" ] },
 856         ins       => [ "val", "count" ],
 857         outs      => [ "res", "flags" ],
 858         emit      => '. rol %SB1, %S0',
 859         units     => [ "GP" ],
 860         latency   => 1,
 861         mode      => $mode_gp,
 862         modified_flags => $status_flags
 863 },
 864
 865 RolMem => {
 866         irn_flags => "R",
 867         state     => "exc_pinned",
 868         reg_req   => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
 869         ins       => [ "base", "index", "mem", "count" ],
 870         emit      => '. rol%M %SB3, %AM',
 871         units     => [ "GP" ],
 872         latency   => 1,
 873         mode      => "mode_M",
 874         modified_flags => $status_flags
 875 },
 876
 877 # unary operations
 878
 879 Neg => {
 880         irn_flags => "R",
 881         reg_req   => { in => [ "gp" ],
 882                        out => [ "in_r1", "flags" ] },
 883         emit      => '. neg %S0',
 884         ins       => [ "val" ],
 885         outs      => [ "res", "flags" ],
 886         units     => [ "GP" ],
 887         latency   => 1,
 888         mode      => $mode_gp,
 889         modified_flags => $status_flags
 890 },
 891
 892 NegMem => {
 893         irn_flags => "R",
 894         state     => "exc_pinned",
 895         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
 896         ins       => [ "base", "index", "mem" ],
 897         emit      => '. neg%M %AM',
 898         units     => [ "GP" ],
 899         latency   => 1,
 900         mode      => "mode_M",
 901         modified_flags => $status_flags
 902 },
 903
 904 Minus64Bit => {
 905         irn_flags => "R",
 906         reg_req   => { in => [ "gp", "gp" ], out => [ "in_r1", "gp" ] },
 907         outs      => [ "low_res", "high_res" ],
 908         units     => [ "GP" ],
 909         latency   => 3,
 910         modified_flags => $status_flags
 911 },
 912
 913
 914 Inc => {
 915         irn_flags => "R",
 916         reg_req   => { in => [ "gp" ],
 917                        out => [ "in_r1", "flags" ] },
 918         outs      => [ "res", "flags" ],
 919         emit      => '. inc %S0',
 920         units     => [ "GP" ],
 921         mode      => $mode_gp,
 922         latency   => 1,
 923         modified_flags => [ "OF", "SF", "ZF", "AF", "PF" ]
 924 },
 925
 926 IncMem => {
 927         irn_flags => "R",
 928         state     => "exc_pinned",
 929         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
 930         ins       => [ "base", "index", "mem" ],
 931         emit      => '. inc%M %AM',
 932         units     => [ "GP" ],
 933         mode      => "mode_M",
 934         latency   => 1,
 935         modified_flags => [ "OF", "SF", "ZF", "AF", "PF" ]
 936 },
 937
 938 Dec => {
 939         irn_flags => "R",
 940         reg_req   => { in => [ "gp" ],
 941                        out => [ "in_r1", "flags" ] },
 942         outs      => [ "res", "flags" ],
 943         emit      => '. dec %S0',
 944         units     => [ "GP" ],
 945         mode      => $mode_gp,
 946         latency   => 1,
 947         modified_flags => [ "OF", "SF", "ZF", "AF", "PF" ]
 948 },
 949
 950 DecMem => {
 951         irn_flags => "R",
 952         state     => "exc_pinned",
 953         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
 954         ins       => [ "base", "index", "mem" ],
 955         emit      => '. dec%M %AM',
 956         units     => [ "GP" ],
 957         mode      => "mode_M",
 958         latency   => 1,
 959         modified_flags => [ "OF", "SF", "ZF", "AF", "PF" ]
 960 },
 961
 962 Not => {
 963         irn_flags => "R",
 964         reg_req   => { in => [ "gp" ],
 965                        out => [ "in_r1", "flags" ] },
 966         ins       => [ "val" ],
 967         outs      => [ "res", "flags" ],
 968         emit      => '. not %S0',
 969         units     => [ "GP" ],
 970         latency   => 1,
 971         mode      => $mode_gp,
 972         # no flags modified
 973 },
 974
 975 NotMem => {
 976         irn_flags => "R",
 977         state     => "exc_pinned",
 978         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
 979         ins       => [ "base", "index", "mem" ],
 980         emit      => '. not%M %AM',
 981         units     => [ "GP" ],
 982         latency   => 1,
 983         mode      => "mode_M",
 984         # no flags modified
 985 },
 986
 987 Cmc => {
 988         reg_req => { in => [ "flags" ], out => [ "flags" ] },
 989         emit    => '.cmc',
 990         units     => [ "GP" ],
 991         latency   => 1,
 992         mode      => $mode_flags,
 993         modified_flags => $status_flags
 994 },
 995
 996 Stc => {
 997         reg_req => { out => [ "flags" ] },
 998         emit    => '.stc',
 999         units     => [ "GP" ],
1000         latency   => 1,
1001         mode      => $mode_flags,
1002         modified_flags => $status_flags
1003 },
1004
1005 # other operations
1006
1007 Cmp => {
1008         irn_flags => "R",
1009         state     => "exc_pinned",
1010         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ] , out => [ "flags" ] },
1011         ins       => [ "base", "index", "mem", "left", "right" ],
1012         outs      => [ "eflags" ],
1013         am        => "source,binary",
1014         emit      => '. cmp%M %binop',
1015         attr      => "int ins_permuted, int cmp_unsigned",
1016         init_attr => "attr->data.ins_permuted   = ins_permuted;\n".
1017                      "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1018         latency   => 1,
1019         units     => [ "GP" ],
1020         mode      => $mode_flags,
1021         modified_flags => $status_flags
1022 },
1023
1024 Cmp8Bit => {
1025         irn_flags => "R",
1026         state     => "exc_pinned",
1027         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] , out => [ "flags" ] },
1028         ins       => [ "base", "index", "mem", "left", "right" ],
1029         outs      => [ "eflags" ],
1030         am        => "source,binary",
1031         emit      => '. cmpb %binop',
1032         attr      => "int ins_permuted, int cmp_unsigned",
1033         init_attr => "attr->data.ins_permuted   = ins_permuted;\n".
1034                      "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1035         latency   => 1,
1036         units     => [ "GP" ],
1037         mode      => $mode_flags,
1038         modified_flags => $status_flags
1039 },
1040
1041 Test => {
1042         irn_flags => "R",
1043         state     => "exc_pinned",
1044         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp" ] , out => [ "flags" ] },
1045         ins       => [ "base", "index", "mem", "left", "right" ],
1046         outs      => [ "eflags" ],
1047         am        => "source,binary",
1048         emit      => '. test%M %binop',
1049         attr      => "int ins_permuted, int cmp_unsigned",
1050         init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1051                      "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1052         latency   => 1,
1053         units     => [ "GP" ],
1054         mode      => $mode_flags,
1055         modified_flags => $status_flags
1056 },
1057
1058 Test8Bit => {
1059         irn_flags => "R",
1060         state     => "exc_pinned",
1061         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] , out => [ "flags" ] },
1062         ins       => [ "base", "index", "mem", "left", "right" ],
1063         outs      => [ "eflags" ],
1064         am        => "source,binary",
1065         emit      => '. testb %binop',
1066         attr      => "int ins_permuted, int cmp_unsigned",
1067         init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1068                      "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1069         latency   => 1,
1070         units     => [ "GP" ],
1071         mode      => $mode_flags,
1072         modified_flags => $status_flags
1073 },
1074
1075 Set => {
1076         #irn_flags => "R",
1077         reg_req   => { in => [ "eflags" ], out => [ "eax ebx ecx edx" ] },
1078         ins       => [ "eflags" ],
1079         attr_type => "ia32_condcode_attr_t",
1080         attr      => "pn_Cmp pnc, int ins_permuted",
1081         init_attr => "attr->attr.data.ins_permuted = ins_permuted;\n".
1082                       "\tset_ia32_ls_mode(res, mode_Bu);\n",
1083         emit      => '. set%CMP0 %DB0',
1084         latency   => 1,
1085         units     => [ "GP" ],
1086         mode      => $mode_gp,
1087 },
1088
1089 SetMem => {
1090         #irn_flags => "R",
1091         state     => "exc_pinned",
1092         reg_req   => { in => [ "gp", "gp", "none", "eflags" ], out => [ "none" ] },
1093         ins       => [ "base", "index", "mem","eflags" ],
1094         attr_type => "ia32_condcode_attr_t",
1095         attr      => "pn_Cmp pnc, int ins_permuted",
1096         init_attr => "attr->attr.data.ins_permuted = ins_permuted;\n".
1097                       "\tset_ia32_ls_mode(res, mode_Bu);\n",
1098         emit      => '. set%CMP3 %AM',
1099         latency   => 1,
1100         units     => [ "GP" ],
1101         mode      => 'mode_M',
1102 },
1103
1104 CMov => {
1105         #irn_flags => "R",
1106         # (note: leave the false,true order intact to make it compatible with other
1107         #  ia32_binary ops)
1108         state     => "exc_pinned",
1109         reg_req   => { in => [ "gp", "gp", "none", "gp", "gp", "eflags" ], out => [ "in_r4 in_r5" ] },
1110         ins       => [ "base", "index", "mem", "val_false", "val_true", "eflags" ],
1111         am        => "source,binary",
1112         attr_type => "ia32_condcode_attr_t",
1113         attr      => "int ins_permuted, pn_Cmp pnc",
1114         init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
1115         latency   => 1,
1116         units     => [ "GP" ],
1117         mode      => $mode_gp,
1118 },
1119
1120 Jcc => {
1121         state     => "pinned",
1122         op_flags  => "L|X|Y",
1123         reg_req   => { in  => [ "eflags" ], out => [ "none", "none" ] },
1124         ins       => [ "eflags" ],
1125         outs      => [ "false", "true" ],
1126         attr_type => "ia32_condcode_attr_t",
1127         attr      => "pn_Cmp pnc",
1128         latency   => 2,
1129         units     => [ "BRANCH" ],
1130 },
1131
1132 SwitchJmp => {
1133         state     => "pinned",
1134         op_flags  => "L|X|Y",
1135         reg_req   => { in => [ "gp" ], out => [ "none" ] },
1136         mode      => "mode_T",
1137         attr_type => "ia32_condcode_attr_t",
1138         attr      => "pn_Cmp pnc",
1139         latency   => 3,
1140         units     => [ "BRANCH" ],
1141         modified_flags => $status_flags,
1142 },
1143
1144 IJmp => {
1145         state     => "pinned",
1146         op_flags  => "X",
1147         reg_req   => { in => [ "gp", "gp", "none", "gp" ] },
1148         ins       => [ "base", "index", "mem", "target" ],
1149         am        => "source,unary",
1150         emit      => '. jmp *%unop3',
1151         latency   => 1,
1152         units     => [ "BRANCH" ],
1153         mode      => "mode_X",
1154 },
1155
1156 Const => {
1157         op_flags  => "c",
1158         irn_flags => "R",
1159         reg_req   => { out => [ "gp" ] },
1160         units     => [ "GP" ],
1161         attr      => "ir_entity *symconst, int symconst_sign, long offset",
1162         attr_type => "ia32_immediate_attr_t",
1163         latency   => 1,
1164         mode      => $mode_gp,
1165 },
1166
1167 GetEIP => {
1168         op_flags => "c",
1169         reg_req  => { out => [ "gp" ] },
1170         units    => [ "GP" ],
1171         latency  => 5,
1172         mode     => $mode_gp,
1173         modified_flags => $status_flags,
1174 },
1175
1176 Unknown_GP => {
1177         state     => "pinned",
1178         op_flags  => "c",
1179         irn_flags => "I",
1180         reg_req   => { out => [ "gp_UKNWN" ] },
1181         units     => [],
1182         emit      => "",
1183         latency   => 0,
1184         mode      => $mode_gp
1185 },
1186
1187 Unknown_VFP => {
1188         state     => "pinned",
1189         op_flags  => "c",
1190         irn_flags => "I",
1191         reg_req   => { out => [ "vfp_UKNWN" ] },
1192         units     => [],
1193         emit      => "",
1194         mode      => "mode_E",
1195         latency   => 0,
1196         attr_type => "ia32_x87_attr_t",
1197 },
1198
1199 Unknown_XMM => {
1200         state     => "pinned",
1201         op_flags  => "c",
1202         irn_flags => "I",
1203         reg_req   => { out => [ "xmm_UKNWN" ] },
1204         units     => [],
1205         emit      => "",
1206         latency   => 0,
1207         mode      => "mode_E"
1208 },
1209
1210 NoReg_GP => {
1211         state     => "pinned",
1212         op_flags  => "c",
1213         irn_flags => "I",
1214         reg_req   => { out => [ "gp_NOREG" ] },
1215         units     => [],
1216         emit      => "",
1217         latency   => 0,
1218         mode      => $mode_gp
1219 },
1220
1221 NoReg_VFP => {
1222         state     => "pinned",
1223         op_flags  => "c",
1224         irn_flags => "I",
1225         reg_req   => { out => [ "vfp_NOREG" ] },
1226         units     => [],
1227         emit      => "",
1228         mode      => "mode_E",
1229         latency   => 0,
1230         attr_type => "ia32_x87_attr_t",
1231 },
1232
1233 NoReg_XMM => {
1234         state     => "pinned",
1235         op_flags  => "c",
1236         irn_flags => "I",
1237         reg_req   => { out => [ "xmm_NOREG" ] },
1238         units     => [],
1239         emit      => "",
1240         latency   => 0,
1241         mode      => "mode_E"
1242 },
1243
1244 ChangeCW => {
1245         state     => "pinned",
1246         op_flags  => "c",
1247         irn_flags => "I",
1248         reg_req   => { out => [ "fp_cw" ] },
1249         mode      => $mode_fpcw,
1250         latency   => 3,
1251         units     => [ "GP" ],
1252         modified_flags => $fpcw_flags
1253 },
1254
1255 FldCW => {
1256         op_flags  => "L|F",
1257         state     => "pinned",
1258         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "fp_cw" ] },
1259         ins       => [ "base", "index", "mem" ],
1260         latency   => 5,
1261         emit      => ". fldcw %AM",
1262         mode      => $mode_fpcw,
1263         units     => [ "GP" ],
1264         modified_flags => $fpcw_flags
1265 },
1266
1267 FnstCW => {
1268         op_flags  => "L|F",
1269         state     => "pinned",
1270         reg_req   => { in => [ "gp", "gp", "none", "fp_cw" ], out => [ "none" ] },
1271         ins       => [ "base", "index", "mem", "fpcw" ],
1272         latency   => 5,
1273         emit      => ". fnstcw %AM",
1274         mode      => "mode_M",
1275         units     => [ "GP" ],
1276 },
1277
1278 FnstCWNOP => {
1279         op_flags  => "L|F",
1280         state     => "pinned",
1281         reg_req   => { in => [ "fp_cw" ], out => [ "none" ] },
1282         ins       => [ "fpcw" ],
1283         latency   => 0,
1284         emit      => "",
1285         mode      => "mode_M",
1286 },
1287
1288 Cltd => {
1289         # we should not rematrialize this node. It has very strict constraints.
1290         reg_req   => { in => [ "eax", "edx" ], out => [ "edx" ] },
1291         ins       => [ "val", "globbered" ],
1292         emit      => '. cltd',
1293         latency   => 1,
1294         mode      => $mode_gp,
1295         units     => [ "GP" ],
1296 },
1297
1298 # Load / Store
1299 #
1300 # Note that we add additional latency values depending on address mode, so a
1301 # lateny of 0 for load is correct
1302
1303 Load => {
1304         op_flags  => "L|F",
1305         state     => "exc_pinned",
1306         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "gp", "none", "none" ] },
1307         ins       => [ "base", "index", "mem" ],
1308         outs      => [ "res", "M", "X_exc" ],
1309         latency   => 0,
1310         emit      => ". mov%SE%ME%.l %AM, %D0",
1311         units     => [ "GP" ],
1312 },
1313
1314 l_Load => {
1315         op_flags  => "L|F",
1316         cmp_attr  => "return 1;",
1317         outs      => [ "res", "M" ],
1318         arity     => 2,
1319 },
1320
1321 l_Store => {
1322         op_flags  => "L|F",
1323         cmp_attr  => "return 1;",
1324         state     => "exc_pinned",
1325         arity     => 3,
1326         mode      => "mode_M",
1327 },
1328
1329 Store => {
1330         op_flags  => "L|F",
1331         state     => "exc_pinned",
1332         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "none", "none" ] },
1333         ins       => [ "base", "index", "mem", "val" ],
1334         outs      => [ "M", "X_exc" ],
1335         emit      => '. mov%M %SI3, %AM',
1336         latency   => 2,
1337         units     => [ "GP" ],
1338         mode      => "mode_M",
1339 },
1340
1341 Store8Bit => {
1342         op_flags  => "L|F",
1343         state     => "exc_pinned",
1344         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => ["none", "none" ] },
1345         ins       => [ "base", "index", "mem", "val" ],
1346         outs      => [ "M", "X_exc" ],
1347         emit      => '. mov%M %SB3, %AM',
1348         latency   => 2,
1349         units     => [ "GP" ],
1350         mode      => "mode_M",
1351 },
1352
1353 Lea => {
1354         irn_flags => "R",
1355         reg_req   => { in => [ "gp", "gp" ], out => [ "gp" ] },
1356         ins       => [ "base", "index" ],
1357         emit      => '. leal %AM, %D0',
1358         latency   => 2,
1359         units     => [ "GP" ],
1360         mode      => $mode_gp,
1361 # lea doesn't modify the flags, but setting this seems advantageous since it
1362 # increases chances that the Lea is transformed back to an Add
1363         modified_flags => 1,
1364 },
1365
1366 Push => {
1367         state     => "exc_pinned",
1368         reg_req   => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "esp", "none" ] },
1369         ins       => [ "base", "index", "mem", "val", "stack" ],
1370         emit      => '. push%M %unop4',
1371         outs      => [ "stack:I|S", "M" ],
1372         am        => "source,binary",
1373         latency   => 2,
1374         units     => [ "GP" ],
1375 },
1376
1377 Pop => {
1378         state     => "exc_pinned",
1379         reg_req   => { in => [ "none", "esp" ], out => [ "gp", "none", "none", "esp" ] },
1380         ins       => [ "mem", "stack" ],
1381         outs      => [ "res", "M", "unused", "stack:I|S" ],
1382         emit      => '. pop%M %D0',
1383         latency   => 3, # Pop is more expensive than Push on Athlon
1384         units     => [ "GP" ],
1385 },
1386
1387 PopMem => {
1388         state     => "exc_pinned",
1389         reg_req   => { in => [ "gp", "gp", "none", "esp" ], out => [ "none", "none", "none", "esp" ] },
1390         ins       => [ "base", "index", "mem", "stack" ],
1391         outs      => [ "unused0", "M", "unused1", "stack:I|S" ],
1392         emit      => '. pop%M %AM',
1393         latency   => 3, # Pop is more expensive than Push on Athlon
1394         units     => [ "GP" ],
1395 },
1396
1397 Enter => {
1398         reg_req   => { in => [ "esp" ], out => [ "ebp", "esp", "none" ] },
1399         emit      => '. enter',
1400         outs      => [ "frame:I", "stack:I|S", "M" ],
1401         latency   => 15,
1402         units     => [ "GP" ],
1403 },
1404
1405 Leave => {
1406         reg_req   => { in => [ "esp", "ebp" ], out => [ "ebp", "esp" ] },
1407         emit      => '. leave',
1408         outs      => [ "frame:I", "stack:I|S" ],
1409         latency   => 3,
1410         units     => [ "GP" ],
1411 },
1412
1413 AddSP => {
1414         irn_flags => "I",
1415         state     => "pinned",
1416         reg_req   => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "in_r4", "none" ] },
1417         ins       => [ "base", "index", "mem", "stack", "size" ],
1418         am        => "source,binary",
1419         emit      => '. addl %binop',
1420         latency   => 1,
1421         outs      => [ "stack:I|S", "M" ],
1422         units     => [ "GP" ],
1423         modified_flags => $status_flags
1424 },
1425
1426 SubSP => {
1427 #irn_flags => "I",
1428         state     => "pinned",
1429         reg_req   => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "in_r4", "gp", "none" ] },
1430         ins       => [ "base", "index", "mem", "stack", "size" ],
1431         am        => "source,binary",
1432         emit      => ". subl %binop\n".
1433                      ". movl %%esp, %D1",
1434         latency   => 2,
1435         outs      => [ "stack:I|S", "addr", "M" ],
1436         units     => [ "GP" ],
1437         modified_flags => $status_flags
1438 },
1439
1440 RepPrefix => {
1441         op_flags  => "K",
1442         state     => "pinned",
1443         mode      => "mode_M",
1444         emit      => ". rep",
1445         latency   => 0,
1446 },
1447
1448 LdTls => {
1449         irn_flags => "R",
1450         reg_req   => { out => [ "gp" ] },
1451         units     => [ "GP" ],
1452         latency   => 1,
1453 },
1454
1455
1456 #-----------------------------------------------------------------------------#
1457 #   _____ _____ ______    __ _             _                     _            #
1458 #  / ____/ ____|  ____|  / _| |           | |                   | |           #
1459 # | (___| (___ | |__    | |_| | ___   __ _| |_   _ __   ___   __| | ___  ___  #
1460 #  \___ \\___ \|  __|   |  _| |/ _ \ / _` | __| | '_ \ / _ \ / _` |/ _ \/ __| #
1461 #  ____) |___) | |____  | | | | (_) | (_| | |_  | | | | (_) | (_| |  __/\__ \ #
1462 # |_____/_____/|______| |_| |_|\___/ \__,_|\__| |_| |_|\___/ \__,_|\___||___/ #
1463 #-----------------------------------------------------------------------------#
1464
1465 # produces a 0/+0.0
1466 xZero => {
1467         irn_flags => "R",
1468         reg_req   => { out => [ "xmm" ] },
1469         emit      => '. xorp%XSD %D0, %D0',
1470         latency   => 3,
1471         units     => [ "SSE" ],
1472         mode      => "mode_E",
1473 },
1474
1475 # produces all 1 bits
1476 xAllOnes => {
1477         irn_flags => "R",
1478         reg_req   => { out => [ "xmm" ] },
1479         emit      => '. pcmpeqb %D0, %D0',
1480         latency   => 3,
1481         units     => [ "SSE" ],
1482         mode      => "mode_E",
1483 },
1484
1485 # integer shift left, dword
1486 xPslld => {
1487         irn_flags => "R",
1488         reg_req   => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] },
1489         emit      => '. pslld %SI1, %D0',
1490         units     => [ "SSE" ],
1491         mode      => "mode_E",
1492         latency   => 1,
1493 },
1494
1495 # integer shift right, dword
1496 xPsrld => {
1497         irn_flags => "R",
1498         reg_req   => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] },
1499         emit      => '. psrld %SI1, %D0',
1500         units     => [ "SSE" ],
1501         mode      => "mode_E",
1502         latency   => 1,
1503 },
1504
1505 # mov from integer to SSE register
1506 xMovd  => {
1507         irn_flags => "R",
1508         reg_req   => { in => [ "gp" ], out => [ "xmm" ] },
1509         emit      => '. movd %S0, %D0',
1510         units     => [ "SSE" ],
1511         mode      => "mode_E",
1512         latency   => 1,
1513 },
1514
1515 # commutative operations
1516
1517 xAdd => {
1518         irn_flags => "R",
1519         state     => "exc_pinned",
1520         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1521         ins       => [ "base", "index", "mem", "left", "right" ],
1522         am        => "source,binary",
1523         emit      => '. add%XXM %binop',
1524         latency   => 4,
1525         units     => [ "SSE" ],
1526         mode      => "mode_E",
1527 },
1528
1529 xMul => {
1530         irn_flags => "R",
1531         state     => "exc_pinned",
1532         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1533         ins       => [ "base", "index", "mem", "left", "right" ],
1534         am        => "source,binary",
1535         emit      => '. mul%XXM %binop',
1536         latency   => 4,
1537         units     => [ "SSE" ],
1538         mode      => "mode_E",
1539 },
1540
1541 xMax => {
1542         irn_flags => "R",
1543         state     => "exc_pinned",
1544         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1545         ins       => [ "base", "index", "mem", "left", "right" ],
1546         am        => "source,binary",
1547         emit      => '. max%XXM %binop',
1548         latency   => 2,
1549         units     => [ "SSE" ],
1550         mode      => "mode_E",
1551 },
1552
1553 xMin => {
1554         irn_flags => "R",
1555         state     => "exc_pinned",
1556         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1557         ins       => [ "base", "index", "mem", "left", "right" ],
1558         am        => "source,binary",
1559         emit      => '. min%XXM %binop',
1560         latency   => 2,
1561         units     => [ "SSE" ],
1562         mode      => "mode_E",
1563 },
1564
1565 xAnd => {
1566         irn_flags => "R",
1567         state     => "exc_pinned",
1568         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1569         ins       => [ "base", "index", "mem", "left", "right" ],
1570         am        => "source,binary",
1571         emit      => '. andp%XSD %binop',
1572         latency   => 3,
1573         units     => [ "SSE" ],
1574         mode      => "mode_E",
1575 },
1576
1577 xOr => {
1578         irn_flags => "R",
1579         state     => "exc_pinned",
1580         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1581         ins       => [ "base", "index", "mem", "left", "right" ],
1582         am        => "source,binary",
1583         emit      => '. orp%XSD %binop',
1584         latency   => 3,
1585         units     => [ "SSE" ],
1586         mode      => "mode_E",
1587 },
1588
1589 xXor => {
1590         irn_flags => "R",
1591         state     => "exc_pinned",
1592         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 in_r5" ] },
1593         ins       => [ "base", "index", "mem", "left", "right" ],
1594         am        => "source,binary",
1595         emit      => '. xorp%XSD %binop',
1596         latency   => 3,
1597         units     => [ "SSE" ],
1598         mode      => "mode_E",
1599 },
1600
1601 # not commutative operations
1602
1603 xAndNot => {
1604         irn_flags => "R",
1605         state     => "exc_pinned",
1606         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 !in_r5" ] },
1607         ins       => [ "base", "index", "mem", "left", "right" ],
1608         am        => "source,binary",
1609         emit      => '. andnp%XSD %binop',
1610         latency   => 3,
1611         units     => [ "SSE" ],
1612         mode      => "mode_E",
1613 },
1614
1615 xSub => {
1616         irn_flags => "R",
1617         state     => "exc_pinned",
1618         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4" ] },
1619         ins       => [ "base", "index", "mem", "left", "right" ],
1620         am        => "source,binary",
1621         emit      => '. sub%XXM %binop',
1622         latency   => 4,
1623         units     => [ "SSE" ],
1624         mode      => "mode_E",
1625 },
1626
1627 xDiv => {
1628         irn_flags => "R",
1629         state     => "exc_pinned",
1630         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "in_r4 !in_r5", "none" ] },
1631         ins       => [ "base", "index", "mem", "left", "right" ],
1632         am        => "source,binary",
1633         outs      => [ "res", "M" ],
1634         emit      => '. div%XXM %binop',
1635         latency   => 16,
1636         units     => [ "SSE" ],
1637 },
1638
1639 # other operations
1640
1641 Ucomi => {
1642         irn_flags => "R",
1643         state     => "exc_pinned",
1644         reg_req   => { in => [ "gp", "gp", "none", "xmm", "xmm" ], out => [ "eflags" ] },
1645         ins       => [ "base", "index", "mem", "left", "right" ],
1646         outs      => [ "flags" ],
1647         am        => "source,binary",
1648         attr      => "int ins_permuted",
1649         init_attr => "attr->data.ins_permuted = ins_permuted;",
1650         emit      => ' .ucomi%XXM %binop',
1651         latency   => 3,
1652         units     => [ "SSE" ],
1653         mode      => $mode_flags,
1654         modified_flags => 1,
1655 },
1656
1657 # Load / Store
1658
1659 xLoad => {
1660         op_flags  => "L|F",
1661         state     => "exc_pinned",
1662         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "xmm", "none", "none" ] },
1663         ins       => [ "base", "index", "mem" ],
1664         outs      => [ "res", "M", "X_exc" ],
1665         emit      => '. mov%XXM %AM, %D0',
1666         attr      => "ir_mode *load_mode",
1667         init_attr => "attr->ls_mode = load_mode;",
1668         latency   => 0,
1669         units     => [ "SSE" ],
1670 },
1671
1672 xStore => {
1673         op_flags => "L|F",
1674         state    => "exc_pinned",
1675         reg_req  => { in => [ "gp", "gp", "none", "xmm" ], out => [ "none", "none" ] },
1676         ins       => [ "base", "index", "mem", "val" ],
1677         outs      => [ "M", "X_exc" ],
1678         emit     => '. mov%XXM %S3, %AM',
1679         latency  => 0,
1680         units    => [ "SSE" ],
1681         mode     => "mode_M",
1682 },
1683
1684 xStoreSimple => {
1685         op_flags => "L|F",
1686         state    => "exc_pinned",
1687         reg_req  => { in => [ "gp", "gp", "none", "xmm" ] },
1688         ins      => [ "base", "index", "mem", "val" ],
1689         emit     => '. mov%XXM %S3, %AM',
1690         latency  => 0,
1691         units    => [ "SSE" ],
1692         mode     => "mode_M",
1693 },
1694
1695 CvtSI2SS => {
1696         op_flags => "L|F",
1697         state     => "exc_pinned",
1698         reg_req  => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] },
1699         ins      => [ "base", "index", "mem", "val" ],
1700         am       => "source,unary",
1701         emit     => '. cvtsi2ss %unop3, %D0',
1702         latency  => 2,
1703         units    => [ "SSE" ],
1704         mode     => $mode_xmm
1705 },
1706
1707 CvtSI2SD => {
1708         op_flags => "L|F",
1709         state     => "exc_pinned",
1710         reg_req  => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] },
1711         ins      => [ "base", "index", "mem", "val" ],
1712         am       => "source,unary",
1713         emit     => '. cvtsi2sd %unop3, %D0',
1714         latency  => 2,
1715         units    => [ "SSE" ],
1716         mode     => $mode_xmm
1717 },
1718
1719
1720 l_LLtoFloat => {
1721         op_flags => "L|F",
1722         cmp_attr => "return 1;",
1723         ins      => [ "val_high", "val_low" ],
1724 },
1725
1726 l_FloattoLL => {
1727         op_flags => "L|F",
1728         cmp_attr => "return 1;",
1729         ins      => [ "val" ],
1730         outs     => [ "res_high", "res_low" ],
1731 },
1732
1733 # CopyB
1734
1735 CopyB => {
1736         op_flags  => "F|H",
1737         state     => "pinned",
1738         reg_req   => { in => [ "edi", "esi", "ecx", "none" ], out => [ "edi", "esi", "ecx", "none" ] },
1739         outs      => [ "DST", "SRC", "CNT", "M" ],
1740         attr_type => "ia32_copyb_attr_t",
1741         attr      => "unsigned size",
1742         units     => [ "GP" ],
1743         latency  => 3,
1744 # we don't care about this flag, so no need to mark this node
1745 #       modified_flags => [ "DF" ]
1746 },
1747
1748 CopyB_i => {
1749         op_flags  => "F|H",
1750         state     => "pinned",
1751         reg_req   => { in => [ "edi", "esi", "none" ], out => [  "edi", "esi", "none" ] },
1752         outs      => [ "DST", "SRC", "M" ],
1753         attr_type => "ia32_copyb_attr_t",
1754         attr      => "unsigned size",
1755         units     => [ "GP" ],
1756         latency  => 3,
1757 # we don't care about this flag, so no need to mark this node
1758 #       modified_flags => [ "DF" ]
1759 },
1760
1761 # Conversions
1762
1763 Conv_I2I => {
1764         state     => "exc_pinned",
1765         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "gp", "none" ] },
1766         ins       => [ "base", "index", "mem", "val" ],
1767         am        => "source,unary",
1768         units     => [ "GP" ],
1769         latency   => 1,
1770         attr      => "ir_mode *smaller_mode",
1771         init_attr => "attr->ls_mode = smaller_mode;",
1772         mode      => $mode_gp,
1773 },
1774
1775 Conv_I2I8Bit => {
1776         state     => "exc_pinned",
1777         reg_req   => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "gp", "none" ] },
1778         ins       => [ "base", "index", "mem", "val" ],
1779         am        => "source,unary",
1780         units     => [ "GP" ],
1781         latency   => 1,
1782         attr      => "ir_mode *smaller_mode",
1783         init_attr => "attr->ls_mode = smaller_mode;",
1784         mode      => $mode_gp,
1785 },
1786
1787 Conv_I2FP => {
1788         state     => "exc_pinned",
1789         reg_req   => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm", "none" ] },
1790         ins       => [ "base", "index", "mem", "val" ],
1791         am        => "source,unary",
1792         latency   => 10,
1793         units     => [ "SSE" ],
1794         mode      => "mode_E",
1795 },
1796
1797 Conv_FP2I => {
1798         state     => "exc_pinned",
1799         reg_req   => { in => [ "gp", "gp", "none", "xmm" ], out => [ "gp", "none" ] },
1800         ins       => [ "base", "index", "mem", "val" ],
1801         am        => "source,unary",
1802         latency   => 10,
1803         units     => [ "SSE" ],
1804         mode      => $mode_gp,
1805 },
1806
1807 Conv_FP2FP => {
1808         state     => "exc_pinned",
1809         reg_req   => { in => [ "gp", "gp", "none", "xmm" ], out => [ "xmm", "none" ] },
1810         ins       => [ "base", "index", "mem", "val" ],
1811         am        => "source,unary",
1812         latency   => 8,
1813         units     => [ "SSE" ],
1814         mode      => "mode_E",
1815 },
1816
1817 #----------------------------------------------------------#
1818 #        _      _               _    __ _             _    #
1819 #       (_)    | |             | |  / _| |           | |   #
1820 # __   ___ _ __| |_ _   _  __ _| | | |_| | ___   __ _| |_  #
1821 # \ \ / / | '__| __| | | |/ _` | | |  _| |/ _ \ / _` | __| #
1822 #  \ V /| | |  | |_| |_| | (_| | | | | | | (_) | (_| | |_  #
1823 #   \_/ |_|_|   \__|\__,_|\__,_|_| |_| |_|\___/ \__,_|\__| #
1824 #                 | |                                      #
1825 #  _ __   ___   __| | ___  ___                             #
1826 # | '_ \ / _ \ / _` |/ _ \/ __|                            #
1827 # | | | | (_) | (_| |  __/\__ \                            #
1828 # |_| |_|\___/ \__,_|\___||___/                            #
1829 #----------------------------------------------------------#
1830
1831 # rematerialisation disabled for all float nodes for now, because the fpcw
1832 # handler runs before spilling and we might end up with wrong fpcw then
1833
1834 vfadd => {
1835 #       irn_flags => "R",
1836         state     => "exc_pinned",
1837         reg_req   => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
1838         ins       => [ "base", "index", "mem", "left", "right", "fpcw" ],
1839         am        => "source,binary",
1840         latency   => 4,
1841         units     => [ "VFP" ],
1842         mode      => "mode_E",
1843         attr_type => "ia32_x87_attr_t",
1844 },
1845
1846 vfmul => {
1847 #       irn_flags => "R",
1848         state     => "exc_pinned",
1849         reg_req   => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
1850         ins       => [ "base", "index", "mem", "left", "right", "fpcw" ],
1851         am        => "source,binary",
1852         latency   => 4,
1853         units     => [ "VFP" ],
1854         mode      => "mode_E",
1855         attr_type => "ia32_x87_attr_t",
1856 },
1857
1858 vfsub => {
1859 #       irn_flags => "R",
1860         state     => "exc_pinned",
1861         reg_req   => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
1862         ins       => [ "base", "index", "mem", "left", "right", "fpcw" ],
1863         am        => "source,binary",
1864         latency   => 4,
1865         units     => [ "VFP" ],
1866         mode      => "mode_E",
1867         attr_type => "ia32_x87_attr_t",
1868 },
1869
1870 vfdiv => {
1871         state     => "exc_pinned",
1872         reg_req   => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ], out => [ "vfp", "none" ] },
1873         ins       => [ "base", "index", "mem", "left", "right", "fpcw" ],
1874         am        => "source,binary",
1875         outs      => [ "res", "M" ],
1876         latency   => 20,
1877         units     => [ "VFP" ],
1878         attr_type => "ia32_x87_attr_t",
1879 },
1880
1881 vfprem => {
1882         reg_req   => { in => [ "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
1883         ins       => [ "left", "right", "fpcw" ],
1884         latency   => 20,
1885         units     => [ "VFP" ],
1886         mode      => "mode_E",
1887         attr_type => "ia32_x87_attr_t",
1888 },
1889
1890 vfabs => {
1891         irn_flags => "R",
1892         reg_req   => { in => [ "vfp"], out => [ "vfp" ] },
1893         ins       => [ "value" ],
1894         latency   => 2,
1895         units     => [ "VFP" ],
1896         mode      => "mode_E",
1897         attr_type => "ia32_x87_attr_t",
1898 },
1899
1900 vfchs => {
1901         irn_flags => "R",
1902         reg_req   => { in => [ "vfp"], out => [ "vfp" ] },
1903         ins       => [ "value" ],
1904         latency   => 2,
1905         units     => [ "VFP" ],
1906         mode      => "mode_E",
1907         attr_type => "ia32_x87_attr_t",
1908 },
1909
1910 # virtual Load and Store
1911
1912 vfld => {
1913         irn_flags => "R",
1914         op_flags  => "L|F",
1915         state     => "exc_pinned",
1916         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "vfp", "none", "none" ] },
1917         ins       => [ "base", "index", "mem" ],
1918         outs      => [ "res", "M", "X_exc" ],
1919         attr      => "ir_mode *load_mode",
1920         init_attr => "attr->attr.ls_mode = load_mode;",
1921         latency   => 2,
1922         units     => [ "VFP" ],
1923         attr_type => "ia32_x87_attr_t",
1924 },
1925
1926 vfst => {
1927         irn_flags => "R",
1928         op_flags  => "L|F",
1929         state     => "exc_pinned",
1930         reg_req   => { in => [ "gp", "gp", "none", "vfp" ], out => [ "none", "none" ] },
1931         ins       => [ "base", "index", "mem", "val" ],
1932         outs      => [ "M", "X_exc" ],
1933         attr      => "ir_mode *store_mode",
1934         init_attr => "attr->attr.ls_mode = store_mode;",
1935         latency   => 2,
1936         units     => [ "VFP" ],
1937         mode      => "mode_M",
1938         attr_type => "ia32_x87_attr_t",
1939 },
1940
1941 # Conversions
1942
1943 vfild => {
1944         state     => "exc_pinned",
1945         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "vfp", "none" ] },
1946         outs      => [ "res", "M" ],
1947         ins       => [ "base", "index", "mem" ],
1948         latency   => 4,
1949         units     => [ "VFP" ],
1950         attr_type => "ia32_x87_attr_t",
1951 },
1952
1953 l_vfild => {
1954         cmp_attr  => "return 1;",
1955         outs      => [ "res", "M" ],
1956         arity     => 2,
1957 },
1958
1959 vfist => {
1960         state     => "exc_pinned",
1961         reg_req   => { in => [ "gp", "gp", "none", "vfp", "fpcw" ] },
1962         ins       => [ "base", "index", "mem", "val", "fpcw" ],
1963         latency   => 4,
1964         units     => [ "VFP" ],
1965         mode      => "mode_M",
1966         attr_type => "ia32_x87_attr_t",
1967 },
1968
1969 l_vfist => {
1970         cmp_attr  => "return 1;",
1971         state     => "exc_pinned",
1972         arity     => 3,
1973         mode      => "mode_M",
1974 },
1975
1976
1977 # constants
1978
1979 vfldz => {
1980         irn_flags => "R",
1981         reg_req   => { out => [ "vfp" ] },
1982         latency   => 4,
1983         units     => [ "VFP" ],
1984         mode      => "mode_E",
1985         attr_type => "ia32_x87_attr_t",
1986 },
1987
1988 vfld1 => {
1989         irn_flags => "R",
1990         reg_req   => { out => [ "vfp" ] },
1991         latency   => 4,
1992         units     => [ "VFP" ],
1993         mode      => "mode_E",
1994         attr_type => "ia32_x87_attr_t",
1995 },
1996
1997 vfldpi => {
1998         irn_flags => "R",
1999         reg_req   => { out => [ "vfp" ] },
2000         latency   => 4,
2001         units     => [ "VFP" ],
2002         mode      => "mode_E",
2003         attr_type => "ia32_x87_attr_t",
2004 },
2005
2006 vfldln2 => {
2007         irn_flags => "R",
2008         reg_req   => { out => [ "vfp" ] },
2009         latency   => 4,
2010         units     => [ "VFP" ],
2011         mode      => "mode_E",
2012         attr_type => "ia32_x87_attr_t",
2013 },
2014
2015 vfldlg2 => {
2016         irn_flags => "R",
2017         reg_req   => { out => [ "vfp" ] },
2018         latency   => 4,
2019         units     => [ "VFP" ],
2020         mode      => "mode_E",
2021         attr_type => "ia32_x87_attr_t",
2022 },
2023
2024 vfldl2t => {
2025         irn_flags => "R",
2026         reg_req   => { out => [ "vfp" ] },
2027         latency   => 4,
2028         units     => [ "VFP" ],
2029         mode      => "mode_E",
2030         attr_type => "ia32_x87_attr_t",
2031 },
2032
2033 vfldl2e => {
2034         irn_flags => "R",
2035         reg_req   => { out => [ "vfp" ] },
2036         latency   => 4,
2037         units     => [ "VFP" ],
2038         mode      => "mode_E",
2039         attr_type => "ia32_x87_attr_t",
2040 },
2041
2042 # other
2043
2044 vFucomFnstsw => {
2045 # we can't allow to rematerialize this node so we don't have
2046 #  accidently produce Phi(Fucom, Fucom(ins_permuted))
2047 #       irn_flags => "R",
2048         reg_req   => { in => [ "vfp", "vfp" ], out => [ "eax" ] },
2049         ins       => [ "left", "right" ],
2050         outs      => [ "flags" ],
2051         attr      => "int ins_permuted",
2052         init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2053         latency   => 3,
2054         units     => [ "VFP" ],
2055         attr_type => "ia32_x87_attr_t",
2056         mode      => $mode_gp
2057 },
2058
2059 vFucomi => {
2060         irn_flags => "R",
2061         reg_req   => { in => [ "vfp", "vfp" ], out => [ "eflags" ] },
2062         ins       => [ "left", "right" ],
2063         outs      => [ "flags" ],
2064         attr      => "int ins_permuted",
2065         init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2066         latency   => 3,
2067         units     => [ "VFP" ],
2068         attr_type => "ia32_x87_attr_t",
2069         mode      => $mode_gp
2070 },
2071
2072 vFtstFnstsw => {
2073 #       irn_flags => "R",
2074         reg_req   => { in => [ "vfp" ], out => [ "eax" ] },
2075         ins       => [ "left" ],
2076         outs      => [ "flags" ],
2077         attr      => "int ins_permuted",
2078         init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2079         latency   => 3,
2080         units     => [ "VFP" ],
2081         attr_type => "ia32_x87_attr_t",
2082         mode      => $mode_gp
2083 },
2084
2085 Sahf => {
2086         irn_flags => "R",
2087         reg_req   => { in => [ "eax" ], out => [ "eflags" ] },
2088         ins       => [ "val" ],
2089         outs      => [ "flags" ],
2090         emit      => '. sahf',
2091         latency   => 1,
2092         units     => [ "GP" ],
2093         mode      => $mode_flags,
2094 },
2095
2096 #------------------------------------------------------------------------#
2097 #       ___ _____    __ _             _                     _            #
2098 # __  _( _ )___  |  / _| | ___   __ _| |_   _ __   ___   __| | ___  ___  #
2099 # \ \/ / _ \  / /  | |_| |/ _ \ / _` | __| | '_ \ / _ \ / _` |/ _ \/ __| #
2100 #  >  < (_) |/ /   |  _| | (_) | (_| | |_  | | | | (_) | (_| |  __/\__ \ #
2101 # /_/\_\___//_/    |_| |_|\___/ \__,_|\__| |_| |_|\___/ \__,_|\___||___/ #
2102 #------------------------------------------------------------------------#
2103
2104 # Note: gas is strangely buggy: fdivrp and fdivp as well as fsubrp and fsubp
2105 #       are swapped, we work this around in the emitter...
2106
2107 fadd => {
2108         state     => "exc_pinned",
2109         rd_constructor => "NONE",
2110         reg_req   => { },
2111         emit      => '. fadd%XM %x87_binop',
2112         latency   => 4,
2113         attr_type => "ia32_x87_attr_t",
2114 },
2115
2116 faddp => {
2117         state     => "exc_pinned",
2118         rd_constructor => "NONE",
2119         reg_req   => { },
2120         emit      => '. faddp%XM %x87_binop',
2121         latency   => 4,
2122         attr_type => "ia32_x87_attr_t",
2123 },
2124
2125 fmul => {
2126         state     => "exc_pinned",
2127         rd_constructor => "NONE",
2128         reg_req   => { },
2129         emit      => '. fmul%XM %x87_binop',
2130         latency   => 4,
2131         attr_type => "ia32_x87_attr_t",
2132 },
2133
2134 fmulp => {
2135         state     => "exc_pinned",
2136         rd_constructor => "NONE",
2137         reg_req   => { },
2138         emit      => '. fmulp%XM %x87_binop',,
2139         latency   => 4,
2140         attr_type => "ia32_x87_attr_t",
2141 },
2142
2143 fsub => {
2144         state     => "exc_pinned",
2145         rd_constructor => "NONE",
2146         reg_req   => { },
2147         emit      => '. fsub%XM %x87_binop',
2148         latency   => 4,
2149         attr_type => "ia32_x87_attr_t",
2150 },
2151
2152 fsubp => {
2153         state     => "exc_pinned",
2154         rd_constructor => "NONE",
2155         reg_req   => { },
2156 # see note about gas bugs
2157         emit      => '. fsubrp%XM %x87_binop',
2158         latency   => 4,
2159         attr_type => "ia32_x87_attr_t",
2160 },
2161
2162 fsubr => {
2163         state     => "exc_pinned",
2164         rd_constructor => "NONE",
2165         irn_flags => "R",
2166         reg_req   => { },
2167         emit      => '. fsubr%XM %x87_binop',
2168         latency   => 4,
2169         attr_type => "ia32_x87_attr_t",
2170 },
2171
2172 fsubrp => {
2173         state     => "exc_pinned",
2174         rd_constructor => "NONE",
2175         irn_flags => "R",
2176         reg_req   => { },
2177 # see note about gas bugs
2178         emit      => '. fsubp%XM %x87_binop',
2179         latency   => 4,
2180         attr_type => "ia32_x87_attr_t",
2181 },
2182
2183 fprem => {
2184         rd_constructor => "NONE",
2185         reg_req   => { },
2186         emit      => '. fprem1',
2187         latency   => 20,
2188         attr_type => "ia32_x87_attr_t",
2189 },
2190
2191 # this node is just here, to keep the simulator running
2192 # we can omit this when a fprem simulation function exists
2193 fpremp => {
2194         rd_constructor => "NONE",
2195         reg_req   => { },
2196         emit      => '. fprem1\n'.
2197                      '. fstp %X0',
2198         latency   => 20,
2199         attr_type => "ia32_x87_attr_t",
2200 },
2201
2202 fdiv => {
2203         state     => "exc_pinned",
2204         rd_constructor => "NONE",
2205         reg_req   => { },
2206         emit      => '. fdiv%XM %x87_binop',
2207         latency   => 20,
2208         attr_type => "ia32_x87_attr_t",
2209 },
2210
2211 fdivp => {
2212         state     => "exc_pinned",
2213         rd_constructor => "NONE",
2214         reg_req   => { },
2215 # see note about gas bugs
2216         emit      => '. fdivrp%XM %x87_binop',
2217         latency   => 20,
2218         attr_type => "ia32_x87_attr_t",
2219 },
2220
2221 fdivr => {
2222         state     => "exc_pinned",
2223         rd_constructor => "NONE",
2224         reg_req   => { },
2225         emit      => '. fdivr%XM %x87_binop',
2226         latency   => 20,
2227         attr_type => "ia32_x87_attr_t",
2228 },
2229
2230 fdivrp => {
2231         state     => "exc_pinned",
2232         rd_constructor => "NONE",
2233         reg_req   => { },
2234 # see note about gas bugs
2235         emit      => '. fdivp%XM %x87_binop',
2236         latency   => 20,
2237         attr_type => "ia32_x87_attr_t",
2238 },
2239
2240 fabs => {
2241         rd_constructor => "NONE",
2242         reg_req   => { },
2243         emit      => '. fabs',
2244         latency   => 4,
2245         attr_type => "ia32_x87_attr_t",
2246 },
2247
2248 fchs => {
2249         op_flags  => "R|K",
2250         rd_constructor => "NONE",
2251         reg_req   => { },
2252         emit      => '. fchs',
2253         latency   => 4,
2254         attr_type => "ia32_x87_attr_t",
2255 },
2256
2257 # x87 Load and Store
2258
2259 fld => {
2260         rd_constructor => "NONE",
2261         op_flags  => "R|L|F",
2262         state     => "exc_pinned",
2263         reg_req   => { },
2264         emit      => '. fld%XM %AM',
2265         attr_type => "ia32_x87_attr_t",
2266         latency   => 2,
2267 },
2268
2269 fst => {
2270         rd_constructor => "NONE",
2271         op_flags  => "R|L|F",
2272         state     => "exc_pinned",
2273         reg_req   => { },
2274         emit      => '. fst%XM %AM',
2275         mode      => "mode_M",
2276         attr_type => "ia32_x87_attr_t",
2277         latency   => 2,
2278 },
2279
2280 fstp => {
2281         rd_constructor => "NONE",
2282         op_flags  => "R|L|F",
2283         state     => "exc_pinned",
2284         reg_req   => { },
2285         emit      => '. fstp%XM %AM',
2286         mode      => "mode_M",
2287         attr_type => "ia32_x87_attr_t",
2288         latency   => 2,
2289 },
2290
2291 # Conversions
2292
2293 fild => {
2294         state     => "exc_pinned",
2295         rd_constructor => "NONE",
2296         reg_req   => { },
2297         emit      => '. fild%M %AM',
2298         attr_type => "ia32_x87_attr_t",
2299         latency   => 2,
2300 },
2301
2302 fist => {
2303         state     => "exc_pinned",
2304         rd_constructor => "NONE",
2305         reg_req   => { },
2306         emit      => '. fist%M %AM',
2307         mode      => "mode_M",
2308         attr_type => "ia32_x87_attr_t",
2309         latency   => 2,
2310 },
2311
2312 fistp => {
2313         state     => "exc_pinned",
2314         rd_constructor => "NONE",
2315         reg_req   => { },
2316         emit      => '. fistp%M %AM',
2317         mode      => "mode_M",
2318         attr_type => "ia32_x87_attr_t",
2319         latency   => 2,
2320 },
2321
2322 # constants
2323
2324 fldz => {
2325         op_flags  => "R|c|K",
2326         irn_flags => "R",
2327         reg_req   => { out => [ "vfp" ] },
2328         emit      => '. fldz',
2329         attr_type => "ia32_x87_attr_t",
2330         latency   => 2,
2331 },
2332
2333 fld1 => {
2334         op_flags  => "R|c|K",
2335         irn_flags => "R",
2336         reg_req   => { out => [ "vfp" ] },
2337         emit      => '. fld1',
2338         attr_type => "ia32_x87_attr_t",
2339         latency   => 2,
2340 },
2341
2342 fldpi => {
2343         op_flags  => "R|c|K",
2344         irn_flags => "R",
2345         reg_req   => { out => [ "vfp" ] },
2346         emit      => '. fldpi',
2347         attr_type => "ia32_x87_attr_t",
2348         latency   => 2,
2349 },
2350
2351 fldln2 => {
2352         op_flags  => "R|c|K",
2353         irn_flags => "R",
2354         reg_req   => { out => [ "vfp" ] },
2355         emit      => '. fldln2',
2356         attr_type => "ia32_x87_attr_t",
2357         latency   => 2,
2358 },
2359
2360 fldlg2 => {
2361         op_flags  => "R|c|K",
2362         irn_flags => "R",
2363         reg_req   => { out => [ "vfp" ] },
2364         emit      => '. fldlg2',
2365         attr_type => "ia32_x87_attr_t",
2366         latency   => 2,
2367 },
2368
2369 fldl2t => {
2370         op_flags  => "R|c|K",
2371         irn_flags => "R",
2372         reg_req   => { out => [ "vfp" ] },
2373         emit      => '. fldll2t',
2374         attr_type => "ia32_x87_attr_t",
2375         latency   => 2,
2376 },
2377
2378 fldl2e => {
2379         op_flags  => "R|c|K",
2380         irn_flags => "R",
2381         reg_req   => { out => [ "vfp" ] },
2382         emit      => '. fldl2e',
2383         attr_type => "ia32_x87_attr_t",
2384         latency   => 2,
2385 },
2386
2387 # fxch, fpush, fpop
2388 # Note that it is NEVER allowed to do CSE on these nodes
2389 # Moreover, note the virtual register requierements!
2390
2391 fxch => {
2392         op_flags  => "R|K",
2393         reg_req   => { },
2394         cmp_attr  => "return 1;",
2395         emit      => '. fxch %X0',
2396         attr_type => "ia32_x87_attr_t",
2397         mode      => "mode_ANY",
2398         latency   => 1,
2399 },
2400
2401 fpush => {
2402         op_flags  => "R|K",
2403         reg_req   => {},
2404         cmp_attr  => "return 1;",
2405         emit      => '. fld %X0',
2406         attr_type => "ia32_x87_attr_t",
2407         mode      => "mode_ANY",
2408         latency   => 1,
2409 },
2410
2411 fpushCopy => {
2412         reg_req   => { in => [ "vfp"], out => [ "vfp" ] },
2413         cmp_attr  => "return 1;",
2414         emit      => '. fld %X0',
2415         attr_type => "ia32_x87_attr_t",
2416         latency   => 1,
2417 },
2418
2419 fpop => {
2420         op_flags  => "K",
2421         reg_req   => { },
2422         cmp_attr  => "return 1;",
2423         emit      => '. fstp %X0',
2424         attr_type => "ia32_x87_attr_t",
2425         mode      => "mode_ANY",
2426         latency   => 1,
2427 },
2428
2429 ffreep => {
2430         op_flags  => "K",
2431         reg_req   => { },
2432         cmp_attr  => "return 1;",
2433         emit      => '. ffreep %X0',
2434         attr_type => "ia32_x87_attr_t",
2435         mode      => "mode_ANY",
2436         latency   => 1,
2437 },
2438
2439 emms => {
2440         op_flags  => "K",
2441         reg_req   => { },
2442         cmp_attr  => "return 1;",
2443         emit      => '. emms',
2444         attr_type => "ia32_x87_attr_t",
2445         mode      => "mode_ANY",
2446         latency   => 3,
2447 },
2448
2449 femms => {
2450         op_flags  => "K",
2451         reg_req   => { },
2452         cmp_attr  => "return 1;",
2453         emit      => '. femms',
2454         attr_type => "ia32_x87_attr_t",
2455         mode      => "mode_ANY",
2456         latency   => 3,
2457 },
2458
2459 # compare
2460
2461 FucomFnstsw => {
2462         reg_req   => { },
2463         emit      => ". fucom %X1\n".
2464                      ". fnstsw %%ax",
2465         attr_type => "ia32_x87_attr_t",
2466         latency   => 2,
2467 },
2468
2469 FucompFnstsw => {
2470         reg_req   => { },
2471         emit      => ". fucomp %X1\n".
2472                      ". fnstsw %%ax",
2473         attr_type => "ia32_x87_attr_t",
2474         latency   => 2,
2475 },
2476
2477 FucomppFnstsw => {
2478         reg_req   => { },
2479         emit      => ". fucompp\n".
2480                      ". fnstsw %%ax",
2481         attr_type => "ia32_x87_attr_t",
2482         latency   => 2,
2483 },
2484
2485 Fucomi => {
2486         reg_req   => { },
2487         emit      => '. fucomi %X1',
2488         attr_type => "ia32_x87_attr_t",
2489         latency   => 1,
2490 },
2491
2492 Fucompi => {
2493         reg_req   => { },
2494         emit      => '. fucompi %X1',
2495         attr_type => "ia32_x87_attr_t",
2496         latency   => 1,
2497 },
2498
2499 FtstFnstsw => {
2500         reg_req   => { },
2501         emit      => ". ftst\n".
2502                      ". fnstsw %%ax",
2503         attr_type => "ia32_x87_attr_t",
2504         latency   => 2,
2505 },
2506
2507
2508 # -------------------------------------------------------------------------------- #
2509 #  ____ ____  _____                  _                               _             #
2510 # / ___/ ___|| ____| __   _____  ___| |_ ___  _ __   _ __   ___   __| | ___  ___   #
2511 # \___ \___ \|  _|   \ \ / / _ \/ __| __/ _ \| '__| | '_ \ / _ \ / _` |/ _ \/ __|  #
2512 #  ___) |__) | |___   \ V /  __/ (__| || (_) | |    | | | | (_) | (_| |  __/\__ \  #
2513 # |____/____/|_____|   \_/ \___|\___|\__\___/|_|    |_| |_|\___/ \__,_|\___||___/  #
2514 #                                                                                  #
2515 # -------------------------------------------------------------------------------- #
2516
2517
2518 # Spilling and reloading of SSE registers, hardcoded, not generated #
2519
2520 xxLoad => {
2521         op_flags  => "L|F",
2522         state     => "exc_pinned",
2523         reg_req   => { in => [ "gp", "gp", "none" ], out => [ "xmm", "none" ] },
2524         emit      => '. movdqu %D0, %AM',
2525         outs      => [ "res", "M" ],
2526         units     => [ "SSE" ],
2527         latency   => 1,
2528 },
2529
2530 xxStore => {
2531         op_flags => "L|F",
2532         state    => "exc_pinned",
2533         reg_req  => { in => [ "gp", "gp", "none", "xmm" ] },
2534         ins      => [ "base", "index", "mem", "val" ],
2535         emit     => '. movdqu %binop',
2536         units    => [ "SSE" ],
2537         latency   => 1,
2538         mode     => "mode_M",
2539 },
2540
2541 ); # end of %nodes
2542
2543 # Include the generated SIMD node specification written by the SIMD optimization
2544 $my_script_name = dirname($myname) . "/../ia32/ia32_simd_spec.pl";
2545 unless ($return = do $my_script_name) {
2546         warn "couldn't parse $my_script_name: $@" if $@;
2547         warn "couldn't do $my_script_name: $!"    unless defined $return;
2548         warn "couldn't run $my_script_name"       unless $return;
2549 }
2550
2551 # Transform some attributes
2552 foreach my $op (keys(%nodes)) {
2553         my $node         = $nodes{$op};
2554         my $op_attr_init = $node->{op_attr_init};
2555
2556         if(defined($op_attr_init)) {
2557                 $op_attr_init .= "\n\t";
2558         } else {
2559                 $op_attr_init = "";
2560         }
2561
2562         if(!defined($node->{latency})) {
2563                 if($op =~ m/^l_/) {
2564                         $node->{latency} = 0;
2565                 } else {
2566                         die("Latency missing for op $op");
2567                 }
2568         }
2569         $op_attr_init .= "attr->latency = ".$node->{latency} . ";";
2570
2571         $node->{op_attr_init} = $op_attr_init;
2572 }
2573
2574 print "";