2 * UCW Library -- Unicode Characters
4 * (c) 1997--2004 Martin Mares <mj@ucw.cz>
5 * (c) 2004 Robert Spalek <robert@ucw.cz>
6 * (c) 2007 Pavel Charvat <pchar@ucw.cz>
8 * This software may be freely distributed and used according to the terms
9 * of the GNU Lesser General Public License.
12 #ifndef _UCW_UNICODE_H
13 #define _UCW_UNICODE_H
15 #include <ucw/unaligned.h>
17 #ifdef CONFIG_UCW_CLEAN_ABI
18 #define utf8_strlen ucw_utf8_strlen
19 #define utf8_strnlen ucw_utf8_strnlen
22 /* Macros for handling UTF-8 */
24 #define UNI_REPLACEMENT 0xfffc /** Unicode value used as a default replacement of invalid characters. **/
27 * Encode a value from the range `[0, 0xFFFF]`
28 * (basic multilingual plane); up to 3 bytes needed (RFC2279).
30 static inline byte *utf8_put(byte *p, uint u)
36 *p++ = 0xc0 | (u >> 6);
37 *p++ = 0x80 | (u & 0x3f);
42 *p++ = 0xe0 | (u >> 12);
43 *p++ = 0x80 | ((u >> 6) & 0x3f);
44 *p++ = 0x80 | (u & 0x3f);
50 * Encode a value from the range `[0, 0x7FFFFFFF]`;
51 * (superset of Unicode 4.0) up to 6 bytes needed (RFC2279).
53 static inline byte *utf8_32_put(byte *p, uint u)
59 *p++ = 0xc0 | (u >> 6);
64 *p++ = 0xe0 | (u >> 12);
69 *p++ = 0xf0 | (u >> 18);
74 *p++ = 0xf8 | (u >> 24);
77 else if (u < (1U<<31))
79 *p++ = 0xfc | (u >> 30);
80 *p++ = 0x80 | ((u >> 24) & 0x3f);
81 put4: *p++ = 0x80 | ((u >> 18) & 0x3f);
82 put3: *p++ = 0x80 | ((u >> 12) & 0x3f);
83 put2: *p++ = 0x80 | ((u >> 6) & 0x3f);
84 put1: *p++ = 0x80 | (u & 0x3f);
91 #define UTF8_GET_NEXT if (unlikely((*p & 0xc0) != 0x80)) goto bad; u = (u << 6) | (*p++ & 0x3f)
94 * Decode a value from the range `[0, 0xFFFF]` (basic multilingual plane)
95 * or return @repl if the encoding has been corrupted.
97 static inline byte *utf8_get_repl(const byte *p, uint *uu, uint repl)
102 else if (unlikely(u < 0xc0))
104 /* Incorrect byte sequence */
113 else if (likely(u < 0xf0))
126 * Decode a value from the range `[0, 0x7FFFFFFF]`
127 * or return @repl if the encoding has been corrupted.
129 static inline byte *utf8_32_get_repl(const byte *p, uint *uu, uint repl)
134 else if (unlikely(u < 0xc0))
136 /* Incorrect byte sequence */
176 * Decode a value from the range `[0, 0xFFFF]` (basic multilingual plane)
177 * or return `UNI_REPLACEMENT` if the encoding has been corrupted.
179 static inline byte *utf8_get(const byte *p, uint *uu)
181 return utf8_get_repl(p, uu, UNI_REPLACEMENT);
185 * Decode a value from the range `[0, 0x7FFFFFFF]`
186 * or return `UNI_REPLACEMENT` if the encoding has been corrupted.
188 static inline byte *utf8_32_get(const byte *p, uint *uu)
190 return utf8_32_get_repl(p, uu, UNI_REPLACEMENT);
193 #define UTF8_SKIP(p) do { \
196 while (c & 0x40 && *p >= 0x80 && *p < 0xc0) \
200 #define UTF8_SKIP_BWD(p) while ((*--(p) & 0xc0) == 0x80)
203 * Return the number of bytes needed to encode a given value from the range `[0, 0x7FFFFFFF]` to UTF-8.
205 static inline uint utf8_space(uint u)
221 * Compute the length of a single UTF-8 character from its first byte. The encoding must be valid.
223 static inline uint utf8_encoding_len(uint c)
227 ASSERT(c >= 0xc0 && c < 0xfe);
240 * Encode an UTF-16LE character from the range `[0, 0xD7FF]` or `[0xE000,0x11FFFF]`;
241 * up to 4 bytes needed.
243 static inline void *utf16_le_put(void *p, uint u)
245 if (u < 0xd800 || (u < 0x10000 && u >= 0xe000))
250 else if ((u -= 0x10000) < 0x100000)
252 put_u16_le(p, 0xd800 | (u >> 10));
253 put_u16_le(p + 2, 0xdc00 | (u & 0x3ff));
261 * Encode a UTF-16BE character from the range `[0, 0xD7FF]` or `[0xE000,0x11FFFF]`;
262 * up to 4 bytes needed.
264 static inline void *utf16_be_put(void *p, uint u)
266 if (u < 0xd800 || (u < 0x10000 && u >= 0xe000))
271 else if ((u -= 0x10000) < 0x100000)
273 put_u16_be(p, 0xd800 | (u >> 10));
274 put_u16_be(p + 2, 0xdc00 | (u & 0x3ff));
282 * Decode a UTF-16LE character from the range `[0, 0xD7FF]` or `[0xE000,11FFFF]`
283 * or return @repl if the encoding has been corrupted.
285 static inline void *utf16_le_get_repl(const void *p, uint *uu, uint repl)
287 uint u = get_u16_le(p), x, y;
290 if (x < 0x400 && (y = get_u16_le(p + 2) - 0xdc00) < 0x400)
292 u = 0x10000 + (x << 10) + y;
298 return (void *)(p + 2);
302 * Decode a UTF-16BE character from the range `[0, 0xD7FF]` or `[0xE000,11FFFF]`
303 * or return @repl if the encoding has been corrupted.
305 static inline void *utf16_be_get_repl(const void *p, uint *uu, uint repl)
307 uint u = get_u16_be(p), x, y;
310 if (x < 0x400 && (y = get_u16_be(p + 2) - 0xdc00) < 0x400)
312 u = 0x10000 + (x << 10) + y;
318 return (void *)(p + 2);
322 * Decode a UTF-16LE character from the range `[0, 0xD7FF]` or `[0xE000,11FFFF]`
323 * or return `UNI_REPLACEMENT` if the encoding has been corrupted.
325 static inline void *utf16_le_get(const void *p, uint *uu)
327 return utf16_le_get_repl(p, uu, UNI_REPLACEMENT);
331 * Decode a UTF-16BE character from the range `[0, 0xD7FF]` or `[0xE000,11FFFF]`
332 * or return `UNI_REPLACEMENT` if the encoding has been corrupted.
334 static inline void *utf16_be_get(const void *p, uint *uu)
336 return utf16_be_get_repl(p, uu, UNI_REPLACEMENT);
340 * Basic sanity check on Unicode characters. Return `UNI_REPLACEMENT` if the input
341 * character is a surrogate, ASCII or Latin-1 control character different from the tab,
342 * or if it lies outside the basic plane. In all other cases, it acts as an identity.
344 static inline uint unicode_sanitize_char(uint u)
346 if (u >= 0x10000 || // We don't accept anything outside the basic plane
347 u >= 0xd800 && u < 0xf900 || // neither we do surrogates
348 u >= 0x80 && u < 0xa0 || // nor latin-1 control chars
349 u < 0x20 && u != '\t')
350 return UNI_REPLACEMENT;
357 * Count the number of Unicode characters in a zero-terminated UTF-8 string.
358 * Returned value for corrupted encoding is undefined, but is never greater than strlen().
360 size_t utf8_strlen(const byte *str);
363 * Same as @utf8_strlen(), but returns at most @n characters.
365 size_t utf8_strnlen(const byte *str, size_t n);