1 /*
2 * This file and its contents are supplied under the terms of the
3 * Common Development and Distribution License ("CDDL"), version 1.0.
4 * You may only use this file in accordance with the terms of version
5 * 1.0 of the CDDL.
6 *
7 * A full copy of the text of the CDDL should have accompanied this
8 * source. A copy of the CDDL is also available via the Internet at
9 * http://www.illumos.org/license/CDDL.
10 */
11
12 /*
13 * Copyright (c) 2018, Joyent, Inc.
14 */
15
16 /*
17 * RISC-V Instruction set decoder
18 */
19
20 #include <libdisasm.h>
21 #include <sys/byteorder.h>
22 #include <sys/debug.h>
23
24 #include "libdisasm_impl.h"
25
26 #include <stdio.h>
27
28 extern int strcmp(const char *, const char *);
29
30 /*
31 * Register names based on their ABI name.
32 */
33 static const char *dis_riscv_regs[32] = {
34 "x0", "ra", "sp", "gp", "tp", "t0", "t1", "t2",
35 "s0", "s1", "a0", "a1", "a2", "a3", "a4", "a5",
36 "a6", "a7", "s2", "s3", "s4", "s5", "s6", "s7",
37 "s8", "s9", "s10", "s11", "t3", "t4", "t5", "t6"
38 };
39
40 static const char *dis_riscv_fpregs[32] = {
41 "ft0", "ft1", "ft2", "ft3", "ft4", "ft5", "ft6", "ft7",
42 "fs0", "fs1", "fa0", "fa1", "fa2", "fa3", "fa4", "fa5",
43 "fa6", "fa7", "fs2", "fs3", "fs4", "fs5", "fs6", "fs7",
44 "fs8", "fs9", "fs10", "fs11", "ft8", "ft9", "ft10", "ft11",
45 };
46
47 static const char *dis_riscv_c_regs[8] = {
48 "s0", "s1", "a0", "a1", "a2", "a3", "a4", "a5"
49 };
50
51 static const char *dis_riscv_c_fpregs[8] = {
52 "fs0", "fs1", "fa0", "fa1", "fa2", "fa3", "fa4", "fa5"
53 };
54
55 /*
56 * RM names have the leading comma in them because the last value represents
57 * that the hardware register decides the rounding mode and therefore nothing
58 * should be appended to the instruction.
59 */
60 static const char *dis_riscv_rm[8] = {
61 ",rne", ",rtz", ",rdn", ",rup", ",rmm", ",???", ",???", ""
62 };
63
64 typedef struct dis_riscv_csr {
65 uint_t drc_val;
66 const char *drc_name;
67 } dis_riscv_csr_t;
68
69 /*
70 * The current set of CSR names as per Table 2.2-2.5 from RISC-V Privileged
71 * Architectures V1.10. These include all of the ones in the User-Level ISA.
72 * These are ordered per the doc.
73 */
74 static dis_riscv_csr_t dis_riscv_csr_map[] = {
75 /* User Trap */
76 { 0x000, "ustatus" }, { 0x004, "uie" }, { 0x005, "utvec" },
77 /* User Trap Handling */
78 { 0x040, "uscratch" }, { 0x041, "uepc" }, { 0x042, "ucause" },
79 { 0x043, "utval" }, { 0x044, "uip" },
80 /* User Floating-Point CSRs */
81 { 0x001, "fflags" }, { 0x002, "frm" }, { 0x003, "fcsr" },
82 /* User Counters/Timers */
83 { 0xc00, "cycle" }, { 0xc01, "time" }, { 0xc02, "instret" },
84 { 0xc03, "hpmcounter3" }, { 0xc04, "hpmcounter4" },
85 { 0xc05, "hpmcounter5" }, { 0xc06, "hpmcounter6" },
86 { 0xc07, "hpmcounter7" }, { 0xc08, "hpmcounter8" },
87 { 0xc09, "hpmcounter9" }, { 0xc0a, "hpmcounter10" },
88 { 0xc0b, "hpmcounter11" }, { 0xc0c, "hpmcounter12" },
89 { 0xc0d, "hpmcounter13" }, { 0xc0e, "hpmcounter14" },
90 { 0xc0f, "hpmcounter15" }, { 0xc10, "hpmcounter16" },
91 { 0xc11, "hpmcounter17" }, { 0xc12, "hpmcounter18" },
92 { 0xc13, "hpmcounter19" }, { 0xc14, "hpmcounter20" },
93 { 0xc15, "hpmcounter21" }, { 0xc16, "hpmcounter22" },
94 { 0xc17, "hpmcounter23" }, { 0xc18, "hpmcounter24" },
95 { 0xc19, "hpmcounter25" }, { 0xc1a, "hpmcounter26" },
96 { 0xc1b, "hpmcounter27" }, { 0xc1c, "hpmcounter28" },
97 { 0xc1d, "hpmcounter29" }, { 0xc1e, "hpmcounter30" },
98 { 0xc1f, "hpmcounter31" },
99 { 0xc80, "cycleh" }, { 0xc81, "timeh" }, { 0xc82, "instreth" },
100 { 0xc83, "hpmcounter3h" }, { 0xc84, "hpmcounter4h" },
101 { 0xc85, "hpmcounter5h" }, { 0xc86, "hpmcounter6h" },
102 { 0xc87, "hpmcounter7h" }, { 0xc88, "hpmcounter8h" },
103 { 0xc89, "hpmcounter9h" }, { 0xc8a, "hpmcounter10h" },
104 { 0xc8b, "hpmcounter11h" }, { 0xc8c, "hpmcounter12h" },
105 { 0xc8d, "hpmcounter13h" }, { 0xc8e, "hpmcounter14h" },
106 { 0xc8f, "hpmcounter15h" }, { 0xc90, "hpmcounter16h" },
107 { 0xc91, "hpmcounter17h" }, { 0xc92, "hpmcounter18h" },
108 { 0xc93, "hpmcounter19h" }, { 0xc94, "hpmcounter20h" },
109 { 0xc95, "hpmcounter21h" }, { 0xc96, "hpmcounter22h" },
110 { 0xc97, "hpmcounter23h" }, { 0xc98, "hpmcounter24h" },
111 { 0xc99, "hpmcounter25h" }, { 0xc9a, "hpmcounter26h" },
112 { 0xc9b, "hpmcounter27h" }, { 0xc9c, "hpmcounter28h" },
113 { 0xc9d, "hpmcounter29h" }, { 0xc9e, "hpmcounter30h" },
114 { 0xc9f, "hpmcounter31h" },
115 /* Supervisor Trap Status */
116 { 0x100, "sstatus" }, { 0x102, "sedeleg" }, { 0x103, "sideleg" },
117 { 0x104, "sie" }, { 0x105, "stvec" }, { 0x106, "scounteren" },
118 /* Supervisor Trap Handling */
119 { 0x140, "sscratch" }, { 0x141, "sepc" }, { 0x142, "scause" },
120 { 0x143, "stval" }, { 0x144, "sip" },
121 /* Supervisor Protection and Translation */
122 { 0x180, "satp" },
123 /* Machine Information Registers */
124 { 0xf11, "mvendorid" }, { 0xf12, "marchid" },
125 { 0xf13, "mimpid" }, { 0xf14, "mhartid" },
126 /* Machine Trap Setup */
127 { 0x300, "mstatus" }, { 0x301, "misa" }, { 0x302, "medeleg" },
128 { 0x303, "mideleg" }, { 0x304, "mie" }, { 0x305, "mtvec" },
129 { 0x306, "mcounteren" },
130 /* Machine Trap Handling */
131 { 0x340, "mscratch" }, { 0x341, "mepc" }, { 0x342, "mcause" },
132 { 0x343, "mtval" }, { 0x344, "mip" },
133 /* Machine Protection and Translation */
134 { 0x3a0, "pmpcfg0" }, { 0x3a1, "pmpcfg1" },
135 { 0x3a2, "pmpcfg2" }, { 0x3a3, "pmpcfg3" },
136 { 0x3b0, "pmpaddr0" }, { 0x3b1, "pmpaddr1" },
137 { 0x3b2, "pmpaddr2" }, { 0x3b3, "pmpaddr3" },
138 { 0x3b4, "pmpaddr4" }, { 0x3b5, "pmpaddr5" },
139 { 0x3b6, "pmpaddr6" }, { 0x3b7, "pmpaddr7" },
140 { 0x3b8, "pmpaddr8" }, { 0x3b9, "pmpaddr9" },
141 { 0x3ba, "pmpaddr10" }, { 0x3bb, "pmpaddr11" },
142 { 0x3bc, "pmpaddr12" }, { 0x3bd, "pmpaddr13" },
143 { 0x3be, "pmpaddr14" }, { 0x3bf, "pmpaddr15" }
144 };
145
146 typedef enum dis_riscv_csr_alias_type {
147 DIS_RISCV_CSR_READ,
148 DIS_RISCV_CSR_READ_GEN,
149 DIS_RISCV_CSR_SWAP,
150 DIS_RISCV_CSR_SWAP_IMM,
151 DIS_RISCV_CSR_WRITE,
152 DIS_RISCV_CSR_WRITE_GEN,
153 DIS_RISCV_CSR_WRITE_IMM,
154 DIS_RISCV_CSR_WRITE_IMM_GEN
155 } dis_riscv_csr_alias_type_t;
156
157 typedef struct dis_riscv_csr_alias {
158 const char *drca_alias;
159 dis_riscv_csr_alias_type_t drca_type;
160 const char *drca_base;
161 const char *drca_csr;
162 int drca_rd;
163 int drca_rs;
164 } dis_riscv_csr_alias_t;
165
166 /*
167 * Table of aliases. A NULL or -1 indicates a don't care.
168 */
169 static dis_riscv_csr_alias_t dis_riscv_csr_alias[] = {
170 { "rdinstret", DIS_RISCV_CSR_READ, "csrrs", "instret", -1, 0 },
171 { "rdinstreth", DIS_RISCV_CSR_READ, "csrrs", "instreth", -1, 0 },
172 { "rdcycle", DIS_RISCV_CSR_READ, "csrrs", "cycle", -1, 0 },
173 { "rdcycleh", DIS_RISCV_CSR_READ, "csrrs", "cycleh", -1, 0 },
174 { "rdtime", DIS_RISCV_CSR_READ, "csrrs", "time", -1, 0 },
175 { "rdtimeh", DIS_RISCV_CSR_READ, "csrrs", "timeh", -1, 0 },
176 { "frcsr", DIS_RISCV_CSR_READ, "csrrs", "fcsr", -1, 0 },
177 { "fscsr", DIS_RISCV_CSR_WRITE, "csrrw", "fcsr", 0, -1 },
178 { "fscsr", DIS_RISCV_CSR_SWAP, "csrrw", "fcsr", -1, -1 },
179 { "frrm", DIS_RISCV_CSR_READ, "csrrs", "frm", -1, 0 },
180 { "fsrm", DIS_RISCV_CSR_WRITE, "csrrw", "frm", 0, -1 },
181 { "fsrm", DIS_RISCV_CSR_SWAP, "csrrw", "frm", -1, -1 },
182 { "fsrmi", DIS_RISCV_CSR_WRITE_IMM, "csrrwi", "frm", 0, -1 },
183 { "fsrmi", DIS_RISCV_CSR_SWAP_IMM, "csrrwi", "frm", -1, -1 },
184 { "frflags", DIS_RISCV_CSR_READ, "csrrs", "fflags", -1, 0 },
185 { "fsflags", DIS_RISCV_CSR_WRITE, "csrrw", "fflags", 0, -1 },
186 { "fsflags", DIS_RISCV_CSR_SWAP, "csrrw", "fflags", -1, -1 },
187 { "fsflagsi", DIS_RISCV_CSR_WRITE_IMM, "csrrwi", "fflags", 0, -1 },
188 { "fsflagsi", DIS_RISCV_CSR_SWAP_IMM, "csrrwi", "fflags", -1, -1 },
189 /*
190 * These are the generic aliases that aren't based on the CSR. Keep
191 * them last.
192 */
193 { "csrr", DIS_RISCV_CSR_READ_GEN, "csrrs", NULL, -1, 0 },
194 { "csrw", DIS_RISCV_CSR_WRITE_GEN, "csrrw", NULL, 0, -1 },
195 { "csrs", DIS_RISCV_CSR_WRITE_GEN, "csrrs", NULL, 0, -1 },
196 { "csrc", DIS_RISCV_CSR_WRITE_GEN, "csrrc", NULL, 0, -1 },
197 { "csrwi", DIS_RISCV_CSR_WRITE_IMM_GEN, "csrrwi", NULL, 0, -1 },
198 { "csrsi", DIS_RISCV_CSR_WRITE_IMM_GEN, "csrrsi", NULL, 0, -1 },
199 { "csrci", DIS_RISCV_CSR_WRITE_IMM_GEN, "csrrci", NULL, 0, -1 },
200 };
201
202 /*
203 * Take an n-bit value whose sign bit is indicated by the big sign and convert
204 * to a signed type.
205 */
206 static uint_t
dis_riscv_sign_extend(uint_t val,uint_t sbit,const char ** sign)207 dis_riscv_sign_extend(uint_t val, uint_t sbit, const char **sign)
208 {
209 VERIFY3U(sbit, <=, 31);
210
211 if (val >= 1 << sbit) {
212 *sign = "-";
213 return ((1 << (sbit + 1)) - val);
214 } else {
215 *sign = "";
216 return (val);
217 }
218 }
219
220 /*
221 * Four byte decode tables. This is derived from the RV32/64G Instruction Set
222 * Listings. We describe a table entry based on the opcode and optional opcodes
223 * based on the type of instruction that it is and its encoding format. Most
224 * sets of instructions have one of several uniform encoding types.
225 *
226 * 31 25 24 20 19 15 14 12 11 7 6 0
227 * | funct7 | r2 | rs1 | funct3 | rd | opcode | R-type
228 * | imm[11:0] | rs1 | funct3 | rd | opcode | I-type
229 * | imm[11:5] | r2 | rs1 | funct3 | imm[4:0] | opcode | S-type
230 * | imm[12|10:5] | r2 | rs1 | funct3 | imm[4:1|11] | opcode | B-type
231 * | imm[31:12] | rd | opcode | U-type
232 * | imm[10|10:1|11|19:12] | rd | opcode | J-type
233 */
234 typedef enum dis_riscv_itype {
235 DIS_RISCV_I_R_TYPE,
236 DIS_RISCV_I_I_TYPE,
237 DIS_RISCV_I_S_TYPE,
238 DIS_RISCV_I_B_TYPE,
239 DIS_RISCV_I_U_TYPE,
240 DIS_RISCV_I_J_TYPE,
241 DIS_RISCV_I_R4_TYPE,
242 /*
243 * This is a variant of the standard R type where the first bit of
244 * funct7 is actually used for this shift.
245 */
246 DIS_RISCV_I_SHIFT64_TYPE,
247 /*
248 * This type isn't explicitly defined in the ISA doc; however, it is a
249 * standard format that is for all of the Atomic class instructions.
250 * This is treated like an R-type, except the funct7 is really a funct5.
251 * The load variant is similar; however, rs2 must be zero.
252 */
253 DIS_RISCV_I_RV32A_TYPE,
254 DIS_RISCV_I_RV32A_LOAD_TYPE,
255 /*
256 * This is a custom type we've defined where the first value is the
257 * instruction mask and the second value is the value of the bits in it.
258 * This is used for a few irregular instructions ala FENCE and ECALL.
259 */
260 DIS_RISCV_I_MASK_TYPE,
261 /*
262 * This type is used for FP arguments that use rs2 as an opcode.
263 */
264 DIS_RISCV_I_FP_RS2OP_TYPE,
265 /*
266 * This type uses the opcode and funct7 and uses funct3 as a rounding
267 * mode argument.
268 */
269 DIS_RISCV_I_FP_RM_TYPE,
270 /*
271 * This fp type uses the opcode, funct7, funct3, and rs2 as an op type.
272 */
273 DIS_RISCV_I_FP_R_RS2_TYPE,
274 } dis_riscv_itype_t;
275
276 #define DIS_RISCV_OPCODE(x) ((x) & 0x7f)
277 #define DIS_RISCV_FUNCT3(x) (((x) >> 12) & 0x7)
278 #define DIS_RISCV_FUNCT7(x) (((x) >> 25) & 0x7f)
279 #define DIS_RISCV_RD(x) (((x) >> 7) & 0x1f)
280 #define DIS_RISCV_RS1(x) (((x) >> 15) & 0x1f)
281 #define DIS_RISCV_RS2(x) (((x) >> 20) & 0x1f)
282 #define DIS_RISCV_FP_RS3(x) (((x) >> 27) & 0x1f)
283 #define DIS_RISCV_FUNCT2(x) (((x) >> 25) & 0x03)
284
285 /*
286 * SHIFT funct7 variant.
287 */
288 #define DIS_RISCV_SFUNCT7(x) (((x) >> 26) & 0x3f)
289
290 #define DIS_RISCV_UIMM(x) (((x) >> 12) & 0xfffff)
291
292 #define DIS_RISCV_IIMM(x) (((x) >> 20) & 0xfff)
293
294 #define DIS_RISCV_BIMM_12(x) (((x) >> 19) & 0x1000)
295 #define DIS_RISCV_BIMM_11(x) (((x) & 0x80) << 4)
296 #define DIS_RISCV_BIMM_10_5(x) (((x) >> 20) & 0x7e0)
297 #define DIS_RISCV_BIMM_4_1(x) (((x) >> 7) & 0x1e)
298
299 #define DIS_RISCV_SIMM_UP(x) ((((x) >> 25) & 0x7f) << 5)
300 #define DIS_RISCV_SIMM_LOW(x) (((x) >> 7) & 0x1f)
301
302 #define DIS_RISCV_JIMM_20(x) (((x) & 0x80000000) >> 11)
303 #define DIS_RISCV_JIMM_19_12(x) ((x) & 0xff000)
304 #define DIS_RISCV_JIMM_11(x) (((x) & 100000) >> 9)
305 #define DIS_RISCV_JIMM_10_1(x) (((x) & 0x7fe00000) >> 20)
306
307 #define DIS_RISCV_RVA_FUNCT5(x) (((x) >> 27) & 0x1f)
308 #define DIS_RISCV_RVA_AQ(x) (((x) >> 26) & 0x1)
309 #define DIS_RISCV_RVA_RL(x) (((x) >> 25) & 0x1)
310
311 struct dis_riscv_instr;
312 typedef void (*dis_riscv_func_t)(dis_handle_t *, uint32_t,
313 struct dis_riscv_instr *, char *, size_t);
314
315 typedef struct dis_riscv_instr {
316 const char *drv_name;
317 dis_riscv_itype_t drv_type;
318 dis_riscv_func_t drv_print;
319 uint_t drv_opcode;
320 uint_t drv_funct3;
321 uint_t drv_funct7;
322 uint_t drv_funct2;
323 } dis_riscv_instr_t;
324
325 /*ARGSUSED*/
326 static void
dis_riscv_rtype_32(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)327 dis_riscv_rtype_32(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
328 char *buf, size_t buflen)
329 {
330 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s", table->drv_name,
331 dis_riscv_regs[DIS_RISCV_RD(instr)],
332 dis_riscv_regs[DIS_RISCV_RS1(instr)],
333 dis_riscv_regs[DIS_RISCV_RS2(instr)]);
334 }
335
336 static void
dis_riscv_itype_32(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)337 dis_riscv_itype_32(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
338 char *buf, size_t buflen)
339 {
340 const char *s;
341 uint_t imm = dis_riscv_sign_extend(DIS_RISCV_IIMM(instr), 11, &s);
342
343 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
344 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s0%o",
345 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
346 dis_riscv_regs[DIS_RISCV_RS1(instr)], s, imm);
347 } else {
348 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s0x%x",
349 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
350 dis_riscv_regs[DIS_RISCV_RS1(instr)], s, imm);
351 }
352 }
353
354 static void
dis_riscv_btype_32(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)355 dis_riscv_btype_32(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
356 char *buf, size_t buflen)
357 {
358 const char *s;
359 uint_t bimm = DIS_RISCV_BIMM_12(instr) | DIS_RISCV_BIMM_11(instr) |
360 DIS_RISCV_BIMM_10_5(instr) | DIS_RISCV_BIMM_4_1(instr);
361 uint_t imm = dis_riscv_sign_extend(bimm, 12, &s);
362
363 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
364 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s0%o",
365 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
366 dis_riscv_regs[DIS_RISCV_RS1(instr)], s, imm);
367 } else {
368 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s0x%x",
369 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
370 dis_riscv_regs[DIS_RISCV_RS1(instr)], s, imm);
371 }
372 }
373
374 static void
dis_riscv_load(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)375 dis_riscv_load(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
376 char *buf, size_t buflen)
377 {
378 const char *s;
379 uint_t imm = dis_riscv_sign_extend(DIS_RISCV_IIMM(instr), 11, &s);
380
381 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
382 (void) dis_snprintf(buf, buflen, "%s %s,%s0%o(%s)",
383 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
384 s, imm, dis_riscv_regs[DIS_RISCV_RS1(instr)]);
385 } else {
386 (void) dis_snprintf(buf, buflen, "%s %s,%s0x%x(%s)",
387 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
388 s, imm, dis_riscv_regs[DIS_RISCV_RS1(instr)]);
389 }
390 }
391
392 static void
dis_riscv_stype_32(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)393 dis_riscv_stype_32(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
394 char *buf, size_t buflen)
395 {
396 const char *s;
397 uint_t simm = DIS_RISCV_SIMM_UP(instr) | DIS_RISCV_SIMM_LOW(instr);
398 uint_t val = dis_riscv_sign_extend(simm, 11, &s);
399
400 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
401 (void) dis_snprintf(buf, buflen, "%s %s,%s0%o(%s)",
402 table->drv_name, dis_riscv_regs[DIS_RISCV_RS2(instr)],
403 s, val, dis_riscv_regs[DIS_RISCV_RS1(instr)]);
404 } else {
405 (void) dis_snprintf(buf, buflen, "%s %s,%s0x%x(%s)",
406 table->drv_name, dis_riscv_regs[DIS_RISCV_RS2(instr)],
407 s, val, dis_riscv_regs[DIS_RISCV_RS1(instr)]);
408 }
409 }
410
411 /*ARGSUSED*/
412 static void
dis_riscv_utype_32(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)413 dis_riscv_utype_32(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
414 char *buf, size_t buflen)
415 {
416 (void) dis_snprintf(buf, buflen, "%s %s,0x%x", table->drv_name,
417 dis_riscv_regs[DIS_RISCV_RD(instr)], DIS_RISCV_UIMM(instr));
418 }
419
420 static void
dis_riscv_jtype_32(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)421 dis_riscv_jtype_32(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
422 char *buf, size_t buflen)
423 {
424 const char *s;
425 uint_t jimm = DIS_RISCV_JIMM_20(instr) | DIS_RISCV_JIMM_19_12(instr) |
426 DIS_RISCV_JIMM_11(instr) | DIS_RISCV_JIMM_10_1(instr);
427 uint_t imm = dis_riscv_sign_extend(jimm, 20, &s);
428
429 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
430 (void) dis_snprintf(buf, buflen, "%s %s,%s0%o",
431 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
432 s, imm);
433 } else {
434 (void) dis_snprintf(buf, buflen, "%s %s,%s0x%x",
435 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
436 s, imm);
437 }
438 }
439
440 /*
441 * The shift instructions are a variant on the R-type instructions where RS2 is
442 * an immediate to perform the shift by as opposed to a register.
443 */
444 static void
dis_riscv_shift_32(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)445 dis_riscv_shift_32(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
446 char *buf, size_t buflen)
447 {
448 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
449 (void) dis_snprintf(buf, buflen, "%s %s,%s,0%o",
450 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
451 dis_riscv_regs[DIS_RISCV_RS1(instr)], DIS_RISCV_RS2(instr));
452 } else {
453 (void) dis_snprintf(buf, buflen, "%s %s,%s,0x%x",
454 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
455 dis_riscv_regs[DIS_RISCV_RS1(instr)], DIS_RISCV_RS2(instr));
456 }
457 }
458
459 /*
460 * The 64-bit version of shift instructions steals an extra bit from funct7 to
461 * construct the shift amount.
462 */
463 static void
dis_riscv_shift_64(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)464 dis_riscv_shift_64(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
465 char *buf, size_t buflen)
466 {
467 uint_t shift = DIS_RISCV_RS2(instr) | ((instr & (1UL << 25)) >> 20);
468 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
469 (void) dis_snprintf(buf, buflen, "%s %s,%s,0%o",
470 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
471 dis_riscv_regs[DIS_RISCV_RS1(instr)], shift);
472 } else {
473 (void) dis_snprintf(buf, buflen, "%s %s,%s,0x%x",
474 table->drv_name, dis_riscv_regs[DIS_RISCV_RD(instr)],
475 dis_riscv_regs[DIS_RISCV_RS1(instr)], shift);
476 }
477 }
478
479 /*ARGSUSED*/
480 static void
dis_riscv_csr(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)481 dis_riscv_csr(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
482 char *buf, size_t buflen)
483 {
484 uint_t rd, csr, rs, i;
485 const char *csrstr = NULL;
486 char csrval[32];
487 dis_riscv_csr_alias_t *alias = NULL;
488
489 rd = DIS_RISCV_RD(instr);
490 rs = DIS_RISCV_RS1(instr);
491 csr = DIS_RISCV_IIMM(instr);
492
493 for (i = 0; i < ARRAY_SIZE(dis_riscv_csr_map); i++) {
494 if (csr == dis_riscv_csr_map[i].drc_val) {
495 csrstr = dis_riscv_csr_map[i].drc_name;
496 break;
497 }
498 }
499
500 if (csrstr == NULL) {
501 (void) dis_snprintf(csrval, sizeof (csrval), "0x%x", csr);
502 csrstr = csrval;
503 }
504
505 for (i = 0; i < ARRAY_SIZE(dis_riscv_csr_alias); i++) {
506 dis_riscv_csr_alias_t *a = &dis_riscv_csr_alias[i];
507 if (strcmp(a->drca_base, table->drv_name) != 0)
508 continue;
509 if (a->drca_csr != NULL && strcmp(a->drca_csr, csrstr) != 0)
510 continue;
511 if (a->drca_rd != -1 && a->drca_rd != rd)
512 continue;
513 if (a->drca_rs != -1 && a->drca_rs != rs)
514 continue;
515 alias = a;
516 break;
517 }
518
519 if (alias == NULL) {
520 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s", table->drv_name,
521 dis_riscv_regs[rd], csrstr, dis_riscv_regs[rs]);
522 return;
523 }
524
525 switch (alias->drca_type) {
526 case DIS_RISCV_CSR_READ:
527 (void) dis_snprintf(buf, buflen, "%s %s", alias->drca_alias,
528 dis_riscv_regs[rd]);
529 break;
530 case DIS_RISCV_CSR_READ_GEN:
531 (void) dis_snprintf(buf, buflen, "%s %s,%s", alias->drca_alias,
532 dis_riscv_regs[rd], csrstr);
533 break;
534 case DIS_RISCV_CSR_SWAP:
535 (void) dis_snprintf(buf, buflen, "%s %s,%s", alias->drca_alias,
536 dis_riscv_regs[rd], dis_riscv_regs[rs]);
537 break;
538 case DIS_RISCV_CSR_WRITE:
539 (void) dis_snprintf(buf, buflen, "%s %s", alias->drca_alias,
540 dis_riscv_regs[rs]);
541 break;
542 case DIS_RISCV_CSR_WRITE_GEN:
543 (void) dis_snprintf(buf, buflen, "%s %s,%s", alias->drca_alias,
544 csrstr, dis_riscv_regs[rs]);
545 break;
546 default:
547 (void) dis_snprintf(buf, buflen, "<unknown>");
548 break;
549 }
550 }
551
552 static void
dis_riscv_csri(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)553 dis_riscv_csri(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
554 char *buf, size_t buflen)
555 {
556 uint_t rd, csr, imm, i;
557 const char *csrstr = NULL;
558 char csrval[32];
559 dis_riscv_csr_alias_t *alias = NULL;
560
561 rd = DIS_RISCV_RD(instr);
562 imm = DIS_RISCV_RS1(instr);
563 csr = DIS_RISCV_IIMM(instr);
564
565 for (i = 0; i < ARRAY_SIZE(dis_riscv_csr_map); i++) {
566 if (csr == dis_riscv_csr_map[i].drc_val) {
567 csrstr = dis_riscv_csr_map[i].drc_name;
568 break;
569 }
570 }
571
572 if (csrstr == NULL) {
573 (void) dis_snprintf(csrval, sizeof (csrval), "0x%x", csr);
574 csrstr = csrval;
575 }
576
577 for (i = 0; i < ARRAY_SIZE(dis_riscv_csr_alias); i++) {
578 dis_riscv_csr_alias_t *a = &dis_riscv_csr_alias[i];
579 if (strcmp(a->drca_base, table->drv_name) != 0)
580 continue;
581 if (a->drca_csr != NULL && strcmp(a->drca_csr, csrstr) != 0)
582 continue;
583 if (a->drca_rd != -1 && a->drca_rd != rd)
584 continue;
585 if (a->drca_rs != -1)
586 continue;
587 alias = a;
588 break;
589 }
590
591 if (alias == NULL) {
592 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
593 (void) dis_snprintf(buf, buflen, "%s %s,%s,0%o",
594 table->drv_name, dis_riscv_regs[rd], csrstr, imm);
595 } else {
596 (void) dis_snprintf(buf, buflen, "%s %s,%s,0x%x",
597 table->drv_name, dis_riscv_regs[rd], csrstr, imm);
598 }
599 return;
600 }
601
602 switch (alias->drca_type) {
603 case DIS_RISCV_CSR_SWAP_IMM:
604 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
605 (void) dis_snprintf(buf, buflen, "%s %s,0%o",
606 alias->drca_alias, dis_riscv_regs[rd], imm);
607 } else {
608 (void) dis_snprintf(buf, buflen, "%s %s,0x%x",
609 alias->drca_alias, dis_riscv_regs[rd], imm);
610 }
611 break;
612 case DIS_RISCV_CSR_WRITE_IMM:
613 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
614 (void) dis_snprintf(buf, buflen, "%s 0%o",
615 alias->drca_alias, imm);
616 } else {
617 (void) dis_snprintf(buf, buflen, "%s 0x%x",
618 alias->drca_alias, imm);
619 }
620 break;
621 case DIS_RISCV_CSR_WRITE_IMM_GEN:
622 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
623 (void) dis_snprintf(buf, buflen, "%s %s,0%o",
624 alias->drca_alias, csrstr, imm);
625 } else {
626 (void) dis_snprintf(buf, buflen, "%s %s,0x%x",
627 alias->drca_alias, csrstr, imm);
628 }
629 break;
630 default:
631 (void) dis_snprintf(buf, buflen, "<unknown>");
632 break;
633 }
634 }
635
636 #define DIS_RISCV_FENCE_PRED(x) (((x) >> 24) & 0xf)
637 #define DIS_RISCV_FENCE_SUCC(x) (((x) >> 20) & 0xf)
638 #define DIS_RISCV_FENCE_I 0x8
639 #define DIS_RISCV_FENCE_O 0x4
640 #define DIS_RISCV_FENCE_R 0x2
641 #define DIS_RISCV_FENCE_W 0x1
642 #define DIS_RISCV_FENCE_IORW 0xf
643
644 /*ARGSUSED*/
645 static void
dis_riscv_fence(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)646 dis_riscv_fence(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
647 char *buf, size_t buflen)
648 {
649 uint_t pred, succ;
650
651 pred = DIS_RISCV_FENCE_PRED(instr);
652 succ = DIS_RISCV_FENCE_SUCC(instr);
653
654 /*
655 * If both halves are iorw that is aliased to just an empty fence
656 * instruction per Chapter 20 - RISC-V Assembly Programmer's Handbook in
657 * the RISC-V user spec.
658 */
659 if (pred == DIS_RISCV_FENCE_IORW && succ == DIS_RISCV_FENCE_IORW) {
660 (void) dis_snprintf(buf, buflen, "%s", table->drv_name);
661 return;
662 }
663
664 (void) dis_snprintf(buf, buflen, "%s %s%s%s%s, %s%s%s%s",
665 table->drv_name,
666 pred & DIS_RISCV_FENCE_I ? "i" : "",
667 pred & DIS_RISCV_FENCE_O ? "o" : "",
668 pred & DIS_RISCV_FENCE_R ? "r" : "",
669 pred & DIS_RISCV_FENCE_W ? "w" : "",
670 succ & DIS_RISCV_FENCE_I ? "i" : "",
671 succ & DIS_RISCV_FENCE_O ? "o" : "",
672 succ & DIS_RISCV_FENCE_R ? "r" : "",
673 succ & DIS_RISCV_FENCE_W ? "w" : "");
674 }
675
676 /*ARGSUSED*/
677 static void
dis_riscv_name(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)678 dis_riscv_name(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
679 char *buf, size_t buflen)
680 {
681 (void) dis_snprintf(buf, buflen, "%s", table->drv_name);
682 }
683
684 /*ARGSUSED*/
685 static void
dis_riscv_rs1_rs2(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)686 dis_riscv_rs1_rs2(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
687 char *buf, size_t buflen)
688 {
689 (void) dis_snprintf(buf, buflen, "%s %s,%s", table->drv_name,
690 dis_riscv_regs[DIS_RISCV_RS1(instr)],
691 dis_riscv_regs[DIS_RISCV_RS2(instr)]);
692 }
693
694 /*ARGSUSED*/
695 static void
dis_riscv_rv32a_load(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)696 dis_riscv_rv32a_load(dis_handle_t *dhp, uint32_t instr,
697 dis_riscv_instr_t *table, char *buf, size_t buflen)
698 {
699 const char *suffix = "";
700
701 if (DIS_RISCV_RVA_AQ(instr) && DIS_RISCV_RVA_RL(instr)) {
702 suffix = ".aqrl";
703 } else if (DIS_RISCV_RVA_AQ(instr)) {
704 suffix = ".aq";
705 } else if (DIS_RISCV_RVA_RL(instr)) {
706 suffix = ".rl";
707 }
708
709 (void) dis_snprintf(buf, buflen, "%s%s %s,(%s)", table->drv_name,
710 suffix, dis_riscv_regs[DIS_RISCV_RD(instr)],
711 dis_riscv_regs[DIS_RISCV_RS1(instr)]);
712 }
713
714 /*ARGSUSED*/
715 static void
dis_riscv_rv32a(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)716 dis_riscv_rv32a(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
717 char *buf, size_t buflen)
718 {
719 const char *suffix = "";
720
721 if (DIS_RISCV_RVA_AQ(instr) && DIS_RISCV_RVA_RL(instr)) {
722 suffix = ".aqrl";
723 } else if (DIS_RISCV_RVA_AQ(instr)) {
724 suffix = ".aq";
725 } else if (DIS_RISCV_RVA_RL(instr)) {
726 suffix = ".rl";
727 }
728
729 (void) dis_snprintf(buf, buflen, "%s%s %s,%s,(%s)", table->drv_name,
730 suffix, dis_riscv_regs[DIS_RISCV_RD(instr)],
731 dis_riscv_regs[DIS_RISCV_RS2(instr)],
732 dis_riscv_regs[DIS_RISCV_RS1(instr)]);
733 }
734
735 static void
dis_riscv_fp_load(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)736 dis_riscv_fp_load(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
737 char *buf, size_t buflen)
738 {
739 const char *s;
740 uint_t imm = dis_riscv_sign_extend(DIS_RISCV_IIMM(instr), 11, &s);
741
742 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
743 (void) dis_snprintf(buf, buflen, "%s %s,%s0%o(%s)",
744 table->drv_name, dis_riscv_fpregs[DIS_RISCV_RD(instr)],
745 s, imm, dis_riscv_regs[DIS_RISCV_RS1(instr)]);
746 } else {
747 (void) dis_snprintf(buf, buflen, "%s %s,%s0x%x(%s)",
748 table->drv_name, dis_riscv_fpregs[DIS_RISCV_RD(instr)],
749 s, imm, dis_riscv_regs[DIS_RISCV_RS1(instr)]);
750 }
751 }
752
753 static void
dis_riscv_fp_store(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)754 dis_riscv_fp_store(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
755 char *buf, size_t buflen)
756 {
757 const char *s;
758 uint_t simm = DIS_RISCV_SIMM_UP(instr) | DIS_RISCV_SIMM_LOW(instr);
759 uint_t val = dis_riscv_sign_extend(simm, 11, &s);
760
761 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
762 (void) dis_snprintf(buf, buflen, "%s %s,%s0%o(%s)",
763 table->drv_name, dis_riscv_fpregs[DIS_RISCV_RS2(instr)],
764 s, val, dis_riscv_regs[DIS_RISCV_RS1(instr)]);
765 } else {
766 (void) dis_snprintf(buf, buflen, "%s %s,%s0x%x(%s)",
767 table->drv_name, dis_riscv_fpregs[DIS_RISCV_RS2(instr)],
768 s, val, dis_riscv_regs[DIS_RISCV_RS1(instr)]);
769 }
770 }
771
772 /*ARGSUSED*/
773 static void
dis_riscv_fp_r(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)774 dis_riscv_fp_r(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
775 char *buf, size_t buflen)
776 {
777 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s", table->drv_name,
778 dis_riscv_fpregs[DIS_RISCV_RD(instr)],
779 dis_riscv_fpregs[DIS_RISCV_RS1(instr)],
780 dis_riscv_fpregs[DIS_RISCV_RS2(instr)]);
781 }
782
783 /*
784 * Variant of fp_r type that goes to integer destination registers.
785 */
786 /*ARGSUSED*/
787 static void
dis_riscv_fp_r_fpi(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)788 dis_riscv_fp_r_fpi(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
789 char *buf, size_t buflen)
790 {
791 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s", table->drv_name,
792 dis_riscv_regs[DIS_RISCV_RD(instr)],
793 dis_riscv_fpregs[DIS_RISCV_RS1(instr)],
794 dis_riscv_fpregs[DIS_RISCV_RS2(instr)]);
795 }
796
797 /*ARGSUSED*/
798 static void
dis_riscv_fp_r4(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)799 dis_riscv_fp_r4(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
800 char *buf, size_t buflen)
801 {
802 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s,%s%s", table->drv_name,
803 dis_riscv_fpregs[DIS_RISCV_RD(instr)],
804 dis_riscv_fpregs[DIS_RISCV_RS1(instr)],
805 dis_riscv_fpregs[DIS_RISCV_RS2(instr)],
806 dis_riscv_fpregs[DIS_RISCV_FP_RS3(instr)],
807 dis_riscv_rm[DIS_RISCV_FUNCT3(instr)]);
808 }
809
810 /*ARGSUSED*/
811 static void
dis_riscv_fp_rs2_fp(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)812 dis_riscv_fp_rs2_fp(dis_handle_t *dhp, uint32_t instr, dis_riscv_instr_t *table,
813 char *buf, size_t buflen)
814 {
815 (void) dis_snprintf(buf, buflen, "%s %s,%s%s", table->drv_name,
816 dis_riscv_fpregs[DIS_RISCV_RD(instr)],
817 dis_riscv_fpregs[DIS_RISCV_RS1(instr)],
818 dis_riscv_rm[DIS_RISCV_FUNCT3(instr)]);
819 }
820
821 /*ARGSUSED*/
822 static void
dis_riscv_fp_rs2_fp_nr(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)823 dis_riscv_fp_rs2_fp_nr(dis_handle_t *dhp, uint32_t instr,
824 dis_riscv_instr_t *table, char *buf, size_t buflen)
825 {
826 (void) dis_snprintf(buf, buflen, "%s %s,%s", table->drv_name,
827 dis_riscv_fpregs[DIS_RISCV_RD(instr)],
828 dis_riscv_fpregs[DIS_RISCV_RS1(instr)]);
829 }
830
831 /*ARGSUSED*/
832 static void
dis_riscv_fp_rs2_fpi(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)833 dis_riscv_fp_rs2_fpi(dis_handle_t *dhp, uint32_t instr,
834 dis_riscv_instr_t *table, char *buf, size_t buflen)
835 {
836 (void) dis_snprintf(buf, buflen, "%s %s,%s%s", table->drv_name,
837 dis_riscv_regs[DIS_RISCV_RD(instr)],
838 dis_riscv_fpregs[DIS_RISCV_RS1(instr)],
839 dis_riscv_rm[DIS_RISCV_FUNCT3(instr)]);
840 }
841
842 /*ARGSUSED*/
843 static void
dis_riscv_fp_rs2_ifp(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)844 dis_riscv_fp_rs2_ifp(dis_handle_t *dhp, uint32_t instr,
845 dis_riscv_instr_t *table, char *buf, size_t buflen)
846 {
847 (void) dis_snprintf(buf, buflen, "%s %s,%s%s", table->drv_name,
848 dis_riscv_fpregs[DIS_RISCV_RD(instr)],
849 dis_riscv_regs[DIS_RISCV_RS1(instr)],
850 dis_riscv_rm[DIS_RISCV_FUNCT3(instr)]);
851 }
852
853 /*ARGSUSED*/
854 static void
dis_riscv_fp_rs2_fpi_nr(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)855 dis_riscv_fp_rs2_fpi_nr(dis_handle_t *dhp, uint32_t instr,
856 dis_riscv_instr_t *table, char *buf, size_t buflen)
857 {
858 (void) dis_snprintf(buf, buflen, "%s %s,%s", table->drv_name,
859 dis_riscv_regs[DIS_RISCV_RD(instr)],
860 dis_riscv_fpregs[DIS_RISCV_RS1(instr)]);
861 }
862
863 /*ARGSUSED*/
864 static void
dis_riscv_fp_rs2_ifp_nr(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)865 dis_riscv_fp_rs2_ifp_nr(dis_handle_t *dhp, uint32_t instr,
866 dis_riscv_instr_t *table, char *buf, size_t buflen)
867 {
868 (void) dis_snprintf(buf, buflen, "%s %s,%s", table->drv_name,
869 dis_riscv_fpregs[DIS_RISCV_RD(instr)],
870 dis_riscv_regs[DIS_RISCV_RS1(instr)]);
871 }
872
873
874 /*ARGSUSED*/
875 static void
dis_riscv_fp_rm(dis_handle_t * dhp,uint32_t instr,dis_riscv_instr_t * table,char * buf,size_t buflen)876 dis_riscv_fp_rm(dis_handle_t *dhp, uint32_t instr,
877 dis_riscv_instr_t *table, char *buf, size_t buflen)
878 {
879 (void) dis_snprintf(buf, buflen, "%s %s,%s,%s%s", table->drv_name,
880 dis_riscv_fpregs[DIS_RISCV_RD(instr)],
881 dis_riscv_fpregs[DIS_RISCV_RS1(instr)],
882 dis_riscv_fpregs[DIS_RISCV_RS2(instr)],
883 dis_riscv_rm[DIS_RISCV_FUNCT3(instr)]);
884 }
885
886 #define DIS_RISCV_R32(str, op, f3, f7) \
887 { str, DIS_RISCV_I_R_TYPE, dis_riscv_rtype_32, op, f3, f7 }
888 #define DIS_RISCV_I32(str, op, f3) \
889 { str, DIS_RISCV_I_I_TYPE, dis_riscv_itype_32, op, f3 }
890 #define DIS_RISCV_S32(str, op, f3) \
891 { str, DIS_RISCV_I_S_TYPE, dis_riscv_stype_32, op, f3 }
892 #define DIS_RISCV_B32(str, op, f3) \
893 { str, DIS_RISCV_I_B_TYPE, dis_riscv_btype_32, op, f3 }
894 #define DIS_RISCV_U32(str, op) \
895 { str, DIS_RISCV_I_U_TYPE, dis_riscv_utype_32, op }
896 #define DIS_RISCV_J32(str, op) \
897 { str, DIS_RISCV_I_J_TYPE, dis_riscv_jtype_32, op }
898
899 /*
900 * These are non-standard types that we've defined because they require
901 * different handling.
902 */
903 #define DIS_RISCV_SHIFT32(str, op, f3, f7) \
904 { str, DIS_RISCV_I_R_TYPE, dis_riscv_shift_32, op, f3, f7 }
905 #define DIS_RISCV_SHIFT64(str, op, f3, f7) \
906 { str, DIS_RISCV_I_SHIFT64_TYPE, dis_riscv_shift_64, op, f3, f7 }
907 #define DIS_RISCV_CSR(str, op, f3) \
908 { str, DIS_RISCV_I_I_TYPE, dis_riscv_csr, op, f3 }
909 #define DIS_RISCV_CSRI(str, op, f3) \
910 { str, DIS_RISCV_I_I_TYPE, dis_riscv_csri, op, f3 }
911 #define DIS_RISCV_LOAD(str, op, f3) \
912 { str, DIS_RISCV_I_I_TYPE, dis_riscv_load, op, f3 }
913
914 #define DIS_RISCV_MASK(str, mask, val, func) \
915 { str, DIS_RISCV_I_MASK_TYPE, func, mask, val }
916
917
918 /*
919 * Atomic-extension specific entries
920 */
921 #define DIS_RISCV_A32(str, op, f3, f5) \
922 { str, DIS_RISCV_I_RV32A_TYPE, dis_riscv_rv32a, op, f3, f5 }
923 #define DIS_RISCV_A32LOAD(str, op, f3, f5, f2) \
924 { str, DIS_RISCV_I_RV32A_LOAD_TYPE, dis_riscv_rv32a_load, op, f3, \
925 f5, f2 }
926
927 /*
928 * Floating-point specific entries
929 */
930 #define DIS_RISCV_FP_LOAD(str, op, f3) \
931 { str, DIS_RISCV_I_I_TYPE, dis_riscv_fp_load, op, f3 }
932 #define DIS_RISCV_FP_STORE(str, op, f3) \
933 { str, DIS_RISCV_I_S_TYPE, dis_riscv_fp_store, op, f3 }
934 #define DIS_RISCV_FP_R(str, op, f3, f7) \
935 { str, DIS_RISCV_I_R_TYPE, dis_riscv_fp_r, op, f3, f7 }
936 #define DIS_RISCV_FP_R4(str, op, f2) \
937 { str, DIS_RISCV_I_R4_TYPE, dis_riscv_fp_r4, op, 0, 0, f2 }
938 #define DIS_RISCV_FP_RS2_FP(str, op, rs2, f7) \
939 { str, DIS_RISCV_I_FP_RS2OP_TYPE, dis_riscv_fp_rs2_fp, op, rs2, f7 }
940 #define DIS_RISCV_FP_RS2_FP_NR(str, op, rs2, f7) \
941 { str, DIS_RISCV_I_FP_RS2OP_TYPE, dis_riscv_fp_rs2_fp_nr, op, rs2, f7 }
942 #define DIS_RISCV_FP_RS2_FPI(str, op, rs2, f7) \
943 { str, DIS_RISCV_I_FP_RS2OP_TYPE, dis_riscv_fp_rs2_fpi, op, rs2, f7 }
944 #define DIS_RISCV_FP_RS2_IFP(str, op, rs2, f7) \
945 { str, DIS_RISCV_I_FP_RS2OP_TYPE, dis_riscv_fp_rs2_ifp, op, rs2, f7 }
946 #define DIS_RISCV_FP_RS2_IFP_NR(str, op, rs2, f7) \
947 { str, DIS_RISCV_I_FP_RS2OP_TYPE, dis_riscv_fp_rs2_ifp_nr, op, rs2, f7 }
948 #define DIS_RISCV_FP_RM(str, op, f7) \
949 { str, DIS_RISCV_I_FP_RM_TYPE, dis_riscv_fp_rm, op, 0, f7 }
950 #define DIS_RISCV_FP_R_RS2_FPI(str, op, f3, rs2, f7) \
951 { str, DIS_RISCV_I_FP_R_RS2_TYPE, dis_riscv_fp_rs2_fpi, op, f3, f7, \
952 rs2 }
953 #define DIS_RISCV_FP_R_RS2_IFP(str, op, f3, rs2, f7) \
954 { str, DIS_RISCV_I_FP_R_RS2_TYPE, dis_riscv_fp_rs2_ifp, op, f3, f7, \
955 rs2 }
956 #define DIS_RISCV_FP_R_RS2_FPI_NR(str, op, f3, rs2, f7) \
957 { str, DIS_RISCV_I_FP_R_RS2_TYPE, dis_riscv_fp_rs2_fpi_nr, op, f3, \
958 f7, rs2 }
959 #define DIS_RISCV_FP_R_RS2_IFP_NR(str, op, f3, rs2, f7) \
960 { str, DIS_RISCV_I_FP_R_RS2_TYPE, dis_riscv_fp_rs2_ifp_nr, op, f3, \
961 f7, rs2 }
962 #define DIS_RISCV_FP_RI(str, op, f3, f7) \
963 { str, DIS_RISCV_I_R_TYPE, dis_riscv_fp_r_fpi, op, f3, f7 }
964
965 /*
966 * This table is ordered such that it follows the ordering in the RISC-V ISA
967 * Manual.
968 */
969 static dis_riscv_instr_t dis_riscv_4byte[] = {
970 /*
971 * RV32I
972 */
973 DIS_RISCV_U32("lui", 0x37),
974 DIS_RISCV_U32("auipc", 0x17),
975 DIS_RISCV_J32("jal", 0x6f),
976 /* ret is a special case of jalr */
977 DIS_RISCV_MASK("ret", 0xffffffff, 0x00008067, dis_riscv_name),
978 DIS_RISCV_I32("jalr", 0x67, 0x0),
979 DIS_RISCV_B32("beq", 0x63, 0x0),
980 DIS_RISCV_B32("bne", 0x63, 0x1),
981 DIS_RISCV_B32("blt", 0x63, 0x4),
982 DIS_RISCV_B32("bge", 0x63, 0x5),
983 DIS_RISCV_B32("bltu", 0x63, 0x6),
984 DIS_RISCV_B32("bgeu", 0x63, 0x7),
985 DIS_RISCV_LOAD("lb", 0x03, 0x0),
986 DIS_RISCV_LOAD("lh", 0x03, 0x1),
987 DIS_RISCV_LOAD("lw", 0x03, 0x2),
988 DIS_RISCV_LOAD("lbu", 0x03, 0x4),
989 DIS_RISCV_LOAD("lhu", 0x03, 0x5),
990 DIS_RISCV_S32("sb", 0x23, 0x0),
991 DIS_RISCV_S32("sh", 0x23, 0x1),
992 DIS_RISCV_S32("sw", 0x23, 0x2),
993 /* nop is addi x0, x0, 0 */
994 DIS_RISCV_MASK("nop", 0xffffffff, 0x00000013, dis_riscv_name),
995 DIS_RISCV_I32("addi", 0x13, 0x0),
996 DIS_RISCV_I32("slti", 0x13, 0x2),
997 DIS_RISCV_I32("sltiu", 0x13, 0x3),
998 DIS_RISCV_I32("xori", 0x13, 0x4),
999 DIS_RISCV_I32("ori", 0x13, 0x6),
1000 DIS_RISCV_I32("andi", 0x13, 0x7),
1001 DIS_RISCV_SHIFT32("slli", 0x13, 0x1, 0x00),
1002 DIS_RISCV_SHIFT32("srli", 0x13, 0x5, 0x00),
1003 DIS_RISCV_SHIFT32("srai", 0x13, 0x5, 0x20),
1004 DIS_RISCV_R32("add", 0x33, 0x0, 0x00),
1005 DIS_RISCV_R32("sub", 0x33, 0x0, 0x20),
1006 DIS_RISCV_R32("sll", 0x33, 0x1, 0x00),
1007 DIS_RISCV_R32("slt", 0x33, 0x2, 0x00),
1008 DIS_RISCV_R32("sltu", 0x33, 0x3, 0x00),
1009 DIS_RISCV_R32("xor", 0x33, 0x4, 0x00),
1010 DIS_RISCV_R32("srl", 0x33, 0x5, 0x00),
1011 DIS_RISCV_R32("sra", 0x33, 0x5, 0x20),
1012 DIS_RISCV_R32("or", 0x33, 0x6, 0x00),
1013 DIS_RISCV_R32("and", 0x33, 0x7, 0x00),
1014 DIS_RISCV_MASK("fence", 0xf00fffff, 0xf, dis_riscv_fence),
1015 DIS_RISCV_MASK("fence.i", 0xfffff00f, 0x100f, dis_riscv_name),
1016 DIS_RISCV_MASK("ecall", 0xffffffff, 0x73, dis_riscv_name),
1017 DIS_RISCV_MASK("ebreak", 0xffffffff, 0x100073, dis_riscv_name),
1018 DIS_RISCV_CSR("csrrw", 0x73, 0x1),
1019 DIS_RISCV_CSR("csrrs", 0x73, 0x2),
1020 DIS_RISCV_CSR("csrrc", 0x73, 0x3),
1021 DIS_RISCV_CSRI("csrrwi", 0x73, 0x5),
1022 DIS_RISCV_CSRI("csrrsi", 0x73, 0x6),
1023 DIS_RISCV_CSRI("csrrci", 0x73, 0x7),
1024 /*
1025 * RV64I
1026 */
1027 DIS_RISCV_LOAD("lwu", 0x03, 0x6),
1028 DIS_RISCV_LOAD("ld", 0x03, 0x3),
1029 DIS_RISCV_S32("sd", 0x23, 0x3),
1030 DIS_RISCV_SHIFT64("slli", 0x13, 0x1, 0x0),
1031 DIS_RISCV_SHIFT64("srli", 0x13, 0x5, 0x0),
1032 DIS_RISCV_SHIFT64("srai", 0x13, 0x5, 0x10),
1033 DIS_RISCV_I32("addiw", 0x1b, 0x0),
1034 DIS_RISCV_SHIFT32("slliw", 0x1b, 0x1, 0x0),
1035 DIS_RISCV_SHIFT32("srliw", 0x1b, 0x5, 0x0),
1036 DIS_RISCV_SHIFT32("sraiw", 0x1b, 0x5, 0x20),
1037 DIS_RISCV_R32("addw", 0x3b, 0x0, 0x00),
1038 DIS_RISCV_R32("subw", 0x3b, 0x0, 0x20),
1039 DIS_RISCV_R32("sllw", 0x3b, 0x1, 0x00),
1040 DIS_RISCV_R32("srlw", 0x3b, 0x5, 0x00),
1041 DIS_RISCV_R32("sraw", 0x3b, 0x5, 0x20),
1042 /*
1043 * RV32M
1044 */
1045 DIS_RISCV_R32("mul", 0x33, 0x0, 0x01),
1046 DIS_RISCV_R32("mulh", 0x33, 0x1, 0x01),
1047 DIS_RISCV_R32("mulhsu", 0x33, 0x2, 0x01),
1048 DIS_RISCV_R32("mulhu", 0x33, 0x3, 0x01),
1049 DIS_RISCV_R32("div", 0x33, 0x4, 0x01),
1050 DIS_RISCV_R32("divu", 0x33, 0x5, 0x01),
1051 DIS_RISCV_R32("rem", 0x33, 0x6, 0x01),
1052 DIS_RISCV_R32("remu", 0x33, 0x7, 0x01),
1053 /*
1054 * RV64M
1055 */
1056 DIS_RISCV_R32("mulw", 0x3b, 0x0, 0x01),
1057 DIS_RISCV_R32("divw", 0x3b, 0x4, 0x01),
1058 DIS_RISCV_R32("divuw", 0x3b, 0x5, 0x01),
1059 DIS_RISCV_R32("remw", 0x3b, 0x6, 0x01),
1060 DIS_RISCV_R32("remuw", 0x3b, 0x7, 0x01),
1061 /*
1062 * RV32A
1063 */
1064 DIS_RISCV_A32LOAD("lr.w", 0x2f, 0x2, 0x02, 0x0),
1065 DIS_RISCV_A32("sc.w", 0x2f, 0x2, 0x03),
1066 DIS_RISCV_A32("amoswap.w", 0x2f, 0x2, 0x01),
1067 DIS_RISCV_A32("amoadd.w", 0x2f, 0x2, 0x00),
1068 DIS_RISCV_A32("amoxor.w", 0x2f, 0x2, 0x04),
1069 DIS_RISCV_A32("amoand.w", 0x2f, 0x2, 0x0c),
1070 DIS_RISCV_A32("amoor.w", 0x2f, 0x2, 0x08),
1071 DIS_RISCV_A32("amomin.w", 0x2f, 0x2, 0x10),
1072 DIS_RISCV_A32("amomax.w", 0x2f, 0x2, 0x14),
1073 DIS_RISCV_A32("amominu.w", 0x2f, 0x2, 0x18),
1074 DIS_RISCV_A32("amomaxu.w", 0x2f, 0x2, 0x1c),
1075 /*
1076 * RV64A
1077 */
1078 DIS_RISCV_A32LOAD("lr.d", 0x2f, 0x3, 0x02, 0x0),
1079 DIS_RISCV_A32("sc.d", 0x2f, 0x3, 0x03),
1080 DIS_RISCV_A32("amoswap.d", 0x2f, 0x3, 0x01),
1081 DIS_RISCV_A32("amoadd.d", 0x2f, 0x3, 0x00),
1082 DIS_RISCV_A32("amoxor.d", 0x2f, 0x3, 0x04),
1083 DIS_RISCV_A32("amoand.d", 0x2f, 0x3, 0x0c),
1084 DIS_RISCV_A32("amoor.d", 0x2f, 0x3, 0x08),
1085 DIS_RISCV_A32("amomin.d", 0x2f, 0x3, 0x10),
1086 DIS_RISCV_A32("amomax.d", 0x2f, 0x3, 0x14),
1087 DIS_RISCV_A32("amominu.d", 0x2f, 0x3, 0x18),
1088 DIS_RISCV_A32("amomaxu.d", 0x2f, 0x3, 0x1c),
1089 /*
1090 * RV32F
1091 */
1092 DIS_RISCV_FP_LOAD("flw", 0x07, 0x2),
1093 DIS_RISCV_FP_STORE("fsw", 0x27, 0x2),
1094 DIS_RISCV_FP_R4("fmadd.s", 0x43, 0x0),
1095 DIS_RISCV_FP_R4("fmsub.s", 0x47, 0x0),
1096 DIS_RISCV_FP_R4("fnmsub.s", 0x4b, 0x0),
1097 DIS_RISCV_FP_R4("fnmadd.s", 0x4f, 0x0),
1098 DIS_RISCV_FP_RM("fadd.s", 0x53, 0x00),
1099 DIS_RISCV_FP_RM("fsub.s", 0x53, 0x04),
1100 DIS_RISCV_FP_RM("fmul.s", 0x53, 0x08),
1101 DIS_RISCV_FP_RM("fdiv.s", 0x53, 0xc),
1102 DIS_RISCV_FP_RS2_FP("fsqrt.s", 0x53, 0x00, 0x2c),
1103 DIS_RISCV_FP_R("fsgnj.s", 0x53, 0x0, 0x10),
1104 DIS_RISCV_FP_R("fsgnjn.s", 0x53, 0x1, 0x10),
1105 DIS_RISCV_FP_R("fsgnjx.s", 0x53, 0x2, 0x10),
1106 DIS_RISCV_FP_R("fmin.s", 0x53, 0x0, 0x14),
1107 DIS_RISCV_FP_R("fmax.s", 0x53, 0x1, 0x14),
1108 DIS_RISCV_FP_RS2_FPI("fcvt.w.s", 0x53, 0x00, 0x60),
1109 DIS_RISCV_FP_RS2_FPI("fcvt.wu.s", 0x53, 0x01, 0x60),
1110 DIS_RISCV_FP_R_RS2_FPI_NR("fmv.x.w", 0x53, 0x00, 0x00, 0x70),
1111 DIS_RISCV_FP_RI("feq.s", 0x53, 0x2, 0x50),
1112 DIS_RISCV_FP_RI("flt.s", 0x53, 0x1, 0x50),
1113 DIS_RISCV_FP_RI("fle.s", 0x53, 0x0, 0x50),
1114 DIS_RISCV_FP_R_RS2_FPI_NR("fclass.s", 0x53, 0x1, 0x00, 0x70),
1115 DIS_RISCV_FP_RS2_IFP("fcvt.s.w", 0x53, 0x00, 0x68),
1116 DIS_RISCV_FP_RS2_IFP("fcvt.s.wu", 0x53, 0x01, 0x68),
1117 DIS_RISCV_FP_R_RS2_IFP_NR("fmv.w.x", 0x53, 0x0, 0x00, 0x78),
1118 /*
1119 * RV64F
1120 */
1121 DIS_RISCV_FP_RS2_FPI("fcvt.l.s", 0x53, 0x02, 0x60),
1122 DIS_RISCV_FP_RS2_FPI("fcvt.lu.s", 0x53, 0x03, 0x60),
1123 DIS_RISCV_FP_RS2_IFP("fcvt.s.l", 0x53, 0x02, 0x68),
1124 DIS_RISCV_FP_RS2_IFP("fcvt.s.lu", 0x53, 0x03, 0x68),
1125 /*
1126 * RV32D
1127 */
1128 DIS_RISCV_FP_LOAD("fld", 0x07, 0x3),
1129 DIS_RISCV_FP_STORE("fsd", 0x27, 0x3),
1130 DIS_RISCV_FP_R4("fmadd.d", 0x43, 0x1),
1131 DIS_RISCV_FP_R4("fmsub.d", 0x47, 0x1),
1132 DIS_RISCV_FP_R4("fnmsub.d", 0x4b, 0x1),
1133 DIS_RISCV_FP_R4("fnmadd.d", 0x4f, 0x1),
1134 DIS_RISCV_FP_RM("fadd.d", 0x53, 0x01),
1135 DIS_RISCV_FP_RM("fsub.d", 0x53, 0x05),
1136 DIS_RISCV_FP_RM("fmul.d", 0x53, 0x09),
1137 DIS_RISCV_FP_RM("fdiv.d", 0x53, 0xd),
1138 DIS_RISCV_FP_RS2_FP("fsqrt.d", 0x53, 0x00, 0x2d),
1139 DIS_RISCV_FP_R("fsgnj.d", 0x53, 0x0, 0x11),
1140 DIS_RISCV_FP_R("fsgnjn.d", 0x53, 0x1, 0x11),
1141 DIS_RISCV_FP_R("fsgnjx.d", 0x53, 0x2, 0x11),
1142 DIS_RISCV_FP_R("fmin.d", 0x53, 0x0, 0x15),
1143 DIS_RISCV_FP_R("fmax.d", 0x53, 0x1, 0x15),
1144 DIS_RISCV_FP_RS2_FP("fcvt.s.d", 0x53, 0x01, 0x20),
1145 DIS_RISCV_FP_RS2_FP_NR("fcvt.d.s", 0x53, 0x00, 0x21),
1146 DIS_RISCV_FP_RI("feq.d", 0x53, 0x2, 0x51),
1147 DIS_RISCV_FP_RI("flt.d", 0x53, 0x1, 0x51),
1148 DIS_RISCV_FP_RI("fle.d", 0x53, 0x0, 0x51),
1149 DIS_RISCV_FP_R_RS2_FPI_NR("fclass.d", 0x53, 0x1, 0x00, 0x71),
1150 DIS_RISCV_FP_RS2_FPI("fcvt.w.d", 0x53, 0x00, 0x61),
1151 DIS_RISCV_FP_RS2_FPI("fcvt.wu.d", 0x53, 0x01, 0x61),
1152 DIS_RISCV_FP_RS2_IFP_NR("fcvt.d.w", 0x53, 0x00, 0x69),
1153 DIS_RISCV_FP_RS2_IFP_NR("fcvt.d.wu", 0x53, 0x01, 0x69),
1154 /*
1155 * RV64D
1156 */
1157 DIS_RISCV_FP_RS2_FPI("fcvt.l.d", 0x53, 0x02, 0x61),
1158 DIS_RISCV_FP_RS2_FPI("fcvt.lu.d", 0x53, 0x03, 0x61),
1159 DIS_RISCV_FP_R_RS2_FPI_NR("fmv.x.d", 0x53, 0x0, 0x00, 0x71),
1160 DIS_RISCV_FP_RS2_IFP("fcvt.d.l", 0x53, 0x02, 0x69),
1161 DIS_RISCV_FP_RS2_IFP("fcvt.d.lu", 0x53, 0x03, 0x69),
1162 DIS_RISCV_FP_R_RS2_IFP_NR("fmv.d.x", 0x53, 0x0, 0x00, 0x79),
1163 /*
1164 * Privileged Instructions from RISC-V Privileged Architectures V1.10.
1165 */
1166 DIS_RISCV_MASK("uret", 0xffffffff, 0x00200073, dis_riscv_name),
1167 DIS_RISCV_MASK("sret", 0xffffffff, 0x10200073, dis_riscv_name),
1168 DIS_RISCV_MASK("mret", 0xffffffff, 0x30200073, dis_riscv_name),
1169 DIS_RISCV_MASK("wfi", 0xffffffff, 0x10500073, dis_riscv_name),
1170 DIS_RISCV_MASK("sfence.vma", 0xfe007fff, 0x12000073, dis_riscv_rs1_rs2)
1171 };
1172
1173 static void
dis_riscv_decode_4byte(dis_handle_t * dhp,uint32_t instr,char * buf,size_t buflen)1174 dis_riscv_decode_4byte(dis_handle_t *dhp, uint32_t instr, char *buf,
1175 size_t buflen)
1176 {
1177 uint_t i;
1178
1179 for (i = 0; i < ARRAY_SIZE(dis_riscv_4byte); i++) {
1180 dis_riscv_instr_t *t = &dis_riscv_4byte[i];
1181 switch (t->drv_type) {
1182 case DIS_RISCV_I_R_TYPE:
1183 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode &&
1184 DIS_RISCV_FUNCT3(instr) == t->drv_funct3 &&
1185 DIS_RISCV_FUNCT7(instr) == t->drv_funct7) {
1186 break;
1187 }
1188 continue;
1189 case DIS_RISCV_I_I_TYPE:
1190 case DIS_RISCV_I_S_TYPE:
1191 case DIS_RISCV_I_B_TYPE:
1192 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode &&
1193 DIS_RISCV_FUNCT3(instr) == t->drv_funct3) {
1194 break;
1195 }
1196 continue;
1197 case DIS_RISCV_I_U_TYPE:
1198 case DIS_RISCV_I_J_TYPE:
1199 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode) {
1200 break;
1201 }
1202 continue;
1203 case DIS_RISCV_I_R4_TYPE:
1204 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode &&
1205 DIS_RISCV_FUNCT2(instr) == t->drv_funct2) {
1206 break;
1207 }
1208 continue;
1209 case DIS_RISCV_I_MASK_TYPE:
1210 if ((instr & t->drv_opcode) == t->drv_funct3) {
1211 break;
1212 }
1213 continue;
1214 case DIS_RISCV_I_SHIFT64_TYPE:
1215 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode &&
1216 DIS_RISCV_FUNCT3(instr) == t->drv_funct3 &&
1217 DIS_RISCV_SFUNCT7(instr) == t->drv_funct7) {
1218 break;
1219 }
1220 continue;
1221
1222 case DIS_RISCV_I_RV32A_LOAD_TYPE:
1223 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode &&
1224 DIS_RISCV_FUNCT3(instr) == t->drv_funct3 &&
1225 DIS_RISCV_RVA_FUNCT5(instr) == t->drv_funct7 &&
1226 DIS_RISCV_RS2(instr) == t->drv_funct2) {
1227 break;
1228 }
1229 continue;
1230 case DIS_RISCV_I_RV32A_TYPE:
1231 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode &&
1232 DIS_RISCV_FUNCT3(instr) == t->drv_funct3 &&
1233 DIS_RISCV_RVA_FUNCT5(instr) == t->drv_funct7) {
1234 break;
1235 }
1236 continue;
1237 case DIS_RISCV_I_FP_RS2OP_TYPE:
1238 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode &&
1239 DIS_RISCV_RS2(instr) == t->drv_funct3 &&
1240 DIS_RISCV_FUNCT7(instr) == t->drv_funct7) {
1241 break;
1242 }
1243 continue;
1244 case DIS_RISCV_I_FP_RM_TYPE:
1245 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode &&
1246 DIS_RISCV_FUNCT7(instr) == t->drv_funct7) {
1247 break;
1248 }
1249 continue;
1250 case DIS_RISCV_I_FP_R_RS2_TYPE:
1251 if (DIS_RISCV_OPCODE(instr) == t->drv_opcode &&
1252 DIS_RISCV_FUNCT3(instr) == t->drv_funct3 &&
1253 DIS_RISCV_RS2(instr) == t->drv_funct2 &&
1254 DIS_RISCV_FUNCT7(instr) == t->drv_funct7) {
1255 break;
1256 }
1257 continue;
1258 default:
1259 continue;
1260 }
1261
1262 t->drv_print(dhp, instr, t, buf, buflen);
1263 return;
1264 }
1265
1266 (void) dis_snprintf(buf, buflen, "<unknown>");
1267 }
1268
1269 /*
1270 * Two byte decode table types.
1271 */
1272 typedef enum dis_riscv_ctype {
1273 /*
1274 * Indicates that we should match based on the opcode and funct3.
1275 */
1276 DIS_RISCV_C_FUNCT3,
1277 /*
1278 * Indicates that we should match the instruction based on a mask.
1279 */
1280 DIS_RISCV_C_MATCH
1281 } dis_riscv_ctype_t;
1282
1283 /*
1284 * The compact forms are depending on the elf class. This is used to keep track
1285 * of the class and match it.
1286 */
1287 typedef enum dis_riscv_c_class {
1288 DIS_RISCV_CL_ALL,
1289 DIS_RISCV_CL_32,
1290 DIS_RISCV_CL_64,
1291 DIS_RISCV_CL_32_64,
1292 DIS_RISCV_CL_64_128
1293 } dis_riscv_c_class_t;
1294
1295 struct dis_riscv_c_instr;
1296 typedef void (*dis_riscv_c_func_t)(dis_handle_t *, uint32_t,
1297 struct dis_riscv_c_instr *, char *, size_t);
1298
1299 typedef struct dis_riscv_c_instr {
1300 const char *drv_c_name;
1301 dis_riscv_ctype_t drv_c_type;
1302 dis_riscv_c_func_t drv_c_print;
1303 dis_riscv_c_class_t drv_c_class;
1304 uint_t drv_c_opcode;
1305 uint_t drv_c_funct;
1306 uint_t drv_c_mask;
1307 uint_t drv_c_match;
1308 } dis_riscv_c_instr_t;
1309
1310 #define DIS_RISCV_C_OPCODE(x) ((x) & 0x03)
1311 #define DIS_RISCV_C_FUNCT3(x) (((x) & 0xe000) >> 13)
1312
1313 #define DIS_RISCV_C_RS1(x) (((x) & 0x0f80) >> 7)
1314 #define DIS_RISCV_C_RS2(x) (((x) & 0x007c) >> 2)
1315 #define DIS_RISCV_C_RD(x) DIS_RISCV_C_RS1(x)
1316
1317 #define DIS_RISCV_C_RS1P(x) (((x) & 0x0380) >> 7)
1318 #define DIS_RISCV_C_RS2P(x) DIS_RISCV_C_RDP(x)
1319 #define DIS_RISCV_C_RDP(x) (((x) & 0x001c) >> 2)
1320
1321 /*
1322 * CJ format immediate extractor
1323 */
1324 #define DIS_RISCV_C_J_11(x) (((x) & 0x1000) >> 1)
1325 #define DIS_RISCV_C_J_4(x) (((x) & 0x0800) >> 7)
1326 #define DIS_RISCV_C_J_9_8(x) (((x) & 0x0600) >> 1)
1327 #define DIS_RISCV_C_J_10(x) (((x) & 0x0100) << 2)
1328 #define DIS_RISCV_C_J_6(x) (((x) & 0x0080) >> 1)
1329 #define DIS_RISCV_C_J_7(x) (((x) & 0x0040) << 1)
1330 #define DIS_RISCV_C_J_3_1(x) (((x) & 0x0038) >> 3)
1331 #define DIS_RISCV_C_J_5(x) (((x) & 0x0004) << 3)
1332
1333 /*
1334 * Compact Branch extractor
1335 */
1336 #define DIS_RISCV_C_B_8(x) (((x) & 0x1000) >> 4)
1337 #define DIS_RISCV_C_B_4_3(x) (((x) & 0x0c00) >> 7)
1338 #define DIS_RISCV_C_B_7_6(x) (((x) & 0x0060) << 1)
1339 #define DIS_RISCV_C_B_2_1(x) (((x) & 0x0018) >> 2)
1340 #define DIS_RISCV_C_B_5(x) (((x) & 0x0004) << 3)
1341
1342 /*
1343 * c.addi16spn extractor
1344 */
1345 #define DIS_RISCV_C_A16_9(x) (((x) & 0x1000) >> 3)
1346 #define DIS_RISCV_C_A16_4(x) (((x) & 0x0040) >> 2)
1347 #define DIS_RISCV_C_A16_6(x) (((x) & 0x0020) << 1)
1348 #define DIS_RISCV_C_A16_8_7(x) (((x) & 0x0018) << 4)
1349 #define DIS_RISCV_C_A16_5(x) (((x) & 0x0004) << 3)
1350
1351 /*
1352 * c.addi4spn extractor
1353 */
1354 #define DIS_RISCV_C_A4_5_4(x) (((x) & 0x1800) >> 7)
1355 #define DIS_RISCV_C_A4_9_6(x) (((x) & 0x0700) >> 2)
1356 #define DIS_RISCV_C_A4_2(x) (((x) & 0x0040) >> 4)
1357 #define DIS_RISCV_C_A4_3(x) (((x) & 0x0020) >> 2)
1358
1359 /*ARGSUSED*/
1360 static void
dis_riscv_c_name(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1361 dis_riscv_c_name(dis_handle_t *dhp, uint32_t instr,
1362 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1363 {
1364 (void) dis_snprintf(buf, buflen, "%s", table->drv_c_name);
1365 }
1366
1367 static void
dis_riscv_c_loadstore(dis_handle_t * dhp,const char * name,const char * dreg,const char * sreg,uint32_t off,char * buf,size_t buflen)1368 dis_riscv_c_loadstore(dis_handle_t *dhp, const char *name, const char *dreg,
1369 const char *sreg, uint32_t off, char *buf, size_t buflen)
1370 {
1371
1372 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
1373 (void) dis_snprintf(buf, buflen, "%s %s,0%o(%s)", name, dreg,
1374 off, sreg);
1375 } else {
1376 (void) dis_snprintf(buf, buflen, "%s %s,0x%x(%s)", name, dreg,
1377 off, sreg);
1378 }
1379 }
1380
1381 static void
dis_riscv_c_lwsp(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1382 dis_riscv_c_lwsp(dis_handle_t *dhp, uint32_t instr,
1383 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1384 {
1385 uint32_t imm = ((instr & 0x000c) << 4) |
1386 ((instr & 0x1000) >> 7) | ((instr & 0x0070) >> 2);
1387
1388 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1389 dis_riscv_regs[DIS_RISCV_C_RD(instr)], dis_riscv_regs[2], imm, buf,
1390 buflen);
1391 }
1392
1393 static void
dis_riscv_c_ldsp(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1394 dis_riscv_c_ldsp(dis_handle_t *dhp, uint32_t instr,
1395 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1396 {
1397 uint32_t imm = ((instr & 0x001c) << 4) |
1398 ((instr & 0x1000) >> 7) | ((instr & 0x0060) >> 2);
1399
1400 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1401 dis_riscv_regs[DIS_RISCV_C_RD(instr)], dis_riscv_regs[2],
1402 imm, buf, buflen);
1403 }
1404
1405 static void
dis_riscv_c_flwsp(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1406 dis_riscv_c_flwsp(dis_handle_t *dhp, uint32_t instr,
1407 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1408 {
1409 uint32_t imm = ((instr & 0x000c) << 4) |
1410 ((instr & 0x1000) >> 7) | ((instr & 0x0070) >> 2);
1411
1412 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1413 dis_riscv_fpregs[DIS_RISCV_C_RD(instr)], dis_riscv_regs[2],
1414 imm, buf, buflen);
1415 }
1416
1417 static void
dis_riscv_c_fldsp(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1418 dis_riscv_c_fldsp(dis_handle_t *dhp, uint32_t instr,
1419 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1420 {
1421 uint32_t imm = ((instr & 0x001c) << 4) |
1422 ((instr & 0x1000) >> 7) | ((instr & 0x0060) >> 2);
1423
1424 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1425 dis_riscv_fpregs[DIS_RISCV_C_RD(instr)], dis_riscv_regs[2],
1426 imm, buf, buflen);
1427 }
1428
1429 static void
dis_riscv_c_swsp(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1430 dis_riscv_c_swsp(dis_handle_t *dhp, uint32_t instr,
1431 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1432 {
1433 uint32_t imm = ((instr & 0x0180) >> 1) | ((instr & 0x1e00) >> 7);
1434
1435 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1436 dis_riscv_regs[DIS_RISCV_C_RS2(instr)], dis_riscv_regs[2], imm,
1437 buf, buflen);
1438 }
1439
1440 static void
dis_riscv_c_sdsp(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1441 dis_riscv_c_sdsp(dis_handle_t *dhp, uint32_t instr,
1442 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1443 {
1444 uint32_t imm = ((instr & 0x0380) >> 1) | ((instr & 0x1c00) >> 7);
1445
1446 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1447 dis_riscv_regs[DIS_RISCV_C_RS2(instr)], dis_riscv_regs[2], imm,
1448 buf, buflen);
1449 }
1450
1451 static void
dis_riscv_c_fswsp(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1452 dis_riscv_c_fswsp(dis_handle_t *dhp, uint32_t instr,
1453 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1454 {
1455 uint32_t imm = ((instr & 0x0180) >> 1) | ((instr & 0x1e00) >> 7);
1456
1457 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1458 dis_riscv_fpregs[DIS_RISCV_C_RS2(instr)], dis_riscv_regs[2], imm,
1459 buf, buflen);
1460 }
1461
1462 static void
dis_riscv_c_fsdsp(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1463 dis_riscv_c_fsdsp(dis_handle_t *dhp, uint32_t instr,
1464 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1465 {
1466 uint32_t imm = ((instr & 0x0380) >> 1) | ((instr & 0x1c00) >> 7);
1467
1468 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1469 dis_riscv_fpregs[DIS_RISCV_C_RS2(instr)], dis_riscv_regs[2], imm,
1470 buf, buflen);
1471 }
1472
1473 static void
dis_riscv_c_lw(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1474 dis_riscv_c_lw(dis_handle_t *dhp, uint32_t instr,
1475 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1476 {
1477 uint32_t imm = ((instr & 0x0020) << 1) | ((instr & 0x1c) >> 7) |
1478 ((instr & 0x0040) >> 3);
1479
1480 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1481 dis_riscv_c_regs[DIS_RISCV_C_RDP(instr)],
1482 dis_riscv_c_regs[DIS_RISCV_C_RS1P(instr)],
1483 imm, buf, buflen);
1484 }
1485
1486 static void
dis_riscv_c_ld(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1487 dis_riscv_c_ld(dis_handle_t *dhp, uint32_t instr,
1488 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1489 {
1490 uint32_t imm = ((instr & 0x0060) << 1) | ((instr & 0x1c) >> 7);
1491
1492 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1493 dis_riscv_c_regs[DIS_RISCV_C_RDP(instr)],
1494 dis_riscv_c_regs[DIS_RISCV_C_RS1P(instr)],
1495 imm, buf, buflen);
1496 }
1497
1498 static void
dis_riscv_c_flw(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1499 dis_riscv_c_flw(dis_handle_t *dhp, uint32_t instr,
1500 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1501 {
1502 uint32_t imm = ((instr & 0x0020) << 1) | ((instr & 0x1c) >> 7) |
1503 ((instr & 0x0040) >> 3);
1504
1505 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1506 dis_riscv_c_fpregs[DIS_RISCV_C_RDP(instr)],
1507 dis_riscv_c_regs[DIS_RISCV_C_RS1P(instr)],
1508 imm, buf, buflen);
1509 }
1510
1511 static void
dis_riscv_c_fld(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1512 dis_riscv_c_fld(dis_handle_t *dhp, uint32_t instr,
1513 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1514 {
1515 uint32_t imm = ((instr & 0x0060) << 1) | ((instr & 0x1c) >> 7);
1516
1517 dis_riscv_c_loadstore(dhp, table->drv_c_name,
1518 dis_riscv_c_fpregs[DIS_RISCV_C_RDP(instr)],
1519 dis_riscv_c_regs[DIS_RISCV_C_RS1P(instr)],
1520 imm, buf, buflen);
1521 }
1522
1523 /*
1524 * The J type has the 11 bit immediate arranged as:
1525 *
1526 * offset[11|4|9:8|10|6|7|3:1|5] going from bits 2 to 12.
1527 */
1528 static void
dis_riscv_c_j(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1529 dis_riscv_c_j(dis_handle_t *dhp, uint32_t instr,
1530 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1531 {
1532 const char *s;
1533 uint_t jimm = DIS_RISCV_C_J_11(instr) | DIS_RISCV_C_J_10(instr) |
1534 DIS_RISCV_C_J_9_8(instr) | DIS_RISCV_C_J_7(instr) |
1535 DIS_RISCV_C_J_6(instr) | DIS_RISCV_C_J_5(instr) |
1536 DIS_RISCV_C_J_4(instr) | DIS_RISCV_C_J_3_1(instr);
1537 uint_t imm = dis_riscv_sign_extend(jimm, 11, &s);
1538
1539 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
1540 (void) dis_snprintf(buf, buflen, "%s %s0%o", table->drv_c_name,
1541 s, imm);
1542 } else {
1543 (void) dis_snprintf(buf, buflen, "%s %s0x%x", table->drv_c_name,
1544 s, imm);
1545 }
1546 }
1547
1548 /*ARGSUSED*/
1549 static void
dis_riscv_c_jr(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1550 dis_riscv_c_jr(dis_handle_t *dhp, uint32_t instr,
1551 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1552 {
1553 (void) dis_snprintf(buf, buflen, "%s %s", table->drv_c_name,
1554 dis_riscv_regs[DIS_RISCV_C_RS1(instr)]);
1555 }
1556
1557 static void
dis_riscv_c_regimm(dis_handle_t * dhp,const char * instr,const char * dreg,const char * sign,uint_t imm,char * buf,size_t buflen)1558 dis_riscv_c_regimm(dis_handle_t *dhp, const char *instr, const char *dreg,
1559 const char *sign, uint_t imm, char *buf, size_t buflen)
1560 {
1561 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
1562 (void) dis_snprintf(buf, buflen, "%s %s,%s0%o", instr, dreg,
1563 sign, imm);
1564 } else {
1565 (void) dis_snprintf(buf, buflen, "%s %s,%s0x%x", instr, dreg,
1566 sign, imm);
1567 }
1568 }
1569
1570 static void
dis_riscv_c_branch(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1571 dis_riscv_c_branch(dis_handle_t *dhp, uint32_t instr,
1572 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1573 {
1574 const char *s;
1575 uint_t bimm = DIS_RISCV_C_B_8(instr) | DIS_RISCV_C_B_7_6(instr) |
1576 DIS_RISCV_C_B_5(instr) | DIS_RISCV_C_B_4_3(instr) |
1577 DIS_RISCV_C_B_2_1(instr);
1578 uint_t imm = dis_riscv_sign_extend(bimm, 8, &s);
1579
1580 dis_riscv_c_regimm(dhp, table->drv_c_name,
1581 dis_riscv_c_regs[DIS_RISCV_C_RS1P(instr)], s, imm, buf, buflen);
1582 }
1583
1584 static void
dis_riscv_c_bigimmint(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1585 dis_riscv_c_bigimmint(dis_handle_t *dhp, uint32_t instr,
1586 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1587 {
1588 const char *s;
1589 uint_t limm = ((instr & 0x1000) >> 7) | ((instr & 0x007c) >> 2);
1590 uint_t imm = dis_riscv_sign_extend(limm, 5, &s);
1591
1592 dis_riscv_c_regimm(dhp, table->drv_c_name,
1593 dis_riscv_regs[DIS_RISCV_C_RD(instr)], s, imm, buf, buflen);
1594 }
1595
1596 static void
dis_riscv_c_zext_bigimmint(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1597 dis_riscv_c_zext_bigimmint(dis_handle_t *dhp, uint32_t instr,
1598 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1599 {
1600 uint_t imm = ((instr & 0x1000) >> 7) | ((instr & 0x007c) >> 2);
1601
1602 dis_riscv_c_regimm(dhp, table->drv_c_name,
1603 dis_riscv_regs[DIS_RISCV_C_RD(instr)], "", imm, buf, buflen);
1604 }
1605
1606 static void
dis_riscv_c_addi16sp(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1607 dis_riscv_c_addi16sp(dis_handle_t *dhp, uint32_t instr,
1608 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1609 {
1610 const char *s;
1611 uint_t aimm = DIS_RISCV_C_A16_9(instr) | DIS_RISCV_C_A16_8_7(instr) |
1612 DIS_RISCV_C_A16_6(instr) | DIS_RISCV_C_A16_5(instr) |
1613 DIS_RISCV_C_A16_4(instr);
1614 int imm = dis_riscv_sign_extend(aimm, 9, &s);
1615
1616 dis_riscv_c_regimm(dhp, table->drv_c_name,
1617 dis_riscv_regs[DIS_RISCV_C_RD(instr)], s, imm, buf, buflen);
1618 }
1619
1620 static void
dis_riscv_c_addi4spn(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1621 dis_riscv_c_addi4spn(dis_handle_t *dhp, uint32_t instr,
1622 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1623 {
1624 uint_t imm = DIS_RISCV_C_A4_9_6(instr) | DIS_RISCV_C_A4_5_4(instr) |
1625 DIS_RISCV_C_A4_3(instr) | DIS_RISCV_C_A4_2(instr);
1626
1627 if ((dhp->dh_flags & DIS_OCTAL) != 0) {
1628 (void) dis_snprintf(buf, buflen, "%s %s,sp,0%o",
1629 table->drv_c_name, dis_riscv_c_regs[DIS_RISCV_C_RDP(instr)],
1630 imm);
1631 } else {
1632 (void) dis_snprintf(buf, buflen, "%s %s,sp,0x%x",
1633 table->drv_c_name, dis_riscv_c_regs[DIS_RISCV_C_RDP(instr)],
1634 imm);
1635 }
1636 }
1637
1638 static void
dis_riscv_c_immint(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1639 dis_riscv_c_immint(dis_handle_t *dhp, uint32_t instr,
1640 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1641 {
1642 const char *s;
1643 uint_t limm = ((instr & 0x1000) >> 7) | ((instr & 0x007c) >> 2);
1644 uint_t imm = dis_riscv_sign_extend(limm, 5, &s);
1645
1646 dis_riscv_c_regimm(dhp, table->drv_c_name,
1647 dis_riscv_c_regs[DIS_RISCV_C_RS1P(instr)], s, imm, buf, buflen);
1648 }
1649
1650 static void
dis_riscv_c_zext_immint(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1651 dis_riscv_c_zext_immint(dis_handle_t *dhp, uint32_t instr,
1652 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1653 {
1654 uint_t imm = ((instr & 0x1000) >> 7) | ((instr & 0x007c) >> 2);
1655
1656 dis_riscv_c_regimm(dhp, table->drv_c_name,
1657 dis_riscv_c_regs[DIS_RISCV_C_RS1P(instr)], "", imm, buf, buflen);
1658 }
1659
1660 /*ARGSUSED*/
1661 static void
dis_riscv_c_bigint(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1662 dis_riscv_c_bigint(dis_handle_t *dhp, uint32_t instr,
1663 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1664 {
1665 (void) dis_snprintf(buf, buflen, "%s %s,%s", table->drv_c_name,
1666 dis_riscv_regs[DIS_RISCV_C_RD(instr)],
1667 dis_riscv_regs[DIS_RISCV_C_RS2(instr)]);
1668 }
1669
1670
1671 /*ARGSUSED*/
1672 static void
dis_riscv_c_int(dis_handle_t * dhp,uint32_t instr,dis_riscv_c_instr_t * table,char * buf,size_t buflen)1673 dis_riscv_c_int(dis_handle_t *dhp, uint32_t instr,
1674 dis_riscv_c_instr_t *table, char *buf, size_t buflen)
1675 {
1676 (void) dis_snprintf(buf, buflen, "%s %s,%s", table->drv_c_name,
1677 dis_riscv_c_regs[DIS_RISCV_C_RS1P(instr)],
1678 dis_riscv_c_regs[DIS_RISCV_C_RS2P(instr)]);
1679 }
1680
1681 #define DIS_RISCV_CFUNCT3(name, class, op, funct, print) \
1682 { name, DIS_RISCV_C_FUNCT3, print, class, op, funct, 0, 0 }
1683 #define DIS_RISCV_CMATCH(name, class, op, funct, mask, match, print) \
1684 { name, DIS_RISCV_C_MATCH, print, class, op, funct, mask, match }
1685
1686 static dis_riscv_c_instr_t dis_riscv_2byte[] = {
1687 /* Quadrant 0 */
1688 DIS_RISCV_CFUNCT3("c.addi4spn", DIS_RISCV_CL_32_64, 0x0, 0x0,
1689 dis_riscv_c_addi4spn),
1690 DIS_RISCV_CFUNCT3("c.fld", DIS_RISCV_CL_32_64, 0x0, 0x01,
1691 dis_riscv_c_fld),
1692 DIS_RISCV_CFUNCT3("c.lw", DIS_RISCV_CL_ALL, 0x0, 0x2,
1693 dis_riscv_c_lw),
1694 DIS_RISCV_CFUNCT3("c.flw", DIS_RISCV_CL_32, 0x0, 0x3,
1695 dis_riscv_c_flw),
1696 DIS_RISCV_CFUNCT3("f.ld", DIS_RISCV_CL_64_128, 0x0, 0x3,
1697 dis_riscv_c_ld),
1698 DIS_RISCV_CFUNCT3("c.fsd", DIS_RISCV_CL_32_64, 0x0, 0x5,
1699 dis_riscv_c_fld),
1700 DIS_RISCV_CFUNCT3("c.sw", DIS_RISCV_CL_ALL, 0x0, 0x6,
1701 dis_riscv_c_lw),
1702 DIS_RISCV_CFUNCT3("c.fsw", DIS_RISCV_CL_32, 0x0, 0x7,
1703 dis_riscv_c_flw),
1704 DIS_RISCV_CFUNCT3("c.sd", DIS_RISCV_CL_64_128, 0x0, 0x7,
1705 dis_riscv_c_ld),
1706 /* Quadrant 1 */
1707 DIS_RISCV_CMATCH("c.nop", DIS_RISCV_CL_ALL, 0x01, 0x00, 0x1ffc, 0x0,
1708 dis_riscv_c_name),
1709 DIS_RISCV_CFUNCT3("c.addi", DIS_RISCV_CL_ALL, 0x01, 0x00,
1710 dis_riscv_c_bigimmint),
1711 DIS_RISCV_CFUNCT3("c.jal", DIS_RISCV_CL_32, 0x01, 0x01,
1712 dis_riscv_c_j),
1713 DIS_RISCV_CFUNCT3("c.addiw", DIS_RISCV_CL_64_128, 0x01, 0x01,
1714 dis_riscv_c_bigimmint),
1715 DIS_RISCV_CFUNCT3("c.li", DIS_RISCV_CL_ALL, 0x01, 0x02,
1716 dis_riscv_c_bigimmint),
1717 DIS_RISCV_CMATCH("c.addi16sp", DIS_RISCV_CL_ALL, 0x01, 0x03, 0x0f80,
1718 0x0100, dis_riscv_c_addi16sp),
1719 DIS_RISCV_CFUNCT3("c.lui", DIS_RISCV_CL_ALL, 0x01, 0x03,
1720 dis_riscv_c_zext_bigimmint),
1721 DIS_RISCV_CMATCH("c.srli", DIS_RISCV_CL_ALL, 0x1, 0x4, 0x0c00, 0x0000,
1722 dis_riscv_c_zext_immint),
1723 DIS_RISCV_CMATCH("c.srai", DIS_RISCV_CL_ALL, 0x1, 0x4, 0x0c00, 0x0400,
1724 dis_riscv_c_zext_immint),
1725 DIS_RISCV_CMATCH("c.andi", DIS_RISCV_CL_ALL, 0x1, 0x4, 0x0c00, 0x0800,
1726 dis_riscv_c_immint),
1727 DIS_RISCV_CMATCH("c.sub", DIS_RISCV_CL_ALL, 0x1, 0x4, 0x1c60, 0x0c00,
1728 dis_riscv_c_int),
1729 DIS_RISCV_CMATCH("c.xor", DIS_RISCV_CL_ALL, 0x1, 0x4, 0x1c60, 0x0c20,
1730 dis_riscv_c_int),
1731 DIS_RISCV_CMATCH("c.or", DIS_RISCV_CL_ALL, 0x1, 0x4, 0x1c60, 0x0c40,
1732 dis_riscv_c_int),
1733 DIS_RISCV_CMATCH("c.and", DIS_RISCV_CL_ALL, 0x1, 0x4, 0x1c60, 0x0c60,
1734 dis_riscv_c_int),
1735 DIS_RISCV_CMATCH("c.subw", DIS_RISCV_CL_64_128, 0x1, 0x4, 0x1c60,
1736 0x1c00, dis_riscv_c_int),
1737 DIS_RISCV_CMATCH("c.addw", DIS_RISCV_CL_64_128, 0x1, 0x4, 0x1c60,
1738 0x1c20, dis_riscv_c_int),
1739 DIS_RISCV_CFUNCT3("c.j", DIS_RISCV_CL_ALL, 0x1, 0x5,
1740 dis_riscv_c_j),
1741 DIS_RISCV_CFUNCT3("c.beqz", DIS_RISCV_CL_ALL, 0x1, 0x6,
1742 dis_riscv_c_branch),
1743 DIS_RISCV_CFUNCT3("c.bnez", DIS_RISCV_CL_ALL, 0x1, 0x7,
1744 dis_riscv_c_branch),
1745 /* Quadrant 2 */
1746 DIS_RISCV_CFUNCT3("c.slli", DIS_RISCV_CL_ALL, 0x2, 0x0,
1747 dis_riscv_c_zext_bigimmint),
1748 DIS_RISCV_CFUNCT3("c.fldsp", DIS_RISCV_CL_32_64, 0x2, 0x1,
1749 dis_riscv_c_fldsp),
1750 DIS_RISCV_CFUNCT3("c.lwsp", DIS_RISCV_CL_ALL, 0x2, 0x2,
1751 dis_riscv_c_lwsp),
1752 DIS_RISCV_CFUNCT3("c.flwsp", DIS_RISCV_CL_32, 0x2, 0x3,
1753 dis_riscv_c_flwsp),
1754 DIS_RISCV_CFUNCT3("c.ldsp", DIS_RISCV_CL_64_128, 0x2, 0x3,
1755 dis_riscv_c_ldsp),
1756 DIS_RISCV_CMATCH("c.jr", DIS_RISCV_CL_ALL, 0x2, 0x4, 0x107c, 0x0,
1757 dis_riscv_c_jr),
1758 DIS_RISCV_CMATCH("c.mv", DIS_RISCV_CL_ALL, 0x2, 0x4, 0x1000, 0x0,
1759 dis_riscv_c_bigint),
1760 DIS_RISCV_CMATCH("c.ebreak", DIS_RISCV_CL_ALL, 0x2, 0x4, 0x1ffc, 0x1000,
1761 dis_riscv_c_name),
1762 DIS_RISCV_CMATCH("c.jalr", DIS_RISCV_CL_ALL, 0x2, 0x4, 0x107c, 0x1000,
1763 dis_riscv_c_jr),
1764 DIS_RISCV_CMATCH("c.add", DIS_RISCV_CL_ALL, 0x2, 0x4, 0x1000, 0x1000,
1765 dis_riscv_c_bigint),
1766 DIS_RISCV_CFUNCT3("c.fsdsp", DIS_RISCV_CL_32_64, 0x2, 0x5,
1767 dis_riscv_c_fsdsp),
1768 DIS_RISCV_CFUNCT3("c.swsp", DIS_RISCV_CL_ALL, 0x2, 0x6,
1769 dis_riscv_c_swsp),
1770 DIS_RISCV_CFUNCT3("c.fswsp", DIS_RISCV_CL_32, 0x2, 0x7,
1771 dis_riscv_c_fswsp),
1772 DIS_RISCV_CFUNCT3("c.sdsp", DIS_RISCV_CL_64_128, 0x2, 0x7,
1773 dis_riscv_c_sdsp),
1774 };
1775
1776 static void
dis_riscv_decode_2byte(dis_handle_t * dhp,uint32_t instr,char * buf,size_t buflen)1777 dis_riscv_decode_2byte(dis_handle_t *dhp, uint32_t instr, char *buf,
1778 size_t buflen)
1779 {
1780 uint_t i;
1781
1782 for (i = 0; i < ARRAY_SIZE(dis_riscv_2byte); i++) {
1783 dis_riscv_c_instr_t *t = &dis_riscv_2byte[i];
1784 switch (t->drv_c_class) {
1785 case DIS_RISCV_CL_ALL:
1786 break;
1787 case DIS_RISCV_CL_32:
1788 if ((dhp->dh_flags & DIS_RISCV_32) == 0)
1789 continue;
1790 break;
1791 case DIS_RISCV_CL_64:
1792 if ((dhp->dh_flags & DIS_RISCV_64) == 0)
1793 continue;
1794 break;
1795 case DIS_RISCV_CL_32_64:
1796 if ((dhp->dh_flags &
1797 (DIS_RISCV_32 | DIS_RISCV_64)) == 0) {
1798 continue;
1799 }
1800 break;
1801 case DIS_RISCV_CL_64_128:
1802 if ((dhp->dh_flags & DIS_RISCV_64) == 0)
1803 continue;
1804 break;
1805 }
1806
1807 switch (t->drv_c_type) {
1808 case DIS_RISCV_C_FUNCT3:
1809 if (DIS_RISCV_C_OPCODE(instr) == t->drv_c_opcode &&
1810 DIS_RISCV_C_FUNCT3(instr) == t->drv_c_funct) {
1811 break;
1812 }
1813 continue;
1814 case DIS_RISCV_C_MATCH:
1815 if (DIS_RISCV_C_OPCODE(instr) == t->drv_c_opcode &&
1816 DIS_RISCV_C_FUNCT3(instr) == t->drv_c_funct &&
1817 ((instr & t->drv_c_mask) == t->drv_c_match)) {
1818 break;
1819 }
1820 continue;
1821 default:
1822 continue;
1823 }
1824
1825 t->drv_c_print(dhp, instr, t, buf, buflen);
1826 return;
1827 }
1828
1829 (void) dis_snprintf(buf, buflen, "<unknown>");
1830 }
1831
1832
1833 /*
1834 * RISC-V instructions always come in parcels of two bytes. Read the next two
1835 * byte parcel and advance the address in the handle. Also, take care of endian
1836 * issues if required.
1837 */
1838 static int
dis_riscv_read_parcel(dis_handle_t * dhp,uint16_t * valp)1839 dis_riscv_read_parcel(dis_handle_t *dhp, uint16_t *valp)
1840 {
1841 if ((dhp->dh_addr % 2) != 0)
1842 return (-1);
1843
1844 if (dhp->dh_read(dhp->dh_data, dhp->dh_addr, valp, sizeof (*valp)) !=
1845 sizeof (*valp))
1846 return (-1);
1847
1848 *valp = LE_16(*valp);
1849
1850 dhp->dh_addr += 2;
1851
1852 return (0);
1853 }
1854
1855 /*
1856 * The first 'parcel' (uint16_t) of any instruction can be used to determine the
1857 * instruction length. This is derived from Section 1.2 Instruction Length
1858 * Encoding of Volume I: RISC-V User-Level ISA V2.2.
1859 *
1860 * | xxxxxxxxxxxxxxaa | 16-bit iff aa != 11
1861 * | xxxxxxxxxxxbbb11 | 32-bit iff bbb != 111
1862 * | xxxxxxxxxx011111 | 48-bit iff bbb != 111
1863 * | xxxxxxxxx0111111 | 64-bit iff bbb != 111
1864 * | xnnnxxxxx1111111 | (80 + 16*nnn)-bit iff nnn != 111
1865 */
1866 #define RISCV_LEN_16_MASK 0x0003
1867 #define RISCV_LEN_32_MASK 0x001c
1868 #define RISCV_LEN_48_MASK 0x0020
1869 #define RISCV_LEN_64_MASK 0x0040
1870 #define RISCV_LEN_80_MASK 0x7000
1871 #define RISCV_LEN_80_SHIFT 12
1872
1873 static int
dis_riscv_decode_len(uint16_t instr)1874 dis_riscv_decode_len(uint16_t instr)
1875 {
1876 if ((instr & RISCV_LEN_16_MASK) != RISCV_LEN_16_MASK)
1877 return (2);
1878
1879 if ((instr & RISCV_LEN_32_MASK) != RISCV_LEN_32_MASK)
1880 return (4);
1881
1882 if ((instr & RISCV_LEN_48_MASK) != RISCV_LEN_48_MASK)
1883 return (6);
1884
1885 if ((instr & RISCV_LEN_64_MASK) != RISCV_LEN_64_MASK)
1886 return (8);
1887
1888 if ((instr & RISCV_LEN_80_MASK) != RISCV_LEN_80_MASK) {
1889 uint_t factor = (instr & RISCV_LEN_80_MASK) >>
1890 RISCV_LEN_80_SHIFT;
1891 return ((10 + 2 * factor));
1892 }
1893
1894 return (-1);
1895 }
1896
1897 static int
dis_riscv_supports_flags(int flags)1898 dis_riscv_supports_flags(int flags)
1899 {
1900 int archflags = flags & DIS_ARCH_MASK;
1901
1902 return (archflags == DIS_RISCV_32 || archflags == DIS_RISCV_64);
1903 }
1904
1905 static int
dis_riscv_disassemble(dis_handle_t * dhp,uint64_t addr,char * buf,size_t buflen)1906 dis_riscv_disassemble(dis_handle_t *dhp, uint64_t addr, char *buf,
1907 size_t buflen)
1908 {
1909 int len;
1910 uint16_t parcel;
1911 uint32_t instr;
1912
1913
1914 dhp->dh_addr = addr;
1915
1916 /*
1917 * All instructions have to be 2-byte aligned. Most have to be four byte
1918 * aligned, but we determine that after we decode the instruction size.
1919 * The 2-byte alignment check is done when we read the parcel.
1920 */
1921 if (dis_riscv_read_parcel(dhp, &parcel) != 0)
1922 return (-1);
1923
1924 len = dis_riscv_decode_len(parcel);
1925 if (len < 2 || (len % 2) != 0)
1926 return (-1);
1927 switch (len) {
1928 case 2:
1929 instr = parcel;
1930 dis_riscv_decode_2byte(dhp, instr, buf, buflen);
1931 break;
1932 case 4:
1933 instr = parcel;
1934 if (dis_riscv_read_parcel(dhp, &parcel) != 0)
1935 return (-1);
1936 instr |= parcel << 16;
1937 dis_riscv_decode_4byte(dhp, instr, buf, buflen);
1938 break;
1939 default:
1940 /*
1941 * This case represents a valid instruction length, but
1942 * something we don't understand. Treat this as an unknown
1943 * instruction. However, read the rest of the length of the
1944 * instruction to make sure that we read things correctly.
1945 */
1946 (void) dis_snprintf(buf, buflen, "<unknown>");
1947 for (; len > 0; len -= 2) {
1948 if (dis_riscv_read_parcel(dhp, &parcel) != 0) {
1949 return (-1);
1950 }
1951 }
1952 break;
1953 }
1954
1955 return (0);
1956 }
1957
1958 /*ARGSUSED*/
1959 static int
dis_riscv_min_instrlen(dis_handle_t * dhp)1960 dis_riscv_min_instrlen(dis_handle_t *dhp)
1961 {
1962 return (2);
1963 }
1964
1965 /*ARGSUSED*/
1966 static int
dis_riscv_max_instrlen(dis_handle_t * dhp)1967 dis_riscv_max_instrlen(dis_handle_t *dhp)
1968 {
1969 return (22);
1970 }
1971
1972 static int
dis_riscv_instrlen(dis_handle_t * dhp,uint64_t addr)1973 dis_riscv_instrlen(dis_handle_t *dhp, uint64_t addr)
1974 {
1975 uint16_t parcel;
1976
1977 dhp->dh_addr = addr;
1978
1979 if (dis_riscv_read_parcel(dhp, &parcel) != 0)
1980 return (-1);
1981
1982 return (dis_riscv_decode_len(parcel));
1983 }
1984
1985 dis_arch_t dis_arch_riscv = {
1986 .da_supports_flags = dis_riscv_supports_flags,
1987 .da_disassemble = dis_riscv_disassemble,
1988 .da_min_instrlen = dis_riscv_min_instrlen,
1989 .da_max_instrlen = dis_riscv_max_instrlen,
1990 .da_instrlen = dis_riscv_instrlen
1991 };
1992