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