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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [binutils-2.18.50/] [opcodes/] [ppc-dis.c] - Diff between revs 156 and 816

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

Rev 156 Rev 816
/* ppc-dis.c -- Disassemble PowerPC instructions
/* ppc-dis.c -- Disassemble PowerPC instructions
   Copyright 1994, 1995, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007
   Copyright 1994, 1995, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007
   Free Software Foundation, Inc.
   Free Software Foundation, Inc.
   Written by Ian Lance Taylor, Cygnus Support
   Written by Ian Lance Taylor, Cygnus Support
 
 
   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 file; see the file COPYING.  If not, write to the
   along with this file; see the file COPYING.  If not, write to the
   Free Software Foundation, 51 Franklin Street - Fifth Floor, Boston,
   Free Software Foundation, 51 Franklin Street - Fifth Floor, Boston,
   MA 02110-1301, USA.  */
   MA 02110-1301, USA.  */
 
 
#include <stdio.h>
#include <stdio.h>
#include "sysdep.h"
#include "sysdep.h"
#include "dis-asm.h"
#include "dis-asm.h"
#include "opcode/ppc.h"
#include "opcode/ppc.h"
 
 
/* This file provides several disassembler functions, all of which use
/* This file provides several disassembler functions, all of which use
   the disassembler interface defined in dis-asm.h.  Several functions
   the disassembler interface defined in dis-asm.h.  Several functions
   are provided because this file handles disassembly for the PowerPC
   are provided because this file handles disassembly for the PowerPC
   in both big and little endian mode and also for the POWER (RS/6000)
   in both big and little endian mode and also for the POWER (RS/6000)
   chip.  */
   chip.  */
 
 
static int print_insn_powerpc (bfd_vma, struct disassemble_info *, int, int);
static int print_insn_powerpc (bfd_vma, struct disassemble_info *, int, int);
 
 
/* Determine which set of machines to disassemble for.  PPC403/601 or
/* Determine which set of machines to disassemble for.  PPC403/601 or
   BookE.  For convenience, also disassemble instructions supported
   BookE.  For convenience, also disassemble instructions supported
   by the AltiVec vector unit.  */
   by the AltiVec vector unit.  */
 
 
static int
static int
powerpc_dialect (struct disassemble_info *info)
powerpc_dialect (struct disassemble_info *info)
{
{
  int dialect = PPC_OPCODE_PPC;
  int dialect = PPC_OPCODE_PPC;
 
 
  if (BFD_DEFAULT_TARGET_SIZE == 64)
  if (BFD_DEFAULT_TARGET_SIZE == 64)
    dialect |= PPC_OPCODE_64;
    dialect |= PPC_OPCODE_64;
 
 
  if (info->disassembler_options
  if (info->disassembler_options
      && strstr (info->disassembler_options, "ppcps") != NULL)
      && strstr (info->disassembler_options, "ppcps") != NULL)
    dialect |= PPC_OPCODE_PPCPS;
    dialect |= PPC_OPCODE_PPCPS;
  else if (info->disassembler_options
  else if (info->disassembler_options
      && strstr (info->disassembler_options, "booke") != NULL)
      && strstr (info->disassembler_options, "booke") != NULL)
    dialect |= PPC_OPCODE_BOOKE | PPC_OPCODE_BOOKE64;
    dialect |= PPC_OPCODE_BOOKE | PPC_OPCODE_BOOKE64;
  else if ((info->mach == bfd_mach_ppc_e500mc)
  else if ((info->mach == bfd_mach_ppc_e500mc)
           || (info->disassembler_options
           || (info->disassembler_options
               && strstr (info->disassembler_options, "e500mc") != NULL))
               && strstr (info->disassembler_options, "e500mc") != NULL))
    dialect |= (PPC_OPCODE_BOOKE | PPC_OPCODE_ISEL
    dialect |= (PPC_OPCODE_BOOKE | PPC_OPCODE_ISEL
                | PPC_OPCODE_PMR | PPC_OPCODE_CACHELCK
                | PPC_OPCODE_PMR | PPC_OPCODE_CACHELCK
                | PPC_OPCODE_RFMCI | PPC_OPCODE_E500MC);
                | PPC_OPCODE_RFMCI | PPC_OPCODE_E500MC);
  else if ((info->mach == bfd_mach_ppc_e500)
  else if ((info->mach == bfd_mach_ppc_e500)
           || (info->disassembler_options
           || (info->disassembler_options
               && strstr (info->disassembler_options, "e500") != NULL))
               && strstr (info->disassembler_options, "e500") != NULL))
    dialect |= (PPC_OPCODE_BOOKE
    dialect |= (PPC_OPCODE_BOOKE
                | PPC_OPCODE_SPE | PPC_OPCODE_ISEL
                | PPC_OPCODE_SPE | PPC_OPCODE_ISEL
                | PPC_OPCODE_EFS | PPC_OPCODE_BRLOCK
                | PPC_OPCODE_EFS | PPC_OPCODE_BRLOCK
                | PPC_OPCODE_PMR | PPC_OPCODE_CACHELCK
                | PPC_OPCODE_PMR | PPC_OPCODE_CACHELCK
                | PPC_OPCODE_RFMCI | PPC_OPCODE_E500MC);
                | PPC_OPCODE_RFMCI | PPC_OPCODE_E500MC);
  else if (info->disassembler_options
  else if (info->disassembler_options
           && strstr (info->disassembler_options, "efs") != NULL)
           && strstr (info->disassembler_options, "efs") != NULL)
    dialect |= PPC_OPCODE_EFS;
    dialect |= PPC_OPCODE_EFS;
  else if (info->disassembler_options
  else if (info->disassembler_options
           && strstr (info->disassembler_options, "e300") != NULL)
           && strstr (info->disassembler_options, "e300") != NULL)
    dialect |= PPC_OPCODE_E300 | PPC_OPCODE_CLASSIC | PPC_OPCODE_COMMON;
    dialect |= PPC_OPCODE_E300 | PPC_OPCODE_CLASSIC | PPC_OPCODE_COMMON;
  else if (info->disassembler_options
  else if (info->disassembler_options
           && strstr (info->disassembler_options, "440") != NULL)
           && strstr (info->disassembler_options, "440") != NULL)
    dialect |= PPC_OPCODE_BOOKE | PPC_OPCODE_32
    dialect |= PPC_OPCODE_BOOKE | PPC_OPCODE_32
      | PPC_OPCODE_440 | PPC_OPCODE_ISEL | PPC_OPCODE_RFMCI;
      | PPC_OPCODE_440 | PPC_OPCODE_ISEL | PPC_OPCODE_RFMCI;
  else
  else
    dialect |= (PPC_OPCODE_403 | PPC_OPCODE_601 | PPC_OPCODE_CLASSIC
    dialect |= (PPC_OPCODE_403 | PPC_OPCODE_601 | PPC_OPCODE_CLASSIC
                | PPC_OPCODE_COMMON | PPC_OPCODE_ALTIVEC);
                | PPC_OPCODE_COMMON | PPC_OPCODE_ALTIVEC);
 
 
  if (info->disassembler_options
  if (info->disassembler_options
      && strstr (info->disassembler_options, "power4") != NULL)
      && strstr (info->disassembler_options, "power4") != NULL)
    dialect |= PPC_OPCODE_POWER4;
    dialect |= PPC_OPCODE_POWER4;
 
 
  if (info->disassembler_options
  if (info->disassembler_options
      && strstr (info->disassembler_options, "power5") != NULL)
      && strstr (info->disassembler_options, "power5") != NULL)
    dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_POWER5;
    dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_POWER5;
 
 
  if (info->disassembler_options
  if (info->disassembler_options
      && strstr (info->disassembler_options, "cell") != NULL)
      && strstr (info->disassembler_options, "cell") != NULL)
    dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_CELL | PPC_OPCODE_ALTIVEC;
    dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_CELL | PPC_OPCODE_ALTIVEC;
 
 
  if (info->disassembler_options
  if (info->disassembler_options
      && strstr (info->disassembler_options, "power6") != NULL)
      && strstr (info->disassembler_options, "power6") != NULL)
    dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_POWER5 | PPC_OPCODE_POWER6 | PPC_OPCODE_ALTIVEC;
    dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_POWER5 | PPC_OPCODE_POWER6 | PPC_OPCODE_ALTIVEC;
 
 
  if (info->disassembler_options
  if (info->disassembler_options
      && strstr (info->disassembler_options, "any") != NULL)
      && strstr (info->disassembler_options, "any") != NULL)
    dialect |= PPC_OPCODE_ANY;
    dialect |= PPC_OPCODE_ANY;
 
 
  if (info->disassembler_options)
  if (info->disassembler_options)
    {
    {
      if (strstr (info->disassembler_options, "32") != NULL)
      if (strstr (info->disassembler_options, "32") != NULL)
        dialect &= ~PPC_OPCODE_64;
        dialect &= ~PPC_OPCODE_64;
      else if (strstr (info->disassembler_options, "64") != NULL)
      else if (strstr (info->disassembler_options, "64") != NULL)
        dialect |= PPC_OPCODE_64;
        dialect |= PPC_OPCODE_64;
    }
    }
 
 
  info->private_data = (char *) 0 + dialect;
  info->private_data = (char *) 0 + dialect;
  return dialect;
  return dialect;
}
}
 
 
/* Print a big endian PowerPC instruction.  */
/* Print a big endian PowerPC instruction.  */
 
 
int
int
print_insn_big_powerpc (bfd_vma memaddr, struct disassemble_info *info)
print_insn_big_powerpc (bfd_vma memaddr, struct disassemble_info *info)
{
{
  int dialect = (char *) info->private_data - (char *) 0;
  int dialect = (char *) info->private_data - (char *) 0;
  return print_insn_powerpc (memaddr, info, 1, dialect);
  return print_insn_powerpc (memaddr, info, 1, dialect);
}
}
 
 
/* Print a little endian PowerPC instruction.  */
/* Print a little endian PowerPC instruction.  */
 
 
int
int
print_insn_little_powerpc (bfd_vma memaddr, struct disassemble_info *info)
print_insn_little_powerpc (bfd_vma memaddr, struct disassemble_info *info)
{
{
  int dialect = (char *) info->private_data - (char *) 0;
  int dialect = (char *) info->private_data - (char *) 0;
  return print_insn_powerpc (memaddr, info, 0, dialect);
  return print_insn_powerpc (memaddr, info, 0, dialect);
}
}
 
 
/* Print a POWER (RS/6000) instruction.  */
/* Print a POWER (RS/6000) instruction.  */
 
 
int
int
print_insn_rs6000 (bfd_vma memaddr, struct disassemble_info *info)
print_insn_rs6000 (bfd_vma memaddr, struct disassemble_info *info)
{
{
  return print_insn_powerpc (memaddr, info, 1, PPC_OPCODE_POWER);
  return print_insn_powerpc (memaddr, info, 1, PPC_OPCODE_POWER);
}
}
 
 
/* Extract the operand value from the PowerPC or POWER instruction.  */
/* Extract the operand value from the PowerPC or POWER instruction.  */
 
 
static long
static long
operand_value_powerpc (const struct powerpc_operand *operand,
operand_value_powerpc (const struct powerpc_operand *operand,
                       unsigned long insn, int dialect)
                       unsigned long insn, int dialect)
{
{
  long value;
  long value;
  int invalid;
  int invalid;
  /* Extract the value from the instruction.  */
  /* Extract the value from the instruction.  */
  if (operand->extract)
  if (operand->extract)
    value = (*operand->extract) (insn, dialect, &invalid);
    value = (*operand->extract) (insn, dialect, &invalid);
  else
  else
    {
    {
      value = (insn >> operand->shift) & operand->bitm;
      value = (insn >> operand->shift) & operand->bitm;
      if ((operand->flags & PPC_OPERAND_SIGNED) != 0)
      if ((operand->flags & PPC_OPERAND_SIGNED) != 0)
        {
        {
          /* BITM is always some number of zeros followed by some
          /* BITM is always some number of zeros followed by some
             number of ones, followed by some numer of zeros.  */
             number of ones, followed by some numer of zeros.  */
          unsigned long top = operand->bitm;
          unsigned long top = operand->bitm;
          /* top & -top gives the rightmost 1 bit, so this
          /* top & -top gives the rightmost 1 bit, so this
             fills in any trailing zeros.  */
             fills in any trailing zeros.  */
          top |= (top & -top) - 1;
          top |= (top & -top) - 1;
          top &= ~(top >> 1);
          top &= ~(top >> 1);
          value = (value ^ top) - top;
          value = (value ^ top) - top;
        }
        }
    }
    }
 
 
  return value;
  return value;
}
}
 
 
/* Determine whether the optional operand(s) should be printed.  */
/* Determine whether the optional operand(s) should be printed.  */
 
 
static int
static int
skip_optional_operands (const unsigned char *opindex,
skip_optional_operands (const unsigned char *opindex,
                        unsigned long insn, int dialect)
                        unsigned long insn, int dialect)
{
{
  const struct powerpc_operand *operand;
  const struct powerpc_operand *operand;
 
 
  for (; *opindex != 0; opindex++)
  for (; *opindex != 0; opindex++)
    {
    {
      operand = &powerpc_operands[*opindex];
      operand = &powerpc_operands[*opindex];
      if ((operand->flags & PPC_OPERAND_NEXT) != 0
      if ((operand->flags & PPC_OPERAND_NEXT) != 0
          || ((operand->flags & PPC_OPERAND_OPTIONAL) != 0
          || ((operand->flags & PPC_OPERAND_OPTIONAL) != 0
              && operand_value_powerpc (operand, insn, dialect) != 0))
              && operand_value_powerpc (operand, insn, dialect) != 0))
        return 0;
        return 0;
    }
    }
 
 
  return 1;
  return 1;
}
}
 
 
/* Print a PowerPC or POWER instruction.  */
/* Print a PowerPC or POWER instruction.  */
 
 
static int
static int
print_insn_powerpc (bfd_vma memaddr,
print_insn_powerpc (bfd_vma memaddr,
                    struct disassemble_info *info,
                    struct disassemble_info *info,
                    int bigendian,
                    int bigendian,
                    int dialect)
                    int dialect)
{
{
  bfd_byte buffer[4];
  bfd_byte buffer[4];
  int status;
  int status;
  unsigned long insn;
  unsigned long insn;
  const struct powerpc_opcode *opcode;
  const struct powerpc_opcode *opcode;
  const struct powerpc_opcode *opcode_end;
  const struct powerpc_opcode *opcode_end;
  unsigned long op;
  unsigned long op;
 
 
  if (dialect == 0)
  if (dialect == 0)
    dialect = powerpc_dialect (info);
    dialect = powerpc_dialect (info);
 
 
  status = (*info->read_memory_func) (memaddr, buffer, 4, info);
  status = (*info->read_memory_func) (memaddr, buffer, 4, 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;
    }
    }
 
 
  if (bigendian)
  if (bigendian)
    insn = bfd_getb32 (buffer);
    insn = bfd_getb32 (buffer);
  else
  else
    insn = bfd_getl32 (buffer);
    insn = bfd_getl32 (buffer);
 
 
  /* Get the major opcode of the instruction.  */
  /* Get the major opcode of the instruction.  */
  op = PPC_OP (insn);
  op = PPC_OP (insn);
 
 
  /* Find the first match in the opcode table.  We could speed this up
  /* Find the first match in the opcode table.  We could speed this up
     a bit by doing a binary search on the major opcode.  */
     a bit by doing a binary search on the major opcode.  */
  opcode_end = powerpc_opcodes + powerpc_num_opcodes;
  opcode_end = powerpc_opcodes + powerpc_num_opcodes;
 again:
 again:
  for (opcode = powerpc_opcodes; opcode < opcode_end; opcode++)
  for (opcode = powerpc_opcodes; opcode < opcode_end; opcode++)
    {
    {
      unsigned long table_op;
      unsigned long table_op;
      const unsigned char *opindex;
      const unsigned char *opindex;
      const struct powerpc_operand *operand;
      const struct powerpc_operand *operand;
      int invalid;
      int invalid;
      int need_comma;
      int need_comma;
      int need_paren;
      int need_paren;
      int skip_optional;
      int skip_optional;
 
 
      table_op = PPC_OP (opcode->opcode);
      table_op = PPC_OP (opcode->opcode);
      if (op < table_op)
      if (op < table_op)
        break;
        break;
      if (op > table_op)
      if (op > table_op)
        continue;
        continue;
 
 
      if ((insn & opcode->mask) != opcode->opcode
      if ((insn & opcode->mask) != opcode->opcode
          || (opcode->flags & dialect) == 0)
          || (opcode->flags & dialect) == 0)
        continue;
        continue;
 
 
      /* Make two passes over the operands.  First see if any of them
      /* Make two passes over the operands.  First see if any of them
         have extraction functions, and, if they do, make sure the
         have extraction functions, and, if they do, make sure the
         instruction is valid.  */
         instruction is valid.  */
      invalid = 0;
      invalid = 0;
      for (opindex = opcode->operands; *opindex != 0; opindex++)
      for (opindex = opcode->operands; *opindex != 0; opindex++)
        {
        {
          operand = powerpc_operands + *opindex;
          operand = powerpc_operands + *opindex;
          if (operand->extract)
          if (operand->extract)
            (*operand->extract) (insn, dialect, &invalid);
            (*operand->extract) (insn, dialect, &invalid);
        }
        }
      if (invalid)
      if (invalid)
        continue;
        continue;
 
 
      /* The instruction is valid.  */
      /* The instruction is valid.  */
      if (opcode->operands[0] != 0)
      if (opcode->operands[0] != 0)
        (*info->fprintf_func) (info->stream, "%-7s ", opcode->name);
        (*info->fprintf_func) (info->stream, "%-7s ", opcode->name);
      else
      else
        (*info->fprintf_func) (info->stream, "%s", opcode->name);
        (*info->fprintf_func) (info->stream, "%s", opcode->name);
 
 
      /* Now extract and print the operands.  */
      /* Now extract and print the operands.  */
      need_comma = 0;
      need_comma = 0;
      need_paren = 0;
      need_paren = 0;
      skip_optional = -1;
      skip_optional = -1;
      for (opindex = opcode->operands; *opindex != 0; opindex++)
      for (opindex = opcode->operands; *opindex != 0; opindex++)
        {
        {
          long value;
          long value;
 
 
          operand = powerpc_operands + *opindex;
          operand = powerpc_operands + *opindex;
 
 
          /* Operands that are marked FAKE are simply ignored.  We
          /* Operands that are marked FAKE are simply ignored.  We
             already made sure that the extract function considered
             already made sure that the extract function considered
             the instruction to be valid.  */
             the instruction to be valid.  */
          if ((operand->flags & PPC_OPERAND_FAKE) != 0)
          if ((operand->flags & PPC_OPERAND_FAKE) != 0)
            continue;
            continue;
 
 
          /* If all of the optional operands have the value zero,
          /* If all of the optional operands have the value zero,
             then don't print any of them.  */
             then don't print any of them.  */
          if ((operand->flags & PPC_OPERAND_OPTIONAL) != 0)
          if ((operand->flags & PPC_OPERAND_OPTIONAL) != 0)
            {
            {
              if (skip_optional < 0)
              if (skip_optional < 0)
                skip_optional = skip_optional_operands (opindex, insn,
                skip_optional = skip_optional_operands (opindex, insn,
                                                        dialect);
                                                        dialect);
              if (skip_optional)
              if (skip_optional)
                continue;
                continue;
            }
            }
 
 
          value = operand_value_powerpc (operand, insn, dialect);
          value = operand_value_powerpc (operand, insn, dialect);
 
 
          if (need_comma)
          if (need_comma)
            {
            {
              (*info->fprintf_func) (info->stream, ",");
              (*info->fprintf_func) (info->stream, ",");
              need_comma = 0;
              need_comma = 0;
            }
            }
 
 
          /* Print the operand as directed by the flags.  */
          /* Print the operand as directed by the flags.  */
          if ((operand->flags & PPC_OPERAND_GPR) != 0
          if ((operand->flags & PPC_OPERAND_GPR) != 0
              || ((operand->flags & PPC_OPERAND_GPR_0) != 0 && value != 0))
              || ((operand->flags & PPC_OPERAND_GPR_0) != 0 && value != 0))
            (*info->fprintf_func) (info->stream, "r%ld", value);
            (*info->fprintf_func) (info->stream, "r%ld", value);
          else if ((operand->flags & PPC_OPERAND_FPR) != 0)
          else if ((operand->flags & PPC_OPERAND_FPR) != 0)
            (*info->fprintf_func) (info->stream, "f%ld", value);
            (*info->fprintf_func) (info->stream, "f%ld", value);
          else if ((operand->flags & PPC_OPERAND_VR) != 0)
          else if ((operand->flags & PPC_OPERAND_VR) != 0)
            (*info->fprintf_func) (info->stream, "v%ld", value);
            (*info->fprintf_func) (info->stream, "v%ld", value);
          else if ((operand->flags & PPC_OPERAND_RELATIVE) != 0)
          else if ((operand->flags & PPC_OPERAND_RELATIVE) != 0)
            (*info->print_address_func) (memaddr + value, info);
            (*info->print_address_func) (memaddr + value, info);
          else if ((operand->flags & PPC_OPERAND_ABSOLUTE) != 0)
          else if ((operand->flags & PPC_OPERAND_ABSOLUTE) != 0)
            (*info->print_address_func) ((bfd_vma) value & 0xffffffff, info);
            (*info->print_address_func) ((bfd_vma) value & 0xffffffff, info);
          else if ((operand->flags & PPC_OPERAND_CR) == 0
          else if ((operand->flags & PPC_OPERAND_CR) == 0
                   || (dialect & PPC_OPCODE_PPC) == 0)
                   || (dialect & PPC_OPCODE_PPC) == 0)
            (*info->fprintf_func) (info->stream, "%ld", value);
            (*info->fprintf_func) (info->stream, "%ld", value);
          else
          else
            {
            {
              if (operand->bitm == 7)
              if (operand->bitm == 7)
                (*info->fprintf_func) (info->stream, "cr%ld", value);
                (*info->fprintf_func) (info->stream, "cr%ld", value);
              else
              else
                {
                {
                  static const char *cbnames[4] = { "lt", "gt", "eq", "so" };
                  static const char *cbnames[4] = { "lt", "gt", "eq", "so" };
                  int cr;
                  int cr;
                  int cc;
                  int cc;
 
 
                  cr = value >> 2;
                  cr = value >> 2;
                  if (cr != 0)
                  if (cr != 0)
                    (*info->fprintf_func) (info->stream, "4*cr%d+", cr);
                    (*info->fprintf_func) (info->stream, "4*cr%d+", cr);
                  cc = value & 3;
                  cc = value & 3;
                  (*info->fprintf_func) (info->stream, "%s", cbnames[cc]);
                  (*info->fprintf_func) (info->stream, "%s", cbnames[cc]);
                }
                }
            }
            }
 
 
          if (need_paren)
          if (need_paren)
            {
            {
              (*info->fprintf_func) (info->stream, ")");
              (*info->fprintf_func) (info->stream, ")");
              need_paren = 0;
              need_paren = 0;
            }
            }
 
 
          if ((operand->flags & PPC_OPERAND_PARENS) == 0)
          if ((operand->flags & PPC_OPERAND_PARENS) == 0)
            need_comma = 1;
            need_comma = 1;
          else
          else
            {
            {
              (*info->fprintf_func) (info->stream, "(");
              (*info->fprintf_func) (info->stream, "(");
              need_paren = 1;
              need_paren = 1;
            }
            }
        }
        }
 
 
      /* We have found and printed an instruction; return.  */
      /* We have found and printed an instruction; return.  */
      return 4;
      return 4;
    }
    }
 
 
  if ((dialect & PPC_OPCODE_ANY) != 0)
  if ((dialect & PPC_OPCODE_ANY) != 0)
    {
    {
      dialect = ~PPC_OPCODE_ANY;
      dialect = ~PPC_OPCODE_ANY;
      goto again;
      goto again;
    }
    }
 
 
  /* We could not find a match.  */
  /* We could not find a match.  */
  (*info->fprintf_func) (info->stream, ".long 0x%lx", insn);
  (*info->fprintf_func) (info->stream, ".long 0x%lx", insn);
 
 
  return 4;
  return 4;
}
}
 
 
void
void
print_ppc_disassembler_options (FILE *stream)
print_ppc_disassembler_options (FILE *stream)
{
{
  fprintf (stream, "\n\
  fprintf (stream, "\n\
The following PPC specific disassembler options are supported for use with\n\
The following PPC specific disassembler options are supported for use with\n\
the -M switch:\n");
the -M switch:\n");
 
 
  fprintf (stream, "  booke|booke32|booke64    Disassemble the BookE instructions\n");
  fprintf (stream, "  booke|booke32|booke64    Disassemble the BookE instructions\n");
  fprintf (stream, "  e300                     Disassemble the e300 instructions\n");
  fprintf (stream, "  e300                     Disassemble the e300 instructions\n");
  fprintf (stream, "  e500|e500x2              Disassemble the e500 instructions\n");
  fprintf (stream, "  e500|e500x2              Disassemble the e500 instructions\n");
  fprintf (stream, "  e500mc                   Disassemble the e500mc instructions\n");
  fprintf (stream, "  e500mc                   Disassemble the e500mc instructions\n");
  fprintf (stream, "  440                      Disassemble the 440 instructions\n");
  fprintf (stream, "  440                      Disassemble the 440 instructions\n");
  fprintf (stream, "  efs                      Disassemble the EFS instructions\n");
  fprintf (stream, "  efs                      Disassemble the EFS instructions\n");
  fprintf (stream, "  ppcps                    Disassemble the PowerPC paired singles instructions\n");
  fprintf (stream, "  ppcps                    Disassemble the PowerPC paired singles instructions\n");
  fprintf (stream, "  power4                   Disassemble the Power4 instructions\n");
  fprintf (stream, "  power4                   Disassemble the Power4 instructions\n");
  fprintf (stream, "  power5                   Disassemble the Power5 instructions\n");
  fprintf (stream, "  power5                   Disassemble the Power5 instructions\n");
  fprintf (stream, "  power6                   Disassemble the Power6 instructions\n");
  fprintf (stream, "  power6                   Disassemble the Power6 instructions\n");
  fprintf (stream, "  32                       Do not disassemble 64-bit instructions\n");
  fprintf (stream, "  32                       Do not disassemble 64-bit instructions\n");
  fprintf (stream, "  64                       Allow disassembly of 64-bit instructions\n");
  fprintf (stream, "  64                       Allow disassembly of 64-bit instructions\n");
}
}
 
 

powered by: WebSVN 2.1.0

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