genget.c revision 1.8 1 1.8 christos /* $NetBSD: genget.c,v 1.8 1998/11/06 19:20:12 christos Exp $ */
2 1.7 christos
3 1.1 cgd /*-
4 1.3 cgd * Copyright (c) 1991, 1993
5 1.3 cgd * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.1 cgd * 3. All advertising materials mentioning features or use of this software
16 1.1 cgd * must display the following acknowledgement:
17 1.1 cgd * This product includes software developed by the University of
18 1.1 cgd * California, Berkeley and its contributors.
19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
20 1.1 cgd * may be used to endorse or promote products derived from this software
21 1.1 cgd * without specific prior written permission.
22 1.1 cgd *
23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 cgd * SUCH DAMAGE.
34 1.1 cgd */
35 1.1 cgd
36 1.6 lukem #include <sys/cdefs.h>
37 1.1 cgd #ifndef lint
38 1.6 lukem #if 0
39 1.6 lukem static char sccsid[] = "@(#)genget.c 8.2 (Berkeley) 5/30/95";
40 1.6 lukem #else
41 1.8 christos __RCSID("$NetBSD: genget.c,v 1.8 1998/11/06 19:20:12 christos Exp $");
42 1.6 lukem #endif
43 1.1 cgd #endif /* not lint */
44 1.1 cgd
45 1.5 jtk
46 1.4 pk #include <ctype.h>
47 1.7 christos #include "misc.h"
48 1.1 cgd
49 1.8 christos #define LOWER(x) (isupper((unsigned char)x) ? tolower(x) : (x))
50 1.1 cgd /*
51 1.1 cgd * The prefix function returns 0 if *s1 is not a prefix
52 1.1 cgd * of *s2. If *s1 exactly matches *s2, the negative of
53 1.1 cgd * the length is returned. If *s1 is a prefix of *s2,
54 1.1 cgd * the length of *s1 is returned.
55 1.1 cgd */
56 1.1 cgd int
57 1.1 cgd isprefix(s1, s2)
58 1.1 cgd register char *s1, *s2;
59 1.1 cgd {
60 1.4 pk char *os1;
61 1.1 cgd register char c1, c2;
62 1.1 cgd
63 1.5 jtk if (*s1 == '\0')
64 1.5 jtk return(-1);
65 1.5 jtk os1 = s1;
66 1.1 cgd c1 = *s1;
67 1.1 cgd c2 = *s2;
68 1.5 jtk while (LOWER(c1) == LOWER(c2)) {
69 1.1 cgd if (c1 == '\0')
70 1.1 cgd break;
71 1.5 jtk c1 = *++s1;
72 1.5 jtk c2 = *++s2;
73 1.5 jtk }
74 1.5 jtk return(*s1 ? 0 : (*s2 ? (s1 - os1) : (os1 - s1)));
75 1.1 cgd }
76 1.1 cgd
77 1.1 cgd static char *ambiguous; /* special return value for command routines */
78 1.1 cgd
79 1.1 cgd char **
80 1.1 cgd genget(name, table, stlen)
81 1.1 cgd char *name; /* name to match */
82 1.1 cgd char **table; /* name entry in table */
83 1.1 cgd int stlen;
84 1.1 cgd {
85 1.1 cgd register char **c, **found;
86 1.1 cgd register int n;
87 1.1 cgd
88 1.1 cgd if (name == 0)
89 1.1 cgd return 0;
90 1.1 cgd
91 1.1 cgd found = 0;
92 1.1 cgd for (c = table; *c != 0; c = (char **)((char *)c + stlen)) {
93 1.1 cgd if ((n = isprefix(name, *c)) == 0)
94 1.1 cgd continue;
95 1.1 cgd if (n < 0) /* exact match */
96 1.1 cgd return(c);
97 1.1 cgd if (found)
98 1.1 cgd return(&ambiguous);
99 1.1 cgd found = c;
100 1.1 cgd }
101 1.1 cgd return(found);
102 1.1 cgd }
103 1.1 cgd
104 1.1 cgd /*
105 1.1 cgd * Function call version of Ambiguous()
106 1.1 cgd */
107 1.1 cgd int
108 1.1 cgd Ambiguous(s)
109 1.7 christos void *s;
110 1.1 cgd {
111 1.7 christos return(s == &ambiguous);
112 1.1 cgd }
113