1*3fc10f8cSRobert Mustacchi /* 2*3fc10f8cSRobert Mustacchi * This file and its contents are supplied under the terms of the 3*3fc10f8cSRobert Mustacchi * Common Development and Distribution License ("CDDL"), version 1.0. 4*3fc10f8cSRobert Mustacchi * You may only use this file in accordance with the terms of version 5*3fc10f8cSRobert Mustacchi * 1.0 of the CDDL. 6*3fc10f8cSRobert Mustacchi * 7*3fc10f8cSRobert Mustacchi * A full copy of the text of the CDDL should have accompanied this 8*3fc10f8cSRobert Mustacchi * source. A copy of the CDDL is also available via the Internet at 9*3fc10f8cSRobert Mustacchi * http://www.illumos.org/license/CDDL. 10*3fc10f8cSRobert Mustacchi */ 11*3fc10f8cSRobert Mustacchi 12*3fc10f8cSRobert Mustacchi /* 13*3fc10f8cSRobert Mustacchi * Copyright 2020 Robert Mustacchi 14*3fc10f8cSRobert Mustacchi */ 15*3fc10f8cSRobert Mustacchi 16*3fc10f8cSRobert Mustacchi /* 17*3fc10f8cSRobert Mustacchi * C11 c32rtomb(3C) support. 18*3fc10f8cSRobert Mustacchi * 19*3fc10f8cSRobert Mustacchi * The char32_t type is designed to represent a UTF-32 value, which is what we 20*3fc10f8cSRobert Mustacchi * can represent with a wchar_t. This is basically a wrapper around wcrtomb(). 21*3fc10f8cSRobert Mustacchi */ 22*3fc10f8cSRobert Mustacchi 23*3fc10f8cSRobert Mustacchi #include <locale.h> 24*3fc10f8cSRobert Mustacchi #include <wchar.h> 25*3fc10f8cSRobert Mustacchi #include <xlocale.h> 26*3fc10f8cSRobert Mustacchi #include <uchar.h> 27*3fc10f8cSRobert Mustacchi #include <errno.h> 28*3fc10f8cSRobert Mustacchi #include "unicode.h" 29*3fc10f8cSRobert Mustacchi 30*3fc10f8cSRobert Mustacchi static mbstate_t c32rtomb_state; 31*3fc10f8cSRobert Mustacchi 32*3fc10f8cSRobert Mustacchi size_t c32rtomb(char * restrict str,char32_t c32,mbstate_t * restrict ps)33*3fc10f8cSRobert Mustacchic32rtomb(char *restrict str, char32_t c32, mbstate_t *restrict ps) 34*3fc10f8cSRobert Mustacchi { 35*3fc10f8cSRobert Mustacchi if ((c32 >= UNICODE_SUR_MIN && c32 <= UNICODE_SUR_MAX) || 36*3fc10f8cSRobert Mustacchi c32 > UNICODE_SUP_MAX) { 37*3fc10f8cSRobert Mustacchi errno = EILSEQ; 38*3fc10f8cSRobert Mustacchi return ((size_t)-1); 39*3fc10f8cSRobert Mustacchi } 40*3fc10f8cSRobert Mustacchi 41*3fc10f8cSRobert Mustacchi if (ps == NULL) { 42*3fc10f8cSRobert Mustacchi ps = &c32rtomb_state; 43*3fc10f8cSRobert Mustacchi } 44*3fc10f8cSRobert Mustacchi 45*3fc10f8cSRobert Mustacchi if (str == NULL) { 46*3fc10f8cSRobert Mustacchi c32 = L'\0'; 47*3fc10f8cSRobert Mustacchi } 48*3fc10f8cSRobert Mustacchi 49*3fc10f8cSRobert Mustacchi return (wcrtomb_l(str, (wchar_t)c32, ps, uselocale((locale_t)0))); 50*3fc10f8cSRobert Mustacchi } 51