2 * Tiny Code Generator for QEMU
4 * Copyright (c) 2008 Fabrice Bellard
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
25 static uint8_t *tb_ret_addr
;
28 #define LINKAGE_AREA_SIZE 24
30 #elif defined _CALL_AIX
31 #define LINKAGE_AREA_SIZE 52
34 #define LINKAGE_AREA_SIZE 8
39 #if TARGET_PHYS_ADDR_BITS <= 32
40 #define ADDEND_OFFSET 0
42 #define ADDEND_OFFSET 4
49 #ifdef CONFIG_USE_GUEST_BASE
50 #define TCG_GUEST_BASE_REG 30
52 #define TCG_GUEST_BASE_REG 0
56 static const char * const tcg_target_reg_names
[TCG_TARGET_NB_REGS
] = {
92 static const int tcg_target_reg_alloc_order
[] = {
131 static const int tcg_target_call_iarg_regs
[] = {
142 static const int tcg_target_call_oarg_regs
[2] = {
147 static const int tcg_target_callee_save_regs
[] = {
168 /* TCG_REG_R27, */ /* currently used for the global env, so no
176 static uint32_t reloc_pc24_val (void *pc
, tcg_target_long target
)
178 tcg_target_long disp
;
180 disp
= target
- (tcg_target_long
) pc
;
181 if ((disp
<< 6) >> 6 != disp
)
184 return disp
& 0x3fffffc;
187 static void reloc_pc24 (void *pc
, tcg_target_long target
)
189 *(uint32_t *) pc
= (*(uint32_t *) pc
& ~0x3fffffc)
190 | reloc_pc24_val (pc
, target
);
193 static uint16_t reloc_pc14_val (void *pc
, tcg_target_long target
)
195 tcg_target_long disp
;
197 disp
= target
- (tcg_target_long
) pc
;
198 if (disp
!= (int16_t) disp
)
201 return disp
& 0xfffc;
204 static void reloc_pc14 (void *pc
, tcg_target_long target
)
206 *(uint32_t *) pc
= (*(uint32_t *) pc
& ~0xfffc)
207 | reloc_pc14_val (pc
, target
);
210 static void patch_reloc(uint8_t *code_ptr
, int type
,
211 tcg_target_long value
, tcg_target_long addend
)
216 reloc_pc14 (code_ptr
, value
);
219 reloc_pc24 (code_ptr
, value
);
226 /* maximum number of register used for input function arguments */
227 static int tcg_target_get_call_iarg_regs_count(int flags
)
229 return ARRAY_SIZE (tcg_target_call_iarg_regs
);
232 /* parse target specific constraints */
233 static int target_parse_constraint(TCGArgConstraint
*ct
, const char **pct_str
)
239 case 'A': case 'B': case 'C': case 'D':
240 ct
->ct
|= TCG_CT_REG
;
241 tcg_regset_set_reg(ct
->u
.regs
, 3 + ct_str
[0] - 'A');
244 ct
->ct
|= TCG_CT_REG
;
245 tcg_regset_set32(ct
->u
.regs
, 0, 0xffffffff);
247 #ifdef CONFIG_SOFTMMU
248 case 'L': /* qemu_ld constraint */
249 ct
->ct
|= TCG_CT_REG
;
250 tcg_regset_set32(ct
->u
.regs
, 0, 0xffffffff);
251 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R3
);
252 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R4
);
254 case 'K': /* qemu_st[8..32] constraint */
255 ct
->ct
|= TCG_CT_REG
;
256 tcg_regset_set32(ct
->u
.regs
, 0, 0xffffffff);
257 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R3
);
258 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R4
);
259 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R5
);
260 #if TARGET_LONG_BITS == 64
261 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R6
);
264 case 'M': /* qemu_st64 constraint */
265 ct
->ct
|= TCG_CT_REG
;
266 tcg_regset_set32(ct
->u
.regs
, 0, 0xffffffff);
267 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R3
);
268 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R4
);
269 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R5
);
270 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R6
);
271 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R7
);
276 ct
->ct
|= TCG_CT_REG
;
277 tcg_regset_set32(ct
->u
.regs
, 0, 0xffffffff);
280 ct
->ct
|= TCG_CT_REG
;
281 tcg_regset_set32(ct
->u
.regs
, 0, 0xffffffff);
282 tcg_regset_reset_reg(ct
->u
.regs
, TCG_REG_R3
);
293 /* test if a constant matches the constraint */
294 static int tcg_target_const_match(tcg_target_long val
,
295 const TCGArgConstraint
*arg_ct
)
300 if (ct
& TCG_CT_CONST
)
305 #define OPCD(opc) ((opc)<<26)
306 #define XO31(opc) (OPCD(31)|((opc)<<1))
307 #define XO19(opc) (OPCD(19)|((opc)<<1))
319 #define ADDIC OPCD(12)
320 #define ADDI OPCD(14)
321 #define ADDIS OPCD(15)
323 #define ORIS OPCD(25)
324 #define XORI OPCD(26)
325 #define XORIS OPCD(27)
326 #define ANDI OPCD(28)
327 #define ANDIS OPCD(29)
328 #define MULLI OPCD( 7)
329 #define CMPLI OPCD(10)
330 #define CMPI OPCD(11)
331 #define SUBFIC OPCD( 8)
333 #define LWZU OPCD(33)
334 #define STWU OPCD(37)
336 #define RLWINM OPCD(21)
337 #define RLWNM OPCD(23)
339 #define BCLR XO19( 16)
340 #define BCCTR XO19(528)
341 #define CRAND XO19(257)
342 #define CRANDC XO19(129)
343 #define CRNAND XO19(225)
344 #define CROR XO19(449)
345 #define CRNOR XO19( 33)
347 #define EXTSB XO31(954)
348 #define EXTSH XO31(922)
349 #define ADD XO31(266)
350 #define ADDE XO31(138)
351 #define ADDC XO31( 10)
352 #define AND XO31( 28)
353 #define SUBF XO31( 40)
354 #define SUBFC XO31( 8)
355 #define SUBFE XO31(136)
357 #define XOR XO31(316)
358 #define MULLW XO31(235)
359 #define MULHWU XO31( 11)
360 #define DIVW XO31(491)
361 #define DIVWU XO31(459)
363 #define CMPL XO31( 32)
364 #define LHBRX XO31(790)
365 #define LWBRX XO31(534)
366 #define STHBRX XO31(918)
367 #define STWBRX XO31(662)
368 #define MFSPR XO31(339)
369 #define MTSPR XO31(467)
370 #define SRAWI XO31(824)
371 #define NEG XO31(104)
372 #define MFCR XO31( 19)
373 #define CNTLZW XO31( 26)
374 #define NOR XO31(124)
375 #define ANDC XO31( 60)
376 #define ORC XO31(412)
378 #define LBZX XO31( 87)
379 #define LHZX XO31(279)
380 #define LHAX XO31(343)
381 #define LWZX XO31( 23)
382 #define STBX XO31(215)
383 #define STHX XO31(407)
384 #define STWX XO31(151)
386 #define SPR(a,b) ((((a)<<5)|(b))<<11)
388 #define CTR SPR(9, 0)
390 #define SLW XO31( 24)
391 #define SRW XO31(536)
392 #define SRAW XO31(792)
395 #define TRAP (TW | TO (31))
397 #define RT(r) ((r)<<21)
398 #define RS(r) ((r)<<21)
399 #define RA(r) ((r)<<16)
400 #define RB(r) ((r)<<11)
401 #define TO(t) ((t)<<21)
402 #define SH(s) ((s)<<11)
403 #define MB(b) ((b)<<6)
404 #define ME(e) ((e)<<1)
405 #define BO(o) ((o)<<21)
409 #define TAB(t,a,b) (RT(t) | RA(a) | RB(b))
410 #define SAB(s,a,b) (RS(s) | RA(a) | RB(b))
412 #define BF(n) ((n)<<23)
413 #define BI(n, c) (((c)+((n)*4))<<16)
414 #define BT(n, c) (((c)+((n)*4))<<21)
415 #define BA(n, c) (((c)+((n)*4))<<16)
416 #define BB(n, c) (((c)+((n)*4))<<11)
418 #define BO_COND_TRUE BO (12)
419 #define BO_COND_FALSE BO (4)
420 #define BO_ALWAYS BO (20)
429 static const uint32_t tcg_to_bc
[10] = {
430 [TCG_COND_EQ
] = BC
| BI (7, CR_EQ
) | BO_COND_TRUE
,
431 [TCG_COND_NE
] = BC
| BI (7, CR_EQ
) | BO_COND_FALSE
,
432 [TCG_COND_LT
] = BC
| BI (7, CR_LT
) | BO_COND_TRUE
,
433 [TCG_COND_GE
] = BC
| BI (7, CR_LT
) | BO_COND_FALSE
,
434 [TCG_COND_LE
] = BC
| BI (7, CR_GT
) | BO_COND_FALSE
,
435 [TCG_COND_GT
] = BC
| BI (7, CR_GT
) | BO_COND_TRUE
,
436 [TCG_COND_LTU
] = BC
| BI (7, CR_LT
) | BO_COND_TRUE
,
437 [TCG_COND_GEU
] = BC
| BI (7, CR_LT
) | BO_COND_FALSE
,
438 [TCG_COND_LEU
] = BC
| BI (7, CR_GT
) | BO_COND_FALSE
,
439 [TCG_COND_GTU
] = BC
| BI (7, CR_GT
) | BO_COND_TRUE
,
442 static void tcg_out_mov(TCGContext
*s
, int ret
, int arg
)
444 tcg_out32 (s
, OR
| SAB (arg
, ret
, arg
));
447 static void tcg_out_movi(TCGContext
*s
, TCGType type
,
448 int ret
, tcg_target_long arg
)
450 if (arg
== (int16_t) arg
)
451 tcg_out32 (s
, ADDI
| RT (ret
) | RA (0) | (arg
& 0xffff));
453 tcg_out32 (s
, ADDIS
| RT (ret
) | RA (0) | ((arg
>> 16) & 0xffff));
455 tcg_out32 (s
, ORI
| RS (ret
) | RA (ret
) | (arg
& 0xffff));
459 static void tcg_out_ldst (TCGContext
*s
, int ret
, int addr
,
460 int offset
, int op1
, int op2
)
462 if (offset
== (int16_t) offset
)
463 tcg_out32 (s
, op1
| RT (ret
) | RA (addr
) | (offset
& 0xffff));
465 tcg_out_movi (s
, TCG_TYPE_I32
, 0, offset
);
466 tcg_out32 (s
, op2
| RT (ret
) | RA (addr
) | RB (0));
470 static void tcg_out_b (TCGContext
*s
, int mask
, tcg_target_long target
)
472 tcg_target_long disp
;
474 disp
= target
- (tcg_target_long
) s
->code_ptr
;
475 if ((disp
<< 6) >> 6 == disp
)
476 tcg_out32 (s
, B
| (disp
& 0x3fffffc) | mask
);
478 tcg_out_movi (s
, TCG_TYPE_I32
, 0, (tcg_target_long
) target
);
479 tcg_out32 (s
, MTSPR
| RS (0) | CTR
);
480 tcg_out32 (s
, BCCTR
| BO_ALWAYS
| mask
);
484 static void tcg_out_call (TCGContext
*s
, tcg_target_long arg
, int const_arg
)
491 tcg_out_movi (s
, TCG_TYPE_I32
, reg
, arg
);
495 tcg_out32 (s
, LWZ
| RT (0) | RA (reg
));
496 tcg_out32 (s
, MTSPR
| RA (0) | CTR
);
497 tcg_out32 (s
, LWZ
| RT (2) | RA (reg
) | 4);
498 tcg_out32 (s
, BCCTR
| BO_ALWAYS
| LK
);
501 tcg_out_b (s
, LK
, arg
);
504 tcg_out32 (s
, MTSPR
| RS (arg
) | LR
);
505 tcg_out32 (s
, BCLR
| BO_ALWAYS
| LK
);
510 #if defined(CONFIG_SOFTMMU)
512 #include "../../softmmu_defs.h"
514 static void *qemu_ld_helpers
[4] = {
521 static void *qemu_st_helpers
[4] = {
529 static void tcg_out_qemu_ld (TCGContext
*s
, const TCGArg
*args
, int opc
)
531 int addr_reg
, data_reg
, data_reg2
, r0
, r1
, rbase
, mem_index
, s_bits
, bswap
;
532 #ifdef CONFIG_SOFTMMU
534 void *label1_ptr
, *label2_ptr
;
536 #if TARGET_LONG_BITS == 64
546 #if TARGET_LONG_BITS == 64
552 #ifdef CONFIG_SOFTMMU
558 tcg_out32 (s
, (RLWINM
561 | SH (32 - (TARGET_PAGE_BITS
- CPU_TLB_ENTRY_BITS
))
562 | MB (32 - (CPU_TLB_BITS
+ CPU_TLB_ENTRY_BITS
))
563 | ME (31 - CPU_TLB_ENTRY_BITS
)
566 tcg_out32 (s
, ADD
| RT (r0
) | RA (r0
) | RB (TCG_AREG0
));
570 | offsetof (CPUState
, tlb_table
[mem_index
][0].addr_read
)
573 tcg_out32 (s
, (RLWINM
577 | MB ((32 - s_bits
) & 31)
578 | ME (31 - TARGET_PAGE_BITS
)
582 tcg_out32 (s
, CMP
| BF (7) | RA (r2
) | RB (r1
));
583 #if TARGET_LONG_BITS == 64
584 tcg_out32 (s
, LWZ
| RT (r1
) | RA (r0
) | 4);
585 tcg_out32 (s
, CMP
| BF (6) | RA (addr_reg2
) | RB (r1
));
586 tcg_out32 (s
, CRAND
| BT (7, CR_EQ
) | BA (6, CR_EQ
) | BB (7, CR_EQ
));
589 label1_ptr
= s
->code_ptr
;
591 tcg_out32 (s
, BC
| BI (7, CR_EQ
) | BO_COND_TRUE
);
595 #if TARGET_LONG_BITS == 32
596 tcg_out_mov (s
, 3, addr_reg
);
597 tcg_out_movi (s
, TCG_TYPE_I32
, 4, mem_index
);
599 tcg_out_mov (s
, 3, addr_reg2
);
600 tcg_out_mov (s
, 4, addr_reg
);
601 tcg_out_movi (s
, TCG_TYPE_I32
, 5, mem_index
);
604 tcg_out_call (s
, (tcg_target_long
) qemu_ld_helpers
[s_bits
], 1);
607 tcg_out32 (s
, EXTSB
| RA (data_reg
) | RS (3));
610 tcg_out32 (s
, EXTSH
| RA (data_reg
) | RS (3));
616 tcg_out_mov (s
, data_reg
, 3);
620 if (data_reg2
== 4) {
621 tcg_out_mov (s
, 0, 4);
622 tcg_out_mov (s
, 4, 3);
623 tcg_out_mov (s
, 3, 0);
626 tcg_out_mov (s
, data_reg2
, 3);
627 tcg_out_mov (s
, 3, 4);
631 if (data_reg
!= 4) tcg_out_mov (s
, data_reg
, 4);
632 if (data_reg2
!= 3) tcg_out_mov (s
, data_reg2
, 3);
636 label2_ptr
= s
->code_ptr
;
639 /* label1: fast path */
641 reloc_pc14 (label1_ptr
, (tcg_target_long
) s
->code_ptr
);
644 /* r0 now contains &env->tlb_table[mem_index][index].addr_read */
648 | (ADDEND_OFFSET
+ offsetof (CPUTLBEntry
, addend
)
649 - offsetof (CPUTLBEntry
, addr_read
))
651 /* r0 = env->tlb_table[mem_index][index].addend */
652 tcg_out32 (s
, ADD
| RT (r0
) | RA (r0
) | RB (addr_reg
));
653 /* r0 = env->tlb_table[mem_index][index].addend + addr */
655 #else /* !CONFIG_SOFTMMU */
658 rbase
= GUEST_BASE
? TCG_GUEST_BASE_REG
: 0;
661 #ifdef TARGET_WORDS_BIGENDIAN
670 tcg_out32 (s
, LBZX
| TAB (data_reg
, rbase
, r0
));
673 tcg_out32 (s
, LBZX
| TAB (data_reg
, rbase
, r0
));
674 tcg_out32 (s
, EXTSB
| RA (data_reg
) | RS (data_reg
));
678 tcg_out32 (s
, LHBRX
| TAB (data_reg
, rbase
, r0
));
680 tcg_out32 (s
, LHZX
| TAB (data_reg
, rbase
, r0
));
684 tcg_out32 (s
, LHBRX
| TAB (data_reg
, rbase
, r0
));
685 tcg_out32 (s
, EXTSH
| RA (data_reg
) | RS (data_reg
));
687 else tcg_out32 (s
, LHAX
| TAB (data_reg
, rbase
, r0
));
691 tcg_out32 (s
, LWBRX
| TAB (data_reg
, rbase
, r0
));
693 tcg_out32 (s
, LWZX
| TAB (data_reg
, rbase
, r0
));
697 tcg_out32 (s
, ADDI
| RT (r1
) | RA (r0
) | 4);
698 tcg_out32 (s
, LWBRX
| TAB (data_reg
, rbase
, r0
));
699 tcg_out32 (s
, LWBRX
| TAB (data_reg2
, rbase
, r1
));
702 #ifdef CONFIG_USE_GUEST_BASE
703 tcg_out32 (s
, ADDI
| RT (r1
) | RA (r0
) | 4);
704 tcg_out32 (s
, LWZX
| TAB (data_reg2
, rbase
, r0
));
705 tcg_out32 (s
, LWZX
| TAB (data_reg
, rbase
, r1
));
707 if (r0
== data_reg2
) {
708 tcg_out32 (s
, LWZ
| RT (0) | RA (r0
));
709 tcg_out32 (s
, LWZ
| RT (data_reg
) | RA (r0
) | 4);
710 tcg_out_mov (s
, data_reg2
, 0);
713 tcg_out32 (s
, LWZ
| RT (data_reg2
) | RA (r0
));
714 tcg_out32 (s
, LWZ
| RT (data_reg
) | RA (r0
) | 4);
721 #ifdef CONFIG_SOFTMMU
722 reloc_pc24 (label2_ptr
, (tcg_target_long
) s
->code_ptr
);
726 static void tcg_out_qemu_st (TCGContext
*s
, const TCGArg
*args
, int opc
)
728 int addr_reg
, r0
, r1
, data_reg
, data_reg2
, mem_index
, bswap
, rbase
;
729 #ifdef CONFIG_SOFTMMU
731 void *label1_ptr
, *label2_ptr
;
733 #if TARGET_LONG_BITS == 64
743 #if TARGET_LONG_BITS == 64
748 #ifdef CONFIG_SOFTMMU
754 tcg_out32 (s
, (RLWINM
757 | SH (32 - (TARGET_PAGE_BITS
- CPU_TLB_ENTRY_BITS
))
758 | MB (32 - (CPU_TLB_ENTRY_BITS
+ CPU_TLB_BITS
))
759 | ME (31 - CPU_TLB_ENTRY_BITS
)
762 tcg_out32 (s
, ADD
| RT (r0
) | RA (r0
) | RB (TCG_AREG0
));
766 | offsetof (CPUState
, tlb_table
[mem_index
][0].addr_write
)
769 tcg_out32 (s
, (RLWINM
773 | MB ((32 - opc
) & 31)
774 | ME (31 - TARGET_PAGE_BITS
)
778 tcg_out32 (s
, CMP
| (7 << 23) | RA (r2
) | RB (r1
));
779 #if TARGET_LONG_BITS == 64
780 tcg_out32 (s
, LWZ
| RT (r1
) | RA (r0
) | 4);
781 tcg_out32 (s
, CMP
| BF (6) | RA (addr_reg2
) | RB (r1
));
782 tcg_out32 (s
, CRAND
| BT (7, CR_EQ
) | BA (6, CR_EQ
) | BB (7, CR_EQ
));
785 label1_ptr
= s
->code_ptr
;
787 tcg_out32 (s
, BC
| BI (7, CR_EQ
) | BO_COND_TRUE
);
791 #if TARGET_LONG_BITS == 32
792 tcg_out_mov (s
, 3, addr_reg
);
795 tcg_out_mov (s
, 3, addr_reg2
);
796 tcg_out_mov (s
, 4, addr_reg
);
797 #ifdef TCG_TARGET_CALL_ALIGN_ARGS
806 tcg_out32 (s
, (RLWINM
814 tcg_out32 (s
, (RLWINM
822 tcg_out_mov (s
, ir
, data_reg
);
825 #ifdef TCG_TARGET_CALL_ALIGN_ARGS
828 tcg_out_mov (s
, ir
++, data_reg2
);
829 tcg_out_mov (s
, ir
, data_reg
);
834 tcg_out_movi (s
, TCG_TYPE_I32
, ir
, mem_index
);
835 tcg_out_call (s
, (tcg_target_long
) qemu_st_helpers
[opc
], 1);
836 label2_ptr
= s
->code_ptr
;
839 /* label1: fast path */
841 reloc_pc14 (label1_ptr
, (tcg_target_long
) s
->code_ptr
);
847 | (ADDEND_OFFSET
+ offsetof (CPUTLBEntry
, addend
)
848 - offsetof (CPUTLBEntry
, addr_write
))
850 /* r0 = env->tlb_table[mem_index][index].addend */
851 tcg_out32 (s
, ADD
| RT (r0
) | RA (r0
) | RB (addr_reg
));
852 /* r0 = env->tlb_table[mem_index][index].addend + addr */
854 #else /* !CONFIG_SOFTMMU */
857 rbase
= GUEST_BASE
? TCG_GUEST_BASE_REG
: 0;
860 #ifdef TARGET_WORDS_BIGENDIAN
867 tcg_out32 (s
, STBX
| SAB (data_reg
, rbase
, r0
));
871 tcg_out32 (s
, STHBRX
| SAB (data_reg
, rbase
, r0
));
873 tcg_out32 (s
, STHX
| SAB (data_reg
, rbase
, r0
));
877 tcg_out32 (s
, STWBRX
| SAB (data_reg
, rbase
, r0
));
879 tcg_out32 (s
, STWX
| SAB (data_reg
, rbase
, r0
));
883 tcg_out32 (s
, ADDI
| RT (r1
) | RA (r0
) | 4);
884 tcg_out32 (s
, STWBRX
| SAB (data_reg
, rbase
, r0
));
885 tcg_out32 (s
, STWBRX
| SAB (data_reg2
, rbase
, r1
));
888 #ifdef CONFIG_USE_GUEST_BASE
889 tcg_out32 (s
, STWX
| SAB (data_reg2
, rbase
, r0
));
890 tcg_out32 (s
, ADDI
| RT (r1
) | RA (r0
) | 4);
891 tcg_out32 (s
, STWX
| SAB (data_reg
, rbase
, r1
));
893 tcg_out32 (s
, STW
| RS (data_reg2
) | RA (r0
));
894 tcg_out32 (s
, STW
| RS (data_reg
) | RA (r0
) | 4);
900 #ifdef CONFIG_SOFTMMU
901 reloc_pc24 (label2_ptr
, (tcg_target_long
) s
->code_ptr
);
905 void tcg_target_qemu_prologue (TCGContext
*s
)
911 + TCG_STATIC_CALL_ARGS_SIZE
912 + ARRAY_SIZE (tcg_target_callee_save_regs
) * 4
914 frame_size
= (frame_size
+ 15) & ~15;
920 /* First emit adhoc function descriptor */
921 addr
= (uint32_t) s
->code_ptr
+ 12;
922 tcg_out32 (s
, addr
); /* entry point */
923 s
->code_ptr
+= 8; /* skip TOC and environment pointer */
926 tcg_out32 (s
, MFSPR
| RT (0) | LR
);
927 tcg_out32 (s
, STWU
| RS (1) | RA (1) | (-frame_size
& 0xffff));
928 for (i
= 0; i
< ARRAY_SIZE (tcg_target_callee_save_regs
); ++i
)
930 | RS (tcg_target_callee_save_regs
[i
])
932 | (i
* 4 + LINKAGE_AREA_SIZE
+ TCG_STATIC_CALL_ARGS_SIZE
)
935 tcg_out32 (s
, STW
| RS (0) | RA (1) | (frame_size
+ LR_OFFSET
));
937 #ifdef CONFIG_USE_GUEST_BASE
938 tcg_out_movi (s
, TCG_TYPE_I32
, TCG_GUEST_BASE_REG
, GUEST_BASE
);
941 tcg_out32 (s
, MTSPR
| RS (3) | CTR
);
942 tcg_out32 (s
, BCCTR
| BO_ALWAYS
);
943 tb_ret_addr
= s
->code_ptr
;
945 for (i
= 0; i
< ARRAY_SIZE (tcg_target_callee_save_regs
); ++i
)
947 | RT (tcg_target_callee_save_regs
[i
])
949 | (i
* 4 + LINKAGE_AREA_SIZE
+ TCG_STATIC_CALL_ARGS_SIZE
)
952 tcg_out32 (s
, LWZ
| RT (0) | RA (1) | (frame_size
+ LR_OFFSET
));
953 tcg_out32 (s
, MTSPR
| RS (0) | LR
);
954 tcg_out32 (s
, ADDI
| RT (1) | RA (1) | frame_size
);
955 tcg_out32 (s
, BCLR
| BO_ALWAYS
);
958 static void tcg_out_ld (TCGContext
*s
, TCGType type
, int ret
, int arg1
,
959 tcg_target_long arg2
)
961 tcg_out_ldst (s
, ret
, arg1
, arg2
, LWZ
, LWZX
);
964 static void tcg_out_st (TCGContext
*s
, TCGType type
, int arg
, int arg1
,
965 tcg_target_long arg2
)
967 tcg_out_ldst (s
, arg
, arg1
, arg2
, STW
, STWX
);
970 static void ppc_addi (TCGContext
*s
, int rt
, int ra
, tcg_target_long si
)
975 if (si
== (int16_t) si
)
976 tcg_out32 (s
, ADDI
| RT (rt
) | RA (ra
) | (si
& 0xffff));
978 uint16_t h
= ((si
>> 16) & 0xffff) + ((uint16_t) si
>> 15);
979 tcg_out32 (s
, ADDIS
| RT (rt
) | RA (ra
) | h
);
980 tcg_out32 (s
, ADDI
| RT (rt
) | RA (rt
) | (si
& 0xffff));
984 static void tcg_out_addi(TCGContext
*s
, int reg
, tcg_target_long val
)
986 ppc_addi (s
, reg
, reg
, val
);
989 static void tcg_out_cmp (TCGContext
*s
, int cond
, TCGArg arg1
, TCGArg arg2
,
990 int const_arg2
, int cr
)
999 if ((int16_t) arg2
== arg2
) {
1004 else if ((uint16_t) arg2
== arg2
) {
1019 if ((int16_t) arg2
== arg2
) {
1034 if ((uint16_t) arg2
== arg2
) {
1050 tcg_out32 (s
, op
| RA (arg1
) | (arg2
& 0xffff));
1053 tcg_out_movi (s
, TCG_TYPE_I32
, 0, arg2
);
1054 tcg_out32 (s
, op
| RA (arg1
) | RB (0));
1057 tcg_out32 (s
, op
| RA (arg1
) | RB (arg2
));
1062 static void tcg_out_bc (TCGContext
*s
, int bc
, int label_index
)
1064 TCGLabel
*l
= &s
->labels
[label_index
];
1067 tcg_out32 (s
, bc
| reloc_pc14_val (s
->code_ptr
, l
->u
.value
));
1069 uint16_t val
= *(uint16_t *) &s
->code_ptr
[2];
1071 /* Thanks to Andrzej Zaborowski */
1072 tcg_out32 (s
, bc
| (val
& 0xfffc));
1073 tcg_out_reloc (s
, s
->code_ptr
- 4, R_PPC_REL14
, label_index
, 0);
1077 static void tcg_out_cr7eq_from_cond (TCGContext
*s
, const TCGArg
*args
,
1078 const int *const_args
)
1080 int cond
= args
[4], op
;
1081 struct { int bit1
; int bit2
; int cond2
; } bits
[] = {
1082 [TCG_COND_LT
] = { CR_LT
, CR_LT
, TCG_COND_LT
},
1083 [TCG_COND_LE
] = { CR_LT
, CR_GT
, TCG_COND_LT
},
1084 [TCG_COND_GT
] = { CR_GT
, CR_GT
, TCG_COND_GT
},
1085 [TCG_COND_GE
] = { CR_GT
, CR_LT
, TCG_COND_GT
},
1086 [TCG_COND_LTU
] = { CR_LT
, CR_LT
, TCG_COND_LTU
},
1087 [TCG_COND_LEU
] = { CR_LT
, CR_GT
, TCG_COND_LTU
},
1088 [TCG_COND_GTU
] = { CR_GT
, CR_GT
, TCG_COND_GTU
},
1089 [TCG_COND_GEU
] = { CR_GT
, CR_LT
, TCG_COND_GTU
},
1090 }, *b
= &bits
[cond
];
1095 op
= (cond
== TCG_COND_EQ
) ? CRAND
: CRNAND
;
1096 tcg_out_cmp (s
, cond
, args
[0], args
[2], const_args
[2], 6);
1097 tcg_out_cmp (s
, cond
, args
[1], args
[3], const_args
[3], 7);
1098 tcg_out32 (s
, op
| BT (7, CR_EQ
) | BA (6, CR_EQ
) | BB (7, CR_EQ
));
1108 op
= (b
->bit1
!= b
->bit2
) ? CRANDC
: CRAND
;
1109 tcg_out_cmp (s
, b
->cond2
, args
[1], args
[3], const_args
[3], 5);
1110 tcg_out_cmp (s
, TCG_COND_EQ
, args
[1], args
[3], const_args
[3], 6);
1111 tcg_out_cmp (s
, cond
, args
[0], args
[2], const_args
[2], 7);
1112 tcg_out32 (s
, op
| BT (7, CR_EQ
) | BA (6, CR_EQ
) | BB (7, b
->bit2
));
1113 tcg_out32 (s
, CROR
| BT (7, CR_EQ
) | BA (5, b
->bit1
) | BB (7, CR_EQ
));
1120 static void tcg_out_setcond (TCGContext
*s
, int cond
, TCGArg arg0
,
1121 TCGArg arg1
, TCGArg arg2
, int const_arg2
)
1133 if ((uint16_t) arg2
== arg2
) {
1134 tcg_out32 (s
, XORI
| RS (arg1
) | RA (0) | arg2
);
1137 tcg_out_movi (s
, TCG_TYPE_I32
, 0, arg2
);
1138 tcg_out32 (s
, XOR
| SAB (arg1
, 0, 0));
1144 tcg_out32 (s
, XOR
| SAB (arg1
, 0, arg2
));
1146 tcg_out32 (s
, CNTLZW
| RS (arg
) | RA (0));
1147 tcg_out32 (s
, (RLWINM
1164 if ((uint16_t) arg2
== arg2
) {
1165 tcg_out32 (s
, XORI
| RS (arg1
) | RA (0) | arg2
);
1168 tcg_out_movi (s
, TCG_TYPE_I32
, 0, arg2
);
1169 tcg_out32 (s
, XOR
| SAB (arg1
, 0, 0));
1175 tcg_out32 (s
, XOR
| SAB (arg1
, 0, arg2
));
1178 if (arg
== arg1
&& arg1
== arg0
) {
1179 tcg_out32 (s
, ADDIC
| RT (0) | RA (arg
) | 0xffff);
1180 tcg_out32 (s
, SUBFE
| TAB (arg0
, 0, arg
));
1183 tcg_out32 (s
, ADDIC
| RT (arg0
) | RA (arg
) | 0xffff);
1184 tcg_out32 (s
, SUBFE
| TAB (arg0
, arg0
, arg
));
1203 crop
= CRNOR
| BT (7, CR_EQ
) | BA (7, CR_LT
) | BB (7, CR_LT
);
1209 crop
= CRNOR
| BT (7, CR_EQ
) | BA (7, CR_GT
) | BB (7, CR_GT
);
1211 tcg_out_cmp (s
, cond
, arg1
, arg2
, const_arg2
, 7);
1212 if (crop
) tcg_out32 (s
, crop
);
1213 tcg_out32 (s
, MFCR
| RT (0));
1214 tcg_out32 (s
, (RLWINM
1229 static void tcg_out_setcond2 (TCGContext
*s
, const TCGArg
*args
,
1230 const int *const_args
)
1232 tcg_out_cr7eq_from_cond (s
, args
+ 1, const_args
+ 1);
1233 tcg_out32 (s
, MFCR
| RT (0));
1234 tcg_out32 (s
, (RLWINM
1244 static void tcg_out_brcond (TCGContext
*s
, int cond
,
1245 TCGArg arg1
, TCGArg arg2
, int const_arg2
,
1248 tcg_out_cmp (s
, cond
, arg1
, arg2
, const_arg2
, 7);
1249 tcg_out_bc (s
, tcg_to_bc
[cond
], label_index
);
1252 /* XXX: we implement it at the target level to avoid having to
1253 handle cross basic blocks temporaries */
1254 static void tcg_out_brcond2 (TCGContext
*s
, const TCGArg
*args
,
1255 const int *const_args
)
1257 tcg_out_cr7eq_from_cond (s
, args
, const_args
);
1258 tcg_out_bc (s
, (BC
| BI (7, CR_EQ
) | BO_COND_TRUE
), args
[5]);
1261 void ppc_tb_set_jmp_target (unsigned long jmp_addr
, unsigned long addr
)
1264 long disp
= addr
- jmp_addr
;
1265 unsigned long patch_size
;
1267 ptr
= (uint32_t *)jmp_addr
;
1269 if ((disp
<< 6) >> 6 != disp
) {
1270 ptr
[0] = 0x3c000000 | (addr
>> 16); /* lis 0,addr@ha */
1271 ptr
[1] = 0x60000000 | (addr
& 0xffff); /* la 0,addr@l(0) */
1272 ptr
[2] = 0x7c0903a6; /* mtctr 0 */
1273 ptr
[3] = 0x4e800420; /* brctr */
1276 /* patch the branch destination */
1278 *ptr
= 0x48000000 | (disp
& 0x03fffffc); /* b disp */
1281 ptr
[0] = 0x60000000; /* nop */
1282 ptr
[1] = 0x60000000;
1283 ptr
[2] = 0x60000000;
1284 ptr
[3] = 0x60000000;
1289 flush_icache_range(jmp_addr
, jmp_addr
+ patch_size
);
1292 static void tcg_out_op(TCGContext
*s
, int opc
, const TCGArg
*args
,
1293 const int *const_args
)
1296 case INDEX_op_exit_tb
:
1297 tcg_out_movi (s
, TCG_TYPE_I32
, TCG_REG_R3
, args
[0]);
1298 tcg_out_b (s
, 0, (tcg_target_long
) tb_ret_addr
);
1300 case INDEX_op_goto_tb
:
1301 if (s
->tb_jmp_offset
) {
1302 /* direct jump method */
1304 s
->tb_jmp_offset
[args
[0]] = s
->code_ptr
- s
->code_buf
;
1310 s
->tb_next_offset
[args
[0]] = s
->code_ptr
- s
->code_buf
;
1314 TCGLabel
*l
= &s
->labels
[args
[0]];
1317 tcg_out_b (s
, 0, l
->u
.value
);
1320 uint32_t val
= *(uint32_t *) s
->code_ptr
;
1322 /* Thanks to Andrzej Zaborowski */
1323 tcg_out32 (s
, B
| (val
& 0x3fffffc));
1324 tcg_out_reloc (s
, s
->code_ptr
- 4, R_PPC_REL24
, args
[0], 0);
1329 tcg_out_call (s
, args
[0], const_args
[0]);
1332 if (const_args
[0]) {
1333 tcg_out_b (s
, 0, args
[0]);
1336 tcg_out32 (s
, MTSPR
| RS (args
[0]) | CTR
);
1337 tcg_out32 (s
, BCCTR
| BO_ALWAYS
);
1340 case INDEX_op_movi_i32
:
1341 tcg_out_movi(s
, TCG_TYPE_I32
, args
[0], args
[1]);
1343 case INDEX_op_ld8u_i32
:
1344 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LBZ
, LBZX
);
1346 case INDEX_op_ld8s_i32
:
1347 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LBZ
, LBZX
);
1348 tcg_out32 (s
, EXTSB
| RS (args
[0]) | RA (args
[0]));
1350 case INDEX_op_ld16u_i32
:
1351 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LHZ
, LHZX
);
1353 case INDEX_op_ld16s_i32
:
1354 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LHA
, LHAX
);
1356 case INDEX_op_ld_i32
:
1357 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LWZ
, LWZX
);
1359 case INDEX_op_st8_i32
:
1360 tcg_out_ldst (s
, args
[0], args
[1], args
[2], STB
, STBX
);
1362 case INDEX_op_st16_i32
:
1363 tcg_out_ldst (s
, args
[0], args
[1], args
[2], STH
, STHX
);
1365 case INDEX_op_st_i32
:
1366 tcg_out_ldst (s
, args
[0], args
[1], args
[2], STW
, STWX
);
1369 case INDEX_op_add_i32
:
1371 ppc_addi (s
, args
[0], args
[1], args
[2]);
1373 tcg_out32 (s
, ADD
| TAB (args
[0], args
[1], args
[2]));
1375 case INDEX_op_sub_i32
:
1377 ppc_addi (s
, args
[0], args
[1], -args
[2]);
1379 tcg_out32 (s
, SUBF
| TAB (args
[0], args
[2], args
[1]));
1382 case INDEX_op_and_i32
:
1383 if (const_args
[2]) {
1389 tcg_out_movi (s
, TCG_TYPE_I32
, args
[0], 0);
1399 if ((t
& (t
- 1)) == 0) {
1402 if ((c
& 0x80000001) == 0x80000001) {
1417 tcg_out32 (s
, (RLWINM
1427 #endif /* !__PPU__ */
1429 if ((c
& 0xffff) == c
)
1430 tcg_out32 (s
, ANDI
| RS (args
[1]) | RA (args
[0]) | c
);
1431 else if ((c
& 0xffff0000) == c
)
1432 tcg_out32 (s
, ANDIS
| RS (args
[1]) | RA (args
[0])
1433 | ((c
>> 16) & 0xffff));
1435 tcg_out_movi (s
, TCG_TYPE_I32
, 0, c
);
1436 tcg_out32 (s
, AND
| SAB (args
[1], args
[0], 0));
1441 tcg_out32 (s
, AND
| SAB (args
[1], args
[0], args
[2]));
1443 case INDEX_op_or_i32
:
1444 if (const_args
[2]) {
1445 if (args
[2] & 0xffff) {
1446 tcg_out32 (s
, ORI
| RS (args
[1]) | RA (args
[0])
1447 | (args
[2] & 0xffff));
1449 tcg_out32 (s
, ORIS
| RS (args
[0]) | RA (args
[0])
1450 | ((args
[2] >> 16) & 0xffff));
1453 tcg_out32 (s
, ORIS
| RS (args
[1]) | RA (args
[0])
1454 | ((args
[2] >> 16) & 0xffff));
1458 tcg_out32 (s
, OR
| SAB (args
[1], args
[0], args
[2]));
1460 case INDEX_op_xor_i32
:
1461 if (const_args
[2]) {
1462 if ((args
[2] & 0xffff) == args
[2])
1463 tcg_out32 (s
, XORI
| RS (args
[1]) | RA (args
[0])
1464 | (args
[2] & 0xffff));
1465 else if ((args
[2] & 0xffff0000) == args
[2])
1466 tcg_out32 (s
, XORIS
| RS (args
[1]) | RA (args
[0])
1467 | ((args
[2] >> 16) & 0xffff));
1469 tcg_out_movi (s
, TCG_TYPE_I32
, 0, args
[2]);
1470 tcg_out32 (s
, XOR
| SAB (args
[1], args
[0], 0));
1474 tcg_out32 (s
, XOR
| SAB (args
[1], args
[0], args
[2]));
1476 case INDEX_op_andc_i32
:
1477 tcg_out32 (s
, ANDC
| SAB (args
[1], args
[0], args
[2]));
1479 case INDEX_op_orc_i32
:
1480 tcg_out32 (s
, ORC
| SAB (args
[1], args
[0], args
[2]));
1483 case INDEX_op_mul_i32
:
1484 if (const_args
[2]) {
1485 if (args
[2] == (int16_t) args
[2])
1486 tcg_out32 (s
, MULLI
| RT (args
[0]) | RA (args
[1])
1487 | (args
[2] & 0xffff));
1489 tcg_out_movi (s
, TCG_TYPE_I32
, 0, args
[2]);
1490 tcg_out32 (s
, MULLW
| TAB (args
[0], args
[1], 0));
1494 tcg_out32 (s
, MULLW
| TAB (args
[0], args
[1], args
[2]));
1497 case INDEX_op_div_i32
:
1498 tcg_out32 (s
, DIVW
| TAB (args
[0], args
[1], args
[2]));
1501 case INDEX_op_divu_i32
:
1502 tcg_out32 (s
, DIVWU
| TAB (args
[0], args
[1], args
[2]));
1505 case INDEX_op_rem_i32
:
1506 tcg_out32 (s
, DIVW
| TAB (0, args
[1], args
[2]));
1507 tcg_out32 (s
, MULLW
| TAB (0, 0, args
[2]));
1508 tcg_out32 (s
, SUBF
| TAB (args
[0], 0, args
[1]));
1511 case INDEX_op_remu_i32
:
1512 tcg_out32 (s
, DIVWU
| TAB (0, args
[1], args
[2]));
1513 tcg_out32 (s
, MULLW
| TAB (0, 0, args
[2]));
1514 tcg_out32 (s
, SUBF
| TAB (args
[0], 0, args
[1]));
1517 case INDEX_op_mulu2_i32
:
1518 if (args
[0] == args
[2] || args
[0] == args
[3]) {
1519 tcg_out32 (s
, MULLW
| TAB (0, args
[2], args
[3]));
1520 tcg_out32 (s
, MULHWU
| TAB (args
[1], args
[2], args
[3]));
1521 tcg_out_mov (s
, args
[0], 0);
1524 tcg_out32 (s
, MULLW
| TAB (args
[0], args
[2], args
[3]));
1525 tcg_out32 (s
, MULHWU
| TAB (args
[1], args
[2], args
[3]));
1529 case INDEX_op_shl_i32
:
1530 if (const_args
[2]) {
1531 tcg_out32 (s
, (RLWINM
1541 tcg_out32 (s
, SLW
| SAB (args
[1], args
[0], args
[2]));
1543 case INDEX_op_shr_i32
:
1544 if (const_args
[2]) {
1545 tcg_out32 (s
, (RLWINM
1555 tcg_out32 (s
, SRW
| SAB (args
[1], args
[0], args
[2]));
1557 case INDEX_op_sar_i32
:
1559 tcg_out32 (s
, SRAWI
| RS (args
[1]) | RA (args
[0]) | SH (args
[2]));
1561 tcg_out32 (s
, SRAW
| SAB (args
[1], args
[0], args
[2]));
1563 case INDEX_op_rotl_i32
:
1570 | (const_args
[2] ? RLWINM
| SH (args
[2])
1571 : RLWNM
| RB (args
[2]))
1576 case INDEX_op_rotr_i32
:
1577 if (const_args
[2]) {
1579 tcg_out_mov (s
, args
[0], args
[1]);
1582 tcg_out32 (s
, RLWINM
1592 tcg_out32 (s
, SUBFIC
| RT (0) | RA (args
[2]) | 32);
1603 case INDEX_op_add2_i32
:
1604 if (args
[0] == args
[3] || args
[0] == args
[5]) {
1605 tcg_out32 (s
, ADDC
| TAB (0, args
[2], args
[4]));
1606 tcg_out32 (s
, ADDE
| TAB (args
[1], args
[3], args
[5]));
1607 tcg_out_mov (s
, args
[0], 0);
1610 tcg_out32 (s
, ADDC
| TAB (args
[0], args
[2], args
[4]));
1611 tcg_out32 (s
, ADDE
| TAB (args
[1], args
[3], args
[5]));
1614 case INDEX_op_sub2_i32
:
1615 if (args
[0] == args
[3] || args
[0] == args
[5]) {
1616 tcg_out32 (s
, SUBFC
| TAB (0, args
[4], args
[2]));
1617 tcg_out32 (s
, SUBFE
| TAB (args
[1], args
[5], args
[3]));
1618 tcg_out_mov (s
, args
[0], 0);
1621 tcg_out32 (s
, SUBFC
| TAB (args
[0], args
[4], args
[2]));
1622 tcg_out32 (s
, SUBFE
| TAB (args
[1], args
[5], args
[3]));
1626 case INDEX_op_brcond_i32
:
1631 args[3] = r1 is const
1632 args[4] = label_index
1634 tcg_out_brcond (s
, args
[2], args
[0], args
[1], const_args
[1], args
[3]);
1636 case INDEX_op_brcond2_i32
:
1637 tcg_out_brcond2(s
, args
, const_args
);
1640 case INDEX_op_neg_i32
:
1641 tcg_out32 (s
, NEG
| RT (args
[0]) | RA (args
[1]));
1644 case INDEX_op_not_i32
:
1645 tcg_out32 (s
, NOR
| SAB (args
[1], args
[0], args
[0]));
1648 case INDEX_op_qemu_ld8u
:
1649 tcg_out_qemu_ld(s
, args
, 0);
1651 case INDEX_op_qemu_ld8s
:
1652 tcg_out_qemu_ld(s
, args
, 0 | 4);
1654 case INDEX_op_qemu_ld16u
:
1655 tcg_out_qemu_ld(s
, args
, 1);
1657 case INDEX_op_qemu_ld16s
:
1658 tcg_out_qemu_ld(s
, args
, 1 | 4);
1660 case INDEX_op_qemu_ld32u
:
1661 tcg_out_qemu_ld(s
, args
, 2);
1663 case INDEX_op_qemu_ld64
:
1664 tcg_out_qemu_ld(s
, args
, 3);
1666 case INDEX_op_qemu_st8
:
1667 tcg_out_qemu_st(s
, args
, 0);
1669 case INDEX_op_qemu_st16
:
1670 tcg_out_qemu_st(s
, args
, 1);
1672 case INDEX_op_qemu_st32
:
1673 tcg_out_qemu_st(s
, args
, 2);
1675 case INDEX_op_qemu_st64
:
1676 tcg_out_qemu_st(s
, args
, 3);
1679 case INDEX_op_ext8s_i32
:
1680 tcg_out32 (s
, EXTSB
| RS (args
[1]) | RA (args
[0]));
1682 case INDEX_op_ext8u_i32
:
1683 tcg_out32 (s
, RLWINM
1691 case INDEX_op_ext16s_i32
:
1692 tcg_out32 (s
, EXTSH
| RS (args
[1]) | RA (args
[0]));
1694 case INDEX_op_ext16u_i32
:
1695 tcg_out32 (s
, RLWINM
1704 case INDEX_op_setcond_i32
:
1705 tcg_out_setcond (s
, args
[3], args
[0], args
[1], args
[2], const_args
[2]);
1707 case INDEX_op_setcond2_i32
:
1708 tcg_out_setcond2 (s
, args
, const_args
);
1712 tcg_dump_ops (s
, stderr
);
1717 static const TCGTargetOpDef ppc_op_defs
[] = {
1718 { INDEX_op_exit_tb
, { } },
1719 { INDEX_op_goto_tb
, { } },
1720 { INDEX_op_call
, { "ri" } },
1721 { INDEX_op_jmp
, { "ri" } },
1722 { INDEX_op_br
, { } },
1724 { INDEX_op_mov_i32
, { "r", "r" } },
1725 { INDEX_op_movi_i32
, { "r" } },
1726 { INDEX_op_ld8u_i32
, { "r", "r" } },
1727 { INDEX_op_ld8s_i32
, { "r", "r" } },
1728 { INDEX_op_ld16u_i32
, { "r", "r" } },
1729 { INDEX_op_ld16s_i32
, { "r", "r" } },
1730 { INDEX_op_ld_i32
, { "r", "r" } },
1731 { INDEX_op_st8_i32
, { "r", "r" } },
1732 { INDEX_op_st16_i32
, { "r", "r" } },
1733 { INDEX_op_st_i32
, { "r", "r" } },
1735 { INDEX_op_add_i32
, { "r", "r", "ri" } },
1736 { INDEX_op_mul_i32
, { "r", "r", "ri" } },
1737 { INDEX_op_div_i32
, { "r", "r", "r" } },
1738 { INDEX_op_divu_i32
, { "r", "r", "r" } },
1739 { INDEX_op_rem_i32
, { "r", "r", "r" } },
1740 { INDEX_op_remu_i32
, { "r", "r", "r" } },
1741 { INDEX_op_mulu2_i32
, { "r", "r", "r", "r" } },
1742 { INDEX_op_sub_i32
, { "r", "r", "ri" } },
1743 { INDEX_op_and_i32
, { "r", "r", "ri" } },
1744 { INDEX_op_or_i32
, { "r", "r", "ri" } },
1745 { INDEX_op_xor_i32
, { "r", "r", "ri" } },
1747 { INDEX_op_shl_i32
, { "r", "r", "ri" } },
1748 { INDEX_op_shr_i32
, { "r", "r", "ri" } },
1749 { INDEX_op_sar_i32
, { "r", "r", "ri" } },
1751 { INDEX_op_rotl_i32
, { "r", "r", "ri" } },
1752 { INDEX_op_rotr_i32
, { "r", "r", "ri" } },
1754 { INDEX_op_brcond_i32
, { "r", "ri" } },
1756 { INDEX_op_add2_i32
, { "r", "r", "r", "r", "r", "r" } },
1757 { INDEX_op_sub2_i32
, { "r", "r", "r", "r", "r", "r" } },
1758 { INDEX_op_brcond2_i32
, { "r", "r", "r", "r" } },
1760 { INDEX_op_neg_i32
, { "r", "r" } },
1761 { INDEX_op_not_i32
, { "r", "r" } },
1763 { INDEX_op_andc_i32
, { "r", "r", "r" } },
1764 { INDEX_op_orc_i32
, { "r", "r", "r" } },
1766 { INDEX_op_setcond_i32
, { "r", "r", "ri" } },
1767 { INDEX_op_setcond2_i32
, { "r", "r", "r", "ri", "ri" } },
1769 #if TARGET_LONG_BITS == 32
1770 { INDEX_op_qemu_ld8u
, { "r", "L" } },
1771 { INDEX_op_qemu_ld8s
, { "r", "L" } },
1772 { INDEX_op_qemu_ld16u
, { "r", "L" } },
1773 { INDEX_op_qemu_ld16s
, { "r", "L" } },
1774 { INDEX_op_qemu_ld32u
, { "r", "L" } },
1775 { INDEX_op_qemu_ld64
, { "r", "r", "L" } },
1777 { INDEX_op_qemu_st8
, { "K", "K" } },
1778 { INDEX_op_qemu_st16
, { "K", "K" } },
1779 { INDEX_op_qemu_st32
, { "K", "K" } },
1780 { INDEX_op_qemu_st64
, { "M", "M", "M" } },
1782 { INDEX_op_qemu_ld8u
, { "r", "L", "L" } },
1783 { INDEX_op_qemu_ld8s
, { "r", "L", "L" } },
1784 { INDEX_op_qemu_ld16u
, { "r", "L", "L" } },
1785 { INDEX_op_qemu_ld16s
, { "r", "L", "L" } },
1786 { INDEX_op_qemu_ld32u
, { "r", "L", "L" } },
1787 { INDEX_op_qemu_ld64
, { "r", "L", "L", "L" } },
1789 { INDEX_op_qemu_st8
, { "K", "K", "K" } },
1790 { INDEX_op_qemu_st16
, { "K", "K", "K" } },
1791 { INDEX_op_qemu_st32
, { "K", "K", "K" } },
1792 { INDEX_op_qemu_st64
, { "M", "M", "M", "M" } },
1795 { INDEX_op_ext8s_i32
, { "r", "r" } },
1796 { INDEX_op_ext8u_i32
, { "r", "r" } },
1797 { INDEX_op_ext16s_i32
, { "r", "r" } },
1798 { INDEX_op_ext16u_i32
, { "r", "r" } },
1803 void tcg_target_init(TCGContext
*s
)
1805 tcg_regset_set32(tcg_target_available_regs
[TCG_TYPE_I32
], 0, 0xffffffff);
1806 tcg_regset_set32(tcg_target_call_clobber_regs
, 0,
1818 (1 << TCG_REG_R10
) |
1819 (1 << TCG_REG_R11
) |
1823 tcg_regset_clear(s
->reserved_regs
);
1824 tcg_regset_set_reg(s
->reserved_regs
, TCG_REG_R0
);
1825 tcg_regset_set_reg(s
->reserved_regs
, TCG_REG_R1
);
1826 #ifndef _CALL_DARWIN
1827 tcg_regset_set_reg(s
->reserved_regs
, TCG_REG_R2
);
1830 tcg_regset_set_reg(s
->reserved_regs
, TCG_REG_R13
);
1832 #ifdef CONFIG_USE_GUEST_BASE
1833 tcg_regset_set_reg(s
->reserved_regs
, TCG_GUEST_BASE_REG
);
1836 tcg_add_target_add_op_defs(ppc_op_defs
);