6502dis.c

Go to the documentation of this file.

// SPDX-FileCopyrightText: 2015-2016 pancake <pancake@nopcode.org>
// SPDX-FileCopyrightText: 2015-2016 condret <condr3t@protonmail.com>
// SPDX-FileCopyrightText: 2015-2016 riq <ricardoquesada@gmail.com>
// SPDX-FileCopyrightText: 2015-2016 qnix <qnix@0x80.org>
// SPDX-License-Identifier: LGPL-3.0-only
 
#include <rz_asm.h>
#include <rz_lib.h>
#include <string.h>
#include "../snes/snesdis.c"
 
static struct {
    ut8 op;
    char *name;
    size_t len;
} ops[] = {
    { 0x00, "brk", 1 },
    { 0x0b, "anc #0x%02x", 2 },
    { 0x2b, "anc #0x%02x", 2 },
    { 0x8b, "ane #0x%02x", 2 },
    { 0x6b, "arr #0x%02x", 2 },
    { 0x4b, "asr #0x%02x", 2 },
    { 0xc7, "dcp 0x%02x", 2 },
    { 0xd7, "dcp 0x%02x,x", 2 },
    { 0xcf, "dcp 0x%04x", 3 },
    { 0xdf, "dcp 0x%04x,x", 3 },
    { 0xdb, "dcp 0x%04x,y", 3 },
    { 0xc3, "dcp (0x%02x,x)", 2 },
    { 0xd3, "dcp (0x%02x),y", 2 },
    { 0xe7, "isb 0x%02x", 2 },
    { 0xf7, "isb 0x%02x,x", 2 },
    { 0xef, "isb 0x%04x", 3 },
    { 0xff, "isb 0x%04x,x", 3 },
    { 0xfb, "isb 0x%04x,y", 3 },
    { 0xe3, "isb (0x%02x,x)", 2 },
    { 0xf3, "isb (0x%02x),y", 2 },
    { 0x02, "hlt", 1 },
    { 0x12, "hlt", 1 },
    { 0x22, "hlt", 1 },
    { 0x32, "hlt", 1 },
    { 0x42, "hlt", 1 },
    { 0x52, "hlt", 1 },
    { 0x62, "hlt", 1 },
    { 0x72, "hlt", 1 },
    { 0x92, "hlt", 1 },
    { 0xb2, "hlt", 1 },
    { 0xd2, "hlt", 1 },
    { 0xf2, "hlt", 1 },
    { 0xbb, "lae 0x%04x,y", 3 },
    { 0xa7, "lax 0x%02x", 2 },
    { 0xb7, "lax 0x%02x,y", 2 },
    { 0xaf, "lax 0x%04x", 3 },
    { 0xbf, "lax 0x%04x,y", 3 },
    { 0xa3, "lax (0x%02x,x)", 2 },
    { 0xb3, "lax (0x%02x),y", 2 },
    { 0xab, "lxa #0x%02x", 2 },
    { 0xea, "nop", 1 },
    { 0x1a, "nop", 1 },
    { 0x3a, "nop", 1 },
    { 0x5a, "nop", 1 },
    { 0x7a, "nop", 1 },
    { 0xda, "nop", 1 },
    { 0xfa, "nop", 1 },
    { 0x80, "nop #0x%02x", 2 },
    { 0x82, "nop #0x%02x", 2 },
    { 0x89, "nop #0x%02x", 2 },
    { 0xc2, "nop #0x%02x", 2 },
    { 0xe2, "nop #0x%02x", 2 },
    { 0x04, "nop 0x%02x", 2 },
    { 0x44, "nop 0x%02x", 2 },
    { 0x64, "nop 0x%02x", 2 },
    { 0x14, "nop 0x%02x,x", 2 },
    { 0x34, "nop 0x%02x,x", 2 },
    { 0x54, "nop 0x%02x,x", 2 },
    { 0x74, "nop 0x%02x,x", 2 },
    { 0xd4, "nop 0x%02x,x", 2 },
    { 0xf4, "nop 0x%02x,x", 2 },
    { 0x0c, "nop 0x%04x", 3 },
    { 0x1c, "nop 0x%04x,x", 3 },
    { 0x3c, "nop 0x%04x,x", 3 },
    { 0x5c, "nop 0x%04x,x", 3 },
    { 0x7c, "nop 0x%04x,x", 3 },
    { 0xdc, "nop 0x%04x,x", 3 },
    { 0xfc, "nop 0x%04x,x", 3 },
    { 0x27, "rla 0x%02x", 2 },
    { 0x37, "rla 0x%02x,x", 2 },
    { 0x2f, "rla 0x%04x", 3 },
    { 0x3f, "rla 0x%04x,x", 3 },
    { 0x3b, "rla 0x%04x,y", 3 },
    { 0x23, "rla (0x%02x,x)", 2 },
    { 0x33, "rla (0x%02x),y", 2 },
    { 0x67, "rra 0x%02x", 2 },
    { 0x77, "rra 0x%02x,x", 2 },
    { 0x6f, "rra 0x%04x", 3 },
    { 0x7f, "rra 0x%04x,x", 3 },
    { 0x7b, "rra 0x%04x,y", 3 },
    { 0x63, "rra (0x%02x,x)", 2 },
    { 0x73, "rra (0x%02x),y", 2 },
    { 0x87, "sax 0x%02x", 2 },
    { 0x97, "sax 0x%02x,y", 2 },
    { 0x8f, "sax 0x%04x", 3 },
    { 0x83, "sax (0x%02x,x)", 2 },
    { 0xe9, "sbc #0x%02x", 2 },
    { 0xe5, "sbc 0x%02x", 2 },
    { 0xf5, "sbc 0x%02x,x", 2 },
    { 0xed, "sbc 0x%04x", 3 },
    { 0xfd, "sbc 0x%04x,x", 3 },
    { 0xf9, "sbc 0x%04x,y", 3 },
    { 0xe1, "sbc (0x%02x,x)", 2 },
    { 0xf1, "sbc (0x%02x),y", 2 },
    { 0xeb, "sbc #0x%02x", 2 },
    //{0xef, "sbc 0x%06x", 4},
    //{0xff, "sbc 0x%06x,x", 4},
    //{0xf2, "sbc (0x%02x)", 2},
    //{0xe7, "sbc [0x%02x]", 2},
    //{0xf7, "sbc [0x%02x],y", 2},
    //{0xe3, "sbc 0x%02x,s", 2},
    //{0xf3, "sbc (0x%02x,s),y", 2},
    { 0xcb, "sbx 0x%02x", 2 },
    { 0x93, "sha 0x%04x,x", 3 },
    { 0x9f, "sha 0x%04x,y", 3 },
    { 0x9b, "shs 0x%04x,y", 3 },
    { 0x9e, "shx 0x%04x,y", 3 },
    { 0x9c, "shy 0x%04x,x", 3 },
    { 0x07, "slo 0x%02x", 2 },
    { 0x17, "slo 0x%02x,x", 2 },
    { 0x0f, "slo 0x%04x", 3 },
    { 0x1f, "slo 0x%04x,x", 3 },
    { 0x1b, "slo 0x%04x,y", 3 },
    { 0x03, "slo (0x%02x,x)", 2 },
    { 0x13, "slo (0x%02x),y", 2 },
    { 0x47, "sre 0x%02x", 2 },
    { 0x57, "sre 0x%02x,x", 2 },
    { 0x4f, "sre 0x%04x", 3 },
    { 0x5f, "sre 0x%04x,x", 3 },
    { 0x5b, "sre 0x%04x,y", 3 },
    { 0x43, "sre (0x%02x,x)", 2 },
    { 0x53, "sre (0x%02x),y", 2 },
    { -1, NULL, 0 }
};
 
static int _6502Disass(ut64 pc, RzAsmOp *op, const ut8 *buf, ut64 len) {
    int i;
    for (i = 0; ops[i].name != NULL; i++) {
        if (ops[i].op == buf[0]) {
            const char *buf_asm = "invalid";
            int len = ops[i].len;
            switch (ops[i].len) {
            case 1:
                buf_asm = sdb_fmt("%s", ops[i].name);
                break;
            case 2:
                if (len > 1) {
                    buf_asm = sdb_fmt(ops[i].name, buf[1]);
                } else {
                    buf_asm = "truncated";
                    len = -1;
                }
                break;
            case 3:
                if (len > 2) {
                    buf_asm = sdb_fmt(ops[i].name, buf[1] + 0x100 * buf[2]);
                } else {
                    buf_asm = "truncated";
                    len = -1;
                }
                break;
            case 4:
                if (len > 3) {
                    buf_asm = sdb_fmt(ops[i].name, buf[1] + 0x100 * buf[2] + 0x10000 * buf[3]);
                } else {
                    buf_asm = "truncated";
                    len = -1;
                }
                break;
            default:
                goto beach;
            }
            rz_strbuf_set(&op->buf_asm, buf_asm);
            return len;
        }
    }
beach:
    return snesDisass(1, 1, pc, op, buf, len);
}