1 #include "locale_impl.h"
2 #include "stdio_impl.h"
3 #include <ctype.h>
4 #include <limits.h>
5 #include <wchar.h>
6 
__fputwc_unlocked(wchar_t c,FILE * f)7 wint_t __fputwc_unlocked(wchar_t c, FILE* f) {
8     char mbc[MB_LEN_MAX];
9     int l;
10     locale_t *ploc = &CURRENT_LOCALE, loc = *ploc;
11 
12     if (f->mode <= 0)
13         fwide(f, 1);
14     *ploc = f->locale;
15 
16     if (isascii(c)) {
17         c = putc_unlocked(c, f);
18     } else if (f->wpos + MB_LEN_MAX < f->wend) {
19         l = wctomb((void*)f->wpos, c);
20         if (l < 0)
21             c = WEOF;
22         else
23             f->wpos += l;
24     } else {
25         l = wctomb(mbc, c);
26         if (l < 0 || __fwritex((void*)mbc, l, f) < l)
27             c = WEOF;
28     }
29     if (c == WEOF)
30         f->flags |= F_ERR;
31     *ploc = loc;
32     return c;
33 }
34 
fputwc(wchar_t c,FILE * f)35 wint_t fputwc(wchar_t c, FILE* f) {
36     FLOCK(f);
37     c = __fputwc_unlocked(c, f);
38     FUNLOCK(f);
39     return c;
40 }
41 
42 weak_alias(__fputwc_unlocked, fputwc_unlocked);
43 weak_alias(__fputwc_unlocked, putwc_unlocked);
44