7 #include <linux/ctype.h>
9 #include <bedbug/type.h>
10 #include <bedbug/bedbug.h>
11 #include <bedbug/regs.h>
12 #include <bedbug/ppc.h>
14 DECLARE_GLOBAL_DATA_PTR
;
17 #define MAX(a,b) ((a) > (b) ? (a) : (b))
20 extern void show_regs
__P ((struct pt_regs
*));
21 extern int run_command
__P ((const char *, int));
22 extern char console_buffer
[];
24 ulong dis_last_addr
= 0; /* Last address disassembled */
25 ulong dis_last_len
= 20; /* Default disassembler length */
26 CPU_DEBUG_CTX bug_ctx
; /* Bedbug context structure */
29 /* ======================================================================
30 * U-Boot's puts function does not append a newline, so the bedbug stuff
31 * will use this for the output of the dis/assembler.
32 * ====================================================================== */
34 int bedbug_puts (const char *str
)
36 /* -------------------------------------------------- */
38 printf ("%s\r\n", str
);
44 /* ======================================================================
45 * Initialize the bug_ctx structure used by the bedbug debugger. This is
46 * specific to the CPU since each has different debug registers and
48 * ====================================================================== */
50 void bedbug_init (void)
52 /* -------------------------------------------------- */
54 #if defined(CONFIG_4xx)
55 void bedbug405_init (void);
58 #elif defined(CONFIG_8xx)
59 void bedbug860_init (void);
64 #if defined(CONFIG_MPC824X) || defined(CONFIG_MPC8260)
65 /* Processors that are 603e core based */
66 void bedbug603e_init (void);
76 /* ======================================================================
77 * Entry point from the interpreter to the disassembler. Repeated calls
78 * will resume from the last disassembled address.
79 * ====================================================================== */
80 int do_bedbug_dis (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
82 ulong addr
; /* Address to start disassembly from */
83 ulong len
; /* # of instructions to disassemble */
85 /* -------------------------------------------------- */
87 /* Setup to go from the last address if none is given */
92 printf ("Usage:\n%s\n", cmdtp
->usage
);
96 if ((flag
& CMD_FLAG_REPEAT
) == 0) {
98 addr
= simple_strtoul (argv
[1], NULL
, 16);
100 /* If an extra param is given then it is the length */
102 len
= simple_strtoul (argv
[2], NULL
, 16);
105 /* Run the disassembler */
106 disppc ((unsigned char *) addr
, 0, len
, bedbug_puts
, F_RADHEX
);
108 dis_last_addr
= addr
+ (len
* 4);
111 } /* do_bedbug_dis */
113 U_BOOT_CMD (ds
, 3, 1, do_bedbug_dis
,
114 "ds - disassemble memory\n",
115 "ds <address> [# instructions]\n");
117 /* ======================================================================
118 * Entry point from the interpreter to the assembler. Assembles
119 * instructions in consecutive memory locations until a '.' (period) is
120 * entered on a line by itself.
121 * ====================================================================== */
122 int do_bedbug_asm (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
124 long mem_addr
; /* Address to assemble into */
125 unsigned long instr
; /* Machine code for text */
126 char prompt
[15]; /* Prompt string for user input */
127 int asm_err
; /* Error code from the assembler */
129 /* -------------------------------------------------- */
133 printf ("Usage:\n%s\n", cmdtp
->usage
);
137 printf ("\nEnter '.' when done\n");
138 mem_addr
= simple_strtoul (argv
[1], NULL
, 16);
142 disppc ((unsigned char *) mem_addr
, 0, 1, bedbug_puts
,
145 sprintf (prompt
, "%08lx: ", mem_addr
);
148 if (console_buffer
[0] && strcmp (console_buffer
, ".")) {
150 asmppc (mem_addr
, console_buffer
,
152 *(unsigned long *) mem_addr
= instr
;
155 printf ("*** Error: %s ***\n",
156 asm_error_str (asm_err
));
164 } /* do_bedbug_asm */
166 U_BOOT_CMD (as
, 2, 0, do_bedbug_asm
,
167 "as - assemble memory\n", "as <address>\n");
169 /* ======================================================================
170 * Used to set a break point from the interpreter. Simply calls into the
171 * CPU-specific break point set routine.
172 * ====================================================================== */
174 int do_bedbug_break (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
176 /* -------------------------------------------------- */
177 if (bug_ctx
.do_break
)
178 (*bug_ctx
.do_break
) (cmdtp
, flag
, argc
, argv
);
181 } /* do_bedbug_break */
183 U_BOOT_CMD (break, 3, 0, do_bedbug_break
,
184 "break - set or clear a breakpoint\n",
185 " - Set or clear a breakpoint\n"
186 "break <address> - Break at an address\n"
187 "break off <bp#> - Disable breakpoint.\n"
188 "break show - List breakpoints.\n");
190 /* ======================================================================
191 * Called from the debug interrupt routine. Simply calls the CPU-specific
192 * breakpoint handling routine.
193 * ====================================================================== */
195 void do_bedbug_breakpoint (struct pt_regs
*regs
)
197 /* -------------------------------------------------- */
199 if (bug_ctx
.break_isr
)
200 (*bug_ctx
.break_isr
) (regs
);
203 } /* do_bedbug_breakpoint */
207 /* ======================================================================
208 * Called from the CPU-specific breakpoint handling routine. Enter a
209 * mini main loop until the stopped flag is cleared from the breakpoint
212 * This handles the parts of the debugger that are common to all CPU's.
213 * ====================================================================== */
215 void bedbug_main_loop (unsigned long addr
, struct pt_regs
*regs
)
217 int len
; /* Length of command line */
218 int flag
; /* Command flags */
219 int rc
= 0; /* Result from run_command */
220 char prompt_str
[20]; /* Prompt string */
221 static char lastcommand
[CFG_CBSIZE
] = { 0 }; /* previous command */
222 /* -------------------------------------------------- */
225 (*bug_ctx
.clear
) (bug_ctx
.current_bp
);
227 printf ("Breakpoint %d: ", bug_ctx
.current_bp
);
228 disppc ((unsigned char *) addr
, 0, 1, bedbug_puts
, F_RADHEX
);
233 sprintf (prompt_str
, "BEDBUG.%d =>", bug_ctx
.current_bp
);
235 /* A miniature main loop */
236 while (bug_ctx
.stopped
) {
237 len
= readline (prompt_str
);
239 flag
= 0; /* assume no special flags for now */
242 strcpy (lastcommand
, console_buffer
);
244 flag
|= CMD_FLAG_REPEAT
;
247 printf ("<INTERRUPT>\n");
249 rc
= run_command (lastcommand
, flag
);
252 /* invalid command or not repeatable, forget it */
258 bug_ctx
.current_bp
= 0;
261 } /* bedbug_main_loop */
265 /* ======================================================================
266 * Interpreter command to continue from a breakpoint. Just clears the
267 * stopped flag in the context so that the breakpoint routine will
269 * ====================================================================== */
270 int do_bedbug_continue (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
272 /* -------------------------------------------------- */
274 if (!bug_ctx
.stopped
) {
275 printf ("Not at a breakpoint\n");
281 } /* do_bedbug_continue */
283 U_BOOT_CMD (continue, 1, 0, do_bedbug_continue
,
284 "continue- continue from a breakpoint\n",
285 " - continue from a breakpoint.\n");
287 /* ======================================================================
288 * Interpreter command to continue to the next instruction, stepping into
289 * subroutines. Works by calling the find_next_addr() routine to compute
290 * the address passes control to the CPU-specific set breakpoint routine
291 * for the current breakpoint number.
292 * ====================================================================== */
293 int do_bedbug_step (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
295 unsigned long addr
; /* Address to stop at */
297 /* -------------------------------------------------- */
299 if (!bug_ctx
.stopped
) {
300 printf ("Not at a breakpoint\n");
304 if (!find_next_address ((unsigned char *) &addr
, FALSE
, bug_ctx
.regs
))
308 (*bug_ctx
.set
) (bug_ctx
.current_bp
, addr
);
312 } /* do_bedbug_step */
314 U_BOOT_CMD (step
, 1, 1, do_bedbug_step
,
315 "step - single step execution.\n",
316 " - single step execution.\n");
318 /* ======================================================================
319 * Interpreter command to continue to the next instruction, stepping over
320 * subroutines. Works by calling the find_next_addr() routine to compute
321 * the address passes control to the CPU-specific set breakpoint routine
322 * for the current breakpoint number.
323 * ====================================================================== */
324 int do_bedbug_next (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
326 unsigned long addr
; /* Address to stop at */
328 /* -------------------------------------------------- */
330 if (!bug_ctx
.stopped
) {
331 printf ("Not at a breakpoint\n");
335 if (!find_next_address ((unsigned char *) &addr
, TRUE
, bug_ctx
.regs
))
339 (*bug_ctx
.set
) (bug_ctx
.current_bp
, addr
);
343 } /* do_bedbug_next */
345 U_BOOT_CMD (next
, 1, 1, do_bedbug_next
,
346 "next - single step execution, stepping over subroutines.\n",
347 " - single step execution, stepping over subroutines.\n");
349 /* ======================================================================
350 * Interpreter command to print the current stack. This assumes an EABI
351 * architecture, so it starts with GPR R1 and works back up the stack.
352 * ====================================================================== */
353 int do_bedbug_stack (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
355 unsigned long sp
; /* Stack pointer */
356 unsigned long func
; /* LR from stack */
357 int depth
; /* Stack iteration level */
358 int skip
= 1; /* Flag to skip the first entry */
359 unsigned long top
; /* Top of memory address */
361 /* -------------------------------------------------- */
363 if (!bug_ctx
.stopped
) {
364 printf ("Not at a breakpoint\n");
368 top
= gd
->bd
->bi_memstart
+ gd
->bd
->bi_memsize
;
371 printf ("Depth PC\n");
372 printf ("----- --------\n");
373 printf ("%5d %08lx\n", depth
++, bug_ctx
.regs
->nip
);
375 sp
= bug_ctx
.regs
->gpr
[1];
376 func
= *(unsigned long *) (sp
+ 4);
378 while ((func
< top
) && (sp
< top
)) {
380 printf ("%5d %08lx\n", depth
++, func
);
384 sp
= *(unsigned long *) sp
;
385 func
= *(unsigned long *) (sp
+ 4);
388 } /* do_bedbug_stack */
390 U_BOOT_CMD (where
, 1, 1, do_bedbug_stack
,
391 "where - Print the running stack.\n",
392 " - Print the running stack.\n");
394 /* ======================================================================
395 * Interpreter command to dump the registers. Calls the CPU-specific
396 * show registers routine.
397 * ====================================================================== */
398 int do_bedbug_rdump (cmd_tbl_t
* cmdtp
, int flag
, int argc
, char *argv
[])
400 /* -------------------------------------------------- */
402 if (!bug_ctx
.stopped
) {
403 printf ("Not at a breakpoint\n");
407 show_regs (bug_ctx
.regs
);
409 } /* do_bedbug_rdump */
411 U_BOOT_CMD (rdump
, 1, 1, do_bedbug_rdump
,
412 "rdump - Show registers.\n", " - Show registers.\n");
413 /* ====================================================================== */
417 * Copyright (c) 2001 William L. Pitts
418 * All rights reserved.
420 * Redistribution and use in source and binary forms are freely
421 * permitted provided that the above copyright notice and this
422 * paragraph and the following disclaimer are duplicated in all
425 * This software is provided "AS IS" and without any express or
426 * implied warranties, including, without limitation, the implied
427 * warranties of merchantability and fitness for a particular