/*		$OpenPackages: util.c,v 1.10 2001/07/22 01:00:52 harlan Exp $ */
/*		$OpenBSD: util.c,v 1.16 2001/05/23 12:34:51 espie Exp $		*/
/*		$NetBSD: util.c,v 1.10 1996/12/31 17:56:04 christos Exp $		*/
/* $TenDRA: contrib/make/util.c,v 1.5 2003/02/11 21:16:16 asmodai Exp $ */

/*
 * Copyright (c) 2001 Marc Espie.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *	notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *	notice, this list of conditions and the following disclaimer in the
 *	documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE OPENBSD PROJECT AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
 * A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OPENBSD
 * PROJECT OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
/*
 * Missing stuff from OS's
 */

#include "Config.h"

#include <sys/param.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>

#include "fgetln.h"


static void removeCR(char *s)
{
	while (*s) {
		if (*s == '\r' && s[1] == '\n') {
			*s = '\n';
			s[1] = 0;
			break;
		}
		s++;
	}
}

char *fgetln(FILE *stream, size_t *len)
{
	static char *buffer = NULL;
	static size_t buflen = 0;

	if (buflen == 0) {
		buflen = 512;
		buffer = malloc(buflen+1);
	}
	if (fgets(buffer, buflen+1, stream) == NULL)
		return NULL;
	removeCR(buffer);
	*len = strlen(buffer);
	while (*len == buflen && buffer[*len-1] != '\n') {
		buffer = realloc(buffer, 2*buflen + 1);
		if (fgets(buffer + buflen, buflen + 1, stream) == NULL)
			return NULL;
		removeCR(buffer);
		*len += strlen(buffer + buflen);
		buflen *= 2;
	}
	return buffer;
}
