Commit 1da92db280961b3949712609b8771f582dab1f4a
1 parent
f843e528
Fix branches and TLB matches for 64 bit targets
git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@6974 c046a42c-6fe2-441c-8c8c-71466251a162
Showing
1 changed file
with
75 additions
and
13 deletions
tcg/sparc/tcg-target.c
... | ... | @@ -117,6 +117,13 @@ static void patch_reloc(uint8_t *code_ptr, int type, |
117 | 117 | tcg_abort(); |
118 | 118 | *(uint32_t *)code_ptr = ((*(uint32_t *)code_ptr) & ~0x3fffff) | value; |
119 | 119 | break; |
120 | + case R_SPARC_WDISP19: | |
121 | + value -= (long)code_ptr; | |
122 | + value >>= 2; | |
123 | + if (!check_fit_tl(value, 19)) | |
124 | + tcg_abort(); | |
125 | + *(uint32_t *)code_ptr = ((*(uint32_t *)code_ptr) & ~0x7ffff) | value; | |
126 | + break; | |
120 | 127 | default: |
121 | 128 | tcg_abort(); |
122 | 129 | } |
... | ... | @@ -185,6 +192,7 @@ static inline int tcg_target_const_match(tcg_target_long val, |
185 | 192 | #define INSN_ASI(x) ((x) << 5) |
186 | 193 | |
187 | 194 | #define INSN_IMM13(x) ((1 << 13) | ((x) & 0x1fff)) |
195 | +#define INSN_OFF19(x) (((x) >> 2) & 0x07ffff) | |
188 | 196 | #define INSN_OFF22(x) (((x) >> 2) & 0x3fffff) |
189 | 197 | |
190 | 198 | #define INSN_COND(x, a) (((x) << 25) | ((a) << 29)) |
... | ... | @@ -421,7 +429,7 @@ static inline void tcg_out_nop(TCGContext *s) |
421 | 429 | tcg_out_sethi(s, TCG_REG_G0, 0); |
422 | 430 | } |
423 | 431 | |
424 | -static void tcg_out_branch(TCGContext *s, int opc, int label_index) | |
432 | +static void tcg_out_branch_i32(TCGContext *s, int opc, int label_index) | |
425 | 433 | { |
426 | 434 | int32_t val; |
427 | 435 | TCGLabel *l = &s->labels[label_index]; |
... | ... | @@ -436,6 +444,25 @@ static void tcg_out_branch(TCGContext *s, int opc, int label_index) |
436 | 444 | } |
437 | 445 | } |
438 | 446 | |
447 | +#if defined(__sparc_v9__) && !defined(__sparc_v8plus__) | |
448 | +static void tcg_out_branch_i64(TCGContext *s, int opc, int label_index) | |
449 | +{ | |
450 | + int32_t val; | |
451 | + TCGLabel *l = &s->labels[label_index]; | |
452 | + | |
453 | + if (l->has_value) { | |
454 | + val = l->u.value - (tcg_target_long)s->code_ptr; | |
455 | + tcg_out32(s, (INSN_OP(0) | INSN_COND(opc, 0) | INSN_OP2(0x1) | | |
456 | + (0x5 << 19) | | |
457 | + INSN_OFF19(l->u.value - (unsigned long)s->code_ptr))); | |
458 | + } else { | |
459 | + tcg_out_reloc(s, s->code_ptr, R_SPARC_WDISP19, label_index, 0); | |
460 | + tcg_out32(s, (INSN_OP(0) | INSN_COND(opc, 0) | INSN_OP2(0x1) | | |
461 | + (0x5 << 19) | 0)); | |
462 | + } | |
463 | +} | |
464 | +#endif | |
465 | + | |
439 | 466 | static const uint8_t tcg_cond_to_bcond[10] = { |
440 | 467 | [TCG_COND_EQ] = COND_E, |
441 | 468 | [TCG_COND_NE] = COND_NE, |
... | ... | @@ -449,9 +476,9 @@ static const uint8_t tcg_cond_to_bcond[10] = { |
449 | 476 | [TCG_COND_GTU] = COND_GU, |
450 | 477 | }; |
451 | 478 | |
452 | -static void tcg_out_brcond(TCGContext *s, int cond, | |
453 | - TCGArg arg1, TCGArg arg2, int const_arg2, | |
454 | - int label_index) | |
479 | +static void tcg_out_brcond_i32(TCGContext *s, int cond, | |
480 | + TCGArg arg1, TCGArg arg2, int const_arg2, | |
481 | + int label_index) | |
455 | 482 | { |
456 | 483 | if (const_arg2 && arg2 == 0) |
457 | 484 | /* orcc %g0, r, %g0 */ |
... | ... | @@ -459,10 +486,26 @@ static void tcg_out_brcond(TCGContext *s, int cond, |
459 | 486 | else |
460 | 487 | /* subcc r1, r2, %g0 */ |
461 | 488 | tcg_out_arith(s, TCG_REG_G0, arg1, arg2, ARITH_SUBCC); |
462 | - tcg_out_branch(s, tcg_cond_to_bcond[cond], label_index); | |
489 | + tcg_out_branch_i32(s, tcg_cond_to_bcond[cond], label_index); | |
463 | 490 | tcg_out_nop(s); |
464 | 491 | } |
465 | 492 | |
493 | +#if defined(__sparc_v9__) && !defined(__sparc_v8plus__) | |
494 | +static void tcg_out_brcond_i64(TCGContext *s, int cond, | |
495 | + TCGArg arg1, TCGArg arg2, int const_arg2, | |
496 | + int label_index) | |
497 | +{ | |
498 | + if (const_arg2 && arg2 == 0) | |
499 | + /* orcc %g0, r, %g0 */ | |
500 | + tcg_out_arith(s, TCG_REG_G0, TCG_REG_G0, arg1, ARITH_ORCC); | |
501 | + else | |
502 | + /* subcc r1, r2, %g0 */ | |
503 | + tcg_out_arith(s, TCG_REG_G0, arg1, arg2, ARITH_SUBCC); | |
504 | + tcg_out_branch_i64(s, tcg_cond_to_bcond[cond], label_index); | |
505 | + tcg_out_nop(s); | |
506 | +} | |
507 | +#endif | |
508 | + | |
466 | 509 | /* Generate global QEMU prologue and epilogue code */ |
467 | 510 | void tcg_target_qemu_prologue(TCGContext *s) |
468 | 511 | { |
... | ... | @@ -559,7 +602,9 @@ static void tcg_out_qemu_ld(TCGContext *s, const TCGArg *args, |
559 | 602 | tcg_out_arith(s, TCG_REG_G0, arg0, arg2, ARITH_SUBCC); |
560 | 603 | |
561 | 604 | /* will become: |
562 | - be label1 */ | |
605 | + be label1 | |
606 | + or | |
607 | + be,pt %xcc label1 */ | |
563 | 608 | label1_ptr = (uint32_t *)s->code_ptr; |
564 | 609 | tcg_out32(s, 0); |
565 | 610 | |
... | ... | @@ -627,9 +672,17 @@ static void tcg_out_qemu_ld(TCGContext *s, const TCGArg *args, |
627 | 672 | tcg_out_nop(s); |
628 | 673 | |
629 | 674 | /* label1: */ |
675 | +#if TARGET_LONG_BITS == 32 | |
676 | + /* be label1 */ | |
630 | 677 | *label1_ptr = (INSN_OP(0) | INSN_COND(COND_E, 0) | INSN_OP2(0x2) | |
631 | 678 | INSN_OFF22((unsigned long)s->code_ptr - |
632 | 679 | (unsigned long)label1_ptr)); |
680 | +#else | |
681 | + /* be,pt %xcc label1 */ | |
682 | + *label1_ptr = (INSN_OP(0) | INSN_COND(COND_E, 0) | INSN_OP2(0x1) | | |
683 | + (0x5 << 19) | INSN_OFF19((unsigned long)s->code_ptr - | |
684 | + (unsigned long)label1_ptr)); | |
685 | +#endif | |
633 | 686 | |
634 | 687 | /* ld [arg1 + x], arg1 */ |
635 | 688 | tcg_out_ldst(s, arg1, arg1, offsetof(CPUTLBEntry, addend) - |
... | ... | @@ -761,7 +814,9 @@ static void tcg_out_qemu_st(TCGContext *s, const TCGArg *args, |
761 | 814 | tcg_out_arith(s, TCG_REG_G0, arg0, arg2, ARITH_SUBCC); |
762 | 815 | |
763 | 816 | /* will become: |
764 | - be label1 */ | |
817 | + be label1 | |
818 | + or | |
819 | + be,pt %xcc label1 */ | |
765 | 820 | label1_ptr = (uint32_t *)s->code_ptr; |
766 | 821 | tcg_out32(s, 0); |
767 | 822 | |
... | ... | @@ -797,10 +852,17 @@ static void tcg_out_qemu_st(TCGContext *s, const TCGArg *args, |
797 | 852 | /* nop (delay slot) */ |
798 | 853 | tcg_out_nop(s); |
799 | 854 | |
800 | - /* label1: */ | |
855 | +#if TARGET_LONG_BITS == 32 | |
856 | + /* be label1 */ | |
801 | 857 | *label1_ptr = (INSN_OP(0) | INSN_COND(COND_E, 0) | INSN_OP2(0x2) | |
802 | 858 | INSN_OFF22((unsigned long)s->code_ptr - |
803 | 859 | (unsigned long)label1_ptr)); |
860 | +#else | |
861 | + /* be,pt %xcc label1 */ | |
862 | + *label1_ptr = (INSN_OP(0) | INSN_COND(COND_E, 0) | INSN_OP2(0x1) | | |
863 | + (0x5 << 19) | INSN_OFF19((unsigned long)s->code_ptr - | |
864 | + (unsigned long)label1_ptr)); | |
865 | +#endif | |
804 | 866 | |
805 | 867 | /* ld [arg1 + x], arg1 */ |
806 | 868 | tcg_out_ldst(s, arg1, arg1, offsetof(CPUTLBEntry, addend) - |
... | ... | @@ -917,7 +979,7 @@ static inline void tcg_out_op(TCGContext *s, int opc, const TCGArg *args, |
917 | 979 | break; |
918 | 980 | case INDEX_op_jmp: |
919 | 981 | case INDEX_op_br: |
920 | - tcg_out_branch(s, COND_A, args[0]); | |
982 | + tcg_out_branch_i32(s, COND_A, args[0]); | |
921 | 983 | tcg_out_nop(s); |
922 | 984 | break; |
923 | 985 | case INDEX_op_movi_i32: |
... | ... | @@ -1009,8 +1071,8 @@ static inline void tcg_out_op(TCGContext *s, int opc, const TCGArg *args, |
1009 | 1071 | #endif |
1010 | 1072 | |
1011 | 1073 | case INDEX_op_brcond_i32: |
1012 | - tcg_out_brcond(s, args[2], args[0], args[1], const_args[1], | |
1013 | - args[3]); | |
1074 | + tcg_out_brcond_i32(s, args[2], args[0], args[1], const_args[1], | |
1075 | + args[3]); | |
1014 | 1076 | break; |
1015 | 1077 | |
1016 | 1078 | case INDEX_op_qemu_ld8u: |
... | ... | @@ -1074,8 +1136,8 @@ static inline void tcg_out_op(TCGContext *s, int opc, const TCGArg *args, |
1074 | 1136 | goto gen_arith32; |
1075 | 1137 | |
1076 | 1138 | case INDEX_op_brcond_i64: |
1077 | - tcg_out_brcond(s, args[2], args[0], args[1], const_args[1], | |
1078 | - args[3]); | |
1139 | + tcg_out_brcond_i64(s, args[2], args[0], args[1], const_args[1], | |
1140 | + args[3]); | |
1079 | 1141 | break; |
1080 | 1142 | case INDEX_op_qemu_ld64: |
1081 | 1143 | tcg_out_qemu_ld(s, args, 3); | ... | ... |