44 lines
974 B
Text
44 lines
974 B
Text
--- Library/Implementation/HTString.c.orig Sun Mar 31 20:00:59 2002
|
|
+++ Library/Implementation/HTString.c Sun Mar 31 20:01:11 2002
|
|
@@ -58,41 +58,6 @@
|
|
#endif
|
|
|
|
|
|
-/*
|
|
- * strcasestr(s1,s2) -- like strstr(s1,s2) but case-insensitive.
|
|
- */
|
|
-PUBLIC char * strcasestr ARGS2(char *, s1,
|
|
- char *, s2)
|
|
-{
|
|
- char * try = s1;
|
|
-
|
|
- if (!s1 || !s2 || !*s2) return s1;
|
|
-
|
|
- while (*try) {
|
|
- if (TOUPPER(*try) == TOUPPER(*s2)) {
|
|
- char * cur1 = try + 1;
|
|
- char * cur2 = s2 + 1;
|
|
- while (*cur1 && *cur2 && TOUPPER(*cur1) == TOUPPER(*cur2)) {
|
|
- cur1++;
|
|
- cur2++;
|
|
- }
|
|
- if (!*cur2) {
|
|
- CTRACE(stderr,
|
|
- "Debug....... strcasestr(s1 = \"%s\", s2 = \"%s\") => \"%s\"\n",
|
|
- s1,s2,try);
|
|
- return try;
|
|
- }
|
|
- }
|
|
- try++;
|
|
- }
|
|
- CTRACE(stderr,
|
|
- "Debug....... strcasestr(s1 = \"%s\", s2 = \"%s\") => No match\n",
|
|
- s1,s2);
|
|
- return NULL;
|
|
-}
|
|
-
|
|
-
|
|
-
|
|
/* Allocate a new copy of a string, and returns it
|
|
*/
|
|
PUBLIC char * HTSACopy
|