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 5*7257d1b4Sraf * Common Development and Distribution License (the "License"). 6*7257d1b4Sraf * 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 /* 23*7257d1b4Sraf * Copyright 2008 Sun Microsystems, Inc. All rights reserved. 247c478bd9Sstevel@tonic-gate * Use is subject to license terms. 257c478bd9Sstevel@tonic-gate */ 267c478bd9Sstevel@tonic-gate 27*7257d1b4Sraf /* Copyright (c) 1988 AT&T */ 28*7257d1b4Sraf /* All Rights Reserved */ 29*7257d1b4Sraf 30*7257d1b4Sraf #pragma ident "%Z%%M% %I% %E% SMI" 317c478bd9Sstevel@tonic-gate 327c478bd9Sstevel@tonic-gate #if !defined(_BOOT) && !defined(_KMDB) 33*7257d1b4Sraf #include "lint.h" 347c478bd9Sstevel@tonic-gate #endif /* !_BOOT && !_KMDB */ 357c478bd9Sstevel@tonic-gate #include <errno.h> 367c478bd9Sstevel@tonic-gate #include <ctype.h> 377c478bd9Sstevel@tonic-gate #include <limits.h> 387c478bd9Sstevel@tonic-gate #include <stdlib.h> 397c478bd9Sstevel@tonic-gate #include <sys/types.h> 407c478bd9Sstevel@tonic-gate 417c478bd9Sstevel@tonic-gate #define DIGIT(x) \ 427c478bd9Sstevel@tonic-gate (isdigit(x) ? (x) - '0' : islower(x) ? (x) + 10 - 'a' : (x) + 10 - 'A') 437c478bd9Sstevel@tonic-gate 447c478bd9Sstevel@tonic-gate #define MBASE ('z' - 'a' + 1 + 10) 457c478bd9Sstevel@tonic-gate 467c478bd9Sstevel@tonic-gate /* 477c478bd9Sstevel@tonic-gate * The following macro is a local version of isalnum() which limits 487c478bd9Sstevel@tonic-gate * alphabetic characters to the ranges a-z and A-Z; locale dependent 497c478bd9Sstevel@tonic-gate * characters will not return 1. The members of a-z and A-Z are 507c478bd9Sstevel@tonic-gate * assumed to be in ascending order and contiguous 517c478bd9Sstevel@tonic-gate */ 527c478bd9Sstevel@tonic-gate #define lisalnum(x) \ 537c478bd9Sstevel@tonic-gate (isdigit(x) || ((x) >= 'a' && (x) <= 'z') || ((x) >= 'A' && (x) <= 'Z')) 547c478bd9Sstevel@tonic-gate 557c478bd9Sstevel@tonic-gate unsigned long 567c478bd9Sstevel@tonic-gate strtoul(const char *str, char **nptr, int base) 577c478bd9Sstevel@tonic-gate { 587c478bd9Sstevel@tonic-gate unsigned long val; 597c478bd9Sstevel@tonic-gate int c; 607c478bd9Sstevel@tonic-gate int xx; 617c478bd9Sstevel@tonic-gate unsigned long multmax; 627c478bd9Sstevel@tonic-gate int neg = 0; 637c478bd9Sstevel@tonic-gate const char **ptr = (const char **)nptr; 647c478bd9Sstevel@tonic-gate const unsigned char *ustr = (const unsigned char *)str; 657c478bd9Sstevel@tonic-gate 667c478bd9Sstevel@tonic-gate if (ptr != (const char **)0) 677c478bd9Sstevel@tonic-gate *ptr = (char *)ustr; /* in case no number is formed */ 687c478bd9Sstevel@tonic-gate if (base < 0 || base > MBASE || base == 1) { 697c478bd9Sstevel@tonic-gate errno = EINVAL; 707c478bd9Sstevel@tonic-gate return (0); /* base is invalid -- should be a fatal error */ 717c478bd9Sstevel@tonic-gate } 727c478bd9Sstevel@tonic-gate if (!isalnum(c = *ustr)) { 737c478bd9Sstevel@tonic-gate while (isspace(c)) 747c478bd9Sstevel@tonic-gate c = *++ustr; 757c478bd9Sstevel@tonic-gate switch (c) { 767c478bd9Sstevel@tonic-gate case '-': 777c478bd9Sstevel@tonic-gate neg++; 787c478bd9Sstevel@tonic-gate /* FALLTHROUGH */ 797c478bd9Sstevel@tonic-gate case '+': 807c478bd9Sstevel@tonic-gate c = *++ustr; 817c478bd9Sstevel@tonic-gate } 827c478bd9Sstevel@tonic-gate } 837c478bd9Sstevel@tonic-gate if (base == 0) 847c478bd9Sstevel@tonic-gate if (c != '0') 857c478bd9Sstevel@tonic-gate base = 10; 867c478bd9Sstevel@tonic-gate else if (ustr[1] == 'x' || ustr[1] == 'X') 877c478bd9Sstevel@tonic-gate base = 16; 887c478bd9Sstevel@tonic-gate else 897c478bd9Sstevel@tonic-gate base = 8; 907c478bd9Sstevel@tonic-gate /* 917c478bd9Sstevel@tonic-gate * for any base > 10, the digits incrementally following 927c478bd9Sstevel@tonic-gate * 9 are assumed to be "abc...z" or "ABC...Z" 937c478bd9Sstevel@tonic-gate */ 947c478bd9Sstevel@tonic-gate if (!lisalnum(c) || (xx = DIGIT(c)) >= base) 957c478bd9Sstevel@tonic-gate return (0); /* no number formed */ 967c478bd9Sstevel@tonic-gate if (base == 16 && c == '0' && (ustr[1] == 'x' || ustr[1] == 'X') && 977c478bd9Sstevel@tonic-gate isxdigit(ustr[2])) 987c478bd9Sstevel@tonic-gate c = *(ustr += 2); /* skip over leading "0x" or "0X" */ 997c478bd9Sstevel@tonic-gate 1007c478bd9Sstevel@tonic-gate multmax = ULONG_MAX / (unsigned long)base; 1017c478bd9Sstevel@tonic-gate val = DIGIT(c); 1027c478bd9Sstevel@tonic-gate for (c = *++ustr; lisalnum(c) && (xx = DIGIT(c)) < base; ) { 1037c478bd9Sstevel@tonic-gate if (val > multmax) 1047c478bd9Sstevel@tonic-gate goto overflow; 1057c478bd9Sstevel@tonic-gate val *= base; 1067c478bd9Sstevel@tonic-gate if (ULONG_MAX - val < xx) 1077c478bd9Sstevel@tonic-gate goto overflow; 1087c478bd9Sstevel@tonic-gate val += xx; 1097c478bd9Sstevel@tonic-gate c = *++ustr; 1107c478bd9Sstevel@tonic-gate } 1117c478bd9Sstevel@tonic-gate if (ptr != (const char **)0) 1127c478bd9Sstevel@tonic-gate *ptr = (char *)ustr; 1137c478bd9Sstevel@tonic-gate return (neg ? -val : val); 1147c478bd9Sstevel@tonic-gate 1157c478bd9Sstevel@tonic-gate overflow: 1167c478bd9Sstevel@tonic-gate for (c = *++ustr; lisalnum(c) && (xx = DIGIT(c)) < base; (c = *++ustr)) 1177c478bd9Sstevel@tonic-gate ; 1187c478bd9Sstevel@tonic-gate if (ptr != (const char **)0) 1197c478bd9Sstevel@tonic-gate *ptr = (char *)ustr; 1207c478bd9Sstevel@tonic-gate errno = ERANGE; 1217c478bd9Sstevel@tonic-gate return (ULONG_MAX); 1227c478bd9Sstevel@tonic-gate } 123