123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182 |
- /*
- * ngIRCd -- The Next Generation IRC Daemon
- * Copyright (c)2001-2014 Alexander Barton (alex@barton.de) and Contributors.
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- * Please read the file COPYING, README and AUTHORS for more information.
- */
- #include "portab.h"
- /**
- * @file
- * Wildcard pattern matching
- */
- #include <assert.h>
- #include <string.h>
- #include "defines.h"
- #include "tool.h"
- #include "match.h"
- /*
- * The pattern matching functions [Matche(), Matche_After_Star()] are based
- * on code of J. Kercheval. Version 1.1 has been released on 1991-03-12 as
- * "public domain": <http://c.snippets.org/snip_lister.php?fname=match.c>
- */
- static int Matche PARAMS(( const char *p, const char *t ));
- static int Matche_After_Star PARAMS(( const char *p, const char *t ));
- #define MATCH_PATTERN 6 /**< bad pattern */
- #define MATCH_LITERAL 5 /**< match failure on literal match */
- #define MATCH_RANGE 4 /**< match failure on [..] construct */
- #define MATCH_ABORT 3 /**< premature end of text string */
- #define MATCH_END 2 /**< premature end of pattern string */
- #define MATCH_VALID 1 /**< valid match */
- /**
- * Match string with pattern.
- *
- * @param Pattern Pattern to match with
- * @param String Input string
- * @return true if pattern matches
- */
- GLOBAL bool
- Match( const char *Pattern, const char *String )
- {
- if (Matche(Pattern, String) == MATCH_VALID)
- return true;
- else
- return false;
- } /* Match */
- /**
- * Match string with pattern case-insensitive.
- *
- * @param Pattern Pattern to match with
- * @param String Input string, at most COMMAND_LEN-1 characters long
- * @return true if pattern matches
- */
- GLOBAL bool
- MatchCaseInsensitive(const char *Pattern, const char *String)
- {
- char needle[COMMAND_LEN], haystack[COMMAND_LEN];
- strlcpy(needle, Pattern, sizeof(needle));
- strlcpy(haystack, String, sizeof(haystack));
- return Match(ngt_LowerStr(needle), ngt_LowerStr(haystack));
- } /* MatchCaseInsensitive */
- /**
- * Match string with pattern case-insensitive.
- *
- * @param pattern Pattern to match with
- * @param String Input string, at most COMMAND_LEN-1 characters long
- * @param Separator Character separating the individual patterns in the list
- * @return true if pattern matches
- */
- GLOBAL bool
- MatchCaseInsensitiveList(const char *Pattern, const char *String,
- const char *Separator)
- {
- char tmp_pattern[COMMAND_LEN], *ptr;
- strlcpy(tmp_pattern, Pattern, sizeof(tmp_pattern));
- ptr = strtok(tmp_pattern, Separator);
- while (ptr) {
- ngt_TrimStr(ptr);
- if (MatchCaseInsensitive(ptr, String))
- return true;
- ptr = strtok(NULL, Separator);
- }
- return false;
- } /* MatchCaseInsensitive */
- static int
- Matche( const char *p, const char *t )
- {
- for( ; *p; p++, t++ )
- {
- /* if this is the end of the text then this is the end of the match */
- if( ! *t )
- {
- return ( *p == '*' && *++p == '\0' ) ? MATCH_VALID : MATCH_ABORT;
- }
- /* determine and react to pattern type */
- switch( *p )
- {
- case '?': /* single any character match */
- break;
- case '*': /* multiple any character match */
- return Matche_After_Star( p, t );
- default: /* must match this character exactly */
- if( *p != *t ) return MATCH_LITERAL;
- }
- }
- /* if end of text not reached then the pattern fails */
- if( *t ) return MATCH_END;
- else return MATCH_VALID;
- } /* Matche */
- static int
- Matche_After_Star( const char *p, const char *t )
- {
- register int nextp, match = 0;
- /* pass over existing ? and * in pattern */
- while( *p == '?' || *p == '*' )
- {
- /* take one char for each ? and + */
- if (*p == '?')
- {
- /* if end of text then no match */
- if( ! *t++ ) return MATCH_ABORT;
- }
- /* move to next char in pattern */
- p++;
- }
- /* if end of pattern we have matched regardless of text left */
- if( ! *p ) return MATCH_VALID;
- /* get the next character to match which must be a literal or '[' */
- nextp = *p;
- if( nextp == '\\' )
- {
- nextp = p[1];
- /* if end of text then we have a bad pattern */
- if( ! nextp ) return MATCH_PATTERN;
- }
- /* Continue until we run out of text or definite result seen */
- do
- {
- /* a precondition for matching is that the next character
- * in the pattern match the next character in the text or that
- * the next pattern char is the beginning of a range. Increment
- * text pointer as we go here */
- if( nextp == *t || nextp == '[' ) match = Matche( p, t );
- /* if the end of text is reached then no match */
- if( ! *t++ ) match = MATCH_ABORT;
- } while( match != MATCH_VALID && match != MATCH_ABORT && match != MATCH_PATTERN );
- /* return result */
- return match;
- } /* Matche_After_Star */
- /* -eof- */
|