/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */

/*
 * Copyright (c) 1990, 2010, Oracle and/or its affiliates. All rights reserved.
 */

#include <stdio.h>
#include <string.h>
#include "util.h"




/*
 * This is just like fgets, but recognizes that "\\n" signals a continuation
 * of a line
 */
char *
getaline(line, maxlen, fp)
        char *line;
        int maxlen;
        FILE *fp;
{
        register char *p;
        register char *start;
        int c;

        start = line;

nextline:
        if (fgets(start, maxlen, fp) == NULL) {
                return (NULL);
        }
        for (p = start; *p; p++) {
                if (*p == '\n') {
                        if (p > start && *(p-1) == '\\') {
                                start = p - 1;
                                maxlen++;
                                goto nextline;
                        } else {
                                return (line);
                        }
                }
                maxlen--;
        }

        /*
         * Input line is too long. Rest of the line needs to be discarded.
         * Reinsert the last char into the stream. This is done so that
         * in case the last char read is '\' and it is followed by a '\n'
         * then the next line too can be discarded.
         */
        if (p > start)
                (void) ungetc(*(p-1), fp);

        /*
         * Discard the rest of the line
         */
        while ((c = getc(fp)) != EOF) {
                if (c == '\n')
                        break;
                else if (c == '\\') {
                        /*
                         * Ignore the next character except EOF
                         */
                        if (getc(fp) == EOF)
                                break;
                }
        }

        maxlen = strlen(line) + 1;

        /*
         * Certain functions expects a newline in the buffer.
         */
        if (maxlen >= 2)
                line[maxlen - 2] = '\n';
        (void) fprintf(stderr, "Following line too long - remaining chars "
                        "ignored\n--- %s", line);
        return (line);
}


void
fatal(message)
        char *message;
{
        (void) fprintf(stderr, "fatal error: %s\n", message);
        exit(1);
}