/* Instruction opcode table for ip2k. THIS FILE IS MACHINE GENERATED WITH CGEN. Copyright (C) 1996-2014 Free Software Foundation, Inc. This file is part of the GNU Binutils and/or GDB, the GNU debugger. This file is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3, or (at your option) any later version. It is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */ #include "sysdep.h" #include "ansidecl.h" #include "bfd.h" #include "symcat.h" #include "ip2k-desc.h" #include "ip2k-opc.h" #include "libiberty.h" /* -- opc.c */ #include "safe-ctype.h" /* A better hash function for instruction mnemonics. */ unsigned int ip2k_asm_hash (const char* insn) { unsigned int hash; const char* m = insn; for (hash = 0; *m && ! ISSPACE (*m); m++) hash = (hash * 23) ^ (0x1F & TOLOWER (*m)); /* printf ("%s %d\n", insn, (hash % CGEN_ASM_HASH_SIZE)); */ return hash % CGEN_ASM_HASH_SIZE; } /* Special check to ensure that instruction exists for given machine. */ int ip2k_cgen_insn_supported (CGEN_CPU_DESC cd, const CGEN_INSN *insn) { int machs = CGEN_INSN_ATTR_VALUE (insn, CGEN_INSN_MACH); /* No mach attribute? Assume it's supported for all machs. */ if (machs == 0) return 1; return (machs & cd->machs) != 0; } /* -- asm.c */ /* The hash functions are recorded here to help keep assembler code out of the disassembler and vice versa. */ static int asm_hash_insn_p (const CGEN_INSN *); static unsigned int asm_hash_insn (const char *); static int dis_hash_insn_p (const CGEN_INSN *); static unsigned int dis_hash_insn (const char *, CGEN_INSN_INT); /* Instruction formats. */ #define F(f) & ip2k_cgen_ifld_table[IP2K_##f] static const CGEN_IFMT ifmt_empty ATTRIBUTE_UNUSED = { 0, 0, 0x0, { { 0 } } }; static const CGEN_IFMT ifmt_jmp ATTRIBUTE_UNUSED = { 16, 16, 0xe000, { { F (F_OP3) }, { F (F_ADDR16CJP) }, { 0 } } }; static const CGEN_IFMT ifmt_sb ATTRIBUTE_UNUSED = { 16, 16, 0xf000, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } } }; static const CGEN_IFMT ifmt_xorw_l ATTRIBUTE_UNUSED = { 16, 16, 0xff00, { { F (F_OP4) }, { F (F_OP4MID) }, { F (F_IMM8) }, { 0 } } }; static const CGEN_IFMT ifmt_loadl_a ATTRIBUTE_UNUSED = { 16, 16, 0xff00, { { F (F_OP4) }, { F (F_OP4MID) }, { F (F_IMM8) }, { 0 } } }; static const CGEN_IFMT ifmt_loadh_a ATTRIBUTE_UNUSED = { 16, 16, 0xff00, { { F (F_OP4) }, { F (F_OP4MID) }, { F (F_IMM8) }, { 0 } } }; static const CGEN_IFMT ifmt_addcfr_w ATTRIBUTE_UNUSED = { 16, 16, 0xfe00, { { F (F_OP6) }, { F (F_DIR) }, { F (F_REG) }, { 0 } } }; static const CGEN_IFMT ifmt_speed ATTRIBUTE_UNUSED = { 16, 16, 0xff00, { { F (F_OP8) }, { F (F_IMM8) }, { 0 } } }; static const CGEN_IFMT ifmt_ireadi ATTRIBUTE_UNUSED = { 16, 16, 0xffff, { { F (F_OP6) }, { F (F_OP6_10LOW) }, { 0 } } }; static const CGEN_IFMT ifmt_page ATTRIBUTE_UNUSED = { 16, 16, 0xfff8, { { F (F_OP6) }, { F (F_OP6_7LOW) }, { F (F_PAGE3) }, { 0 } } }; static const CGEN_IFMT ifmt_reti ATTRIBUTE_UNUSED = { 16, 16, 0xfff8, { { F (F_OP6) }, { F (F_OP6_7LOW) }, { F (F_RETI3) }, { 0 } } }; #undef F #define A(a) (1 << CGEN_INSN_##a) #define OPERAND(op) IP2K_OPERAND_##op #define MNEM CGEN_SYNTAX_MNEMONIC /* syntax value for mnemonic */ #define OP(field) CGEN_SYNTAX_MAKE_FIELD (OPERAND (field)) /* The instruction table. */ static const CGEN_OPCODE ip2k_cgen_insn_opcode_table[MAX_INSNS] = { /* Special null first entry. A `num' value of zero is thus invalid. Also, the special `invalid' insn resides here. */ { { 0, 0, 0, 0 }, {{0}}, 0, {0}}, /* jmp $addr16cjp */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (ADDR16CJP), 0 } }, & ifmt_jmp, { 0xe000 } }, /* call $addr16cjp */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (ADDR16CJP), 0 } }, & ifmt_jmp, { 0xc000 } }, /* sb $fr,$bitno */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', OP (BITNO), 0 } }, & ifmt_sb, { 0xb000 } }, /* snb $fr,$bitno */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', OP (BITNO), 0 } }, & ifmt_sb, { 0xa000 } }, /* setb $fr,$bitno */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', OP (BITNO), 0 } }, & ifmt_sb, { 0x9000 } }, /* clrb $fr,$bitno */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', OP (BITNO), 0 } }, & ifmt_sb, { 0x8000 } }, /* xor W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7f00 } }, /* and W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7e00 } }, /* or W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7d00 } }, /* add W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7b00 } }, /* sub W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7a00 } }, /* cmp W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7900 } }, /* retw #$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7800 } }, /* cse W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7700 } }, /* csne W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7600 } }, /* push #$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7400 } }, /* muls W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7300 } }, /* mulu W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7200 } }, /* loadl #$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7100 } }, /* loadh #$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7000 } }, /* loadl $addr16l */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (ADDR16L), 0 } }, & ifmt_loadl_a, { 0x7100 } }, /* loadh $addr16h */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (ADDR16H), 0 } }, & ifmt_loadh_a, { 0x7000 } }, /* addc $fr,W */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', 'W', 0 } }, & ifmt_addcfr_w, { 0x5e00 } }, /* addc W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x5c00 } }, /* incsnz $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x5a00 } }, /* incsnz W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x5800 } }, /* muls W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x5400 } }, /* mulu W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x5000 } }, /* decsnz $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x4e00 } }, /* decsnz W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x4c00 } }, /* subc W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x4800 } }, /* subc $fr,W */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', 'W', 0 } }, & ifmt_addcfr_w, { 0x4a00 } }, /* pop $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x4600 } }, /* push $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x4400 } }, /* cse W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x4200 } }, /* csne W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x4000 } }, /* incsz $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x3e00 } }, /* incsz W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x3c00 } }, /* swap $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x3a00 } }, /* swap W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x3800 } }, /* rl $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x3600 } }, /* rl W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x3400 } }, /* rr $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x3200 } }, /* rr W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x3000 } }, /* decsz $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x2e00 } }, /* decsz W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x2c00 } }, /* inc $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x2a00 } }, /* inc W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x2800 } }, /* not $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x2600 } }, /* not W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x2400 } }, /* test $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x2200 } }, /* mov W,#$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', '#', OP (LIT8), 0 } }, & ifmt_xorw_l, { 0x7c00 } }, /* mov $fr,W */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', 'W', 0 } }, & ifmt_addcfr_w, { 0x200 } }, /* mov W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x2000 } }, /* add $fr,W */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', 'W', 0 } }, & ifmt_addcfr_w, { 0x1e00 } }, /* add W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x1c00 } }, /* xor $fr,W */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', 'W', 0 } }, & ifmt_addcfr_w, { 0x1a00 } }, /* xor W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x1800 } }, /* and $fr,W */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', 'W', 0 } }, & ifmt_addcfr_w, { 0x1600 } }, /* and W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x1400 } }, /* or $fr,W */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', 'W', 0 } }, & ifmt_addcfr_w, { 0x1200 } }, /* or W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x1000 } }, /* dec $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0xe00 } }, /* dec W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0xc00 } }, /* sub $fr,W */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), ',', 'W', 0 } }, & ifmt_addcfr_w, { 0xa00 } }, /* sub W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x800 } }, /* clr $fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x600 } }, /* cmp W,$fr */ { { 0, 0, 0, 0 }, { { MNEM, ' ', 'W', ',', OP (FR), 0 } }, & ifmt_addcfr_w, { 0x400 } }, /* speed #$lit8 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', '#', OP (LIT8), 0 } }, & ifmt_speed, { 0x100 } }, /* ireadi */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x1d } }, /* iwritei */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x1c } }, /* fread */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x1b } }, /* fwrite */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x1a } }, /* iread */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x19 } }, /* iwrite */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x18 } }, /* page $addr16p */ { { 0, 0, 0, 0 }, { { MNEM, ' ', OP (ADDR16P), 0 } }, & ifmt_page, { 0x10 } }, /* system */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0xff } }, /* reti #$reti3 */ { { 0, 0, 0, 0 }, { { MNEM, ' ', '#', OP (RETI3), 0 } }, & ifmt_reti, { 0x8 } }, /* ret */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x7 } }, /* int */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x6 } }, /* breakx */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x5 } }, /* cwdt */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x4 } }, /* ferase */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x3 } }, /* retnp */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x2 } }, /* break */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x1 } }, /* nop */ { { 0, 0, 0, 0 }, { { MNEM, 0 } }, & ifmt_ireadi, { 0x0 } }, }; #undef A #undef OPERAND #undef MNEM #undef OP /* Formats for ALIAS macro-insns. */ #define F(f) & ip2k_cgen_ifld_table[IP2K_##f] static const CGEN_IFMT ifmt_sc ATTRIBUTE_UNUSED = { 16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } } }; static const CGEN_IFMT ifmt_snc ATTRIBUTE_UNUSED = { 16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } } }; static const CGEN_IFMT ifmt_sz ATTRIBUTE_UNUSED = { 16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } } }; static const CGEN_IFMT ifmt_snz ATTRIBUTE_UNUSED = { 16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } } }; static const CGEN_IFMT ifmt_skip ATTRIBUTE_UNUSED = { 16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } } }; static const CGEN_IFMT ifmt_skipb ATTRIBUTE_UNUSED = { 16, 16, 0xffff, { { F (F_OP4) }, { F (F_BITNO) }, { F (F_REG) }, { 0 } } }; #undef F /* Each non-simple macro entry points to an array of expansion possibilities. */ #define A(a) (1 << CGEN_INSN_##a) #define OPERAND(op) IP2K_OPERAND_##op #define MNEM CGEN_SYNTAX_MNEMONIC /* syntax value for mnemonic */ #define OP(field) CGEN_SYNTAX_MAKE_FIELD (OPERAND (field)) /* The macro instruction table. */ static const CGEN_IBASE ip2k_cgen_macro_insn_table[] = { /* sc */ { -1, "sc", "sc", 16, { 0|A(ALIAS), { { { (1<= 1) memset (insns, 0, num_macros * sizeof (CGEN_INSN)); for (i = 0; i < num_macros; ++i) { insns[i].base = &ib[i]; insns[i].opcode = &oc[i]; ip2k_cgen_build_insn_regex (& insns[i]); } cd->macro_insn_table.init_entries = insns; cd->macro_insn_table.entry_size = sizeof (CGEN_IBASE); cd->macro_insn_table.num_init_entries = num_macros; oc = & ip2k_cgen_insn_opcode_table[0]; insns = (CGEN_INSN *) cd->insn_table.init_entries; for (i = 0; i < MAX_INSNS; ++i) { insns[i].opcode = &oc[i]; ip2k_cgen_build_insn_regex (& insns[i]); } cd->sizeof_fields = sizeof (CGEN_FIELDS); cd->set_fields_bitsize = set_fields_bitsize; cd->asm_hash_p = asm_hash_insn_p; cd->asm_hash = asm_hash_insn; cd->asm_hash_size = CGEN_ASM_HASH_SIZE; cd->dis_hash_p = dis_hash_insn_p; cd->dis_hash = dis_hash_insn; cd->dis_hash_size = CGEN_DIS_HASH_SIZE; }