* Copyright (c) 1986 Regents of the University of California.
* All rights reserved. The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
static char sccsid
[] = "@(#)redist.c 5.5 (Berkeley) 87/12/12";
* Redistribute a bug report to those people indicated in the
* redistribution list file.
extern FILE *dfp
; /* dist file fp */
extern char pfile
[]; /* permanent bug file */
(void)sprintf(bfr
, "%s/%s", dir
, DIST_FILE
);
if (!freopen(bfr
, "r", stdin
))
for (pf
= NULL
, group
= 0; gets(bfr
);) {
if (*bfr
== COMMENT
|| isspace(*bfr
) || !(C1
= index(bfr
, ':')))
if (!strcmp(bfr
, folder
) || !strcmp(bfr
, "all")) {
for (++C1
; *C1
&& (*C1
== ' ' || *C1
== '\t'); ++C1
);
if (!*C1
) /* if empty list */
if (!(pf
= popen(MAIL_CMD
, "w")))
error("sendmail pipe failed.", CHN
);
if (mailhead
[SUBJ_TAG
].found
)
fprintf(pf
, "%s", mailhead
[SUBJ_TAG
].line
);
fputs("Subject: Untitled Bug Report\n", pf
);
if (!mailhead
[TO_TAG
].line
&& mailhead
[APPAR_TO_TAG
].line
)
fprintf(pf
, "To%s", index(mailhead
[APPAR_TO_TAG
].line
, ':'));
fputs("Resent-To: ", pf
);
* write out first entry, then succeeding entries
* backward compatible, handles back slashes at end
if (C2
= index(C1
, '\\'))
if (!gets(bfr
) || *bfr
!= ' ' && *bfr
!= '\t')
for (C1
= bfr
; *C1
&& (*C1
== ' ' || *C1
== '\t'); ++C1
);
/* add Reference header and copy bug report out */
while (fgets(bfr
, sizeof(bfr
), dfp
) && *bfr
!= '\n')
fprintf(pf
, "\n%sReference: %s\n\n", mailhead
[INDX_TAG
].line
, pfile
);
while (fgets(bfr
, sizeof(bfr
), dfp
))