diplodocus.org Git - nmh/blob - sbr/print_sw.c

   1 /* print_sw.c -- print switches
   2  *
   3  * This code is Copyright (c) 2002, by the authors of nmh.  See the
   4  * COPYRIGHT file in the root directory of the nmh distribution for
   5  * complete copyright information.
   6  */
   7
   8 #include <h/mh.h>
   9
  10
  11 void
  12 print_sw (const char *substr, const struct swit *swp, char *prefix, FILE *fp)
  13 {
  14     int len, optno;
  15     int i;
  16     char *cp, *cp1, *sp;
  17     char buf[128];
  18
  19     len = strlen(substr);
  20     for (; swp->sw; swp++) {
  21         /* null matches all strings */
  22         if (!*substr || (ssequal (substr, swp->sw) && len >= swp->minchars)) {
  23             optno = 0;
  24             /* next switch */
  25             if ((sp = (&swp[1])->sw)) {
  26                 if (!*substr && sp[0] == 'n' && sp[1] == 'o' &&
  27                         strcmp (&sp[2], swp->sw) == 0 && (
  28                         ((&swp[1])->minchars == 0 && swp->minchars == 0) ||
  29                         ((&swp[1])->minchars == (swp->minchars) + 2)))
  30                     optno++;
  31             }
  32
  33             if (swp->minchars > 0) {
  34                 cp = buf;
  35                 *cp++ = '(';
  36                 if (optno) {
  37                     strcpy (cp, "[no]");
  38                     cp += strlen (cp);
  39                 }
  40                 for (cp1 = swp->sw, i = 0; i < swp->minchars; i++)
  41                     *cp++ = *cp1++;
  42                 *cp++ = ')';
  43                 while ((*cp++ = *cp1++));
  44                 fprintf (fp, "  %s%s\n", prefix, buf);
  45             } else {
  46                 if (!swp->minchars)
  47                     fprintf(fp, optno ? "  %s[no]%s\n" : "  %s%s\n",
  48                             prefix, swp->sw);
  49             }
  50             if (optno)
  51                 swp++;  /* skip -noswitch */
  52         }
  53     }
  54 }