// SPDX-FileCopyrightText: 2012-2020 pancake <pancake@nopcode.org>
// SPDX-FileCopyrightText: 2014 Fedor Sakharov <fedor.sakharov@gmail.com>
// SPDX-License-Identifier: LGPL-3.0-only

#include <string.h>
#include <rz_types.h>
#include <rz_lib.h>
#include <rz_asm.h>
#include <rz_analysis.h>
#include <rz_util.h>
#include <rz_endian.h>

#include <v850_disas.h>

// Format I
#define F1_REG1(instr) ((instr)&0x1F)
#define F1_REG2(instr) (((instr)&0xF800) >> 11)

#define F1_RN1(instr) (V850_REG_NAMES[F1_REG1(instr)])
#define F1_RN2(instr) (V850_REG_NAMES[F1_REG2(instr)])

// Format II
#define F2_IMM(instr)  F1_REG1(instr)
#define F2_REG2(instr) F1_REG2(instr)

#define F2_RN2(instr) (V850_REG_NAMES[F2_REG2(instr)])

// Format III
#define F3_COND(instr) ((instr)&0xF)
#define F3_DISP(instr) (((instr)&0x70) >> 4) | (((instr)&0xF800) >> 7)

// Format IV
#define F4_DISP(instr) ((instr)&0x3F)
#define F4_REG2(instr) F1_REG2(instr)

#define F4_RN2(instr) (V850_REG_NAMES[F4_REG2(instr)])

// Format V
#define F5_REG2(instr) F1_REG2(instr)
#define F5_DISP(instr) ((((ut32)(instr)&0xffff) << 31) | (((ut32)(instr)&0xffff0000) << 1))
#define F5_RN2(instr)  (V850_REG_NAMES[F5_REG2(instr)])

// Format VI
#define F6_REG1(instr) F1_REG1(instr)
#define F6_REG2(instr) F1_REG2(instr)
#define F6_IMM(instr)  (((instr)&0xFFFF0000) >> 16)

#define F6_RN1(instr) (V850_REG_NAMES[F6_REG1(instr)])
#define F6_RN2(instr) (V850_REG_NAMES[F6_REG2(instr)])

// Format VII
#define F7_REG1(instr) F1_REG1(instr)
#define F7_REG2(instr) F1_REG2(instr)
#define F7_DISP(instr) F6_IMM(instr)

#define F7_RN1(instr) (V850_REG_NAMES[F7_REG1(instr)])
#define F7_RN2(instr) (V850_REG_NAMES[F7_REG2(instr)])

// Format VIII
#define F8_REG1(instr) F1_REG1(instr)
#define F8_DISP(instr) F6_IMM(instr)
#define F8_BIT(instr)  (((instr)&0x3800) >> 11)
#define F8_SUB(instr)  (((instr)&0xC000) >> 14)

#define F8_RN1(instr) (V850_REG_NAMES[F8_REG1(instr)])
#define F8_RN2(instr) (V850_REG_NAMES[F8_REG2(instr)])

// Format IX
// Also regID/cond
#define F9_REG1(instr) F1_REG1(instr)
#define F9_REG2(instr) F1_REG2(instr)
#define F9_SUB(instr)  (((instr)&0x7E00000) >> 21)

#define F9_RN1(instr) (V850_REG_NAMES[F9_REG1(instr)])
#define F9_RN2(instr) (V850_REG_NAMES[F9_REG2(instr)])
// TODO: Format X

// Format XI
#define F11_REG1(instr) F1_REG1(instr)
#define F11_REG2(instr) F1_REG2(instr)
#define F11_REG3(instr) (((instr)&0xF8000000) >> 27)
#define F11_SUB(instr)  ((((instr)&0x7E00000) >> 20) | (((instr)&2) >> 1))

#define F11_RN1(instr) (V850_REG_NAMES[F11_REG1(instr)])
#define F11_RN2(instr) (V850_REG_NAMES[F11_REG2(instr)])
// Format XII
#define F12_IMM(instr)  (F1_REG1(instr) | (((instr)&0x7C0000) >> 13))
#define F12_REG2(instr) F1_REG2(instr)
#define F12_REG3(instr) (((instr)&0xF8000000) >> 27)
#define F12_SUB(instr)  ((((instr)&0x7800001) >> 22) | (((instr)&2) >> 1))

#define F12_RN2(instr) (V850_REG_NAMES[F12_REG2(instr)])
#define F12_RN3(instr) (V850_REG_NAMES[F12_REG3(instr)])

// Format XIII
#define F13_IMM(instr) (((instr)&0x3E) >> 1)
// Also a subopcode
#define F13_REG2(instr) (((instr)&0x1F0000) >> 16)
#define F13_LIST(instr) (((instr) && 0xFFE00000) >> 21)

#define F13_RN2(instr) (V850_REG_NAMES[F13_REG2(instr)])

static const char *V850_REG_NAMES[] = {
	"zero",
	"r1",
	"r2",
	"r3",
	"r4",
	"r5",
	"r6",
	"r7",
	"r8",
	"r9",
	"r10",
	"r11",
	"r12",
	"r13",
	"r14",
	"r15",
	"r16",
	"r17",
	"r18",
	"r19",
	"r20",
	"r21",
	"r22",
	"r23",
	"r24",
	"r25",
	"r26",
	"r27",
	"r28",
	"r29",
	"ep",
	"lp",
};

static void update_flags(RzAnalysisOp *op, int flags) {
	if (flags & V850_FLAG_CY) {
		rz_strbuf_append(&op->esil, "31,$c,cy,:=");
	}
	if (flags & V850_FLAG_OV) {
		rz_strbuf_append(&op->esil, ",31,$o,ov,:=");
	}
	if (flags & V850_FLAG_S) {
		rz_strbuf_append(&op->esil, ",31,$s,s,:=");
	}
	if (flags & V850_FLAG_Z) {
		rz_strbuf_append(&op->esil, ",$z,z,:=");
	}
}

static void clear_flags(RzAnalysisOp *op, int flags) {
	if (flags & V850_FLAG_CY) {
		rz_strbuf_append(&op->esil, ",0,cy,=");
	}
	if (flags & V850_FLAG_OV) {
		rz_strbuf_append(&op->esil, ",0,ov,=");
	}
	if (flags & V850_FLAG_S) {
		rz_strbuf_append(&op->esil, ",0,s,=");
	}
	if (flags & V850_FLAG_Z) {
		rz_strbuf_append(&op->esil, ",0,z,=");
	}
}

static int v850_op(RzAnalysis *analysis, RzAnalysisOp *op, ut64 addr, const ut8 *buf, int len, RzAnalysisOpMask mask) {
	int ret = 0;
	ut8 opcode = 0;
	const char *reg1 = NULL;
	const char *reg2 = NULL;
	ut32 bitmask = 0;
	ut16 destaddr = 0;
	st16 destaddrs = 0;
	ut16 word1 = 0, word2 = 0;
	struct v850_cmd cmd;

	if (len < 1 || (len > 0 && !memcmp(buf, "\xff\xff\xff\xff\xff\xff", RZ_MIN(len, 6)))) {
		return -1;
	}

	memset(&cmd, 0, sizeof(cmd));

	ret = op->size = v850_decode_command(buf, len, &cmd);

	if (ret < 1) {
		return ret;
	}

	op->addr = addr;

	word1 = rz_read_le16(buf);
	if (ret == 4) {
		word2 = rz_read_le16(buf + 2);
	}
	opcode = get_opcode(word1);

	switch (opcode) {
	case V850_MOV_IMM5:
	case V850_MOV:
		// 2 formats
		op->type = RZ_ANALYSIS_OP_TYPE_MOV;
		if (opcode != V850_MOV_IMM5) { // Format I
			rz_strbuf_appendf(&op->esil, "%s,%s,=", F1_RN1(word1), F1_RN2(word1));
		} else { // Format II
			rz_strbuf_appendf(&op->esil, "%" PFMT64d ",%s,=", (st64)(F2_IMM(word1)), F2_RN2(word1));
		}
		break;
	case V850_MOVEA:
		op->type = RZ_ANALYSIS_OP_TYPE_MOV;
		// FIXME: to decide about reading 16/32 bit and use only macros to access
		rz_strbuf_appendf(&op->esil, "%s,0xffff,&,%u,+,%s,=", F6_RN1(word1), word2, F6_RN2(word1));
		break;
	case V850_SLDB:
	case V850_SLDH:
	case V850_SLDW:
		op->type = RZ_ANALYSIS_OP_TYPE_LOAD;
		if (F4_REG2(word1) == V850_SP) {
			op->stackop = RZ_ANALYSIS_STACK_GET;
			op->stackptr = 0;
			op->ptr = 0;
		}
		break;
	case V850_SSTB:
	case V850_SSTH:
	case V850_SSTW:
		op->type = RZ_ANALYSIS_OP_TYPE_STORE;
		if (F4_REG2(word1) == V850_SP) {
			op->stackop = RZ_ANALYSIS_STACK_SET;
			op->stackptr = 0;
			op->ptr = 0;
		}
		break;
	case V850_NOT:
		op->type = RZ_ANALYSIS_OP_TYPE_NOT;
		rz_strbuf_appendf(&op->esil, "%s,0xffffffff,^,%s,=", F1_RN1(word1), F1_RN2(word1));
		update_flags(op, V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_DIVH:
		op->type = RZ_ANALYSIS_OP_TYPE_DIV;
		rz_strbuf_appendf(&op->esil, "%s,%s,0xffff,&,/,%s,=",
			F1_RN1(word1), F1_RN2(word1), F1_RN2(word1));
		update_flags(op, V850_FLAG_OV | V850_FLAG_S | V850_FLAG_Z);
		break;
	case V850_JMP:
		if (F1_REG1(word1) == 31) {
			op->type = RZ_ANALYSIS_OP_TYPE_RET;
		} else {
			op->type = RZ_ANALYSIS_OP_TYPE_UJMP;
		}
		op->jump = word1; // UT64_MAX; // this is n RJMP instruction .. F1_RN1 (word1);
		op->fail = addr + 2;
		rz_strbuf_appendf(&op->esil, "%s,pc,=", F1_RN1(word1));
		break;
	case V850_JARL2:
		// TODO: fix displacement reading
		op->type = RZ_ANALYSIS_OP_TYPE_JMP;
		op->jump = addr + F5_DISP(((ut32)word2 << 16) | word1);
		op->fail = addr + 4;
		rz_strbuf_appendf(&op->esil, "pc,%s,=,pc,%u,+=", F5_RN2(word1), F5_DISP(((ut32)word2 << 16) | word1));
		break;
#if 0 // same opcode as JARL?
	case V850_JR:
		jumpdisp = DISP26(word1, word2);
		op->type = RZ_ANALYSIS_OP_TYPE_JMP;
		rz_strbuf_appendf (&op->esil, "$$,%d,+,pc,=", jumpdisp);
		break;
#endif
	case V850_OR:
		op->type = RZ_ANALYSIS_OP_TYPE_OR;
		rz_strbuf_appendf(&op->esil, "%s,%s,|=", F1_RN1(word1), F1_RN2(word1));
		update_flags(op, V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_ORI:
		op->type = RZ_ANALYSIS_OP_TYPE_OR;
		rz_strbuf_appendf(&op->esil, "%hu,%s,|,%s,=",
			word2, F6_RN1(word1), F6_RN2(word1));
		update_flags(op, V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_MULH:
	case V850_MULH_IMM5:
		op->type = RZ_ANALYSIS_OP_TYPE_MUL;
		break;
	case V850_XOR:
		op->type = RZ_ANALYSIS_OP_TYPE_XOR;
		rz_strbuf_appendf(&op->esil, "%s,%s,^=", F1_RN1(word1), F1_RN2(word1));
		update_flags(op, V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_XORI:
		op->type = RZ_ANALYSIS_OP_TYPE_XOR;
		rz_strbuf_appendf(&op->esil, "%hu,%s,^,%s,=", word2, F6_RN1(word1), F6_RN2(word1));
		update_flags(op, V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_AND:
		op->type = RZ_ANALYSIS_OP_TYPE_AND;
		rz_strbuf_appendf(&op->esil, "%s,%s,&=", F1_RN1(word1), F1_RN2(word1));
		update_flags(op, V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_ANDI:
		op->type = RZ_ANALYSIS_OP_TYPE_AND;
		rz_strbuf_appendf(&op->esil, "%hu,%s,&,%s,=", word2, F6_RN1(word1), F6_RN2(word1));
		update_flags(op, V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV | V850_FLAG_S);
		break;
	case V850_CMP:
		op->type = RZ_ANALYSIS_OP_TYPE_CMP;
		rz_strbuf_appendf(&op->esil, "%s,%s,==", F1_RN1(word1), F1_RN2(word1));
		update_flags(op, -1);
		break;
	case V850_CMP_IMM5:
		op->type = RZ_ANALYSIS_OP_TYPE_CMP;
		rz_strbuf_appendf(&op->esil, "%d,%s,==", (st8)SIGN_EXT_T5(F2_IMM(word1)), F2_RN2(word1));
		update_flags(op, -1);
		break;
	case V850_TST:
		op->type = RZ_ANALYSIS_OP_TYPE_CMP;
		rz_strbuf_appendf(&op->esil, "%s,%s,&", F1_RN1(word1), F1_RN2(word1));
		update_flags(op, V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_SUB:
		op->type = RZ_ANALYSIS_OP_TYPE_SUB;
		rz_strbuf_appendf(&op->esil, "%s,%s,-=", F1_RN1(word1), F1_RN2(word1));
		update_flags(op, -1);
		break;
	case V850_SUBR:
		op->type = RZ_ANALYSIS_OP_TYPE_SUB;
		rz_strbuf_appendf(&op->esil, "%s,%s,-,%s=", F1_RN2(word1), F1_RN1(word1), F1_RN2(word1));
		update_flags(op, -1);
		break;
	case V850_ADD:
		op->type = RZ_ANALYSIS_OP_TYPE_ADD;
		rz_strbuf_appendf(&op->esil, "%s,%s,+=", F1_RN1(word1), F1_RN2(word1));
		update_flags(op, -1);
		break;
	case V850_ADD_IMM5:
		op->type = RZ_ANALYSIS_OP_TYPE_ADD;
		if (F2_REG2(word1) == V850_SP) {
			op->stackop = RZ_ANALYSIS_STACK_INC;
			op->stackptr = F2_IMM(word1);
			op->val = op->stackptr;
		}
		rz_strbuf_appendf(&op->esil, "%d,%s,+=", (st8)SIGN_EXT_T5(F2_IMM(word1)), F2_RN2(word1));
		update_flags(op, -1);
		break;
	case V850_ADDI:
		op->type = RZ_ANALYSIS_OP_TYPE_ADD;
		if (F6_REG2(word1) == V850_SP) {
			op->stackop = RZ_ANALYSIS_STACK_INC;
			op->stackptr = (st64)word2;
			op->val = op->stackptr;
		}
		rz_strbuf_appendf(&op->esil, "%d,%s,+,%s,=", (st32)word2, F6_RN1(word1), F6_RN2(word1));
		update_flags(op, -1);
		break;
	case V850_SHR_IMM5:
		op->type = RZ_ANALYSIS_OP_TYPE_SHR;
		rz_strbuf_appendf(&op->esil, "%u,%s,>>=", (ut8)F2_IMM(word1), F2_RN2(word1));
		update_flags(op, V850_FLAG_CY | V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_SAR_IMM5:
		op->type = RZ_ANALYSIS_OP_TYPE_SAR;
		ut16 imm5 = F2_IMM(word1);
		reg2 = F2_RN2(word1);
		rz_strbuf_appendf(&op->esil, "31,%s,>>,?{,%u,32,-,%u,1,<<,--,<<,}{,0,},%u,%s,>>,|,%s,=", reg2, (ut8)imm5, (ut8)imm5, (ut8)imm5, reg2, reg2);
		update_flags(op, V850_FLAG_CY | V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_SHL_IMM5:
		op->type = RZ_ANALYSIS_OP_TYPE_SHL;
		rz_strbuf_appendf(&op->esil, "%u,%s,<<=", (ut8)F2_IMM(word1), F2_RN2(word1));
		update_flags(op, V850_FLAG_CY | V850_FLAG_S | V850_FLAG_Z);
		clear_flags(op, V850_FLAG_OV);
		break;
	case V850_BCOND:
	case V850_BCOND2:
	case V850_BCOND3:
	case V850_BCOND4:
		destaddr = ((((word1 >> 4) & 0x7) |
				    ((word1 >> 11) << 3))
			<< 1);
		if (destaddr & 0x100) {
			destaddrs = destaddr | 0xFE00;
		} else {
			destaddrs = destaddr;
		}
		op->jump = addr + destaddrs;
		op->fail = addr + 2;
		op->type = RZ_ANALYSIS_OP_TYPE_CJMP;
		switch (F3_COND(word1)) {
		case V850_COND_V:
			rz_strbuf_appendf(&op->esil, "ov");
			break;
		case V850_COND_CL:
			rz_strbuf_appendf(&op->esil, "cy");
			break;
		case V850_COND_ZE:
			rz_strbuf_appendf(&op->esil, "z");
			break;
		case V850_COND_NH:
			rz_strbuf_appendf(&op->esil, "cy,z,|");
			break;
		case V850_COND_N:
			rz_strbuf_appendf(&op->esil, "s");
			break;
		case V850_COND_AL: // Always
			rz_strbuf_appendf(&op->esil, "1");
			break;
		case V850_COND_LT:
			rz_strbuf_appendf(&op->esil, "s,ov,^");
			break;
		case V850_COND_LE:
			rz_strbuf_appendf(&op->esil, "s,ov,^,z,|");
			break;
		case V850_COND_NV:
			rz_strbuf_appendf(&op->esil, "ov,!");
			break;
		case V850_COND_NL:
			rz_strbuf_appendf(&op->esil, "cy,!");
			break;
		case V850_COND_NE:
			rz_strbuf_appendf(&op->esil, "z,!");
			break;
		case V850_COND_H:
			rz_strbuf_appendf(&op->esil, "cy,z,|,!");
			break;
		case V850_COND_P:
			rz_strbuf_appendf(&op->esil, "s,!");
			break;
		case V850_COND_GE:
			rz_strbuf_appendf(&op->esil, "s,ov,^,!");
			break;
		case V850_COND_GT:
			rz_strbuf_appendf(&op->esil, "s,ov,^,z,|,!");
			break;
		}
		rz_strbuf_appendf(&op->esil, ",?{,$$,%d,+,pc,=,}", destaddrs);
		break;
	case V850_BIT_MANIP: {
		ut8 bitop = word1 >> 14;
		switch (bitop) {
		case V850_BIT_CLR1:
			bitmask = (1 << F8_BIT(word1));
			rz_strbuf_appendf(&op->esil, "%hu,%s,+,[1],%u,&,%hu,%s,+,=[1]", word2, F8_RN1(word1), bitmask, word2, F8_RN1(word1));
			// TODO: Read the value of the memory byte and set zero flag accordingly!
			break;
		case V850_BIT_NOT1:
			bitmask = (1 << F8_BIT(word1));
			rz_strbuf_appendf(&op->esil, "%hu,%s,+,[1],%u,^,%hu,%s,+,=[1]", word2, F8_RN1(word1), bitmask, word2, F8_RN1(word1));
			// TODO: Read the value of the memory byte and set zero flag accordingly!
			break;
		}
	} break;
	case V850_EXT1:
		switch (get_subopcode(word1 | (ut32)word2 << 16)) {
		case V850_EXT_SHL:
			op->type = RZ_ANALYSIS_OP_TYPE_SHL;
			rz_strbuf_appendf(&op->esil, "%s,%s,<<=", F9_RN1(word1), F9_RN2(word1));
			update_flags(op, V850_FLAG_CY | V850_FLAG_S | V850_FLAG_Z);
			clear_flags(op, V850_FLAG_OV);
			break;
		case V850_EXT_SHR:
			op->type = RZ_ANALYSIS_OP_TYPE_SHR;
			rz_strbuf_appendf(&op->esil, "%s,%s,>>=", F9_RN1(word1), F9_RN2(word1));
			update_flags(op, V850_FLAG_CY | V850_FLAG_S | V850_FLAG_Z);
			clear_flags(op, V850_FLAG_OV);
			break;
		case V850_EXT_SAR:
			op->type = RZ_ANALYSIS_OP_TYPE_SAR;
			reg1 = F9_RN1(word1);
			reg2 = F9_RN2(word1);
			rz_strbuf_appendf(&op->esil, "31,%s,>>,?{,%s,32,-,%s,1,<<,--,<<,}{,0,},%s,%s,>>,|,%s,=", reg2, reg1, reg1, reg1, reg2, reg2);
			update_flags(op, V850_FLAG_CY | V850_FLAG_S | V850_FLAG_Z);
			clear_flags(op, V850_FLAG_OV);
			break;
		}
		break;
	}

	return ret;
}

static char *get_reg_profile(RzAnalysis *analysis) {
	const char *p =
		"=PC	pc\n"
		"=SP	r3\n"
		"=ZF	z\n"
		"=A0	r1\n"
		"=A1	r5\n"
		"=A2	r6\n"
		"=A3	r7\n"
		"=A4	r8\n"
		"=SF	s\n"
		"=OF	ov\n"
		"=CF	cy\n"

		"gpr	zero	.32	?   0\n"
		"gpr	r0	.32	0   0\n"
		"gpr	r1	.32	4   0\n"
		"gpr	r2	.32	8   0\n"
		"gpr	r3	.32	12  0\n"
		"gpr	sp	.32	12  0\n"
		"gpr	r4	.32	16  0\n"
		"gpr	gp	.32	16  0\n"
		"gpr	r5	.32	20  0\n"
		"gpr	tp	.32	20  0\n"
		"gpr	r6	.32	24  0\n"
		"gpr	r7	.32	28  0\n"
		"gpr	r8	.32	32  0\n"
		"gpr	r9	.32	36  0\n"
		"gpr	r10	.32	40  0\n"
		"gpr	r11	.32	44  0\n"
		"gpr	r12	.32	48  0\n"
		"gpr	r13	.32	52  0\n"
		"gpr	r14	.32	56  0\n"
		"gpr	r15	.32	60  0\n"
		"gpr	r16	.32	64  0\n"
		"gpr	r17	.32	68  0\n"
		"gpr	r18	.32	72  0\n"
		"gpr	r19	.32	76  0\n"
		"gpr	r20	.32	80  0\n"
		"gpr	r21	.32	84  0\n"
		"gpr	r22	.32	88  0\n"
		"gpr	r23	.32	92  0\n"
		"gpr	r24	.32	96  0\n"
		"gpr	r25	.32	100 0\n"
		"gpr	r26	.32	104 0\n"
		"gpr	r27	.32	108 0\n"
		"gpr	r28	.32	112 0\n"
		"gpr	r29	.32	116 0\n"
		"gpr	r30	.32	120 0\n"
		"gpr	ep	.32	120 0\n"
		"gpr	r31	.32	124 0\n"
		"gpr	lp	.32	124 0\n"
		"gpr	pc	.32	128 0\n"

		// 32bit [   RFU   ][NP EP ID SAT CY OV S Z]
		"gpr	psw .32 132 0\n" // program status word
		"gpr	npi  .1 132.16 0\n" // non maskerable interrupt (NMI)
		"gpr	epi  .1 132.17 0\n" // exception processing interrupt
		"gpr	id   .1 132.18 0\n" // :? should be id
		"gpr	sat  .1 132.19 0\n" // saturation detection
		"flg	cy  .1 132.28 0\n" // carry or borrow
		"flg	ov  .1 132.29 0\n" // overflow
		"flg	s   .1 132.30 0\n" // signed result
		"flg	z   .1 132.31 0\n"; // zero result
	return strdup(p);
}

static RzList /*<RzSearchKeyword *>*/ *analysis_preludes(RzAnalysis *analysis) {
#define KW(d, ds, m, ms) rz_list_append(l, rz_search_keyword_new((const ut8 *)d, ds, (const ut8 *)m, ms, NULL))
	RzList *l = rz_list_newf((RzListFree)rz_search_keyword_free);
	KW("\x80\x07", 2, "\xf0\xff", 2);
	KW("\x50\x1a\x63\x0f", 4, "\xf0\xff\xff\x0f", 4);
	return l;
}

static int archinfo(RzAnalysis *a, RzAnalysisInfoType query) {
	switch (query) {
	case RZ_ANALYSIS_ARCHINFO_MIN_OP_SIZE:
		return 2;
	case RZ_ANALYSIS_ARCHINFO_MAX_OP_SIZE:
		return 8;
	case RZ_ANALYSIS_ARCHINFO_TEXT_ALIGN:
		return 2;
	case RZ_ANALYSIS_ARCHINFO_DATA_ALIGN:
		return 0;
	case RZ_ANALYSIS_ARCHINFO_CAN_USE_POINTERS:
		return true;
	default:
		return -1;
	}
}

RzAnalysisPlugin rz_analysis_plugin_v850 = {
	.name = "v850",
	.desc = "V850 code analysis plugin",
	.license = "LGPL3",
	.preludes = analysis_preludes,
	.arch = "v850",
	.bits = 32,
	.op = v850_op,
	.esil = true,
	.archinfo = archinfo,
	.get_reg_profile = get_reg_profile,
};

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