Subversion Repositories planix.SVN

Rev

Rev 2 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
/* Copyright (C) 1992 Free Software Foundation, Inc.
2 
This file is part of the GNU C Library.
3 
 
4 
The GNU C Library is free software; you can redistribute it and/or
5 
modify it under the terms of the GNU Library General Public License as
6 
published by the Free Software Foundation; either version 2 of the
7 
License, or (at your option) any later version.
8 
 
9 
The GNU C Library is distributed in the hope that it will be useful,
10 
but WITHOUT ANY WARRANTY; without even the implied warranty of
11 
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12 
Library General Public License for more details.  */
13 
 
14 
/* Modified slightly by Brian Berliner <berliner@sun.com> and
15 
   Jim Blandy <jimb@cyclic.com> for CVS use */
16 
 
17 
#ifdef HAVE_CONFIG_H
18 
#include "config.h"
19 
#endif
20 
 
21 
#include "system.h"
22 
 
23 
/* IGNORE(@ */
24 
/* #include <ansidecl.h> */
25 
/* @) */
26 
#include <errno.h>
27 
#include "fnmatch.h"
28 
 
29 
#if !defined(__GNU_LIBRARY__) && !defined(STDC_HEADERS)
30 
extern int errno;
31 
#endif
32 
 
33 
/* Match STRING against the filename pattern PATTERN, returning zero if
34 
   it matches, nonzero if not.  */
35 
int
36 
#if __STDC__
37 
fnmatch (const char *pattern, const char *string, int flags)
38 
#else
39 
fnmatch (pattern, string, flags)
40 
    char *pattern;
41 
    char *string;
42 
    int flags;
43 
#endif
44 
{
45 
  register const char *p = pattern, *n = string;
46 
  register char c;
47 
 
48 
  if ((flags & ~__FNM_FLAGS) != 0)
49 
    {
50 
      errno = EINVAL;
51 
      return -1;
52 
    }
53 
 
54 
  while ((c = *p++) != '\0')
55 
    {
56 
      switch (c)
57 
	{
58 
	case '?':
59 
	  if (*n == '\0')
60 
	    return FNM_NOMATCH;
61 
	  else if ((flags & FNM_PATHNAME) && *n == '/')
62 
	    return FNM_NOMATCH;
63 
	  else if ((flags & FNM_PERIOD) && *n == '.' &&
64 
		   (n == string || ((flags & FNM_PATHNAME) && n[-1] == '/')))
65 
	    return FNM_NOMATCH;
66 
	  break;
67 
 
68 
	case '\\':
69 
	  if (!(flags & FNM_NOESCAPE))
70 
	    c = *p++;
71 
	  if (FOLD_FN_CHAR (*n) != FOLD_FN_CHAR (c))
72 
	    return FNM_NOMATCH;
73 
	  break;
74 
 
75 
	case '*':
76 
	  if ((flags & FNM_PERIOD) && *n == '.' &&
77 
	      (n == string || ((flags & FNM_PATHNAME) && n[-1] == '/')))
78 
	    return FNM_NOMATCH;
79 
 
80 
	  for (c = *p++; c == '?' || c == '*'; c = *p++, ++n)
81 
	    if (((flags & FNM_PATHNAME) && *n == '/') ||
82 
		(c == '?' && *n == '\0'))
83 
	      return FNM_NOMATCH;
84 
 
85 
	  if (c == '\0')
86 
	    return 0;
87 
 
88 
	  {
89 
	    char c1 = (!(flags & FNM_NOESCAPE) && c == '\\') ? *p : c;
90 
	    for (--p; *n != '\0'; ++n)
91 
	      if ((c == '[' || FOLD_FN_CHAR (*n) == FOLD_FN_CHAR (c1)) &&
92 
		  fnmatch(p, n, flags & ~FNM_PERIOD) == 0)
93 
		return 0;
94 
	    return FNM_NOMATCH;
95 
	  }
96 
 
97 
	case '[':
98 
	  {
99 
	    /* Nonzero if the sense of the character class is inverted.  */
100 
	    register int not;
101 
 
102 
	    if (*n == '\0')
103 
	      return FNM_NOMATCH;
104 
 
105 
	    if ((flags & FNM_PERIOD) && *n == '.' &&
106 
		(n == string || ((flags & FNM_PATHNAME) && n[-1] == '/')))
107 
	      return FNM_NOMATCH;
108 
 
109 
	    not = (*p == '!' || *p == '^');
110 
	    if (not)
111 
	      ++p;
112 
 
113 
	    c = *p++;
114 
	    for (;;)
115 
	      {
116 
		register char cstart = c, cend = c;
117 
 
118 
		if (!(flags & FNM_NOESCAPE) && c == '\\')
119 
		  cstart = cend = *p++;
120 
 
121 
		if (c == '\0')
122 
		  /* [ (unterminated) loses.  */
123 
		  return FNM_NOMATCH;
124 
 
125 
		c = *p++;
126 
 
127 
		if ((flags & FNM_PATHNAME) && c == '/')
128 
		  /* [/] can never match.  */
129 
		  return FNM_NOMATCH;
130 
 
131 
		if (c == '-' && *p != ']')
132 
		  {
133 
		    cend = *p++;
134 
		    if (!(flags & FNM_NOESCAPE) && cend == '\\')
135 
		      cend = *p++;
136 
		    if (cend == '\0')
137 
		      return FNM_NOMATCH;
138 
		    c = *p++;
139 
		  }
140 
 
141 
		if (*n >= cstart && *n <= cend)
142 
		  goto matched;
143 
 
144 
		if (c == ']')
145 
		  break;
146 
	      }
147 
	    if (!not)
148 
	      return FNM_NOMATCH;
149 
	    break;
150 
 
151 
	  matched:;
152 
	    /* Skip the rest of the [...] that already matched.  */
153 
	    while (c != ']')
154 
	      {
155 
		if (c == '\0')
156 
		  /* [... (unterminated) loses.  */
157 
		  return FNM_NOMATCH;
158 
 
159 
		c = *p++;
160 
		if (!(flags & FNM_NOESCAPE) && c == '\\')
161 
		  /* 1003.2d11 is unclear if this is right.  %%% */
162 
		  ++p;
163 
	      }
164 
	    if (not)
165 
	      return FNM_NOMATCH;
166 
	  }
167 
	  break;
168 
 
169 
	default:
170 
	  if (FOLD_FN_CHAR (c) != FOLD_FN_CHAR (*n))
171 
	    return FNM_NOMATCH;
172 
	}
173 
 
174 
      ++n;
175 
    }
176 
 
177 
  if (*n == '\0')
178 
    return 0;
179 
 
180 
  return FNM_NOMATCH;
181 
}