summaryrefslogtreecommitdiff
path: root/strings/r_strinstr.c
diff options
context:
space:
mode:
Diffstat (limited to 'strings/r_strinstr.c')
-rw-r--r--strings/r_strinstr.c52
1 files changed, 52 insertions, 0 deletions
diff --git a/strings/r_strinstr.c b/strings/r_strinstr.c
new file mode 100644
index 00000000000..882a4eda412
--- /dev/null
+++ b/strings/r_strinstr.c
@@ -0,0 +1,52 @@
+/* Copyright (C) 2000 MySQL AB & MySQL Finland AB & TCX DataKonsult AB
+
+ This library is free software; you can redistribute it and/or
+ modify it under the terms of the GNU Library General Public
+ License as published by the Free Software Foundation; either
+ version 2 of the License, or (at your option) any later version.
+
+ This library 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
+ Library General Public License for more details.
+
+ You should have received a copy of the GNU Library General Public
+ License along with this library; if not, write to the Free
+ Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
+ MA 02111-1307, USA */
+
+/*
+ Author : David
+ strintstr(src, from, pat) looks for an instance of pat in src
+ backwards from pos from. 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 begining of the string.
+*/
+
+#include <global.h>
+#include "m_string.h"
+
+uint r_strinstr(reg1 my_string str,int from, reg4 my_string search)
+{
+ reg2 my_string i, j;
+ uint len = (uint) strlen(search);
+ /* pointer to the last char of buff */
+ my_string start = str + from - 1;
+ /* pointer to the last char of search */
+ my_string search_end = search + len - 1;
+
+ skipp:
+ while (start >= str) /* Cant be != because the first char */
+ {
+ if (*start-- == *search_end)
+ {
+ i = start; j = search_end - 1;
+ while (j >= search && start > str)
+ if (*i-- != *j--)
+ goto skipp;
+ return (uint) ((start - len) - str + 3);
+ }
+ }
+ return (0);
+}