xref: /freebsd/contrib/ntp/libntp/atoint.c (revision 06c3fb2749bda94cb5201f81ffdb8fa6c3161b2e)
1 /*
2  * atoint - convert an ascii string to a signed long, with error checking
3  */
4 #include <config.h>
5 #include <sys/types.h>
6 #include <ctype.h>
7 
8 #include "ntp_types.h"
9 #include "ntp_stdlib.h"
10 
11 int
12 atoint(
13 	const char *str,
14 	long *ival
15 	)
16 {
17 	register long u;
18 	register const char *cp;
19 	register int isneg;
20 	register int oflow_digit;
21 
22 	cp = str;
23 
24 	if (*cp == '-') {
25 		cp++;
26 		isneg = 1;
27 		oflow_digit = '8';
28 	} else {
29 		isneg = 0;
30 		oflow_digit = '7';
31 	}
32 
33 	if (*cp == '\0')
34 	    return 0;
35 
36 	u = 0;
37 	while (*cp != '\0') {
38 		if (!isdigit((unsigned char)*cp))
39 		    return 0;
40 		if (u > 214748364 || (u == 214748364 && *cp > oflow_digit))
41 		    return 0;	/* overflow */
42 		u = (u << 3) + (u << 1);
43 		u += *cp++ - '0';	/* ascii dependent */
44 	}
45 
46 	if (isneg)
47 	    *ival = -u;
48 	else
49 	    *ival = u;
50 	return 1;
51 }
52