| #include <uchar.h> |
| #include <wchar.h> |
| |
| size_t mbrtoc16(char16_t* restrict pc16, |
| const char* restrict s, |
| size_t n, |
| mbstate_t* restrict ps) { |
| static unsigned internal_state; |
| if (!ps) |
| ps = (void*)&internal_state; |
| unsigned* pending = (unsigned*)ps; |
| |
| if (!s) |
| return mbrtoc16(0, "", 1, ps); |
| |
| /* mbrtowc states for partial UTF-8 characters have the high bit set; |
| * we use nonzero states without high bit for pending surrogates. */ |
| if ((int)*pending > 0) { |
| if (pc16) |
| *pc16 = *pending; |
| *pending = 0; |
| return -3; |
| } |
| |
| wchar_t wc; |
| size_t ret = mbrtowc(&wc, s, n, ps); |
| if (ret <= 4) { |
| if (wc >= 0x10000) { |
| *pending = (wc & 0x3ff) + 0xdc00; |
| wc = 0xd7c0 + (wc >> 10); |
| } |
| if (pc16) |
| *pc16 = wc; |
| } |
| return ret; |
| } |
