1 #include <_ansi.h>
2 #include <ctype.h>
3 #if defined (_MB_EXTENDED_CHARSETS_ISO) || defined (_MB_EXTENDED_CHARSETS_WINDOWS)
4 #include <limits.h>
5 #include <stdio.h>
6 #include <stdlib.h>
7 #include <wctype.h>
8 #include <wchar.h>
9 #include "../locale/setlocale.h"
10 #endif
11
12 int
tolower_l(int c,struct __locale_t * locale)13 tolower_l (int c, struct __locale_t *locale)
14 {
15 #if defined (_MB_EXTENDED_CHARSETS_ISO) || defined (_MB_EXTENDED_CHARSETS_WINDOWS)
16 if ((unsigned char) c <= 0x7f)
17 return isupper_l (c, locale) ? c - 'A' + 'a' : c;
18 else if (c != EOF && __locale_mb_cur_max_l (locale) == 1
19 && isupper_l (c, locale))
20 {
21 char s[MB_LEN_MAX] = { c, '\0' };
22 wchar_t wc;
23 mbstate_t state;
24
25 memset (&state, 0, sizeof state);
26 if (locale->mbtowc (_REENT, &wc, s, 1, &state) >= 0
27 && locale->wctomb (_REENT, s,
28 (wchar_t) towlower_l ((wint_t) wc, locale),
29 &state) == 1)
30 c = (unsigned char) s[0];
31 }
32 return c;
33 #else
34 return isupper_l (c, locale) ? (c) - 'A' + 'a' : c;
35 #endif
36 }
37