1 files changed, 124 insertions, 0 deletions
diff --git a/externals/mysql/mysys/mf_wfile.c b/externals/mysql/mysys/mf_wfile.c
new file mode 100644
index 00000000000..f98d348994e
--- /dev/null
+++ b/externals/mysql/mysys/mf_wfile.c
@@ -0,0 +1,124 @@
+/* Copyright (C) 2000 MySQL AB
+
+   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; version 2 of the License.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
+
+/* Functions for finding files with wildcards */
+
+/*
+  The following file-name-test is supported:
+  - "name [[,] name...]			; Matches any of used filenames.
+					  Each name can have "*" and/or "?"
+					  wild-cards.
+  - [wildspec [,]] !wildspec2		; File that matches wildspec and not
+					  wildspec2.
+*/
+
+#include "mysys_priv.h"
+#include <m_string.h>
+
+	/* Store wildcard-string in a easyer format */
+
+WF_PACK *wf_comp(char * str)
+{
+  uint ant;
+  int not_pos;
+  register char * pos;
+  char * buffer;
+  WF_PACK *ret;
+  DBUG_ENTER("wf_comp");
+
+  not_pos= -1;			/* Skip space and '!' in front */
+  while (*str == ' ')
+    str++;
+  if (*str == '!')
+  {
+    not_pos=0;
+    while (*++str == ' ') {};
+  }
+  if (*str == 0)				/* Empty == everything */
+    DBUG_RETURN((WF_PACK *) NULL);
+
+  ant=1;					/* Count filespecs */
+  for (pos=str ; *pos ; pos++)
+    ant+= test(*pos == ' ' || *pos == ',');
+
+  if ((ret= (WF_PACK*) my_malloc((uint) ant*(sizeof(char **)+2)+
+				 sizeof(WF_PACK)+ (uint) strlen(str)+1,
+				 MYF(MY_WME)))
+	== 0)
+    DBUG_RETURN((WF_PACK *) NULL);
+  ret->wild= (char **) (ret+1);
+  buffer= (char *) (ret->wild+ant);
+
+  ant=0;
+  for (pos=str ; *pos ; str= pos)
+  {
+    ret->wild[ant++]=buffer;
+    while (*pos != ' ' && *pos != ',' && *pos != '!' && *pos)
+      *buffer++ = *pos++;
+
+    *buffer++ = '\0';
+    while (*pos == ' ' || *pos == ',' || *pos == '!' )
+      if (*pos++ == '!' && not_pos <0)
+	not_pos=(int) ant;
+  }
+
+  ret->wilds=ant;
+  if (not_pos <0)
+    ret->not_pos=ant;
+  else
+    ret->not_pos=(uint) not_pos;
+
+  DBUG_PRINT("exit",("antal: %d  not_pos: %d",ret->wilds,ret->not_pos));
+  DBUG_RETURN(ret);
+} /* wf_comp */
+
+
+	/* Test if a given filename is matched */
+
+int wf_test(register WF_PACK *wf_pack, register const char *name)
+{
+  reg2 uint i;
+  reg3 uint not_pos;
+  DBUG_ENTER("wf_test");
+
+  if (! wf_pack || wf_pack->wilds == 0)
+    DBUG_RETURN(0);			/* Everything goes */
+
+  not_pos=wf_pack->not_pos;
+  for (i=0 ; i < not_pos; i++)
+    if (wild_compare(name,wf_pack->wild[i],0) == 0)
+      goto found;
+  if (i)
+    DBUG_RETURN(1);			/* No-match */
+
+found:
+/* Test that it isn't in not-list */
+
+  for (i=not_pos ; i < wf_pack->wilds; i++)
+    if (wild_compare(name,wf_pack->wild[i],0) == 0)
+      DBUG_RETURN(1);
+  DBUG_RETURN(0);
+} /* wf_test */
+
+
+	/* We need this because program don't know with malloc we used */
+
+void wf_end(WF_PACK *buffer)
+{
+  DBUG_ENTER("wf_end");
+  if (buffer)
+    my_free((uchar*) buffer,MYF(0));
+  DBUG_VOID_RETURN;
+} /* wf_end */