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