The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/libkern/fnmatch.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*-
    2  * Copyright (c) 1989, 1993, 1994
    3  *      The Regents of the University of California.  All rights reserved.
    4  *
    5  * This code is derived from software contributed to Berkeley by
    6  * Guido van Rossum.
    7  *
    8  * Redistribution and use in source and binary forms, with or without
    9  * modification, are permitted provided that the following conditions
   10  * are met:
   11  * 1. Redistributions of source code must retain the above copyright
   12  *    notice, this list of conditions and the following disclaimer.
   13  * 2. Redistributions in binary form must reproduce the above copyright
   14  *    notice, this list of conditions and the following disclaimer in the
   15  *    documentation and/or other materials provided with the distribution.
   16  * 4. Neither the name of the University nor the names of its contributors
   17  *    may be used to endorse or promote products derived from this software
   18  *    without specific prior written permission.
   19  *
   20  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
   21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
   24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
   25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
   26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
   28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
   29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
   30  * SUCH DAMAGE.
   31  */
   32 
   33 #include <sys/cdefs.h>
   34 __FBSDID("$FreeBSD$");
   35 
   36 /*
   37  * Function fnmatch() as specified in POSIX 1003.2-1992, section B.6.
   38  * Compares a filename or pathname to a pattern.
   39  */
   40 
   41 #include <sys/param.h>
   42 #include <sys/ctype.h>
   43 #include <sys/libkern.h>
   44 
   45 #define EOS     '\0'
   46 
   47 #define RANGE_MATCH     1
   48 #define RANGE_NOMATCH   0
   49 #define RANGE_ERROR     (-1)
   50 
   51 static int rangematch(const char *, char, int, char **);
   52 
   53 int
   54 fnmatch(const char *pattern, const char *string, int flags)
   55 {
   56         const char *stringstart;
   57         char *newp;
   58         char c, test;
   59 
   60         for (stringstart = string;;)
   61                 switch (c = *pattern++) {
   62                 case EOS:
   63                         if ((flags & FNM_LEADING_DIR) && *string == '/')
   64                                 return (0);
   65                         return (*string == EOS ? 0 : FNM_NOMATCH);
   66                 case '?':
   67                         if (*string == EOS)
   68                                 return (FNM_NOMATCH);
   69                         if (*string == '/' && (flags & FNM_PATHNAME))
   70                                 return (FNM_NOMATCH);
   71                         if (*string == '.' && (flags & FNM_PERIOD) &&
   72                             (string == stringstart ||
   73                             ((flags & FNM_PATHNAME) && *(string - 1) == '/')))
   74                                 return (FNM_NOMATCH);
   75                         ++string;
   76                         break;
   77                 case '*':
   78                         c = *pattern;
   79                         /* Collapse multiple stars. */
   80                         while (c == '*')
   81                                 c = *++pattern;
   82 
   83                         if (*string == '.' && (flags & FNM_PERIOD) &&
   84                             (string == stringstart ||
   85                             ((flags & FNM_PATHNAME) && *(string - 1) == '/')))
   86                                 return (FNM_NOMATCH);
   87 
   88                         /* Optimize for pattern with * at end or before /. */
   89                         if (c == EOS)
   90                                 if (flags & FNM_PATHNAME)
   91                                         return ((flags & FNM_LEADING_DIR) ||
   92                                             index(string, '/') == NULL ?
   93                                             0 : FNM_NOMATCH);
   94                                 else
   95                                         return (0);
   96                         else if (c == '/' && flags & FNM_PATHNAME) {
   97                                 if ((string = index(string, '/')) == NULL)
   98                                         return (FNM_NOMATCH);
   99                                 break;
  100                         }
  101 
  102                         /* General case, use recursion. */
  103                         while ((test = *string) != EOS) {
  104                                 if (!fnmatch(pattern, string, flags & ~FNM_PERIOD))
  105                                         return (0);
  106                                 if (test == '/' && flags & FNM_PATHNAME)
  107                                         break;
  108                                 ++string;
  109                         }
  110                         return (FNM_NOMATCH);
  111                 case '[':
  112                         if (*string == EOS)
  113                                 return (FNM_NOMATCH);
  114                         if (*string == '/' && (flags & FNM_PATHNAME))
  115                                 return (FNM_NOMATCH);
  116                         if (*string == '.' && (flags & FNM_PERIOD) &&
  117                             (string == stringstart ||
  118                             ((flags & FNM_PATHNAME) && *(string - 1) == '/')))
  119                                 return (FNM_NOMATCH);
  120 
  121                         switch (rangematch(pattern, *string, flags, &newp)) {
  122                         case RANGE_ERROR:
  123                                 goto norm;
  124                         case RANGE_MATCH:
  125                                 pattern = newp;
  126                                 break;
  127                         case RANGE_NOMATCH:
  128                                 return (FNM_NOMATCH);
  129                         }
  130                         ++string;
  131                         break;
  132                 case '\\':
  133                         if (!(flags & FNM_NOESCAPE)) {
  134                                 if ((c = *pattern++) == EOS) {
  135                                         c = '\\';
  136                                         --pattern;
  137                                 }
  138                         }
  139                         /* FALLTHROUGH */
  140                 default:
  141                 norm:
  142                         if (c == *string)
  143                                 ;
  144                         else if ((flags & FNM_CASEFOLD) &&
  145                                  (tolower((unsigned char)c) ==
  146                                   tolower((unsigned char)*string)))
  147                                 ;
  148                         else
  149                                 return (FNM_NOMATCH);
  150                         string++;
  151                         break;
  152                 }
  153         /* NOTREACHED */
  154 }
  155 
  156 static int
  157 rangematch(const char *pattern, char test, int flags, char **newp)
  158 {
  159         int negate, ok;
  160         char c, c2;
  161 
  162         /*
  163          * A bracket expression starting with an unquoted circumflex
  164          * character produces unspecified results (IEEE 1003.2-1992,
  165          * 3.13.2).  This implementation treats it like '!', for
  166          * consistency with the regular expression syntax.
  167          * J.T. Conklin (conklin@ngai.kaleida.com)
  168          */
  169         if ( (negate = (*pattern == '!' || *pattern == '^')) )
  170                 ++pattern;
  171 
  172         if (flags & FNM_CASEFOLD)
  173                 test = tolower((unsigned char)test);
  174 
  175         /*
  176          * A right bracket shall lose its special meaning and represent
  177          * itself in a bracket expression if it occurs first in the list.
  178          * -- POSIX.2 2.8.3.2
  179          */
  180         ok = 0;
  181         c = *pattern++;
  182         do {
  183                 if (c == '\\' && !(flags & FNM_NOESCAPE))
  184                         c = *pattern++;
  185                 if (c == EOS)
  186                         return (RANGE_ERROR);
  187 
  188                 if (c == '/' && (flags & FNM_PATHNAME))
  189                         return (RANGE_NOMATCH);
  190 
  191                 if (flags & FNM_CASEFOLD)
  192                         c = tolower((unsigned char)c);
  193 
  194                 if (*pattern == '-'
  195                     && (c2 = *(pattern+1)) != EOS && c2 != ']') {
  196                         pattern += 2;
  197                         if (c2 == '\\' && !(flags & FNM_NOESCAPE))
  198                                 c2 = *pattern++;
  199                         if (c2 == EOS)
  200                                 return (RANGE_ERROR);
  201 
  202                         if (flags & FNM_CASEFOLD)
  203                                 c2 = tolower((unsigned char)c2);
  204 
  205                         if (c <= test && test <= c2)
  206                                 ok = 1;
  207                 } else if (c == test)
  208                         ok = 1;
  209         } while ((c = *pattern++) != ']');
  210 
  211         *newp = (char *)(uintptr_t)pattern;
  212         return (ok == negate ? RANGE_NOMATCH : RANGE_MATCH);
  213 }

Cache object: a18feb2a6404b253fe90be40a2ed6065


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.