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
8 static void write_header PARAMS ((void));
9 static void write_opcodes PARAMS ((void));
10 static void write_template PARAMS ((void));
11
12 int
main(argc,argv)13 main (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
27 static void
write_header()28 write_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
41 static void
write_template()42 write_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
87 long Opcodes[512];
88 static int curop=0;
89
check_opcodes(long op)90 check_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
100 static void
write_opcodes()101 write_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