1 #include <stdio.h>
2 #include <ctype.h>
3 #include <limits.h>
4 #include <string.h>
5 #include "ansidecl.h"
6 #include "opcode/d10v.h"
7
8 static void write_header (void);
9 static void write_opcodes (void);
10 static void write_template (void);
11
12 int
main(int argc,char * argv[])13 main (int argc, char *argv[])
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
write_header(void)26 write_header (void)
27 {
28 struct d10v_opcode *opcode;
29
30 for (opcode = (struct d10v_opcode *)d10v_opcodes; opcode->name; opcode++)
31 if (opcode->format != OPCODE_FAKE)
32 printf ("void OP_%lX (SIM_DESC, SIM_CPU *);\t\t/* %s */\n", opcode->opcode, opcode->name);
33 }
34
35
36 /* write_template creates a file all required functions, ready */
37 /* to be filled out */
38
39 static void
write_template(void)40 write_template (void)
41 {
42 struct d10v_opcode *opcode;
43 int i,j;
44
45 printf ("#include \"d10v-sim.h\"\n");
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 {
52 printf("/* %s */\nvoid\nOP_%lX ()\n{\n", opcode->name, opcode->opcode);
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
88 static void
check_opcodes(long op)89 check_opcodes( long op)
90 {
91 int i;
92
93 for (i=0;i<curop;i++)
94 if (Opcodes[i] == op)
95 fprintf(stderr,"DUPLICATE OPCODES: %lx\n", op);
96 }
97
98 static void
write_opcodes(void)99 write_opcodes (void)
100 {
101 struct d10v_opcode *opcode;
102 int i, j;
103
104 /* write out opcode table */
105 printf ("#include \"sim-main.h\"\n");
106 printf ("#include \"d10v-sim.h\"\n");
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 {
114 printf (" { %ld,%d,%ld,%d,%d,%d,%d,OP_%lX,", opcode->opcode,
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 }
153 printf ("{ 0,0,0,0,0,0,0,(void (*)())0,0,{0,0,0}},\n};\n");
154 }
155