oksh-noxz

[fork] Portable OpenBSD ksh, based on the Public Domain Korn Shell (pdksh).
git clone https://noxz.tech/git/oksh-noxz.git
Log | Files | Tags

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