chiark - git - mdw - disorder/blob - lib/inputline.c

   1 /*
   2  * This file is part of DisOrder.
   3  * Copyright (C) 2004, 2007-9, 2013 Richard Kettlewell
   4  *
   5  * This program is free software: you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation, either version 3 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17  */
  18 /** @file lib/inputline.c
  19  * @brief Line input
  20  */
  21
  22 #include "common.h"
  23
  24 #include <errno.h>
  25
  26 #include "log.h"
  27 #include "mem.h"
  28 #include "vector.h"
  29 #include "inputline.h"
  30 #include "sink.h"
  31
  32 /** @brief Read a line from @p fp
  33  * @param tag Used in error messages
  34  * @param fp Stream to read from
  35  * @param lp Where to store newly allocated string
  36  * @param newline Newline character or @ref CRLF
  37  * @return 0 on success, -1 on error or eof.
  38  *
  39  * The newline is not included in the string.  If the last line of a
  40  * stream does not have a newline then that line is still returned.
  41  *
  42  * If @p newline is @ref CRLF then the line is terminated by CR LF,
  43  * not by a single newline character.  The CRLF is still not included
  44  * in the string in this case.
  45  *
  46  * @p *lp is only set if the return value was 0.
  47  */
  48 int inputline(const char *tag, FILE *fp, char **lp, int newline) {
  49   struct source *s = source_stdio(fp);
  50   int rc = inputlines(tag, s, lp, newline);
  51   xfree(s);
  52   return rc;
  53 }
  54
  55 int inputlines(const char *tag, struct source *s, char **lp, int newline) {
  56   struct dynstr d;
  57   int ch, err;
  58   char errbuf[1024];
  59
  60   dynstr_init(&d);
  61   while((ch = source_getc(s)),
  62         (!source_err(s) && !source_eof(s) && ch != newline)) {
  63     dynstr_append(&d, ch);
  64     if(newline == CRLF && d.nvec >= 2
  65        && d.vec[d.nvec - 2] == 0x0D && d.vec[d.nvec - 1] == 0x0A) {
  66       d.nvec -= 2;
  67       break;
  68     }
  69   }
  70   if((err = source_err(s))) {
  71     disorder_error(0, "error reading %s: %s", tag,
  72                    format_error(s->eclass, err, errbuf, sizeof errbuf));
  73     return -1;
  74   } else if(source_eof(s)) {
  75     if(d.nvec != 0)
  76       disorder_error(0, "error reading %s: unexpected EOF", tag);
  77     return -1;
  78   }
  79   dynstr_terminate(&d);
  80   *lp = d.vec;
  81   return 0;
  82 }
  83
  84 /*
  85 Local Variables:
  86 c-basic-offset:2
  87 comment-column:40
  88 End:
  89 */