1 // Copyright (C) 2016 and later: Unicode, Inc. and others.
2 // License & terms of use: http://www.unicode.org/copyright.html
4 ******************************************************************************
6 * Copyright (C) 1999-2012, International Business Machines
7 * Corporation and others. All Rights Reserved.
9 ******************************************************************************
10 * file name: utf_impl.c
12 * tab size: 8 (not used)
15 * created on: 1999sep13
16 * created by: Markus W. Scherer
18 * This file provides implementation functions for macros in the utfXX.h
19 * that would otherwise be too long as macros.
22 /* set import/export definitions */
27 #include "unicode/utypes.h"
28 #include "unicode/utf.h"
29 #include "unicode/utf8.h"
30 #include "unicode/utf_old.h"
34 * This table could be replaced on many machines by
35 * a few lines of assembler code using an
36 * "index of first 0-bit from msb" instruction and
37 * one or two more integer instructions.
39 * For example, on an i386, do something like
41 * - NOT AL (8-bit, leave b15..b8==0..0, reverse only b7..b0)
43 * - BSR BX, AX (16-bit)
44 * - MOV AX, 6 (result)
45 * - JZ finish (ZF==1 if leadByte==0xff)
46 * - SUB AX, BX (result)
48 * (BSR: Bit Scan Reverse, scans for a 1-bit, starting from the MSB)
50 * In Unicode, all UTF-8 byte sequences with more than 4 bytes are illegal;
51 * lead bytes above 0xf4 are illegal.
52 * We keep them in this table for skipping long ISO 10646-UTF-8 sequences.
54 U_EXPORT const uint8_t
55 utf8_countTrailBytes[256]={
56 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
57 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
58 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
59 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
61 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
62 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
63 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
64 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
66 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
67 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
68 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
69 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
71 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
72 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
74 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
76 3, 3, 3, /* illegal in Unicode */
77 4, 4, 4, 4, /* illegal in Unicode */
78 5, 5, /* illegal in Unicode */
79 0, 0 /* illegal bytes 0xfe and 0xff */
83 utf8_minLegal[4]={ 0, 0x80, 0x800, 0x10000 };
87 UTF8_ERROR_VALUE_1, UTF8_ERROR_VALUE_2, UTF_ERROR_VALUE, 0x10ffff,
92 errorValue(int32_t count, int8_t strict) {
94 return utf8_errorValue[count];
95 } else if(strict==-3) {
103 * Handle the non-inline part of the U8_NEXT() and U8_NEXT_FFFD() macros
104 * and their obsolete sibling UTF8_NEXT_CHAR_SAFE().
106 * U8_NEXT() supports NUL-terminated strings indicated via length<0.
108 * The "strict" parameter controls the error behavior:
109 * <0 "Safe" behavior of U8_NEXT():
110 * -1: All illegal byte sequences yield U_SENTINEL=-1.
111 * -2: Same as -1, except for lenient treatment of surrogate code points as legal.
112 * Some implementations use this for roundtripping of
113 * Unicode 16-bit strings that are not well-formed UTF-16, that is, they
114 * contain unpaired surrogates.
115 * -3: All illegal byte sequences yield U+FFFD.
116 * 0 Obsolete "safe" behavior of UTF8_NEXT_CHAR_SAFE(..., FALSE):
117 * All illegal byte sequences yield a positive code point such that this
118 * result code point would be encoded with the same number of bytes as
119 * the illegal sequence.
120 * >0 Obsolete "strict" behavior of UTF8_NEXT_CHAR_SAFE(..., TRUE):
121 * Same as the obsolete "safe" behavior, but non-characters are also treated
122 * like illegal sequences.
124 * Note that a UBool is the same as an int8_t.
126 U_CAPI UChar32 U_EXPORT2
127 utf8_nextCharSafeBody(const uint8_t *s, int32_t *pi, int32_t length, UChar32 c, UBool strict) {
129 uint8_t count=U8_COUNT_TRAIL_BYTES(c);
130 U_ASSERT(count <= 5); /* U8_COUNT_TRAIL_BYTES returns value 0...5 */
131 if(i+count<=length || length<0) {
134 U8_MASK_LEAD_BYTE(c, count);
135 /* support NUL-terminated strings: do not read beyond the first non-trail byte */
137 /* each branch falls through to the next one */
139 /* count==0 for illegally leading trail bytes and the illegal bytes 0xfe and 0xff */
142 /* count>=4 is always illegal: no more than 3 trail bytes in Unicode's UTF-8 */
147 /* c>=0x110 would result in code point>0x10ffff, outside Unicode */
148 if(c>=0x110 || trail>0x3f) { break; }
153 * test for a surrogate d800..dfff unless we are lenient:
154 * before the last (c<<6), a surrogate is c=360..37f
156 if(((c&0xffe0)==0x360 && strict!=-2) || trail>0x3f) { break; }
160 if(trail>0x3f) { break; }
161 /* correct sequence - all trail bytes have (b7..b6)==(10) */
162 if(c>=utf8_minLegal[count] &&
163 /* strict: forbid non-characters like U+fffe */
164 (strict<=0 || !U_IS_UNICODE_NONCHAR(c))) {
168 /* no default branch to optimize switch() - all values are covered */
171 /* too few bytes left */
177 while(count>0 && U8_IS_TRAIL(s[i])) {
181 c=errorValue(i-*pi, strict);
186 U_CAPI int32_t U_EXPORT2
187 utf8_appendCharSafeBody(uint8_t *s, int32_t i, int32_t length, UChar32 c, UBool *pIsError) {
188 if((uint32_t)(c)<=0x7ff) {
190 (s)[(i)++]=(uint8_t)(((c)>>6)|0xc0);
191 (s)[(i)++]=(uint8_t)(((c)&0x3f)|0x80);
194 } else if((uint32_t)(c)<=0xffff) {
195 /* Starting with Unicode 3.2, surrogate code points must not be encoded in UTF-8. */
196 if((i)+2<(length) && !U_IS_SURROGATE(c)) {
197 (s)[(i)++]=(uint8_t)(((c)>>12)|0xe0);
198 (s)[(i)++]=(uint8_t)((((c)>>6)&0x3f)|0x80);
199 (s)[(i)++]=(uint8_t)(((c)&0x3f)|0x80);
202 } else if((uint32_t)(c)<=0x10ffff) {
204 (s)[(i)++]=(uint8_t)(((c)>>18)|0xf0);
205 (s)[(i)++]=(uint8_t)((((c)>>12)&0x3f)|0x80);
206 (s)[(i)++]=(uint8_t)((((c)>>6)&0x3f)|0x80);
207 (s)[(i)++]=(uint8_t)(((c)&0x3f)|0x80);
211 /* c>0x10ffff or not enough space, write an error value */
223 c=utf8_errorValue[length-1];
224 UTF8_APPEND_CHAR_UNSAFE(s, offset, c);
231 U_CAPI UChar32 U_EXPORT2
232 utf8_prevCharSafeBody(const uint8_t *s, int32_t start, int32_t *pi, UChar32 c, UBool strict) {
234 uint8_t b, count=1, shift=6;
236 if(!U8_IS_TRAIL(c)) { return errorValue(0, strict); }
238 /* extract value bits from the last trail byte */
243 /* no lead byte at all */
244 return errorValue(0, strict);
247 /* read another previous byte */
249 if((uint8_t)(b-0x80)<0x7e) { /* 0x80<=b<0xfe */
251 /* lead byte, this will always end the loop */
252 uint8_t shouldCount=U8_COUNT_TRAIL_BYTES(b);
254 if(count==shouldCount) {
255 /* set the new position */
257 U8_MASK_LEAD_BYTE(b, count);
258 c|=(UChar32)b<<shift;
259 if(count>=4 || c>0x10ffff || c<utf8_minLegal[count] || (U_IS_SURROGATE(c) && strict!=-2) || (strict>0 && U_IS_UNICODE_NONCHAR(c))) {
260 /* illegal sequence or (strict and non-character) */
264 c=errorValue(count, strict);
266 /* exit with correct c */
269 /* the lead byte does not match the number of trail bytes */
270 /* only set the position to the lead byte if it would
271 include the trail byte that we started with */
272 if(count<shouldCount) {
274 c=errorValue(count, strict);
276 c=errorValue(0, strict);
282 c|=(UChar32)(b&0x3f)<<shift;
286 /* more than 5 trail bytes is illegal */
287 c=errorValue(0, strict);
291 /* single-byte character precedes trailing bytes */
292 c=errorValue(0, strict);
299 U_CAPI int32_t U_EXPORT2
300 utf8_back1SafeBody(const uint8_t *s, int32_t start, int32_t i) {
301 /* i had been decremented once before the function call */
305 /* read at most the 6 bytes s[Z] to s[i], inclusively */
312 /* return I if the sequence starting there is long enough to include i */
315 if((uint8_t)(b-0x80)>=0x7e) { /* not 0x80<=b<0xfe */
318 if(U8_COUNT_TRAIL_BYTES(b)>=(i-I)) {
326 /* return i itself to be consistent with the FWD_1 macro */