NetBSD/games/trek/getpar.c

314 lines
5.4 KiB
C
Raw Normal View History

2004-01-27 23:30:28 +03:00
/* $NetBSD: getpar.c,v 1.12 2004/01/27 20:30:31 jsm Exp $ */
1995-04-22 14:58:17 +04:00
1993-03-21 12:45:37 +03:00
/*
1995-04-22 14:58:17 +04:00
* Copyright (c) 1980, 1993
* The Regents of the University of California. All rights reserved.
1993-03-21 12:45:37 +03:00
*
* 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. Neither the name of the University nor the names of its contributors
1993-03-21 12:45:37 +03:00
* 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.
*/
#include <sys/cdefs.h>
1993-03-21 12:45:37 +03:00
#ifndef lint
1995-04-22 14:58:17 +04:00
#if 0
static char sccsid[] = "@(#)getpar.c 8.1 (Berkeley) 5/31/93";
#else
2004-01-27 23:30:28 +03:00
__RCSID("$NetBSD: getpar.c,v 1.12 2004/01/27 20:30:31 jsm Exp $");
1995-04-22 14:58:17 +04:00
#endif
1993-03-21 12:45:37 +03:00
#endif /* not lint */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "getpar.h"
#include "trek.h"
2004-01-27 23:30:28 +03:00
static int testterm(void);
1993-03-21 12:45:37 +03:00
/**
** get integer parameter
**/
int
1993-03-21 12:45:37 +03:00
getintpar(s)
const char *s;
1993-03-21 12:45:37 +03:00
{
int i;
1993-03-21 12:45:37 +03:00
int n;
while (1)
{
if (testnl() && s)
printf("%s: ", s);
i = scanf("%d", &n);
if (i < 0)
exit(1);
if (i > 0 && testterm())
return (n);
printf("invalid input; please enter an integer\n");
skiptonl(0);
}
}
/**
** get floating parameter
**/
double getfltpar(s)
const char *s;
1993-03-21 12:45:37 +03:00
{
int i;
1993-03-21 12:45:37 +03:00
double d;
while (1)
{
if (testnl() && s)
printf("%s: ", s);
i = scanf("%lf", &d);
if (i < 0)
exit(1);
if (i > 0 && testterm())
return (d);
printf("invalid input; please enter a double\n");
skiptonl(0);
}
}
/**
** get yes/no parameter
**/
const struct cvntab Yntab[] =
1993-03-21 12:45:37 +03:00
{
{ "y", "es", (cmdfun)1, 1 },
{ "n", "o", (cmdfun)0, 0 },
{ NULL, NULL, NULL, 0 }
1993-03-21 12:45:37 +03:00
};
int
1993-03-21 12:45:37 +03:00
getynpar(s)
const char *s;
1993-03-21 12:45:37 +03:00
{
const struct cvntab *r;
1993-03-21 12:45:37 +03:00
r = getcodpar(s, Yntab);
return r->value2;
1993-03-21 12:45:37 +03:00
}
/**
** get coded parameter
**/
const struct cvntab *getcodpar(s, tab)
const char *s;
const struct cvntab tab[];
1993-03-21 12:45:37 +03:00
{
char input[100];
const struct cvntab *r;
1993-03-21 12:45:37 +03:00
int flag;
const char *p, *q;
1993-03-21 12:45:37 +03:00
int c;
int f;
flag = 0;
while (1)
{
flag |= (f = testnl());
if (flag)
printf("%s: ", s);
if (f)
cgetc(0); /* throw out the newline */
scanf("%*[ \t;]");
if ((c = scanf("%99[^ \t;\n]", input)) < 0)
1993-03-21 12:45:37 +03:00
exit(1);
if (c == 0)
continue;
flag = 1;
/* if command list, print four per line */
if (input[0] == '?' && input[1] == 0)
{
c = 4;
for (r = tab; r->abrev; r++)
{
strcpy(input, r->abrev);
strcat(input, r->full);
1993-03-21 12:45:37 +03:00
printf("%14.14s", input);
if (--c > 0)
continue;
c = 4;
printf("\n");
}
if (c != 4)
printf("\n");
continue;
}
/* search for in table */
for (r = tab; r->abrev; r++)
{
p = input;
for (q = r->abrev; *q; q++)
if (*p++ != *q)
break;
if (!*q)
{
for (q = r->full; *p && *q; q++, p++)
if (*p != *q)
break;
if (!*p || !*q)
break;
}
}
/* check for not found */
if (!r->abrev)
{
printf("invalid input; ? for valid inputs\n");
skiptonl(0);
}
else
return (r);
}
}
/**
** get string parameter
**/
void
1993-03-21 12:45:37 +03:00
getstrpar(s, r, l, t)
const char *s;
char *r;
int l;
const char *t;
1993-03-21 12:45:37 +03:00
{
int i;
1993-03-21 12:45:37 +03:00
char format[20];
int f;
1993-03-21 12:45:37 +03:00
if (t == 0)
t = " \t\n;";
(void)sprintf(format, "%%%d[^%s]", l, t);
while (1)
{
if ((f = testnl()) && s)
printf("%s: ", s);
if (f)
cgetc(0);
scanf("%*[\t ;]");
i = scanf(format, r);
if (i < 0)
exit(1);
if (i != 0)
return;
}
}
/**
** test if newline is next valid character
**/
int
1993-03-21 12:45:37 +03:00
testnl()
{
char c;
1993-03-21 12:45:37 +03:00
while ((c = cgetc(0)) != '\n')
if ((c >= '0' && c <= '9') || c == '.' || c == '!' ||
(c >= 'A' && c <= 'Z') ||
(c >= 'a' && c <= 'z') || c == '-')
{
ungetc(c, stdin);
return(0);
}
ungetc(c, stdin);
return (1);
}
/**
** scan for newline
**/
void
1993-03-21 12:45:37 +03:00
skiptonl(c)
int c;
1993-03-21 12:45:37 +03:00
{
while (c != '\n')
if (!(c = cgetc(0)))
return;
ungetc('\n', stdin);
return;
}
/**
** test for valid terminator
**/
static int
1993-03-21 12:45:37 +03:00
testterm()
{
char c;
1993-03-21 12:45:37 +03:00
if (!(c = cgetc(0)))
return (1);
if (c == '.')
return (0);
if (c == '\n' || c == ';')
ungetc(c, stdin);
return (1);
}
/*
** TEST FOR SPECIFIED DELIMITER
1993-03-21 12:45:37 +03:00
**
** The standard input is scanned for the parameter. If found,
** it is thrown away and non-zero is returned. If not found,
** zero is returned.
*/
int
1993-03-21 12:45:37 +03:00
readdelim(d)
char d;
{
char c;
1993-03-21 12:45:37 +03:00
while ((c = cgetc(0)) != '\0')
1993-03-21 12:45:37 +03:00
{
if (c == d)
return (1);
if (c == ' ')
continue;
ungetc(c, stdin);
break;
}
return (0);
}