1 /* 2 * linux/lib/vsprintf.c 3 * 4 * Copyright (C) 1991, 1992 Linus Torvalds 5 */ 6 7 /* vsprintf.c -- Lars Wirzenius & Linus Torvalds. */ 8 /* 9 * Wirzenius wrote this portably, Torvalds fucked it up :-) 10 * 11 * from hush: simple_itoa() was lifted from boa-0.93.15 12 */ 13 14 #include <common.h> 15 #include <charset.h> 16 #include <efi_loader.h> 17 #include <div64.h> 18 #include <uuid.h> 19 #include <stdarg.h> 20 #include <linux/ctype.h> 21 #include <linux/err.h> 22 #include <linux/types.h> 23 #include <linux/string.h> 24 25 #define noinline __attribute__((noinline)) 26 27 /* we use this so that we can do without the ctype library */ 28 #define is_digit(c) ((c) >= '0' && (c) <= '9') 29 30 static int skip_atoi(const char **s) 31 { 32 int i = 0; 33 34 while (is_digit(**s)) 35 i = i * 10 + *((*s)++) - '0'; 36 37 return i; 38 } 39 40 /* Decimal conversion is by far the most typical, and is used 41 * for /proc and /sys data. This directly impacts e.g. top performance 42 * with many processes running. We optimize it for speed 43 * using code from 44 * http://www.cs.uiowa.edu/~jones/bcd/decimal.html 45 * (with permission from the author, Douglas W. Jones). */ 46 47 /* Formats correctly any integer in [0,99999]. 48 * Outputs from one to five digits depending on input. 49 * On i386 gcc 4.1.2 -O2: ~250 bytes of code. */ 50 static char *put_dec_trunc(char *buf, unsigned q) 51 { 52 unsigned d3, d2, d1, d0; 53 d1 = (q>>4) & 0xf; 54 d2 = (q>>8) & 0xf; 55 d3 = (q>>12); 56 57 d0 = 6*(d3 + d2 + d1) + (q & 0xf); 58 q = (d0 * 0xcd) >> 11; 59 d0 = d0 - 10*q; 60 *buf++ = d0 + '0'; /* least significant digit */ 61 d1 = q + 9*d3 + 5*d2 + d1; 62 if (d1 != 0) { 63 q = (d1 * 0xcd) >> 11; 64 d1 = d1 - 10*q; 65 *buf++ = d1 + '0'; /* next digit */ 66 67 d2 = q + 2*d2; 68 if ((d2 != 0) || (d3 != 0)) { 69 q = (d2 * 0xd) >> 7; 70 d2 = d2 - 10*q; 71 *buf++ = d2 + '0'; /* next digit */ 72 73 d3 = q + 4*d3; 74 if (d3 != 0) { 75 q = (d3 * 0xcd) >> 11; 76 d3 = d3 - 10*q; 77 *buf++ = d3 + '0'; /* next digit */ 78 if (q != 0) 79 *buf++ = q + '0'; /* most sign. digit */ 80 } 81 } 82 } 83 return buf; 84 } 85 /* Same with if's removed. Always emits five digits */ 86 static char *put_dec_full(char *buf, unsigned q) 87 { 88 /* BTW, if q is in [0,9999], 8-bit ints will be enough, */ 89 /* but anyway, gcc produces better code with full-sized ints */ 90 unsigned d3, d2, d1, d0; 91 d1 = (q>>4) & 0xf; 92 d2 = (q>>8) & 0xf; 93 d3 = (q>>12); 94 95 /* 96 * Possible ways to approx. divide by 10 97 * gcc -O2 replaces multiply with shifts and adds 98 * (x * 0xcd) >> 11: 11001101 - shorter code than * 0x67 (on i386) 99 * (x * 0x67) >> 10: 1100111 100 * (x * 0x34) >> 9: 110100 - same 101 * (x * 0x1a) >> 8: 11010 - same 102 * (x * 0x0d) >> 7: 1101 - same, shortest code (on i386) 103 */ 104 105 d0 = 6*(d3 + d2 + d1) + (q & 0xf); 106 q = (d0 * 0xcd) >> 11; 107 d0 = d0 - 10*q; 108 *buf++ = d0 + '0'; 109 d1 = q + 9*d3 + 5*d2 + d1; 110 q = (d1 * 0xcd) >> 11; 111 d1 = d1 - 10*q; 112 *buf++ = d1 + '0'; 113 114 d2 = q + 2*d2; 115 q = (d2 * 0xd) >> 7; 116 d2 = d2 - 10*q; 117 *buf++ = d2 + '0'; 118 119 d3 = q + 4*d3; 120 q = (d3 * 0xcd) >> 11; /* - shorter code */ 121 /* q = (d3 * 0x67) >> 10; - would also work */ 122 d3 = d3 - 10*q; 123 *buf++ = d3 + '0'; 124 *buf++ = q + '0'; 125 return buf; 126 } 127 /* No inlining helps gcc to use registers better */ 128 static noinline char *put_dec(char *buf, uint64_t num) 129 { 130 while (1) { 131 unsigned rem; 132 if (num < 100000) 133 return put_dec_trunc(buf, num); 134 rem = do_div(num, 100000); 135 buf = put_dec_full(buf, rem); 136 } 137 } 138 139 #define ZEROPAD 1 /* pad with zero */ 140 #define SIGN 2 /* unsigned/signed long */ 141 #define PLUS 4 /* show plus */ 142 #define SPACE 8 /* space if plus */ 143 #define LEFT 16 /* left justified */ 144 #define SMALL 32 /* Must be 32 == 0x20 */ 145 #define SPECIAL 64 /* 0x */ 146 147 /* 148 * Macro to add a new character to our output string, but only if it will 149 * fit. The macro moves to the next character position in the output string. 150 */ 151 #define ADDCH(str, ch) do { \ 152 if ((str) < end) \ 153 *(str) = (ch); \ 154 ++str; \ 155 } while (0) 156 157 static char *number(char *buf, char *end, u64 num, 158 int base, int size, int precision, int type) 159 { 160 /* we are called with base 8, 10 or 16, only, thus don't need "G..." */ 161 static const char digits[16] = "0123456789ABCDEF"; 162 163 char tmp[66]; 164 char sign; 165 char locase; 166 int need_pfx = ((type & SPECIAL) && base != 10); 167 int i; 168 169 /* locase = 0 or 0x20. ORing digits or letters with 'locase' 170 * produces same digits or (maybe lowercased) letters */ 171 locase = (type & SMALL); 172 if (type & LEFT) 173 type &= ~ZEROPAD; 174 sign = 0; 175 if (type & SIGN) { 176 if ((s64) num < 0) { 177 sign = '-'; 178 num = -(s64) num; 179 size--; 180 } else if (type & PLUS) { 181 sign = '+'; 182 size--; 183 } else if (type & SPACE) { 184 sign = ' '; 185 size--; 186 } 187 } 188 if (need_pfx) { 189 size--; 190 if (base == 16) 191 size--; 192 } 193 194 /* generate full string in tmp[], in reverse order */ 195 i = 0; 196 if (num == 0) 197 tmp[i++] = '0'; 198 /* Generic code, for any base: 199 else do { 200 tmp[i++] = (digits[do_div(num,base)] | locase); 201 } while (num != 0); 202 */ 203 else if (base != 10) { /* 8 or 16 */ 204 int mask = base - 1; 205 int shift = 3; 206 207 if (base == 16) 208 shift = 4; 209 210 do { 211 tmp[i++] = (digits[((unsigned char)num) & mask] 212 | locase); 213 num >>= shift; 214 } while (num); 215 } else { /* base 10 */ 216 i = put_dec(tmp, num) - tmp; 217 } 218 219 /* printing 100 using %2d gives "100", not "00" */ 220 if (i > precision) 221 precision = i; 222 /* leading space padding */ 223 size -= precision; 224 if (!(type & (ZEROPAD + LEFT))) { 225 while (--size >= 0) 226 ADDCH(buf, ' '); 227 } 228 /* sign */ 229 if (sign) 230 ADDCH(buf, sign); 231 /* "0x" / "0" prefix */ 232 if (need_pfx) { 233 ADDCH(buf, '0'); 234 if (base == 16) 235 ADDCH(buf, 'X' | locase); 236 } 237 /* zero or space padding */ 238 if (!(type & LEFT)) { 239 char c = (type & ZEROPAD) ? '0' : ' '; 240 241 while (--size >= 0) 242 ADDCH(buf, c); 243 } 244 /* hmm even more zero padding? */ 245 while (i <= --precision) 246 ADDCH(buf, '0'); 247 /* actual digits of result */ 248 while (--i >= 0) 249 ADDCH(buf, tmp[i]); 250 /* trailing space padding */ 251 while (--size >= 0) 252 ADDCH(buf, ' '); 253 return buf; 254 } 255 256 static char *string(char *buf, char *end, char *s, int field_width, 257 int precision, int flags) 258 { 259 int len, i; 260 261 if (s == NULL) 262 s = "<NULL>"; 263 264 len = strnlen(s, precision); 265 266 if (!(flags & LEFT)) 267 while (len < field_width--) 268 ADDCH(buf, ' '); 269 for (i = 0; i < len; ++i) 270 ADDCH(buf, *s++); 271 while (len < field_width--) 272 ADDCH(buf, ' '); 273 return buf; 274 } 275 276 static char *string16(char *buf, char *end, u16 *s, int field_width, 277 int precision, int flags) 278 { 279 u16 *str = s ? s : L"<NULL>"; 280 int utf16_len = utf16_strnlen(str, precision); 281 u8 utf8[utf16_len * MAX_UTF8_PER_UTF16]; 282 int utf8_len, i; 283 284 utf8_len = utf16_to_utf8(utf8, str, utf16_len) - utf8; 285 286 if (!(flags & LEFT)) 287 while (utf8_len < field_width--) 288 ADDCH(buf, ' '); 289 for (i = 0; i < utf8_len; ++i) 290 ADDCH(buf, utf8[i]); 291 while (utf8_len < field_width--) 292 ADDCH(buf, ' '); 293 return buf; 294 } 295 296 #if defined(CONFIG_EFI_LOADER) && \ 297 !defined(CONFIG_SPL_BUILD) && !defined(API_BUILD) 298 static char *device_path_string(char *buf, char *end, void *dp, int field_width, 299 int precision, int flags) 300 { 301 u16 *str; 302 303 if (!dp) 304 return "<NULL>"; 305 306 str = efi_dp_str((struct efi_device_path *)dp); 307 if (!str) 308 return ERR_PTR(-ENOMEM); 309 310 buf = string16(buf, end, str, field_width, precision, flags); 311 efi_free_pool(str); 312 return buf; 313 } 314 #endif 315 316 #ifdef CONFIG_CMD_NET 317 static const char hex_asc[] = "0123456789abcdef"; 318 #define hex_asc_lo(x) hex_asc[((x) & 0x0f)] 319 #define hex_asc_hi(x) hex_asc[((x) & 0xf0) >> 4] 320 321 static inline char *pack_hex_byte(char *buf, u8 byte) 322 { 323 *buf++ = hex_asc_hi(byte); 324 *buf++ = hex_asc_lo(byte); 325 return buf; 326 } 327 328 static char *mac_address_string(char *buf, char *end, u8 *addr, int field_width, 329 int precision, int flags) 330 { 331 /* (6 * 2 hex digits), 5 colons and trailing zero */ 332 char mac_addr[6 * 3]; 333 char *p = mac_addr; 334 int i; 335 336 for (i = 0; i < 6; i++) { 337 p = pack_hex_byte(p, addr[i]); 338 if (!(flags & SPECIAL) && i != 5) 339 *p++ = ':'; 340 } 341 *p = '\0'; 342 343 return string(buf, end, mac_addr, field_width, precision, 344 flags & ~SPECIAL); 345 } 346 347 static char *ip6_addr_string(char *buf, char *end, u8 *addr, int field_width, 348 int precision, int flags) 349 { 350 /* (8 * 4 hex digits), 7 colons and trailing zero */ 351 char ip6_addr[8 * 5]; 352 char *p = ip6_addr; 353 int i; 354 355 for (i = 0; i < 8; i++) { 356 p = pack_hex_byte(p, addr[2 * i]); 357 p = pack_hex_byte(p, addr[2 * i + 1]); 358 if (!(flags & SPECIAL) && i != 7) 359 *p++ = ':'; 360 } 361 *p = '\0'; 362 363 return string(buf, end, ip6_addr, field_width, precision, 364 flags & ~SPECIAL); 365 } 366 367 static char *ip4_addr_string(char *buf, char *end, u8 *addr, int field_width, 368 int precision, int flags) 369 { 370 /* (4 * 3 decimal digits), 3 dots and trailing zero */ 371 char ip4_addr[4 * 4]; 372 char temp[3]; /* hold each IP quad in reverse order */ 373 char *p = ip4_addr; 374 int i, digits; 375 376 for (i = 0; i < 4; i++) { 377 digits = put_dec_trunc(temp, addr[i]) - temp; 378 /* reverse the digits in the quad */ 379 while (digits--) 380 *p++ = temp[digits]; 381 if (i != 3) 382 *p++ = '.'; 383 } 384 *p = '\0'; 385 386 return string(buf, end, ip4_addr, field_width, precision, 387 flags & ~SPECIAL); 388 } 389 #endif 390 391 #ifdef CONFIG_LIB_UUID 392 /* 393 * This works (roughly) the same way as linux's, but we currently always 394 * print lower-case (ie. we just keep %pUB and %pUL for compat with linux), 395 * mostly just because that is what uuid_bin_to_str() supports. 396 * 397 * %pUb: 01020304-0506-0708-090a-0b0c0d0e0f10 398 * %pUl: 04030201-0605-0807-090a-0b0c0d0e0f10 399 */ 400 static char *uuid_string(char *buf, char *end, u8 *addr, int field_width, 401 int precision, int flags, const char *fmt) 402 { 403 char uuid[UUID_STR_LEN + 1]; 404 int str_format = UUID_STR_FORMAT_STD; 405 406 switch (*(++fmt)) { 407 case 'L': 408 case 'l': 409 str_format = UUID_STR_FORMAT_GUID; 410 break; 411 case 'B': 412 case 'b': 413 /* this is the default */ 414 break; 415 default: 416 break; 417 } 418 419 uuid_bin_to_str(addr, uuid, str_format); 420 421 return string(buf, end, uuid, field_width, precision, flags); 422 } 423 #endif 424 425 /* 426 * Show a '%p' thing. A kernel extension is that the '%p' is followed 427 * by an extra set of alphanumeric characters that are extended format 428 * specifiers. 429 * 430 * Right now we handle: 431 * 432 * - 'M' For a 6-byte MAC address, it prints the address in the 433 * usual colon-separated hex notation 434 * - 'I' [46] for IPv4/IPv6 addresses printed in the usual way (dot-separated 435 * decimal for v4 and colon separated network-order 16 bit hex for v6) 436 * - 'i' [46] for 'raw' IPv4/IPv6 addresses, IPv6 omits the colons, IPv4 is 437 * currently the same 438 * 439 * Note: The difference between 'S' and 'F' is that on ia64 and ppc64 440 * function pointers are really function descriptors, which contain a 441 * pointer to the real address. 442 */ 443 static char *pointer(const char *fmt, char *buf, char *end, void *ptr, 444 int field_width, int precision, int flags) 445 { 446 u64 num = (uintptr_t)ptr; 447 448 /* 449 * Being a boot loader, we explicitly allow pointers to 450 * (physical) address null. 451 */ 452 #if 0 453 if (!ptr) 454 return string(buf, end, "(null)", field_width, precision, 455 flags); 456 #endif 457 458 switch (*fmt) { 459 #if defined(CONFIG_EFI_LOADER) && \ 460 !defined(CONFIG_SPL_BUILD) && !defined(API_BUILD) 461 case 'D': 462 return device_path_string(buf, end, ptr, field_width, 463 precision, flags); 464 #endif 465 #ifdef CONFIG_CMD_NET 466 case 'a': 467 flags |= SPECIAL | ZEROPAD; 468 469 switch (fmt[1]) { 470 case 'p': 471 default: 472 field_width = sizeof(phys_addr_t) * 2 + 2; 473 num = *(phys_addr_t *)ptr; 474 break; 475 } 476 break; 477 case 'm': 478 flags |= SPECIAL; 479 /* Fallthrough */ 480 case 'M': 481 return mac_address_string(buf, end, ptr, field_width, 482 precision, flags); 483 case 'i': 484 flags |= SPECIAL; 485 /* Fallthrough */ 486 case 'I': 487 if (fmt[1] == '6') 488 return ip6_addr_string(buf, end, ptr, field_width, 489 precision, flags); 490 if (fmt[1] == '4') 491 return ip4_addr_string(buf, end, ptr, field_width, 492 precision, flags); 493 flags &= ~SPECIAL; 494 break; 495 #endif 496 #ifdef CONFIG_LIB_UUID 497 case 'U': 498 return uuid_string(buf, end, ptr, field_width, precision, 499 flags, fmt); 500 #endif 501 default: 502 break; 503 } 504 flags |= SMALL; 505 if (field_width == -1) { 506 field_width = 2*sizeof(void *); 507 flags |= ZEROPAD; 508 } 509 return number(buf, end, num, 16, field_width, precision, flags); 510 } 511 512 static int vsnprintf_internal(char *buf, size_t size, const char *fmt, 513 va_list args) 514 { 515 u64 num; 516 int base; 517 char *str; 518 519 int flags; /* flags to number() */ 520 521 int field_width; /* width of output field */ 522 int precision; /* min. # of digits for integers; max 523 number of chars for from string */ 524 int qualifier; /* 'h', 'l', or 'L' for integer fields */ 525 /* 'z' support added 23/7/1999 S.H. */ 526 /* 'z' changed to 'Z' --davidm 1/25/99 */ 527 /* 't' added for ptrdiff_t */ 528 char *end = buf + size; 529 530 /* Make sure end is always >= buf - do we want this in U-Boot? */ 531 if (end < buf) { 532 end = ((void *)-1); 533 size = end - buf; 534 } 535 str = buf; 536 537 for (; *fmt ; ++fmt) { 538 if (*fmt != '%') { 539 ADDCH(str, *fmt); 540 continue; 541 } 542 543 /* process flags */ 544 flags = 0; 545 repeat: 546 ++fmt; /* this also skips first '%' */ 547 switch (*fmt) { 548 case '-': 549 flags |= LEFT; 550 goto repeat; 551 case '+': 552 flags |= PLUS; 553 goto repeat; 554 case ' ': 555 flags |= SPACE; 556 goto repeat; 557 case '#': 558 flags |= SPECIAL; 559 goto repeat; 560 case '0': 561 flags |= ZEROPAD; 562 goto repeat; 563 } 564 565 /* get field width */ 566 field_width = -1; 567 if (is_digit(*fmt)) 568 field_width = skip_atoi(&fmt); 569 else if (*fmt == '*') { 570 ++fmt; 571 /* it's the next argument */ 572 field_width = va_arg(args, int); 573 if (field_width < 0) { 574 field_width = -field_width; 575 flags |= LEFT; 576 } 577 } 578 579 /* get the precision */ 580 precision = -1; 581 if (*fmt == '.') { 582 ++fmt; 583 if (is_digit(*fmt)) 584 precision = skip_atoi(&fmt); 585 else if (*fmt == '*') { 586 ++fmt; 587 /* it's the next argument */ 588 precision = va_arg(args, int); 589 } 590 if (precision < 0) 591 precision = 0; 592 } 593 594 /* get the conversion qualifier */ 595 qualifier = -1; 596 if (*fmt == 'h' || *fmt == 'l' || *fmt == 'L' || 597 *fmt == 'Z' || *fmt == 'z' || *fmt == 't') { 598 qualifier = *fmt; 599 ++fmt; 600 if (qualifier == 'l' && *fmt == 'l') { 601 qualifier = 'L'; 602 ++fmt; 603 } 604 } 605 606 /* default base */ 607 base = 10; 608 609 switch (*fmt) { 610 case 'c': 611 if (!(flags & LEFT)) { 612 while (--field_width > 0) 613 ADDCH(str, ' '); 614 } 615 ADDCH(str, (unsigned char) va_arg(args, int)); 616 while (--field_width > 0) 617 ADDCH(str, ' '); 618 continue; 619 620 case 's': 621 if (qualifier == 'l' && !IS_ENABLED(CONFIG_SPL_BUILD)) { 622 str = string16(str, end, va_arg(args, u16 *), 623 field_width, precision, flags); 624 } else { 625 str = string(str, end, va_arg(args, char *), 626 field_width, precision, flags); 627 } 628 continue; 629 630 case 'p': 631 str = pointer(fmt + 1, str, end, 632 va_arg(args, void *), 633 field_width, precision, flags); 634 if (IS_ERR(str)) 635 return PTR_ERR(str); 636 /* Skip all alphanumeric pointer suffixes */ 637 while (isalnum(fmt[1])) 638 fmt++; 639 continue; 640 641 case 'n': 642 if (qualifier == 'l') { 643 long *ip = va_arg(args, long *); 644 *ip = (str - buf); 645 } else { 646 int *ip = va_arg(args, int *); 647 *ip = (str - buf); 648 } 649 continue; 650 651 case '%': 652 ADDCH(str, '%'); 653 continue; 654 655 /* integer number formats - set up the flags and "break" */ 656 case 'o': 657 base = 8; 658 break; 659 660 case 'x': 661 flags |= SMALL; 662 case 'X': 663 base = 16; 664 break; 665 666 case 'd': 667 case 'i': 668 flags |= SIGN; 669 case 'u': 670 break; 671 672 default: 673 ADDCH(str, '%'); 674 if (*fmt) 675 ADDCH(str, *fmt); 676 else 677 --fmt; 678 continue; 679 } 680 if (qualifier == 'L') /* "quad" for 64 bit variables */ 681 num = va_arg(args, unsigned long long); 682 else if (qualifier == 'l') { 683 num = va_arg(args, unsigned long); 684 if (flags & SIGN) 685 num = (signed long) num; 686 } else if (qualifier == 'Z' || qualifier == 'z') { 687 num = va_arg(args, size_t); 688 } else if (qualifier == 't') { 689 num = va_arg(args, ptrdiff_t); 690 } else if (qualifier == 'h') { 691 num = (unsigned short) va_arg(args, int); 692 if (flags & SIGN) 693 num = (signed short) num; 694 } else { 695 num = va_arg(args, unsigned int); 696 if (flags & SIGN) 697 num = (signed int) num; 698 } 699 str = number(str, end, num, base, field_width, precision, 700 flags); 701 } 702 703 if (size > 0) { 704 ADDCH(str, '\0'); 705 if (str > end) 706 end[-1] = '\0'; 707 --str; 708 } 709 /* the trailing null byte doesn't count towards the total */ 710 return str - buf; 711 } 712 713 int vsnprintf(char *buf, size_t size, const char *fmt, 714 va_list args) 715 { 716 return vsnprintf_internal(buf, size, fmt, args); 717 } 718 719 int vscnprintf(char *buf, size_t size, const char *fmt, va_list args) 720 { 721 int i; 722 723 i = vsnprintf(buf, size, fmt, args); 724 725 if (likely(i < size)) 726 return i; 727 if (size != 0) 728 return size - 1; 729 return 0; 730 } 731 732 int snprintf(char *buf, size_t size, const char *fmt, ...) 733 { 734 va_list args; 735 int i; 736 737 va_start(args, fmt); 738 i = vsnprintf(buf, size, fmt, args); 739 va_end(args); 740 741 return i; 742 } 743 744 int scnprintf(char *buf, size_t size, const char *fmt, ...) 745 { 746 va_list args; 747 int i; 748 749 va_start(args, fmt); 750 i = vscnprintf(buf, size, fmt, args); 751 va_end(args); 752 753 return i; 754 } 755 756 /** 757 * Format a string and place it in a buffer (va_list version) 758 * 759 * @param buf The buffer to place the result into 760 * @param fmt The format string to use 761 * @param args Arguments for the format string 762 * 763 * The function returns the number of characters written 764 * into @buf. Use vsnprintf() or vscnprintf() in order to avoid 765 * buffer overflows. 766 * 767 * If you're not already dealing with a va_list consider using sprintf(). 768 */ 769 int vsprintf(char *buf, const char *fmt, va_list args) 770 { 771 return vsnprintf_internal(buf, INT_MAX, fmt, args); 772 } 773 774 int sprintf(char *buf, const char *fmt, ...) 775 { 776 va_list args; 777 int i; 778 779 va_start(args, fmt); 780 i = vsprintf(buf, fmt, args); 781 va_end(args); 782 return i; 783 } 784 785 int printf(const char *fmt, ...) 786 { 787 va_list args; 788 uint i; 789 char printbuffer[CONFIG_SYS_PBSIZE]; 790 791 va_start(args, fmt); 792 793 /* 794 * For this to work, printbuffer must be larger than 795 * anything we ever want to print. 796 */ 797 i = vscnprintf(printbuffer, sizeof(printbuffer), fmt, args); 798 va_end(args); 799 800 /* Handle error */ 801 if (i <= 0) 802 return i; 803 /* Print the string */ 804 puts(printbuffer); 805 return i; 806 } 807 808 int vprintf(const char *fmt, va_list args) 809 { 810 uint i; 811 char printbuffer[CONFIG_SYS_PBSIZE]; 812 813 /* 814 * For this to work, printbuffer must be larger than 815 * anything we ever want to print. 816 */ 817 i = vscnprintf(printbuffer, sizeof(printbuffer), fmt, args); 818 819 /* Handle error */ 820 if (i <= 0) 821 return i; 822 /* Print the string */ 823 puts(printbuffer); 824 return i; 825 } 826 827 828 void __assert_fail(const char *assertion, const char *file, unsigned line, 829 const char *function) 830 { 831 /* This will not return */ 832 panic("%s:%u: %s: Assertion `%s' failed.", file, line, function, 833 assertion); 834 } 835 836 char *simple_itoa(ulong i) 837 { 838 /* 21 digits plus null terminator, good for 64-bit or smaller ints */ 839 static char local[22]; 840 char *p = &local[21]; 841 842 *p-- = '\0'; 843 do { 844 *p-- = '0' + i % 10; 845 i /= 10; 846 } while (i > 0); 847 return p + 1; 848 } 849 850 /* We don't seem to have %'d in U-Boot */ 851 void print_grouped_ull(unsigned long long int_val, int digits) 852 { 853 char str[21], *s; 854 int grab = 3; 855 856 digits = (digits + 2) / 3; 857 sprintf(str, "%*llu", digits * 3, int_val); 858 for (s = str; *s; s += grab) { 859 if (s != str) 860 putc(s[-1] != ' ' ? ',' : ' '); 861 printf("%.*s", grab, s); 862 grab = 3; 863 } 864 } 865 866 bool str2off(const char *p, loff_t *num) 867 { 868 char *endptr; 869 870 *num = simple_strtoull(p, &endptr, 16); 871 return *p != '\0' && *endptr == '\0'; 872 } 873 874 bool str2long(const char *p, ulong *num) 875 { 876 char *endptr; 877 878 *num = simple_strtoul(p, &endptr, 16); 879 return *p != '\0' && *endptr == '\0'; 880 } 881