blob: a8e6e8119bf11decb711f0950444356d3320edcb (
plain)
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
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
|
/*
* This file and its contents are supplied under the terms of the
* Common Development and Distribution License ("CDDL"), version 1.0.
* You may only use this file in accordance with the terms of version
* 1.0 of the CDDL.
*
* A full copy of the text of the CDDL should have accompanied this
* source. A copy of the CDDL is also available via the Internet at
* http://www.illumos.org/license/CDDL.
*/
/*
* Copyright 2020 Robert Mustacchi
*/
/*
* C11 mbrtoc16(3C) support.
*
* The char16_t represents a UTF-16 encoding. This means that we have to deal
* with surrogate pairs.
*/
#include <locale.h>
#include <wchar.h>
#include <xlocale.h>
#include <uchar.h>
#include "mblocal.h"
#include "unicode.h"
#include <sys/debug.h>
/*
* Ensure that we never cause our save state to ever exceed that of the
* mbstate_t. See the block comment in mblocal.h.
*/
CTASSERT(sizeof (_CHAR16State) <= sizeof (mbstate_t));
static mbstate_t mbrtoc16_state;
size_t
mbrtoc16(char16_t *restrict pc16, const char *restrict str, size_t len,
mbstate_t *restrict ps)
{
wchar_t wc;
size_t ret;
char16_t out;
_CHAR16State *c16s;
if (ps == NULL) {
ps = &mbrtoc16_state;
}
if (str == NULL) {
pc16 = NULL;
str = "";
len = 1;
}
c16s = (_CHAR16State *)ps;
if (c16s->c16_surrogate != 0) {
if (pc16 != NULL) {
*pc16 = c16s->c16_surrogate;
}
c16s->c16_surrogate = 0;
return ((size_t)-3);
}
ret = mbrtowc_l(&wc, str, len, ps, uselocale(NULL));
if ((ssize_t)ret < 0) {
return (ret);
}
/*
* If this character is not in the basic multilingual plane then we need
* a surrogate character to represent it in UTF-16 and we will need to
* write that out on the next iteration.
*/
if (wc >= UNICODE_SUP_START) {
wc -= UNICODE_SUP_START;
c16s->c16_surrogate = UNICODE_SUR_LOWER | UNICODE_SUR_LMASK(wc);
out = UNICODE_SUR_UPPER | UNICODE_SUR_UMASK(wc);
} else {
out = (char16_t)wc;
}
if (pc16 != NULL) {
*pc16 = out;
}
return (ret);
}
|
