1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
|
/* $Source: /u/mark/src/pax/RCS/wildmat.c,v $
*
* $Revision: 1.2 $
*
* wildmat.c - simple regular expression pattern matching routines
*
* DESCRIPTION
*
* These routines provide simple UNIX style regular expression matching.
* They were originally written by Rich Salz, the comp.sources.unix
* moderator for inclusion in some of his software. These routines
* were released into the public domain and used by John Gilmore in
* USTAR.
*
* AUTHORS
*
* Mark H. Colburn, NAPS International (mark@jhereg.mn.org)
* John Gilmore (gnu@hoptoad)
* Rich Salz (rs@uunet.uu.net)
*
*
* Sponsored by The USENIX Association for public distribution.
*
* Copyright (c) 1989 Mark H. Colburn.
* All rights reserved.
*
* Redistribution and use in source and binary forms are permitted
* provided that the above copyright notice is duplicated in all such
* forms and that any documentation, advertising materials, and other
* materials related to such distribution and use acknowledge that the
* software was developed * by Mark H. Colburn and sponsored by The
* USENIX Association.
*
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
*
* $Log: wildmat.c,v $
* Revision 1.2 89/02/12 10:06:20 mark
* 1.2 release fixes
*
* Revision 1.1 88/12/23 18:02:41 mark
* Initial revision
*
*/
#ifndef lint
static char *ident = "$Id: wildmat.c,v 1.2 89/02/12 10:06:20 mark Exp $";
static char *copyright = "Copyright (c) 1989 Mark H. Colburn.\nAll rights reserved.\n";
#endif /* ! lint */
/* Headers */
#include "pax.h"
/* Function Prototypes */
#ifdef __STDC__
static int star(char *, char *);
#else /* !__STDC__ */
static int star();
#endif /* __STDC__ */
/*
* star - handle trailing * in a regular expression
*
* DESCRIPTION
*
* Star is used to match filename expansions containing a trailing
* asterisk ('*'). Star call wildmat() to determine if the substring
* passed to it is matches the regular expression.
*
* PARAMETERS
*
* char *source - The source string which is to be compared to the
* regular expression pattern.
* char *pattern - The regular expression which we are supposed to
* match to.
*
* RETURNS
*
* Returns non-zero if the entire source string is completely matched by
* the regular expression pattern, returns 0 otherwise. This is used to
* see if *'s in a pattern matched the entire source string.
*
*/
#ifdef __STDC__
static int star(char *source, char *pattern)
#else
static int star(source, pattern)
char *source; /* source operand */
char *pattern; /* regular expression to match */
#endif
{
while (!wildmat(pattern, source)) {
if (*++source == '\0') {
return (0);
}
}
return (1);
}
/*
* wildmat - match a regular expression
*
* DESCRIPTION
*
* Wildmat attempts to match the string pointed to by source to the
* regular expression pointed to by pattern. The subset of regular
* expression syntax which is supported is defined by POSIX P1003.2
* FILENAME EXPANSION rules.
*
* PARAMETERS
*
* char *pattern - The regular expression which we are supposed to
* match to.
* char *source - The source string which is to be compared to the
* regular expression pattern.
*
* RETURNS
*
* Returns non-zero if the source string matches the regular expression
* pattern specified, returns 0 otherwise.
*
*/
#ifdef __STDC__
int wildmat(char *pattern, char *source)
#else
int wildmat(pattern, source)
char *pattern; /* regular expression to match */
char *source; /* source operand */
#endif
{
int last; /* last character matched */
int matched; /* !0 if a match occurred */
int reverse; /* !0 if sense of match is reversed */
for (; *pattern; source++, pattern++) {
switch (*pattern) {
case '\\':
/* Literal match with following character */
pattern++;
/* FALLTHRU */
default:
if (*source != *pattern) {
return (0);
}
continue;
case '?':
/* Match anything. */
if (*source == '\0') {
return (0);
}
continue;
case '*':
/* Trailing star matches everything. */
return (*++pattern ? star(source, pattern) : 1);
case '[':
/* [^....] means inverse character class. */
if (reverse = pattern[1] == '^') {
pattern++;
}
for (last = 0400, matched = 0;
*++pattern && *pattern != ']'; last = *pattern) {
/* This next line requires a good C compiler. */
if (*pattern == '-'
? *source <= *++pattern && *source >= last
: *source == *pattern) {
matched = 1;
}
}
if (matched == reverse) {
return (0);
}
continue;
}
}
/*
* For "tar" use, matches that end at a slash also work. --hoptoad!gnu
*/
return (*source == '\0' || *source == '/');
}
|
