xref: /illumos-gate/usr/src/lib/libc/port/gen/strtonum.c (revision 223750d9)
1 /*
2  * Copyright (c) 2004 Ted Unangst and Todd Miller
3  * All rights reserved.
4  *
5  * Permission to use, copy, modify, and distribute this software for any
6  * purpose with or without fee is hereby granted, provided that the above
7  * copyright notice and this permission notice appear in all copies.
8  *
9  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16  */
17 
18 /*
19  * Copyright 2023 Oxide Computer Company
20  */
21 
22 #include <errno.h>
23 #include <limits.h>
24 #include <stdlib.h>
25 
26 #define	INVALID		1
27 #define	TOOSMALL	2
28 #define	TOOLARGE	3
29 #define	BADBASE		4
30 
31 #define	MBASE		('z' - 'a' + 1 + 10)
32 
33 long long
strtonumx(const char * numstr,long long minval,long long maxval,const char ** errstrp,int base)34 strtonumx(const char *numstr, long long minval, long long maxval,
35     const char **errstrp, int base)
36 {
37 	long long ll = 0;
38 	int error = 0;
39 	char *ep;
40 	struct errval {
41 		const char *errstr;
42 		int err;
43 	} ev[5] = {
44 		{ NULL,		0 },
45 		{ "invalid",	EINVAL },
46 		{ "too small",	ERANGE },
47 		{ "too large",	ERANGE },
48 		{ "unparsable; invalid base specified", EINVAL },
49 	};
50 
51 	ev[0].err = errno;
52 	errno = 0;
53 	if (minval > maxval) {
54 		error = INVALID;
55 	} else if (base < 0 || base > MBASE || base == 1) {
56 		error = BADBASE;
57 	} else {
58 		ll = strtoll(numstr, &ep, base);
59 		if (numstr == ep || *ep != '\0')
60 			error = INVALID;
61 		else if ((ll == LLONG_MIN && errno == ERANGE) || ll < minval)
62 			error = TOOSMALL;
63 		else if ((ll == LLONG_MAX && errno == ERANGE) || ll > maxval)
64 			error = TOOLARGE;
65 	}
66 	if (errstrp != NULL)
67 		*errstrp = ev[error].errstr;
68 	errno = ev[error].err;
69 	if (error != 0)
70 		ll = 0;
71 
72 	return (ll);
73 }
74 
75 long long
strtonum(const char * numstr,long long minval,long long maxval,const char ** errstrp)76 strtonum(const char *numstr, long long minval, long long maxval,
77     const char **errstrp)
78 {
79 	return (strtonumx(numstr, minval, maxval, errstrp, 10));
80 }
81