NetBSD/gnu/dist/toolchain/sim/v850/gencode.c

150 lines
3.2 KiB
C

#include <stdio.h>
#include <ctype.h>
#include "ansidecl.h"
#include "opcode/v850.h"
#include <limits.h>
static void write_header PARAMS ((void));
static void write_opcodes PARAMS ((void));
static void write_template PARAMS ((void));
long Opcodes[512];
static int curop=0;
int
main (argc, argv)
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 ()
{
struct v850_opcode *opcode;
for (opcode = (struct v850_opcode *)v850_opcodes; opcode->name; opcode++)
printf("int OP_%X PARAMS ((void));\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 ()
{
struct v850_opcode *opcode;
int i,j;
printf ("#include \"sim-main.h\"\n");
printf ("#include \"v850_sim.h\"\n");
printf ("#include \"simops.h\"\n");
for (opcode = (struct v850_opcode *)v850_opcodes; opcode->name; opcode++)
{
printf("/* %s */\nvoid\nOP_%X (void)\n{\n", opcode->name, opcode->opcode);
/* count operands */
j = 0;
for (i = 0; i < 6; i++)
{
int flags = v850_operands[opcode->operands[i]].flags;
if (flags & (V850_OPERAND_REG | V850_OPERAND_SRG | V850_OPERAND_CC))
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");
}
}
static void
write_opcodes ()
{
struct v850_opcode *opcode;
int i, j;
int numops;
/* write out opcode table */
printf ("#include \"sim-main.h\"\n");
printf ("#include \"v850_sim.h\"\n");
printf ("#include \"simops.h\"\n\n");
printf ("struct simops Simops[] = {\n");
for (opcode = (struct v850_opcode *)v850_opcodes; opcode->name; opcode++)
{
printf (" { 0x%x,0x%x,OP_%X,",
opcode->opcode, opcode->mask, opcode->opcode);
Opcodes[curop++] = opcode->opcode;
/* count operands */
j = 0;
for (i = 0; i < 6; i++)
{
int flags = v850_operands[opcode->operands[i]].flags;
if (flags & (V850_OPERAND_REG | V850_OPERAND_SRG | V850_OPERAND_CC))
j++;
}
printf ("%d,{",j);
j = 0;
numops = 0;
for (i = 0; i < 6; i++)
{
int flags = v850_operands[opcode->operands[i]].flags;
int shift = v850_operands[opcode->operands[i]].shift;
if (flags & (V850_OPERAND_REG | V850_OPERAND_SRG | V850_OPERAND_CC))
{
if (j)
printf (", ");
printf ("%d,%d,%d", shift,
v850_operands[opcode->operands[i]].bits,flags);
j = 1;
numops++;
}
}
switch (numops)
{
case 0:
printf ("0,0,0");
case 1:
printf (",0,0,0");
}
printf ("}},\n");
}
printf ("{ 0,0,NULL,0,{0,0,0,0,0,0}},\n};\n");
}