wcsmbs/wcscasecmp.c

   1 /* Copyright (C) 1991-2013 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    <http://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 , loc
  39 # define LOCALE_PARAM_DECL __locale_t loc;
  40 #else
  41 # define LOCALE_PARAM
  42 # define LOCALE_PARAM_DECL
  43 #endif
  44
  45 /* Compare S1 and S2, ignoring case, returning less than, equal to or
  46    greater than zero if S1 is lexicographically less than,
  47    equal to or greater than S2.  */
  48 int
  49 __wcscasecmp (s1, s2 LOCALE_PARAM)
  50      const wchar_t *s1;
  51      const wchar_t *s2;
  52      LOCALE_PARAM_DECL
  53 {
  54   wint_t c1, c2;
  55
  56   if (s1 == s2)
  57     return 0;
  58
  59   do
  60     {
  61       c1 = TOLOWER (*s1++);
  62       c2 = TOLOWER (*s2++);
  63       if (c1 == L'\0')
  64         break;
  65     }
  66   while (c1 == c2);
  67
  68   return c1 - c2;
  69 }
  70 #ifndef __wcscasecmp
  71 weak_alias (__wcscasecmp, wcscasecmp)
  72 #endif