Wolfgang Schwotzer | 22b4d0e | 2017-10-21 15:44:36 +0200 | [diff] [blame^] | 1 | /* Capstone Disassembly Engine */ |
| 2 | /* M680X Backend by Wolfgang Schwotzer <wolfgang.schwotzer@gmx.net> 2017 */ |
| 3 | |
| 4 | #include <stdio.h> |
| 5 | #include <capstone/capstone.h> |
| 6 | |
| 7 | void print_string_hex(char *comment, unsigned char *str, size_t len); |
| 8 | |
| 9 | static const char *s_access[] = { |
| 10 | "UNCHANGED", "READ", "WRITE", "READ | WRITE", |
| 11 | }; |
| 12 | |
| 13 | void print_read_write_regs(csh handle, cs_detail *detail) |
| 14 | { |
| 15 | int i; |
| 16 | |
| 17 | if (detail->regs_read_count > 0) { |
| 18 | printf("\treading from regs: "); |
| 19 | |
| 20 | for (i = 0; i < detail->regs_read_count; ++i) { |
| 21 | if (i > 0) |
| 22 | printf(", "); |
| 23 | |
| 24 | printf("%s", cs_reg_name(handle, detail->regs_read[i])); |
| 25 | } |
| 26 | |
| 27 | printf("\n"); |
| 28 | } |
| 29 | |
| 30 | if (detail->regs_write_count > 0) { |
| 31 | printf("\twriting to regs: "); |
| 32 | |
| 33 | for (i = 0; i < detail->regs_write_count; ++i) { |
| 34 | if (i > 0) |
| 35 | printf(", "); |
| 36 | |
| 37 | printf("%s", cs_reg_name(handle, |
| 38 | detail->regs_write[i])); |
| 39 | } |
| 40 | |
| 41 | printf("\n"); |
| 42 | } |
| 43 | } |
| 44 | |
| 45 | void print_insn_detail_m680x(csh handle, cs_insn *insn) |
| 46 | { |
| 47 | cs_detail *detail = insn->detail; |
| 48 | cs_m680x *m680x = NULL; |
| 49 | int i; |
| 50 | |
| 51 | // detail can be NULL on "data" instruction if SKIPDATA option is |
| 52 | // turned ON |
| 53 | if (detail == NULL) |
| 54 | return; |
| 55 | |
| 56 | m680x = &detail->m680x; |
| 57 | |
| 58 | if (m680x->op_count) |
| 59 | printf("\top_count: %u\n", m680x->op_count); |
| 60 | |
| 61 | for (i = 0; i < m680x->op_count; i++) { |
| 62 | cs_m680x_op *op = &(m680x->operands[i]); |
| 63 | char *comment; |
| 64 | |
| 65 | switch ((int)op->type) { |
| 66 | default: |
| 67 | break; |
| 68 | |
| 69 | case M680X_OP_REGISTER: |
| 70 | comment = ""; |
| 71 | |
| 72 | if ((i == 0 && m680x->flags & M680X_FIRST_OP_IN_MNEM) || |
| 73 | (i == 1 && m680x->flags & |
| 74 | M680X_SECOND_OP_IN_MNEM)) |
| 75 | comment = " (in mnemonic)"; |
| 76 | |
| 77 | printf("\t\toperands[%u].type: REGISTER = %s%s\n", i, |
| 78 | cs_reg_name(handle, op->reg), comment); |
| 79 | break; |
| 80 | |
| 81 | case M680X_OP_CONSTANT: |
| 82 | printf("\t\toperands[%u].type: CONSTANT = %u\n", i, |
| 83 | op->const_val); |
| 84 | break; |
| 85 | |
| 86 | case M680X_OP_IMMEDIATE: |
| 87 | printf("\t\toperands[%u].type: IMMEDIATE = #%d\n", i, |
| 88 | op->imm); |
| 89 | break; |
| 90 | |
| 91 | case M680X_OP_DIRECT: |
| 92 | printf("\t\toperands[%u].type: DIRECT = 0x%02X\n", i, |
| 93 | op->direct_addr); |
| 94 | break; |
| 95 | |
| 96 | case M680X_OP_EXTENDED: |
| 97 | printf("\t\toperands[%u].type: EXTENDED %s = 0x%04X\n", |
| 98 | i, op->ext.indirect ? "INDIRECT" : "", |
| 99 | op->ext.address); |
| 100 | break; |
| 101 | |
| 102 | case M680X_OP_RELATIVE: |
| 103 | printf("\t\toperands[%u].type: RELATIVE = 0x%04X\n", i, |
| 104 | op->rel.address); |
| 105 | break; |
| 106 | |
| 107 | case M680X_OP_INDEXED: |
| 108 | printf("\t\toperands[%u].type: INDEXED%s\n", i, |
| 109 | (op->idx.flags & M680X_IDX_INDIRECT) ? |
| 110 | " INDIRECT" : ""); |
| 111 | |
| 112 | if (op->idx.base_reg != M680X_REG_INVALID) |
| 113 | printf("\t\t\tbase register: %s\n", |
| 114 | cs_reg_name(handle, op->idx.base_reg)); |
| 115 | |
| 116 | if (op->idx.offset_reg != M680X_REG_INVALID) |
| 117 | printf("\t\t\toffset register: %s\n", |
| 118 | cs_reg_name(handle, op->idx.offset_reg)); |
| 119 | |
| 120 | if ((op->idx.offset_bits != 0) && |
| 121 | (op->idx.offset_reg == M680X_REG_INVALID) && |
| 122 | !op->idx.inc_dec) { |
| 123 | printf("\t\t\toffset: %d\n", op->idx.offset); |
| 124 | |
| 125 | if (op->idx.base_reg == M680X_REG_PC) |
| 126 | printf("\t\t\toffset address: 0x%X\n", |
| 127 | op->idx.offset_addr); |
| 128 | |
| 129 | printf("\t\t\toffset bits: %u\n", |
| 130 | op->idx.offset_bits); |
| 131 | } |
| 132 | |
| 133 | if (op->idx.inc_dec) { |
| 134 | char *post_pre = op->idx.flags & |
| 135 | M680X_IDX_POST_INC_DEC ? "post" : "pre"; |
| 136 | char *inc_dec = (op->idx.inc_dec > 0) ? |
| 137 | "increment" : "decrement"; |
| 138 | |
| 139 | printf("\t\t\t%s %s: %d\n", post_pre, inc_dec, |
| 140 | abs(op->idx.inc_dec)); |
| 141 | } |
| 142 | |
| 143 | break; |
| 144 | } |
| 145 | |
| 146 | if (op->size != 0) |
| 147 | printf("\t\t\tsize: %u\n", op->size); |
| 148 | |
| 149 | if (op->access != CS_AC_INVALID) |
| 150 | printf("\t\t\taccess: %s\n", s_access[op->access]); |
| 151 | } |
| 152 | |
| 153 | print_read_write_regs(handle, detail); |
| 154 | } |
| 155 | |