lib/unistr/u-strstr.h

   1 /* Substring test for UTF-8/UTF-16/UTF-32 strings.
   2    Copyright (C) 1999, 2002, 2006 Free Software Foundation, Inc.
   3    Written by Bruno Haible <bruno@clisp.org>, 2002.
   4
   5    This program is free software; you can redistribute it and/or modify it
   6    under the terms of the GNU Library General Public License as published
   7    by the Free Software Foundation; either version 2, or (at your option)
   8    any later version.
   9
  10    This program is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13    Library General Public License for more details.
  14
  15    You should have received a copy of the GNU Library General Public
  16    License along with this program; if not, write to the Free Software
  17    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
  18    USA.  */
  19
  20 UNIT *
  21 FUNC (const UNIT *haystack, const UNIT *needle)
  22 {
  23   UNIT first = needle[0];
  24
  25   /* Is needle empty?  */
  26   if (first == 0)
  27     return (UNIT *) haystack;
  28
  29   /* Is needle nearly empty?  */
  30   if (needle[1] == 0)
  31     return U_STRCHR (haystack, first);
  32
  33   /* Search for needle's first unit.  */
  34   for (; *haystack != 0; haystack++)
  35     if (*haystack == first)
  36       {
  37         /* Compare with needle's remaining units.  */
  38         const UNIT *hptr = haystack + 1;
  39         const UNIT *nptr = needle + 1;
  40         for (;;)
  41           {
  42             if (*hptr != *nptr)
  43               break;
  44             hptr++; nptr++;
  45             if (*nptr == 0)
  46               return (UNIT *) haystack;
  47           }
  48       }
  49
  50   return NULL;
  51 }