qemu/roms/u-boot/arch/powerpc/cpu/mpc8260/bedbug_603e.c

   1 /*
   2  * Bedbug Functions specific to the MPC603e core
   3  */
   4
   5 #include <common.h>
   6 #include <command.h>
   7 #include <linux/ctype.h>
   8 #include <bedbug/type.h>
   9 #include <bedbug/bedbug.h>
  10 #include <bedbug/regs.h>
  11 #include <bedbug/ppc.h>
  12
  13 #if defined(CONFIG_CMD_BEDBUG) \
  14         && (defined(CONFIG_MPC824X) || defined(CONFIG_MPC8260))
  15
  16 #define MAX_BREAK_POINTS 1
  17
  18 extern CPU_DEBUG_CTX bug_ctx;
  19
  20 void bedbug603e_init __P((void));
  21 void bedbug603e_do_break __P((cmd_tbl_t*,int,int,char*const[]));
  22 void bedbug603e_break_isr __P((struct pt_regs*));
  23 int  bedbug603e_find_empty __P((void));
  24 int  bedbug603e_set __P((int,unsigned long));
  25 int  bedbug603e_clear __P((int));
  26
  27 \f
  28 /* ======================================================================
  29  * Initialize the global bug_ctx structure for the processor.  Clear all
  30  * of the breakpoints.
  31  * ====================================================================== */
  32
  33 void bedbug603e_init( void )
  34 {
  35   int   i;
  36   /* -------------------------------------------------- */
  37
  38   bug_ctx.hw_debug_enabled = 0;
  39   bug_ctx.stopped = 0;
  40   bug_ctx.current_bp = 0;
  41   bug_ctx.regs = NULL;
  42
  43   bug_ctx.do_break   = bedbug603e_do_break;
  44   bug_ctx.break_isr  = bedbug603e_break_isr;
  45   bug_ctx.find_empty = bedbug603e_find_empty;
  46   bug_ctx.set        = bedbug603e_set;
  47   bug_ctx.clear      = bedbug603e_clear;
  48
  49   for( i = 1; i <= MAX_BREAK_POINTS; ++i )
  50     (*bug_ctx.clear)( i );
  51
  52   puts ("BEDBUG:ready\n");
  53   return;
  54 } /* bedbug_init_breakpoints */
  55
  56
  57 \f
  58 /* ======================================================================
  59  * Set/clear/show the hardware breakpoint for the 603e.  The "off"
  60  * string will disable a specific breakpoint.  The "show" string will
  61  * display the current breakpoints.  Otherwise an address will set a
  62  * breakpoint at that address.  Setting a breakpoint uses the CPU-specific
  63  * set routine which will assign a breakpoint number.
  64  * ====================================================================== */
  65
  66 void bedbug603e_do_break (cmd_tbl_t *cmdtp, int flag, int argc,
  67                          char * const argv[])
  68 {
  69   long          addr;           /* Address to break at  */
  70   int           which_bp;       /* Breakpoint number    */
  71   /* -------------------------------------------------- */
  72
  73   if (argc < 2) {
  74     cmd_usage(cmdtp);
  75     return;
  76   }
  77
  78   /* Turn off a breakpoint */
  79
  80   if( strcmp( argv[ 1 ], "off" ) == 0 )
  81   {
  82     if( bug_ctx.hw_debug_enabled == 0 )
  83     {
  84       puts ( "No breakpoints enabled\n" );
  85       return;
  86     }
  87
  88     which_bp = simple_strtoul( argv[ 2 ], NULL, 10 );
  89
  90     if( bug_ctx.clear )
  91       (*bug_ctx.clear)( which_bp );
  92
  93     printf( "Breakpoint %d removed\n", which_bp );
  94     return;
  95   }
  96
  97   /* Show a list of breakpoints */
  98
  99   if( strcmp( argv[ 1 ], "show" ) == 0 )
 100   {
 101     for( which_bp = 1; which_bp <= MAX_BREAK_POINTS; ++which_bp )
 102     {
 103
 104       addr = GET_IABR();
 105
 106       printf( "Breakpoint [%d]: ", which_bp );
 107       if( (addr & 0x00000002) == 0 )
 108         puts ( "NOT SET\n" );
 109       else
 110         disppc( (unsigned char *)(addr & 0xFFFFFFFC), 0, 1, bedbug_puts, F_RADHEX );
 111     }
 112     return;
 113   }
 114
 115   /* Set a breakpoint at the address */
 116
 117   if(!(( isdigit( argv[ 1 ][ 0 ] )) ||
 118         (( argv[ 1 ][ 0 ] >= 'a' ) && ( argv[ 1 ][ 0 ] <= 'f' )) ||
 119         (( argv[ 1 ][ 0 ] >= 'A' ) && ( argv[ 1 ][ 0 ] <= 'F' )))) {
 120     cmd_usage(cmdtp);
 121     return;
 122   }
 123
 124   addr = simple_strtoul( argv[ 1 ], NULL, 16 );
 125
 126   if(( bug_ctx.set ) && ( which_bp = (*bug_ctx.set)( 0, addr )) > 0 )
 127   {
 128     printf( "Breakpoint [%d]: ", which_bp );
 129     disppc( (unsigned char *)addr, 0, 1, bedbug_puts, F_RADHEX );
 130   }
 131
 132   return;
 133 } /* bedbug603e_do_break */
 134
 135
 136 \f
 137 /* ======================================================================
 138  * Handle a breakpoint.  Enter a mini main loop.  Stay in the loop until
 139  * the stopped flag in the debug context is cleared.
 140  * ====================================================================== */
 141
 142 void bedbug603e_break_isr( struct pt_regs *regs )
 143 {
 144   unsigned long addr;           /* Address stopped at   */
 145   /* -------------------------------------------------- */
 146
 147   bug_ctx.current_bp = 1;
 148   addr = GET_IABR() & 0xFFFFFFFC;
 149
 150   bedbug_main_loop( addr, regs );
 151   return;
 152 } /* bedbug603e_break_isr */
 153
 154
 155 \f
 156 /* ======================================================================
 157  * See if the hardware breakpoint is available.
 158  * ====================================================================== */
 159
 160 int bedbug603e_find_empty( void )
 161 {
 162   /* -------------------------------------------------- */
 163
 164   if( (GET_IABR() && 0x00000002) == 0 )
 165     return 1;
 166
 167   return 0;
 168 } /* bedbug603e_find_empty */
 169
 170
 171 \f
 172 /* ======================================================================
 173  * Set a breakpoint.  If 'which_bp' is zero then find an unused breakpoint
 174  * number, otherwise reassign the given breakpoint.  If hardware debugging
 175  * is not enabled, then turn it on via the MSR and DBCR0.  Set the break
 176  * address in the IABR register.
 177  * ====================================================================== */
 178
 179 int bedbug603e_set( int which_bp, unsigned long addr )
 180 {
 181   /* -------------------------------------------------- */
 182
 183   if(( addr & 0x00000003 ) != 0 )
 184   {
 185     puts ( "Breakpoints must be on a 32 bit boundary\n" );
 186     return 0;
 187   }
 188
 189   /* Only look if which_bp == 0, else use which_bp */
 190   if(( bug_ctx.find_empty ) && ( !which_bp ) &&
 191      ( which_bp = (*bug_ctx.find_empty)()) == 0 )
 192   {
 193     puts ( "All breakpoints in use\n" );
 194     return 0;
 195   }
 196
 197   if( which_bp < 1 || which_bp > MAX_BREAK_POINTS )
 198   {
 199     printf( "Invalid break point # %d\n", which_bp );
 200     return 0;
 201   }
 202
 203   if( ! bug_ctx.hw_debug_enabled )
 204   {
 205     bug_ctx.hw_debug_enabled = 1;
 206   }
 207
 208   SET_IABR( addr | 0x00000002 );
 209
 210   return which_bp;
 211 } /* bedbug603e_set */
 212
 213
 214 \f
 215 /* ======================================================================
 216  * Disable a specific breakoint by setting the IABR register to zero.
 217  * ====================================================================== */
 218
 219 int bedbug603e_clear( int which_bp )
 220 {
 221   /* -------------------------------------------------- */
 222
 223   if( which_bp < 1 || which_bp > MAX_BREAK_POINTS )
 224   {
 225     printf( "Invalid break point # (%d)\n", which_bp );
 226     return -1;
 227   }
 228
 229   SET_IABR( 0 );
 230
 231   return 0;
 232 } /* bedbug603e_clear */
 233
 234
 235 /* ====================================================================== */
 236 #endif