Annotation of embedaddon/sudo/compat/fnmatch.c, revision 1.1
1.1 ! misho 1: /*
! 2: * Copyright (c) 2008, 2010 Todd C. Miller <Todd.Miller@courtesan.com>
! 3: * Copyright (c) 1989, 1993, 1994
! 4: * The Regents of the University of California. All rights reserved.
! 5: *
! 6: * This code is derived from software contributed to Berkeley by
! 7: * Guido van Rossum.
! 8: *
! 9: * Redistribution and use in source and binary forms, with or without
! 10: * modification, are permitted provided that the following conditions
! 11: * are met:
! 12: * 1. Redistributions of source code must retain the above copyright
! 13: * notice, this list of conditions and the following disclaimer.
! 14: * 2. Redistributions in binary form must reproduce the above copyright
! 15: * notice, this list of conditions and the following disclaimer in the
! 16: * documentation and/or other materials provided with the distribution.
! 17: * 3. Neither the name of the University nor the names of its contributors
! 18: * may be used to endorse or promote products derived from this software
! 19: * without specific prior written permission.
! 20: *
! 21: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
! 22: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
! 23: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
! 24: * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
! 25: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
! 26: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
! 27: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
! 28: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
! 29: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
! 30: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
! 31: * SUCH DAMAGE.
! 32: */
! 33:
! 34: /*
! 35: * Function fnmatch() as specified in POSIX 1003.2-1992, section B.6.
! 36: * Compares a filename or pathname to a pattern.
! 37: */
! 38:
! 39: #include <config.h>
! 40:
! 41: #include <sys/types.h>
! 42:
! 43: #include <stdio.h>
! 44: #include <ctype.h>
! 45: #ifdef HAVE_STRING_H
! 46: # include <string.h>
! 47: #endif /* HAVE_STRING_H */
! 48: #ifdef HAVE_STRINGS_H
! 49: # include <strings.h>
! 50: #endif /* HAVE_STRINGS_H */
! 51:
! 52: #include "missing.h"
! 53: #include "compat/charclass.h"
! 54: #include "compat/fnmatch.h"
! 55:
! 56: #undef EOS
! 57: #define EOS '\0'
! 58:
! 59: #define RANGE_MATCH 1
! 60: #define RANGE_NOMATCH 0
! 61: #define RANGE_ERROR (-1)
! 62:
! 63: #if defined(LIBC_SCCS) && !defined(lint)
! 64: __unused static const char rcsid[] = "$OpenBSD: fnmatch.c,v 1.6 1998/03/19 00:29:59 millert Exp $";
! 65: #endif /* LIBC_SCCS and not lint */
! 66:
! 67: static int rangematch(const char *, int, int, char **);
! 68: static int classmatch(const char *, int, int, const char **);
! 69:
! 70: int
! 71: rpl_fnmatch(const char *pattern, const char *string, int flags)
! 72: {
! 73: const char *stringstart;
! 74: char *newp;
! 75: char c, test;
! 76:
! 77: for (stringstart = string;;)
! 78: switch (c = *pattern++) {
! 79: case EOS:
! 80: if (ISSET(flags, FNM_LEADING_DIR) && *string == '/')
! 81: return 0;
! 82: return *string == EOS ? 0 : FNM_NOMATCH;
! 83: case '?':
! 84: if (*string == EOS)
! 85: return FNM_NOMATCH;
! 86: if (*string == '/' && ISSET(flags, FNM_PATHNAME))
! 87: return FNM_NOMATCH;
! 88: if (*string == '.' && ISSET(flags, FNM_PERIOD) &&
! 89: (string == stringstart ||
! 90: (ISSET(flags, FNM_PATHNAME) && *(string - 1) == '/')))
! 91: return FNM_NOMATCH;
! 92: ++string;
! 93: break;
! 94: case '*':
! 95: c = *pattern;
! 96: /* Collapse multiple stars. */
! 97: while (c == '*')
! 98: c = *++pattern;
! 99:
! 100: if (*string == '.' && ISSET(flags, FNM_PERIOD) &&
! 101: (string == stringstart ||
! 102: (ISSET(flags, FNM_PATHNAME) && *(string - 1) == '/')))
! 103: return FNM_NOMATCH;
! 104:
! 105: /* Optimize for pattern with * at end or before /. */
! 106: if (c == EOS) {
! 107: if (ISSET(flags, FNM_PATHNAME))
! 108: return (ISSET(flags, FNM_LEADING_DIR) ||
! 109: strchr(string, '/') == NULL ?
! 110: 0 : FNM_NOMATCH);
! 111: else
! 112: return 0;
! 113: } else if (c == '/' && ISSET(flags, FNM_PATHNAME)) {
! 114: if ((string = strchr(string, '/')) == NULL)
! 115: return FNM_NOMATCH;
! 116: break;
! 117: }
! 118:
! 119: /* General case, use recursion. */
! 120: while ((test = *string) != EOS) {
! 121: if (!fnmatch(pattern, string, flags & ~FNM_PERIOD))
! 122: return 0;
! 123: if (test == '/' && ISSET(flags, FNM_PATHNAME))
! 124: break;
! 125: ++string;
! 126: }
! 127: return FNM_NOMATCH;
! 128: case '[':
! 129: if (*string == EOS)
! 130: return FNM_NOMATCH;
! 131: if (*string == '/' && ISSET(flags, FNM_PATHNAME))
! 132: return FNM_NOMATCH;
! 133: if (*string == '.' && ISSET(flags, FNM_PERIOD) &&
! 134: (string == stringstart ||
! 135: (ISSET(flags, FNM_PATHNAME) && *(string - 1) == '/')))
! 136: return FNM_NOMATCH;
! 137:
! 138: switch (rangematch(pattern, *string, flags, &newp)) {
! 139: case RANGE_ERROR:
! 140: /* not a good range, treat as normal text */
! 141: goto normal;
! 142: case RANGE_MATCH:
! 143: pattern = newp;
! 144: break;
! 145: case RANGE_NOMATCH:
! 146: return FNM_NOMATCH;
! 147: }
! 148: ++string;
! 149: break;
! 150: case '\\':
! 151: if (!ISSET(flags, FNM_NOESCAPE)) {
! 152: if ((c = *pattern++) == EOS) {
! 153: c = '\\';
! 154: --pattern;
! 155: }
! 156: }
! 157: /* FALLTHROUGH */
! 158: default:
! 159: normal:
! 160: if (c != *string && !(ISSET(flags, FNM_CASEFOLD) &&
! 161: (tolower((unsigned char)c) ==
! 162: tolower((unsigned char)*string))))
! 163: return FNM_NOMATCH;
! 164: ++string;
! 165: break;
! 166: }
! 167: /* NOTREACHED */
! 168: }
! 169:
! 170: static int
! 171: rangematch(const char *pattern, int test, int flags, char **newp)
! 172: {
! 173: int negate, ok, rv;
! 174: char c, c2;
! 175:
! 176: /*
! 177: * A bracket expression starting with an unquoted circumflex
! 178: * character produces unspecified results (IEEE 1003.2-1992,
! 179: * 3.13.2). This implementation treats it like '!', for
! 180: * consistency with the regular expression syntax.
! 181: * J.T. Conklin (conklin@ngai.kaleida.com)
! 182: */
! 183: if ((negate = (*pattern == '!' || *pattern == '^')))
! 184: ++pattern;
! 185:
! 186: if (ISSET(flags, FNM_CASEFOLD))
! 187: test = tolower(test);
! 188:
! 189: /*
! 190: * A right bracket shall lose its special meaning and represent
! 191: * itself in a bracket expression if it occurs first in the list.
! 192: * -- POSIX.2 2.8.3.2
! 193: */
! 194: ok = 0;
! 195: c = *pattern++;
! 196: do {
! 197: if (c == '[' && *pattern == ':') {
! 198: do {
! 199: rv = classmatch(pattern + 1, test,
! 200: (flags & FNM_CASEFOLD), &pattern);
! 201: if (rv == RANGE_MATCH)
! 202: ok = 1;
! 203: c = *pattern++;
! 204: } while (rv != RANGE_ERROR && c == '[' && *pattern == ':');
! 205: if (c == ']')
! 206: break;
! 207: }
! 208: if (c == '\\' && !ISSET(flags, FNM_NOESCAPE))
! 209: c = *pattern++;
! 210: if (c == EOS)
! 211: return RANGE_ERROR;
! 212: if (c == '/' && ISSET(flags, FNM_PATHNAME))
! 213: return RANGE_NOMATCH;
! 214: if (ISSET(flags, FNM_CASEFOLD))
! 215: c = tolower((unsigned char)c);
! 216: if (*pattern == '-'
! 217: && (c2 = *(pattern+1)) != EOS && c2 != ']') {
! 218: pattern += 2;
! 219: if (c2 == '\\' && !ISSET(flags, FNM_NOESCAPE))
! 220: c2 = *pattern++;
! 221: if (c2 == EOS)
! 222: return RANGE_ERROR;
! 223: if (ISSET(flags, FNM_CASEFOLD))
! 224: c2 = tolower((unsigned char)c2);
! 225: if (c <= test && test <= c2)
! 226: ok = 1;
! 227: } else if (c == test)
! 228: ok = 1;
! 229: } while ((c = *pattern++) != ']');
! 230:
! 231: *newp = (char *)pattern;
! 232: return ok == negate ? RANGE_NOMATCH : RANGE_MATCH;
! 233: }
! 234:
! 235: static int
! 236: classmatch(const char *pattern, int test, int foldcase, const char **ep)
! 237: {
! 238: struct cclass *cc;
! 239: const char *colon;
! 240: size_t len;
! 241: int rval = RANGE_NOMATCH;
! 242:
! 243: if ((colon = strchr(pattern, ':')) == NULL || colon[1] != ']') {
! 244: *ep = pattern - 2;
! 245: return RANGE_ERROR;
! 246: }
! 247: *ep = colon + 2;
! 248: len = (size_t)(colon - pattern);
! 249:
! 250: if (foldcase && strncmp(pattern, "upper:]", 7) == 0)
! 251: pattern = "lower:]";
! 252: for (cc = cclasses; cc->name != NULL; cc++) {
! 253: if (!strncmp(pattern, cc->name, len) && cc->name[len] == '\0') {
! 254: if (cc->isctype(test))
! 255: rval = RANGE_MATCH;
! 256: break;
! 257: }
! 258: }
! 259: if (cc->name == NULL) {
! 260: /* invalid character class, return EOS */
! 261: *ep = colon + strlen(colon);
! 262: rval = RANGE_ERROR;
! 263: }
! 264: return rval;
! 265: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to fnmatch.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / sudo / compat