X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=lib%2Fxstrtoumax.c;h=8518ef07727733fd0df608174680bb1fe5aa508b;hb=7cf6336f44640e772242831f5d2ef0247215886b;hp=40f0d783aceed193d63390157b4051fbeebd7863;hpb=953ff42af70e7a2815c1ac345e30622e86d519d7;p=gnulib.git diff --git a/lib/xstrtoumax.c b/lib/xstrtoumax.c index 40f0d783a..8518ef077 100644 --- a/lib/xstrtoumax.c +++ b/lib/xstrtoumax.c @@ -1,5 +1,5 @@ /* xstrtoumax.c -- A more useful interface to strtoumax. - Copyright 1999 Free Software Foundation, Inc. + Copyright (C) 1999, 2003, 2004 Free Software Foundation, Inc. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -21,79 +21,13 @@ # include #endif -#if HAVE_STRTOUMAX -# define __strtol strtoumax -#else -# define __strtol my_strtoumax - - /* Define a temporary implementation, intended to hold the fort only - until glibc has an implementation of the C9x standard function - strtoumax. When glibc implements strtoumax, we can remove the - following function in favor of a replacement file strtoumax.c taken - from glibc. */ - -# if HAVE_INTTYPES_H -# include -# endif - -# if HAVE_STDLIB_H -# include -# endif - -# ifndef PARAMS -# if defined PROTOTYPES || defined __STDC__ -# define PARAMS(Args) Args -# else -# define PARAMS(Args) () -# endif -# endif - -static uintmax_t my_strtoumax PARAMS ((char const *, char **, int)); -#endif +#include "xstrtol.h" +#define __strtol strtoumax #define __strtol_t uintmax_t #define __xstrtol xstrtoumax +#ifdef UINTMAX_MAX +# define STRTOL_T_MINIMUM 0 +# define STRTOL_T_MAXIMUM UINTMAX_MAX +#endif #include "xstrtol.c" - -#if !HAVE_STRTOUMAX - -static uintmax_t -my_strtoumax (char const *ptr, char **endptr, int base) -{ -# define USE_IF_EQUIVALENT(function) \ - if (sizeof (uintmax_t) == sizeof function (ptr, endptr, base)) \ - return function (ptr, endptr, base); - - USE_IF_EQUIVALENT (strtoul) - -# if HAVE_STRTOULL - USE_IF_EQUIVALENT (strtoull) -# endif - -# if HAVE_STRTOUQ - USE_IF_EQUIVALENT (strtouq) -# endif - - { - /* An implementation with uintmax_t longer than long, but with no - known way to convert it. Do it by hand. Assume base 10. */ - uintmax_t n = 0; - int overflow = 0; - for (; '0' <= *ptr && *ptr <= '9'; ptr++) - { - uintmax_t n10 = n * 10; - int digit = *ptr - '0'; - overflow |= ! (n10 / 10 == n && n10 < n10 + digit); - n = n10 + digit; - } - if (endptr) - *endptr = (char *) ptr; - if (overflow) - { - errno = ERANGE; - n = (uintmax_t) -1; - } - return n; - } -} -#endif /* HAVE_STRTOUMAX */