1  /*	$NetBSD: fgetln.c,v 1.9 2008/04/29 06:53:03 martin Exp $	*/
  2  
  3  /*-
  4   * Copyright (c) 1998 The NetBSD Foundation, Inc.
  5   * All rights reserved.
  6   *
  7   * This code is derived from software contributed to The NetBSD Foundation
  8   * by Christos Zoulas.
  9   *
 10   * Redistribution and use in source and binary forms, with or without
 11   * modification, are permitted provided that the following conditions
 12   * are met:
 13   * 1. Redistributions of source code must retain the above copyright
 14   *    notice, this list of conditions and the following disclaimer.
 15   * 2. Redistributions in binary form must reproduce the above copyright
 16   *    notice, this list of conditions and the following disclaimer in the
 17   *    documentation and/or other materials provided with the distribution.
 18   *
 19   * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 20   * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 21   * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 22   * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
 23   * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 24   * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 25   * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 26   * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 27   * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 28   * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 29   * POSSIBILITY OF SUCH DAMAGE.
 30   */
 31  
 32  #ifdef HAVE_NBTOOL_CONFIG_H
 33  #include "nbtool_config.h"
 34  #endif
 35  
 36  #if !HAVE_FGETLN
 37  #include "config.h"
 38  #include <stdlib.h>
 39  #ifndef HAVE_NBTOOL_CONFIG_H
 40  /* These headers are required, but included from nbtool_config.h */
 41  #include <stdio.h>
 42  #include <unistd.h>
 43  #include <errno.h>
 44  #include <string.h>
 45  #endif
 46  
 47  char *
 48  fgetln(FILE *fp, size_t *len)
 49  {
 50  	static char *buf = NULL;
 51  	static size_t bufsiz = 0;
 52  	char *ptr;
 53  
 54  
 55  	if (buf == NULL) {
 56  		bufsiz = BUFSIZ;
 57  		if ((buf = malloc(bufsiz)) == NULL)
 58  			return NULL;
 59  	}
 60  
 61  	if (fgets(buf, bufsiz, fp) == NULL)
 62  		return NULL;
 63  
 64  	*len = 0;
 65  	while ((ptr = strchr(&buf[*len], '\n')) == NULL) {
 66  		size_t nbufsiz = bufsiz + BUFSIZ;
 67  		char *nbuf = realloc(buf, nbufsiz);
 68  
 69  		if (nbuf == NULL) {
 70  			int oerrno = errno;
 71  			free(buf);
 72  			errno = oerrno;
 73  			buf = NULL;
 74  			return NULL;
 75  		} else
 76  			buf = nbuf;
 77  
 78  		if (fgets(&buf[bufsiz], BUFSIZ, fp) == NULL) {
 79  			buf[bufsiz] = '\0';
 80  			*len = strlen(buf);
 81  			return buf;
 82  		}
 83  
 84  		*len = bufsiz;
 85  		bufsiz = nbufsiz;
 86  	}
 87  
 88  	*len = (ptr - buf) + 1;
 89  	return buf;
 90  }
 91  
 92  #endif
 93  
 94  #ifdef TEST
 95  int
 96  main(int argc, char *argv[])
 97  {
 98  	char *p;
 99  	size_t len;
100  
101  	while ((p = fgetln(stdin, &len)) != NULL) {
102  		(void)printf("%zu %s", len, p);
103  		free(p);
104  	}
105  	return 0;
106  }
107  #endif