libc/stdio/getdelim.c

   1 /* vi: set sw=4 ts=4: */
   2 /* getdelim for uClibc
   3  *
   4  * Copyright (C) 2000 by Lineo, inc. and Erik Andersen
   5  * Copyright (C) 2000,2001 by Erik Andersen <andersen@uclibc.org>
   6  * Written by Erik Andersen <andersen@uclibc.org>
   7  *
   8  * This program is free software; you can redistribute it and/or modify it
   9  * under the terms of the GNU Library General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or (at your
  11  * option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful, but WITHOUT
  14  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  15  * FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library General Public License
  16  * for more details.
  17  *
  18  * You should have received a copy of the GNU Library General Public License
  19  * along with this program; if not, write to the Free Software Foundation,
  20  * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  21  *
  22  */
  23
  24 #include <stddef.h>
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27 #include <string.h>
  28 #include <limits.h>
  29 #include <errno.h>
  30
  31
  32 /* Read up to (and including) a TERMINATOR from STREAM into *LINEPTR
  33    (and null-terminate it). *LINEPTR is a pointer returned from malloc (or
  34    NULL), pointing to *N characters of space.  It is realloc'd as
  35    necessary.  Returns the number of characters read (not including the
  36    null delimiter), or -1 on error or EOF.  */
  37 ssize_t getdelim(char **linebuf, size_t *linebufsz, int delimiter, FILE *file)
  38 {
  39         static const int GROWBY = 80; /* how large we will grow strings by */
  40
  41         int ch;
  42         int idx = 0;
  43
  44         if (file == NULL || linebuf==NULL || linebufsz == NULL) {
  45             __set_errno(EINVAL);
  46             return -1;
  47         }
  48
  49         if (*linebuf == NULL || *linebufsz < 2) {
  50                 *linebuf = malloc(GROWBY);
  51                 if (!*linebuf) {
  52                         __set_errno(ENOMEM);
  53                         return -1;
  54                 }
  55                 *linebufsz += GROWBY;
  56         }
  57
  58         while (1) {
  59                 ch = fgetc(file);
  60                 if (ch == EOF)
  61                         break;
  62                 /* grow the line buffer as necessary */
  63                 while (idx > *linebufsz-2) {
  64                         *linebuf = realloc(*linebuf, *linebufsz += GROWBY);
  65                         if (!*linebuf) {
  66                                 __set_errno(ENOMEM);
  67                                 return -1;
  68                         }
  69                 }
  70                 (*linebuf)[idx++] = (char)ch;
  71                 if ((char)ch == delimiter)
  72                         break;
  73         }
  74
  75         if (idx != 0)
  76             (*linebuf)[idx] = 0;
  77         else if ( ch == EOF )
  78                 return -1;
  79         return idx;
  80 }
  81