1 /* 2 * Copyright (c) 1994 Christos Zoulas 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by Christos Zoulas. 16 * 4. The name of the author may not be used to endorse or promote products 17 * derived from this software without specific prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS 20 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 21 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY 23 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 * SUCH DAMAGE. 30 */ 31 32 #include <err.h> 33 #include <stdlib.h> 34 #include <string.h> 35 36 #include "util.h" 37 38 /* emalloc(): 39 * Error checked malloc 40 */ 41 void * 42 emalloc(size_t s) 43 { 44 void *ptr = malloc(s); 45 if (ptr == NULL) 46 err(1, NULL); 47 return ptr; 48 } 49 50 51 /* erealloc(): 52 * Error checked realloc 53 */ 54 void * 55 erealloc(void *p, size_t s) 56 { 57 void *ptr = realloc(p, s); 58 if (ptr == NULL) 59 err(1, NULL); 60 return ptr; 61 } 62 63 64 /* get_line(): 65 * Read a line from a file parsing continuations ending in \ 66 * and eliminating trailing newlines. 67 */ 68 char * 69 get_line(FILE *fp, size_t *size) 70 { 71 size_t s, len = 0; 72 char *buf = NULL, *ptr; 73 int cnt = 1; 74 75 while (cnt) { 76 if ((ptr = fgetln(fp, &s)) == NULL) { 77 *size = len; 78 return buf; 79 } 80 if (ptr[s - 1] == '\n') /* the newline may be missing at EOF */ 81 s--; /* forget newline */ 82 if (s && (cnt = (ptr[s - 1] == '\\'))) /* check for \\ */ 83 s--; /* forget \\ */ 84 85 buf = erealloc(buf, len + s + 1); 86 memcpy(buf + len, ptr, s); 87 len += s; 88 buf[len] = '\0'; 89 } 90 *size = len; 91 return buf; 92 } 93