/* This file is part of the program psim.
- Copyright (C) 1994-1995, Andrew Cagney <cagney@highland.com.au>
+ Copyright 1994, 1995, 1996, 1998, 2003 Andrew Cagney
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 of the License, or
+ 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,
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.
+ along with this program; if not, see <http://www.gnu.org/licenses/>.
*/
#include <signal.h> /* FIXME - should be machine dependant version */
#include <stdarg.h>
-#include <stdlib.h>
-#include <string.h>
#include <ctype.h>
-#include "basics.h"
#include "psim.h"
+#include "options.h"
-#include "../../gdb/defs.h"
+#undef printf_filtered /* blow away the mapping */
-#include "devices.h"
-
-#include "../../gdb/remote-sim.h"
-#include "../../gdb/callback.h"
+#ifdef HAVE_STDLIB_H
+#include <stdlib.h>
+#endif
+#ifdef HAVE_STRING_H
+#include <string.h>
+#else
+#ifdef HAVE_STRINGS_H
+#include <strings.h>
+#endif
+#endif
+
+#include "libiberty.h"
+#include "bfd.h"
+#include "gdb/callback.h"
+#include "gdb/remote-sim.h"
+#include "gdb/signals.h"
+
+/* Define the rate at which the simulator should poll the host
+ for a quit. */
+#ifndef POLL_QUIT_INTERVAL
+#define POLL_QUIT_INTERVAL 0x20
+#endif
+
+static int poll_quit_count = POLL_QUIT_INTERVAL;
/* Structures used by the simulator, for gdb just have static structures */
-static psim *simulator;
-static char *register_names[] = REGISTER_NAMES;
-static int print_info = 0;
+psim *simulator;
+static device *root_device;
+static host_callback *callbacks;
-void
-sim_open (char *args)
+SIM_DESC
+sim_open (SIM_OPEN_KIND kind,
+ host_callback *callback,
+ struct bfd *abfd,
+ char * const *argv)
{
- int i;
+ callbacks = callback;
+ /* Note: The simulation is not created by sim_open() because
+ complete information is not yet available */
/* trace the call */
- TRACE(trace_gdb, ("sim_open(args=%s) called\n", args ? args : "(null)"));
-
- if (args) {
- char **argv = buildargv(args);
- int argp = 0;
- int argc;
- for (argc = 0; argv[argc]; argc++);
-
- while (argp < argc) {
- if (*argv[argp] != '-')
- error ("Argument is not an option '%s'", argv[argp]);
-
- else {
- /* check arguments -- note, main.c also contains argument processing
- code for the standalone emulator. */
- char *p = argv[argp] + 1;
- while (*p != '\0') {
- switch (*p) {
- default:
- printf_filtered("Usage:\n\ttarget sim [ -t <trace-option> ]\n");
- trace_usage();
- error ("");
- break;
- case 't':
- argp += 1;
- if (argv[argp] == NULL)
- error("Missing <trace> option for -t\n");
- trace_option(argv[argp]); /* better fail if NULL */
- break;
- case 'I':
- print_info = 1;
- break;
- }
- }
- }
- argp += 1;
- }
- }
+ TRACE(trace_gdb, ("sim_open called\n"));
+
+ if (root_device != NULL)
+ sim_io_printf_filtered("Warning - re-open of simulator leaks memory\n");
+ root_device = psim_tree();
+ simulator = NULL;
+
+ if (psim_options (root_device, argv + 1, kind) == NULL)
+ return NULL;
+
+ if (ppc_trace[trace_opts])
+ print_options ();
- /* do something */
- TRACE(trace_tbd, ("sim_open() - TBD - should parse the arguments\n"));
- TRACE(trace_tbd, ("sim_open() - TBD - can not create simulator here as do not have description of it\n"));
+ /* fudge our descriptor for now */
+ return (SIM_DESC) 1;
}
void
-sim_close (int quitting)
+sim_close (SIM_DESC sd, int quitting)
{
TRACE(trace_gdb, ("sim_close(quitting=%d) called\n", quitting));
- if (print_info)
- psim_print_info (simulator, 1);
-
- /* nothing to do */
+ if (ppc_trace[trace_print_info] && simulator != NULL)
+ psim_print_info (simulator, ppc_trace[trace_print_info]);
}
-int
-sim_load (char *prog, int from_tty)
+SIM_RC
+sim_load (SIM_DESC sd, const char *prog, bfd *abfd, int from_tty)
{
- char **argv;
TRACE(trace_gdb, ("sim_load(prog=%s, from_tty=%d) called\n",
prog, from_tty));
ASSERT(prog != NULL);
- /* parse the arguments, assume that the file is argument 0 */
- argv = buildargv(prog);
- ASSERT(argv != NULL && argv[0] != NULL);
-
/* create the simulator */
TRACE(trace_gdb, ("sim_load() - first time, create the simulator\n"));
- simulator = psim_create(argv[0]);
+ simulator = psim_create(prog, root_device);
/* bring in all the data section */
psim_init(simulator);
- /* release the arguments */
- freeargv(argv);
-
- /* `I did it my way' */
- return 0;
-}
-
+ /* get the start address */
+ if (abfd == NULL)
+ {
+ abfd = bfd_openr (prog, 0);
+ if (abfd == NULL)
+ error ("psim: can't open \"%s\": %s\n",
+ prog, bfd_errmsg (bfd_get_error ()));
+ if (!bfd_check_format (abfd, bfd_object))
+ {
+ const char *errmsg = bfd_errmsg (bfd_get_error ());
+ bfd_close (abfd);
+ error ("psim: \"%s\" is not an object file: %s\n",
+ prog, errmsg);
+ }
+ bfd_close (abfd);
+ }
-void
-sim_kill (void)
-{
- TRACE(trace_gdb, ("sim_kill(void) called\n"));
- /* do nothing, nothing to do */
+ return SIM_RC_OK;
}
int
-sim_read (SIM_ADDR mem, unsigned char *buf, int length)
+sim_read (SIM_DESC sd, SIM_ADDR mem, unsigned char *buf, int length)
{
int result = psim_read_memory(simulator, MAX_NR_PROCESSORS,
buf, mem, length);
- TRACE(trace_gdb, ("sim_read(mem=0x%x, buf=0x%x, length=%d) = %d\n",
- mem, buf, length, result));
+ TRACE(trace_gdb, ("sim_read(mem=0x%lx, buf=0x%lx, length=%d) = %d\n",
+ (long)mem, (long)buf, length, result));
return result;
}
int
-sim_write (SIM_ADDR mem, unsigned char *buf, int length)
+sim_write (SIM_DESC sd, SIM_ADDR mem, const unsigned char *buf, int length)
{
int result = psim_write_memory(simulator, MAX_NR_PROCESSORS,
buf, mem, length,
1/*violate_ro*/);
- TRACE(trace_gdb, ("sim_write(mem=0x%x, buf=0x%x, length=%d) = %d\n",
- mem, buf, length, result));
+ TRACE(trace_gdb, ("sim_write(mem=0x%lx, buf=0x%lx, length=%d) = %d\n",
+ (long)mem, (long)buf, length, result));
return result;
}
-
-void
-sim_fetch_register (int regno, unsigned char *buf)
-{
- if (simulator == NULL) {
- return;
- }
- TRACE(trace_gdb, ("sim_fetch_register(regno=%d(%s), buf=0x%x)\n",
- regno, register_names[regno], buf));
- psim_read_register(simulator, MAX_NR_PROCESSORS,
- buf, register_names[regno],
- raw_transfer);
-}
-
-
-void
-sim_store_register (int regno, unsigned char *buf)
-{
- if (simulator == NULL)
- return;
- TRACE(trace_gdb, ("sim_store_register(regno=%d(%s), buf=0x%x)\n",
- regno, register_names[regno], buf));
- psim_write_register(simulator, MAX_NR_PROCESSORS,
- buf, register_names[regno],
- raw_transfer);
-}
-
-
void
-sim_info (int verbose)
+sim_info (SIM_DESC sd, int verbose)
{
TRACE(trace_gdb, ("sim_info(verbose=%d) called\n", verbose));
psim_print_info (simulator, verbose);
}
-void
-sim_create_inferior (SIM_ADDR start_address, char **argv, char **envp)
+SIM_RC
+sim_create_inferior (SIM_DESC sd,
+ struct bfd *abfd,
+ char * const *argv,
+ char * const *envp)
{
- unsigned_word entry_point = start_address;
-
+ unsigned_word entry_point;
TRACE(trace_gdb, ("sim_create_inferior(start_address=0x%x, ...)\n",
- start_address));
+ entry_point));
+
+ if (simulator == NULL)
+ error ("No program loaded");
+
+ if (abfd != NULL)
+ entry_point = bfd_get_start_address (abfd);
+ else
+ entry_point = 0xfff00000; /* ??? */
psim_init(simulator);
psim_stack(simulator, argv, envp);
- psim_write_register(simulator, -1 /* all start at same PC */,
- &entry_point, "pc", cooked_transfer);
+ ASSERT (psim_write_register(simulator, -1 /* all start at same PC */,
+ &entry_point, "pc", cooked_transfer) > 0);
+ return SIM_RC_OK;
}
-static volatile int sim_should_run;
-
void
-sim_stop_reason (enum sim_stop *reason, int *sigrc)
+sim_stop_reason (SIM_DESC sd, enum sim_stop *reason, int *sigrc)
{
psim_status status = psim_get_status(simulator);
- switch (CURRENT_ENVIRONMENT) {
-
- case USER_ENVIRONMENT:
- case VIRTUAL_ENVIRONMENT:
- switch (status.reason) {
- case was_continuing:
- *reason = sim_stopped;
- *sigrc = SIGTRAP;
- if (sim_should_run) {
- error("sim_stop_reason() unknown reason for halt\n");
- }
- break;
- case was_trap:
- *reason = sim_stopped;
- *sigrc = SIGTRAP;
- break;
- case was_exited:
- *reason = sim_exited;
- *sigrc = 0;
- break;
- case was_signalled:
- *reason = sim_signalled;
+ switch (status.reason) {
+ case was_continuing:
+ *reason = sim_stopped;
+ if (status.signal == 0)
+ *sigrc = GDB_SIGNAL_TRAP;
+ else
*sigrc = status.signal;
- break;
- }
break;
-
- case OPERATING_ENVIRONMENT:
+ case was_trap:
*reason = sim_stopped;
- *sigrc = SIGTRAP;
+ *sigrc = GDB_SIGNAL_TRAP;
+ break;
+ case was_exited:
+ *reason = sim_exited;
+ *sigrc = status.signal;
+ break;
+ case was_signalled:
+ *reason = sim_signalled;
+ *sigrc = status.signal;
break;
-
- default:
- error("sim_stop_reason() - unknown environment\n");
-
}
- TRACE(trace_gdb, ("sim_stop_reason(reason=0x%x(%d), sigrc=0x%x(%d))\n",
- reason, *reason, sigrc, *sigrc));
+ TRACE(trace_gdb, ("sim_stop_reason(reason=0x%lx(%ld), sigrc=0x%lx(%ld))\n",
+ (long)reason, (long)*reason, (long)sigrc, (long)*sigrc));
}
/* Run (or resume) the program. */
-static void
-sim_ctrl_c()
+
+int
+sim_stop (SIM_DESC sd)
{
- sim_should_run = 0;
+ psim_stop (simulator);
+ return 1;
}
void
-sim_resume (int step, int siggnal)
+sim_resume (SIM_DESC sd, int step, int siggnal)
{
- void (*prev) ();
- unsigned_word program_counter;
-
TRACE(trace_gdb, ("sim_resume(step=%d, siggnal=%d)\n",
step, siggnal));
- prev = signal(SIGINT, sim_ctrl_c);
- sim_should_run = 1;
-
if (step)
- psim_step(simulator);
+ {
+ psim_step (simulator);
+ }
else
- psim_run_until_stop(simulator, &sim_should_run);
+ {
+ psim_run (simulator);
+ }
+}
- signal(SIGINT, prev);
+void
+sim_do_command (SIM_DESC sd, const char *cmd)
+{
+ TRACE(trace_gdb, ("sim_do_commands(cmd=%s) called\n",
+ cmd ? cmd : "(null)"));
+ if (cmd != NULL) {
+ char **argv = buildargv(cmd);
+ psim_command(root_device, argv);
+ freeargv(argv);
+ }
+}
+
+char **
+sim_complete_command (SIM_DESC sd, const char *text, const char *word)
+{
+ return NULL;
}
+/* Polling, if required */
+
void
-sim_do_command(char *cmd)
+sim_io_poll_quit (void)
{
- TRACE(trace_gdb, ("sim_do_commands(cmd=%s) called\n", cmd));
+ if (callbacks->poll_quit != NULL && poll_quit_count-- < 0)
+ {
+ poll_quit_count = POLL_QUIT_INTERVAL;
+ if (callbacks->poll_quit (callbacks))
+ psim_stop (simulator);
+ }
+}
+
+
+
+/* Map simulator IO operations onto the corresponding GDB I/O
+ functions.
+
+ NB: Only a limited subset of operations are mapped across. More
+ advanced operations (such as dup or write) must either be mapped to
+ one of the below calls or handled internally */
+
+int
+sim_io_read_stdin(char *buf,
+ int sizeof_buf)
+{
+ switch (CURRENT_STDIO) {
+ case DO_USE_STDIO:
+ return callbacks->read_stdin(callbacks, buf, sizeof_buf);
+ break;
+ case DONT_USE_STDIO:
+ return callbacks->read(callbacks, 0, buf, sizeof_buf);
+ break;
+ default:
+ error("sim_io_read_stdin: unaccounted switch\n");
+ break;
+ }
+ return 0;
+}
+
+int
+sim_io_write_stdout(const char *buf,
+ int sizeof_buf)
+{
+ switch (CURRENT_STDIO) {
+ case DO_USE_STDIO:
+ return callbacks->write_stdout(callbacks, buf, sizeof_buf);
+ break;
+ case DONT_USE_STDIO:
+ return callbacks->write(callbacks, 1, buf, sizeof_buf);
+ break;
+ default:
+ error("sim_io_write_stdout: unaccounted switch\n");
+ break;
+ }
+ return 0;
+}
+
+int
+sim_io_write_stderr(const char *buf,
+ int sizeof_buf)
+{
+ switch (CURRENT_STDIO) {
+ case DO_USE_STDIO:
+ /* NB: I think there should be an explicit write_stderr callback */
+ return callbacks->write(callbacks, 3, buf, sizeof_buf);
+ break;
+ case DONT_USE_STDIO:
+ return callbacks->write(callbacks, 3, buf, sizeof_buf);
+ break;
+ default:
+ error("sim_io_write_stderr: unaccounted switch\n");
+ break;
+ }
+ return 0;
+}
+
+
+void
+sim_io_printf_filtered(const char *fmt,
+ ...)
+{
+ char message[1024];
+ va_list ap;
+ /* format the message */
+ va_start(ap, fmt);
+ vsprintf(message, fmt, ap);
+ va_end(ap);
+ /* sanity check */
+ if (strlen(message) >= sizeof(message))
+ error("sim_io_printf_filtered: buffer overflow\n");
+ callbacks->printf_filtered(callbacks, "%s", message);
+}
+
+void
+sim_io_flush_stdoutput(void)
+{
+ switch (CURRENT_STDIO) {
+ case DO_USE_STDIO:
+ callbacks->flush_stdout (callbacks);
+ break;
+ case DONT_USE_STDIO:
+ break;
+ default:
+ error("sim_io_read_stdin: unaccounted switch\n");
+ break;
+ }
}
void
-sim_set_callbacks (host_callback *callback)
+sim_io_error (SIM_DESC sd, const char *fmt, ...)
{
- TRACE(trace_gdb, ("sim_set_callbacks called\n"));
+ va_list ap;
+ va_start(ap, fmt);
+ callbacks->evprintf_filtered (callbacks, fmt, ap);
+ va_end(ap);
+ callbacks->error (callbacks, "");
}
/****/
void *memory = (void*)xmalloc(size);
if (memory == NULL)
error("xmalloc failed\n");
- bzero(memory, size);
+ memset(memory, 0, size);
return memory;
}
-
-void zfree(void *data)
-{
- mfree(NULL, data);
-}
projects / deliverable / binutils-gdb.git / blobdiff