l4/pkg/uclibc/lib/contrib/uclibc/libc/string/strcasecmp.c

   1 /*
   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
  30 int strcasecmp(register const Wchar *s1, register const Wchar *s2)
  31 {
  32         return strcasecmp_l(s1, s2, __UCLIBC_CURLOCALE);
  33 }
  34 #ifndef WANT_WIDE
  35 libc_hidden_def(strcasecmp)
  36 #endif
  37
  38 #else  /* defined(__UCLIBC_HAS_XLOCALE__) && !defined(__UCLIBC_DO_XLOCALE) */
  39
  40 int __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)
  65 libc_hidden_def(__XL_NPP(strcasecmp))
  66 #endif
  67
  68 #endif /* defined(__UCLIBC_HAS_XLOCALE__) && !defined(__UCLIBC_DO_XLOCALE) */