diff options
Diffstat (limited to 'contrib/gdb/gdb/ppc-bdm.c')
| -rw-r--r-- | contrib/gdb/gdb/ppc-bdm.c | 356 |
1 files changed, 356 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..2355b2c --- /dev/null +++ b/contrib/gdb/gdb/ppc-bdm.c @@ -0,0 +1,356 @@ +/* Remote target communications for the Macraigor Systems BDM Wiggler + talking to a Motorola PPC 8xx ADS board + Copyright 1996, 1997, 1998, 1999, 2000, 2001 + 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 "gdbcmd.h" +#include "objfiles.h" +#include "gdb-stabs.h" +#include <sys/types.h> +#include "serial.h" +#include "ocd.h" +#include "ppc-tdep.h" +#include "regcache.h" + +static void bdm_ppc_open (char *name, int from_tty); + +static ptid_t bdm_ppc_wait (ptid_t ptid, + struct target_waitstatus *target_status); + +static void bdm_ppc_fetch_registers (int regno); + +static void bdm_ppc_store_registers (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 (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 ptid_t +bdm_ppc_wait (ptid_t ptid, 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_ptid; + } + + 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_ptid; +} + +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 (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 == gdbarch_tdep (current_gdbarch)->ppc_mq_regnum) + || (first_regno == gdbarch_tdep (current_gdbarch)->ppc_fpscr_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 (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 != gdbarch_tdep (current_gdbarch)->ppc_mq_regnum) + && (i != gdbarch_tdep (current_gdbarch)->ppc_fpscr_regnum) + && ((i < FP0_REGNUM) || (i > FPLAST_REGNUM))) + { +/* printf("write valid reg %d\n", bdm_regno); */ + ocd_write_bdm_registers (bdm_regno, deprecated_registers + DEPRECATED_REGISTER_BYTE (i), 4); + } +/* + else if (i == gdbarch_tdep (current_gdbarch)->ppc_mq_regnum) + printf("don't write invalid reg %d (PPC_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_detach = ocd_detach; + bdm_ppc_ops.to_resume = ocd_resume; + bdm_ppc_ops.to_wait = bdm_ppc_wait; + 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_kill = ocd_kill; + bdm_ppc_ops.to_load = ocd_load; + bdm_ppc_ops.to_create_inferior = ocd_create_inferior; + bdm_ppc_ops.to_mourn_inferior = ocd_mourn; + bdm_ppc_ops.to_thread_alive = ocd_thread_alive; + bdm_ppc_ops.to_stop = ocd_stop; + bdm_ppc_ops.to_stratum = process_stratum; + 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_magic = OPS_MAGIC; +} /* init_bdm_ppc_ops */ + +extern initialize_file_ftype _initialize_bdm_ppc; /* -Wmissing-prototypes */ + +void +_initialize_bdm_ppc (void) +{ + init_bdm_ppc_ops (); + add_target (&bdm_ppc_ops); +} |
