[deliverable/binutils-gdb.git] / cpu / xc16x.opc

/* XC16X opcode support.  -*- C -*-

   Copyright 2006, 2007, 2009 Free Software Foundation, Inc.

   Contributed by KPIT Cummins Infosystems Ltd.; developed under contract 
   from Infineon Systems, GMBH , Germany.

   This file is part of the GNU Binutils.

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 3 of the License, or
   (at your option) any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

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


/* This file is an addendum to xc16x.cpu.  Heavy use of C code isn't
   appropriate in .cpu files, so it resides here.  This especially applies
   to assembly/disassembly where parsing/printing can be quite involved.
   Such things aren't really part of the specification of the cpu, per se,
   so .cpu files provide the general framework and .opc files handle the
   nitty-gritty details as necessary.

   Each section is delimited with start and end markers.

   <arch>-opc.h additions use: "-- opc.h"
   <arch>-opc.c additions use: "-- opc.c"
   <arch>-asm.c additions use: "-- asm.c"
   <arch>-dis.c additions use: "-- dis.c"
   <arch>-ibd.h additions use: "-- ibd.h"  */
\f
/* -- opc.h */

#define CGEN_DIS_HASH_SIZE 8
#define CGEN_DIS_HASH(buf,value) (((* (unsigned char*) (buf)) >> 3) % CGEN_DIS_HASH_SIZE)

/* -- */
\f
/* -- opc.c */
                                                                                
/* -- */
\f
/* -- asm.c */
/* Handle '#' prefixes (i.e. skip over them).  */

static const char *
parse_hash (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	    const char **strp,
	    int opindex ATTRIBUTE_UNUSED,
	    long *valuep ATTRIBUTE_UNUSED)
{
  if (**strp == '#')
    {
      ++*strp;
      return NULL;
    }
  return _("Missing '#' prefix");
}

/* Handle '.' prefixes (i.e. skip over them).  */

static const char *
parse_dot (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   const char **strp,
	   int opindex ATTRIBUTE_UNUSED,
	   long *valuep ATTRIBUTE_UNUSED)
{
  if (**strp == '.')
    {
      ++*strp;
      return NULL;
    }
  return _("Missing '.' prefix");
}

/* Handle 'pof:' prefixes (i.e. skip over them).  */

static const char *
parse_pof (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   const char **strp,
	   int opindex ATTRIBUTE_UNUSED,
	   long *valuep ATTRIBUTE_UNUSED)
{
  if (strncasecmp (*strp, "pof:", 4) == 0)
    {
      *strp += 4;
      return NULL;
    }
  return _("Missing 'pof:' prefix");  
}

/* Handle 'pag:' prefixes (i.e. skip over them).  */

static const char *
parse_pag (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   const char **strp,
	   int opindex ATTRIBUTE_UNUSED,
	   long *valuep ATTRIBUTE_UNUSED)
{
  if (strncasecmp (*strp, "pag:", 4) == 0)
    {
      *strp += 4;
      return NULL;
    }
  return _("Missing 'pag:' prefix");
}

/* Handle 'sof' prefixes (i.e. skip over them).  */

static const char *
parse_sof (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   const char **strp,
	   int opindex ATTRIBUTE_UNUSED,
	   long *valuep ATTRIBUTE_UNUSED)
{
  if (strncasecmp (*strp, "sof:", 4) == 0)
    {
      *strp += 4;
      return NULL;
    }
  return _("Missing 'sof:' prefix");
}

/* Handle 'seg' prefixes (i.e. skip over them).  */

static const char *
parse_seg (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   const char **strp,
	   int opindex ATTRIBUTE_UNUSED,
	   long *valuep ATTRIBUTE_UNUSED)
{
  if (strncasecmp (*strp, "seg:", 4) == 0)
    {
      *strp += 4;
      return NULL;
    }
  return _("Missing 'seg:' prefix");
}
/* -- */
\f
/* -- dis.c */

/* Print an operand with a "." prefix.
   NOTE: This prints the operand in hex.
   ??? This exists to maintain disassembler compatibility with previous
   versions.  Ideally we'd print the "." in print_dot.  */

static void
print_with_dot_prefix (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
		       void * dis_info,
		       long value,
		       unsigned attrs ATTRIBUTE_UNUSED,
		       bfd_vma pc ATTRIBUTE_UNUSED,
		       int length ATTRIBUTE_UNUSED)
{
  disassemble_info *info = (disassemble_info *) dis_info;

  info->fprintf_func (info->stream, ".");
  info->fprintf_func (info->stream, "0x%lx", value);
}

/* Print an operand with a "#pof:" prefix.
   NOTE: This prints the operand as an address.
   ??? This exists to maintain disassembler compatibility with previous
   versions.  Ideally we'd print "#pof:" in print_pof.  */

static void
print_with_pof_prefix (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
		       void * dis_info,
		       bfd_vma value,
		       unsigned attrs ATTRIBUTE_UNUSED,
		       bfd_vma pc ATTRIBUTE_UNUSED,
		       int length ATTRIBUTE_UNUSED)
{
  disassemble_info *info = (disassemble_info *) dis_info;

  info->fprintf_func (info->stream, "#pof:");
  info->fprintf_func (info->stream, "0x%lx", (long) value);
}

/* Print an operand with a "#pag:" prefix.
   NOTE: This prints the operand in hex.
   ??? This exists to maintain disassembler compatibility with previous
   versions.  Ideally we'd print "#pag:" in print_pag.  */

static void
print_with_pag_prefix (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
		       void * dis_info,
		       long value,
		       unsigned attrs ATTRIBUTE_UNUSED,
		       bfd_vma pc ATTRIBUTE_UNUSED,
		       int length ATTRIBUTE_UNUSED)
{
  disassemble_info *info = (disassemble_info *) dis_info;

  info->fprintf_func (info->stream, "#pag:");
  info->fprintf_func (info->stream, "0x%lx", value);
}

/* Print a 'pof:' prefix to an operand.  */

static void
print_pof (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   void * dis_info ATTRIBUTE_UNUSED,
	   long value ATTRIBUTE_UNUSED,
	   unsigned int attrs ATTRIBUTE_UNUSED,
	   bfd_vma pc ATTRIBUTE_UNUSED,
	   int length ATTRIBUTE_UNUSED)
{
}

/* Print a 'pag:' prefix to an operand.  */

static void
print_pag (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   void * dis_info ATTRIBUTE_UNUSED,
	   long value ATTRIBUTE_UNUSED,
	   unsigned int attrs ATTRIBUTE_UNUSED,
	   bfd_vma pc ATTRIBUTE_UNUSED,
	   int length ATTRIBUTE_UNUSED)
{
}

/* Print a 'sof:' prefix to an operand.  */

static void
print_sof (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   void * dis_info,
	   long value ATTRIBUTE_UNUSED,
	   unsigned int attrs ATTRIBUTE_UNUSED,
	   bfd_vma pc ATTRIBUTE_UNUSED,
	   int length ATTRIBUTE_UNUSED)
{
  disassemble_info *info = (disassemble_info *) dis_info;

  info->fprintf_func (info->stream, "sof:");
}

/* Print a 'seg:' prefix to an operand.  */

static void
print_seg (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   void * dis_info,
	   long value ATTRIBUTE_UNUSED,
	   unsigned int attrs ATTRIBUTE_UNUSED,
	   bfd_vma pc ATTRIBUTE_UNUSED,
	   int length ATTRIBUTE_UNUSED)
{
  disassemble_info *info = (disassemble_info *) dis_info;

  info->fprintf_func (info->stream, "seg:");
}

/* Print a '#' prefix to an operand.  */

static void
print_hash (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	    void * dis_info,
	    long value ATTRIBUTE_UNUSED,
	    unsigned int attrs ATTRIBUTE_UNUSED,
	    bfd_vma pc ATTRIBUTE_UNUSED,
	    int length ATTRIBUTE_UNUSED)
{
  disassemble_info *info = (disassemble_info *) dis_info;

  info->fprintf_func (info->stream, "#");
}

/* Print a '.' prefix to an operand.  */

static void
print_dot (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	   void * dis_info ATTRIBUTE_UNUSED,
	   long value ATTRIBUTE_UNUSED,
	   unsigned int attrs ATTRIBUTE_UNUSED,
	   bfd_vma pc ATTRIBUTE_UNUSED,
	   int length ATTRIBUTE_UNUSED)
{
}

/* -- */
Commit	Line	Data
	1	/* XC16X opcode support. -- C --
	2
	3	Copyright 2006, 2007, 2009 Free Software Foundation, Inc.
	4
	5	Contributed by KPIT Cummins Infosystems Ltd.; developed under contract
	6	from Infineon Systems, GMBH , Germany.
	7
	8	This file is part of the GNU Binutils.
	9
	10	This program is free software; you can redistribute it and/or modify
	11	it under the terms of the GNU General Public License as published by
	12	the Free Software Foundation; either version 3 of the License, or
	13	(at your option) any later version.
	14
	15	This program is distributed in the hope that it will be useful,
	16	but WITHOUT ANY WARRANTY; without even the implied warranty of
	17	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	18	GNU General Public License for more details.
	19
	20	You should have received a copy of the GNU General Public License
	21	along with this program; if not, write to the Free Software
	22	Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
	23	02110-1301, USA. */
	24
	25
	26	/* This file is an addendum to xc16x.cpu. Heavy use of C code isn't
	27	appropriate in .cpu files, so it resides here. This especially applies
	28	to assembly/disassembly where parsing/printing can be quite involved.
	29	Such things aren't really part of the specification of the cpu, per se,
	30	so .cpu files provide the general framework and .opc files handle the
	31	nitty-gritty details as necessary.
	32
	33	Each section is delimited with start and end markers.
	34
	35	<arch>-opc.h additions use: "-- opc.h"
	36	<arch>-opc.c additions use: "-- opc.c"
	37	<arch>-asm.c additions use: "-- asm.c"
	38	<arch>-dis.c additions use: "-- dis.c"
	39	<arch>-ibd.h additions use: "-- ibd.h" */
	40	\f
	41	/* -- opc.h */
	42
	43	#define CGEN_DIS_HASH_SIZE 8
	44	#define CGEN_DIS_HASH(buf,value) (((* (unsigned char*) (buf)) >> 3) % CGEN_DIS_HASH_SIZE)
	45
	46	/* -- */
	47	\f
	48	/* -- opc.c */
	49
	50	/* -- */
	51	\f
	52	/* -- asm.c */
	53	/* Handle '#' prefixes (i.e. skip over them). */
	54
	55	static const char *
	56	parse_hash (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	57	const char **strp,
	58	int opindex ATTRIBUTE_UNUSED,
	59	long *valuep ATTRIBUTE_UNUSED)
	60	{
	61	if (**strp == '#')
	62	{
	63	++*strp;
	64	return NULL;
	65	}
	66	return _("Missing '#' prefix");
	67	}
	68
	69	/* Handle '.' prefixes (i.e. skip over them). */
	70
	71	static const char *
	72	parse_dot (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	73	const char **strp,
	74	int opindex ATTRIBUTE_UNUSED,
	75	long *valuep ATTRIBUTE_UNUSED)
	76	{
	77	if (**strp == '.')
	78	{
	79	++*strp;
	80	return NULL;
	81	}
	82	return _("Missing '.' prefix");
	83	}
	84
	85	/* Handle 'pof:' prefixes (i.e. skip over them). */
	86
	87	static const char *
	88	parse_pof (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	89	const char **strp,
	90	int opindex ATTRIBUTE_UNUSED,
	91	long *valuep ATTRIBUTE_UNUSED)
	92	{
	93	if (strncasecmp (*strp, "pof:", 4) == 0)
	94	{
	95	*strp += 4;
	96	return NULL;
	97	}
	98	return _("Missing 'pof:' prefix");
	99	}
	100
	101	/* Handle 'pag:' prefixes (i.e. skip over them). */
	102
	103	static const char *
	104	parse_pag (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	105	const char **strp,
	106	int opindex ATTRIBUTE_UNUSED,
	107	long *valuep ATTRIBUTE_UNUSED)
	108	{
	109	if (strncasecmp (*strp, "pag:", 4) == 0)
	110	{
	111	*strp += 4;
	112	return NULL;
	113	}
	114	return _("Missing 'pag:' prefix");
	115	}
	116
	117	/* Handle 'sof' prefixes (i.e. skip over them). */
	118
	119	static const char *
	120	parse_sof (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	121	const char **strp,
	122	int opindex ATTRIBUTE_UNUSED,
	123	long *valuep ATTRIBUTE_UNUSED)
	124	{
	125	if (strncasecmp (*strp, "sof:", 4) == 0)
	126	{
	127	*strp += 4;
	128	return NULL;
	129	}
	130	return _("Missing 'sof:' prefix");
	131	}
	132
	133	/* Handle 'seg' prefixes (i.e. skip over them). */
	134
	135	static const char *
	136	parse_seg (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	137	const char **strp,
	138	int opindex ATTRIBUTE_UNUSED,
	139	long *valuep ATTRIBUTE_UNUSED)
	140	{
	141	if (strncasecmp (*strp, "seg:", 4) == 0)
	142	{
	143	*strp += 4;
	144	return NULL;
	145	}
	146	return _("Missing 'seg:' prefix");
	147	}
	148	/* -- */
	149	\f
	150	/* -- dis.c */
	151
	152	/* Print an operand with a "." prefix.
	153	NOTE: This prints the operand in hex.
	154	??? This exists to maintain disassembler compatibility with previous
	155	versions. Ideally we'd print the "." in print_dot. */
	156
	157	static void
	158	print_with_dot_prefix (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	159	void * dis_info,
	160	long value,
	161	unsigned attrs ATTRIBUTE_UNUSED,
	162	bfd_vma pc ATTRIBUTE_UNUSED,
	163	int length ATTRIBUTE_UNUSED)
	164	{
	165	disassemble_info info = (disassemble_info ) dis_info;
	166
	167	info->fprintf_func (info->stream, ".");
	168	info->fprintf_func (info->stream, "0x%lx", value);
	169	}
	170
	171	/* Print an operand with a "#pof:" prefix.
	172	NOTE: This prints the operand as an address.
	173	??? This exists to maintain disassembler compatibility with previous
	174	versions. Ideally we'd print "#pof:" in print_pof. */
	175
	176	static void
	177	print_with_pof_prefix (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	178	void * dis_info,
	179	bfd_vma value,
	180	unsigned attrs ATTRIBUTE_UNUSED,
	181	bfd_vma pc ATTRIBUTE_UNUSED,
	182	int length ATTRIBUTE_UNUSED)
	183	{
	184	disassemble_info info = (disassemble_info ) dis_info;
	185
	186	info->fprintf_func (info->stream, "#pof:");
	187	info->fprintf_func (info->stream, "0x%lx", (long) value);
	188	}
	189
	190	/* Print an operand with a "#pag:" prefix.
	191	NOTE: This prints the operand in hex.
	192	??? This exists to maintain disassembler compatibility with previous
	193	versions. Ideally we'd print "#pag:" in print_pag. */
	194
	195	static void
	196	print_with_pag_prefix (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	197	void * dis_info,
	198	long value,
	199	unsigned attrs ATTRIBUTE_UNUSED,
	200	bfd_vma pc ATTRIBUTE_UNUSED,
	201	int length ATTRIBUTE_UNUSED)
	202	{
	203	disassemble_info info = (disassemble_info ) dis_info;
	204
	205	info->fprintf_func (info->stream, "#pag:");
	206	info->fprintf_func (info->stream, "0x%lx", value);
	207	}
	208
	209	/* Print a 'pof:' prefix to an operand. */
	210
	211	static void
	212	print_pof (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	213	void * dis_info ATTRIBUTE_UNUSED,
	214	long value ATTRIBUTE_UNUSED,
	215	unsigned int attrs ATTRIBUTE_UNUSED,
	216	bfd_vma pc ATTRIBUTE_UNUSED,
	217	int length ATTRIBUTE_UNUSED)
	218	{
	219	}
	220
	221	/* Print a 'pag:' prefix to an operand. */
	222
	223	static void
	224	print_pag (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	225	void * dis_info ATTRIBUTE_UNUSED,
	226	long value ATTRIBUTE_UNUSED,
	227	unsigned int attrs ATTRIBUTE_UNUSED,
	228	bfd_vma pc ATTRIBUTE_UNUSED,
	229	int length ATTRIBUTE_UNUSED)
	230	{
	231	}
	232
	233	/* Print a 'sof:' prefix to an operand. */
	234
	235	static void
	236	print_sof (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	237	void * dis_info,
	238	long value ATTRIBUTE_UNUSED,
	239	unsigned int attrs ATTRIBUTE_UNUSED,
	240	bfd_vma pc ATTRIBUTE_UNUSED,
	241	int length ATTRIBUTE_UNUSED)
	242	{
	243	disassemble_info info = (disassemble_info ) dis_info;
	244
	245	info->fprintf_func (info->stream, "sof:");
	246	}
	247
	248	/* Print a 'seg:' prefix to an operand. */
	249
	250	static void
	251	print_seg (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	252	void * dis_info,
	253	long value ATTRIBUTE_UNUSED,
	254	unsigned int attrs ATTRIBUTE_UNUSED,
	255	bfd_vma pc ATTRIBUTE_UNUSED,
	256	int length ATTRIBUTE_UNUSED)
	257	{
	258	disassemble_info info = (disassemble_info ) dis_info;
	259
	260	info->fprintf_func (info->stream, "seg:");
	261	}
	262
	263	/* Print a '#' prefix to an operand. */
	264
	265	static void
	266	print_hash (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	267	void * dis_info,
	268	long value ATTRIBUTE_UNUSED,
	269	unsigned int attrs ATTRIBUTE_UNUSED,
	270	bfd_vma pc ATTRIBUTE_UNUSED,
	271	int length ATTRIBUTE_UNUSED)
	272	{
	273	disassemble_info info = (disassemble_info ) dis_info;
	274
	275	info->fprintf_func (info->stream, "#");
	276	}
	277
	278	/* Print a '.' prefix to an operand. */
	279
	280	static void
	281	print_dot (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
	282	void * dis_info ATTRIBUTE_UNUSED,
	283	long value ATTRIBUTE_UNUSED,
	284	unsigned int attrs ATTRIBUTE_UNUSED,
	285	bfd_vma pc ATTRIBUTE_UNUSED,
	286	int length ATTRIBUTE_UNUSED)
	287	{
	288	}
	289
	290	/* -- */