diff options
Diffstat (limited to 'gdb/remote-sp64sim.c')
| -rw-r--r-- | gdb/remote-sp64sim.c | 420 |
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"); + } + } +} |