[thirdparty/binutils-gdb.git] / sim / d10v / gencode.c

#include <stdio.h>
#include <ctype.h>
#include <limits.h>
#include <string.h>
#include "ansidecl.h"
#include "opcode/d10v.h"

static void write_header (void);
static void write_opcodes (void);
static void write_template (void);

int
main (int argc, char *argv[])
{
  if ((argc > 1) && (strcmp (argv[1],"-h") == 0))
    write_header();
  else if ((argc > 1) && (strcmp (argv[1],"-t") == 0))
    write_template ();
  else
    write_opcodes();
  return 0;
}


static void
write_header (void)
{
  struct d10v_opcode *opcode;

  for (opcode = (struct d10v_opcode *)d10v_opcodes; opcode->name; opcode++)
    if (opcode->format != OPCODE_FAKE)
      printf ("void OP_%lX (SIM_DESC, SIM_CPU *);\t\t/* %s */\n", opcode->opcode, opcode->name);
}


/* write_template creates a file all required functions, ready */
/* to be filled out */

static void
write_template (void)
{
  struct d10v_opcode *opcode;
  int i,j;

  printf ("#include \"d10v-sim.h\"\n");
  printf ("#include \"simops.h\"\n");

  for (opcode = (struct d10v_opcode *)d10v_opcodes; opcode->name; opcode++)
    {
      if (opcode->format != OPCODE_FAKE)
	{
	  printf("/* %s */\nvoid\nOP_%lX ()\n{\n", opcode->name, opcode->opcode);
	  
	  /* count operands */
	  j = 0;
	  for (i=0;i<6;i++)
	    {
	      int flags = d10v_operands[opcode->operands[i]].flags;
	      if ((flags & OPERAND_REG) || (flags & OPERAND_NUM) || (flags & OPERAND_ADDR))
		j++;
	    }
	  switch (j)
	    {
	    case 0:
	      printf ("printf(\"   %s\\n\");\n",opcode->name);
	      break;
	    case 1:
	      printf ("printf(\"   %s\\t%%x\\n\",OP[0]);\n",opcode->name);
	      break;
	    case 2:
	      printf ("printf(\"   %s\\t%%x,%%x\\n\",OP[0],OP[1]);\n",opcode->name);
	      break;
	    case 3:
	      printf ("printf(\"   %s\\t%%x,%%x,%%x\\n\",OP[0],OP[1],OP[2]);\n",opcode->name);
	      break;
	    default:
	      fprintf (stderr,"Too many operands: %d\n",j);
	    }
	  printf ("}\n\n");
	}
    }
}


long Opcodes[512];
static int curop=0;

static void
check_opcodes( long op)
{
  int i;

  for (i=0;i<curop;i++)
    if (Opcodes[i] == op)
      fprintf(stderr,"DUPLICATE OPCODES: %lx\n", op);
}

static void
write_opcodes (void)
{
  struct d10v_opcode *opcode;
  int i, j;
  
  /* write out opcode table */
  printf ("#include \"sim-main.h\"\n");
  printf ("#include \"d10v-sim.h\"\n");
  printf ("#include \"simops.h\"\n\n");
  printf ("struct simops Simops[] = {\n");
  
  for (opcode = (struct d10v_opcode *)d10v_opcodes; opcode->name; opcode++)
    {
      if (opcode->format != OPCODE_FAKE)
	{
	  printf ("  { %ld,%d,%ld,%d,%d,%d,%d,OP_%lX,", opcode->opcode,
		  (opcode->format & LONG_OPCODE) ? 1 : 0, opcode->mask, opcode->format, 
		  opcode->cycles, opcode->unit, opcode->exec_type, opcode->opcode);
      
	  /* REMOVE ME */
	  check_opcodes (opcode->opcode);
	  Opcodes[curop++] = opcode->opcode;

	  j = 0;
	  for (i=0;i<6;i++)
	    {
	      int flags = d10v_operands[opcode->operands[i]].flags;
	      if ((flags & OPERAND_REG) || (flags & OPERAND_NUM) || (flags & OPERAND_ADDR))
		j++;
	    }
	  printf ("%d,",j);
	  
	  j = 0;
	  for (i=0;i<6;i++)
	    {
	      int flags = d10v_operands[opcode->operands[i]].flags;
	      int shift = d10v_operands[opcode->operands[i]].shift;
	      if ((flags & OPERAND_REG) || (flags & OPERAND_NUM)|| (flags & OPERAND_ADDR))
		{
		  if (j == 0)
		    printf ("{");
		  else
		    printf (", ");
		  if ((flags & OPERAND_REG) && (opcode->format == LONG_L))
		    shift += 15;
		  printf ("%d,%d,%d",shift,d10v_operands[opcode->operands[i]].bits,flags);
		  j = 1;
		}
	    }
	  if (j)
	    printf ("}");
	  printf ("},\n");
	}
    }
  printf ("{ 0,0,0,0,0,0,0,(void (*)())0,0,{0,0,0}},\n};\n");
}
Commit	Line	Data
c906108c SS	1	#include <stdio.h>
	2	#include <ctype.h>
	3	#include <limits.h>
11558abc	4	#include <string.h>
c906108c	5	#include "ansidecl.h"
c906108c SS	6	#include "opcode/d10v.h"
c906108c SS	7
bdca5ee4 TT	8	static void write_header (void);
	9	static void write_opcodes (void);
	10	static void write_template (void);
c906108c SS	11
c906108c SS	12	int
11558abc	13	main (int argc, char *argv[])
c906108c SS	14	{
	15	if ((argc > 1) && (strcmp (argv[1],"-h") == 0))
	16	write_header();
	17	else if ((argc > 1) && (strcmp (argv[1],"-t") == 0))
	18	write_template ();
	19	else
	20	write_opcodes();
	21	return 0;
	22	}
	23
	24
	25	static void
11558abc	26	write_header (void)
c906108c SS	27	{
	28	struct d10v_opcode *opcode;
	29
	30	for (opcode = (struct d10v_opcode *)d10v_opcodes; opcode->name; opcode++)
	31	if (opcode->format != OPCODE_FAKE)
67954606	32	printf ("void OP_%lX (SIM_DESC, SIM_CPU );\t\t/ %s */\n", opcode->opcode, opcode->name);
c906108c SS	33	}
	34
	35
	36	/* write_template creates a file all required functions, ready */
	37	/* to be filled out */
	38
	39	static void
11558abc	40	write_template (void)
c906108c SS	41	{
	42	struct d10v_opcode *opcode;
	43	int i,j;
	44
69606007	45	printf ("#include \"d10v-sim.h\"\n");
c906108c SS	46	printf ("#include \"simops.h\"\n");
	47
	48	for (opcode = (struct d10v_opcode *)d10v_opcodes; opcode->name; opcode++)
	49	{
	50	if (opcode->format != OPCODE_FAKE)
	51	{
11558abc	52	printf("/* %s */\nvoid\nOP_%lX ()\n{\n", opcode->name, opcode->opcode);
c906108c SS	53
	54	/* count operands */
	55	j = 0;
	56	for (i=0;i<6;i++)
	57	{
	58	int flags = d10v_operands[opcode->operands[i]].flags;
	59	if ((flags & OPERAND_REG) \|\| (flags & OPERAND_NUM) \|\| (flags & OPERAND_ADDR))
	60	j++;
	61	}
	62	switch (j)
	63	{
	64	case 0:
	65	printf ("printf(\" %s\\n\");\n",opcode->name);
	66	break;
	67	case 1:
	68	printf ("printf(\" %s\\t%%x\\n\",OP[0]);\n",opcode->name);
	69	break;
	70	case 2:
	71	printf ("printf(\" %s\\t%%x,%%x\\n\",OP[0],OP[1]);\n",opcode->name);
	72	break;
	73	case 3:
	74	printf ("printf(\" %s\\t%%x,%%x,%%x\\n\",OP[0],OP[1],OP[2]);\n",opcode->name);
	75	break;
	76	default:
	77	fprintf (stderr,"Too many operands: %d\n",j);
	78	}
	79	printf ("}\n\n");
	80	}
	81	}
	82	}
	83
	84
	85	long Opcodes[512];
	86	static int curop=0;
	87
11558abc	88	static void
c906108c SS	89	check_opcodes( long op)
	90	{
	91	int i;
	92
	93	for (i=0;i<curop;i++)
	94	if (Opcodes[i] == op)
11558abc	95	fprintf(stderr,"DUPLICATE OPCODES: %lx\n", op);
c906108c SS	96	}
c906108c SS	97
c906108c	98	static void
11558abc	99	write_opcodes (void)
c906108c SS	100	{
	101	struct d10v_opcode *opcode;
	102	int i, j;
	103
	104	/* write out opcode table */
67954606	105	printf ("#include \"sim-main.h\"\n");
69606007	106	printf ("#include \"d10v-sim.h\"\n");
c906108c SS	107	printf ("#include \"simops.h\"\n\n");
	108	printf ("struct simops Simops[] = {\n");
	109
	110	for (opcode = (struct d10v_opcode *)d10v_opcodes; opcode->name; opcode++)
	111	{
	112	if (opcode->format != OPCODE_FAKE)
	113	{
11558abc	114	printf (" { %ld,%d,%ld,%d,%d,%d,%d,OP_%lX,", opcode->opcode,
c906108c SS	115	(opcode->format & LONG_OPCODE) ? 1 : 0, opcode->mask, opcode->format,
	116	opcode->cycles, opcode->unit, opcode->exec_type, opcode->opcode);
	117
	118	/* REMOVE ME */
	119	check_opcodes (opcode->opcode);
	120	Opcodes[curop++] = opcode->opcode;
	121
	122	j = 0;
	123	for (i=0;i<6;i++)
	124	{
	125	int flags = d10v_operands[opcode->operands[i]].flags;
	126	if ((flags & OPERAND_REG) \|\| (flags & OPERAND_NUM) \|\| (flags & OPERAND_ADDR))
	127	j++;
	128	}
	129	printf ("%d,",j);
	130
	131	j = 0;
	132	for (i=0;i<6;i++)
	133	{
	134	int flags = d10v_operands[opcode->operands[i]].flags;
	135	int shift = d10v_operands[opcode->operands[i]].shift;
	136	if ((flags & OPERAND_REG) \|\| (flags & OPERAND_NUM)\|\| (flags & OPERAND_ADDR))
	137	{
	138	if (j == 0)
	139	printf ("{");
	140	else
	141	printf (", ");
	142	if ((flags & OPERAND_REG) && (opcode->format == LONG_L))
	143	shift += 15;
	144	printf ("%d,%d,%d",shift,d10v_operands[opcode->operands[i]].bits,flags);
	145	j = 1;
	146	}
	147	}
	148	if (j)
	149	printf ("}");
	150	printf ("},\n");
	151	}
	152	}
67954606	153	printf ("{ 0,0,0,0,0,0,0,(void (*)())0,0,{0,0,0}},\n};\n");
c906108c	154	}