usr/src/libexec/bugfiler/redist.c

/*
 * Copyright (c) 1986, 1987 Regents of the University of California.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms are permitted
 * provided that the above copyright notice and this paragraph are
 * duplicated in all such forms and that any documentation,
 * advertising materials, and other materials related to such
 * distribution and use acknowledge that the software was developed
 * by the University of California, Berkeley.  The name of the
 * University may not be used to endorse or promote products derived
 * from this software without specific prior written permission.
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
 */

#ifndef lint
static char sccsid[] = "@(#)redist.c    5.8 (Berkeley) %G%";
#endif /* not lint */

#include <sys/file.h>
#include <stdio.h>
#include <ctype.h>
#include <bug.h>

/*
 * redist --
 *      Redistribute a bug report to those people indicated in the
 *      redistribution list file.
 */
redist()
{
        extern FILE     *dfp;           /* dist file fp */
        extern char     pfile[];        /* permanent bug file */
        register char   *C1, *C2;
        FILE    *pf, *popen();
        int     group;
        char    *index();

        (void)sprintf(bfr, "%s/%s", dir, DIST_FILE);
        if (!freopen(bfr, "r", stdin))
                return;
        for (pf = NULL, group = 0; gets(bfr);) {
                if (*bfr == COMMENT || isspace(*bfr) || !(C1 = index(bfr, ':')))
                        continue;
                *C1 = EOS;
                if (!strcmp(bfr, folder) || !strcmp(bfr, "all")) {
                        for (++C1; *C1 && (*C1 == ' ' || *C1 == '\t'); ++C1);
                        if (!*C1)                       /* if empty list */
                                continue;
                        if (!pf) {
                                if (!(pf = popen(MAIL_CMD, "w")))
                                        error("sendmail pipe failed.", CHN);
                                if (mailhead[SUBJ_TAG].found)
                                        fprintf(pf, "%s", mailhead[SUBJ_TAG].line);
                                else
                                        fputs("Subject: Untitled Bug Report\n", pf);
                                if (!mailhead[TO_TAG].line) {
                                        if (mailhead[APPAR_TO_TAG].line)
                                            fprintf(pf, "To%s",
                                              index(mailhead[APPAR_TO_TAG].line,
                                              ':'));
                                        else
                                            fprintf(pf, "To: %s\n",  BUGS_ID);
                                }
                                fputs("Resent-To: ", pf);
                        }
                        /*
                         * write out first entry, then succeeding entries
                         * backward compatible, handles back slashes at end
                         * of line
                         */
                        if (group++)
                                fputs(", ", pf);
                        for (;;) {
                                if (C2 = index(C1, '\\'))
                                        *C2 = EOS;
                                fputs(C1, pf);
                                if (!gets(bfr) || *bfr != ' ' && *bfr != '\t')
                                        break;
                                for (C1 = bfr; *C1 && (*C1 == ' ' || *C1 == '\t'); ++C1);
                        }
                }
        }
        if (!pf)
                return;

        putc('\n', pf);

        rewind(dfp);
        /* add Reference header and copy bug report out */
        while (fgets(bfr, sizeof(bfr), dfp) && *bfr != '\n')
                fputs(bfr, pf);
        fprintf(pf, "\n%sReference: %s\n\n", mailhead[INDX_TAG].line, pfile);
        while (fgets(bfr, sizeof(bfr), dfp))
                fputs(bfr, pf);
        (void)pclose(pf);
}