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",
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
665 reg_req => { in => [ "flags" ], out => [ "gp", "flags" ] },
666 outs => [ "res", "flags" ],
667 emit => ". sbb%M %D0, %D0",
671 modified_flags => $status_flags
675 reg_req => { in => [ "none", "none" ], out => [ "none" ] },
676 ins => [ "minuend", "subtrahend" ],
680 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
681 ins => [ "minuend", "subtrahend", "eflags" ],
686 state => "exc_pinned",
687 reg_req => { in => [ "gp", "gp", "none", "gp", "eax", "edx" ],
688 out => [ "eax", "flags", "none", "edx", "none" ] },
689 ins => [ "base", "index", "mem", "divisor", "dividend_low", "dividend_high" ],
690 outs => [ "div_res", "flags", "M", "mod_res", "X_exc" ],
691 am => "source,unary",
692 emit => ". idiv%M %unop3",
695 modified_flags => $status_flags
700 state => "exc_pinned",
701 reg_req => { in => [ "gp", "gp", "none", "gp", "eax", "edx" ],
702 out => [ "eax", "flags", "none", "edx", "none" ] },
703 ins => [ "base", "index", "mem", "divisor", "dividend_low", "dividend_high" ],
704 outs => [ "div_res", "flags", "M", "mod_res", "X_exc" ],
705 am => "source,unary",
706 emit => ". div%M %unop3",
709 modified_flags => $status_flags
714 reg_req => { in => [ "gp", "ecx" ],
715 out => [ "in_r1 !in_r2", "flags" ] },
716 ins => [ "val", "count" ],
717 outs => [ "res", "flags" ],
718 emit => '. shl%M %SB1, %S0',
722 modified_flags => $status_flags
727 state => "exc_pinned",
728 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
729 ins => [ "base", "index", "mem", "count" ],
730 emit => '. shl%M %SB3, %AM',
734 modified_flags => $status_flags
738 cmp_attr => "return 1;",
739 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
740 ins => [ "val", "count", "dep" ],
745 reg_req => { in => [ "gp", "gp", "ecx" ],
746 out => [ "in_r1 !in_r2 !in_r3", "flags" ] },
747 ins => [ "val_high", "val_low", "count" ],
748 outs => [ "res", "flags" ],
749 emit => ". shld%M %SB2, %S1, %D0",
753 modified_flags => $status_flags
757 cmp_attr => "return 1;",
758 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
759 ins => [ "val_high", "val_low", "count" ],
764 reg_req => { in => [ "gp", "ecx" ],
765 out => [ "in_r1 !in_r2", "flags" ] },
766 ins => [ "val", "count" ],
767 outs => [ "res", "flags" ],
768 emit => '. shr%M %SB1, %S0',
772 modified_flags => $status_flags
777 state => "exc_pinned",
778 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
779 ins => [ "base", "index", "mem", "count" ],
780 emit => '. shr%M %SB3, %AM',
784 modified_flags => $status_flags
788 cmp_attr => "return 1;",
789 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
790 ins => [ "val", "count", "dep" ],
795 reg_req => { in => [ "gp", "gp", "ecx" ],
796 out => [ "in_r1 !in_r2 !in_r3", "flags" ] },
797 ins => [ "val_high", "val_low", "count" ],
798 outs => [ "res", "flags" ],
799 emit => ". shrd%M %SB2, %S1, %D0",
803 modified_flags => $status_flags
807 cmp_attr => "return 1;",
808 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
809 ins => [ "val_high", "val_low", "count" ],
814 reg_req => { in => [ "gp", "ecx" ],
815 out => [ "in_r1 !in_r2", "flags" ] },
816 ins => [ "val", "count" ],
817 outs => [ "res", "flags" ],
818 emit => '. sar%M %SB1, %S0',
822 modified_flags => $status_flags
827 state => "exc_pinned",
828 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
829 ins => [ "base", "index", "mem", "count" ],
830 emit => '. sar%M %SB3, %AM',
834 modified_flags => $status_flags
838 cmp_attr => "return 1;",
839 ins => [ "val", "count", "dep" ],
840 reg_req => { in => [ "none", "none", "none" ], out => [ "none" ] },
845 reg_req => { in => [ "gp", "ecx" ],
846 out => [ "in_r1 !in_r2", "flags" ] },
847 ins => [ "val", "count" ],
848 outs => [ "res", "flags" ],
849 emit => '. ror%M %SB1, %S0',
853 modified_flags => $status_flags
858 state => "exc_pinned",
859 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
860 ins => [ "base", "index", "mem", "count" ],
861 emit => '. ror%M %SB3, %AM',
865 modified_flags => $status_flags
870 reg_req => { in => [ "gp", "ecx" ],
871 out => [ "in_r1 !in_r2", "flags" ] },
872 ins => [ "val", "count" ],
873 outs => [ "res", "flags" ],
874 emit => '. rol%M %SB1, %S0',
878 modified_flags => $status_flags
883 state => "exc_pinned",
884 reg_req => { in => [ "gp", "gp", "none", "ecx" ], out => [ "none" ] },
885 ins => [ "base", "index", "mem", "count" ],
886 emit => '. rol%M %SB3, %AM',
890 modified_flags => $status_flags
895 reg_req => { in => [ "gp" ],
896 out => [ "in_r1", "flags" ] },
897 emit => '. neg%M %S0',
899 outs => [ "res", "flags" ],
903 modified_flags => $status_flags
908 state => "exc_pinned",
909 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
910 ins => [ "base", "index", "mem" ],
911 emit => '. neg%M %AM',
915 modified_flags => $status_flags
920 reg_req => { in => [ "gp", "gp" ], out => [ "in_r1", "in_r2" ] },
921 outs => [ "low_res", "high_res" ],
924 modified_flags => $status_flags
930 reg_req => { in => [ "gp" ],
931 out => [ "in_r1", "flags" ] },
933 outs => [ "res", "flags" ],
934 emit => '. inc%M %S0',
938 modified_flags => $status_flags_wo_cf
943 state => "exc_pinned",
944 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
945 ins => [ "base", "index", "mem" ],
946 emit => '. inc%M %AM',
950 modified_flags => $status_flags_wo_cf
955 reg_req => { in => [ "gp" ],
956 out => [ "in_r1", "flags" ] },
958 outs => [ "res", "flags" ],
959 emit => '. dec%M %S0',
963 modified_flags => $status_flags_wo_cf
968 state => "exc_pinned",
969 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
970 ins => [ "base", "index", "mem" ],
971 emit => '. dec%M %AM',
975 modified_flags => $status_flags_wo_cf
980 reg_req => { in => [ "gp" ],
981 out => [ "in_r1", "flags" ] },
983 outs => [ "res", "flags" ],
984 emit => '. not%M %S0',
993 state => "exc_pinned",
994 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
995 ins => [ "base", "index", "mem" ],
996 emit => '. not%M %AM',
1004 reg_req => { in => [ "flags" ], out => [ "flags" ] },
1008 mode => $mode_flags,
1009 modified_flags => $status_flags
1013 reg_req => { out => [ "flags" ] },
1017 mode => $mode_flags,
1018 modified_flags => $status_flags
1023 state => "exc_pinned",
1024 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ],
1025 out => [ "flags", "none", "none" ] },
1026 ins => [ "base", "index", "mem", "left", "right" ],
1027 outs => [ "eflags", "unused", "M" ],
1028 am => "source,binary",
1029 emit => '. cmp%M %binop',
1030 attr => "int ins_permuted, int cmp_unsigned",
1031 init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1032 "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1035 mode => $mode_flags,
1036 modified_flags => $status_flags
1041 state => "exc_pinned",
1042 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] ,
1043 out => [ "flags", "none", "none" ] },
1044 ins => [ "base", "index", "mem", "left", "right" ],
1045 outs => [ "eflags", "unused", "M" ],
1046 am => "source,binary",
1047 emit => '. cmpb %binop',
1048 attr => "int ins_permuted, int cmp_unsigned",
1049 init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1050 "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1053 mode => $mode_flags,
1054 modified_flags => $status_flags
1059 state => "exc_pinned",
1060 reg_req => { in => [ "gp", "gp", "none", "gp", "gp" ] ,
1061 out => [ "flags", "none", "none" ] },
1062 ins => [ "base", "index", "mem", "left", "right" ],
1063 outs => [ "eflags", "unused", "M" ],
1064 am => "source,binary",
1065 emit => '. test%M %binop',
1066 attr => "int ins_permuted, int cmp_unsigned",
1067 init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1068 "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1071 mode => $mode_flags,
1072 modified_flags => $status_flags
1077 state => "exc_pinned",
1078 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx", "eax ebx ecx edx" ] ,
1079 out => [ "flags", "none", "none" ] },
1080 ins => [ "base", "index", "mem", "left", "right" ],
1081 outs => [ "eflags", "unused", "M" ],
1082 am => "source,binary",
1083 emit => '. testb %binop',
1084 attr => "int ins_permuted, int cmp_unsigned",
1085 init_attr => "attr->data.ins_permuted = ins_permuted;\n".
1086 "\tattr->data.cmp_unsigned = cmp_unsigned;\n",
1089 mode => $mode_flags,
1090 modified_flags => $status_flags
1095 reg_req => { in => [ "eflags" ], out => [ "eax ebx ecx edx" ] },
1096 ins => [ "eflags" ],
1098 attr_type => "ia32_condcode_attr_t",
1099 attr => "pn_Cmp pnc, int ins_permuted",
1100 init_attr => "attr->attr.data.ins_permuted = ins_permuted;\n".
1101 "\tset_ia32_ls_mode(res, mode_Bu);\n",
1102 emit => '. set%CMP0 %DB0',
1110 state => "exc_pinned",
1111 reg_req => { in => [ "gp", "gp", "none", "eflags" ], out => [ "none" ] },
1112 ins => [ "base", "index", "mem","eflags" ],
1113 attr_type => "ia32_condcode_attr_t",
1114 attr => "pn_Cmp pnc, int ins_permuted",
1115 init_attr => "attr->attr.data.ins_permuted = ins_permuted;\n".
1116 "\tset_ia32_ls_mode(res, mode_Bu);\n",
1117 emit => '. set%CMP3 %AM',
1125 # (note: leave the false,true order intact to make it compatible with other
1127 state => "exc_pinned",
1128 reg_req => { in => [ "gp", "gp", "none", "gp", "gp", "eflags" ],
1129 out => [ "in_r4 in_r5", "flags", "none" ] },
1130 ins => [ "base", "index", "mem", "val_false", "val_true", "eflags" ],
1131 outs => [ "res", "flags", "M" ],
1132 am => "source,binary",
1133 attr_type => "ia32_condcode_attr_t",
1134 attr => "int ins_permuted, pn_Cmp pnc",
1135 init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
1143 op_flags => "L|X|Y",
1144 reg_req => { in => [ "eflags" ], out => [ "none", "none" ] },
1145 ins => [ "eflags" ],
1146 outs => [ "false", "true" ],
1147 attr_type => "ia32_condcode_attr_t",
1148 attr => "pn_Cmp pnc",
1150 units => [ "BRANCH" ],
1155 op_flags => "L|X|Y",
1156 reg_req => { in => [ "gp" ] },
1158 attr_type => "ia32_condcode_attr_t",
1161 units => [ "BRANCH" ],
1162 modified_flags => $status_flags,
1163 init_attr => "info->out_infos = NULL;", # XXX ugly hack for out requirements
1170 reg_req => { out => [ "none" ] },
1172 units => [ "BRANCH" ],
1179 reg_req => { in => [ "gp", "gp", "none", "gp" ] },
1180 ins => [ "base", "index", "mem", "target" ],
1181 am => "source,unary",
1182 emit => '. jmp *%unop3',
1184 units => [ "BRANCH" ],
1186 init_attr => "info->out_infos = NULL;", # XXX ugly hack for out requirements
1192 reg_req => { out => [ "gp" ] },
1194 attr => "ir_entity *symconst, int symconst_sign, int no_pic_adjust, long offset",
1195 attr_type => "ia32_immediate_attr_t",
1202 reg_req => { out => [ "gp" ] },
1206 modified_flags => $status_flags,
1212 reg_req => { out => [ "gp_UKNWN:I" ] },
1222 reg_req => { out => [ "vfp_UKNWN:I" ] },
1227 attr_type => "ia32_x87_attr_t",
1233 reg_req => { out => [ "xmm_UKNWN:I" ] },
1242 op_flags => "c|NB|NI",
1243 reg_req => { out => [ "gp_NOREG:I" ] },
1252 op_flags => "c|NB|NI",
1253 reg_req => { out => [ "vfp_NOREG:I" ] },
1258 attr_type => "ia32_x87_attr_t",
1263 op_flags => "c|NB|NI",
1264 reg_req => { out => [ "xmm_NOREG:I" ] },
1274 reg_req => { out => [ "fpcw:I" ] },
1278 modified_flags => $fpcw_flags
1284 reg_req => { in => [ "gp", "gp", "none" ], out => [ "fpcw:I" ] },
1285 ins => [ "base", "index", "mem" ],
1287 emit => ". fldcw %AM",
1290 modified_flags => $fpcw_flags
1296 reg_req => { in => [ "gp", "gp", "none", "fp_cw" ], out => [ "none" ] },
1297 ins => [ "base", "index", "mem", "fpcw" ],
1299 emit => ". fnstcw %AM",
1307 reg_req => { in => [ "fp_cw" ], out => [ "none" ] },
1315 # we should not rematrialize this node. It has very strict constraints.
1316 reg_req => { in => [ "eax", "edx" ], out => [ "edx" ] },
1317 ins => [ "val", "clobbered" ],
1326 # Note that we add additional latency values depending on address mode, so a
1327 # lateny of 0 for load is correct
1331 state => "exc_pinned",
1332 reg_req => { in => [ "gp", "gp", "none" ],
1333 out => [ "gp", "none", "none", "none" ] },
1334 ins => [ "base", "index", "mem" ],
1335 outs => [ "res", "unused", "M", "X_exc" ],
1337 emit => ". mov%EX%.l %AM, %D0",
1343 state => "exc_pinned",
1344 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "none", "none" ] },
1345 ins => [ "base", "index", "mem", "val" ],
1346 outs => [ "M", "X_exc" ],
1347 emit => '. mov%M %SI3, %AM',
1355 state => "exc_pinned",
1356 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ], out => ["none", "none" ] },
1357 ins => [ "base", "index", "mem", "val" ],
1358 outs => [ "M", "X_exc" ],
1359 emit => '. mov%M %SB3, %AM',
1367 reg_req => { in => [ "gp", "gp" ], out => [ "gp" ] },
1368 ins => [ "base", "index" ],
1369 emit => '. leal %AM, %D0',
1373 # lea doesn't modify the flags, but setting this seems advantageous since it
1374 # increases chances that the Lea is transformed back to an Add
1375 modified_flags => 1,
1379 state => "exc_pinned",
1380 reg_req => { in => [ "gp", "gp", "none", "gp", "esp" ], out => [ "esp:I|S", "none" ] },
1381 ins => [ "base", "index", "mem", "val", "stack" ],
1382 emit => '. push%M %unop3',
1383 outs => [ "stack", "M" ],
1384 am => "source,unary",
1390 state => "exc_pinned",
1391 reg_req => { in => [ "none", "esp" ], out => [ "gp", "none", "none", "esp:I|S" ] },
1392 ins => [ "mem", "stack" ],
1393 outs => [ "res", "M", "unused", "stack" ],
1394 emit => '. pop%M %D0',
1395 latency => 3, # Pop is more expensive than Push on Athlon
1400 state => "exc_pinned",
1401 reg_req => { in => [ "none", "esp" ], out => [ "ebp:I", "none", "none", "esp:I|S" ] },
1402 ins => [ "mem", "stack" ],
1403 outs => [ "res", "M", "unused", "stack" ],
1404 emit => '. pop%M %D0',
1405 latency => 3, # Pop is more expensive than Push on Athlon
1410 state => "exc_pinned",
1411 reg_req => { in => [ "gp", "gp", "none", "esp" ], out => [ "none", "none", "none", "esp:I|S" ] },
1412 ins => [ "base", "index", "mem", "stack" ],
1413 outs => [ "unused0", "M", "unused1", "stack" ],
1414 emit => '. pop%M %AM',
1415 latency => 3, # Pop is more expensive than Push on Athlon
1420 reg_req => { in => [ "esp" ], out => [ "ebp", "esp:I|S", "none" ] },
1422 outs => [ "frame", "stack", "M" ],
1428 reg_req => { in => [ "ebp" ], out => [ "ebp:I", "esp:I|S" ] },
1430 outs => [ "frame", "stack" ],
1437 reg_req => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "esp:I|S", "none" ] },
1438 ins => [ "base", "index", "mem", "stack", "size" ],
1439 am => "source,binary",
1440 emit => '. addl %binop',
1442 outs => [ "stack", "M" ],
1444 modified_flags => $status_flags
1449 reg_req => { in => [ "gp", "gp", "none", "esp", "gp" ], out => [ "esp:I|S", "gp", "none" ] },
1450 ins => [ "base", "index", "mem", "stack", "size" ],
1451 am => "source,binary",
1452 emit => ". subl %binop\n".
1453 ". movl %%esp, %D1",
1455 outs => [ "stack", "addr", "M" ],
1457 modified_flags => $status_flags
1470 reg_req => { out => [ "gp" ] },
1476 # BT supports source address mode, but this is unused yet
1480 state => "exc_pinned",
1481 reg_req => { in => [ "gp", "gp" ], out => [ "flags" ] },
1482 ins => [ "left", "right" ],
1483 emit => '. bt%M %S1, %S0',
1486 mode => $mode_flags,
1487 modified_flags => $status_flags # only CF is set, but the other flags are undefined
1492 state => "exc_pinned",
1493 reg_req => { in => [ "gp", "gp", "none", "gp" ],
1494 out => [ "gp", "flags", "none" ] },
1495 ins => [ "base", "index", "mem", "operand" ],
1496 outs => [ "res", "flags", "M" ],
1497 am => "source,binary",
1498 emit => '. bsf%M %unop3, %D0',
1502 modified_flags => $status_flags
1507 state => "exc_pinned",
1508 reg_req => { in => [ "gp", "gp", "none", "gp" ],
1509 out => [ "gp", "flags", "none" ] },
1510 ins => [ "base", "index", "mem", "operand" ],
1511 outs => [ "res", "flags", "M" ],
1512 am => "source,binary",
1513 emit => '. bsr%M %unop3, %D0',
1517 modified_flags => $status_flags
1521 # SSE4.2 or SSE4a popcnt instruction
1525 state => "exc_pinned",
1526 reg_req => { in => [ "gp", "gp", "none", "gp" ],
1527 out => [ "gp", "flags", "none" ] },
1528 ins => [ "base", "index", "mem", "operand" ],
1529 outs => [ "res", "flags", "M" ],
1530 am => "source,binary",
1531 emit => '. popcnt%M %unop3, %D0',
1535 modified_flags => $status_flags
1539 state => "exc_pinned",
1541 in => [ "gp", "gp", "none", "gp", "esp", "fpcw", "eax", "ecx", "edx" ],
1542 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" ]
1544 ins => [ "base", "index", "mem", "addr", "stack", "fpcw", "eax", "ecx", "edx" ],
1545 outs => [ "stack", "fpcw", "M", "eax", "ecx", "edx", "vf0", "vf1", "vf2", "vf3", "vf4", "vf5", "vf6", "vf7", "xmm0", "xmm1", "xmm2", "xmm3", "xmm4", "xmm5", "xmm6", "xmm7" ],
1546 attr_type => "ia32_call_attr_t",
1547 attr => "unsigned pop, ir_type *call_tp",
1548 am => "source,unary",
1549 units => [ "BRANCH" ],
1550 latency => 4, # random number
1551 modified_flags => $status_flags
1555 # a Helper node for frame-climbing, needed for __builtin_(frame|return)_address
1557 # PS: try gcc __builtin_frame_address(100000) :-)
1560 reg_req => { in => [ "gp", "gp", "gp"], out => [ "in_r3" ] },
1561 ins => [ "frame", "cnt", "tmp" ],
1563 latency => 4, # random number
1564 attr_type => "ia32_climbframe_attr_t",
1565 attr => "unsigned count",
1575 reg_req => { in => [ "gp" ],
1576 out => [ "in_r1" ] },
1577 emit => '. bswap%M %S0',
1585 # bswap16, use xchg here
1589 reg_req => { in => [ "eax ebx ecx edx" ],
1590 out => [ "in_r1" ] },
1591 emit => '. xchg %SB0, %SH0',
1603 reg_req => { in => [ "none" ], out => [ "none" ] },
1612 # Undefined Instruction on ALL x86 CPU's
1616 reg_req => { in => [ "none" ], out => [ "none" ] },
1619 emit => ". .value 0x0b0f",
1630 reg_req => { in => [ "edx", "eax", "none" ], out => [ "none" ] },
1631 ins => [ "port", "value", "mem" ],
1632 emit => '. out%M %SS0, %SI1',
1636 modified_flags => $status_flags
1645 reg_req => { in => [ "edx", "none" ], out => [ "eax", "none" ] },
1646 ins => [ "port", "mem" ],
1647 outs => [ "res", "M" ],
1648 emit => '. in%M %DS0, %SS0',
1652 modified_flags => $status_flags
1656 # Intel style prefetching
1660 state => "exc_pinned",
1661 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1662 ins => [ "base", "index", "mem" ],
1665 emit => ". prefetcht0 %AM",
1671 state => "exc_pinned",
1672 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1673 ins => [ "base", "index", "mem" ],
1676 emit => ". prefetcht1 %AM",
1682 state => "exc_pinned",
1683 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1684 ins => [ "base", "index", "mem" ],
1687 emit => ". prefetcht2 %AM",
1693 state => "exc_pinned",
1694 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1695 ins => [ "base", "index", "mem" ],
1698 emit => ". prefetchnta %AM",
1703 # 3DNow! prefetch instructions
1707 state => "exc_pinned",
1708 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1709 ins => [ "base", "index", "mem" ],
1712 emit => ". prefetch %AM",
1718 state => "exc_pinned",
1719 reg_req => { in => [ "gp", "gp", "none" ], out => [ "none" ] },
1720 ins => [ "base", "index", "mem" ],
1723 emit => ". prefetchw %AM",
1730 reg_req => { out => [ "xmm" ] },
1731 emit => '. xorp%XSD %D0, %D0',
1739 reg_req => { out => [ "xmm" ] },
1740 emit => '. pxor %D0, %D0',
1746 # produces all 1 bits
1749 reg_req => { out => [ "xmm" ] },
1750 emit => '. pcmpeqb %D0, %D0',
1756 # integer shift left, dword
1759 reg_req => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] },
1760 emit => '. pslld %SI1, %D0',
1766 # integer shift left, qword
1769 reg_req => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] },
1770 emit => '. psllq %SI1, %D0',
1776 # integer shift right, dword
1779 reg_req => { in => [ "xmm", "xmm" ], out => [ "in_r1 !in_r2" ] },
1780 emit => '. psrld %SI1, %D0',
1786 # mov from integer to SSE register
1789 reg_req => { in => [ "gp" ], out => [ "xmm" ] },
1790 emit => '. movd %S0, %D0',
1798 state => "exc_pinned",
1799 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1800 out => [ "in_r4 in_r5", "flags", "none" ] },
1801 ins => [ "base", "index", "mem", "left", "right" ],
1802 outs => [ "res", "flags", "M" ],
1803 am => "source,binary",
1804 emit => '. add%XXM %binop',
1812 state => "exc_pinned",
1813 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1814 out => [ "in_r4 in_r5", "flags", "none" ] },
1815 ins => [ "base", "index", "mem", "left", "right" ],
1816 outs => [ "res", "flags", "M" ],
1817 am => "source,binary",
1818 emit => '. mul%XXM %binop',
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 => '. max%XXM %binop',
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 => '. min%XXM %binop',
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 => '. andp%XSD %binop',
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 => '. orp%XSD %binop',
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 => '. xorp%XSD %binop',
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 => '. andnp%XSD %binop',
1910 state => "exc_pinned",
1911 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1912 out => [ "in_r4", "flags", "none" ] },
1913 ins => [ "base", "index", "mem", "minuend", "subtrahend" ],
1914 outs => [ "res", "flags", "M" ],
1915 am => "source,binary",
1916 emit => '. sub%XXM %binop',
1924 state => "exc_pinned",
1925 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1926 out => [ "in_r4 !in_r5", "flags", "none" ] },
1927 ins => [ "base", "index", "mem", "dividend", "divisor" ],
1928 outs => [ "res", "flags", "M" ],
1929 am => "source,binary",
1930 emit => '. div%XXM %binop',
1937 state => "exc_pinned",
1938 reg_req => { in => [ "gp", "gp", "none", "xmm", "xmm" ],
1939 out => [ "eflags" ] },
1940 ins => [ "base", "index", "mem", "left", "right" ],
1941 outs => [ "flags" ],
1942 am => "source,binary",
1943 attr => "int ins_permuted",
1944 init_attr => "attr->data.ins_permuted = ins_permuted;",
1945 emit => ' .ucomi%XXM %binop',
1948 mode => $mode_flags,
1949 modified_flags => 1,
1954 state => "exc_pinned",
1955 reg_req => { in => [ "gp", "gp", "none" ],
1956 out => [ "xmm", "none", "none", "none" ] },
1957 ins => [ "base", "index", "mem" ],
1958 outs => [ "res", "unused", "M", "X_exc" ],
1959 emit => '. mov%XXM %AM, %D0',
1960 attr => "ir_mode *load_mode",
1961 init_attr => "attr->ls_mode = load_mode;",
1968 state => "exc_pinned",
1969 reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "none", "none" ] },
1970 ins => [ "base", "index", "mem", "val" ],
1971 outs => [ "M", "X_exc" ],
1972 emit => '. mov%XXM %S3, %AM',
1980 state => "exc_pinned",
1981 reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "none" ] },
1982 ins => [ "base", "index", "mem", "val" ],
1984 emit => '. mov%XXM %S3, %AM',
1992 state => "exc_pinned",
1993 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] },
1994 ins => [ "base", "index", "mem", "val" ],
1995 am => "source,unary",
1996 emit => '. cvtsi2ss %unop3, %D0',
2004 state => "exc_pinned",
2005 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm" ] },
2006 ins => [ "base", "index", "mem", "val" ],
2007 am => "source,unary",
2008 emit => '. cvtsi2sd %unop3, %D0',
2017 cmp_attr => "return 1;",
2018 ins => [ "val_high", "val_low" ],
2019 reg_req => { in => [ "none", "none" ], out => [ "none" ] }
2024 cmp_attr => "return 1;",
2026 outs => [ "res_high", "res_low" ],
2027 reg_req => { in => [ "none" ], out => [ "none", "none" ] }
2033 reg_req => { in => [ "edi", "esi", "ecx", "none" ], out => [ "edi", "esi", "ecx", "none" ] },
2034 outs => [ "DST", "SRC", "CNT", "M" ],
2035 attr_type => "ia32_copyb_attr_t",
2036 attr => "unsigned size",
2039 # we don't care about this flag, so no need to mark this node
2040 # modified_flags => [ "DF" ]
2046 reg_req => { in => [ "edi", "esi", "none" ], out => [ "edi", "esi", "none" ] },
2047 outs => [ "DST", "SRC", "M" ],
2048 attr_type => "ia32_copyb_attr_t",
2049 attr => "unsigned size",
2052 # we don't care about this flag, so no need to mark this node
2053 # modified_flags => [ "DF" ]
2057 state => "exc_pinned",
2058 reg_req => { in => [ "eax" ], out => [ "eax" ] },
2068 state => "exc_pinned",
2069 reg_req => { in => [ "gp", "gp", "none", "gp" ],
2070 out => [ "gp", "none", "none" ] },
2071 ins => [ "base", "index", "mem", "val" ],
2072 outs => [ "res", "flags", "M" ],
2073 am => "source,unary",
2076 attr => "ir_mode *smaller_mode",
2077 init_attr => "attr->ls_mode = smaller_mode;",
2082 state => "exc_pinned",
2083 reg_req => { in => [ "gp", "gp", "none", "eax ebx ecx edx" ],
2084 out => [ "gp", "none", "none" ] },
2085 ins => [ "base", "index", "mem", "val" ],
2086 outs => [ "res", "flags", "M" ],
2087 am => "source,unary",
2090 attr => "ir_mode *smaller_mode",
2091 init_attr => "attr->ls_mode = smaller_mode;",
2096 state => "exc_pinned",
2097 reg_req => { in => [ "gp", "gp", "none", "gp" ], out => [ "xmm", "none" ] },
2098 ins => [ "base", "index", "mem", "val" ],
2099 am => "source,unary",
2106 state => "exc_pinned",
2107 reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "gp", "none" ] },
2108 ins => [ "base", "index", "mem", "val" ],
2109 am => "source,unary",
2116 state => "exc_pinned",
2117 reg_req => { in => [ "gp", "gp", "none", "xmm" ], out => [ "xmm", "none" ] },
2118 ins => [ "base", "index", "mem", "val" ],
2119 am => "source,unary",
2125 # rematerialisation disabled for all float nodes for now, because the fpcw
2126 # handler runs before spilling and we might end up with wrong fpcw then
2130 state => "exc_pinned",
2131 reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ],
2132 out => [ "vfp", "none", "none" ] },
2133 ins => [ "base", "index", "mem", "left", "right", "fpcw" ],
2134 outs => [ "res", "dummy", "M" ],
2135 am => "source,binary",
2139 attr_type => "ia32_x87_attr_t",
2144 state => "exc_pinned",
2145 reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ],
2146 out => [ "vfp", "none", "none" ] },
2147 ins => [ "base", "index", "mem", "left", "right", "fpcw" ],
2148 outs => [ "res", "dummy", "M" ],
2149 am => "source,binary",
2153 attr_type => "ia32_x87_attr_t",
2158 state => "exc_pinned",
2159 reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ],
2160 out => [ "vfp", "none", "none" ] },
2161 ins => [ "base", "index", "mem", "minuend", "subtrahend", "fpcw" ],
2162 outs => [ "res", "dummy", "M" ],
2163 am => "source,binary",
2167 attr_type => "ia32_x87_attr_t",
2171 state => "exc_pinned",
2172 reg_req => { in => [ "gp", "gp", "none", "vfp", "vfp", "fpcw" ],
2173 out => [ "vfp", "none", "none" ] },
2174 ins => [ "base", "index", "mem", "dividend", "divisor", "fpcw" ],
2175 outs => [ "res", "dummy", "M" ],
2176 am => "source,binary",
2179 attr_type => "ia32_x87_attr_t",
2183 reg_req => { in => [ "vfp", "vfp", "fpcw" ], out => [ "vfp" ] },
2184 ins => [ "left", "right", "fpcw" ],
2188 attr_type => "ia32_x87_attr_t",
2193 reg_req => { in => [ "vfp"], out => [ "vfp" ] },
2198 attr_type => "ia32_x87_attr_t",
2203 reg_req => { in => [ "vfp"], out => [ "vfp" ] },
2208 attr_type => "ia32_x87_attr_t",
2214 state => "exc_pinned",
2215 reg_req => { in => [ "gp", "gp", "none" ],
2216 out => [ "vfp", "none", "none", "none" ] },
2217 ins => [ "base", "index", "mem" ],
2218 outs => [ "res", "unused", "M", "X_exc" ],
2219 attr => "ir_mode *load_mode",
2220 init_attr => "attr->attr.ls_mode = load_mode;",
2223 attr_type => "ia32_x87_attr_t",
2229 state => "exc_pinned",
2230 reg_req => { in => [ "gp", "gp", "none", "vfp" ],
2231 out => [ "none", "none" ] },
2232 ins => [ "base", "index", "mem", "val" ],
2233 outs => [ "M", "X_exc" ],
2234 attr => "ir_mode *store_mode",
2235 init_attr => "attr->attr.ls_mode = store_mode;",
2239 attr_type => "ia32_x87_attr_t",
2243 state => "exc_pinned",
2244 reg_req => { in => [ "gp", "gp", "none" ],
2245 out => [ "vfp", "none", "none" ] },
2246 outs => [ "res", "unused", "M" ],
2247 ins => [ "base", "index", "mem" ],
2250 attr_type => "ia32_x87_attr_t",
2254 state => "exc_pinned",
2255 reg_req => { in => [ "gp", "gp", "none", "vfp", "fpcw" ], out => [ "none" ] },
2256 ins => [ "base", "index", "mem", "val", "fpcw" ],
2261 attr_type => "ia32_x87_attr_t",
2264 # SSE3 fisttp instruction
2266 state => "exc_pinned",
2267 reg_req => { in => [ "gp", "gp", "none", "vfp" ], out => [ "in_r4", "none" ]},
2268 ins => [ "base", "index", "mem", "val" ],
2269 outs => [ "res", "M" ],
2272 attr_type => "ia32_x87_attr_t",
2277 reg_req => { out => [ "vfp" ] },
2282 attr_type => "ia32_x87_attr_t",
2287 reg_req => { out => [ "vfp" ] },
2292 attr_type => "ia32_x87_attr_t",
2297 reg_req => { out => [ "vfp" ] },
2302 attr_type => "ia32_x87_attr_t",
2307 reg_req => { out => [ "vfp" ] },
2312 attr_type => "ia32_x87_attr_t",
2317 reg_req => { out => [ "vfp" ] },
2322 attr_type => "ia32_x87_attr_t",
2327 reg_req => { out => [ "vfp" ] },
2332 attr_type => "ia32_x87_attr_t",
2337 reg_req => { out => [ "vfp" ] },
2342 attr_type => "ia32_x87_attr_t",
2346 # we can't allow to rematerialize this node so we don't
2347 # accidently produce Phi(Fucom, Fucom(ins_permuted))
2349 reg_req => { in => [ "vfp", "vfp" ], out => [ "eax" ] },
2350 ins => [ "left", "right" ],
2351 outs => [ "flags" ],
2352 attr => "int ins_permuted",
2353 init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2356 attr_type => "ia32_x87_attr_t",
2362 reg_req => { in => [ "vfp", "vfp" ], out => [ "eflags" ] },
2363 ins => [ "left", "right" ],
2364 outs => [ "flags" ],
2365 attr => "int ins_permuted",
2366 init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2369 attr_type => "ia32_x87_attr_t",
2375 reg_req => { in => [ "vfp" ], out => [ "eax" ] },
2377 outs => [ "flags" ],
2378 attr => "int ins_permuted",
2379 init_attr => "attr->attr.data.ins_permuted = ins_permuted;",
2382 attr_type => "ia32_x87_attr_t",
2388 reg_req => { in => [ "eax" ], out => [ "eflags" ] },
2390 outs => [ "flags" ],
2394 mode => $mode_flags,
2398 state => "exc_pinned",
2399 emit => '. fadd%XM %x87_binop',
2401 attr_type => "ia32_x87_attr_t",
2406 state => "exc_pinned",
2407 emit => '. faddp%XM %x87_binop',
2409 attr_type => "ia32_x87_attr_t",
2414 state => "exc_pinned",
2415 emit => '. fmul%XM %x87_binop',
2417 attr_type => "ia32_x87_attr_t",
2422 state => "exc_pinned",
2423 emit => '. fmulp%XM %x87_binop',,
2425 attr_type => "ia32_x87_attr_t",
2430 state => "exc_pinned",
2431 emit => '. fsub%XM %x87_binop',
2433 attr_type => "ia32_x87_attr_t",
2437 # Note: gas is strangely buggy: fdivrp and fdivp as well as fsubrp and fsubp
2438 # are swapped, we work this around in the emitter...
2441 state => "exc_pinned",
2442 # see note about gas bugs
2443 emit => '. fsubrp%XM %x87_binop',
2445 attr_type => "ia32_x87_attr_t",
2450 state => "exc_pinned",
2452 emit => '. fsubr%XM %x87_binop',
2454 attr_type => "ia32_x87_attr_t",
2459 state => "exc_pinned",
2461 # see note about gas bugs before fsubp
2462 emit => '. fsubp%XM %x87_binop',
2464 attr_type => "ia32_x87_attr_t",
2471 attr_type => "ia32_x87_attr_t",
2475 # this node is just here, to keep the simulator running
2476 # we can omit this when a fprem simulation function exists
2478 emit => '. fprem1\n'.
2481 attr_type => "ia32_x87_attr_t",
2486 state => "exc_pinned",
2487 emit => '. fdiv%XM %x87_binop',
2489 attr_type => "ia32_x87_attr_t",
2494 state => "exc_pinned",
2495 # see note about gas bugs before fsubp
2496 emit => '. fdivrp%XM %x87_binop',
2498 attr_type => "ia32_x87_attr_t",
2503 state => "exc_pinned",
2504 emit => '. fdivr%XM %x87_binop',
2506 attr_type => "ia32_x87_attr_t",
2511 state => "exc_pinned",
2512 # see note about gas bugs before fsubp
2513 emit => '. fdivp%XM %x87_binop',
2515 attr_type => "ia32_x87_attr_t",
2522 attr_type => "ia32_x87_attr_t",
2530 attr_type => "ia32_x87_attr_t",
2535 op_flags => "R|L|F",
2536 state => "exc_pinned",
2537 emit => '. fld%XM %AM',
2538 attr_type => "ia32_x87_attr_t",
2544 op_flags => "R|L|F",
2545 state => "exc_pinned",
2546 emit => '. fst%XM %AM',
2548 attr_type => "ia32_x87_attr_t",
2554 op_flags => "R|L|F",
2555 state => "exc_pinned",
2556 emit => '. fstp%XM %AM',
2558 attr_type => "ia32_x87_attr_t",
2564 state => "exc_pinned",
2565 emit => '. fild%XM %AM',
2566 attr_type => "ia32_x87_attr_t",
2572 state => "exc_pinned",
2573 emit => '. fist%XM %AM',
2575 attr_type => "ia32_x87_attr_t",
2581 state => "exc_pinned",
2582 emit => '. fistp%XM %AM',
2584 attr_type => "ia32_x87_attr_t",
2589 # SSE3 fisttp instruction
2591 state => "exc_pinned",
2592 emit => '. fisttp%XM %AM',
2594 attr_type => "ia32_x87_attr_t",
2600 op_flags => "R|c|K",
2602 reg_req => { out => [ "vfp" ] },
2604 attr_type => "ia32_x87_attr_t",
2609 op_flags => "R|c|K",
2611 reg_req => { out => [ "vfp" ] },
2613 attr_type => "ia32_x87_attr_t",
2618 op_flags => "R|c|K",
2620 reg_req => { out => [ "vfp" ] },
2622 attr_type => "ia32_x87_attr_t",
2627 op_flags => "R|c|K",
2629 reg_req => { out => [ "vfp" ] },
2631 attr_type => "ia32_x87_attr_t",
2636 op_flags => "R|c|K",
2638 reg_req => { out => [ "vfp" ] },
2640 attr_type => "ia32_x87_attr_t",
2645 op_flags => "R|c|K",
2647 reg_req => { out => [ "vfp" ] },
2648 emit => '. fldll2t',
2649 attr_type => "ia32_x87_attr_t",
2654 op_flags => "R|c|K",
2656 reg_req => { out => [ "vfp" ] },
2658 attr_type => "ia32_x87_attr_t",
2663 # Note that it is NEVER allowed to do CSE on these nodes
2664 # Moreover, note the virtual register requierements!
2668 reg_req => { out => [ "none" ] },
2669 cmp_attr => "return 1;",
2670 emit => '. fxch %X0',
2671 attr_type => "ia32_x87_attr_t",
2678 reg_req => { out => [ "none" ] },
2679 cmp_attr => "return 1;",
2680 emit => '. fld %X0',
2681 attr_type => "ia32_x87_attr_t",
2687 reg_req => { in => [ "vfp"], out => [ "vfp" ] },
2688 cmp_attr => "return 1;",
2689 emit => '. fld %X0',
2690 attr_type => "ia32_x87_attr_t",
2696 reg_req => { out => [ "none" ] },
2697 cmp_attr => "return 1;",
2698 emit => '. fstp %X0',
2699 attr_type => "ia32_x87_attr_t",
2706 reg_req => { out => [ "none" ] },
2707 cmp_attr => "return 1;",
2708 emit => '. ffreep %X0',
2709 attr_type => "ia32_x87_attr_t",
2716 reg_req => { out => [ "none" ] },
2717 cmp_attr => "return 1;",
2719 attr_type => "ia32_x87_attr_t",
2726 reg_req => { out => [ "none" ] },
2727 cmp_attr => "return 1;",
2729 attr_type => "ia32_x87_attr_t",
2736 emit => ". fucom %X1\n".
2738 attr_type => "ia32_x87_attr_t",
2744 emit => ". fucomp %X1\n".
2746 attr_type => "ia32_x87_attr_t",
2752 emit => ". fucompp\n".
2754 attr_type => "ia32_x87_attr_t",
2760 emit => '. fucomi %X1',
2761 attr_type => "ia32_x87_attr_t",
2767 emit => '. fucompi %X1',
2768 attr_type => "ia32_x87_attr_t",
2776 attr_type => "ia32_x87_attr_t",
2780 # Spilling and reloading of SSE registers, hardcoded, not generated #
2784 state => "exc_pinned",
2785 reg_req => { in => [ "gp", "gp", "none" ], out => [ "xmm", "none" ] },
2786 emit => '. movdqu %D0, %AM',
2787 outs => [ "res", "M" ],
2794 state => "exc_pinned",
2795 reg_req => { in => [ "gp", "gp", "none", "xmm" ] },
2796 ins => [ "base", "index", "mem", "val" ],
2797 emit => '. movdqu %binop',
2805 # Transform some attributes
2806 foreach my $op (keys(%nodes)) {
2807 my $node = $nodes{$op};
2808 my $op_attr_init = $node->{op_attr_init};
2810 if(defined($op_attr_init)) {
2811 $op_attr_init .= "\n\t";
2816 if(!defined($node->{latency})) {
2818 $node->{latency} = 0;
2820 die("Latency missing for op $op");
2823 $op_attr_init .= "attr->latency = ".$node->{latency} . ";";
2825 $node->{op_attr_init} = $op_attr_init;