hush/libbb/safe_strtol.c

150 lines
3.2 KiB
C
Raw Normal View History

2004-03-06 22:11:45 +00:00
/* 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 tarball for details.
2004-03-06 22:11:45 +00:00
*/
#include <assert.h>
#include "libbb.h"
2006-10-08 12:49:22 +00:00
int safe_strtod(const char *arg, double* value)
2004-03-06 22:11:45 +00:00
{
char *endptr;
int errno_save = errno;
assert(arg!=NULL);
errno = 0;
*value = strtod(arg, &endptr);
2006-10-08 12:49:22 +00:00
if (errno != 0 || *endptr != '\0' || endptr == arg) {
2004-03-06 22:11:45 +00:00
return 1;
}
errno = errno_save;
return 0;
}
2006-10-08 12:49:22 +00:00
int safe_strtoull(const char *arg, unsigned long long* value)
2004-03-06 22:11:45 +00:00
{
char *endptr;
int errno_save = errno;
assert(arg!=NULL);
2006-10-08 12:49:22 +00:00
if (!isdigit(arg[0])) /* strtouXX takes minus signs w/o error! :( */
return 1;
2004-03-06 22:11:45 +00:00
errno = 0;
2006-10-08 12:49:22 +00:00
*value = strtoull(arg, &endptr, 0);
if (errno != 0 || *endptr != '\0' || endptr == arg) {
2004-03-06 22:11:45 +00:00
return 1;
}
errno = errno_save;
return 0;
}
2006-10-08 12:49:22 +00:00
int safe_strtoll(const char *arg, long long* value)
2004-03-06 22:11:45 +00:00
{
char *endptr;
int errno_save = errno;
assert(arg!=NULL);
errno = 0;
2006-10-08 12:49:22 +00:00
*value = strtoll(arg, &endptr, 0);
if (errno != 0 || *endptr != '\0' || endptr == arg) {
2004-03-06 22:11:45 +00:00
return 1;
}
errno = errno_save;
return 0;
}
2006-10-08 12:49:22 +00:00
int safe_strtoul(const char *arg, unsigned long* value)
{
char *endptr;
int errno_save = errno;
assert(arg!=NULL);
2006-10-08 12:49:22 +00:00
if (!isdigit(arg[0])) /* strtouXX takes minus signs w/o error! :( */
return 1;
errno = 0;
2006-10-08 12:49:22 +00:00
*value = strtoul(arg, &endptr, 0);
if (errno != 0 || *endptr != '\0' || endptr == arg) {
return 1;
}
errno = errno_save;
return 0;
}
2006-10-08 12:49:22 +00:00
int safe_strtol(const char *arg, long* value)
{
char *endptr;
int errno_save = errno;
assert(arg!=NULL);
errno = 0;
2006-10-08 12:49:22 +00:00
*value = strtol(arg, &endptr, 0);
if (errno != 0 || *endptr != '\0' || endptr == arg) {
return 1;
}
errno = errno_save;
return 0;
}
2006-10-08 12:49:22 +00:00
/* TODO: This is what uclibc is doing. Try to do the same? */
#if 0
#if defined __HAVE_ELF__
# define strong_alias(name, aliasname) _strong_alias(name, aliasname)
# define _strong_alias(name, aliasname) \
extern __typeof (name) aliasname __attribute__ ((alias (#name)));
#else /* !defined __HAVE_ELF__ */
# define strong_alias(name, aliasname) _strong_alias (name, aliasname)
# define _strong_alias(name, aliasname) \
__asm__(".global " __C_SYMBOL_PREFIX__ #aliasname "\n" \
".set " __C_SYMBOL_PREFIX__ #aliasname "," __C_SYMBOL_PREFIX__ #name);
#endif
#endif
int safe_strtoi(const char *arg, int* value)
{
if (sizeof(long) == sizeof(int)) {
return safe_strtol(arg, (long*)value);
} else {
int error;
long lvalue = *value;
error = safe_strtol(arg, &lvalue);
if (lvalue < INT_MIN || lvalue > INT_MAX)
return 1;
*value = (int) lvalue;
return error;
}
}
int safe_strtou(const char *arg, unsigned* value)
{
if (sizeof(unsigned long) == sizeof(unsigned)) {
return safe_strtoul(arg, (unsigned long*)value);
} else {
int error;
unsigned long lvalue = *value;
error = safe_strtoul(arg, &lvalue);
if (lvalue > UINT_MAX)
return 1;
*value = (unsigned) lvalue;
return error;
}
}
int BUG_safe_strtou32_unimplemented(void);
int safe_strtou32(const char *arg, uint32_t* value)
{
if (sizeof(uint32_t) == sizeof(unsigned))
return safe_strtou(arg, (unsigned*)value);
if (sizeof(uint32_t) == sizeof(unsigned long))
return safe_strtoul(arg, (unsigned long*)value);
return BUG_safe_strtou32_unimplemented();
}