scan_ulong.c

/*
 * $Log: scan_ulong.c,v $
 * Revision 1.1  2014-08-18 10:20:25+05:30  Cprogrammer
 * Initial revision
 *
 *
 */
#include "scan.h"

#ifndef	lint
static char     sccsid[] = "$Id: scan_ulong.c,v 1.1 2014-08-18 10:20:25+05:30 Cprogrammer Exp mbhangui $";
#endif

unsigned int
scan_ulong(s, u)
	register char  *s;
	register unsigned long *u;
{
	register unsigned int pos;
	register unsigned long result;
	register unsigned long c;

	pos = 0;
	result = 0;
	while ((c = (unsigned long) (unsigned char) (s[pos] - '0')) < 10)
	{
		result = result * 10 + c;
		++pos;
	}
	*u = result;
	return pos;
}

unsigned int
scan_int(s, i)
	register char  *s;
	register int   *i;
{
	register unsigned int pos;
	register int result;
	register unsigned char c;
	int             sign;

	pos = 0;
	result = 0;
	sign = 1;
	/*-
	 * determine sign of the number
	 */
	switch (s[0])
	{
		case '\0':
			return 0;
		case '-':
			++pos;
			sign = -1;
			break;
		case '+':
			++pos;
			sign = 1;
			break;
		default:
			break;
	}
	while ((c = (unsigned char)(s[pos] - '0')) < 10)
	{
		result = result * 10 + c;
		++pos;
	}
	*i = result * sign;
	return pos;
}