]> git.kernelconcepts.de Git - karo-tx-uboot.git/blobdiff - lib/vsprintf.c
Remove execute permissions from source files
[karo-tx-uboot.git] / lib / vsprintf.c
index 8c58a9366291bff911576e758156e8ec31b89213..e38a4b70f8897bc33847dd67d3abb96c318996df 100644 (file)
@@ -7,24 +7,28 @@
 /* vsprintf.c -- Lars Wirzenius & Linus Torvalds. */
 /*
  * Wirzenius wrote this portably, Torvalds fucked it up :-)
+ *
+ * from hush: simple_itoa() was lifted from boa-0.93.15
  */
 
 #include <stdarg.h>
 #include <linux/types.h>
 #include <linux/string.h>
 #include <linux/ctype.h>
+#include <errno.h>
 
 #include <common.h>
 #if !defined (CONFIG_PANIC_HANG)
 #include <command.h>
-/*cmd_boot.c*/
-extern int do_reset (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]);
 #endif
 
 #include <div64.h>
 # define NUM_TYPE long long
 #define noinline __attribute__((noinline))
 
+/* some reluctance to put this into a new limits.h, so it is here */
+#define INT_MAX                ((int)(~0U>>1))
+
 const char hex_asc[] = "0123456789abcdef";
 #define hex_asc_lo(x)   hex_asc[((x) & 0x0f)]
 #define hex_asc_hi(x)   hex_asc[((x) & 0xf0) >> 4]
@@ -63,6 +67,30 @@ unsigned long simple_strtoul(const char *cp,char **endp,unsigned int base)
        return result;
 }
 
+int strict_strtoul(const char *cp, unsigned int base, unsigned long *res)
+{
+       char *tail;
+       unsigned long val;
+       size_t len;
+
+       *res = 0;
+       len = strlen(cp);
+       if (len == 0)
+               return -EINVAL;
+
+       val = simple_strtoul(cp, &tail, base);
+       if (tail == cp)
+               return -EINVAL;
+
+       if ((*tail == '\0') ||
+               ((len == (size_t)(tail - cp) + 1) && (*tail == '\n'))) {
+               *res = val;
+               return 0;
+       }
+
+       return -EINVAL;
+}
+
 long simple_strtol(const char *cp,char **endp,unsigned int base)
 {
        if(*cp=='-')
@@ -240,7 +268,22 @@ static noinline char* put_dec(char *buf, unsigned NUM_TYPE num)
 #define SMALL  32              /* Must be 32 == 0x20 */
 #define SPECIAL        64              /* 0x */
 
-static char *number(char *buf, unsigned NUM_TYPE num, int base, int size, int precision, int type)
+#ifdef CONFIG_SYS_VSNPRINTF
+/*
+ * Macro to add a new character to our output string, but only if it will
+ * fit. The macro moves to the next character position in the output string.
+ */
+#define ADDCH(str, ch) do { \
+       if ((str) < end) \
+               *(str) = (ch); \
+       ++str; \
+       } while (0)
+#else
+#define ADDCH(str, ch) (*(str)++ = (ch))
+#endif
+
+static char *number(char *buf, char *end, unsigned NUM_TYPE num,
+               int base, int size, int precision, int type)
 {
        /* we are called with base 8, 10 or 16, only, thus don't need "G..."  */
        static const char digits[16] = "0123456789ABCDEF"; /* "GHIJKLMNOPQRSTUVWXYZ"; */
@@ -302,37 +345,40 @@ static char *number(char *buf, unsigned NUM_TYPE num, int base, int size, int pr
                precision = i;
        /* leading space padding */
        size -= precision;
-       if (!(type & (ZEROPAD+LEFT)))
-               while(--size >= 0)
-                       *buf++ = ' ';
+       if (!(type & (ZEROPAD + LEFT))) {
+               while (--size >= 0)
+                       ADDCH(buf, ' ');
+       }
        /* sign */
        if (sign)
-               *buf++ = sign;
+               ADDCH(buf, sign);
        /* "0x" / "0" prefix */
        if (need_pfx) {
-               *buf++ = '0';
+               ADDCH(buf, '0');
                if (base == 16)
-                       *buf++ = ('X' | locase);
+                       ADDCH(buf, 'X' | locase);
        }
        /* zero or space padding */
        if (!(type & LEFT)) {
                char c = (type & ZEROPAD) ? '0' : ' ';
+
                while (--size >= 0)
-                       *buf++ = c;
+                       ADDCH(buf, c);
        }
        /* hmm even more zero padding? */
        while (i <= --precision)
-               *buf++ = '0';
+               ADDCH(buf, '0');
        /* actual digits of result */
        while (--i >= 0)
-               *buf++ = tmp[i];
+               ADDCH(buf, tmp[i]);
        /* trailing space padding */
        while (--size >= 0)
-               *buf++ = ' ';
+               ADDCH(buf, ' ');
        return buf;
 }
 
-static char *string(char *buf, char *s, int field_width, int precision, int flags)
+static char *string(char *buf, char *end, char *s, int field_width,
+               int precision, int flags)
 {
        int len, i;
 
@@ -343,16 +389,16 @@ static char *string(char *buf, char *s, int field_width, int precision, int flag
 
        if (!(flags & LEFT))
                while (len < field_width--)
-                       *buf++ = ' ';
+                       ADDCH(buf, ' ');
        for (i = 0; i < len; ++i)
-               *buf++ = *s++;
+               ADDCH(buf, *s++);
        while (len < field_width--)
-               *buf++ = ' ';
+               ADDCH(buf, ' ');
        return buf;
 }
 
 #ifdef CONFIG_CMD_NET
-static char *mac_address_string(char *buf, u8 *addr, int field_width,
+static char *mac_address_string(char *buf, char *end, u8 *addr, int field_width,
                                int precision, int flags)
 {
        char mac_addr[6 * 3]; /* (6 * 2 hex digits), 5 colons and trailing zero */
@@ -366,10 +412,11 @@ static char *mac_address_string(char *buf, u8 *addr, int field_width,
        }
        *p = '\0';
 
-       return string(buf, mac_addr, field_width, precision, flags & ~SPECIAL);
+       return string(buf, end, mac_addr, field_width, precision,
+                     flags & ~SPECIAL);
 }
 
-static char *ip6_addr_string(char *buf, u8 *addr, int field_width,
+static char *ip6_addr_string(char *buf, char *end, u8 *addr, int field_width,
                         int precision, int flags)
 {
        char ip6_addr[8 * 5]; /* (8 * 4 hex digits), 7 colons and trailing zero */
@@ -384,10 +431,11 @@ static char *ip6_addr_string(char *buf, u8 *addr, int field_width,
        }
        *p = '\0';
 
-       return string(buf, ip6_addr, field_width, precision, flags & ~SPECIAL);
+       return string(buf, end, ip6_addr, field_width, precision,
+                     flags & ~SPECIAL);
 }
 
-static char *ip4_addr_string(char *buf, u8 *addr, int field_width,
+static char *ip4_addr_string(char *buf, char *end, u8 *addr, int field_width,
                         int precision, int flags)
 {
        char ip4_addr[4 * 4]; /* (4 * 3 decimal digits), 3 dots and trailing zero */
@@ -405,7 +453,8 @@ static char *ip4_addr_string(char *buf, u8 *addr, int field_width,
        }
        *p = '\0';
 
-       return string(buf, ip4_addr, field_width, precision, flags & ~SPECIAL);
+       return string(buf, end, ip4_addr, field_width, precision,
+                     flags & ~SPECIAL);
 }
 #endif
 
@@ -427,10 +476,12 @@ static char *ip4_addr_string(char *buf, u8 *addr, int field_width,
  * function pointers are really function descriptors, which contain a
  * pointer to the real address.
  */
-static char *pointer(const char *fmt, char *buf, void *ptr, int field_width, int precision, int flags)
+static char *pointer(const char *fmt, char *buf, char *end, void *ptr,
+               int field_width, int precision, int flags)
 {
        if (!ptr)
-               return string(buf, "(null)", field_width, precision, flags);
+               return string(buf, end, "(null)", field_width, precision,
+                             flags);
 
 #ifdef CONFIG_CMD_NET
        switch (*fmt) {
@@ -438,15 +489,18 @@ static char *pointer(const char *fmt, char *buf, void *ptr, int field_width, int
                flags |= SPECIAL;
                /* Fallthrough */
        case 'M':
-               return mac_address_string(buf, ptr, field_width, precision, flags);
+               return mac_address_string(buf, end, ptr, field_width,
+                                         precision, flags);
        case 'i':
                flags |= SPECIAL;
                /* Fallthrough */
        case 'I':
                if (fmt[1] == '6')
-                       return ip6_addr_string(buf, ptr, field_width, precision, flags);
+                       return ip6_addr_string(buf, end, ptr, field_width,
+                                              precision, flags);
                if (fmt[1] == '4')
-                       return ip4_addr_string(buf, ptr, field_width, precision, flags);
+                       return ip4_addr_string(buf, end, ptr, field_width,
+                                              precision, flags);
                flags &= ~SPECIAL;
                break;
        }
@@ -456,27 +510,12 @@ static char *pointer(const char *fmt, char *buf, void *ptr, int field_width, int
                field_width = 2*sizeof(void *);
                flags |= ZEROPAD;
        }
-       return number(buf, (unsigned long) ptr, 16, field_width, precision, flags);
+       return number(buf, end, (unsigned long)ptr, 16, field_width,
+                     precision, flags);
 }
 
-/**
- * vsprintf - Format a string and place it in a buffer
- * @buf: The buffer to place the result into
- * @fmt: The format string to use
- * @args: Arguments for the format string
- *
- * This function follows C99 vsprintf, but has some extensions:
- * %pS output the name of a text symbol
- * %pF output the name of a function pointer
- * %pR output the address range in a struct resource
- *
- * The function returns the number of characters written
- * into @buf.
- *
- * Call this function if you are already dealing with a va_list.
- * You probably want sprintf() instead.
- */
-int vsprintf(char *buf, const char *fmt, va_list args)
+static int vsnprintf_internal(char *buf, size_t size, const char *fmt,
+                             va_list args)
 {
        unsigned NUM_TYPE num;
        int base;
@@ -491,12 +530,20 @@ int vsprintf(char *buf, const char *fmt, va_list args)
                                /* 'z' support added 23/7/1999 S.H.    */
                                /* 'z' changed to 'Z' --davidm 1/25/99 */
                                /* 't' added for ptrdiff_t */
+       char *end = buf + size;
 
+#ifdef CONFIG_SYS_VSNPRINTF
+       /* Make sure end is always >= buf - do we want this in U-Boot? */
+       if (end < buf) {
+               end = ((void *)-1);
+               size = end - buf;
+       }
+#endif
        str = buf;
 
        for (; *fmt ; ++fmt) {
                if (*fmt != '%') {
-                       *str++ = *fmt;
+                       ADDCH(str, *fmt);
                        continue;
                }
 
@@ -558,20 +605,22 @@ int vsprintf(char *buf, const char *fmt, va_list args)
 
                switch (*fmt) {
                case 'c':
-                       if (!(flags & LEFT))
+                       if (!(flags & LEFT)) {
                                while (--field_width > 0)
-                                       *str++ = ' ';
-                       *str++ = (unsigned char) va_arg(args, int);
+                                       ADDCH(str, ' ');
+                       }
+                       ADDCH(str, (unsigned char) va_arg(args, int));
                        while (--field_width > 0)
-                               *str++ = ' ';
+                               ADDCH(str, ' ');
                        continue;
 
                case 's':
-                       str = string(str, va_arg(args, char *), field_width, precision, flags);
+                       str = string(str, end, va_arg(args, char *),
+                                    field_width, precision, flags);
                        continue;
 
                case 'p':
-                       str = pointer(fmt+1, str,
+                       str = pointer(fmt+1, str, end,
                                        va_arg(args, void *),
                                        field_width, precision, flags);
                        /* Skip all alphanumeric pointer suffixes */
@@ -590,7 +639,7 @@ int vsprintf(char *buf, const char *fmt, va_list args)
                        continue;
 
                case '%':
-                       *str++ = '%';
+                       ADDCH(str, '%');
                        continue;
 
                /* integer number formats - set up the flags and "break" */
@@ -611,9 +660,9 @@ int vsprintf(char *buf, const char *fmt, va_list args)
                        break;
 
                default:
-                       *str++ = '%';
+                       ADDCH(str, '%');
                        if (*fmt)
-                               *str++ = *fmt;
+                               ADDCH(str, *fmt);
                        else
                                --fmt;
                        continue;
@@ -637,23 +686,86 @@ int vsprintf(char *buf, const char *fmt, va_list args)
                        if (flags & SIGN)
                                num = (signed int) num;
                }
-               str = number(str, num, base, field_width, precision, flags);
+               str = number(str, end, num, base, field_width, precision,
+                            flags);
+       }
+
+#ifdef CONFIG_SYS_VSNPRINTF
+       if (size > 0) {
+               ADDCH(str, '\0');
+               if (str > end)
+                       end[-1] = '\0';
        }
+#else
        *str = '\0';
+#endif
+       /* the trailing null byte doesn't count towards the total */
        return str-buf;
 }
 
+#ifdef CONFIG_SYS_VSNPRINTF
+int vsnprintf(char *buf, size_t size, const char *fmt,
+                             va_list args)
+{
+       return vsnprintf_internal(buf, size, fmt, args);
+}
+
+int vscnprintf(char *buf, size_t size, const char *fmt, va_list args)
+{
+       int i;
+
+       i = vsnprintf(buf, size, fmt, args);
+
+       if (likely(i < size))
+               return i;
+       if (size != 0)
+               return size - 1;
+       return 0;
+}
+
+int snprintf(char *buf, size_t size, const char *fmt, ...)
+{
+       va_list args;
+       int i;
+
+       va_start(args, fmt);
+       i = vsnprintf(buf, size, fmt, args);
+       va_end(args);
+
+       return i;
+}
+
+int scnprintf(char *buf, size_t size, const char *fmt, ...)
+{
+       va_list args;
+       int i;
+
+       va_start(args, fmt);
+       i = vscnprintf(buf, size, fmt, args);
+       va_end(args);
+
+       return i;
+}
+#endif /* CONFIG_SYS_VSNPRINT */
+
 /**
- * sprintf - Format a string and place it in a buffer
- * @buf: The buffer to place the result into
- * @fmt: The format string to use
- * @...: Arguments for the format string
+ * Format a string and place it in a buffer (va_list version)
+ *
+ * @param buf  The buffer to place the result into
+ * @param fmt  The format string to use
+ * @param args Arguments for the format string
  *
  * The function returns the number of characters written
- * into @buf.
+ * into @buf. Use vsnprintf() or vscnprintf() in order to avoid
+ * buffer overflows.
  *
- * See the vsprintf() documentation for format string extensions over C99.
+ * If you're not already dealing with a va_list consider using sprintf().
  */
+int vsprintf(char *buf, const char *fmt, va_list args)
+{
+       return vsnprintf_internal(buf, INT_MAX, fmt, args);
+}
+
 int sprintf(char * buf, const char *fmt, ...)
 {
        va_list args;
@@ -678,4 +790,28 @@ void panic(const char *fmt, ...)
        udelay (100000);        /* allow messages to go out */
        do_reset (NULL, 0, 0, NULL);
 #endif
+       while (1)
+               ;
+}
+
+void __assert_fail(const char *assertion, const char *file, unsigned line,
+                  const char *function)
+{
+       /* This will not return */
+       panic("%s:%u: %s: Assertion `%s' failed.", file, line, function,
+             assertion);
+}
+
+char *simple_itoa(ulong i)
+{
+       /* 21 digits plus null terminator, good for 64-bit or smaller ints */
+       static char local[22];
+       char *p = &local[21];
+
+       *p-- = '\0';
+       do {
+               *p-- = '0' + i % 10;
+               i /= 10;
+       } while (i > 0);
+       return p + 1;
 }