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