/src/capstonenext/arch/M680X/M680XInstPrinter.c

Source
/* Capstone Disassembly Engine */
/* M680X Backend by Wolfgang Schwotzer <wolfgang.schwotzer@gmx.net> 2017 */

#ifdef CAPSTONE_HAS_M680X
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <capstone/platform.h>

#include "../../cs_priv.h"
#include "../../MCInst.h"
#include "../../SStream.h"
#include "../../MCRegisterInfo.h"
#include "../../Mapping.h"
#include "../../MCInstPrinter.h"
#include "../../utils.h"
#include "M680XInstPrinter.h"
#include "M680XDisassembler.h"
#include "M680XDisassemblerInternals.h"

#ifndef CAPSTONE_DIET
static const char s_reg_names[][10] = {
  "<invalid>", "a", "b", "e", "f", "0", "d", "w", "cc", "dp",   "md",
  "hx",      "h", "x", "y", "s", "u", "v", "q", "pc", "tmp2", "tmp3",
};

static const char s_instruction_names[][6] = {
  "invld", "aba",   "abx",   "aby",   "adc",   "adca",  "adcb",  "adcd",
  "adcr",  "add",   "adda",  "addb",  "addd",  "adde",  "addf",  "addr",
  "addw",  "aim",   "ais",   "aix",   "and",   "anda",  "andb",  "andcc",
  "andd",  "andr",  "asl",   "asla",  "aslb",  "asld",  "asr",   "asra",
  "asrb",  "asrd",  "asrx",  "band",  "bcc",   "bclr",  "bcs",   "beor",
  "beq",   "bge",   "bgnd",  "bgt",   "bhcc",  "bhcs",  "bhi",   "biand",
  "bieor", "bih",   "bil",   "bior",  "bit",   "bita",  "bitb",  "bitd",
  "bitmd", "ble",   "bls",   "blt",   "bmc",   "bmi",   "bms",   "bne",
  "bor",   "bpl",   "brclr", "brset", "bra",   "brn",   "bset",  "bsr",
  "bvc",   "bvs",   "call",  "cba",   "cbeq",  "cbeqa", "cbeqx", "clc",
  "cli",   "clr",   "clra",  "clrb",  "clrd",  "clre",  "clrf",  "clrh",
  "clrw",  "clrx",  "clv",   "cmp",   "cmpa",  "cmpb",  "cmpd",  "cmpe",
  "cmpf",  "cmpr",  "cmps",  "cmpu",  "cmpw",  "cmpx",  "cmpy",  "com",
  "coma",  "comb",  "comd",  "come",  "comf",  "comw",  "comx",  "cpd",
  "cphx",  "cps",   "cpx",   "cpy",   "cwai",  "daa",   "dbeq",  "dbne",
  "dbnz",  "dbnza", "dbnzx", "dec",   "deca",  "decb",  "decd",  "dece",
  "decf",  "decw",  "decx",  "des",   "dex",   "dey",   "div",   "divd",
  "divq",  "ediv",  "edivs", "eim",   "emacs", "emaxd", "emaxm", "emind",
  "eminm", "emul",  "emuls", "eor",   "eora",  "eorb",  "eord",  "eorr",
  "etbl",  "exg",   "fdiv",  "ibeq",  "ibne",  "idiv",  "idivs", "illgl",
  "inc",   "inca",  "incb",  "incd",  "ince",  "incf",  "incw",  "incx",
  "ins",   "inx",   "iny",   "jmp",   "jsr",   "lbcc",  "lbcs",  "lbeq",
  "lbge",  "lbgt",  "lbhi",  "lble",  "lbls",  "lblt",  "lbmi",  "lbne",
  "lbpl",  "lbra",  "lbrn",  "lbsr",  "lbvc",  "lbvs",  "lda",   "ldaa",
  "ldab",  "ldb",   "ldbt",  "ldd",   "lde",   "ldf",   "ldhx",  "ldmd",
  "ldq",   "lds",   "ldu",   "ldw",   "ldx",   "ldy",   "leas",  "leau",
  "leax",  "leay",  "lsl",   "lsla",  "lslb",  "lsld",  "lslx",  "lsr",
  "lsra",  "lsrb",  "lsrd",  "lsrw",  "lsrx",  "maxa",  "maxm",  "mem",
  "mina",  "minm",  "mov",   "movb",  "movw",  "mul",   "muld",  "neg",
  "nega",  "negb",  "negd",  "negx",  "nop",   "nsa",   "oim",   "ora",
  "oraa",  "orab",  "orb",   "orcc",  "ord",   "orr",   "psha",  "pshb",
  "pshc",  "pshd",  "pshh",  "pshs",  "pshsw", "pshu",  "pshuw", "pshx",
  "pshy",  "pula",  "pulb",  "pulc",  "puld",  "pulh",  "puls",  "pulsw",
  "pulu",  "puluw", "pulx",  "puly",  "rev",   "revw",  "rol",   "rola",
  "rolb",  "rold",  "rolw",  "rolx",  "ror",   "rora",  "rorb",  "rord",
  "rorw",  "rorx",  "rsp",   "rtc",   "rti",   "rts",   "sba",   "sbc",
  "sbca",  "sbcb",  "sbcd",  "sbcr",  "sec",   "sei",   "sev",   "sex",
  "sexw",  "slp",   "sta",   "staa",  "stab",  "stb",   "stbt",  "std",
  "ste",   "stf",   "stop",  "sthx",  "stq",   "sts",   "stu",   "stw",
  "stx",   "sty",   "sub",   "suba",  "subb",  "subd",  "sube",  "subf",
  "subr",  "subw",  "swi",   "swi2",  "swi3",  "sync",  "tab",   "tap",
  "tax",   "tba",   "tbeq",  "tbl",   "tbne",  "test",  "tfm",   "tfr",
  "tim",   "tpa",   "tst",   "tsta",  "tstb",  "tstd",  "tste",  "tstf",
  "tstw",  "tstx",  "tsx",   "tsy",   "txa",   "txs",   "tys",   "wai",
  "wait",  "wav",   "wavr",  "xgdx",  "xgdy",
};

static const name_map s_group_names[] = {
  { M680X_GRP_INVALID, "<invalid>" },
  { M680X_GRP_JUMP, "jump" },
  { M680X_GRP_CALL, "call" },
  { M680X_GRP_RET, "return" },
  { M680X_GRP_INT, "interrupt" },
  { M680X_GRP_IRET, "interrupt_return" },
  { M680X_GRP_PRIV, "privileged" },
  { M680X_GRP_BRAREL, "branch_relative" },
};
#endif

static void printRegName(cs_struct *handle, SStream *OS, unsigned int reg)
{
#ifndef CAPSTONE_DIET
  SStream_concat0(OS, handle->reg_name((csh)handle, reg));
#endif
}

static void printInstructionName(cs_struct *handle, SStream *OS,
         unsigned int insn)
{
#ifndef CAPSTONE_DIET
  SStream_concat0(OS, handle->insn_name((csh)handle, insn));
#endif
}

static uint32_t get_unsigned(int32_t value, int byte_size)
{
  switch (byte_size) {
  case 1:
    return (uint32_t)(value & 0xff);

  case 2:
    return (uint32_t)(value & 0xffff);

  default:
  case 4:
    return (uint32_t)value;
  }
}

static void printIncDec(bool isPost, SStream *O, m680x_info *info,
      cs_m680x_op *op)
{
  static const char s_inc_dec[][3] = { "--", "-", "", "+", "++" };

  if (!op->idx.inc_dec)
    return;

  if ((!isPost && !(op->idx.flags & M680X_IDX_POST_INC_DEC)) ||
      (isPost && (op->idx.flags & M680X_IDX_POST_INC_DEC))) {
    const char *prePostfix = "";

    if (info->cpu_type == M680X_CPU_TYPE_CPU12)
      prePostfix = (op->idx.inc_dec < 0) ? "-" : "+";
    else if (op->idx.inc_dec >= -2 && (op->idx.inc_dec <= 2)) {
      prePostfix = (char *)s_inc_dec[op->idx.inc_dec + 2];
    }

    SStream_concat0(O, prePostfix);
  }
}

static void printOperand(MCInst *MI, SStream *O, m680x_info *info,
       cs_m680x_op *op)
{
  switch (op->type) {
  case M680X_OP_REGISTER:
    printRegName(MI->csh, O, op->reg);
    break;

  case M680X_OP_CONSTANT:
    SStream_concat(O, "%u", op->const_val);
    break;

  case M680X_OP_IMMEDIATE:
    if (MI->csh->imm_unsigned)
      SStream_concat(O, "#%u",
               get_unsigned(op->imm, op->size));
    else
      SStream_concat(O, "#%d", op->imm);

    break;

  case M680X_OP_INDEXED:
    if (op->idx.flags & M680X_IDX_INDIRECT)
      SStream_concat0(O, "[");

    if (op->idx.offset_reg != M680X_REG_INVALID)
      printRegName(MI->csh, O, op->idx.offset_reg);
    else if (op->idx.offset_bits > 0) {
      if (op->idx.base_reg == M680X_REG_PC)
        SStream_concat(O, "$%04x", op->idx.offset_addr);
      else
        SStream_concat(O, "%d", op->idx.offset);
    } else if (op->idx.inc_dec != 0 &&
         info->cpu_type == M680X_CPU_TYPE_CPU12)
      SStream_concat(O, "%d", abs(op->idx.inc_dec));

    if (!(op->idx.flags & M680X_IDX_NO_COMMA))
      SStream_concat(O, ", ");

    printIncDec(false, O, info, op);

    printRegName(MI->csh, O, op->idx.base_reg);

    if (op->idx.base_reg == M680X_REG_PC &&
        (op->idx.offset_bits > 0))
      SStream_concat(O, "r");

    printIncDec(true, O, info, op);

    if (op->idx.flags & M680X_IDX_INDIRECT)
      SStream_concat(O, "]");

    break;

  case M680X_OP_RELATIVE:
    SStream_concat(O, "$%04x", op->rel.address);
    break;

  case M680X_OP_DIRECT:
    SStream_concat(O, "$%02x", op->direct_addr);
    break;

  case M680X_OP_EXTENDED:
    if (op->ext.indirect)
      SStream_concat(O, "[$%04x]", op->ext.address);
    else {
      if (op->ext.address < 256) {
        SStream_concat(O, ">$%04x", op->ext.address);
      } else {
        SStream_concat(O, "$%04x", op->ext.address);
      }
    }

    break;

  default:
    SStream_concat0(O, "<invalid_operand>");
    break;
  }
}

static const char *getDelimiter(m680x_info *info, cs_m680x *m680x)
{
  bool indexed = false;
  int count = 0;
  int i;

  if (info->insn == M680X_INS_TFM)
    return ", ";

  if (m680x->op_count > 1) {
    for (i = 0; i < m680x->op_count; ++i) {
      if (m680x->operands[i].type == M680X_OP_INDEXED)
        indexed = true;

      if (m680x->operands[i].type != M680X_OP_REGISTER)
        count++;
    }
  }

  return (indexed && (count >= 1)) ? "; " : ", ";
};

void M680X_printInst(MCInst *MI, SStream *O, void *PrinterInfo)
{
  m680x_info *info = (m680x_info *)PrinterInfo;
  cs_m680x *m680x = &info->m680x;
  cs_detail *detail = MI->flat_insn->detail;
  int suppress_operands = 0;
  const char *delimiter = getDelimiter(info, m680x);
  int i;

  if (detail != NULL)
    memcpy(&detail->m680x, m680x, sizeof(cs_m680x));

  if (info->insn == M680X_INS_INVLD || info->insn == M680X_INS_ILLGL) {
    if (m680x->op_count)
      SStream_concat(O, "fcb $%02x", m680x->operands[0].imm);
    else
      SStream_concat0(O, "fcb $<unknown>");

    return;
  }

  printInstructionName(MI->csh, O, info->insn);
  SStream_concat0(O, " ");

  if ((m680x->flags & M680X_FIRST_OP_IN_MNEM) != 0)
    suppress_operands++;

  if ((m680x->flags & M680X_SECOND_OP_IN_MNEM) != 0)
    suppress_operands++;

  for (i = 0; i < m680x->op_count; ++i) {
    if (i >= suppress_operands) {
      printOperand(MI, O, info, &m680x->operands[i]);

      if ((i + 1) != m680x->op_count)
        SStream_concat0(O, delimiter);
    }
  }
}

const char *M680X_reg_name(csh handle, unsigned int reg)
{
#ifndef CAPSTONE_DIET

  if (reg >= ARR_SIZE(s_reg_names))
    return NULL;

  return s_reg_names[(int)reg];
#else
  return NULL;
#endif
}

const char *M680X_insn_name(csh handle, unsigned int id)
{
#ifndef CAPSTONE_DIET

  if (id >= ARR_SIZE(s_instruction_names))
    return NULL;
  else
    return s_instruction_names[(int)id];

#else
  return NULL;
#endif
}

const char *M680X_group_name(csh handle, unsigned int id)
{
#ifndef CAPSTONE_DIET
  return id2name(s_group_names, ARR_SIZE(s_group_names), id);
#else
  return NULL;
#endif
}

cs_err M680X_instprinter_init(cs_struct *ud)
{
#ifndef CAPSTONE_DIET

  if (M680X_REG_ENDING != ARR_SIZE(s_reg_names)) {
    CS_ASSERT(M680X_REG_ENDING == ARR_SIZE(s_reg_names));
    return CS_ERR_MODE;
  }

  if (M680X_INS_ENDING != ARR_SIZE(s_instruction_names)) {
    CS_ASSERT(M680X_INS_ENDING == ARR_SIZE(s_instruction_names));
    return CS_ERR_MODE;
  }

  if (M680X_GRP_ENDING != ARR_SIZE(s_group_names)) {
    CS_ASSERT(M680X_GRP_ENDING == ARR_SIZE(s_group_names));
    return CS_ERR_MODE;
  }

#endif

  return CS_ERR_OK;
}

#endif

Coverage Report

Created: 2025-10-28 07:02

Line	Count	Source
1		/* Capstone Disassembly Engine */
2		/* M680X Backend by Wolfgang Schwotzer <wolfgang.schwotzer@gmx.net> 2017 */
3
4		#ifdef CAPSTONE_HAS_M680X
5		#include <stdio.h>
6		#include <stdlib.h>
7		#include <string.h>
8		#include <capstone/platform.h>
9
10		#include "../../cs_priv.h"
11		#include "../../MCInst.h"
12		#include "../../SStream.h"
13		#include "../../MCRegisterInfo.h"
14		#include "../../Mapping.h"
15		#include "../../MCInstPrinter.h"
16		#include "../../utils.h"
17		#include "M680XInstPrinter.h"
18		#include "M680XDisassembler.h"
19		#include "M680XDisassemblerInternals.h"
20
21		#ifndef CAPSTONE_DIET
22		static const char s_reg_names[][10] = {
23		"<invalid>", "a", "b", "e", "f", "0", "d", "w", "cc", "dp", "md",
24		"hx", "h", "x", "y", "s", "u", "v", "q", "pc", "tmp2", "tmp3",
25		};
26
27		static const char s_instruction_names[][6] = {
28		"invld", "aba", "abx", "aby", "adc", "adca", "adcb", "adcd",
29		"adcr", "add", "adda", "addb", "addd", "adde", "addf", "addr",
30		"addw", "aim", "ais", "aix", "and", "anda", "andb", "andcc",
31		"andd", "andr", "asl", "asla", "aslb", "asld", "asr", "asra",
32		"asrb", "asrd", "asrx", "band", "bcc", "bclr", "bcs", "beor",
33		"beq", "bge", "bgnd", "bgt", "bhcc", "bhcs", "bhi", "biand",
34		"bieor", "bih", "bil", "bior", "bit", "bita", "bitb", "bitd",
35		"bitmd", "ble", "bls", "blt", "bmc", "bmi", "bms", "bne",
36		"bor", "bpl", "brclr", "brset", "bra", "brn", "bset", "bsr",
37		"bvc", "bvs", "call", "cba", "cbeq", "cbeqa", "cbeqx", "clc",
38		"cli", "clr", "clra", "clrb", "clrd", "clre", "clrf", "clrh",
39		"clrw", "clrx", "clv", "cmp", "cmpa", "cmpb", "cmpd", "cmpe",
40		"cmpf", "cmpr", "cmps", "cmpu", "cmpw", "cmpx", "cmpy", "com",
41		"coma", "comb", "comd", "come", "comf", "comw", "comx", "cpd",
42		"cphx", "cps", "cpx", "cpy", "cwai", "daa", "dbeq", "dbne",
43		"dbnz", "dbnza", "dbnzx", "dec", "deca", "decb", "decd", "dece",
44		"decf", "decw", "decx", "des", "dex", "dey", "div", "divd",
45		"divq", "ediv", "edivs", "eim", "emacs", "emaxd", "emaxm", "emind",
46		"eminm", "emul", "emuls", "eor", "eora", "eorb", "eord", "eorr",
47		"etbl", "exg", "fdiv", "ibeq", "ibne", "idiv", "idivs", "illgl",
48		"inc", "inca", "incb", "incd", "ince", "incf", "incw", "incx",
49		"ins", "inx", "iny", "jmp", "jsr", "lbcc", "lbcs", "lbeq",
50		"lbge", "lbgt", "lbhi", "lble", "lbls", "lblt", "lbmi", "lbne",
51		"lbpl", "lbra", "lbrn", "lbsr", "lbvc", "lbvs", "lda", "ldaa",
52		"ldab", "ldb", "ldbt", "ldd", "lde", "ldf", "ldhx", "ldmd",
53		"ldq", "lds", "ldu", "ldw", "ldx", "ldy", "leas", "leau",
54		"leax", "leay", "lsl", "lsla", "lslb", "lsld", "lslx", "lsr",
55		"lsra", "lsrb", "lsrd", "lsrw", "lsrx", "maxa", "maxm", "mem",
56		"mina", "minm", "mov", "movb", "movw", "mul", "muld", "neg",
57		"nega", "negb", "negd", "negx", "nop", "nsa", "oim", "ora",
58		"oraa", "orab", "orb", "orcc", "ord", "orr", "psha", "pshb",
59		"pshc", "pshd", "pshh", "pshs", "pshsw", "pshu", "pshuw", "pshx",
60		"pshy", "pula", "pulb", "pulc", "puld", "pulh", "puls", "pulsw",
61		"pulu", "puluw", "pulx", "puly", "rev", "revw", "rol", "rola",
62		"rolb", "rold", "rolw", "rolx", "ror", "rora", "rorb", "rord",
63		"rorw", "rorx", "rsp", "rtc", "rti", "rts", "sba", "sbc",
64		"sbca", "sbcb", "sbcd", "sbcr", "sec", "sei", "sev", "sex",
65		"sexw", "slp", "sta", "staa", "stab", "stb", "stbt", "std",
66		"ste", "stf", "stop", "sthx", "stq", "sts", "stu", "stw",
67		"stx", "sty", "sub", "suba", "subb", "subd", "sube", "subf",
68		"subr", "subw", "swi", "swi2", "swi3", "sync", "tab", "tap",
69		"tax", "tba", "tbeq", "tbl", "tbne", "test", "tfm", "tfr",
70		"tim", "tpa", "tst", "tsta", "tstb", "tstd", "tste", "tstf",
71		"tstw", "tstx", "tsx", "tsy", "txa", "txs", "tys", "wai",
72		"wait", "wav", "wavr", "xgdx", "xgdy",
73		};
74
75		static const name_map s_group_names[] = {
76		{ M680X_GRP_INVALID, "<invalid>" },
77		{ M680X_GRP_JUMP, "jump" },
78		{ M680X_GRP_CALL, "call" },
79		{ M680X_GRP_RET, "return" },
80		{ M680X_GRP_INT, "interrupt" },
81		{ M680X_GRP_IRET, "interrupt_return" },
82		{ M680X_GRP_PRIV, "privileged" },
83		{ M680X_GRP_BRAREL, "branch_relative" },
84		};
85		#endif
86
87		static void printRegName(cs_struct handle, SStream OS, unsigned int reg)
88	156k	{
89	156k	#ifndef CAPSTONE_DIET
90	156k	SStream_concat0(OS, handle->reg_name((csh)handle, reg));
91	156k	#endif
92	156k	}
93
94		static void printInstructionName(cs_struct handle, SStream OS,
95		unsigned int insn)
96	428k	{
97	428k	#ifndef CAPSTONE_DIET
98	428k	SStream_concat0(OS, handle->insn_name((csh)handle, insn));
99	428k	#endif
100	428k	}
101
102		static uint32_t get_unsigned(int32_t value, int byte_size)
103	0	{
104	0	switch (byte_size) {
105	0	case 1:
106	0	return (uint32_t)(value & 0xff);
107
108	0	case 2:
109	0	return (uint32_t)(value & 0xffff);
110
111	0	default:
112	0	case 4:
113	0	return (uint32_t)value;
114	0	}
115	0	}
116
117		static void printIncDec(bool isPost, SStream O, m680x_info info,
118		cs_m680x_op *op)
119	225k	{
120	225k	static const char s_inc_dec[][3] = { "--", "-", "", "+", "++" };
121
122	225k	if (!op->idx.inc_dec)
123	173k	return;
124
125	52.0k	if ((!isPost && !(op->idx.flags & M680X_IDX_POST_INC_DEC)) \|\|
126	37.6k	(isPost && (op->idx.flags & M680X_IDX_POST_INC_DEC))) {
127	26.0k	const char *prePostfix = "";
128
129	26.0k	if (info->cpu_type == M680X_CPU_TYPE_CPU12)
130	15.4k	prePostfix = (op->idx.inc_dec < 0) ? "-" : "+";
131	10.5k	else if (op->idx.inc_dec >= -2 && (op->idx.inc_dec <= 2)) {
132	10.5k	prePostfix = (char *)s_inc_dec[op->idx.inc_dec + 2];
133	10.5k	}
134
135	26.0k	SStream_concat0(O, prePostfix);
136	26.0k	}
137	52.0k	}
138
139		static void printOperand(MCInst MI, SStream O, m680x_info *info,
140		cs_m680x_op *op)
141	360k	{
142	360k	switch (op->type) {
143	34.8k	case M680X_OP_REGISTER:
144	34.8k	printRegName(MI->csh, O, op->reg);
145	34.8k	break;
146
147	8.03k	case M680X_OP_CONSTANT:
148	8.03k	SStream_concat(O, "%u", op->const_val);
149	8.03k	break;
150
151	44.2k	case M680X_OP_IMMEDIATE:
152	44.2k	if (MI->csh->imm_unsigned)
153	0	SStream_concat(O, "#%u",
154	0	get_unsigned(op->imm, op->size));
155	44.2k	else
156	44.2k	SStream_concat(O, "#%d", op->imm);
157
158	44.2k	break;
159
160	112k	case M680X_OP_INDEXED:
161	112k	if (op->idx.flags & M680X_IDX_INDIRECT)
162	12.3k	SStream_concat0(O, "[");
163
164	112k	if (op->idx.offset_reg != M680X_REG_INVALID)
165	8.51k	printRegName(MI->csh, O, op->idx.offset_reg);
166	104k	else if (op->idx.offset_bits > 0) {
167	69.7k	if (op->idx.base_reg == M680X_REG_PC)
168	10.3k	SStream_concat(O, "$%04x", op->idx.offset_addr);
169	59.4k	else
170	59.4k	SStream_concat(O, "%d", op->idx.offset);
171	69.7k	} else if (op->idx.inc_dec != 0 &&
172	25.0k	info->cpu_type == M680X_CPU_TYPE_CPU12)
173	15.4k	SStream_concat(O, "%d", abs(op->idx.inc_dec));
174
175	112k	if (!(op->idx.flags & M680X_IDX_NO_COMMA))
176	108k	SStream_concat(O, ", ");
177
178	112k	printIncDec(false, O, info, op);
179
180	112k	printRegName(MI->csh, O, op->idx.base_reg);
181
182	112k	if (op->idx.base_reg == M680X_REG_PC &&
183	11.7k	(op->idx.offset_bits > 0))
184	10.3k	SStream_concat(O, "r");
185
186	112k	printIncDec(true, O, info, op);
187
188	112k	if (op->idx.flags & M680X_IDX_INDIRECT)
189	12.3k	SStream_concat(O, "]");
190
191	112k	break;
192
193	38.4k	case M680X_OP_RELATIVE:
194	38.4k	SStream_concat(O, "$%04x", op->rel.address);
195	38.4k	break;
196
197	64.5k	case M680X_OP_DIRECT:
198	64.5k	SStream_concat(O, "$%02x", op->direct_addr);
199	64.5k	break;
200
201	58.0k	case M680X_OP_EXTENDED:
202	58.0k	if (op->ext.indirect)
203	507	SStream_concat(O, "[$%04x]", op->ext.address);
204	57.5k	else {
205	57.5k	if (op->ext.address < 256) {
206	3.07k	SStream_concat(O, ">$%04x", op->ext.address);
207	54.4k	} else {
208	54.4k	SStream_concat(O, "$%04x", op->ext.address);
209	54.4k	}
210	57.5k	}
211
212	58.0k	break;
213
214	0	default:
215	0	SStream_concat0(O, "<invalid_operand>");
216	0	break;
217	360k	}
218	360k	}
219
220		static const char getDelimiter(m680x_info info, cs_m680x *m680x)
221	474k	{
222	474k	bool indexed = false;
223	474k	int count = 0;
224	474k	int i;
225
226	474k	if (info->insn == M680X_INS_TFM)
227	1.48k	return ", ";
228
229	472k	if (m680x->op_count > 1) {
230	643k	for (i = 0; i < m680x->op_count; ++i) {
231	437k	if (m680x->operands[i].type == M680X_OP_INDEXED)
232	81.0k	indexed = true;
233
234	437k	if (m680x->operands[i].type != M680X_OP_REGISTER)
235	227k	count++;
236	437k	}
237	205k	}
238
239	472k	return (indexed && (count >= 1)) ? "; " : ", ";
240	474k	};
241
242		void M680X_printInst(MCInst MI, SStream O, void *PrinterInfo)
243	474k	{
244	474k	m680x_info info = (m680x_info )PrinterInfo;
245	474k	cs_m680x *m680x = &info->m680x;
246	474k	cs_detail *detail = MI->flat_insn->detail;
247	474k	int suppress_operands = 0;
248	474k	const char *delimiter = getDelimiter(info, m680x);
249	474k	int i;
250
251	474k	if (detail != NULL)
252	474k	memcpy(&detail->m680x, m680x, sizeof(cs_m680x));
253
254	474k	if (info->insn == M680X_INS_INVLD \|\| info->insn == M680X_INS_ILLGL) {
255	46.1k	if (m680x->op_count)
256	46.1k	SStream_concat(O, "fcb $%02x", m680x->operands[0].imm);
257	0	else
258	0	SStream_concat0(O, "fcb $<unknown>");
259
260	46.1k	return;
261	46.1k	}
262
263	428k	printInstructionName(MI->csh, O, info->insn);
264	428k	SStream_concat0(O, " ");
265
266	428k	if ((m680x->flags & M680X_FIRST_OP_IN_MNEM) != 0)
267	227k	suppress_operands++;
268
269	428k	if ((m680x->flags & M680X_SECOND_OP_IN_MNEM) != 0)
270	5.50k	suppress_operands++;
271
272	1.02M	for (i = 0; i < m680x->op_count; ++i) {
273	593k	if (i >= suppress_operands) {
274	360k	printOperand(MI, O, info, &m680x->operands[i]);
275
276	360k	if ((i + 1) != m680x->op_count)
277	64.0k	SStream_concat0(O, delimiter);
278	360k	}
279	593k	}
280	428k	}
281
282		const char *M680X_reg_name(csh handle, unsigned int reg)
283	1.43M	{
284	1.43M	#ifndef CAPSTONE_DIET
285
286	1.43M	if (reg >= ARR_SIZE(s_reg_names))
287	0	return NULL;
288
289	1.43M	return s_reg_names[(int)reg];
290		#else
291		return NULL;
292		#endif
293	1.43M	}
294
295		const char *M680X_insn_name(csh handle, unsigned int id)
296	902k	{
297	902k	#ifndef CAPSTONE_DIET
298
299	902k	if (id >= ARR_SIZE(s_instruction_names))
300	0	return NULL;
301	902k	else
302	902k	return s_instruction_names[(int)id];
303
304		#else
305		return NULL;
306		#endif
307	902k	}
308
309		const char *M680X_group_name(csh handle, unsigned int id)
310	106k	{
311	106k	#ifndef CAPSTONE_DIET
312	106k	return id2name(s_group_names, ARR_SIZE(s_group_names), id);
313		#else
314		return NULL;
315		#endif
316	106k	}
317
318		cs_err M680X_instprinter_init(cs_struct *ud)
319	4.28k	{
320	4.28k	#ifndef CAPSTONE_DIET
321
322	4.28k	if (M680X_REG_ENDING != ARR_SIZE(s_reg_names)) {
323	0	CS_ASSERT(M680X_REG_ENDING == ARR_SIZE(s_reg_names));
324	0	return CS_ERR_MODE;
325	0	}
326
327	4.28k	if (M680X_INS_ENDING != ARR_SIZE(s_instruction_names)) {
328	0	CS_ASSERT(M680X_INS_ENDING == ARR_SIZE(s_instruction_names));
329	0	return CS_ERR_MODE;
330	0	}
331
332	4.28k	if (M680X_GRP_ENDING != ARR_SIZE(s_group_names)) {
333	0	CS_ASSERT(M680X_GRP_ENDING == ARR_SIZE(s_group_names));
334	0	return CS_ERR_MODE;
335	0	}
336
337	4.28k	#endif
338
339	4.28k	return CS_ERR_OK;
340	4.28k	}
341
342		#endif