FreeBSD/Linux Kernel Cross Reference
sys/kern/debug.c

     /* 
      * Mach Operating System
      * Copyright (c) 1993-1989 Carnegie Mellon University
      * All Rights Reserved.
      * 
      * Permission to use, copy, modify and distribute this software and its
      * documentation is hereby granted, provided that both the copyright
      * notice and this permission notice appear in all copies of the
      * software, derivative works or modified versions, and any portions
     * thereof, and that both notices appear in supporting documentation.
     * 
     * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
     * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
     * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
     * 
     * Carnegie Mellon requests users of this software to return to
     * 
     *  Software Distribution Coordinator  or  Software.Distribution@CS.CMU.EDU
     *  School of Computer Science
     *  Carnegie Mellon University
     *  Pittsburgh PA 15213-3890
     * 
     * any improvements or extensions that they make and grant Carnegie Mellon
     * the rights to redistribute these changes.
     */
    /*
     * HISTORY
     * $Log:        debug.c,v $
     * Revision 2.24  93/11/17  17:08:08  dbg
     *      ANSI-fied.
     *      [93/06/16            dbg]
     * 
     * Revision 2.23  93/01/27  09:34:42  danner
     *      Updated copyright.
     *      [93/01/12            berman]
     *      Changed sun conditional to be sun3, and added sun4 code
     *      in Debugger().
     *      [93/01/11            berman]
     * 
     * Revision 2.22  93/01/14  17:33:54  danner
     *      Added alpha, simplified.
     *      [92/11/30            af]
     * 
     * Revision 2.21  92/08/03  17:36:45  jfriedl
     *      removed silly prototypes
     *      Added pc532 support [Johannes Helander (jvh@cs.hut.fi)]
     *      [92/08/02            jfriedl]
     * 
     * Revision 2.20  92/05/21  17:13:07  jfriedl
     *      Added void type to functions that needed it.
     *      [92/05/16            jfriedl]
     * 
     * Revision 2.19  92/02/19  11:19:26  elf
     *      Added cpu number print, locking to print in Assert for
     *       multiprocessor case.
     *      [92/01/12            danner]
     * 
     * Revision 2.18  91/12/10  16:32:45  jsb
     *      Fixes from Intel
     *      [91/12/10  15:51:54  jsb]
     * 
     * Revision 2.17  91/08/03  18:18:47  jsb
     *      Replaced obsolete NORMA tag with NORMA_IPC.
     *      [91/07/27  18:13:01  jsb]
     * 
     * Revision 2.16  91/07/31  17:44:28  dbg
     *      Minor SUN changes.
     *      [91/07/12            dbg]
     * 
     * Revision 2.15  91/07/09  23:16:17  danner
     *      Luna88k support.
     *      [91/06/26            danner]
     * 
     * Revision 2.14  91/06/17  15:46:57  jsb
     *      Renamed NORMA conditionals.
     *      [91/06/17  10:49:18  jsb]
     * 
     * Revision 2.13  91/05/14  16:40:46  mrt
     *      Correcting copyright
     * 
     * Revision 2.12  91/03/16  14:49:39  rpd
     *      In panic, only call halt_cpu when not calling Debugger.
     *      [91/03/12            rpd]
     * 
     * Revision 2.11  91/02/05  17:25:52  mrt
     *      Changed to new Mach copyright
     *      [91/02/01  16:11:43  mrt]
     * 
     * Revision 2.10  90/12/14  11:02:02  jsb
     *      NORMA_IPC support: print node number as well as cpu in panic.
     *      [90/12/13  21:40:37  jsb]
     * 
     * Revision 2.9  90/12/04  14:51:00  jsb
     *      Added i860 support for Debugger function.
     *      [90/12/04  11:01:25  jsb]
     * 
     * Revision 2.8  90/11/05  14:30:49  rpd
     *      Added Assert.
     *      [90/11/04            rpd]
    * 
    * Revision 2.7  90/10/25  14:45:10  rwd
    *      Change sun3 debugger invocation.
    *      [90/10/17            rwd]
    * 
    * Revision 2.6  90/09/09  23:20:09  rpd
    *      Fixed panic and log to supply cnputc to _doprnt.
    *      [90/09/09            rpd]
    * 
    * Revision 2.5  90/09/09  14:32:03  rpd
    *      Use decl_simple_lock_data.
    *      [90/08/30            rpd]
    * 
    * Revision 2.4  90/08/27  22:02:14  dbg
    *      Pass extra argument to _doprnt.
    *      [90/08/21            dbg]
    * 
    * Revision 2.3  90/05/03  15:46:53  dbg
    *      Added i386 case.
    *      [90/02/21            dbg]
    * 
    * Revision 2.2  89/11/29  14:09:04  af
    *      Added mips case, RCS-ed.
    *      [89/10/28            af]
    * 
    */
   
   #include <mach_kdb.h>
   #include <norma_ipc.h>
   #include <cpus.h>
   
   #include <kern/assert.h>
   #include <kern/cpu_number.h>
   #include <kern/kern_io.h>
   #include <kern/lock.h>
   #include <kern/machine.h>
   #include <kern/thread.h>
   #include <sys/stdarg.h>
   
   
   #if     MACH_KDB
   extern int db_breakpoints_inserted;
   #endif
   
   #if     NCPUS > 1
   simple_lock_data_t Assert_print_lock; /* uninited, we take our chances */
   #endif
   
   void Assert(
           const char *file,
           const int line)
   {
   #if NCPUS > 1
           simple_lock(&Assert_print_lock);
           printf("{%d} Assertion failed: file \"%s\", line %d\n", 
                  cpu_number(), file, line);
           simple_unlock(&Assert_print_lock);
   #else
           printf("Assertion failed: file \"%s\", line %d\n", file, line);
   #endif
   
   #if     MACH_KDB
           if (db_breakpoints_inserted)
   #endif
           Debugger("assertion failure");
   }
   
   void Debugger(
           const char *    message)
   {
   #ifdef  lint
           message++;
   #endif  /* lint */
   
   #if     defined(vax) || defined(PC532)
           asm("bpt");
   #endif  /* vax */
   
   #ifdef  sun3
           current_thread()->pcb->flag |= TRACE_KDB;
           asm("orw  #0x00008000,sr");
   #endif  /* sun3 */
   #ifdef  sun4
           current_thread()->pcb->pcb_flag |= TRACE_KDB;
           asm("ta 0x81");
   #endif  /* sun4 */
   
   #if     defined(mips ) || defined(luna88k) || defined(i860) || defined(alpha)
           gimmeabreak();
   #endif
   
   #ifdef  i386
           asm("int3");
   #endif
   }
   
   const char              *panicstr;
   decl_simple_lock_data(, panic_lock)
   int                     paniccpu;
   
   void
   panic_init(void)
   {
           simple_lock_init(&panic_lock);
   }
   
   /*VARARGS1*/
   void
   panic(const char *s, ...)
   {
           va_list listp;
   #if     NORMA_IPC
           extern int _node_self;  /* node_self() may not be callable yet */
   #endif  /* NORMA_IPC */
   
           simple_lock(&panic_lock);
           if (panicstr) {
               if (cpu_number() != paniccpu) {
                   simple_unlock(&panic_lock);
                   halt_cpu();
                   /* NOTREACHED */
               }
           }
           else {
               panicstr = s;
               paniccpu = cpu_number();
           }
           simple_unlock(&panic_lock);
           printf("panic");
   #if     NORMA_IPC
           printf("(node %U)", _node_self);
   #endif
   #if     NCPUS > 1
           printf("(cpu %U)", paniccpu);
   #endif
           printf(": ");
           va_start(listp, s);
           _doprnt(s, &listp, (void (*)(char, void *))cnputc, 16, 0);
           va_end(listp);
           printf("\n");
   
   #if     MACH_KDB
           Debugger("panic");
   #else
           halt_cpu();
   #endif
   }
   
   /*
    * We'd like to use BSD's log routines here...
    */
   /*VARARGS2*/
   void
   log(int level, const char *fmt, ...)
   {
           va_list listp;
   
   #ifdef lint
           level++;
   #endif
           va_start(listp, fmt);
           _doprnt(fmt, &listp, (void (*)(char, void *))cnputc, 16, 0);
           va_end(listp);
   }

Cache object: 2040457de297199b0bbc701b77cebcee