src/common/badarg.c

#ifndef lint
static const char       RCSid[] = "$Id: badarg.c,v 2.7 2012/06/10 17:50:29 greg Exp $";
#endif
/*
 * Check argument list against format string.
 *
 *  External symbols declared in rtio.h
 */

#include "copyright.h"

#include <ctype.h>

#include "rtio.h"


int
badarg(         /* check argument list */
int     ac,
char    **av,
char    *fl
)
{
        int     i;
        char    *s;

        if (fl == NULL)
                fl = "";                /* no arguments? */
        for (i = 1; *fl; i++,av++,fl++) {
                if (i > ac || *av == NULL)
                        return(-1);
                s = *av;
                switch (*fl) {
                case 's':               /* string */
                        while (isspace(*s))
                                ++s;
                        if (*s == '\0')
                                return(i);
                        while (*s)
                                if (!isprint(*s++))
                                        return(i);
                        break;
                case 'i':               /* integer */
                        if (!isintd(s, " \t\r\n"))
                                return(i);
                        break;
                case 'f':               /* float */
                        if (!isfltd(s, " \t\r\n"))
                                return(i);
                        break;
                default:                /* bad call! */
                        return(-1);
                }
        }
        return(0);              /* all's well */
}
Revision:	2.8
Committed:	Fri Feb 28 21:03:40 2014 UTC (10 years, 2 months ago) by greg
Content type:	text/plain
Branch:	MAIN
Changes since 2.7:	+2 -2 lines
Log Message:	Changed isascii call to isprint in hopes this will work in non-ASCII locales
#	User	Rev	Content
1	greg	1.1	#ifndef lint
2	greg	2.8	static const char RCSid[] = "$Id: badarg.c,v 2.7 2012/06/10 17:50:29 greg Exp $";
3	greg	1.1	#endif
4			/*
5			* Check argument list against format string.
6	greg	2.2	*
7	greg	2.5	* External symbols declared in rtio.h
8	greg	2.2	*/
9
10	greg	2.3	#include "copyright.h"
11	greg	1.1
12	greg	1.2	#include <ctype.h>
13
14	greg	2.5	#include "rtio.h"
15	schorsch	2.4
16	greg	1.1
17			int
18	schorsch	2.6	badarg( /* check argument list */
19			int ac,
20	greg	2.7	char **av,
21			char *fl
22	schorsch	2.6	)
23	greg	1.1	{
24	greg	2.7	int i;
25			char *s;
26	greg	1.1
27			if (fl == NULL)
28			fl = ""; /* no arguments? */
29			for (i = 1; *fl; i++,av++,fl++) {
30			if (i > ac \|\| *av == NULL)
31			return(-1);
32	greg	2.7	s = *av;
33	greg	1.1	switch (*fl) {
34			case 's': /* string */
35	greg	2.7	while (isspace(*s))
36			++s;
37			if (*s == '\0')
38	greg	1.1	return(i);
39	greg	2.7	while (*s)
40	greg	2.8	if (!isprint(*s++))
41	greg	2.7	return(i);
42	greg	1.1	break;
43			case 'i': /* integer */
44	greg	2.7	if (!isintd(s, " \t\r\n"))
45	greg	1.1	return(i);
46			break;
47			case 'f': /* float */
48	greg	2.7	if (!isfltd(s, " \t\r\n"))
49	greg	1.1	return(i);
50			break;
51			default: /* bad call! */
52			return(-1);
53			}
54			}
55			return(0); /* all's well */
56			}