1 /* Copyright (C) 1991-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 #ifdef HAVE_CONFIG_H
19 # include <config.h>
20 #endif
21 
22 #include <wctype.h>
23 #include <wchar.h>
24 
25 #ifndef weak_alias
26 # define __wcscasecmp wcscasecmp
27 # define TOLOWER(Ch) towlower (Ch)
28 #else
29 # ifdef USE_IN_EXTENDED_LOCALE_MODEL
30 #  define __wcscasecmp __wcscasecmp_l
31 #  define TOLOWER(Ch) __towlower_l ((Ch), loc)
32 # else
33 #  define TOLOWER(Ch) towlower (Ch)
34 # endif
35 #endif
36 
37 #ifdef USE_IN_EXTENDED_LOCALE_MODEL
38 # define LOCALE_PARAM , locale_t loc
39 #else
40 # define LOCALE_PARAM
41 #endif
42 
43 /* Compare S1 and S2, ignoring case, returning less than, equal to or
44    greater than zero if S1 is lexicographically less than,
45    equal to or greater than S2.  */
46 int
__wcscasecmp(const wchar_t * s1,const wchar_t * s2 LOCALE_PARAM)47 __wcscasecmp (const wchar_t *s1, const wchar_t *s2 LOCALE_PARAM)
48 {
49   wint_t c1, c2;
50 
51   if (s1 == s2)
52     return 0;
53 
54   do
55     {
56       c1 = TOLOWER (*s1++);
57       c2 = TOLOWER (*s2++);
58       if (c1 == L'\0')
59 	break;
60     }
61   while (c1 == c2);
62 
63   return c1 - c2;
64 }
65 #ifndef __wcscasecmp
66 weak_alias (__wcscasecmp, wcscasecmp)
67 #endif
68