static char rcsid[] = "$Id: strinstr.c,v 1.1 1992/09/06 19:31:32 mike Exp $";

/* $Log: strinstr.c,v $
 * Revision 1.1  1992/09/06  19:31:32  mike
 * Initial revision
 *
 */

/* strinstr.c : string in string
 * str_in_str(str,pattern)
 *   If pattern is in str, return pointer to where in str that pattern starts
 *   else return NULL.
 * C Durland	Public Domain
 * Same as standard C library function strstr().
 */

#include <const.h>

char *str_in_str(str, pattern) char *pattern, *str;
{
  register char *ptr, *qtr;
  int matched;

  if (pattern[0] == '\0') return str;		/* per the man page */
  for (; *str; str++)
  {
    if (*str == *pattern)
    {
      ptr = pattern; qtr = str; matched = TRUE;
      while (*ptr) if (*ptr++ != *qtr++) { matched = FALSE; break; }
      if (matched) return str;
    }
  }
  return NULL;
}