1*6888a9beSDag-Erling Smørgrav /* $OpenBSD: strtoull.c,v 1.5 2005/08/08 08:05:37 espie Exp $ */ 2*6888a9beSDag-Erling Smørgrav /*- 3*6888a9beSDag-Erling Smørgrav * Copyright (c) 1992 The Regents of the University of California. 4*6888a9beSDag-Erling Smørgrav * All rights reserved. 5*6888a9beSDag-Erling Smørgrav * 6*6888a9beSDag-Erling Smørgrav * Redistribution and use in source and binary forms, with or without 7*6888a9beSDag-Erling Smørgrav * modification, are permitted provided that the following conditions 8*6888a9beSDag-Erling Smørgrav * are met: 9*6888a9beSDag-Erling Smørgrav * 1. Redistributions of source code must retain the above copyright 10*6888a9beSDag-Erling Smørgrav * notice, this list of conditions and the following disclaimer. 11*6888a9beSDag-Erling Smørgrav * 2. Redistributions in binary form must reproduce the above copyright 12*6888a9beSDag-Erling Smørgrav * notice, this list of conditions and the following disclaimer in the 13*6888a9beSDag-Erling Smørgrav * documentation and/or other materials provided with the distribution. 14*6888a9beSDag-Erling Smørgrav * 3. Neither the name of the University nor the names of its contributors 15*6888a9beSDag-Erling Smørgrav * may be used to endorse or promote products derived from this software 16*6888a9beSDag-Erling Smørgrav * without specific prior written permission. 17*6888a9beSDag-Erling Smørgrav * 18*6888a9beSDag-Erling Smørgrav * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 19*6888a9beSDag-Erling Smørgrav * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20*6888a9beSDag-Erling Smørgrav * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21*6888a9beSDag-Erling Smørgrav * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 22*6888a9beSDag-Erling Smørgrav * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23*6888a9beSDag-Erling Smørgrav * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24*6888a9beSDag-Erling Smørgrav * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25*6888a9beSDag-Erling Smørgrav * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26*6888a9beSDag-Erling Smørgrav * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27*6888a9beSDag-Erling Smørgrav * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28*6888a9beSDag-Erling Smørgrav * SUCH DAMAGE. 29*6888a9beSDag-Erling Smørgrav */ 30*6888a9beSDag-Erling Smørgrav 31*6888a9beSDag-Erling Smørgrav /* OPENBSD ORIGINAL: lib/libc/stdlib/strtoull.c */ 32*6888a9beSDag-Erling Smørgrav 33*6888a9beSDag-Erling Smørgrav #include "includes.h" 34*6888a9beSDag-Erling Smørgrav #ifndef HAVE_STRTOULL 35*6888a9beSDag-Erling Smørgrav 36*6888a9beSDag-Erling Smørgrav #include <sys/types.h> 37*6888a9beSDag-Erling Smørgrav 38*6888a9beSDag-Erling Smørgrav #include <ctype.h> 39*6888a9beSDag-Erling Smørgrav #include <errno.h> 40*6888a9beSDag-Erling Smørgrav #include <limits.h> 41*6888a9beSDag-Erling Smørgrav #include <stdlib.h> 42*6888a9beSDag-Erling Smørgrav 43*6888a9beSDag-Erling Smørgrav /* 44*6888a9beSDag-Erling Smørgrav * Convert a string to an unsigned long long. 45*6888a9beSDag-Erling Smørgrav * 46*6888a9beSDag-Erling Smørgrav * Ignores `locale' stuff. Assumes that the upper and lower case 47*6888a9beSDag-Erling Smørgrav * alphabets and digits are each contiguous. 48*6888a9beSDag-Erling Smørgrav */ 49*6888a9beSDag-Erling Smørgrav unsigned long long 50*6888a9beSDag-Erling Smørgrav strtoull(const char *nptr, char **endptr, int base) 51*6888a9beSDag-Erling Smørgrav { 52*6888a9beSDag-Erling Smørgrav const char *s; 53*6888a9beSDag-Erling Smørgrav unsigned long long acc, cutoff; 54*6888a9beSDag-Erling Smørgrav int c; 55*6888a9beSDag-Erling Smørgrav int neg, any, cutlim; 56*6888a9beSDag-Erling Smørgrav 57*6888a9beSDag-Erling Smørgrav /* 58*6888a9beSDag-Erling Smørgrav * See strtoq for comments as to the logic used. 59*6888a9beSDag-Erling Smørgrav */ 60*6888a9beSDag-Erling Smørgrav s = nptr; 61*6888a9beSDag-Erling Smørgrav do { 62*6888a9beSDag-Erling Smørgrav c = (unsigned char) *s++; 63*6888a9beSDag-Erling Smørgrav } while (isspace(c)); 64*6888a9beSDag-Erling Smørgrav if (c == '-') { 65*6888a9beSDag-Erling Smørgrav neg = 1; 66*6888a9beSDag-Erling Smørgrav c = *s++; 67*6888a9beSDag-Erling Smørgrav } else { 68*6888a9beSDag-Erling Smørgrav neg = 0; 69*6888a9beSDag-Erling Smørgrav if (c == '+') 70*6888a9beSDag-Erling Smørgrav c = *s++; 71*6888a9beSDag-Erling Smørgrav } 72*6888a9beSDag-Erling Smørgrav if ((base == 0 || base == 16) && 73*6888a9beSDag-Erling Smørgrav c == '0' && (*s == 'x' || *s == 'X')) { 74*6888a9beSDag-Erling Smørgrav c = s[1]; 75*6888a9beSDag-Erling Smørgrav s += 2; 76*6888a9beSDag-Erling Smørgrav base = 16; 77*6888a9beSDag-Erling Smørgrav } 78*6888a9beSDag-Erling Smørgrav if (base == 0) 79*6888a9beSDag-Erling Smørgrav base = c == '0' ? 8 : 10; 80*6888a9beSDag-Erling Smørgrav 81*6888a9beSDag-Erling Smørgrav cutoff = ULLONG_MAX / (unsigned long long)base; 82*6888a9beSDag-Erling Smørgrav cutlim = ULLONG_MAX % (unsigned long long)base; 83*6888a9beSDag-Erling Smørgrav for (acc = 0, any = 0;; c = (unsigned char) *s++) { 84*6888a9beSDag-Erling Smørgrav if (isdigit(c)) 85*6888a9beSDag-Erling Smørgrav c -= '0'; 86*6888a9beSDag-Erling Smørgrav else if (isalpha(c)) 87*6888a9beSDag-Erling Smørgrav c -= isupper(c) ? 'A' - 10 : 'a' - 10; 88*6888a9beSDag-Erling Smørgrav else 89*6888a9beSDag-Erling Smørgrav break; 90*6888a9beSDag-Erling Smørgrav if (c >= base) 91*6888a9beSDag-Erling Smørgrav break; 92*6888a9beSDag-Erling Smørgrav if (any < 0) 93*6888a9beSDag-Erling Smørgrav continue; 94*6888a9beSDag-Erling Smørgrav if (acc > cutoff || (acc == cutoff && c > cutlim)) { 95*6888a9beSDag-Erling Smørgrav any = -1; 96*6888a9beSDag-Erling Smørgrav acc = ULLONG_MAX; 97*6888a9beSDag-Erling Smørgrav errno = ERANGE; 98*6888a9beSDag-Erling Smørgrav } else { 99*6888a9beSDag-Erling Smørgrav any = 1; 100*6888a9beSDag-Erling Smørgrav acc *= (unsigned long long)base; 101*6888a9beSDag-Erling Smørgrav acc += c; 102*6888a9beSDag-Erling Smørgrav } 103*6888a9beSDag-Erling Smørgrav } 104*6888a9beSDag-Erling Smørgrav if (neg && any > 0) 105*6888a9beSDag-Erling Smørgrav acc = -acc; 106*6888a9beSDag-Erling Smørgrav if (endptr != 0) 107*6888a9beSDag-Erling Smørgrav *endptr = (char *) (any ? s - 1 : nptr); 108*6888a9beSDag-Erling Smørgrav return (acc); 109*6888a9beSDag-Erling Smørgrav } 110*6888a9beSDag-Erling Smørgrav #endif /* !HAVE_STRTOULL */ 111