FreeBSD/Linux Kernel Cross Reference
sys/ddb/db_thread.c

     /*-
      * Copyright (c) 2004 Marcel Moolenaar
      * All rights reserved.
      *
      * Redistribution and use in source and binary forms, with or without
      * modification, are permitted provided that the following conditions
      * are met:
      *
      * 1. Redistributions of source code must retain the above copyright
     *    notice, this list of conditions and the following disclaimer.
     * 2. Redistributions in binary form must reproduce the above copyright
     *    notice, this list of conditions and the following disclaimer in the
     *    documentation and/or other materials provided with the distribution.
     *
     * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     */
    
    #include <sys/cdefs.h>
    __FBSDID("$FreeBSD: releng/9.0/sys/ddb/db_thread.c 208509 2010-05-24 16:41:05Z bz $");
    
    #include <sys/param.h>
    #include <sys/systm.h>
    #include <sys/kdb.h>
    #include <sys/proc.h>
    
    #include <machine/pcb.h>
    
    #include <ddb/ddb.h>
    #include <ddb/db_command.h>
    #include <ddb/db_sym.h>
    
    void
    db_print_thread(void)
    {
            pid_t pid;
    
            pid = -1;
            if (kdb_thread->td_proc != NULL)
                    pid = kdb_thread->td_proc->p_pid;
            db_printf("[ thread pid %d tid %ld ]\n", pid, (long)kdb_thread->td_tid);
    }
    
    void
    db_set_thread(db_expr_t tid, boolean_t hastid, db_expr_t cnt, char *mod)
    {
            struct thread *thr;
            db_expr_t radix;
            int err;
    
            /*
             * We parse our own arguments. We don't like the default radix.
             */
            radix = db_radix;
            db_radix = 10;
            hastid = db_expression(&tid);
            db_radix = radix;
            db_skip_to_eol();
    
            if (hastid) {
                    thr = kdb_thr_lookup(tid);
                    if (thr != NULL) {
                            err = kdb_thr_select(thr);
                            if (err != 0) {
                                    db_printf("unable to switch to thread %ld\n",
                                        (long)thr->td_tid);
                                    return;
                            }
                            db_dot = PC_REGS();
                    } else {
                            db_printf("%d: invalid thread\n", (int)tid);
                            return;
                    }
            }
    
            db_print_thread();
            db_print_loc_and_inst(PC_REGS());
    }
    
    void
    db_show_threads(db_expr_t addr, boolean_t hasaddr, db_expr_t cnt, char *mod)
    {
            jmp_buf jb;
            void *prev_jb;
            struct thread *thr;
    
            thr = kdb_thr_first();
            while (!db_pager_quit && thr != NULL) {
                    db_printf("  %6ld (%p)  ", (long)thr->td_tid, thr);
                    prev_jb = kdb_jmpbuf(jb);
                    if (setjmp(jb) == 0) {
                           if (db_trace_thread(thr, 1) != 0)
                                   db_printf("***\n");
                   }
                   kdb_jmpbuf(prev_jb);
                   thr = kdb_thr_next(thr);
           }
   }
   
   /*
    * Lookup a thread based on a db expression address.  We assume that the
    * address was parsed in hexadecimal.  We reparse the address in decimal
    * first and try to treat it as a thread ID to find an associated thread.
    * If that fails and check_pid is true, we terat the decimal value as a
    * PID.  If that matches a process, we return the first thread in that
    * process.  Otherwise, we treat the addr as a pointer to a thread.
    */
   struct thread *
   db_lookup_thread(db_expr_t addr, boolean_t check_pid)
   {
           struct thread *td;
           db_expr_t decaddr;
           struct proc *p;
   
           /*
            * If the parsed address was not a valid decimal expression,
            * assume it is a thread pointer.
            */
           decaddr = db_hex2dec(addr);
           if (decaddr == -1)
                   return ((struct thread *)addr);
   
           td = kdb_thr_lookup(decaddr);
           if (td != NULL)
                   return (td);
           if (check_pid) {
                   FOREACH_PROC_IN_SYSTEM(p) {
                           if (p->p_pid == decaddr)
                                   return (FIRST_THREAD_IN_PROC(p));
                   }
                   LIST_FOREACH(p, &zombproc, p_list) {
                           if (p->p_pid == decaddr)
                                   return (FIRST_THREAD_IN_PROC(p));
                   }
           }
           return ((struct thread *)addr);
   }
   
   /*
    * Lookup a process based on a db expression address.  We assume that the
    * address was parsed in hexadecimal.  We reparse the address in decimal
    * first and try to treat it as a PID to find an associated process.
    * If that fails we treat the addr as a pointer to a process.
    */
   struct proc *
   db_lookup_proc(db_expr_t addr)
   {
           db_expr_t decaddr;
           struct proc *p;
   
           decaddr = db_hex2dec(addr);
           if (decaddr != -1) {
                   FOREACH_PROC_IN_SYSTEM(p) {
                           if (p->p_pid == decaddr)
                                   return (p);
                   }
                   LIST_FOREACH(p, &zombproc, p_list) {
                           if (p->p_pid == decaddr)
                                   return (p);
                   }
           }
           return ((struct proc *)addr);
   }

Cache object: 66bc45433b3ebd0ef3d9718a7abaf24a