diff options
Diffstat (limited to 'contrib/gdb/gdb/ppc-bdm.c')
-rw-r--r-- | contrib/gdb/gdb/ppc-bdm.c | 387 |
1 files changed, 387 insertions, 0 deletions
diff --git a/contrib/gdb/gdb/ppc-bdm.c b/contrib/gdb/gdb/ppc-bdm.c new file mode 100644 index 0000000..e6b6adfd --- /dev/null +++ b/contrib/gdb/gdb/ppc-bdm.c @@ -0,0 +1,387 @@ +/* Remote target communications for the Macraigor Systems BDM Wiggler + talking to a Motorola PPC 8xx ADS board + Copyright 1996, 1997 Free Software Foundation, Inc. + +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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +#include "defs.h" +#include "gdbcore.h" +#include "gdb_string.h" +#include <fcntl.h> +#include "frame.h" +#include "inferior.h" +#include "bfd.h" +#include "symfile.h" +#include "target.h" +#include "wait.h" +#include "gdbcmd.h" +#include "objfiles.h" +#include "gdb-stabs.h" +#include <sys/types.h> +#include <signal.h> +#include "serial.h" +#include "ocd.h" + +static void bdm_ppc_open PARAMS ((char *name, int from_tty)); + +static int bdm_ppc_wait PARAMS ((int pid, + struct target_waitstatus *target_status)); + +static void bdm_ppc_fetch_registers PARAMS ((int regno)); + +static void bdm_ppc_store_registers PARAMS ((int regno)); + +extern struct target_ops bdm_ppc_ops; /* Forward decl */ + +/*#define BDM_NUM_REGS 71*/ +#define BDM_NUM_REGS 24 + +#define BDM_REGMAP \ + 2048, 2049, 2050, 2051, 2052, 2053, 2054, 2055, /* r0-r7 */ \ + 2056, 2057, 2058, 2059, 2060, 2061, 2062, 2063, /* r8-r15 */ \ + 2064, 2065, 2066, 2067, 2068, 2069, 2070, 2071, /* r16-r23 */ \ + 2072, 2073, 2074, 2075, 2076, 2077, 2078, 2079, /* r24-r31 */ \ +\ + 2080, 2082, 2084, 2086, 2088, 2090, 2092, 2094, /* fp0->fp8 */ \ + 2096, 2098, 2100, 2102, 2104, 2106, 2108, 2110, /* fp0->fp8 */ \ + 2112, 2114, 2116, 2118, 2120, 2122, 2124, 2126, /* fp0->fp8 */ \ + 2128, 2130, 2132, 2134, 2136, 2138, 2140, 2142, /* fp0->fp8 */ \ +\ + 26, /* pc (SRR0 (SPR 26)) */ \ + 2146, /* ps (MSR) */ \ + 2144, /* cnd (CR) */ \ + 8, /* lr (SPR 8) */ \ + 9, /* cnt (CTR (SPR 9)) */ \ + 1, /* xer (SPR 1) */ \ + 0, /* mq (SPR 0) */ + + +char nowatchdog[4] = {0xff,0xff,0xff,0x88}; + +/* Open a connection to a remote debugger. + NAME is the filename used for communication. */ + +static void +bdm_ppc_open (name, from_tty) + char *name; + int from_tty; +{ + CORE_ADDR watchdogaddr = 0xff000004; + + ocd_open (name, from_tty, OCD_TARGET_MOTO_PPC, &bdm_ppc_ops); + + /* We want interrupts to drop us into debugging mode. */ + /* Modify the DER register to accomplish this. */ + ocd_write_bdm_register (149, 0x20024000); + + /* Disable watchdog timer on the board */ + ocd_write_bytes (watchdogaddr, nowatchdog, 4); +} + +/* Wait until the remote machine stops, then return, + storing status in STATUS just as `wait' would. + Returns "pid" (though it's not clear what, if anything, that + means in the case of this target). */ + +static int +bdm_ppc_wait (pid, target_status) + int pid; + struct target_waitstatus *target_status; +{ + int stop_reason; + + target_status->kind = TARGET_WAITKIND_STOPPED; + + stop_reason = ocd_wait (); + + if (stop_reason) + { + target_status->value.sig = TARGET_SIGNAL_INT; + return inferior_pid; + } + + target_status->value.sig = TARGET_SIGNAL_TRAP; /* XXX for now */ + +#if 0 + { + unsigned long ecr, der; + + ecr = ocd_read_bdm_register (148); /* Read the exception cause register */ + der = ocd_read_bdm_register (149); /* Read the debug enables register */ + fprintf_unfiltered (gdb_stdout, "ecr = 0x%x, der = 0x%x\n", ecr, der); + } +#endif + + return inferior_pid; +} + +static int bdm_regmap[] = {BDM_REGMAP}; + +/* Read the remote registers into regs. + Fetch register REGNO, or all registers if REGNO == -1 + + The Wiggler uses the following codes to access the registers: + + 0 -> 1023 SPR 0 -> 1023 + 0 - SPR 0 - MQ + 1 - SPR 1 - XER + 8 - SPR 8 - LR + 9 - SPR 9 - CTR (known as cnt in GDB) + 26 - SPR 26 - SRR0 - pc + 1024 -> 2047 DCR 0 -> DCR 1023 (IBM PPC 4xx only) + 2048 -> 2079 R0 -> R31 + 2080 -> 2143 FP0 -> FP31 (64 bit regs) (IBM PPC 5xx only) + 2144 CR (known as cnd in GDB) + 2145 FPCSR + 2146 MSR (known as ps in GDB) + */ + +static void +bdm_ppc_fetch_registers (regno) + int regno; +{ + int i; + unsigned char *regs, *beginregs, *endregs, *almostregs; + unsigned char midregs[32]; + unsigned char mqreg[1]; + int first_regno, last_regno; + int first_bdm_regno, last_bdm_regno; + int reglen, beginreglen, endreglen; + +#if 1 + for (i = 0; i < (FPLAST_REGNUM - FP0_REGNUM + 1); i++) + { + midregs[i] = -1; + } + mqreg[0] = -1; +#endif + + if (regno == -1) + { + first_regno = 0; + last_regno = NUM_REGS - 1; + + first_bdm_regno = 0; + last_bdm_regno = BDM_NUM_REGS - 1; + } + else + { + first_regno = regno; + last_regno = regno; + + first_bdm_regno = bdm_regmap [regno]; + last_bdm_regno = bdm_regmap [regno]; + } + + if (first_bdm_regno == -1) + { + supply_register (first_regno, NULL); + return; /* Unsupported register */ + } + +#if 1 + /* Can't ask for floating point regs on ppc 8xx, also need to + avoid asking for the mq register. */ + if (first_regno == last_regno) /* only want one reg */ + { +/* printf("Asking for register %d\n", first_regno); */ + + /* if asking for an invalid register */ + if ((first_regno == MQ_REGNUM) || + ((first_regno >= FP0_REGNUM) && (first_regno <= FPLAST_REGNUM))) + { +/* printf("invalid reg request!\n"); */ + supply_register (first_regno, NULL); + return; /* Unsupported register */ + } + else + { + regs = ocd_read_bdm_registers (first_bdm_regno, + last_bdm_regno, ®len); + } + } + else /* want all regs */ + { +/* printf("Asking for registers %d to %d\n", first_regno, last_regno); */ + beginregs = ocd_read_bdm_registers (first_bdm_regno, + FP0_REGNUM - 1, &beginreglen); + endregs = (strcat (midregs, + ocd_read_bdm_registers (FPLAST_REGNUM + 1, + last_bdm_regno - 1, &endreglen))); + almostregs = (strcat (beginregs, endregs)); + regs = (strcat (almostregs, mqreg)); + reglen = beginreglen + 32 + endreglen + 1; + } + +#endif +#if 0 + regs = ocd_read_bdm_registers (first_bdm_regno, last_bdm_regno, ®len); +#endif + + for (i = first_regno; i <= last_regno; i++) + { + int bdm_regno, regoffset; + + bdm_regno = bdm_regmap [i]; + if (bdm_regno != -1) + { + regoffset = bdm_regno - first_bdm_regno; + + if (regoffset >= reglen / 4) + continue; + + supply_register (i, regs + 4 * regoffset); + } + else + supply_register (i, NULL); /* Unsupported register */ + } +} + +/* Store register REGNO, or all registers if REGNO == -1, from the contents + of REGISTERS. FIXME: ignores errors. */ + +static void +bdm_ppc_store_registers (regno) + int regno; +{ + int i; + int first_regno, last_regno; + int first_bdm_regno, last_bdm_regno; + + if (regno == -1) + { + first_regno = 0; + last_regno = NUM_REGS - 1; + + first_bdm_regno = 0; + last_bdm_regno = BDM_NUM_REGS - 1; + } + else + { + first_regno = regno; + last_regno = regno; + + first_bdm_regno = bdm_regmap [regno]; + last_bdm_regno = bdm_regmap [regno]; + } + + if (first_bdm_regno == -1) + return; /* Unsupported register */ + + for (i = first_regno; i <= last_regno; i++) + { + int bdm_regno; + + bdm_regno = bdm_regmap [i]; + + /* only attempt to write if it's a valid ppc 8xx register */ + /* (need to avoid FP regs and MQ reg) */ + if ((i != MQ_REGNUM) && ((i < FP0_REGNUM) || (i > FPLAST_REGNUM))) + { +/* printf("write valid reg %d\n", bdm_regno); */ + ocd_write_bdm_registers (bdm_regno, registers + REGISTER_BYTE (i), 4); + } +/* + else if (i == MQ_REGNUM) + printf("don't write invalid reg %d (MQ_REGNUM)\n", bdm_regno); + else + printf("don't write invalid reg %d\n", bdm_regno); +*/ + } +} + +/* Define the target subroutine names */ + +struct target_ops bdm_ppc_ops ; + +static void +init_bdm_ppc_ops(void) +{ + bdm_ppc_ops.to_shortname = "ocd"; + bdm_ppc_ops.to_longname = "Remote target with On-Chip Debugging"; + bdm_ppc_ops.to_doc = "Use a remote target with On-Chip Debugging. To use a target box;\n\ +specify the serial device it is connected to (e.g. /dev/ttya). To use\n\ +a wiggler, specify wiggler and then the port it is connected to\n\ +(e.g. wiggler lpt1)." ; /* to_doc */ + bdm_ppc_ops.to_open = bdm_ppc_open; + bdm_ppc_ops.to_close = ocd_close; + bdm_ppc_ops.to_attach = NULL; + bdm_ppc_ops.to_post_attach = NULL; + bdm_ppc_ops.to_require_attach = NULL; + bdm_ppc_ops.to_detach = ocd_detach; + bdm_ppc_ops.to_require_detach = NULL; + bdm_ppc_ops.to_resume = ocd_resume; + bdm_ppc_ops.to_wait = bdm_ppc_wait; + bdm_ppc_ops.to_post_wait = NULL; + bdm_ppc_ops.to_fetch_registers = bdm_ppc_fetch_registers; + bdm_ppc_ops.to_store_registers = bdm_ppc_store_registers; + bdm_ppc_ops.to_prepare_to_store = ocd_prepare_to_store; + bdm_ppc_ops.to_xfer_memory = ocd_xfer_memory; + bdm_ppc_ops.to_files_info = ocd_files_info; + bdm_ppc_ops.to_insert_breakpoint = ocd_insert_breakpoint; + bdm_ppc_ops.to_remove_breakpoint = ocd_remove_breakpoint; + bdm_ppc_ops.to_terminal_init = NULL; + bdm_ppc_ops.to_terminal_inferior = NULL; + bdm_ppc_ops.to_terminal_ours_for_output = NULL; + bdm_ppc_ops.to_terminal_ours = NULL; + bdm_ppc_ops.to_terminal_info = NULL; + bdm_ppc_ops.to_kill = ocd_kill; + bdm_ppc_ops.to_load = ocd_load; + bdm_ppc_ops.to_lookup_symbol = NULL; + bdm_ppc_ops.to_create_inferior = ocd_create_inferior; + bdm_ppc_ops.to_post_startup_inferior = NULL; + bdm_ppc_ops.to_acknowledge_created_inferior = NULL; + bdm_ppc_ops.to_clone_and_follow_inferior = NULL; + bdm_ppc_ops.to_post_follow_inferior_by_clone = NULL; + bdm_ppc_ops.to_insert_fork_catchpoint = NULL; + bdm_ppc_ops.to_remove_fork_catchpoint = NULL; + bdm_ppc_ops.to_insert_vfork_catchpoint = NULL; + bdm_ppc_ops.to_remove_vfork_catchpoint = NULL; + bdm_ppc_ops.to_has_forked = NULL; + bdm_ppc_ops.to_has_vforked = NULL; + bdm_ppc_ops.to_can_follow_vfork_prior_to_exec = NULL; + bdm_ppc_ops.to_post_follow_vfork = NULL; + bdm_ppc_ops.to_insert_exec_catchpoint = NULL; + bdm_ppc_ops.to_remove_exec_catchpoint = NULL; + bdm_ppc_ops.to_has_execd = NULL; + bdm_ppc_ops.to_reported_exec_events_per_exec_call = NULL; + bdm_ppc_ops.to_has_exited = NULL; + bdm_ppc_ops.to_mourn_inferior = ocd_mourn; + bdm_ppc_ops.to_can_run = 0; + bdm_ppc_ops.to_notice_signals = 0; + bdm_ppc_ops.to_thread_alive = ocd_thread_alive; + bdm_ppc_ops.to_stop = ocd_stop; + bdm_ppc_ops.to_pid_to_exec_file = NULL; + bdm_ppc_ops.to_core_file_to_sym_file = NULL; + bdm_ppc_ops.to_stratum = process_stratum; + bdm_ppc_ops.DONT_USE = NULL; + bdm_ppc_ops.to_has_all_memory = 1; + bdm_ppc_ops.to_has_memory = 1; + bdm_ppc_ops.to_has_stack = 1; + bdm_ppc_ops.to_has_registers = 1; + bdm_ppc_ops.to_has_execution = 1; + bdm_ppc_ops.to_sections = NULL; + bdm_ppc_ops.to_sections_end = NULL; + bdm_ppc_ops.to_magic = OPS_MAGIC ; +} /* init_bdm_ppc_ops */ + +void +_initialize_bdm_ppc () +{ + init_bdm_ppc_ops() ; + add_target (&bdm_ppc_ops); +} |