document for 4.3BSD release

[unix-history] / usr / src / old / refer / NOTUSED / annobib.c

#ifndef lint
static char *sccsid = "@(#)annobib.c    4.1 (Berkeley) %G%";
#endif

/*
* This program has been replaced by "refer -B" (bibliography mode),
* but is included here for backward compatiblity.
*/

#include <stdio.h>

int noanno = 0;         /* option to suppress .AP from %X field */

main(argc, argv)        /* format (annotated) bibliography for n/troff */
int argc;
char *argv[];
{
       FILE *fp, *fopen();

       if (argv[1][0] == '-' && argv[1][1] == 'x')
       {
               noanno = 1;
               argv++; argc--;
       }
       if (argc == 1)
       {
               annobib(stdin);
               exit(0);
       }
       while (--argc > 0)
       {
               if ((fp = fopen(*++argv, "r")) == NULL)
               {
                       perror(*argv);
                       exit(1);
               }
               annobib(fp);
               fclose(fp);
       }
       exit(0);
}

annobib(fp)             /* prepare bibliography for refer bare mode */
FILE *fp;
{
       char line[BUFSIZ];
       int begun, ended;

       begun = 0;
       ended = 1;
       while (fgets(line, BUFSIZ, fp))
       {
               if (line[0] == '%' && line[1] == 'X' && !noanno)
               {
                       zap_x(line);
                       printf(".]\n.AP\n%s", line);
                       ended = 1;
                       begun = 0;
               }
               else if (line[0] == '%')
               {
                       if (!begun)
                       {
                               puts(".[");
                               begun = 1;
                               ended = 0;
                       }
                       fputs(line, stdout);
               }
               else if (line[0] == '\n')
               {
                       if (!ended)
                       {
                               puts(".]");
                               ended = 1;
                               begun = 0;
                       }
               }
               else
                       fputs(line, stdout);
       }
       if (!ended)
               puts(".]");
}

zap_x(line)             /* take %X annotation flag out of line */
char line[];
{
       register int i, j;

       for (i = 3, j = 0; line[i] != NULL; i++, j++)
               line[j] = line[i];
       line[j] = NULL;
       return;
}