fs.c

   1 /*
   2  * Copyright (C) 2012, 2013, 2014, 2015
   3  *     Dale Weiler
   4  *
   5  * Permission is hereby granted, free of charge, to any person obtaining a copy of
   6  * this software and associated documentation files (the "Software"), to deal in
   7  * the Software without restriction, including without limitation the rights to
   8  * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
   9  * of the Software, and to permit persons to whom the Software is furnished to do
  10  * so, subject to the following conditions:
  11  *
  12  * The above copyright notice and this permission notice shall be included in all
  13  * copies or substantial portions of the Software.
  14  *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  18  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  20  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  21  * SOFTWARE.
  22  */
  23 #include "gmqcc.h"
  24
  25 int fs_file_getline(char **lineptr, size_t *n, FILE *stream) {
  26     int   chr;
  27     int   ret;
  28     char *pos;
  29
  30     if (!lineptr || !n || !stream)
  31         return -1;
  32     if (!*lineptr) {
  33         if (!(*lineptr = (char*)mem_a((*n=64))))
  34             return -1;
  35     }
  36
  37     chr = *n;
  38     pos = *lineptr;
  39
  40     for (;;) {
  41         int c = getc(stream);
  42
  43         if (chr < 2) {
  44             *n += (*n > 16) ? *n : 64;
  45             chr = *n + *lineptr - pos;
  46             if (!(*lineptr = (char*)mem_r(*lineptr,*n)))
  47                 return -1;
  48             pos = *n - chr + *lineptr;
  49         }
  50
  51         if (ferror(stream))
  52             return -1;
  53         if (c == EOF) {
  54             if (pos == *lineptr)
  55                 return -1;
  56             else
  57                 break;
  58         }
  59
  60         *pos++ = c;
  61         chr--;
  62         if (c == '\n')
  63             break;
  64     }
  65     *pos = '\0';
  66     return (ret = pos - *lineptr);
  67 }