|  | /* | 
|  | * Copyright (C) 2013 The Android Open Source Project | 
|  | * | 
|  | * Licensed under the Apache License, Version 2.0 (the "License"); | 
|  | * you may not use this file except in compliance with the License. | 
|  | * You may obtain a copy of the License at | 
|  | * | 
|  | *      http://www.apache.org/licenses/LICENSE-2.0 | 
|  | * | 
|  | * Unless required by applicable law or agreed to in writing, software | 
|  | * distributed under the License is distributed on an "AS IS" BASIS, | 
|  | * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | 
|  | * See the License for the specific language governing permissions and | 
|  | * limitations under the License. | 
|  | */ | 
|  |  | 
|  | //#define LOG_NDEBUG 0 | 
|  | #define LOG_TAG "CharacterEncodingDector" | 
|  | #include <utils/Log.h> | 
|  |  | 
|  | #include <media/CharacterEncodingDetector.h> | 
|  | #include "CharacterEncodingDetectorTables.h" | 
|  |  | 
|  | #include <utils/Vector.h> | 
|  | #include <media/StringArray.h> | 
|  |  | 
|  | #include <unicode/ucnv.h> | 
|  | #include <unicode/ucsdet.h> | 
|  | #include <unicode/ustring.h> | 
|  |  | 
|  | #include <cutils/properties.h> | 
|  |  | 
|  | namespace android { | 
|  |  | 
|  | CharacterEncodingDetector::CharacterEncodingDetector() { | 
|  |  | 
|  | UErrorCode status = U_ZERO_ERROR; | 
|  | mUtf8Conv = ucnv_open("UTF-8", &status); | 
|  | if (U_FAILURE(status)) { | 
|  | ALOGE("could not create UConverter for UTF-8"); | 
|  | mUtf8Conv = NULL; | 
|  | } | 
|  |  | 
|  | // Read system locale setting from system property and map to ICU encoding names. | 
|  | mLocaleEnc = NULL; | 
|  | char locale_value[PROPERTY_VALUE_MAX] = ""; | 
|  | if (property_get("persist.sys.locale", locale_value, NULL) > 0) { | 
|  | const size_t len = strnlen(locale_value, sizeof(locale_value)); | 
|  |  | 
|  | if (len == 3 && !strncmp(locale_value, "und", 3)) { | 
|  | // Undetermined | 
|  | } else if (!strncmp(locale_value, "th", 2)) { // Thai | 
|  | mLocaleEnc = "windows-874-2000"; | 
|  | } | 
|  | if (mLocaleEnc != NULL) { | 
|  | ALOGV("System locale encoding = %s", mLocaleEnc); | 
|  | } else { | 
|  | ALOGV("Didn't recognize system locale setting, defaulting to en_US"); | 
|  | } | 
|  | } else { | 
|  | ALOGV("Couldn't read system locale setting, assuming en_US"); | 
|  | } | 
|  | } | 
|  |  | 
|  | CharacterEncodingDetector::~CharacterEncodingDetector() { | 
|  | ucnv_close(mUtf8Conv); | 
|  | } | 
|  |  | 
|  | void CharacterEncodingDetector::addTag(const char *name, const char *value) { | 
|  | mNames.push_back(name); | 
|  | mValues.push_back(value); | 
|  | } | 
|  |  | 
|  | size_t CharacterEncodingDetector::size() { | 
|  | return mNames.size(); | 
|  | } | 
|  |  | 
|  | status_t CharacterEncodingDetector::getTag(int index, const char **name, const char**value) { | 
|  | if (index >= mNames.size()) { | 
|  | return BAD_VALUE; | 
|  | } | 
|  |  | 
|  | *name = mNames.getEntry(index); | 
|  | *value = mValues.getEntry(index); | 
|  | return OK; | 
|  | } | 
|  |  | 
|  | static bool isPrintableAscii(const char *value, size_t len) { | 
|  | for (size_t i = 0; i < len; i++) { | 
|  | if ((value[i] & 0x80) || value[i] < 0x20 || value[i] == 0x7f) { | 
|  | return false; | 
|  | } | 
|  | } | 
|  | return true; | 
|  | } | 
|  |  | 
|  | void CharacterEncodingDetector::detectAndConvert() { | 
|  |  | 
|  | int size = mNames.size(); | 
|  | ALOGV("%d tags before conversion", size); | 
|  | for (int i = 0; i < size; i++) { | 
|  | ALOGV("%s: %s", mNames.getEntry(i), mValues.getEntry(i)); | 
|  | } | 
|  |  | 
|  | if (size && mUtf8Conv) { | 
|  |  | 
|  | UErrorCode status = U_ZERO_ERROR; | 
|  | UCharsetDetector *csd = ucsdet_open(&status); | 
|  | const UCharsetMatch *ucm; | 
|  | bool goodmatch = true; | 
|  | int highest = 0; | 
|  |  | 
|  | // try combined detection of artist/album/title etc. | 
|  | char buf[1024]; | 
|  | buf[0] = 0; | 
|  | bool allprintable = true; | 
|  | for (int i = 0; i < size; i++) { | 
|  | const char *name = mNames.getEntry(i); | 
|  | const char *value = mValues.getEntry(i); | 
|  | if (!isPrintableAscii(value, strlen(value)) && ( | 
|  | !strcmp(name, "artist") || | 
|  | !strcmp(name, "albumartist") || | 
|  | !strcmp(name, "composer") || | 
|  | !strcmp(name, "genre") || | 
|  | !strcmp(name, "album") || | 
|  | !strcmp(name, "title"))) { | 
|  | strlcat(buf, value, sizeof(buf)); | 
|  | // separate tags by space so ICU's ngram detector can do its job | 
|  | strlcat(buf, " ", sizeof(buf)); | 
|  | allprintable = false; | 
|  | } | 
|  | } | 
|  |  | 
|  | const char *combinedenc = "UTF-8"; | 
|  | if (allprintable) { | 
|  | // since 'buf' is empty, ICU would return a UTF-8 matcher with low confidence, so | 
|  | // no need to even call it | 
|  | ALOGV("all tags are printable, assuming ascii (%zu)", strlen(buf)); | 
|  | } else { | 
|  | ucsdet_setText(csd, buf, strlen(buf), &status); | 
|  | int32_t matches; | 
|  | const UCharsetMatch** ucma = ucsdet_detectAll(csd, &matches, &status); | 
|  | const UCharsetMatch* bestCombinedMatch = getPreferred(buf, strlen(buf), | 
|  | ucma, matches, &goodmatch, &highest); | 
|  |  | 
|  | ALOGV("goodmatch: %s, highest: %d", goodmatch ? "true" : "false", highest); | 
|  | if (!goodmatch && (highest < 15 || strlen(buf) < 20)) { | 
|  | ALOGV("not a good match, trying with more data"); | 
|  | // This string might be too short for ICU to do anything useful with. | 
|  | // (real world example: "Björk" in ISO-8859-1 might be detected as GB18030, because | 
|  | //  the ISO detector reports a confidence of 0, while the GB18030 detector reports | 
|  | //  a confidence of 10 with no invalid characters) | 
|  | // Append artist, album and title if they were previously omitted because they | 
|  | // were printable ascii. | 
|  | bool added = false; | 
|  | for (int i = 0; i < size; i++) { | 
|  | const char *name = mNames.getEntry(i); | 
|  | const char *value = mValues.getEntry(i); | 
|  | if (isPrintableAscii(value, strlen(value)) && ( | 
|  | !strcmp(name, "artist") || | 
|  | !strcmp(name, "album") || | 
|  | !strcmp(name, "title"))) { | 
|  | strlcat(buf, value, sizeof(buf)); | 
|  | strlcat(buf, " ", sizeof(buf)); | 
|  | added = true; | 
|  | } | 
|  | } | 
|  | if (added) { | 
|  | ucsdet_setText(csd, buf, strlen(buf), &status); | 
|  | ucma = ucsdet_detectAll(csd, &matches, &status); | 
|  | bestCombinedMatch = getPreferred(buf, strlen(buf), | 
|  | ucma, matches, &goodmatch, &highest); | 
|  | if (!goodmatch && highest <= 15) { | 
|  | ALOGV("still not a good match after adding printable tags"); | 
|  | bestCombinedMatch = NULL; | 
|  | } | 
|  | } else { | 
|  | ALOGV("no printable tags to add"); | 
|  | } | 
|  | } | 
|  |  | 
|  | if (mLocaleEnc != NULL && !goodmatch && highest < 50) { | 
|  | combinedenc = mLocaleEnc; | 
|  | ALOGV("confidence is low but we have recognized predefined encoding, " | 
|  | "so try this (%s) instead", mLocaleEnc); | 
|  | } else if (bestCombinedMatch != NULL) { | 
|  | combinedenc = ucsdet_getName(bestCombinedMatch, &status); | 
|  | } else { | 
|  | combinedenc = "ISO-8859-1"; | 
|  | } | 
|  | } | 
|  |  | 
|  | for (int i = 0; i < size; i++) { | 
|  | const char *name = mNames.getEntry(i); | 
|  | uint8_t* src = (uint8_t *)mValues.getEntry(i); | 
|  | int len = strlen((char *)src); | 
|  |  | 
|  | ALOGV("@@@ checking %s", name); | 
|  | const char *s = mValues.getEntry(i); | 
|  | int32_t inputLength = strlen(s); | 
|  | const char *enc; | 
|  |  | 
|  | if (!allprintable && (!strcmp(name, "artist") || | 
|  | !strcmp(name, "albumartist") || | 
|  | !strcmp(name, "composer") || | 
|  | !strcmp(name, "genre") || | 
|  | !strcmp(name, "album") || | 
|  | !strcmp(name, "title"))) { | 
|  | if (!goodmatch && highest < 0) { | 
|  | // Give it one more chance if there is no good match. | 
|  | ALOGV("Trying to detect %s separately", name); | 
|  | int32_t matches; | 
|  | bool goodmatchSingle = true; | 
|  | int highestSingle = 0; | 
|  | ucsdet_setText(csd, s, inputLength, &status); | 
|  | const UCharsetMatch** ucma = ucsdet_detectAll(csd, &matches, &status); | 
|  | const UCharsetMatch* bestSingleMatch = getPreferred(s, inputLength, | 
|  | ucma, matches, &goodmatchSingle, &highestSingle); | 
|  | if (goodmatchSingle || highestSingle > highest) | 
|  | enc = ucsdet_getName(bestSingleMatch, &status); | 
|  | else | 
|  | enc = combinedenc; | 
|  | } else { | 
|  | // use encoding determined from the combination of artist/album/title etc. | 
|  | enc = combinedenc; | 
|  | } | 
|  | } else { | 
|  | if (isPrintableAscii(s, inputLength)) { | 
|  | enc = "UTF-8"; | 
|  | ALOGV("@@@@ %s is ascii", mNames.getEntry(i)); | 
|  | } else { | 
|  | ucsdet_setText(csd, s, inputLength, &status); | 
|  | ucm = ucsdet_detect(csd, &status); | 
|  | if (!ucm) { | 
|  | mValues.setEntry(i, "???"); | 
|  | continue; | 
|  | } | 
|  | enc = ucsdet_getName(ucm, &status); | 
|  | ALOGV("@@@@ recognized charset: %s for %s confidence %d", | 
|  | enc, mNames.getEntry(i), ucsdet_getConfidence(ucm, &status)); | 
|  | } | 
|  | } | 
|  |  | 
|  | if (strcmp(enc,"UTF-8") != 0) { | 
|  | // only convert if the source encoding isn't already UTF-8 | 
|  | ALOGV("@@@ using converter %s for %s", enc, mNames.getEntry(i)); | 
|  | status = U_ZERO_ERROR; | 
|  | UConverter *conv = ucnv_open(enc, &status); | 
|  | if (U_FAILURE(status)) { | 
|  | ALOGW("could not create UConverter for %s (%d), falling back to ISO-8859-1", | 
|  | enc, status); | 
|  | status = U_ZERO_ERROR; | 
|  | conv = ucnv_open("ISO-8859-1", &status); | 
|  | if (U_FAILURE(status)) { | 
|  | ALOGW("could not create UConverter for ISO-8859-1 either"); | 
|  | continue; | 
|  | } | 
|  | } | 
|  |  | 
|  | // convert from native encoding to UTF-8 | 
|  | const char* source = mValues.getEntry(i); | 
|  | int targetLength = len * 3 + 1; | 
|  | char* buffer = new char[targetLength]; | 
|  | // don't normally check for NULL, but in this case targetLength may be large | 
|  | if (!buffer) | 
|  | break; | 
|  | char* target = buffer; | 
|  |  | 
|  | ucnv_convertEx(mUtf8Conv, conv, &target, target + targetLength, | 
|  | &source, source + strlen(source), | 
|  | NULL, NULL, NULL, NULL, TRUE, TRUE, &status); | 
|  |  | 
|  | if (U_FAILURE(status)) { | 
|  | ALOGE("ucnv_convertEx failed: %d", status); | 
|  | mValues.setEntry(i, "???"); | 
|  | } else { | 
|  | // zero terminate | 
|  | *target = 0; | 
|  | // strip trailing spaces | 
|  | while (--target > buffer && *target == ' ') { | 
|  | *target = 0; | 
|  | } | 
|  | // skip leading spaces | 
|  | char *start = buffer; | 
|  | while (*start == ' ') { | 
|  | start++; | 
|  | } | 
|  | mValues.setEntry(i, start); | 
|  | } | 
|  |  | 
|  | delete[] buffer; | 
|  |  | 
|  | ucnv_close(conv); | 
|  | } | 
|  | } | 
|  |  | 
|  | for (int i = size - 1; i >= 0; --i) { | 
|  | if (strlen(mValues.getEntry(i)) == 0) { | 
|  | ALOGV("erasing %s because entry is empty", mNames.getEntry(i)); | 
|  | mNames.erase(i); | 
|  | mValues.erase(i); | 
|  | } | 
|  | } | 
|  |  | 
|  | ucsdet_close(csd); | 
|  | } | 
|  | } | 
|  |  | 
|  | /* | 
|  | * When ICU detects multiple encoding matches, apply additional heuristics to determine | 
|  | * which one is the best match, since ICU can't always be trusted to make the right choice. | 
|  | * | 
|  | * What this method does is: | 
|  | * - decode the input using each of the matches found | 
|  | * - recalculate the starting confidence level for multibyte encodings using a different | 
|  | *   algorithm and larger frequent character lists than ICU | 
|  | * - devalue encoding where the conversion contains unlikely characters (symbols, reserved, etc) | 
|  | * - pick the highest match | 
|  | * - signal to the caller whether this match is considered good: confidence > 15, and confidence | 
|  | *   delta with the next runner up > 15 | 
|  | */ | 
|  | const UCharsetMatch *CharacterEncodingDetector::getPreferred( | 
|  | const char *input, size_t len, | 
|  | const UCharsetMatch** ucma, size_t nummatches, | 
|  | bool *goodmatch, int *highestmatch) { | 
|  |  | 
|  | *goodmatch = false; | 
|  | Vector<const UCharsetMatch*> matches; | 
|  | UErrorCode status = U_ZERO_ERROR; | 
|  |  | 
|  | ALOGV("%zu matches", nummatches); | 
|  | for (size_t i = 0; i < nummatches; i++) { | 
|  | const char *encname = ucsdet_getName(ucma[i], &status); | 
|  | int confidence = ucsdet_getConfidence(ucma[i], &status); | 
|  | ALOGV("%zu: %s %d", i, encname, confidence); | 
|  | matches.push_back(ucma[i]); | 
|  | } | 
|  |  | 
|  | size_t num = matches.size(); | 
|  | if (num == 0) { | 
|  | return NULL; | 
|  | } | 
|  | if (num == 1) { | 
|  | int confidence = ucsdet_getConfidence(matches[0], &status); | 
|  | if (confidence > 15) { | 
|  | *goodmatch = true; | 
|  | } | 
|  | return matches[0]; | 
|  | } | 
|  |  | 
|  | ALOGV("considering %zu matches", num); | 
|  |  | 
|  | // keep track of how many "special" characters result when converting the input using each | 
|  | // encoding | 
|  | Vector<int> newconfidence; | 
|  | for (size_t i = 0; i < num; i++) { | 
|  | const uint16_t *freqdata = NULL; | 
|  | float freqcoverage = 0; | 
|  | status = U_ZERO_ERROR; | 
|  | const char *encname = ucsdet_getName(matches[i], &status); | 
|  | int confidence = ucsdet_getConfidence(matches[i], &status); | 
|  | if (!strcmp("GB18030", encname)) { | 
|  | freqdata = frequent_zhCN; | 
|  | freqcoverage = frequent_zhCN_coverage; | 
|  | } else if (!strcmp("Big5", encname)) { | 
|  | freqdata = frequent_zhTW; | 
|  | freqcoverage = frequent_zhTW_coverage; | 
|  | } else if (!strcmp("EUC-KR", encname)) { | 
|  | freqdata = frequent_ko; | 
|  | freqcoverage = frequent_ko_coverage; | 
|  | } else if (!strcmp("EUC-JP", encname)) { | 
|  | freqdata = frequent_ja; | 
|  | freqcoverage = frequent_ja_coverage; | 
|  | } else if (!strcmp("Shift_JIS", encname)) { | 
|  | freqdata = frequent_ja; | 
|  | freqcoverage = frequent_ja_coverage; | 
|  | } | 
|  |  | 
|  | ALOGV("%zu: %s %d", i, encname, confidence); | 
|  | status = U_ZERO_ERROR; | 
|  | UConverter *conv = ucnv_open(encname, &status); | 
|  | int demerit = 0; | 
|  | if (U_FAILURE(status)) { | 
|  | ALOGV("failed to open %s: %d", encname, status); | 
|  | confidence = 0; | 
|  | demerit += 1000; | 
|  | } | 
|  | const char *source = input; | 
|  | const char *sourceLimit = input + len; | 
|  | status = U_ZERO_ERROR; | 
|  | int frequentchars = 0; | 
|  | int totalchars = 0; | 
|  | while (true) { | 
|  | // demerit the current encoding for each "special" character found after conversion. | 
|  | // The amount of demerit is somewhat arbitrarily chosen. | 
|  | int inchar; | 
|  | if (source != sourceLimit) { | 
|  | inchar = (source[0] << 8) + source[1]; | 
|  | } | 
|  | UChar32 c = ucnv_getNextUChar(conv, &source, sourceLimit, &status); | 
|  | if (!U_SUCCESS(status)) { | 
|  | break; | 
|  | } | 
|  | if (c < 0x20 || (c >= 0x7f && c <= 0x009f)) { | 
|  | ALOGV("control character %x", c); | 
|  | demerit += 100; | 
|  | } else if ((c == 0xa0)                      // no-break space | 
|  | || (c >= 0xa2 && c <= 0xbe)         // symbols, superscripts | 
|  | || (c == 0xd7) || (c == 0xf7)       // multiplication and division signs | 
|  | || (c >= 0x2000 && c <= 0x209f)) {  // punctuation, superscripts | 
|  | ALOGV("unlikely character %x", c); | 
|  | demerit += 10; | 
|  | } else if (c >= 0xe000 && c <= 0xf8ff) { | 
|  | ALOGV("private use character %x", c); | 
|  | demerit += 30; | 
|  | } else if (c >= 0x2190 && c <= 0x2bff) { | 
|  | // this range comprises various symbol ranges that are unlikely to appear in | 
|  | // music file metadata. | 
|  | ALOGV("symbol %x", c); | 
|  | demerit += 10; | 
|  | } else if (c == 0xfffd) { | 
|  | ALOGV("replacement character"); | 
|  | demerit += 50; | 
|  | } else if (c >= 0xfff0 && c <= 0xfffc) { | 
|  | ALOGV("unicode special %x", c); | 
|  | demerit += 50; | 
|  | } else if (freqdata != NULL) { | 
|  | totalchars++; | 
|  | if (isFrequent(freqdata, c)) { | 
|  | frequentchars++; | 
|  | } | 
|  | } | 
|  | } | 
|  | if (freqdata != NULL && totalchars != 0) { | 
|  | int myconfidence = 10 + float((100 * frequentchars) / totalchars) / freqcoverage; | 
|  | ALOGV("ICU confidence: %d, my confidence: %d (%d %d)", confidence, myconfidence, | 
|  | totalchars, frequentchars); | 
|  | if (myconfidence > 100) myconfidence = 100; | 
|  | if (myconfidence < 0) myconfidence = 0; | 
|  | confidence = myconfidence; | 
|  | } | 
|  | ALOGV("%d-%d=%d", confidence, demerit, confidence - demerit); | 
|  | newconfidence.push_back(confidence - demerit); | 
|  | ucnv_close(conv); | 
|  | if (i == 0 && (confidence - demerit) == 100) { | 
|  | // no need to check any further, we'll end up using this match anyway | 
|  | break; | 
|  | } | 
|  | } | 
|  |  | 
|  | // find match with highest confidence after adjusting for unlikely characters | 
|  | int highest = newconfidence[0]; | 
|  | size_t highestidx = 0; | 
|  | int runnerup = -10000; | 
|  | int runnerupidx = -10000; | 
|  | num = newconfidence.size(); | 
|  | for (size_t i = 1; i < num; i++) { | 
|  | if (newconfidence[i] > highest) { | 
|  | runnerup = highest; | 
|  | runnerupidx = highestidx; | 
|  | highest = newconfidence[i]; | 
|  | highestidx = i; | 
|  | } else if (newconfidence[i] > runnerup){ | 
|  | runnerup = newconfidence[i]; | 
|  | runnerupidx = i; | 
|  | } | 
|  | } | 
|  | status = U_ZERO_ERROR; | 
|  | ALOGV("selecting: '%s' w/ %d confidence", | 
|  | ucsdet_getName(matches[highestidx], &status), highest); | 
|  | if (runnerupidx < 0) { | 
|  | ALOGV("no runner up"); | 
|  | if (highest > 15) { | 
|  | *goodmatch = true; | 
|  | } | 
|  | } else { | 
|  | ALOGV("runner up: '%s' w/ %d confidence", | 
|  | ucsdet_getName(matches[runnerupidx], &status), runnerup); | 
|  | if (runnerup < 0) { | 
|  | runnerup = 0; | 
|  | } | 
|  | if ((highest - runnerup) > 15) { | 
|  | *goodmatch = true; | 
|  | } | 
|  | } | 
|  | *highestmatch = highest; | 
|  | return matches[highestidx]; | 
|  | } | 
|  |  | 
|  |  | 
|  | bool CharacterEncodingDetector::isFrequent(const uint16_t *values, uint32_t c) { | 
|  |  | 
|  | int start = 0; | 
|  | int end = 511; // All the tables have 512 entries | 
|  | int mid = (start+end)/2; | 
|  |  | 
|  | while(start <= end) { | 
|  | if(c == values[mid]) { | 
|  | return true; | 
|  | } else if (c > values[mid]) { | 
|  | start = mid + 1; | 
|  | } else { | 
|  | end = mid - 1; | 
|  | } | 
|  |  | 
|  | mid = (start + end) / 2; | 
|  | } | 
|  |  | 
|  | return false; | 
|  | } | 
|  |  | 
|  |  | 
|  | }  // namespace android |