getln2.c

/*
 * $Log: getln2.c,v $
 * Revision 1.1  2014-09-01 20:02:49+05:30  Cprogrammer
 * Initial revision
 *
 *
 */
#include "substdio.h"
#include "stralloc.h"
#include "byte.h"
#include "getln.h"

#ifndef lint
static char     sccsid[] = "$Id: getln2.c,v 1.1 2014-09-01 20:02:49+05:30 Cprogrammer Exp mbhangui $";
#endif

int
getln2(ss, sa, cont, clen, sep)
	register substdio *ss;
	register stralloc *sa;
	char      **cont; /* @out@ */
	unsigned int *clen; /* @out@ */
	int             sep;
{
	register char  *x;
	register unsigned int i;
	int             n;

	if (!stralloc_ready(sa, 0))
		return -1;
	sa->len = 0;
	for (;;)
	{
		n = substdio_feed(ss);
		if (n < 0)
			return -1;
		if (n == 0)
		{
			*clen = 0;
			return 0;
		}
		x = substdio_PEEK(ss);
		i = byte_chr(x, n, sep);
		if (i < n)
		{
			substdio_SEEK(ss, *clen = i + 1);
			*cont = x;
			return 0;
		}
		if (!stralloc_readyplus(sa, n))
			return -1;
		i = sa->len;
		sa->len = i + substdio_get(ss, sa->s + i, n);
	}
}