gdb: add target_ops::supports_displaced_step
[deliverable/binutils-gdb.git] / opcodes / m10300-dis.c
index cdba83bd1cadda04a954e0b668a6bf8f2e112b15..00210c25cd359a67c3316d72a832fbe360efbc92 100644 (file)
 /* Disassemble MN10300 instructions.
-   Copyright (C) 1996, 1997, 1998 Free Software Foundation, Inc.
+   Copyright (C) 1996-2020 Free Software Foundation, Inc.
 
-This program 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 2 of the License, or
-(at your option) any later version.
+   This file is part of the GNU opcodes library.
 
-This program 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.
+   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.
 
-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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+   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 <stdio.h>
-
-#include "ansidecl.h"
-#include "opcode/mn10300.h" 
-#include "dis-asm.h"
+#include "opcode/mn10300.h"
+#include "disassemble.h"
 #include "opintl.h"
 
-static void disassemble PARAMS ((bfd_vma, struct disassemble_info *,
-                                unsigned long insn, unsigned int));
-
-int 
-print_insn_mn10300 (memaddr, info)
-     bfd_vma memaddr;
-     struct disassemble_info *info;
-{
-  int status;
-  bfd_byte buffer[4];
-  unsigned long insn;
-  unsigned int consume;
-
-  /* First figure out how big the opcode is.  */
-  status = (*info->read_memory_func) (memaddr, buffer, 1, info);
-  if (status != 0)
-    {
-      (*info->memory_error_func) (status, memaddr, info);
-      return -1;
-    }
-  insn = *(unsigned char *) buffer;
-
-  /* These are one byte insns.  */
-  if ((insn & 0xf3) == 0x00
-      || (insn & 0xf0) == 0x10
-      || (insn & 0xfc) == 0x3c
-      || (insn & 0xf3) == 0x41
-      || (insn & 0xf3) == 0x40
-      || (insn & 0xfc) == 0x50
-      || (insn & 0xfc) == 0x54
-      || (insn & 0xf0) == 0x60
-      || (insn & 0xf0) == 0x70
-      || ((insn & 0xf0) == 0x80
-         && (insn & 0x0c) >> 2 != (insn & 0x03))
-      || ((insn & 0xf0) == 0x90
-         && (insn & 0x0c) >> 2 != (insn & 0x03))
-      || ((insn & 0xf0) == 0xa0
-         && (insn & 0x0c) >> 2 != (insn & 0x03))
-      || ((insn & 0xf0) == 0xb0
-         && (insn & 0x0c) >> 2 != (insn & 0x03))
-      || (insn & 0xff) == 0xcb
-      || (insn & 0xfc) == 0xd0
-      || (insn & 0xfc) == 0xd4
-      || (insn & 0xfc) == 0xd8
-      || (insn & 0xf0) == 0xe0
-      || (insn & 0xff) == 0xff)
-    {
-      consume = 1;
-    }
-
-  /* These are two byte insns.  */
-  else if ((insn & 0xf0) == 0x80
-          || (insn & 0xf0) == 0x90
-          || (insn & 0xf0) == 0xa0
-          || (insn & 0xf0) == 0xb0
-          || (insn & 0xfc) == 0x20
-          || (insn & 0xfc) == 0x28
-          || (insn & 0xf3) == 0x43
-          || (insn & 0xf3) == 0x42
-          || (insn & 0xfc) == 0x58
-          || (insn & 0xfc) == 0x5c
-          || ((insn & 0xf0) == 0xc0
-              && (insn & 0xff) != 0xcb
-              && (insn & 0xff) != 0xcc
-              && (insn & 0xff) != 0xcd)
-          || (insn & 0xff) == 0xf0
-          || (insn & 0xff) == 0xf1
-          || (insn & 0xff) == 0xf2
-          || (insn & 0xff) == 0xf3
-          || (insn & 0xff) == 0xf4
-          || (insn & 0xff) == 0xf5
-          || (insn & 0xff) == 0xf6)
-    {
-      status = (*info->read_memory_func) (memaddr, buffer, 2, info);
-      if (status != 0)
-       {
-         (*info->memory_error_func) (status, memaddr, info);
-          return -1;
-       }
-      insn = bfd_getb16 (buffer);
-      consume = 2;
-    }
-
-  /* These are three byte insns.  */
-  else if ((insn & 0xff) == 0xf8
-          || (insn & 0xff) == 0xcc 
-          || (insn & 0xff) == 0xf9
-          || (insn & 0xf3) == 0x01
-          || (insn & 0xf3) == 0x02
-          || (insn & 0xf3) == 0x03
-          || (insn & 0xfc) == 0x24
-          || (insn & 0xfc) == 0x2c
-          || (insn & 0xfc) == 0x30
-          || (insn & 0xfc) == 0x34
-          || (insn & 0xfc) == 0x38
-          || (insn & 0xff) == 0xde
-          || (insn & 0xff) == 0xdf
-          /* start-sanitize-am33 */
-          || (insn & 0xff) == 0xf9
-          /* end-sanitize-am33 */
-          || (insn & 0xff) == 0xcc)
-    {
-      status = (*info->read_memory_func) (memaddr, buffer, 2, info);
-      if (status != 0)
-       {
-         (*info->memory_error_func) (status, memaddr, info);
-         return -1;
-       }
-      insn = bfd_getb16 (buffer);
-      insn <<= 8;
-      status = (*info->read_memory_func) (memaddr + 2, buffer, 1, info);
-      if (status != 0)
-       {
-         (*info->memory_error_func) (status, memaddr, info);
-         return -1;
-       }
-      insn |= *(unsigned char *)buffer;
-      consume = 3;
-    }
-
-  /* These are four byte insns.  */
-  else if ((insn & 0xff) == 0xfa
-           /* start-sanitize-am33 */
-          || (insn & 0xff) == 0xf7
-           /* end-sanitize-am33 */
-          || (insn & 0xff) == 0xfb)
-    {
-      status = (*info->read_memory_func) (memaddr, buffer, 4, info);
-      if (status != 0)
-       {
-         (*info->memory_error_func) (status, memaddr, info);
-         return -1;
-       }
-      insn = bfd_getb32 (buffer);
-      consume = 4;
-    }
-
-  /* These are five byte insns.  */
-  else if ((insn & 0xff) == 0xcd
-          || (insn & 0xff) == 0xdc)
-    {
-      status = (*info->read_memory_func) (memaddr, buffer, 4, info);
-      if (status != 0)
-       {
-         (*info->memory_error_func) (status, memaddr, info);
-         return -1;
-       }
-      insn = bfd_getb32 (buffer);
-      consume = 5;
-    }
-
-  /* These are six byte insns.  */
-  else if ((insn & 0xff) == 0xfd
-          || (insn & 0xff) == 0xfc)
-    {
-      status = (*info->read_memory_func) (memaddr, buffer, 4, info);
-      if (status != 0)
-       {
-         (*info->memory_error_func) (status, memaddr, info);
-         return -1;
-       }
-
-      insn = bfd_getb32 (buffer);
-      consume = 6;
-    }
-
-  /* Else its a seven byte insns (in theory).  */
-  else
-    {
-      status = (*info->read_memory_func) (memaddr, buffer, 4, info);
-      if (status != 0)
-       {
-         (*info->memory_error_func) (status, memaddr, info);
-         return -1;
-       }
-
-      insn = bfd_getb32 (buffer);
-      consume = 7;
-    }
-
-  disassemble (memaddr, info, insn, consume);
-
-  return consume;
-}
+#define HAVE_AM33_2 (info->mach == AM33_2)
+#define HAVE_AM33   (info->mach == AM33 || HAVE_AM33_2)
+#define HAVE_AM30   (info->mach == AM30)
 
 static void
-disassemble (memaddr, info, insn, size)
-     bfd_vma memaddr;
-     struct disassemble_info *info;
-     unsigned long insn;
-     unsigned int size;
+disassemble (bfd_vma memaddr,
+            struct disassemble_info *info,
+            unsigned long insn,
+            unsigned int size)
 {
-  struct mn10300_opcode *op = (struct mn10300_opcode *)mn10300_opcodes;
+  struct mn10300_opcode *op = (struct mn10300_opcode *) mn10300_opcodes;
   const struct mn10300_operand *operand;
   bfd_byte buffer[4];
   unsigned long extension = 0;
@@ -238,9 +57,10 @@ disassemble (memaddr, info, insn, size)
        mysize = 5;
       else if (op->format == FMT_D2)
        mysize = 4;
+      else if (op->format == FMT_D3)
+       mysize = 5;
       else if (op->format == FMT_D4)
        mysize = 6;
-      /* start-sanitize-am33 */
       else if (op->format == FMT_D6)
        mysize = 3;
       else if (op->format == FMT_D7 || op->format == FMT_D10)
@@ -249,52 +69,46 @@ disassemble (memaddr, info, insn, size)
        mysize = 6;
       else if (op->format == FMT_D9)
        mysize = 7;
-      /* end-sanitize-am33 */
       else
        mysize = 7;
-       
+
       if ((op->mask & insn) == op->opcode
          && size == (unsigned int) mysize
          && (op->machine == 0
-             || op->machine == info->mach))
+             || (op->machine == AM33_2 && HAVE_AM33_2)
+             || (op->machine == AM33 && HAVE_AM33)
+             || (op->machine == AM30 && HAVE_AM30)))
        {
          const unsigned char *opindex_ptr;
          unsigned int nocomma;
          int paren = 0;
-         
+
          if (op->format == FMT_D1 || op->format == FMT_S1)
            extra_shift = 8;
          else if (op->format == FMT_D2 || op->format == FMT_D4
                   || op->format == FMT_S2 || op->format == FMT_S4
                   || op->format == FMT_S6 || op->format == FMT_D5)
            extra_shift = 16;
-         /* start-sanitize-am33 */
          else if (op->format == FMT_D7
                   || op->format == FMT_D8
                   || op->format == FMT_D9)
            extra_shift = 8;
-         /* end-sanitize-am33 */
          else
            extra_shift = 0;
 
          if (size == 1 || size == 2)
-           {
-             extension = 0;
-           }
+           extension = 0;
+
          else if (size == 3
                   && (op->format == FMT_D1
                       || op->opcode == 0xdf0000
                       || op->opcode == 0xde0000))
-           {
-             extension = 0;
-           }
-         /* start-sanitize-am33 */
+           extension = 0;
+
          else if (size == 3
                   && op->format == FMT_D6)
-           {
-             extension = 0;
-           }
-         /* end-sanitize-am33 */
+           extension = 0;
+
          else if (size == 3)
            {
              insn &= 0xff0000;
@@ -312,17 +126,13 @@ disassemble (memaddr, info, insn, size)
                   && (op->opcode == 0xfaf80000
                       || op->opcode == 0xfaf00000
                       || op->opcode == 0xfaf40000))
-           {
-             extension = 0;
-           }
-         /* start-sanitize-am33 */
+           extension = 0;
+
          else if (size == 4
                   && (op->format == FMT_D7
                       || op->format == FMT_D10))
-           {
-             extension = 0;
-           }
-         /* end-sanitize-am33 */
+           extension = 0;
+
          else if (size == 4)
            {
              insn &= 0xffff0000;
@@ -339,6 +149,7 @@ disassemble (memaddr, info, insn, size)
          else if (size == 5 && op->opcode == 0xdc000000)
            {
              unsigned long temp = 0;
+
              status = (*info->read_memory_func) (memaddr + 1, buffer, 4, info);
              if (status != 0)
                {
@@ -351,9 +162,29 @@ disassemble (memaddr, info, insn, size)
              insn |= (temp & 0xffffff00) >> 8;
              extension = temp & 0xff;
            }
+         else if (size == 5 && op->format == FMT_D3)
+           {
+             status = (*info->read_memory_func) (memaddr + 2, buffer, 2, info);
+             if (status != 0)
+               {
+                 (*info->memory_error_func) (status, memaddr, info);
+                 return;
+               }
+             insn &= 0xffff0000;
+             insn |= bfd_getl16 (buffer);
+
+             status = (*info->read_memory_func) (memaddr + 4, buffer, 1, info);
+             if (status != 0)
+               {
+                 (*info->memory_error_func) (status, memaddr, info);
+                 return;
+               }
+             extension = *(unsigned char *) buffer;
+           }
          else if (size == 5)
            {
              unsigned long temp = 0;
+
              status = (*info->read_memory_func) (memaddr + 1, buffer, 2, info);
              if (status != 0)
                {
@@ -371,9 +202,8 @@ disassemble (memaddr, info, insn, size)
                  (*info->memory_error_func) (status, memaddr, info);
                  return;
                }
-             extension = *(unsigned char *)buffer;
+             extension = *(unsigned char *) buffer;
            }
-         /* start-sanitize-am33 */
          else if (size == 6 && op->format == FMT_D8)
            {
              insn &= 0xffffff00;
@@ -383,7 +213,7 @@ disassemble (memaddr, info, insn, size)
                  (*info->memory_error_func) (status, memaddr, info);
                  return;
                }
-             insn |= *(unsigned char *)buffer;
+             insn |= *(unsigned char *) buffer;
 
              status = (*info->read_memory_func) (memaddr + 3, buffer, 2, info);
              if (status != 0)
@@ -393,10 +223,10 @@ disassemble (memaddr, info, insn, size)
                }
              extension = bfd_getl16 (buffer);
            }
-         /* end-sanitize-am33 */
          else if (size == 6)
            {
              unsigned long temp = 0;
+
              status = (*info->read_memory_func) (memaddr + 2, buffer, 4, info);
              if (status != 0)
                {
@@ -409,7 +239,6 @@ disassemble (memaddr, info, insn, size)
              insn |= (temp >> 16) & 0xffff;
              extension = temp & 0xffff;
            }
-         /* start-sanitize-am33 */
          else if (size == 7 && op->format == FMT_D9)
            {
              insn &= 0xffffff00;
@@ -423,10 +252,10 @@ disassemble (memaddr, info, insn, size)
              insn |= (extension & 0xff000000) >> 24;
              extension &= 0xffffff;
            }
-         /* end-sanitize-am33 */
          else if (size == 7 && op->opcode == 0xdd000000)
            {
              unsigned long temp = 0;
+
              status = (*info->read_memory_func) (memaddr + 1, buffer, 4, info);
              if (status != 0)
                {
@@ -438,7 +267,7 @@ disassemble (memaddr, info, insn, size)
              insn &= 0xff000000;
              insn |= (temp >> 8) & 0xffffff;
              extension = (temp & 0xff) << 16;
-             
+
              status = (*info->read_memory_func) (memaddr + 5, buffer, 2, info);
              if (status != 0)
                {
@@ -450,6 +279,7 @@ disassemble (memaddr, info, insn, size)
          else if (size == 7)
            {
              unsigned long temp = 0;
+
              status = (*info->read_memory_func) (memaddr + 2, buffer, 4, info);
              if (status != 0)
                {
@@ -461,14 +291,14 @@ disassemble (memaddr, info, insn, size)
              insn &= 0xffff0000;
              insn |= (temp >> 16) & 0xffff;
              extension = (temp & 0xffff) << 8;
-             
+
              status = (*info->read_memory_func) (memaddr + 6, buffer, 1, info);
              if (status != 0)
                {
                  (*info->memory_error_func) (status, memaddr, info);
                  return;
                }
-             extension |= *(unsigned char *)buffer;
+             extension |= *(unsigned char *) buffer;
            }
 
          match = 1;
@@ -483,47 +313,100 @@ disassemble (memaddr, info, insn, size)
 
              operand = &mn10300_operands[*opindex_ptr];
 
-             if ((operand->flags & MN10300_OPERAND_SPLIT) != 0)
+             /* If this operand is a PLUS (autoincrement), then do not emit
+                a comma before emitting the plus.  */
+             if ((operand->flags & MN10300_OPERAND_PLUS) != 0)
+               nocomma = 1;
+
+             if ((operand->flags & MN10300_OPERAND_DREG) != 0
+                 || (operand->flags & MN10300_OPERAND_AREG) != 0
+                 || (operand->flags & MN10300_OPERAND_RREG) != 0
+                 || (operand->flags & MN10300_OPERAND_XRREG) != 0)
+               value = ((insn >> (operand->shift + extra_shift))
+                        & ((1 << operand->bits) - 1));
+             else if ((operand->flags & MN10300_OPERAND_SPLIT) != 0)
                {
                  unsigned long temp;
+
                  value = insn & ((1 << operand->bits) - 1);
                  value <<= (32 - operand->bits);
                  temp = extension >> operand->shift;
                  temp &= ((1 << (32 - operand->bits)) - 1);
                  value |= temp;
+                 value = ((value ^ (((unsigned long) 1) << 31))
+                          - (((unsigned long) 1) << 31));
                }
-             /* start-sanitize-am33 */
              else if ((operand->flags & MN10300_OPERAND_24BIT) != 0)
                {
                  unsigned long temp;
+
                  value = insn & ((1 << operand->bits) - 1);
                  value <<= (24 - operand->bits);
                  temp = extension >> operand->shift;
                  temp &= ((1 << (24 - operand->bits)) - 1);
                  value |= temp;
                  if ((operand->flags & MN10300_OPERAND_SIGNED) != 0)
-                   value = ((value & 0xffffff) ^ (~0x7fffff)) + 0x800000;
+                   value = ((value & 0xffffff) ^ 0x800000) - 0x800000;
                }
-             /* end-sanitize-am33 */
-             else if ((operand->flags & MN10300_OPERAND_EXTENDED) != 0)
+             else if ((operand->flags & (MN10300_OPERAND_FSREG
+                                         | MN10300_OPERAND_FDREG)))
                {
-                 value = ((extension >> (operand->shift))
-                          & ((1 << operand->bits) - 1));
+                 /* See m10300-opc.c just before #define FSM0 for an
+                    explanation of these variables.  Note that
+                    FMT-implied shifts are not taken into account for
+                    FP registers.  */
+                 unsigned long mask_low, mask_high;
+                 int shl_low, shr_high, shl_high;
+
+                 switch (operand->bits)
+                   {
+                   case 5:
+                     /* Handle regular FP registers.  */
+                     if (operand->shift >= 0)
+                       {
+                         /* This is an `m' register.  */
+                         shl_low = operand->shift;
+                         shl_high = 8 + (8 & shl_low) + (shl_low & 4) / 4;
+                       }
+                     else
+                       {
+                         /* This is an `n' register.  */
+                         shl_low = -operand->shift;
+                         shl_high = shl_low / 4;
+                       }
+                     mask_low = 0x0f;
+                     mask_high = 0x10;
+                     shr_high = 4;
+                     break;
+
+                   case 3:
+                     /* Handle accumulators.  */
+                     shl_low = -operand->shift;
+                     shl_high = 0;
+                     mask_low = 0x03;
+                     mask_high = 0x04;
+                     shr_high = 2;
+                     break;
+
+                   default:
+                     abort ();
+                   }
+                 value = ((((insn >> shl_high) << shr_high) & mask_high)
+                          | ((insn >> shl_low) & mask_low));
                }
+             else if ((operand->flags & MN10300_OPERAND_EXTENDED) != 0)
+               value = ((extension >> (operand->shift))
+                        & ((1 << operand->bits) - 1));
+
              else
-               {
-                 value = ((insn >> (operand->shift))
-                          & ((1 << operand->bits) - 1));
-               }
+               value = ((insn >> (operand->shift))
+                        & ((1 << operand->bits) - 1));
 
              if ((operand->flags & MN10300_OPERAND_SIGNED) != 0
-                  /* start-sanitize-am33 */
-                  /* These are properly extended by the code above.  */
-                  && ((operand->flags & MN10300_OPERAND_24BIT) == 0)
-                  /* end-sanitize-am33 */
-                 )
-               value = ((long)(value << (32 - operand->bits))
-                         >> (32 - operand->bits));
+                 /* These are properly extended by the code above.  */
+                 && ((operand->flags & MN10300_OPERAND_24BIT) == 0))
+               value = ((value ^ (((unsigned long) 1) << (operand->bits - 1)))
+                        - (((unsigned long) 1) << (operand->bits - 1)));
 
              if (!nocomma
                  && (!paren
@@ -531,20 +414,12 @@ disassemble (memaddr, info, insn, size)
                (*info->fprintf_func) (info->stream, ",");
 
              nocomma = 0;
-               
+
              if ((operand->flags & MN10300_OPERAND_DREG) != 0)
-               {
-                 value = ((insn >> (operand->shift + extra_shift))
-                          & ((1 << operand->bits) - 1));
-                 (*info->fprintf_func) (info->stream, "d%d", value);
-               }
+               (*info->fprintf_func) (info->stream, "d%d", (int) value);
 
              else if ((operand->flags & MN10300_OPERAND_AREG) != 0)
-               {
-                 value = ((insn >> (operand->shift + extra_shift))
-                          & ((1 << operand->bits) - 1));
-                 (*info->fprintf_func) (info->stream, "a%d", value);
-               }
+               (*info->fprintf_func) (info->stream, "a%d", (int) value);
 
              else if ((operand->flags & MN10300_OPERAND_SP) != 0)
                (*info->fprintf_func) (info->stream, "sp");
@@ -555,21 +430,33 @@ disassemble (memaddr, info, insn, size)
              else if ((operand->flags & MN10300_OPERAND_MDR) != 0)
                (*info->fprintf_func) (info->stream, "mdr");
 
-             /* start-sanitize-am33 */
              else if ((operand->flags & MN10300_OPERAND_RREG) != 0)
                {
-                 value = ((insn >> (operand->shift + extra_shift))
-                          & ((1 << operand->bits) - 1));
-                 (*info->fprintf_func) (info->stream, "r%d", value);
+                 if (value < 8)
+                   (*info->fprintf_func) (info->stream, "r%d", (int) value);
+                 else if (value < 12)
+                   (*info->fprintf_func) (info->stream, "a%d", (int) value - 8);
+                 else
+                   (*info->fprintf_func) (info->stream, "d%d", (int) value - 12);
                }
 
              else if ((operand->flags & MN10300_OPERAND_XRREG) != 0)
                {
-                 value = ((insn >> (operand->shift + extra_shift))
-                          & ((1 << operand->bits) - 1));
-                 (*info->fprintf_func) (info->stream, "xr%d", value);
+                 if (value == 0)
+                   (*info->fprintf_func) (info->stream, "sp");
+                 else
+                   (*info->fprintf_func) (info->stream, "xr%d", (int) value);
                }
 
+             else if ((operand->flags & MN10300_OPERAND_FSREG) != 0)
+               (*info->fprintf_func) (info->stream, "fs%d", (int) value);
+
+             else if ((operand->flags & MN10300_OPERAND_FDREG) != 0)
+               (*info->fprintf_func) (info->stream, "fd%d", (int) value);
+
+             else if ((operand->flags & MN10300_OPERAND_FPCR) != 0)
+               (*info->fprintf_func) (info->stream, "fpcr");
+
              else if ((operand->flags & MN10300_OPERAND_USP) != 0)
                (*info->fprintf_func) (info->stream, "usp");
 
@@ -587,7 +474,6 @@ disassemble (memaddr, info, insn, size)
 
              else if ((operand->flags & MN10300_OPERAND_PLUS) != 0)
                (*info->fprintf_func) (info->stream, "+");
-             /* end-sanitize-am33 */
 
              else if ((operand->flags & MN10300_OPERAND_PAREN) != 0)
                {
@@ -650,7 +536,6 @@ disassemble (memaddr, info, insn, size)
                      comma = 1;
                    }
 
-                 /* start-sanitize-am33 */
                  if (value & 0x04)
                    {
                      if (comma)
@@ -672,12 +557,11 @@ disassemble (memaddr, info, insn, size)
                      (*info->fprintf_func) (info->stream, "exother");
                      comma = 1;
                    }
-                 /* end-sanitize-am33 */
                  (*info->fprintf_func) (info->stream, "]");
                }
 
-             else 
-               (*info->fprintf_func) (info->stream, "%d", value);
+             else
+               (*info->fprintf_func) (info->stream, "%ld", (long) value);
            }
          /* All done. */
          break;
@@ -686,8 +570,185 @@ disassemble (memaddr, info, insn, size)
     }
 
   if (!match)
+    /* xgettext:c-format */
+    (*info->fprintf_func) (info->stream, _("unknown\t0x%04lx"), insn);
+}
+
+int
+print_insn_mn10300 (bfd_vma memaddr, struct disassemble_info *info)
+{
+  int status;
+  bfd_byte buffer[4];
+  unsigned long insn;
+  unsigned int consume;
+
+  /* First figure out how big the opcode is.  */
+  status = (*info->read_memory_func) (memaddr, buffer, 1, info);
+  if (status != 0)
+    {
+      (*info->memory_error_func) (status, memaddr, info);
+      return -1;
+    }
+  insn = *(unsigned char *) buffer;
+
+  /* These are one byte insns.  */
+  if ((insn & 0xf3) == 0x00
+      || (insn & 0xf0) == 0x10
+      || (insn & 0xfc) == 0x3c
+      || (insn & 0xf3) == 0x41
+      || (insn & 0xf3) == 0x40
+      || (insn & 0xfc) == 0x50
+      || (insn & 0xfc) == 0x54
+      || (insn & 0xf0) == 0x60
+      || (insn & 0xf0) == 0x70
+      || ((insn & 0xf0) == 0x80
+         && (insn & 0x0c) >> 2 != (insn & 0x03))
+      || ((insn & 0xf0) == 0x90
+         && (insn & 0x0c) >> 2 != (insn & 0x03))
+      || ((insn & 0xf0) == 0xa0
+         && (insn & 0x0c) >> 2 != (insn & 0x03))
+      || ((insn & 0xf0) == 0xb0
+         && (insn & 0x0c) >> 2 != (insn & 0x03))
+      || (insn & 0xff) == 0xcb
+      || (insn & 0xfc) == 0xd0
+      || (insn & 0xfc) == 0xd4
+      || (insn & 0xfc) == 0xd8
+      || (insn & 0xf0) == 0xe0
+      || (insn & 0xff) == 0xff)
+    {
+      consume = 1;
+    }
+
+  /* These are two byte insns.  */
+  else if ((insn & 0xf0) == 0x80
+          || (insn & 0xf0) == 0x90
+          || (insn & 0xf0) == 0xa0
+          || (insn & 0xf0) == 0xb0
+          || (insn & 0xfc) == 0x20
+          || (insn & 0xfc) == 0x28
+          || (insn & 0xf3) == 0x43
+          || (insn & 0xf3) == 0x42
+          || (insn & 0xfc) == 0x58
+          || (insn & 0xfc) == 0x5c
+          || ((insn & 0xf0) == 0xc0
+              && (insn & 0xff) != 0xcb
+              && (insn & 0xff) != 0xcc
+              && (insn & 0xff) != 0xcd)
+          || (insn & 0xff) == 0xf0
+          || (insn & 0xff) == 0xf1
+          || (insn & 0xff) == 0xf2
+          || (insn & 0xff) == 0xf3
+          || (insn & 0xff) == 0xf4
+          || (insn & 0xff) == 0xf5
+          || (insn & 0xff) == 0xf6)
+    {
+      status = (*info->read_memory_func) (memaddr, buffer, 2, info);
+      if (status != 0)
+       {
+         (*info->memory_error_func) (status, memaddr, info);
+         return -1;
+       }
+      insn = bfd_getb16 (buffer);
+      consume = 2;
+    }
+
+  /* These are three byte insns.  */
+  else if ((insn & 0xff) == 0xf8
+          || (insn & 0xff) == 0xcc
+          || (insn & 0xff) == 0xf9
+          || (insn & 0xf3) == 0x01
+          || (insn & 0xf3) == 0x02
+          || (insn & 0xf3) == 0x03
+          || (insn & 0xfc) == 0x24
+          || (insn & 0xfc) == 0x2c
+          || (insn & 0xfc) == 0x30
+          || (insn & 0xfc) == 0x34
+          || (insn & 0xfc) == 0x38
+          || (insn & 0xff) == 0xde
+          || (insn & 0xff) == 0xdf
+          || (insn & 0xff) == 0xf9
+          || (insn & 0xff) == 0xcc)
+    {
+      status = (*info->read_memory_func) (memaddr, buffer, 2, info);
+      if (status != 0)
+       {
+         (*info->memory_error_func) (status, memaddr, info);
+         return -1;
+       }
+      insn = bfd_getb16 (buffer);
+      insn <<= 8;
+      status = (*info->read_memory_func) (memaddr + 2, buffer, 1, info);
+      if (status != 0)
+       {
+         (*info->memory_error_func) (status, memaddr, info);
+         return -1;
+       }
+      insn |= *(unsigned char *) buffer;
+      consume = 3;
+    }
+
+  /* These are four byte insns.  */
+  else if ((insn & 0xff) == 0xfa
+          || (insn & 0xff) == 0xf7
+          || (insn & 0xff) == 0xfb)
+    {
+      status = (*info->read_memory_func) (memaddr, buffer, 4, info);
+      if (status != 0)
+       {
+         (*info->memory_error_func) (status, memaddr, info);
+         return -1;
+       }
+      insn = bfd_getb32 (buffer);
+      consume = 4;
+    }
+
+  /* These are five byte insns.  */
+  else if ((insn & 0xff) == 0xcd
+          || (insn & 0xff) == 0xdc)
     {
-      /* xgettext:c-format */
-      (*info->fprintf_func) (info->stream, _("unknown\t0x%04x"), insn);
+      status = (*info->read_memory_func) (memaddr, buffer, 4, info);
+      if (status != 0)
+       {
+         (*info->memory_error_func) (status, memaddr, info);
+         return -1;
+       }
+      insn = bfd_getb32 (buffer);
+      consume = 5;
     }
+
+  /* These are six byte insns.  */
+  else if ((insn & 0xff) == 0xfd
+          || (insn & 0xff) == 0xfc)
+    {
+      status = (*info->read_memory_func) (memaddr, buffer, 4, info);
+      if (status != 0)
+       {
+         (*info->memory_error_func) (status, memaddr, info);
+         return -1;
+       }
+
+      insn = bfd_getb32 (buffer);
+      consume = 6;
+    }
+
+  /* Else its a seven byte insns (in theory).  */
+  else
+    {
+      status = (*info->read_memory_func) (memaddr, buffer, 4, info);
+      if (status != 0)
+       {
+         (*info->memory_error_func) (status, memaddr, info);
+         return -1;
+       }
+
+      insn = bfd_getb32 (buffer);
+      consume = 7;
+      /* Handle the 5-byte extended instruction codes.  */
+      if ((insn & 0xfff80000) == 0xfe800000)
+       consume = 5;
+    }
+
+  disassemble (memaddr, info, insn, consume);
+
+  return consume;
 }
This page took 0.036368 seconds and 4 git commands to generate.