contrib/libs/libc_compat/ubuntu_14/c16rtomb.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

#include <uchar.h> 
#include <errno.h> 
#include <wchar.h> 
 
size_t c16rtomb(char *restrict s, char16_t c16, mbstate_t *restrict ps) 
{ 
	static unsigned internal_state; 
	if (!ps) ps = (void *)&internal_state; 
	unsigned *x = (unsigned *)ps; 
	wchar_t wc; 
 
	if (!s) { 
		if (*x) goto ilseq; 
		return 1; 
	} 
 
	if (!*x && c16 - 0xd800u < 0x400) { 
		*x = c16 - 0xd7c0 << 10; 
		return 0; 
	} 
 
	if (*x) { 
		if (c16 - 0xdc00u >= 0x400) goto ilseq; 
		else wc = *x + c16 - 0xdc00; 
		*x = 0; 
	} else { 
		wc = c16; 
	} 
	return wcrtomb(s, wc, 0); 
 
ilseq: 
	*x = 0; 
	errno = EILSEQ; 
	return -1; 
}