1 /* Copyright (C) 1996-2022 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3 
4    The GNU C Library is free software; you can redistribute it and/or
5    modify it under the terms of the GNU Lesser General Public
6    License as published by the Free Software Foundation; either
7    version 2.1 of the License, or (at your option) any later version.
8 
9    The GNU C Library is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12    Lesser General Public License for more details.
13 
14    You should have received a copy of the GNU Lesser General Public
15    License along with the GNU C Library; if not, see
16    <https://www.gnu.org/licenses/>.  */
17 
18 #include <locale.h>
19 #include <string.h>
20 #include <wctype.h>
21 #include "../locale/localeinfo.h"
22 
23 wctrans_t
__wctrans_l(const char * property,locale_t locale)24 __wctrans_l (const char *property, locale_t locale)
25 {
26   const char *names;
27   size_t cnt;
28   size_t i;
29 
30   names = locale->__locales[LC_CTYPE]->values[_NL_ITEM_INDEX (_NL_CTYPE_MAP_NAMES)].string;
31   cnt = 0;
32   while (names[0] != '\0')
33     {
34       if (strcmp (property, names) == 0)
35 	break;
36 
37       names = strchr (names, '\0') + 1;
38       ++cnt;
39     }
40 
41   if (names[0] == '\0')
42     return 0;
43 
44   i = locale->__locales[LC_CTYPE]->values[_NL_ITEM_INDEX (_NL_CTYPE_MAP_OFFSET)].word + cnt;
45   return (wctrans_t) locale->__locales[LC_CTYPE]->values[i].string;
46 }
47 weak_alias (__wctrans_l, wctrans_l)
48