BSD 4_4_Lite1 release

[unix-history] / usr / src / contrib / mh-6.8.3a / sbr / gans.c

/* gans.c - get an answer from the user */
#ifndef lint
static char ident[] = "@(#)$Id: gans.c,v 1.2 1992/10/26 22:50:52 jromine Exp $";
#endif /* lint */

#include "../h/mh.h"
#include <stdio.h>


gans (prompt, ansp)
register char *prompt;
register struct swit *ansp;
{
   register int    i;
   register char  *cp;
   register struct swit   *ap;
   char    ansbuf[BUFSIZ];

   for (;;) {
       printf ("%s", prompt);
       (void) fflush (stdout);
       cp = ansbuf;
       while ((i = getchar ()) != '\n') {
           if (i == EOF)
               return 0;
           if (cp < &ansbuf[sizeof ansbuf - 1]) {
#ifdef LOCALE
               i = (isalpha(i) && isupper(i)) ? tolower(i) : i;
#else
               if (i >= 'A' && i <= 'Z')
                   i += 'a' - 'A';
#endif
               *cp++ = i;
           }
       }
       *cp = 0;
       if (ansbuf[0] == '?' || cp == ansbuf) {
           printf ("Options are:\n");
           for (ap = ansp; ap -> sw; ap++)
               printf ("  %s\n", ap -> sw);
           continue;
       }
       if ((i = smatch (ansbuf, ansp)) < 0) {
           printf ("%s: %s.\n", ansbuf, i == -1 ? "unknown" : "ambiguous");
           continue;
       }
       return i;
   }
}