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

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