+ register char *p, *q;
+ register int ch, n;
+ u_long ul;
+ int base, lflag, tmp, width;
+ char padc;
+
+ for (;;) {
+ padc = ' ';
+ width = 0;
+ while ((ch = *(u_char *)fmt++) != '%') {
+ if (ch == '\0')
+ return;
+ putchar(ch, flags, tp);
+ }
+ lflag = 0;
+reswitch: switch (ch = *(u_char *)fmt++) {
+ case '0':
+ padc = '0';
+ goto reswitch;
+ case '1': case '2': case '3': case '4':
+ case '5': case '6': case '7': case '8': case '9':
+ for (width = 0;; ++fmt) {
+ width = width * 10 + ch - '0';
+ ch = *fmt;
+ if (ch < '0' || ch > '9')
+ break;
+ }
+ goto reswitch;
+ case 'l':
+ lflag = 1;
+ goto reswitch;
+ case 'b':
+ ul = va_arg(ap, int);
+ p = va_arg(ap, char *);
+ for (q = ksprintn(ul, *p++, NULL); ch = *q--;)
+ putchar(ch, flags, tp);
+
+ if (!ul)
+ break;
+
+ for (tmp = 0; n = *p++;) {
+ if (ul & (1 << (n - 1))) {
+ putchar(tmp ? ',' : '<', flags, tp);
+ for (; (n = *p) > ' '; ++p)
+ putchar(n, flags, tp);
+ tmp = 1;
+ } else
+ for (; *p > ' '; ++p)
+ continue;
+ }
+ if (tmp)
+ putchar('>', flags, tp);
+ break;
+ case 'c':
+ putchar(va_arg(ap, int), flags, tp);
+ break;
+ case 'r':
+ p = va_arg(ap, char *);
+ kprintf(p, flags, tp, va_arg(ap, va_list));
+ break;
+ case 's':
+ p = va_arg(ap, char *);
+ while (ch = *p++)
+ putchar(ch, flags, tp);
+ break;
+ case 'd':
+ ul = lflag ? va_arg(ap, long) : va_arg(ap, int);
+ if ((long)ul < 0) {
+ putchar('-', flags, tp);
+ ul = -(long)ul;
+ }
+ base = 10;
+ goto number;
+ case 'o':
+ ul = lflag ? va_arg(ap, u_long) : va_arg(ap, u_int);
+ base = 8;
+ goto number;
+ case 'u':
+ ul = lflag ? va_arg(ap, u_long) : va_arg(ap, u_int);
+ base = 10;
+ goto number;
+ case 'x':
+ ul = lflag ? va_arg(ap, u_long) : va_arg(ap, u_int);
+ base = 16;
+number: p = ksprintn(ul, base, &tmp);
+ if (width && (width -= tmp) > 0)
+ while (width--)
+ putchar(padc, flags, tp);
+ while (ch = *p--)
+ putchar(ch, flags, tp);
+ break;
+ default:
+ putchar('%', flags, tp);
+ if (lflag)
+ putchar('l', flags, tp);
+ /* FALLTHROUGH */
+ case '%':
+ putchar(ch, flags, tp);
+ }
+ }