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 "charset.h"
  30 #include "inputline.h"
  31 #include "sink.h"
  32
  33 /** @brief Read a line from @p fp
  34  * @param tag Used in error messages
  35  * @param fp Stream to read from
  36  * @param lp Where to store newly allocated string
  37  * @param newline Newline character or @ref CRLF
  38  * @return 0 on success, -1 on error or eof.
  39  *
  40  * The newline is not included in the string.  If the last line of a
  41  * stream does not have a newline then that line is still returned.
  42  *
  43  * If @p newline is @ref CRLF then the line is terminated by CR LF,
  44  * not by a single newline character.  The CRLF is still not included
  45  * in the string in this case.
  46  *
  47  * @p *lp is only set if the return value was 0.
  48  */
  49 int inputline(const char *tag, FILE *fp, char **lp, int newline) {
  50   struct source *s = source_stdio(fp);
  51   int rc = inputlines(tag, s, lp, newline);
  52   xfree(s);
  53   return rc;
  54 }
  55
  56 int inputlines(const char *tag, struct source *s, char **lp, int newline) {
  57   struct dynstr d;
  58   int ch, err;
  59   char errbuf[1024];
  60
  61   dynstr_init(&d);
  62   while((ch = source_getc(s)),
  63         (!source_err(s) && !source_eof(s) && ch != newline)) {
  64     dynstr_append(&d, ch);
  65     if(newline == CRLF && d.nvec >= 2
  66        && d.vec[d.nvec - 2] == 0x0D && d.vec[d.nvec - 1] == 0x0A) {
  67       d.nvec -= 2;
  68       break;
  69     }
  70   }
  71   if((err = source_err(s))) {
  72     disorder_error(0, "error reading %s: %s", tag,
  73                    format_error(s->eclass, err, errbuf, sizeof errbuf));
  74     return -1;
  75   } else if(source_eof(s)) {
  76     if(d.nvec != 0)
  77       disorder_error(0, "error reading %s: unexpected EOF", tag);
  78     return -1;
  79   }
  80   dynstr_terminate(&d);
  81   *lp = d.vec;
  82   return 0;
  83 }
  84
  85 /*
  86 Local Variables:
  87 c-basic-offset:2
  88 comment-column:40
  89 End:
  90 */