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