1 // SPDX-License-Identifier: LGPL-2.1-or-later
3 * Copyright (C) 2014-2021 Paul Cercueil <paul@crapouillou.net>
11 #include "lightrec-private.h"
14 static const char *std_opcodes[] = {
22 [OP_ADDIU] = "addiu ",
24 [OP_SLTIU] = "sltiu ",
45 static const char *special_opcodes[] = {
46 [OP_SPECIAL_SLL] = "sll ",
47 [OP_SPECIAL_SRL] = "srl ",
48 [OP_SPECIAL_SRA] = "sra ",
49 [OP_SPECIAL_SLLV] = "sllv ",
50 [OP_SPECIAL_SRLV] = "srlv ",
51 [OP_SPECIAL_SRAV] = "srav ",
52 [OP_SPECIAL_JR] = "jr ",
53 [OP_SPECIAL_JALR] = "jalr ",
54 [OP_SPECIAL_SYSCALL] = "syscall ",
55 [OP_SPECIAL_BREAK] = "break ",
56 [OP_SPECIAL_MFHI] = "mfhi ",
57 [OP_SPECIAL_MTHI] = "mthi ",
58 [OP_SPECIAL_MFLO] = "mflo ",
59 [OP_SPECIAL_MTLO] = "mtlo ",
60 [OP_SPECIAL_MULT] = "mult ",
61 [OP_SPECIAL_MULTU] = "multu ",
62 [OP_SPECIAL_DIV] = "div ",
63 [OP_SPECIAL_DIVU] = "divu ",
64 [OP_SPECIAL_ADD] = "add ",
65 [OP_SPECIAL_ADDU] = "addu ",
66 [OP_SPECIAL_SUB] = "sub ",
67 [OP_SPECIAL_SUBU] = "subu ",
68 [OP_SPECIAL_AND] = "and ",
69 [OP_SPECIAL_OR] = "or ",
70 [OP_SPECIAL_XOR] = "xor ",
71 [OP_SPECIAL_NOR] = "nor ",
72 [OP_SPECIAL_SLT] = "slt ",
73 [OP_SPECIAL_SLTU] = "sltu ",
76 static const char *regimm_opcodes[] = {
77 [OP_REGIMM_BLTZ] = "bltz ",
78 [OP_REGIMM_BGEZ] = "bgez ",
79 [OP_REGIMM_BLTZAL] = "bltzal ",
80 [OP_REGIMM_BGEZAL] = "bgezal ",
83 static const char *cp0_opcodes[] = {
84 [OP_CP0_MFC0] = "mfc0 ",
85 [OP_CP0_CFC0] = "cfc0 ",
86 [OP_CP0_MTC0] = "mtc0 ",
87 [OP_CP0_CTC0] = "ctc0 ",
91 static const char *cp2_opcodes[] = {
92 [OP_CP2_BASIC_MFC2] = "mfc2 ",
93 [OP_CP2_BASIC_CFC2] = "cfc2 ",
94 [OP_CP2_BASIC_MTC2] = "mtc2 ",
95 [OP_CP2_BASIC_CTC2] = "ctc2 ",
98 static const char *opcode_flags[] = {
106 static const char *opcode_io_flags[] = {
109 "self-modifying code",
113 static const char *opcode_branch_flags[] = {
118 static const char *opcode_multdiv_flags[] = {
124 static int print_flags(char *buf, size_t len, u16 flags,
125 const char **array, size_t array_size)
127 const char *flag_name;
129 size_t count = 0, bytes;
132 for (i = 0; i < array_size + ARRAY_SIZE(opcode_flags); i++) {
133 if (!(flags & BIT(i)))
136 if (i < ARRAY_SIZE(opcode_flags))
137 flag_name = opcode_flags[i];
139 flag_name = array[i - ARRAY_SIZE(opcode_flags)];
142 bytes = snprintf(buf, len, "(%s", flag_name);
144 bytes = snprintf(buf, len, ", %s", flag_name);
153 count += snprintf(buf, len, ")");
160 static int print_op_special(union code c, char *buf, size_t len,
161 const char ***flags_ptr, size_t *nb_flags)
167 return snprintf(buf, len, "%s%s,%s,%u",
168 special_opcodes[c.r.op],
169 lightrec_reg_name(c.r.rd),
170 lightrec_reg_name(c.r.rt),
172 case OP_SPECIAL_SLLV:
173 case OP_SPECIAL_SRLV:
174 case OP_SPECIAL_SRAV:
176 case OP_SPECIAL_ADDU:
178 case OP_SPECIAL_SUBU:
184 case OP_SPECIAL_SLTU:
185 return snprintf(buf, len, "%s%s,%s,%s",
186 special_opcodes[c.r.op],
187 lightrec_reg_name(c.r.rd),
188 lightrec_reg_name(c.r.rt),
189 lightrec_reg_name(c.r.rs));
191 case OP_SPECIAL_MTHI:
192 case OP_SPECIAL_MTLO:
193 return snprintf(buf, len, "%s%s",
194 special_opcodes[c.r.op],
195 lightrec_reg_name(c.r.rs));
196 case OP_SPECIAL_JALR:
197 return snprintf(buf, len, "%s%s,%s",
198 special_opcodes[c.r.op],
199 lightrec_reg_name(c.r.rd),
200 lightrec_reg_name(c.r.rt));
201 case OP_SPECIAL_SYSCALL:
202 case OP_SPECIAL_BREAK:
203 return snprintf(buf, len, "%s", special_opcodes[c.r.op]);
204 case OP_SPECIAL_MFHI:
205 case OP_SPECIAL_MFLO:
206 return snprintf(buf, len, "%s%s",
207 special_opcodes[c.r.op],
208 lightrec_reg_name(c.r.rd));
209 case OP_SPECIAL_MULT:
210 case OP_SPECIAL_MULTU:
212 case OP_SPECIAL_DIVU:
213 *flags_ptr = opcode_multdiv_flags;
214 *nb_flags = ARRAY_SIZE(opcode_multdiv_flags);
215 return snprintf(buf, len, "%s%s,%s,%s,%s",
216 special_opcodes[c.r.op],
217 lightrec_reg_name(get_mult_div_hi(c)),
218 lightrec_reg_name(get_mult_div_lo(c)),
219 lightrec_reg_name(c.r.rs),
220 lightrec_reg_name(c.r.rt));
222 return snprintf(buf, len, "unknown (0x%08x)", c.opcode);
226 static int print_op_cp(union code c, char *buf, size_t len, unsigned int cp)
234 return snprintf(buf, len, "%s%s,%u",
236 lightrec_reg_name(c.i.rt),
239 return snprintf(buf, len, "cp2 (0x%08x)", c.opcode);
247 return snprintf(buf, len, "%s%s,%u",
249 lightrec_reg_name(c.i.rt),
252 return snprintf(buf, len, "rfe ");
254 return snprintf(buf, len, "unknown (0x%08x)", c.opcode);
259 static int print_op(union code c, u32 pc, char *buf, size_t len,
260 const char ***flags_ptr, size_t *nb_flags)
263 return snprintf(buf, len, "nop ");
267 return print_op_special(c, buf, len, flags_ptr, nb_flags);
269 *flags_ptr = opcode_branch_flags;
270 *nb_flags = ARRAY_SIZE(opcode_branch_flags);
271 return snprintf(buf, len, "%s%s,0x%x",
272 regimm_opcodes[c.i.rt],
273 lightrec_reg_name(c.i.rs),
274 pc + 4 + ((s16)c.i.imm << 2));
277 return snprintf(buf, len, "%s0x%x",
279 (pc & 0xf0000000) | (c.j.imm << 2));
284 *flags_ptr = opcode_branch_flags;
285 *nb_flags = ARRAY_SIZE(opcode_branch_flags);
286 return snprintf(buf, len, "%s%s,%s,0x%x",
288 lightrec_reg_name(c.i.rs),
289 lightrec_reg_name(c.i.rt),
290 pc + 4 + ((s16)c.i.imm << 2));
298 return snprintf(buf, len, "%s%s,%s,0x%04hx",
300 lightrec_reg_name(c.i.rt),
301 lightrec_reg_name(c.i.rs),
305 return snprintf(buf, len, "%s%s,0x%04hx",
307 lightrec_reg_name(c.i.rt),
310 return print_op_cp(c, buf, len, 0);
312 return print_op_cp(c, buf, len, 2);
325 *flags_ptr = opcode_io_flags;
326 *nb_flags = ARRAY_SIZE(opcode_io_flags);
327 return snprintf(buf, len, "%s%s,%hd(%s)",
329 lightrec_reg_name(c.i.rt),
331 lightrec_reg_name(c.i.rs));
334 *flags_ptr = opcode_io_flags;
335 *nb_flags = ARRAY_SIZE(opcode_io_flags);
336 return snprintf(buf, len, "%s%s,%hd(%s)",
338 lightrec_reg_name(c.i.rt),
340 lightrec_reg_name(c.i.rs));
342 return snprintf(buf, len, "move %s,%s",
343 lightrec_reg_name(c.r.rd),
344 lightrec_reg_name(c.r.rs));
346 return snprintf(buf, len, "extc %s,%s",
347 lightrec_reg_name(c.i.rt),
348 lightrec_reg_name(c.i.rs));
350 return snprintf(buf, len, "exts %s,%s",
351 lightrec_reg_name(c.i.rt),
352 lightrec_reg_name(c.i.rs));
354 return snprintf(buf, len, "unknown (0x%08x)", c.opcode);
358 void lightrec_print_disassembly(const struct block *block, const u32 *code)
360 const struct opcode *op;
361 const char **flags_ptr;
362 size_t nb_flags, count, count2;
363 char buf[256], buf2[256], buf3[256];
367 for (i = 0; i < block->nb_ops; i++) {
368 op = &block->opcode_list[i];
369 branch_pc = get_branch_pc(block, i, 0);
370 pc = block->pc + (i << 2);
372 count = print_op((union code)code[i], pc, buf, sizeof(buf),
373 &flags_ptr, &nb_flags);
377 count2 = print_op(op->c, branch_pc, buf2, sizeof(buf2),
378 &flags_ptr, &nb_flags);
380 if (code[i] == op->c.opcode) {
385 print_flags(buf3, sizeof(buf3), op->flags, flags_ptr, nb_flags);
387 printf("0x%08x (0x%x)\t%s%*c%s%*c%s\n", pc, i << 2,
388 buf, 30 - (int)count, ' ', buf2, 30 - (int)count2, ' ', buf3);