Correct comment on first line of file.

diff --git a/opcodes/ChangeLog b/opcodes/ChangeLog
index 94847d4..9781edb 100644 (file)
--- a/opcodes/ChangeLog
+++ b/opcodes/ChangeLog
@@ -1,10 +1,17 @@
+Wed Aug 30 11:09:38 1995  Jim Wilson  <wilson@chestnut.cygnus.com>
+
+       * sh-dis.c: Correct comment on first line of file.
+
 Tue Aug 29 15:37:18 1995  Doug Evans  <dje@canuck.cygnus.com>
 
        * disassemble.c (disassembler): Handle bfd_mach_sparc64.
 
-       * sparc-opc.c (asi): New static local.
-       (sparc_{encode,decode}_asi): New functions.
+       * sparc-opc.c (asi, membar): New static locals.
+       (sparc_{encode,decode}_{asi,membar}): New functions.
+       (sparc_opcodes, membar insn): Fix.
        * sparc-dis.c (print_insn): Call sparc_decode_asi.
+       Support decoding of membar masks.
+       (X_MEMBAR): Define.
 
 Sat Aug 26 21:22:48 1995  Ian Lance Taylor  <ian@cygnus.com>
 

diff --git a/opcodes/sh-dis.c b/opcodes/sh-dis.c
new file mode 100644 (file)
index 0000000..65570ba
--- /dev/null
+++ b/opcodes/sh-dis.c
@@ -0,0 +1,290 @@
+/* Disassemble SH instructions.
+   Copyright (C) 1993, 1995 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 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.
+
+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.  */
+
+#include <stdio.h>
+#define STATIC_TABLE
+#define DEFINE_TABLE
+
+#include "sh-opc.h"
+#include "dis-asm.h"
+
+#define LITTLE_BIT 2
+
+static int 
+print_insn_shx(memaddr, info)
+     bfd_vma memaddr;
+     struct disassemble_info *info;
+{
+  fprintf_ftype fprintf = info->fprintf_func;
+  void *stream = info->stream;
+  unsigned  char insn[2];
+  unsigned  char nibs[4];
+  int status;
+  int relmask = ~0;
+  sh_opcode_info *op;
+  
+  status = info->read_memory_func(memaddr, insn, 2, info);
+
+  if (status != 0) 
+    {
+      info->memory_error_func(status, memaddr, info);
+      return -1;
+    }
+
+
+
+  if (info->flags & LITTLE_BIT) 
+    {
+      nibs[0] = (insn[1] >> 4) & 0xf;
+      nibs[1] = insn[1] & 0xf;
+
+      nibs[2] = (insn[0] >> 4) & 0xf;
+      nibs[3] = insn[0] & 0xf;
+    }
+  else 
+    {
+      nibs[0] = (insn[0] >> 4) & 0xf;
+      nibs[1] = insn[0] & 0xf;
+
+      nibs[2] = (insn[1] >> 4) & 0xf;
+      nibs[3] = insn[1] & 0xf;
+    }
+
+  for (op = sh_table; op->name; op++) 
+    {
+      int n;
+      int imm;
+      int rn;
+      int rm;
+      for (n = 0; n < 4; n++) {
+       int i = op->nibbles[n];
+       if (i < 16) 
+         {
+           if (nibs[n] == i) continue;
+           goto fail;
+         }
+       switch (i)
+         {
+         case BRANCH_8:
+           imm = (nibs[2] << 4) | (nibs[3]);     
+           if (imm & 0x80)
+             imm |= ~0xff;
+           imm = ((char)imm) * 2 + 4 ;
+           goto ok;
+
+         case BRANCH_12:
+           imm = ((nibs[1]) << 8) | (nibs[2] << 4) | (nibs[3]);
+           if (imm & 0x800)
+             imm |= ~0xfff;
+           imm = imm * 2 + 4;
+           goto ok;
+         case IMM_4:
+           imm = nibs[3];
+           goto ok;
+         case IMM_4BY2:
+           imm = nibs[3] <<1;
+           goto ok;
+         case IMM_4BY4:
+           imm = nibs[3] <<2;
+           goto ok;
+
+           
+         case IMM_8:
+           imm = (nibs[2] << 4) | nibs[3];
+           goto ok;
+         case PCRELIMM_8BY2:
+           imm = ((nibs[2] << 4) | nibs[3]) <<1;
+           relmask  = ~1;
+           
+           goto ok;
+
+         case PCRELIMM_8BY4:
+           imm = ((nibs[2] << 4) | nibs[3]) <<2;
+           relmask  = ~3;          
+           goto ok;
+           
+         case IMM_8BY2:
+           imm = ((nibs[2] << 4) | nibs[3]) <<1;
+           goto ok;
+         case IMM_8BY4:
+           imm = ((nibs[2] << 4) | nibs[3]) <<2;
+           goto ok;
+         case DISP_8:
+           imm = (nibs[2] << 4) | (nibs[3]);     
+           goto ok;
+         case DISP_4:
+           imm = nibs[3];
+           goto ok;
+         case REG_N:
+           rn = nibs[n];
+           break;
+         case REG_M:
+           rm = nibs[n];
+           break;
+         default:
+           abort();
+         }
+
+      }
+    ok:
+      fprintf(stream,"%s\t", op->name);
+      for (n = 0; n < 2 && op->arg[n] != A_END; n++) 
+       {
+         if (n && op->arg[1] != A_END)
+           fprintf(stream,",");
+         switch (op->arg[n]) 
+           {
+           case A_IMM:
+             fprintf(stream,"#%d", (char)(imm));
+             break;
+           case A_R0:
+             fprintf(stream,"r0");
+             break;
+           case A_REG_N:
+             fprintf(stream,"r%d", rn);
+             break;
+           case A_INC_N:
+             fprintf(stream,"@r%d+", rn);      
+             break;
+           case A_DEC_N:
+             fprintf(stream,"@-r%d", rn);      
+             break;
+           case A_IND_N:
+             fprintf(stream,"@r%d", rn);       
+             break;
+           case A_DISP_REG_N:
+             fprintf(stream,"@(%d,r%d)",imm, rn);      
+             break;
+           case A_REG_M:
+             fprintf(stream,"r%d", rm);
+             break;
+           case A_INC_M:
+             fprintf(stream,"@r%d+", rm);      
+             break;
+           case A_DEC_M:
+             fprintf(stream,"@-r%d", rm);      
+             break;
+           case A_IND_M:
+             fprintf(stream,"@r%d", rm);       
+             break;
+           case A_DISP_REG_M:
+             fprintf(stream,"@(%d,r%d)",imm, rm);      
+             break;
+           case A_DISP_PC:
+             fprintf(stream,"0x%0x", imm+ 4+(memaddr&relmask));
+             break;
+           case A_IND_R0_REG_N:
+             fprintf(stream,"@(r0,r%d)", rn);
+             break; 
+           case A_IND_R0_REG_M:
+             fprintf(stream,"@(r0,r%d)", rm);
+             break; 
+           case A_DISP_GBR:
+             fprintf(stream,"@(%d,gbr)",imm);
+             break;
+           case A_R0_GBR:
+             fprintf(stream,"@(r0,gbr)");
+             break;
+           case A_BDISP12:
+           case A_BDISP8:
+             (*info->print_address_func) (imm + memaddr, info);
+             break;
+           case A_SR:
+             fprintf(stream,"sr");
+             break;
+           case A_GBR:
+             fprintf(stream,"gbr");
+             break;
+           case A_VBR:
+             fprintf(stream,"vbr");
+             break;
+           case A_MACH:
+             fprintf(stream,"mach");
+             break;
+           case A_MACL:
+             fprintf(stream,"macl");
+             break;
+           case A_PR:
+             fprintf(stream,"pr");
+             break;
+/* start-sanitize-sh3e */
+           case F_REG_N:
+             fprintf(stream,"fr%d", rn);
+             break;
+           case F_REG_M:
+             fprintf(stream,"fr%d", rm);
+             break;
+           case FPSCR_M:
+           case FPSCR_N:
+             fprintf(stream,"fpscr");
+             break;
+           case FPUL_M:
+           case FPUL_N:
+             fprintf(stream,"fpul");
+             break;
+/* end-sanitize-sh3e */
+           default:
+             abort();
+           }
+       
+       }
+      if (!(info->flags & 1)
+         && (op->name[0] == 'j'
+             || (op->name[0] == 'b'
+                 && (op->name[1] == 'r' 
+                     || op->name[1] == 's'))
+             || (op->name[0] == 'r' && op->name[1] == 't')
+             || (op->name[0] == 'b' && op->name[2] == '.')))
+       {
+         info->flags |= 1;
+         fprintf(stream,"\t(slot ");  print_insn_shx(memaddr +2, info);
+         info->flags &= ~1;
+         fprintf(stream,")");
+         return 4;
+       }
+      
+      return 2;
+    fail:
+      ;
+
+    }
+  fprintf(stream,".word 0x%x%x%x%x", nibs[0], nibs[1], nibs[2], nibs[3]);
+  return 2;
+}
+
+
+int 
+print_insn_shl(memaddr, info)
+     bfd_vma memaddr;
+     struct disassemble_info *info;
+{
+  int r;
+  info->flags = LITTLE_BIT;
+  r =print_insn_shx (memaddr, info);
+  return r;
+}
+
+int 
+print_insn_sh(memaddr, info)
+     bfd_vma memaddr;
+     struct disassemble_info *info;
+{
+  int r;
+  info->flags = 0;
+  r =print_insn_shx (memaddr, info);
+  return r;
+}