// SPDX-FileCopyrightText: 2018-2019 pancake <pancake@nopcode.org>
// SPDX-License-Identifier: LGPL-3.0-only

#include <rz_asm.h>
#include "asm_private.h"
#include <rz_lib.h>
#include "cs_helper.h"

CAPSTONE_DEFINE_PLUGIN_FUNCTIONS(m680x_asm);

static int m680x_disassemble(const RzAsm *a, RzAsmOp *op, const ut8 *buf, int len) {
	CapstoneContext *ctx = (CapstoneContext *)a->plugin_data;

	int n, ret;
	ut64 off = a->pc;
	cs_mode mode;
	cs_insn *insn = NULL;
	mode = m680x_mode(a->cpu);
	op->size = 0;

	if (ctx->omode != mode) {
		cs_close(&ctx->handle);
		ctx->omode = -1;
	}
	if (!ctx->handle) {
		ret = cs_open(CS_ARCH_M680X, mode, &ctx->handle);
		if (ret) {
			return -1;
		}
		ctx->omode = mode;
		cs_option(ctx->handle, CS_OPT_DETAIL, CS_OPT_OFF);
	}

	n = cs_disasm(ctx->handle, (const ut8 *)buf, len, off, 1, &insn);
	if (n > 0) {
		if (insn->size > 0) {
			op->size = insn->size;
			rz_asm_op_setf_asm(op, "%s%s%s",
				insn->mnemonic, insn->op_str[0] ? " " : "",
				insn->op_str);
			char *ptrstr = strstr(rz_strbuf_get(&op->buf_asm), "ptr ");
			if (ptrstr) {
				memmove(ptrstr, ptrstr + 4, strlen(ptrstr + 4) + 1);
			}
		}
		cs_free(insn, n);
	}
	return op->size;
}

static char **m680x_cpu_descriptions() {
	static char *cpu_desc[] = {
		"6800", "Motorola 6800: 8-bit microprocessor launched in 1974",
		"6801", "Motorola 6801: Enhanced version of the 6800 with additional features like on-chip RAM and timers.",
		"6802", "Motorola 6802: Enhanced version of the 6800 with 128 bytes of on-chip RAM and internal clock",
		"6803", "Motorola 6803: Version of 6801 without internal ROM",
		"6805", "Motorola 68HC05: 8-bit microcontroller",
		"6808", "Motorola 6808: Variant of the 6800 microprocessor",
		"68HC08", "Motorola 68HC08: 8-bit microcontroller (abbreviated as HC08)",
		"6809", "Motorola 6809: Advanced 8-bit microprocessor",
		"6811", "Motorola 68HC11: 8-bit microcontroller (also abbreviated as 6811 or HC11)",
		"cpu12", "Motorola 68HC12: 16-bit microcontroller (also abbreviated as 6812 or HC12)",
		"6301", "Hitachi 6301: 8-bit microcontroller, CMOS version of 6800",
		"6309", "Hitachi 6309: CMOS version of 6809",
		"hcs08", "Freescale HCS08: 8-bit microcontroller family",
		"RS08", "Freescale RS08: Reduced-resource version of HCS08",
		"HCS12X", "Freescale HCS12X: 16-bit microcontroller (upwards compatible with cpu12)",
		NULL
	};
	return cpu_desc;
}

RzAsmPlugin rz_asm_plugin_m680x_cs = {
	.name = "m680x",
	.cpus = "6800,6801,6802,6803,6805,6808,68HC08,6809,6811,cpu12,6301,6309,hcs08,rs08,hcs12x",
	.desc = "Motorola 680X Capstone-based disassembler",
	.license = "BSD",
	.arch = "m680x",
	.bits = 8 | 32,
	.endian = RZ_SYS_ENDIAN_LITTLE,
	.init = m680x_asm_init,
	.fini = m680x_asm_fini,
	.disassemble = &m680x_disassemble,
	.mnemonics = m680x_asm_mnemonics,
	.get_cpu_desc = m680x_cpu_descriptions,
};

#ifndef RZ_PLUGIN_INCORE
RZ_API RzLibStruct rizin_plugin = {
	.type = RZ_LIB_TYPE_ASM,
	.data = &rz_asm_plugin_m680x_cs,
	.version = RZ_VERSION
};
#endif
