Move to here from u16-mbtouc-safe.c.
[gnulib.git] / lib / unistr / u-strpbrk.h
1 /* Search for some characters in UTF-8/UTF-16/UTF-32 string.
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 *str, const UNIT *accept)
22 {
23   /* Optimize two cases.  */
24   if (accept[0] == 0)
25     return NULL;
26   {
27     ucs4_t uc;
28     int count = U_STRMBTOUC (&uc, accept);
29     if (count >= 0 && accept[count] == 0)
30       return U_STRCHR (str, uc);
31   }
32   /* General case.  */
33   {
34     const UNIT *ptr = str;
35
36     for (;;)
37       {
38         ucs4_t uc;
39         int count = U_STRMBTOUC (&uc, ptr);
40         if (count <= 0)
41           break;
42         if (U_STRCHR (accept, uc))
43           return (UNIT *) ptr;
44         ptr += count;
45       }
46     return NULL;
47   }
48 }