215 lines
5.0 KiB
C
215 lines
5.0 KiB
C
/* Generic simulator halt/restart.
|
|
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 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, see <http://www.gnu.org/licenses/>. */
|
|
|
|
#include <stdio.h>
|
|
|
|
#include "sim-main.h"
|
|
#include "sim-assert.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 */
|
|
|
|
void
|
|
sim_engine_halt (SIM_DESC sd,
|
|
sim_cpu *last_cpu,
|
|
sim_cpu *next_cpu, /* NULL - use default */
|
|
sim_cia cia,
|
|
enum sim_stop reason,
|
|
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;
|
|
engine->last_cpu = last_cpu;
|
|
engine->next_cpu = next_cpu;
|
|
engine->reason = reason;
|
|
engine->sigrc = sigrc;
|
|
|
|
SIM_ENGINE_HALT_HOOK (sd, last_cpu, cia);
|
|
|
|
#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");
|
|
abort ();
|
|
}
|
|
}
|
|
|
|
|
|
/* Generic restart */
|
|
|
|
void
|
|
sim_engine_restart (SIM_DESC sd,
|
|
sim_cpu *last_cpu,
|
|
sim_cpu *next_cpu,
|
|
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, sim_engine_restart_jmpval);
|
|
}
|
|
else
|
|
sim_io_error (sd, "sim_restart - bad long jump");
|
|
}
|
|
|
|
|
|
/* Generic error code */
|
|
|
|
void
|
|
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)
|
|
{
|
|
vfprintf (stderr, fmt, ap);
|
|
fprintf (stderr, "\nQuit\n");
|
|
abort ();
|
|
}
|
|
else if (STATE_ENGINE (sd)->jmpbuf == NULL)
|
|
{
|
|
sim_io_evprintf (sd, fmt, ap);
|
|
sim_io_eprintf (sd, "\n");
|
|
sim_io_error (sd, "Quit Simulator");
|
|
abort ();
|
|
}
|
|
else
|
|
{
|
|
sim_io_evprintf (sd, fmt, ap);
|
|
sim_io_eprintf (sd, "\n");
|
|
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 */
|
|
|
|
int
|
|
sim_engine_last_cpu_nr (SIM_DESC sd)
|
|
{
|
|
sim_engine *engine = STATE_ENGINE (sd);
|
|
if (engine->last_cpu != NULL)
|
|
return engine->last_cpu - STATE_CPU (sd, 0);
|
|
else
|
|
return MAX_NR_PROCESSORS;
|
|
}
|
|
|
|
int
|
|
sim_engine_next_cpu_nr (SIM_DESC sd)
|
|
{
|
|
sim_engine *engine = STATE_ENGINE (sd);
|
|
if (engine->next_cpu != NULL)
|
|
return engine->next_cpu - STATE_CPU (sd, 0);
|
|
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;
|
|
}
|