1bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman/* $OpenBSD: strtoll.c,v 1.6 2005/11/10 10:00:17 espie Exp $ */ 2bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman/*- 3bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * Copyright (c) 1992 The Regents of the University of California. 4bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * All rights reserved. 5bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * 6bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * Redistribution and use in source and binary forms, with or without 7bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * modification, are permitted provided that the following conditions 8bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * are met: 9bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * 1. Redistributions of source code must retain the above copyright 10bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * notice, this list of conditions and the following disclaimer. 11bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * 2. Redistributions in binary form must reproduce the above copyright 12bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * notice, this list of conditions and the following disclaimer in the 13bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * documentation and/or other materials provided with the distribution. 14bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * 3. Neither the name of the University nor the names of its contributors 15bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * may be used to endorse or promote products derived from this software 16bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * without specific prior written permission. 17bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * 18bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 19bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 22bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * SUCH DAMAGE. 29bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman */ 30bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman 31bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman/* OPENBSD ORIGINAL: lib/libc/stdlib/strtoll.c */ 32bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman 33bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman#include "includes.h" 34bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman#ifndef HAVE_STRTOLL 35bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman 36bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman#include <sys/types.h> 37bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman 38bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman#include <ctype.h> 39bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman#include <errno.h> 40bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman#include <limits.h> 41bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman#include <stdlib.h> 42bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman 43bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman/* 44bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * Convert a string to a long long. 45bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * 46bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * Ignores `locale' stuff. Assumes that the upper and lower case 47bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * alphabets and digits are each contiguous. 48bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman */ 49bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartmanlong long 50bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartmanstrtoll(const char *nptr, char **endptr, int base) 51bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman{ 52bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman const char *s; 53bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman long long acc, cutoff; 54bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman int c; 55bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman int neg, any, cutlim; 56bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman 57bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman /* 58bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * Skip white space and pick up leading +/- sign if any. 59bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * If base is 0, allow 0x for hex and 0 for octal, else 60bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * assume decimal; if base is already 16, allow 0x. 61bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman */ 62bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman s = nptr; 63bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman do { 64bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman c = (unsigned char) *s++; 65bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } while (isspace(c)); 66bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (c == '-') { 67bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman neg = 1; 68bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman c = *s++; 69bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } else { 70bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman neg = 0; 71bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (c == '+') 72bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman c = *s++; 73bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } 74bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if ((base == 0 || base == 16) && 75bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman c == '0' && (*s == 'x' || *s == 'X')) { 76bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman c = s[1]; 77bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman s += 2; 78bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman base = 16; 79bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } 80bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (base == 0) 81bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman base = c == '0' ? 8 : 10; 82bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman 83bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman /* 84bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * Compute the cutoff value between legal numbers and illegal 85bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * numbers. That is the largest legal value, divided by the 86bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * base. An input number that is greater than this value, if 87bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * followed by a legal input character, is too big. One that 88bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * is equal to this value may be valid or not; the limit 89bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * between valid and invalid numbers is then based on the last 90bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * digit. For instance, if the range for long longs is 91bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * [-9223372036854775808..9223372036854775807] and the input base 92bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * is 10, cutoff will be set to 922337203685477580 and cutlim to 93bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * either 7 (neg==0) or 8 (neg==1), meaning that if we have 94bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * accumulated a value > 922337203685477580, or equal but the 95bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * next digit is > 7 (or 8), the number is too big, and we will 96bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * return a range error. 97bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * 98bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * Set any if any `digits' consumed; make it negative to indicate 99bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman * overflow. 100bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman */ 101bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman cutoff = neg ? LLONG_MIN : LLONG_MAX; 102bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman cutlim = cutoff % base; 103bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman cutoff /= base; 104bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (neg) { 105bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (cutlim > 0) { 106bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman cutlim -= base; 107bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman cutoff += 1; 108bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } 109bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman cutlim = -cutlim; 110bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } 111bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman for (acc = 0, any = 0;; c = (unsigned char) *s++) { 112bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (isdigit(c)) 113bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman c -= '0'; 114bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman else if (isalpha(c)) 115bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman c -= isupper(c) ? 'A' - 10 : 'a' - 10; 116bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman else 117bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman break; 118bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (c >= base) 119bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman break; 120bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (any < 0) 121bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman continue; 122bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (neg) { 123bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (acc < cutoff || (acc == cutoff && c > cutlim)) { 124bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman any = -1; 125bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman acc = LLONG_MIN; 126bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman errno = ERANGE; 127bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } else { 128bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman any = 1; 129bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman acc *= base; 130bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman acc -= c; 131bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } 132bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } else { 133bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (acc > cutoff || (acc == cutoff && c > cutlim)) { 134bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman any = -1; 135bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman acc = LLONG_MAX; 136bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman errno = ERANGE; 137bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } else { 138bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman any = 1; 139bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman acc *= base; 140bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman acc += c; 141bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } 142bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } 143bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman } 144bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman if (endptr != 0) 145bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman *endptr = (char *) (any ? s - 1 : nptr); 146bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman return (acc); 147bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman} 148bd77cf78387b72b7b3ea870459077672bf75c3b5Greg Hartman#endif /* HAVE_STRTOLL */ 149