int mips32_pracc_write_regs(struct mips_ejtag *ejtag_info, uint32_t *regs)
{
- static const uint32_t code[] = {
- /* start: */
- MIPS32_LUI(2, UPPER16(MIPS32_PRACC_PARAM_IN)), /* $2 = MIPS32_PRACC_PARAM_IN */
- MIPS32_ORI(2, 2, LOWER16(MIPS32_PRACC_PARAM_IN)),
- MIPS32_LW(1, 1*4, 2), /* lw $1,1*4($2) */
- MIPS32_LW(15, 15*4, 2), /* lw $15,15*4($2) */
- MIPS32_MTC0(15, 31, 0), /* move $15 to COP0 DeSave */
- MIPS32_LUI(15, UPPER16(MIPS32_PRACC_STACK)), /* $15 = MIPS32_PRACC_STACK */
- MIPS32_ORI(15, 15, LOWER16(MIPS32_PRACC_STACK)),
- MIPS32_SW(1, 0, 15), /* sw $1,($15) */
- MIPS32_LUI(1, UPPER16(MIPS32_PRACC_PARAM_IN)), /* $1 = MIPS32_PRACC_PARAM_IN */
- MIPS32_ORI(1, 1, LOWER16(MIPS32_PRACC_PARAM_IN)),
- MIPS32_LW(3, 3*4, 1), /* lw $3,3*4($1) */
- MIPS32_LW(4, 4*4, 1), /* lw $4,4*4($1) */
- MIPS32_LW(5, 5*4, 1), /* lw $5,5*4($1) */
- MIPS32_LW(6, 6*4, 1), /* lw $6,6*4($1) */
- MIPS32_LW(7, 7*4, 1), /* lw $7,7*4($1) */
- MIPS32_LW(8, 8*4, 1), /* lw $8,8*4($1) */
- MIPS32_LW(9, 9*4, 1), /* lw $9,9*4($1) */
- MIPS32_LW(10, 10*4, 1), /* lw $10,10*4($1) */
- MIPS32_LW(11, 11*4, 1), /* lw $11,11*4($1) */
- MIPS32_LW(12, 12*4, 1), /* lw $12,12*4($1) */
- MIPS32_LW(13, 13*4, 1), /* lw $13,13*4($1) */
- MIPS32_LW(14, 14*4, 1), /* lw $14,14*4($1) */
- MIPS32_LW(16, 16*4, 1), /* lw $16,16*4($1) */
- MIPS32_LW(17, 17*4, 1), /* lw $17,17*4($1) */
- MIPS32_LW(18, 18*4, 1), /* lw $18,18*4($1) */
- MIPS32_LW(19, 19*4, 1), /* lw $19,19*4($1) */
- MIPS32_LW(20, 20*4, 1), /* lw $20,20*4($1) */
- MIPS32_LW(21, 21*4, 1), /* lw $21,21*4($1) */
- MIPS32_LW(22, 22*4, 1), /* lw $22,22*4($1) */
- MIPS32_LW(23, 23*4, 1), /* lw $23,23*4($1) */
- MIPS32_LW(24, 24*4, 1), /* lw $24,24*4($1) */
- MIPS32_LW(25, 25*4, 1), /* lw $25,25*4($1) */
- MIPS32_LW(26, 26*4, 1), /* lw $26,26*4($1) */
- MIPS32_LW(27, 27*4, 1), /* lw $27,27*4($1) */
- MIPS32_LW(28, 28*4, 1), /* lw $28,28*4($1) */
- MIPS32_LW(29, 29*4, 1), /* lw $29,29*4($1) */
- MIPS32_LW(30, 30*4, 1), /* lw $30,30*4($1) */
- MIPS32_LW(31, 31*4, 1), /* lw $31,31*4($1) */
-
- MIPS32_LW(2, 32*4, 1), /* lw $2,32*4($1) */
- MIPS32_MTC0(2, 12, 0), /* move $2 to status */
- MIPS32_LW(2, 33*4, 1), /* lw $2,33*4($1) */
- MIPS32_MTLO(2), /* move $2 to lo */
- MIPS32_LW(2, 34*4, 1), /* lw $2,34*4($1) */
- MIPS32_MTHI(2), /* move $2 to hi */
- MIPS32_LW(2, 35*4, 1), /* lw $2,35*4($1) */
- MIPS32_MTC0(2, 8, 0), /* move $2 to badvaddr */
- MIPS32_LW(2, 36*4, 1), /* lw $2,36*4($1) */
- MIPS32_MTC0(2, 13, 0), /* move $2 to cause*/
- MIPS32_LW(2, 37*4, 1), /* lw $2,37*4($1) */
- MIPS32_MTC0(2, 24, 0), /* move $2 to depc (pc) */
-
- MIPS32_LW(2, 2*4, 1), /* lw $2,2*4($1) */
- MIPS32_LW(1, 0, 15), /* lw $1,($15) */
- MIPS32_B(NEG16(53)), /* b start */
- MIPS32_MFC0(15, 31, 0), /* move COP0 DeSave to $15 */
+ static const uint32_t cp0_write_code[] = {
+ MIPS32_MTC0(1, 12, 0), /* move $1 to status */
+ MIPS32_MTLO(1), /* move $1 to lo */
+ MIPS32_MTHI(1), /* move $1 to hi */
+ MIPS32_MTC0(1, 8, 0), /* move $1 to badvaddr */
+ MIPS32_MTC0(1, 13, 0), /* move $1 to cause*/
+ MIPS32_MTC0(1, 24, 0), /* move $1 to depc (pc) */
};
- int retval;
+ uint32_t *code;
+ code = malloc((37 * 2 + 6 + 1) * sizeof(uint32_t)); /* alloc memory for the worst case */
+ if (code == NULL) {
+ LOG_ERROR("Out of memory");
+ return ERROR_FAIL;
+ }
+
+ uint32_t *code_p = code;
+ int code_len = 0;
+ /* load registers 2 to 31 with lui an ori instructions, check if same instructions can be saved */
+ for (int i = 2; i < 32; i++) {
+ if (LOWER16((regs[i])) == 0) {
+ *code_p++ = MIPS32_LUI(i, UPPER16((regs[i]))); /* if lower half word is 0, lui instruction only */
+ code_len++;
+ } else if (UPPER16((regs[i])) == 0) {
+ *code_p++ = MIPS32_ORI(i, 0, LOWER16((regs[i]))); /* if upper half word is 0, ori with $0 only*/
+ code_len++;
+ } else {
+ *code_p++ = MIPS32_LUI(i, UPPER16((regs[i]))); /* default, load with lui and ori instructions */
+ *code_p++ = MIPS32_ORI(i, i, LOWER16((regs[i])));
+ code_len += 2;
+ }
+ }
+
+ for (int i = 0; i != 6; i++) {
+ *code_p++ = MIPS32_LUI(1, UPPER16((regs[i + 32]))); /* load CPO value in $1, with lui and ori */
+ *code_p++ = MIPS32_ORI(1, 1, LOWER16((regs[i + 32])));
+ *code_p++ = cp0_write_code[i]; /* write value from $1 to CPO register */
+ code_len += 3;
+ }
- retval = mips32_pracc_exec(ejtag_info, ARRAY_SIZE(code), code,
- MIPS32NUMCOREREGS, regs, 0, NULL, 1);
+ *code_p++ = MIPS32_LUI(1, UPPER16((regs[1]))); /* load upper half word in $1 */
+ code_len += 3;
+ *code_p++ = MIPS32_B(NEG16(code_len - 1)), /* b start */
+ *code_p = MIPS32_ORI(1, 1, LOWER16((regs[1]))); /* load lower half word in $1 */
+ int retval = mips32_pracc_exec(ejtag_info, code_len, code, 0, NULL, 0, NULL, 1);
+ free(code);
return retval;
}
int mips32_pracc_read_regs(struct mips_ejtag *ejtag_info, uint32_t *regs)
{
- static const uint32_t code[] = {
- /* start: */
- MIPS32_MTC0(2, 31, 0), /* move $2 to COP0 DeSave */
- MIPS32_LUI(2, UPPER16(MIPS32_PRACC_PARAM_OUT)), /* $2 = MIPS32_PRACC_PARAM_OUT */
- MIPS32_ORI(2, 2, LOWER16(MIPS32_PRACC_PARAM_OUT)),
- MIPS32_SW(0, 0*4, 2), /* sw $0,0*4($2) */
- MIPS32_SW(1, 1*4, 2), /* sw $1,1*4($2) */
- MIPS32_SW(15, 15*4, 2), /* sw $15,15*4($2) */
- MIPS32_MFC0(2, 31, 0), /* move COP0 DeSave to $2 */
- MIPS32_MTC0(15, 31, 0), /* move $15 to COP0 DeSave */
- MIPS32_LUI(15, UPPER16(MIPS32_PRACC_STACK)), /* $15 = MIPS32_PRACC_STACK */
- MIPS32_ORI(15, 15, LOWER16(MIPS32_PRACC_STACK)),
- MIPS32_SW(1, 0, 15), /* sw $1,($15) */
- MIPS32_SW(2, 0, 15), /* sw $2,($15) */
- MIPS32_LUI(1, UPPER16(MIPS32_PRACC_PARAM_OUT)), /* $1 = MIPS32_PRACC_PARAM_OUT */
- MIPS32_ORI(1, 1, LOWER16(MIPS32_PRACC_PARAM_OUT)),
- MIPS32_SW(2, 2*4, 1), /* sw $2,2*4($1) */
- MIPS32_SW(3, 3*4, 1), /* sw $3,3*4($1) */
- MIPS32_SW(4, 4*4, 1), /* sw $4,4*4($1) */
- MIPS32_SW(5, 5*4, 1), /* sw $5,5*4($1) */
- MIPS32_SW(6, 6*4, 1), /* sw $6,6*4($1) */
- MIPS32_SW(7, 7*4, 1), /* sw $7,7*4($1) */
- MIPS32_SW(8, 8*4, 1), /* sw $8,8*4($1) */
- MIPS32_SW(9, 9*4, 1), /* sw $9,9*4($1) */
- MIPS32_SW(10, 10*4, 1), /* sw $10,10*4($1) */
- MIPS32_SW(11, 11*4, 1), /* sw $11,11*4($1) */
- MIPS32_SW(12, 12*4, 1), /* sw $12,12*4($1) */
- MIPS32_SW(13, 13*4, 1), /* sw $13,13*4($1) */
- MIPS32_SW(14, 14*4, 1), /* sw $14,14*4($1) */
- MIPS32_SW(16, 16*4, 1), /* sw $16,16*4($1) */
- MIPS32_SW(17, 17*4, 1), /* sw $17,17*4($1) */
- MIPS32_SW(18, 18*4, 1), /* sw $18,18*4($1) */
- MIPS32_SW(19, 19*4, 1), /* sw $19,19*4($1) */
- MIPS32_SW(20, 20*4, 1), /* sw $20,20*4($1) */
- MIPS32_SW(21, 21*4, 1), /* sw $21,21*4($1) */
- MIPS32_SW(22, 22*4, 1), /* sw $22,22*4($1) */
- MIPS32_SW(23, 23*4, 1), /* sw $23,23*4($1) */
- MIPS32_SW(24, 24*4, 1), /* sw $24,24*4($1) */
- MIPS32_SW(25, 25*4, 1), /* sw $25,25*4($1) */
- MIPS32_SW(26, 26*4, 1), /* sw $26,26*4($1) */
- MIPS32_SW(27, 27*4, 1), /* sw $27,27*4($1) */
- MIPS32_SW(28, 28*4, 1), /* sw $28,28*4($1) */
- MIPS32_SW(29, 29*4, 1), /* sw $29,29*4($1) */
- MIPS32_SW(30, 30*4, 1), /* sw $30,30*4($1) */
- MIPS32_SW(31, 31*4, 1), /* sw $31,31*4($1) */
-
+ static int cp0_read_code[] = {
MIPS32_MFC0(2, 12, 0), /* move status to $2 */
- MIPS32_SW(2, 32*4, 1), /* sw $2,32*4($1) */
MIPS32_MFLO(2), /* move lo to $2 */
- MIPS32_SW(2, 33*4, 1), /* sw $2,33*4($1) */
MIPS32_MFHI(2), /* move hi to $2 */
- MIPS32_SW(2, 34*4, 1), /* sw $2,34*4($1) */
MIPS32_MFC0(2, 8, 0), /* move badvaddr to $2 */
- MIPS32_SW(2, 35*4, 1), /* sw $2,35*4($1) */
MIPS32_MFC0(2, 13, 0), /* move cause to $2 */
- MIPS32_SW(2, 36*4, 1), /* sw $2,36*4($1) */
MIPS32_MFC0(2, 24, 0), /* move depc (pc) to $2 */
- MIPS32_SW(2, 37*4, 1), /* sw $2,37*4($1) */
-
- MIPS32_LW(2, 0, 15), /* lw $2,($15) */
- MIPS32_LW(1, 0, 15), /* lw $1,($15) */
- MIPS32_B(NEG16(58)), /* b start */
- MIPS32_MFC0(15, 31, 0), /* move COP0 DeSave to $15 */
};
- int retval;
+ uint32_t *code;
+ code = malloc(49 * sizeof(uint32_t));
+ if (code == NULL) {
+ LOG_ERROR("Out of memory");
+ return ERROR_FAIL;
+ }
+
+ uint32_t *code_p = code;
+
+ *code_p++ = MIPS32_MTC0(1, 31, 0), /* move $1 to COP0 DeSave */
+ *code_p++ = MIPS32_LUI(1, PRACC_UPPER_BASE_ADDR); /* $1 = MIP32_PRACC_BASE_ADDR */
+
+ for (int i = 2; i != 32; i++)
+ *code_p++ = MIPS32_SW(i, PRACC_OUT_OFFSET + (i * 4), 1); /* store GPR's 2 to 31 */
- retval = mips32_pracc_exec(ejtag_info, ARRAY_SIZE(code), code,
- 0, NULL, MIPS32NUMCOREREGS, regs, 1);
+ for (int i = 0; i != 6; i++) {
+ *code_p++ = cp0_read_code[i]; /* load COP0 needed registers to $2 */
+ *code_p++ = MIPS32_SW(2, PRACC_OUT_OFFSET + (i + 32) * 4, 1); /* store COP0 registers from $2 to param out */
+ }
+
+ *code_p++ = MIPS32_MFC0(2, 31, 0), /* move DeSave to $2, reg1 value */
+ *code_p++ = MIPS32_SW(2, PRACC_OUT_OFFSET + 4, 1); /* store reg1 value from $2 to param out */
+
+ *code_p++ = MIPS32_LW(2, PRACC_OUT_OFFSET + 8, 1); /* restore $2 from param out (singularity) */
+ *code_p++ = MIPS32_B(NEG16(48)); /* b start */
+ *code_p = MIPS32_MFC0(1, 31, 0); /* move COP0 DeSave to $1 */
+ int retval = mips32_pracc_exec(ejtag_info, 49, code, 0, NULL, MIPS32NUMCOREREGS, regs, 1);
+
+ free(code);
return retval;
}