You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
155 lines
3.5 KiB
155 lines
3.5 KiB
/* Capstone Disassembly Engine */ |
|
/* M680X Backend by Wolfgang Schwotzer <wolfgang.schwotzer@gmx.net> 2017 */ |
|
|
|
#include <stdio.h> |
|
#include <capstone/capstone.h> |
|
|
|
void print_string_hex(char *comment, unsigned char *str, size_t len); |
|
|
|
static const char *s_access[] = { |
|
"UNCHANGED", "READ", "WRITE", "READ | WRITE", |
|
}; |
|
|
|
void print_read_write_regs(csh handle, cs_detail *detail) |
|
{ |
|
int i; |
|
|
|
if (detail->regs_read_count > 0) { |
|
printf("\treading from regs: "); |
|
|
|
for (i = 0; i < detail->regs_read_count; ++i) { |
|
if (i > 0) |
|
printf(", "); |
|
|
|
printf("%s", cs_reg_name(handle, detail->regs_read[i])); |
|
} |
|
|
|
printf("\n"); |
|
} |
|
|
|
if (detail->regs_write_count > 0) { |
|
printf("\twriting to regs: "); |
|
|
|
for (i = 0; i < detail->regs_write_count; ++i) { |
|
if (i > 0) |
|
printf(", "); |
|
|
|
printf("%s", cs_reg_name(handle, |
|
detail->regs_write[i])); |
|
} |
|
|
|
printf("\n"); |
|
} |
|
} |
|
|
|
void print_insn_detail_m680x(csh handle, cs_insn *insn) |
|
{ |
|
cs_detail *detail = insn->detail; |
|
cs_m680x *m680x = NULL; |
|
int i; |
|
|
|
// detail can be NULL on "data" instruction if SKIPDATA option is |
|
// turned ON |
|
if (detail == NULL) |
|
return; |
|
|
|
m680x = &detail->m680x; |
|
|
|
if (m680x->op_count) |
|
printf("\top_count: %u\n", m680x->op_count); |
|
|
|
for (i = 0; i < m680x->op_count; i++) { |
|
cs_m680x_op *op = &(m680x->operands[i]); |
|
const char *comment; |
|
|
|
switch ((int)op->type) { |
|
default: |
|
break; |
|
|
|
case M680X_OP_REGISTER: |
|
comment = ""; |
|
|
|
if ((i == 0 && m680x->flags & M680X_FIRST_OP_IN_MNEM) || |
|
(i == 1 && m680x->flags & |
|
M680X_SECOND_OP_IN_MNEM)) |
|
comment = " (in mnemonic)"; |
|
|
|
printf("\t\toperands[%u].type: REGISTER = %s%s\n", i, |
|
cs_reg_name(handle, op->reg), comment); |
|
break; |
|
|
|
case M680X_OP_CONSTANT: |
|
printf("\t\toperands[%u].type: CONSTANT = %u\n", i, |
|
op->const_val); |
|
break; |
|
|
|
case M680X_OP_IMMEDIATE: |
|
printf("\t\toperands[%u].type: IMMEDIATE = #%d\n", i, |
|
op->imm); |
|
break; |
|
|
|
case M680X_OP_DIRECT: |
|
printf("\t\toperands[%u].type: DIRECT = 0x%02X\n", i, |
|
op->direct_addr); |
|
break; |
|
|
|
case M680X_OP_EXTENDED: |
|
printf("\t\toperands[%u].type: EXTENDED %s = 0x%04X\n", |
|
i, op->ext.indirect ? "INDIRECT" : "", |
|
op->ext.address); |
|
break; |
|
|
|
case M680X_OP_RELATIVE: |
|
printf("\t\toperands[%u].type: RELATIVE = 0x%04X\n", i, |
|
op->rel.address); |
|
break; |
|
|
|
case M680X_OP_INDEXED: |
|
printf("\t\toperands[%u].type: INDEXED%s\n", i, |
|
(op->idx.flags & M680X_IDX_INDIRECT) ? |
|
" INDIRECT" : ""); |
|
|
|
if (op->idx.base_reg != M680X_REG_INVALID) |
|
printf("\t\t\tbase register: %s\n", |
|
cs_reg_name(handle, op->idx.base_reg)); |
|
|
|
if (op->idx.offset_reg != M680X_REG_INVALID) |
|
printf("\t\t\toffset register: %s\n", |
|
cs_reg_name(handle, op->idx.offset_reg)); |
|
|
|
if ((op->idx.offset_bits != 0) && |
|
(op->idx.offset_reg == M680X_REG_INVALID) && |
|
!op->idx.inc_dec) { |
|
printf("\t\t\toffset: %d\n", op->idx.offset); |
|
|
|
if (op->idx.base_reg == M680X_REG_PC) |
|
printf("\t\t\toffset address: 0x%X\n", |
|
op->idx.offset_addr); |
|
|
|
printf("\t\t\toffset bits: %u\n", |
|
op->idx.offset_bits); |
|
} |
|
|
|
if (op->idx.inc_dec) { |
|
const char *post_pre = op->idx.flags & |
|
M680X_IDX_POST_INC_DEC ? "post" : "pre"; |
|
const char *inc_dec = (op->idx.inc_dec > 0) ? |
|
"increment" : "decrement"; |
|
|
|
printf("\t\t\t%s %s: %d\n", post_pre, inc_dec, |
|
abs(op->idx.inc_dec)); |
|
} |
|
|
|
break; |
|
} |
|
|
|
if (op->size != 0) |
|
printf("\t\t\tsize: %u\n", op->size); |
|
|
|
if (op->access != CS_AC_INVALID) |
|
printf("\t\t\taccess: %s\n", s_access[op->access]); |
|
} |
|
|
|
print_read_write_regs(handle, detail); |
|
} |
|
|
|
|