mirror of
https://github.com/sheumann/hush.git
synced 2024-11-18 17:10:36 +00:00
051b79efc1
Dmake gets confused if you use over-15-character file names, so they needed to be shortened to get it to work. While I was at it, I also switched _ to . in the filenames so they're fully ProDOS compatible. The shell/hush_test directory (not needed to build the code) still uses ProDOS-incompatible file names.
120 lines
3.0 KiB
C
120 lines
3.0 KiB
C
/* vi: set sw=4 ts=4: */
|
|
/*
|
|
* Utility routines.
|
|
*
|
|
* Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
|
|
*
|
|
* Licensed under GPLv2 or later, see file LICENSE in this source tree.
|
|
*/
|
|
|
|
#include "libbb.h"
|
|
|
|
/* On exit: errno = 0 only if there was non-empty, '\0' terminated value
|
|
* errno = EINVAL if value was not '\0' terminated, but otherwise ok
|
|
* Return value is still valid, caller should just check whether end[0]
|
|
* is a valid terminating char for particular case. OTOH, if caller
|
|
* requires '\0' terminated input, [s]he can just check errno == 0.
|
|
* errno = ERANGE if value had alphanumeric terminating char ("1234abcg").
|
|
* errno = ERANGE if value is out of range, missing, etc.
|
|
* errno = ERANGE if value had minus sign for strtouXX (even "-0" is not ok )
|
|
* return value is all-ones in this case.
|
|
*
|
|
* Test code:
|
|
* char *endptr;
|
|
* const char *minus = "-";
|
|
* errno = 0;
|
|
* bb_strtoi(minus, &endptr, 0); // must set ERANGE
|
|
* printf("minus:%p endptr:%p errno:%d EINVAL:%d\n", minus, endptr, errno, EINVAL);
|
|
* errno = 0;
|
|
* bb_strtoi("-0-", &endptr, 0); // must set EINVAL and point to second '-'
|
|
* printf("endptr[0]:%c errno:%d EINVAL:%d\n", endptr[0], errno, EINVAL);
|
|
*/
|
|
|
|
static uintmax_t ret_ERANGE(void)
|
|
{
|
|
errno = ERANGE; /* this ain't as small as it looks (on glibc) */
|
|
return UINTMAX_MAX;
|
|
}
|
|
|
|
static uintmax_t handle_errors(uintmax_t v, char **endp)
|
|
{
|
|
char next_ch = **endp;
|
|
|
|
/* errno is already set to ERANGE by strtoXXX if value overflowed */
|
|
if (next_ch) {
|
|
/* "1234abcg" or out-of-range? */
|
|
if (isalnum(next_ch) || errno)
|
|
return ret_ERANGE();
|
|
/* good number, just suspicious terminator */
|
|
errno = EINVAL;
|
|
}
|
|
return v;
|
|
}
|
|
|
|
unsigned long FAST_FUNC bb_strtoul(const char *arg, char **endp, int base)
|
|
{
|
|
unsigned long v;
|
|
char *endptr;
|
|
|
|
if (!endp) endp = &endptr;
|
|
*endp = (char*) arg;
|
|
|
|
if (!isalnum(arg[0])) return ret_ERANGE();
|
|
errno = 0;
|
|
v = strtoul(arg, endp, base);
|
|
return handle_errors(v, endp);
|
|
}
|
|
|
|
long FAST_FUNC bb_strtol(const char *arg, char **endp, int base)
|
|
{
|
|
long v;
|
|
char *endptr;
|
|
char first;
|
|
|
|
if (!endp) endp = &endptr;
|
|
*endp = (char*) arg;
|
|
|
|
first = (arg[0] != '-' ? arg[0] : arg[1]);
|
|
if (!isalnum(first)) return ret_ERANGE();
|
|
|
|
errno = 0;
|
|
v = strtol(arg, endp, base);
|
|
return handle_errors(v, endp);
|
|
}
|
|
|
|
#if UINT_MAX != ULONG_MAX
|
|
unsigned FAST_FUNC bb_strtou(const char *arg, char **endp, int base)
|
|
{
|
|
unsigned long v;
|
|
char *endptr;
|
|
|
|
if (!endp) endp = &endptr;
|
|
*endp = (char*) arg;
|
|
|
|
if (!isalnum(arg[0])) return ret_ERANGE();
|
|
errno = 0;
|
|
v = strtoul(arg, endp, base);
|
|
if (v > UINT_MAX) return ret_ERANGE();
|
|
return handle_errors(v, endp);
|
|
}
|
|
|
|
int FAST_FUNC bb_strtoi(const char *arg, char **endp, int base)
|
|
{
|
|
long v;
|
|
char *endptr;
|
|
char first;
|
|
|
|
if (!endp) endp = &endptr;
|
|
*endp = (char*) arg;
|
|
|
|
first = (arg[0] != '-' ? arg[0] : arg[1]);
|
|
if (!isalnum(first)) return ret_ERANGE();
|
|
|
|
errno = 0;
|
|
v = strtol(arg, endp, base);
|
|
if (v > INT_MAX) return ret_ERANGE();
|
|
if (v < INT_MIN) return ret_ERANGE();
|
|
return handle_errors(v, endp);
|
|
}
|
|
#endif
|