1 /* radare - LGPL - Copyright 2018 - xvilka */
2
3 #include <r_types.h>
4 #include <r_util.h>
5 #include <r_asm.h>
6 #include <r_anal.h>
7 #include <r_lib.h>
8 #include "hexagon.h"
9 #include "hexagon_insn.h"
10 #include "hexagon_anal.h"
11
hexagon_v6_op(RAnal * anal,RAnalOp * op,ut64 addr,const ut8 * buf,int len,RAnalOpMask mask)12 static int hexagon_v6_op(RAnal *anal, RAnalOp *op, ut64 addr, const ut8 *buf, int len, RAnalOpMask mask) {
13 HexInsn hi = {0};;
14 ut32 data = 0;
15 data = r_read_le32 (buf);
16 int size = hexagon_disasm_instruction (data, &hi, (ut32) addr);
17 op->size = size;
18 if (size <= 0) {
19 return size;
20 }
21
22 op->addr = addr;
23 return hexagon_anal_instruction (&hi, op);
24 }
25
set_reg_profile(RAnal * anal)26 static bool set_reg_profile(RAnal *anal) {
27 // TODO: Add missing registers
28 const char *p =
29 "=PC pc\n"
30 "=SP r29\n"
31 "=A0 r0\n"
32 "=A1 r1\n"
33 "=A2 r2\n"
34 "=A3 r3\n"
35 "=A4 r4\n"
36 "=A5 r5\n"
37 "=BP r30\n"
38 "=LR r31\n"
39 "=SN r6\n"
40 "=ZF z\n"
41 "=SF s\n"
42 "=OF ov\n"
43 "=CF cy\n"
44
45 "gpr r0 .32 0 0\n"
46 "gpr r1 .32 4 0\n"
47 "gpr r2 .32 8 0\n"
48 "gpr r3 .32 12 0\n"
49 "gpr r4 .32 16 0\n"
50 "gpr r5 .32 20 0\n"
51 "gpr r6 .32 24 0\n"
52 "gpr r7 .32 28 0\n"
53 "gpr r8 .32 32 0\n"
54 "gpr r9 .32 36 0\n"
55 "gpr r10 .32 40 0\n"
56 "gpr r11 .32 44 0\n"
57 "gpr r12 .32 48 0\n"
58 "gpr r13 .32 52 0\n"
59 "gpr r14 .32 56 0\n"
60 "gpr r15 .32 60 0\n"
61 "gpr r16 .32 64 0\n"
62 "gpr r17 .32 68 0\n"
63 "gpr r18 .32 72 0\n"
64 "gpr r19 .32 76 0\n"
65 "gpr r20 .32 80 0\n"
66 "gpr r21 .32 84 0\n"
67 "gpr r22 .32 88 0\n"
68 "gpr r23 .32 92 0\n"
69 "gpr r24 .32 96 0\n"
70 "gpr r25 .32 100 0\n"
71 "gpr r26 .32 104 0\n"
72 "gpr r27 .32 108 0\n"
73 "gpr r28 .32 112 0\n"
74 "gpr r29 .32 116 0\n"
75 "gpr r30 .32 120 0\n"
76 "gpr r31 .32 124 0\n"
77 "gpr pc .32 128 0\n"
78
79 "gpr psw .32 132 0\n"
80 "gpr np .1 132.16 0\n"
81 "gpr ep .1 132.17 0\n"
82 "gpr ae .1 132.18 0\n"
83 "gpr id .1 132.19 0\n"
84 "flg cy .1 132.28 0\n"
85 "flg ov .1 132.29 0\n"
86 "flg s .1 132.30 0\n"
87 "flg z .1 132.31 0\n";
88
89 return r_reg_set_profile_string (anal->reg, p);
90 }
91
92 RAnalPlugin r_anal_plugin_hexagon = {
93 .name = "hexagon",
94 .desc = "Qualcomm Hexagon (QDSP6) V6",
95 .license = "LGPL3",
96 .arch = "hexagon",
97 .bits = 32,
98 .op = hexagon_v6_op,
99 .esil = true,
100 .set_reg_profile = set_reg_profile,
101 };
102
103 #ifndef R2_PLUGIN_INCORE
104 R_API RLibStruct radare_plugin = {
105 .type = R_LIB_TYPE_ANAL,
106 .data = &r_anal_plugin_hexagon_v6,
107 .version = R2_VERSION
108 };
109 #endif
110