BSD 4_3_Net_2 release

[unix-history] / 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, 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);
}