From c906108c21474dfb4ed285bcc0ac6fe02cd400cc Mon Sep 17 00:00:00 2001
From: Stan Shebs <shebs@codesourcery.com>
Date: Fri, 16 Apr 1999 01:35:26 +0000
Subject: Initial creation of sourceware repository

---
 sim/mn10300/gencode.c | 163 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 163 insertions(+)
 create mode 100644 sim/mn10300/gencode.c

(limited to 'sim/mn10300/gencode.c')

diff --git a/sim/mn10300/gencode.c b/sim/mn10300/gencode.c
new file mode 100644
index 0000000..bef312c
--- /dev/null
+++ b/sim/mn10300/gencode.c
@@ -0,0 +1,163 @@
+#include "mn10300_sim.h"
+
+static void write_header PARAMS ((void));
+static void write_opcodes PARAMS ((void));
+static void write_template PARAMS ((void));
+
+long Opcodes[512];
+static int curop=0;
+
+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 mn10300_opcode *opcode;
+
+  for (opcode = (struct mn10300_opcode *)mn10300_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 mn10300_opcode *opcode;
+  int i,j;
+
+  printf ("#include \"mn10300_sim.h\"\n");
+  printf ("#include \"simops.h\"\n");
+
+  for (opcode = (struct mn10300_opcode *)mn10300_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 = mn10300_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 mn10300_opcode *opcode;
+  int i, j;
+  int numops;
+  
+  /* write out opcode table */
+  printf ("#include \"mn10300_sim.h\"\n");
+  printf ("#include \"simops.h\"\n\n");
+  printf ("struct simops Simops[] = {\n");
+  
+  for (opcode = (struct mn10300_opcode *)mn10300_opcodes; opcode->name; opcode++)
+    {
+      int size;
+
+      if (opcode->format == FMT_S0)
+	size = 1;
+      else if (opcode->format == FMT_S1
+               || opcode->format == FMT_D0)
+	size = 2;
+      else if (opcode->format == FMT_S2
+               || opcode->format == FMT_D1)
+	size = 3;
+      else if (opcode->format == FMT_S4)
+	size = 5;
+      else if (opcode->format == FMT_D2)
+	size = 4;
+      else if (opcode->format == FMT_D4)
+	size = 6;
+      else
+	size = 7;
+
+      printf ("  { 0x%x,0x%x,OP_%X,%d,%d,",
+	      opcode->opcode, opcode->mask, opcode->opcode,
+	      size, opcode->format);
+      
+      Opcodes[curop++] = opcode->opcode;
+
+      /* count operands */
+      j = 0;
+      for (i = 0; i < 6; i++)
+	{
+	  int flags = mn10300_operands[opcode->operands[i]].flags;
+
+	  if (flags)
+	    j++;
+	}
+      printf ("%d,{",j);
+	  
+      j = 0;
+      numops = 0;
+      for (i = 0; i < 6; i++)
+	{
+	  int flags = mn10300_operands[opcode->operands[i]].flags;
+	  int shift = mn10300_operands[opcode->operands[i]].shift;
+
+	  if (flags)
+	    {
+	      if (j)
+		printf (", ");
+	      printf ("%d,%d,%d", shift,
+		      mn10300_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");
+}
-- 
cgit v1.1