asm_or1k.c File Reference

#include <rz_asm.h>
#include <rz_lib.h>
#include "../arch/or1k/or1k_disas.h"

Go to the source code of this file.

Classes
struct	operands

Functions
static int	insn_to_str (RzAsm *a, char **line, insn_t *descr, insn_extra_t *extra, ut32 insn)
static int	disassemble (RzAsm *a, RzAsmOp *op, const ut8 *buf, int len)

Variables
RzAsmPlugin	rz_asm_plugin_or1k
RZ_API RzLibStruct	rizin_plugin

Function Documentation

disassemble()

static int disassemble ( RzAsm *  a, RzAsmOp *  op, const ut8 *  buf, int  len  )

static

Definition at line 108 of file asm_or1k.c.

                                                                       {
    ut32 insn, opcode;
    ut8 opcode_idx;
    char *line = NULL;
    insn_t *insn_descr;
    insn_extra_t *extra_descr;
 
    op->size = -1;
 
    if (len < 4) {
        line = sdb_fmt("invalid");
        rz_strbuf_set(&op->buf_asm, line);
        return op->size;
    }
 
    /* read instruction and basic opcode value */
    insn = rz_read_be32(buf);
    op->size = 4;
    opcode = (insn & INSN_OPCODE_MASK);
    opcode_idx = opcode >> INSN_OPCODE_SHIFT;
 
    /* make sure instruction descriptor table is not overflowed */
    if (opcode_idx >= insns_count) {
        line = sdb_fmt("invalid");
        rz_strbuf_set(&op->buf_asm, line);
        return op->size;
    }
 
    /* if instruction is marked as invalid finish processing now */
    insn_descr = &or1k_insns[opcode_idx];
    if (insn_descr->type == INSN_INVAL) {
        line = sdb_fmt("invalid");
        rz_strbuf_set(&op->buf_asm, line);
        return op->size;
    }
 
    /* if name is null, but extra is present, it means 6 most significant bits
     * are not enough to decode instruction */
    if (!insn_descr->name && insn_descr->extra) {
        if ((extra_descr = find_extra_descriptor(insn_descr->extra, insn)) != NULL) {
            insn_to_str(a, &line, insn_descr, extra_descr, insn);
        } else {
            line = "invalid";
        }
        rz_strbuf_set(&op->buf_asm, line);
    } else {
        /* otherwise basic descriptor is enough */
        insn_to_str(a, &line, insn_descr, NULL, insn);
        rz_strbuf_set(&op->buf_asm, line);
    }
    return op->size;
}

References a, insn_t::extra, find_extra_descriptor(), INSN_INVAL, INSN_OPCODE_MASK, INSN_OPCODE_SHIFT, insn_to_str(), insns_count, len, setup::line, insn_t::name, NULL, or1k_insns, rz_read_be32(), rz_strbuf_set(), sdb_fmt(), and insn_t::type.

insn_to_str()

static int insn_to_str ( RzAsm *  a, char **  line, insn_t *  descr, insn_extra_t *  extra, ut32  insn  )

static

Definition at line 20 of file asm_or1k.c.

                                                                                             {
    struct operands o = { 0 };
    char *name;
    insn_type_t type = type_of_opcode(descr, extra);
    insn_type_descr_t *type_descr = &types[INSN_X];
 
    /* only use type descriptor if it has some useful data */
    if (has_type_descriptor(type) && is_type_descriptor_defined(type)) {
        type_descr = &types[type];
    }
 
    o.rd = get_operand_value(insn, type_descr, INSN_OPER_D);
    o.ra = get_operand_value(insn, type_descr, INSN_OPER_A);
    o.rb = get_operand_value(insn, type_descr, INSN_OPER_B);
    o.k1 = get_operand_value(insn, type_descr, INSN_OPER_K1);
    o.k2 = get_operand_value(insn, type_descr, INSN_OPER_K2);
    o.n = get_operand_value(insn, type_descr, INSN_OPER_N);
    o.k = get_operand_value(insn, type_descr, INSN_OPER_K);
    o.i = get_operand_value(insn, type_descr, INSN_OPER_I);
    o.l = get_operand_value(insn, type_descr, INSN_OPER_L);
 
    name = extra ? extra->name : descr->name;
 
    if (!name || !type_descr->format) {
        /* this should not happen, give up */
        *line = sdb_fmt("invalid");
        return 4;
    }
 
    switch (type) {
    case INSN_X:
        *line = sdb_fmt(type_descr->format, name);
        break;
    case INSN_N:
        *line = sdb_fmt(type_descr->format, name,
            (sign_extend(o.n, get_operand_mask(type_descr, INSN_OPER_N)) << 2) +
                a->pc);
        break;
    case INSN_K:
        *line = sdb_fmt(type_descr->format, name, o.k);
        break;
    case INSN_DK:
        *line = sdb_fmt(type_descr->format, name, o.rd, o.k);
        break;
    case INSN_DN:
        *line = sdb_fmt(type_descr->format, name, o.rd, o.n << 13);
        break;
    case INSN_B:
        *line = sdb_fmt(type_descr->format, name, o.rb);
        break;
    case INSN_D:
        *line = sdb_fmt(type_descr->format, name, o.rd);
        break;
    case INSN_AI:
        *line = sdb_fmt(type_descr->format, name, o.ra, o.i);
        break;
    case INSN_DAI:
        *line = sdb_fmt(type_descr->format, name, o.rd, o.ra, o.i);
        break;
    case INSN_DAK:
        *line = sdb_fmt(type_descr->format, name, o.rd, o.ra, o.i);
        break;
    case INSN_DAL:
        *line = sdb_fmt(type_descr->format, name, o.rd, o.ra, o.l);
        break;
    case INSN_DA:
        *line = sdb_fmt(type_descr->format, name, o.rd, o.ra);
        break;
    case INSN_DAB:
        *line = sdb_fmt(type_descr->format, name, o.rd, o.ra, o.rb);
        break;
    case INSN_AB:
        *line = sdb_fmt(type_descr->format, name, o.ra, o.rb);
        break;
    case INSN_IABI:
        *line = sdb_fmt(type_descr->format, name,
            o.ra, o.rb, (o.k1 << 11) | o.k2);
        break;
    case INSN_KABK:
        *line = sdb_fmt(type_descr->format, name,
            o.ra, o.rb, (o.k1 << 11) | o.k2);
        break;
    default:
        *line = sdb_fmt("invalid");
    }
    return 4;
}

References a, insn_type_descr_t::format, get_operand_mask(), get_operand_value(), has_type_descriptor(), operands::i, INSN_AB, INSN_AI, INSN_B, INSN_D, INSN_DA, INSN_DAB, INSN_DAI, INSN_DAK, INSN_DAL, INSN_DK, INSN_DN, INSN_IABI, INSN_K, INSN_KABK, INSN_N, INSN_OPER_A, INSN_OPER_B, INSN_OPER_D, INSN_OPER_I, INSN_OPER_K, INSN_OPER_K1, INSN_OPER_K2, INSN_OPER_L, INSN_OPER_N, INSN_X, is_type_descriptor_defined(), operands::k, operands::k1, operands::k2, operands::l, setup::line, operands::n, name, insn_extra_t::name, insn_t::name, operands::ra, operands::rb, operands::rd, sdb_fmt(), sign_extend(), type, type_of_opcode(), and types.

Referenced by disassemble().

Variable Documentation

rizin_plugin

RZ_API RzLibStruct rizin_plugin

Initial value:

= {
    .type = RZ_LIB_TYPE_ASM, .data = &rz_asm_plugin_or1k, .version = RZ_VERSION
}

Definition at line 172 of file asm_or1k.c.

rz_asm_plugin_or1k

RzAsmPlugin rz_asm_plugin_or1k

Initial value:

= {
    .name = "or1k",
    .desc = "OpenRISC 1000",
    .license = "LGPL3",
    .arch = "or1k",
    .bits = 32,
    .endian = RZ_SYS_ENDIAN_BIG,
    .disassemble = &disassemble,
}

Definition at line 161 of file asm_or1k.c.