4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
23 * Copyright 2009 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
27 /* Copyright (c) 1988 AT&T */
28 /* All Rights Reserved */
30 #if defined(_KERNEL) && !defined(_BOOT)
31 #include <sys/errno.h>
32 #else /* _KERNEL && !_BOOT */
33 #if !defined(_BOOT) && !defined(_KMDB)
35 #endif /* !_BOOT && !_KMDB */
40 #endif /* _KERNEL && !_BOOT */
41 #include "strtolctype.h"
42 #include <sys/types.h>
44 #if defined(_KERNEL) && !defined(_BOOT)
46 ddi_strtoul(const char *str
, char **nptr
, int base
, unsigned long *result
)
47 #else /* _KERNEL && !_BOOT */
49 strtoul(const char *str
, char **nptr
, int base
)
50 #endif /* _KERNEL && !_BOOT */
56 unsigned long multmax
;
57 const char **ptr
= (const char **)nptr
;
58 const unsigned char *ustr
= (const unsigned char *)str
;
60 if (ptr
!= (const char **)0)
61 *ptr
= (char *)ustr
; /* in case no number is formed */
62 if (base
< 0 || base
> MBASE
|| base
== 1) {
63 /* base is invalid -- should be a fatal error */
64 #if defined(_KERNEL) && !defined(_BOOT)
66 #else /* _KERNEL && !_BOOT */
69 #endif /* _KERNEL && !_BOOT */
71 if (!isalnum(c
= *ustr
)) {
85 else if (ustr
[1] == 'x' || ustr
[1] == 'X')
90 * for any base > 10, the digits incrementally following
91 * 9 are assumed to be "abc...z" or "ABC...Z"
93 if (!lisalnum(c
) || (xx
= DIGIT(c
)) >= base
) {
94 /* no number formed */
95 #if defined(_KERNEL) && !defined(_BOOT)
97 #else /* _KERNEL && !_BOOT */
99 #endif /* _KERNEL && !_BOOT */
101 if (base
== 16 && c
== '0' && (ustr
[1] == 'x' || ustr
[1] == 'X') &&
103 c
= *(ustr
+= 2); /* skip over leading "0x" or "0X" */
105 multmax
= ULONG_MAX
/ (unsigned long)base
;
107 for (c
= *++ustr
; lisalnum(c
) && (xx
= DIGIT(c
)) < base
; ) {
111 if (ULONG_MAX
- val
< xx
)
116 if (ptr
!= (const char **)0)
118 #if defined(_KERNEL) && !defined(_BOOT)
119 *result
= neg
? -val
: val
;
121 #else /* _KERNEL && !_BOOT */
122 return (neg
? -val
: val
);
123 #endif /* _KERNEL && !_BOOT */
126 for (c
= *++ustr
; lisalnum(c
) && (xx
= DIGIT(c
)) < base
; (c
= *++ustr
))
128 if (ptr
!= (const char **)0)
130 #if defined(_KERNEL) && !defined(_BOOT)
132 #else /* _KERNEL && !_BOOT */
135 #endif /* _KERNEL && !_BOOT */