Add org.gnu.gdb.i386.avx.

[deliverable/binutils-gdb.git] / sim / common / sim-engine.c

diff --git a/sim/common/sim-engine.c b/sim/common/sim-engine.c
index 46f69e5c78815a8b10f03dc3d7de93c7c746053e..38b98f70e1873848d0fce6e22722acc7031d18a1 100644 (file)
--- a/sim/common/sim-engine.c
+++ b/sim/common/sim-engine.c
@@ -1,28 +1,53 @@
 /* Generic simulator halt/restart.
-   Copyright (C) 1997 Free Software Foundation, Inc.
+   Copyright (C) 1997, 1998, 2007, 2008, 2009, 2010
+   Free Software Foundation, Inc.
    Contributed by Cygnus Support.
 
 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 2, or (at your option)
-any later version.
+the Free Software Foundation; either version 3 of the License, 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.
 
-You should have received a copy of the GNU General Public License along
-with this program; if not, write to the Free Software Foundation, Inc.,
-59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+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 <stdio.h>
 
 #include "sim-main.h"
+#include "sim-assert.h"
 
-#include <stdio.h>
-#include <signal.h>
+/* Get the run state.
+   REASON/SIGRC are the values returned by sim_stop_reason.
+   ??? Should each cpu have its own copy?  */
 
+void
+sim_engine_get_run_state (SIM_DESC sd, enum sim_stop *reason, int *sigrc)
+{
+  sim_engine *engine = STATE_ENGINE (sd);
+  ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
+  *reason = engine->reason;
+  *sigrc = engine->sigrc;
+}
+
+/* Set the run state to REASON/SIGRC.
+   REASON/SIGRC are the values returned by sim_stop_reason.
+   ??? Should each cpu have its own copy?  */
+
+void
+sim_engine_set_run_state (SIM_DESC sd, enum sim_stop reason, int sigrc)
+{
+  sim_engine *engine = STATE_ENGINE (sd);
+  ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
+  engine->reason = reason;
+  engine->sigrc = sigrc;
+}
 
 /* Generic halt */
 
@@ -35,6 +60,7 @@ sim_engine_halt (SIM_DESC sd,
                 int sigrc)
 {
   sim_engine *engine = STATE_ENGINE (sd);
+  ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
   if (engine->jmpbuf != NULL)
     {
       jmp_buf *halt_buf = engine->jmpbuf;
@@ -42,11 +68,21 @@ sim_engine_halt (SIM_DESC sd,
       engine->next_cpu = next_cpu;
       engine->reason = reason;
       engine->sigrc = sigrc;
+
       SIM_ENGINE_HALT_HOOK (sd, last_cpu, cia);
-      longjmp(*halt_buf, 1);
+
+#ifdef SIM_CPU_EXCEPTION_SUSPEND
+      if (last_cpu != NULL && reason != sim_exited)
+       SIM_CPU_EXCEPTION_SUSPEND (sd, last_cpu, sim_signal_to_host (sd, sigrc));
+#endif
+
+      longjmp (*halt_buf, sim_engine_halt_jmpval);
     }
   else
-    sim_io_error (sd, "sim_halt - bad long jump");
+    {
+      sim_io_error (sd, "sim_halt - bad long jump");
+      abort ();
+    }
 }
 
 
@@ -59,13 +95,14 @@ sim_engine_restart (SIM_DESC sd,
                    sim_cia cia)
 {
   sim_engine *engine = STATE_ENGINE (sd);
+  ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
   if (engine->jmpbuf != NULL)
     {
       jmp_buf *halt_buf = engine->jmpbuf;
       engine->last_cpu = last_cpu;
       engine->next_cpu = next_cpu;
       SIM_ENGINE_RESTART_HOOK (sd, last_cpu, cia);
-      longjmp(*halt_buf, 0);
+      longjmp (*halt_buf, sim_engine_restart_jmpval);
     }
   else
     sim_io_error (sd, "sim_restart - bad long jump");
@@ -75,41 +112,48 @@ sim_engine_restart (SIM_DESC sd,
 /* Generic error code */
 
 void
-sim_engine_abort (SIM_DESC sd,
-                 sim_cpu *cpu,
-                 sim_cia cia,
-                 const char *fmt,
-                 ...)
+sim_engine_vabort (SIM_DESC sd,
+                  sim_cpu *cpu,
+                  sim_cia cia,
+                  const char *fmt,
+                  va_list ap)
 {
+  ASSERT (sd == NULL || STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
   if (sd == NULL)
     {
-      va_list ap;
-      va_start(ap, fmt);
       vfprintf (stderr, fmt, ap);
-      va_end(ap);
       fprintf (stderr, "\nQuit\n");
       abort ();
     }
   else if (STATE_ENGINE (sd)->jmpbuf == NULL)
     {
-      va_list ap;
-      va_start(ap, fmt);
       sim_io_evprintf (sd, fmt, ap);
-      va_end(ap);
       sim_io_eprintf (sd, "\n");
       sim_io_error (sd, "Quit Simulator");
+      abort ();
     }
   else
     {
-      va_list ap;
-      va_start(ap, fmt);
       sim_io_evprintf (sd, fmt, ap);
-      va_end(ap);
       sim_io_eprintf (sd, "\n");
-      sim_engine_halt (sd, cpu, NULL, cia, sim_stopped, SIGABRT);
+      sim_engine_halt (sd, cpu, NULL, cia, sim_stopped, SIM_SIGABRT);
     }
 }
 
+void
+sim_engine_abort (SIM_DESC sd,
+                 sim_cpu *cpu,
+                 sim_cia cia,
+                 const char *fmt,
+                 ...)
+{
+  va_list ap;
+  ASSERT (sd == NULL || STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
+  va_start(ap, fmt);
+  sim_engine_vabort (sd, cpu, cia, fmt, ap);
+  va_end (ap);
+}
+
 
 /* Generic next/last cpu */
 
@@ -132,3 +176,39 @@ sim_engine_next_cpu_nr (SIM_DESC sd)
   else
     return sim_engine_last_cpu_nr (sd) + 1;
 }
+
+int
+sim_engine_nr_cpus (SIM_DESC sd)
+{
+  sim_engine *engine = STATE_ENGINE (sd);
+  return engine->nr_cpus;
+}
+
+
+
+
+/* Initialization */
+
+static SIM_RC
+sim_engine_init (SIM_DESC sd)
+{
+  /* initialize the start/stop/resume engine */
+  sim_engine *engine = STATE_ENGINE (sd);
+  engine->jmpbuf = NULL;
+  engine->last_cpu = NULL;
+  engine->next_cpu = NULL;
+  engine->nr_cpus = MAX_NR_PROCESSORS;
+  engine->reason = sim_running;
+  engine->sigrc = 0;
+  engine->stepper = NULL; /* sim_events_init will clean it up */
+  return SIM_RC_OK;
+}
+
+
+SIM_RC
+sim_engine_install (SIM_DESC sd)
+{
+  SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
+  sim_module_add_init_fn (sd, sim_engine_init);
+  return SIM_RC_OK;
+}