printf.c revision 1.1.4.2 1 1.1.4.2 rmind /*-
2 1.1.4.2 rmind * Copyright (c) 1998 Robert Nordier
3 1.1.4.2 rmind * All rights reserved.
4 1.1.4.2 rmind * Copyright (c) 2006 M. Warner Losh
5 1.1.4.2 rmind * All rights reserved.
6 1.1.4.2 rmind *
7 1.1.4.2 rmind * Redistribution and use in source and binary forms are freely
8 1.1.4.2 rmind * permitted provided that the above copyright notice and this
9 1.1.4.2 rmind * paragraph and the following disclaimer are duplicated in all
10 1.1.4.2 rmind * such forms.
11 1.1.4.2 rmind *
12 1.1.4.2 rmind * This software is provided "AS IS" and without any express or
13 1.1.4.2 rmind * implied warranties, including, without limitation, the implied
14 1.1.4.2 rmind * warranties of merchantability and fitness for a particular
15 1.1.4.2 rmind * purpose.
16 1.1.4.2 rmind *
17 1.1.4.2 rmind * $FreeBSD: src/sys/boot/mips/emips/libemips/printf.c,v 1.2 2006/10/20 09:12:05 imp Exp $
18 1.1.4.2 rmind */
19 1.1.4.2 rmind
20 1.1.4.2 rmind #include <machine/stdarg.h>
21 1.1.4.2 rmind
22 1.1.4.2 rmind void
23 1.1.4.2 rmind xputchar(int ch)
24 1.1.4.2 rmind {
25 1.1.4.2 rmind if (ch == '\n')
26 1.1.4.2 rmind putchar('\r');
27 1.1.4.2 rmind putchar(ch);
28 1.1.4.2 rmind }
29 1.1.4.2 rmind
30 1.1.4.2 rmind void
31 1.1.4.2 rmind printf(const char *fmt,...)
32 1.1.4.2 rmind {
33 1.1.4.2 rmind va_list ap;
34 1.1.4.2 rmind const char *hex = "0123456789abcdef";
35 1.1.4.2 rmind char buf[10];
36 1.1.4.2 rmind char *s;
37 1.1.4.2 rmind unsigned u;
38 1.1.4.2 rmind int c;
39 1.1.4.2 rmind
40 1.1.4.2 rmind va_start(ap, fmt);
41 1.1.4.2 rmind while ((c = *fmt++)) {
42 1.1.4.2 rmind if (c == '%') {
43 1.1.4.2 rmind again:
44 1.1.4.2 rmind c = *fmt++;
45 1.1.4.2 rmind switch (c) {
46 1.1.4.2 rmind case 'l':
47 1.1.4.2 rmind goto again;
48 1.1.4.2 rmind case 'c':
49 1.1.4.2 rmind xputchar(va_arg(ap, int));
50 1.1.4.2 rmind continue;
51 1.1.4.2 rmind case 's':
52 1.1.4.2 rmind for (s = va_arg(ap, char *); s && *s; s++)
53 1.1.4.2 rmind xputchar(*s);
54 1.1.4.2 rmind continue;
55 1.1.4.2 rmind case 'd': /* A lie, always prints unsigned */
56 1.1.4.2 rmind case 'u':
57 1.1.4.2 rmind u = va_arg(ap, unsigned);
58 1.1.4.2 rmind s = buf;
59 1.1.4.2 rmind do
60 1.1.4.2 rmind *s++ = '0' + u % 10U;
61 1.1.4.2 rmind while (u /= 10U);
62 1.1.4.2 rmind dumpbuf:;
63 1.1.4.2 rmind while (--s >= buf)
64 1.1.4.2 rmind xputchar(*s);
65 1.1.4.2 rmind continue;
66 1.1.4.2 rmind case 'x':
67 1.1.4.2 rmind case 'p':
68 1.1.4.2 rmind u = va_arg(ap, unsigned);
69 1.1.4.2 rmind s = buf;
70 1.1.4.2 rmind do
71 1.1.4.2 rmind *s++ = hex[u & 0xfu];
72 1.1.4.2 rmind while (u >>= 4);
73 1.1.4.2 rmind goto dumpbuf;
74 1.1.4.2 rmind case 0:
75 1.1.4.2 rmind return;
76 1.1.4.2 rmind }
77 1.1.4.2 rmind }
78 1.1.4.2 rmind xputchar(c);
79 1.1.4.2 rmind }
80 1.1.4.2 rmind va_end(ap);
81 1.1.4.2 rmind
82 1.1.4.2 rmind return;
83 1.1.4.2 rmind }
84