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 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 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 40 write_template (void) 41 { 42 struct d10v_opcode *opcode; 43 int i,j; 44 45 printf ("#include \"sim-main.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 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 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 \"simops.h\"\n\n"); 107 printf ("struct simops Simops[] = {\n"); 108 109 for (opcode = (struct d10v_opcode *)d10v_opcodes; opcode->name; opcode++) 110 { 111 if (opcode->format != OPCODE_FAKE) 112 { 113 printf (" { %ld,%d,%ld,%d,%d,%d,%d,OP_%lX,", opcode->opcode, 114 (opcode->format & LONG_OPCODE) ? 1 : 0, opcode->mask, opcode->format, 115 opcode->cycles, opcode->unit, opcode->exec_type, opcode->opcode); 116 117 /* REMOVE ME */ 118 check_opcodes (opcode->opcode); 119 Opcodes[curop++] = opcode->opcode; 120 121 j = 0; 122 for (i=0;i<6;i++) 123 { 124 int flags = d10v_operands[opcode->operands[i]].flags; 125 if ((flags & OPERAND_REG) || (flags & OPERAND_NUM) || (flags & OPERAND_ADDR)) 126 j++; 127 } 128 printf ("%d,",j); 129 130 j = 0; 131 for (i=0;i<6;i++) 132 { 133 int flags = d10v_operands[opcode->operands[i]].flags; 134 int shift = d10v_operands[opcode->operands[i]].shift; 135 if ((flags & OPERAND_REG) || (flags & OPERAND_NUM)|| (flags & OPERAND_ADDR)) 136 { 137 if (j == 0) 138 printf ("{"); 139 else 140 printf (", "); 141 if ((flags & OPERAND_REG) && (opcode->format == LONG_L)) 142 shift += 15; 143 printf ("%d,%d,%d",shift,d10v_operands[opcode->operands[i]].bits,flags); 144 j = 1; 145 } 146 } 147 if (j) 148 printf ("}"); 149 printf ("},\n"); 150 } 151 } 152 printf ("{ 0,0,0,0,0,0,0,(void (*)())0,0,{0,0,0}},\n};\n"); 153 } 154