1 /* vi: set sw=4 ts=4: */
5 * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
7 * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
12 /* On exit: errno = 0 only if there was non-empty, '\0' terminated value
13 * errno = EINVAL if value was not '\0' terminated, but othervise ok
14 * Return value is still valid, caller should just check whether end[0]
15 * is a valid terminating char for particular case. OTOH, if caller
16 * requires '\0' terminated input, [s]he can just check errno == 0.
17 * errno = ERANGE if value had alphanumeric terminating char ("1234abcg").
18 * errno = ERANGE if value is out of range, missing, etc.
19 * errno = ERANGE if value had minus sign for strtouXX (even "-0" is not ok )
22 static unsigned long long ret_ERANGE(void)
24 errno = ERANGE; /* this ain't as small as it looks (on glibc) */
28 static unsigned long long handle_errors(unsigned long long v, char **endp, char *endptr)
30 if (endp) *endp = endptr;
32 /* Check for the weird "feature":
33 * a "-" string is apparently a valid "number" for strto[u]l[l]!
34 * It returns zero and errno is 0! :( */
35 if (endptr[-1] == '-')
38 /* errno is already set to ERANGE by strtoXXX if value overflowed */
40 /* "1234abcg" or out-of-range? */
41 if (isalnum(endptr[0]) || errno)
43 /* good number, just suspicious terminator */
50 unsigned long long bb_strtoull(const char *arg, char **endp, int base)
55 /* strtoul(" -4200000000") returns 94967296, errno 0 (!) */
56 /* I don't think that this is right. Preventing this... */
57 if (!isalnum(arg[0])) return ret_ERANGE();
59 /* not 100% correct for lib func, but convenient for the caller */
61 v = strtoull(arg, &endptr, base);
62 return handle_errors(v, endp, endptr);
65 long long bb_strtoll(const char *arg, char **endp, int base)
70 if (arg[0] != '-' && !isalnum(arg[0])) return ret_ERANGE();
72 v = strtoll(arg, &endptr, base);
73 return handle_errors(v, endp, endptr);
76 #if ULONG_MAX != ULLONG_MAX
77 unsigned long bb_strtoul(const char *arg, char **endp, int base)
82 if (!isalnum(arg[0])) return ret_ERANGE();
84 v = strtoul(arg, &endptr, base);
85 return handle_errors(v, endp, endptr);
88 long bb_strtol(const char *arg, char **endp, int base)
93 if (arg[0] != '-' && !isalnum(arg[0])) return ret_ERANGE();
95 v = strtol(arg, &endptr, base);
96 return handle_errors(v, endp, endptr);
100 #if UINT_MAX != ULONG_MAX
101 unsigned bb_strtou(const char *arg, char **endp, int base)
106 if (!isalnum(arg[0])) return ret_ERANGE();
108 v = strtoul(arg, &endptr, base);
109 if (v > UINT_MAX) return ret_ERANGE();
110 return handle_errors(v, endp, endptr);
113 int bb_strtoi(const char *arg, char **endp, int base)
118 if (arg[0] != '-' && !isalnum(arg[0])) return ret_ERANGE();
120 v = strtol(arg, &endptr, base);
121 if (v > INT_MAX) return ret_ERANGE();
122 if (v < INT_MIN) return ret_ERANGE();
123 return handle_errors(v, endp, endptr);
131 #include <math.h> /* just for HUGE_VAL */
132 #define NOT_DIGIT(a) (((unsigned char)(a-'0')) > 9)
133 double bb_strtod(const char *arg, char **endp)
138 if (arg[0] != '-' && NOT_DIGIT(arg[0])) goto err;
140 v = strtod(arg, &endptr);
141 if (endp) *endp = endptr;
143 /* "1234abcg" or out-of-range? */
144 if (isalnum(endptr[0]) || errno) {
149 /* good number, just suspicious terminator */