1 /*
2 * Copyright (C) 2014 The Android Open Source Project
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * * Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * * Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in
12 * the documentation and/or other materials provided with the
13 * distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
16 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
17 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
18 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
19 * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
21 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
22 * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
23 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
24 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
25 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include <errno.h>
30 #include <uchar.h>
31 #include <wchar.h>
32
33 #include "private/bionic_mbstate.h"
34
is_high_surrogate(char16_t c16)35 static inline constexpr bool is_high_surrogate(char16_t c16) {
36 return c16 >= 0xd800 && c16 < 0xdc00;
37 }
38
is_low_surrogate(char16_t c16)39 static inline constexpr bool is_low_surrogate(char16_t c16) {
40 return c16 >= 0xdc00 && c16 < 0xe000;
41 }
42
c16rtomb(char * s,char16_t c16,mbstate_t * ps)43 size_t c16rtomb(char* s, char16_t c16, mbstate_t* ps) {
44 static mbstate_t __private_state;
45 mbstate_t* state = (ps == nullptr) ? &__private_state : ps;
46 if (mbsinit(state)) {
47 if (is_high_surrogate(c16)) {
48 char32_t c32 = (c16 & ~0xd800) << 10;
49 mbstate_set_byte(state, 3, (c32 & 0xff0000) >> 16);
50 mbstate_set_byte(state, 2, (c32 & 0x00ff00) >> 8);
51 return 0;
52 } else if (is_low_surrogate(c16)) {
53 return mbstate_reset_and_return_illegal(EINVAL, state);
54 } else {
55 return c32rtomb(s, static_cast<char32_t>(c16), state);
56 }
57 } else {
58 if (!is_low_surrogate(c16)) {
59 return mbstate_reset_and_return_illegal(EINVAL, state);
60 }
61
62 char32_t c32 = ((mbstate_get_byte(state, 3) << 16) |
63 (mbstate_get_byte(state, 2) << 8) |
64 (c16 & ~0xdc00)) + 0x10000;
65 return mbstate_reset_and_return(c32rtomb(s, c32, nullptr), state);
66 }
67 }
68