Home | History | Annotate | Line # | Download | only in kern
subr_prf.c revision 1.185
      1  1.185      maxv /*	$NetBSD: subr_prf.c,v 1.185 2020/07/11 07:14:53 maxv Exp $	*/
      2   1.15       cgd 
      3   1.12       cgd /*-
      4   1.12       cgd  * Copyright (c) 1986, 1988, 1991, 1993
      5   1.12       cgd  *	The Regents of the University of California.  All rights reserved.
      6   1.12       cgd  * (c) UNIX System Laboratories, Inc.
      7   1.12       cgd  * All or some portions of this file are derived from material licensed
      8   1.12       cgd  * to the University of California by American Telephone and Telegraph
      9   1.12       cgd  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
     10   1.12       cgd  * the permission of UNIX System Laboratories, Inc.
     11   1.12       cgd  *
     12   1.12       cgd  * Redistribution and use in source and binary forms, with or without
     13   1.12       cgd  * modification, are permitted provided that the following conditions
     14   1.12       cgd  * are met:
     15   1.12       cgd  * 1. Redistributions of source code must retain the above copyright
     16   1.12       cgd  *    notice, this list of conditions and the following disclaimer.
     17   1.12       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     18   1.12       cgd  *    notice, this list of conditions and the following disclaimer in the
     19   1.12       cgd  *    documentation and/or other materials provided with the distribution.
     20   1.93       agc  * 3. Neither the name of the University nor the names of its contributors
     21   1.12       cgd  *    may be used to endorse or promote products derived from this software
     22   1.12       cgd  *    without specific prior written permission.
     23   1.12       cgd  *
     24   1.12       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     25   1.12       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     26   1.12       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     27   1.12       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     28   1.12       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     29   1.12       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     30   1.12       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     31   1.12       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     32   1.12       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     33   1.12       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     34   1.12       cgd  * SUCH DAMAGE.
     35   1.12       cgd  *
     36   1.48      fvdl  *	@(#)subr_prf.c	8.4 (Berkeley) 5/4/95
     37   1.12       cgd  */
     38   1.82     lukem 
     39   1.82     lukem #include <sys/cdefs.h>
     40  1.185      maxv __KERNEL_RCSID(0, "$NetBSD: subr_prf.c,v 1.185 2020/07/11 07:14:53 maxv Exp $");
     41   1.54   thorpej 
     42  1.159     pooka #ifdef _KERNEL_OPT
     43   1.49  jonathan #include "opt_ddb.h"
     44   1.80     lukem #include "opt_kgdb.h"
     45   1.90    atatat #include "opt_dump.h"
     46  1.154       tls #include "opt_rnd_printf.h"
     47  1.159     pooka #endif
     48   1.12       cgd 
     49   1.12       cgd #include <sys/param.h>
     50   1.78    kleink #include <sys/stdint.h>
     51   1.12       cgd #include <sys/systm.h>
     52   1.12       cgd #include <sys/buf.h>
     53  1.109        he #include <sys/device.h>
     54   1.12       cgd #include <sys/reboot.h>
     55   1.12       cgd #include <sys/msgbuf.h>
     56   1.12       cgd #include <sys/proc.h>
     57   1.12       cgd #include <sys/ioctl.h>
     58   1.12       cgd #include <sys/vnode.h>
     59   1.12       cgd #include <sys/file.h>
     60   1.12       cgd #include <sys/tty.h>
     61   1.12       cgd #include <sys/tprintf.h>
     62  1.137    dyoung #include <sys/spldebug.h>
     63   1.12       cgd #include <sys/syslog.h>
     64   1.87   thorpej #include <sys/kprintf.h>
     65  1.115        ad #include <sys/atomic.h>
     66  1.126     pooka #include <sys/kernel.h>
     67  1.128     pooka #include <sys/cpu.h>
     68  1.158  riastrad #include <sys/rndsource.h>
     69  1.178       kre #include <sys/kmem.h>
     70   1.12       cgd 
     71   1.20  christos #include <dev/cons.h>
     72   1.20  christos 
     73  1.108     joerg #include <net/if.h>
     74  1.108     joerg 
     75  1.126     pooka static kmutex_t kprintf_mtx;
     76  1.126     pooka static bool kprintf_inited = false;
     77   1.49  jonathan 
     78   1.22  christos #ifdef KGDB
     79   1.42   thorpej #include <sys/kgdb.h>
     80   1.12       cgd #endif
     81  1.150       apb 
     82   1.45     chuck #ifdef DDB
     83  1.150       apb #include <ddb/ddbvar.h>		/* db_panic */
     84   1.45     chuck #include <ddb/db_output.h>	/* db_printf, db_putchar prototypes */
     85   1.45     chuck #endif
     86   1.45     chuck 
     87   1.45     chuck 
     88   1.45     chuck /*
     89   1.45     chuck  * defines
     90   1.45     chuck  */
     91  1.164  christos #define KLOG_PRI	0x80000000
     92   1.45     chuck 
     93   1.45     chuck 
     94   1.45     chuck /*
     95   1.45     chuck  * local prototypes
     96   1.45     chuck  */
     97   1.45     chuck 
     98   1.94  junyoung static void	 putchar(int, int, struct tty *);
     99   1.20  christos 
    100   1.12       cgd 
    101   1.37   thorpej /*
    102   1.45     chuck  * globals
    103   1.37   thorpej  */
    104   1.37   thorpej 
    105   1.77   tsutsui extern	struct tty *constty;	/* pointer to console "window" tty */
    106   1.45     chuck extern	int log_open;	/* subr_log: is /dev/klog open? */
    107   1.45     chuck const	char *panicstr; /* arg to first call to panic (used as a flag
    108   1.45     chuck 			   to indicate that panic has already been called). */
    109  1.115        ad struct cpu_info *paniccpu;	/* cpu that first paniced */
    110   1.79    simonb long	panicstart, panicend;	/* position in the msgbuf of the start and
    111   1.79    simonb 				   end of the formatted panicstr. */
    112   1.74  sommerfe int	doing_shutdown;	/* set to indicate shutdown in progress */
    113   1.45     chuck 
    114  1.154       tls #ifdef RND_PRINTF
    115  1.183  riastrad static krndsource_t	rnd_printf_source;
    116  1.154       tls #endif
    117  1.154       tls 
    118   1.90    atatat #ifndef	DUMP_ON_PANIC
    119   1.90    atatat #define	DUMP_ON_PANIC	1
    120   1.90    atatat #endif
    121   1.90    atatat int	dumponpanic = DUMP_ON_PANIC;
    122   1.90    atatat 
    123   1.45     chuck /*
    124   1.45     chuck  * v_putc: routine to putc on virtual console
    125   1.45     chuck  *
    126   1.45     chuck  * the v_putc pointer can be used to redirect the console cnputc elsewhere
    127   1.45     chuck  * [e.g. to a "virtual console"].
    128   1.45     chuck  */
    129   1.12       cgd 
    130   1.94  junyoung void (*v_putc)(int) = cnputc;	/* start with cnputc (normal cons) */
    131   1.94  junyoung void (*v_flush)(void) = cnflush;	/* start with cnflush (normal cons) */
    132   1.12       cgd 
    133  1.127     pooka const char hexdigits[] = "0123456789abcdef";
    134  1.127     pooka const char HEXDIGITS[] = "0123456789ABCDEF";
    135  1.127     pooka 
    136   1.12       cgd 
    137   1.45     chuck /*
    138   1.45     chuck  * functions
    139   1.45     chuck  */
    140   1.12       cgd 
    141   1.12       cgd /*
    142  1.126     pooka  * Locking is inited fairly early in MI bootstrap.  Before that
    143  1.126     pooka  * prints are done unlocked.  But that doesn't really matter,
    144  1.126     pooka  * since nothing can preempt us before interrupts are enabled.
    145  1.126     pooka  */
    146  1.126     pooka void
    147  1.132    cegger kprintf_init(void)
    148  1.126     pooka {
    149  1.126     pooka 
    150  1.126     pooka 	KASSERT(!kprintf_inited && cold); /* not foolproof, but ... */
    151  1.183  riastrad 	mutex_init(&kprintf_mtx, MUTEX_DEFAULT, IPL_HIGH);
    152  1.154       tls #ifdef RND_PRINTF
    153  1.183  riastrad 	rnd_attach_source(&rnd_printf_source, "printf", RND_TYPE_UNKNOWN,
    154  1.183  riastrad 	    RND_FLAG_COLLECT_TIME|RND_FLAG_COLLECT_VALUE);
    155  1.154       tls #endif
    156  1.126     pooka 	kprintf_inited = true;
    157  1.126     pooka }
    158  1.126     pooka 
    159  1.126     pooka void
    160  1.132    cegger kprintf_lock(void)
    161  1.126     pooka {
    162  1.126     pooka 
    163  1.126     pooka 	if (__predict_true(kprintf_inited))
    164  1.126     pooka 		mutex_enter(&kprintf_mtx);
    165  1.126     pooka }
    166  1.126     pooka 
    167  1.126     pooka void
    168  1.132    cegger kprintf_unlock(void)
    169  1.126     pooka {
    170  1.126     pooka 
    171  1.126     pooka 	if (__predict_true(kprintf_inited)) {
    172  1.126     pooka 		/* assert kprintf wasn't somehow inited while we were in */
    173  1.126     pooka 		KASSERT(mutex_owned(&kprintf_mtx));
    174  1.126     pooka 		mutex_exit(&kprintf_mtx);
    175  1.126     pooka 	}
    176  1.126     pooka }
    177  1.126     pooka 
    178  1.126     pooka /*
    179   1.89   thorpej  * twiddle: spin a little propellor on the console.
    180   1.89   thorpej  */
    181   1.89   thorpej 
    182   1.89   thorpej void
    183   1.89   thorpej twiddle(void)
    184   1.89   thorpej {
    185   1.89   thorpej 	static const char twiddle_chars[] = "|/-\\";
    186   1.89   thorpej 	static int pos;
    187   1.89   thorpej 
    188  1.126     pooka 	kprintf_lock();
    189   1.89   thorpej 
    190  1.175    martin 	putchar(twiddle_chars[pos++ & 3], TOCONS|NOTSTAMP, NULL);
    191  1.175    martin 	putchar('\b', TOCONS|NOTSTAMP, NULL);
    192   1.89   thorpej 
    193  1.126     pooka 	kprintf_unlock();
    194   1.89   thorpej }
    195   1.89   thorpej 
    196   1.89   thorpej /*
    197   1.45     chuck  * panic: handle an unresolvable fatal error
    198   1.45     chuck  *
    199   1.45     chuck  * prints "panic: <message>" and reboots.   if called twice (i.e. recursive
    200  1.138        he  * call) we avoid trying to dump and just reboot (to avoid recursive panics).
    201   1.12       cgd  */
    202   1.45     chuck 
    203   1.14       cgd void
    204   1.12       cgd panic(const char *fmt, ...)
    205   1.12       cgd {
    206  1.143  christos 	va_list ap;
    207  1.143  christos 
    208  1.143  christos 	va_start(ap, fmt);
    209  1.143  christos 	vpanic(fmt, ap);
    210  1.143  christos 	va_end(ap);
    211  1.143  christos }
    212  1.143  christos 
    213  1.143  christos void
    214  1.143  christos vpanic(const char *fmt, va_list ap)
    215  1.143  christos {
    216  1.115        ad 	CPU_INFO_ITERATOR cii;
    217  1.115        ad 	struct cpu_info *ci, *oci;
    218   1.14       cgd 	int bootopt;
    219  1.160     skrll 	static char scratchstr[384]; /* stores panic message */
    220   1.12       cgd 
    221  1.137    dyoung 	spldebug_stop();
    222  1.137    dyoung 
    223  1.131   mlelstv 	if (lwp0.l_cpu && curlwp) {
    224  1.131   mlelstv 		/*
    225  1.131   mlelstv 		 * Disable preemption.  If already panicing on another CPU, sit
    226  1.131   mlelstv 		 * here and spin until the system is rebooted.  Allow the CPU that
    227  1.131   mlelstv 		 * first paniced to panic again.
    228  1.131   mlelstv 		 */
    229  1.131   mlelstv 		kpreempt_disable();
    230  1.131   mlelstv 		ci = curcpu();
    231  1.131   mlelstv 		oci = atomic_cas_ptr((void *)&paniccpu, NULL, ci);
    232  1.131   mlelstv 		if (oci != NULL && oci != ci) {
    233  1.131   mlelstv 			/* Give interrupts a chance to try and prevent deadlock. */
    234  1.131   mlelstv 			for (;;) {
    235  1.130     pooka #ifndef _RUMPKERNEL /* XXXpooka: temporary build fix, see kern/40505 */
    236  1.131   mlelstv 				DELAY(10);
    237  1.129     pooka #endif /* _RUMPKERNEL */
    238  1.131   mlelstv 			}
    239  1.115        ad 		}
    240  1.115        ad 
    241  1.131   mlelstv 		/*
    242  1.131   mlelstv 		 * Convert the current thread to a bound thread and prevent all
    243  1.131   mlelstv 		 * CPUs from scheduling unbound jobs.  Do so without taking any
    244  1.131   mlelstv 		 * locks.
    245  1.131   mlelstv 		 */
    246  1.131   mlelstv 		curlwp->l_pflag |= LP_BOUND;
    247  1.131   mlelstv 		for (CPU_INFO_FOREACH(cii, ci)) {
    248  1.131   mlelstv 			ci->ci_schedstate.spc_flags |= SPCF_OFFLINE;
    249  1.131   mlelstv 		}
    250  1.115        ad 	}
    251  1.115        ad 
    252  1.125        ad 	bootopt = RB_AUTOBOOT | RB_NOSYNC;
    253  1.138        he 	if (!doing_shutdown) {
    254  1.138        he 		if (dumponpanic)
    255  1.138        he 			bootopt |= RB_DUMP;
    256  1.138        he 	} else
    257  1.138        he 		printf("Skipping crash dump on recursive panic\n");
    258  1.138        he 
    259   1.74  sommerfe 	doing_shutdown = 1;
    260   1.79    simonb 
    261  1.163  christos 	if (logenabled(msgbufp))
    262   1.79    simonb 		panicstart = msgbufp->msg_bufx;
    263   1.96     perry 
    264   1.45     chuck 	printf("panic: ");
    265  1.142       jym 	if (panicstr == NULL) {
    266  1.142       jym 		/* first time in panic - store fmt first for precaution */
    267  1.142       jym 		panicstr = fmt;
    268  1.142       jym 
    269  1.142       jym 		vsnprintf(scratchstr, sizeof(scratchstr), fmt, ap);
    270  1.142       jym 		printf("%s", scratchstr);
    271  1.142       jym 		panicstr = scratchstr;
    272  1.142       jym 	} else {
    273  1.142       jym 		vprintf(fmt, ap);
    274  1.142       jym 	}
    275   1.45     chuck 	printf("\n");
    276   1.79    simonb 
    277  1.163  christos 	if (logenabled(msgbufp))
    278   1.79    simonb 		panicend = msgbufp->msg_bufx;
    279   1.12       cgd 
    280   1.12       cgd #ifdef KGDB
    281   1.12       cgd 	kgdb_panic();
    282   1.12       cgd #endif
    283   1.12       cgd #ifdef KADB
    284   1.14       cgd 	if (boothowto & RB_KDB)
    285   1.14       cgd 		kdbpanic();
    286   1.12       cgd #endif
    287   1.12       cgd #ifdef DDB
    288  1.150       apb 	db_panic();
    289   1.12       cgd #endif
    290  1.182   thorpej 	kern_reboot(bootopt, NULL);
    291   1.12       cgd }
    292   1.12       cgd 
    293   1.12       cgd /*
    294   1.45     chuck  * kernel logging functions: log, logpri, addlog
    295   1.45     chuck  */
    296   1.45     chuck 
    297   1.45     chuck /*
    298   1.45     chuck  * log: write to the log buffer
    299   1.45     chuck  *
    300   1.45     chuck  * => will not sleep [so safe to call from interrupt]
    301   1.45     chuck  * => will log to console if /dev/klog isn't open
    302   1.45     chuck  */
    303   1.45     chuck 
    304   1.45     chuck void
    305   1.45     chuck log(int level, const char *fmt, ...)
    306   1.45     chuck {
    307   1.45     chuck 	va_list ap;
    308   1.45     chuck 
    309  1.126     pooka 	kprintf_lock();
    310   1.54   thorpej 
    311   1.54   thorpej 	klogpri(level);		/* log the level first */
    312   1.45     chuck 	va_start(ap, fmt);
    313   1.45     chuck 	kprintf(fmt, TOLOG, NULL, NULL, ap);
    314   1.45     chuck 	va_end(ap);
    315   1.45     chuck 	if (!log_open) {
    316   1.45     chuck 		va_start(ap, fmt);
    317   1.45     chuck 		kprintf(fmt, TOCONS, NULL, NULL, ap);
    318   1.45     chuck 		va_end(ap);
    319   1.45     chuck 	}
    320   1.64   thorpej 
    321  1.126     pooka 	kprintf_unlock();
    322   1.64   thorpej 
    323   1.64   thorpej 	logwakeup();		/* wake up anyone waiting for log msgs */
    324   1.64   thorpej }
    325   1.64   thorpej 
    326   1.64   thorpej /*
    327  1.149  dholland  * vlog: write to the log buffer [already have va_list]
    328   1.64   thorpej  */
    329   1.64   thorpej 
    330   1.64   thorpej void
    331   1.99   thorpej vlog(int level, const char *fmt, va_list ap)
    332   1.64   thorpej {
    333  1.145  christos 	va_list cap;
    334   1.64   thorpej 
    335  1.145  christos 	va_copy(cap, ap);
    336  1.126     pooka 	kprintf_lock();
    337   1.64   thorpej 
    338   1.64   thorpej 	klogpri(level);		/* log the level first */
    339   1.64   thorpej 	kprintf(fmt, TOLOG, NULL, NULL, ap);
    340   1.64   thorpej 	if (!log_open)
    341  1.145  christos 		kprintf(fmt, TOCONS, NULL, NULL, cap);
    342   1.54   thorpej 
    343  1.126     pooka 	kprintf_unlock();
    344  1.145  christos 	va_end(cap);
    345   1.54   thorpej 
    346   1.45     chuck 	logwakeup();		/* wake up anyone waiting for log msgs */
    347   1.45     chuck }
    348   1.45     chuck 
    349   1.45     chuck /*
    350   1.45     chuck  * logpri: log the priority level to the klog
    351   1.45     chuck  */
    352   1.45     chuck 
    353   1.54   thorpej void
    354   1.99   thorpej logpri(int level)
    355   1.45     chuck {
    356   1.54   thorpej 
    357  1.126     pooka 	kprintf_lock();
    358   1.54   thorpej 	klogpri(level);
    359  1.126     pooka 	kprintf_unlock();
    360   1.54   thorpej }
    361   1.54   thorpej 
    362   1.54   thorpej /*
    363   1.54   thorpej  * Note: we must be in the mutex here!
    364   1.54   thorpej  */
    365   1.87   thorpej void
    366   1.99   thorpej klogpri(int level)
    367   1.54   thorpej {
    368  1.164  christos 	KASSERT((level & KLOG_PRI) == 0);
    369   1.45     chuck 
    370  1.164  christos 	putchar(level | KLOG_PRI, TOLOG, NULL);
    371   1.45     chuck }
    372   1.45     chuck 
    373   1.45     chuck /*
    374   1.45     chuck  * addlog: add info to previous log message
    375   1.12       cgd  */
    376   1.45     chuck 
    377   1.12       cgd void
    378   1.45     chuck addlog(const char *fmt, ...)
    379   1.45     chuck {
    380   1.45     chuck 	va_list ap;
    381   1.45     chuck 
    382  1.126     pooka 	kprintf_lock();
    383   1.54   thorpej 
    384   1.45     chuck 	va_start(ap, fmt);
    385   1.45     chuck 	kprintf(fmt, TOLOG, NULL, NULL, ap);
    386   1.45     chuck 	va_end(ap);
    387   1.45     chuck 	if (!log_open) {
    388   1.45     chuck 		va_start(ap, fmt);
    389   1.45     chuck 		kprintf(fmt, TOCONS, NULL, NULL, ap);
    390   1.45     chuck 		va_end(ap);
    391   1.45     chuck 	}
    392   1.54   thorpej 
    393  1.126     pooka 	kprintf_unlock();
    394   1.54   thorpej 
    395   1.45     chuck 	logwakeup();
    396   1.45     chuck }
    397   1.45     chuck 
    398   1.45     chuck static void
    399  1.164  christos putone(int c, int flags, struct tty *tp)
    400   1.12       cgd {
    401   1.45     chuck 	if (panicstr)
    402   1.45     chuck 		constty = NULL;
    403  1.164  christos 
    404   1.45     chuck 	if ((flags & TOCONS) && tp == NULL && constty) {
    405   1.45     chuck 		tp = constty;
    406   1.45     chuck 		flags |= TOTTY;
    407   1.45     chuck 	}
    408   1.91  christos 	if ((flags & TOTTY) && tp &&
    409   1.91  christos 	    tputchar(c, flags, tp) < 0 &&
    410   1.45     chuck 	    (flags & TOCONS) && tp == constty)
    411   1.45     chuck 		constty = NULL;
    412   1.45     chuck 	if ((flags & TOLOG) &&
    413  1.111        ad 	    c != '\0' && c != '\r' && c != 0177)
    414  1.111        ad 	    	logputchar(c);
    415   1.45     chuck 	if ((flags & TOCONS) && constty == NULL && c != '\0')
    416   1.45     chuck 		(*v_putc)(c);
    417  1.164  christos }
    418  1.164  christos 
    419  1.164  christos static void
    420  1.164  christos putlogpri(int level)
    421  1.164  christos {
    422  1.164  christos 	char *p;
    423  1.164  christos 	char snbuf[KPRINTF_BUFSIZE];
    424  1.164  christos 
    425  1.164  christos 	putone('<', TOLOG, NULL);
    426  1.164  christos 	snprintf(snbuf, sizeof(snbuf), "%d", level);
    427  1.164  christos 	for (p = snbuf ; *p ; p++)
    428  1.164  christos 		putone(*p, TOLOG, NULL);
    429  1.164  christos 	putone('>', TOLOG, NULL);
    430  1.164  christos }
    431  1.164  christos 
    432  1.166  christos #ifndef KLOG_NOTIMESTAMP
    433  1.165  christos static int needtstamp = 1;
    434  1.170       kre int log_ts_prec = 7;
    435  1.165  christos 
    436  1.165  christos static void
    437  1.165  christos addtstamp(int flags, struct tty *tp)
    438  1.165  christos {
    439  1.165  christos 	char buf[64];
    440  1.165  christos 	struct timespec ts;
    441  1.169       kre 	int n, prec;
    442  1.169       kre 	long fsec;
    443  1.169       kre 
    444  1.169       kre 	prec = log_ts_prec;
    445  1.169       kre 	if (prec < 0) {
    446  1.169       kre 		prec = 0;
    447  1.169       kre 		log_ts_prec = prec;
    448  1.169       kre 	} else if (prec > 9) {
    449  1.169       kre 		prec = 9;
    450  1.169       kre 		log_ts_prec = prec;
    451  1.169       kre 	}
    452  1.165  christos 
    453  1.165  christos 	getnanouptime(&ts);
    454  1.169       kre 
    455  1.169       kre 	for (n = prec, fsec = ts.tv_nsec; n < 8; n++)
    456  1.169       kre 		fsec /= 10;
    457  1.169       kre 	if (n < 9)
    458  1.169       kre 		fsec = (fsec / 10) + ((fsec % 10) >= 5);
    459  1.169       kre 
    460  1.169       kre 	n = snprintf(buf, sizeof(buf), "[% 4jd.%.*ld] ",
    461  1.169       kre 	    (intmax_t)ts.tv_sec, prec, fsec);
    462  1.165  christos 
    463  1.165  christos 	for (int i = 0; i < n; i++)
    464  1.165  christos 		putone(buf[i], flags, tp);
    465  1.165  christos }
    466  1.165  christos #endif
    467  1.165  christos 
    468  1.164  christos /*
    469  1.164  christos  * putchar: print a single character on console or user terminal.
    470  1.164  christos  *
    471  1.164  christos  * => if console, then the last MSGBUFS chars are saved in msgbuf
    472  1.164  christos  *	for inspection later (e.g. dmesg/syslog)
    473  1.164  christos  * => we must already be in the mutex!
    474  1.164  christos  */
    475  1.164  christos static void
    476  1.164  christos putchar(int c, int flags, struct tty *tp)
    477  1.164  christos {
    478  1.164  christos 	if (c & KLOG_PRI) {
    479  1.164  christos 		putlogpri(c & ~KLOG_PRI);
    480  1.164  christos 		return;
    481  1.164  christos 	}
    482  1.164  christos 
    483  1.166  christos #ifndef KLOG_NOTIMESTAMP
    484  1.175    martin 	if (c != '\0' && c != '\n' && needtstamp && (flags & NOTSTAMP) == 0) {
    485  1.165  christos 		addtstamp(flags, tp);
    486  1.165  christos 		needtstamp = 0;
    487  1.165  christos 	}
    488  1.165  christos 
    489  1.165  christos 	if (c == '\n')
    490  1.169       kre 		needtstamp = 1;
    491  1.165  christos #endif
    492  1.164  christos 	putone(c, flags, tp);
    493  1.164  christos 
    494   1.45     chuck #ifdef DDB
    495  1.154       tls 	if (flags & TODDB) {
    496   1.45     chuck 		db_putchar(c);
    497  1.154       tls 		return;
    498  1.154       tls 	}
    499  1.154       tls #endif
    500  1.154       tls 
    501  1.154       tls #ifdef RND_PRINTF
    502  1.154       tls 	if (__predict_true(kprintf_inited)) {
    503  1.183  riastrad 		unsigned char ch = c;
    504  1.183  riastrad 		rnd_add_data(&rnd_printf_source, &ch, 1, 0);
    505  1.154       tls 	}
    506   1.45     chuck #endif
    507   1.12       cgd }
    508   1.12       cgd 
    509  1.127     pooka /*
    510  1.127     pooka  * tablefull: warn that a system table is full
    511  1.127     pooka  */
    512  1.127     pooka 
    513  1.127     pooka void
    514  1.127     pooka tablefull(const char *tab, const char *hint)
    515  1.127     pooka {
    516  1.127     pooka 	if (hint)
    517  1.127     pooka 		log(LOG_ERR, "%s: table is full - %s\n", tab, hint);
    518  1.127     pooka 	else
    519  1.127     pooka 		log(LOG_ERR, "%s: table is full\n", tab);
    520  1.127     pooka }
    521  1.127     pooka 
    522   1.45     chuck 
    523   1.12       cgd /*
    524   1.45     chuck  * uprintf: print to the controlling tty of the current process
    525   1.45     chuck  *
    526   1.45     chuck  * => we may block if the tty queue is full
    527   1.45     chuck  * => no message is printed if the queue doesn't clear in a reasonable
    528   1.45     chuck  *	time
    529   1.12       cgd  */
    530   1.45     chuck 
    531   1.12       cgd void
    532   1.12       cgd uprintf(const char *fmt, ...)
    533   1.12       cgd {
    534   1.69  augustss 	struct proc *p = curproc;
    535   1.12       cgd 	va_list ap;
    536   1.12       cgd 
    537  1.184        ad 	/* mutex_enter(&proc_lock); XXXSMP */
    538  1.104        ad 
    539  1.104        ad 	if (p->p_lflag & PL_CONTROLT && p->p_session->s_ttyvp) {
    540  1.104        ad 		/* No mutex needed; going to process TTY. */
    541  1.104        ad 		va_start(ap, fmt);
    542  1.104        ad 		kprintf(fmt, TOTTY, p->p_session->s_ttyp, NULL, ap);
    543  1.104        ad 		va_end(ap);
    544  1.104        ad 	}
    545  1.104        ad 
    546  1.184        ad 	/* mutex_exit(&proc_lock); XXXSMP */
    547  1.104        ad }
    548  1.104        ad 
    549  1.104        ad void
    550  1.104        ad uprintf_locked(const char *fmt, ...)
    551  1.104        ad {
    552  1.104        ad 	struct proc *p = curproc;
    553  1.104        ad 	va_list ap;
    554  1.104        ad 
    555  1.104        ad 	if (p->p_lflag & PL_CONTROLT && p->p_session->s_ttyvp) {
    556   1.54   thorpej 		/* No mutex needed; going to process TTY. */
    557   1.12       cgd 		va_start(ap, fmt);
    558   1.45     chuck 		kprintf(fmt, TOTTY, p->p_session->s_ttyp, NULL, ap);
    559   1.12       cgd 		va_end(ap);
    560   1.12       cgd 	}
    561   1.12       cgd }
    562   1.12       cgd 
    563   1.45     chuck /*
    564   1.45     chuck  * tprintf functions: used to send messages to a specific process
    565   1.45     chuck  *
    566   1.45     chuck  * usage:
    567   1.45     chuck  *   get a tpr_t handle on a process "p" by using "tprintf_open(p)"
    568   1.45     chuck  *   use the handle when calling "tprintf"
    569   1.45     chuck  *   when done, do a "tprintf_close" to drop the handle
    570   1.45     chuck  */
    571   1.45     chuck 
    572   1.45     chuck /*
    573   1.45     chuck  * tprintf_open: get a tprintf handle on a process "p"
    574   1.45     chuck  *
    575   1.45     chuck  * => returns NULL if process can't be printed to
    576   1.45     chuck  */
    577   1.45     chuck 
    578   1.12       cgd tpr_t
    579   1.99   thorpej tprintf_open(struct proc *p)
    580   1.12       cgd {
    581  1.104        ad 	tpr_t cookie;
    582   1.12       cgd 
    583  1.104        ad 	cookie = NULL;
    584  1.104        ad 
    585  1.184        ad 	mutex_enter(&proc_lock);
    586  1.104        ad 	if (p->p_lflag & PL_CONTROLT && p->p_session->s_ttyvp) {
    587  1.133     rmind 		proc_sesshold(p->p_session);
    588  1.104        ad 		cookie = (tpr_t)p->p_session;
    589   1.12       cgd 	}
    590  1.184        ad 	mutex_exit(&proc_lock);
    591  1.104        ad 
    592  1.104        ad 	return cookie;
    593   1.12       cgd }
    594   1.12       cgd 
    595   1.45     chuck /*
    596   1.45     chuck  * tprintf_close: dispose of a tprintf handle obtained with tprintf_open
    597   1.45     chuck  */
    598   1.45     chuck 
    599   1.12       cgd void
    600   1.99   thorpej tprintf_close(tpr_t sess)
    601   1.12       cgd {
    602   1.12       cgd 
    603  1.118      yamt 	if (sess) {
    604  1.184        ad 		mutex_enter(&proc_lock);
    605  1.133     rmind 		/* Releases proc_lock. */
    606  1.133     rmind 		proc_sessrele((struct session *)sess);
    607  1.118      yamt 	}
    608   1.12       cgd }
    609   1.12       cgd 
    610   1.12       cgd /*
    611   1.96     perry  * tprintf: given tprintf handle to a process [obtained with tprintf_open],
    612   1.45     chuck  * send a message to the controlling tty for that process.
    613   1.45     chuck  *
    614   1.45     chuck  * => also sends message to /dev/klog
    615   1.12       cgd  */
    616   1.12       cgd void
    617   1.12       cgd tprintf(tpr_t tpr, const char *fmt, ...)
    618   1.12       cgd {
    619   1.69  augustss 	struct session *sess = (struct session *)tpr;
    620   1.12       cgd 	struct tty *tp = NULL;
    621  1.126     pooka 	int flags = TOLOG;
    622   1.12       cgd 	va_list ap;
    623   1.12       cgd 
    624  1.184        ad 	/* mutex_enter(&proc_lock); XXXSMP */
    625   1.12       cgd 	if (sess && sess->s_ttyvp && ttycheckoutq(sess->s_ttyp, 0)) {
    626   1.12       cgd 		flags |= TOTTY;
    627   1.12       cgd 		tp = sess->s_ttyp;
    628   1.12       cgd 	}
    629   1.54   thorpej 
    630  1.126     pooka 	kprintf_lock();
    631   1.54   thorpej 
    632   1.54   thorpej 	klogpri(LOG_INFO);
    633   1.12       cgd 	va_start(ap, fmt);
    634   1.45     chuck 	kprintf(fmt, flags, tp, NULL, ap);
    635   1.12       cgd 	va_end(ap);
    636   1.54   thorpej 
    637  1.126     pooka 	kprintf_unlock();
    638  1.184        ad 	/* mutex_exit(&proc_lock);	XXXSMP */
    639   1.54   thorpej 
    640   1.12       cgd 	logwakeup();
    641   1.12       cgd }
    642   1.12       cgd 
    643   1.45     chuck 
    644   1.12       cgd /*
    645   1.45     chuck  * ttyprintf: send a message to a specific tty
    646   1.45     chuck  *
    647   1.45     chuck  * => should be used only by tty driver or anything that knows the
    648   1.52       mrg  *    underlying tty will not be revoked(2)'d away.  [otherwise,
    649   1.52       mrg  *    use tprintf]
    650   1.12       cgd  */
    651   1.12       cgd void
    652   1.12       cgd ttyprintf(struct tty *tp, const char *fmt, ...)
    653   1.12       cgd {
    654   1.12       cgd 	va_list ap;
    655   1.12       cgd 
    656   1.54   thorpej 	/* No mutex needed; going to process TTY. */
    657   1.12       cgd 	va_start(ap, fmt);
    658   1.45     chuck 	kprintf(fmt, TOTTY, tp, NULL, ap);
    659   1.12       cgd 	va_end(ap);
    660   1.12       cgd }
    661   1.12       cgd 
    662   1.45     chuck #ifdef DDB
    663   1.12       cgd 
    664   1.12       cgd /*
    665   1.45     chuck  * db_printf: printf for DDB (via db_putchar)
    666   1.12       cgd  */
    667   1.45     chuck 
    668   1.12       cgd void
    669   1.45     chuck db_printf(const char *fmt, ...)
    670   1.12       cgd {
    671   1.12       cgd 	va_list ap;
    672   1.12       cgd 
    673   1.54   thorpej 	/* No mutex needed; DDB pauses all processors. */
    674   1.12       cgd 	va_start(ap, fmt);
    675   1.45     chuck 	kprintf(fmt, TODDB, NULL, NULL, ap);
    676   1.12       cgd 	va_end(ap);
    677   1.95   reinoud 
    678   1.95   reinoud 	if (db_tee_msgbuf) {
    679   1.95   reinoud 		va_start(ap, fmt);
    680   1.95   reinoud 		kprintf(fmt, TOLOG, NULL, NULL, ap);
    681   1.95   reinoud 		va_end(ap);
    682  1.157   msaitoh 	}
    683   1.84  drochner }
    684   1.84  drochner 
    685   1.84  drochner void
    686   1.99   thorpej db_vprintf(const char *fmt, va_list ap)
    687   1.84  drochner {
    688  1.145  christos 	va_list cap;
    689   1.84  drochner 
    690  1.145  christos 	va_copy(cap, ap);
    691   1.84  drochner 	/* No mutex needed; DDB pauses all processors. */
    692   1.84  drochner 	kprintf(fmt, TODDB, NULL, NULL, ap);
    693   1.95   reinoud 	if (db_tee_msgbuf)
    694  1.145  christos 		kprintf(fmt, TOLOG, NULL, NULL, cap);
    695  1.145  christos 	va_end(cap);
    696   1.12       cgd }
    697   1.12       cgd 
    698   1.45     chuck #endif /* DDB */
    699   1.12       cgd 
    700  1.108     joerg static void
    701  1.108     joerg kprintf_internal(const char *fmt, int oflags, void *vp, char *sbuf, ...)
    702  1.108     joerg {
    703  1.108     joerg 	va_list ap;
    704  1.108     joerg 
    705  1.108     joerg 	va_start(ap, sbuf);
    706  1.108     joerg 	(void)kprintf(fmt, oflags, vp, sbuf, ap);
    707  1.108     joerg 	va_end(ap);
    708  1.108     joerg }
    709  1.108     joerg 
    710   1.88   thorpej /*
    711   1.88   thorpej  * Device autoconfiguration printf routines.  These change their
    712   1.88   thorpej  * behavior based on the AB_* flags in boothowto.  If AB_SILENT
    713   1.88   thorpej  * is set, messages never go to the console (but they still always
    714   1.88   thorpej  * go to the log).  AB_VERBOSE overrides AB_SILENT.
    715   1.88   thorpej  */
    716   1.88   thorpej 
    717   1.88   thorpej /*
    718   1.88   thorpej  * aprint_normal: Send to console unless AB_QUIET.  Always goes
    719   1.88   thorpej  * to the log.
    720   1.88   thorpej  */
    721  1.108     joerg static void
    722  1.108     joerg aprint_normal_internal(const char *prefix, const char *fmt, va_list ap)
    723   1.88   thorpej {
    724  1.126     pooka 	int flags = TOLOG;
    725   1.88   thorpej 
    726   1.88   thorpej 	if ((boothowto & (AB_SILENT|AB_QUIET)) == 0 ||
    727   1.88   thorpej 	    (boothowto & AB_VERBOSE) != 0)
    728   1.88   thorpej 		flags |= TOCONS;
    729   1.96     perry 
    730  1.126     pooka 	kprintf_lock();
    731   1.88   thorpej 
    732  1.108     joerg 	if (prefix)
    733  1.108     joerg 		kprintf_internal("%s: ", flags, NULL, NULL, prefix);
    734   1.88   thorpej 	kprintf(fmt, flags, NULL, NULL, ap);
    735   1.88   thorpej 
    736  1.126     pooka 	kprintf_unlock();
    737   1.96     perry 
    738   1.88   thorpej 	if (!panicstr)
    739   1.88   thorpej 		logwakeup();
    740   1.88   thorpej }
    741   1.88   thorpej 
    742  1.108     joerg void
    743  1.108     joerg aprint_normal(const char *fmt, ...)
    744  1.108     joerg {
    745  1.108     joerg 	va_list ap;
    746  1.108     joerg 
    747  1.108     joerg 	va_start(ap, fmt);
    748  1.108     joerg 	aprint_normal_internal(NULL, fmt, ap);
    749  1.108     joerg 	va_end(ap);
    750  1.108     joerg }
    751  1.108     joerg 
    752  1.108     joerg void
    753  1.108     joerg aprint_normal_dev(device_t dv, const char *fmt, ...)
    754  1.108     joerg {
    755  1.108     joerg 	va_list ap;
    756  1.108     joerg 
    757  1.176  jdolecek 	KASSERT(dv != NULL);
    758  1.176  jdolecek 
    759  1.108     joerg 	va_start(ap, fmt);
    760  1.108     joerg 	aprint_normal_internal(device_xname(dv), fmt, ap);
    761  1.108     joerg 	va_end(ap);
    762  1.108     joerg }
    763  1.108     joerg 
    764  1.108     joerg void
    765  1.108     joerg aprint_normal_ifnet(struct ifnet *ifp, const char *fmt, ...)
    766  1.108     joerg {
    767  1.108     joerg 	va_list ap;
    768  1.108     joerg 
    769  1.176  jdolecek 	KASSERT(ifp != NULL);
    770  1.176  jdolecek 
    771  1.108     joerg 	va_start(ap, fmt);
    772  1.108     joerg 	aprint_normal_internal(ifp->if_xname, fmt, ap);
    773  1.108     joerg 	va_end(ap);
    774  1.108     joerg }
    775  1.108     joerg 
    776   1.88   thorpej /*
    777   1.89   thorpej  * aprint_error: Send to console unless AB_QUIET.  Always goes
    778   1.89   thorpej  * to the log.  Also counts the number of times called so other
    779   1.89   thorpej  * parts of the kernel can report the number of errors during a
    780   1.89   thorpej  * given phase of system startup.
    781   1.89   thorpej  */
    782   1.89   thorpej static int aprint_error_count;
    783   1.89   thorpej 
    784   1.89   thorpej int
    785   1.89   thorpej aprint_get_error_count(void)
    786   1.89   thorpej {
    787  1.126     pooka 	int count;
    788   1.89   thorpej 
    789  1.126     pooka 	kprintf_lock();
    790   1.89   thorpej 
    791   1.89   thorpej 	count = aprint_error_count;
    792   1.89   thorpej 	aprint_error_count = 0;
    793   1.89   thorpej 
    794  1.126     pooka 	kprintf_unlock();
    795   1.89   thorpej 
    796   1.89   thorpej 	return (count);
    797   1.89   thorpej }
    798   1.89   thorpej 
    799  1.108     joerg static void
    800  1.108     joerg aprint_error_internal(const char *prefix, const char *fmt, va_list ap)
    801   1.89   thorpej {
    802  1.126     pooka 	int flags = TOLOG;
    803   1.89   thorpej 
    804   1.89   thorpej 	if ((boothowto & (AB_SILENT|AB_QUIET)) == 0 ||
    805   1.89   thorpej 	    (boothowto & AB_VERBOSE) != 0)
    806   1.89   thorpej 		flags |= TOCONS;
    807   1.96     perry 
    808  1.126     pooka 	kprintf_lock();
    809   1.89   thorpej 
    810   1.89   thorpej 	aprint_error_count++;
    811   1.89   thorpej 
    812  1.108     joerg 	if (prefix)
    813  1.108     joerg 		kprintf_internal("%s: ", flags, NULL, NULL, prefix);
    814  1.181  christos 	kprintf_internal("autoconfiguration error: ", TOLOG, NULL, NULL);
    815   1.89   thorpej 	kprintf(fmt, flags, NULL, NULL, ap);
    816   1.89   thorpej 
    817  1.126     pooka 	kprintf_unlock();
    818   1.96     perry 
    819   1.89   thorpej 	if (!panicstr)
    820   1.89   thorpej 		logwakeup();
    821   1.89   thorpej }
    822   1.89   thorpej 
    823  1.108     joerg void
    824  1.108     joerg aprint_error(const char *fmt, ...)
    825  1.108     joerg {
    826  1.108     joerg 	va_list ap;
    827  1.108     joerg 
    828  1.108     joerg 	va_start(ap, fmt);
    829  1.108     joerg 	aprint_error_internal(NULL, fmt, ap);
    830  1.108     joerg 	va_end(ap);
    831  1.108     joerg }
    832  1.108     joerg 
    833  1.108     joerg void
    834  1.108     joerg aprint_error_dev(device_t dv, const char *fmt, ...)
    835  1.108     joerg {
    836  1.108     joerg 	va_list ap;
    837  1.108     joerg 
    838  1.176  jdolecek 	KASSERT(dv != NULL);
    839  1.176  jdolecek 
    840  1.108     joerg 	va_start(ap, fmt);
    841  1.108     joerg 	aprint_error_internal(device_xname(dv), fmt, ap);
    842  1.108     joerg 	va_end(ap);
    843  1.108     joerg }
    844  1.108     joerg 
    845  1.108     joerg void
    846  1.108     joerg aprint_error_ifnet(struct ifnet *ifp, const char *fmt, ...)
    847  1.108     joerg {
    848  1.108     joerg 	va_list ap;
    849  1.108     joerg 
    850  1.176  jdolecek 	KASSERT(ifp != NULL);
    851  1.176  jdolecek 
    852  1.108     joerg 	va_start(ap, fmt);
    853  1.108     joerg 	aprint_error_internal(ifp->if_xname, fmt, ap);
    854  1.108     joerg 	va_end(ap);
    855  1.108     joerg }
    856  1.108     joerg 
    857   1.89   thorpej /*
    858   1.88   thorpej  * aprint_naive: Send to console only if AB_QUIET.  Never goes
    859   1.88   thorpej  * to the log.
    860   1.88   thorpej  */
    861  1.108     joerg static void
    862  1.108     joerg aprint_naive_internal(const char *prefix, const char *fmt, va_list ap)
    863  1.108     joerg {
    864  1.108     joerg 	if ((boothowto & (AB_QUIET|AB_SILENT|AB_VERBOSE)) != AB_QUIET)
    865  1.108     joerg 		return;
    866  1.108     joerg 
    867  1.126     pooka 	kprintf_lock();
    868  1.108     joerg 
    869  1.108     joerg 	if (prefix)
    870  1.108     joerg 		kprintf_internal("%s: ", TOCONS, NULL, NULL, prefix);
    871  1.108     joerg 	kprintf(fmt, TOCONS, NULL, NULL, ap);
    872  1.108     joerg 
    873  1.126     pooka 	kprintf_unlock();
    874  1.108     joerg }
    875  1.108     joerg 
    876   1.88   thorpej void
    877   1.88   thorpej aprint_naive(const char *fmt, ...)
    878   1.88   thorpej {
    879   1.88   thorpej 	va_list ap;
    880   1.88   thorpej 
    881  1.108     joerg 	va_start(ap, fmt);
    882  1.108     joerg 	aprint_naive_internal(NULL, fmt, ap);
    883  1.108     joerg 	va_end(ap);
    884  1.108     joerg }
    885  1.108     joerg 
    886  1.108     joerg void
    887  1.108     joerg aprint_naive_dev(device_t dv, const char *fmt, ...)
    888  1.108     joerg {
    889  1.108     joerg 	va_list ap;
    890  1.108     joerg 
    891  1.176  jdolecek 	KASSERT(dv != NULL);
    892  1.176  jdolecek 
    893  1.108     joerg 	va_start(ap, fmt);
    894  1.108     joerg 	aprint_naive_internal(device_xname(dv), fmt, ap);
    895  1.108     joerg 	va_end(ap);
    896  1.108     joerg }
    897   1.88   thorpej 
    898  1.108     joerg void
    899  1.108     joerg aprint_naive_ifnet(struct ifnet *ifp, const char *fmt, ...)
    900  1.108     joerg {
    901  1.108     joerg 	va_list ap;
    902   1.88   thorpej 
    903  1.176  jdolecek 	KASSERT(ifp != NULL);
    904  1.176  jdolecek 
    905  1.108     joerg 	va_start(ap, fmt);
    906  1.108     joerg 	aprint_naive_internal(ifp->if_xname, fmt, ap);
    907  1.108     joerg 	va_end(ap);
    908   1.88   thorpej }
    909   1.88   thorpej 
    910   1.88   thorpej /*
    911   1.88   thorpej  * aprint_verbose: Send to console only if AB_VERBOSE.  Always
    912   1.88   thorpej  * goes to the log.
    913   1.88   thorpej  */
    914  1.108     joerg static void
    915  1.108     joerg aprint_verbose_internal(const char *prefix, const char *fmt, va_list ap)
    916   1.88   thorpej {
    917  1.126     pooka 	int flags = TOLOG;
    918   1.88   thorpej 
    919   1.88   thorpej 	if (boothowto & AB_VERBOSE)
    920   1.88   thorpej 		flags |= TOCONS;
    921   1.96     perry 
    922  1.126     pooka 	kprintf_lock();
    923   1.88   thorpej 
    924  1.108     joerg 	if (prefix)
    925  1.108     joerg 		kprintf_internal("%s: ", flags, NULL, NULL, prefix);
    926   1.88   thorpej 	kprintf(fmt, flags, NULL, NULL, ap);
    927   1.88   thorpej 
    928  1.126     pooka 	kprintf_unlock();
    929   1.96     perry 
    930   1.88   thorpej 	if (!panicstr)
    931   1.88   thorpej 		logwakeup();
    932   1.88   thorpej }
    933   1.88   thorpej 
    934  1.108     joerg void
    935  1.108     joerg aprint_verbose(const char *fmt, ...)
    936  1.108     joerg {
    937  1.108     joerg 	va_list ap;
    938  1.108     joerg 
    939  1.108     joerg 	va_start(ap, fmt);
    940  1.108     joerg 	aprint_verbose_internal(NULL, fmt, ap);
    941  1.108     joerg 	va_end(ap);
    942  1.108     joerg }
    943  1.108     joerg 
    944  1.108     joerg void
    945  1.108     joerg aprint_verbose_dev(device_t dv, const char *fmt, ...)
    946  1.108     joerg {
    947  1.108     joerg 	va_list ap;
    948  1.108     joerg 
    949  1.176  jdolecek 	KASSERT(dv != NULL);
    950  1.176  jdolecek 
    951  1.108     joerg 	va_start(ap, fmt);
    952  1.108     joerg 	aprint_verbose_internal(device_xname(dv), fmt, ap);
    953  1.108     joerg 	va_end(ap);
    954  1.108     joerg }
    955  1.108     joerg 
    956  1.108     joerg void
    957  1.108     joerg aprint_verbose_ifnet(struct ifnet *ifp, const char *fmt, ...)
    958  1.108     joerg {
    959  1.108     joerg 	va_list ap;
    960  1.108     joerg 
    961  1.176  jdolecek 	KASSERT(ifp != NULL);
    962  1.176  jdolecek 
    963  1.108     joerg 	va_start(ap, fmt);
    964  1.108     joerg 	aprint_verbose_internal(ifp->if_xname, fmt, ap);
    965  1.108     joerg 	va_end(ap);
    966  1.108     joerg }
    967  1.108     joerg 
    968   1.88   thorpej /*
    969   1.88   thorpej  * aprint_debug: Send to console and log only if AB_DEBUG.
    970   1.88   thorpej  */
    971  1.108     joerg static void
    972  1.108     joerg aprint_debug_internal(const char *prefix, const char *fmt, va_list ap)
    973  1.108     joerg {
    974  1.108     joerg 	if ((boothowto & AB_DEBUG) == 0)
    975  1.108     joerg 		return;
    976  1.108     joerg 
    977  1.126     pooka 	kprintf_lock();
    978  1.108     joerg 
    979  1.108     joerg 	if (prefix)
    980  1.108     joerg 		kprintf_internal("%s: ", TOCONS | TOLOG, NULL, NULL, prefix);
    981  1.108     joerg 	kprintf(fmt, TOCONS | TOLOG, NULL, NULL, ap);
    982  1.108     joerg 
    983  1.126     pooka 	kprintf_unlock();
    984  1.108     joerg }
    985  1.108     joerg 
    986   1.88   thorpej void
    987   1.88   thorpej aprint_debug(const char *fmt, ...)
    988   1.88   thorpej {
    989   1.88   thorpej 	va_list ap;
    990   1.88   thorpej 
    991  1.108     joerg 	va_start(ap, fmt);
    992  1.108     joerg 	aprint_debug_internal(NULL, fmt, ap);
    993  1.108     joerg 	va_end(ap);
    994  1.108     joerg }
    995  1.108     joerg 
    996  1.108     joerg void
    997  1.108     joerg aprint_debug_dev(device_t dv, const char *fmt, ...)
    998  1.108     joerg {
    999  1.108     joerg 	va_list ap;
   1000  1.108     joerg 
   1001  1.176  jdolecek 	KASSERT(dv != NULL);
   1002  1.176  jdolecek 
   1003  1.108     joerg 	va_start(ap, fmt);
   1004  1.108     joerg 	aprint_debug_internal(device_xname(dv), fmt, ap);
   1005  1.108     joerg 	va_end(ap);
   1006  1.108     joerg }
   1007   1.88   thorpej 
   1008  1.108     joerg void
   1009  1.108     joerg aprint_debug_ifnet(struct ifnet *ifp, const char *fmt, ...)
   1010  1.108     joerg {
   1011  1.108     joerg 	va_list ap;
   1012   1.88   thorpej 
   1013  1.176  jdolecek 	KASSERT(ifp != NULL);
   1014  1.176  jdolecek 
   1015  1.108     joerg 	va_start(ap, fmt);
   1016  1.108     joerg 	aprint_debug_internal(ifp->if_xname, fmt, ap);
   1017  1.108     joerg 	va_end(ap);
   1018   1.89   thorpej }
   1019   1.89   thorpej 
   1020  1.123    dyoung void
   1021  1.175    martin vprintf_flags(int flags, const char *fmt, va_list ap)
   1022  1.175    martin {
   1023  1.175    martin 	kprintf_lock();
   1024  1.175    martin 	kprintf(fmt, flags, NULL, NULL, ap);
   1025  1.175    martin 	kprintf_unlock();
   1026  1.175    martin }
   1027  1.175    martin 
   1028  1.175    martin void
   1029  1.175    martin printf_flags(int flags, const char *fmt, ...)
   1030  1.175    martin {
   1031  1.175    martin 	va_list ap;
   1032  1.175    martin 
   1033  1.175    martin 	va_start(ap, fmt);
   1034  1.175    martin 	vprintf_flags(flags, fmt, ap);
   1035  1.175    martin 	va_end(ap);
   1036  1.175    martin }
   1037  1.175    martin 
   1038  1.175    martin void
   1039  1.123    dyoung printf_tolog(const char *fmt, ...)
   1040  1.123    dyoung {
   1041  1.123    dyoung 	va_list ap;
   1042  1.123    dyoung 
   1043  1.123    dyoung 	va_start(ap, fmt);
   1044  1.175    martin 	vprintf_flags(TOLOG, fmt, ap);
   1045  1.123    dyoung 	va_end(ap);
   1046  1.123    dyoung }
   1047  1.123    dyoung 
   1048   1.89   thorpej /*
   1049   1.89   thorpej  * printf_nolog: Like printf(), but does not send message to the log.
   1050   1.89   thorpej  */
   1051   1.89   thorpej 
   1052   1.89   thorpej void
   1053   1.89   thorpej printf_nolog(const char *fmt, ...)
   1054   1.89   thorpej {
   1055   1.89   thorpej 	va_list ap;
   1056   1.89   thorpej 
   1057   1.89   thorpej 	va_start(ap, fmt);
   1058  1.175    martin 	vprintf_flags(TOCONS, fmt, ap);
   1059   1.89   thorpej 	va_end(ap);
   1060   1.88   thorpej }
   1061   1.12       cgd 
   1062   1.45     chuck /*
   1063   1.76        tv  * normal kernel printf functions: printf, vprintf, snprintf, vsnprintf
   1064   1.45     chuck  */
   1065   1.12       cgd 
   1066   1.45     chuck /*
   1067   1.45     chuck  * printf: print a message to the console and the log
   1068   1.45     chuck  */
   1069  1.162     joerg void
   1070   1.30  christos printf(const char *fmt, ...)
   1071   1.12       cgd {
   1072   1.12       cgd 	va_list ap;
   1073   1.54   thorpej 
   1074   1.12       cgd 	va_start(ap, fmt);
   1075  1.175    martin 	vprintf_flags(TOCONS | TOLOG, fmt, ap);
   1076   1.12       cgd 	va_end(ap);
   1077   1.12       cgd }
   1078   1.12       cgd 
   1079   1.45     chuck /*
   1080   1.45     chuck  * vprintf: print a message to the console and the log [already have
   1081  1.149  dholland  *	va_list]
   1082   1.45     chuck  */
   1083   1.45     chuck 
   1084   1.40   thorpej void
   1085   1.99   thorpej vprintf(const char *fmt, va_list ap)
   1086   1.40   thorpej {
   1087  1.175    martin 	vprintf_flags(TOCONS | TOLOG, fmt, ap);
   1088   1.54   thorpej 
   1089   1.40   thorpej 	if (!panicstr)
   1090   1.40   thorpej 		logwakeup();
   1091   1.40   thorpej }
   1092   1.40   thorpej 
   1093   1.12       cgd /*
   1094   1.58   msaitoh  * snprintf: print a message to a buffer
   1095   1.58   msaitoh  */
   1096   1.58   msaitoh int
   1097   1.98  christos snprintf(char *bf, size_t size, const char *fmt, ...)
   1098   1.58   msaitoh {
   1099   1.58   msaitoh 	int retval;
   1100   1.58   msaitoh 	va_list ap;
   1101   1.58   msaitoh 
   1102   1.58   msaitoh 	va_start(ap, fmt);
   1103  1.145  christos 	retval = vsnprintf(bf, size, fmt, ap);
   1104   1.58   msaitoh 	va_end(ap);
   1105  1.145  christos 
   1106  1.144  christos 	return retval;
   1107   1.58   msaitoh }
   1108   1.58   msaitoh 
   1109   1.58   msaitoh /*
   1110  1.149  dholland  * vsnprintf: print a message to a buffer [already have va_list]
   1111   1.58   msaitoh  */
   1112   1.58   msaitoh int
   1113   1.99   thorpej vsnprintf(char *bf, size_t size, const char *fmt, va_list ap)
   1114   1.58   msaitoh {
   1115   1.58   msaitoh 	int retval;
   1116   1.58   msaitoh 	char *p;
   1117   1.58   msaitoh 
   1118  1.144  christos 	p = bf + size;
   1119   1.98  christos 	retval = kprintf(fmt, TOBUFONLY, &p, bf, ap);
   1120  1.145  christos 	if (bf && size > 0) {
   1121  1.145  christos 		/* nul terminate */
   1122  1.148  christos 		if (size <= (size_t)retval)
   1123  1.147  christos 			bf[size - 1] = '\0';
   1124  1.145  christos 		else
   1125  1.147  christos 			bf[retval] = '\0';
   1126  1.145  christos 	}
   1127  1.144  christos 	return retval;
   1128   1.58   msaitoh }
   1129   1.58   msaitoh 
   1130  1.177  christos int
   1131  1.177  christos vasprintf(char **bf, const char *fmt, va_list ap)
   1132  1.177  christos {
   1133  1.177  christos 	int retval;
   1134  1.177  christos 	va_list cap;
   1135  1.177  christos 
   1136  1.177  christos 	va_copy(cap, ap);
   1137  1.179  christos 	retval = kprintf(fmt, TOBUFONLY, NULL, NULL, cap) + 1;
   1138  1.179  christos 	va_end(cap);
   1139  1.177  christos 	*bf = kmem_alloc(retval, KM_SLEEP);
   1140  1.179  christos 	return vsnprintf(*bf, retval, fmt, ap);
   1141  1.177  christos }
   1142  1.177  christos 
   1143   1.58   msaitoh /*
   1144   1.45     chuck  * kprintf: scaled down version of printf(3).
   1145   1.45     chuck  *
   1146   1.96     perry  * this version based on vfprintf() from libc which was derived from
   1147   1.45     chuck  * software contributed to Berkeley by Chris Torek.
   1148   1.45     chuck  *
   1149   1.76        tv  * NOTE: The kprintf mutex must be held if we're going TOBUF or TOCONS!
   1150   1.45     chuck  */
   1151   1.45     chuck 
   1152   1.45     chuck /*
   1153   1.45     chuck  * macros for converting digits to letters and vice versa
   1154   1.45     chuck  */
   1155   1.45     chuck #define	to_digit(c)	((c) - '0')
   1156   1.45     chuck #define is_digit(c)	((unsigned)to_digit(c) <= 9)
   1157   1.45     chuck #define	to_char(n)	((n) + '0')
   1158   1.45     chuck 
   1159   1.45     chuck /*
   1160   1.45     chuck  * flags used during conversion.
   1161   1.45     chuck  */
   1162   1.45     chuck #define	ALT		0x001		/* alternate form */
   1163   1.45     chuck #define	HEXPREFIX	0x002		/* add 0x or 0X prefix */
   1164   1.45     chuck #define	LADJUST		0x004		/* left adjustment */
   1165   1.45     chuck #define	LONGDBL		0x008		/* long double; unimplemented */
   1166   1.45     chuck #define	LONGINT		0x010		/* long integer */
   1167   1.45     chuck #define	QUADINT		0x020		/* quad integer */
   1168   1.45     chuck #define	SHORTINT	0x040		/* short integer */
   1169   1.78    kleink #define	MAXINT		0x080		/* intmax_t */
   1170   1.78    kleink #define	PTRINT		0x100		/* intptr_t */
   1171   1.78    kleink #define	SIZEINT		0x200		/* size_t */
   1172   1.78    kleink #define	ZEROPAD		0x400		/* zero (as opposed to blank) pad */
   1173   1.78    kleink #define FPT		0x800		/* Floating point number */
   1174   1.45     chuck 
   1175   1.45     chuck 	/*
   1176   1.45     chuck 	 * To extend shorts properly, we need both signed and unsigned
   1177   1.45     chuck 	 * argument extraction methods.
   1178   1.45     chuck 	 */
   1179   1.45     chuck #define	SARG() \
   1180   1.78    kleink 	(flags&MAXINT ? va_arg(ap, intmax_t) : \
   1181   1.78    kleink 	    flags&PTRINT ? va_arg(ap, intptr_t) : \
   1182   1.78    kleink 	    flags&SIZEINT ? va_arg(ap, ssize_t) : /* XXX */ \
   1183   1.78    kleink 	    flags&QUADINT ? va_arg(ap, quad_t) : \
   1184   1.45     chuck 	    flags&LONGINT ? va_arg(ap, long) : \
   1185   1.45     chuck 	    flags&SHORTINT ? (long)(short)va_arg(ap, int) : \
   1186   1.45     chuck 	    (long)va_arg(ap, int))
   1187   1.45     chuck #define	UARG() \
   1188   1.78    kleink 	(flags&MAXINT ? va_arg(ap, uintmax_t) : \
   1189   1.78    kleink 	    flags&PTRINT ? va_arg(ap, uintptr_t) : \
   1190   1.78    kleink 	    flags&SIZEINT ? va_arg(ap, size_t) : \
   1191   1.78    kleink 	    flags&QUADINT ? va_arg(ap, u_quad_t) : \
   1192   1.45     chuck 	    flags&LONGINT ? va_arg(ap, u_long) : \
   1193   1.45     chuck 	    flags&SHORTINT ? (u_long)(u_short)va_arg(ap, int) : \
   1194   1.45     chuck 	    (u_long)va_arg(ap, u_int))
   1195   1.45     chuck 
   1196   1.60  explorer #define KPRINTF_PUTCHAR(C) {						\
   1197   1.60  explorer 	if (oflags == TOBUFONLY) {					\
   1198  1.148  christos 		if (sbuf && ((vp == NULL) || (sbuf < tailp))) 		\
   1199  1.144  christos 			*sbuf++ = (C);					\
   1200   1.60  explorer 	} else {							\
   1201  1.144  christos 		putchar((C), oflags, vp);				\
   1202   1.60  explorer 	}								\
   1203   1.58   msaitoh }
   1204   1.45     chuck 
   1205  1.139    dyoung void
   1206  1.139    dyoung device_printf(device_t dev, const char *fmt, ...)
   1207  1.139    dyoung {
   1208  1.139    dyoung 	va_list ap;
   1209  1.139    dyoung 
   1210  1.139    dyoung 	va_start(ap, fmt);
   1211  1.139    dyoung 	printf("%s: ", device_xname(dev));
   1212  1.139    dyoung 	vprintf(fmt, ap);
   1213  1.139    dyoung 	va_end(ap);
   1214  1.139    dyoung 	return;
   1215  1.139    dyoung }
   1216  1.139    dyoung 
   1217   1.54   thorpej /*
   1218   1.54   thorpej  * Guts of kernel printf.  Note, we already expect to be in a mutex!
   1219   1.54   thorpej  */
   1220   1.87   thorpej int
   1221   1.99   thorpej kprintf(const char *fmt0, int oflags, void *vp, char *sbuf, va_list ap)
   1222   1.45     chuck {
   1223   1.98  christos 	const char *fmt;	/* format string */
   1224   1.45     chuck 	int ch;			/* character from fmt */
   1225   1.45     chuck 	int n;			/* handy integer (short term usage) */
   1226   1.45     chuck 	char *cp;		/* handy char pointer (short term usage) */
   1227   1.45     chuck 	int flags;		/* flags as above */
   1228   1.45     chuck 	int ret;		/* return value accumulator */
   1229   1.45     chuck 	int width;		/* width from format (%8d), or 0 */
   1230   1.45     chuck 	int prec;		/* precision from format (%.3d), or -1 */
   1231   1.45     chuck 	char sign;		/* sign prefix (' ', '+', '-', or \0) */
   1232   1.45     chuck 
   1233   1.45     chuck 	u_quad_t _uquad;	/* integer arguments %[diouxX] */
   1234   1.45     chuck 	enum { OCT, DEC, HEX } base;/* base for [diouxX] conversion */
   1235   1.45     chuck 	int dprec;		/* a copy of prec if [diouxX], 0 otherwise */
   1236   1.45     chuck 	int realsz;		/* field size expanded by dprec */
   1237   1.45     chuck 	int size;		/* size of converted field or string */
   1238   1.97  christos 	const char *xdigs;	/* digits for [xX] conversion */
   1239   1.98  christos 	char bf[KPRINTF_BUFSIZE]; /* space for %c, %[diouxX] */
   1240   1.61  explorer 	char *tailp;		/* tail pointer for snprintf */
   1241   1.58   msaitoh 
   1242   1.60  explorer 	if (oflags == TOBUFONLY && (vp != NULL))
   1243   1.60  explorer 		tailp = *(char **)vp;
   1244  1.144  christos 	else
   1245  1.144  christos 		tailp = NULL;
   1246   1.45     chuck 
   1247   1.45     chuck 	cp = NULL;	/* XXX: shutup gcc */
   1248   1.45     chuck 	size = 0;	/* XXX: shutup gcc */
   1249   1.45     chuck 
   1250   1.98  christos 	fmt = fmt0;
   1251   1.45     chuck 	ret = 0;
   1252   1.45     chuck 
   1253   1.45     chuck 	xdigs = NULL;		/* XXX: shut up gcc warning */
   1254   1.45     chuck 
   1255   1.45     chuck 	/*
   1256   1.45     chuck 	 * Scan the format for conversions (`%' character).
   1257   1.45     chuck 	 */
   1258   1.45     chuck 	for (;;) {
   1259  1.147  christos 		for (; *fmt != '%' && *fmt; fmt++) {
   1260   1.58   msaitoh 			ret++;
   1261  1.147  christos 			KPRINTF_PUTCHAR(*fmt);
   1262   1.45     chuck 		}
   1263   1.45     chuck 		if (*fmt == 0)
   1264   1.45     chuck 			goto done;
   1265   1.45     chuck 
   1266   1.45     chuck 		fmt++;		/* skip over '%' */
   1267   1.45     chuck 
   1268   1.45     chuck 		flags = 0;
   1269   1.45     chuck 		dprec = 0;
   1270   1.45     chuck 		width = 0;
   1271   1.45     chuck 		prec = -1;
   1272   1.45     chuck 		sign = '\0';
   1273   1.45     chuck 
   1274   1.45     chuck rflag:		ch = *fmt++;
   1275   1.45     chuck reswitch:	switch (ch) {
   1276   1.45     chuck 		case ' ':
   1277   1.45     chuck 			/*
   1278   1.45     chuck 			 * ``If the space and + flags both appear, the space
   1279   1.45     chuck 			 * flag will be ignored.''
   1280   1.45     chuck 			 *	-- ANSI X3J11
   1281   1.45     chuck 			 */
   1282   1.45     chuck 			if (!sign)
   1283   1.45     chuck 				sign = ' ';
   1284   1.45     chuck 			goto rflag;
   1285   1.45     chuck 		case '#':
   1286   1.45     chuck 			flags |= ALT;
   1287   1.45     chuck 			goto rflag;
   1288   1.45     chuck 		case '*':
   1289   1.45     chuck 			/*
   1290   1.45     chuck 			 * ``A negative field width argument is taken as a
   1291   1.45     chuck 			 * - flag followed by a positive field width.''
   1292   1.45     chuck 			 *	-- ANSI X3J11
   1293   1.45     chuck 			 * They don't exclude field widths read from args.
   1294   1.45     chuck 			 */
   1295   1.45     chuck 			if ((width = va_arg(ap, int)) >= 0)
   1296   1.45     chuck 				goto rflag;
   1297   1.45     chuck 			width = -width;
   1298   1.45     chuck 			/* FALLTHROUGH */
   1299   1.45     chuck 		case '-':
   1300   1.45     chuck 			flags |= LADJUST;
   1301   1.45     chuck 			goto rflag;
   1302   1.45     chuck 		case '+':
   1303   1.45     chuck 			sign = '+';
   1304   1.45     chuck 			goto rflag;
   1305   1.45     chuck 		case '.':
   1306   1.45     chuck 			if ((ch = *fmt++) == '*') {
   1307   1.45     chuck 				n = va_arg(ap, int);
   1308   1.45     chuck 				prec = n < 0 ? -1 : n;
   1309   1.45     chuck 				goto rflag;
   1310   1.45     chuck 			}
   1311   1.45     chuck 			n = 0;
   1312   1.45     chuck 			while (is_digit(ch)) {
   1313   1.45     chuck 				n = 10 * n + to_digit(ch);
   1314   1.45     chuck 				ch = *fmt++;
   1315   1.45     chuck 			}
   1316   1.45     chuck 			prec = n < 0 ? -1 : n;
   1317   1.45     chuck 			goto reswitch;
   1318   1.45     chuck 		case '0':
   1319   1.45     chuck 			/*
   1320   1.45     chuck 			 * ``Note that 0 is taken as a flag, not as the
   1321   1.45     chuck 			 * beginning of a field width.''
   1322   1.45     chuck 			 *	-- ANSI X3J11
   1323   1.45     chuck 			 */
   1324   1.45     chuck 			flags |= ZEROPAD;
   1325   1.45     chuck 			goto rflag;
   1326   1.45     chuck 		case '1': case '2': case '3': case '4':
   1327   1.45     chuck 		case '5': case '6': case '7': case '8': case '9':
   1328   1.45     chuck 			n = 0;
   1329   1.45     chuck 			do {
   1330   1.45     chuck 				n = 10 * n + to_digit(ch);
   1331   1.45     chuck 				ch = *fmt++;
   1332   1.45     chuck 			} while (is_digit(ch));
   1333   1.45     chuck 			width = n;
   1334   1.45     chuck 			goto reswitch;
   1335   1.45     chuck 		case 'h':
   1336   1.45     chuck 			flags |= SHORTINT;
   1337   1.45     chuck 			goto rflag;
   1338   1.78    kleink 		case 'j':
   1339   1.78    kleink 			flags |= MAXINT;
   1340   1.78    kleink 			goto rflag;
   1341   1.45     chuck 		case 'l':
   1342   1.45     chuck 			if (*fmt == 'l') {
   1343   1.45     chuck 				fmt++;
   1344   1.45     chuck 				flags |= QUADINT;
   1345   1.45     chuck 			} else {
   1346   1.45     chuck 				flags |= LONGINT;
   1347   1.45     chuck 			}
   1348   1.45     chuck 			goto rflag;
   1349   1.45     chuck 		case 'q':
   1350   1.45     chuck 			flags |= QUADINT;
   1351   1.45     chuck 			goto rflag;
   1352   1.78    kleink 		case 't':
   1353   1.78    kleink 			flags |= PTRINT;
   1354   1.78    kleink 			goto rflag;
   1355   1.78    kleink 		case 'z':
   1356   1.78    kleink 			flags |= SIZEINT;
   1357   1.78    kleink 			goto rflag;
   1358   1.45     chuck 		case 'c':
   1359   1.98  christos 			*(cp = bf) = va_arg(ap, int);
   1360   1.45     chuck 			size = 1;
   1361   1.45     chuck 			sign = '\0';
   1362   1.45     chuck 			break;
   1363   1.45     chuck 		case 'D':
   1364   1.45     chuck 			flags |= LONGINT;
   1365   1.45     chuck 			/*FALLTHROUGH*/
   1366   1.45     chuck 		case 'd':
   1367   1.45     chuck 		case 'i':
   1368   1.45     chuck 			_uquad = SARG();
   1369   1.45     chuck 			if ((quad_t)_uquad < 0) {
   1370   1.45     chuck 				_uquad = -_uquad;
   1371   1.45     chuck 				sign = '-';
   1372   1.45     chuck 			}
   1373   1.45     chuck 			base = DEC;
   1374   1.45     chuck 			goto number;
   1375   1.45     chuck 		case 'n':
   1376  1.185      maxv 			/* no %n support in the kernel, consume and skip */
   1377   1.78    kleink 			if (flags & MAXINT)
   1378  1.185      maxv 				(void)va_arg(ap, intmax_t *);
   1379   1.78    kleink 			else if (flags & PTRINT)
   1380  1.185      maxv 				(void)va_arg(ap, intptr_t *);
   1381   1.78    kleink 			else if (flags & SIZEINT)
   1382  1.185      maxv 				(void)va_arg(ap, ssize_t *);
   1383   1.78    kleink 			else if (flags & QUADINT)
   1384  1.185      maxv 				(void)va_arg(ap, quad_t *);
   1385   1.45     chuck 			else if (flags & LONGINT)
   1386  1.185      maxv 				(void)va_arg(ap, long *);
   1387   1.45     chuck 			else if (flags & SHORTINT)
   1388  1.185      maxv 				(void)va_arg(ap, short *);
   1389   1.45     chuck 			else
   1390  1.185      maxv 				(void)va_arg(ap, int *);
   1391   1.45     chuck 			continue;	/* no output */
   1392   1.45     chuck 		case 'O':
   1393   1.45     chuck 			flags |= LONGINT;
   1394   1.45     chuck 			/*FALLTHROUGH*/
   1395   1.45     chuck 		case 'o':
   1396   1.45     chuck 			_uquad = UARG();
   1397   1.45     chuck 			base = OCT;
   1398   1.45     chuck 			goto nosign;
   1399   1.45     chuck 		case 'p':
   1400   1.45     chuck 			/*
   1401   1.45     chuck 			 * ``The argument shall be a pointer to void.  The
   1402   1.45     chuck 			 * value of the pointer is converted to a sequence
   1403   1.45     chuck 			 * of printable characters, in an implementation-
   1404   1.45     chuck 			 * defined manner.''
   1405   1.45     chuck 			 *	-- ANSI X3J11
   1406   1.45     chuck 			 */
   1407   1.45     chuck 			/* NOSTRICT */
   1408   1.45     chuck 			_uquad = (u_long)va_arg(ap, void *);
   1409   1.45     chuck 			base = HEX;
   1410   1.97  christos 			xdigs = hexdigits;
   1411   1.45     chuck 			flags |= HEXPREFIX;
   1412   1.45     chuck 			ch = 'x';
   1413   1.45     chuck 			goto nosign;
   1414   1.45     chuck 		case 's':
   1415   1.45     chuck 			if ((cp = va_arg(ap, char *)) == NULL)
   1416   1.98  christos 				/*XXXUNCONST*/
   1417   1.98  christos 				cp = __UNCONST("(null)");
   1418   1.45     chuck 			if (prec >= 0) {
   1419   1.45     chuck 				/*
   1420   1.45     chuck 				 * can't use strlen; can only look for the
   1421   1.45     chuck 				 * NUL in the first `prec' characters, and
   1422   1.45     chuck 				 * strlen() will go further.
   1423   1.45     chuck 				 */
   1424   1.45     chuck 				char *p = memchr(cp, 0, prec);
   1425   1.45     chuck 
   1426   1.45     chuck 				if (p != NULL) {
   1427   1.45     chuck 					size = p - cp;
   1428   1.45     chuck 					if (size > prec)
   1429   1.45     chuck 						size = prec;
   1430   1.45     chuck 				} else
   1431   1.45     chuck 					size = prec;
   1432   1.45     chuck 			} else
   1433   1.45     chuck 				size = strlen(cp);
   1434   1.45     chuck 			sign = '\0';
   1435   1.45     chuck 			break;
   1436   1.45     chuck 		case 'U':
   1437   1.45     chuck 			flags |= LONGINT;
   1438   1.45     chuck 			/*FALLTHROUGH*/
   1439   1.45     chuck 		case 'u':
   1440   1.45     chuck 			_uquad = UARG();
   1441   1.45     chuck 			base = DEC;
   1442   1.45     chuck 			goto nosign;
   1443   1.45     chuck 		case 'X':
   1444  1.103    martin 			xdigs = HEXDIGITS;
   1445   1.45     chuck 			goto hex;
   1446   1.45     chuck 		case 'x':
   1447   1.97  christos 			xdigs = hexdigits;
   1448   1.45     chuck hex:			_uquad = UARG();
   1449   1.45     chuck 			base = HEX;
   1450   1.45     chuck 			/* leading 0x/X only if non-zero */
   1451   1.45     chuck 			if (flags & ALT && _uquad != 0)
   1452   1.45     chuck 				flags |= HEXPREFIX;
   1453   1.45     chuck 
   1454   1.45     chuck 			/* unsigned conversions */
   1455   1.45     chuck nosign:			sign = '\0';
   1456   1.45     chuck 			/*
   1457   1.45     chuck 			 * ``... diouXx conversions ... if a precision is
   1458   1.45     chuck 			 * specified, the 0 flag will be ignored.''
   1459   1.45     chuck 			 *	-- ANSI X3J11
   1460   1.45     chuck 			 */
   1461   1.45     chuck number:			if ((dprec = prec) >= 0)
   1462   1.45     chuck 				flags &= ~ZEROPAD;
   1463   1.45     chuck 
   1464   1.45     chuck 			/*
   1465   1.45     chuck 			 * ``The result of converting a zero value with an
   1466   1.45     chuck 			 * explicit precision of zero is no characters.''
   1467   1.45     chuck 			 *	-- ANSI X3J11
   1468   1.45     chuck 			 */
   1469   1.98  christos 			cp = bf + KPRINTF_BUFSIZE;
   1470   1.45     chuck 			if (_uquad != 0 || prec != 0) {
   1471   1.45     chuck 				/*
   1472   1.45     chuck 				 * Unsigned mod is hard, and unsigned mod
   1473   1.45     chuck 				 * by a constant is easier than that by
   1474   1.45     chuck 				 * a variable; hence this switch.
   1475   1.45     chuck 				 */
   1476   1.45     chuck 				switch (base) {
   1477   1.45     chuck 				case OCT:
   1478   1.45     chuck 					do {
   1479   1.45     chuck 						*--cp = to_char(_uquad & 7);
   1480   1.45     chuck 						_uquad >>= 3;
   1481   1.45     chuck 					} while (_uquad);
   1482   1.45     chuck 					/* handle octal leading 0 */
   1483   1.45     chuck 					if (flags & ALT && *cp != '0')
   1484   1.45     chuck 						*--cp = '0';
   1485   1.45     chuck 					break;
   1486   1.45     chuck 
   1487   1.45     chuck 				case DEC:
   1488   1.45     chuck 					/* many numbers are 1 digit */
   1489   1.45     chuck 					while (_uquad >= 10) {
   1490   1.45     chuck 						*--cp = to_char(_uquad % 10);
   1491   1.45     chuck 						_uquad /= 10;
   1492   1.45     chuck 					}
   1493   1.45     chuck 					*--cp = to_char(_uquad);
   1494   1.45     chuck 					break;
   1495   1.45     chuck 
   1496   1.45     chuck 				case HEX:
   1497   1.45     chuck 					do {
   1498   1.45     chuck 						*--cp = xdigs[_uquad & 15];
   1499   1.45     chuck 						_uquad >>= 4;
   1500   1.45     chuck 					} while (_uquad);
   1501   1.45     chuck 					break;
   1502   1.45     chuck 
   1503   1.45     chuck 				default:
   1504   1.98  christos 					/*XXXUNCONST*/
   1505   1.98  christos 					cp = __UNCONST("bug in kprintf: bad base");
   1506   1.45     chuck 					size = strlen(cp);
   1507   1.45     chuck 					goto skipsize;
   1508   1.45     chuck 				}
   1509   1.45     chuck 			}
   1510   1.98  christos 			size = bf + KPRINTF_BUFSIZE - cp;
   1511   1.45     chuck 		skipsize:
   1512   1.45     chuck 			break;
   1513   1.45     chuck 		default:	/* "%?" prints ?, unless ? is NUL */
   1514   1.45     chuck 			if (ch == '\0')
   1515   1.45     chuck 				goto done;
   1516   1.45     chuck 			/* pretend it was %c with argument ch */
   1517   1.98  christos 			cp = bf;
   1518   1.45     chuck 			*cp = ch;
   1519   1.45     chuck 			size = 1;
   1520   1.45     chuck 			sign = '\0';
   1521   1.45     chuck 			break;
   1522   1.45     chuck 		}
   1523   1.45     chuck 
   1524   1.45     chuck 		/*
   1525   1.45     chuck 		 * All reasonable formats wind up here.  At this point, `cp'
   1526   1.45     chuck 		 * points to a string which (if not flags&LADJUST) should be
   1527   1.45     chuck 		 * padded out to `width' places.  If flags&ZEROPAD, it should
   1528   1.45     chuck 		 * first be prefixed by any sign or other prefix; otherwise,
   1529   1.45     chuck 		 * it should be blank padded before the prefix is emitted.
   1530   1.45     chuck 		 * After any left-hand padding and prefixing, emit zeroes
   1531   1.45     chuck 		 * required by a decimal [diouxX] precision, then print the
   1532   1.45     chuck 		 * string proper, then emit zeroes required by any leftover
   1533   1.45     chuck 		 * floating precision; finally, if LADJUST, pad with blanks.
   1534   1.45     chuck 		 *
   1535   1.45     chuck 		 * Compute actual size, so we know how much to pad.
   1536   1.45     chuck 		 * size excludes decimal prec; realsz includes it.
   1537   1.45     chuck 		 */
   1538   1.45     chuck 		realsz = dprec > size ? dprec : size;
   1539   1.45     chuck 		if (sign)
   1540   1.45     chuck 			realsz++;
   1541   1.45     chuck 		else if (flags & HEXPREFIX)
   1542   1.45     chuck 			realsz+= 2;
   1543   1.45     chuck 
   1544   1.58   msaitoh 		/* adjust ret */
   1545   1.58   msaitoh 		ret += width > realsz ? width : realsz;
   1546   1.58   msaitoh 
   1547   1.45     chuck 		/* right-adjusting blank padding */
   1548   1.45     chuck 		if ((flags & (LADJUST|ZEROPAD)) == 0) {
   1549   1.45     chuck 			n = width - realsz;
   1550   1.45     chuck 			while (n-- > 0)
   1551   1.45     chuck 				KPRINTF_PUTCHAR(' ');
   1552   1.45     chuck 		}
   1553   1.45     chuck 
   1554   1.45     chuck 		/* prefix */
   1555   1.45     chuck 		if (sign) {
   1556   1.45     chuck 			KPRINTF_PUTCHAR(sign);
   1557   1.45     chuck 		} else if (flags & HEXPREFIX) {
   1558   1.45     chuck 			KPRINTF_PUTCHAR('0');
   1559   1.45     chuck 			KPRINTF_PUTCHAR(ch);
   1560   1.45     chuck 		}
   1561   1.45     chuck 
   1562   1.45     chuck 		/* right-adjusting zero padding */
   1563   1.45     chuck 		if ((flags & (LADJUST|ZEROPAD)) == ZEROPAD) {
   1564   1.45     chuck 			n = width - realsz;
   1565   1.45     chuck 			while (n-- > 0)
   1566   1.45     chuck 				KPRINTF_PUTCHAR('0');
   1567   1.45     chuck 		}
   1568   1.45     chuck 
   1569   1.45     chuck 		/* leading zeroes from decimal precision */
   1570   1.45     chuck 		n = dprec - size;
   1571   1.45     chuck 		while (n-- > 0)
   1572   1.45     chuck 			KPRINTF_PUTCHAR('0');
   1573   1.45     chuck 
   1574   1.45     chuck 		/* the string or number proper */
   1575  1.147  christos 		for (; size--; cp++)
   1576  1.147  christos 			KPRINTF_PUTCHAR(*cp);
   1577   1.45     chuck 		/* left-adjusting padding (always blank) */
   1578   1.45     chuck 		if (flags & LADJUST) {
   1579   1.45     chuck 			n = width - realsz;
   1580   1.45     chuck 			while (n-- > 0)
   1581   1.45     chuck 				KPRINTF_PUTCHAR(' ');
   1582   1.45     chuck 		}
   1583   1.58   msaitoh 	}
   1584   1.45     chuck 
   1585   1.45     chuck done:
   1586   1.58   msaitoh 	if ((oflags == TOBUFONLY) && (vp != NULL))
   1587   1.58   msaitoh 		*(char **)vp = sbuf;
   1588   1.92      matt 	(*v_flush)();
   1589  1.154       tls 
   1590  1.154       tls #ifdef RND_PRINTF
   1591  1.183  riastrad 	if (__predict_true(kprintf_inited))
   1592  1.183  riastrad 		rnd_add_data(&rnd_printf_source, NULL, 0, 0);
   1593  1.154       tls #endif
   1594  1.144  christos 	return ret;
   1595   1.12       cgd }
   1596