blob: f894e426e43f72e797eb326f319ab234229a2ff7 [file] [log] [blame]
lh9ed821d2023-04-07 01:36:19 -07001/*
2 * Copyright (C) 2002 Manuel Novoa III
3 * Copyright (C) 2000-2005 Erik Andersen <andersen@uclibc.org>
4 *
5 * Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball.
6 */
7
8#include "_string.h"
9#include <ctype.h>
10#include <locale.h>
11
12#ifdef WANT_WIDE
13# define strcasecmp wcscasecmp
14# define strcasecmp_l wcscasecmp_l
15# ifdef __UCLIBC_DO_XLOCALE
16# define TOLOWER(C) towlower_l((C), locale_arg)
17# else
18# define TOLOWER(C) towlower((C))
19# endif
20#else
21# ifdef __UCLIBC_DO_XLOCALE
22# define TOLOWER(C) tolower_l((C), locale_arg)
23# else
24# define TOLOWER(C) tolower((C))
25# endif
26#endif
27
28#if defined(__UCLIBC_HAS_XLOCALE__) && !defined(__UCLIBC_DO_XLOCALE)
29
30int strcasecmp(register const Wchar *s1, register const Wchar *s2)
31{
32 return strcasecmp_l(s1, s2, __UCLIBC_CURLOCALE);
33}
34#ifndef WANT_WIDE
35libc_hidden_def(strcasecmp)
36#endif
37
38#else /* defined(__UCLIBC_HAS_XLOCALE__) && !defined(__UCLIBC_DO_XLOCALE) */
39
40int __XL_NPP(strcasecmp)(register const Wchar *s1, register const Wchar *s2
41 __LOCALE_PARAM )
42{
43#ifdef WANT_WIDE
44 while ((*s1 == *s2) || (TOLOWER(*s1) == TOLOWER(*s2))) {
45 if (!*s1++) {
46 return 0;
47 }
48 ++s2;
49 }
50
51 return (((Wuchar)TOLOWER(*s1)) < ((Wuchar)TOLOWER(*s2))) ? -1 : 1;
52 /* TODO -- should wide cmp funcs do wchar or Wuchar compares? */
53#else
54 int r = 0;
55
56 while ( ((s1 == s2) ||
57 !(r = ((int)( TOLOWER(*((Wuchar *)s1))))
58 - TOLOWER(*((Wuchar *)s2))))
59 && (++s2, *s1++));
60
61 return r;
62#endif
63}
64#if !defined WANT_WIDE || (defined WANT_WIDE && defined __UCLIBC_DO_XLOCALE)
65libc_hidden_def(__XL_NPP(strcasecmp))
66#endif
67
68#endif /* defined(__UCLIBC_HAS_XLOCALE__) && !defined(__UCLIBC_DO_XLOCALE) */