sim/d10v/gencode.c

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