xref: /illumos-gate/usr/src/common/util/strtoul.c (revision 6ffde572)
17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate  * CDDL HEADER START
37c478bd9Sstevel@tonic-gate  *
47c478bd9Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
57257d1b4Sraf  * Common Development and Distribution License (the "License").
67257d1b4Sraf  * You may not use this file except in compliance with the License.
77c478bd9Sstevel@tonic-gate  *
87c478bd9Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
97c478bd9Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
107c478bd9Sstevel@tonic-gate  * See the License for the specific language governing permissions
117c478bd9Sstevel@tonic-gate  * and limitations under the License.
127c478bd9Sstevel@tonic-gate  *
137c478bd9Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
147c478bd9Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
157c478bd9Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
167c478bd9Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
177c478bd9Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
187c478bd9Sstevel@tonic-gate  *
197c478bd9Sstevel@tonic-gate  * CDDL HEADER END
207c478bd9Sstevel@tonic-gate  */
217c478bd9Sstevel@tonic-gate 
227c478bd9Sstevel@tonic-gate /*
232ef9abdcSjv  * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
247c478bd9Sstevel@tonic-gate  * Use is subject to license terms.
257c478bd9Sstevel@tonic-gate  */
267c478bd9Sstevel@tonic-gate 
277257d1b4Sraf /*	Copyright (c) 1988 AT&T	*/
2828de4f3cSToomas Soome /*	  All Rights Reserved	*/
297257d1b4Sraf 
30*6ffde572SToomas Soome #if	defined(_KERNEL)
3128de4f3cSToomas Soome #include <sys/null.h>
32*6ffde572SToomas Soome #endif	/* _KERNEL */
33*6ffde572SToomas Soome 
34*6ffde572SToomas Soome #if	defined(_KERNEL) && !defined(_BOOT)
352ef9abdcSjv #include <sys/errno.h>
362ef9abdcSjv #else	/* _KERNEL && !_BOOT */
3728de4f3cSToomas Soome #if	!defined(_BOOT) && !defined(_KMDB) && !defined(_STANDALONE)
387257d1b4Sraf #include "lint.h"
3928de4f3cSToomas Soome #endif	/* !_BOOT && !_KMDB && !_STANDALONE */
4028de4f3cSToomas Soome #if	defined(_STANDALONE)
4128de4f3cSToomas Soome #include <sys/cdefs.h>
4228de4f3cSToomas Soome #include <stand.h>
4328de4f3cSToomas Soome #include <limits.h>
4428de4f3cSToomas Soome #else
457c478bd9Sstevel@tonic-gate #include <errno.h>
467c478bd9Sstevel@tonic-gate #include <ctype.h>
477c478bd9Sstevel@tonic-gate #include <limits.h>
487c478bd9Sstevel@tonic-gate #include <stdlib.h>
4928de4f3cSToomas Soome #endif	/* _STANDALONE */
502ef9abdcSjv #endif	/* _KERNEL && !_BOOT */
512ef9abdcSjv #include "strtolctype.h"
527c478bd9Sstevel@tonic-gate #include <sys/types.h>
537c478bd9Sstevel@tonic-gate 
542ef9abdcSjv #if	defined(_KERNEL) && !defined(_BOOT)
552ef9abdcSjv int
ddi_strtoul(const char * str,char ** nptr,int base,unsigned long * result)562ef9abdcSjv ddi_strtoul(const char *str, char **nptr, int base, unsigned long *result)
572ef9abdcSjv #else	/* _KERNEL && !_BOOT */
587c478bd9Sstevel@tonic-gate unsigned long
597c478bd9Sstevel@tonic-gate strtoul(const char *str, char **nptr, int base)
602ef9abdcSjv #endif	/* _KERNEL && !_BOOT */
617c478bd9Sstevel@tonic-gate {
627c478bd9Sstevel@tonic-gate 	unsigned long val;
637c478bd9Sstevel@tonic-gate 	int c;
647c478bd9Sstevel@tonic-gate 	int xx;
657c478bd9Sstevel@tonic-gate 	int neg = 0;
662ef9abdcSjv 	unsigned long multmax;
677c478bd9Sstevel@tonic-gate 	const char **ptr = (const char **)nptr;
682ef9abdcSjv 	const unsigned char *ustr = (const unsigned char *)str;
697c478bd9Sstevel@tonic-gate 
7028de4f3cSToomas Soome 	if (ptr != NULL)
717c478bd9Sstevel@tonic-gate 		*ptr = (char *)ustr; /* in case no number is formed */
727c478bd9Sstevel@tonic-gate 	if (base < 0 || base > MBASE || base == 1) {
732ef9abdcSjv 		/* base is invalid -- should be a fatal error */
742ef9abdcSjv #if	defined(_KERNEL) && !defined(_BOOT)
752ef9abdcSjv 		return (EINVAL);
762ef9abdcSjv #else	/* _KERNEL && !_BOOT */
777c478bd9Sstevel@tonic-gate 		errno = EINVAL;
782ef9abdcSjv 		return (0);
792ef9abdcSjv #endif	/* _KERNEL && !_BOOT */
807c478bd9Sstevel@tonic-gate 	}
817c478bd9Sstevel@tonic-gate 	if (!isalnum(c = *ustr)) {
827c478bd9Sstevel@tonic-gate 		while (isspace(c))
837c478bd9Sstevel@tonic-gate 			c = *++ustr;
847c478bd9Sstevel@tonic-gate 		switch (c) {
857c478bd9Sstevel@tonic-gate 		case '-':
867c478bd9Sstevel@tonic-gate 			neg++;
877c478bd9Sstevel@tonic-gate 			/* FALLTHROUGH */
887c478bd9Sstevel@tonic-gate 		case '+':
897c478bd9Sstevel@tonic-gate 			c = *++ustr;
907c478bd9Sstevel@tonic-gate 		}
917c478bd9Sstevel@tonic-gate 	}
9228de4f3cSToomas Soome 	if (base == 0) {
937c478bd9Sstevel@tonic-gate 		if (c != '0')
947c478bd9Sstevel@tonic-gate 			base = 10;
957c478bd9Sstevel@tonic-gate 		else if (ustr[1] == 'x' || ustr[1] == 'X')
967c478bd9Sstevel@tonic-gate 			base = 16;
977c478bd9Sstevel@tonic-gate 		else
987c478bd9Sstevel@tonic-gate 			base = 8;
9928de4f3cSToomas Soome 	}
1007c478bd9Sstevel@tonic-gate 	/*
1017c478bd9Sstevel@tonic-gate 	 * for any base > 10, the digits incrementally following
1027c478bd9Sstevel@tonic-gate 	 *	9 are assumed to be "abc...z" or "ABC...Z"
1037c478bd9Sstevel@tonic-gate 	 */
1042ef9abdcSjv 	if (!lisalnum(c) || (xx = DIGIT(c)) >= base) {
1052ef9abdcSjv 		/* no number formed */
1062ef9abdcSjv #if	defined(_KERNEL) && !defined(_BOOT)
1072ef9abdcSjv 		return (EINVAL);
1082ef9abdcSjv #else	/* _KERNEL && !_BOOT */
1092ef9abdcSjv 		return (0);
1102ef9abdcSjv #endif	/* _KERNEL && !_BOOT */
1112ef9abdcSjv 	}
1127c478bd9Sstevel@tonic-gate 	if (base == 16 && c == '0' && (ustr[1] == 'x' || ustr[1] == 'X') &&
1137c478bd9Sstevel@tonic-gate 	    isxdigit(ustr[2]))
1147c478bd9Sstevel@tonic-gate 		c = *(ustr += 2); /* skip over leading "0x" or "0X" */
1157c478bd9Sstevel@tonic-gate 
1167c478bd9Sstevel@tonic-gate 	multmax = ULONG_MAX / (unsigned long)base;
1177c478bd9Sstevel@tonic-gate 	val = DIGIT(c);
1187c478bd9Sstevel@tonic-gate 	for (c = *++ustr; lisalnum(c) && (xx = DIGIT(c)) < base; ) {
1197c478bd9Sstevel@tonic-gate 		if (val > multmax)
1207c478bd9Sstevel@tonic-gate 			goto overflow;
1217c478bd9Sstevel@tonic-gate 		val *= base;
12228de4f3cSToomas Soome 		if (ULONG_MAX - val < (unsigned long)xx)
1237c478bd9Sstevel@tonic-gate 			goto overflow;
1247c478bd9Sstevel@tonic-gate 		val += xx;
1257c478bd9Sstevel@tonic-gate 		c = *++ustr;
1267c478bd9Sstevel@tonic-gate 	}
12728de4f3cSToomas Soome 	if (ptr != NULL)
1287c478bd9Sstevel@tonic-gate 		*ptr = (char *)ustr;
1292ef9abdcSjv #if	defined(_KERNEL) && !defined(_BOOT)
1302ef9abdcSjv 	*result = neg ? -val : val;
1312ef9abdcSjv 	return (0);
1322ef9abdcSjv #else	/* _KERNEL && !_BOOT */
1337c478bd9Sstevel@tonic-gate 	return (neg ? -val : val);
1342ef9abdcSjv #endif	/* _KERNEL && !_BOOT */
1357c478bd9Sstevel@tonic-gate 
1367c478bd9Sstevel@tonic-gate overflow:
1377c478bd9Sstevel@tonic-gate 	for (c = *++ustr; lisalnum(c) && (xx = DIGIT(c)) < base; (c = *++ustr))
1387c478bd9Sstevel@tonic-gate 		;
13928de4f3cSToomas Soome 	if (ptr != NULL)
1407c478bd9Sstevel@tonic-gate 		*ptr = (char *)ustr;
1412ef9abdcSjv #if	defined(_KERNEL) && !defined(_BOOT)
1422ef9abdcSjv 	return (ERANGE);
1432ef9abdcSjv #else	/* _KERNEL && !_BOOT */
1447c478bd9Sstevel@tonic-gate 	errno = ERANGE;
1457c478bd9Sstevel@tonic-gate 	return (ULONG_MAX);
1462ef9abdcSjv #endif	/* _KERNEL && !_BOOT */
1477c478bd9Sstevel@tonic-gate }
148