cstool_m680x.c

Go to the documentation of this file.

/* 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);
}