old-cross-binutils/opcodes/moxie-dis.c

230 lines
5.7 KiB
C
Raw Normal View History

2009-04-16 15:39:48 +00:00
/* Disassemble moxie instructions.
2016-01-01 11:25:12 +00:00
Copyright (C) 2009-2016 Free Software Foundation, Inc.
2009-04-16 15:39:48 +00:00
This file is part of the GNU opcodes library.
This library 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"
PR 14072 * configure.in: Add check that sysdep.h has been included before any system header files. * configure: Regenerate. * config.in: Regenerate. * sysdep.h: Generate an error if included before config.h. * alpha-opc.c: Include sysdep.h before any other header file. * alpha-dis.c: Likewise. * avr-dis.c: Likewise. * cgen-opc.c: Likewise. * cr16-dis.c: Likewise. * cris-dis.c: Likewise. * crx-dis.c: Likewise. * d10v-dis.c: Likewise. * d10v-opc.c: Likewise. * d30v-dis.c: Likewise. * d30v-opc.c: Likewise. * h8500-dis.c: Likewise. * i370-dis.c: Likewise. * i370-opc.c: Likewise. * m10200-dis.c: Likewise. * m10300-dis.c: Likewise. * micromips-opc.c: Likewise. * mips-opc.c: Likewise. * mips61-opc.c: Likewise. * moxie-dis.c: Likewise. * or32-opc.c: Likewise. * pj-dis.c: Likewise. * ppc-dis.c: Likewise. * ppc-opc.c: Likewise. * s390-dis.c: Likewise. * sh-dis.c: Likewise. * sh64-dis.c: Likewise. * sparc-dis.c: Likewise. * sparc-opc.c: Likewise. * spu-dis.c: Likewise. * tic30-dis.c: Likewise. * tic54x-dis.c: Likewise. * tic80-dis.c: Likewise. * tic80-opc.c: Likewise. * tilegx-dis.c: Likewise. * tilepro-dis.c: Likewise. * v850-dis.c: Likewise. * v850-opc.c: Likewise. * vax-dis.c: Likewise. * w65-dis.c: Likewise. * xgate-dis.c: Likewise. * xtensa-dis.c: Likewise. * rl78-decode.opc: Likewise. * rl78-decode.c: Regenerate. * rx-decode.opc: Likewise. * rx-decode.c: Regenerate. * configure.in: Add check that sysdep.h has been included before any system header files. * configure: Regenerate. * config.in: Regenerate. * sysdep.h: Generate an error if included before config.h. * configure.in: Add check that sysdep.h has been included before any system header files. * configure: Regenerate. * config.in: Regenerate. * aclocal.m4: Regenerate. * bfd-in.h: Generate an error if included before config.h. * sysdep.h: Likewise. * bfd-in2.h: Regenerate. * compress.c: Remove #include "config.h". * plugin.c: Likewise. * elf32-m68hc1x.c: Include sysdep.h before alloca-conf.h. * elf64-hppa.c: Likewise. * som.c: Likewise. * xsymc.c: Likewise. * configure.in: Add check that sysdep.h has been included before any system header files. * configure: Regenerate. * config.in: Regenerate. * configure.in: Add check that sysdep.h has been included before any system header files. * configure: Regenerate. * config.in: Regenerate. * aclocal.m4: Regenerate. * Makefile.am: Use wrappers around C files generated by flex. * Makefile.in: Regenerate. * doc/Makefile.in: Regenerate. * itbl-lex-wrapper.c: New file. * config/bfin-lex-wrapper.c: New file. * cgen.c: Include as.h before setjmp.h. * config/tc-dlx.c: Include as.h before any other header. * config/tc-h8300.c: Likewise. * config/tc-lm32.c: Likewise. * config/tc-mep.c: Likewise. * config/tc-microblaze.c: Likewise. * config/tc-mmix.c: Likewise. * config/tc-msp430.c: Likewise. * config/tc-or32.c: Likewise. * config/tc-tic4x.c: Likewise. * config/tc-tic54x.c: Likewise. * config/tc-xtensa.c: Likewise. * configure.in: Add check that sysdep.h has been included before any system header files. * configure: Regenerate. * config.in: Regenerate. * unwind-ia64.h: Include config.h.
2012-05-17 15:13:28 +00:00
#include <stdio.h>
2009-04-16 15:39:48 +00:00
#define STATIC_TABLE
#define DEFINE_TABLE
#include "opcode/moxie.h"
#include "dis-asm.h"
static fprintf_ftype fpr;
static void *stream;
/* Macros to extract operands from the instruction word. */
#define OP_A(i) ((i >> 4) & 0xf)
#define OP_B(i) (i & 0xf)
#define INST2OFFSET(o) ((((signed short)((o & ((1<<10)-1))<<6))>>6)<<1)
2009-04-16 15:39:48 +00:00
static const char * reg_names[16] =
{ "$fp", "$sp", "$r0", "$r1", "$r2", "$r3", "$r4", "$r5",
"$r6", "$r7", "$r8", "$r9", "$r10", "$r11", "$r12", "$r13" };
int
print_insn_moxie (bfd_vma addr, struct disassemble_info * info)
{
int length = 2;
int status;
stream = info->stream;
const moxie_opc_info_t * opcode;
bfd_byte buffer[4];
unsigned short iword;
fpr = info->fprintf_func;
if ((status = info->read_memory_func (addr, buffer, 2, info)))
goto fail;
2012-09-13 22:24:51 +00:00
if (info->endian == BFD_ENDIAN_BIG)
iword = bfd_getb16 (buffer);
else
iword = bfd_getl16 (buffer);
2009-04-16 15:39:48 +00:00
/* Form 1 instructions have the high bit set to 0. */
if ((iword & (1<<15)) == 0)
{
/* Extract the Form 1 opcode. */
opcode = &moxie_form1_opc_info[iword >> 8];
switch (opcode->itype)
{
case MOXIE_F1_NARG:
fpr (stream, "%s", opcode->name);
break;
case MOXIE_F1_A:
fpr (stream, "%s\t%s", opcode->name,
reg_names[OP_A(iword)]);
break;
case MOXIE_F1_AB:
fpr (stream, "%s\t%s, %s", opcode->name,
reg_names[OP_A(iword)],
reg_names[OP_B(iword)]);
break;
case MOXIE_F1_A4:
{
unsigned imm;
if ((status = info->read_memory_func (addr + 2, buffer, 4, info)))
goto fail;
2012-09-13 22:24:51 +00:00
if (info->endian == BFD_ENDIAN_BIG)
imm = bfd_getb32 (buffer);
else
imm = bfd_getl32 (buffer);
2009-04-16 15:39:48 +00:00
fpr (stream, "%s\t%s, 0x%x", opcode->name,
reg_names[OP_A(iword)], imm);
length = 6;
}
break;
case MOXIE_F1_4:
{
unsigned imm;
if ((status = info->read_memory_func (addr + 2, buffer, 4, info)))
goto fail;
2012-09-13 22:24:51 +00:00
if (info->endian == BFD_ENDIAN_BIG)
imm = bfd_getb32 (buffer);
else
imm = bfd_getl32 (buffer);
2009-04-16 15:39:48 +00:00
fpr (stream, "%s\t0x%x", opcode->name, imm);
length = 6;
}
break;
2009-06-06 13:02:21 +00:00
case MOXIE_F1_M:
{
unsigned imm;
if ((status = info->read_memory_func (addr + 2, buffer, 4, info)))
goto fail;
2012-09-13 22:24:51 +00:00
if (info->endian == BFD_ENDIAN_BIG)
imm = bfd_getb32 (buffer);
else
imm = bfd_getl32 (buffer);
2009-06-06 13:02:21 +00:00
fpr (stream, "%s\t", opcode->name);
info->print_address_func ((bfd_vma) imm, info);
length = 6;
}
break;
2009-04-16 15:39:48 +00:00
case MOXIE_F1_AiB:
fpr (stream, "%s\t(%s), %s", opcode->name,
reg_names[OP_A(iword)], reg_names[OP_B(iword)]);
break;
case MOXIE_F1_ABi:
fpr (stream, "%s\t%s, (%s)", opcode->name,
reg_names[OP_A(iword)], reg_names[OP_B(iword)]);
break;
case MOXIE_F1_4A:
{
unsigned imm;
if ((status = info->read_memory_func (addr + 2, buffer, 4, info)))
goto fail;
2012-09-13 22:24:51 +00:00
if (info->endian == BFD_ENDIAN_BIG)
imm = bfd_getb32 (buffer);
else
imm = bfd_getl32 (buffer);
2009-04-16 15:39:48 +00:00
fpr (stream, "%s\t0x%x, %s",
opcode->name, imm, reg_names[OP_A(iword)]);
length = 6;
}
break;
2014-12-27 15:57:04 +00:00
case MOXIE_F1_AiB2:
2009-04-16 15:39:48 +00:00
{
unsigned imm;
2014-12-27 15:57:04 +00:00
if ((status = info->read_memory_func (addr+2, buffer, 2, info)))
2009-04-16 15:39:48 +00:00
goto fail;
2012-09-13 22:24:51 +00:00
if (info->endian == BFD_ENDIAN_BIG)
2014-12-27 15:57:04 +00:00
imm = bfd_getb16 (buffer);
2012-09-13 22:24:51 +00:00
else
2014-12-27 15:57:04 +00:00
imm = bfd_getl16 (buffer);
2009-04-16 15:39:48 +00:00
fpr (stream, "%s\t0x%x(%s), %s", opcode->name,
imm,
reg_names[OP_A(iword)],
reg_names[OP_B(iword)]);
2014-12-27 15:57:04 +00:00
length = 4;
2009-04-16 15:39:48 +00:00
}
break;
2014-12-27 15:57:04 +00:00
case MOXIE_F1_ABi2:
2009-04-16 15:39:48 +00:00
{
unsigned imm;
2014-12-27 15:57:04 +00:00
if ((status = info->read_memory_func (addr+2, buffer, 2, info)))
2009-04-16 15:39:48 +00:00
goto fail;
2012-09-13 22:24:51 +00:00
if (info->endian == BFD_ENDIAN_BIG)
2014-12-27 15:57:04 +00:00
imm = bfd_getb16 (buffer);
2012-09-13 22:24:51 +00:00
else
2014-12-27 15:57:04 +00:00
imm = bfd_getl16 (buffer);
2009-04-16 15:39:48 +00:00
fpr (stream, "%s\t%s, 0x%x(%s)",
opcode->name,
reg_names[OP_A(iword)],
imm,
reg_names[OP_B(iword)]);
2014-12-27 15:57:04 +00:00
length = 4;
2009-04-16 15:39:48 +00:00
}
break;
case MOXIE_BAD:
fpr (stream, "bad");
break;
2009-04-16 15:39:48 +00:00
default:
abort();
2009-04-16 15:39:48 +00:00
}
}
else if ((iword & (1<<14)) == 0)
{
/* Extract the Form 2 opcode. */
opcode = &moxie_form2_opc_info[(iword >> 12) & 3];
switch (opcode->itype)
{
case MOXIE_F2_A8V:
fpr (stream, "%s\t%s, 0x%x",
opcode->name,
reg_names[(iword >> 8) & 0xf],
iword & ((1 << 8) - 1));
break;
case MOXIE_F2_NARG:
fpr (stream, "%s", opcode->name);
break;
case MOXIE_BAD:
fpr (stream, "bad");
break;
2009-04-16 15:39:48 +00:00
default:
abort();
}
}
else
{
/* Extract the Form 3 opcode. */
opcode = &moxie_form3_opc_info[(iword >> 10) & 15];
2009-04-16 15:39:48 +00:00
switch (opcode->itype)
{
case MOXIE_F3_PCREL:
fpr (stream, "%s\t", opcode->name);
2015-08-12 11:45:07 +00:00
info->print_address_func ((bfd_vma) (addr + INST2OFFSET(iword) + 2),
info);
2009-04-16 15:39:48 +00:00
break;
case MOXIE_BAD:
fpr (stream, "bad");
break;
2009-04-16 15:39:48 +00:00
default:
abort();
}
}
return length;
fail:
info->memory_error_func (status, addr, info);
return -1;
}