1 /* Remote target communications for the Macraigor Systems BDM Wiggler
2 talking to a Motorola PPC 8xx ADS board
3 Copyright 1996, 1997 Free Software Foundation, Inc.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
24 #include "gdb_string.h"
34 #include "gdb-stabs.h"
35 #include <sys/types.h>
40 static void bdm_ppc_open (char *name
, int from_tty
);
42 static int bdm_ppc_wait (int pid
, struct target_waitstatus
*target_status
);
44 static void bdm_ppc_fetch_registers (int regno
);
46 static void bdm_ppc_store_registers (int regno
);
48 extern struct target_ops bdm_ppc_ops
; /* Forward decl */
50 /*#define BDM_NUM_REGS 71 */
51 #define BDM_NUM_REGS 24
54 2048, 2049, 2050, 2051, 2052, 2053, 2054, 2055, /* r0-r7 */ \
55 2056, 2057, 2058, 2059, 2060, 2061, 2062, 2063, /* r8-r15 */ \
56 2064, 2065, 2066, 2067, 2068, 2069, 2070, 2071, /* r16-r23 */ \
57 2072, 2073, 2074, 2075, 2076, 2077, 2078, 2079, /* r24-r31 */ \
59 2080, 2082, 2084, 2086, 2088, 2090, 2092, 2094, /* fp0->fp8 */ \
60 2096, 2098, 2100, 2102, 2104, 2106, 2108, 2110, /* fp0->fp8 */ \
61 2112, 2114, 2116, 2118, 2120, 2122, 2124, 2126, /* fp0->fp8 */ \
62 2128, 2130, 2132, 2134, 2136, 2138, 2140, 2142, /* fp0->fp8 */ \
64 26, /* pc (SRR0 (SPR 26)) */ \
65 2146, /* ps (MSR) */ \
66 2144, /* cnd (CR) */ \
68 9, /* cnt (CTR (SPR 9)) */ \
69 1, /* xer (SPR 1) */ \
74 {0xff, 0xff, 0xff, 0x88};
76 /* Open a connection to a remote debugger.
77 NAME is the filename used for communication. */
80 bdm_ppc_open (char *name
, int from_tty
)
82 CORE_ADDR watchdogaddr
= 0xff000004;
84 ocd_open (name
, from_tty
, OCD_TARGET_MOTO_PPC
, &bdm_ppc_ops
);
86 /* We want interrupts to drop us into debugging mode. */
87 /* Modify the DER register to accomplish this. */
88 ocd_write_bdm_register (149, 0x20024000);
90 /* Disable watchdog timer on the board */
91 ocd_write_bytes (watchdogaddr
, nowatchdog
, 4);
94 /* Wait until the remote machine stops, then return,
95 storing status in STATUS just as `wait' would.
96 Returns "pid" (though it's not clear what, if anything, that
97 means in the case of this target). */
100 bdm_ppc_wait (int pid
, struct target_waitstatus
*target_status
)
104 target_status
->kind
= TARGET_WAITKIND_STOPPED
;
106 stop_reason
= ocd_wait ();
110 target_status
->value
.sig
= TARGET_SIGNAL_INT
;
114 target_status
->value
.sig
= TARGET_SIGNAL_TRAP
; /* XXX for now */
118 unsigned long ecr
, der
;
120 ecr
= ocd_read_bdm_register (148); /* Read the exception cause register */
121 der
= ocd_read_bdm_register (149); /* Read the debug enables register */
122 fprintf_unfiltered (gdb_stdout
, "ecr = 0x%x, der = 0x%x\n", ecr
, der
);
129 static int bdm_regmap
[] =
132 /* Read the remote registers into regs.
133 Fetch register REGNO, or all registers if REGNO == -1
135 The Wiggler uses the following codes to access the registers:
137 0 -> 1023 SPR 0 -> 1023
141 9 - SPR 9 - CTR (known as cnt in GDB)
142 26 - SPR 26 - SRR0 - pc
143 1024 -> 2047 DCR 0 -> DCR 1023 (IBM PPC 4xx only)
144 2048 -> 2079 R0 -> R31
145 2080 -> 2143 FP0 -> FP31 (64 bit regs) (IBM PPC 5xx only)
146 2144 CR (known as cnd in GDB)
148 2146 MSR (known as ps in GDB)
152 bdm_ppc_fetch_registers (int regno
)
155 unsigned char *regs
, *beginregs
, *endregs
, *almostregs
;
156 unsigned char midregs
[32];
157 unsigned char mqreg
[1];
158 int first_regno
, last_regno
;
159 int first_bdm_regno
, last_bdm_regno
;
160 int reglen
, beginreglen
, endreglen
;
163 for (i
= 0; i
< (FPLAST_REGNUM
- FP0_REGNUM
+ 1); i
++)
173 last_regno
= NUM_REGS
- 1;
176 last_bdm_regno
= BDM_NUM_REGS
- 1;
183 first_bdm_regno
= bdm_regmap
[regno
];
184 last_bdm_regno
= bdm_regmap
[regno
];
187 if (first_bdm_regno
== -1)
189 supply_register (first_regno
, NULL
);
190 return; /* Unsupported register */
194 /* Can't ask for floating point regs on ppc 8xx, also need to
195 avoid asking for the mq register. */
196 if (first_regno
== last_regno
) /* only want one reg */
198 /* printf("Asking for register %d\n", first_regno); */
200 /* if asking for an invalid register */
201 if ((first_regno
== MQ_REGNUM
) ||
202 ((first_regno
>= FP0_REGNUM
) && (first_regno
<= FPLAST_REGNUM
)))
204 /* printf("invalid reg request!\n"); */
205 supply_register (first_regno
, NULL
);
206 return; /* Unsupported register */
210 regs
= ocd_read_bdm_registers (first_bdm_regno
,
211 last_bdm_regno
, ®len
);
217 /* printf("Asking for registers %d to %d\n", first_regno, last_regno); */
218 beginregs
= ocd_read_bdm_registers (first_bdm_regno
,
219 FP0_REGNUM
- 1, &beginreglen
);
220 endregs
= (strcat (midregs
,
221 ocd_read_bdm_registers (FPLAST_REGNUM
+ 1,
222 last_bdm_regno
- 1, &endreglen
)));
223 almostregs
= (strcat (beginregs
, endregs
));
224 regs
= (strcat (almostregs
, mqreg
));
225 reglen
= beginreglen
+ 32 + endreglen
+ 1;
230 regs
= ocd_read_bdm_registers (first_bdm_regno
, last_bdm_regno
, ®len
);
233 for (i
= first_regno
; i
<= last_regno
; i
++)
235 int bdm_regno
, regoffset
;
237 bdm_regno
= bdm_regmap
[i
];
240 regoffset
= bdm_regno
- first_bdm_regno
;
242 if (regoffset
>= reglen
/ 4)
245 supply_register (i
, regs
+ 4 * regoffset
);
248 supply_register (i
, NULL
); /* Unsupported register */
252 /* Store register REGNO, or all registers if REGNO == -1, from the contents
253 of REGISTERS. FIXME: ignores errors. */
256 bdm_ppc_store_registers (int regno
)
259 int first_regno
, last_regno
;
260 int first_bdm_regno
, last_bdm_regno
;
265 last_regno
= NUM_REGS
- 1;
268 last_bdm_regno
= BDM_NUM_REGS
- 1;
275 first_bdm_regno
= bdm_regmap
[regno
];
276 last_bdm_regno
= bdm_regmap
[regno
];
279 if (first_bdm_regno
== -1)
280 return; /* Unsupported register */
282 for (i
= first_regno
; i
<= last_regno
; i
++)
286 bdm_regno
= bdm_regmap
[i
];
288 /* only attempt to write if it's a valid ppc 8xx register */
289 /* (need to avoid FP regs and MQ reg) */
290 if ((i
!= MQ_REGNUM
) && ((i
< FP0_REGNUM
) || (i
> FPLAST_REGNUM
)))
292 /* printf("write valid reg %d\n", bdm_regno); */
293 ocd_write_bdm_registers (bdm_regno
, registers
+ REGISTER_BYTE (i
), 4);
296 else if (i == MQ_REGNUM)
297 printf("don't write invalid reg %d (MQ_REGNUM)\n", bdm_regno);
299 printf("don't write invalid reg %d\n", bdm_regno);
304 /* Define the target subroutine names */
306 struct target_ops bdm_ppc_ops
;
309 init_bdm_ppc_ops (void)
311 bdm_ppc_ops
.to_shortname
= "ocd";
312 bdm_ppc_ops
.to_longname
= "Remote target with On-Chip Debugging";
313 bdm_ppc_ops
.to_doc
= "Use a remote target with On-Chip Debugging. To use a target box;\n\
314 specify the serial device it is connected to (e.g. /dev/ttya). To use\n\
315 a wiggler, specify wiggler and then the port it is connected to\n\
316 (e.g. wiggler lpt1)."; /* to_doc */
317 bdm_ppc_ops
.to_open
= bdm_ppc_open
;
318 bdm_ppc_ops
.to_close
= ocd_close
;
319 bdm_ppc_ops
.to_attach
= NULL
;
320 bdm_ppc_ops
.to_post_attach
= NULL
;
321 bdm_ppc_ops
.to_require_attach
= NULL
;
322 bdm_ppc_ops
.to_detach
= ocd_detach
;
323 bdm_ppc_ops
.to_require_detach
= NULL
;
324 bdm_ppc_ops
.to_resume
= ocd_resume
;
325 bdm_ppc_ops
.to_wait
= bdm_ppc_wait
;
326 bdm_ppc_ops
.to_post_wait
= NULL
;
327 bdm_ppc_ops
.to_fetch_registers
= bdm_ppc_fetch_registers
;
328 bdm_ppc_ops
.to_store_registers
= bdm_ppc_store_registers
;
329 bdm_ppc_ops
.to_prepare_to_store
= ocd_prepare_to_store
;
330 bdm_ppc_ops
.to_xfer_memory
= ocd_xfer_memory
;
331 bdm_ppc_ops
.to_files_info
= ocd_files_info
;
332 bdm_ppc_ops
.to_insert_breakpoint
= ocd_insert_breakpoint
;
333 bdm_ppc_ops
.to_remove_breakpoint
= ocd_remove_breakpoint
;
334 bdm_ppc_ops
.to_terminal_init
= NULL
;
335 bdm_ppc_ops
.to_terminal_inferior
= NULL
;
336 bdm_ppc_ops
.to_terminal_ours_for_output
= NULL
;
337 bdm_ppc_ops
.to_terminal_ours
= NULL
;
338 bdm_ppc_ops
.to_terminal_info
= NULL
;
339 bdm_ppc_ops
.to_kill
= ocd_kill
;
340 bdm_ppc_ops
.to_load
= ocd_load
;
341 bdm_ppc_ops
.to_lookup_symbol
= NULL
;
342 bdm_ppc_ops
.to_create_inferior
= ocd_create_inferior
;
343 bdm_ppc_ops
.to_post_startup_inferior
= NULL
;
344 bdm_ppc_ops
.to_acknowledge_created_inferior
= NULL
;
345 bdm_ppc_ops
.to_clone_and_follow_inferior
= NULL
;
346 bdm_ppc_ops
.to_post_follow_inferior_by_clone
= NULL
;
347 bdm_ppc_ops
.to_insert_fork_catchpoint
= NULL
;
348 bdm_ppc_ops
.to_remove_fork_catchpoint
= NULL
;
349 bdm_ppc_ops
.to_insert_vfork_catchpoint
= NULL
;
350 bdm_ppc_ops
.to_remove_vfork_catchpoint
= NULL
;
351 bdm_ppc_ops
.to_has_forked
= NULL
;
352 bdm_ppc_ops
.to_has_vforked
= NULL
;
353 bdm_ppc_ops
.to_can_follow_vfork_prior_to_exec
= NULL
;
354 bdm_ppc_ops
.to_post_follow_vfork
= NULL
;
355 bdm_ppc_ops
.to_insert_exec_catchpoint
= NULL
;
356 bdm_ppc_ops
.to_remove_exec_catchpoint
= NULL
;
357 bdm_ppc_ops
.to_has_execd
= NULL
;
358 bdm_ppc_ops
.to_reported_exec_events_per_exec_call
= NULL
;
359 bdm_ppc_ops
.to_has_exited
= NULL
;
360 bdm_ppc_ops
.to_mourn_inferior
= ocd_mourn
;
361 bdm_ppc_ops
.to_can_run
= 0;
362 bdm_ppc_ops
.to_notice_signals
= 0;
363 bdm_ppc_ops
.to_thread_alive
= ocd_thread_alive
;
364 bdm_ppc_ops
.to_stop
= ocd_stop
;
365 bdm_ppc_ops
.to_pid_to_exec_file
= NULL
;
366 bdm_ppc_ops
.to_core_file_to_sym_file
= NULL
;
367 bdm_ppc_ops
.to_stratum
= process_stratum
;
368 bdm_ppc_ops
.DONT_USE
= NULL
;
369 bdm_ppc_ops
.to_has_all_memory
= 1;
370 bdm_ppc_ops
.to_has_memory
= 1;
371 bdm_ppc_ops
.to_has_stack
= 1;
372 bdm_ppc_ops
.to_has_registers
= 1;
373 bdm_ppc_ops
.to_has_execution
= 1;
374 bdm_ppc_ops
.to_sections
= NULL
;
375 bdm_ppc_ops
.to_sections_end
= NULL
;
376 bdm_ppc_ops
.to_magic
= OPS_MAGIC
;
377 } /* init_bdm_ppc_ops */
380 _initialize_bdm_ppc (void)
383 add_target (&bdm_ppc_ops
);