/src/libunistring/lib/unistr/u16-mbtoucr.c
Line | Count | Source |
1 | | /* Look at first character in UTF-16 string, returning an error code. |
2 | | Copyright (C) 1999-2002, 2006-2007, 2009-2025 Free Software Foundation, Inc. |
3 | | Written by Bruno Haible <bruno@clisp.org>, 2001. |
4 | | |
5 | | This file is free software: you can redistribute it and/or modify |
6 | | it under the terms of the GNU Lesser General Public License as |
7 | | published by the Free Software Foundation; either version 2.1 of the |
8 | | License, or (at your option) any later version. |
9 | | |
10 | | This file is distributed in the hope that it will be useful, |
11 | | but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
13 | | GNU Lesser General Public License for more details. |
14 | | |
15 | | You should have received a copy of the GNU Lesser General Public License |
16 | | along with this program. If not, see <https://www.gnu.org/licenses/>. */ |
17 | | |
18 | | #include <config.h> |
19 | | |
20 | | /* Specification. */ |
21 | | #include "unistr.h" |
22 | | |
23 | | int |
24 | | u16_mbtoucr (ucs4_t *puc, const uint16_t *s, size_t n) |
25 | 110k | { |
26 | 110k | uint16_t c = *s; |
27 | | |
28 | 110k | if (c < 0xd800 || c >= 0xe000) |
29 | 100k | { |
30 | 100k | *puc = c; |
31 | 100k | return 1; |
32 | 100k | } |
33 | 9.93k | if (c < 0xdc00) |
34 | 6.72k | { |
35 | 6.72k | if (n >= 2) |
36 | 4.18k | { |
37 | 4.18k | if (s[1] >= 0xdc00 && s[1] < 0xe000) |
38 | 1.52k | { |
39 | 1.52k | *puc = 0x10000 + ((c - 0xd800) << 10) + (s[1] - 0xdc00); |
40 | 1.52k | return 2; |
41 | 1.52k | } |
42 | | /* invalid multibyte character */ |
43 | 4.18k | } |
44 | 2.53k | else |
45 | 2.53k | { |
46 | | /* incomplete multibyte character */ |
47 | 2.53k | *puc = 0xfffd; |
48 | 2.53k | return -2; |
49 | 2.53k | } |
50 | 6.72k | } |
51 | | /* invalid multibyte character */ |
52 | 5.87k | *puc = 0xfffd; |
53 | 5.87k | return -1; |
54 | 9.93k | } |