strcasestr.c revision 1.1.2.2 1 1.1.2.2 he /* $NetBSD: strcasestr.c,v 1.1.2.2 2004/07/12 20:53:40 he Exp $ */
2 1.1.2.2 he
3 1.1.2.2 he /*-
4 1.1.2.2 he * Copyright (c) 1990, 1993
5 1.1.2.2 he * The Regents of the University of California. All rights reserved.
6 1.1.2.2 he *
7 1.1.2.2 he * This code is derived from software contributed to Berkeley by
8 1.1.2.2 he * Chris Torek.
9 1.1.2.2 he *
10 1.1.2.2 he * Redistribution and use in source and binary forms, with or without
11 1.1.2.2 he * modification, are permitted provided that the following conditions
12 1.1.2.2 he * are met:
13 1.1.2.2 he * 1. Redistributions of source code must retain the above copyright
14 1.1.2.2 he * notice, this list of conditions and the following disclaimer.
15 1.1.2.2 he * 2. Redistributions in binary form must reproduce the above copyright
16 1.1.2.2 he * notice, this list of conditions and the following disclaimer in the
17 1.1.2.2 he * documentation and/or other materials provided with the distribution.
18 1.1.2.2 he * 3. Neither the name of the University nor the names of its contributors
19 1.1.2.2 he * may be used to endorse or promote products derived from this software
20 1.1.2.2 he * without specific prior written permission.
21 1.1.2.2 he *
22 1.1.2.2 he * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 1.1.2.2 he * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 1.1.2.2 he * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 1.1.2.2 he * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 1.1.2.2 he * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 1.1.2.2 he * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 1.1.2.2 he * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 1.1.2.2 he * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 1.1.2.2 he * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 1.1.2.2 he * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 1.1.2.2 he * SUCH DAMAGE.
33 1.1.2.2 he */
34 1.1.2.2 he
35 1.1.2.2 he #include <sys/cdefs.h>
36 1.1.2.2 he #if defined(LIBC_SCCS) && !defined(lint)
37 1.1.2.2 he __RCSID("$NetBSD: strcasestr.c,v 1.1.2.2 2004/07/12 20:53:40 he Exp $");
38 1.1.2.2 he #endif /* LIBC_SCCS and not lint */
39 1.1.2.2 he
40 1.1.2.2 he #include <assert.h>
41 1.1.2.2 he #include <ctype.h>
42 1.1.2.2 he #include <string.h>
43 1.1.2.2 he
44 1.1.2.2 he /*
45 1.1.2.2 he * Find the first occurrence of find in s, ignore case.
46 1.1.2.2 he */
47 1.1.2.2 he char *
48 1.1.2.2 he strcasestr(const char *s, const char *find)
49 1.1.2.2 he {
50 1.1.2.2 he char c, sc;
51 1.1.2.2 he size_t len;
52 1.1.2.2 he
53 1.1.2.2 he _DIAGASSERT(s != NULL);
54 1.1.2.2 he _DIAGASSERT(find != NULL);
55 1.1.2.2 he
56 1.1.2.2 he if ((c = *find++) != 0) {
57 1.1.2.2 he c = tolower((unsigned char)c);
58 1.1.2.2 he len = strlen(find);
59 1.1.2.2 he do {
60 1.1.2.2 he do {
61 1.1.2.2 he if ((sc = *s++) == 0)
62 1.1.2.2 he return (NULL);
63 1.1.2.2 he } while ((char)tolower((unsigned char)sc) != c);
64 1.1.2.2 he } while (strncasecmp(s, find, len) != 0);
65 1.1.2.2 he s--;
66 1.1.2.2 he }
67 1.1.2.2 he /* LINTED interface specification */
68 1.1.2.2 he return ((char *)s);
69 1.1.2.2 he }
70