wcsmbs/wcscasecmp.c

   1 /* Copyright (C) 1991, 1992, 1995, 1996, 1997 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 Library General Public License as
   6    published by the Free Software Foundation; either version 2 of the
   7    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    Library General Public License for more details.
  13
  14    You should have received a copy of the GNU Library General Public
  15    License along with the GNU C Library; see the file COPYING.LIB.  If not,
  16    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17    Boston, MA 02111-1307, USA.  */
  18
  19 #ifdef HAVE_CONFIG_H
  20 # include <config.h>
  21 #endif
  22
  23 #include <wctype.h>
  24 #include <wchar.h>
  25
  26 #ifndef weak_alias
  27 # define __wcscasecmp wcscasecmp
  28 # define TOLOWER(Ch) towlower (Ch)
  29 #else
  30 # ifdef USE_IN_EXTENDED_LOCALE_MODEL
  31 #  define __wcscasecmp __wcscasecmp_l
  32 #  define TOLOWER(Ch) __towlower_l ((Ch), loc)
  33 # else
  34 #  define TOLOWER(Ch) towlower (Ch)
  35 # endif
  36 #endif
  37
  38 #ifdef USE_IN_EXTENDED_LOCALE_MODEL
  39 # define LOCALE_PARAM , loc
  40 # define LOCALE_PARAM_DECL __locale_t loc;
  41 #else
  42 # define LOCALE_PARAM
  43 # define LOCALE_PARAM_DECL
  44 #endif
  45
  46 /* Compare S1 and S2, ignoring case, returning less than, equal to or
  47    greater than zero if S1 is lexicographically less than,
  48    equal to or greater than S2.  */
  49 int
  50 __wcscasecmp (s1, s2 LOCALE_PARAM)
  51      const wchar_t *s1;
  52      const wchar_t *s2;
  53      LOCALE_PARAM_DECL
  54 {
  55   wint_t c1, c2;
  56
  57   if (s1 == s2)
  58     return 0;
  59
  60   do
  61     {
  62       c1 = TOLOWER (*s1++);
  63       c2 = TOLOWER (*s2++);
  64       if (c1 == L'\0')
  65         break;
  66     }
  67   while (c1 == c2);
  68
  69   return c1 - c2;
  70 }
  71 #ifndef __wcscasecmp
  72 weak_alias (__wcscasecmp, wcscasecmp)
  73 #endif