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