OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [opcodes/] [mips-dis.c] - Diff between revs 827 and 840

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 827 Rev 840
/* Print mips instructions for GDB, the GNU debugger, or for objdump.
/* Print mips instructions for GDB, the GNU debugger, or for objdump.
   Copyright 1989, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
   Copyright 1989, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999,
   2000, 2001, 2002, 2003, 2005, 2006, 2007, 2008, 2009
   2000, 2001, 2002, 2003, 2005, 2006, 2007, 2008, 2009
   Free Software Foundation, Inc.
   Free Software Foundation, Inc.
   Contributed by Nobuyuki Hikichi(hikichi@sra.co.jp).
   Contributed by Nobuyuki Hikichi(hikichi@sra.co.jp).
 
 
   This file is part of the GNU opcodes library.
   This file is part of the GNU opcodes library.
 
 
   This library is free software; you can redistribute it and/or modify
   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
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 3, or (at your option)
   the Free Software Foundation; either version 3, or (at your option)
   any later version.
   any later version.
 
 
   It is distributed in the hope that it will be useful, but WITHOUT
   It is distributed in the hope that it will be useful, but WITHOUT
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
   or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
   or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
   License for more details.
   License for more details.
 
 
   You should have received a copy of the GNU General Public License
   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   along with this program; if not, write to the Free Software
   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
   MA 02110-1301, USA.  */
   MA 02110-1301, USA.  */
 
 
#include "sysdep.h"
#include "sysdep.h"
#include "dis-asm.h"
#include "dis-asm.h"
#include "libiberty.h"
#include "libiberty.h"
#include "opcode/mips.h"
#include "opcode/mips.h"
#include "opintl.h"
#include "opintl.h"
 
 
/* FIXME: These are needed to figure out if the code is mips16 or
/* FIXME: These are needed to figure out if the code is mips16 or
   not. The low bit of the address is often a good indicator.  No
   not. The low bit of the address is often a good indicator.  No
   symbol table is available when this code runs out in an embedded
   symbol table is available when this code runs out in an embedded
   system as when it is used for disassembler support in a monitor.  */
   system as when it is used for disassembler support in a monitor.  */
 
 
#if !defined(EMBEDDED_ENV)
#if !defined(EMBEDDED_ENV)
#define SYMTAB_AVAILABLE 1
#define SYMTAB_AVAILABLE 1
#include "elf-bfd.h"
#include "elf-bfd.h"
#include "elf/mips.h"
#include "elf/mips.h"
#endif
#endif
 
 
/* Mips instructions are at maximum this many bytes long.  */
/* Mips instructions are at maximum this many bytes long.  */
#define INSNLEN 4
#define INSNLEN 4
 
 


/* FIXME: These should be shared with gdb somehow.  */
/* FIXME: These should be shared with gdb somehow.  */
 
 
struct mips_cp0sel_name
struct mips_cp0sel_name
{
{
  unsigned int cp0reg;
  unsigned int cp0reg;
  unsigned int sel;
  unsigned int sel;
  const char * const name;
  const char * const name;
};
};
 
 
/* The mips16 registers.  */
/* The mips16 registers.  */
static const unsigned int mips16_to_32_reg_map[] =
static const unsigned int mips16_to_32_reg_map[] =
{
{
  16, 17, 2, 3, 4, 5, 6, 7
  16, 17, 2, 3, 4, 5, 6, 7
};
};
 
 
#define mips16_reg_names(rn)    mips_gpr_names[mips16_to_32_reg_map[rn]]
#define mips16_reg_names(rn)    mips_gpr_names[mips16_to_32_reg_map[rn]]
 
 
 
 
static const char * const mips_gpr_names_numeric[32] =
static const char * const mips_gpr_names_numeric[32] =
{
{
  "$0",   "$1",   "$2",   "$3",   "$4",   "$5",   "$6",   "$7",
  "$0",   "$1",   "$2",   "$3",   "$4",   "$5",   "$6",   "$7",
  "$8",   "$9",   "$10",  "$11",  "$12",  "$13",  "$14",  "$15",
  "$8",   "$9",   "$10",  "$11",  "$12",  "$13",  "$14",  "$15",
  "$16",  "$17",  "$18",  "$19",  "$20",  "$21",  "$22",  "$23",
  "$16",  "$17",  "$18",  "$19",  "$20",  "$21",  "$22",  "$23",
  "$24",  "$25",  "$26",  "$27",  "$28",  "$29",  "$30",  "$31"
  "$24",  "$25",  "$26",  "$27",  "$28",  "$29",  "$30",  "$31"
};
};
 
 
static const char * const mips_gpr_names_oldabi[32] =
static const char * const mips_gpr_names_oldabi[32] =
{
{
  "zero", "at",   "v0",   "v1",   "a0",   "a1",   "a2",   "a3",
  "zero", "at",   "v0",   "v1",   "a0",   "a1",   "a2",   "a3",
  "t0",   "t1",   "t2",   "t3",   "t4",   "t5",   "t6",   "t7",
  "t0",   "t1",   "t2",   "t3",   "t4",   "t5",   "t6",   "t7",
  "s0",   "s1",   "s2",   "s3",   "s4",   "s5",   "s6",   "s7",
  "s0",   "s1",   "s2",   "s3",   "s4",   "s5",   "s6",   "s7",
  "t8",   "t9",   "k0",   "k1",   "gp",   "sp",   "s8",   "ra"
  "t8",   "t9",   "k0",   "k1",   "gp",   "sp",   "s8",   "ra"
};
};
 
 
static const char * const mips_gpr_names_newabi[32] =
static const char * const mips_gpr_names_newabi[32] =
{
{
  "zero", "at",   "v0",   "v1",   "a0",   "a1",   "a2",   "a3",
  "zero", "at",   "v0",   "v1",   "a0",   "a1",   "a2",   "a3",
  "a4",   "a5",   "a6",   "a7",   "t0",   "t1",   "t2",   "t3",
  "a4",   "a5",   "a6",   "a7",   "t0",   "t1",   "t2",   "t3",
  "s0",   "s1",   "s2",   "s3",   "s4",   "s5",   "s6",   "s7",
  "s0",   "s1",   "s2",   "s3",   "s4",   "s5",   "s6",   "s7",
  "t8",   "t9",   "k0",   "k1",   "gp",   "sp",   "s8",   "ra"
  "t8",   "t9",   "k0",   "k1",   "gp",   "sp",   "s8",   "ra"
};
};
 
 
static const char * const mips_fpr_names_numeric[32] =
static const char * const mips_fpr_names_numeric[32] =
{
{
  "$f0",  "$f1",  "$f2",  "$f3",  "$f4",  "$f5",  "$f6",  "$f7",
  "$f0",  "$f1",  "$f2",  "$f3",  "$f4",  "$f5",  "$f6",  "$f7",
  "$f8",  "$f9",  "$f10", "$f11", "$f12", "$f13", "$f14", "$f15",
  "$f8",  "$f9",  "$f10", "$f11", "$f12", "$f13", "$f14", "$f15",
  "$f16", "$f17", "$f18", "$f19", "$f20", "$f21", "$f22", "$f23",
  "$f16", "$f17", "$f18", "$f19", "$f20", "$f21", "$f22", "$f23",
  "$f24", "$f25", "$f26", "$f27", "$f28", "$f29", "$f30", "$f31"
  "$f24", "$f25", "$f26", "$f27", "$f28", "$f29", "$f30", "$f31"
};
};
 
 
static const char * const mips_fpr_names_32[32] =
static const char * const mips_fpr_names_32[32] =
{
{
  "fv0",  "fv0f", "fv1",  "fv1f", "ft0",  "ft0f", "ft1",  "ft1f",
  "fv0",  "fv0f", "fv1",  "fv1f", "ft0",  "ft0f", "ft1",  "ft1f",
  "ft2",  "ft2f", "ft3",  "ft3f", "fa0",  "fa0f", "fa1",  "fa1f",
  "ft2",  "ft2f", "ft3",  "ft3f", "fa0",  "fa0f", "fa1",  "fa1f",
  "ft4",  "ft4f", "ft5",  "ft5f", "fs0",  "fs0f", "fs1",  "fs1f",
  "ft4",  "ft4f", "ft5",  "ft5f", "fs0",  "fs0f", "fs1",  "fs1f",
  "fs2",  "fs2f", "fs3",  "fs3f", "fs4",  "fs4f", "fs5",  "fs5f"
  "fs2",  "fs2f", "fs3",  "fs3f", "fs4",  "fs4f", "fs5",  "fs5f"
};
};
 
 
static const char * const mips_fpr_names_n32[32] =
static const char * const mips_fpr_names_n32[32] =
{
{
  "fv0",  "ft14", "fv1",  "ft15", "ft0",  "ft1",  "ft2",  "ft3",
  "fv0",  "ft14", "fv1",  "ft15", "ft0",  "ft1",  "ft2",  "ft3",
  "ft4",  "ft5",  "ft6",  "ft7",  "fa0",  "fa1",  "fa2",  "fa3",
  "ft4",  "ft5",  "ft6",  "ft7",  "fa0",  "fa1",  "fa2",  "fa3",
  "fa4",  "fa5",  "fa6",  "fa7",  "fs0",  "ft8",  "fs1",  "ft9",
  "fa4",  "fa5",  "fa6",  "fa7",  "fs0",  "ft8",  "fs1",  "ft9",
  "fs2",  "ft10", "fs3",  "ft11", "fs4",  "ft12", "fs5",  "ft13"
  "fs2",  "ft10", "fs3",  "ft11", "fs4",  "ft12", "fs5",  "ft13"
};
};
 
 
static const char * const mips_fpr_names_64[32] =
static const char * const mips_fpr_names_64[32] =
{
{
  "fv0",  "ft12", "fv1",  "ft13", "ft0",  "ft1",  "ft2",  "ft3",
  "fv0",  "ft12", "fv1",  "ft13", "ft0",  "ft1",  "ft2",  "ft3",
  "ft4",  "ft5",  "ft6",  "ft7",  "fa0",  "fa1",  "fa2",  "fa3",
  "ft4",  "ft5",  "ft6",  "ft7",  "fa0",  "fa1",  "fa2",  "fa3",
  "fa4",  "fa5",  "fa6",  "fa7",  "ft8",  "ft9",  "ft10", "ft11",
  "fa4",  "fa5",  "fa6",  "fa7",  "ft8",  "ft9",  "ft10", "ft11",
  "fs0",  "fs1",  "fs2",  "fs3",  "fs4",  "fs5",  "fs6",  "fs7"
  "fs0",  "fs1",  "fs2",  "fs3",  "fs4",  "fs5",  "fs6",  "fs7"
};
};
 
 
static const char * const mips_cp0_names_numeric[32] =
static const char * const mips_cp0_names_numeric[32] =
{
{
  "$0",   "$1",   "$2",   "$3",   "$4",   "$5",   "$6",   "$7",
  "$0",   "$1",   "$2",   "$3",   "$4",   "$5",   "$6",   "$7",
  "$8",   "$9",   "$10",  "$11",  "$12",  "$13",  "$14",  "$15",
  "$8",   "$9",   "$10",  "$11",  "$12",  "$13",  "$14",  "$15",
  "$16",  "$17",  "$18",  "$19",  "$20",  "$21",  "$22",  "$23",
  "$16",  "$17",  "$18",  "$19",  "$20",  "$21",  "$22",  "$23",
  "$24",  "$25",  "$26",  "$27",  "$28",  "$29",  "$30",  "$31"
  "$24",  "$25",  "$26",  "$27",  "$28",  "$29",  "$30",  "$31"
};
};
 
 
static const char * const mips_cp0_names_r3000[32] =
static const char * const mips_cp0_names_r3000[32] =
{
{
  "c0_index",     "c0_random",    "c0_entrylo",   "$3",
  "c0_index",     "c0_random",    "c0_entrylo",   "$3",
  "c0_context",   "$5",           "$6",           "$7",
  "c0_context",   "$5",           "$6",           "$7",
  "c0_badvaddr",  "$9",           "c0_entryhi",   "$11",
  "c0_badvaddr",  "$9",           "c0_entryhi",   "$11",
  "c0_sr",        "c0_cause",     "c0_epc",       "c0_prid",
  "c0_sr",        "c0_cause",     "c0_epc",       "c0_prid",
  "$16",          "$17",          "$18",          "$19",
  "$16",          "$17",          "$18",          "$19",
  "$20",          "$21",          "$22",          "$23",
  "$20",          "$21",          "$22",          "$23",
  "$24",          "$25",          "$26",          "$27",
  "$24",          "$25",          "$26",          "$27",
  "$28",          "$29",          "$30",          "$31",
  "$28",          "$29",          "$30",          "$31",
};
};
 
 
static const char * const mips_cp0_names_r4000[32] =
static const char * const mips_cp0_names_r4000[32] =
{
{
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_context",   "c0_pagemask",  "c0_wired",     "$7",
  "c0_context",   "c0_pagemask",  "c0_wired",     "$7",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_sr",        "c0_cause",     "c0_epc",       "c0_prid",
  "c0_sr",        "c0_cause",     "c0_epc",       "c0_prid",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_xcontext",  "$21",          "$22",          "$23",
  "c0_xcontext",  "$21",          "$22",          "$23",
  "$24",          "$25",          "c0_ecc",       "c0_cacheerr",
  "$24",          "$25",          "c0_ecc",       "c0_cacheerr",
  "c0_taglo",     "c0_taghi",     "c0_errorepc",  "$31",
  "c0_taglo",     "c0_taghi",     "c0_errorepc",  "$31",
};
};
 
 
static const char * const mips_cp0_names_mips3264[32] =
static const char * const mips_cp0_names_mips3264[32] =
{
{
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_context",   "c0_pagemask",  "c0_wired",     "$7",
  "c0_context",   "c0_pagemask",  "c0_wired",     "$7",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_status",    "c0_cause",     "c0_epc",       "c0_prid",
  "c0_status",    "c0_cause",     "c0_epc",       "c0_prid",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_xcontext",  "$21",          "$22",          "c0_debug",
  "c0_xcontext",  "$21",          "$22",          "c0_debug",
  "c0_depc",      "c0_perfcnt",   "c0_errctl",    "c0_cacheerr",
  "c0_depc",      "c0_perfcnt",   "c0_errctl",    "c0_cacheerr",
  "c0_taglo",     "c0_taghi",     "c0_errorepc",  "c0_desave",
  "c0_taglo",     "c0_taghi",     "c0_errorepc",  "c0_desave",
};
};
 
 
static const struct mips_cp0sel_name mips_cp0sel_names_mips3264[] =
static const struct mips_cp0sel_name mips_cp0sel_names_mips3264[] =
{
{
  { 16, 1, "c0_config1"         },
  { 16, 1, "c0_config1"         },
  { 16, 2, "c0_config2"         },
  { 16, 2, "c0_config2"         },
  { 16, 3, "c0_config3"         },
  { 16, 3, "c0_config3"         },
  { 18, 1, "c0_watchlo,1"       },
  { 18, 1, "c0_watchlo,1"       },
  { 18, 2, "c0_watchlo,2"       },
  { 18, 2, "c0_watchlo,2"       },
  { 18, 3, "c0_watchlo,3"       },
  { 18, 3, "c0_watchlo,3"       },
  { 18, 4, "c0_watchlo,4"       },
  { 18, 4, "c0_watchlo,4"       },
  { 18, 5, "c0_watchlo,5"       },
  { 18, 5, "c0_watchlo,5"       },
  { 18, 6, "c0_watchlo,6"       },
  { 18, 6, "c0_watchlo,6"       },
  { 18, 7, "c0_watchlo,7"       },
  { 18, 7, "c0_watchlo,7"       },
  { 19, 1, "c0_watchhi,1"       },
  { 19, 1, "c0_watchhi,1"       },
  { 19, 2, "c0_watchhi,2"       },
  { 19, 2, "c0_watchhi,2"       },
  { 19, 3, "c0_watchhi,3"       },
  { 19, 3, "c0_watchhi,3"       },
  { 19, 4, "c0_watchhi,4"       },
  { 19, 4, "c0_watchhi,4"       },
  { 19, 5, "c0_watchhi,5"       },
  { 19, 5, "c0_watchhi,5"       },
  { 19, 6, "c0_watchhi,6"       },
  { 19, 6, "c0_watchhi,6"       },
  { 19, 7, "c0_watchhi,7"       },
  { 19, 7, "c0_watchhi,7"       },
  { 25, 1, "c0_perfcnt,1"       },
  { 25, 1, "c0_perfcnt,1"       },
  { 25, 2, "c0_perfcnt,2"       },
  { 25, 2, "c0_perfcnt,2"       },
  { 25, 3, "c0_perfcnt,3"       },
  { 25, 3, "c0_perfcnt,3"       },
  { 25, 4, "c0_perfcnt,4"       },
  { 25, 4, "c0_perfcnt,4"       },
  { 25, 5, "c0_perfcnt,5"       },
  { 25, 5, "c0_perfcnt,5"       },
  { 25, 6, "c0_perfcnt,6"       },
  { 25, 6, "c0_perfcnt,6"       },
  { 25, 7, "c0_perfcnt,7"       },
  { 25, 7, "c0_perfcnt,7"       },
  { 27, 1, "c0_cacheerr,1"      },
  { 27, 1, "c0_cacheerr,1"      },
  { 27, 2, "c0_cacheerr,2"      },
  { 27, 2, "c0_cacheerr,2"      },
  { 27, 3, "c0_cacheerr,3"      },
  { 27, 3, "c0_cacheerr,3"      },
  { 28, 1, "c0_datalo"          },
  { 28, 1, "c0_datalo"          },
  { 29, 1, "c0_datahi"          }
  { 29, 1, "c0_datahi"          }
};
};
 
 
static const char * const mips_cp0_names_mips3264r2[32] =
static const char * const mips_cp0_names_mips3264r2[32] =
{
{
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_context",   "c0_pagemask",  "c0_wired",     "c0_hwrena",
  "c0_context",   "c0_pagemask",  "c0_wired",     "c0_hwrena",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_status",    "c0_cause",     "c0_epc",       "c0_prid",
  "c0_status",    "c0_cause",     "c0_epc",       "c0_prid",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_xcontext",  "$21",          "$22",          "c0_debug",
  "c0_xcontext",  "$21",          "$22",          "c0_debug",
  "c0_depc",      "c0_perfcnt",   "c0_errctl",    "c0_cacheerr",
  "c0_depc",      "c0_perfcnt",   "c0_errctl",    "c0_cacheerr",
  "c0_taglo",     "c0_taghi",     "c0_errorepc",  "c0_desave",
  "c0_taglo",     "c0_taghi",     "c0_errorepc",  "c0_desave",
};
};
 
 
static const struct mips_cp0sel_name mips_cp0sel_names_mips3264r2[] =
static const struct mips_cp0sel_name mips_cp0sel_names_mips3264r2[] =
{
{
  {  4, 1, "c0_contextconfig"   },
  {  4, 1, "c0_contextconfig"   },
  {  0, 1, "c0_mvpcontrol"       },
  {  0, 1, "c0_mvpcontrol"       },
  {  0, 2, "c0_mvpconf0" },
  {  0, 2, "c0_mvpconf0" },
  {  0, 3, "c0_mvpconf1" },
  {  0, 3, "c0_mvpconf1" },
  {  1, 1, "c0_vpecontrol"      },
  {  1, 1, "c0_vpecontrol"      },
  {  1, 2, "c0_vpeconf0"        },
  {  1, 2, "c0_vpeconf0"        },
  {  1, 3, "c0_vpeconf1"        },
  {  1, 3, "c0_vpeconf1"        },
  {  1, 4, "c0_yqmask"          },
  {  1, 4, "c0_yqmask"          },
  {  1, 5, "c0_vpeschedule"     },
  {  1, 5, "c0_vpeschedule"     },
  {  1, 6, "c0_vpeschefback"    },
  {  1, 6, "c0_vpeschefback"    },
  {  2, 1, "c0_tcstatus"        },
  {  2, 1, "c0_tcstatus"        },
  {  2, 2, "c0_tcbind"          },
  {  2, 2, "c0_tcbind"          },
  {  2, 3, "c0_tcrestart"       },
  {  2, 3, "c0_tcrestart"       },
  {  2, 4, "c0_tchalt"          },
  {  2, 4, "c0_tchalt"          },
  {  2, 5, "c0_tccontext"       },
  {  2, 5, "c0_tccontext"       },
  {  2, 6, "c0_tcschedule"      },
  {  2, 6, "c0_tcschedule"      },
  {  2, 7, "c0_tcschefback"     },
  {  2, 7, "c0_tcschefback"     },
  {  5, 1, "c0_pagegrain"       },
  {  5, 1, "c0_pagegrain"       },
  {  6, 1, "c0_srsconf0"        },
  {  6, 1, "c0_srsconf0"        },
  {  6, 2, "c0_srsconf1"        },
  {  6, 2, "c0_srsconf1"        },
  {  6, 3, "c0_srsconf2"        },
  {  6, 3, "c0_srsconf2"        },
  {  6, 4, "c0_srsconf3"        },
  {  6, 4, "c0_srsconf3"        },
  {  6, 5, "c0_srsconf4"        },
  {  6, 5, "c0_srsconf4"        },
  { 12, 1, "c0_intctl"          },
  { 12, 1, "c0_intctl"          },
  { 12, 2, "c0_srsctl"          },
  { 12, 2, "c0_srsctl"          },
  { 12, 3, "c0_srsmap"          },
  { 12, 3, "c0_srsmap"          },
  { 15, 1, "c0_ebase"           },
  { 15, 1, "c0_ebase"           },
  { 16, 1, "c0_config1"         },
  { 16, 1, "c0_config1"         },
  { 16, 2, "c0_config2"         },
  { 16, 2, "c0_config2"         },
  { 16, 3, "c0_config3"         },
  { 16, 3, "c0_config3"         },
  { 18, 1, "c0_watchlo,1"       },
  { 18, 1, "c0_watchlo,1"       },
  { 18, 2, "c0_watchlo,2"       },
  { 18, 2, "c0_watchlo,2"       },
  { 18, 3, "c0_watchlo,3"       },
  { 18, 3, "c0_watchlo,3"       },
  { 18, 4, "c0_watchlo,4"       },
  { 18, 4, "c0_watchlo,4"       },
  { 18, 5, "c0_watchlo,5"       },
  { 18, 5, "c0_watchlo,5"       },
  { 18, 6, "c0_watchlo,6"       },
  { 18, 6, "c0_watchlo,6"       },
  { 18, 7, "c0_watchlo,7"       },
  { 18, 7, "c0_watchlo,7"       },
  { 19, 1, "c0_watchhi,1"       },
  { 19, 1, "c0_watchhi,1"       },
  { 19, 2, "c0_watchhi,2"       },
  { 19, 2, "c0_watchhi,2"       },
  { 19, 3, "c0_watchhi,3"       },
  { 19, 3, "c0_watchhi,3"       },
  { 19, 4, "c0_watchhi,4"       },
  { 19, 4, "c0_watchhi,4"       },
  { 19, 5, "c0_watchhi,5"       },
  { 19, 5, "c0_watchhi,5"       },
  { 19, 6, "c0_watchhi,6"       },
  { 19, 6, "c0_watchhi,6"       },
  { 19, 7, "c0_watchhi,7"       },
  { 19, 7, "c0_watchhi,7"       },
  { 23, 1, "c0_tracecontrol"    },
  { 23, 1, "c0_tracecontrol"    },
  { 23, 2, "c0_tracecontrol2"   },
  { 23, 2, "c0_tracecontrol2"   },
  { 23, 3, "c0_usertracedata"   },
  { 23, 3, "c0_usertracedata"   },
  { 23, 4, "c0_tracebpc"        },
  { 23, 4, "c0_tracebpc"        },
  { 25, 1, "c0_perfcnt,1"       },
  { 25, 1, "c0_perfcnt,1"       },
  { 25, 2, "c0_perfcnt,2"       },
  { 25, 2, "c0_perfcnt,2"       },
  { 25, 3, "c0_perfcnt,3"       },
  { 25, 3, "c0_perfcnt,3"       },
  { 25, 4, "c0_perfcnt,4"       },
  { 25, 4, "c0_perfcnt,4"       },
  { 25, 5, "c0_perfcnt,5"       },
  { 25, 5, "c0_perfcnt,5"       },
  { 25, 6, "c0_perfcnt,6"       },
  { 25, 6, "c0_perfcnt,6"       },
  { 25, 7, "c0_perfcnt,7"       },
  { 25, 7, "c0_perfcnt,7"       },
  { 27, 1, "c0_cacheerr,1"      },
  { 27, 1, "c0_cacheerr,1"      },
  { 27, 2, "c0_cacheerr,2"      },
  { 27, 2, "c0_cacheerr,2"      },
  { 27, 3, "c0_cacheerr,3"      },
  { 27, 3, "c0_cacheerr,3"      },
  { 28, 1, "c0_datalo"          },
  { 28, 1, "c0_datalo"          },
  { 28, 2, "c0_taglo1"          },
  { 28, 2, "c0_taglo1"          },
  { 28, 3, "c0_datalo1"         },
  { 28, 3, "c0_datalo1"         },
  { 28, 4, "c0_taglo2"          },
  { 28, 4, "c0_taglo2"          },
  { 28, 5, "c0_datalo2"         },
  { 28, 5, "c0_datalo2"         },
  { 28, 6, "c0_taglo3"          },
  { 28, 6, "c0_taglo3"          },
  { 28, 7, "c0_datalo3"         },
  { 28, 7, "c0_datalo3"         },
  { 29, 1, "c0_datahi"          },
  { 29, 1, "c0_datahi"          },
  { 29, 2, "c0_taghi1"          },
  { 29, 2, "c0_taghi1"          },
  { 29, 3, "c0_datahi1"         },
  { 29, 3, "c0_datahi1"         },
  { 29, 4, "c0_taghi2"          },
  { 29, 4, "c0_taghi2"          },
  { 29, 5, "c0_datahi2"         },
  { 29, 5, "c0_datahi2"         },
  { 29, 6, "c0_taghi3"          },
  { 29, 6, "c0_taghi3"          },
  { 29, 7, "c0_datahi3"         },
  { 29, 7, "c0_datahi3"         },
};
};
 
 
/* SB-1: MIPS64 (mips_cp0_names_mips3264) with minor mods.  */
/* SB-1: MIPS64 (mips_cp0_names_mips3264) with minor mods.  */
static const char * const mips_cp0_names_sb1[32] =
static const char * const mips_cp0_names_sb1[32] =
{
{
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_context",   "c0_pagemask",  "c0_wired",     "$7",
  "c0_context",   "c0_pagemask",  "c0_wired",     "$7",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_status",    "c0_cause",     "c0_epc",       "c0_prid",
  "c0_status",    "c0_cause",     "c0_epc",       "c0_prid",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_xcontext",  "$21",          "$22",          "c0_debug",
  "c0_xcontext",  "$21",          "$22",          "c0_debug",
  "c0_depc",      "c0_perfcnt",   "c0_errctl",    "c0_cacheerr_i",
  "c0_depc",      "c0_perfcnt",   "c0_errctl",    "c0_cacheerr_i",
  "c0_taglo_i",   "c0_taghi_i",   "c0_errorepc",  "c0_desave",
  "c0_taglo_i",   "c0_taghi_i",   "c0_errorepc",  "c0_desave",
};
};
 
 
static const struct mips_cp0sel_name mips_cp0sel_names_sb1[] =
static const struct mips_cp0sel_name mips_cp0sel_names_sb1[] =
{
{
  { 16, 1, "c0_config1"         },
  { 16, 1, "c0_config1"         },
  { 18, 1, "c0_watchlo,1"       },
  { 18, 1, "c0_watchlo,1"       },
  { 19, 1, "c0_watchhi,1"       },
  { 19, 1, "c0_watchhi,1"       },
  { 22, 0, "c0_perftrace"        },
  { 22, 0, "c0_perftrace"        },
  { 23, 3, "c0_edebug"          },
  { 23, 3, "c0_edebug"          },
  { 25, 1, "c0_perfcnt,1"       },
  { 25, 1, "c0_perfcnt,1"       },
  { 25, 2, "c0_perfcnt,2"       },
  { 25, 2, "c0_perfcnt,2"       },
  { 25, 3, "c0_perfcnt,3"       },
  { 25, 3, "c0_perfcnt,3"       },
  { 25, 4, "c0_perfcnt,4"       },
  { 25, 4, "c0_perfcnt,4"       },
  { 25, 5, "c0_perfcnt,5"       },
  { 25, 5, "c0_perfcnt,5"       },
  { 25, 6, "c0_perfcnt,6"       },
  { 25, 6, "c0_perfcnt,6"       },
  { 25, 7, "c0_perfcnt,7"       },
  { 25, 7, "c0_perfcnt,7"       },
  { 26, 1, "c0_buserr_pa"       },
  { 26, 1, "c0_buserr_pa"       },
  { 27, 1, "c0_cacheerr_d"      },
  { 27, 1, "c0_cacheerr_d"      },
  { 27, 3, "c0_cacheerr_d_pa"   },
  { 27, 3, "c0_cacheerr_d_pa"   },
  { 28, 1, "c0_datalo_i"        },
  { 28, 1, "c0_datalo_i"        },
  { 28, 2, "c0_taglo_d"         },
  { 28, 2, "c0_taglo_d"         },
  { 28, 3, "c0_datalo_d"        },
  { 28, 3, "c0_datalo_d"        },
  { 29, 1, "c0_datahi_i"        },
  { 29, 1, "c0_datahi_i"        },
  { 29, 2, "c0_taghi_d"         },
  { 29, 2, "c0_taghi_d"         },
  { 29, 3, "c0_datahi_d"        },
  { 29, 3, "c0_datahi_d"        },
};
};
 
 
/* Xlr cop0 register names.  */
/* Xlr cop0 register names.  */
static const char * const mips_cp0_names_xlr[32] = {
static const char * const mips_cp0_names_xlr[32] = {
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_index",     "c0_random",    "c0_entrylo0",  "c0_entrylo1",
  "c0_context",   "c0_pagemask",  "c0_wired",     "$7",
  "c0_context",   "c0_pagemask",  "c0_wired",     "$7",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_badvaddr",  "c0_count",     "c0_entryhi",   "c0_compare",
  "c0_status",    "c0_cause",     "c0_epc",       "c0_prid",
  "c0_status",    "c0_cause",     "c0_epc",       "c0_prid",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_config",    "c0_lladdr",    "c0_watchlo",   "c0_watchhi",
  "c0_xcontext",  "$21",          "$22",          "c0_debug",
  "c0_xcontext",  "$21",          "$22",          "c0_debug",
  "c0_depc",      "c0_perfcnt",   "c0_errctl",    "c0_cacheerr_i",
  "c0_depc",      "c0_perfcnt",   "c0_errctl",    "c0_cacheerr_i",
  "c0_taglo_i",   "c0_taghi_i",   "c0_errorepc",  "c0_desave",
  "c0_taglo_i",   "c0_taghi_i",   "c0_errorepc",  "c0_desave",
};
};
 
 
/* XLR's CP0 Select Registers.  */
/* XLR's CP0 Select Registers.  */
 
 
static const struct mips_cp0sel_name mips_cp0sel_names_xlr[] = {
static const struct mips_cp0sel_name mips_cp0sel_names_xlr[] = {
  {  9, 6, "c0_extintreq"       },
  {  9, 6, "c0_extintreq"       },
  {  9, 7, "c0_extintmask"      },
  {  9, 7, "c0_extintmask"      },
  { 15, 1, "c0_ebase"           },
  { 15, 1, "c0_ebase"           },
  { 16, 1, "c0_config1"         },
  { 16, 1, "c0_config1"         },
  { 16, 2, "c0_config2"         },
  { 16, 2, "c0_config2"         },
  { 16, 3, "c0_config3"         },
  { 16, 3, "c0_config3"         },
  { 16, 7, "c0_procid2"         },
  { 16, 7, "c0_procid2"         },
  { 18, 1, "c0_watchlo,1"       },
  { 18, 1, "c0_watchlo,1"       },
  { 18, 2, "c0_watchlo,2"       },
  { 18, 2, "c0_watchlo,2"       },
  { 18, 3, "c0_watchlo,3"       },
  { 18, 3, "c0_watchlo,3"       },
  { 18, 4, "c0_watchlo,4"       },
  { 18, 4, "c0_watchlo,4"       },
  { 18, 5, "c0_watchlo,5"       },
  { 18, 5, "c0_watchlo,5"       },
  { 18, 6, "c0_watchlo,6"       },
  { 18, 6, "c0_watchlo,6"       },
  { 18, 7, "c0_watchlo,7"       },
  { 18, 7, "c0_watchlo,7"       },
  { 19, 1, "c0_watchhi,1"       },
  { 19, 1, "c0_watchhi,1"       },
  { 19, 2, "c0_watchhi,2"       },
  { 19, 2, "c0_watchhi,2"       },
  { 19, 3, "c0_watchhi,3"       },
  { 19, 3, "c0_watchhi,3"       },
  { 19, 4, "c0_watchhi,4"       },
  { 19, 4, "c0_watchhi,4"       },
  { 19, 5, "c0_watchhi,5"       },
  { 19, 5, "c0_watchhi,5"       },
  { 19, 6, "c0_watchhi,6"       },
  { 19, 6, "c0_watchhi,6"       },
  { 19, 7, "c0_watchhi,7"       },
  { 19, 7, "c0_watchhi,7"       },
  { 25, 1, "c0_perfcnt,1"       },
  { 25, 1, "c0_perfcnt,1"       },
  { 25, 2, "c0_perfcnt,2"       },
  { 25, 2, "c0_perfcnt,2"       },
  { 25, 3, "c0_perfcnt,3"       },
  { 25, 3, "c0_perfcnt,3"       },
  { 25, 4, "c0_perfcnt,4"       },
  { 25, 4, "c0_perfcnt,4"       },
  { 25, 5, "c0_perfcnt,5"       },
  { 25, 5, "c0_perfcnt,5"       },
  { 25, 6, "c0_perfcnt,6"       },
  { 25, 6, "c0_perfcnt,6"       },
  { 25, 7, "c0_perfcnt,7"       },
  { 25, 7, "c0_perfcnt,7"       },
  { 27, 1, "c0_cacheerr,1"      },
  { 27, 1, "c0_cacheerr,1"      },
  { 27, 2, "c0_cacheerr,2"      },
  { 27, 2, "c0_cacheerr,2"      },
  { 27, 3, "c0_cacheerr,3"      },
  { 27, 3, "c0_cacheerr,3"      },
  { 28, 1, "c0_datalo"          },
  { 28, 1, "c0_datalo"          },
  { 29, 1, "c0_datahi"          }
  { 29, 1, "c0_datahi"          }
};
};
 
 
static const char * const mips_hwr_names_numeric[32] =
static const char * const mips_hwr_names_numeric[32] =
{
{
  "$0",   "$1",   "$2",   "$3",   "$4",   "$5",   "$6",   "$7",
  "$0",   "$1",   "$2",   "$3",   "$4",   "$5",   "$6",   "$7",
  "$8",   "$9",   "$10",  "$11",  "$12",  "$13",  "$14",  "$15",
  "$8",   "$9",   "$10",  "$11",  "$12",  "$13",  "$14",  "$15",
  "$16",  "$17",  "$18",  "$19",  "$20",  "$21",  "$22",  "$23",
  "$16",  "$17",  "$18",  "$19",  "$20",  "$21",  "$22",  "$23",
  "$24",  "$25",  "$26",  "$27",  "$28",  "$29",  "$30",  "$31"
  "$24",  "$25",  "$26",  "$27",  "$28",  "$29",  "$30",  "$31"
};
};
 
 
static const char * const mips_hwr_names_mips3264r2[32] =
static const char * const mips_hwr_names_mips3264r2[32] =
{
{
  "hwr_cpunum",   "hwr_synci_step", "hwr_cc",     "hwr_ccres",
  "hwr_cpunum",   "hwr_synci_step", "hwr_cc",     "hwr_ccres",
  "$4",          "$5",            "$6",           "$7",
  "$4",          "$5",            "$6",           "$7",
  "$8",   "$9",   "$10",  "$11",  "$12",  "$13",  "$14",  "$15",
  "$8",   "$9",   "$10",  "$11",  "$12",  "$13",  "$14",  "$15",
  "$16",  "$17",  "$18",  "$19",  "$20",  "$21",  "$22",  "$23",
  "$16",  "$17",  "$18",  "$19",  "$20",  "$21",  "$22",  "$23",
  "$24",  "$25",  "$26",  "$27",  "$28",  "$29",  "$30",  "$31"
  "$24",  "$25",  "$26",  "$27",  "$28",  "$29",  "$30",  "$31"
};
};
 
 
struct mips_abi_choice
struct mips_abi_choice
{
{
  const char * name;
  const char * name;
  const char * const *gpr_names;
  const char * const *gpr_names;
  const char * const *fpr_names;
  const char * const *fpr_names;
};
};
 
 
struct mips_abi_choice mips_abi_choices[] =
struct mips_abi_choice mips_abi_choices[] =
{
{
  { "numeric", mips_gpr_names_numeric, mips_fpr_names_numeric },
  { "numeric", mips_gpr_names_numeric, mips_fpr_names_numeric },
  { "32", mips_gpr_names_oldabi, mips_fpr_names_32 },
  { "32", mips_gpr_names_oldabi, mips_fpr_names_32 },
  { "n32", mips_gpr_names_newabi, mips_fpr_names_n32 },
  { "n32", mips_gpr_names_newabi, mips_fpr_names_n32 },
  { "64", mips_gpr_names_newabi, mips_fpr_names_64 },
  { "64", mips_gpr_names_newabi, mips_fpr_names_64 },
};
};
 
 
struct mips_arch_choice
struct mips_arch_choice
{
{
  const char *name;
  const char *name;
  int bfd_mach_valid;
  int bfd_mach_valid;
  unsigned long bfd_mach;
  unsigned long bfd_mach;
  int processor;
  int processor;
  int isa;
  int isa;
  const char * const *cp0_names;
  const char * const *cp0_names;
  const struct mips_cp0sel_name *cp0sel_names;
  const struct mips_cp0sel_name *cp0sel_names;
  unsigned int cp0sel_names_len;
  unsigned int cp0sel_names_len;
  const char * const *hwr_names;
  const char * const *hwr_names;
};
};
 
 
const struct mips_arch_choice mips_arch_choices[] =
const struct mips_arch_choice mips_arch_choices[] =
{
{
  { "numeric",  0, 0, 0, 0,
  { "numeric",  0, 0, 0, 0,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
 
 
  { "r3000",    1, bfd_mach_mips3000, CPU_R3000, ISA_MIPS1,
  { "r3000",    1, bfd_mach_mips3000, CPU_R3000, ISA_MIPS1,
    mips_cp0_names_r3000, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_r3000, NULL, 0, mips_hwr_names_numeric },
  { "r3900",    1, bfd_mach_mips3900, CPU_R3900, ISA_MIPS1,
  { "r3900",    1, bfd_mach_mips3900, CPU_R3900, ISA_MIPS1,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r4000",    1, bfd_mach_mips4000, CPU_R4000, ISA_MIPS3,
  { "r4000",    1, bfd_mach_mips4000, CPU_R4000, ISA_MIPS3,
    mips_cp0_names_r4000, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_r4000, NULL, 0, mips_hwr_names_numeric },
  { "r4010",    1, bfd_mach_mips4010, CPU_R4010, ISA_MIPS2,
  { "r4010",    1, bfd_mach_mips4010, CPU_R4010, ISA_MIPS2,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "vr4100",   1, bfd_mach_mips4100, CPU_VR4100, ISA_MIPS3,
  { "vr4100",   1, bfd_mach_mips4100, CPU_VR4100, ISA_MIPS3,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "vr4111",   1, bfd_mach_mips4111, CPU_R4111, ISA_MIPS3,
  { "vr4111",   1, bfd_mach_mips4111, CPU_R4111, ISA_MIPS3,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "vr4120",   1, bfd_mach_mips4120, CPU_VR4120, ISA_MIPS3,
  { "vr4120",   1, bfd_mach_mips4120, CPU_VR4120, ISA_MIPS3,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r4300",    1, bfd_mach_mips4300, CPU_R4300, ISA_MIPS3,
  { "r4300",    1, bfd_mach_mips4300, CPU_R4300, ISA_MIPS3,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r4400",    1, bfd_mach_mips4400, CPU_R4400, ISA_MIPS3,
  { "r4400",    1, bfd_mach_mips4400, CPU_R4400, ISA_MIPS3,
    mips_cp0_names_r4000, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_r4000, NULL, 0, mips_hwr_names_numeric },
  { "r4600",    1, bfd_mach_mips4600, CPU_R4600, ISA_MIPS3,
  { "r4600",    1, bfd_mach_mips4600, CPU_R4600, ISA_MIPS3,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r4650",    1, bfd_mach_mips4650, CPU_R4650, ISA_MIPS3,
  { "r4650",    1, bfd_mach_mips4650, CPU_R4650, ISA_MIPS3,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r5000",    1, bfd_mach_mips5000, CPU_R5000, ISA_MIPS4,
  { "r5000",    1, bfd_mach_mips5000, CPU_R5000, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "vr5400",   1, bfd_mach_mips5400, CPU_VR5400, ISA_MIPS4,
  { "vr5400",   1, bfd_mach_mips5400, CPU_VR5400, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "vr5500",   1, bfd_mach_mips5500, CPU_VR5500, ISA_MIPS4,
  { "vr5500",   1, bfd_mach_mips5500, CPU_VR5500, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r6000",    1, bfd_mach_mips6000, CPU_R6000, ISA_MIPS2,
  { "r6000",    1, bfd_mach_mips6000, CPU_R6000, ISA_MIPS2,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "rm7000",   1, bfd_mach_mips7000, CPU_RM7000, ISA_MIPS4,
  { "rm7000",   1, bfd_mach_mips7000, CPU_RM7000, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "rm9000",   1, bfd_mach_mips7000, CPU_RM7000, ISA_MIPS4,
  { "rm9000",   1, bfd_mach_mips7000, CPU_RM7000, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r8000",    1, bfd_mach_mips8000, CPU_R8000, ISA_MIPS4,
  { "r8000",    1, bfd_mach_mips8000, CPU_R8000, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r10000",   1, bfd_mach_mips10000, CPU_R10000, ISA_MIPS4,
  { "r10000",   1, bfd_mach_mips10000, CPU_R10000, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r12000",   1, bfd_mach_mips12000, CPU_R12000, ISA_MIPS4,
  { "r12000",   1, bfd_mach_mips12000, CPU_R12000, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r14000",   1, bfd_mach_mips14000, CPU_R14000, ISA_MIPS4,
  { "r14000",   1, bfd_mach_mips14000, CPU_R14000, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "r16000",   1, bfd_mach_mips16000, CPU_R16000, ISA_MIPS4,
  { "r16000",   1, bfd_mach_mips16000, CPU_R16000, ISA_MIPS4,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
  { "mips5",    1, bfd_mach_mips5, CPU_MIPS5, ISA_MIPS5,
  { "mips5",    1, bfd_mach_mips5, CPU_MIPS5, ISA_MIPS5,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
 
 
  /* For stock MIPS32, disassemble all applicable MIPS-specified ASEs.
  /* For stock MIPS32, disassemble all applicable MIPS-specified ASEs.
     Note that MIPS-3D and MDMX are not applicable to MIPS32.  (See
     Note that MIPS-3D and MDMX are not applicable to MIPS32.  (See
     _MIPS32 Architecture For Programmers Volume I: Introduction to the
     _MIPS32 Architecture For Programmers Volume I: Introduction to the
     MIPS32 Architecture_ (MIPS Document Number MD00082, Revision 0.95),
     MIPS32 Architecture_ (MIPS Document Number MD00082, Revision 0.95),
     page 1.  */
     page 1.  */
  { "mips32",   1, bfd_mach_mipsisa32, CPU_MIPS32,
  { "mips32",   1, bfd_mach_mipsisa32, CPU_MIPS32,
    ISA_MIPS32 | INSN_MIPS16 | INSN_SMARTMIPS,
    ISA_MIPS32 | INSN_MIPS16 | INSN_SMARTMIPS,
    mips_cp0_names_mips3264,
    mips_cp0_names_mips3264,
    mips_cp0sel_names_mips3264, ARRAY_SIZE (mips_cp0sel_names_mips3264),
    mips_cp0sel_names_mips3264, ARRAY_SIZE (mips_cp0sel_names_mips3264),
    mips_hwr_names_numeric },
    mips_hwr_names_numeric },
 
 
  { "mips32r2", 1, bfd_mach_mipsisa32r2, CPU_MIPS32R2,
  { "mips32r2", 1, bfd_mach_mipsisa32r2, CPU_MIPS32R2,
    (ISA_MIPS32R2 | INSN_MIPS16 | INSN_SMARTMIPS | INSN_DSP | INSN_DSPR2
    (ISA_MIPS32R2 | INSN_MIPS16 | INSN_SMARTMIPS | INSN_DSP | INSN_DSPR2
     | INSN_MIPS3D | INSN_MT),
     | INSN_MIPS3D | INSN_MT),
    mips_cp0_names_mips3264r2,
    mips_cp0_names_mips3264r2,
    mips_cp0sel_names_mips3264r2, ARRAY_SIZE (mips_cp0sel_names_mips3264r2),
    mips_cp0sel_names_mips3264r2, ARRAY_SIZE (mips_cp0sel_names_mips3264r2),
    mips_hwr_names_mips3264r2 },
    mips_hwr_names_mips3264r2 },
 
 
  /* For stock MIPS64, disassemble all applicable MIPS-specified ASEs.  */
  /* For stock MIPS64, disassemble all applicable MIPS-specified ASEs.  */
  { "mips64",   1, bfd_mach_mipsisa64, CPU_MIPS64,
  { "mips64",   1, bfd_mach_mipsisa64, CPU_MIPS64,
    ISA_MIPS64 | INSN_MIPS16 | INSN_MIPS3D | INSN_MDMX,
    ISA_MIPS64 | INSN_MIPS16 | INSN_MIPS3D | INSN_MDMX,
    mips_cp0_names_mips3264,
    mips_cp0_names_mips3264,
    mips_cp0sel_names_mips3264, ARRAY_SIZE (mips_cp0sel_names_mips3264),
    mips_cp0sel_names_mips3264, ARRAY_SIZE (mips_cp0sel_names_mips3264),
    mips_hwr_names_numeric },
    mips_hwr_names_numeric },
 
 
  { "mips64r2", 1, bfd_mach_mipsisa64r2, CPU_MIPS64R2,
  { "mips64r2", 1, bfd_mach_mipsisa64r2, CPU_MIPS64R2,
    (ISA_MIPS64R2 | INSN_MIPS16 | INSN_MIPS3D | INSN_DSP | INSN_DSPR2
    (ISA_MIPS64R2 | INSN_MIPS16 | INSN_MIPS3D | INSN_DSP | INSN_DSPR2
     | INSN_DSP64 | INSN_MT | INSN_MDMX),
     | INSN_DSP64 | INSN_MT | INSN_MDMX),
    mips_cp0_names_mips3264r2,
    mips_cp0_names_mips3264r2,
    mips_cp0sel_names_mips3264r2, ARRAY_SIZE (mips_cp0sel_names_mips3264r2),
    mips_cp0sel_names_mips3264r2, ARRAY_SIZE (mips_cp0sel_names_mips3264r2),
    mips_hwr_names_mips3264r2 },
    mips_hwr_names_mips3264r2 },
 
 
  { "sb1",      1, bfd_mach_mips_sb1, CPU_SB1,
  { "sb1",      1, bfd_mach_mips_sb1, CPU_SB1,
    ISA_MIPS64 | INSN_MIPS3D | INSN_SB1,
    ISA_MIPS64 | INSN_MIPS3D | INSN_SB1,
    mips_cp0_names_sb1,
    mips_cp0_names_sb1,
    mips_cp0sel_names_sb1, ARRAY_SIZE (mips_cp0sel_names_sb1),
    mips_cp0sel_names_sb1, ARRAY_SIZE (mips_cp0sel_names_sb1),
    mips_hwr_names_numeric },
    mips_hwr_names_numeric },
 
 
  { "loongson2e",   1, bfd_mach_mips_loongson_2e, CPU_LOONGSON_2E,
  { "loongson2e",   1, bfd_mach_mips_loongson_2e, CPU_LOONGSON_2E,
    ISA_MIPS3 | INSN_LOONGSON_2E, mips_cp0_names_numeric,
    ISA_MIPS3 | INSN_LOONGSON_2E, mips_cp0_names_numeric,
    NULL, 0, mips_hwr_names_numeric },
    NULL, 0, mips_hwr_names_numeric },
 
 
  { "loongson2f",   1, bfd_mach_mips_loongson_2f, CPU_LOONGSON_2F,
  { "loongson2f",   1, bfd_mach_mips_loongson_2f, CPU_LOONGSON_2F,
    ISA_MIPS3 | INSN_LOONGSON_2F, mips_cp0_names_numeric,
    ISA_MIPS3 | INSN_LOONGSON_2F, mips_cp0_names_numeric,
    NULL, 0, mips_hwr_names_numeric },
    NULL, 0, mips_hwr_names_numeric },
 
 
  { "octeon",   1, bfd_mach_mips_octeon, CPU_OCTEON,
  { "octeon",   1, bfd_mach_mips_octeon, CPU_OCTEON,
    ISA_MIPS64R2 | INSN_OCTEON, mips_cp0_names_numeric, NULL, 0,
    ISA_MIPS64R2 | INSN_OCTEON, mips_cp0_names_numeric, NULL, 0,
    mips_hwr_names_numeric },
    mips_hwr_names_numeric },
 
 
  { "xlr", 1, bfd_mach_mips_xlr, CPU_XLR,
  { "xlr", 1, bfd_mach_mips_xlr, CPU_XLR,
    ISA_MIPS64 | INSN_XLR,
    ISA_MIPS64 | INSN_XLR,
    mips_cp0_names_xlr,
    mips_cp0_names_xlr,
    mips_cp0sel_names_xlr, ARRAY_SIZE (mips_cp0sel_names_xlr),
    mips_cp0sel_names_xlr, ARRAY_SIZE (mips_cp0sel_names_xlr),
    mips_hwr_names_numeric },
    mips_hwr_names_numeric },
 
 
  /* This entry, mips16, is here only for ISA/processor selection; do
  /* This entry, mips16, is here only for ISA/processor selection; do
     not print its name.  */
     not print its name.  */
  { "",         1, bfd_mach_mips16, CPU_MIPS16, ISA_MIPS3 | INSN_MIPS16,
  { "",         1, bfd_mach_mips16, CPU_MIPS16, ISA_MIPS3 | INSN_MIPS16,
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
    mips_cp0_names_numeric, NULL, 0, mips_hwr_names_numeric },
};
};
 
 
/* ISA and processor type to disassemble for, and register names to use.
/* ISA and processor type to disassemble for, and register names to use.
   set_default_mips_dis_options and parse_mips_dis_options fill in these
   set_default_mips_dis_options and parse_mips_dis_options fill in these
   values.  */
   values.  */
static int mips_processor;
static int mips_processor;
static int mips_isa;
static int mips_isa;
static const char * const *mips_gpr_names;
static const char * const *mips_gpr_names;
static const char * const *mips_fpr_names;
static const char * const *mips_fpr_names;
static const char * const *mips_cp0_names;
static const char * const *mips_cp0_names;
static const struct mips_cp0sel_name *mips_cp0sel_names;
static const struct mips_cp0sel_name *mips_cp0sel_names;
static int mips_cp0sel_names_len;
static int mips_cp0sel_names_len;
static const char * const *mips_hwr_names;
static const char * const *mips_hwr_names;
 
 
/* Other options */
/* Other options */
static int no_aliases;  /* If set disassemble as most general inst.  */
static int no_aliases;  /* If set disassemble as most general inst.  */


static const struct mips_abi_choice *
static const struct mips_abi_choice *
choose_abi_by_name (const char *name, unsigned int namelen)
choose_abi_by_name (const char *name, unsigned int namelen)
{
{
  const struct mips_abi_choice *c;
  const struct mips_abi_choice *c;
  unsigned int i;
  unsigned int i;
 
 
  for (i = 0, c = NULL; i < ARRAY_SIZE (mips_abi_choices) && c == NULL; i++)
  for (i = 0, c = NULL; i < ARRAY_SIZE (mips_abi_choices) && c == NULL; i++)
    if (strncmp (mips_abi_choices[i].name, name, namelen) == 0
    if (strncmp (mips_abi_choices[i].name, name, namelen) == 0
        && strlen (mips_abi_choices[i].name) == namelen)
        && strlen (mips_abi_choices[i].name) == namelen)
      c = &mips_abi_choices[i];
      c = &mips_abi_choices[i];
 
 
  return c;
  return c;
}
}
 
 
static const struct mips_arch_choice *
static const struct mips_arch_choice *
choose_arch_by_name (const char *name, unsigned int namelen)
choose_arch_by_name (const char *name, unsigned int namelen)
{
{
  const struct mips_arch_choice *c = NULL;
  const struct mips_arch_choice *c = NULL;
  unsigned int i;
  unsigned int i;
 
 
  for (i = 0, c = NULL; i < ARRAY_SIZE (mips_arch_choices) && c == NULL; i++)
  for (i = 0, c = NULL; i < ARRAY_SIZE (mips_arch_choices) && c == NULL; i++)
    if (strncmp (mips_arch_choices[i].name, name, namelen) == 0
    if (strncmp (mips_arch_choices[i].name, name, namelen) == 0
        && strlen (mips_arch_choices[i].name) == namelen)
        && strlen (mips_arch_choices[i].name) == namelen)
      c = &mips_arch_choices[i];
      c = &mips_arch_choices[i];
 
 
  return c;
  return c;
}
}
 
 
static const struct mips_arch_choice *
static const struct mips_arch_choice *
choose_arch_by_number (unsigned long mach)
choose_arch_by_number (unsigned long mach)
{
{
  static unsigned long hint_bfd_mach;
  static unsigned long hint_bfd_mach;
  static const struct mips_arch_choice *hint_arch_choice;
  static const struct mips_arch_choice *hint_arch_choice;
  const struct mips_arch_choice *c;
  const struct mips_arch_choice *c;
  unsigned int i;
  unsigned int i;
 
 
  /* We optimize this because even if the user specifies no
  /* We optimize this because even if the user specifies no
     flags, this will be done for every instruction!  */
     flags, this will be done for every instruction!  */
  if (hint_bfd_mach == mach
  if (hint_bfd_mach == mach
      && hint_arch_choice != NULL
      && hint_arch_choice != NULL
      && hint_arch_choice->bfd_mach == hint_bfd_mach)
      && hint_arch_choice->bfd_mach == hint_bfd_mach)
    return hint_arch_choice;
    return hint_arch_choice;
 
 
  for (i = 0, c = NULL; i < ARRAY_SIZE (mips_arch_choices) && c == NULL; i++)
  for (i = 0, c = NULL; i < ARRAY_SIZE (mips_arch_choices) && c == NULL; i++)
    {
    {
      if (mips_arch_choices[i].bfd_mach_valid
      if (mips_arch_choices[i].bfd_mach_valid
          && mips_arch_choices[i].bfd_mach == mach)
          && mips_arch_choices[i].bfd_mach == mach)
        {
        {
          c = &mips_arch_choices[i];
          c = &mips_arch_choices[i];
          hint_bfd_mach = mach;
          hint_bfd_mach = mach;
          hint_arch_choice = c;
          hint_arch_choice = c;
        }
        }
    }
    }
  return c;
  return c;
}
}
 
 
/* Check if the object uses NewABI conventions.  */
/* Check if the object uses NewABI conventions.  */
 
 
static int
static int
is_newabi (Elf_Internal_Ehdr *header)
is_newabi (Elf_Internal_Ehdr *header)
{
{
  /* There are no old-style ABIs which use 64-bit ELF.  */
  /* There are no old-style ABIs which use 64-bit ELF.  */
  if (header->e_ident[EI_CLASS] == ELFCLASS64)
  if (header->e_ident[EI_CLASS] == ELFCLASS64)
    return 1;
    return 1;
 
 
  /* If a 32-bit ELF file, n32 is a new-style ABI.  */
  /* If a 32-bit ELF file, n32 is a new-style ABI.  */
  if ((header->e_flags & EF_MIPS_ABI2) != 0)
  if ((header->e_flags & EF_MIPS_ABI2) != 0)
    return 1;
    return 1;
 
 
  return 0;
  return 0;
}
}
 
 
static void
static void
set_default_mips_dis_options (struct disassemble_info *info)
set_default_mips_dis_options (struct disassemble_info *info)
{
{
  const struct mips_arch_choice *chosen_arch;
  const struct mips_arch_choice *chosen_arch;
 
 
  /* Defaults: mipsIII/r3000 (?!), (o)32-style ("oldabi") GPR names,
  /* Defaults: mipsIII/r3000 (?!), (o)32-style ("oldabi") GPR names,
     and numeric FPR, CP0 register, and HWR names.  */
     and numeric FPR, CP0 register, and HWR names.  */
  mips_isa = ISA_MIPS3;
  mips_isa = ISA_MIPS3;
  mips_processor =  CPU_R3000;
  mips_processor =  CPU_R3000;
  mips_gpr_names = mips_gpr_names_oldabi;
  mips_gpr_names = mips_gpr_names_oldabi;
  mips_fpr_names = mips_fpr_names_numeric;
  mips_fpr_names = mips_fpr_names_numeric;
  mips_cp0_names = mips_cp0_names_numeric;
  mips_cp0_names = mips_cp0_names_numeric;
  mips_cp0sel_names = NULL;
  mips_cp0sel_names = NULL;
  mips_cp0sel_names_len = 0;
  mips_cp0sel_names_len = 0;
  mips_hwr_names = mips_hwr_names_numeric;
  mips_hwr_names = mips_hwr_names_numeric;
  no_aliases = 0;
  no_aliases = 0;
 
 
  /* If an ELF "newabi" binary, use the n32/(n)64 GPR names.  */
  /* If an ELF "newabi" binary, use the n32/(n)64 GPR names.  */
  if (info->flavour == bfd_target_elf_flavour && info->section != NULL)
  if (info->flavour == bfd_target_elf_flavour && info->section != NULL)
    {
    {
      Elf_Internal_Ehdr *header;
      Elf_Internal_Ehdr *header;
 
 
      header = elf_elfheader (info->section->owner);
      header = elf_elfheader (info->section->owner);
      if (is_newabi (header))
      if (is_newabi (header))
        mips_gpr_names = mips_gpr_names_newabi;
        mips_gpr_names = mips_gpr_names_newabi;
    }
    }
 
 
  /* Set ISA, architecture, and cp0 register names as best we can.  */
  /* Set ISA, architecture, and cp0 register names as best we can.  */
#if ! SYMTAB_AVAILABLE
#if ! SYMTAB_AVAILABLE
  /* This is running out on a target machine, not in a host tool.
  /* This is running out on a target machine, not in a host tool.
     FIXME: Where does mips_target_info come from?  */
     FIXME: Where does mips_target_info come from?  */
  target_processor = mips_target_info.processor;
  target_processor = mips_target_info.processor;
  mips_isa = mips_target_info.isa;
  mips_isa = mips_target_info.isa;
#else
#else
  chosen_arch = choose_arch_by_number (info->mach);
  chosen_arch = choose_arch_by_number (info->mach);
  if (chosen_arch != NULL)
  if (chosen_arch != NULL)
    {
    {
      mips_processor = chosen_arch->processor;
      mips_processor = chosen_arch->processor;
      mips_isa = chosen_arch->isa;
      mips_isa = chosen_arch->isa;
      mips_cp0_names = chosen_arch->cp0_names;
      mips_cp0_names = chosen_arch->cp0_names;
      mips_cp0sel_names = chosen_arch->cp0sel_names;
      mips_cp0sel_names = chosen_arch->cp0sel_names;
      mips_cp0sel_names_len = chosen_arch->cp0sel_names_len;
      mips_cp0sel_names_len = chosen_arch->cp0sel_names_len;
      mips_hwr_names = chosen_arch->hwr_names;
      mips_hwr_names = chosen_arch->hwr_names;
    }
    }
#endif
#endif
}
}
 
 
static void
static void
parse_mips_dis_option (const char *option, unsigned int len)
parse_mips_dis_option (const char *option, unsigned int len)
{
{
  unsigned int i, optionlen, vallen;
  unsigned int i, optionlen, vallen;
  const char *val;
  const char *val;
  const struct mips_abi_choice *chosen_abi;
  const struct mips_abi_choice *chosen_abi;
  const struct mips_arch_choice *chosen_arch;
  const struct mips_arch_choice *chosen_arch;
 
 
  /* Try to match options that are simple flags */
  /* Try to match options that are simple flags */
  if (CONST_STRNEQ (option, "no-aliases"))
  if (CONST_STRNEQ (option, "no-aliases"))
    {
    {
      no_aliases = 1;
      no_aliases = 1;
      return;
      return;
    }
    }
 
 
  /* Look for the = that delimits the end of the option name.  */
  /* Look for the = that delimits the end of the option name.  */
  for (i = 0; i < len; i++)
  for (i = 0; i < len; i++)
    if (option[i] == '=')
    if (option[i] == '=')
      break;
      break;
 
 
  if (i == 0)            /* Invalid option: no name before '='.  */
  if (i == 0)            /* Invalid option: no name before '='.  */
    return;
    return;
  if (i == len)         /* Invalid option: no '='.  */
  if (i == len)         /* Invalid option: no '='.  */
    return;
    return;
  if (i == (len - 1))   /* Invalid option: no value after '='.  */
  if (i == (len - 1))   /* Invalid option: no value after '='.  */
    return;
    return;
 
 
  optionlen = i;
  optionlen = i;
  val = option + (optionlen + 1);
  val = option + (optionlen + 1);
  vallen = len - (optionlen + 1);
  vallen = len - (optionlen + 1);
 
 
  if (strncmp ("gpr-names", option, optionlen) == 0
  if (strncmp ("gpr-names", option, optionlen) == 0
      && strlen ("gpr-names") == optionlen)
      && strlen ("gpr-names") == optionlen)
    {
    {
      chosen_abi = choose_abi_by_name (val, vallen);
      chosen_abi = choose_abi_by_name (val, vallen);
      if (chosen_abi != NULL)
      if (chosen_abi != NULL)
        mips_gpr_names = chosen_abi->gpr_names;
        mips_gpr_names = chosen_abi->gpr_names;
      return;
      return;
    }
    }
 
 
  if (strncmp ("fpr-names", option, optionlen) == 0
  if (strncmp ("fpr-names", option, optionlen) == 0
      && strlen ("fpr-names") == optionlen)
      && strlen ("fpr-names") == optionlen)
    {
    {
      chosen_abi = choose_abi_by_name (val, vallen);
      chosen_abi = choose_abi_by_name (val, vallen);
      if (chosen_abi != NULL)
      if (chosen_abi != NULL)
        mips_fpr_names = chosen_abi->fpr_names;
        mips_fpr_names = chosen_abi->fpr_names;
      return;
      return;
    }
    }
 
 
  if (strncmp ("cp0-names", option, optionlen) == 0
  if (strncmp ("cp0-names", option, optionlen) == 0
      && strlen ("cp0-names") == optionlen)
      && strlen ("cp0-names") == optionlen)
    {
    {
      chosen_arch = choose_arch_by_name (val, vallen);
      chosen_arch = choose_arch_by_name (val, vallen);
      if (chosen_arch != NULL)
      if (chosen_arch != NULL)
        {
        {
          mips_cp0_names = chosen_arch->cp0_names;
          mips_cp0_names = chosen_arch->cp0_names;
          mips_cp0sel_names = chosen_arch->cp0sel_names;
          mips_cp0sel_names = chosen_arch->cp0sel_names;
          mips_cp0sel_names_len = chosen_arch->cp0sel_names_len;
          mips_cp0sel_names_len = chosen_arch->cp0sel_names_len;
        }
        }
      return;
      return;
    }
    }
 
 
  if (strncmp ("hwr-names", option, optionlen) == 0
  if (strncmp ("hwr-names", option, optionlen) == 0
      && strlen ("hwr-names") == optionlen)
      && strlen ("hwr-names") == optionlen)
    {
    {
      chosen_arch = choose_arch_by_name (val, vallen);
      chosen_arch = choose_arch_by_name (val, vallen);
      if (chosen_arch != NULL)
      if (chosen_arch != NULL)
        mips_hwr_names = chosen_arch->hwr_names;
        mips_hwr_names = chosen_arch->hwr_names;
      return;
      return;
    }
    }
 
 
  if (strncmp ("reg-names", option, optionlen) == 0
  if (strncmp ("reg-names", option, optionlen) == 0
      && strlen ("reg-names") == optionlen)
      && strlen ("reg-names") == optionlen)
    {
    {
      /* We check both ABI and ARCH here unconditionally, so
      /* We check both ABI and ARCH here unconditionally, so
         that "numeric" will do the desirable thing: select
         that "numeric" will do the desirable thing: select
         numeric register names for all registers.  Other than
         numeric register names for all registers.  Other than
         that, a given name probably won't match both.  */
         that, a given name probably won't match both.  */
      chosen_abi = choose_abi_by_name (val, vallen);
      chosen_abi = choose_abi_by_name (val, vallen);
      if (chosen_abi != NULL)
      if (chosen_abi != NULL)
        {
        {
          mips_gpr_names = chosen_abi->gpr_names;
          mips_gpr_names = chosen_abi->gpr_names;
          mips_fpr_names = chosen_abi->fpr_names;
          mips_fpr_names = chosen_abi->fpr_names;
        }
        }
      chosen_arch = choose_arch_by_name (val, vallen);
      chosen_arch = choose_arch_by_name (val, vallen);
      if (chosen_arch != NULL)
      if (chosen_arch != NULL)
        {
        {
          mips_cp0_names = chosen_arch->cp0_names;
          mips_cp0_names = chosen_arch->cp0_names;
          mips_cp0sel_names = chosen_arch->cp0sel_names;
          mips_cp0sel_names = chosen_arch->cp0sel_names;
          mips_cp0sel_names_len = chosen_arch->cp0sel_names_len;
          mips_cp0sel_names_len = chosen_arch->cp0sel_names_len;
          mips_hwr_names = chosen_arch->hwr_names;
          mips_hwr_names = chosen_arch->hwr_names;
        }
        }
      return;
      return;
    }
    }
 
 
  /* Invalid option.  */
  /* Invalid option.  */
}
}
 
 
static void
static void
parse_mips_dis_options (const char *options)
parse_mips_dis_options (const char *options)
{
{
  const char *option_end;
  const char *option_end;
 
 
  if (options == NULL)
  if (options == NULL)
    return;
    return;
 
 
  while (*options != '\0')
  while (*options != '\0')
    {
    {
      /* Skip empty options.  */
      /* Skip empty options.  */
      if (*options == ',')
      if (*options == ',')
        {
        {
          options++;
          options++;
          continue;
          continue;
        }
        }
 
 
      /* We know that *options is neither NUL or a comma.  */
      /* We know that *options is neither NUL or a comma.  */
      option_end = options + 1;
      option_end = options + 1;
      while (*option_end != ',' && *option_end != '\0')
      while (*option_end != ',' && *option_end != '\0')
        option_end++;
        option_end++;
 
 
      parse_mips_dis_option (options, option_end - options);
      parse_mips_dis_option (options, option_end - options);
 
 
      /* Go on to the next one.  If option_end points to a comma, it
      /* Go on to the next one.  If option_end points to a comma, it
         will be skipped above.  */
         will be skipped above.  */
      options = option_end;
      options = option_end;
    }
    }
}
}
 
 
static const struct mips_cp0sel_name *
static const struct mips_cp0sel_name *
lookup_mips_cp0sel_name (const struct mips_cp0sel_name *names,
lookup_mips_cp0sel_name (const struct mips_cp0sel_name *names,
                         unsigned int len,
                         unsigned int len,
                         unsigned int cp0reg,
                         unsigned int cp0reg,
                         unsigned int sel)
                         unsigned int sel)
{
{
  unsigned int i;
  unsigned int i;
 
 
  for (i = 0; i < len; i++)
  for (i = 0; i < len; i++)
    if (names[i].cp0reg == cp0reg && names[i].sel == sel)
    if (names[i].cp0reg == cp0reg && names[i].sel == sel)
      return &names[i];
      return &names[i];
  return NULL;
  return NULL;
}
}


/* Print insn arguments for 32/64-bit code.  */
/* Print insn arguments for 32/64-bit code.  */
 
 
static void
static void
print_insn_args (const char *d,
print_insn_args (const char *d,
                 register unsigned long int l,
                 register unsigned long int l,
                 bfd_vma pc,
                 bfd_vma pc,
                 struct disassemble_info *info,
                 struct disassemble_info *info,
                 const struct mips_opcode *opp)
                 const struct mips_opcode *opp)
{
{
  int op, delta;
  int op, delta;
  unsigned int lsb, msb, msbd;
  unsigned int lsb, msb, msbd;
 
 
  lsb = 0;
  lsb = 0;
 
 
  for (; *d != '\0'; d++)
  for (; *d != '\0'; d++)
    {
    {
      switch (*d)
      switch (*d)
        {
        {
        case ',':
        case ',':
        case '(':
        case '(':
        case ')':
        case ')':
        case '[':
        case '[':
        case ']':
        case ']':
          (*info->fprintf_func) (info->stream, "%c", *d);
          (*info->fprintf_func) (info->stream, "%c", *d);
          break;
          break;
 
 
        case '+':
        case '+':
          /* Extension character; switch for second char.  */
          /* Extension character; switch for second char.  */
          d++;
          d++;
          switch (*d)
          switch (*d)
            {
            {
            case '\0':
            case '\0':
              /* xgettext:c-format */
              /* xgettext:c-format */
              (*info->fprintf_func) (info->stream,
              (*info->fprintf_func) (info->stream,
                                     _("# internal error, incomplete extension sequence (+)"));
                                     _("# internal error, incomplete extension sequence (+)"));
              return;
              return;
 
 
            case 'A':
            case 'A':
              lsb = (l >> OP_SH_SHAMT) & OP_MASK_SHAMT;
              lsb = (l >> OP_SH_SHAMT) & OP_MASK_SHAMT;
              (*info->fprintf_func) (info->stream, "0x%x", lsb);
              (*info->fprintf_func) (info->stream, "0x%x", lsb);
              break;
              break;
 
 
            case 'B':
            case 'B':
              msb = (l >> OP_SH_INSMSB) & OP_MASK_INSMSB;
              msb = (l >> OP_SH_INSMSB) & OP_MASK_INSMSB;
              (*info->fprintf_func) (info->stream, "0x%x", msb - lsb + 1);
              (*info->fprintf_func) (info->stream, "0x%x", msb - lsb + 1);
              break;
              break;
 
 
            case '1':
            case '1':
              (*info->fprintf_func) (info->stream, "0x%lx",
              (*info->fprintf_func) (info->stream, "0x%lx",
                                     (l >> OP_SH_UDI1) & OP_MASK_UDI1);
                                     (l >> OP_SH_UDI1) & OP_MASK_UDI1);
              break;
              break;
 
 
            case '2':
            case '2':
              (*info->fprintf_func) (info->stream, "0x%lx",
              (*info->fprintf_func) (info->stream, "0x%lx",
                                     (l >> OP_SH_UDI2) & OP_MASK_UDI2);
                                     (l >> OP_SH_UDI2) & OP_MASK_UDI2);
              break;
              break;
 
 
            case '3':
            case '3':
              (*info->fprintf_func) (info->stream, "0x%lx",
              (*info->fprintf_func) (info->stream, "0x%lx",
                                     (l >> OP_SH_UDI3) & OP_MASK_UDI3);
                                     (l >> OP_SH_UDI3) & OP_MASK_UDI3);
              break;
              break;
 
 
            case '4':
            case '4':
              (*info->fprintf_func) (info->stream, "0x%lx",
              (*info->fprintf_func) (info->stream, "0x%lx",
                                     (l >> OP_SH_UDI4) & OP_MASK_UDI4);
                                     (l >> OP_SH_UDI4) & OP_MASK_UDI4);
              break;
              break;
 
 
            case 'C':
            case 'C':
            case 'H':
            case 'H':
              msbd = (l >> OP_SH_EXTMSBD) & OP_MASK_EXTMSBD;
              msbd = (l >> OP_SH_EXTMSBD) & OP_MASK_EXTMSBD;
              (*info->fprintf_func) (info->stream, "0x%x", msbd + 1);
              (*info->fprintf_func) (info->stream, "0x%x", msbd + 1);
              break;
              break;
 
 
            case 'D':
            case 'D':
              {
              {
                const struct mips_cp0sel_name *n;
                const struct mips_cp0sel_name *n;
                unsigned int cp0reg, sel;
                unsigned int cp0reg, sel;
 
 
                cp0reg = (l >> OP_SH_RD) & OP_MASK_RD;
                cp0reg = (l >> OP_SH_RD) & OP_MASK_RD;
                sel = (l >> OP_SH_SEL) & OP_MASK_SEL;
                sel = (l >> OP_SH_SEL) & OP_MASK_SEL;
 
 
                /* CP0 register including 'sel' code for mtcN (et al.), to be
                /* CP0 register including 'sel' code for mtcN (et al.), to be
                   printed textually if known.  If not known, print both
                   printed textually if known.  If not known, print both
                   CP0 register name and sel numerically since CP0 register
                   CP0 register name and sel numerically since CP0 register
                   with sel 0 may have a name unrelated to register being
                   with sel 0 may have a name unrelated to register being
                   printed.  */
                   printed.  */
                n = lookup_mips_cp0sel_name(mips_cp0sel_names,
                n = lookup_mips_cp0sel_name(mips_cp0sel_names,
                                            mips_cp0sel_names_len, cp0reg, sel);
                                            mips_cp0sel_names_len, cp0reg, sel);
                if (n != NULL)
                if (n != NULL)
                  (*info->fprintf_func) (info->stream, "%s", n->name);
                  (*info->fprintf_func) (info->stream, "%s", n->name);
                else
                else
                  (*info->fprintf_func) (info->stream, "$%d,%d", cp0reg, sel);
                  (*info->fprintf_func) (info->stream, "$%d,%d", cp0reg, sel);
                break;
                break;
              }
              }
 
 
            case 'E':
            case 'E':
              lsb = ((l >> OP_SH_SHAMT) & OP_MASK_SHAMT) + 32;
              lsb = ((l >> OP_SH_SHAMT) & OP_MASK_SHAMT) + 32;
              (*info->fprintf_func) (info->stream, "0x%x", lsb);
              (*info->fprintf_func) (info->stream, "0x%x", lsb);
              break;
              break;
 
 
            case 'F':
            case 'F':
              msb = ((l >> OP_SH_INSMSB) & OP_MASK_INSMSB) + 32;
              msb = ((l >> OP_SH_INSMSB) & OP_MASK_INSMSB) + 32;
              (*info->fprintf_func) (info->stream, "0x%x", msb - lsb + 1);
              (*info->fprintf_func) (info->stream, "0x%x", msb - lsb + 1);
              break;
              break;
 
 
            case 'G':
            case 'G':
              msbd = ((l >> OP_SH_EXTMSBD) & OP_MASK_EXTMSBD) + 32;
              msbd = ((l >> OP_SH_EXTMSBD) & OP_MASK_EXTMSBD) + 32;
              (*info->fprintf_func) (info->stream, "0x%x", msbd + 1);
              (*info->fprintf_func) (info->stream, "0x%x", msbd + 1);
              break;
              break;
 
 
            case 't': /* Coprocessor 0 reg name */
            case 't': /* Coprocessor 0 reg name */
              (*info->fprintf_func) (info->stream, "%s",
              (*info->fprintf_func) (info->stream, "%s",
                                     mips_cp0_names[(l >> OP_SH_RT) &
                                     mips_cp0_names[(l >> OP_SH_RT) &
                                                     OP_MASK_RT]);
                                                     OP_MASK_RT]);
              break;
              break;
 
 
            case 'T': /* Coprocessor 0 reg name */
            case 'T': /* Coprocessor 0 reg name */
              {
              {
                const struct mips_cp0sel_name *n;
                const struct mips_cp0sel_name *n;
                unsigned int cp0reg, sel;
                unsigned int cp0reg, sel;
 
 
                cp0reg = (l >> OP_SH_RT) & OP_MASK_RT;
                cp0reg = (l >> OP_SH_RT) & OP_MASK_RT;
                sel = (l >> OP_SH_SEL) & OP_MASK_SEL;
                sel = (l >> OP_SH_SEL) & OP_MASK_SEL;
 
 
                /* CP0 register including 'sel' code for mftc0, to be
                /* CP0 register including 'sel' code for mftc0, to be
                   printed textually if known.  If not known, print both
                   printed textually if known.  If not known, print both
                   CP0 register name and sel numerically since CP0 register
                   CP0 register name and sel numerically since CP0 register
                   with sel 0 may have a name unrelated to register being
                   with sel 0 may have a name unrelated to register being
                   printed.  */
                   printed.  */
                n = lookup_mips_cp0sel_name(mips_cp0sel_names,
                n = lookup_mips_cp0sel_name(mips_cp0sel_names,
                                            mips_cp0sel_names_len, cp0reg, sel);
                                            mips_cp0sel_names_len, cp0reg, sel);
                if (n != NULL)
                if (n != NULL)
                  (*info->fprintf_func) (info->stream, "%s", n->name);
                  (*info->fprintf_func) (info->stream, "%s", n->name);
                else
                else
                  (*info->fprintf_func) (info->stream, "$%d,%d", cp0reg, sel);
                  (*info->fprintf_func) (info->stream, "$%d,%d", cp0reg, sel);
                break;
                break;
              }
              }
 
 
            case 'x':           /* bbit bit index */
            case 'x':           /* bbit bit index */
              (*info->fprintf_func) (info->stream, "0x%lx",
              (*info->fprintf_func) (info->stream, "0x%lx",
                                     (l >> OP_SH_BBITIND) & OP_MASK_BBITIND);
                                     (l >> OP_SH_BBITIND) & OP_MASK_BBITIND);
              break;
              break;
 
 
            case 'p':           /* cins, cins32, exts and exts32 position */
            case 'p':           /* cins, cins32, exts and exts32 position */
              (*info->fprintf_func) (info->stream, "0x%lx",
              (*info->fprintf_func) (info->stream, "0x%lx",
                                     (l >> OP_SH_CINSPOS) & OP_MASK_CINSPOS);
                                     (l >> OP_SH_CINSPOS) & OP_MASK_CINSPOS);
              break;
              break;
 
 
            case 's':           /* cins and exts length-minus-one */
            case 's':           /* cins and exts length-minus-one */
              (*info->fprintf_func) (info->stream, "0x%lx",
              (*info->fprintf_func) (info->stream, "0x%lx",
                                     (l >> OP_SH_CINSLM1) & OP_MASK_CINSLM1);
                                     (l >> OP_SH_CINSLM1) & OP_MASK_CINSLM1);
              break;
              break;
 
 
            case 'S':           /* cins32 and exts32 length-minus-one field */
            case 'S':           /* cins32 and exts32 length-minus-one field */
              (*info->fprintf_func) (info->stream, "0x%lx",
              (*info->fprintf_func) (info->stream, "0x%lx",
                                     (l >> OP_SH_CINSLM1) & OP_MASK_CINSLM1);
                                     (l >> OP_SH_CINSLM1) & OP_MASK_CINSLM1);
              break;
              break;
 
 
            case 'Q':           /* seqi/snei immediate field */
            case 'Q':           /* seqi/snei immediate field */
              op = (l >> OP_SH_SEQI) & OP_MASK_SEQI;
              op = (l >> OP_SH_SEQI) & OP_MASK_SEQI;
              /* Sign-extend it.  */
              /* Sign-extend it.  */
              op = (op ^ 512) - 512;
              op = (op ^ 512) - 512;
              (*info->fprintf_func) (info->stream, "%d", op);
              (*info->fprintf_func) (info->stream, "%d", op);
              break;
              break;
 
 
            default:
            default:
              /* xgettext:c-format */
              /* xgettext:c-format */
              (*info->fprintf_func) (info->stream,
              (*info->fprintf_func) (info->stream,
                                     _("# internal error, undefined extension sequence (+%c)"),
                                     _("# internal error, undefined extension sequence (+%c)"),
                                     *d);
                                     *d);
              return;
              return;
            }
            }
          break;
          break;
 
 
        case '2':
        case '2':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_BP) & OP_MASK_BP);
                                 (l >> OP_SH_BP) & OP_MASK_BP);
          break;
          break;
 
 
        case '3':
        case '3':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_SA3) & OP_MASK_SA3);
                                 (l >> OP_SH_SA3) & OP_MASK_SA3);
          break;
          break;
 
 
        case '4':
        case '4':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_SA4) & OP_MASK_SA4);
                                 (l >> OP_SH_SA4) & OP_MASK_SA4);
          break;
          break;
 
 
        case '5':
        case '5':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_IMM8) & OP_MASK_IMM8);
                                 (l >> OP_SH_IMM8) & OP_MASK_IMM8);
          break;
          break;
 
 
        case '6':
        case '6':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_RS) & OP_MASK_RS);
                                 (l >> OP_SH_RS) & OP_MASK_RS);
          break;
          break;
 
 
        case '7':
        case '7':
          (*info->fprintf_func) (info->stream, "$ac%ld",
          (*info->fprintf_func) (info->stream, "$ac%ld",
                                 (l >> OP_SH_DSPACC) & OP_MASK_DSPACC);
                                 (l >> OP_SH_DSPACC) & OP_MASK_DSPACC);
          break;
          break;
 
 
        case '8':
        case '8':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_WRDSP) & OP_MASK_WRDSP);
                                 (l >> OP_SH_WRDSP) & OP_MASK_WRDSP);
          break;
          break;
 
 
        case '9':
        case '9':
          (*info->fprintf_func) (info->stream, "$ac%ld",
          (*info->fprintf_func) (info->stream, "$ac%ld",
                                 (l >> OP_SH_DSPACC_S) & OP_MASK_DSPACC_S);
                                 (l >> OP_SH_DSPACC_S) & OP_MASK_DSPACC_S);
          break;
          break;
 
 
        case '0': /* dsp 6-bit signed immediate in bit 20 */
        case '0': /* dsp 6-bit signed immediate in bit 20 */
          delta = ((l >> OP_SH_DSPSFT) & OP_MASK_DSPSFT);
          delta = ((l >> OP_SH_DSPSFT) & OP_MASK_DSPSFT);
          if (delta & 0x20) /* test sign bit */
          if (delta & 0x20) /* test sign bit */
            delta |= ~OP_MASK_DSPSFT;
            delta |= ~OP_MASK_DSPSFT;
          (*info->fprintf_func) (info->stream, "%d", delta);
          (*info->fprintf_func) (info->stream, "%d", delta);
          break;
          break;
 
 
        case ':': /* dsp 7-bit signed immediate in bit 19 */
        case ':': /* dsp 7-bit signed immediate in bit 19 */
          delta = ((l >> OP_SH_DSPSFT_7) & OP_MASK_DSPSFT_7);
          delta = ((l >> OP_SH_DSPSFT_7) & OP_MASK_DSPSFT_7);
          if (delta & 0x40) /* test sign bit */
          if (delta & 0x40) /* test sign bit */
            delta |= ~OP_MASK_DSPSFT_7;
            delta |= ~OP_MASK_DSPSFT_7;
          (*info->fprintf_func) (info->stream, "%d", delta);
          (*info->fprintf_func) (info->stream, "%d", delta);
          break;
          break;
 
 
        case '\'':
        case '\'':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_RDDSP) & OP_MASK_RDDSP);
                                 (l >> OP_SH_RDDSP) & OP_MASK_RDDSP);
          break;
          break;
 
 
        case '@': /* dsp 10-bit signed immediate in bit 16 */
        case '@': /* dsp 10-bit signed immediate in bit 16 */
          delta = ((l >> OP_SH_IMM10) & OP_MASK_IMM10);
          delta = ((l >> OP_SH_IMM10) & OP_MASK_IMM10);
          if (delta & 0x200) /* test sign bit */
          if (delta & 0x200) /* test sign bit */
            delta |= ~OP_MASK_IMM10;
            delta |= ~OP_MASK_IMM10;
          (*info->fprintf_func) (info->stream, "%d", delta);
          (*info->fprintf_func) (info->stream, "%d", delta);
          break;
          break;
 
 
        case '!':
        case '!':
          (*info->fprintf_func) (info->stream, "%ld",
          (*info->fprintf_func) (info->stream, "%ld",
                                 (l >> OP_SH_MT_U) & OP_MASK_MT_U);
                                 (l >> OP_SH_MT_U) & OP_MASK_MT_U);
          break;
          break;
 
 
        case '$':
        case '$':
          (*info->fprintf_func) (info->stream, "%ld",
          (*info->fprintf_func) (info->stream, "%ld",
                                 (l >> OP_SH_MT_H) & OP_MASK_MT_H);
                                 (l >> OP_SH_MT_H) & OP_MASK_MT_H);
          break;
          break;
 
 
        case '*':
        case '*':
          (*info->fprintf_func) (info->stream, "$ac%ld",
          (*info->fprintf_func) (info->stream, "$ac%ld",
                                 (l >> OP_SH_MTACC_T) & OP_MASK_MTACC_T);
                                 (l >> OP_SH_MTACC_T) & OP_MASK_MTACC_T);
          break;
          break;
 
 
        case '&':
        case '&':
          (*info->fprintf_func) (info->stream, "$ac%ld",
          (*info->fprintf_func) (info->stream, "$ac%ld",
                                 (l >> OP_SH_MTACC_D) & OP_MASK_MTACC_D);
                                 (l >> OP_SH_MTACC_D) & OP_MASK_MTACC_D);
          break;
          break;
 
 
        case 'g':
        case 'g':
          /* Coprocessor register for CTTC1, MTTC2, MTHC2, CTTC2.  */
          /* Coprocessor register for CTTC1, MTTC2, MTHC2, CTTC2.  */
          (*info->fprintf_func) (info->stream, "$%ld",
          (*info->fprintf_func) (info->stream, "$%ld",
                                 (l >> OP_SH_RD) & OP_MASK_RD);
                                 (l >> OP_SH_RD) & OP_MASK_RD);
          break;
          break;
 
 
        case 's':
        case 's':
        case 'b':
        case 'b':
        case 'r':
        case 'r':
        case 'v':
        case 'v':
          (*info->fprintf_func) (info->stream, "%s",
          (*info->fprintf_func) (info->stream, "%s",
                                 mips_gpr_names[(l >> OP_SH_RS) & OP_MASK_RS]);
                                 mips_gpr_names[(l >> OP_SH_RS) & OP_MASK_RS]);
          break;
          break;
 
 
        case 't':
        case 't':
        case 'w':
        case 'w':
          (*info->fprintf_func) (info->stream, "%s",
          (*info->fprintf_func) (info->stream, "%s",
                                 mips_gpr_names[(l >> OP_SH_RT) & OP_MASK_RT]);
                                 mips_gpr_names[(l >> OP_SH_RT) & OP_MASK_RT]);
          break;
          break;
 
 
        case 'i':
        case 'i':
        case 'u':
        case 'u':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_IMMEDIATE) & OP_MASK_IMMEDIATE);
                                 (l >> OP_SH_IMMEDIATE) & OP_MASK_IMMEDIATE);
          break;
          break;
 
 
        case 'j': /* Same as i, but sign-extended.  */
        case 'j': /* Same as i, but sign-extended.  */
        case 'o':
        case 'o':
          delta = (l >> OP_SH_DELTA) & OP_MASK_DELTA;
          delta = (l >> OP_SH_DELTA) & OP_MASK_DELTA;
          if (delta & 0x8000)
          if (delta & 0x8000)
            delta |= ~0xffff;
            delta |= ~0xffff;
          (*info->fprintf_func) (info->stream, "%d",
          (*info->fprintf_func) (info->stream, "%d",
                                 delta);
                                 delta);
          break;
          break;
 
 
        case 'h':
        case 'h':
          (*info->fprintf_func) (info->stream, "0x%x",
          (*info->fprintf_func) (info->stream, "0x%x",
                                 (unsigned int) ((l >> OP_SH_PREFX)
                                 (unsigned int) ((l >> OP_SH_PREFX)
                                                 & OP_MASK_PREFX));
                                                 & OP_MASK_PREFX));
          break;
          break;
 
 
        case 'k':
        case 'k':
          (*info->fprintf_func) (info->stream, "0x%x",
          (*info->fprintf_func) (info->stream, "0x%x",
                                 (unsigned int) ((l >> OP_SH_CACHE)
                                 (unsigned int) ((l >> OP_SH_CACHE)
                                                 & OP_MASK_CACHE));
                                                 & OP_MASK_CACHE));
          break;
          break;
 
 
        case 'a':
        case 'a':
          info->target = (((pc + 4) & ~(bfd_vma) 0x0fffffff)
          info->target = (((pc + 4) & ~(bfd_vma) 0x0fffffff)
                          | (((l >> OP_SH_TARGET) & OP_MASK_TARGET) << 2));
                          | (((l >> OP_SH_TARGET) & OP_MASK_TARGET) << 2));
          /* For gdb disassembler, force odd address on jalx.  */
          /* For gdb disassembler, force odd address on jalx.  */
          if (info->flavour == bfd_target_unknown_flavour
          if (info->flavour == bfd_target_unknown_flavour
              && strcmp (opp->name, "jalx") == 0)
              && strcmp (opp->name, "jalx") == 0)
            info->target |= 1;
            info->target |= 1;
          (*info->print_address_func) (info->target, info);
          (*info->print_address_func) (info->target, info);
          break;
          break;
 
 
        case 'p':
        case 'p':
          /* Sign extend the displacement.  */
          /* Sign extend the displacement.  */
          delta = (l >> OP_SH_DELTA) & OP_MASK_DELTA;
          delta = (l >> OP_SH_DELTA) & OP_MASK_DELTA;
          if (delta & 0x8000)
          if (delta & 0x8000)
            delta |= ~0xffff;
            delta |= ~0xffff;
          info->target = (delta << 2) + pc + INSNLEN;
          info->target = (delta << 2) + pc + INSNLEN;
          (*info->print_address_func) (info->target, info);
          (*info->print_address_func) (info->target, info);
          break;
          break;
 
 
        case 'd':
        case 'd':
          (*info->fprintf_func) (info->stream, "%s",
          (*info->fprintf_func) (info->stream, "%s",
                                 mips_gpr_names[(l >> OP_SH_RD) & OP_MASK_RD]);
                                 mips_gpr_names[(l >> OP_SH_RD) & OP_MASK_RD]);
          break;
          break;
 
 
        case 'U':
        case 'U':
          {
          {
            /* First check for both rd and rt being equal.  */
            /* First check for both rd and rt being equal.  */
            unsigned int reg = (l >> OP_SH_RD) & OP_MASK_RD;
            unsigned int reg = (l >> OP_SH_RD) & OP_MASK_RD;
            if (reg == ((l >> OP_SH_RT) & OP_MASK_RT))
            if (reg == ((l >> OP_SH_RT) & OP_MASK_RT))
              (*info->fprintf_func) (info->stream, "%s",
              (*info->fprintf_func) (info->stream, "%s",
                                     mips_gpr_names[reg]);
                                     mips_gpr_names[reg]);
            else
            else
              {
              {
                /* If one is zero use the other.  */
                /* If one is zero use the other.  */
                if (reg == 0)
                if (reg == 0)
                  (*info->fprintf_func) (info->stream, "%s",
                  (*info->fprintf_func) (info->stream, "%s",
                                         mips_gpr_names[(l >> OP_SH_RT) & OP_MASK_RT]);
                                         mips_gpr_names[(l >> OP_SH_RT) & OP_MASK_RT]);
                else if (((l >> OP_SH_RT) & OP_MASK_RT) == 0)
                else if (((l >> OP_SH_RT) & OP_MASK_RT) == 0)
                  (*info->fprintf_func) (info->stream, "%s",
                  (*info->fprintf_func) (info->stream, "%s",
                                         mips_gpr_names[reg]);
                                         mips_gpr_names[reg]);
                else /* Bogus, result depends on processor.  */
                else /* Bogus, result depends on processor.  */
                  (*info->fprintf_func) (info->stream, "%s or %s",
                  (*info->fprintf_func) (info->stream, "%s or %s",
                                         mips_gpr_names[reg],
                                         mips_gpr_names[reg],
                                         mips_gpr_names[(l >> OP_SH_RT) & OP_MASK_RT]);
                                         mips_gpr_names[(l >> OP_SH_RT) & OP_MASK_RT]);
              }
              }
          }
          }
          break;
          break;
 
 
        case 'z':
        case 'z':
          (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[0]);
          (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[0]);
          break;
          break;
 
 
        case '<':
        case '<':
        case '1':
        case '1':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_SHAMT) & OP_MASK_SHAMT);
                                 (l >> OP_SH_SHAMT) & OP_MASK_SHAMT);
          break;
          break;
 
 
        case 'c':
        case 'c':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_CODE) & OP_MASK_CODE);
                                 (l >> OP_SH_CODE) & OP_MASK_CODE);
          break;
          break;
 
 
        case 'q':
        case 'q':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_CODE2) & OP_MASK_CODE2);
                                 (l >> OP_SH_CODE2) & OP_MASK_CODE2);
          break;
          break;
 
 
        case 'C':
        case 'C':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_COPZ) & OP_MASK_COPZ);
                                 (l >> OP_SH_COPZ) & OP_MASK_COPZ);
          break;
          break;
 
 
        case 'B':
        case 'B':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
 
 
                                 (l >> OP_SH_CODE20) & OP_MASK_CODE20);
                                 (l >> OP_SH_CODE20) & OP_MASK_CODE20);
          break;
          break;
 
 
        case 'J':
        case 'J':
          (*info->fprintf_func) (info->stream, "0x%lx",
          (*info->fprintf_func) (info->stream, "0x%lx",
                                 (l >> OP_SH_CODE19) & OP_MASK_CODE19);
                                 (l >> OP_SH_CODE19) & OP_MASK_CODE19);
          break;
          break;
 
 
        case 'S':
        case 'S':
        case 'V':
        case 'V':
          (*info->fprintf_func) (info->stream, "%s",
          (*info->fprintf_func) (info->stream, "%s",
                                 mips_fpr_names[(l >> OP_SH_FS) & OP_MASK_FS]);
                                 mips_fpr_names[(l >> OP_SH_FS) & OP_MASK_FS]);
          break;
          break;
 
 
        case 'T':
        case 'T':
        case 'W':
        case 'W':
          (*info->fprintf_func) (info->stream, "%s",
          (*info->fprintf_func) (info->stream, "%s",
                                 mips_fpr_names[(l >> OP_SH_FT) & OP_MASK_FT]);
                                 mips_fpr_names[(l >> OP_SH_FT) & OP_MASK_FT]);
          break;
          break;
 
 
        case 'D':
        case 'D':
          (*info->fprintf_func) (info->stream, "%s",
          (*info->fprintf_func) (info->stream, "%s",
                                 mips_fpr_names[(l >> OP_SH_FD) & OP_MASK_FD]);
                                 mips_fpr_names[(l >> OP_SH_FD) & OP_MASK_FD]);
          break;
          break;
 
 
        case 'R':
        case 'R':
          (*info->fprintf_func) (info->stream, "%s",
          (*info->fprintf_func) (info->stream, "%s",
                                 mips_fpr_names[(l >> OP_SH_FR) & OP_MASK_FR]);
                                 mips_fpr_names[(l >> OP_SH_FR) & OP_MASK_FR]);
          break;
          break;
 
 
        case 'E':
        case 'E':
          /* Coprocessor register for lwcN instructions, et al.
          /* Coprocessor register for lwcN instructions, et al.
 
 
             Note that there is no load/store cp0 instructions, and
             Note that there is no load/store cp0 instructions, and
             that FPU (cp1) instructions disassemble this field using
             that FPU (cp1) instructions disassemble this field using
             'T' format.  Therefore, until we gain understanding of
             'T' format.  Therefore, until we gain understanding of
             cp2 register names, we can simply print the register
             cp2 register names, we can simply print the register
             numbers.  */
             numbers.  */
          (*info->fprintf_func) (info->stream, "$%ld",
          (*info->fprintf_func) (info->stream, "$%ld",
                                 (l >> OP_SH_RT) & OP_MASK_RT);
                                 (l >> OP_SH_RT) & OP_MASK_RT);
          break;
          break;
 
 
        case 'G':
        case 'G':
          /* Coprocessor register for mtcN instructions, et al.  Note
          /* Coprocessor register for mtcN instructions, et al.  Note
             that FPU (cp1) instructions disassemble this field using
             that FPU (cp1) instructions disassemble this field using
             'S' format.  Therefore, we only need to worry about cp0,
             'S' format.  Therefore, we only need to worry about cp0,
             cp2, and cp3.  */
             cp2, and cp3.  */
          op = (l >> OP_SH_OP) & OP_MASK_OP;
          op = (l >> OP_SH_OP) & OP_MASK_OP;
          if (op == OP_OP_COP0)
          if (op == OP_OP_COP0)
            (*info->fprintf_func) (info->stream, "%s",
            (*info->fprintf_func) (info->stream, "%s",
                                   mips_cp0_names[(l >> OP_SH_RD) & OP_MASK_RD]);
                                   mips_cp0_names[(l >> OP_SH_RD) & OP_MASK_RD]);
          else
          else
            (*info->fprintf_func) (info->stream, "$%ld",
            (*info->fprintf_func) (info->stream, "$%ld",
                                   (l >> OP_SH_RD) & OP_MASK_RD);
                                   (l >> OP_SH_RD) & OP_MASK_RD);
          break;
          break;
 
 
        case 'K':
        case 'K':
          (*info->fprintf_func) (info->stream, "%s",
          (*info->fprintf_func) (info->stream, "%s",
                                 mips_hwr_names[(l >> OP_SH_RD) & OP_MASK_RD]);
                                 mips_hwr_names[(l >> OP_SH_RD) & OP_MASK_RD]);
          break;
          break;
 
 
        case 'N':
        case 'N':
          (*info->fprintf_func) (info->stream,
          (*info->fprintf_func) (info->stream,
                                 ((opp->pinfo & (FP_D | FP_S)) != 0
                                 ((opp->pinfo & (FP_D | FP_S)) != 0
                                  ? "$fcc%ld" : "$cc%ld"),
                                  ? "$fcc%ld" : "$cc%ld"),
                                 (l >> OP_SH_BCC) & OP_MASK_BCC);
                                 (l >> OP_SH_BCC) & OP_MASK_BCC);
          break;
          break;
 
 
        case 'M':
        case 'M':
          (*info->fprintf_func) (info->stream, "$fcc%ld",
          (*info->fprintf_func) (info->stream, "$fcc%ld",
                                 (l >> OP_SH_CCC) & OP_MASK_CCC);
                                 (l >> OP_SH_CCC) & OP_MASK_CCC);
          break;
          break;
 
 
        case 'P':
        case 'P':
          (*info->fprintf_func) (info->stream, "%ld",
          (*info->fprintf_func) (info->stream, "%ld",
                                 (l >> OP_SH_PERFREG) & OP_MASK_PERFREG);
                                 (l >> OP_SH_PERFREG) & OP_MASK_PERFREG);
          break;
          break;
 
 
        case 'e':
        case 'e':
          (*info->fprintf_func) (info->stream, "%ld",
          (*info->fprintf_func) (info->stream, "%ld",
                                 (l >> OP_SH_VECBYTE) & OP_MASK_VECBYTE);
                                 (l >> OP_SH_VECBYTE) & OP_MASK_VECBYTE);
          break;
          break;
 
 
        case '%':
        case '%':
          (*info->fprintf_func) (info->stream, "%ld",
          (*info->fprintf_func) (info->stream, "%ld",
                                 (l >> OP_SH_VECALIGN) & OP_MASK_VECALIGN);
                                 (l >> OP_SH_VECALIGN) & OP_MASK_VECALIGN);
          break;
          break;
 
 
        case 'H':
        case 'H':
          (*info->fprintf_func) (info->stream, "%ld",
          (*info->fprintf_func) (info->stream, "%ld",
                                 (l >> OP_SH_SEL) & OP_MASK_SEL);
                                 (l >> OP_SH_SEL) & OP_MASK_SEL);
          break;
          break;
 
 
        case 'O':
        case 'O':
          (*info->fprintf_func) (info->stream, "%ld",
          (*info->fprintf_func) (info->stream, "%ld",
                                 (l >> OP_SH_ALN) & OP_MASK_ALN);
                                 (l >> OP_SH_ALN) & OP_MASK_ALN);
          break;
          break;
 
 
        case 'Q':
        case 'Q':
          {
          {
            unsigned int vsel = (l >> OP_SH_VSEL) & OP_MASK_VSEL;
            unsigned int vsel = (l >> OP_SH_VSEL) & OP_MASK_VSEL;
 
 
            if ((vsel & 0x10) == 0)
            if ((vsel & 0x10) == 0)
              {
              {
                int fmt;
                int fmt;
 
 
                vsel &= 0x0f;
                vsel &= 0x0f;
                for (fmt = 0; fmt < 3; fmt++, vsel >>= 1)
                for (fmt = 0; fmt < 3; fmt++, vsel >>= 1)
                  if ((vsel & 1) == 0)
                  if ((vsel & 1) == 0)
                    break;
                    break;
                (*info->fprintf_func) (info->stream, "$v%ld[%d]",
                (*info->fprintf_func) (info->stream, "$v%ld[%d]",
                                       (l >> OP_SH_FT) & OP_MASK_FT,
                                       (l >> OP_SH_FT) & OP_MASK_FT,
                                       vsel >> 1);
                                       vsel >> 1);
              }
              }
            else if ((vsel & 0x08) == 0)
            else if ((vsel & 0x08) == 0)
              {
              {
                (*info->fprintf_func) (info->stream, "$v%ld",
                (*info->fprintf_func) (info->stream, "$v%ld",
                                       (l >> OP_SH_FT) & OP_MASK_FT);
                                       (l >> OP_SH_FT) & OP_MASK_FT);
              }
              }
            else
            else
              {
              {
                (*info->fprintf_func) (info->stream, "0x%lx",
                (*info->fprintf_func) (info->stream, "0x%lx",
                                       (l >> OP_SH_FT) & OP_MASK_FT);
                                       (l >> OP_SH_FT) & OP_MASK_FT);
              }
              }
          }
          }
          break;
          break;
 
 
        case 'X':
        case 'X':
          (*info->fprintf_func) (info->stream, "$v%ld",
          (*info->fprintf_func) (info->stream, "$v%ld",
                                 (l >> OP_SH_FD) & OP_MASK_FD);
                                 (l >> OP_SH_FD) & OP_MASK_FD);
          break;
          break;
 
 
        case 'Y':
        case 'Y':
          (*info->fprintf_func) (info->stream, "$v%ld",
          (*info->fprintf_func) (info->stream, "$v%ld",
                                 (l >> OP_SH_FS) & OP_MASK_FS);
                                 (l >> OP_SH_FS) & OP_MASK_FS);
          break;
          break;
 
 
        case 'Z':
        case 'Z':
          (*info->fprintf_func) (info->stream, "$v%ld",
          (*info->fprintf_func) (info->stream, "$v%ld",
                                 (l >> OP_SH_FT) & OP_MASK_FT);
                                 (l >> OP_SH_FT) & OP_MASK_FT);
          break;
          break;
 
 
        default:
        default:
          /* xgettext:c-format */
          /* xgettext:c-format */
          (*info->fprintf_func) (info->stream,
          (*info->fprintf_func) (info->stream,
                                 _("# internal error, undefined modifier (%c)"),
                                 _("# internal error, undefined modifier (%c)"),
                                 *d);
                                 *d);
          return;
          return;
        }
        }
    }
    }
}
}


/* Print the mips instruction at address MEMADDR in debugged memory,
/* Print the mips instruction at address MEMADDR in debugged memory,
   on using INFO.  Returns length of the instruction, in bytes, which is
   on using INFO.  Returns length of the instruction, in bytes, which is
   always INSNLEN.  BIGENDIAN must be 1 if this is big-endian code, 0 if
   always INSNLEN.  BIGENDIAN must be 1 if this is big-endian code, 0 if
   this is little-endian code.  */
   this is little-endian code.  */
 
 
static int
static int
print_insn_mips (bfd_vma memaddr,
print_insn_mips (bfd_vma memaddr,
                 unsigned long int word,
                 unsigned long int word,
                 struct disassemble_info *info)
                 struct disassemble_info *info)
{
{
  const struct mips_opcode *op;
  const struct mips_opcode *op;
  static bfd_boolean init = 0;
  static bfd_boolean init = 0;
  static const struct mips_opcode *mips_hash[OP_MASK_OP + 1];
  static const struct mips_opcode *mips_hash[OP_MASK_OP + 1];
 
 
  /* Build a hash table to shorten the search time.  */
  /* Build a hash table to shorten the search time.  */
  if (! init)
  if (! init)
    {
    {
      unsigned int i;
      unsigned int i;
 
 
      for (i = 0; i <= OP_MASK_OP; i++)
      for (i = 0; i <= OP_MASK_OP; i++)
        {
        {
          for (op = mips_opcodes; op < &mips_opcodes[NUMOPCODES]; op++)
          for (op = mips_opcodes; op < &mips_opcodes[NUMOPCODES]; op++)
            {
            {
              if (op->pinfo == INSN_MACRO
              if (op->pinfo == INSN_MACRO
                  || (no_aliases && (op->pinfo2 & INSN2_ALIAS)))
                  || (no_aliases && (op->pinfo2 & INSN2_ALIAS)))
                continue;
                continue;
              if (i == ((op->match >> OP_SH_OP) & OP_MASK_OP))
              if (i == ((op->match >> OP_SH_OP) & OP_MASK_OP))
                {
                {
                  mips_hash[i] = op;
                  mips_hash[i] = op;
                  break;
                  break;
                }
                }
            }
            }
        }
        }
 
 
      init = 1;
      init = 1;
    }
    }
 
 
  info->bytes_per_chunk = INSNLEN;
  info->bytes_per_chunk = INSNLEN;
  info->display_endian = info->endian;
  info->display_endian = info->endian;
  info->insn_info_valid = 1;
  info->insn_info_valid = 1;
  info->branch_delay_insns = 0;
  info->branch_delay_insns = 0;
  info->data_size = 0;
  info->data_size = 0;
  info->insn_type = dis_nonbranch;
  info->insn_type = dis_nonbranch;
  info->target = 0;
  info->target = 0;
  info->target2 = 0;
  info->target2 = 0;
 
 
  op = mips_hash[(word >> OP_SH_OP) & OP_MASK_OP];
  op = mips_hash[(word >> OP_SH_OP) & OP_MASK_OP];
  if (op != NULL)
  if (op != NULL)
    {
    {
      for (; op < &mips_opcodes[NUMOPCODES]; op++)
      for (; op < &mips_opcodes[NUMOPCODES]; op++)
        {
        {
          if (op->pinfo != INSN_MACRO
          if (op->pinfo != INSN_MACRO
              && !(no_aliases && (op->pinfo2 & INSN2_ALIAS))
              && !(no_aliases && (op->pinfo2 & INSN2_ALIAS))
              && (word & op->mask) == op->match)
              && (word & op->mask) == op->match)
            {
            {
              const char *d;
              const char *d;
 
 
              /* We always allow to disassemble the jalx instruction.  */
              /* We always allow to disassemble the jalx instruction.  */
              if (! OPCODE_IS_MEMBER (op, mips_isa, mips_processor)
              if (! OPCODE_IS_MEMBER (op, mips_isa, mips_processor)
                  && strcmp (op->name, "jalx"))
                  && strcmp (op->name, "jalx"))
                continue;
                continue;
 
 
              /* Figure out instruction type and branch delay information.  */
              /* Figure out instruction type and branch delay information.  */
              if ((op->pinfo & INSN_UNCOND_BRANCH_DELAY) != 0)
              if ((op->pinfo & INSN_UNCOND_BRANCH_DELAY) != 0)
                {
                {
                  if ((info->insn_type & INSN_WRITE_GPR_31) != 0)
                  if ((info->insn_type & INSN_WRITE_GPR_31) != 0)
                    info->insn_type = dis_jsr;
                    info->insn_type = dis_jsr;
                  else
                  else
                    info->insn_type = dis_branch;
                    info->insn_type = dis_branch;
                  info->branch_delay_insns = 1;
                  info->branch_delay_insns = 1;
                }
                }
              else if ((op->pinfo & (INSN_COND_BRANCH_DELAY
              else if ((op->pinfo & (INSN_COND_BRANCH_DELAY
                                     | INSN_COND_BRANCH_LIKELY)) != 0)
                                     | INSN_COND_BRANCH_LIKELY)) != 0)
                {
                {
                  if ((info->insn_type & INSN_WRITE_GPR_31) != 0)
                  if ((info->insn_type & INSN_WRITE_GPR_31) != 0)
                    info->insn_type = dis_condjsr;
                    info->insn_type = dis_condjsr;
                  else
                  else
                    info->insn_type = dis_condbranch;
                    info->insn_type = dis_condbranch;
                  info->branch_delay_insns = 1;
                  info->branch_delay_insns = 1;
                }
                }
              else if ((op->pinfo & (INSN_STORE_MEMORY
              else if ((op->pinfo & (INSN_STORE_MEMORY
                                     | INSN_LOAD_MEMORY_DELAY)) != 0)
                                     | INSN_LOAD_MEMORY_DELAY)) != 0)
                info->insn_type = dis_dref;
                info->insn_type = dis_dref;
 
 
              (*info->fprintf_func) (info->stream, "%s", op->name);
              (*info->fprintf_func) (info->stream, "%s", op->name);
 
 
              d = op->args;
              d = op->args;
              if (d != NULL && *d != '\0')
              if (d != NULL && *d != '\0')
                {
                {
                  (*info->fprintf_func) (info->stream, "\t");
                  (*info->fprintf_func) (info->stream, "\t");
                  print_insn_args (d, word, memaddr, info, op);
                  print_insn_args (d, word, memaddr, info, op);
                }
                }
 
 
              return INSNLEN;
              return INSNLEN;
            }
            }
        }
        }
    }
    }
 
 
  /* Handle undefined instructions.  */
  /* Handle undefined instructions.  */
  info->insn_type = dis_noninsn;
  info->insn_type = dis_noninsn;
  (*info->fprintf_func) (info->stream, "0x%lx", word);
  (*info->fprintf_func) (info->stream, "0x%lx", word);
  return INSNLEN;
  return INSNLEN;
}
}


/* Disassemble an operand for a mips16 instruction.  */
/* Disassemble an operand for a mips16 instruction.  */
 
 
static void
static void
print_mips16_insn_arg (char type,
print_mips16_insn_arg (char type,
                       const struct mips_opcode *op,
                       const struct mips_opcode *op,
                       int l,
                       int l,
                       bfd_boolean use_extend,
                       bfd_boolean use_extend,
                       int extend,
                       int extend,
                       bfd_vma memaddr,
                       bfd_vma memaddr,
                       struct disassemble_info *info)
                       struct disassemble_info *info)
{
{
  switch (type)
  switch (type)
    {
    {
    case ',':
    case ',':
    case '(':
    case '(':
    case ')':
    case ')':
      (*info->fprintf_func) (info->stream, "%c", type);
      (*info->fprintf_func) (info->stream, "%c", type);
      break;
      break;
 
 
    case 'y':
    case 'y':
    case 'w':
    case 'w':
      (*info->fprintf_func) (info->stream, "%s",
      (*info->fprintf_func) (info->stream, "%s",
                             mips16_reg_names(((l >> MIPS16OP_SH_RY)
                             mips16_reg_names(((l >> MIPS16OP_SH_RY)
                                               & MIPS16OP_MASK_RY)));
                                               & MIPS16OP_MASK_RY)));
      break;
      break;
 
 
    case 'x':
    case 'x':
    case 'v':
    case 'v':
      (*info->fprintf_func) (info->stream, "%s",
      (*info->fprintf_func) (info->stream, "%s",
                             mips16_reg_names(((l >> MIPS16OP_SH_RX)
                             mips16_reg_names(((l >> MIPS16OP_SH_RX)
                                               & MIPS16OP_MASK_RX)));
                                               & MIPS16OP_MASK_RX)));
      break;
      break;
 
 
    case 'z':
    case 'z':
      (*info->fprintf_func) (info->stream, "%s",
      (*info->fprintf_func) (info->stream, "%s",
                             mips16_reg_names(((l >> MIPS16OP_SH_RZ)
                             mips16_reg_names(((l >> MIPS16OP_SH_RZ)
                                               & MIPS16OP_MASK_RZ)));
                                               & MIPS16OP_MASK_RZ)));
      break;
      break;
 
 
    case 'Z':
    case 'Z':
      (*info->fprintf_func) (info->stream, "%s",
      (*info->fprintf_func) (info->stream, "%s",
                             mips16_reg_names(((l >> MIPS16OP_SH_MOVE32Z)
                             mips16_reg_names(((l >> MIPS16OP_SH_MOVE32Z)
                                               & MIPS16OP_MASK_MOVE32Z)));
                                               & MIPS16OP_MASK_MOVE32Z)));
      break;
      break;
 
 
    case '0':
    case '0':
      (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[0]);
      (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[0]);
      break;
      break;
 
 
    case 'S':
    case 'S':
      (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[29]);
      (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[29]);
      break;
      break;
 
 
    case 'P':
    case 'P':
      (*info->fprintf_func) (info->stream, "$pc");
      (*info->fprintf_func) (info->stream, "$pc");
      break;
      break;
 
 
    case 'R':
    case 'R':
      (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[31]);
      (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[31]);
      break;
      break;
 
 
    case 'X':
    case 'X':
      (*info->fprintf_func) (info->stream, "%s",
      (*info->fprintf_func) (info->stream, "%s",
                             mips_gpr_names[((l >> MIPS16OP_SH_REGR32)
                             mips_gpr_names[((l >> MIPS16OP_SH_REGR32)
                                            & MIPS16OP_MASK_REGR32)]);
                                            & MIPS16OP_MASK_REGR32)]);
      break;
      break;
 
 
    case 'Y':
    case 'Y':
      (*info->fprintf_func) (info->stream, "%s",
      (*info->fprintf_func) (info->stream, "%s",
                             mips_gpr_names[MIPS16OP_EXTRACT_REG32R (l)]);
                             mips_gpr_names[MIPS16OP_EXTRACT_REG32R (l)]);
      break;
      break;
 
 
    case '<':
    case '<':
    case '>':
    case '>':
    case '[':
    case '[':
    case ']':
    case ']':
    case '4':
    case '4':
    case '5':
    case '5':
    case 'H':
    case 'H':
    case 'W':
    case 'W':
    case 'D':
    case 'D':
    case 'j':
    case 'j':
    case '6':
    case '6':
    case '8':
    case '8':
    case 'V':
    case 'V':
    case 'C':
    case 'C':
    case 'U':
    case 'U':
    case 'k':
    case 'k':
    case 'K':
    case 'K':
    case 'p':
    case 'p':
    case 'q':
    case 'q':
    case 'A':
    case 'A':
    case 'B':
    case 'B':
    case 'E':
    case 'E':
      {
      {
        int immed, nbits, shift, signedp, extbits, pcrel, extu, branch;
        int immed, nbits, shift, signedp, extbits, pcrel, extu, branch;
 
 
        shift = 0;
        shift = 0;
        signedp = 0;
        signedp = 0;
        extbits = 16;
        extbits = 16;
        pcrel = 0;
        pcrel = 0;
        extu = 0;
        extu = 0;
        branch = 0;
        branch = 0;
        switch (type)
        switch (type)
          {
          {
          case '<':
          case '<':
            nbits = 3;
            nbits = 3;
            immed = (l >> MIPS16OP_SH_RZ) & MIPS16OP_MASK_RZ;
            immed = (l >> MIPS16OP_SH_RZ) & MIPS16OP_MASK_RZ;
            extbits = 5;
            extbits = 5;
            extu = 1;
            extu = 1;
            break;
            break;
          case '>':
          case '>':
            nbits = 3;
            nbits = 3;
            immed = (l >> MIPS16OP_SH_RX) & MIPS16OP_MASK_RX;
            immed = (l >> MIPS16OP_SH_RX) & MIPS16OP_MASK_RX;
            extbits = 5;
            extbits = 5;
            extu = 1;
            extu = 1;
            break;
            break;
          case '[':
          case '[':
            nbits = 3;
            nbits = 3;
            immed = (l >> MIPS16OP_SH_RZ) & MIPS16OP_MASK_RZ;
            immed = (l >> MIPS16OP_SH_RZ) & MIPS16OP_MASK_RZ;
            extbits = 6;
            extbits = 6;
            extu = 1;
            extu = 1;
            break;
            break;
          case ']':
          case ']':
            nbits = 3;
            nbits = 3;
            immed = (l >> MIPS16OP_SH_RX) & MIPS16OP_MASK_RX;
            immed = (l >> MIPS16OP_SH_RX) & MIPS16OP_MASK_RX;
            extbits = 6;
            extbits = 6;
            extu = 1;
            extu = 1;
            break;
            break;
          case '4':
          case '4':
            nbits = 4;
            nbits = 4;
            immed = (l >> MIPS16OP_SH_IMM4) & MIPS16OP_MASK_IMM4;
            immed = (l >> MIPS16OP_SH_IMM4) & MIPS16OP_MASK_IMM4;
            signedp = 1;
            signedp = 1;
            extbits = 15;
            extbits = 15;
            break;
            break;
          case '5':
          case '5':
            nbits = 5;
            nbits = 5;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            info->insn_type = dis_dref;
            info->insn_type = dis_dref;
            info->data_size = 1;
            info->data_size = 1;
            break;
            break;
          case 'H':
          case 'H':
            nbits = 5;
            nbits = 5;
            shift = 1;
            shift = 1;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            info->insn_type = dis_dref;
            info->insn_type = dis_dref;
            info->data_size = 2;
            info->data_size = 2;
            break;
            break;
          case 'W':
          case 'W':
            nbits = 5;
            nbits = 5;
            shift = 2;
            shift = 2;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            if ((op->pinfo & MIPS16_INSN_READ_PC) == 0
            if ((op->pinfo & MIPS16_INSN_READ_PC) == 0
                && (op->pinfo & MIPS16_INSN_READ_SP) == 0)
                && (op->pinfo & MIPS16_INSN_READ_SP) == 0)
              {
              {
                info->insn_type = dis_dref;
                info->insn_type = dis_dref;
                info->data_size = 4;
                info->data_size = 4;
              }
              }
            break;
            break;
          case 'D':
          case 'D':
            nbits = 5;
            nbits = 5;
            shift = 3;
            shift = 3;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            info->insn_type = dis_dref;
            info->insn_type = dis_dref;
            info->data_size = 8;
            info->data_size = 8;
            break;
            break;
          case 'j':
          case 'j':
            nbits = 5;
            nbits = 5;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            signedp = 1;
            signedp = 1;
            break;
            break;
          case '6':
          case '6':
            nbits = 6;
            nbits = 6;
            immed = (l >> MIPS16OP_SH_IMM6) & MIPS16OP_MASK_IMM6;
            immed = (l >> MIPS16OP_SH_IMM6) & MIPS16OP_MASK_IMM6;
            break;
            break;
          case '8':
          case '8':
            nbits = 8;
            nbits = 8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            break;
            break;
          case 'V':
          case 'V':
            nbits = 8;
            nbits = 8;
            shift = 2;
            shift = 2;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            /* FIXME: This might be lw, or it might be addiu to $sp or
            /* FIXME: This might be lw, or it might be addiu to $sp or
               $pc.  We assume it's load.  */
               $pc.  We assume it's load.  */
            info->insn_type = dis_dref;
            info->insn_type = dis_dref;
            info->data_size = 4;
            info->data_size = 4;
            break;
            break;
          case 'C':
          case 'C':
            nbits = 8;
            nbits = 8;
            shift = 3;
            shift = 3;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            info->insn_type = dis_dref;
            info->insn_type = dis_dref;
            info->data_size = 8;
            info->data_size = 8;
            break;
            break;
          case 'U':
          case 'U':
            nbits = 8;
            nbits = 8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            extu = 1;
            extu = 1;
            break;
            break;
          case 'k':
          case 'k':
            nbits = 8;
            nbits = 8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            signedp = 1;
            signedp = 1;
            break;
            break;
          case 'K':
          case 'K':
            nbits = 8;
            nbits = 8;
            shift = 3;
            shift = 3;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            signedp = 1;
            signedp = 1;
            break;
            break;
          case 'p':
          case 'p':
            nbits = 8;
            nbits = 8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            signedp = 1;
            signedp = 1;
            pcrel = 1;
            pcrel = 1;
            branch = 1;
            branch = 1;
            info->insn_type = dis_condbranch;
            info->insn_type = dis_condbranch;
            break;
            break;
          case 'q':
          case 'q':
            nbits = 11;
            nbits = 11;
            immed = (l >> MIPS16OP_SH_IMM11) & MIPS16OP_MASK_IMM11;
            immed = (l >> MIPS16OP_SH_IMM11) & MIPS16OP_MASK_IMM11;
            signedp = 1;
            signedp = 1;
            pcrel = 1;
            pcrel = 1;
            branch = 1;
            branch = 1;
            info->insn_type = dis_branch;
            info->insn_type = dis_branch;
            break;
            break;
          case 'A':
          case 'A':
            nbits = 8;
            nbits = 8;
            shift = 2;
            shift = 2;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            immed = (l >> MIPS16OP_SH_IMM8) & MIPS16OP_MASK_IMM8;
            pcrel = 1;
            pcrel = 1;
            /* FIXME: This can be lw or la.  We assume it is lw.  */
            /* FIXME: This can be lw or la.  We assume it is lw.  */
            info->insn_type = dis_dref;
            info->insn_type = dis_dref;
            info->data_size = 4;
            info->data_size = 4;
            break;
            break;
          case 'B':
          case 'B':
            nbits = 5;
            nbits = 5;
            shift = 3;
            shift = 3;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            pcrel = 1;
            pcrel = 1;
            info->insn_type = dis_dref;
            info->insn_type = dis_dref;
            info->data_size = 8;
            info->data_size = 8;
            break;
            break;
          case 'E':
          case 'E':
            nbits = 5;
            nbits = 5;
            shift = 2;
            shift = 2;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            immed = (l >> MIPS16OP_SH_IMM5) & MIPS16OP_MASK_IMM5;
            pcrel = 1;
            pcrel = 1;
            break;
            break;
          default:
          default:
            abort ();
            abort ();
          }
          }
 
 
        if (! use_extend)
        if (! use_extend)
          {
          {
            if (signedp && immed >= (1 << (nbits - 1)))
            if (signedp && immed >= (1 << (nbits - 1)))
              immed -= 1 << nbits;
              immed -= 1 << nbits;
            immed <<= shift;
            immed <<= shift;
            if ((type == '<' || type == '>' || type == '[' || type == ']')
            if ((type == '<' || type == '>' || type == '[' || type == ']')
                && immed == 0)
                && immed == 0)
              immed = 8;
              immed = 8;
          }
          }
        else
        else
          {
          {
            if (extbits == 16)
            if (extbits == 16)
              immed |= ((extend & 0x1f) << 11) | (extend & 0x7e0);
              immed |= ((extend & 0x1f) << 11) | (extend & 0x7e0);
            else if (extbits == 15)
            else if (extbits == 15)
              immed |= ((extend & 0xf) << 11) | (extend & 0x7f0);
              immed |= ((extend & 0xf) << 11) | (extend & 0x7f0);
            else
            else
              immed = ((extend >> 6) & 0x1f) | (extend & 0x20);
              immed = ((extend >> 6) & 0x1f) | (extend & 0x20);
            immed &= (1 << extbits) - 1;
            immed &= (1 << extbits) - 1;
            if (! extu && immed >= (1 << (extbits - 1)))
            if (! extu && immed >= (1 << (extbits - 1)))
              immed -= 1 << extbits;
              immed -= 1 << extbits;
          }
          }
 
 
        if (! pcrel)
        if (! pcrel)
          (*info->fprintf_func) (info->stream, "%d", immed);
          (*info->fprintf_func) (info->stream, "%d", immed);
        else
        else
          {
          {
            bfd_vma baseaddr;
            bfd_vma baseaddr;
 
 
            if (branch)
            if (branch)
              {
              {
                immed *= 2;
                immed *= 2;
                baseaddr = memaddr + 2;
                baseaddr = memaddr + 2;
              }
              }
            else if (use_extend)
            else if (use_extend)
              baseaddr = memaddr - 2;
              baseaddr = memaddr - 2;
            else
            else
              {
              {
                int status;
                int status;
                bfd_byte buffer[2];
                bfd_byte buffer[2];
 
 
                baseaddr = memaddr;
                baseaddr = memaddr;
 
 
                /* If this instruction is in the delay slot of a jr
                /* If this instruction is in the delay slot of a jr
                   instruction, the base address is the address of the
                   instruction, the base address is the address of the
                   jr instruction.  If it is in the delay slot of jalr
                   jr instruction.  If it is in the delay slot of jalr
                   instruction, the base address is the address of the
                   instruction, the base address is the address of the
                   jalr instruction.  This test is unreliable: we have
                   jalr instruction.  This test is unreliable: we have
                   no way of knowing whether the previous word is
                   no way of knowing whether the previous word is
                   instruction or data.  */
                   instruction or data.  */
                status = (*info->read_memory_func) (memaddr - 4, buffer, 2,
                status = (*info->read_memory_func) (memaddr - 4, buffer, 2,
                                                    info);
                                                    info);
                if (status == 0
                if (status == 0
                    && (((info->endian == BFD_ENDIAN_BIG
                    && (((info->endian == BFD_ENDIAN_BIG
                          ? bfd_getb16 (buffer)
                          ? bfd_getb16 (buffer)
                          : bfd_getl16 (buffer))
                          : bfd_getl16 (buffer))
                         & 0xf800) == 0x1800))
                         & 0xf800) == 0x1800))
                  baseaddr = memaddr - 4;
                  baseaddr = memaddr - 4;
                else
                else
                  {
                  {
                    status = (*info->read_memory_func) (memaddr - 2, buffer,
                    status = (*info->read_memory_func) (memaddr - 2, buffer,
                                                        2, info);
                                                        2, info);
                    if (status == 0
                    if (status == 0
                        && (((info->endian == BFD_ENDIAN_BIG
                        && (((info->endian == BFD_ENDIAN_BIG
                              ? bfd_getb16 (buffer)
                              ? bfd_getb16 (buffer)
                              : bfd_getl16 (buffer))
                              : bfd_getl16 (buffer))
                             & 0xf81f) == 0xe800))
                             & 0xf81f) == 0xe800))
                      baseaddr = memaddr - 2;
                      baseaddr = memaddr - 2;
                  }
                  }
              }
              }
            info->target = (baseaddr & ~((1 << shift) - 1)) + immed;
            info->target = (baseaddr & ~((1 << shift) - 1)) + immed;
            if (pcrel && branch
            if (pcrel && branch
                && info->flavour == bfd_target_unknown_flavour)
                && info->flavour == bfd_target_unknown_flavour)
              /* For gdb disassembler, maintain odd address.  */
              /* For gdb disassembler, maintain odd address.  */
              info->target |= 1;
              info->target |= 1;
            (*info->print_address_func) (info->target, info);
            (*info->print_address_func) (info->target, info);
          }
          }
      }
      }
      break;
      break;
 
 
    case 'a':
    case 'a':
      {
      {
        int jalx = l & 0x400;
        int jalx = l & 0x400;
 
 
        if (! use_extend)
        if (! use_extend)
          extend = 0;
          extend = 0;
        l = ((l & 0x1f) << 23) | ((l & 0x3e0) << 13) | (extend << 2);
        l = ((l & 0x1f) << 23) | ((l & 0x3e0) << 13) | (extend << 2);
        if (!jalx && info->flavour == bfd_target_unknown_flavour)
        if (!jalx && info->flavour == bfd_target_unknown_flavour)
          /* For gdb disassembler, maintain odd address.  */
          /* For gdb disassembler, maintain odd address.  */
          l |= 1;
          l |= 1;
      }
      }
      info->target = ((memaddr + 4) & ~(bfd_vma) 0x0fffffff) | l;
      info->target = ((memaddr + 4) & ~(bfd_vma) 0x0fffffff) | l;
      (*info->print_address_func) (info->target, info);
      (*info->print_address_func) (info->target, info);
      info->insn_type = dis_jsr;
      info->insn_type = dis_jsr;
      info->branch_delay_insns = 1;
      info->branch_delay_insns = 1;
      break;
      break;
 
 
    case 'l':
    case 'l':
    case 'L':
    case 'L':
      {
      {
        int need_comma, amask, smask;
        int need_comma, amask, smask;
 
 
        need_comma = 0;
        need_comma = 0;
 
 
        l = (l >> MIPS16OP_SH_IMM6) & MIPS16OP_MASK_IMM6;
        l = (l >> MIPS16OP_SH_IMM6) & MIPS16OP_MASK_IMM6;
 
 
        amask = (l >> 3) & 7;
        amask = (l >> 3) & 7;
 
 
        if (amask > 0 && amask < 5)
        if (amask > 0 && amask < 5)
          {
          {
            (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[4]);
            (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[4]);
            if (amask > 1)
            if (amask > 1)
              (*info->fprintf_func) (info->stream, "-%s",
              (*info->fprintf_func) (info->stream, "-%s",
                                     mips_gpr_names[amask + 3]);
                                     mips_gpr_names[amask + 3]);
            need_comma = 1;
            need_comma = 1;
          }
          }
 
 
        smask = (l >> 1) & 3;
        smask = (l >> 1) & 3;
        if (smask == 3)
        if (smask == 3)
          {
          {
            (*info->fprintf_func) (info->stream, "%s??",
            (*info->fprintf_func) (info->stream, "%s??",
                                   need_comma ? "," : "");
                                   need_comma ? "," : "");
            need_comma = 1;
            need_comma = 1;
          }
          }
        else if (smask > 0)
        else if (smask > 0)
          {
          {
            (*info->fprintf_func) (info->stream, "%s%s",
            (*info->fprintf_func) (info->stream, "%s%s",
                                   need_comma ? "," : "",
                                   need_comma ? "," : "",
                                   mips_gpr_names[16]);
                                   mips_gpr_names[16]);
            if (smask > 1)
            if (smask > 1)
              (*info->fprintf_func) (info->stream, "-%s",
              (*info->fprintf_func) (info->stream, "-%s",
                                     mips_gpr_names[smask + 15]);
                                     mips_gpr_names[smask + 15]);
            need_comma = 1;
            need_comma = 1;
          }
          }
 
 
        if (l & 1)
        if (l & 1)
          {
          {
            (*info->fprintf_func) (info->stream, "%s%s",
            (*info->fprintf_func) (info->stream, "%s%s",
                                   need_comma ? "," : "",
                                   need_comma ? "," : "",
                                   mips_gpr_names[31]);
                                   mips_gpr_names[31]);
            need_comma = 1;
            need_comma = 1;
          }
          }
 
 
        if (amask == 5 || amask == 6)
        if (amask == 5 || amask == 6)
          {
          {
            (*info->fprintf_func) (info->stream, "%s$f0",
            (*info->fprintf_func) (info->stream, "%s$f0",
                                   need_comma ? "," : "");
                                   need_comma ? "," : "");
            if (amask == 6)
            if (amask == 6)
              (*info->fprintf_func) (info->stream, "-$f1");
              (*info->fprintf_func) (info->stream, "-$f1");
          }
          }
      }
      }
      break;
      break;
 
 
    case 'm':
    case 'm':
    case 'M':
    case 'M':
      /* MIPS16e save/restore.  */
      /* MIPS16e save/restore.  */
      {
      {
      int need_comma = 0;
      int need_comma = 0;
      int amask, args, statics;
      int amask, args, statics;
      int nsreg, smask;
      int nsreg, smask;
      int framesz;
      int framesz;
      int i, j;
      int i, j;
 
 
      l = l & 0x7f;
      l = l & 0x7f;
      if (use_extend)
      if (use_extend)
        l |= extend << 16;
        l |= extend << 16;
 
 
      amask = (l >> 16) & 0xf;
      amask = (l >> 16) & 0xf;
      if (amask == MIPS16_ALL_ARGS)
      if (amask == MIPS16_ALL_ARGS)
        {
        {
          args = 4;
          args = 4;
          statics = 0;
          statics = 0;
        }
        }
      else if (amask == MIPS16_ALL_STATICS)
      else if (amask == MIPS16_ALL_STATICS)
        {
        {
          args = 0;
          args = 0;
          statics = 4;
          statics = 4;
        }
        }
      else
      else
        {
        {
          args = amask >> 2;
          args = amask >> 2;
          statics = amask & 3;
          statics = amask & 3;
        }
        }
 
 
      if (args > 0) {
      if (args > 0) {
          (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[4]);
          (*info->fprintf_func) (info->stream, "%s", mips_gpr_names[4]);
          if (args > 1)
          if (args > 1)
            (*info->fprintf_func) (info->stream, "-%s",
            (*info->fprintf_func) (info->stream, "-%s",
                                   mips_gpr_names[4 + args - 1]);
                                   mips_gpr_names[4 + args - 1]);
          need_comma = 1;
          need_comma = 1;
      }
      }
 
 
      framesz = (((l >> 16) & 0xf0) | (l & 0x0f)) * 8;
      framesz = (((l >> 16) & 0xf0) | (l & 0x0f)) * 8;
      if (framesz == 0 && !use_extend)
      if (framesz == 0 && !use_extend)
        framesz = 128;
        framesz = 128;
 
 
      (*info->fprintf_func) (info->stream, "%s%d",
      (*info->fprintf_func) (info->stream, "%s%d",
                             need_comma ? "," : "",
                             need_comma ? "," : "",
                             framesz);
                             framesz);
 
 
      if (l & 0x40)                   /* $ra */
      if (l & 0x40)                   /* $ra */
        (*info->fprintf_func) (info->stream, ",%s", mips_gpr_names[31]);
        (*info->fprintf_func) (info->stream, ",%s", mips_gpr_names[31]);
 
 
      nsreg = (l >> 24) & 0x7;
      nsreg = (l >> 24) & 0x7;
      smask = 0;
      smask = 0;
      if (l & 0x20)                   /* $s0 */
      if (l & 0x20)                   /* $s0 */
        smask |= 1 << 0;
        smask |= 1 << 0;
      if (l & 0x10)                   /* $s1 */
      if (l & 0x10)                   /* $s1 */
        smask |= 1 << 1;
        smask |= 1 << 1;
      if (nsreg > 0)                  /* $s2-$s8 */
      if (nsreg > 0)                  /* $s2-$s8 */
        smask |= ((1 << nsreg) - 1) << 2;
        smask |= ((1 << nsreg) - 1) << 2;
 
 
      /* Find first set static reg bit.  */
      /* Find first set static reg bit.  */
      for (i = 0; i < 9; i++)
      for (i = 0; i < 9; i++)
        {
        {
          if (smask & (1 << i))
          if (smask & (1 << i))
            {
            {
              (*info->fprintf_func) (info->stream, ",%s",
              (*info->fprintf_func) (info->stream, ",%s",
                                     mips_gpr_names[i == 8 ? 30 : (16 + i)]);
                                     mips_gpr_names[i == 8 ? 30 : (16 + i)]);
              /* Skip over string of set bits.  */
              /* Skip over string of set bits.  */
              for (j = i; smask & (2 << j); j++)
              for (j = i; smask & (2 << j); j++)
                continue;
                continue;
              if (j > i)
              if (j > i)
                (*info->fprintf_func) (info->stream, "-%s",
                (*info->fprintf_func) (info->stream, "-%s",
                                       mips_gpr_names[j == 8 ? 30 : (16 + j)]);
                                       mips_gpr_names[j == 8 ? 30 : (16 + j)]);
              i = j + 1;
              i = j + 1;
            }
            }
        }
        }
 
 
      /* Statics $ax - $a3.  */
      /* Statics $ax - $a3.  */
      if (statics == 1)
      if (statics == 1)
        (*info->fprintf_func) (info->stream, ",%s", mips_gpr_names[7]);
        (*info->fprintf_func) (info->stream, ",%s", mips_gpr_names[7]);
      else if (statics > 0)
      else if (statics > 0)
        (*info->fprintf_func) (info->stream, ",%s-%s",
        (*info->fprintf_func) (info->stream, ",%s-%s",
                               mips_gpr_names[7 - statics + 1],
                               mips_gpr_names[7 - statics + 1],
                               mips_gpr_names[7]);
                               mips_gpr_names[7]);
      }
      }
      break;
      break;
 
 
    default:
    default:
      /* xgettext:c-format */
      /* xgettext:c-format */
      (*info->fprintf_func)
      (*info->fprintf_func)
        (info->stream,
        (info->stream,
         _("# internal disassembler error, unrecognised modifier (%c)"),
         _("# internal disassembler error, unrecognised modifier (%c)"),
         type);
         type);
      abort ();
      abort ();
    }
    }
}
}
 
 
/* Disassemble mips16 instructions.  */
/* Disassemble mips16 instructions.  */
 
 
static int
static int
print_insn_mips16 (bfd_vma memaddr, struct disassemble_info *info)
print_insn_mips16 (bfd_vma memaddr, struct disassemble_info *info)
{
{
  int status;
  int status;
  bfd_byte buffer[2];
  bfd_byte buffer[2];
  int length;
  int length;
  int insn;
  int insn;
  bfd_boolean use_extend;
  bfd_boolean use_extend;
  int extend = 0;
  int extend = 0;
  const struct mips_opcode *op, *opend;
  const struct mips_opcode *op, *opend;
 
 
  info->bytes_per_chunk = 2;
  info->bytes_per_chunk = 2;
  info->display_endian = info->endian;
  info->display_endian = info->endian;
  info->insn_info_valid = 1;
  info->insn_info_valid = 1;
  info->branch_delay_insns = 0;
  info->branch_delay_insns = 0;
  info->data_size = 0;
  info->data_size = 0;
  info->insn_type = dis_nonbranch;
  info->insn_type = dis_nonbranch;
  info->target = 0;
  info->target = 0;
  info->target2 = 0;
  info->target2 = 0;
 
 
  status = (*info->read_memory_func) (memaddr, buffer, 2, info);
  status = (*info->read_memory_func) (memaddr, buffer, 2, info);
  if (status != 0)
  if (status != 0)
    {
    {
      (*info->memory_error_func) (status, memaddr, info);
      (*info->memory_error_func) (status, memaddr, info);
      return -1;
      return -1;
    }
    }
 
 
  length = 2;
  length = 2;
 
 
  if (info->endian == BFD_ENDIAN_BIG)
  if (info->endian == BFD_ENDIAN_BIG)
    insn = bfd_getb16 (buffer);
    insn = bfd_getb16 (buffer);
  else
  else
    insn = bfd_getl16 (buffer);
    insn = bfd_getl16 (buffer);
 
 
  /* Handle the extend opcode specially.  */
  /* Handle the extend opcode specially.  */
  use_extend = FALSE;
  use_extend = FALSE;
  if ((insn & 0xf800) == 0xf000)
  if ((insn & 0xf800) == 0xf000)
    {
    {
      use_extend = TRUE;
      use_extend = TRUE;
      extend = insn & 0x7ff;
      extend = insn & 0x7ff;
 
 
      memaddr += 2;
      memaddr += 2;
 
 
      status = (*info->read_memory_func) (memaddr, buffer, 2, info);
      status = (*info->read_memory_func) (memaddr, buffer, 2, info);
      if (status != 0)
      if (status != 0)
        {
        {
          (*info->fprintf_func) (info->stream, "extend 0x%x",
          (*info->fprintf_func) (info->stream, "extend 0x%x",
                                 (unsigned int) extend);
                                 (unsigned int) extend);
          (*info->memory_error_func) (status, memaddr, info);
          (*info->memory_error_func) (status, memaddr, info);
          return -1;
          return -1;
        }
        }
 
 
      if (info->endian == BFD_ENDIAN_BIG)
      if (info->endian == BFD_ENDIAN_BIG)
        insn = bfd_getb16 (buffer);
        insn = bfd_getb16 (buffer);
      else
      else
        insn = bfd_getl16 (buffer);
        insn = bfd_getl16 (buffer);
 
 
      /* Check for an extend opcode followed by an extend opcode.  */
      /* Check for an extend opcode followed by an extend opcode.  */
      if ((insn & 0xf800) == 0xf000)
      if ((insn & 0xf800) == 0xf000)
        {
        {
          (*info->fprintf_func) (info->stream, "extend 0x%x",
          (*info->fprintf_func) (info->stream, "extend 0x%x",
                                 (unsigned int) extend);
                                 (unsigned int) extend);
          info->insn_type = dis_noninsn;
          info->insn_type = dis_noninsn;
          return length;
          return length;
        }
        }
 
 
      length += 2;
      length += 2;
    }
    }
 
 
  /* FIXME: Should probably use a hash table on the major opcode here.  */
  /* FIXME: Should probably use a hash table on the major opcode here.  */
 
 
  opend = mips16_opcodes + bfd_mips16_num_opcodes;
  opend = mips16_opcodes + bfd_mips16_num_opcodes;
  for (op = mips16_opcodes; op < opend; op++)
  for (op = mips16_opcodes; op < opend; op++)
    {
    {
      if (op->pinfo != INSN_MACRO
      if (op->pinfo != INSN_MACRO
          && !(no_aliases && (op->pinfo2 & INSN2_ALIAS))
          && !(no_aliases && (op->pinfo2 & INSN2_ALIAS))
          && (insn & op->mask) == op->match)
          && (insn & op->mask) == op->match)
        {
        {
          const char *s;
          const char *s;
 
 
          if (strchr (op->args, 'a') != NULL)
          if (strchr (op->args, 'a') != NULL)
            {
            {
              if (use_extend)
              if (use_extend)
                {
                {
                  (*info->fprintf_func) (info->stream, "extend 0x%x",
                  (*info->fprintf_func) (info->stream, "extend 0x%x",
                                         (unsigned int) extend);
                                         (unsigned int) extend);
                  info->insn_type = dis_noninsn;
                  info->insn_type = dis_noninsn;
                  return length - 2;
                  return length - 2;
                }
                }
 
 
              use_extend = FALSE;
              use_extend = FALSE;
 
 
              memaddr += 2;
              memaddr += 2;
 
 
              status = (*info->read_memory_func) (memaddr, buffer, 2,
              status = (*info->read_memory_func) (memaddr, buffer, 2,
                                                  info);
                                                  info);
              if (status == 0)
              if (status == 0)
                {
                {
                  use_extend = TRUE;
                  use_extend = TRUE;
                  if (info->endian == BFD_ENDIAN_BIG)
                  if (info->endian == BFD_ENDIAN_BIG)
                    extend = bfd_getb16 (buffer);
                    extend = bfd_getb16 (buffer);
                  else
                  else
                    extend = bfd_getl16 (buffer);
                    extend = bfd_getl16 (buffer);
                  length += 2;
                  length += 2;
                }
                }
            }
            }
 
 
          (*info->fprintf_func) (info->stream, "%s", op->name);
          (*info->fprintf_func) (info->stream, "%s", op->name);
          if (op->args[0] != '\0')
          if (op->args[0] != '\0')
            (*info->fprintf_func) (info->stream, "\t");
            (*info->fprintf_func) (info->stream, "\t");
 
 
          for (s = op->args; *s != '\0'; s++)
          for (s = op->args; *s != '\0'; s++)
            {
            {
              if (*s == ','
              if (*s == ','
                  && s[1] == 'w'
                  && s[1] == 'w'
                  && (((insn >> MIPS16OP_SH_RX) & MIPS16OP_MASK_RX)
                  && (((insn >> MIPS16OP_SH_RX) & MIPS16OP_MASK_RX)
                      == ((insn >> MIPS16OP_SH_RY) & MIPS16OP_MASK_RY)))
                      == ((insn >> MIPS16OP_SH_RY) & MIPS16OP_MASK_RY)))
                {
                {
                  /* Skip the register and the comma.  */
                  /* Skip the register and the comma.  */
                  ++s;
                  ++s;
                  continue;
                  continue;
                }
                }
              if (*s == ','
              if (*s == ','
                  && s[1] == 'v'
                  && s[1] == 'v'
                  && (((insn >> MIPS16OP_SH_RZ) & MIPS16OP_MASK_RZ)
                  && (((insn >> MIPS16OP_SH_RZ) & MIPS16OP_MASK_RZ)
                      == ((insn >> MIPS16OP_SH_RX) & MIPS16OP_MASK_RX)))
                      == ((insn >> MIPS16OP_SH_RX) & MIPS16OP_MASK_RX)))
                {
                {
                  /* Skip the register and the comma.  */
                  /* Skip the register and the comma.  */
                  ++s;
                  ++s;
                  continue;
                  continue;
                }
                }
              print_mips16_insn_arg (*s, op, insn, use_extend, extend, memaddr,
              print_mips16_insn_arg (*s, op, insn, use_extend, extend, memaddr,
                                     info);
                                     info);
            }
            }
 
 
          if ((op->pinfo & INSN_UNCOND_BRANCH_DELAY) != 0)
          if ((op->pinfo & INSN_UNCOND_BRANCH_DELAY) != 0)
            {
            {
              info->branch_delay_insns = 1;
              info->branch_delay_insns = 1;
              if (info->insn_type != dis_jsr)
              if (info->insn_type != dis_jsr)
                info->insn_type = dis_branch;
                info->insn_type = dis_branch;
            }
            }
 
 
          return length;
          return length;
        }
        }
    }
    }
 
 
  if (use_extend)
  if (use_extend)
    (*info->fprintf_func) (info->stream, "0x%x", extend | 0xf000);
    (*info->fprintf_func) (info->stream, "0x%x", extend | 0xf000);
  (*info->fprintf_func) (info->stream, "0x%x", insn);
  (*info->fprintf_func) (info->stream, "0x%x", insn);
  info->insn_type = dis_noninsn;
  info->insn_type = dis_noninsn;
 
 
  return length;
  return length;
}
}
 
 
/* In an environment where we do not know the symbol type of the
/* In an environment where we do not know the symbol type of the
   instruction we are forced to assume that the low order bit of the
   instruction we are forced to assume that the low order bit of the
   instructions' address may mark it as a mips16 instruction.  If we
   instructions' address may mark it as a mips16 instruction.  If we
   are single stepping, or the pc is within the disassembled function,
   are single stepping, or the pc is within the disassembled function,
   this works.  Otherwise, we need a clue.  Sometimes.  */
   this works.  Otherwise, we need a clue.  Sometimes.  */
 
 
static int
static int
_print_insn_mips (bfd_vma memaddr,
_print_insn_mips (bfd_vma memaddr,
                  struct disassemble_info *info,
                  struct disassemble_info *info,
                  enum bfd_endian endianness)
                  enum bfd_endian endianness)
{
{
  bfd_byte buffer[INSNLEN];
  bfd_byte buffer[INSNLEN];
  int status;
  int status;
 
 
  set_default_mips_dis_options (info);
  set_default_mips_dis_options (info);
  parse_mips_dis_options (info->disassembler_options);
  parse_mips_dis_options (info->disassembler_options);
 
 
#if 1
#if 1
  /* FIXME: If odd address, this is CLEARLY a mips 16 instruction.  */
  /* FIXME: If odd address, this is CLEARLY a mips 16 instruction.  */
  /* Only a few tools will work this way.  */
  /* Only a few tools will work this way.  */
  if (memaddr & 0x01)
  if (memaddr & 0x01)
    return print_insn_mips16 (memaddr, info);
    return print_insn_mips16 (memaddr, info);
#endif
#endif
 
 
#if SYMTAB_AVAILABLE
#if SYMTAB_AVAILABLE
  if (info->mach == bfd_mach_mips16
  if (info->mach == bfd_mach_mips16
      || (info->symbols != NULL
      || (info->symbols != NULL
          && bfd_asymbol_flavour (*info->symbols) == bfd_target_elf_flavour
          && bfd_asymbol_flavour (*info->symbols) == bfd_target_elf_flavour
          && ELF_ST_IS_MIPS16 ((*(elf_symbol_type **) info->symbols)
          && ELF_ST_IS_MIPS16 ((*(elf_symbol_type **) info->symbols)
                               ->internal_elf_sym.st_other)))
                               ->internal_elf_sym.st_other)))
    return print_insn_mips16 (memaddr, info);
    return print_insn_mips16 (memaddr, info);
#endif
#endif
 
 
  status = (*info->read_memory_func) (memaddr, buffer, INSNLEN, info);
  status = (*info->read_memory_func) (memaddr, buffer, INSNLEN, info);
  if (status == 0)
  if (status == 0)
    {
    {
      unsigned long insn;
      unsigned long insn;
 
 
      if (endianness == BFD_ENDIAN_BIG)
      if (endianness == BFD_ENDIAN_BIG)
        insn = (unsigned long) bfd_getb32 (buffer);
        insn = (unsigned long) bfd_getb32 (buffer);
      else
      else
        insn = (unsigned long) bfd_getl32 (buffer);
        insn = (unsigned long) bfd_getl32 (buffer);
 
 
      return print_insn_mips (memaddr, insn, info);
      return print_insn_mips (memaddr, insn, info);
    }
    }
  else
  else
    {
    {
      (*info->memory_error_func) (status, memaddr, info);
      (*info->memory_error_func) (status, memaddr, info);
      return -1;
      return -1;
    }
    }
}
}
 
 
int
int
print_insn_big_mips (bfd_vma memaddr, struct disassemble_info *info)
print_insn_big_mips (bfd_vma memaddr, struct disassemble_info *info)
{
{
  return _print_insn_mips (memaddr, info, BFD_ENDIAN_BIG);
  return _print_insn_mips (memaddr, info, BFD_ENDIAN_BIG);
}
}
 
 
int
int
print_insn_little_mips (bfd_vma memaddr, struct disassemble_info *info)
print_insn_little_mips (bfd_vma memaddr, struct disassemble_info *info)
{
{
  return _print_insn_mips (memaddr, info, BFD_ENDIAN_LITTLE);
  return _print_insn_mips (memaddr, info, BFD_ENDIAN_LITTLE);
}
}


void
void
print_mips_disassembler_options (FILE *stream)
print_mips_disassembler_options (FILE *stream)
{
{
  unsigned int i;
  unsigned int i;
 
 
  fprintf (stream, _("\n\
  fprintf (stream, _("\n\
The following MIPS specific disassembler options are supported for use\n\
The following MIPS specific disassembler options are supported for use\n\
with the -M switch (multiple options should be separated by commas):\n"));
with the -M switch (multiple options should be separated by commas):\n"));
 
 
  fprintf (stream, _("\n\
  fprintf (stream, _("\n\
  gpr-names=ABI            Print GPR names according to  specified ABI.\n\
  gpr-names=ABI            Print GPR names according to  specified ABI.\n\
                           Default: based on binary being disassembled.\n"));
                           Default: based on binary being disassembled.\n"));
 
 
  fprintf (stream, _("\n\
  fprintf (stream, _("\n\
  fpr-names=ABI            Print FPR names according to specified ABI.\n\
  fpr-names=ABI            Print FPR names according to specified ABI.\n\
                           Default: numeric.\n"));
                           Default: numeric.\n"));
 
 
  fprintf (stream, _("\n\
  fprintf (stream, _("\n\
  cp0-names=ARCH           Print CP0 register names according to\n\
  cp0-names=ARCH           Print CP0 register names according to\n\
                           specified architecture.\n\
                           specified architecture.\n\
                           Default: based on binary being disassembled.\n"));
                           Default: based on binary being disassembled.\n"));
 
 
  fprintf (stream, _("\n\
  fprintf (stream, _("\n\
  hwr-names=ARCH           Print HWR names according to specified \n\
  hwr-names=ARCH           Print HWR names according to specified \n\
                           architecture.\n\
                           architecture.\n\
                           Default: based on binary being disassembled.\n"));
                           Default: based on binary being disassembled.\n"));
 
 
  fprintf (stream, _("\n\
  fprintf (stream, _("\n\
  reg-names=ABI            Print GPR and FPR names according to\n\
  reg-names=ABI            Print GPR and FPR names according to\n\
                           specified ABI.\n"));
                           specified ABI.\n"));
 
 
  fprintf (stream, _("\n\
  fprintf (stream, _("\n\
  reg-names=ARCH           Print CP0 register and HWR names according to\n\
  reg-names=ARCH           Print CP0 register and HWR names according to\n\
                           specified architecture.\n"));
                           specified architecture.\n"));
 
 
  fprintf (stream, _("\n\
  fprintf (stream, _("\n\
  For the options above, the following values are supported for \"ABI\":\n\
  For the options above, the following values are supported for \"ABI\":\n\
   "));
   "));
  for (i = 0; i < ARRAY_SIZE (mips_abi_choices); i++)
  for (i = 0; i < ARRAY_SIZE (mips_abi_choices); i++)
    fprintf (stream, " %s", mips_abi_choices[i].name);
    fprintf (stream, " %s", mips_abi_choices[i].name);
  fprintf (stream, _("\n"));
  fprintf (stream, _("\n"));
 
 
  fprintf (stream, _("\n\
  fprintf (stream, _("\n\
  For the options above, The following values are supported for \"ARCH\":\n\
  For the options above, The following values are supported for \"ARCH\":\n\
   "));
   "));
  for (i = 0; i < ARRAY_SIZE (mips_arch_choices); i++)
  for (i = 0; i < ARRAY_SIZE (mips_arch_choices); i++)
    if (*mips_arch_choices[i].name != '\0')
    if (*mips_arch_choices[i].name != '\0')
      fprintf (stream, " %s", mips_arch_choices[i].name);
      fprintf (stream, " %s", mips_arch_choices[i].name);
  fprintf (stream, _("\n"));
  fprintf (stream, _("\n"));
 
 
  fprintf (stream, _("\n"));
  fprintf (stream, _("\n"));
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.