The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/i386/i386/db_trace.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*
    2  * Mach Operating System
    3  * Copyright (c) 1991,1990 Carnegie Mellon University
    4  * All Rights Reserved.
    5  *
    6  * Permission to use, copy, modify and distribute this software and its
    7  * documentation is hereby granted, provided that both the copyright
    8  * notice and this permission notice appear in all copies of the
    9  * software, derivative works or modified versions, and any portions
   10  * thereof, and that both notices appear in supporting documentation.
   11  *
   12  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS
   13  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
   14  * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
   15  *
   16  * Carnegie Mellon requests users of this software to return to
   17  *
   18  *  Software Distribution Coordinator  or  Software.Distribution@CS.CMU.EDU
   19  *  School of Computer Science
   20  *  Carnegie Mellon University
   21  *  Pittsburgh PA 15213-3890
   22  *
   23  * any improvements or extensions that they make and grant Carnegie the
   24  * rights to redistribute these changes.
   25  */
   26 
   27 #include <sys/cdefs.h>
   28 __FBSDID("$FreeBSD: releng/5.2/sys/i386/i386/db_trace.c 121989 2003-11-03 22:07:21Z jhb $");
   29 
   30 #include <sys/param.h>
   31 #include <sys/systm.h>
   32 #include <sys/proc.h>
   33 #include <sys/sysent.h>
   34 
   35 #include <machine/cpu.h>
   36 #include <machine/md_var.h>
   37 #include <machine/pcb.h>
   38 #include <machine/reg.h>
   39 
   40 #include <vm/vm.h>
   41 #include <vm/vm_param.h>
   42 #include <vm/pmap.h>
   43 
   44 #include <ddb/ddb.h>
   45 #include <ddb/db_access.h>
   46 #include <ddb/db_sym.h>
   47 #include <ddb/db_variables.h>
   48 
   49 db_varfcn_t db_dr0;
   50 db_varfcn_t db_dr1;
   51 db_varfcn_t db_dr2;
   52 db_varfcn_t db_dr3;
   53 db_varfcn_t db_dr4;
   54 db_varfcn_t db_dr5;
   55 db_varfcn_t db_dr6;
   56 db_varfcn_t db_dr7;
   57 
   58 /*
   59  * Machine register set.
   60  */
   61 struct db_variable db_regs[] = {
   62         { "cs",         &ddb_regs.tf_cs,     FCN_NULL },
   63         { "ds",         &ddb_regs.tf_ds,     FCN_NULL },
   64         { "es",         &ddb_regs.tf_es,     FCN_NULL },
   65         { "fs",         &ddb_regs.tf_fs,     FCN_NULL },
   66 #if 0
   67         { "gs",         &ddb_regs.tf_gs,     FCN_NULL },
   68 #endif
   69         { "ss",         &ddb_regs.tf_ss,     FCN_NULL },
   70         { "eax",        &ddb_regs.tf_eax,    FCN_NULL },
   71         { "ecx",        &ddb_regs.tf_ecx,    FCN_NULL },
   72         { "edx",        &ddb_regs.tf_edx,    FCN_NULL },
   73         { "ebx",        &ddb_regs.tf_ebx,    FCN_NULL },
   74         { "esp",        &ddb_regs.tf_esp,    FCN_NULL },
   75         { "ebp",        &ddb_regs.tf_ebp,    FCN_NULL },
   76         { "esi",        &ddb_regs.tf_esi,    FCN_NULL },
   77         { "edi",        &ddb_regs.tf_edi,    FCN_NULL },
   78         { "eip",        &ddb_regs.tf_eip,    FCN_NULL },
   79         { "efl",        &ddb_regs.tf_eflags, FCN_NULL },
   80         { "dr0",        NULL,                db_dr0 },
   81         { "dr1",        NULL,                db_dr1 },
   82         { "dr2",        NULL,                db_dr2 },
   83         { "dr3",        NULL,                db_dr3 },
   84         { "dr4",        NULL,                db_dr4 },
   85         { "dr5",        NULL,                db_dr5 },
   86         { "dr6",        NULL,                db_dr6 },
   87         { "dr7",        NULL,                db_dr7 },
   88 };
   89 struct db_variable *db_eregs = db_regs + sizeof(db_regs)/sizeof(db_regs[0]);
   90 
   91 /*
   92  * Stack trace.
   93  */
   94 #define INKERNEL(va)    (((vm_offset_t)(va)) >= USRSTACK)
   95 
   96 struct i386_frame {
   97         struct i386_frame       *f_frame;
   98         int                     f_retaddr;
   99         int                     f_arg0;
  100 };
  101 
  102 #define NORMAL          0
  103 #define TRAP            1
  104 #define INTERRUPT       2
  105 #define SYSCALL         3
  106 
  107 static void db_nextframe(struct i386_frame **, db_addr_t *, struct proc *);
  108 static int db_numargs(struct i386_frame *);
  109 static void db_print_stack_entry(const char *, int, char **, int *, db_addr_t);
  110 static void decode_syscall(int, struct proc *);
  111 static void db_trace_one_stack(int count, boolean_t have_addr,
  112                 struct proc *p, struct i386_frame *frame, db_addr_t callpc);
  113 
  114 
  115 static char * watchtype_str(int type);
  116 int  i386_set_watch(int watchnum, unsigned int watchaddr, int size, int access,
  117                     struct dbreg * d);
  118 int  i386_clr_watch(int watchnum, struct dbreg * d);
  119 int  db_md_set_watchpoint(db_expr_t addr, db_expr_t size);
  120 int  db_md_clr_watchpoint(db_expr_t addr, db_expr_t size);
  121 void db_md_list_watchpoints(void);
  122 
  123 
  124 /*
  125  * Figure out how many arguments were passed into the frame at "fp".
  126  */
  127 static int
  128 db_numargs(fp)
  129         struct i386_frame *fp;
  130 {
  131         int     *argp;
  132         int     inst;
  133         int     args;
  134 
  135         argp = (int *)db_get_value((int)&fp->f_retaddr, 4, FALSE);
  136         /*
  137          * XXX etext is wrong for LKMs.  We should attempt to interpret
  138          * the instruction at the return address in all cases.  This
  139          * may require better fault handling.
  140          */
  141         if (argp < (int *)btext || argp >= (int *)etext) {
  142                 args = 5;
  143         } else {
  144                 inst = db_get_value((int)argp, 4, FALSE);
  145                 if ((inst & 0xff) == 0x59)      /* popl %ecx */
  146                         args = 1;
  147                 else if ((inst & 0xffff) == 0xc483)     /* addl $Ibs, %esp */
  148                         args = ((inst >> 16) & 0xff) / 4;
  149                 else
  150                         args = 5;
  151         }
  152         return (args);
  153 }
  154 
  155 static void
  156 db_print_stack_entry(name, narg, argnp, argp, callpc)
  157         const char *name;
  158         int narg;
  159         char **argnp;
  160         int *argp;
  161         db_addr_t callpc;
  162 {
  163         db_printf("%s(", name);
  164         while (narg) {
  165                 if (argnp)
  166                         db_printf("%s=", *argnp++);
  167                 db_printf("%r", db_get_value((int)argp, 4, FALSE));
  168                 argp++;
  169                 if (--narg != 0)
  170                         db_printf(",");
  171         }
  172         db_printf(") at ");
  173         db_printsym(callpc, DB_STGY_PROC);
  174         db_printf("\n");
  175 }
  176 
  177 static void
  178 decode_syscall(number, p)
  179         int number;
  180         struct proc *p;
  181 {
  182         c_db_sym_t sym;
  183         db_expr_t diff;
  184         sy_call_t *f;
  185         const char *symname;
  186 
  187         db_printf(" (%d", number);
  188         if (p != NULL && 0 <= number && number < p->p_sysent->sv_size) {
  189                 f = p->p_sysent->sv_table[number].sy_call;
  190                 sym = db_search_symbol((db_addr_t)f, DB_STGY_ANY, &diff);
  191                 if (sym != DB_SYM_NULL && diff == 0) {
  192                         db_symbol_values(sym, &symname, NULL);
  193                         db_printf(", %s, %s", p->p_sysent->sv_name, symname);
  194                 }
  195         }
  196         db_printf(")");
  197 }
  198 
  199 /*
  200  * Figure out the next frame up in the call stack.
  201  */
  202 static void
  203 db_nextframe(fp, ip, p)
  204         struct i386_frame **fp;         /* in/out */
  205         db_addr_t       *ip;            /* out */
  206         struct proc     *p;             /* in */
  207 {
  208         struct trapframe *tf;
  209         int frame_type;
  210         int eip, esp, ebp;
  211         db_expr_t offset;
  212         c_db_sym_t sym;
  213         const char *name;
  214 
  215         eip = db_get_value((int) &(*fp)->f_retaddr, 4, FALSE);
  216         ebp = db_get_value((int) &(*fp)->f_frame, 4, FALSE);
  217 
  218         /*
  219          * Figure out frame type.
  220          */
  221         frame_type = NORMAL;
  222         sym = db_search_symbol(eip, DB_STGY_ANY, &offset);
  223         db_symbol_values(sym, &name, NULL);
  224         if (name != NULL) {
  225                 if (strcmp(name, "calltrap") == 0 ||
  226                     strcmp(name, "fork_trampoline") == 0)
  227                         frame_type = TRAP;
  228                 else if (strncmp(name, "Xatpic_intr", 11) == 0 ||
  229                     strncmp(name, "Xapic_isr", 9) == 0)
  230                         frame_type = INTERRUPT;
  231                 else if (strcmp(name, "Xlcall_syscall") == 0 ||
  232                     strcmp(name, "Xint0x80_syscall") == 0)
  233                         frame_type = SYSCALL;
  234         }
  235 
  236         /*
  237          * Normal frames need no special processing.
  238          */
  239         if (frame_type == NORMAL) {
  240                 *ip = (db_addr_t) eip;
  241                 *fp = (struct i386_frame *) ebp;
  242                 return;
  243         }
  244 
  245         db_print_stack_entry(name, 0, 0, 0, eip);
  246 
  247         /*
  248          * Point to base of trapframe which is just above the
  249          * current frame.
  250          */
  251         if (frame_type == INTERRUPT)
  252                 tf = (struct trapframe *)((int)*fp + 12);
  253         else
  254                 tf = (struct trapframe *)((int)*fp + 8);
  255 
  256         if (INKERNEL((int) tf)) {
  257                 esp = (ISPL(tf->tf_cs) == SEL_UPL) ?
  258                     tf->tf_esp : (int)&tf->tf_esp;
  259                 eip = tf->tf_eip;
  260                 ebp = tf->tf_ebp;
  261                 switch (frame_type) {
  262                 case TRAP:
  263                         db_printf("--- trap %#r", tf->tf_trapno);
  264                         break;
  265                 case SYSCALL:
  266                         db_printf("--- syscall");
  267                         decode_syscall(tf->tf_eax, p);
  268                         break;
  269                 case INTERRUPT:
  270                         db_printf("--- interrupt");
  271                         break;
  272                 default:
  273                         panic("The moon has moved again.");
  274                 }
  275                 db_printf(", eip = %#r, esp = %#r, ebp = %#r ---\n", eip,
  276                     esp, ebp);
  277         }
  278 
  279         *ip = (db_addr_t) eip;
  280         *fp = (struct i386_frame *) ebp;
  281 }
  282 
  283 void
  284 db_stack_trace_cmd(addr, have_addr, count, modif)
  285         db_expr_t addr;
  286         boolean_t have_addr;
  287         db_expr_t count;
  288         char *modif;
  289 {
  290         struct i386_frame *frame;
  291         struct proc *p;
  292         struct pcb *pcb;
  293         struct thread *td;
  294         db_addr_t callpc;
  295         pid_t pid;
  296 
  297         if (count == -1)
  298                 count = 1024;
  299 
  300         if (!have_addr) {
  301                 td = curthread;
  302                 p = td->td_proc;
  303                 frame = (struct i386_frame *)ddb_regs.tf_ebp;
  304                 if (frame == NULL)
  305                         frame = (struct i386_frame *)(ddb_regs.tf_esp - 4);
  306                 callpc = (db_addr_t)ddb_regs.tf_eip;
  307         } else if (!INKERNEL(addr)) {
  308                 pid = (addr % 16) + ((addr >> 4) % 16) * 10 +
  309                     ((addr >> 8) % 16) * 100 + ((addr >> 12) % 16) * 1000 +
  310                     ((addr >> 16) % 16) * 10000;
  311                 /*
  312                  * The pcb for curproc is not valid at this point,
  313                  * so fall back to the default case.
  314                  */
  315                 if (pid == curthread->td_proc->p_pid) {
  316                         td = curthread;
  317                         p = td->td_proc;
  318                         frame = (struct i386_frame *)ddb_regs.tf_ebp;
  319                         if (frame == NULL)
  320                                 frame = (struct i386_frame *)
  321                                     (ddb_regs.tf_esp - 4);
  322                         callpc = (db_addr_t)ddb_regs.tf_eip;
  323                 } else {
  324 
  325                         /* sx_slock(&allproc_lock); */
  326                         LIST_FOREACH(p, &allproc, p_list) {
  327                                 if (p->p_pid == pid)
  328                                         break;
  329                         }
  330                         /* sx_sunlock(&allproc_lock); */
  331                         if (p == NULL) {
  332                                 db_printf("pid %d not found\n", pid);
  333                                 return;
  334                         }
  335                         if ((p->p_sflag & PS_INMEM) == 0) {
  336                                 db_printf("pid %d swapped out\n", pid);
  337                                 return;
  338                         }
  339                         pcb = FIRST_THREAD_IN_PROC(p)->td_pcb;  /* XXXKSE */
  340                         frame = (struct i386_frame *)pcb->pcb_ebp;
  341                         if (frame == NULL)
  342                                 frame = (struct i386_frame *)
  343                                     (pcb->pcb_esp - 4);
  344                         callpc = (db_addr_t)pcb->pcb_eip;
  345                 }
  346         } else {
  347                 p = NULL;
  348                 frame = (struct i386_frame *)addr;
  349                 callpc = (db_addr_t)db_get_value((int)&frame->f_retaddr, 4, FALSE);
  350                 frame = frame->f_frame;
  351         }
  352         db_trace_one_stack(count, have_addr, p, frame, callpc);
  353 }
  354 
  355 void
  356 db_stack_thread(db_expr_t addr, boolean_t have_addr,
  357                 db_expr_t count, char *modif)
  358 {
  359         struct i386_frame *frame;
  360         struct thread *td;
  361         struct proc *p;
  362         struct pcb *pcb;
  363         db_addr_t callpc;
  364 
  365         if (!have_addr)
  366                 return;
  367         if (!INKERNEL(addr)) {
  368                 printf("bad thread address");
  369                 return;
  370         }
  371         td = (struct thread *)addr;
  372         /* quick sanity check */
  373         if ((p = td->td_proc) != td->td_ksegrp->kg_proc)
  374                 return;
  375         if (TD_IS_SWAPPED(td)) {
  376                 db_printf("thread at %p swapped out\n", td);
  377                 return;
  378         }
  379         if (td == curthread) {
  380                 frame = (struct i386_frame *)ddb_regs.tf_ebp;
  381                 if (frame == NULL)
  382                         frame = (struct i386_frame *)(ddb_regs.tf_esp - 4);
  383                 callpc = (db_addr_t)ddb_regs.tf_eip;
  384         } else {
  385                 pcb = td->td_pcb;
  386                 frame = (struct i386_frame *)pcb->pcb_ebp;
  387                 if (frame == NULL)
  388                         frame = (struct i386_frame *) (pcb->pcb_esp - 4);
  389                 callpc = (db_addr_t)pcb->pcb_eip;
  390         }
  391         db_trace_one_stack(count, have_addr, p, frame, callpc);
  392 }
  393 
  394 static void
  395 db_trace_one_stack(int count, boolean_t have_addr,
  396                 struct proc *p, struct i386_frame *frame, db_addr_t callpc)
  397 {
  398         int *argp;
  399         boolean_t first;
  400 
  401         first = TRUE;
  402         while (count--) {
  403                 struct i386_frame *actframe;
  404                 int             narg;
  405                 const char *    name;
  406                 db_expr_t       offset;
  407                 c_db_sym_t      sym;
  408 #define MAXNARG 16
  409                 char    *argnames[MAXNARG], **argnp = NULL;
  410 
  411                 sym = db_search_symbol(callpc, DB_STGY_ANY, &offset);
  412                 db_symbol_values(sym, &name, NULL);
  413 
  414                 /*
  415                  * Attempt to determine a (possibly fake) frame that gives
  416                  * the caller's pc.  It may differ from `frame' if the
  417                  * current function never sets up a standard frame or hasn't
  418                  * set one up yet or has just discarded one.  The last two
  419                  * cases can be guessed fairly reliably for code generated
  420                  * by gcc.  The first case is too much trouble to handle in
  421                  * general because the amount of junk on the stack depends
  422                  * on the pc (the special handling of "calltrap", etc. in
  423                  * db_nextframe() works because the `next' pc is special).
  424                  */
  425                 actframe = frame;
  426                 if (first) {
  427                         if (!have_addr) {
  428                                 int instr;
  429 
  430                                 instr = db_get_value(callpc, 4, FALSE);
  431                                 if ((instr & 0x00ffffff) == 0x00e58955) {
  432                                         /* pushl %ebp; movl %esp, %ebp */
  433                                         actframe = (struct i386_frame *)
  434                                             (ddb_regs.tf_esp - 4);
  435                                 } else if ((instr & 0x0000ffff) == 0x0000e589) {
  436                                         /* movl %esp, %ebp */
  437                                         actframe = (struct i386_frame *)
  438                                             ddb_regs.tf_esp;
  439                                         if (ddb_regs.tf_ebp == 0) {
  440                                                 /* Fake caller's frame better. */
  441                                                 frame = actframe;
  442                                         }
  443                                 } else if ((instr & 0x000000ff) == 0x000000c3) {
  444                                         /* ret */
  445                                         actframe = (struct i386_frame *)
  446                                             (ddb_regs.tf_esp - 4);
  447                                 } else if (offset == 0) {
  448                                         /* Probably a symbol in assembler code. */
  449                                         actframe = (struct i386_frame *)
  450                                             (ddb_regs.tf_esp - 4);
  451                                 }
  452                         } else if (strcmp(name, "fork_trampoline") == 0) {
  453                                 /*
  454                                  * Don't try to walk back on a stack for a
  455                                  * process that hasn't actually been run yet.
  456                                  */
  457                                 db_print_stack_entry(name, 0, 0, 0, callpc);
  458                                 break;
  459                         }
  460                         first = FALSE;
  461                 }
  462 
  463                 argp = &actframe->f_arg0;
  464                 narg = MAXNARG;
  465                 if (sym != NULL && db_sym_numargs(sym, &narg, argnames)) {
  466                         argnp = argnames;
  467                 } else {
  468                         narg = db_numargs(frame);
  469                 }
  470 
  471                 db_print_stack_entry(name, narg, argnp, argp, callpc);
  472 
  473                 if (actframe != frame) {
  474                         /* `frame' belongs to caller. */
  475                         callpc = (db_addr_t)
  476                             db_get_value((int)&actframe->f_retaddr, 4, FALSE);
  477                         continue;
  478                 }
  479 
  480                 db_nextframe(&frame, &callpc, p);
  481 
  482                 if (INKERNEL((int) callpc) && !INKERNEL((int) frame)) {
  483                         sym = db_search_symbol(callpc, DB_STGY_ANY, &offset);
  484                         db_symbol_values(sym, &name, NULL);
  485                         db_print_stack_entry(name, 0, 0, 0, callpc);
  486                         break;
  487                 }
  488                 if (!INKERNEL((int) frame)) {
  489                         break;
  490                 }
  491         }
  492 }
  493 
  494 void
  495 db_print_backtrace(void)
  496 {
  497         register_t ebp;
  498 
  499         __asm __volatile("movl %%ebp,%0" : "=r" (ebp));
  500         db_stack_trace_cmd(ebp, 1, -1, NULL);
  501 }
  502 
  503 #define DB_DRX_FUNC(reg)                \
  504 int                                     \
  505 db_ ## reg (vp, valuep, op)             \
  506         struct db_variable *vp;         \
  507         db_expr_t * valuep;             \
  508         int op;                         \
  509 {                                       \
  510         if (op == DB_VAR_GET)           \
  511                 *valuep = r ## reg ();  \
  512         else                            \
  513                 load_ ## reg (*valuep); \
  514         return (0);                     \
  515 } 
  516 
  517 DB_DRX_FUNC(dr0)
  518 DB_DRX_FUNC(dr1)
  519 DB_DRX_FUNC(dr2)
  520 DB_DRX_FUNC(dr3)
  521 DB_DRX_FUNC(dr4)
  522 DB_DRX_FUNC(dr5)
  523 DB_DRX_FUNC(dr6)
  524 DB_DRX_FUNC(dr7)
  525 
  526 int
  527 i386_set_watch(watchnum, watchaddr, size, access, d)
  528         int watchnum;
  529         unsigned int watchaddr;
  530         int size;
  531         int access;
  532         struct dbreg * d;
  533 {
  534         int i;
  535         unsigned int mask;
  536         
  537         if (watchnum == -1) {
  538                 for (i = 0, mask = 0x3; i < 4; i++, mask <<= 2)
  539                         if ((d->dr[7] & mask) == 0)
  540                                 break;
  541                 if (i < 4)
  542                         watchnum = i;
  543                 else
  544                         return (-1);
  545         }
  546         
  547         switch (access) {
  548         case DBREG_DR7_EXEC:
  549                 size = 1; /* size must be 1 for an execution breakpoint */
  550                 /* fall through */
  551         case DBREG_DR7_WRONLY:
  552         case DBREG_DR7_RDWR:
  553                 break;
  554         default : return (-1);
  555         }
  556         
  557         /*
  558          * we can watch a 1, 2, or 4 byte sized location
  559          */
  560         switch (size) {
  561         case 1  : mask = 0x00; break;
  562         case 2  : mask = 0x01 << 2; break;
  563         case 4  : mask = 0x03 << 2; break;
  564         default : return (-1);
  565         }
  566 
  567         mask |= access;
  568 
  569         /* clear the bits we are about to affect */
  570         d->dr[7] &= ~((0x3 << (watchnum*2)) | (0x0f << (watchnum*4+16)));
  571 
  572         /* set drN register to the address, N=watchnum */
  573         DBREG_DRX(d,watchnum) = watchaddr;
  574 
  575         /* enable the watchpoint */
  576         d->dr[7] |= (0x2 << (watchnum*2)) | (mask << (watchnum*4+16));
  577 
  578         return (watchnum);
  579 }
  580 
  581 
  582 int
  583 i386_clr_watch(watchnum, d)
  584         int watchnum;
  585         struct dbreg * d;
  586 {
  587 
  588         if (watchnum < 0 || watchnum >= 4)
  589                 return (-1);
  590         
  591         d->dr[7] = d->dr[7] & ~((0x3 << (watchnum*2)) | (0x0f << (watchnum*4+16)));
  592         DBREG_DRX(d,watchnum) = 0;
  593         
  594         return (0);
  595 }
  596 
  597 
  598 int
  599 db_md_set_watchpoint(addr, size)
  600         db_expr_t addr;
  601         db_expr_t size;
  602 {
  603         int avail, wsize;
  604         int i;
  605         struct dbreg d;
  606         
  607         fill_dbregs(NULL, &d);
  608         
  609         avail = 0;
  610         for(i=0; i<4; i++) {
  611                 if ((d.dr[7] & (3 << (i*2))) == 0)
  612                         avail++;
  613         }
  614         
  615         if (avail*4 < size)
  616                 return (-1);
  617         
  618         for (i=0; i<4 && (size != 0); i++) {
  619                 if ((d.dr[7] & (3<<(i*2))) == 0) {
  620                         if (size > 4)
  621                                 wsize = 4;
  622                         else
  623                                 wsize = size;
  624                         if (wsize == 3)
  625                                 wsize++;
  626                         i386_set_watch(i, addr, wsize, 
  627                                        DBREG_DR7_WRONLY, &d);
  628                         addr += wsize;
  629                         size -= wsize;
  630                 }
  631         }
  632         
  633         set_dbregs(NULL, &d);
  634         
  635         return(0);
  636 }
  637 
  638 
  639 int
  640 db_md_clr_watchpoint(addr, size)
  641         db_expr_t addr;
  642         db_expr_t size;
  643 {
  644         int i;
  645         struct dbreg d;
  646 
  647         fill_dbregs(NULL, &d);
  648 
  649         for(i=0; i<4; i++) {
  650                 if (d.dr[7] & (3 << (i*2))) {
  651                         if ((DBREG_DRX((&d), i) >= addr) && 
  652                             (DBREG_DRX((&d), i) < addr+size))
  653                                 i386_clr_watch(i, &d);
  654                         
  655                 }
  656         }
  657         
  658         set_dbregs(NULL, &d);
  659         
  660         return(0);
  661 }
  662 
  663 
  664 static 
  665 char *
  666 watchtype_str(type)
  667         int type;
  668 {
  669         switch (type) {
  670                 case DBREG_DR7_EXEC   : return "execute";    break;
  671                 case DBREG_DR7_RDWR   : return "read/write"; break;
  672                 case DBREG_DR7_WRONLY : return "write";      break;
  673                 default               : return "invalid";    break;
  674         }
  675 }
  676 
  677 
  678 void
  679 db_md_list_watchpoints()
  680 {
  681         int i;
  682         struct dbreg d;
  683 
  684         fill_dbregs(NULL, &d);
  685 
  686         db_printf("\nhardware watchpoints:\n");
  687         db_printf("  watch    status        type  len     address\n");
  688         db_printf("  -----  --------  ----------  ---  ----------\n");
  689         for (i=0; i<4; i++) {
  690                 if (d.dr[7] & (0x03 << (i*2))) {
  691                         unsigned type, len;
  692                         type = (d.dr[7] >> (16+(i*4))) & 3;
  693                         len =  (d.dr[7] >> (16+(i*4)+2)) & 3;
  694                         db_printf("  %-5d  %-8s  %10s  %3d  0x%08x\n",
  695                                   i, "enabled", watchtype_str(type), 
  696                                   len+1, DBREG_DRX((&d),i));
  697                 }
  698                 else {
  699                         db_printf("  %-5d  disabled\n", i);
  700                 }
  701         }
  702         
  703         db_printf("\ndebug register values:\n");
  704         for (i=0; i<8; i++) {
  705                 db_printf("  dr%d 0x%08x\n", i, DBREG_DRX((&d),i));
  706         }
  707         db_printf("\n");
  708 }
  709 
  710 

Cache object: 8820df51ac50145f367552ca80f95fb2


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.