2014-12-19 Paolo Carlini <paolo.carlini@oracle.com>
[official-gcc.git] / libiberty / strstr.c
blob60902ea40ee80b513a525f9403728398ea876d7e
1 /* Simple implementation of strstr for systems without it.
2 This function is in the public domain. */
4 /*
6 @deftypefn Supplemental char* strstr (const char *@var{string}, const char *@var{sub})
8 This function searches for the substring @var{sub} in the string
9 @var{string}, not including the terminating null characters. A pointer
10 to the first occurrence of @var{sub} is returned, or @code{NULL} if the
11 substring is absent. If @var{sub} points to a string with zero
12 length, the function returns @var{string}.
14 @end deftypefn
20 /* FIXME: The above description is ANSI compiliant. This routine has not
21 been validated to comply with it. -fnf */
23 #include <stddef.h>
25 extern char *strchr (const char *, int);
26 extern int strncmp (const void *, const void *, size_t);
27 extern size_t strlen (const char *);
29 char *
30 strstr (const char *s1, const char *s2)
32 const char *p = s1;
33 const size_t len = strlen (s2);
35 for (; (p = strchr (p, *s2)) != 0; p++)
37 if (strncmp (p, s2, len) == 0)
38 return (char *)p;
40 return (0);