NetBSD/libexec/bugfiler/redist.c

128 lines
4.0 KiB
C

/*
* Copyright (c) 1986, 1987 Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
#ifndef lint
static char sccsid[] = "@(#)redist.c 5.12 (Berkeley) 4/1/91";
#endif /* not lint */
#include <sys/param.h>
#include <dirent.h>
#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include "bug.h"
#include "pathnames.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 *p, *index();
(void)sprintf(bfr, "%s/%s", dir, DIST_FILE);
if (!freopen(bfr, "r", stdin))
return;
for (pf = NULL, group = 0; fgets(bfr, sizeof(bfr), stdin);) {
if (C1 = index(bfr, '\n'))
*C1 = '\0';
nextline: 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
fprintf(pf,
"Subject: Untitled Bug Report\n");
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 (!fgets(bfr, sizeof(bfr), stdin))
break;
if (C1 = index(bfr, '\n'))
*C1 = '\0';
if (*bfr != ' ' && *bfr != '\t')
goto nextline;
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);
}