i4004dis.c File Reference

#include <rz_asm.h>
#include <rz_types.h>
#include <string.h>
#include <stdio.h>

Go to the source code of this file.

Functions
static int	i4004_get_ins_len (ut8 hex)
static int	i4004dis (RzAsmOp *op, const ut8 *buf, int len)

Variables
static const int	i4004_ins_len [16]
static const char *	i4004_e [16]
static const char *	i4004_f [16]

Function Documentation

i4004_get_ins_len()

static int i4004_get_ins_len ( ut8  hex )

static

Definition at line 53 of file i4004dis.c.

                                      {
    ut8 high = (hex & 0xf0) >> 4;
    int ret = i4004_ins_len[high];
    if (ret == 3)
        ret = (hex & 1) ? 1 : 2;
    return ret;
}

References hex, and i4004_ins_len.

Referenced by i4004dis().

i4004dis()

static int i4004dis ( RzAsmOp *  op, const ut8 *  buf, int  len  )

static

Definition at line 61 of file i4004dis.c.

                                                          {
    int rlen = i4004_get_ins_len(*buf);
    ut8 high = (*buf & 0xf0) >> 4;
    ut8 low = (*buf & 0xf);
    const char *buf_asm = "invalid";
    if (rlen > len) {
        return op->size = 0;
    }
    switch (high) {
    case 0: buf_asm = low ? "invalid" : "nop"; break;
    case 1: buf_asm = sdb_fmt("jcn %d 0x%02x", low, buf[1]); break;
    case 2:
        if (rlen == 1) {
            buf_asm = sdb_fmt("src r%d", (low & 0xe));
        } else {
            buf_asm = sdb_fmt("fim r%d, 0x%02x", (low & 0xe), buf[1]);
        }
        break;
    case 3:
        if ((low & 1) == 1) {
            buf_asm = sdb_fmt("jin r%d", (low & 0xe));
        } else {
            buf_asm = sdb_fmt("fin r%d", (low & 0xe));
        }
        break;
    case 4: buf_asm = sdb_fmt("jun 0x%03x", ((ut16)(low << 8) | buf[1])); break;
    case 5: buf_asm = sdb_fmt("jms 0x%03x", ((ut16)(low << 8) | buf[1])); break;
    case 6: buf_asm = sdb_fmt("inc r%d", low); break;
    case 7: buf_asm = sdb_fmt("isz r%d, 0x%02x", low, buf[1]); break;
    case 8: buf_asm = sdb_fmt("add r%d", low); break;
    case 9: buf_asm = sdb_fmt("sub r%d", low); break;
    case 10: buf_asm = sdb_fmt("ld r%d", low); break;
    case 11: buf_asm = sdb_fmt("xch r%d", low); break;
    case 12: buf_asm = sdb_fmt("bbl %d", low); break;
    case 13: buf_asm = sdb_fmt("ldm %d", low); break;
    case 14: buf_asm = i4004_e[low]; break;
    case 15: buf_asm = i4004_f[low]; break;
    }
    rz_strbuf_set(&op->buf_asm, buf_asm);
    return op->size = rlen;
}

References i4004_e, i4004_f, i4004_get_ins_len(), len, rz_strbuf_set(), and sdb_fmt().

Referenced by disassemble().

Variable Documentation

i4004_e

const char* i4004_e[16]

static

Initial value:

= {
    "wrm",
    "wmp",
    "wrr",
    "wpm",
    "wr0",
    "wr1",
    "wr2",
    "wr3",
    "sbm",
    "rdm",
    "rdr",
    "adm",
    "rd0",
    "rd1",
    "rd2",
    "rd3"
}

Definition at line 15 of file i4004dis.c.

Referenced by i4004dis().

i4004_f

const char* i4004_f[16]

static

Initial value:

= {
    "clb",
    "clc",
    "iac",
    "cmc",
    "cma",
    "ral",
    "rar",
    "tcc",
    "dac",
    "tcs",
    "stc",
    "daa",
    "kbp",
    "dcl",
    "invalid",
    "invalid"
}

Definition at line 34 of file i4004dis.c.

Referenced by i4004dis().

i4004_ins_len

const int i4004_ins_len[16]

static

Initial value:

= {
    1, 2, 3, 1, 2, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1
}

Definition at line 11 of file i4004dis.c.

Referenced by i4004_get_ins_len().