| // Copyright (c) 2012, the Dart project authors.  Please see the AUTHORS file | 
 | // for details. All rights reserved. Use of this source code is governed by a | 
 | // BSD-style license that can be found in the LICENSE file. | 
 |  | 
 | #include "platform/unicode.h" | 
 |  | 
 | #include "platform/allocation.h" | 
 | #include "platform/globals.h" | 
 | #include "platform/syslog.h" | 
 |  | 
 | namespace dart { | 
 |  | 
 | // clang-format off | 
 | const int8_t Utf8::kTrailBytes[256] = { | 
 |   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, | 
 |   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, | 
 |   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, | 
 |   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, | 
 |   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, | 
 |   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, | 
 |   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, | 
 |   1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, | 
 |   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | 
 |   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | 
 |   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | 
 |   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, | 
 |   2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, | 
 |   2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, | 
 |   3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, | 
 |   4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 6, 6, 0, 0 | 
 | }; | 
 | // clang-format on | 
 |  | 
 | const uint32_t Utf8::kMagicBits[7] = {0,  // Padding. | 
 |                                       0x00000000, 0x00003080, 0x000E2080, | 
 |                                       0x03C82080, 0xFA082080, 0x82082080}; | 
 |  | 
 | // Minimum values of code points used to check shortest form. | 
 | const uint32_t Utf8::kOverlongMinimum[7] = {0,  // Padding. | 
 |                                             0x0,     0x80,       0x800, | 
 |                                             0x10000, 0xFFFFFFFF, 0xFFFFFFFF}; | 
 |  | 
 | // Returns the most restricted coding form in which the sequence of utf8 | 
 | // characters in 'utf8_array' can be represented in, and the number of | 
 | // code units needed in that form. | 
 | intptr_t Utf8::CodeUnitCount(const uint8_t* utf8_array, | 
 |                              intptr_t array_len, | 
 |                              Type* type) { | 
 |   intptr_t len = 0; | 
 |   Type char_type = kLatin1; | 
 |   for (intptr_t i = 0; i < array_len; i++) { | 
 |     uint8_t code_unit = utf8_array[i]; | 
 |     if (!IsTrailByte(code_unit)) { | 
 |       ++len; | 
 |       if (!IsLatin1SequenceStart(code_unit)) {          // > U+00FF | 
 |         if (IsSupplementarySequenceStart(code_unit)) {  // >= U+10000 | 
 |           char_type = kSupplementary; | 
 |           ++len; | 
 |         } else if (char_type == kLatin1) { | 
 |           char_type = kBMP; | 
 |         } | 
 |       } | 
 |     } | 
 |   } | 
 |   *type = char_type; | 
 |   return len; | 
 | } | 
 |  | 
 | // Returns true if str is a valid NUL-terminated UTF-8 string. | 
 | bool Utf8::IsValid(const uint8_t* utf8_array, intptr_t array_len) { | 
 |   intptr_t i = 0; | 
 |   while (i < array_len) { | 
 |     uint32_t ch = utf8_array[i] & 0xFF; | 
 |     intptr_t j = 1; | 
 |     if (ch >= 0x80) { | 
 |       int8_t num_trail_bytes = kTrailBytes[ch]; | 
 |       bool is_malformed = false; | 
 |       for (; j < num_trail_bytes; ++j) { | 
 |         if ((i + j) < array_len) { | 
 |           uint8_t code_unit = utf8_array[i + j]; | 
 |           is_malformed |= !IsTrailByte(code_unit); | 
 |           ch = (ch << 6) + code_unit; | 
 |         } else { | 
 |           return false; | 
 |         } | 
 |       } | 
 |       ch -= kMagicBits[num_trail_bytes]; | 
 |       if (!((is_malformed == false) && (j == num_trail_bytes) && | 
 |             !Utf::IsOutOfRange(ch) && !IsNonShortestForm(ch, j))) { | 
 |         return false; | 
 |       } | 
 |     } | 
 |     i += j; | 
 |   } | 
 |   return true; | 
 | } | 
 |  | 
 | intptr_t Utf8::Length(int32_t ch) { | 
 |   if (ch <= kMaxOneByteChar) { | 
 |     return 1; | 
 |   } else if (ch <= kMaxTwoByteChar) { | 
 |     return 2; | 
 |   } else if (ch <= kMaxThreeByteChar) { | 
 |     return 3; | 
 |   } | 
 |   ASSERT(ch <= kMaxFourByteChar); | 
 |   return 4; | 
 | } | 
 |  | 
 | intptr_t Utf8::Encode(int32_t ch, char* dst) { | 
 |   constexpr int kMask = ~(1 << 6); | 
 |   if (ch <= kMaxOneByteChar) { | 
 |     dst[0] = ch; | 
 |     return 1; | 
 |   } | 
 |   if (ch <= kMaxTwoByteChar) { | 
 |     dst[0] = 0xC0 | (ch >> 6); | 
 |     dst[1] = 0x80 | (ch & kMask); | 
 |     return 2; | 
 |   } | 
 |   if (ch <= kMaxThreeByteChar) { | 
 |     dst[0] = 0xE0 | (ch >> 12); | 
 |     dst[1] = 0x80 | ((ch >> 6) & kMask); | 
 |     dst[2] = 0x80 | (ch & kMask); | 
 |     return 3; | 
 |   } | 
 |   ASSERT(ch <= kMaxFourByteChar); | 
 |   dst[0] = 0xF0 | (ch >> 18); | 
 |   dst[1] = 0x80 | ((ch >> 12) & kMask); | 
 |   dst[2] = 0x80 | ((ch >> 6) & kMask); | 
 |   dst[3] = 0x80 | (ch & kMask); | 
 |   return 4; | 
 | } | 
 |  | 
 | intptr_t Utf8::Decode(const uint8_t* utf8_array, | 
 |                       intptr_t array_len, | 
 |                       int32_t* dst) { | 
 |   uint32_t ch = utf8_array[0] & 0xFF; | 
 |   intptr_t i = 1; | 
 |   if (ch >= 0x80) { | 
 |     intptr_t num_trail_bytes = kTrailBytes[ch]; | 
 |     bool is_malformed = false; | 
 |     for (; i < num_trail_bytes; ++i) { | 
 |       if (i < array_len) { | 
 |         uint8_t code_unit = utf8_array[i]; | 
 |         is_malformed |= !IsTrailByte(code_unit); | 
 |         ch = (ch << 6) + code_unit; | 
 |       } else { | 
 |         *dst = -1; | 
 |         return 0; | 
 |       } | 
 |     } | 
 |     ch -= kMagicBits[num_trail_bytes]; | 
 |     if (!((is_malformed == false) && (i == num_trail_bytes) && | 
 |           !Utf::IsOutOfRange(ch) && !IsNonShortestForm(ch, i))) { | 
 |       *dst = -1; | 
 |       return 0; | 
 |     } | 
 |   } | 
 |   *dst = ch; | 
 |   return i; | 
 | } | 
 | intptr_t Utf8::ReportInvalidByte(const uint8_t* utf8_array, | 
 |                                  intptr_t array_len, | 
 |                                  intptr_t len) { | 
 |   intptr_t i = 0; | 
 |   intptr_t j = 0; | 
 |   intptr_t num_bytes; | 
 |   for (; (i < array_len) && (j < len); i += num_bytes, ++j) { | 
 |     int32_t ch; | 
 |     bool is_supplementary = IsSupplementarySequenceStart(utf8_array[i]); | 
 |     num_bytes = Utf8::Decode(&utf8_array[i], (array_len - i), &ch); | 
 |     if (ch == -1) { | 
 |       break;  // Invalid input. | 
 |     } | 
 |     if (is_supplementary) { | 
 |       j = j + 1; | 
 |     } | 
 |   } | 
 | #ifdef FUZZING_BUILD_MODE_UNSAFE_FOR_PRODUCTION | 
 |   // Remain silent while libFuzzer is active, since | 
 |   // the output only slows down the in-process fuzzing. | 
 | #else | 
 |   Syslog::PrintErr("Invalid UTF8 sequence encountered, "); | 
 |   for (intptr_t idx = 0; idx < 10 && (i + idx) < array_len; idx++) { | 
 |     Syslog::PrintErr("(Error Code: %X + idx: %" Pd " )", utf8_array[idx + i], | 
 |                      (idx + i)); | 
 |   } | 
 |   Syslog::PrintErr("\n"); | 
 | #endif | 
 |   return i; | 
 | } | 
 |  | 
 | bool Utf8::DecodeToLatin1(const uint8_t* utf8_array, | 
 |                           intptr_t array_len, | 
 |                           uint8_t* dst, | 
 |                           intptr_t len) { | 
 |   intptr_t i = 0; | 
 |   intptr_t j = 0; | 
 |   intptr_t num_bytes; | 
 |   for (; (i < array_len) && (j < len); i += num_bytes, ++j) { | 
 |     int32_t ch; | 
 |     ASSERT(IsLatin1SequenceStart(utf8_array[i])); | 
 |     num_bytes = Utf8::Decode(&utf8_array[i], (array_len - i), &ch); | 
 |     if (ch == -1) { | 
 |       return false;  // Invalid input. | 
 |     } | 
 |     ASSERT(Utf::IsLatin1(ch)); | 
 |     dst[j] = ch; | 
 |   } | 
 |   if ((i < array_len) && (j == len)) { | 
 |     return false;  // Output overflow. | 
 |   } | 
 |   return true;  // Success. | 
 | } | 
 |  | 
 | bool Utf8::DecodeToUTF16(const uint8_t* utf8_array, | 
 |                          intptr_t array_len, | 
 |                          uint16_t* dst, | 
 |                          intptr_t len) { | 
 |   intptr_t i = 0; | 
 |   intptr_t j = 0; | 
 |   intptr_t num_bytes; | 
 |   for (; (i < array_len) && (j < len); i += num_bytes, ++j) { | 
 |     int32_t ch; | 
 |     bool is_supplementary = IsSupplementarySequenceStart(utf8_array[i]); | 
 |     num_bytes = Utf8::Decode(&utf8_array[i], (array_len - i), &ch); | 
 |     if (ch == -1) { | 
 |       return false;  // Invalid input. | 
 |     } | 
 |     if (is_supplementary) { | 
 |       if (j == (len - 1)) return false;  // Output overflow. | 
 |       Utf16::Encode(ch, &dst[j]); | 
 |       j = j + 1; | 
 |     } else { | 
 |       dst[j] = ch; | 
 |     } | 
 |   } | 
 |   if ((i < array_len) && (j == len)) { | 
 |     return false;  // Output overflow. | 
 |   } | 
 |   return true;  // Success. | 
 | } | 
 |  | 
 | bool Utf8::DecodeToUTF32(const uint8_t* utf8_array, | 
 |                          intptr_t array_len, | 
 |                          int32_t* dst, | 
 |                          intptr_t len) { | 
 |   intptr_t i = 0; | 
 |   intptr_t j = 0; | 
 |   intptr_t num_bytes; | 
 |   for (; (i < array_len) && (j < len); i += num_bytes, ++j) { | 
 |     int32_t ch; | 
 |     num_bytes = Utf8::Decode(&utf8_array[i], (array_len - i), &ch); | 
 |     if (ch == -1) { | 
 |       return false;  // Invalid input. | 
 |     } | 
 |     dst[j] = ch; | 
 |   } | 
 |   if ((i < array_len) && (j == len)) { | 
 |     return false;  // Output overflow. | 
 |   } | 
 |   return true;  // Success. | 
 | } | 
 |  | 
 | bool Utf8::DecodeCStringToUTF32(const char* str, int32_t* dst, intptr_t len) { | 
 |   ASSERT(str != nullptr); | 
 |   intptr_t array_len = strlen(str); | 
 |   const uint8_t* utf8_array = reinterpret_cast<const uint8_t*>(str); | 
 |   return Utf8::DecodeToUTF32(utf8_array, array_len, dst, len); | 
 | } | 
 |  | 
 | void Utf16::Encode(int32_t codepoint, uint16_t* dst) { | 
 |   ASSERT(codepoint > Utf16::kMaxCodeUnit); | 
 |   ASSERT(dst != nullptr); | 
 |   dst[0] = (Utf16::kLeadSurrogateOffset + (codepoint >> 10)); | 
 |   dst[1] = (0xDC00 + (codepoint & 0x3FF)); | 
 | } | 
 |  | 
 | }  // namespace dart |