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