xref: /onnv-gate/usr/src/lib/libc/port/gen/atoll.c (revision 6812:febeba71273d)
10Sstevel@tonic-gate /*
20Sstevel@tonic-gate  * CDDL HEADER START
30Sstevel@tonic-gate  *
40Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*6812Sraf  * Common Development and Distribution License (the "License").
6*6812Sraf  * You may not use this file except in compliance with the License.
70Sstevel@tonic-gate  *
80Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
90Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
100Sstevel@tonic-gate  * See the License for the specific language governing permissions
110Sstevel@tonic-gate  * and limitations under the License.
120Sstevel@tonic-gate  *
130Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
140Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
150Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
160Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
170Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
180Sstevel@tonic-gate  *
190Sstevel@tonic-gate  * CDDL HEADER END
200Sstevel@tonic-gate  */
21*6812Sraf 
220Sstevel@tonic-gate /*
23*6812Sraf  * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
240Sstevel@tonic-gate  * Use is subject to license terms.
250Sstevel@tonic-gate  */
260Sstevel@tonic-gate 
270Sstevel@tonic-gate /*	Copyright (c) 1988 AT&T	*/
280Sstevel@tonic-gate /*	  All Rights Reserved  	*/
290Sstevel@tonic-gate 
30*6812Sraf #pragma ident	"%Z%%M%	%I%	%E% SMI"
310Sstevel@tonic-gate 
32*6812Sraf #include "lint.h"
330Sstevel@tonic-gate #include <ctype.h>
340Sstevel@tonic-gate #include <sys/types.h>
350Sstevel@tonic-gate #include <stdlib.h>
360Sstevel@tonic-gate 
370Sstevel@tonic-gate #define	ATOLL
380Sstevel@tonic-gate 
390Sstevel@tonic-gate #if defined	ATOI
400Sstevel@tonic-gate typedef int TYPE;
410Sstevel@tonic-gate #define	NAME	atoi
420Sstevel@tonic-gate #elif defined ATOL
430Sstevel@tonic-gate typedef long TYPE;
440Sstevel@tonic-gate #define	NAME	atol
450Sstevel@tonic-gate #else
460Sstevel@tonic-gate typedef longlong_t TYPE;
470Sstevel@tonic-gate #define	NAME	atoll
480Sstevel@tonic-gate #endif
490Sstevel@tonic-gate 
500Sstevel@tonic-gate TYPE
NAME(const char * p)510Sstevel@tonic-gate NAME(const char *p)
520Sstevel@tonic-gate {
530Sstevel@tonic-gate 	TYPE n;
540Sstevel@tonic-gate 	int c, neg = 0;
550Sstevel@tonic-gate 	unsigned char	*up = (unsigned char *)p;
560Sstevel@tonic-gate 
570Sstevel@tonic-gate 	if (!isdigit(c = *up)) {
580Sstevel@tonic-gate 		while (isspace(c))
590Sstevel@tonic-gate 			c = *++up;
600Sstevel@tonic-gate 		switch (c) {
610Sstevel@tonic-gate 		case '-':
620Sstevel@tonic-gate 			neg++;
630Sstevel@tonic-gate 			/* FALLTHROUGH */
640Sstevel@tonic-gate 		case '+':
650Sstevel@tonic-gate 			c = *++up;
660Sstevel@tonic-gate 		}
670Sstevel@tonic-gate 		if (!isdigit(c))
680Sstevel@tonic-gate 			return (0);
690Sstevel@tonic-gate 	}
700Sstevel@tonic-gate 	for (n = '0' - c; isdigit(c = *++up); ) {
710Sstevel@tonic-gate 		n *= 10; /* two steps to avoid unnecessary overflow */
720Sstevel@tonic-gate 		n += '0' - c; /* accum neg to avoid surprises at MAX */
730Sstevel@tonic-gate 	}
740Sstevel@tonic-gate 	return (neg ? n : -n);
750Sstevel@tonic-gate }
76