NetBSD/external/gpl3/gdb/dist/opcodes/ip2k-opc.c
christos 4559860ef2 May 11th, 2019: GDB 8.3 Released!
The latest version of GDB, version 8.3, is available for
          download.

          This version of GDB includes the following changes and
          enhancements:

          + Support for new native configurations (also available as a
            target configuration):
               o RISC-V GNU/Linux (riscv*-*-linux*)
               o RISC-V FreeBSD (riscv*-*-freebsd*)
          + Support for new target configurations:
               o CSKY ELF (csky*-*-elf)
               o CSKY GNU/Linux (csky*-*-linux)
               o NXP S12Z ELF (s12z-*-elf)
               o OpenRISC GNU/Linux (or1k*-*-linux*)
          + Native Windows debugging is only supported on Windows XP or
            later.
          + The Python API in GDB now requires Python 2.6 or later.
          + GDB now supports terminal styling for the CLI and TUI. Source
            highlighting is also supported by building GDB with GNU
            Highlight.
          + Experimental support for compilation and injection of C++
            source code into the inferior (requires GCC 7.1 or higher,
            built with libcp1.so).
          + GDB and GDBserver now support IPv6 connections.
          + Target description support on RISC-V targets.
          + Various enhancements to several commands:
               o "frame", "select-frame" and "info frame" commands
               o "info functions", "info types", "info variables"
               o "info thread"
               o "info proc"
               o System call alias catchpoint support on FreeBSD
               o "target remote" support for Unix Domain sockets.
          + Support for displaying all files opened by a process

         + DWARF index cache: GDB can now automatically save indices of
            DWARF symbols on disk to speed up further loading of the same
            binaries.
          + Various GDB/MI enhancements.
          + GDBserver on PowerPC GNU/Linux now supports access to the PPR,
            DSCR, TAR, EBB/PMU, and HTM registers.
          + Ada task switching support when debugging programs built with
            the Ravenscar profile added to aarch64-elf.
          + GDB in batch mode now exits with status 1 if the last executed
            command failed.
          + Support for building GDB with GCC's Undefined Behavior
            Sanitizer.

          See the NEWS file for a more complete and detailed list of what
          this release includes.

   February 27th, 2019: GDB 8.3 branch created
          The GDB 8.3 branch (gdb-8.3-branch) has been created. To check
          out a copy of the branch use:

git clone --branch gdb-8.3-branch ssh://sourceware.org/git/binutils-gdb.git

   December 23rd, 2018: GDB 8.2.1 Released!
          The latest version of GDB, version 8.2.1, is available for
          download.

          This is a minor corrective release over GDB 8.2, fixing the
          following issues:

          + PR build/23516 (gdb build error under msys+mingw: strip can't
            handle gdb-add-index.exe)
          + PR build/23623 (install-strip fails)
          + PR rust/23626 (gdb crashes in upstream rust nil-enum test)
          + PR rust/23650 (rust field name access error mentions "foo")
          + PR gdb/23663 (gdb 8.1.1: undefined rpl_stat function with musl
            toolchains)
          + PR python/23669 (gdb.execute("show commands") doesn't work)
          + PR python/23714 (Command repetition stops working after
            gdb.execute)
          + PR gdb/23838 (8.2 regression for invalid -data-directory)
          + PR gdb/23974 ("info os" crash when specifying invalid object)
          + PR gdb/23999 (SYMBOL_LANGUAGE assertion failure on AIX)
          + PR gdb/24003 (Error when binary searching CUs for a specific
            DIE when using DWZ)

   September 5th, 2018: GDB 8.2 Released!
          The latest version of GDB, version 8.2, is available for
          download.

          This version of GDB includes the following changes and
          enhancements:

          + Support for the following target has been added:
               o RiscV ELF (riscv*-*-elf)
          + Support for following targets and native configurations has
            been removed:
               o m88k running OpenBSD (m88*-*-openbsd*)
               o SH-5/SH64 ELF (sh64-*-elf*)
               o SH-5/SH64 (sh*)
               o SH-5/SH64 running GNU/Linux (sh*-*-linux*)
               o SH-5/SH64 running OpenBSD (sh*-*-openbsd*)
          + Various Python API enhancements
          + Aarch64/Linux enhancements:
               o SVE support.
               o Hardware watchpoints improvements for entities stored at
                 unaligned addresses.
                    # New "c" response to disable the pager for the rest
                      of the current command.
                    # C expressions can now use _Alignof, and C++
                      expressions can now use alignof.
                    # Improved flexibility for loading symbol files.
                    # The 'info proc' command nows works on running
                      processes on FreeBSD systems as well as core files
                      created on FreeBSD systems.
                    # A new --enable-codesign=CERT configure option to
                      automatically codesign GDB after build (useful on
                      MacOS X).
                 See the NEWS file for a more complete and detailed list
                 of what this release includes.

   July 31st, 2018: GDB 8.1.1 Released!
       The latest version of GDB, version 8.1.1, is available
       for download.
       This is a minor corrective release over GDB 8.1, fixing
       the following issues:
	  # PR gdb/22824 (misleading description of new rbreak
	    Python function in GDB 8.1 NEWS file)
	  # PR gdb/22849 (ctrl-c doesn't work in
	    extended-remote)
	  # PR gdb/22907 ([Regression] gdbserver doesn't work
	    with filename-only binaries)
	 # PR gdb/23028 (inconsistent disassemble of vcvtpd2dq)
	  # PR gdb/23053 (Fix -D_GLIBCXX_DEBUG gdb-add-index
	    regression)
	  # PR gdb/23127 ([AArch64] GDB cannot be used for
	    debugging software that uses high Virtual Addresses)
	  # PR server/23158 (gdbserver no longer functional on
	    Windows)
	  # PR breakpoints/23210 ([8.1/8.2 Regression] Bogus
	    Breakpoint address adjusted from 0xf7fe7dd3 to
	    0xfffffffff7fe7dd3)

   July 4th, 2018: GDB 8.2 branch created
       The GDB 8.2 branch (gdb-8.2-branch) has been created. To
       check out a copy of the branch use:
 git clone --branch gdb-8.2-branch ssh://sourceware.org/git/binutils-gdb.git

   January 31st, 2018: GDB 8.1 Released!
       The latest version of GDB, version 8.1, is available for
       download.
       Changes in this release include:
	  # Breakpoints on C++ functions are now set on all
	    scopes by default ("wild" matching);
	  # Support for inserting breakpoints on functions
	    marked with C++ ABI tags;
	  # Target floating-point arithmetic emulation during
	    expression evaluation (requires MPFR 3.1 or later);
	  # Various Python Scripting enhancements;
	  # Improved Rust support; in particular, Trait objects
	    can now be inspected when debugging Rust code;
	  # GDB no longer makes assumptions about the type of
	    symbols without debugging information to avoid
	    producing erroneous and often confusing results;
	  # The 'enable' and 'disable' commands now accept a
	    range of breakpoint locations;
	  # New 'starti' command to start the program at the
	    first instruction;
	  # New 'rbreak' command to insert a number of
	    breakpoints via a regular expression pattern
	    (requires Python);
	  # The 'ptype' command now supports printing the offset
	    and size of the fields in a struct;
	  # The 'gcore' command now supports dumping all the
	    memory mappings ('-a' command-line option);
	  # New shortcuts for TUI Single-Key mode: 'i' for
	    stepi, and 'o' for nexti;
	  # GDBserver enhancements:
	       @ Support for transmitting environment variables
		 to GDBserver;
	       @ Support for starting inferior processes with a
		 specified initial working directory;
	       @ On Unix systems, support for globbing expansion
		 and variable substitution of inferior
		 command-line arguments;
	  # Various completion enhancements;
	  # The command used to compile and inject code with the
	    'compile' command is now configurable;
	  # New '--readnever' command-line option to speed the
	    GDB startup when debugging information is not
	    needed;
	  # Support for the following new native configurations:
	       @ FreeBSD/aarch64 (aarch64*-*-freebsd*);
	       @ FreeBSD/arm (arm*-*-freebsd*);
	  # Support for the following new targets:
	       @ FreeBSD/aarch64 (aarch64*-*-freebsd*);
	       @ FreeBSD/arm (arm*-*-freebsd*);
	       @ OpenRISC ELF (or1k*-*-elf)
	  # Removed support for the following targets and native
	    configurations:
	       @ Solaris2/x86 (i?86-*-solaris2.[0-9]);
	       @ Solaris2/sparc (sparc*-*-solaris2.[0-9]);
       See the NEWS file for a more complete and detailed list
       of what this release includes.

   January 5th, 2018: GDB 8.1 branch created
       The GDB 8.1 branch (gdb-8.1-branch) has been created. To
       check out a copy of the branch use:
 git clone --branch gdb-8.1-branch ssh://sourceware.org/git/binutils-gdb.git

   November 1st, 2017: Debugging Tools Devroom at FOSDEM 2018
       We will have a Debugging Tools Devroom at FOSDEM 2018.
       The Call for Participation has recently been announced.
       The Devroom is on the first of the two FOSDEM days, on
       Saturday 3 Feb 2018. See you all at FOSDEM in Brussels!

   September 7th, 2017: GDB 8.0.1 Released!
       The latest version of GDB, version 8.0.1, is available
       for download.
       This is a minor corrective release over GDB 8.0, fixing
       the following issues:
	  # PR breakpoint/21886 (Compressed MIPS code debugging
	    impossible due to memory breakpoint misplacement)
	  # PR symtab/22002 (Assertion on debuggee built with
	    -gdwarf-5 -fdebug-types-section)
						  GDB News (p6 of 30)
	  # PR symtab/22003 (Incompatibility with -gdwarf-5 -
	    DW_FORM_implicit_const)
	  # PR gdb/22046 (Regression on older kernels for T
	    (stopped) processes)
	  # PR sim/20863 (gdb-7.12 powerpc-rtems4.12-gdb does
	    not build on FreeBSD)
	  # PR breakpoint/21555 ("error re-setting breakpoint"
	    on PIE executables)
	  # PR tdep/21717 ("print $fpscr" says "" until some VFP
	    data register is printed)
	  # PR exp/21827 (Regression: gdb command lookup became
	    case-sensitive; but definitions are forced into
	    lowercase)
	  # PR remote/22021 (Multi-arch exec fails with a remote
	    target)
2019-05-26 20:59:15 +00:00

901 lines
20 KiB
C
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/* DO NOT EDIT! -*- buffer-read-only: t -*- vi:set ro: */
/* Instruction opcode table for ip2k.
THIS FILE IS MACHINE GENERATED WITH CGEN.
Copyright (C) 1996-2019 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<<MACH_BASE), 0 } } } }
},
/* snc */
{
-1, "snc", "snc", 16,
{ 0|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
},
/* sz */
{
-1, "sz", "sz", 16,
{ 0|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
},
/* snz */
{
-1, "snz", "snz", 16,
{ 0|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
},
/* skip */
{
-1, "skip", "skip", 16,
{ 0|A(SKIPA)|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
},
/* skip */
{
-1, "skipb", "skip", 16,
{ 0|A(SKIPA)|A(ALIAS), { { { (1<<MACH_BASE), 0 } } } }
},
};
/* The macro instruction opcode table. */
static const CGEN_OPCODE ip2k_cgen_macro_insn_opcode_table[] =
{
/* sc */
{
{ 0, 0, 0, 0 },
{ { MNEM, 0 } },
& ifmt_sc, { 0xb00b }
},
/* snc */
{
{ 0, 0, 0, 0 },
{ { MNEM, 0 } },
& ifmt_snc, { 0xa00b }
},
/* sz */
{
{ 0, 0, 0, 0 },
{ { MNEM, 0 } },
& ifmt_sz, { 0xb40b }
},
/* snz */
{
{ 0, 0, 0, 0 },
{ { MNEM, 0 } },
& ifmt_snz, { 0xa40b }
},
/* skip */
{
{ 0, 0, 0, 0 },
{ { MNEM, 0 } },
& ifmt_skip, { 0xa009 }
},
/* skip */
{
{ 0, 0, 0, 0 },
{ { MNEM, 0 } },
& ifmt_skipb, { 0xb009 }
},
};
#undef A
#undef OPERAND
#undef MNEM
#undef OP
#ifndef CGEN_ASM_HASH_P
#define CGEN_ASM_HASH_P(insn) 1
#endif
#ifndef CGEN_DIS_HASH_P
#define CGEN_DIS_HASH_P(insn) 1
#endif
/* Return non-zero if INSN is to be added to the hash table.
Targets are free to override CGEN_{ASM,DIS}_HASH_P in the .opc file. */
static int
asm_hash_insn_p (const CGEN_INSN *insn ATTRIBUTE_UNUSED)
{
return CGEN_ASM_HASH_P (insn);
}
static int
dis_hash_insn_p (const CGEN_INSN *insn)
{
/* If building the hash table and the NO-DIS attribute is present,
ignore. */
if (CGEN_INSN_ATTR_VALUE (insn, CGEN_INSN_NO_DIS))
return 0;
return CGEN_DIS_HASH_P (insn);
}
#ifndef CGEN_ASM_HASH
#define CGEN_ASM_HASH_SIZE 127
#ifdef CGEN_MNEMONIC_OPERANDS
#define CGEN_ASM_HASH(mnem) (*(unsigned char *) (mnem) % CGEN_ASM_HASH_SIZE)
#else
#define CGEN_ASM_HASH(mnem) (*(unsigned char *) (mnem) % CGEN_ASM_HASH_SIZE) /*FIXME*/
#endif
#endif
/* It doesn't make much sense to provide a default here,
but while this is under development we do.
BUFFER is a pointer to the bytes of the insn, target order.
VALUE is the first base_insn_bitsize bits as an int in host order. */
#ifndef CGEN_DIS_HASH
#define CGEN_DIS_HASH_SIZE 256
#define CGEN_DIS_HASH(buf, value) (*(unsigned char *) (buf))
#endif
/* The result is the hash value of the insn.
Targets are free to override CGEN_{ASM,DIS}_HASH in the .opc file. */
static unsigned int
asm_hash_insn (const char *mnem)
{
return CGEN_ASM_HASH (mnem);
}
/* BUF is a pointer to the bytes of the insn, target order.
VALUE is the first base_insn_bitsize bits as an int in host order. */
static unsigned int
dis_hash_insn (const char *buf ATTRIBUTE_UNUSED,
CGEN_INSN_INT value ATTRIBUTE_UNUSED)
{
return CGEN_DIS_HASH (buf, value);
}
/* Set the recorded length of the insn in the CGEN_FIELDS struct. */
static void
set_fields_bitsize (CGEN_FIELDS *fields, int size)
{
CGEN_FIELDS_BITSIZE (fields) = size;
}
/* Function to call before using the operand instance table.
This plugs the opcode entries and macro instructions into the cpu table. */
void
ip2k_cgen_init_opcode_table (CGEN_CPU_DESC cd)
{
int i;
int num_macros = (sizeof (ip2k_cgen_macro_insn_table) /
sizeof (ip2k_cgen_macro_insn_table[0]));
const CGEN_IBASE *ib = & ip2k_cgen_macro_insn_table[0];
const CGEN_OPCODE *oc = & ip2k_cgen_macro_insn_opcode_table[0];
CGEN_INSN *insns = xmalloc (num_macros * sizeof (CGEN_INSN));
/* This test has been added to avoid a warning generated
if memset is called with a third argument of value zero. */
if (num_macros >= 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;
}