| /* strtoimax - convert string representation of a number into an intmax_t value. */ |
| |
| /* Copyright 1999-2005 Free Software Foundation, Inc. |
| |
| This file is part of GNU Bash, the Bourne Again SHell. |
| |
| Bash is free software: you can redistribute it and/or modify |
| it under the terms of the GNU General Public License as published by |
| the Free Software Foundation, either version 3 of the License, or |
| (at your option) any later version. |
| |
| Bash is distributed in the hope that it will be useful, |
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| GNU General Public License for more details. |
| |
| You should have received a copy of the GNU General Public License |
| along with Bash. If not, see <http://www.gnu.org/licenses/>. |
| */ |
| |
| /* Written by Paul Eggert. Modified by Chet Ramey for Bash. */ |
| |
| #if HAVE_CONFIG_H |
| # include <config.h> |
| #endif |
| |
| #if HAVE_INTTYPES_H |
| # include <inttypes.h> |
| #endif |
| |
| #if HAVE_STDLIB_H |
| # include <stdlib.h> |
| #endif |
| |
| #include <stdc.h> |
| |
| /* Verify a requirement at compile-time (unlike assert, which is runtime). */ |
| #define verify(name, assertion) struct name { char a[(assertion) ? 1 : -1]; } |
| |
| #ifndef HAVE_DECL_STRTOL |
| "this configure-time declaration test was not run" |
| #endif |
| #if !HAVE_DECL_STRTOL |
| extern long strtol __P((const char *, char **, int)); |
| #endif |
| |
| #ifndef HAVE_DECL_STRTOLL |
| "this configure-time declaration test was not run" |
| #endif |
| #if !HAVE_DECL_STRTOLL && HAVE_LONG_LONG |
| extern long long strtoll __P((const char *, char **, int)); |
| #endif |
| |
| #ifdef strtoimax |
| #undef strtoimax |
| #endif |
| |
| intmax_t |
| strtoimax (ptr, endptr, base) |
| const char *ptr; |
| char **endptr; |
| int base; |
| { |
| #if HAVE_LONG_LONG |
| verify(size_is_that_of_long_or_long_long, |
| (sizeof (intmax_t) == sizeof (long) || |
| sizeof (intmax_t) == sizeof (long long))); |
| |
| if (sizeof (intmax_t) != sizeof (long)) |
| return (strtoll (ptr, endptr, base)); |
| #else |
| verify (size_is_that_of_long, sizeof (intmax_t) == sizeof (long)); |
| #endif |
| |
| return (strtol (ptr, endptr, base)); |
| } |
| |
| #ifdef TESTING |
| # include <stdio.h> |
| int |
| main () |
| { |
| char *p, *endptr; |
| intmax_t x; |
| #if HAVE_LONG_LONG |
| long long y; |
| #endif |
| long z; |
| |
| printf ("sizeof intmax_t: %d\n", sizeof (intmax_t)); |
| |
| #if HAVE_LONG_LONG |
| printf ("sizeof long long: %d\n", sizeof (long long)); |
| #endif |
| printf ("sizeof long: %d\n", sizeof (long)); |
| |
| x = strtoimax("42", &endptr, 10); |
| #if HAVE_LONG_LONG |
| y = strtoll("42", &endptr, 10); |
| #else |
| y = -1; |
| #endif |
| z = strtol("42", &endptr, 10); |
| |
| printf ("%lld %lld %ld\n", x, y, z); |
| |
| exit (0); |
| } |
| #endif |