furnace/extern/macports-legacy-support/src/wcscasecmp_family.c

66 lines
1.9 KiB
C
Raw Normal View History

/*
* Copyright (c) 2018 Christian Cornelssen
*
* Permission to use, copy, modify, and distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
// MP support header
#include "MacportsLegacySupport.h"
#if __MP_LEGACY_SUPPORT_WCSCASECMP__
#include <wchar.h>
#include <wctype.h>
#include <xlocale.h>
#include <limits.h>
#include <stdint.h>
#if WCHAR_MAX > INT_MAX
/* Caution: multiple argument evaluations */
#define _MP_WCDIFFSIGN(a, b) (((b) < (a)) - ((a) < (b)))
#else
#define _MP_WCDIFFSIGN(a, b) ((int)(a) - (int)(b))
#endif
int wcsncasecmp_l(const wchar_t *l, const wchar_t *r, size_t n, locale_t locale)
{
wint_t lc, rc;
int d = 0;
while (!d && n) {
lc = *l++; rc = *r++; --n;
if (!(lc && rc)) n = 0;
if (lc == rc) continue;
lc = towlower_l(lc, locale);
rc = towlower_l(rc, locale);
d = _MP_WCDIFFSIGN(lc, rc);
}
return d;
}
int wcsncasecmp(const wchar_t *l, const wchar_t *r, size_t n)
{
return wcsncasecmp_l(l, r, n, 0);
}
int wcscasecmp_l(const wchar_t *l, const wchar_t *r, locale_t locale)
{
return wcsncasecmp_l(l, r, -1, locale);
}
int wcscasecmp(const wchar_t *l, const wchar_t *r)
{
return wcsncasecmp_l(l, r, -1, 0);
}
#endif /* __MP_LEGACY_SUPPORT_WCSCASECMP__ */