1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
#include "dis.h"
static INLINE void P(GPR_Rm_unk_Rdn_1_tADDhirr)(tdis_ctx ctx, struct bitslice Rdn, struct bitslice Rm) {
data(rout(Rdn), r(Rm), r(Rdn)); /* yes, twice */
}
static INLINE void P(unk_Rdn_1_tADDrSP)(tdis_ctx ctx, UNUSED struct bitslice Rdn) {
/* this doesn't support constants, and nobody's going to add pc, sp, so... */
return P(unidentified)(ctx);
}
static INLINE void P(GPR_Rm_1_tADDspr)(tdis_ctx ctx, UNUSED struct bitslice Rm) {
/* ditto */
return P(unidentified)(ctx);
}
static INLINE void P(GPR_Rm_B_1_tBX)(tdis_ctx ctx, struct bitslice Rm) {
unsigned val = bs_get(Rm, ctx->op);
if (val == 15) /* bx pc */
return P(bad)(ctx);
else if (val == 14) /* bx lr */
return P(ret)(ctx);
return P(unidentified)(ctx);
}
static INLINE void P(GPR_Rm_unk_Rd_1_tMOVr)(tdis_ctx ctx, struct bitslice Rd, struct bitslice Rm) {
unsigned Rd_val = bs_get(Rd, ctx->op);
unsigned Rm_val = bs_get(Rm, ctx->op);
/* does anyone do this? */
if (Rd_val == 15)
return P(bad)(ctx);
if (Rm_val == 15)
return P(pcrel)(ctx, ctx->pc + 4, Rd_val, PLM_ADR);
return P(unidentified)(ctx);
}
static INLINE void P(tGPR_Rn_reglist_regs_1_tLDMIA)(tdis_ctx ctx, UNUSED struct bitslice regs, UNUSED struct bitslice Rn) {
return P(unidentified)(ctx);
}
static INLINE void P(tGPR_Rn_reglist_regs_S_1_tSTMIA_UPD)(tdis_ctx ctx, UNUSED struct bitslice regs, UNUSED struct bitslice Rn) {
return P(unidentified)(ctx);
}
static INLINE void P(reglist_regs_1_tPOP)(tdis_ctx ctx, struct bitslice regs) {
unsigned regs_val = bs_get(regs, ctx->op);
if(regs_val & (1 << 15))
return P(ret)(ctx);
return P(unidentified)(ctx);
}
static INLINE void P(reglist_regs_S_1_tPUSH)(tdis_ctx ctx, UNUSED struct bitslice regs) {
return P(unidentified)(ctx);
}
static INLINE void P(t_addrmode_pc_addr_unk_Rt_1_tLDRpci)(tdis_ctx ctx, struct bitslice addr, struct bitslice Rt) {
return P(pcrel)(ctx, ((ctx->pc + 4) & ~2) + bs_get(addr, ctx->op), bs_get(Rt, ctx->op), PLM_U32);
}
static INLINE void P(t_adrlabel_addr_unk_Rd_1_tADR)(tdis_ctx ctx, struct bitslice addr, struct bitslice Rd) {
return P(pcrel)(ctx, ((ctx->pc + 4) & ~2) + bs_get(addr, ctx->op), bs_get(Rd, ctx->op), PLM_ADR);
}
static INLINE void P(t_bcctarget_target_B_1_tBcc)(tdis_ctx ctx, struct bitslice target) {
return P(branch)(ctx, ctx->pc + 4 + 2 * sext(bs_get(target, ctx->op), 8), /*cond*/ true);
}
static INLINE void P(t_brtarget_target_B_1_tB)(tdis_ctx ctx, struct bitslice target) {
bool cond = ctx->arch.thumb_it_length > 0;
return P(branch)(ctx, ctx->pc + 4 + 2 * sext(bs_get(target, ctx->op), 11), cond);
}
static INLINE void P(t_cbtarget_target_B_2_tCBNZ)(tdis_ctx ctx, struct bitslice target) {
return P(branch)(ctx, ctx->pc + 4 + 2 * bs_get(target, ctx->op), /*cond*/ true);
}
static INLINE void P(it_pred_cc_it_mask_mask_1_t2IT)(tdis_ctx ctx, struct bitslice mask, UNUSED struct bitslice cc) {
/* why */
unsigned mask_val = bs_get(mask, ctx->op);
unsigned length = __builtin_ctz(mask_val);
if (length >= 3)
return P(unidentified)(ctx); /* nop */
ctx->arch.thumb_it_length = length;
return P(unidentified)(ctx);
}
static INLINE void P(dis_thumb)(tdis_ctx ctx) {
uint16_t op = ctx->op = *(uint16_t *) ctx->ptr;
if (ctx->arch.thumb_it_length)
ctx->arch.thumb_it_length--;
ctx->op_size = 2;
#include "../generated/generic-dis-thumb.inc.h"
__builtin_abort();
}
|
