fnmatch.c
上传用户:pycemail
上传日期:2007-01-04
资源大小:329k
文件大小:5k
源码类别:

Ftp客户端

开发平台:

Unix_Linux

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