print/conv_fix/conv_fix.c

/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (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 2005 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#pragma ident   "%Z%%M% %I% %E% SMI"

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <locale.h>
#include <sys/file.h>
#include <fcntl.h>
#include <errno.h>

extern char *optarg;

/*
 * FUNCTION:
 *  static char *_file_getline(FILE *fp)
 * INPUT:
 *  FILE *fp - file pointer to read from
 * OUTPUT:
 *  char *(return) - an entry from the stream
 * DESCRIPTION:
 *  This routine will read in a line at a time.  If the line ends in a
 *  newline, it returns.  If the line ends in a backslash newline, it
 *  continues reading more.  It will ignore lines that start in # or
 *  blank lines.
 */
static char *
_file_getline(FILE *fp)
{
    char entry[BUFSIZ], *tmp;
    int size;

    size = sizeof (entry);
    tmp  = entry;

    /* find an entry */
    while (fgets(tmp, size, fp)) {
        if ((tmp == entry) && ((*tmp == '#') || (*tmp == '\n'))) {
            continue;
        } else {
            if ((*tmp == '#') || (*tmp == '\n')) {
                *tmp = NULL;
                break;
            }

            size -= strlen(tmp);
            tmp += strlen(tmp);

            if (*(tmp-2) != '\\')
                break;

            size -= 2;
            tmp -= 2;
        }
    }

    if (tmp == entry)
        return (NULL);
    else
        return (strdup(entry));
}

int
main(int ac, char *av[])
{
    int   c;
    char  file[80], ofile[80];
    char *cp;
    FILE *fp, *fp2;

    (void) setlocale(LC_ALL, "");

#if !defined(TEXT_DOMAIN)
#define TEXT_DOMAIN "SYS_TEST"
#endif
    (void) textdomain(TEXT_DOMAIN);

    while ((c = getopt(ac, av, "f:o:")) != EOF)

        switch (c) {
        case 'f':
            (void) strlcpy(file, optarg, sizeof (file));
            break;
        case 'o':
            (void) strlcpy(ofile, optarg, sizeof (ofile));
            break;
        default:
            (void) fprintf(stderr, gettext(
                "Usage: %s [-f file] [-o output file]\n"),
                av[0]);
            return (1);
        }

    if ((fp = fopen(file, "r")) != NULL) {
        int fd;

        fd = open(ofile, O_RDWR|O_APPEND);
        if ((fd < 0) && (errno == ENOENT))
            fd = open(ofile, O_RDWR|O_CREAT|O_EXCL, 0644);

        if (fd < 0) {
            (void) fprintf(stderr,
                gettext("Error trying to open file.\n"));
            return (1);
        }

        lseek(fd, 0, SEEK_END);

        if ((fp2 = fdopen(fd, "a")) != NULL) {
            while ((cp = _file_getline(fp)) != NULL) {
                (void) fprintf(fp2, "%s", cp);
            }
            return (0);
        } else {
            (void) fprintf(stderr,
                gettext("Error trying to open file.\n"));
            return (1);
        }
    } else {
        (void) fprintf(stderr,
            gettext("Error trying to open file.\n"));
        return (1);
    }
}