From 0cda28f77bcea25a35b2d55ee1bb52c5fdb34f2a Mon Sep 17 00:00:00 2001 From: Andi Gutmans Date: Sat, 19 Feb 2000 10:10:46 +0000 Subject: - Add libmysql to the tree --- ext/mysql/libmysql/strinstr.c | 36 ++++++++++++++++++++++++++++++++++++ 1 file changed, 36 insertions(+) create mode 100644 ext/mysql/libmysql/strinstr.c (limited to 'ext/mysql/libmysql/strinstr.c') diff --git a/ext/mysql/libmysql/strinstr.c b/ext/mysql/libmysql/strinstr.c new file mode 100644 index 0000000000..459cfbc3e6 --- /dev/null +++ b/ext/mysql/libmysql/strinstr.c @@ -0,0 +1,36 @@ +/* Copyright Abandoned 1996 TCX DataKonsult AB & Monty Program KB & Detron HB + This file is public domain and comes with NO WARRANTY of any kind */ + +/* 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 +#include "m_string.h" + +uint strinstr(reg1 const char *str,reg4 const char *search) +{ + reg2 my_string i,j; + my_string start = (my_string) str; + + skipp: + while (*str != '\0') + { + if (*str++ == *search) + { + i=(my_string) str; j= (my_string) search+1; + while (*j) + if (*i++ != *j++) goto skipp; + return ((uint) (str - start)); + } + } + return (0); +} -- cgit v1.2.1