Wildcard string compare (globbing)

int wildcmp_ex(const char *wild, const char *string) {
  const char *cp = NULL, *mp = NULL;
 
  while (*string) {
    if (*wild == '*') {
      if (!*++wild) {
        return 1;
      }
      mp = wild;
      cp = string+1;
    } else if (((*wild == *string) && (*wild != '#')) || (*wild == '?') || ((*wild == '#') && isdigit(*string))) {
      wild++;
      string++;
    } else {
      if (mp)
      {
        wild = mp;
        string = cp++;
      }
      else
      {
        return 0;
      }
    }
  }
 
  while (*wild == '*') {
    wild++;
  }
  return !*wild;
}

public static bool wildcmp(string pattern, string text) {
 
  var wild = new StringScanner(pattern);
  var @string = new StringScanner(text);
 
  var mp = wild;
  var cp = @string;
 
  while (@string && wild != '*') {
    if (wild != @string && wild != '?') {
      return false;
    }
    wild++;
    @string++;
  }
 
  while (@string) {
    if (@wild == '*') {
      if (!++wild) {
        return true;
      }
      mp = wild;
      cp = @string + 1;
    } else if (wild == @string || wild == '?') {
      wild++;
      @string++;
    } else {
      wild = mp;
      @string = cp++;
    }
  }
 
  while (wild == '*') {
    wild++;
  }
  return !wild;
}
 
public struct StringScanner
{
    private string _string;
    private int _position;
    
    public StringScanner(string s)
    {
        _string = s;
        _position = 0;
    }
    
    public string String
    {
        get { return _string; }
    }
    
    public int Position
    {
        get { return _position; }
    }
        
    public bool Finished
    {
        get { return _position == _string.Length;}
    }
    
    public char Current
    {
        get { return Finished ? '\0' : _string[_position]; }
    }
    
    public bool MoveNext()
    {
        if (Finished)
            return false;
        _position++;
        return true;
    }
    
    public static StringScanner operator ++(StringScanner scanner)
    {
        scanner.MoveNext();
        return scanner;
    }
    
    public static StringScanner operator +(StringScanner scanner, int n)
    {
        return new StringScanner(scanner.String)
        {
            _position = Math.Min(scanner.Position + n, scanner.String.Length)
        };
    }
    
    public static implicit operator bool(StringScanner scanner)
    {
        return !scanner.Finished;
    }
    
    public static implicit operator char(StringScanner scanner)
    {
        return scanner.Current;
    }
    
    public static bool operator ==(StringScanner scanner1, StringScanner scanner2)
    {
        return scanner1.Current == scanner2.Current;
    }
    
    public static bool operator !=(StringScanner scanner1, StringScanner scanner2)
    {
        return scanner1.Current != scanner2.Current;
    }
}

// String match with wildcards.  Obtained from the Internet somewhere.  Case insensitive.

BOOL wm(const char *s, const char *t)
{
	return *t-'*' ? *s ? (*t=='?') | (toupper(*s)==toupper(*t)) && wm(s+1,t+1) : !*t : wm(s,t+1) || *s && wm(s+1,t);
}

   public class MString
   {
      /// <summary>
      /// Function to compare two strings, where strA may contain wildcard characters '*' and 
      /// '?'. http://en.wikipedia.org/wiki/Wildcard_character
      /// </summary>
      /// <param name="strA">string which may contain wildcards, may be empty, must not be null</param>
      /// <param name="strB">string to compare to, no wildcard processing, may be empty, must not be null</param>
      /// <param name="ignoreCase">true = ignore upper/lower case, false = don't ignore case</param>
      /// <returns>true = match, false = non-match</returns>
      public static bool CompareWWc(string strA, string strB, bool ignoreCase)
      {
         if (ignoreCase)
            return CompareWWc(strA.ToLower(), strB.ToLower());
         else 
            return CompareWWc(strA, strB);
      }
 

      /// <summary>
      /// Recursive function to compare two strings, where strA may contain wildcard characters 
      /// '*' and '?'. http://en.wikipedia.org/wiki/Wildcard_character
      /// </summary>
      /// <param name="strA">string which may contain wildcards, may be empty, must not be null</param>
      /// <param name="strB">string to compare to, no wildcard processing, may be empty, must not be null</param>
      /// <returns>true = match, false = non-match</returns>
      public static bool CompareWWc(string strA, string strB)
      {
         // Top of loop to scan across strA (and strB)
         for (int i = 0; i < strA.Length; i++)
         {
            // Special processing when we hit a '*' in strA
            if (strA[i] == '*')
            {
               // If the '*' is at the end of strA then result = true irrespective of strB
               if (i == strA.Length - 1)
                  return true;  
 
               // Do recursive calls to try to find a match somewhere to the right in strB
               strA = strA.Substring(i + 1);  // The part of strA beyond the '*'
               for (int j = i; j < strB.Length; j++)
                  if (CompareWWc(strA, strB.Substring(j)))
                     return true;
               return false;
            }
 
            // Normal processing for non-'*' characters in strA
            if (i >= strB.Length || (strA[i] != strB[i] && strA[i] != '?'))
               return false;
         }
 
         // We've reached the end of strA and the last character is not '*'
         return strA.Length == strB.Length;
      }
 
   }

         if (!MString.CompareWWc("", ""))
            Console.WriteLine("Something wrong!");
 

         if (!MString.CompareWWc("something", "something"))
            Console.WriteLine("Something wrong!");
 
         if (MString.CompareWWc("something", "zomething"))
            Console.WriteLine("Something wrong!");
         
         if (MString.CompareWWc("something", "some"))
            Console.WriteLine("Something wrong!");
         
         if (MString.CompareWWc("something", "something else"))
            Console.WriteLine("Something wrong!");
 

         if (!MString.CompareWWc("s?m?th???", "something"))
            Console.WriteLine("Something wrong!");
         
         if (MString.CompareWWc("s?m?th???", "somethin"))
            Console.WriteLine("Something wrong!");
 

         if (!MString.CompareWWc("*", ""))
            Console.WriteLine("Something wrong!");
         
         if (!MString.CompareWWc("*", "nonsense"))
            Console.WriteLine("Something wrong!");
         
         if (!MString.CompareWWc("non*", "nonsense"))
            Console.WriteLine("Something wrong!");
 

         if (!MString.CompareWWc("*nonsense", "nonsense"))
            Console.WriteLine("Something wrong!");
 
         if (!MString.CompareWWc("non*nse", "nonsense"))
            Console.WriteLine("Something wrong!");
         
         if (MString.CompareWWc("non*nse", "nonsenze"))
            Console.WriteLine("Something wrong!");
         
         if (!MString.CompareWWc("non*n?e", "nonsense"))
            Console.WriteLine("Something wrong!");
 

         if (!MString.CompareWWc("n*on*nse", "nonsense"))
            Console.WriteLine("Something wrong!");
 
         if (!MString.CompareWWc("n*n*nse", "nonsense"))
            Console.WriteLine("Something wrong!");
 
         if (MString.CompareWWc("*non*nse", "nonsenze"))
            Console.WriteLine("Something wrong!");
 
         if (!MString.CompareWWc("n*n*n?e", "nonsense"))
            Console.WriteLine("Something wrong!");
      }

bool StrWildCmp(char* wildstring, char *matchstring){
 
	
	char stopstring[1];
	*stopstring = 0;
 
	while(*matchstring) {
		if (*wildstring == '*') {
		  if (!*++wildstring) {
			return true;
		  } else {
			  *stopstring = *wildstring;
		  }
		}
 
		if(*stopstring) {
			if(*stopstring == *matchstring ) {
				wildstring++;
				matchstring++;
				*stopstring = 0;
			} else {
				matchstring++;
			}
		} else if((*wildstring == *matchstring) || (*wildstring == '?')) {
				wildstring++;
				matchstring++;
		} else {
			return false;
		}
 
		if(!*matchstring && *wildstring && *wildstring != '*') {
			// matchstring too short
			return false;
		}
	}
 
  return true;
}

FUNCTION SBYTE wildcmp( wildcard$, search$)
  ' wildcmp(const char *wild, const char *string)
  ' Written by Jack Handy - jakkhandy@hotmail.com
 
  ULONG cp
  ULONG mp
  
  STRING s_txt$
  ULONG  sp 
  
  STRING w_txt$
  ULONG  wp
 
  IFZ search$   THEN RETURN $$FALSE  
  IFZ wildcard$ THEN RETURN $$FALSE
  
  w_txt$ = wildcard$ + "\0\0"   ' Just to be sure
  s_txt$ = search$   + "\0\0"
  
  DO WHILE (s_txt${sp}) && (w_txt${wp} != '*') 
    IF (w_txt${wp} != s_txt${sp} )  && (w_txt${wp} != '?') THEN RETURN $$FALSE
    
    INC wp
    INC sp
  LOOP
    
  DO WHILE (s_txt${sp})
    IF ( w_txt${wp} == '*' ) THEN    
      INC wp
      IF !(w_txt${wp}) THEN RETURN $$TRUE      
      
      mp = wp     
      cp = sp + 1 
    ELSE 
      IF (w_txt${wp} == s_txt${sp} )  || (w_txt${wp} == '?') THEN    
        INC wp
        INC sp
      ELSE
        wp = mp
      
        sp = cp                   
        IF s_txt${sp} THEN INC cp 
       
      ENDIF
    ENDIF  
  LOOP
    
  DO WHILE (w_txt${wp} == '*' )    
    INC wp
  LOOP
  
  RETURN !w_txt${wp} 
 
END FUNCTION
 

Todd Smith