Home | History | Annotate | Line # | Download | only in ddb
db_break.c revision 1.3
      1  1.1      cgd /*
      2  1.1      cgd  * Mach Operating System
      3  1.1      cgd  * Copyright (c) 1991,1990 Carnegie Mellon University
      4  1.1      cgd  * All Rights Reserved.
      5  1.1      cgd  *
      6  1.1      cgd  * Permission to use, copy, modify and distribute this software and its
      7  1.1      cgd  * documentation is hereby granted, provided that both the copyright
      8  1.1      cgd  * notice and this permission notice appear in all copies of the
      9  1.1      cgd  * software, derivative works or modified versions, and any portions
     10  1.1      cgd  * thereof, and that both notices appear in supporting documentation.
     11  1.1      cgd  *
     12  1.1      cgd  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS
     13  1.1      cgd  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
     14  1.1      cgd  * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
     15  1.1      cgd  *
     16  1.1      cgd  * Carnegie Mellon requests users of this software to return to
     17  1.1      cgd  *
     18  1.1      cgd  *  Software Distribution Coordinator  or  Software.Distribution (at) CS.CMU.EDU
     19  1.1      cgd  *  School of Computer Science
     20  1.1      cgd  *  Carnegie Mellon University
     21  1.1      cgd  *  Pittsburgh PA 15213-3890
     22  1.1      cgd  *
     23  1.1      cgd  * any improvements or extensions that they make and grant Carnegie the
     24  1.1      cgd  * rights to redistribute these changes.
     25  1.2      cgd  *
     26  1.1      cgd  *	Author: David B. Golub, Carnegie Mellon University
     27  1.1      cgd  *	Date:	7/90
     28  1.3  mycroft  *	$Id: db_break.c,v 1.3 1993/12/18 04:46:28 mycroft Exp $
     29  1.1      cgd  */
     30  1.3  mycroft 
     31  1.1      cgd /*
     32  1.1      cgd  * Breakpoints.
     33  1.1      cgd  */
     34  1.3  mycroft #include <sys/param.h>
     35  1.3  mycroft #include <sys/proc.h>
     36  1.3  mycroft 
     37  1.1      cgd #include <machine/db_machdep.h>		/* type definitions */
     38  1.1      cgd 
     39  1.1      cgd #include <ddb/db_lex.h>
     40  1.1      cgd #include <ddb/db_break.h>
     41  1.1      cgd #include <ddb/db_access.h>
     42  1.1      cgd #include <ddb/db_sym.h>
     43  1.1      cgd #include <ddb/db_break.h>
     44  1.1      cgd 
     45  1.1      cgd extern boolean_t db_map_equal();
     46  1.1      cgd extern boolean_t db_map_current();
     47  1.1      cgd extern vm_map_t db_map_addr();
     48  1.1      cgd 
     49  1.1      cgd #define	NBREAKPOINTS	100
     50  1.1      cgd struct db_breakpoint	db_break_table[NBREAKPOINTS];
     51  1.1      cgd db_breakpoint_t		db_next_free_breakpoint = &db_break_table[0];
     52  1.1      cgd db_breakpoint_t		db_free_breakpoints = 0;
     53  1.1      cgd db_breakpoint_t		db_breakpoint_list = 0;
     54  1.1      cgd 
     55  1.1      cgd db_breakpoint_t
     56  1.1      cgd db_breakpoint_alloc()
     57  1.1      cgd {
     58  1.1      cgd 	register db_breakpoint_t	bkpt;
     59  1.1      cgd 
     60  1.1      cgd 	if ((bkpt = db_free_breakpoints) != 0) {
     61  1.1      cgd 	    db_free_breakpoints = bkpt->link;
     62  1.1      cgd 	    return (bkpt);
     63  1.1      cgd 	}
     64  1.1      cgd 	if (db_next_free_breakpoint == &db_break_table[NBREAKPOINTS]) {
     65  1.1      cgd 	    db_printf("All breakpoints used.\n");
     66  1.1      cgd 	    return (0);
     67  1.1      cgd 	}
     68  1.1      cgd 	bkpt = db_next_free_breakpoint;
     69  1.1      cgd 	db_next_free_breakpoint++;
     70  1.1      cgd 
     71  1.1      cgd 	return (bkpt);
     72  1.1      cgd }
     73  1.1      cgd 
     74  1.1      cgd void
     75  1.1      cgd db_breakpoint_free(bkpt)
     76  1.1      cgd 	register db_breakpoint_t	bkpt;
     77  1.1      cgd {
     78  1.1      cgd 	bkpt->link = db_free_breakpoints;
     79  1.1      cgd 	db_free_breakpoints = bkpt;
     80  1.1      cgd }
     81  1.1      cgd 
     82  1.1      cgd void
     83  1.1      cgd db_set_breakpoint(map, addr, count)
     84  1.1      cgd 	vm_map_t	map;
     85  1.1      cgd 	db_addr_t	addr;
     86  1.1      cgd 	int		count;
     87  1.1      cgd {
     88  1.1      cgd 	register db_breakpoint_t	bkpt;
     89  1.1      cgd 
     90  1.1      cgd 	if (db_find_breakpoint(map, addr)) {
     91  1.1      cgd 	    db_printf("Already set.\n");
     92  1.1      cgd 	    return;
     93  1.1      cgd 	}
     94  1.1      cgd 
     95  1.1      cgd 	bkpt = db_breakpoint_alloc();
     96  1.1      cgd 	if (bkpt == 0) {
     97  1.1      cgd 	    db_printf("Too many breakpoints.\n");
     98  1.1      cgd 	    return;
     99  1.1      cgd 	}
    100  1.1      cgd 
    101  1.1      cgd 	bkpt->map = map;
    102  1.1      cgd 	bkpt->address = addr;
    103  1.1      cgd 	bkpt->flags = 0;
    104  1.1      cgd 	bkpt->init_count = count;
    105  1.1      cgd 	bkpt->count = count;
    106  1.1      cgd 
    107  1.1      cgd 	bkpt->link = db_breakpoint_list;
    108  1.1      cgd 	db_breakpoint_list = bkpt;
    109  1.1      cgd }
    110  1.1      cgd 
    111  1.1      cgd void
    112  1.1      cgd db_delete_breakpoint(map, addr)
    113  1.1      cgd 	vm_map_t	map;
    114  1.1      cgd 	db_addr_t	addr;
    115  1.1      cgd {
    116  1.1      cgd 	register db_breakpoint_t	bkpt;
    117  1.1      cgd 	register db_breakpoint_t	*prev;
    118  1.1      cgd 
    119  1.1      cgd 	for (prev = &db_breakpoint_list;
    120  1.1      cgd 	     (bkpt = *prev) != 0;
    121  1.1      cgd 	     prev = &bkpt->link) {
    122  1.1      cgd 	    if (db_map_equal(bkpt->map, map) &&
    123  1.1      cgd 		(bkpt->address == addr)) {
    124  1.1      cgd 		*prev = bkpt->link;
    125  1.1      cgd 		break;
    126  1.1      cgd 	    }
    127  1.1      cgd 	}
    128  1.1      cgd 	if (bkpt == 0) {
    129  1.1      cgd 	    db_printf("Not set.\n");
    130  1.1      cgd 	    return;
    131  1.1      cgd 	}
    132  1.1      cgd 
    133  1.1      cgd 	db_breakpoint_free(bkpt);
    134  1.1      cgd }
    135  1.1      cgd 
    136  1.1      cgd db_breakpoint_t
    137  1.1      cgd db_find_breakpoint(map, addr)
    138  1.1      cgd 	vm_map_t	map;
    139  1.1      cgd 	db_addr_t	addr;
    140  1.1      cgd {
    141  1.1      cgd 	register db_breakpoint_t	bkpt;
    142  1.1      cgd 
    143  1.1      cgd 	for (bkpt = db_breakpoint_list;
    144  1.1      cgd 	     bkpt != 0;
    145  1.1      cgd 	     bkpt = bkpt->link)
    146  1.1      cgd 	{
    147  1.1      cgd 	    if (db_map_equal(bkpt->map, map) &&
    148  1.1      cgd 		(bkpt->address == addr))
    149  1.1      cgd 		return (bkpt);
    150  1.1      cgd 	}
    151  1.1      cgd 	return (0);
    152  1.1      cgd }
    153  1.1      cgd 
    154  1.1      cgd db_breakpoint_t
    155  1.1      cgd db_find_breakpoint_here(addr)
    156  1.1      cgd 	db_addr_t	addr;
    157  1.1      cgd {
    158  1.1      cgd     return db_find_breakpoint(db_map_addr(addr), addr);
    159  1.1      cgd }
    160  1.1      cgd 
    161  1.1      cgd boolean_t	db_breakpoints_inserted = TRUE;
    162  1.1      cgd 
    163  1.1      cgd void
    164  1.1      cgd db_set_breakpoints()
    165  1.1      cgd {
    166  1.1      cgd 	register db_breakpoint_t	bkpt;
    167  1.1      cgd 
    168  1.1      cgd 	if (!db_breakpoints_inserted) {
    169  1.1      cgd 
    170  1.1      cgd 	    for (bkpt = db_breakpoint_list;
    171  1.1      cgd 	         bkpt != 0;
    172  1.1      cgd 	         bkpt = bkpt->link)
    173  1.1      cgd 		if (db_map_current(bkpt->map)) {
    174  1.1      cgd 		    bkpt->bkpt_inst = db_get_value(bkpt->address,
    175  1.1      cgd 						   BKPT_SIZE,
    176  1.1      cgd 						   FALSE);
    177  1.1      cgd 		    db_put_value(bkpt->address,
    178  1.1      cgd 				 BKPT_SIZE,
    179  1.1      cgd 				 BKPT_SET(bkpt->bkpt_inst));
    180  1.1      cgd 		}
    181  1.1      cgd 	    db_breakpoints_inserted = TRUE;
    182  1.1      cgd 	}
    183  1.1      cgd }
    184  1.1      cgd 
    185  1.1      cgd void
    186  1.1      cgd db_clear_breakpoints()
    187  1.1      cgd {
    188  1.1      cgd 	register db_breakpoint_t	bkpt;
    189  1.1      cgd 
    190  1.1      cgd 	if (db_breakpoints_inserted) {
    191  1.1      cgd 
    192  1.1      cgd 	    for (bkpt = db_breakpoint_list;
    193  1.1      cgd 	         bkpt != 0;
    194  1.1      cgd 		 bkpt = bkpt->link)
    195  1.1      cgd 		if (db_map_current(bkpt->map)) {
    196  1.1      cgd 		    db_put_value(bkpt->address, BKPT_SIZE, bkpt->bkpt_inst);
    197  1.1      cgd 		}
    198  1.1      cgd 	    db_breakpoints_inserted = FALSE;
    199  1.1      cgd 	}
    200  1.1      cgd }
    201  1.1      cgd 
    202  1.1      cgd /*
    203  1.1      cgd  * Set a temporary breakpoint.
    204  1.1      cgd  * The instruction is changed immediately,
    205  1.1      cgd  * so the breakpoint does not have to be on the breakpoint list.
    206  1.1      cgd  */
    207  1.1      cgd db_breakpoint_t
    208  1.1      cgd db_set_temp_breakpoint(addr)
    209  1.1      cgd 	db_addr_t	addr;
    210  1.1      cgd {
    211  1.1      cgd 	register db_breakpoint_t	bkpt;
    212  1.1      cgd 
    213  1.1      cgd 	bkpt = db_breakpoint_alloc();
    214  1.1      cgd 	if (bkpt == 0) {
    215  1.1      cgd 	    db_printf("Too many breakpoints.\n");
    216  1.1      cgd 	    return 0;
    217  1.1      cgd 	}
    218  1.1      cgd 
    219  1.1      cgd 	bkpt->map = NULL;
    220  1.1      cgd 	bkpt->address = addr;
    221  1.1      cgd 	bkpt->flags = BKPT_TEMP;
    222  1.1      cgd 	bkpt->init_count = 1;
    223  1.1      cgd 	bkpt->count = 1;
    224  1.1      cgd 
    225  1.1      cgd 	bkpt->bkpt_inst = db_get_value(bkpt->address, BKPT_SIZE, FALSE);
    226  1.1      cgd 	db_put_value(bkpt->address, BKPT_SIZE, BKPT_SET(bkpt->bkpt_inst));
    227  1.1      cgd 	return bkpt;
    228  1.1      cgd }
    229  1.1      cgd 
    230  1.1      cgd void
    231  1.1      cgd db_delete_temp_breakpoint(bkpt)
    232  1.1      cgd 	db_breakpoint_t	bkpt;
    233  1.1      cgd {
    234  1.1      cgd 	db_put_value(bkpt->address, BKPT_SIZE, bkpt->bkpt_inst);
    235  1.1      cgd 	db_breakpoint_free(bkpt);
    236  1.1      cgd }
    237  1.1      cgd 
    238  1.1      cgd /*
    239  1.1      cgd  * List breakpoints.
    240  1.1      cgd  */
    241  1.1      cgd void
    242  1.1      cgd db_list_breakpoints()
    243  1.1      cgd {
    244  1.1      cgd 	register db_breakpoint_t	bkpt;
    245  1.1      cgd 
    246  1.1      cgd 	if (db_breakpoint_list == 0) {
    247  1.1      cgd 	    db_printf("No breakpoints set\n");
    248  1.1      cgd 	    return;
    249  1.1      cgd 	}
    250  1.1      cgd 
    251  1.1      cgd 	db_printf(" Map      Count    Address\n");
    252  1.1      cgd 	for (bkpt = db_breakpoint_list;
    253  1.1      cgd 	     bkpt != 0;
    254  1.1      cgd 	     bkpt = bkpt->link)
    255  1.1      cgd 	{
    256  1.1      cgd 	    db_printf("%s%8x %5d    ",
    257  1.1      cgd 		      db_map_current(bkpt->map) ? "*" : " ",
    258  1.1      cgd 		      bkpt->map, bkpt->init_count);
    259  1.1      cgd 	    db_printsym(bkpt->address, DB_STGY_PROC);
    260  1.1      cgd 	    db_printf("\n");
    261  1.1      cgd 	}
    262  1.1      cgd }
    263  1.1      cgd 
    264  1.1      cgd /* Delete breakpoint */
    265  1.1      cgd /*ARGSUSED*/
    266  1.1      cgd void
    267  1.1      cgd db_delete_cmd(addr, have_addr, count, modif)
    268  1.1      cgd 	db_expr_t	addr;
    269  1.1      cgd 	int		have_addr;
    270  1.1      cgd 	db_expr_t	count;
    271  1.1      cgd 	char *		modif;
    272  1.1      cgd {
    273  1.1      cgd 	db_delete_breakpoint(db_map_addr(addr), (db_addr_t)addr);
    274  1.1      cgd }
    275  1.1      cgd 
    276  1.1      cgd /* Set breakpoint with skip count */
    277  1.1      cgd /*ARGSUSED*/
    278  1.1      cgd void
    279  1.1      cgd db_breakpoint_cmd(addr, have_addr, count, modif)
    280  1.1      cgd 	db_expr_t	addr;
    281  1.1      cgd 	int		have_addr;
    282  1.1      cgd 	db_expr_t	count;
    283  1.1      cgd 	char *		modif;
    284  1.1      cgd {
    285  1.1      cgd 	if (count == -1)
    286  1.1      cgd 	    count = 1;
    287  1.1      cgd 
    288  1.1      cgd 	db_set_breakpoint(db_map_addr(addr), (db_addr_t)addr, count);
    289  1.1      cgd }
    290  1.1      cgd 
    291  1.1      cgd /* list breakpoints */
    292  1.1      cgd void
    293  1.1      cgd db_listbreak_cmd()
    294  1.1      cgd {
    295  1.1      cgd 	db_list_breakpoints();
    296  1.1      cgd }
    297  1.1      cgd 
    298  1.1      cgd #include <vm/vm_kern.h>
    299  1.1      cgd 
    300  1.1      cgd /*
    301  1.1      cgd  *	We want ddb to be usable before most of the kernel has been
    302  1.1      cgd  *	initialized.  In particular, current_thread() or kernel_map
    303  1.1      cgd  *	(or both) may be null.
    304  1.1      cgd  */
    305  1.1      cgd 
    306  1.1      cgd boolean_t
    307  1.1      cgd db_map_equal(map1, map2)
    308  1.1      cgd 	vm_map_t	map1, map2;
    309  1.1      cgd {
    310  1.1      cgd 	return ((map1 == map2) ||
    311  1.1      cgd 		((map1 == NULL) && (map2 == kernel_map)) ||
    312  1.1      cgd 		((map1 == kernel_map) && (map2 == NULL)));
    313  1.1      cgd }
    314  1.1      cgd 
    315  1.1      cgd boolean_t
    316  1.1      cgd db_map_current(map)
    317  1.1      cgd 	vm_map_t	map;
    318  1.1      cgd {
    319  1.1      cgd #if 0
    320  1.1      cgd 	thread_t	thread;
    321  1.1      cgd 
    322  1.1      cgd 	return ((map == NULL) ||
    323  1.1      cgd 		(map == kernel_map) ||
    324  1.1      cgd 		(((thread = current_thread()) != NULL) &&
    325  1.1      cgd 		 (map == thread->task->map)));
    326  1.1      cgd #else
    327  1.1      cgd 	return (1);
    328  1.1      cgd #endif
    329  1.1      cgd }
    330  1.1      cgd 
    331  1.1      cgd vm_map_t
    332  1.1      cgd db_map_addr(addr)
    333  1.1      cgd 	vm_offset_t addr;
    334  1.1      cgd {
    335  1.1      cgd #if 0
    336  1.1      cgd 	thread_t	thread;
    337  1.1      cgd 
    338  1.1      cgd 	/*
    339  1.1      cgd 	 *	We want to return kernel_map for all
    340  1.1      cgd 	 *	non-user addresses, even when debugging
    341  1.1      cgd 	 *	kernel tasks with their own maps.
    342  1.1      cgd 	 */
    343  1.1      cgd 
    344  1.1      cgd 	if ((VM_MIN_ADDRESS <= addr) &&
    345  1.1      cgd 	    (addr < VM_MAX_ADDRESS) &&
    346  1.1      cgd 	    ((thread = current_thread()) != NULL))
    347  1.1      cgd 	    return thread->task->map;
    348  1.1      cgd 	else
    349  1.1      cgd #endif
    350  1.1      cgd 	    return kernel_map;
    351  1.1      cgd }
    352