URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [branches/] [oc/] [gdb-5.0/] [sim/] [mn10200/] [gencode.c] - Blame information for rev 1771

Go to most recent revision | Details | Compare with Previous | View Log


#include "mn10200_sim.h"
 
static void write_header PARAMS ((void));
static void write_opcodes PARAMS ((void));
static void write_template PARAMS ((void));
 
int
main (argc, argv)
     int argc;
     char *argv[];
{
  if ((argc > 1) && (strcmp (argv[1], "-h") == 0))
    write_header();
  else if ((argc > 1) && (strcmp (argv[1], "-t") == 0))
    write_template ();
  else
    write_opcodes();
  return 0;
}
 
 
static void
write_header ()
{
  struct mn10200_opcode *opcode;
 
  for (opcode = (struct mn10200_opcode *)mn10200_opcodes; opcode->name; opcode++)
    printf("void OP_%X PARAMS ((unsigned long, unsigned long));\t\t/* %s */\n",
           opcode->opcode, opcode->name);
}
 
 
/* write_template creates a file all required functions, ready */
/* to be filled out */
 
static void
write_template ()
{
  struct mn10200_opcode *opcode;
  int i,j;
 
  printf ("#include \"mn10200_sim.h\"\n");
  printf ("#include \"simops.h\"\n");
 
  for (opcode = (struct mn10200_opcode *)mn10200_opcodes; opcode->name; opcode++)
    {
      printf("/* %s */\nvoid\nOP_%X (insn, extension)\n     unsigned long insn, extension;\n{\n", opcode->name, opcode->opcode);
 
      /* count operands */
      j = 0;
      for (i = 0; i < 6; i++)
        {
          int flags = mn10200_operands[opcode->operands[i]].flags;
 
          if (flags)
            j++;
        }
      switch (j)
        {
        case 0:
          printf ("printf(\"   %s\\n\");\n", opcode->name);
          break;
        case 1:
          printf ("printf(\"   %s\\t%%x\\n\", OP[0]);\n", opcode->name);
          break;
        case 2:
          printf ("printf(\"   %s\\t%%x,%%x\\n\",OP[0],OP[1]);\n",
                  opcode->name);
          break;
        case 3:
          printf ("printf(\"   %s\\t%%x,%%x,%%x\\n\",OP[0],OP[1],OP[2]);\n",
                  opcode->name);
          break;
        default:
          fprintf (stderr,"Too many operands: %d\n", j);
        }
      printf ("}\n\n");
    }
}
 
static void
write_opcodes ()
{
  struct mn10200_opcode *opcode;
  int i, j;
  int numops;
 
  /* write out opcode table */
  printf ("#include \"mn10200_sim.h\"\n");
  printf ("#include \"simops.h\"\n\n");
  printf ("struct simops Simops[] = {\n");
 
  for (opcode = (struct mn10200_opcode *)mn10200_opcodes; opcode->name; opcode++)
    {
      int size;
 
      if (opcode->format == FMT_1)
        size = 1;
      else if (opcode->format == FMT_2 || opcode->format == FMT_4)
        size = 2;
      else if (opcode->format == FMT_3 || opcode->format == FMT_5)
        size = 3;
      else if (opcode->format == FMT_6)
        size = 4;
      else if (opcode->format == FMT_7)
        size = 5;
      else
        abort ();
 
      printf ("  { 0x%x,0x%x,OP_%X,%d,%d,",
              opcode->opcode, opcode->mask, opcode->opcode,
              size, opcode->format);
 
      /* count operands */
      j = 0;
      for (i = 0; i < 6; i++)
        {
          int flags = mn10200_operands[opcode->operands[i]].flags;
 
          if (flags)
            j++;
        }
      printf ("%d,{",j);
 
      j = 0;
      numops = 0;
      for (i = 0; i < 6; i++)
        {
          int flags = mn10200_operands[opcode->operands[i]].flags;
          int shift = mn10200_operands[opcode->operands[i]].shift;
 
          if (flags)
            {
              if (j)
                printf (", ");
              printf ("%d,%d,%d", shift,
                      mn10200_operands[opcode->operands[i]].bits,flags);
              j = 1;
              numops++;
            }
        }
 
      switch (numops)
        {
        case 0:
          printf ("0,0,0");
        case 1:
          printf (",0,0,0");
        }
 
      printf ("}},\n");
    }
  printf ("{ 0,0,NULL,0,0,0,{0,0,0,0,0,0}},\n};\n");
}

Line No.	Rev	Author	Line
1	106	markom	`#include "mn10200_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 mn10200_opcode *opcode;`
26
27			`for (opcode = (struct mn10200_opcode *)mn10200_opcodes; opcode->name; opcode++)`
28			`printf("void OP_%X PARAMS ((unsigned long, unsigned long));\t\t/* %s */\n",`
29			`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 mn10200_opcode *opcode;`
40			`int i,j;`
41
42			`printf ("#include \"mn10200_sim.h\"\n");`
43			`printf ("#include \"simops.h\"\n");`
44
45			`for (opcode = (struct mn10200_opcode *)mn10200_opcodes; opcode->name; opcode++)`
46			`{`
47			`printf("/* %s */\nvoid\nOP_%X (insn, extension)\n unsigned long insn, extension;\n{\n", opcode->name, opcode->opcode);`
48
49			`/* count operands */`
50			`j = 0;`
51			`for (i = 0; i < 6; i++)`
52			`{`
53			`int flags = mn10200_operands[opcode->operands[i]].flags;`
54
55			`if (flags)`
56			`j++;`
57			`}`
58			`switch (j)`
59			`{`
60			`case 0:`
61			`printf ("printf(\" %s\\n\");\n", opcode->name);`
62			`break;`
63			`case 1:`
64			`printf ("printf(\" %s\\t%%x\\n\", OP[0]);\n", opcode->name);`
65			`break;`
66			`case 2:`
67			`printf ("printf(\" %s\\t%%x,%%x\\n\",OP[0],OP[1]);\n",`
68			`opcode->name);`
69			`break;`
70			`case 3:`
71			`printf ("printf(\" %s\\t%%x,%%x,%%x\\n\",OP[0],OP[1],OP[2]);\n",`
72			`opcode->name);`
73			`break;`
74			`default:`
75			`fprintf (stderr,"Too many operands: %d\n", j);`
76			`}`
77			`printf ("}\n\n");`
78			`}`
79			`}`
80
81			`static void`
82			`write_opcodes ()`
83			`{`
84			`struct mn10200_opcode *opcode;`
85			`int i, j;`
86			`int numops;`
87
88			`/* write out opcode table */`
89			`printf ("#include \"mn10200_sim.h\"\n");`
90			`printf ("#include \"simops.h\"\n\n");`
91			`printf ("struct simops Simops[] = {\n");`
92
93			`for (opcode = (struct mn10200_opcode *)mn10200_opcodes; opcode->name; opcode++)`
94			`{`
95			`int size;`
96
97			`if (opcode->format == FMT_1)`
98			`size = 1;`
99			`else if (opcode->format == FMT_2 \|\| opcode->format == FMT_4)`
100			`size = 2;`
101			`else if (opcode->format == FMT_3 \|\| opcode->format == FMT_5)`
102			`size = 3;`
103			`else if (opcode->format == FMT_6)`
104			`size = 4;`
105			`else if (opcode->format == FMT_7)`
106			`size = 5;`
107			`else`
108			`abort ();`
109
110			`printf (" { 0x%x,0x%x,OP_%X,%d,%d,",`
111			`opcode->opcode, opcode->mask, opcode->opcode,`
112			`size, opcode->format);`
113
114			`/* count operands */`
115			`j = 0;`
116			`for (i = 0; i < 6; i++)`
117			`{`
118			`int flags = mn10200_operands[opcode->operands[i]].flags;`
119
120			`if (flags)`
121			`j++;`
122			`}`
123			`printf ("%d,{",j);`
124
125			`j = 0;`
126			`numops = 0;`
127			`for (i = 0; i < 6; i++)`
128			`{`
129			`int flags = mn10200_operands[opcode->operands[i]].flags;`
130			`int shift = mn10200_operands[opcode->operands[i]].shift;`
131
132			`if (flags)`
133			`{`
134			`if (j)`
135			`printf (", ");`
136			`printf ("%d,%d,%d", shift,`
137			`mn10200_operands[opcode->operands[i]].bits,flags);`
138			`j = 1;`
139			`numops++;`
140			`}`
141			`}`
142
143			`switch (numops)`
144			`{`
145			`case 0:`
146			`printf ("0,0,0");`
147			`case 1:`
148			`printf (",0,0,0");`
149			`}`
150
151			`printf ("}},\n");`
152			`}`
153			`printf ("{ 0,0,NULL,0,0,0,{0,0,0,0,0,0}},\n};\n");`
154			`}`

Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [branches/] [oc/] [gdb-5.0/] [sim/] [mn10200/] [gencode.c] - Blame information for rev 1771