aboutsummaryrefslogtreecommitdiff
path: root/gdb/remote-sp64sim.c
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/remote-sp64sim.c')
-rw-r--r--gdb/remote-sp64sim.c420
1 files changed, 420 insertions, 0 deletions
diff --git a/gdb/remote-sp64sim.c b/gdb/remote-sp64sim.c
new file mode 100644
index 0000000..2c15272
--- /dev/null
+++ b/gdb/remote-sp64sim.c
@@ -0,0 +1,420 @@
+/* Remote debugging interface for SPARC64 Simulator.
+ Copyright 1992 Free Software Foundation, Inc.
+ Contributed by Cygnus Support. Hacked from Steve Chamberlain's Z8000 work
+ by Doug Evans. (dje@cygnus.com).
+
+This file is part of GDB.
+
+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
+(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., 675 Mass Ave, Cambridge, MA 02139, USA. */
+
+#include "defs.h"
+#include "inferior.h"
+#include "wait.h"
+#include "value.h"
+#include <string.h>
+#include <ctype.h>
+#include <fcntl.h>
+#include <signal.h>
+#include <setjmp.h>
+#include <errno.h>
+#include "terminal.h"
+#include "target.h"
+#include "gdbcore.h"
+#include "sp64sim.h"
+
+/* Naming conventions:
+
+ simif_xxx are internal objects that describe top level interfaces to the
+ simulator (simif for SIMulator InterFace).
+
+ sim_xxx are external counterparts to the simif_xxx objects that must be
+ provided by the simulator. */
+
+/* Forward data declarations */
+extern struct target_ops simif_ops;
+
+int simif_verbose = 0; /* available to the simulator to use */
+
+static int program_loaded = 0;
+
+static void dump_mem ();
+
+static void
+simif_fetch_register (regno)
+int regno;
+{
+ if (regno == -1)
+ {
+ if (simif_verbose)
+ printf_filtered ("simif_fetch_register: %d\n", regno);
+ for (regno = 0; regno < 16; regno++)
+ simif_fetch_register (regno);
+ }
+ else
+ {
+ char buf[MAX_REGISTER_RAW_SIZE];
+
+ sim_fetch_register (regno, buf);
+ supply_register (regno, buf);
+ if (simif_verbose)
+ {
+ printf_filtered ("simif_fetch_register: %d", regno);
+ dump_mem (buf, sizeof (REGISTER_TYPE));
+ }
+ }
+}
+
+static void
+simif_store_register (regno)
+int regno;
+{
+ if (regno == -1)
+ {
+ if (simif_verbose)
+ printf_filtered ("simif_store_register: %d\n", regno);
+ for (regno = 0; regno < 16; regno++)
+ simif_store_register (regno);
+ }
+ else
+ {
+ char value[sizeof (REGISTER_TYPE)];
+
+ read_register_gen (regno, value);
+ SWAP_TARGET_AND_HOST (value, sizeof (REGISTER_TYPE));
+ sim_store_register (regno, value);
+ if (simif_verbose)
+ {
+ printf_filtered ("simif_store_register: %d", regno);
+ dump_mem (value, sizeof (REGISTER_TYPE));
+ }
+ }
+}
+
+static void
+simif_kill (arg,from_tty)
+char *arg;
+int from_tty;
+{
+ if (simif_verbose)
+ printf_filtered ("simif_kill: arg \"%s\"\n", arg);
+
+ sim_kill (); /* close fd's, remove mappings */
+ inferior_pid = 0;
+}
+
+/* Download a file specified in 'args', to the sim. */
+
+static void
+simif_load (args, fromtty)
+ char *args;
+ int fromtty;
+{
+ bfd *abfd;
+
+ if (simif_verbose)
+ printf_filtered ("simif_load: args \"%s\"\n", args);
+
+ inferior_pid = 0;
+ program_loaded = 0;
+ /* FIXME: a.out should be a config parm and/or an arg. */
+ abfd = bfd_openr (args,"a.out-sunos-big");
+
+ if (!abfd)
+ error ("Unable to open file %s.", args);
+
+ if (bfd_check_format (abfd, bfd_object) ==0)
+ error ("File is not an object file.");
+
+ if (sim_load (abfd, args) != 0)
+ return;
+
+ program_loaded = 1;
+
+ /* It is sim_load()'s job to set this. */
+ /*sim_set_pc (abfd->start_address); - can't do 'cus we use RMTVaddr */
+}
+
+/* This is called not only when we first attach, but also when the
+ user types "run" after having attached. */
+
+static void
+simif_create_inferior (exec_file, args, env)
+ char *exec_file;
+ char *args;
+ char **env;
+{
+ int len,entry_pt;
+ char *arg_buf,**argv;
+
+ if (! program_loaded)
+ error ("No program loaded.");
+
+ if (simif_verbose)
+ printf_filtered ("simif_create_inferior: exec_file \"%s\", args \"%s\"\n",
+ exec_file, args);
+
+ if (exec_file == 0 || exec_bfd == 0)
+ error ("No exec file specified.");
+
+ entry_pt = (int) bfd_get_start_address (exec_bfd);
+
+ simif_kill (NULL, NULL);
+ remove_breakpoints ();
+ init_wait_for_inferior ();
+
+ len = 5 + strlen (exec_file) + 1 + strlen (args) + 1 + /*slop*/ 10;
+ arg_buf = (char *) alloca (len);
+ arg_buf[0] = '\0';
+ strcat (arg_buf, exec_file);
+ strcat (arg_buf, " ");
+ strcat (arg_buf, args);
+ argv = buildargv (arg_buf);
+ make_cleanup (freeargv, (char *) argv);
+ sim_set_args (argv, env);
+
+ inferior_pid = 42;
+ insert_breakpoints (); /* Needed to get correct instruction in cache */
+ proceed (entry_pt, -1, 0);
+}
+
+/* Called when selecting the simulator. EG: (gdb) target sim name.
+ NAME unused at present. */
+
+static void
+simif_open (name, from_tty)
+ char *name;
+ int from_tty;
+{
+ if (simif_verbose)
+ printf_filtered ("simif_open: name \"%s\"\n", name);
+
+ if (sim_init (name) != 0)
+ {
+ error ("Unable to initialize simulator (insufficient memory?).");
+ return;
+ }
+
+ push_target (&simif_ops);
+ target_fetch_registers (-1);
+
+ printf_filtered ("Connected to the simulator.\n");
+}
+
+/* Close out all files and local state before this target loses control. */
+
+static void
+simif_close (quitting)
+ int quitting;
+{
+ if (simif_verbose)
+ printf_filtered ("simif_close: quitting %d\n", quitting);
+
+ program_loaded = 0;
+
+ /* FIXME: Need to call sim_close() to close all files and
+ delete all mappings. */
+}
+
+/* Terminate the open connection to the remote debugger.
+ Use this when you want to detach and do something else
+ with your gdb. */
+
+static void
+simif_detach (args,from_tty)
+ char *args;
+ int from_tty;
+{
+ if (simif_verbose)
+ printf_filtered ("simif_detach: args \"%s\"\n", args);
+
+ pop_target (); /* calls simif_close to do the real work */
+ if (from_tty)
+ printf_filtered ("Ending simulator %s debugging\n", target_shortname);
+}
+
+/* Tell the remote machine to resume. */
+/* FIXME: What are A and B? */
+
+static void
+simif_resume (a,b)
+{
+ if (simif_verbose)
+ printf_filtered ("simif_resume: %d/%d\n", a, b);
+
+ sim_resume (a, b);
+}
+
+/* Wait until the remote machine stops, then return,
+ storing status in STATUS just as `wait' would. */
+
+static int
+simif_wait (status)
+ WAITTYPE *status;
+{
+ if (simif_verbose)
+ printf_filtered ("simif_wait: ");
+#if 1
+ *status = sim_stop_signal ();
+#else
+ WSETSTOP (*status, sim_stop_signal ());
+#endif
+ if (simif_verbose)
+ printf_filtered ("status %d\n", *status);
+ return 0;
+}
+
+/* Get ready to modify the registers array. On machines which store
+ individual registers, this doesn't need to do anything. On machines
+ which store all the registers in one fell swoop, this makes sure
+ that registers contains all the registers from the program being
+ debugged. */
+
+static void
+simif_prepare_to_store ()
+{
+ /* Do nothing, since we can store individual regs */
+}
+
+static int
+simif_xfer_inferior_memory (memaddr, myaddr, len, write, target)
+ CORE_ADDR memaddr;
+ char *myaddr;
+ int len;
+ int write;
+ struct target_ops *target; /* ignored */
+{
+ if (simif_verbose)
+ {
+ printf_filtered ("simif_xfer_inferior_memory: myaddr 0x%x, memaddr 0x%x, len %d, write %d\n",
+ myaddr, memaddr, len, write);
+ if (simif_verbose && write)
+ dump_mem(myaddr, len);
+ }
+
+ if (! program_loaded)
+ error ("No program loaded.");
+
+ if (write)
+ {
+ len = sim_write (memaddr, myaddr, len);
+ }
+ else
+ {
+ len = sim_read (memaddr, myaddr, len);
+ if (simif_verbose && len > 0)
+ dump_mem(myaddr, len);
+ }
+ return len;
+}
+
+static void
+simif_files_info ()
+{
+ char *file = "nothing";
+
+ if (exec_bfd)
+ file = bfd_get_filename (exec_bfd);
+
+ if (simif_verbose)
+ printf_filtered ("simif_files_info: file \"%s\"\n", file);
+
+ if (exec_bfd)
+ printf_filtered ("\tAttached to %s running program %s\n",
+ target_shortname, file);
+}
+
+/* Clear the sims notion of what the break points are */
+static void
+simif_mourn ()
+{
+ if (simif_verbose)
+ printf_filtered ("simif_mourn:\n");
+
+ remove_breakpoints ();
+ generic_mourn_inferior ();
+}
+
+/* Define the target subroutine names */
+
+struct target_ops simif_ops =
+{
+ "sim", "SPARC64 Simulator",
+ "Use the SPARC64 Simulator",
+ simif_open, simif_close,
+ 0, simif_detach, simif_resume, simif_wait, /* attach */
+ simif_fetch_register, simif_store_register,
+ simif_prepare_to_store,
+ simif_xfer_inferior_memory,
+ simif_files_info,
+ 0, 0, /* Breakpoints */
+ 0, 0, 0, 0, 0, /* Terminal handling */
+ simif_kill, /* FIXME, kill */
+ simif_load,
+ 0, /* lookup_symbol */
+ simif_create_inferior, /* create_inferior */
+ simif_mourn, /* mourn_inferior FIXME */
+ 0, /* can_run */
+ 0, /* notice_signals */
+ process_stratum, 0, /* next */
+ 1, 1, 1, 1, 1, /* all mem, mem, stack, regs, exec */
+ 0, 0, /* Section pointers */
+ OPS_MAGIC, /* Always the last thing */
+};
+
+static void
+simif_snoop ()
+{
+ simif_verbose = ! simif_verbose;
+ if (simif_verbose)
+ printf_filtered ("Snoop enabled\n");
+ else
+ printf_filtered ("Snoop disabled\n");
+
+}
+
+/***********************************************************************/
+
+void
+_initialize_remote_sim ()
+{
+ add_target (&simif_ops);
+ add_com ("snoop", class_obscure, simif_snoop,
+ "Show what commands are going to the simulator");
+}
+
+static void
+dump_mem (buf, len)
+ char *buf;
+ int len;
+{
+ if (len <= 8)
+ {
+ if (len == 8 || len == 4)
+ {
+ long l[2];
+ memcpy (l, buf, len);
+ printf_filtered ("\t0x%x", l[0]);
+ printf_filtered (len == 8 ? " 0x%x\n" : "\n", l[1]);
+ }
+ else
+ {
+ int i;
+ printf_filtered ("\t");
+ for (i = 0; i < len; i++)
+ printf_filtered ("0x%x ", buf[i]);
+ printf_filtered ("\n");
+ }
+ }
+}