old-cross-binutils/sim/cr16/gencode.c

180 lines
4.7 KiB
C
Raw Normal View History

/* Simulation code for the CR16 processor.
Copyright (C) 2008-2015 Free Software Foundation, Inc.
Contributed by M Ranga Swami Reddy <MR.Swami.Reddy@nsc.com>
This file is part of GDB, the GNU debugger.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3, or (at your option)
any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
2008-05-05 09:33:37 +00:00
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>. */
#include "config.h"
#include <stdio.h>
#include <ctype.h>
#include <limits.h>
2015-03-30 02:41:14 +00:00
#include <string.h>
#include "ansidecl.h"
#include "opcode/cr16.h"
static void write_header (void);
static void write_opcodes (void);
static void write_template (void);
int
2008-05-05 09:33:37 +00:00
main (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
2015-03-30 02:41:14 +00:00
write_header (void)
{
int i = 0;
/* Start searching from end of instruction table. */
const inst *instruction = &cr16_instruction[NUMOPCODES - 1];
/* Loop over instruction table until a full match is found. */
for ( ; i < NUMOPCODES; i++)
printf("void OP_%lX_%X (SIM_DESC, SIM_CPU *);\t\t/* %s */\n",
cr16_instruction[i].match, (32 - cr16_instruction[i].match_bits),
cr16_instruction[i].mnemonic);
}
2008-05-05 09:33:37 +00:00
/* write_template creates a file all required functions,
ready to be filled out. */
static void
2015-03-30 02:41:14 +00:00
write_template (void)
{
int i = 0,j, k, flags;
printf ("#include \"sim-main.h\"\n");
printf ("#include \"simops.h\"\n\n");
for ( ; i < NUMOPCODES; i++)
{
if (cr16_instruction[i].size != 0)
2008-05-05 09:33:37 +00:00
{
printf ("/* %s */\nvoid\nOP_%lX_%X (SIM_DESC sd, SIM_CPU *cpu)\n{\n",
cr16_instruction[i].mnemonic, cr16_instruction[i].match,
(32 - cr16_instruction[i].match_bits));
2008-05-05 09:33:37 +00:00
/* count operands. */
j = 0;
for (k=0;k<5;k++)
{
if (cr16_instruction[i].operands[k].op_type == dummy)
break;
else
j++;
2008-05-05 09:33:37 +00:00
}
switch (j)
{
case 0:
printf ("printf(\" %s\\n\");\n",cr16_instruction[i].mnemonic);
break;
case 1:
printf ("printf(\" %s\\t%%x\\n\",OP[0]);\n",cr16_instruction[i].mnemonic);
break;
case 2:
printf ("printf(\" %s\\t%%x,%%x\\n\",OP[0],OP[1]);\n",cr16_instruction[i].mnemonic);
break;
case 3:
printf ("printf(\" %s\\t%%x,%%x,%%x\\n\",OP[0],OP[1],OP[2]);\n",cr16_instruction[i].mnemonic);
break;
default:
fprintf (stderr,"Too many operands: %d\n",j);
}
printf ("}\n\n");
}
}
}
long Opcodes[512];
static int curop=0;
2015-03-30 02:41:14 +00:00
#if 0
static void
check_opcodes( long op)
{
int i;
for (i=0;i<curop;i++)
if (Opcodes[i] == op)
2015-03-30 02:41:14 +00:00
fprintf(stderr,"DUPLICATE OPCODES: %lx\n", op);
}
2015-03-30 02:41:14 +00:00
#endif
static void
2015-03-30 02:41:14 +00:00
write_opcodes (void)
{
int i = 0, j = 0, k;
2008-05-05 09:33:37 +00:00
/* write out opcode table. */
printf ("#include \"sim-main.h\"\n");
printf ("#include \"simops.h\"\n\n");
printf ("struct simops Simops[] = {\n");
2008-05-05 09:33:37 +00:00
for (i = NUMOPCODES-1; i >= 0; --i)
{
if (cr16_instruction[i].size != 0)
2008-05-05 09:33:37 +00:00
{
2015-03-30 02:41:14 +00:00
printf (" { \"%s\", %u, %d, %ld, %u, \"OP_%lX_%X\", OP_%lX_%X, ",
cr16_instruction[i].mnemonic, cr16_instruction[i].size,
cr16_instruction[i].match_bits, cr16_instruction[i].match,
cr16_instruction[i].flags, ((BIN(cr16_instruction[i].match, cr16_instruction[i].match_bits))>>(cr16_instruction[i].match_bits)),
2008-05-05 09:33:37 +00:00
(32 - cr16_instruction[i].match_bits),
((BIN(cr16_instruction[i].match, cr16_instruction[i].match_bits))>>(cr16_instruction[i].match_bits)), (32 - cr16_instruction[i].match_bits));
2008-05-05 09:33:37 +00:00
j = 0;
for (k=0;k<5;k++)
{
if (cr16_instruction[i].operands[k].op_type == dummy)
break;
else
j++;
}
2008-05-05 09:33:37 +00:00
printf ("%d, ",j);
j = 0;
for (k=0;k<4;k++)
{
int optype = cr16_instruction[i].operands[k].op_type;
int shift = cr16_instruction[i].operands[k].shift;
if (j == 0)
printf ("{");
else
printf (", ");
printf ("{");
printf ("%d,%d",optype, shift);
printf ("}");
j = 1;
}
if (j)
printf ("}");
printf ("},\n");
}
}
2015-03-30 02:41:14 +00:00
printf (" { \"NULL\",1,8,0,0,\"OP_0_20\",OP_0_20,0,{{0,0},{0,0},{0,0},{0,0}}},\n};\n");
}