/* Print DEC PDP-11 instructions.
- Copyright 2001 Free Software Foundation, Inc.
+ Copyright 2001, 2002 Free Software Foundation, Inc.
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
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
+#include "sysdep.h"
#include "dis-asm.h"
#include "opcode/pdp11.h"
static void print_freg PARAMS ((int freg, disassemble_info *info));
static int print_operand PARAMS ((bfd_vma *memaddr, int code,
disassemble_info *info));
+static int print_foperand PARAMS ((bfd_vma *memaddr, int code,
+ disassemble_info *info));
int print_insn_pdp11 PARAMS ((bfd_vma memaddr, disassemble_info *info));
static int
FPRINTF (F, "r%d", reg); break;
case 6: FPRINTF (F, "sp"); break;
case 7: FPRINTF (F, "pc"); break;
- default: /* error */
+ default: ; /* error */
}
}
if (reg == 7)
{
bfd_vma address = *memaddr + sign_extend (disp);
+ if (mode == 7)
+ FPRINTF (F, "*");
if (!(code & JUMP))
- FPRINTF (F, "*$");
+ FPRINTF (F, "$");
(*info->print_address_func) (address, info);
}
else
return 0;
}
+static int
+print_foperand (memaddr, code, info)
+ bfd_vma *memaddr;
+ int code;
+ disassemble_info *info;
+{
+ int mode = (code >> 3) & 7;
+ int reg = code & 7;
+
+ if (mode == 0)
+ print_freg (reg, info);
+ else
+ return print_operand (memaddr, code, info);
+
+ return 0;
+}
+
/* Print the PDP-11 instruction at address MEMADDR in debugged memory,
on INFO->STREAM. Returns length of the instruction, in bytes. */
{
case PDP11_OPCODE_NO_OPS:
FPRINTF (F, OP.name);
- break;
+ goto done;
case PDP11_OPCODE_REG:
FPRINTF (F, OP.name);
FPRINTF (F, AFTER_INSTRUCTION);
print_reg (dst, info);
- break;
+ goto done;
case PDP11_OPCODE_OP:
FPRINTF (F, OP.name);
FPRINTF (F, AFTER_INSTRUCTION);
dst |= JUMP;
if (print_operand (&memaddr, dst, info) < 0)
return -1;
- break;
+ goto done;
+ case PDP11_OPCODE_FOP:
+ FPRINTF (F, OP.name);
+ FPRINTF (F, AFTER_INSTRUCTION);
+ if (strcmp (OP.name, "jmp") == 0)
+ dst |= JUMP;
+ if (print_foperand (&memaddr, dst, info) < 0)
+ return -1;
+ goto done;
case PDP11_OPCODE_REG_OP:
FPRINTF (F, OP.name);
FPRINTF (F, AFTER_INSTRUCTION);
dst |= JUMP;
if (print_operand (&memaddr, dst, info) < 0)
return -1;
- break;
+ goto done;
case PDP11_OPCODE_REG_OP_REV:
FPRINTF (F, OP.name);
FPRINTF (F, AFTER_INSTRUCTION);
return -1;
FPRINTF (F, OPERAND_SEPARATOR);
print_reg (src, info);
- break;
+ goto done;
+ case PDP11_OPCODE_AC_FOP:
+ {
+ int ac = (opcode & 0xe0) >> 6;
+ FPRINTF (F, OP.name);
+ FPRINTF (F, AFTER_INSTRUCTION);
+ print_freg (ac, info);
+ FPRINTF (F, OPERAND_SEPARATOR);
+ if (print_foperand (&memaddr, dst, info) < 0)
+ return -1;
+ goto done;
+ }
+ case PDP11_OPCODE_FOP_AC:
+ {
+ int ac = (opcode & 0xe0) >> 6;
+ FPRINTF (F, OP.name);
+ FPRINTF (F, AFTER_INSTRUCTION);
+ if (print_foperand (&memaddr, dst, info) < 0)
+ return -1;
+ FPRINTF (F, OPERAND_SEPARATOR);
+ print_freg (ac, info);
+ goto done;
+ }
case PDP11_OPCODE_AC_OP:
{
int ac = (opcode & 0xe0) >> 6;
FPRINTF (F, OPERAND_SEPARATOR);
if (print_operand (&memaddr, dst, info) < 0)
return -1;
- break;
+ goto done;
+ }
+ case PDP11_OPCODE_OP_AC:
+ {
+ int ac = (opcode & 0xe0) >> 6;
+ FPRINTF (F, OP.name);
+ FPRINTF (F, AFTER_INSTRUCTION);
+ if (print_operand (&memaddr, dst, info) < 0)
+ return -1;
+ FPRINTF (F, OPERAND_SEPARATOR);
+ print_freg (ac, info);
+ goto done;
}
case PDP11_OPCODE_OP_OP:
FPRINTF (F, OP.name);
FPRINTF (F, OPERAND_SEPARATOR);
if (print_operand (&memaddr, dst, info) < 0)
return -1;
- break;
+ goto done;
case PDP11_OPCODE_DISPL:
{
int displ = (opcode & 0xff) << 8;
FPRINTF (F, OP.name);
FPRINTF (F, AFTER_INSTRUCTION);
(*info->print_address_func) (address, info);
- break;
+ goto done;
}
case PDP11_OPCODE_REG_DISPL:
{
print_reg (src, info);
FPRINTF (F, OPERAND_SEPARATOR);
(*info->print_address_func) (address, info);
- break;
+ goto done;
}
case PDP11_OPCODE_IMM8:
{
FPRINTF (F, OP.name);
FPRINTF (F, AFTER_INSTRUCTION);
FPRINTF (F, "%o", code);
- break;
+ goto done;
}
case PDP11_OPCODE_IMM6:
{
FPRINTF (F, OP.name);
FPRINTF (F, AFTER_INSTRUCTION);
FPRINTF (F, "%o", code);
- break;
+ goto done;
}
case PDP11_OPCODE_IMM3:
{
FPRINTF (F, OP.name);
FPRINTF (F, AFTER_INSTRUCTION);
FPRINTF (F, "%o", code);
- break;
+ goto done;
+ }
+ case PDP11_OPCODE_ILLEGAL:
+ {
+ FPRINTF (F, ".word");
+ FPRINTF (F, AFTER_INSTRUCTION);
+ FPRINTF (F, "%o", opcode);
+ goto done;
}
default:
/* TODO: is this a proper way of signalling an error? */
}
#undef OP
}
+ done:
return memaddr - start_memaddr;
}