src/ngircd/match.c

   1 /*
   2  * ngIRCd -- The Next Generation IRC Daemon
   3  * Copyright (c)2001-2012 Alexander Barton (alex@barton.de) and Contributors.
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  * Please read the file COPYING, README and AUTHORS for more information.
  10  */
  11
  12 #include "portab.h"
  13
  14 /**
  15  * @file
  16  * Wildcard pattern matching
  17  */
  18
  19 #include "imp.h"
  20 #include <assert.h>
  21 #include <string.h>
  22
  23 #include "exp.h"
  24 #include "match.h"
  25 #include "defines.h"
  26 #include "tool.h"
  27
  28
  29 /*
  30  * The pattern matching functions [Matche(), Matche_After_Star()] are based
  31  * on code of J. Kercheval. Version 1.1 has been released on 1991-03-12 as
  32  * "public domain": <http://c.snippets.org/snip_lister.php?fname=match.c>
  33  */
  34
  35
  36 static int Matche PARAMS(( const char *p, const char *t ));
  37 static int Matche_After_Star PARAMS(( const char *p, const char *t ));
  38
  39
  40 #define MATCH_PATTERN   6       /**< bad pattern */
  41 #define MATCH_LITERAL   5       /**< match failure on literal match */
  42 #define MATCH_RANGE     4       /**< match failure on [..] construct */
  43 #define MATCH_ABORT     3       /**< premature end of text string */
  44 #define MATCH_END       2       /**< premature end of pattern string */
  45 #define MATCH_VALID     1       /**< valid match */
  46
  47
  48 /**
  49  * Match string with pattern.
  50  *
  51  * @param Pattern Pattern to match with
  52  * @param String Input string
  53  * @return true if pattern matches
  54  */
  55 GLOBAL bool
  56 Match( const char *Pattern, const char *String )
  57 {
  58         if( Matche( Pattern, String ) == MATCH_VALID ) return true;
  59         else return false;
  60 } /* Match */
  61
  62
  63 /**
  64  * Match string with pattern case-insensitive.
  65  *
  66  * @param Pattern Pattern to match with
  67  * @param String Input string, at most COMMAND_LEN-1 characters long
  68  * @return true if pattern matches
  69  */
  70 GLOBAL bool
  71 MatchCaseInsensitive(const char *Pattern, const char *String)
  72 {
  73         char haystack[COMMAND_LEN];
  74
  75         strlcpy(haystack, String, sizeof(haystack));
  76         return Match(Pattern, ngt_LowerStr(haystack));
  77 } /* MatchCaseInsensitive */
  78
  79
  80 /**
  81  * Match string with pattern case-insensitive.
  82  *
  83  * @param pattern Pattern to match with
  84  * @param String Input string, at most COMMAND_LEN-1 characters long
  85  * @param Separator Character separating the individual patterns in the list
  86  * @return true if pattern matches
  87  */
  88 GLOBAL bool
  89 MatchCaseInsensitiveList(const char *Pattern, const char *String,
  90                      const char *Separator)
  91 {
  92         char tmp_pattern[COMMAND_LEN], haystack[COMMAND_LEN], *ptr;
  93
  94         strlcpy(tmp_pattern, Pattern, sizeof(tmp_pattern));
  95         strlcpy(haystack, String, sizeof(haystack));
  96         ngt_LowerStr(haystack);
  97
  98         ptr = strtok(tmp_pattern, Separator);
  99         while (ptr) {
 100                 ngt_TrimStr(ptr);
 101                 if (Match(ptr, haystack))
 102                         return true;
 103                 ptr = strtok(NULL, Separator);
 104         }
 105         return false;
 106 } /* MatchCaseInsensitive */
 107
 108
 109 static int
 110 Matche( const char *p, const char *t )
 111 {
 112         for( ; *p; p++, t++ )
 113         {
 114                 /* if this is the end of the text then this is the end of the match */
 115                 if( ! *t )
 116                 {
 117                         return ( *p == '*' && *++p == '\0' ) ? MATCH_VALID : MATCH_ABORT;
 118                 }
 119
 120                 /* determine and react to pattern type */
 121                 switch( *p )
 122                 {
 123                         case '?':       /* single any character match */
 124                                 break;
 125
 126                         case '*':       /* multiple any character match */
 127                                 return Matche_After_Star( p, t );
 128
 129                         default:        /* must match this character exactly */
 130                                 if( *p != *t ) return MATCH_LITERAL;
 131                 }
 132         }
 133         /* if end of text not reached then the pattern fails */
 134
 135         if( *t ) return MATCH_END;
 136         else return MATCH_VALID;
 137 } /* Matche */
 138
 139
 140 static int
 141 Matche_After_Star( const char *p, const char *t )
 142 {
 143         register int nextp, match = 0;
 144
 145         /* pass over existing ? and * in pattern */
 146         while( *p == '?' || *p == '*' )
 147         {
 148                 /* take one char for each ? and + */
 149                 if (*p == '?')
 150                 {
 151                         /* if end of text then no match */
 152                         if( ! *t++ ) return MATCH_ABORT;
 153                 }
 154
 155                 /* move to next char in pattern */
 156                 p++;
 157         }
 158
 159         /* if end of pattern we have matched regardless of text left */
 160         if( ! *p ) return MATCH_VALID;
 161
 162         /* get the next character to match which must be a literal or '[' */
 163         nextp = *p;
 164         if( nextp == '\\' )
 165         {
 166                 nextp = p[1];
 167
 168                 /* if end of text then we have a bad pattern */
 169                 if( ! nextp ) return MATCH_PATTERN;
 170         }
 171
 172         /* Continue until we run out of text or definite result seen */
 173         do
 174         {
 175                 /* a precondition for matching is that the next character
 176                  * in the pattern match the next character in the text or that
 177                  * the next pattern char is the beginning of a range.  Increment
 178                  * text pointer as we go here */
 179                 if( nextp == *t || nextp == '[' ) match = Matche( p, t );
 180
 181                 /* if the end of text is reached then no match */
 182                 if( ! *t++ ) match = MATCH_ABORT;
 183         } while( match != MATCH_VALID && match != MATCH_ABORT && match != MATCH_PATTERN );
 184
 185         /* return result */
 186         return match;
 187 } /* Matche_After_Star */
 188
 189
 190 /* -eof- */