radare2/libr/asm/p/asm_malbolge.c
2019-06-13 19:12:51 +02:00

47 lines
1.0 KiB
C

/* radare - LGPL - Copyright 2014-2018 condret, pancake */
#include <r_asm.h>
#include <r_types.h>
#include <r_lib.h>
#include <string.h>
static const char *mal_dis(ut64 c, const ut8 *buf, ut64 len) {
if (len) {
switch ((buf[0] + c) % 94) {
case 4: return "jmp [d]";
case 5: return "out a";
case 23: return "in a";
case 39: return "rotr [d], mov a, [d]";
case 40: return "mov d, [d]";
case 62: return "crz [d], a, mov a, [d]";
case 81: return "end";
default: return "nop";
}
}
return NULL;
}
static int __disassemble(RAsm *a, RAsmOp *op, const ut8 *buf, int len) {
const char *opstr = mal_dis (a->pc, buf, len);
return op->size = opstr? 1: 0;
}
RAsmPlugin r_asm_plugin_malbolge = {
.name = "malbolge",
.desc = "Malbolge Ternary VM",
.arch = "malbolge",
.author = "condret",
.license = "LGPL3",
.bits = 32,
.endian = R_SYS_ENDIAN_NONE,
.disassemble = &__disassemble
};
#ifndef R2_PLUGIN_INCORE
R_API RLibStruct radare_plugin = {
.type = R_LIB_TYPE_ASM,
.data = &r_asm_plugin_malbolge,
.version = R2_VERSION
};
#endif