Subversion Repositories open8_urisc

#include <ctype.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include "../defines.h"

#include "defines.h"

char outname[] = "../opcodes_v8urisc_tables.c";

#include "../opcodes_v8urisc.c"

/* this program is used to generate the opcode decoding speedup tables */

int print_table(FILE *f, int *d) {

  int x;

  for (x = 0; x < 256; x++) {

    if ((x % 8) == 0)

      fprintf(f, "  ");

    fprintf(f, "%d", d[x]);

    if ((x % 8) == 7) {

      if (x == 255)

        fprintf(f, " };\n");

      else

        fprintf(f, ",\n");

    }

    else

      fprintf(f, ", ");

  }

  return SUCCEEDED;

}

int main(int argc, char *argv[]) {

  struct optcode *opt_tmp;

  FILE *out;

  char max_name[256];

  int x, opcode_n[256], opcode_p[256], a, b, n, max = 0, ob;

  /* generate opcode decoding jump tables */

  for (x = 0; x < 256; x++) {

    opcode_n[x] = 0;

    opcode_p[x] = 0;

  }

  opt_tmp = opt_table;

  a = 'A';

  b = 'a';

  ob = 'a';

  n = 0;

  x = 0;

  opcode_p[(int)a] = 0;

  opcode_p[(int)b] = 0;

  while (opt_table[n].type != -1) {

    if (strlen(opt_table[n].op) > max) {

      max = strlen(opt_table[n].op);

      strcpy(max_name, opt_table[n].op);

    }

    if (opt_tmp[n].op[0] != a) {

      opcode_n[(int)a] = x;

      opcode_n[(int)b] = x;

      a = opt_tmp[n].op[0];

      b = tolower((int)a);

      if (ob > b) {

        fprintf(stderr, "MAIN: Instruction are NOT in alphabetical order (first letter): '%c' -> '%c'.\n", ob, b);

        return 1;

      }

      ob = b;

      opcode_p[(int)a] = n;

      opcode_p[(int)b] = n;

      x = 1;

      n++;

    }

    else {

      x++;

      n++;

    }

  }

  opcode_n[(int)a] = x;

  opcode_n[(int)b] = x;

  out = fopen(outname, "wb");

  if (out == NULL) {

    fprintf(stderr, "MAIN: Unable to create file \"%s\".\n", outname);

    return 1;

  }

  /* opcode_n[256] */

  fprintf(out, "int opcode_n[256] = {\n");

  print_table(out, opcode_n);

  /* opcode_p[256] */

  fprintf(out, "int opcode_p[256] = {\n");

  print_table(out, opcode_p);

  fclose(out);

#if QUIET == 0

  printf("MAIN: max opt[] (\"%s\") lenght was %d bytes.\n", max_name, max);

#endif

  return 0;

}