3 # This is the specification for the ia32 assembler Firm-operations
9 # the cpu architecture (ia32, ia64, mips, sparc, ppc, ...)
12 # The node description is done as a perl hash initializer with the
13 # following structure:
18 # op_flags => "N|L|C|X|I|F|Y|H|c|K|n",
20 # arity => "0|1|2|3 ... |variable|dynamic|any",
21 # state => "floats|pinned|mem_pinned|exc_pinned",
23 # { type => "type 1", name => "name 1" },
24 # { type => "type 2", name => "name 2" },
27 # comment => "any comment for constructor",
28 # reg_req => { in => [ "reg_class|register" ], out => [ "reg_class|register|in_rX" ] },
29 # cmp_attr => "c source code for comparing node attributes",
30 # outs => { "out1", "out2" } # optional, creates pn_op_out1, ... consts
31 # ins => { "in1", "in2" } # optional, creates n_op_in1, ... consts
32 # mode => "mode_Iu" # optional, predefines the mode
33 # emit => "emit code with templates",
34 # attr => "additional attribute arguments for constructor",
35 # init_attr => "emit attribute initialization template",
36 # hash_func => "name of the hash function for this operation",
37 # latency => "latency of this operation (can be float)"
38 # attr_type => "name of the attribute struct",
39 # modified_flags => [ "CF", ... ] # optional, list of modified flags
42 # ... # (all nodes you need to describe)
44 # ); # close the %nodes initializer
46 # op_flags: flags for the operation, OPTIONAL (default is "N")
47 # the op_flags correspond to the firm irop_flags:
50 # C irop_flag_commutative
51 # X irop_flag_cfopcode
52 # I irop_flag_ip_cfopcode
55 # H irop_flag_highlevel
56 # c irop_flag_constlike
58 # NB irop_flag_dump_noblock
59 # NI irop_flag_dump_noinput
61 # irn_flags: special node flags, OPTIONAL (default is 0)
62 # following irn_flags are supported:
66 # state: state of the operation, OPTIONAL (default is "floats")
68 # arity: arity of the operation, MUST NOT BE OMITTED
70 # args: the OPTIONAL arguments of the node constructor (debug, irg and block
71 # are always the first 3 arguments and are always autmatically
73 # If this key is missing the following arguments will be created:
74 # for i = 1 .. arity: ir_node *op_i
77 # outs: if a node defines more than one output, the names of the projections
78 # nodes having outs having automatically the mode mode_T
79 # example: [ "frame", "stack", "M" ]
81 # comment: OPTIONAL comment for the node constructor
83 # rd_constructor: for every operation there will be a
84 # new_rd_<arch>_<op-name> function with the arguments from above
85 # which creates the ir_node corresponding to the defined operation
86 # you can either put the complete source code of this function here
88 # This key is OPTIONAL. If omitted, the following constructor will
90 # if (!op_<arch>_<op-name>) assert(0);
94 # res = new_ir_node(db, irg, block, op_<arch>_<op-name>, mode, arity, in)
97 # NOTE: rd_constructor and args are only optional if and only if arity is 0,1,2 or 3
101 # 0 - no special type
102 # 1 - caller save (register must be saved by the caller of a function)
103 # 2 - callee save (register must be saved by the called function)
104 # 4 - ignore (do not automatically assign this register)
105 # 8 - emitter can choose an arbitrary register of this class
106 # 16 - the register is a virtual one
107 # 32 - register represents a state
108 # NOTE: Last entry of each class is the largest Firm-Mode a register can hold
111 { name => "edx", type => 1 },
112 { name => "ecx", type => 1 },
113 { name => "eax", type => 1 },
114 { name => "ebx", type => 2 },
115 { name => "esi", type => 2 },
116 { name => "edi", type => 2 },
117 { name => "ebp", type => 2 },
118 { name => "esp", type => 4 },
119 { name => "gp_NOREG", type => 4 | 8 | 16 }, # we need a dummy register for NoReg nodes
120 { name => "gp_UKNWN", type => 4 | 8 | 16 }, # we need a dummy register for Unknown nodes
121 { mode => "mode_Iu" }
124 { name => "mm0", type => 4 },
125 { name => "mm1", type => 4 },
126 { name => "mm2", type => 4 },
127 { name => "mm3", type => 4 },
128 { name => "mm4", type => 4 },
129 { name => "mm5", type => 4 },
130 { name => "mm6", type => 4 },
131 { name => "mm7", type => 4 },
132 { mode => "mode_E", flags => "manual_ra" }
135 { name => "xmm0", type => 1 },
136 { name => "xmm1", type => 1 },
137 { name => "xmm2", type => 1 },
138 { name => "xmm3", type => 1 },
139 { name => "xmm4", type => 1 },
140 { name => "xmm5", type => 1 },
141 { name => "xmm6", type => 1 },
142 { name => "xmm7", type => 1 },
143 { name => "xmm_NOREG", type => 4 | 16 }, # we need a dummy register for NoReg nodes
144 { name => "xmm_UKNWN", type => 4 | 8 | 16}, # we need a dummy register for Unknown nodes
148 { name => "vf0", type => 1 },
149 { name => "vf1", type => 1 },
150 { name => "vf2", type => 1 },
151 { name => "vf3", type => 1 },
152 { name => "vf4", type => 1 },
153 { name => "vf5", type => 1 },
154 { name => "vf6", type => 1 },
155 { name => "vf7", type => 1 },
156 { name => "vfp_NOREG", type => 4 | 8 | 16 }, # we need a dummy register for NoReg nodes
157 { name => "vfp_UKNWN", type => 4 | 8 | 16 }, # we need a dummy register for Unknown nodes
161 { name => "st0", realname => "st", type => 4 },
162 { name => "st1", realname => "st(1)", type => 4 },
163 { name => "st2", realname => "st(2)", type => 4 },
164 { name => "st3", realname => "st(3)", type => 4 },
165 { name => "st4", realname => "st(4)", type => 4 },
166 { name => "st5", realname => "st(5)", type => 4 },
167 { name => "st6", realname => "st(6)", type => 4 },
168 { name => "st7", realname => "st(7)", type => 4 },
169 { mode => "mode_E", flags => "manual_ra" }
171 fp_cw => [ # the floating point control word
172 { name => "fpcw", type => 4|32 },
173 { mode => "mode_fpcw", flags => "manual_ra|state" }
176 { name => "eflags", type => 0 },
177 { mode => "mode_Iu", flags => "manual_ra" }
182 GP => [ 1, "GP_EAX", "GP_EBX", "GP_ECX", "GP_EDX", "GP_ESI", "GP_EDI", "GP_EBP" ],
183 SSE => [ 1, "SSE_XMM0", "SSE_XMM1", "SSE_XMM2", "SSE_XMM3", "SSE_XMM4", "SSE_XMM5", "SSE_XMM6", "SSE_XMM7" ],
184 VFP => [ 1, "VFP_VF0", "VFP_VF1", "VFP_VF2", "VFP_VF3", "VFP_VF4", "VFP_VF5", "VFP_VF6", "VFP_VF7" ],
185 BRANCH => [ 1, "BRANCH1", "BRANCH2" ],
190 bundels_per_cycle => 1
194 S0 => "${arch}_emit_source_register(node, 0);",
195 S1 => "${arch}_emit_source_register(node, 1);",
196 S2 => "${arch}_emit_source_register(node, 2);",
197 S3 => "${arch}_emit_source_register(node, 3);",
198 SB0 => "${arch}_emit_8bit_source_register_or_immediate(node, 0);",
199 SB1 => "${arch}_emit_8bit_source_register_or_immediate(node, 1);",
200 SB2 => "${arch}_emit_8bit_source_register_or_immediate(node, 2);",
201 SB3 => "${arch}_emit_8bit_source_register_or_immediate(node, 3);",
202 SH0 => "${arch}_emit_8bit_high_source_register(node, 0);",
203 SS0 => "${arch}_emit_16bit_source_register_or_immediate(node, 0);",
204 SI0 => "${arch}_emit_source_register_or_immediate(node, 0);",
205 SI1 => "${arch}_emit_source_register_or_immediate(node, 1);",
206 SI3 => "${arch}_emit_source_register_or_immediate(node, 3);",
207 D0 => "${arch}_emit_dest_register(node, 0);",
208 D1 => "${arch}_emit_dest_register(node, 1);",
209 DS0 => "${arch}_emit_dest_register_size(node, 0);",
210 DB0 => "${arch}_emit_8bit_dest_register(node, 0);",
211 X0 => "${arch}_emit_x87_register(node, 0);",
212 X1 => "${arch}_emit_x87_register(node, 1);",
213 EX => "${arch}_emit_extend_suffix(node);",
214 M => "${arch}_emit_mode_suffix(node);",
215 XM => "${arch}_emit_x87_mode_suffix(node);",
216 XXM => "${arch}_emit_xmm_mode_suffix(node);",
217 XSD => "${arch}_emit_xmm_mode_suffix_s(node);",
218 AM => "${arch}_emit_am(node);",
219 unop3 => "${arch}_emit_unop(node, n_ia32_unary_op);",
220 unop4 => "${arch}_emit_unop(node, n_ia32_binary_right);",
221 binop => "${arch}_emit_binop(node);",
222 x87_binop => "${arch}_emit_x87_binop(node);",
223 CMP0 => "${arch}_emit_cmp_suffix_node(node, 0);",
224 CMP3 => "${arch}_emit_cmp_suffix_node(node, 3);",
230 $default_op_attr_type = "ia32_op_attr_t";
231 $default_attr_type = "ia32_attr_t";
232 $default_copy_attr = "ia32_copy_attr";
234 sub ia32_custom_init_attr {
240 if(defined($node->{modified_flags})) {
241 $res .= "\tarch_irn_add_flags(res, arch_irn_flags_modify_flags);\n";
243 if(defined($node->{am})) {
244 my $am = $node->{am};
245 if($am eq "source,unary") {
246 $res .= "\tset_ia32_am_support(res, ia32_am_unary);";
247 } elsif($am eq "source,binary") {
248 $res .= "\tset_ia32_am_support(res, ia32_am_binary);";
249 } elsif($am eq "none") {
252 die("Invalid address mode '$am' specified on op $name");
255 if($node->{state} ne "exc_pinned"
256 and $node->{state} ne "pinned") {
257 die("AM nodes must have pinned or AM pinned state ($name)");
263 $custom_init_attr_func = \&ia32_custom_init_attr;
267 "\tinit_ia32_attributes(res, flags, in_reqs, exec_units, n_res);\n".
268 "\tinit_ia32_x87_attributes(res);".
269 "\tinit_ia32_asm_attributes(res);",
271 "\tinit_ia32_attributes(res, flags, in_reqs, exec_units, n_res);",
273 "\tinit_ia32_attributes(res, flags, in_reqs, exec_units, n_res);\n".
274 "\tinit_ia32_call_attributes(res, pop, call_tp);",
275 ia32_condcode_attr_t =>
276 "\tinit_ia32_attributes(res, flags, in_reqs, exec_units, n_res);\n".
277 "\tinit_ia32_condcode_attributes(res, pnc);",
279 "\tinit_ia32_attributes(res, flags, in_reqs, exec_units, n_res);\n".
280 "\tinit_ia32_copyb_attributes(res, size);",
281 ia32_immediate_attr_t =>
282 "\tinit_ia32_attributes(res, flags, in_reqs, exec_units, n_res);\n".
283 "\tinit_ia32_immediate_attributes(res, symconst, symconst_sign, no_pic_adjust, offset);",
285 "\tinit_ia32_attributes(res, flags, in_reqs, exec_units, n_res);\n".
286 "\tinit_ia32_x87_attributes(res);",
287 ia32_climbframe_attr_t =>
288 "\tinit_ia32_attributes(res, flags, in_reqs, exec_units, n_res);\n".
289 "\tinit_ia32_climbframe_attributes(res, count);",
293 ia32_asm_attr_t => "ia32_compare_asm_attr",
294 ia32_attr_t => "ia32_compare_nodes_attr",
295 ia32_call_attr_t => "ia32_compare_call_attr",
296 ia32_condcode_attr_t => "ia32_compare_condcode_attr",
297 ia32_copyb_attr_t => "ia32_compare_copyb_attr",
298 ia32_immediate_attr_t => "ia32_compare_immediate_attr",
299 ia32_x87_attr_t => "ia32_compare_x87_attr",
300 ia32_climbframe_attr_t => "ia32_compare_climbframe_attr",
306 $mode_xmm = "mode_E";
307 $mode_gp = "mode_Iu";
308 $mode_flags = "mode_Iu";
309 $mode_fpcw = "mode_fpcw";
310 $status_flags = [ "CF", "PF", "AF", "ZF", "SF", "OF" ];
311 $status_flags_wo_cf = [ "PF", "AF", "ZF", "SF", "OF" ];
312 $fpcw_flags = [ "FP_IM", "FP_DM", "FP_ZM", "FP_OM", "FP_UM", "FP_PM",
313 "FP_PC0", "FP_PC1", "FP_RC0", "FP_RC1", "FP_X" ];
320 reg_req => { out => [ "gp_NOREG:I" ] },
321 attr => "ir_entity *symconst, int symconst_sign, int no_pic_adjust, long offset",
322 attr_type => "ia32_immediate_attr_t",
323 hash_func => "ia32_hash_Immediate",
331 out_arity => "variable",
332 attr_type => "ia32_asm_attr_t",
333 attr => "ident *asm_text, const ia32_asm_reg_t *register_map",
334 init_attr => "attr->asm_text = asm_text;\n".
335 "\tattr->register_map = register_map;\n",
337 modified_flags => $status_flags,
340 # "allocates" a free register
344 reg_req => { out => [ "gp" ] },
349 cmp_attr => "return 1;",
354 state => "exc_pinned",
355 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ],
356 out => [ "in_r4 in_r5", "flags", "none" ] },
357 ins => [ "base", "index", "mem", "left", "right" ],
358 outs => [ "res", "flags", "M" ],
359 emit => '. add%M %binop',
360 am => "source,binary",
364 modified_flags => $status_flags
369 state => "exc_pinned",
370 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
371 ins => [ "base", "index", "mem", "val" ],
372 emit => ". add%M %SI3, %AM",
376 modified_flags => $status_flags
381 state => "exc_pinned",
382 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
383 ins => [ "base", "index", "mem", "val" ],
384 emit => ". add%M %SB3, %AM",
388 modified_flags => $status_flags
392 state => "exc_pinned",
393 reg_req => { in => [ "gp", "gp", "none", "gp", "gp", "flags" ],
394 out => [ "in_r4 in_r5", "flags", "none" ] },
395 ins => [ "base", "index", "mem", "left", "right", "eflags" ],
396 outs => [ "res", "flags", "M" ],
397 emit => '. adc%M %binop',
398 am => "source,binary",
402 modified_flags => $status_flags
407 reg_req => { in => [ "none", "none" ], out => [ "none" ] },
408 ins => [ "left", "right" ],
412 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
413 ins => [ "left", "right", "eflags" ],
417 # we should not rematrialize this node. It produces 2 results and has
418 # very strict constraints
419 state => "exc_pinned",
420 reg_req => { in => [ "gp", "gp", "none", "eax", "gp" ],
421 out => [ "eax", "flags", "none", "edx" ] },
422 ins => [ "base", "index", "mem", "left", "right" ],
423 emit => '. mul%M %unop4',
424 outs => [ "res_low", "flags", "M", "res_high" ],
425 am => "source,binary",
428 modified_flags => $status_flags
432 # we should not rematrialize this node. It produces 2 results and has
433 # very strict constraints
435 cmp_attr => "return 1;",
436 reg_req => { in => [ "none", "none" ],
437 out => [ "none", "none", "none", "none" ] },
438 ins => [ "left", "right" ],
439 outs => [ "res_low", "flags", "M", "res_high" ],
444 state => "exc_pinned",
445 # TODO: adjust out requirements for the 3 operand form
446 # (no need for should_be_same then)
447 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ],
448 out => [ "in_r4 in_r5", "flags", "none" ] },
449 ins => [ "base", "index", "mem", "left", "right" ],
450 outs => [ "res", "flags", "M" ],
451 am => "source,binary",
455 modified_flags => $status_flags
460 state => "exc_pinned",
461 reg_req => { in => [ "gp", "gp", "none", "eax", "gp" ],
462 out => [ "eax", "flags", "none", "edx" ] },
463 ins => [ "base", "index", "mem", "left", "right" ],
464 emit => '. imul%M %unop4',
465 outs => [ "res_low", "flags", "M", "res_high" ],
466 am => "source,binary",
469 modified_flags => $status_flags
474 cmp_attr => "return 1;",
475 reg_req => { in => [ "none", "none" ],
476 out => [ "none", "none", "none", "none" ] },
477 ins => [ "left", "right" ],
478 outs => [ "res_low", "flags", "M", "res_high" ],
483 state => "exc_pinned",
484 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ],
485 out => [ "in_r4 in_r5", "flags", "none" ] },
486 ins => [ "base", "index", "mem", "left", "right" ],
487 outs => [ "res", "flags", "M" ],
488 am => "source,binary",
489 emit => '. and%M %binop',
493 modified_flags => $status_flags
498 state => "exc_pinned",
499 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
500 ins => [ "base", "index", "mem", "val" ],
501 emit => '. and%M %SI3, %AM',
505 modified_flags => $status_flags
510 state => "exc_pinned",
511 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
512 ins => [ "base", "index", "mem", "val" ],
513 emit => '. and%M %SB3, %AM',
517 modified_flags => $status_flags
522 state => "exc_pinned",
523 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ],
524 out => [ "in_r4 in_r5", "flags", "none" ] },
525 ins => [ "base", "index", "mem", "left", "right" ],
526 outs => [ "res", "flags", "M" ],
527 am => "source,binary",
528 emit => '. or%M %binop',
532 modified_flags => $status_flags
537 state => "exc_pinned",
538 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
539 ins => [ "base", "index", "mem", "val" ],
540 emit => '. or%M %SI3, %AM',
544 modified_flags => $status_flags
549 state => "exc_pinned",
550 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
551 ins => [ "base", "index", "mem", "val" ],
552 emit => '. or%M %SB3, %AM',
556 modified_flags => $status_flags
561 state => "exc_pinned",
562 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ],
563 out => [ "in_r4 in_r5", "flags", "none" ] },
564 ins => [ "base", "index", "mem", "left", "right" ],
565 outs => [ "res", "flags", "M" ],
566 am => "source,binary",
567 emit => '. xor%M %binop',
571 modified_flags => $status_flags
577 reg_req => { out => [ "gp", "flags" ] },
578 outs => [ "res", "flags" ],
579 emit => ". xor%M %D0, %D0",
583 modified_flags => $status_flags
588 state => "exc_pinned",
589 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
590 ins => [ "base", "index", "mem", "val" ],
591 emit => '. xor%M %SI3, %AM',
595 modified_flags => $status_flags
600 state => "exc_pinned",
601 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
602 ins => [ "base", "index", "mem", "val" ],
603 emit => '. xor%M %SB3, %AM',
607 modified_flags => $status_flags
612 state => "exc_pinned",
613 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ],
614 out => [ "in_r4", "flags", "none" ] },
615 ins => [ "base", "index", "mem", "minuend", "subtrahend" ],
616 outs => [ "res", "flags", "M" ],
617 am => "source,binary",
618 emit => '. sub%M %binop',
622 modified_flags => $status_flags
627 state => "exc_pinned",
628 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none" ] },
629 ins => [ "base", "index", "mem", "subtrahend" ],
630 emit => '. sub%M %SI3, %AM',
634 modified_flags => $status_flags
639 state => "exc_pinned",
640 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => [ "none" ] },
641 ins => [ "base", "index", "mem", "subtrahend" ],
642 emit => '. sub%M %SB3, %AM',
646 modified_flags => $status_flags
650 state => "exc_pinned",
651 reg_req => { in => [ "gp", "gp", "none", "gp", "gp", "flags" ],
652 out => [ "in_r4 !in_r5", "flags", "none" ] },
653 ins => [ "base", "index", "mem", "minuend", "subtrahend", "eflags" ],
654 outs => [ "res", "flags", "M" ],
655 am => "source,binary",
656 emit => '. sbb%M %binop',
660 modified_flags => $status_flags
664 # Spiller currently fails when rematerializing flag consumers
666 reg_req => { in => [ "flags" ], out => [ "gp", "flags" ] },
667 outs => [ "res", "flags" ],
668 emit => ". sbb%M %D0, %D0",
672 modified_flags => $status_flags
676 reg_req => { in => [ "none", "none" ], out => [ "none" ] },
677 ins => [ "minuend", "subtrahend" ],
681 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
682 ins => [ "minuend", "subtrahend", "eflags" ],
687 state => "exc_pinned",
688 reg_req => { in => [ "gp", "gp", "none", "gp", "eax", "edx" ],
689 out => [ "eax", "flags", "none", "edx", "none" ] },
690 ins => [ "base", "index", "mem", "divisor", "dividend_low", "dividend_high" ],
691 outs => [ "div_res", "flags", "M", "mod_res", "X_exc" ],
692 am => "source,unary",
693 emit => ". idiv%M %unop3",
696 modified_flags => $status_flags
701 state => "exc_pinned",
702 reg_req => { in => [ "gp", "gp", "none", "gp", "eax", "edx" ],
703 out => [ "eax", "flags", "none", "edx", "none" ] },
704 ins => [ "base", "index", "mem", "divisor", "dividend_low", "dividend_high" ],
705 outs => [ "div_res", "flags", "M", "mod_res", "X_exc" ],
706 am => "source,unary",
707 emit => ". div%M %unop3",
710 modified_flags => $status_flags
715 reg_req => { in => [ "gp", "ecx" ],
716 out => [ "in_r1 !in_r2", "flags" ] },
717 ins => [ "val", "count" ],
718 outs => [ "res", "flags" ],
719 emit => '. shl%M %SB1, %S0',
723 modified_flags => $status_flags
728 state => "exc_pinned",
729 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
730 ins => [ "base", "index", "mem", "count" ],
731 emit => '. shl%M %SB3, %AM',
735 modified_flags => $status_flags
739 cmp_attr => "return 1;",
740 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
741 ins => [ "val", "count", "dep" ],
746 reg_req => { in => [ "gp", "gp", "ecx" ],
747 out => [ "in_r1 !in_r2 !in_r3", "flags" ] },
748 ins => [ "val_high", "val_low", "count" ],
749 outs => [ "res", "flags" ],
750 emit => ". shld%M %SB2, %S1, %D0",
754 modified_flags => $status_flags
758 cmp_attr => "return 1;",
759 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
760 ins => [ "val_high", "val_low", "count" ],
765 reg_req => { in => [ "gp", "ecx" ],
766 out => [ "in_r1 !in_r2", "flags" ] },
767 ins => [ "val", "count" ],
768 outs => [ "res", "flags" ],
769 emit => '. shr%M %SB1, %S0',
773 modified_flags => $status_flags
778 state => "exc_pinned",
779 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
780 ins => [ "base", "index", "mem", "count" ],
781 emit => '. shr%M %SB3, %AM',
785 modified_flags => $status_flags
789 cmp_attr => "return 1;",
790 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
791 ins => [ "val", "count", "dep" ],
796 reg_req => { in => [ "gp", "gp", "ecx" ],
797 out => [ "in_r1 !in_r2 !in_r3", "flags" ] },
798 ins => [ "val_high", "val_low", "count" ],
799 outs => [ "res", "flags" ],
800 emit => ". shrd%M %SB2, %S1, %D0",
804 modified_flags => $status_flags
808 cmp_attr => "return 1;",
809 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
810 ins => [ "val_high", "val_low", "count" ],
815 reg_req => { in => [ "gp", "ecx" ],
816 out => [ "in_r1 !in_r2", "flags" ] },
817 ins => [ "val", "count" ],
818 outs => [ "res", "flags" ],
819 emit => '. sar%M %SB1, %S0',
823 modified_flags => $status_flags
828 state => "exc_pinned",
829 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
830 ins => [ "base", "index", "mem", "count" ],
831 emit => '. sar%M %SB3, %AM',
835 modified_flags => $status_flags
839 cmp_attr => "return 1;",
840 ins => [ "val", "count", "dep" ],
841 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
846 reg_req => { in => [ "gp", "ecx" ],
847 out => [ "in_r1 !in_r2", "flags" ] },
848 ins => [ "val", "count" ],
849 outs => [ "res", "flags" ],
850 emit => '. ror%M %SB1, %S0',
854 modified_flags => $status_flags
859 state => "exc_pinned",
860 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
861 ins => [ "base", "index", "mem", "count" ],
862 emit => '. ror%M %SB3, %AM',
866 modified_flags => $status_flags
871 reg_req => { in => [ "gp", "ecx" ],
872 out => [ "in_r1 !in_r2", "flags" ] },
873 ins => [ "val", "count" ],
874 outs => [ "res", "flags" ],
875 emit => '. rol%M %SB1, %S0',
879 modified_flags => $status_flags
884 state => "exc_pinned",
885 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
886 ins => [ "base", "index", "mem", "count" ],
887 emit => '. rol%M %SB3, %AM',
891 modified_flags => $status_flags
896 reg_req => { in => [ "gp" ],
897 out => [ "in_r1", "flags" ] },
898 emit => '. neg%M %S0',
900 outs => [ "res", "flags" ],
904 modified_flags => $status_flags
909 state => "exc_pinned",
910 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
911 ins => [ "base", "index", "mem" ],
912 emit => '. neg%M %AM',
916 modified_flags => $status_flags
921 reg_req => { in => [ "gp", "gp" ], out => [ "in_r1", "in_r2" ] },
922 outs => [ "low_res", "high_res" ],
925 modified_flags => $status_flags
931 reg_req => { in => [ "gp" ],
932 out => [ "in_r1", "flags" ] },
934 outs => [ "res", "flags" ],
935 emit => '. inc%M %S0',
939 modified_flags => $status_flags_wo_cf
944 state => "exc_pinned",
945 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
946 ins => [ "base", "index", "mem" ],
947 emit => '. inc%M %AM',
951 modified_flags => $status_flags_wo_cf
956 reg_req => { in => [ "gp" ],
957 out => [ "in_r1", "flags" ] },
959 outs => [ "res", "flags" ],
960 emit => '. dec%M %S0',
964 modified_flags => $status_flags_wo_cf
969 state => "exc_pinned",
970 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
971 ins => [ "base", "index", "mem" ],
972 emit => '. dec%M %AM',
976 modified_flags => $status_flags_wo_cf
981 reg_req => { in => [ "gp" ],
982 out => [ "in_r1", "flags" ] },
984 outs => [ "res", "flags" ],
985 emit => '. not%M %S0',
994 state => "exc_pinned",
995 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
996 ins => [ "base", "index", "mem" ],
997 emit => '. not%M %AM',
1005 reg_req => { in => [ "flags" ], out => [ "flags" ] },
1009 mode => $mode_flags,
1010 modified_flags => $status_flags
1014 reg_req => { out => [ "flags" ] },
1018 mode => $mode_flags,
1019 modified_flags => $status_flags
1024 state => "exc_pinned",
1025 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ],
1026 out => [ "flags", "none", "none" ] },
1027 ins => [ "base", "index", "mem", "left", "right" ],
1028 outs => [ "eflags", "unused", "M" ],
1029 am => "source,binary",
1030 emit => '. cmp%M %binop',
1031 attr => "int ins_permuted, int cmp_unsigned",
1032 init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1033 "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1036 mode => $mode_flags,
1037 modified_flags => $status_flags
1042 state => "exc_pinned",
1043 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] ,
1044 out => [ "flags", "none", "none" ] },
1045 ins => [ "base", "index", "mem", "left", "right" ],
1046 outs => [ "eflags", "unused", "M" ],
1047 am => "source,binary",
1048 emit => '. cmpb %binop',
1049 attr => "int ins_permuted, int cmp_unsigned",
1050 init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1051 "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1054 mode => $mode_flags,
1055 modified_flags => $status_flags
1060 state => "exc_pinned",
1061 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ] ,
1062 out => [ "flags", "none", "none" ] },
1063 ins => [ "base", "index", "mem", "left", "right" ],
1064 outs => [ "eflags", "unused", "M" ],
1065 am => "source,binary",
1066 emit => '. test%M %binop',
1067 attr => "int ins_permuted, int cmp_unsigned",
1068 init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1069 "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1072 mode => $mode_flags,
1073 modified_flags => $status_flags
1078 state => "exc_pinned",
1079 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] ,
1080 out => [ "flags", "none", "none" ] },
1081 ins => [ "base", "index", "mem", "left", "right" ],
1082 outs => [ "eflags", "unused", "M" ],
1083 am => "source,binary",
1084 emit => '. testb %binop',
1085 attr => "int ins_permuted, int cmp_unsigned",
1086 init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1087 "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1090 mode => $mode_flags,
1091 modified_flags => $status_flags
1096 reg_req => { in => [ "eflags" ], out => [ "eax ebx ecx edx" ] },
1097 ins => [ "eflags" ],
1099 attr_type => "ia32_condcode_attr_t",
1100 attr => "pn_Cmp pnc",
1101 # The way we handle Setcc with float nodes (potentially) destroys the flags
1102 # (when we emit the setX; setp; orb and the setX;setnp;andb sequences)
1103 init_attr => "set_ia32_ls_mode(res, mode_Bu);\n"
1104 . "\tif ((pnc & ia32_pn_Cmp_float) && ((pnc & 0xf) != pn_Cmp_Uo) && ((pnc & 0xf) != pn_Cmp_Leg)) {\n"
1105 . "\t\tarch_irn_add_flags(res, arch_irn_flags_modify_flags);\n"
1106 . "\t\t/* attr->latency = 3; */\n"
1115 state => "exc_pinned",
1116 reg_req => { in => [ "gp", "gp", "none", "eflags" ], out => [ "none" ] },
1117 ins => [ "base", "index", "mem","eflags" ],
1118 attr_type => "ia32_condcode_attr_t",
1119 attr => "pn_Cmp pnc",
1120 init_attr => "set_ia32_ls_mode(res, mode_Bu);\n",
1121 emit => '. set%CMP3 %AM',
1129 state => "exc_pinned",
1130 # (note: leave the false,true order intact to make it compatible with other
1132 reg_req => { in => [ "gp", "gp", "none", "gp", "gp", "eflags" ],
1133 out => [ "in_r4 in_r5", "flags", "none" ] },
1134 ins => [ "base", "index", "mem", "val_false", "val_true", "eflags" ],
1135 outs => [ "res", "flags", "M" ],
1136 am => "source,binary",
1137 attr_type => "ia32_condcode_attr_t",
1138 attr => "pn_Cmp pnc",
1146 op_flags => "L|X|Y",
1147 reg_req => { in => [ "eflags" ], out => [ "none", "none" ] },
1148 ins => [ "eflags" ],
1149 outs => [ "false", "true" ],
1150 attr_type => "ia32_condcode_attr_t",
1151 attr => "pn_Cmp pnc",
1153 units => [ "BRANCH" ],
1158 op_flags => "L|X|Y",
1159 reg_req => { in => [ "gp" ] },
1161 attr_type => "ia32_condcode_attr_t",
1164 units => [ "BRANCH" ],
1165 modified_flags => $status_flags,
1166 init_attr => "info->out_infos = NULL;", # XXX ugly hack for out requirements
1173 reg_req => { out => [ "none" ] },
1175 units => [ "BRANCH" ],
1182 reg_req => { in => [ "gp", "gp", "none", "gp" ] },
1183 ins => [ "base", "index", "mem", "target" ],
1184 am => "source,unary",
1185 emit => '. jmp *%unop3',
1187 units => [ "BRANCH" ],
1189 init_attr => "info->out_infos = NULL;", # XXX ugly hack for out requirements
1195 reg_req => { out => [ "gp" ] },
1197 attr => "ir_entity *symconst, int symconst_sign, int no_pic_adjust, long offset",
1198 attr_type => "ia32_immediate_attr_t",
1205 reg_req => { out => [ "gp" ] },
1209 modified_flags => $status_flags,
1215 reg_req => { out => [ "gp_UKNWN:I" ] },
1225 reg_req => { out => [ "vfp_UKNWN:I" ] },
1230 attr_type => "ia32_x87_attr_t",
1236 reg_req => { out => [ "xmm_UKNWN:I" ] },
1245 op_flags => "c|NB|NI",
1246 reg_req => { out => [ "gp_NOREG:I" ] },
1255 op_flags => "c|NB|NI",
1256 reg_req => { out => [ "vfp_NOREG:I" ] },
1261 attr_type => "ia32_x87_attr_t",
1266 op_flags => "c|NB|NI",
1267 reg_req => { out => [ "xmm_NOREG:I" ] },
1277 reg_req => { out => [ "fpcw:I" ] },
1281 modified_flags => $fpcw_flags
1287 reg_req => { in => [ "gp", "gp", "none" ], out => [ "fpcw:I" ] },
1288 ins => [ "base", "index", "mem" ],
1290 emit => ". fldcw %AM",
1293 modified_flags => $fpcw_flags
1299 reg_req => { in => [ "gp", "gp", "none", "fp_cw" ], out => [ "none" ] },
1300 ins => [ "base", "index", "mem", "fpcw" ],
1302 emit => ". fnstcw %AM",
1310 reg_req => { in => [ "fp_cw" ], out => [ "none" ] },
1318 # we should not rematrialize this node. It has very strict constraints.
1319 reg_req => { in => [ "eax", "edx" ], out => [ "edx" ] },
1320 ins => [ "val", "clobbered" ],
1329 # Note that we add additional latency values depending on address mode, so a
1330 # lateny of 0 for load is correct
1334 state => "exc_pinned",
1335 reg_req => { in => [ "gp", "gp", "none" ],
1336 out => [ "gp", "none", "none", "none" ] },
1337 ins => [ "base", "index", "mem" ],
1338 outs => [ "res", "unused", "M", "X_exc" ],
1340 emit => ". mov%EX%.l %AM, %D0",
1346 state => "exc_pinned",
1347 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none", "none" ] },
1348 ins => [ "base", "index", "mem", "val" ],
1349 outs => [ "M", "X_exc" ],
1350 emit => '. mov%M %SI3, %AM',
1358 state => "exc_pinned",
1359 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => ["none", "none" ] },
1360 ins => [ "base", "index", "mem", "val" ],
1361 outs => [ "M", "X_exc" ],
1362 emit => '. mov%M %SB3, %AM',
1370 reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] },
1371 ins => [ "base", "index" ],
1372 emit => '. leal %AM, %D0',
1376 # lea doesn't modify the flags, but setting this seems advantageous since it
1377 # increases chances that the Lea is transformed back to an Add
1378 modified_flags => 1,
1382 state => "exc_pinned",
1383 reg_req => { in => [ "gp", "gp", "none", "gp", "esp" ], out => [ "esp:I|S", "none" ] },
1384 ins => [ "base", "index", "mem", "val", "stack" ],
1385 emit => '. push%M %unop3',
1386 outs => [ "stack", "M" ],
1387 am => "source,unary",
1393 state => "exc_pinned",
1394 reg_req => { in => [ "none", "esp" ], out => [ "gp", "none", "none", "esp:I|S" ] },
1395 ins => [ "mem", "stack" ],
1396 outs => [ "res", "M", "unused", "stack" ],
1397 emit => '. pop%M %D0',
1398 latency => 3, # Pop is more expensive than Push on Athlon
1403 state => "exc_pinned",
1404 reg_req => { in => [ "none", "esp" ], out => [ "ebp:I", "none", "none", "esp:I|S" ] },
1405 ins => [ "mem", "stack" ],
1406 outs => [ "res", "M", "unused", "stack" ],
1407 emit => '. pop%M %D0',
1408 latency => 3, # Pop is more expensive than Push on Athlon
1413 state => "exc_pinned",
1414 reg_req => { in => [ "gp", "gp", "none", "esp" ], out => [ "none", "none", "none", "esp:I|S" ] },
1415 ins => [ "base", "index", "mem", "stack" ],
1416 outs => [ "unused0", "M", "unused1", "stack" ],
1417 emit => '. pop%M %AM',
1418 latency => 3, # Pop is more expensive than Push on Athlon
1423 reg_req => { in => [ "esp" ], out => [ "ebp", "esp:I|S", "none" ] },
1425 outs => [ "frame", "stack", "M" ],
1431 reg_req => { in => [ "ebp" ], out => [ "ebp:I", "esp:I|S" ] },
1433 outs => [ "frame", "stack" ],
1440 reg_req => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "esp:I|S", "none" ] },
1441 ins => [ "base", "index", "mem", "stack", "size" ],
1442 am => "source,binary",
1443 emit => '. addl %binop',
1445 outs => [ "stack", "M" ],
1447 modified_flags => $status_flags
1452 reg_req => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "esp:I|S", "gp", "none" ] },
1453 ins => [ "base", "index", "mem", "stack", "size" ],
1454 am => "source,binary",
1455 emit => ". subl %binop\n".
1456 ". movl %%esp, %D1",
1458 outs => [ "stack", "addr", "M" ],
1460 modified_flags => $status_flags
1473 reg_req => { out => [ "gp" ] },
1479 # BT supports source address mode, but this is unused yet
1483 state => "exc_pinned",
1484 reg_req => { in => [ "gp", "gp" ], out => [ "flags" ] },
1485 ins => [ "left", "right" ],
1486 emit => '. bt%M %S1, %S0',
1489 mode => $mode_flags,
1490 modified_flags => $status_flags # only CF is set, but the other flags are undefined
1495 state => "exc_pinned",
1496 reg_req => { in => [ "gp", "gp", "none", "gp" ],
1497 out => [ "gp", "flags", "none" ] },
1498 ins => [ "base", "index", "mem", "operand" ],
1499 outs => [ "res", "flags", "M" ],
1500 am => "source,binary",
1501 emit => '. bsf%M %unop3, %D0',
1505 modified_flags => $status_flags
1510 state => "exc_pinned",
1511 reg_req => { in => [ "gp", "gp", "none", "gp" ],
1512 out => [ "gp", "flags", "none" ] },
1513 ins => [ "base", "index", "mem", "operand" ],
1514 outs => [ "res", "flags", "M" ],
1515 am => "source,binary",
1516 emit => '. bsr%M %unop3, %D0',
1520 modified_flags => $status_flags
1524 # SSE4.2 or SSE4a popcnt instruction
1528 state => "exc_pinned",
1529 reg_req => { in => [ "gp", "gp", "none", "gp" ],
1530 out => [ "gp", "flags", "none" ] },
1531 ins => [ "base", "index", "mem", "operand" ],
1532 outs => [ "res", "flags", "M" ],
1533 am => "source,binary",
1534 emit => '. popcnt%M %unop3, %D0',
1538 modified_flags => $status_flags
1542 state => "exc_pinned",
1544 in => [ "gp", "gp", "none", "gp", "esp", "fpcw", "eax", "ecx", "edx" ],
1545 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" ]
1547 ins => [ "base", "index", "mem", "addr", "stack", "fpcw", "eax", "ecx", "edx" ],
1548 outs => [ "stack", "fpcw", "M", "eax", "ecx", "edx", "vf0", "vf1", "vf2", "vf3", "vf4", "vf5", "vf6", "vf7", "xmm0", "xmm1", "xmm2", "xmm3", "xmm4", "xmm5", "xmm6", "xmm7" ],
1549 attr_type => "ia32_call_attr_t",
1550 attr => "unsigned pop, ir_type *call_tp",
1551 am => "source,unary",
1552 units => [ "BRANCH" ],
1553 latency => 4, # random number
1554 modified_flags => $status_flags
1558 # a Helper node for frame-climbing, needed for __builtin_(frame|return)_address
1560 # PS: try gcc __builtin_frame_address(100000) :-)
1563 reg_req => { in => [ "gp", "gp", "gp"], out => [ "in_r3" ] },
1564 ins => [ "frame", "cnt", "tmp" ],
1566 latency => 4, # random number
1567 attr_type => "ia32_climbframe_attr_t",
1568 attr => "unsigned count",
1578 reg_req => { in => [ "gp" ],
1579 out => [ "in_r1" ] },
1580 emit => '. bswap%M %S0',
1588 # bswap16, use xchg here
1592 reg_req => { in => [ "eax ebx ecx edx" ],
1593 out => [ "in_r1" ] },
1594 emit => '. xchg %SB0, %SH0',
1606 reg_req => { in => [ "none" ], out => [ "none" ] },
1615 # Undefined Instruction on ALL x86 CPU's
1619 reg_req => { in => [ "none" ], out => [ "none" ] },
1622 emit => ". .value 0x0b0f",
1633 reg_req => { in => [ "edx", "eax", "none" ], out => [ "none" ] },
1634 ins => [ "port", "value", "mem" ],
1635 emit => '. out%M %SS0, %SI1',
1639 modified_flags => $status_flags
1648 reg_req => { in => [ "edx", "none" ], out => [ "eax", "none" ] },
1649 ins => [ "port", "mem" ],
1650 outs => [ "res", "M" ],
1651 emit => '. in%M %DS0, %SS0',
1655 modified_flags => $status_flags
1659 # Intel style prefetching
1663 state => "exc_pinned",
1664 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1665 ins => [ "base", "index", "mem" ],
1668 emit => ". prefetcht0 %AM",
1674 state => "exc_pinned",
1675 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1676 ins => [ "base", "index", "mem" ],
1679 emit => ". prefetcht1 %AM",
1685 state => "exc_pinned",
1686 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1687 ins => [ "base", "index", "mem" ],
1690 emit => ". prefetcht2 %AM",
1696 state => "exc_pinned",
1697 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1698 ins => [ "base", "index", "mem" ],
1701 emit => ". prefetchnta %AM",
1706 # 3DNow! prefetch instructions
1710 state => "exc_pinned",
1711 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1712 ins => [ "base", "index", "mem" ],
1715 emit => ". prefetch %AM",
1721 state => "exc_pinned",
1722 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1723 ins => [ "base", "index", "mem" ],
1726 emit => ". prefetchw %AM",
1733 reg_req => { out => [ "xmm" ] },
1734 emit => '. xorp%XSD %D0, %D0',
1742 reg_req => { out => [ "xmm" ] },
1743 emit => '. pxor %D0, %D0',
1749 # produces all 1 bits
1752 reg_req => { out => [ "xmm" ] },
1753 emit => '. pcmpeqb %D0, %D0',
1759 # integer shift left, dword
1762 reg_req => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] },
1763 emit => '. pslld %SI1, %D0',
1769 # integer shift left, qword
1772 reg_req => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] },
1773 emit => '. psllq %SI1, %D0',
1779 # integer shift right, dword
1782 reg_req => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] },
1783 emit => '. psrld %SI1, %D0',
1789 # mov from integer to SSE register
1792 reg_req => { in => [ "gp" ], out => [ "xmm" ] },
1793 emit => '. movd %S0, %D0',
1801 state => "exc_pinned",
1802 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1803 out => [ "in_r4 in_r5", "flags", "none" ] },
1804 ins => [ "base", "index", "mem", "left", "right" ],
1805 outs => [ "res", "flags", "M" ],
1806 am => "source,binary",
1807 emit => '. add%XXM %binop',
1815 state => "exc_pinned",
1816 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1817 out => [ "in_r4 in_r5", "flags", "none" ] },
1818 ins => [ "base", "index", "mem", "left", "right" ],
1819 outs => [ "res", "flags", "M" ],
1820 am => "source,binary",
1821 emit => '. mul%XXM %binop',
1829 state => "exc_pinned",
1830 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1831 out => [ "in_r4 in_r5", "flags", "none" ] },
1832 ins => [ "base", "index", "mem", "left", "right" ],
1833 outs => [ "res", "flags", "M" ],
1834 am => "source,binary",
1835 emit => '. max%XXM %binop',
1843 state => "exc_pinned",
1844 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1845 out => [ "in_r4 in_r5", "flags", "none" ] },
1846 ins => [ "base", "index", "mem", "left", "right" ],
1847 outs => [ "res", "flags", "M" ],
1848 am => "source,binary",
1849 emit => '. min%XXM %binop',
1857 state => "exc_pinned",
1858 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1859 out => [ "in_r4 in_r5", "flags", "none" ] },
1860 ins => [ "base", "index", "mem", "left", "right" ],
1861 outs => [ "res", "flags", "M" ],
1862 am => "source,binary",
1863 emit => '. andp%XSD %binop',
1871 state => "exc_pinned",
1872 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1873 out => [ "in_r4 in_r5", "flags", "none" ] },
1874 ins => [ "base", "index", "mem", "left", "right" ],
1875 outs => [ "res", "flags", "M" ],
1876 am => "source,binary",
1877 emit => '. orp%XSD %binop',
1885 state => "exc_pinned",
1886 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1887 out => [ "in_r4 in_r5", "flags", "none" ] },
1888 ins => [ "base", "index", "mem", "left", "right" ],
1889 outs => [ "res", "flags", "M" ],
1890 am => "source,binary",
1891 emit => '. xorp%XSD %binop',
1899 state => "exc_pinned",
1900 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1901 out => [ "in_r4 !in_r5", "flags", "none" ] },
1902 ins => [ "base", "index", "mem", "left", "right" ],
1903 outs => [ "res", "flags", "M" ],
1904 am => "source,binary",
1905 emit => '. andnp%XSD %binop',
1913 state => "exc_pinned",
1914 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1915 out => [ "in_r4", "flags", "none" ] },
1916 ins => [ "base", "index", "mem", "minuend", "subtrahend" ],
1917 outs => [ "res", "flags", "M" ],
1918 am => "source,binary",
1919 emit => '. sub%XXM %binop',
1927 state => "exc_pinned",
1928 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1929 out => [ "in_r4 !in_r5", "flags", "none" ] },
1930 ins => [ "base", "index", "mem", "dividend", "divisor" ],
1931 outs => [ "res", "flags", "M" ],
1932 am => "source,binary",
1933 emit => '. div%XXM %binop',
1940 state => "exc_pinned",
1941 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1942 out => [ "eflags" ] },
1943 ins => [ "base", "index", "mem", "left", "right" ],
1944 outs => [ "flags" ],
1945 am => "source,binary",
1946 attr => "int ins_permuted",
1947 init_attr => "attr->data.ins_permuted = ins_permuted;",
1948 emit => ' .ucomi%XXM %binop',
1951 mode => $mode_flags,
1952 modified_flags => 1,
1957 state => "exc_pinned",
1958 reg_req => { in => [ "gp", "gp", "none" ],
1959 out => [ "xmm", "none", "none", "none" ] },
1960 ins => [ "base", "index", "mem" ],
1961 outs => [ "res", "unused", "M", "X_exc" ],
1962 emit => '. mov%XXM %AM, %D0',
1963 attr => "ir_mode *load_mode",
1964 init_attr => "attr->ls_mode = load_mode;",
1971 state => "exc_pinned",
1972 reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "none", "none" ] },
1973 ins => [ "base", "index", "mem", "val" ],
1974 outs => [ "M", "X_exc" ],
1975 emit => '. mov%XXM %S3, %AM',
1983 state => "exc_pinned",
1984 reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "none" ] },
1985 ins => [ "base", "index", "mem", "val" ],
1987 emit => '. mov%XXM %S3, %AM',
1995 state => "exc_pinned",
1996 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] },
1997 ins => [ "base", "index", "mem", "val" ],
1998 am => "source,unary",
1999 emit => '. cvtsi2ss %unop3, %D0',
2007 state => "exc_pinned",
2008 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] },
2009 ins => [ "base", "index", "mem", "val" ],
2010 am => "source,unary",
2011 emit => '. cvtsi2sd %unop3, %D0',
2020 cmp_attr => "return 1;",
2021 ins => [ "val_high", "val_low" ],
2022 reg_req => { in => [ "none", "none" ], out => [ "none" ] }
2027 cmp_attr => "return 1;",
2029 outs => [ "res_high", "res_low" ],
2030 reg_req => { in => [ "none" ], out => [ "none", "none" ] }
2036 reg_req => { in => [ "edi", "esi", "ecx", "none" ], out => [ "edi", "esi", "ecx", "none" ] },
2037 outs => [ "DST", "SRC", "CNT", "M" ],
2038 attr_type => "ia32_copyb_attr_t",
2039 attr => "unsigned size",
2042 # we don't care about this flag, so no need to mark this node
2043 # modified_flags => [ "DF" ]
2049 reg_req => { in => [ "edi", "esi", "none" ], out => [ "edi", "esi", "none" ] },
2050 outs => [ "DST", "SRC", "M" ],
2051 attr_type => "ia32_copyb_attr_t",
2052 attr => "unsigned size",
2055 # we don't care about this flag, so no need to mark this node
2056 # modified_flags => [ "DF" ]
2060 state => "exc_pinned",
2061 reg_req => { in => [ "eax" ], out => [ "eax" ] },
2071 state => "exc_pinned",
2072 reg_req => { in => [ "gp", "gp", "none", "gp" ],
2073 out => [ "gp", "none", "none" ] },
2074 ins => [ "base", "index", "mem", "val" ],
2075 outs => [ "res", "flags", "M" ],
2076 am => "source,unary",
2079 attr => "ir_mode *smaller_mode",
2080 init_attr => "attr->ls_mode = smaller_mode;",
2085 state => "exc_pinned",
2086 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ],
2087 out => [ "gp", "none", "none" ] },
2088 ins => [ "base", "index", "mem", "val" ],
2089 outs => [ "res", "flags", "M" ],
2090 am => "source,unary",
2093 attr => "ir_mode *smaller_mode",
2094 init_attr => "attr->ls_mode = smaller_mode;",
2099 state => "exc_pinned",
2100 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm", "none" ] },
2101 ins => [ "base", "index", "mem", "val" ],
2102 am => "source,unary",
2109 state => "exc_pinned",
2110 reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "gp", "none" ] },
2111 ins => [ "base", "index", "mem", "val" ],
2112 am => "source,unary",
2119 state => "exc_pinned",
2120 reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "xmm", "none" ] },
2121 ins => [ "base", "index", "mem", "val" ],
2122 am => "source,unary",
2128 # rematerialisation disabled for all float nodes for now, because the fpcw
2129 # handler runs before spilling and we might end up with wrong fpcw then
2133 state => "exc_pinned",
2134 reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ],
2135 out => [ "vfp", "none", "none" ] },
2136 ins => [ "base", "index", "mem", "left", "right", "fpcw" ],
2137 outs => [ "res", "dummy", "M" ],
2138 am => "source,binary",
2142 attr_type => "ia32_x87_attr_t",
2147 state => "exc_pinned",
2148 reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ],
2149 out => [ "vfp", "none", "none" ] },
2150 ins => [ "base", "index", "mem", "left", "right", "fpcw" ],
2151 outs => [ "res", "dummy", "M" ],
2152 am => "source,binary",
2156 attr_type => "ia32_x87_attr_t",
2161 state => "exc_pinned",
2162 reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ],
2163 out => [ "vfp", "none", "none" ] },
2164 ins => [ "base", "index", "mem", "minuend", "subtrahend", "fpcw" ],
2165 outs => [ "res", "dummy", "M" ],
2166 am => "source,binary",
2170 attr_type => "ia32_x87_attr_t",
2174 state => "exc_pinned",
2175 reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ],
2176 out => [ "vfp", "none", "none" ] },
2177 ins => [ "base", "index", "mem", "dividend", "divisor", "fpcw" ],
2178 outs => [ "res", "dummy", "M" ],
2179 am => "source,binary",
2182 attr_type => "ia32_x87_attr_t",
2186 reg_req => { in => [ "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
2187 ins => [ "left", "right", "fpcw" ],
2191 attr_type => "ia32_x87_attr_t",
2196 reg_req => { in => [ "vfp"], out => [ "vfp" ] },
2201 attr_type => "ia32_x87_attr_t",
2206 reg_req => { in => [ "vfp"], out => [ "vfp" ] },
2211 attr_type => "ia32_x87_attr_t",
2217 state => "exc_pinned",
2218 reg_req => { in => [ "gp", "gp", "none" ],
2219 out => [ "vfp", "none", "none", "none" ] },
2220 ins => [ "base", "index", "mem" ],
2221 outs => [ "res", "unused", "M", "X_exc" ],
2222 attr => "ir_mode *load_mode",
2223 init_attr => "attr->attr.ls_mode = load_mode;",
2226 attr_type => "ia32_x87_attr_t",
2232 state => "exc_pinned",
2233 reg_req => { in => [ "gp", "gp", "none", "vfp" ],
2234 out => [ "none", "none" ] },
2235 ins => [ "base", "index", "mem", "val" ],
2236 outs => [ "M", "X_exc" ],
2237 attr => "ir_mode *store_mode",
2238 init_attr => "attr->attr.ls_mode = store_mode;",
2242 attr_type => "ia32_x87_attr_t",
2246 state => "exc_pinned",
2247 reg_req => { in => [ "gp", "gp", "none" ],
2248 out => [ "vfp", "none", "none" ] },
2249 outs => [ "res", "unused", "M" ],
2250 ins => [ "base", "index", "mem" ],
2253 attr_type => "ia32_x87_attr_t",
2257 state => "exc_pinned",
2258 reg_req => { in => [ "gp", "gp", "none", "vfp", "fpcw" ], out => [ "none" ] },
2259 ins => [ "base", "index", "mem", "val", "fpcw" ],
2264 attr_type => "ia32_x87_attr_t",
2267 # SSE3 fisttp instruction
2269 state => "exc_pinned",
2270 reg_req => { in => [ "gp", "gp", "none", "vfp" ], out => [ "in_r4", "none" ]},
2271 ins => [ "base", "index", "mem", "val" ],
2272 outs => [ "res", "M" ],
2275 attr_type => "ia32_x87_attr_t",
2280 reg_req => { out => [ "vfp" ] },
2285 attr_type => "ia32_x87_attr_t",
2290 reg_req => { out => [ "vfp" ] },
2295 attr_type => "ia32_x87_attr_t",
2300 reg_req => { out => [ "vfp" ] },
2305 attr_type => "ia32_x87_attr_t",
2310 reg_req => { out => [ "vfp" ] },
2315 attr_type => "ia32_x87_attr_t",
2320 reg_req => { out => [ "vfp" ] },
2325 attr_type => "ia32_x87_attr_t",
2330 reg_req => { out => [ "vfp" ] },
2335 attr_type => "ia32_x87_attr_t",
2340 reg_req => { out => [ "vfp" ] },
2345 attr_type => "ia32_x87_attr_t",
2349 # we can't allow to rematerialize this node so we don't
2350 # accidently produce Phi(Fucom, Fucom(ins_permuted))
2352 reg_req => { in => [ "vfp", "vfp" ], out => [ "eax" ] },
2353 ins => [ "left", "right" ],
2354 outs => [ "flags" ],
2355 attr => "int ins_permuted",
2356 init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2359 attr_type => "ia32_x87_attr_t",
2365 reg_req => { in => [ "vfp", "vfp" ], out => [ "eflags" ] },
2366 ins => [ "left", "right" ],
2367 outs => [ "flags" ],
2368 attr => "int ins_permuted",
2369 init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2372 attr_type => "ia32_x87_attr_t",
2378 reg_req => { in => [ "vfp" ], out => [ "eax" ] },
2380 outs => [ "flags" ],
2381 attr => "int ins_permuted",
2382 init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2385 attr_type => "ia32_x87_attr_t",
2391 reg_req => { in => [ "eax" ], out => [ "eflags" ] },
2393 outs => [ "flags" ],
2397 mode => $mode_flags,
2401 state => "exc_pinned",
2402 emit => '. fadd%XM %x87_binop',
2404 attr_type => "ia32_x87_attr_t",
2409 state => "exc_pinned",
2410 emit => '. faddp%XM %x87_binop',
2412 attr_type => "ia32_x87_attr_t",
2417 state => "exc_pinned",
2418 emit => '. fmul%XM %x87_binop',
2420 attr_type => "ia32_x87_attr_t",
2425 state => "exc_pinned",
2426 emit => '. fmulp%XM %x87_binop',,
2428 attr_type => "ia32_x87_attr_t",
2433 state => "exc_pinned",
2434 emit => '. fsub%XM %x87_binop',
2436 attr_type => "ia32_x87_attr_t",
2440 # Note: gas is strangely buggy: fdivrp and fdivp as well as fsubrp and fsubp
2441 # are swapped, we work this around in the emitter...
2444 state => "exc_pinned",
2445 # see note about gas bugs
2446 emit => '. fsubrp%XM %x87_binop',
2448 attr_type => "ia32_x87_attr_t",
2453 state => "exc_pinned",
2455 emit => '. fsubr%XM %x87_binop',
2457 attr_type => "ia32_x87_attr_t",
2462 state => "exc_pinned",
2464 # see note about gas bugs before fsubp
2465 emit => '. fsubp%XM %x87_binop',
2467 attr_type => "ia32_x87_attr_t",
2474 attr_type => "ia32_x87_attr_t",
2478 # this node is just here, to keep the simulator running
2479 # we can omit this when a fprem simulation function exists
2481 emit => '. fprem1\n'.
2484 attr_type => "ia32_x87_attr_t",
2489 state => "exc_pinned",
2490 emit => '. fdiv%XM %x87_binop',
2492 attr_type => "ia32_x87_attr_t",
2497 state => "exc_pinned",
2498 # see note about gas bugs before fsubp
2499 emit => '. fdivrp%XM %x87_binop',
2501 attr_type => "ia32_x87_attr_t",
2506 state => "exc_pinned",
2507 emit => '. fdivr%XM %x87_binop',
2509 attr_type => "ia32_x87_attr_t",
2514 state => "exc_pinned",
2515 # see note about gas bugs before fsubp
2516 emit => '. fdivp%XM %x87_binop',
2518 attr_type => "ia32_x87_attr_t",
2525 attr_type => "ia32_x87_attr_t",
2533 attr_type => "ia32_x87_attr_t",
2538 op_flags => "R|L|F",
2539 state => "exc_pinned",
2540 emit => '. fld%XM %AM',
2541 attr_type => "ia32_x87_attr_t",
2547 op_flags => "R|L|F",
2548 state => "exc_pinned",
2549 emit => '. fst%XM %AM',
2551 attr_type => "ia32_x87_attr_t",
2557 op_flags => "R|L|F",
2558 state => "exc_pinned",
2559 emit => '. fstp%XM %AM',
2561 attr_type => "ia32_x87_attr_t",
2567 state => "exc_pinned",
2568 emit => '. fild%XM %AM',
2569 attr_type => "ia32_x87_attr_t",
2575 state => "exc_pinned",
2576 emit => '. fist%XM %AM',
2578 attr_type => "ia32_x87_attr_t",
2584 state => "exc_pinned",
2585 emit => '. fistp%XM %AM',
2587 attr_type => "ia32_x87_attr_t",
2592 # SSE3 fisttp instruction
2594 state => "exc_pinned",
2595 emit => '. fisttp%XM %AM',
2597 attr_type => "ia32_x87_attr_t",
2603 op_flags => "R|c|K",
2605 reg_req => { out => [ "vfp" ] },
2607 attr_type => "ia32_x87_attr_t",
2612 op_flags => "R|c|K",
2614 reg_req => { out => [ "vfp" ] },
2616 attr_type => "ia32_x87_attr_t",
2621 op_flags => "R|c|K",
2623 reg_req => { out => [ "vfp" ] },
2625 attr_type => "ia32_x87_attr_t",
2630 op_flags => "R|c|K",
2632 reg_req => { out => [ "vfp" ] },
2634 attr_type => "ia32_x87_attr_t",
2639 op_flags => "R|c|K",
2641 reg_req => { out => [ "vfp" ] },
2643 attr_type => "ia32_x87_attr_t",
2648 op_flags => "R|c|K",
2650 reg_req => { out => [ "vfp" ] },
2651 emit => '. fldll2t',
2652 attr_type => "ia32_x87_attr_t",
2657 op_flags => "R|c|K",
2659 reg_req => { out => [ "vfp" ] },
2661 attr_type => "ia32_x87_attr_t",
2666 # Note that it is NEVER allowed to do CSE on these nodes
2667 # Moreover, note the virtual register requierements!
2671 reg_req => { out => [ "none" ] },
2672 cmp_attr => "return 1;",
2673 emit => '. fxch %X0',
2674 attr_type => "ia32_x87_attr_t",
2681 reg_req => { out => [ "none" ] },
2682 cmp_attr => "return 1;",
2683 emit => '. fld %X0',
2684 attr_type => "ia32_x87_attr_t",
2690 reg_req => { in => [ "vfp"], out => [ "vfp" ] },
2691 cmp_attr => "return 1;",
2692 emit => '. fld %X0',
2693 attr_type => "ia32_x87_attr_t",
2699 reg_req => { out => [ "none" ] },
2700 cmp_attr => "return 1;",
2701 emit => '. fstp %X0',
2702 attr_type => "ia32_x87_attr_t",
2709 reg_req => { out => [ "none" ] },
2710 cmp_attr => "return 1;",
2711 emit => '. ffreep %X0',
2712 attr_type => "ia32_x87_attr_t",
2719 reg_req => { out => [ "none" ] },
2720 cmp_attr => "return 1;",
2722 attr_type => "ia32_x87_attr_t",
2729 reg_req => { out => [ "none" ] },
2730 cmp_attr => "return 1;",
2732 attr_type => "ia32_x87_attr_t",
2739 emit => ". fucom %X1\n".
2741 attr_type => "ia32_x87_attr_t",
2747 emit => ". fucomp %X1\n".
2749 attr_type => "ia32_x87_attr_t",
2755 emit => ". fucompp\n".
2757 attr_type => "ia32_x87_attr_t",
2763 emit => '. fucomi %X1',
2764 attr_type => "ia32_x87_attr_t",
2770 emit => '. fucompi %X1',
2771 attr_type => "ia32_x87_attr_t",
2779 attr_type => "ia32_x87_attr_t",
2783 # Spilling and reloading of SSE registers, hardcoded, not generated #
2787 state => "exc_pinned",
2788 reg_req => { in => [ "gp", "gp", "none" ], out => [ "xmm", "none" ] },
2789 emit => '. movdqu %D0, %AM',
2790 outs => [ "res", "M" ],
2797 state => "exc_pinned",
2798 reg_req => { in => [ "gp", "gp", "none", "xmm" ] },
2799 ins => [ "base", "index", "mem", "val" ],
2800 emit => '. movdqu %binop',
2808 # Transform some attributes
2809 foreach my $op (keys(%nodes)) {
2810 my $node = $nodes{$op};
2811 my $op_attr_init = $node->{op_attr_init};
2813 if(defined($op_attr_init)) {
2814 $op_attr_init .= "\n\t";
2819 if(!defined($node->{latency})) {
2821 $node->{latency} = 0;
2823 die("Latency missing for op $op");
2826 $op_attr_init .= "attr->latency = ".$node->{latency} . ";";
2828 $node->{op_attr_init} = $op_attr_init;