macros.h (5250B)
1 /* Helpers */ 2 #define LI(reg, val) \ 3 mov.u reg, lo:val; \ 4 movh DREG_TEMP_LI, up:val; \ 5 or reg, reg, DREG_TEMP_LI; \ 6 7 /* Address definitions */ 8 #define TESTDEV_ADDR 0xf0000000 9 /* Register definitions */ 10 #define DREG_RS1 %d0 11 #define DREG_RS2 %d1 12 #define DREG_RS3 %d4 13 #define DREG_CALC_RESULT %d1 14 #define DREG_CALC_PSW %d2 15 #define DREG_CORRECT_PSW %d3 16 #define DREG_TEMP_LI %d10 17 #define DREG_TEMP %d11 18 #define DREG_TEST_NUM %d14 19 #define DREG_CORRECT_RESULT %d15 20 21 #define DREG_DEV_ADDR %a15 22 23 #define EREG_RS1 %e6 24 #define EREG_RS1_LO %d6 25 #define EREG_RS1_HI %d7 26 #define EREG_RS2 %e8 27 #define EREG_RS2_LO %d8 28 #define EREG_RS2_HI %d9 29 #define EREG_CALC_RESULT %e8 30 #define EREG_CALC_RESULT_HI %d9 31 #define EREG_CALC_RESULT_LO %d8 32 #define EREG_CORRECT_RESULT_LO %d0 33 #define EREG_CORRECT_RESULT_HI %d1 34 35 /* Test case wrappers */ 36 #define TEST_CASE(num, testreg, correct, code...) \ 37 test_ ## num: \ 38 code; \ 39 LI(DREG_CORRECT_RESULT, correct) \ 40 mov DREG_TEST_NUM, num; \ 41 jne testreg, DREG_CORRECT_RESULT, fail \ 42 43 #define TEST_CASE_E(num, correct_lo, correct_hi, code...) \ 44 test_ ## num: \ 45 code; \ 46 mov DREG_TEST_NUM, num; \ 47 LI(EREG_CORRECT_RESULT_LO, correct_lo) \ 48 jne EREG_CALC_RESULT_LO, EREG_CORRECT_RESULT_LO, fail; \ 49 LI(EREG_CORRECT_RESULT_HI, correct_hi) \ 50 jne EREG_CALC_RESULT_HI, EREG_CORRECT_RESULT_HI, fail; 51 52 #define TEST_CASE_PSW(num, testreg, correct, correct_psw, code...) \ 53 test_ ## num: \ 54 code; \ 55 LI(DREG_CORRECT_RESULT, correct) \ 56 mov DREG_TEST_NUM, num; \ 57 jne testreg, DREG_CORRECT_RESULT, fail; \ 58 mfcr DREG_CALC_PSW, $psw; \ 59 LI(DREG_CORRECT_PSW, correct_psw) \ 60 mov DREG_TEST_NUM, num; \ 61 jne DREG_CALC_PSW, DREG_CORRECT_PSW, fail; 62 63 /* Actual test case type 64 * e.g inst %dX, %dY -> TEST_D_D 65 * inst %dX, %dY, %dZ -> TEST_D_DD 66 * inst %eX, %dY, %dZ -> TEST_E_DD 67 */ 68 #define TEST_D_D(insn, num, result, rs1) \ 69 TEST_CASE(num, DREG_CALC_RESULT, result, \ 70 LI(DREG_RS1, rs1); \ 71 insn DREG_CALC_RESULT, DREG_RS1; \ 72 ) 73 74 #define TEST_D_D_PSW(insn, num, result, psw, rs1) \ 75 TEST_CASE_PSW(num, DREG_CALC_RESULT, result, psw, \ 76 LI(DREG_RS1, rs1); \ 77 rstv; \ 78 insn DREG_CORRECT_RESULT, DREG_RS1; \ 79 ) 80 81 #define TEST_D_DD_PSW(insn, num, result, psw, rs1, rs2) \ 82 TEST_CASE_PSW(num, DREG_CALC_RESULT, result, psw, \ 83 LI(DREG_RS1, rs1); \ 84 LI(DREG_RS2, rs2); \ 85 rstv; \ 86 insn DREG_CALC_RESULT, DREG_RS1, DREG_RS2; \ 87 ) 88 89 #define TEST_D_DDD_PSW(insn, num, result, psw, rs1, rs2, rs3) \ 90 TEST_CASE_PSW(num, DREG_CALC_RESULT, result, psw, \ 91 LI(DREG_RS1, rs1); \ 92 LI(DREG_RS2, rs2); \ 93 LI(DREG_RS3, rs3); \ 94 rstv; \ 95 insn DREG_CALC_RESULT, DREG_RS1, DREG_RS2, DREG_RS3; \ 96 ) 97 98 #define TEST_D_DDI_PSW(insn, num, result, psw, rs1, rs2, imm) \ 99 TEST_CASE_PSW(num, DREG_CALC_RESULT, result, psw, \ 100 LI(DREG_RS1, rs1); \ 101 LI(DREG_RS2, rs2); \ 102 rstv; \ 103 insn DREG_CALC_RESULT, DREG_RS1, DREG_RS2, imm; \ 104 ) 105 106 #define TEST_E_ED(insn, num, res_hi, res_lo, rs1_hi, rs1_lo, rs2) \ 107 TEST_CASE_E(num, res_lo, res_hi, \ 108 LI(EREG_RS1_LO, rs1_lo); \ 109 LI(EREG_RS1_HI, rs1_hi); \ 110 LI(DREG_RS2, rs2); \ 111 insn EREG_CALC_RESULT, EREG_RS1, DREG_RS2; \ 112 ) 113 114 /* Pass/Fail handling part */ 115 #define TEST_PASSFAIL \ 116 j pass; \ 117 fail: \ 118 LI(DREG_TEMP, TESTDEV_ADDR) \ 119 mov.a DREG_DEV_ADDR, DREG_TEMP; \ 120 st.w [DREG_DEV_ADDR], DREG_TEST_NUM;\ 121 debug; \ 122 j fail; \ 123 pass: \ 124 LI(DREG_TEMP, TESTDEV_ADDR) \ 125 mov.a DREG_DEV_ADDR, DREG_TEMP; \ 126 mov DREG_TEST_NUM, 0; \ 127 st.w [DREG_DEV_ADDR], DREG_TEST_NUM;\ 128 debug; \ 129 j pass;