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 #define TCG_CT_CONST_U32 0x100
27 static uint8_t *tb_ret_addr
;
31 #if TARGET_PHYS_ADDR_BITS == 32
37 #if TARGET_LONG_BITS == 32
45 static const char * const tcg_target_reg_names
[TCG_TARGET_NB_REGS
] = {
80 static const int tcg_target_reg_alloc_order
[] = {
115 static const int tcg_target_call_iarg_regs
[] = {
126 static const int tcg_target_call_oarg_regs
[2] = {
130 static const int tcg_target_callee_save_regs
[] = {
147 static uint32_t reloc_pc24_val (void *pc
, tcg_target_long target
)
149 tcg_target_long disp
;
151 disp
= target
- (tcg_target_long
) pc
;
152 if ((disp
<< 38) >> 38 != disp
)
155 return disp
& 0x3fffffc;
158 static void reloc_pc24 (void *pc
, tcg_target_long target
)
160 *(uint32_t *) pc
= (*(uint32_t *) pc
& ~0x3fffffc)
161 | reloc_pc24_val (pc
, target
);
164 static uint16_t reloc_pc14_val (void *pc
, tcg_target_long target
)
166 tcg_target_long disp
;
168 disp
= target
- (tcg_target_long
) pc
;
169 if (disp
!= (int16_t) disp
)
172 return disp
& 0xfffc;
175 static void reloc_pc14 (void *pc
, tcg_target_long target
)
177 *(uint32_t *) pc
= (*(uint32_t *) pc
& ~0xfffc)
178 | reloc_pc14_val (pc
, target
);
181 static void patch_reloc (uint8_t *code_ptr
, int type
,
182 tcg_target_long value
, tcg_target_long addend
)
187 reloc_pc14 (code_ptr
, value
);
190 reloc_pc24 (code_ptr
, value
);
197 /* maximum number of register used for input function arguments */
198 static int tcg_target_get_call_iarg_regs_count (int flags
)
200 return sizeof (tcg_target_call_iarg_regs
) / sizeof (tcg_target_call_iarg_regs
[0]);
203 /* parse target specific constraints */
204 static int target_parse_constraint (TCGArgConstraint
*ct
, const char **pct_str
)
210 case 'A': case 'B': case 'C': case 'D':
211 ct
->ct
|= TCG_CT_REG
;
212 tcg_regset_set_reg (ct
->u
.regs
, 3 + ct_str
[0] - 'A');
215 ct
->ct
|= TCG_CT_REG
;
216 tcg_regset_set32 (ct
->u
.regs
, 0, 0xffffffff);
218 case 'L': /* qemu_ld constraint */
219 ct
->ct
|= TCG_CT_REG
;
220 tcg_regset_set32 (ct
->u
.regs
, 0, 0xffffffff);
221 tcg_regset_reset_reg (ct
->u
.regs
, TCG_REG_R3
);
222 tcg_regset_reset_reg (ct
->u
.regs
, TCG_REG_R4
);
224 case 'S': /* qemu_st constraint */
225 ct
->ct
|= TCG_CT_REG
;
226 tcg_regset_set32 (ct
->u
.regs
, 0, 0xffffffff);
227 tcg_regset_reset_reg (ct
->u
.regs
, TCG_REG_R3
);
228 tcg_regset_reset_reg (ct
->u
.regs
, TCG_REG_R4
);
229 tcg_regset_reset_reg (ct
->u
.regs
, TCG_REG_R5
);
232 ct
->ct
|= TCG_CT_CONST_U32
;
242 /* test if a constant matches the constraint */
243 static int tcg_target_const_match (tcg_target_long val
,
244 const TCGArgConstraint
*arg_ct
)
249 if (ct
& TCG_CT_CONST
)
251 else if ((ct
& TCG_CT_CONST_U32
) && (val
== (uint32_t) val
))
256 #define OPCD(opc) ((opc)<<26)
257 #define XO19(opc) (OPCD(19)|((opc)<<1))
258 #define XO30(opc) (OPCD(30)|((opc)<<2))
259 #define XO31(opc) (OPCD(31)|((opc)<<1))
260 #define XO58(opc) (OPCD(58)|(opc))
261 #define XO62(opc) (OPCD(62)|(opc))
265 #define LBZ OPCD( 34)
266 #define LHZ OPCD( 40)
267 #define LHA OPCD( 42)
268 #define LWZ OPCD( 32)
269 #define STB OPCD( 38)
270 #define STH OPCD( 44)
271 #define STW OPCD( 36)
274 #define STDU XO62( 1)
275 #define STDX XO31(149)
278 #define LDX XO31( 21)
281 #define LWAX XO31(341)
283 #define ADDI OPCD( 14)
284 #define ADDIS OPCD( 15)
285 #define ORI OPCD( 24)
286 #define ORIS OPCD( 25)
287 #define XORI OPCD( 26)
288 #define XORIS OPCD( 27)
289 #define ANDI OPCD( 28)
290 #define ANDIS OPCD( 29)
291 #define MULLI OPCD( 7)
292 #define CMPLI OPCD( 10)
293 #define CMPI OPCD( 11)
295 #define LWZU OPCD( 33)
296 #define STWU OPCD( 37)
298 #define RLWINM OPCD( 21)
300 #define RLDICL XO30( 0)
301 #define RLDICR XO30( 1)
303 #define BCLR XO19( 16)
304 #define BCCTR XO19(528)
305 #define CRAND XO19(257)
306 #define CRANDC XO19(129)
307 #define CRNAND XO19(225)
308 #define CROR XO19(449)
310 #define EXTSB XO31(954)
311 #define EXTSH XO31(922)
312 #define EXTSW XO31(986)
313 #define ADD XO31(266)
314 #define ADDE XO31(138)
315 #define ADDC XO31( 10)
316 #define AND XO31( 28)
317 #define SUBF XO31( 40)
318 #define SUBFC XO31( 8)
319 #define SUBFE XO31(136)
321 #define XOR XO31(316)
322 #define MULLW XO31(235)
323 #define MULHWU XO31( 11)
324 #define DIVW XO31(491)
325 #define DIVWU XO31(459)
327 #define CMPL XO31( 32)
328 #define LHBRX XO31(790)
329 #define LWBRX XO31(534)
330 #define STHBRX XO31(918)
331 #define STWBRX XO31(662)
332 #define MFSPR XO31(339)
333 #define MTSPR XO31(467)
334 #define SRAWI XO31(824)
335 #define NEG XO31(104)
337 #define MULLD XO31(233)
338 #define MULHD XO31( 73)
339 #define MULHDU XO31( 9)
340 #define DIVD XO31(489)
341 #define DIVDU XO31(457)
343 #define LBZX XO31( 87)
344 #define LHZX XO31(276)
345 #define LHAX XO31(343)
346 #define LWZX XO31( 23)
347 #define STBX XO31(215)
348 #define STHX XO31(407)
349 #define STWX XO31(151)
351 #define SPR(a,b) ((((a)<<5)|(b))<<11)
353 #define CTR SPR(9, 0)
355 #define SLW XO31( 24)
356 #define SRW XO31(536)
357 #define SRAW XO31(792)
359 #define SLD XO31( 27)
360 #define SRD XO31(539)
361 #define SRAD XO31(794)
362 #define SRADI XO31(413<<1)
364 #define LMW OPCD( 46)
365 #define STMW OPCD( 47)
368 #define TRAP (TW | TO (31))
370 #define RT(r) ((r)<<21)
371 #define RS(r) ((r)<<21)
372 #define RA(r) ((r)<<16)
373 #define RB(r) ((r)<<11)
374 #define TO(t) ((t)<<21)
375 #define SH(s) ((s)<<11)
376 #define MB(b) ((b)<<6)
377 #define ME(e) ((e)<<1)
378 #define BO(o) ((o)<<21)
379 #define MB64(b) ((b)<<5)
383 #define TAB(t,a,b) (RT(t) | RA(a) | RB(b))
384 #define SAB(s,a,b) (RS(s) | RA(a) | RB(b))
386 #define BF(n) ((n)<<23)
387 #define BI(n, c) (((c)+((n)*4))<<16)
388 #define BT(n, c) (((c)+((n)*4))<<21)
389 #define BA(n, c) (((c)+((n)*4))<<16)
390 #define BB(n, c) (((c)+((n)*4))<<11)
392 #define BO_COND_TRUE BO (12)
393 #define BO_COND_FALSE BO ( 4)
394 #define BO_ALWAYS BO (20)
403 static const uint32_t tcg_to_bc
[10] = {
404 [TCG_COND_EQ
] = BC
| BI (7, CR_EQ
) | BO_COND_TRUE
,
405 [TCG_COND_NE
] = BC
| BI (7, CR_EQ
) | BO_COND_FALSE
,
406 [TCG_COND_LT
] = BC
| BI (7, CR_LT
) | BO_COND_TRUE
,
407 [TCG_COND_GE
] = BC
| BI (7, CR_LT
) | BO_COND_FALSE
,
408 [TCG_COND_LE
] = BC
| BI (7, CR_GT
) | BO_COND_FALSE
,
409 [TCG_COND_GT
] = BC
| BI (7, CR_GT
) | BO_COND_TRUE
,
410 [TCG_COND_LTU
] = BC
| BI (7, CR_LT
) | BO_COND_TRUE
,
411 [TCG_COND_GEU
] = BC
| BI (7, CR_LT
) | BO_COND_FALSE
,
412 [TCG_COND_LEU
] = BC
| BI (7, CR_GT
) | BO_COND_FALSE
,
413 [TCG_COND_GTU
] = BC
| BI (7, CR_GT
) | BO_COND_TRUE
,
416 static void tcg_out_mov (TCGContext
*s
, int ret
, int arg
)
418 tcg_out32 (s
, OR
| SAB (arg
, ret
, arg
));
421 static void tcg_out_rld (TCGContext
*s
, int op
, int ra
, int rs
, int sh
, int mb
)
423 sh
= SH (sh
& 0x1f) | (((sh
>> 5) & 1) << 1);
424 mb
= MB64 ((mb
>> 5) | ((mb
<< 1) & 0x3f));
425 tcg_out32 (s
, op
| RA (ra
) | RS (rs
) | sh
| mb
);
428 static void tcg_out_movi32 (TCGContext
*s
, int ret
, int32_t arg
)
430 if (arg
== (int16_t) arg
)
431 tcg_out32 (s
, ADDI
| RT (ret
) | RA (0) | (arg
& 0xffff));
433 tcg_out32 (s
, ADDIS
| RT (ret
) | RA (0) | ((arg
>> 16) & 0xffff));
435 tcg_out32 (s
, ORI
| RS (ret
) | RA (ret
) | (arg
& 0xffff));
439 static void tcg_out_movi (TCGContext
*s
, TCGType type
,
440 int ret
, tcg_target_long arg
)
444 if (type
== TCG_TYPE_I32
|| arg
== arg32
) {
445 tcg_out_movi32 (s
, ret
, arg32
);
448 if ((uint64_t) arg
>> 32) {
449 uint16_t h16
= arg
>> 16;
452 tcg_out_movi32 (s
, ret
, arg
>> 32);
453 tcg_out_rld (s
, RLDICR
, ret
, ret
, 32, 31);
454 if (h16
) tcg_out32 (s
, ORIS
| RS (ret
) | RA (ret
) | h16
);
455 if (l16
) tcg_out32 (s
, ORI
| RS (ret
) | RA (ret
) | l16
);
458 tcg_out_movi32 (s
, ret
, arg32
);
460 tcg_out_rld (s
, RLDICL
, ret
, ret
, 0, 32);
465 static void tcg_out_call (TCGContext
*s
, tcg_target_long arg
, int const_arg
)
471 tcg_out_movi (s
, TCG_TYPE_I64
, reg
, arg
);
475 tcg_out32 (s
, LD
| RT (0) | RA (reg
));
476 tcg_out32 (s
, MTSPR
| RA (0) | CTR
);
477 tcg_out32 (s
, LD
| RT (11) | RA (reg
) | 16);
478 tcg_out32 (s
, LD
| RT (2) | RA (reg
) | 8);
479 tcg_out32 (s
, BCCTR
| BO_ALWAYS
| LK
);
482 static void tcg_out_ldst (TCGContext
*s
, int ret
, int addr
,
483 int offset
, int op1
, int op2
)
485 if (offset
== (int16_t) offset
)
486 tcg_out32 (s
, op1
| RT (ret
) | RA (addr
) | (offset
& 0xffff));
488 tcg_out_movi (s
, TCG_TYPE_I64
, 0, offset
);
489 tcg_out32 (s
, op2
| RT (ret
) | RA (addr
) | RB (0));
493 static void tcg_out_b (TCGContext
*s
, int mask
, tcg_target_long target
)
495 tcg_target_long disp
;
497 disp
= target
- (tcg_target_long
) s
->code_ptr
;
498 if ((disp
<< 38) >> 38 == disp
)
499 tcg_out32 (s
, B
| (disp
& 0x3fffffc) | mask
);
501 tcg_out_movi (s
, TCG_TYPE_I64
, 0, (tcg_target_long
) target
);
502 tcg_out32 (s
, MTSPR
| RS (0) | CTR
);
503 tcg_out32 (s
, BCCTR
| BO_ALWAYS
| mask
);
507 #if defined (CONFIG_SOFTMMU)
508 extern void __ldb_mmu(void);
509 extern void __ldw_mmu(void);
510 extern void __ldl_mmu(void);
511 extern void __ldq_mmu(void);
513 extern void __stb_mmu(void);
514 extern void __stw_mmu(void);
515 extern void __stl_mmu(void);
516 extern void __stq_mmu(void);
518 static void *qemu_ld_helpers
[4] = {
525 static void *qemu_st_helpers
[4] = {
532 static void tcg_out_tlb_read (TCGContext
*s
, int r0
, int r1
, int r2
,
533 int addr_reg
, int s_bits
, int offset
)
535 #if TARGET_LONG_BITS == 32
536 tcg_out_rld (s
, RLDICL
, addr_reg
, addr_reg
, 0, 32);
538 tcg_out32 (s
, (RLWINM
541 | SH (32 - (TARGET_PAGE_BITS
- CPU_TLB_ENTRY_BITS
))
542 | MB (32 - (CPU_TLB_BITS
+ CPU_TLB_ENTRY_BITS
))
543 | ME (31 - CPU_TLB_ENTRY_BITS
)
546 tcg_out32 (s
, ADD
| RT (r0
) | RA (r0
) | RB (TCG_AREG0
));
547 tcg_out32 (s
, (LWZU
| RT (r1
) | RA (r0
) | offset
));
548 tcg_out32 (s
, (RLWINM
552 | MB ((32 - s_bits
) & 31)
553 | ME (31 - TARGET_PAGE_BITS
)
557 tcg_out_rld (s
, RLDICL
, r0
, addr_reg
,
558 64 - TARGET_PAGE_BITS
,
560 tcg_out_rld (s
, RLDICR
, r0
, r0
,
562 63 - CPU_TLB_ENTRY_BITS
);
564 tcg_out32 (s
, ADD
| TAB (r0
, r0
, TCG_AREG0
));
565 tcg_out32 (s
, LD_ADDR
| RT (r1
) | RA (r0
) | offset
);
568 tcg_out_rld (s
, RLDICR
, r2
, addr_reg
, 0, 63 - TARGET_PAGE_BITS
);
571 tcg_out_rld (s
, RLDICL
, r2
, addr_reg
,
572 64 - TARGET_PAGE_BITS
,
573 TARGET_PAGE_BITS
- s_bits
);
574 tcg_out_rld (s
, RLDICL
, r2
, r2
, TARGET_PAGE_BITS
, 0);
580 static void tcg_out_qemu_ld (TCGContext
*s
, const TCGArg
*args
, int opc
)
582 int addr_reg
, data_reg
, r0
, r1
, mem_index
, s_bits
, bswap
;
583 #ifdef CONFIG_SOFTMMU
585 void *label1_ptr
, *label2_ptr
;
593 #ifdef CONFIG_SOFTMMU
598 tcg_out_tlb_read (s
, r0
, r1
, r2
, addr_reg
, s_bits
,
599 offsetof (CPUState
, tlb_table
[mem_index
][0].addr_read
));
601 tcg_out32 (s
, CMP
| BF (7) | RA (r2
) | RB (r1
) | CMP_L
);
603 label1_ptr
= s
->code_ptr
;
605 tcg_out32 (s
, BC
| BI (7, CR_EQ
) | BO_COND_TRUE
);
609 tcg_out_mov (s
, 3, addr_reg
);
610 tcg_out_movi (s
, TCG_TYPE_I64
, 4, mem_index
);
612 tcg_out_call (s
, (tcg_target_long
) qemu_ld_helpers
[s_bits
], 1);
616 tcg_out32 (s
, EXTSB
| RA (data_reg
) | RS (3));
619 tcg_out32 (s
, EXTSH
| RA (data_reg
) | RS (3));
622 tcg_out32 (s
, EXTSW
| RA (data_reg
) | RS (3));
629 tcg_out_mov (s
, data_reg
, 3);
632 label2_ptr
= s
->code_ptr
;
635 /* label1: fast path */
637 reloc_pc14 (label1_ptr
, (tcg_target_long
) s
->code_ptr
);
640 /* r0 now contains &env->tlb_table[mem_index][index].addr_read */
641 tcg_out32 (s
, (LD_ADDEND
644 | (offsetof (CPUTLBEntry
, addend
)
645 - offsetof (CPUTLBEntry
, addr_read
))
647 /* r0 = env->tlb_table[mem_index][index].addend */
648 tcg_out32 (s
, ADD
| RT (r0
) | RA (r0
) | RB (addr_reg
));
649 /* r0 = env->tlb_table[mem_index][index].addend + addr */
651 #else /* !CONFIG_SOFTMMU */
652 #if TARGET_LONG_BITS == 32
653 tcg_out_rld (s
, RLDICL
, addr_reg
, addr_reg
, 0, 32);
659 #ifdef TARGET_WORDS_BIGENDIAN
667 tcg_out32 (s
, LBZ
| RT (data_reg
) | RA (r0
));
670 tcg_out32 (s
, LBZ
| RT (data_reg
) | RA (r0
));
671 tcg_out32 (s
, EXTSB
| RA (data_reg
) | RS (data_reg
));
674 if (bswap
) tcg_out32 (s
, LHBRX
| RT (data_reg
) | RB (r0
));
675 else tcg_out32 (s
, LHZ
| RT (data_reg
) | RA (r0
));
679 tcg_out32 (s
, LHBRX
| RT (data_reg
) | RB (r0
));
680 tcg_out32 (s
, EXTSH
| RA (data_reg
) | RS (data_reg
));
682 else tcg_out32 (s
, LHA
| RT (data_reg
) | RA (r0
));
685 if (bswap
) tcg_out32 (s
, LWBRX
| RT (data_reg
) | RB (r0
));
686 else tcg_out32 (s
, LWZ
| RT (data_reg
)| RA (r0
));
690 tcg_out32 (s
, LWBRX
| RT (data_reg
) | RB (r0
));
691 tcg_out32 (s
, EXTSW
| RA (data_reg
) | RS (data_reg
));
693 else tcg_out32 (s
, LWA
| RT (data_reg
)| RA (r0
));
697 tcg_out32 (s
, LWBRX
| RT (0) | RB (r0
));
698 tcg_out32 (s
, ADDI
| RT (r1
) | RA (r0
) | 4);
699 tcg_out32 (s
, LWBRX
| RT (data_reg
) | RB (r1
));
700 tcg_out_rld (s
, RLDICR
, data_reg
, data_reg
, 32, 31);
701 tcg_out32 (s
, OR
| SAB (0, data_reg
, data_reg
));
703 else tcg_out32 (s
, LD
| RT (data_reg
) | RA (r0
));
707 #ifdef CONFIG_SOFTMMU
708 reloc_pc24 (label2_ptr
, (tcg_target_long
) s
->code_ptr
);
712 static void tcg_out_qemu_st (TCGContext
*s
, const TCGArg
*args
, int opc
)
714 int addr_reg
, r0
, r1
, data_reg
, mem_index
, bswap
;
715 #ifdef CONFIG_SOFTMMU
717 void *label1_ptr
, *label2_ptr
;
724 #ifdef CONFIG_SOFTMMU
729 tcg_out_tlb_read (s
, r0
, r1
, r2
, addr_reg
, opc
,
730 offsetof (CPUState
, tlb_table
[mem_index
][0].addr_write
));
732 tcg_out32 (s
, CMP
| BF (7) | RA (r2
) | RB (r1
) | CMP_L
);
734 label1_ptr
= s
->code_ptr
;
736 tcg_out32 (s
, BC
| BI (7, CR_EQ
) | BO_COND_TRUE
);
740 tcg_out_mov (s
, 3, addr_reg
);
741 tcg_out_rld (s
, RLDICL
, 4, data_reg
, 0, 64 - (1 << (3 + opc
)));
742 tcg_out_movi (s
, TCG_TYPE_I64
, 5, mem_index
);
744 tcg_out_call (s
, (tcg_target_long
) qemu_st_helpers
[opc
], 1);
746 label2_ptr
= s
->code_ptr
;
749 /* label1: fast path */
751 reloc_pc14 (label1_ptr
, (tcg_target_long
) s
->code_ptr
);
754 tcg_out32 (s
, (LD_ADDEND
757 | (offsetof (CPUTLBEntry
, addend
)
758 - offsetof (CPUTLBEntry
, addr_write
))
760 /* r0 = env->tlb_table[mem_index][index].addend */
761 tcg_out32 (s
, ADD
| RT (r0
) | RA (r0
) | RB (addr_reg
));
762 /* r0 = env->tlb_table[mem_index][index].addend + addr */
764 #else /* !CONFIG_SOFTMMU */
765 #if TARGET_LONG_BITS == 32
766 tcg_out_rld (s
, RLDICL
, addr_reg
, addr_reg
, 0, 32);
772 #ifdef TARGET_WORDS_BIGENDIAN
779 tcg_out32 (s
, STB
| RS (data_reg
) | RA (r0
));
782 if (bswap
) tcg_out32 (s
, STHBRX
| RS (data_reg
) | RA (0) | RB (r0
));
783 else tcg_out32 (s
, STH
| RS (data_reg
) | RA (r0
));
786 if (bswap
) tcg_out32 (s
, STWBRX
| RS (data_reg
) | RA (0) | RB (r0
));
787 else tcg_out32 (s
, STW
| RS (data_reg
) | RA (r0
));
791 tcg_out32 (s
, STWBRX
| RS (data_reg
) | RA (0) | RB (r0
));
792 tcg_out32 (s
, ADDI
| RT (r1
) | RA (r0
) | 4);
793 tcg_out_rld (s
, RLDICL
, 0, data_reg
, 32, 0);
794 tcg_out32 (s
, STWBRX
| RS (0) | RA (0) | RB (r1
));
796 else tcg_out32 (s
, STD
| RS (data_reg
) | RA (r0
));
800 #ifdef CONFIG_SOFTMMU
801 reloc_pc24 (label2_ptr
, (tcg_target_long
) s
->code_ptr
);
805 void tcg_target_qemu_prologue (TCGContext
*s
)
814 + 8 /* compiler doubleword */
815 + 8 /* link editor doubleword */
816 + 8 /* TOC save area */
817 + TCG_STATIC_CALL_ARGS_SIZE
818 + ARRAY_SIZE (tcg_target_callee_save_regs
) * 8
820 frame_size
= (frame_size
+ 15) & ~15;
822 /* First emit adhoc function descriptor */
823 addr
= (uint64_t) s
->code_ptr
+ 24;
824 tcg_out32 (s
, addr
>> 32); tcg_out32 (s
, addr
); /* entry point */
825 s
->code_ptr
+= 16; /* skip TOC and environment pointer */
828 tcg_out32 (s
, MFSPR
| RT (0) | LR
);
829 tcg_out32 (s
, STDU
| RS (1) | RA (1) | (-frame_size
& 0xffff));
830 for (i
= 0; i
< ARRAY_SIZE (tcg_target_callee_save_regs
); ++i
)
832 | RS (tcg_target_callee_save_regs
[i
])
834 | (i
* 8 + 48 + TCG_STATIC_CALL_ARGS_SIZE
)
837 tcg_out32 (s
, STD
| RS (0) | RA (1) | (frame_size
+ 16));
839 tcg_out32 (s
, MTSPR
| RS (3) | CTR
);
840 tcg_out32 (s
, BCCTR
| BO_ALWAYS
);
843 tb_ret_addr
= s
->code_ptr
;
845 for (i
= 0; i
< ARRAY_SIZE (tcg_target_callee_save_regs
); ++i
)
847 | RT (tcg_target_callee_save_regs
[i
])
849 | (i
* 8 + 48 + TCG_STATIC_CALL_ARGS_SIZE
)
852 tcg_out32 (s
, LD
| RT (0) | RA (1) | (frame_size
+ 16));
853 tcg_out32 (s
, MTSPR
| RS (0) | LR
);
854 tcg_out32 (s
, ADDI
| RT (1) | RA (1) | frame_size
);
855 tcg_out32 (s
, BCLR
| BO_ALWAYS
);
858 static void tcg_out_ld (TCGContext
*s
, TCGType type
, int ret
, int arg1
,
859 tcg_target_long arg2
)
861 if (type
== TCG_TYPE_I32
)
862 tcg_out_ldst (s
, ret
, arg1
, arg2
, LWZ
, LWZX
);
864 tcg_out_ldst (s
, ret
, arg1
, arg2
, LD
, LDX
);
867 static void tcg_out_st (TCGContext
*s
, TCGType type
, int arg
, int arg1
,
868 tcg_target_long arg2
)
870 if (type
== TCG_TYPE_I32
)
871 tcg_out_ldst (s
, arg
, arg1
, arg2
, STW
, STWX
);
873 tcg_out_ldst (s
, arg
, arg1
, arg2
, STD
, STDX
);
876 static void ppc_addi32 (TCGContext
*s
, int rt
, int ra
, tcg_target_long si
)
881 if (si
== (int16_t) si
)
882 tcg_out32 (s
, ADDI
| RT (rt
) | RA (ra
) | (si
& 0xffff));
884 uint16_t h
= ((si
>> 16) & 0xffff) + ((uint16_t) si
>> 15);
885 tcg_out32 (s
, ADDIS
| RT (rt
) | RA (ra
) | h
);
886 tcg_out32 (s
, ADDI
| RT (rt
) | RA (rt
) | (si
& 0xffff));
890 static void ppc_addi64 (TCGContext
*s
, int rt
, int ra
, tcg_target_long si
)
892 /* XXX: suboptimal */
893 if (si
== (int16_t) si
894 || (((uint64_t) si
>> 31) == 0) && (si
& 0x8000) == 0)
895 ppc_addi32 (s
, rt
, ra
, si
);
897 tcg_out_movi (s
, TCG_TYPE_I64
, 0, si
);
898 tcg_out32 (s
, ADD
| RT (rt
) | RA (ra
));
902 static void tcg_out_addi (TCGContext
*s
, int reg
, tcg_target_long val
)
904 ppc_addi64 (s
, reg
, reg
, val
);
907 static void tcg_out_cmp (TCGContext
*s
, int cond
, TCGArg arg1
, TCGArg arg2
,
908 int const_arg2
, int cr
, int arch64
)
917 if ((int16_t) arg2
== arg2
) {
922 else if ((uint16_t) arg2
== arg2
) {
937 if ((int16_t) arg2
== arg2
) {
952 if ((uint16_t) arg2
== arg2
) {
965 op
|= BF (cr
) | (arch64
<< 21);
968 tcg_out32 (s
, op
| RA (arg1
) | (arg2
& 0xffff));
971 tcg_out_movi (s
, TCG_TYPE_I64
, 0, arg2
);
972 tcg_out32 (s
, op
| RA (arg1
) | RB (0));
975 tcg_out32 (s
, op
| RA (arg1
) | RB (arg2
));
980 static void tcg_out_bc (TCGContext
*s
, int bc
, int label_index
)
982 TCGLabel
*l
= &s
->labels
[label_index
];
985 tcg_out32 (s
, bc
| reloc_pc14_val (s
->code_ptr
, l
->u
.value
));
987 uint16_t val
= *(uint16_t *) &s
->code_ptr
[2];
989 /* Thanks to Andrzej Zaborowski */
990 tcg_out32 (s
, bc
| (val
& 0xfffc));
991 tcg_out_reloc (s
, s
->code_ptr
- 4, R_PPC_REL14
, label_index
, 0);
995 static void tcg_out_brcond (TCGContext
*s
, int cond
,
996 TCGArg arg1
, TCGArg arg2
, int const_arg2
,
997 int label_index
, int arch64
)
999 tcg_out_cmp (s
, cond
, arg1
, arg2
, const_arg2
, 7, arch64
);
1000 tcg_out_bc (s
, tcg_to_bc
[cond
], label_index
);
1003 void ppc_tb_set_jmp_target (unsigned long jmp_addr
, unsigned long addr
)
1006 unsigned long patch_size
;
1008 s
.code_ptr
= (uint8_t *) jmp_addr
;
1009 tcg_out_b (&s
, 0, addr
);
1010 patch_size
= s
.code_ptr
- (uint8_t *) jmp_addr
;
1011 flush_icache_range (jmp_addr
, jmp_addr
+ patch_size
);
1014 static void tcg_out_op (TCGContext
*s
, int opc
, const TCGArg
*args
,
1015 const int *const_args
)
1020 case INDEX_op_exit_tb
:
1021 tcg_out_movi (s
, TCG_TYPE_I64
, TCG_REG_R3
, args
[0]);
1022 tcg_out_b (s
, 0, (tcg_target_long
) tb_ret_addr
);
1024 case INDEX_op_goto_tb
:
1025 if (s
->tb_jmp_offset
) {
1026 /* direct jump method */
1028 s
->tb_jmp_offset
[args
[0]] = s
->code_ptr
- s
->code_buf
;
1034 s
->tb_next_offset
[args
[0]] = s
->code_ptr
- s
->code_buf
;
1038 TCGLabel
*l
= &s
->labels
[args
[0]];
1041 tcg_out_b (s
, 0, l
->u
.value
);
1044 uint32_t val
= *(uint32_t *) s
->code_ptr
;
1046 /* Thanks to Andrzej Zaborowski */
1047 tcg_out32 (s
, B
| (val
& 0x3fffffc));
1048 tcg_out_reloc (s
, s
->code_ptr
- 4, R_PPC_REL24
, args
[0], 0);
1053 tcg_out_call (s
, args
[0], const_args
[0]);
1056 if (const_args
[0]) {
1057 tcg_out_b (s
, 0, args
[0]);
1060 tcg_out32 (s
, MTSPR
| RS (args
[0]) | CTR
);
1061 tcg_out32 (s
, BCCTR
| BO_ALWAYS
);
1064 case INDEX_op_movi_i32
:
1065 tcg_out_movi (s
, TCG_TYPE_I32
, args
[0], args
[1]);
1067 case INDEX_op_movi_i64
:
1068 tcg_out_movi (s
, TCG_TYPE_I64
, args
[0], args
[1]);
1070 case INDEX_op_ld8u_i32
:
1071 case INDEX_op_ld8u_i64
:
1072 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LBZ
, LBZX
);
1074 case INDEX_op_ld8s_i32
:
1075 case INDEX_op_ld8s_i64
:
1076 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LBZ
, LBZX
);
1077 tcg_out32 (s
, EXTSB
| RS (args
[0]) | RA (args
[0]));
1079 case INDEX_op_ld16u_i32
:
1080 case INDEX_op_ld16u_i64
:
1081 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LHZ
, LHZX
);
1083 case INDEX_op_ld16s_i32
:
1084 case INDEX_op_ld16s_i64
:
1085 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LHA
, LHAX
);
1087 case INDEX_op_ld_i32
:
1088 case INDEX_op_ld32u_i64
:
1089 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LWZ
, LWZX
);
1091 case INDEX_op_ld32s_i64
:
1092 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LWA
, LWAX
);
1094 case INDEX_op_ld_i64
:
1095 tcg_out_ldst (s
, args
[0], args
[1], args
[2], LD
, LDX
);
1097 case INDEX_op_st8_i32
:
1098 case INDEX_op_st8_i64
:
1099 tcg_out_ldst (s
, args
[0], args
[1], args
[2], STB
, STBX
);
1101 case INDEX_op_st16_i32
:
1102 case INDEX_op_st16_i64
:
1103 tcg_out_ldst (s
, args
[0], args
[1], args
[2], STH
, STHX
);
1105 case INDEX_op_st_i32
:
1106 case INDEX_op_st32_i64
:
1107 tcg_out_ldst (s
, args
[0], args
[1], args
[2], STW
, STWX
);
1109 case INDEX_op_st_i64
:
1110 tcg_out_ldst (s
, args
[0], args
[1], args
[2], STD
, STDX
);
1113 case INDEX_op_add_i32
:
1115 ppc_addi32 (s
, args
[0], args
[1], args
[2]);
1117 tcg_out32 (s
, ADD
| TAB (args
[0], args
[1], args
[2]));
1119 case INDEX_op_sub_i32
:
1121 ppc_addi32 (s
, args
[0], args
[1], -args
[2]);
1123 tcg_out32 (s
, SUBF
| TAB (args
[0], args
[2], args
[1]));
1126 case INDEX_op_and_i64
:
1127 case INDEX_op_and_i32
:
1128 if (const_args
[2]) {
1129 if ((args
[2] & 0xffff) == args
[2])
1130 tcg_out32 (s
, ANDI
| RS (args
[1]) | RA (args
[0]) | args
[2]);
1131 else if ((args
[2] & 0xffff0000) == args
[2])
1132 tcg_out32 (s
, ANDIS
| RS (args
[1]) | RA (args
[0])
1133 | ((args
[2] >> 16) & 0xffff));
1135 tcg_out_movi (s
, (opc
== INDEX_op_and_i32
1139 tcg_out32 (s
, AND
| SAB (args
[1], args
[0], 0));
1143 tcg_out32 (s
, AND
| SAB (args
[1], args
[0], args
[2]));
1145 case INDEX_op_or_i64
:
1146 case INDEX_op_or_i32
:
1147 if (const_args
[2]) {
1148 if (args
[2] & 0xffff) {
1149 tcg_out32 (s
, ORI
| RS (args
[1]) | RA (args
[0])
1150 | (args
[2] & 0xffff));
1152 tcg_out32 (s
, ORIS
| RS (args
[0]) | RA (args
[0])
1153 | ((args
[2] >> 16) & 0xffff));
1156 tcg_out32 (s
, ORIS
| RS (args
[1]) | RA (args
[0])
1157 | ((args
[2] >> 16) & 0xffff));
1161 tcg_out32 (s
, OR
| SAB (args
[1], args
[0], args
[2]));
1163 case INDEX_op_xor_i64
:
1164 case INDEX_op_xor_i32
:
1165 if (const_args
[2]) {
1166 if ((args
[2] & 0xffff) == args
[2])
1167 tcg_out32 (s
, XORI
| RS (args
[1]) | RA (args
[0])
1168 | (args
[2] & 0xffff));
1169 else if ((args
[2] & 0xffff0000) == args
[2])
1170 tcg_out32 (s
, XORIS
| RS (args
[1]) | RA (args
[0])
1171 | ((args
[2] >> 16) & 0xffff));
1173 tcg_out_movi (s
, (opc
== INDEX_op_and_i32
1177 tcg_out32 (s
, XOR
| SAB (args
[1], args
[0], 0));
1181 tcg_out32 (s
, XOR
| SAB (args
[1], args
[0], args
[2]));
1184 case INDEX_op_mul_i32
:
1185 if (const_args
[2]) {
1186 if (args
[2] == (int16_t) args
[2])
1187 tcg_out32 (s
, MULLI
| RT (args
[0]) | RA (args
[1])
1188 | (args
[2] & 0xffff));
1190 tcg_out_movi (s
, TCG_TYPE_I32
, 0, args
[2]);
1191 tcg_out32 (s
, MULLW
| TAB (args
[0], args
[1], 0));
1195 tcg_out32 (s
, MULLW
| TAB (args
[0], args
[1], args
[2]));
1198 case INDEX_op_div_i32
:
1199 tcg_out32 (s
, DIVW
| TAB (args
[0], args
[1], args
[2]));
1202 case INDEX_op_divu_i32
:
1203 tcg_out32 (s
, DIVWU
| TAB (args
[0], args
[1], args
[2]));
1206 case INDEX_op_rem_i32
:
1207 tcg_out32 (s
, DIVW
| TAB (0, args
[1], args
[2]));
1208 tcg_out32 (s
, MULLW
| TAB (0, 0, args
[2]));
1209 tcg_out32 (s
, SUBF
| TAB (args
[0], 0, args
[1]));
1212 case INDEX_op_remu_i32
:
1213 tcg_out32 (s
, DIVWU
| TAB (0, args
[1], args
[2]));
1214 tcg_out32 (s
, MULLW
| TAB (0, 0, args
[2]));
1215 tcg_out32 (s
, SUBF
| TAB (args
[0], 0, args
[1]));
1218 case INDEX_op_shl_i32
:
1219 if (const_args
[2]) {
1220 tcg_out32 (s
, (RLWINM
1230 tcg_out32 (s
, SLW
| SAB (args
[1], args
[0], args
[2]));
1232 case INDEX_op_shr_i32
:
1233 if (const_args
[2]) {
1234 tcg_out32 (s
, (RLWINM
1244 tcg_out32 (s
, SRW
| SAB (args
[1], args
[0], args
[2]));
1246 case INDEX_op_sar_i32
:
1248 tcg_out32 (s
, SRAWI
| RS (args
[1]) | RA (args
[0]) | SH (args
[2]));
1250 tcg_out32 (s
, SRAW
| SAB (args
[1], args
[0], args
[2]));
1253 case INDEX_op_brcond_i32
:
1254 tcg_out_brcond (s
, args
[2], args
[0], args
[1], const_args
[1], args
[3], 0);
1257 case INDEX_op_brcond_i64
:
1258 tcg_out_brcond (s
, args
[2], args
[0], args
[1], const_args
[1], args
[3], 1);
1261 case INDEX_op_neg_i32
:
1262 case INDEX_op_neg_i64
:
1263 tcg_out32 (s
, NEG
| RT (args
[0]) | RA (args
[1]));
1266 case INDEX_op_add_i64
:
1268 ppc_addi64 (s
, args
[0], args
[1], args
[2]);
1270 tcg_out32 (s
, ADD
| TAB (args
[0], args
[1], args
[2]));
1272 case INDEX_op_sub_i64
:
1274 ppc_addi64 (s
, args
[0], args
[1], -args
[2]);
1276 tcg_out32 (s
, SUBF
| TAB (args
[0], args
[2], args
[1]));
1279 case INDEX_op_shl_i64
:
1281 tcg_out_rld (s
, RLDICR
, args
[0], args
[1], args
[2], 63 - args
[2]);
1283 tcg_out32 (s
, SLD
| SAB (args
[1], args
[0], args
[2]));
1285 case INDEX_op_shr_i64
:
1287 tcg_out_rld (s
, RLDICL
, args
[0], args
[1], 64 - args
[2], args
[2]);
1289 tcg_out32 (s
, SRD
| SAB (args
[1], args
[0], args
[2]));
1291 case INDEX_op_sar_i64
:
1292 if (const_args
[2]) {
1293 int sh
= SH (args
[2] & 0x1f) | (((args
[2] >> 5) & 1) << 1);
1294 tcg_out32 (s
, SRADI
| RA (args
[0]) | RS (args
[1]) | sh
);
1297 tcg_out32 (s
, SRAD
| SAB (args
[1], args
[0], args
[2]));
1300 case INDEX_op_mul_i64
:
1301 tcg_out32 (s
, MULLD
| TAB (args
[0], args
[1], args
[2]));
1303 case INDEX_op_div_i64
:
1304 tcg_out32 (s
, DIVD
| TAB (args
[0], args
[1], args
[2]));
1306 case INDEX_op_divu_i64
:
1307 tcg_out32 (s
, DIVDU
| TAB (args
[0], args
[1], args
[2]));
1309 case INDEX_op_rem_i64
:
1310 tcg_out32 (s
, DIVD
| TAB (0, args
[1], args
[2]));
1311 tcg_out32 (s
, MULLD
| TAB (0, 0, args
[2]));
1312 tcg_out32 (s
, SUBF
| TAB (args
[0], 0, args
[1]));
1314 case INDEX_op_remu_i64
:
1315 tcg_out32 (s
, DIVDU
| TAB (0, args
[1], args
[2]));
1316 tcg_out32 (s
, MULLD
| TAB (0, 0, args
[2]));
1317 tcg_out32 (s
, SUBF
| TAB (args
[0], 0, args
[1]));
1320 case INDEX_op_qemu_ld8u
:
1321 tcg_out_qemu_ld (s
, args
, 0);
1323 case INDEX_op_qemu_ld8s
:
1324 tcg_out_qemu_ld (s
, args
, 0 | 4);
1326 case INDEX_op_qemu_ld16u
:
1327 tcg_out_qemu_ld (s
, args
, 1);
1329 case INDEX_op_qemu_ld16s
:
1330 tcg_out_qemu_ld (s
, args
, 1 | 4);
1332 case INDEX_op_qemu_ld32u
:
1333 tcg_out_qemu_ld (s
, args
, 2);
1335 case INDEX_op_qemu_ld32s
:
1336 tcg_out_qemu_ld (s
, args
, 2 | 4);
1338 case INDEX_op_qemu_ld64
:
1339 tcg_out_qemu_ld (s
, args
, 3);
1341 case INDEX_op_qemu_st8
:
1342 tcg_out_qemu_st (s
, args
, 0);
1344 case INDEX_op_qemu_st16
:
1345 tcg_out_qemu_st (s
, args
, 1);
1347 case INDEX_op_qemu_st32
:
1348 tcg_out_qemu_st (s
, args
, 2);
1350 case INDEX_op_qemu_st64
:
1351 tcg_out_qemu_st (s
, args
, 3);
1354 case INDEX_op_ext8s_i32
:
1355 case INDEX_op_ext8s_i64
:
1358 case INDEX_op_ext16s_i32
:
1359 case INDEX_op_ext16s_i64
:
1362 case INDEX_op_ext32s_i64
:
1366 tcg_out32 (s
, c
| RS (args
[1]) | RA (args
[0]));
1370 tcg_dump_ops (s
, stderr
);
1375 static const TCGTargetOpDef ppc_op_defs
[] = {
1376 { INDEX_op_exit_tb
, { } },
1377 { INDEX_op_goto_tb
, { } },
1378 { INDEX_op_call
, { "ri" } },
1379 { INDEX_op_jmp
, { "ri" } },
1380 { INDEX_op_br
, { } },
1382 { INDEX_op_mov_i32
, { "r", "r" } },
1383 { INDEX_op_mov_i64
, { "r", "r" } },
1384 { INDEX_op_movi_i32
, { "r" } },
1385 { INDEX_op_movi_i64
, { "r" } },
1387 { INDEX_op_ld8u_i32
, { "r", "r" } },
1388 { INDEX_op_ld8s_i32
, { "r", "r" } },
1389 { INDEX_op_ld16u_i32
, { "r", "r" } },
1390 { INDEX_op_ld16s_i32
, { "r", "r" } },
1391 { INDEX_op_ld_i32
, { "r", "r" } },
1392 { INDEX_op_ld_i64
, { "r", "r" } },
1393 { INDEX_op_st8_i32
, { "r", "r" } },
1394 { INDEX_op_st8_i64
, { "r", "r" } },
1395 { INDEX_op_st16_i32
, { "r", "r" } },
1396 { INDEX_op_st16_i64
, { "r", "r" } },
1397 { INDEX_op_st_i32
, { "r", "r" } },
1398 { INDEX_op_st_i64
, { "r", "r" } },
1399 { INDEX_op_st32_i64
, { "r", "r" } },
1401 { INDEX_op_ld8u_i64
, { "r", "r" } },
1402 { INDEX_op_ld8s_i64
, { "r", "r" } },
1403 { INDEX_op_ld16u_i64
, { "r", "r" } },
1404 { INDEX_op_ld16s_i64
, { "r", "r" } },
1405 { INDEX_op_ld32u_i64
, { "r", "r" } },
1406 { INDEX_op_ld32s_i64
, { "r", "r" } },
1407 { INDEX_op_ld_i64
, { "r", "r" } },
1409 { INDEX_op_add_i32
, { "r", "r", "ri" } },
1410 { INDEX_op_mul_i32
, { "r", "r", "ri" } },
1411 { INDEX_op_div_i32
, { "r", "r", "r" } },
1412 { INDEX_op_divu_i32
, { "r", "r", "r" } },
1413 { INDEX_op_rem_i32
, { "r", "r", "r" } },
1414 { INDEX_op_remu_i32
, { "r", "r", "r" } },
1415 { INDEX_op_sub_i32
, { "r", "r", "ri" } },
1416 { INDEX_op_and_i32
, { "r", "r", "ri" } },
1417 { INDEX_op_or_i32
, { "r", "r", "ri" } },
1418 { INDEX_op_xor_i32
, { "r", "r", "ri" } },
1420 { INDEX_op_shl_i32
, { "r", "r", "ri" } },
1421 { INDEX_op_shr_i32
, { "r", "r", "ri" } },
1422 { INDEX_op_sar_i32
, { "r", "r", "ri" } },
1424 { INDEX_op_brcond_i32
, { "r", "ri" } },
1425 { INDEX_op_brcond_i64
, { "r", "ri" } },
1427 { INDEX_op_neg_i32
, { "r", "r" } },
1429 { INDEX_op_add_i64
, { "r", "r", "ri" } },
1430 { INDEX_op_sub_i64
, { "r", "r", "ri" } },
1431 { INDEX_op_and_i64
, { "r", "r", "rZ" } },
1432 { INDEX_op_or_i64
, { "r", "r", "rZ" } },
1433 { INDEX_op_xor_i64
, { "r", "r", "rZ" } },
1435 { INDEX_op_shl_i64
, { "r", "r", "ri" } },
1436 { INDEX_op_shr_i64
, { "r", "r", "ri" } },
1437 { INDEX_op_sar_i64
, { "r", "r", "ri" } },
1439 { INDEX_op_mul_i64
, { "r", "r", "r" } },
1440 { INDEX_op_div_i64
, { "r", "r", "r" } },
1441 { INDEX_op_divu_i64
, { "r", "r", "r" } },
1442 { INDEX_op_rem_i64
, { "r", "r", "r" } },
1443 { INDEX_op_remu_i64
, { "r", "r", "r" } },
1445 { INDEX_op_neg_i64
, { "r", "r" } },
1447 { INDEX_op_qemu_ld8u
, { "r", "L" } },
1448 { INDEX_op_qemu_ld8s
, { "r", "L" } },
1449 { INDEX_op_qemu_ld16u
, { "r", "L" } },
1450 { INDEX_op_qemu_ld16s
, { "r", "L" } },
1451 { INDEX_op_qemu_ld32u
, { "r", "L" } },
1452 { INDEX_op_qemu_ld32s
, { "r", "L" } },
1453 { INDEX_op_qemu_ld64
, { "r", "L" } },
1455 { INDEX_op_qemu_st8
, { "S", "S" } },
1456 { INDEX_op_qemu_st16
, { "S", "S" } },
1457 { INDEX_op_qemu_st32
, { "S", "S" } },
1458 { INDEX_op_qemu_st64
, { "S", "S", "S" } },
1460 { INDEX_op_ext8s_i32
, { "r", "r" } },
1461 { INDEX_op_ext16s_i32
, { "r", "r" } },
1462 { INDEX_op_ext8s_i64
, { "r", "r" } },
1463 { INDEX_op_ext16s_i64
, { "r", "r" } },
1464 { INDEX_op_ext32s_i64
, { "r", "r" } },
1469 void tcg_target_init (TCGContext
*s
)
1471 tcg_regset_set32 (tcg_target_available_regs
[TCG_TYPE_I32
], 0, 0xffffffff);
1472 tcg_regset_set32 (tcg_target_available_regs
[TCG_TYPE_I64
], 0, 0xffffffff);
1473 tcg_regset_set32 (tcg_target_call_clobber_regs
, 0,
1482 (1 << TCG_REG_R10
) |
1483 (1 << TCG_REG_R11
) |
1487 tcg_regset_clear (s
->reserved_regs
);
1488 tcg_regset_set_reg (s
->reserved_regs
, TCG_REG_R0
);
1489 tcg_regset_set_reg (s
->reserved_regs
, TCG_REG_R1
);
1490 tcg_regset_set_reg (s
->reserved_regs
, TCG_REG_R2
);
1491 tcg_regset_set_reg (s
->reserved_regs
, TCG_REG_R13
);
1493 tcg_add_target_add_op_defs (ppc_op_defs
);