1 /* Copyright (C) 1991, 1992, 1993 Free Software Foundation, Inc.
2
3 NOTE: The canonical source of this file is maintained with the GNU C
4 Library. Bugs can be reported to bug-glibc@prep.ai.mit.edu.
5
6 This program is free software; you can redistribute it and/or modify it
7 under the terms of the GNU General Public License as published by the
8 Free Software Foundation; either version 2, or (at your option) any
9 later version.
10
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software Foundation,
18 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
19
20 #if HAVE_CONFIG_H
21 # include <config.h>
22 #endif
23
24 #include <errno.h>
25 #include <fnmatch.h>
26 #include <ctype.h>
27
28 #if defined (STDC_HEADERS) || !defined (isascii)
29 # define ISASCII(c) 1
30 #else
31 # define ISASCII(c) isascii(c)
32 #endif
33
34 #define ISUPPER(c) (ISASCII (c) && isupper (c))
35
36
37 /* Comment out all this code if we are using the GNU C Library, and are not
38 actually compiling the library itself. This code is part of the GNU C
39 Library, but also included in many other GNU distributions. Compiling
40 and linking in this code is a waste when using the GNU C library
41 (especially if it is a shared library). Rather than having every GNU
42 program understand `configure --with-gnu-libc' and omit the object files,
43 it is simpler to just do this in the source for each such file. */
44
45 #if defined (_LIBC) || !defined (__GNU_LIBRARY__)
46
47
48 # ifndef errno
49 extern int errno;
50 # endif
51
52 /* Match STRING against the filename pattern PATTERN, returning zero if
53 it matches, nonzero if not. */
54 int
fnmatch(pattern,string,flags)55 fnmatch (pattern, string, flags)
56 const char *pattern;
57 const char *string;
58 int flags;
59 {
60 register const char *p = pattern, *n = string;
61 register char c;
62
63 /* Note that this evalutes C many times. */
64 # define FOLD(c) ((flags & FNM_CASEFOLD) && ISUPPER (c) ? tolower (c) : (c))
65
66 while ((c = *p++) != '\0')
67 {
68 c = FOLD (c);
69
70 switch (c)
71 {
72 case '?':
73 if (*n == '\0')
74 return FNM_NOMATCH;
75 else if ((flags & FNM_FILE_NAME) && *n == '/')
76 return FNM_NOMATCH;
77 else if ((flags & FNM_PERIOD) && *n == '.' &&
78 (n == string || ((flags & FNM_FILE_NAME) && n[-1] == '/')))
79 return FNM_NOMATCH;
80 break;
81
82 case '\\':
83 if (!(flags & FNM_NOESCAPE))
84 {
85 c = *p++;
86 c = FOLD (c);
87 }
88 if (FOLD (*n) != c)
89 return FNM_NOMATCH;
90 break;
91
92 case '*':
93 if ((flags & FNM_PERIOD) && *n == '.' &&
94 (n == string || ((flags & FNM_FILE_NAME) && n[-1] == '/')))
95 return FNM_NOMATCH;
96
97 for (c = *p++; c == '?' || c == '*'; c = *p++, ++n)
98 if (((flags & FNM_FILE_NAME) && *n == '/') ||
99 (c == '?' && *n == '\0'))
100 return FNM_NOMATCH;
101
102 if (c == '\0')
103 return 0;
104
105 {
106 char c1 = (!(flags & FNM_NOESCAPE) && c == '\\') ? *p : c;
107 c1 = FOLD (c1);
108 for (--p; *n != '\0'; ++n)
109 if ((c == '[' || FOLD (*n) == c1) &&
110 fnmatch (p, n, flags & ~FNM_PERIOD) == 0)
111 return 0;
112 return FNM_NOMATCH;
113 }
114
115 case '[':
116 {
117 /* Nonzero if the sense of the character class is inverted. */
118 register int not;
119
120 if (*n == '\0')
121 return FNM_NOMATCH;
122
123 if ((flags & FNM_PERIOD) && *n == '.' &&
124 (n == string || ((flags & FNM_FILE_NAME) && n[-1] == '/')))
125 return FNM_NOMATCH;
126
127 not = (*p == '!' || *p == '^');
128 if (not)
129 ++p;
130
131 c = *p++;
132 for (;;)
133 {
134 register char cstart = c, cend = c;
135
136 if (!(flags & FNM_NOESCAPE) && c == '\\')
137 cstart = cend = *p++;
138
139 cstart = cend = FOLD (cstart);
140
141 if (c == '\0')
142 /* [ (unterminated) loses. */
143 return FNM_NOMATCH;
144
145 c = *p++;
146 c = FOLD (c);
147
148 if ((flags & FNM_FILE_NAME) && c == '/')
149 /* [/] can never match. */
150 return FNM_NOMATCH;
151
152 if (c == '-' && *p != ']')
153 {
154 cend = *p++;
155 if (!(flags & FNM_NOESCAPE) && cend == '\\')
156 cend = *p++;
157 if (cend == '\0')
158 return FNM_NOMATCH;
159 cend = FOLD (cend);
160
161 c = *p++;
162 }
163
164 if (FOLD (*n) >= cstart && FOLD (*n) <= cend)
165 goto matched;
166
167 if (c == ']')
168 break;
169 }
170 if (!not)
171 return FNM_NOMATCH;
172 break;
173
174 matched:;
175 /* Skip the rest of the [...] that already matched. */
176 while (c != ']')
177 {
178 if (c == '\0')
179 /* [... (unterminated) loses. */
180 return FNM_NOMATCH;
181
182 c = *p++;
183 if (!(flags & FNM_NOESCAPE) && c == '\\')
184 /* XXX 1003.2d11 is unclear if this is right. */
185 ++p;
186 }
187 if (not)
188 return FNM_NOMATCH;
189 }
190 break;
191
192 default:
193 if (c != FOLD (*n))
194 return FNM_NOMATCH;
195 }
196
197 ++n;
198 }
199
200 if (*n == '\0')
201 return 0;
202
203 if ((flags & FNM_LEADING_DIR) && *n == '/')
204 /* The FNM_LEADING_DIR flag says that "foo*" matches "foobar/frobozz". */
205 return 0;
206
207 return FNM_NOMATCH;
208
209 # undef FOLD
210 }
211
212 #endif /* _LIBC or not __GNU_LIBRARY__. */
213