1 files changed, 48 insertions, 0 deletions
diff --git a/externals/mysql/strings/strinstr.c b/externals/mysql/strings/strinstr.c
new file mode 100644
index 00000000000..dce498d61e8
--- /dev/null
+++ b/externals/mysql/strings/strinstr.c
@@ -0,0 +1,48 @@
+/* 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 */
+
+/*  File   : strinstr.c
+    Author : Monty & David
+    Updated: 1986.12.08
+    Defines: strinstr()
+
+    strinstr(src, pat) looks for an instance of pat in src.  pat is not a
+    regex(3) pattern, it is a literal string which must be matched exactly.
+    The result 0 if the pattern was not found else it is the start char of
+    the pattern counted from the beginning of the string, where the first
+    char is 1.
+*/
+
+#include <my_global.h>
+#include "m_string.h"
+
+size_t strinstr(reg1 const char *str,reg4 const char *search)
+{
+  reg2 const char *i, *j;
+  const char *start= str;
+
+ skip:
+  while (*str != '\0')
+  {
+    if (*str++ == *search)
+    {
+      i= str; j= search+1;
+      while (*j)
+	if (*i++ != *j++) goto skip;
+      return ((size_t) (str - start));
+    }
+  }
+  return (0);
+}