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