New simulator.

1 files changed, 161 insertions, 0 deletions

diff --git a/sim/m68hc11/emulos.c b/sim/m68hc11/emulos.c
new file mode 100644
index 0000000..bb9f27b
--- /dev/null
+++ b/sim/m68hc11/emulos.c
@@ -0,0 +1,161 @@
+/* emulos.c -- Small OS emulation
+   Copyright 1999, 2000 Free Software Foundation, Inc.
+   Written by Stephane Carrez (stcarrez@worldnet.fr)
+
+This file is part of GDB, GAS, and the GNU binutils.
+
+GDB, GAS, and the GNU binutils are free software; you can redistribute
+them and/or modify them under the terms of the GNU General Public
+License as published by the Free Software Foundation; either version
+1, or (at your option) any later version.
+
+GDB, GAS, and the GNU binutils are distributed in the hope that they
+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.
+
+You should have received a copy of the GNU General Public License
+along with this file; see the file COPYING.  If not, write to the Free
+Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+
+#include "sim-main.h"
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+
+#ifndef WIN32
+#include <sys/types.h>
+#include <sys/time.h>
+
+/* This file emulates some OS system calls.
+   It's basically used to give access to the host OS facilities
+   like: stdin, stdout, files, time of day.  */
+static int bench_mode = -1;
+static struct timeval bench_start;
+static struct timeval bench_stop;
+
+void
+emul_bench (struct _sim_cpu* cpu)
+{
+  int op;
+
+  op = cpu_get_d (cpu);
+  switch (op)
+    {
+    case 0:
+      bench_mode = 0;
+      gettimeofday (&bench_start, 0);
+      break;
+
+    case 1:
+      gettimeofday (&bench_stop, 0);
+      if (bench_mode != 0)
+        printf ("bench start not called...\n");
+      bench_mode = 1;
+      break;
+
+    case 2:
+      {
+        int sz = 0;
+        int addr = cpu_get_x (cpu);
+        double t_start, t_stop, t;
+        char buf[1024];
+
+        op = cpu_get_y (cpu);
+        t_start = (double) (bench_start.tv_sec) * 1.0e6;
+        t_start += (double) (bench_start.tv_usec);
+        t_stop  = (double) (bench_stop.tv_sec) * 1.0e6;
+        t_stop  += (double) (bench_stop.tv_usec);
+        
+        while (sz < 1024)
+          {
+            buf[sz] = memory_read8 (cpu, addr);
+            if (buf[sz] == 0)
+              break;
+
+            sz ++;
+            addr++;
+          }
+        buf[1023] = 0;
+
+        if (bench_mode != 1)
+          printf ("bench_stop not called");
+
+        bench_mode = -1;
+        t = t_stop - t_start;
+        printf ("%-40.40s [%6d] %3.3f us\n", buf,
+                op, t / (double) (op));
+        break;
+      }
+    }
+}
+#endif
+
+void
+emul_write(struct _sim_cpu* state)
+{
+  int addr = cpu_get_x (state) & 0x0FFFF;
+  int size = cpu_get_d (state) & 0x0FFFF;
+
+  if (addr + size > 0x0FFFF) {
+    size = 0x0FFFF - addr;
+  }
+  state->cpu_running = 0;
+  while (size)
+    {
+      uint8 val = memory_read8 (state, addr);
+        
+      write(0, &val, 1);
+      addr ++;
+      size--;
+    }
+}
+
+/* emul_exit () is used by the default startup code of GCC to implement
+   the exit ().  For a real target, this will create an ILLEGAL fault.
+   But doing an exit () on a real target is really a non-sense.
+   exit () is important for the validation of GCC.  The exit status
+   is passed in 'D' register.  */
+void
+emul_exit (sim_cpu *cpu)
+{
+  sim_engine_halt (CPU_STATE (cpu), cpu,
+		   NULL, NULL_CIA, sim_exited,
+		   cpu_get_d (cpu));
+}
+
+void
+emul_os (int code, sim_cpu *proc)
+{
+  proc->cpu_current_cycle = 8;
+  switch (code)
+    {
+    case 0x0:
+      break;
+
+      /* 0xCD 0x01 */
+    case 0x01:
+      emul_write (proc);
+      break;
+
+      /* 0xCD 0x02 */
+    case 0x02:
+      break;
+
+      /* 0xCD 0x03 */
+    case 0x03:
+      emul_exit (proc);
+      break;
+
+      /* 0xCD 0x04 */
+    case 0x04:
+#ifndef WIN32
+      emul_bench (proc);
+#endif
+      break;
+        
+    default:
+      break;
+    }
+}
+