1*0Sstevel@tonic-gate /* 2*0Sstevel@tonic-gate * Copyright 2003 by Sun Microsystems, Inc. All rights reserved. 3*0Sstevel@tonic-gate * Use is subject to license terms. 4*0Sstevel@tonic-gate */ 5*0Sstevel@tonic-gate 6*0Sstevel@tonic-gate #if defined(LIBC_SCCS) && !defined(lint) 7*0Sstevel@tonic-gate static const char sccsid[] = "@(#)strtoul.c 8.1 (Berkeley) 6/4/93"; 8*0Sstevel@tonic-gate static const char rcsid[] = "$Id: strtoul.c,v 8.5 2002/07/06 02:35:04 marka Exp $"; 9*0Sstevel@tonic-gate #endif /* LIBC_SCCS and not lint */ 10*0Sstevel@tonic-gate 11*0Sstevel@tonic-gate /* 12*0Sstevel@tonic-gate * Copyright (c) 1990, 1993 13*0Sstevel@tonic-gate * The Regents of the University of California. All rights reserved. 14*0Sstevel@tonic-gate * 15*0Sstevel@tonic-gate * Redistribution and use in source and binary forms, with or without 16*0Sstevel@tonic-gate * modification, are permitted provided that the following conditions 17*0Sstevel@tonic-gate * are met: 18*0Sstevel@tonic-gate * 1. Redistributions of source code must retain the above copyright 19*0Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer. 20*0Sstevel@tonic-gate * 2. Redistributions in binary form must reproduce the above copyright 21*0Sstevel@tonic-gate * notice, this list of conditions and the following disclaimer in the 22*0Sstevel@tonic-gate * documentation and/or other materials provided with the distribution. 23*0Sstevel@tonic-gate * 3. All advertising materials mentioning features or use of this software 24*0Sstevel@tonic-gate * must display the following acknowledgement: 25*0Sstevel@tonic-gate * This product includes software developed by the University of 26*0Sstevel@tonic-gate * California, Berkeley and its contributors. 27*0Sstevel@tonic-gate * 4. Neither the name of the University nor the names of its contributors 28*0Sstevel@tonic-gate * may be used to endorse or promote products derived from this software 29*0Sstevel@tonic-gate * without specific prior written permission. 30*0Sstevel@tonic-gate * 31*0Sstevel@tonic-gate * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 32*0Sstevel@tonic-gate * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 33*0Sstevel@tonic-gate * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 34*0Sstevel@tonic-gate * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 35*0Sstevel@tonic-gate * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 36*0Sstevel@tonic-gate * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 37*0Sstevel@tonic-gate * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 38*0Sstevel@tonic-gate * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 39*0Sstevel@tonic-gate * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 40*0Sstevel@tonic-gate * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 41*0Sstevel@tonic-gate * SUCH DAMAGE. 42*0Sstevel@tonic-gate */ 43*0Sstevel@tonic-gate 44*0Sstevel@tonic-gate 45*0Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" 46*0Sstevel@tonic-gate 47*0Sstevel@tonic-gate #include "port_before.h" 48*0Sstevel@tonic-gate 49*0Sstevel@tonic-gate #include <sys/types.h> 50*0Sstevel@tonic-gate #include <sys/param.h> 51*0Sstevel@tonic-gate 52*0Sstevel@tonic-gate #include <ctype.h> 53*0Sstevel@tonic-gate #include <errno.h> 54*0Sstevel@tonic-gate #include <limits.h> 55*0Sstevel@tonic-gate #include <stdlib.h> 56*0Sstevel@tonic-gate 57*0Sstevel@tonic-gate #include "port_after.h" 58*0Sstevel@tonic-gate 59*0Sstevel@tonic-gate #ifndef NEED_STRTOUL 60*0Sstevel@tonic-gate int __strtoul_unneeded__; 61*0Sstevel@tonic-gate #else 62*0Sstevel@tonic-gate 63*0Sstevel@tonic-gate /* 64*0Sstevel@tonic-gate * Convert a string to an unsigned long integer. 65*0Sstevel@tonic-gate * 66*0Sstevel@tonic-gate * Ignores `locale' stuff. Assumes that the upper and lower case 67*0Sstevel@tonic-gate * alphabets and digits are each contiguous. 68*0Sstevel@tonic-gate */ 69*0Sstevel@tonic-gate u_long 70*0Sstevel@tonic-gate strtoul(const char *nptr, char **endptr, int base) { 71*0Sstevel@tonic-gate const char *s = nptr; 72*0Sstevel@tonic-gate u_long acc, cutoff; 73*0Sstevel@tonic-gate int neg, c, any, cutlim; 74*0Sstevel@tonic-gate 75*0Sstevel@tonic-gate neg = 0; 76*0Sstevel@tonic-gate 77*0Sstevel@tonic-gate /* 78*0Sstevel@tonic-gate * See strtol for comments as to the logic used. 79*0Sstevel@tonic-gate */ 80*0Sstevel@tonic-gate do { 81*0Sstevel@tonic-gate c = *(unsigned char *)s++; 82*0Sstevel@tonic-gate } while (isspace(c)); 83*0Sstevel@tonic-gate if (c == '-') { 84*0Sstevel@tonic-gate neg = 1; 85*0Sstevel@tonic-gate c = *s++; 86*0Sstevel@tonic-gate } else if (c == '+') 87*0Sstevel@tonic-gate c = *s++; 88*0Sstevel@tonic-gate if ((base == 0 || base == 16) && 89*0Sstevel@tonic-gate c == '0' && (*s == 'x' || *s == 'X')) { 90*0Sstevel@tonic-gate c = s[1]; 91*0Sstevel@tonic-gate s += 2; 92*0Sstevel@tonic-gate base = 16; 93*0Sstevel@tonic-gate } 94*0Sstevel@tonic-gate if (base == 0) 95*0Sstevel@tonic-gate base = c == '0' ? 8 : 10; 96*0Sstevel@tonic-gate cutoff = (u_long)ULONG_MAX / (u_long)base; 97*0Sstevel@tonic-gate cutlim = (u_long)ULONG_MAX % (u_long)base; 98*0Sstevel@tonic-gate for (acc = 0, any = 0;; c = *(unsigned char*)s++) { 99*0Sstevel@tonic-gate if (isdigit(c)) 100*0Sstevel@tonic-gate c -= '0'; 101*0Sstevel@tonic-gate else if (isalpha(c)) 102*0Sstevel@tonic-gate c -= isupper(c) ? 'A' - 10 : 'a' - 10; 103*0Sstevel@tonic-gate else 104*0Sstevel@tonic-gate break; 105*0Sstevel@tonic-gate if (c >= base) 106*0Sstevel@tonic-gate break; 107*0Sstevel@tonic-gate if (any < 0 || acc > cutoff || acc == cutoff && c > cutlim) 108*0Sstevel@tonic-gate any = -1; 109*0Sstevel@tonic-gate else { 110*0Sstevel@tonic-gate any = 1; 111*0Sstevel@tonic-gate acc *= base; 112*0Sstevel@tonic-gate acc += c; 113*0Sstevel@tonic-gate } 114*0Sstevel@tonic-gate } 115*0Sstevel@tonic-gate if (any < 0) { 116*0Sstevel@tonic-gate acc = ULONG_MAX; 117*0Sstevel@tonic-gate errno = ERANGE; 118*0Sstevel@tonic-gate } else if (neg) 119*0Sstevel@tonic-gate acc = -acc; 120*0Sstevel@tonic-gate if (endptr != 0) 121*0Sstevel@tonic-gate *endptr = (char *)(any ? s - 1 : nptr); 122*0Sstevel@tonic-gate return (acc); 123*0Sstevel@tonic-gate } 124*0Sstevel@tonic-gate 125*0Sstevel@tonic-gate #endif /*NEED_STRTOUL*/ 126