/*
 * rdline() gets a (possibly continued) line from a control file
 */
#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include "cico.h"

rdline(fd,bfr,size)
FILE *fd;
char *bfr;
{
    char *line;
    char *eol;
    char *cmt;
    int bfrsize = 0;
    int contin;

    for (--size,line=bfr; fgets(line, size-(line-bfr), fd); line=EOS(line)) {
	/* in case the line is too long...
	 */
	line[size-(line-bfr)] = 0;

	if (eol = strrchr(line, '\n')) {
	    for (cmt=strchr(line, '#'); cmt; cmt=strchr(1+cmt, '#'))
		if (cmt == line || isspace(cmt[-1])) {
		    *cmt = 0;
		    break;
		}
	    if (eol[-1] == '\\') {
		*--eol = 0;
		continue;
	    }
	    else *eol = 0;
	}
	return 1;
    }
    return 0;
} /* rdline */