1*eda3ef2dSRobert Mustacchi /*
2*eda3ef2dSRobert Mustacchi * This file and its contents are supplied under the terms of the
3*eda3ef2dSRobert Mustacchi * Common Development and Distribution License ("CDDL"), version 1.0.
4*eda3ef2dSRobert Mustacchi * You may only use this file in accordance with the terms of version
5*eda3ef2dSRobert Mustacchi * 1.0 of the CDDL.
6*eda3ef2dSRobert Mustacchi *
7*eda3ef2dSRobert Mustacchi * A full copy of the text of the CDDL should have accompanied this
8*eda3ef2dSRobert Mustacchi * source. A copy of the CDDL is also available via the Internet at
9*eda3ef2dSRobert Mustacchi * http://www.illumos.org/license/CDDL.
10*eda3ef2dSRobert Mustacchi */
11*eda3ef2dSRobert Mustacchi
12*eda3ef2dSRobert Mustacchi /*
13*eda3ef2dSRobert Mustacchi * Copyright 2020 Robert Mustacchi
14*eda3ef2dSRobert Mustacchi */
15*eda3ef2dSRobert Mustacchi
16*eda3ef2dSRobert Mustacchi /*
17*eda3ef2dSRobert Mustacchi * C11 mbrtoc32(3C) support.
18*eda3ef2dSRobert Mustacchi *
19*eda3ef2dSRobert Mustacchi * The char32_t type is designed to represent UTF-32. Conveniently, the wchar_t
20*eda3ef2dSRobert Mustacchi * is as well. In this case, we can just pass this directly to mbrtowc_l().
21*eda3ef2dSRobert Mustacchi */
22*eda3ef2dSRobert Mustacchi
23*eda3ef2dSRobert Mustacchi #include <locale.h>
24*eda3ef2dSRobert Mustacchi #include <wchar.h>
25*eda3ef2dSRobert Mustacchi #include <xlocale.h>
26*eda3ef2dSRobert Mustacchi #include <uchar.h>
27*eda3ef2dSRobert Mustacchi
28*eda3ef2dSRobert Mustacchi static mbstate_t mbrtoc32_state;
29*eda3ef2dSRobert Mustacchi
30*eda3ef2dSRobert Mustacchi size_t
mbrtoc32(char32_t * restrict pc32,const char * restrict str,size_t len,mbstate_t * restrict ps)31*eda3ef2dSRobert Mustacchi mbrtoc32(char32_t *restrict pc32, const char *restrict str, size_t len,
32*eda3ef2dSRobert Mustacchi mbstate_t *restrict ps)
33*eda3ef2dSRobert Mustacchi {
34*eda3ef2dSRobert Mustacchi if (ps == NULL) {
35*eda3ef2dSRobert Mustacchi ps = &mbrtoc32_state;
36*eda3ef2dSRobert Mustacchi }
37*eda3ef2dSRobert Mustacchi
38*eda3ef2dSRobert Mustacchi if (str == NULL) {
39*eda3ef2dSRobert Mustacchi pc32 = NULL;
40*eda3ef2dSRobert Mustacchi str = "";
41*eda3ef2dSRobert Mustacchi len = 1;
42*eda3ef2dSRobert Mustacchi }
43*eda3ef2dSRobert Mustacchi
44*eda3ef2dSRobert Mustacchi return (mbrtowc_l((wchar_t *)pc32, str, len, ps,
45*eda3ef2dSRobert Mustacchi uselocale((locale_t)0)));
46*eda3ef2dSRobert Mustacchi }
47