7 #include <linux/ctype.h>
10 #include <cmd_bedbug.h>
11 #include <bedbug/bedbug.h>
12 #include <bedbug/regs.h>
13 #include <bedbug/ppc.h>
16 #if (CONFIG_COMMANDS & CFG_CMD_BEDBUG)
19 #define MAX(a,b) ((a) > (b) ? (a) : (b))
22 extern void show_regs __P((struct pt_regs*));
23 extern int run_command __P((const char*, int));
24 extern char console_buffer[];
26 ulong dis_last_addr = 0; /* Last address disassembled */
27 ulong dis_last_len = 20; /* Default disassembler length */
28 CPU_DEBUG_CTX bug_ctx; /* Bedbug context structure */
31 /* ======================================================================
32 * U-Boot's puts function does not append a newline, so the bedbug stuff
33 * will use this for the output of the dis/assembler.
34 * ====================================================================== */
36 int bedbug_puts(const char *str)
38 /* -------------------------------------------------- */
40 printf( "%s\r\n", str );
46 /* ======================================================================
47 * Initialize the bug_ctx structure used by the bedbug debugger. This is
48 * specific to the CPU since each has different debug registers and
50 * ====================================================================== */
52 void bedbug_init( void )
54 /* -------------------------------------------------- */
56 #if defined(CONFIG_4xx)
57 void bedbug405_init( void );
59 #elif defined(CONFIG_8xx)
60 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 */
84 /* -------------------------------------------------- */
86 /* 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 )
99 addr = simple_strtoul( argv[1], NULL, 16 );
101 /* If an extra param is given then it is the length */
103 len = simple_strtoul( argv[2], NULL, 16 );
106 /* Run the disassembler */
107 disppc( (unsigned char *)addr, 0, len, bedbug_puts, F_RADHEX );
109 dis_last_addr = addr + (len * 4);
112 } /* do_bedbug_dis */
116 /* ======================================================================
117 * Entry point from the interpreter to the assembler. Assembles
118 * instructions in consecutive memory locations until a '.' (period) is
119 * entered on a line by itself.
120 * ====================================================================== */
121 int do_bedbug_asm (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
123 long mem_addr; /* Address to assemble into */
124 unsigned long instr; /* Machine code for text */
125 char prompt[ 15 ]; /* Prompt string for user input */
126 int asm_err; /* Error code from the assembler*/
127 /* -------------------------------------------------- */
132 printf ("Usage:\n%s\n", cmdtp->usage);
136 printf( "\nEnter '.' when done\n" );
137 mem_addr = simple_strtoul( argv[ 1 ], NULL, 16 );
142 disppc( (unsigned char *)mem_addr, 0, 1, bedbug_puts, F_RADHEX );
144 sprintf( prompt, "%08lx: ", mem_addr );
147 if( console_buffer[ 0 ] && strcmp( console_buffer, "." ))
149 if(( instr = asmppc( mem_addr, console_buffer, &asm_err )) != 0 )
151 *(unsigned long *)mem_addr = instr;
156 printf( "*** Error: %s ***\n", asm_error_str( asm_err ));
166 } /* do_bedbug_asm */
170 /* ======================================================================
171 * Used to set a break point from the interpreter. Simply calls into the
172 * CPU-specific break point set routine.
173 * ====================================================================== */
175 int do_bedbug_break (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
177 /* -------------------------------------------------- */
178 if( bug_ctx.do_break )
179 (*bug_ctx.do_break)( cmdtp, flag, argc, argv );
182 } /* do_bedbug_break */
186 /* ======================================================================
187 * Called from the debug interrupt routine. Simply calls the CPU-specific
188 * breakpoint handling routine.
189 * ====================================================================== */
191 void do_bedbug_breakpoint (struct pt_regs *regs)
193 /* -------------------------------------------------- */
195 if( bug_ctx.break_isr )
196 (*bug_ctx.break_isr)( regs );
199 } /* do_bedbug_breakpoint */
203 /* ======================================================================
204 * Called from the CPU-specific breakpoint handling routine. Enter a
205 * mini main loop until the stopped flag is cleared from the breakpoint
208 * This handles the parts of the debugger that are common to all CPU's.
209 * ====================================================================== */
211 void bedbug_main_loop( unsigned long addr, struct pt_regs *regs )
213 int len; /* Length of command line */
214 int flag; /* Command flags */
215 int rc = 0; /* Result from run_command*/
216 char prompt_str[ 20 ]; /* Prompt string */
217 static char lastcommand[ CFG_CBSIZE ] = {0}; /* previous command */
218 /* -------------------------------------------------- */
221 (*bug_ctx.clear)( bug_ctx.current_bp );
223 printf( "Breakpoint %d: ", bug_ctx.current_bp );
224 disppc( (unsigned char *)addr, 0, 1, bedbug_puts, F_RADHEX );
229 sprintf( prompt_str, "BEDBUG.%d =>", bug_ctx.current_bp );
231 /* A miniature main loop */
232 while( bug_ctx.stopped )
234 len = readline( prompt_str );
236 flag = 0; /* assume no special flags for now */
239 strcpy( lastcommand, console_buffer );
241 flag |= CMD_FLAG_REPEAT;
244 printf ("<INTERRUPT>\n");
246 rc = run_command( lastcommand, flag );
249 /* invalid command or not repeatable, forget it */
255 bug_ctx.current_bp = 0;
258 } /* bedbug_main_loop */
262 /* ======================================================================
263 * Interpreter command to continue from a breakpoint. Just clears the
264 * stopped flag in the context so that the breakpoint routine will
266 * ====================================================================== */
267 int do_bedbug_continue (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
270 /* -------------------------------------------------- */
272 if( ! bug_ctx.stopped )
274 printf( "Not at a breakpoint\n" );
280 } /* do_bedbug_continue */
284 /* ======================================================================
285 * Interpreter command to continue to the next instruction, stepping into
286 * subroutines. Works by calling the find_next_addr() routine to compute
287 * the address passes control to the CPU-specific set breakpoint routine
288 * for the current breakpoint number.
289 * ====================================================================== */
290 int do_bedbug_step (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
292 unsigned long addr; /* Address to stop at */
293 /* -------------------------------------------------- */
295 if( ! bug_ctx.stopped )
297 printf( "Not at a breakpoint\n" );
301 if( !find_next_address( (unsigned char *)&addr, FALSE, bug_ctx.regs ))
305 (*bug_ctx.set)( bug_ctx.current_bp, addr );
309 } /* do_bedbug_step */
313 /* ======================================================================
314 * Interpreter command to continue to the next instruction, stepping over
315 * subroutines. Works by calling the find_next_addr() routine to compute
316 * the address passes control to the CPU-specific set breakpoint routine
317 * for the current breakpoint number.
318 * ====================================================================== */
319 int do_bedbug_next (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
321 unsigned long addr; /* Address to stop at */
322 /* -------------------------------------------------- */
324 if( ! bug_ctx.stopped )
326 printf( "Not at a breakpoint\n" );
330 if( !find_next_address( (unsigned char *)&addr, TRUE, bug_ctx.regs ))
334 (*bug_ctx.set)( bug_ctx.current_bp, addr );
338 } /* do_bedbug_next */
342 /* ======================================================================
343 * Interpreter command to print the current stack. This assumes an EABI
344 * architecture, so it starts with GPR R1 and works back up the stack.
345 * ====================================================================== */
346 int do_bedbug_stack (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
348 DECLARE_GLOBAL_DATA_PTR;
350 unsigned long sp; /* Stack pointer */
351 unsigned long func; /* LR from stack */
352 int depth; /* Stack iteration level */
353 int skip = 1; /* Flag to skip the first entry */
354 unsigned long top; /* Top of memory address */
355 /* -------------------------------------------------- */
357 if( ! bug_ctx.stopped )
359 printf( "Not at a breakpoint\n" );
363 top = gd->bd->bi_memstart + gd->bd->bi_memsize;
366 printf( "Depth PC\n" );
367 printf( "----- --------\n" );
368 printf( "%5d %08lx\n", depth++, bug_ctx.regs->nip );
370 sp = bug_ctx.regs->gpr[ 1 ];
371 func = *(unsigned long *)(sp+4);
373 while(( func < top ) && ( sp < top ))
376 printf( "%5d %08lx\n", depth++, func );
380 sp = *(unsigned long *)sp;
381 func = *(unsigned long *)(sp+4);
384 } /* do_bedbug_stack */
388 /* ======================================================================
389 * Interpreter command to dump the registers. Calls the CPU-specific
390 * show registers routine.
391 * ====================================================================== */
392 int do_bedbug_rdump (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
394 /* -------------------------------------------------- */
396 if( ! bug_ctx.stopped )
398 printf( "Not at a breakpoint\n" );
402 show_regs( bug_ctx.regs );
404 } /* do_bedbug_rdump */
407 /* ====================================================================== */
408 #endif /* CFG_CMD_BEDBUG */
412 * Copyright (c) 2001 William L. Pitts
413 * All rights reserved.
415 * Redistribution and use in source and binary forms are freely
416 * permitted provided that the above copyright notice and this
417 * paragraph and the following disclaimer are duplicated in all
420 * This software is provided "AS IS" and without any express or
421 * implied warranties, including, without limitation, the implied
422 * warranties of merchantability and fitness for a particular