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); | ... | ... |