* writecode.c (lookup_inst): Generate inverse table on-the-fly.
(z8k_inv_list): Delete global. (DIRTY_HACK): Delete macro. (makelist): Delete global. (main): Delete code making a list. Delete dirty hack code. Use lookup_inst instead of z8k_inv_list. * list.c: Delete file. * Makefile.in (writecode): Do not link in list.o. (list.o): Delete target.
This commit is contained in:
parent
be26fe0d93
commit
73fa0d3fb2
|
@ -1,3 +1,15 @@
|
||||||
|
2002-06-06 Andrew Cagney <ac131313@redhat.com>
|
||||||
|
|
||||||
|
* writecode.c (lookup_inst): Generate inverse table on-the-fly.
|
||||||
|
(z8k_inv_list): Delete global.
|
||||||
|
(DIRTY_HACK): Delete macro.
|
||||||
|
(makelist): Delete global.
|
||||||
|
(main): Delete code making a list. Delete dirty hack code. Use
|
||||||
|
lookup_inst instead of z8k_inv_list.
|
||||||
|
* list.c: Delete file.
|
||||||
|
* Makefile.in (writecode): Do not link in list.o.
|
||||||
|
(list.o): Delete target.
|
||||||
|
|
||||||
2002-04-29 Nick Clifton <nickc@cambridge.redhat.com>
|
2002-04-29 Nick Clifton <nickc@cambridge.redhat.com>
|
||||||
|
|
||||||
* writecode.c (lookup_inst): Ignore CLASS_IGNORE.
|
* writecode.c (lookup_inst): Ignore CLASS_IGNORE.
|
||||||
|
|
|
@ -49,15 +49,12 @@ tc-gen3.h:writecode
|
||||||
tc-genb3.h:writecode
|
tc-genb3.h:writecode
|
||||||
./writecode -b3 >tc-genb3.h
|
./writecode -b3 >tc-genb3.h
|
||||||
|
|
||||||
writecode: writecode.o list.o bquick.o
|
writecode: writecode.o bquick.o
|
||||||
$(CC_FOR_BUILD) -o writecode writecode.o list.o bquick.o
|
$(CC_FOR_BUILD) -o writecode writecode.o bquick.o
|
||||||
|
|
||||||
writecode.o: writecode.c $(CONFIG_H)
|
writecode.o: writecode.c $(CONFIG_H)
|
||||||
$(CC_FOR_BUILD) -c $(CFLAGS) $(HDEFINES) $(CSEARCH) $(CSWITCHES) $(srcdir)/writecode.c
|
$(CC_FOR_BUILD) -c $(CFLAGS) $(HDEFINES) $(CSEARCH) $(CSWITCHES) $(srcdir)/writecode.c
|
||||||
|
|
||||||
list.o: list.c
|
|
||||||
$(CC_FOR_BUILD) -c $(CFLAGS) $(HDEFINES) $(CSEARCH) $(CSWITCHES) $(srcdir)/list.c
|
|
||||||
|
|
||||||
# Two copies of quick.o are created. One for $build and one for $host.
|
# Two copies of quick.o are created. One for $build and one for $host.
|
||||||
bquick.o: quick.c
|
bquick.o: quick.c
|
||||||
$(CC_FOR_BUILD) -c $(CFLAGS) $(HDEFINES) $(CSEARCH) $(CSWITCHES) $(srcdir)/quick.c -o bquick.o
|
$(CC_FOR_BUILD) -c $(CFLAGS) $(HDEFINES) $(CSEARCH) $(CSWITCHES) $(srcdir)/quick.c -o bquick.o
|
||||||
|
|
11266
sim/z8k/list.c
11266
sim/z8k/list.c
File diff suppressed because it is too large
Load Diff
|
@ -1,6 +1,6 @@
|
||||||
|
|
||||||
/* generate instructions for Z8KSIM
|
/* generate instructions for Z8KSIM
|
||||||
Copyright (C) 1992, 1993 Free Software Foundation, Inc.
|
|
||||||
|
Copyright 1992, 1993, 2002 Free Software Foundation, Inc.
|
||||||
|
|
||||||
This file is part of Z8KSIM
|
This file is part of Z8KSIM
|
||||||
|
|
||||||
|
@ -35,9 +35,6 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||||
|
|
||||||
-b3 tc-genb3.h same as -3 but for long pointers
|
-b3 tc-genb3.h same as -3 but for long pointers
|
||||||
|
|
||||||
-m regenerates list.c, which is an inverted list of opcodes to
|
|
||||||
pointers into the z8k dissassemble opcode table, it's just there
|
|
||||||
to makes things faster.
|
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* steve chamberlain
|
/* steve chamberlain
|
||||||
|
@ -65,8 +62,6 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
||||||
|
|
||||||
#define NOPS 500
|
#define NOPS 500
|
||||||
|
|
||||||
#define DIRTY_HACK 0 /* Enable if your gcc can't cope with huge tables */
|
|
||||||
extern short z8k_inv_list[];
|
|
||||||
struct opcode_value
|
struct opcode_value
|
||||||
{
|
{
|
||||||
int n;
|
int n;
|
||||||
|
@ -84,7 +79,6 @@ static char *reg_names[] =
|
||||||
#define SIZE_ADDRESS (BIG ? 8 : 4) /* number of nibbles in a ptr*/
|
#define SIZE_ADDRESS (BIG ? 8 : 4) /* number of nibbles in a ptr*/
|
||||||
|
|
||||||
static int file;
|
static int file;
|
||||||
static int makelist;
|
|
||||||
|
|
||||||
static int nibs = 0;
|
static int nibs = 0;
|
||||||
|
|
||||||
|
@ -103,7 +97,16 @@ static opcode_entry_type *
|
||||||
lookup_inst (what)
|
lookup_inst (what)
|
||||||
int what;
|
int what;
|
||||||
{
|
{
|
||||||
if (makelist)
|
static short *z8k_inv_list = NULL;
|
||||||
|
const nr_z8k_inv_list_elements = 1 << 16;
|
||||||
|
if (z8k_inv_list == NULL)
|
||||||
|
{
|
||||||
|
/* Initialize the list to 0xff == -1 */
|
||||||
|
z8k_inv_list = calloc (nr_z8k_inv_list_elements, sizeof (short));
|
||||||
|
memset (z8k_inv_list, 0xff, nr_z8k_inv_list_elements * sizeof (short));
|
||||||
|
}
|
||||||
|
/* Entry empty? Fill it in. */
|
||||||
|
if (z8k_inv_list[what] == -1)
|
||||||
{
|
{
|
||||||
|
|
||||||
int nibl_index;
|
int nibl_index;
|
||||||
|
@ -121,6 +124,9 @@ lookup_inst (what)
|
||||||
instr_nibbles[1] = (what >> 8) & 0xf;
|
instr_nibbles[1] = (what >> 8) & 0xf;
|
||||||
instr_nibbles[0] = (what >> 12) & 0xf;
|
instr_nibbles[0] = (what >> 12) & 0xf;
|
||||||
|
|
||||||
|
/* Assume it won't be found. */
|
||||||
|
z8k_inv_list[what] = -2;
|
||||||
|
|
||||||
while (ptr->name)
|
while (ptr->name)
|
||||||
{
|
{
|
||||||
nibl_matched = 1;
|
nibl_matched = 1;
|
||||||
|
@ -181,19 +187,15 @@ lookup_inst (what)
|
||||||
}
|
}
|
||||||
if (nibl_matched)
|
if (nibl_matched)
|
||||||
{
|
{
|
||||||
return ptr;
|
z8k_inv_list[what] = ptr->idx;
|
||||||
|
break; /* while */
|
||||||
}
|
}
|
||||||
ptr++;
|
ptr++;
|
||||||
}
|
}
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
|
|
||||||
if (z8k_inv_list[what] < 0)
|
|
||||||
return 0;
|
|
||||||
return z8k_table + z8k_inv_list[what];
|
|
||||||
}
|
}
|
||||||
|
if (z8k_inv_list[what] >= 0)
|
||||||
|
return z8k_table + z8k_inv_list[what];
|
||||||
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
static char *
|
static char *
|
||||||
|
@ -1677,12 +1679,8 @@ main (ac, av)
|
||||||
int i;
|
int i;
|
||||||
int needcomma = 0;
|
int needcomma = 0;
|
||||||
|
|
||||||
makelist = 0;
|
|
||||||
|
|
||||||
for (i = 1; i < ac; i++)
|
for (i = 1; i < ac; i++)
|
||||||
{
|
{
|
||||||
if (strcmp (av[i], "-m") == 0)
|
|
||||||
makelist = 1;
|
|
||||||
if (strcmp (av[i], "-1") == 0)
|
if (strcmp (av[i], "-1") == 0)
|
||||||
file = 1;
|
file = 1;
|
||||||
if (strcmp (av[i], "-2") == 0)
|
if (strcmp (av[i], "-2") == 0)
|
||||||
|
@ -1696,52 +1694,6 @@ main (ac, av)
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
if (makelist)
|
|
||||||
{
|
|
||||||
|
|
||||||
int i;
|
|
||||||
needcomma = 0;
|
|
||||||
printf ("short int z8k_inv_list[] = {\n");
|
|
||||||
|
|
||||||
for (i = 0; i < 1 << 16; i++)
|
|
||||||
{
|
|
||||||
opcode_entry_type *p = lookup_inst (i);
|
|
||||||
|
|
||||||
if(needcomma)
|
|
||||||
printf(",");
|
|
||||||
if ((i & 0xf) == 0)
|
|
||||||
printf ("\n");
|
|
||||||
|
|
||||||
#if 0
|
|
||||||
printf ("\n /*%04x %s */", i, p ? p->nicename : "");
|
|
||||||
#endif
|
|
||||||
|
|
||||||
if (!p)
|
|
||||||
{
|
|
||||||
printf ("-1");
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
printf ("%d", p->idx);
|
|
||||||
}
|
|
||||||
|
|
||||||
if ((i & 0x3f) == 0 && DIRTY_HACK)
|
|
||||||
{
|
|
||||||
printf ("\n#ifdef __GNUC__\n");
|
|
||||||
printf ("};\n");
|
|
||||||
printf("short int int_list%d[] = {\n", i);
|
|
||||||
printf ("#else\n");
|
|
||||||
printf (",\n");
|
|
||||||
printf ("#endif\n");
|
|
||||||
needcomma = 0;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
needcomma = 1;
|
|
||||||
|
|
||||||
}
|
|
||||||
printf ("};\n");
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
|
|
||||||
/* First work out which opcodes use which bit patterns,
|
/* First work out which opcodes use which bit patterns,
|
||||||
build a list of all matching bit pattens */
|
build a list of all matching bit pattens */
|
||||||
|
@ -1776,9 +1728,7 @@ main (ac, av)
|
||||||
{
|
{
|
||||||
int t = quick[i];
|
int t = quick[i];
|
||||||
|
|
||||||
mangle (z8k_table + z8k_inv_list[t],
|
mangle (lookup_inst (t), 1, t);
|
||||||
1,
|
|
||||||
t);
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
if (file == 3)
|
if (file == 3)
|
||||||
|
@ -1809,16 +1759,6 @@ main (ac, av)
|
||||||
printf (",");
|
printf (",");
|
||||||
emit ("<fop>_%d\n", i);
|
emit ("<fop>_%d\n", i);
|
||||||
needcomma = 1;
|
needcomma = 1;
|
||||||
if ((i & 0x3f) == 0 && DIRTY_HACK)
|
|
||||||
{
|
|
||||||
printf ("#ifdef __GNUC__\n");
|
|
||||||
printf ("};\n");
|
|
||||||
emit ("int (*(<fop>_table%d[]))() = {\n", i);
|
|
||||||
printf ("#else\n");
|
|
||||||
printf (",\n");
|
|
||||||
printf ("#endif\n");
|
|
||||||
needcomma = 0;
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
emit ("};\n");
|
emit ("};\n");
|
||||||
}
|
}
|
||||||
|
@ -1854,8 +1794,7 @@ main (ac, av)
|
||||||
printf ("struct op_info op_info_table[] = {\n");
|
printf ("struct op_info op_info_table[] = {\n");
|
||||||
for (i = 0; i < 1 << 16; i++)
|
for (i = 0; i < 1 << 16; i++)
|
||||||
{
|
{
|
||||||
int inv = z8k_inv_list[i];
|
opcode_entry_type *p = lookup_inst (i);
|
||||||
opcode_entry_type *p = z8k_table + inv;
|
|
||||||
|
|
||||||
if (needcomma)
|
if (needcomma)
|
||||||
printf (",");
|
printf (",");
|
||||||
|
@ -1866,13 +1805,13 @@ main (ac, av)
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
#endif
|
#endif
|
||||||
if (inv >= 0)
|
if (p != NULL)
|
||||||
{
|
{
|
||||||
printf ("%d", inv);
|
printf ("%d", p->idx);
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
printf ("400");
|
printf ("400");
|
||||||
if (inv >= 0)
|
if (p != NULL)
|
||||||
{
|
{
|
||||||
printf (" /* %04x %s */\n", i, p->nicename);
|
printf (" /* %04x %s */\n", i, p->nicename);
|
||||||
}
|
}
|
||||||
|
@ -1881,17 +1820,6 @@ main (ac, av)
|
||||||
printf ("\n");
|
printf ("\n");
|
||||||
}
|
}
|
||||||
needcomma = 1;
|
needcomma = 1;
|
||||||
if ((i & 0x3f) == 0 && DIRTY_HACK)
|
|
||||||
{
|
|
||||||
printf ("#ifdef __GNUC__\n");
|
|
||||||
printf ("}; \n");
|
|
||||||
printf ("struct op_info op_info_table%d[] = {\n", i);
|
|
||||||
printf ("#else\n");
|
|
||||||
printf (",\n");
|
|
||||||
|
|
||||||
printf ("#endif\n");
|
|
||||||
needcomma = 0;
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
printf ("};\n");
|
printf ("};\n");
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue