1 /* Search for some characters in UTF-8/UTF-16/UTF-32 string.
2 Copyright (C) 1999, 2002, 2006, 2009-2021 Free Software Foundation, Inc.
3 Written by Bruno Haible <bruno@clisp.org>, 2002.
4
5 This file is free software.
6 It is dual-licensed under "the GNU LGPLv3+ or the GNU GPLv2+".
7 You can redistribute it and/or modify it under either
8 - the terms of the GNU Lesser General Public License as published
9 by the Free Software Foundation; either version 3, or (at your
10 option) any later version, or
11 - the terms of the GNU General Public License as published by the
12 Free Software Foundation; either version 2, or (at your option)
13 any later version, or
14 - the same dual license "the GNU LGPLv3+ or the GNU GPLv2+".
15
16 This file is distributed in the hope that it will be useful,
17 but WITHOUT ANY WARRANTY; without even the implied warranty of
18 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 Lesser General Public License and the GNU General Public License
20 for more details.
21
22 You should have received a copy of the GNU Lesser General Public
23 License and of the GNU General Public License along with this
24 program. If not, see <https://www.gnu.org/licenses/>. */
25
26 UNIT *
27 FUNC (const UNIT *str, const UNIT *accept)
/* ![[previous]](../icons/n_left.png)
![[next]](../icons/n_right.png)
![[first]](../icons/n_first.png)
![[last]](../icons/n_last.png)
![[top]](../icons/top.png)
![[bottom]](../icons/bottom.png)
![[index]](../icons/index.png)
*/
28 {
29 /* Optimize two cases. */
30 if (accept[0] == 0)
31 return NULL;
32 {
33 ucs4_t uc;
34 int count = U_STRMBTOUC (&uc, accept);
35 if (count >= 0 && accept[count] == 0)
36 return U_STRCHR (str, uc);
37 }
38 /* General case. */
39 {
40 const UNIT *ptr = str;
41
42 for (;;)
43 {
44 ucs4_t uc;
45 int count = U_STRMBTOUC (&uc, ptr);
46 if (count <= 0)
47 break;
48 if (U_STRCHR (accept, uc))
49 return (UNIT *) ptr;
50 ptr += count;
51 }
52 return NULL;
53 }
54 }