[deliverable/binutils-gdb.git] / opcodes / ppc-dis.c

/* ppc-dis.c -- Disassemble PowerPC instructions
   Copyright 1994, 1995, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007
   Free Software Foundation, Inc.
   Written by Ian Lance Taylor, Cygnus Support

This file is part of GDB, GAS, and the GNU binutils.

GDB, GAS, and the GNU binutils are free software; you can redistribute
them and/or modify them under the terms of the GNU General Public
License as published by the Free Software Foundation; either version
2, or (at your option) any later version.

GDB, GAS, and the GNU binutils are distributed in the hope that they
will be useful, but WITHOUT ANY WARRANTY; without even the implied
warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
the GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this file; see the file COPYING.  If not, write to the Free
Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.  */

#include <stdio.h>
#include "sysdep.h"
#include "dis-asm.h"
#include "opcode/ppc.h"

/* This file provides several disassembler functions, all of which use
   the disassembler interface defined in dis-asm.h.  Several functions
   are provided because this file handles disassembly for the PowerPC
   in both big and little endian mode and also for the POWER (RS/6000)
   chip.  */

static int print_insn_powerpc (bfd_vma, struct disassemble_info *, int, int);

/* Determine which set of machines to disassemble for.  PPC403/601 or
   BookE.  For convenience, also disassemble instructions supported
   by the AltiVec vector unit.  */

static int
powerpc_dialect (struct disassemble_info *info)
{
  int dialect = PPC_OPCODE_PPC;

  if (BFD_DEFAULT_TARGET_SIZE == 64)
    dialect |= PPC_OPCODE_64;

  if (info->disassembler_options
      && strstr (info->disassembler_options, "booke") != NULL)
    dialect |= PPC_OPCODE_BOOKE | PPC_OPCODE_BOOKE64;
  else if ((info->mach == bfd_mach_ppc_e500)
	   || (info->disassembler_options
	       && strstr (info->disassembler_options, "e500") != NULL))
    dialect |= (PPC_OPCODE_BOOKE
		| PPC_OPCODE_SPE | PPC_OPCODE_ISEL
		| PPC_OPCODE_EFS | PPC_OPCODE_BRLOCK
		| PPC_OPCODE_PMR | PPC_OPCODE_CACHELCK
		| PPC_OPCODE_RFMCI);
  else if (info->disassembler_options
	   && strstr (info->disassembler_options, "efs") != NULL)
    dialect |= PPC_OPCODE_EFS;
  else if (info->disassembler_options
	   && strstr (info->disassembler_options, "e300") != NULL)
    dialect |= PPC_OPCODE_E300 | PPC_OPCODE_CLASSIC | PPC_OPCODE_COMMON;
  else if (info->disassembler_options
	   && strstr (info->disassembler_options, "440") != NULL)
    dialect |= PPC_OPCODE_BOOKE | PPC_OPCODE_32
      | PPC_OPCODE_440 | PPC_OPCODE_ISEL | PPC_OPCODE_RFMCI;
  else
    dialect |= (PPC_OPCODE_403 | PPC_OPCODE_601 | PPC_OPCODE_CLASSIC
		| PPC_OPCODE_COMMON | PPC_OPCODE_ALTIVEC);

  if (info->disassembler_options
      && strstr (info->disassembler_options, "power4") != NULL)
    dialect |= PPC_OPCODE_POWER4;

  if (info->disassembler_options
      && strstr (info->disassembler_options, "power5") != NULL)
    dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_POWER5;

  if (info->disassembler_options
      && strstr (info->disassembler_options, "cell") != NULL)
    dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_CELL | PPC_OPCODE_ALTIVEC;

  if (info->disassembler_options
      && strstr (info->disassembler_options, "power6") != NULL)
    dialect |= PPC_OPCODE_POWER4 | PPC_OPCODE_POWER5 | PPC_OPCODE_POWER6 | PPC_OPCODE_ALTIVEC;

  if (info->disassembler_options
      && strstr (info->disassembler_options, "any") != NULL)
    dialect |= PPC_OPCODE_ANY;

  if (info->disassembler_options)
    {
      if (strstr (info->disassembler_options, "32") != NULL)
	dialect &= ~PPC_OPCODE_64;
      else if (strstr (info->disassembler_options, "64") != NULL)
	dialect |= PPC_OPCODE_64;
    }

  info->private_data = (char *) 0 + dialect;
  return dialect;
}

/* Print a big endian PowerPC instruction.  */

int
print_insn_big_powerpc (bfd_vma memaddr, struct disassemble_info *info)
{
  int dialect = (char *) info->private_data - (char *) 0;
  return print_insn_powerpc (memaddr, info, 1, dialect);
}

/* Print a little endian PowerPC instruction.  */

int
print_insn_little_powerpc (bfd_vma memaddr, struct disassemble_info *info)
{
  int dialect = (char *) info->private_data - (char *) 0;
  return print_insn_powerpc (memaddr, info, 0, dialect);
}

/* Print a POWER (RS/6000) instruction.  */

int
print_insn_rs6000 (bfd_vma memaddr, struct disassemble_info *info)
{
  return print_insn_powerpc (memaddr, info, 1, PPC_OPCODE_POWER);
}

/* Print a PowerPC or POWER instruction.  */

static int
print_insn_powerpc (bfd_vma memaddr,
		    struct disassemble_info *info,
		    int bigendian,
		    int dialect)
{
  bfd_byte buffer[4];
  int status;
  unsigned long insn;
  const struct powerpc_opcode *opcode;
  const struct powerpc_opcode *opcode_end;
  unsigned long op;

  if (dialect == 0)
    dialect = powerpc_dialect (info);

  status = (*info->read_memory_func) (memaddr, buffer, 4, info);
  if (status != 0)
    {
      (*info->memory_error_func) (status, memaddr, info);
      return -1;
    }

  if (bigendian)
    insn = bfd_getb32 (buffer);
  else
    insn = bfd_getl32 (buffer);

  /* Get the major opcode of the instruction.  */
  op = PPC_OP (insn);

  /* Find the first match in the opcode table.  We could speed this up
     a bit by doing a binary search on the major opcode.  */
  opcode_end = powerpc_opcodes + powerpc_num_opcodes;
 again:
  for (opcode = powerpc_opcodes; opcode < opcode_end; opcode++)
    {
      unsigned long table_op;
      const unsigned char *opindex;
      const struct powerpc_operand *operand;
      int invalid;
      int need_comma;
      int need_paren;

      table_op = PPC_OP (opcode->opcode);
      if (op < table_op)
	break;
      if (op > table_op)
	continue;

      if ((insn & opcode->mask) != opcode->opcode
	  || (opcode->flags & dialect) == 0)
	continue;

      /* Make two passes over the operands.  First see if any of them
	 have extraction functions, and, if they do, make sure the
	 instruction is valid.  */
      invalid = 0;
      for (opindex = opcode->operands; *opindex != 0; opindex++)
	{
	  operand = powerpc_operands + *opindex;
	  if (operand->extract)
	    (*operand->extract) (insn, dialect, &invalid);
	}
      if (invalid)
	continue;

      /* The instruction is valid.  */
      if (opcode->operands[0] != 0)
	(*info->fprintf_func) (info->stream, "%-7s ", opcode->name);
      else
	(*info->fprintf_func) (info->stream, "%s", opcode->name);

      /* Now extract and print the operands.  */
      need_comma = 0;
      need_paren = 0;
      for (opindex = opcode->operands; *opindex != 0; opindex++)
	{
	  long value;

	  operand = powerpc_operands + *opindex;

	  /* Operands that are marked FAKE are simply ignored.  We
	     already made sure that the extract function considered
	     the instruction to be valid.  */
	  if ((operand->flags & PPC_OPERAND_FAKE) != 0)
	    continue;

	  /* Extract the value from the instruction.  */
	  if (operand->extract)
	    value = (*operand->extract) (insn, dialect, &invalid);
	  else
	    {
	      value = (insn >> operand->shift) & operand->bitm;
	      if ((operand->flags & PPC_OPERAND_SIGNED) != 0)
		{
		  /* BITM is always some number of zeros followed by some
		     number of ones, followed by some numer of zeros.  */
		  unsigned long top = operand->bitm;
		  /* top & -top gives the rightmost 1 bit, so this
		     fills in any trailing zeros.  */
		  top |= (top & -top) - 1;
		  top &= ~(top >> 1);
		  value = (value ^ top) - top;
		}
	    }

	  /* If the operand is optional, and the value is zero, don't
	     print anything.  */
	  if ((operand->flags & PPC_OPERAND_OPTIONAL) != 0
	      && (operand->flags & PPC_OPERAND_NEXT) == 0
	      && value == 0)
	    continue;

	  if (need_comma)
	    {
	      (*info->fprintf_func) (info->stream, ",");
	      need_comma = 0;
	    }

	  /* Print the operand as directed by the flags.  */
	  if ((operand->flags & PPC_OPERAND_GPR) != 0
	      || ((operand->flags & PPC_OPERAND_GPR_0) != 0 && value != 0))
	    (*info->fprintf_func) (info->stream, "r%ld", value);
	  else if ((operand->flags & PPC_OPERAND_FPR) != 0)
	    (*info->fprintf_func) (info->stream, "f%ld", value);
	  else if ((operand->flags & PPC_OPERAND_VR) != 0)
	    (*info->fprintf_func) (info->stream, "v%ld", value);
	  else if ((operand->flags & PPC_OPERAND_RELATIVE) != 0)
	    (*info->print_address_func) (memaddr + value, info);
	  else if ((operand->flags & PPC_OPERAND_ABSOLUTE) != 0)
	    (*info->print_address_func) ((bfd_vma) value & 0xffffffff, info);
	  else if ((operand->flags & PPC_OPERAND_CR) == 0
		   || (dialect & PPC_OPCODE_PPC) == 0)
	    (*info->fprintf_func) (info->stream, "%ld", value);
	  else
	    {
	      if (operand->bitm == 7)
		(*info->fprintf_func) (info->stream, "cr%ld", value);
	      else
		{
		  static const char *cbnames[4] = { "lt", "gt", "eq", "so" };
		  int cr;
		  int cc;

		  cr = value >> 2;
		  if (cr != 0)
		    (*info->fprintf_func) (info->stream, "4*cr%d+", cr);
		  cc = value & 3;
		  (*info->fprintf_func) (info->stream, "%s", cbnames[cc]);
		}
	    }

	  if (need_paren)
	    {
	      (*info->fprintf_func) (info->stream, ")");
	      need_paren = 0;
	    }

	  if ((operand->flags & PPC_OPERAND_PARENS) == 0)
	    need_comma = 1;
	  else
	    {
	      (*info->fprintf_func) (info->stream, "(");
	      need_paren = 1;
	    }
	}

      /* We have found and printed an instruction; return.  */
      return 4;
    }

  if ((dialect & PPC_OPCODE_ANY) != 0)
    {
      dialect = ~PPC_OPCODE_ANY;
      goto again;
    }

  /* We could not find a match.  */
  (*info->fprintf_func) (info->stream, ".long 0x%lx", insn);

  return 4;
}

void
print_ppc_disassembler_options (FILE *stream)
{
  fprintf (stream, "\n\
The following PPC specific disassembler options are supported for use with\n\
the -M switch:\n");

  fprintf (stream, "  booke|booke32|booke64    Disassemble the BookE instructions\n");
  fprintf (stream, "  e300                     Disassemble the e300 instructions\n");
  fprintf (stream, "  e500|e500x2              Disassemble the e500 instructions\n");
  fprintf (stream, "  440                      Disassemble the 440 instructions\n");
  fprintf (stream, "  efs                      Disassemble the EFS instructions\n");
  fprintf (stream, "  power4                   Disassemble the Power4 instructions\n");
  fprintf (stream, "  power5                   Disassemble the Power5 instructions\n");
  fprintf (stream, "  power6                   Disassemble the Power6 instructions\n");
  fprintf (stream, "  32                       Do not disassemble 64-bit instructions\n");
  fprintf (stream, "  64                       Allow disassembly of 64-bit instructions\n");
}
Commit	Line	Data
252b5132	1	/* ppc-dis.c -- Disassemble PowerPC instructions
64a3a6fc	2	Copyright 1994, 1995, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007
8427c424	3	Free Software Foundation, Inc.
252b5132 RH	4	Written by Ian Lance Taylor, Cygnus Support
	5
	6	This file is part of GDB, GAS, and the GNU binutils.
	7
	8	GDB, GAS, and the GNU binutils are free software; you can redistribute
	9	them and/or modify them under the terms of the GNU General Public
	10	License as published by the Free Software Foundation; either version
	11	2, or (at your option) any later version.
	12
	13	GDB, GAS, and the GNU binutils are distributed in the hope that they
	14	will be useful, but WITHOUT ANY WARRANTY; without even the implied
	15	warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
	16	the GNU General Public License for more details.
	17
	18	You should have received a copy of the GNU General Public License
	19	along with this file; see the file COPYING. If not, write to the Free
f4321104	20	Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */
252b5132 RH	21
252b5132 RH	22	#include <stdio.h>
252b5132 RH	23	#include "sysdep.h"
	24	#include "dis-asm.h"
	25	#include "opcode/ppc.h"
	26
	27	/* This file provides several disassembler functions, all of which use
	28	the disassembler interface defined in dis-asm.h. Several functions
	29	are provided because this file handles disassembly for the PowerPC
	30	in both big and little endian mode and also for the POWER (RS/6000)
	31	chip. */
	32
823bbe9d	33	static int print_insn_powerpc (bfd_vma, struct disassemble_info *, int, int);
418c1742 MG	34
418c1742 MG	35	/* Determine which set of machines to disassemble for. PPC403/601 or
9a0ccb24 MG	36	BookE. For convenience, also disassemble instructions supported
9a0ccb24 MG	37	by the AltiVec vector unit. */
418c1742	38
661bd698	39	static int
823bbe9d	40	powerpc_dialect (struct disassemble_info *info)
418c1742	41	{
4eb30afc	42	int dialect = PPC_OPCODE_PPC;
418c1742	43
802a735e AM	44	if (BFD_DEFAULT_TARGET_SIZE == 64)
	45	dialect \|= PPC_OPCODE_64;
	46
	47	if (info->disassembler_options
661bd698	48	&& strstr (info->disassembler_options, "booke") != NULL)
418c1742	49	dialect \|= PPC_OPCODE_BOOKE \| PPC_OPCODE_BOOKE64;
661bd698 AM	50	else if ((info->mach == bfd_mach_ppc_e500)
	51	\|\| (info->disassembler_options
	52	&& strstr (info->disassembler_options, "e500") != NULL))
4eb30afc AM	53	dialect \|= (PPC_OPCODE_BOOKE
	54	\| PPC_OPCODE_SPE \| PPC_OPCODE_ISEL
	55	\| PPC_OPCODE_EFS \| PPC_OPCODE_BRLOCK
	56	\| PPC_OPCODE_PMR \| PPC_OPCODE_CACHELCK
	57	\| PPC_OPCODE_RFMCI);
661bd698 AM	58	else if (info->disassembler_options
661bd698 AM	59	&& strstr (info->disassembler_options, "efs") != NULL)
4eb30afc	60	dialect \|= PPC_OPCODE_EFS;
36ae0db3 DJ	61	else if (info->disassembler_options
	62	&& strstr (info->disassembler_options, "e300") != NULL)
	63	dialect \|= PPC_OPCODE_E300 \| PPC_OPCODE_CLASSIC \| PPC_OPCODE_COMMON;
64a3a6fc NC	64	else if (info->disassembler_options
	65	&& strstr (info->disassembler_options, "440") != NULL)
	66	dialect \|= PPC_OPCODE_BOOKE \| PPC_OPCODE_32
	67	\| PPC_OPCODE_440 \| PPC_OPCODE_ISEL \| PPC_OPCODE_RFMCI;
23976049	68	else
9ec878e3	69	dialect \|= (PPC_OPCODE_403 \| PPC_OPCODE_601 \| PPC_OPCODE_CLASSIC
4eb30afc	70	\| PPC_OPCODE_COMMON \| PPC_OPCODE_ALTIVEC);
802a735e	71
94efba12	72	if (info->disassembler_options
661bd698	73	&& strstr (info->disassembler_options, "power4") != NULL)
94efba12 AM	74	dialect \|= PPC_OPCODE_POWER4;
94efba12 AM	75
1ed8e1e4 AM	76	if (info->disassembler_options
	77	&& strstr (info->disassembler_options, "power5") != NULL)
	78	dialect \|= PPC_OPCODE_POWER4 \| PPC_OPCODE_POWER5;
	79
ede602d7 AM	80	if (info->disassembler_options
	81	&& strstr (info->disassembler_options, "cell") != NULL)
	82	dialect \|= PPC_OPCODE_POWER4 \| PPC_OPCODE_CELL \| PPC_OPCODE_ALTIVEC;
	83
9622b051 AM	84	if (info->disassembler_options
	85	&& strstr (info->disassembler_options, "power6") != NULL)
	86	dialect \|= PPC_OPCODE_POWER4 \| PPC_OPCODE_POWER5 \| PPC_OPCODE_POWER6 \| PPC_OPCODE_ALTIVEC;
	87
661bd698 AM	88	if (info->disassembler_options
	89	&& strstr (info->disassembler_options, "any") != NULL)
	90	dialect \|= PPC_OPCODE_ANY;
	91
802a735e AM	92	if (info->disassembler_options)
	93	{
	94	if (strstr (info->disassembler_options, "32") != NULL)
	95	dialect &= ~PPC_OPCODE_64;
	96	else if (strstr (info->disassembler_options, "64") != NULL)
	97	dialect \|= PPC_OPCODE_64;
	98	}
	99
6edfbbad	100	info->private_data = (char *) 0 + dialect;
418c1742 MG	101	return dialect;
	102	}
	103
	104	/* Print a big endian PowerPC instruction. */
252b5132 RH	105
252b5132 RH	106	int
823bbe9d	107	print_insn_big_powerpc (bfd_vma memaddr, struct disassemble_info *info)
252b5132	108	{
6edfbbad	109	int dialect = (char ) info->private_data - (char ) 0;
661bd698	110	return print_insn_powerpc (memaddr, info, 1, dialect);
252b5132 RH	111	}
252b5132 RH	112
418c1742	113	/* Print a little endian PowerPC instruction. */
252b5132 RH	114
252b5132 RH	115	int
823bbe9d	116	print_insn_little_powerpc (bfd_vma memaddr, struct disassemble_info *info)
252b5132	117	{
6edfbbad	118	int dialect = (char ) info->private_data - (char ) 0;
661bd698	119	return print_insn_powerpc (memaddr, info, 0, dialect);
252b5132 RH	120	}
	121
	122	/* Print a POWER (RS/6000) instruction. */
	123
	124	int
823bbe9d	125	print_insn_rs6000 (bfd_vma memaddr, struct disassemble_info *info)
252b5132 RH	126	{
	127	return print_insn_powerpc (memaddr, info, 1, PPC_OPCODE_POWER);
	128	}
	129
	130	/* Print a PowerPC or POWER instruction. */
	131
	132	static int
823bbe9d AM	133	print_insn_powerpc (bfd_vma memaddr,
	134	struct disassemble_info *info,
	135	int bigendian,
	136	int dialect)
252b5132 RH	137	{
	138	bfd_byte buffer[4];
	139	int status;
	140	unsigned long insn;
	141	const struct powerpc_opcode *opcode;
	142	const struct powerpc_opcode *opcode_end;
	143	unsigned long op;
	144
661bd698 AM	145	if (dialect == 0)
	146	dialect = powerpc_dialect (info);
	147
252b5132 RH	148	status = (*info->read_memory_func) (memaddr, buffer, 4, info);
	149	if (status != 0)
	150	{
	151	(*info->memory_error_func) (status, memaddr, info);
	152	return -1;
	153	}
	154
	155	if (bigendian)
	156	insn = bfd_getb32 (buffer);
	157	else
	158	insn = bfd_getl32 (buffer);
	159
	160	/* Get the major opcode of the instruction. */
	161	op = PPC_OP (insn);
	162
	163	/* Find the first match in the opcode table. We could speed this up
	164	a bit by doing a binary search on the major opcode. */
	165	opcode_end = powerpc_opcodes + powerpc_num_opcodes;
661bd698	166	again:
252b5132 RH	167	for (opcode = powerpc_opcodes; opcode < opcode_end; opcode++)
	168	{
	169	unsigned long table_op;
	170	const unsigned char *opindex;
	171	const struct powerpc_operand *operand;
	172	int invalid;
	173	int need_comma;
	174	int need_paren;
	175
	176	table_op = PPC_OP (opcode->opcode);
	177	if (op < table_op)
	178	break;
	179	if (op > table_op)
	180	continue;
	181
	182	if ((insn & opcode->mask) != opcode->opcode
	183	\|\| (opcode->flags & dialect) == 0)
	184	continue;
	185
	186	/* Make two passes over the operands. First see if any of them
	187	have extraction functions, and, if they do, make sure the
	188	instruction is valid. */
	189	invalid = 0;
	190	for (opindex = opcode->operands; *opindex != 0; opindex++)
	191	{
	192	operand = powerpc_operands + *opindex;
	193	if (operand->extract)
802a735e	194	(*operand->extract) (insn, dialect, &invalid);
252b5132 RH	195	}
	196	if (invalid)
	197	continue;
	198
	199	/* The instruction is valid. */
252b5132	200	if (opcode->operands[0] != 0)
fdd12ef3 AM	201	(*info->fprintf_func) (info->stream, "%-7s ", opcode->name);
	202	else
	203	(*info->fprintf_func) (info->stream, "%s", opcode->name);
252b5132 RH	204
	205	/* Now extract and print the operands. */
	206	need_comma = 0;
	207	need_paren = 0;
	208	for (opindex = opcode->operands; *opindex != 0; opindex++)
	209	{
	210	long value;
	211
	212	operand = powerpc_operands + *opindex;
	213
	214	/* Operands that are marked FAKE are simply ignored. We
	215	already made sure that the extract function considered
	216	the instruction to be valid. */
	217	if ((operand->flags & PPC_OPERAND_FAKE) != 0)
	218	continue;
	219
	220	/* Extract the value from the instruction. */
	221	if (operand->extract)
8427c424	222	value = (*operand->extract) (insn, dialect, &invalid);
252b5132 RH	223	else
252b5132 RH	224	{
b84bf58a AM	225	value = (insn >> operand->shift) & operand->bitm;
	226	if ((operand->flags & PPC_OPERAND_SIGNED) != 0)
	227	{
	228	/* BITM is always some number of zeros followed by some
	229	number of ones, followed by some numer of zeros. */
	230	unsigned long top = operand->bitm;
	231	/* top & -top gives the rightmost 1 bit, so this
	232	fills in any trailing zeros. */
	233	top \|= (top & -top) - 1;
	234	top &= ~(top >> 1);
	235	value = (value ^ top) - top;
	236	}
252b5132 RH	237	}
	238
	239	/* If the operand is optional, and the value is zero, don't
	240	print anything. */
	241	if ((operand->flags & PPC_OPERAND_OPTIONAL) != 0
	242	&& (operand->flags & PPC_OPERAND_NEXT) == 0
	243	&& value == 0)
	244	continue;
	245
	246	if (need_comma)
	247	{
	248	(*info->fprintf_func) (info->stream, ",");
	249	need_comma = 0;
	250	}
	251
	252	/* Print the operand as directed by the flags. */
fdd12ef3 AM	253	if ((operand->flags & PPC_OPERAND_GPR) != 0
fdd12ef3 AM	254	\|\| ((operand->flags & PPC_OPERAND_GPR_0) != 0 && value != 0))
252b5132 RH	255	(*info->fprintf_func) (info->stream, "r%ld", value);
	256	else if ((operand->flags & PPC_OPERAND_FPR) != 0)
	257	(*info->fprintf_func) (info->stream, "f%ld", value);
786e2c0f C	258	else if ((operand->flags & PPC_OPERAND_VR) != 0)
786e2c0f C	259	(*info->fprintf_func) (info->stream, "v%ld", value);
252b5132 RH	260	else if ((operand->flags & PPC_OPERAND_RELATIVE) != 0)
	261	(*info->print_address_func) (memaddr + value, info);
	262	else if ((operand->flags & PPC_OPERAND_ABSOLUTE) != 0)
	263	(*info->print_address_func) ((bfd_vma) value & 0xffffffff, info);
	264	else if ((operand->flags & PPC_OPERAND_CR) == 0
	265	\|\| (dialect & PPC_OPCODE_PPC) == 0)
	266	(*info->fprintf_func) (info->stream, "%ld", value);
	267	else
	268	{
b84bf58a	269	if (operand->bitm == 7)
0fd3a477	270	(*info->fprintf_func) (info->stream, "cr%ld", value);
252b5132 RH	271	else
	272	{
	273	static const char *cbnames[4] = { "lt", "gt", "eq", "so" };
	274	int cr;
	275	int cc;
	276
	277	cr = value >> 2;
	278	if (cr != 0)
8b4fa155	279	(info->fprintf_func) (info->stream, "4cr%d+", cr);
252b5132	280	cc = value & 3;
8b4fa155	281	(*info->fprintf_func) (info->stream, "%s", cbnames[cc]);
252b5132 RH	282	}
	283	}
	284
	285	if (need_paren)
	286	{
	287	(*info->fprintf_func) (info->stream, ")");
	288	need_paren = 0;
	289	}
	290
	291	if ((operand->flags & PPC_OPERAND_PARENS) == 0)
	292	need_comma = 1;
	293	else
	294	{
	295	(*info->fprintf_func) (info->stream, "(");
	296	need_paren = 1;
	297	}
	298	}
	299
	300	/* We have found and printed an instruction; return. */
	301	return 4;
	302	}
	303
661bd698 AM	304	if ((dialect & PPC_OPCODE_ANY) != 0)
	305	{
	306	dialect = ~PPC_OPCODE_ANY;
	307	goto again;
	308	}
	309
252b5132 RH	310	/* We could not find a match. */
	311	(*info->fprintf_func) (info->stream, ".long 0x%lx", insn);
	312
	313	return 4;
	314	}
07dd56a9 NC	315
07dd56a9 NC	316	void
823bbe9d	317	print_ppc_disassembler_options (FILE *stream)
07dd56a9 NC	318	{
	319	fprintf (stream, "\n\
	320	The following PPC specific disassembler options are supported for use with\n\
	321	the -M switch:\n");
8b4fa155	322
07dd56a9	323	fprintf (stream, " booke\|booke32\|booke64 Disassemble the BookE instructions\n");
36ae0db3	324	fprintf (stream, " e300 Disassemble the e300 instructions\n");
07dd56a9	325	fprintf (stream, " e500\|e500x2 Disassemble the e500 instructions\n");
64a3a6fc	326	fprintf (stream, " 440 Disassemble the 440 instructions\n");
07dd56a9 NC	327	fprintf (stream, " efs Disassemble the EFS instructions\n");
07dd56a9 NC	328	fprintf (stream, " power4 Disassemble the Power4 instructions\n");
1ed8e1e4	329	fprintf (stream, " power5 Disassemble the Power5 instructions\n");
9622b051	330	fprintf (stream, " power6 Disassemble the Power6 instructions\n");
07dd56a9 NC	331	fprintf (stream, " 32 Do not disassemble 64-bit instructions\n");
	332	fprintf (stream, " 64 Allow disassembly of 64-bit instructions\n");
	333	}