diff options
Diffstat (limited to 'deps/node/deps/icu-small/source/i18n/tridpars.cpp')
| -rw-r--r-- | deps/node/deps/icu-small/source/i18n/tridpars.cpp | 934 |
1 files changed, 0 insertions, 934 deletions
diff --git a/deps/node/deps/icu-small/source/i18n/tridpars.cpp b/deps/node/deps/icu-small/source/i18n/tridpars.cpp deleted file mode 100644 index 68bbd2d0..00000000 --- a/deps/node/deps/icu-small/source/i18n/tridpars.cpp +++ /dev/null @@ -1,934 +0,0 @@ -// © 2016 and later: Unicode, Inc. and others. -// License & terms of use: http://www.unicode.org/copyright.html -/* -********************************************************************** -* Copyright (c) 2002-2014, International Business Machines Corporation -* and others. All Rights Reserved. -********************************************************************** -* Date Name Description -* 01/14/2002 aliu Creation. -********************************************************************** -*/ - -#include "unicode/utypes.h" - -#if !UCONFIG_NO_TRANSLITERATION - -#include "tridpars.h" -#include "hash.h" -#include "mutex.h" -#include "transreg.h" -#include "uassert.h" -#include "ucln_in.h" -#include "unicode/parsepos.h" -#include "unicode/translit.h" -#include "unicode/uchar.h" -#include "unicode/uniset.h" -#include "unicode/unistr.h" -#include "unicode/utrans.h" -#include "util.h" -#include "uvector.h" - -U_NAMESPACE_BEGIN - -static const UChar ID_DELIM = 0x003B; // ; -static const UChar TARGET_SEP = 0x002D; // - -static const UChar VARIANT_SEP = 0x002F; // / -static const UChar OPEN_REV = 0x0028; // ( -static const UChar CLOSE_REV = 0x0029; // ) - -//static const UChar EMPTY[] = {0}; // "" -static const UChar ANY[] = {65,110,121,0}; // "Any" -static const UChar ANY_NULL[] = {65,110,121,45,78,117,108,108,0}; // "Any-Null" - -static const int32_t FORWARD = UTRANS_FORWARD; -static const int32_t REVERSE = UTRANS_REVERSE; - -static Hashtable* SPECIAL_INVERSES = NULL; -static UInitOnce gSpecialInversesInitOnce = U_INITONCE_INITIALIZER; - -/** - * The mutex controlling access to SPECIAL_INVERSES - */ -static UMutex LOCK = U_MUTEX_INITIALIZER; - -TransliteratorIDParser::Specs::Specs(const UnicodeString& s, const UnicodeString& t, - const UnicodeString& v, UBool sawS, - const UnicodeString& f) { - source = s; - target = t; - variant = v; - sawSource = sawS; - filter = f; -} - -TransliteratorIDParser::SingleID::SingleID(const UnicodeString& c, const UnicodeString& b, - const UnicodeString& f) { - canonID = c; - basicID = b; - filter = f; -} - -TransliteratorIDParser::SingleID::SingleID(const UnicodeString& c, const UnicodeString& b) { - canonID = c; - basicID = b; -} - -Transliterator* TransliteratorIDParser::SingleID::createInstance() { - Transliterator* t; - if (basicID.length() == 0) { - t = createBasicInstance(UnicodeString(TRUE, ANY_NULL, 8), &canonID); - } else { - t = createBasicInstance(basicID, &canonID); - } - if (t != NULL) { - if (filter.length() != 0) { - UErrorCode ec = U_ZERO_ERROR; - UnicodeSet *set = new UnicodeSet(filter, ec); - if (U_FAILURE(ec)) { - delete set; - } else { - t->adoptFilter(set); - } - } - } - return t; -} - - -/** - * Parse a single ID, that is, an ID of the general form - * "[f1] s1-t1/v1 ([f2] s2-t3/v2)", with the parenthesized element - * optional, the filters optional, and the variants optional. - * @param id the id to be parsed - * @param pos INPUT-OUTPUT parameter. On input, the position of - * the first character to parse. On output, the position after - * the last character parsed. - * @param dir the direction. If the direction is REVERSE then the - * SingleID is constructed for the reverse direction. - * @return a SingleID object or NULL - */ -TransliteratorIDParser::SingleID* -TransliteratorIDParser::parseSingleID(const UnicodeString& id, int32_t& pos, - int32_t dir, UErrorCode& status) { - - int32_t start = pos; - - // The ID will be of the form A, A(), A(B), or (B), where - // A and B are filter IDs. - Specs* specsA = NULL; - Specs* specsB = NULL; - UBool sawParen = FALSE; - - // On the first pass, look for (B) or (). If this fails, then - // on the second pass, look for A, A(B), or A(). - for (int32_t pass=1; pass<=2; ++pass) { - if (pass == 2) { - specsA = parseFilterID(id, pos, TRUE); - if (specsA == NULL) { - pos = start; - return NULL; - } - } - if (ICU_Utility::parseChar(id, pos, OPEN_REV)) { - sawParen = TRUE; - if (!ICU_Utility::parseChar(id, pos, CLOSE_REV)) { - specsB = parseFilterID(id, pos, TRUE); - // Must close with a ')' - if (specsB == NULL || !ICU_Utility::parseChar(id, pos, CLOSE_REV)) { - delete specsA; - pos = start; - return NULL; - } - } - break; - } - } - - // Assemble return results - SingleID* single; - if (sawParen) { - if (dir == FORWARD) { - SingleID* b = specsToID(specsB, FORWARD); - single = specsToID(specsA, FORWARD); - // Null pointers check - if (b == NULL || single == NULL) { - delete b; - delete single; - status = U_MEMORY_ALLOCATION_ERROR; - return NULL; - } - single->canonID.append(OPEN_REV) - .append(b->canonID).append(CLOSE_REV); - if (specsA != NULL) { - single->filter = specsA->filter; - } - delete b; - } else { - SingleID* a = specsToID(specsA, FORWARD); - single = specsToID(specsB, FORWARD); - // Check for null pointer. - if (a == NULL || single == NULL) { - delete a; - delete single; - status = U_MEMORY_ALLOCATION_ERROR; - return NULL; - } - single->canonID.append(OPEN_REV) - .append(a->canonID).append(CLOSE_REV); - if (specsB != NULL) { - single->filter = specsB->filter; - } - delete a; - } - } else { - // assert(specsA != NULL); - if (dir == FORWARD) { - single = specsToID(specsA, FORWARD); - } else { - single = specsToSpecialInverse(*specsA, status); - if (single == NULL) { - single = specsToID(specsA, REVERSE); - } - } - // Check for NULL pointer - if (single == NULL) { - status = U_MEMORY_ALLOCATION_ERROR; - return NULL; - } - single->filter = specsA->filter; - } - - delete specsA; - delete specsB; - - return single; -} - -/** - * Parse a filter ID, that is, an ID of the general form - * "[f1] s1-t1/v1", with the filters optional, and the variants optional. - * @param id the id to be parsed - * @param pos INPUT-OUTPUT parameter. On input, the position of - * the first character to parse. On output, the position after - * the last character parsed. - * @return a SingleID object or null if the parse fails - */ -TransliteratorIDParser::SingleID* -TransliteratorIDParser::parseFilterID(const UnicodeString& id, int32_t& pos) { - - int32_t start = pos; - - Specs* specs = parseFilterID(id, pos, TRUE); - if (specs == NULL) { - pos = start; - return NULL; - } - - // Assemble return results - SingleID* single = specsToID(specs, FORWARD); - if (single != NULL) { - single->filter = specs->filter; - } - delete specs; - return single; -} - -/** - * Parse a global filter of the form "[f]" or "([f])", depending - * on 'withParens'. - * @param id the pattern the parse - * @param pos INPUT-OUTPUT parameter. On input, the position of - * the first character to parse. On output, the position after - * the last character parsed. - * @param dir the direction. - * @param withParens INPUT-OUTPUT parameter. On entry, if - * withParens is 0, then parens are disallowed. If it is 1, - * then parens are requires. If it is -1, then parens are - * optional, and the return result will be set to 0 or 1. - * @param canonID OUTPUT parameter. The pattern for the filter - * added to the canonID, either at the end, if dir is FORWARD, or - * at the start, if dir is REVERSE. The pattern will be enclosed - * in parentheses if appropriate, and will be suffixed with an - * ID_DELIM character. May be NULL. - * @return a UnicodeSet object or NULL. A non-NULL results - * indicates a successful parse, regardless of whether the filter - * applies to the given direction. The caller should discard it - * if withParens != (dir == REVERSE). - */ -UnicodeSet* TransliteratorIDParser::parseGlobalFilter(const UnicodeString& id, int32_t& pos, - int32_t dir, - int32_t& withParens, - UnicodeString* canonID) { - UnicodeSet* filter = NULL; - int32_t start = pos; - - if (withParens == -1) { - withParens = ICU_Utility::parseChar(id, pos, OPEN_REV) ? 1 : 0; - } else if (withParens == 1) { - if (!ICU_Utility::parseChar(id, pos, OPEN_REV)) { - pos = start; - return NULL; - } - } - - ICU_Utility::skipWhitespace(id, pos, TRUE); - - if (UnicodeSet::resemblesPattern(id, pos)) { - ParsePosition ppos(pos); - UErrorCode ec = U_ZERO_ERROR; - filter = new UnicodeSet(id, ppos, USET_IGNORE_SPACE, NULL, ec); - /* test for NULL */ - if (filter == 0) { - pos = start; - return 0; - } - if (U_FAILURE(ec)) { - delete filter; - pos = start; - return NULL; - } - - UnicodeString pattern; - id.extractBetween(pos, ppos.getIndex(), pattern); - pos = ppos.getIndex(); - - if (withParens == 1 && !ICU_Utility::parseChar(id, pos, CLOSE_REV)) { - pos = start; - return NULL; - } - - // In the forward direction, append the pattern to the - // canonID. In the reverse, insert it at zero, and invert - // the presence of parens ("A" <-> "(A)"). - if (canonID != NULL) { - if (dir == FORWARD) { - if (withParens == 1) { - pattern.insert(0, OPEN_REV); - pattern.append(CLOSE_REV); - } - canonID->append(pattern).append(ID_DELIM); - } else { - if (withParens == 0) { - pattern.insert(0, OPEN_REV); - pattern.append(CLOSE_REV); - } - canonID->insert(0, pattern); - canonID->insert(pattern.length(), ID_DELIM); - } - } - } - - return filter; -} - -U_CDECL_BEGIN -static void U_CALLCONV _deleteSingleID(void* obj) { - delete (TransliteratorIDParser::SingleID*) obj; -} - -static void U_CALLCONV _deleteTransliteratorTrIDPars(void* obj) { - delete (Transliterator*) obj; -} -U_CDECL_END - -/** - * Parse a compound ID, consisting of an optional forward global - * filter, a separator, one or more single IDs delimited by - * separators, an an optional reverse global filter. The - * separator is a semicolon. The global filters are UnicodeSet - * patterns. The reverse global filter must be enclosed in - * parentheses. - * @param id the pattern the parse - * @param dir the direction. - * @param canonID OUTPUT parameter that receives the canonical ID, - * consisting of canonical IDs for all elements, as returned by - * parseSingleID(), separated by semicolons. Previous contents - * are discarded. - * @param list OUTPUT parameter that receives a list of SingleID - * objects representing the parsed IDs. Previous contents are - * discarded. - * @param globalFilter OUTPUT parameter that receives a pointer to - * a newly created global filter for this ID in this direction, or - * NULL if there is none. - * @return TRUE if the parse succeeds, that is, if the entire - * id is consumed without syntax error. - */ -UBool TransliteratorIDParser::parseCompoundID(const UnicodeString& id, int32_t dir, - UnicodeString& canonID, - UVector& list, - UnicodeSet*& globalFilter) { - UErrorCode ec = U_ZERO_ERROR; - int32_t i; - int32_t pos = 0; - int32_t withParens = 1; - list.removeAllElements(); - UnicodeSet* filter; - globalFilter = NULL; - canonID.truncate(0); - - // Parse leading global filter, if any - withParens = 0; // parens disallowed - filter = parseGlobalFilter(id, pos, dir, withParens, &canonID); - if (filter != NULL) { - if (!ICU_Utility::parseChar(id, pos, ID_DELIM)) { - // Not a global filter; backup and resume - canonID.truncate(0); - pos = 0; - } - if (dir == FORWARD) { - globalFilter = filter; - } else { - delete filter; - } - filter = NULL; - } - - UBool sawDelimiter = TRUE; - for (;;) { - SingleID* single = parseSingleID(id, pos, dir, ec); - if (single == NULL) { - break; - } - if (dir == FORWARD) { - list.addElement(single, ec); - } else { - list.insertElementAt(single, 0, ec); - } - if (U_FAILURE(ec)) { - goto FAIL; - } - if (!ICU_Utility::parseChar(id, pos, ID_DELIM)) { - sawDelimiter = FALSE; - break; - } - } - - if (list.size() == 0) { - goto FAIL; - } - - // Construct canonical ID - for (i=0; i<list.size(); ++i) { - SingleID* single = (SingleID*) list.elementAt(i); - canonID.append(single->canonID); - if (i != (list.size()-1)) { - canonID.append(ID_DELIM); - } - } - - // Parse trailing global filter, if any, and only if we saw - // a trailing delimiter after the IDs. - if (sawDelimiter) { - withParens = 1; // parens required - filter = parseGlobalFilter(id, pos, dir, withParens, &canonID); - if (filter != NULL) { - // Don't require trailing ';', but parse it if present - ICU_Utility::parseChar(id, pos, ID_DELIM); - - if (dir == REVERSE) { - globalFilter = filter; - } else { - delete filter; - } - filter = NULL; - } - } - - // Trailing unparsed text is a syntax error - ICU_Utility::skipWhitespace(id, pos, TRUE); - if (pos != id.length()) { - goto FAIL; - } - - return TRUE; - - FAIL: - UObjectDeleter *save = list.setDeleter(_deleteSingleID); - list.removeAllElements(); - list.setDeleter(save); - delete globalFilter; - globalFilter = NULL; - return FALSE; -} - -/** - * Convert the elements of the 'list' vector, which are SingleID - * objects, into actual Transliterator objects. In the course of - * this, some (or all) entries may be removed. If all entries - * are removed, the NULL transliterator will be added. - * - * Delete entries with empty basicIDs; these are generated by - * elements like "(A)" in the forward direction, or "A()" in - * the reverse. THIS MAY RESULT IN AN EMPTY VECTOR. Convert - * SingleID entries to actual transliterators. - * - * @param list vector of SingleID objects. On exit, vector - * of one or more Transliterators. - * @return new value of insertIndex. The index will shift if - * there are empty items, like "(Lower)", with indices less than - * insertIndex. - */ -void TransliteratorIDParser::instantiateList(UVector& list, - UErrorCode& ec) { - UVector tlist(ec); - if (U_FAILURE(ec)) { - goto RETURN; - } - tlist.setDeleter(_deleteTransliteratorTrIDPars); - - Transliterator* t; - int32_t i; - for (i=0; i<=list.size(); ++i) { // [sic]: i<=list.size() - // We run the loop too long by one, so we can - // do an insert after the last element - if (i==list.size()) { - break; - } - - SingleID* single = (SingleID*) list.elementAt(i); - if (single->basicID.length() != 0) { - t = single->createInstance(); - if (t == NULL) { - ec = U_INVALID_ID; - goto RETURN; - } - tlist.addElement(t, ec); - if (U_FAILURE(ec)) { - delete t; - goto RETURN; - } - } - } - - // An empty list is equivalent to a NULL transliterator. - if (tlist.size() == 0) { - t = createBasicInstance(UnicodeString(TRUE, ANY_NULL, 8), NULL); - if (t == NULL) { - // Should never happen - ec = U_INTERNAL_TRANSLITERATOR_ERROR; - } - tlist.addElement(t, ec); - if (U_FAILURE(ec)) { - delete t; - } - } - - RETURN: - - UObjectDeleter *save = list.setDeleter(_deleteSingleID); - list.removeAllElements(); - - if (U_SUCCESS(ec)) { - list.setDeleter(_deleteTransliteratorTrIDPars); - - while (tlist.size() > 0) { - t = (Transliterator*) tlist.orphanElementAt(0); - list.addElement(t, ec); - if (U_FAILURE(ec)) { - delete t; - list.removeAllElements(); - break; - } - } - } - - list.setDeleter(save); -} - -/** - * Parse an ID into pieces. Take IDs of the form T, T/V, S-T, - * S-T/V, or S/V-T. If the source is missing, return a source of - * ANY. - * @param id the id string, in any of several forms - * @return an array of 4 strings: source, target, variant, and - * isSourcePresent. If the source is not present, ANY will be - * given as the source, and isSourcePresent will be NULL. Otherwise - * isSourcePresent will be non-NULL. The target may be empty if the - * id is not well-formed. The variant may be empty. - */ -void TransliteratorIDParser::IDtoSTV(const UnicodeString& id, - UnicodeString& source, - UnicodeString& target, - UnicodeString& variant, - UBool& isSourcePresent) { - source.setTo(ANY, 3); - target.truncate(0); - variant.truncate(0); - - int32_t sep = id.indexOf(TARGET_SEP); - int32_t var = id.indexOf(VARIANT_SEP); - if (var < 0) { - var = id.length(); - } - isSourcePresent = FALSE; - - if (sep < 0) { - // Form: T/V or T (or /V) - id.extractBetween(0, var, target); - id.extractBetween(var, id.length(), variant); - } else if (sep < var) { - // Form: S-T/V or S-T (or -T/V or -T) - if (sep > 0) { - id.extractBetween(0, sep, source); - isSourcePresent = TRUE; - } - id.extractBetween(++sep, var, target); - id.extractBetween(var, id.length(), variant); - } else { - // Form: (S/V-T or /V-T) - if (var > 0) { - id.extractBetween(0, var, source); - isSourcePresent = TRUE; - } - id.extractBetween(var, sep++, variant); - id.extractBetween(sep, id.length(), target); - } - - if (variant.length() > 0) { - variant.remove(0, 1); - } -} - -/** - * Given source, target, and variant strings, concatenate them into a - * full ID. If the source is empty, then "Any" will be used for the - * source, so the ID will always be of the form s-t/v or s-t. - */ -void TransliteratorIDParser::STVtoID(const UnicodeString& source, - const UnicodeString& target, - const UnicodeString& variant, - UnicodeString& id) { - id = source; - if (id.length() == 0) { - id.setTo(ANY, 3); - } - id.append(TARGET_SEP).append(target); - if (variant.length() != 0) { - id.append(VARIANT_SEP).append(variant); - } - // NUL-terminate the ID string for getTerminatedBuffer. - // This prevents valgrind and Purify warnings. - id.append((UChar)0); - id.truncate(id.length()-1); -} - -/** - * Register two targets as being inverses of one another. For - * example, calling registerSpecialInverse("NFC", "NFD", TRUE) causes - * Transliterator to form the following inverse relationships: - * - * <pre>NFC => NFD - * Any-NFC => Any-NFD - * NFD => NFC - * Any-NFD => Any-NFC</pre> - * - * (Without the special inverse registration, the inverse of NFC - * would be NFC-Any.) Note that NFD is shorthand for Any-NFD, but - * that the presence or absence of "Any-" is preserved. - * - * <p>The relationship is symmetrical; registering (a, b) is - * equivalent to registering (b, a). - * - * <p>The relevant IDs must still be registered separately as - * factories or classes. - * - * <p>Only the targets are specified. Special inverses always - * have the form Any-Target1 <=> Any-Target2. The target should - * have canonical casing (the casing desired to be produced when - * an inverse is formed) and should contain no whitespace or other - * extraneous characters. - * - * @param target the target against which to register the inverse - * @param inverseTarget the inverse of target, that is - * Any-target.getInverse() => Any-inverseTarget - * @param bidirectional if TRUE, register the reverse relation - * as well, that is, Any-inverseTarget.getInverse() => Any-target - */ -void TransliteratorIDParser::registerSpecialInverse(const UnicodeString& target, - const UnicodeString& inverseTarget, - UBool bidirectional, - UErrorCode &status) { - umtx_initOnce(gSpecialInversesInitOnce, init, status); - if (U_FAILURE(status)) { - return; - } - - // If target == inverseTarget then force bidirectional => FALSE - if (bidirectional && 0==target.caseCompare(inverseTarget, U_FOLD_CASE_DEFAULT)) { - bidirectional = FALSE; - } - - Mutex lock(&LOCK); - - UnicodeString *tempus = new UnicodeString(inverseTarget); // Used for null pointer check before usage. - if (tempus == NULL) { - status = U_MEMORY_ALLOCATION_ERROR; - return; - } - SPECIAL_INVERSES->put(target, tempus, status); - if (bidirectional) { - tempus = new UnicodeString(target); - if (tempus == NULL) { - status = U_MEMORY_ALLOCATION_ERROR; - return; - } - SPECIAL_INVERSES->put(inverseTarget, tempus, status); - } -} - -//---------------------------------------------------------------- -// Private implementation -//---------------------------------------------------------------- - -/** - * Parse an ID into component pieces. Take IDs of the form T, - * T/V, S-T, S-T/V, or S/V-T. If the source is missing, return a - * source of ANY. - * @param id the id string, in any of several forms - * @param pos INPUT-OUTPUT parameter. On input, pos is the - * offset of the first character to parse in id. On output, - * pos is the offset after the last parsed character. If the - * parse failed, pos will be unchanged. - * @param allowFilter2 if TRUE, a UnicodeSet pattern is allowed - * at any location between specs or delimiters, and is returned - * as the fifth string in the array. - * @return a Specs object, or NULL if the parse failed. If - * neither source nor target was seen in the parsed id, then the - * parse fails. If allowFilter is TRUE, then the parsed filter - * pattern is returned in the Specs object, otherwise the returned - * filter reference is NULL. If the parse fails for any reason - * NULL is returned. - */ -TransliteratorIDParser::Specs* -TransliteratorIDParser::parseFilterID(const UnicodeString& id, int32_t& pos, - UBool allowFilter) { - UnicodeString first; - UnicodeString source; - UnicodeString target; - UnicodeString variant; - UnicodeString filter; - UChar delimiter = 0; - int32_t specCount = 0; - int32_t start = pos; - - // This loop parses one of the following things with each - // pass: a filter, a delimiter character (either '-' or '/'), - // or a spec (source, target, or variant). - for (;;) { - ICU_Utility::skipWhitespace(id, pos, TRUE); - if (pos == id.length()) { - break; - } - - // Parse filters - if (allowFilter && filter.length() == 0 && - UnicodeSet::resemblesPattern(id, pos)) { - - ParsePosition ppos(pos); - UErrorCode ec = U_ZERO_ERROR; - UnicodeSet set(id, ppos, USET_IGNORE_SPACE, NULL, ec); - if (U_FAILURE(ec)) { - pos = start; - return NULL; - } - id.extractBetween(pos, ppos.getIndex(), filter); - pos = ppos.getIndex(); - continue; - } - - if (delimiter == 0) { - UChar c = id.charAt(pos); - if ((c == TARGET_SEP && target.length() == 0) || - (c == VARIANT_SEP && variant.length() == 0)) { - delimiter = c; - ++pos; - continue; - } - } - - // We are about to try to parse a spec with no delimiter - // when we can no longer do so (we can only do so at the - // start); break. - if (delimiter == 0 && specCount > 0) { - break; - } - - UnicodeString spec = ICU_Utility::parseUnicodeIdentifier(id, pos); - if (spec.length() == 0) { - // Note that if there was a trailing delimiter, we - // consume it. So Foo-, Foo/, Foo-Bar/, and Foo/Bar- - // are legal. - break; - } - - switch (delimiter) { - case 0: - first = spec; - break; - case TARGET_SEP: - target = spec; - break; - case VARIANT_SEP: - variant = spec; - break; - } - ++specCount; - delimiter = 0; - } - - // A spec with no prior character is either source or target, - // depending on whether an explicit "-target" was seen. - if (first.length() != 0) { - if (target.length() == 0) { - target = first; - } else { - source = first; - } - } - - // Must have either source or target - if (source.length() == 0 && target.length() == 0) { - pos = start; - return NULL; - } - - // Empty source or target defaults to ANY - UBool sawSource = TRUE; - if (source.length() == 0) { - source.setTo(ANY, 3); - sawSource = FALSE; - } - if (target.length() == 0) { - target.setTo(ANY, 3); - } - - return new Specs(source, target, variant, sawSource, filter); -} - -/** - * Givens a Spec object, convert it to a SingleID object. The - * Spec object is a more unprocessed parse result. The SingleID - * object contains information about canonical and basic IDs. - * @return a SingleID; never returns NULL. Returned object always - * has 'filter' field of NULL. - */ -TransliteratorIDParser::SingleID* -TransliteratorIDParser::specsToID(const Specs* specs, int32_t dir) { - UnicodeString canonID; - UnicodeString basicID; - UnicodeString basicPrefix; - if (specs != NULL) { - UnicodeString buf; - if (dir == FORWARD) { - if (specs->sawSource) { - buf.append(specs->source).append(TARGET_SEP); - } else { - basicPrefix = specs->source; - basicPrefix.append(TARGET_SEP); - } - buf.append(specs->target); - } else { - buf.append(specs->target).append(TARGET_SEP).append(specs->source); - } - if (specs->variant.length() != 0) { - buf.append(VARIANT_SEP).append(specs->variant); - } - basicID = basicPrefix; - basicID.append(buf); - if (specs->filter.length() != 0) { - buf.insert(0, specs->filter); - } - canonID = buf; - } - return new SingleID(canonID, basicID); -} - -/** - * Given a Specs object, return a SingleID representing the - * special inverse of that ID. If there is no special inverse - * then return NULL. - * @return a SingleID or NULL. Returned object always has - * 'filter' field of NULL. - */ -TransliteratorIDParser::SingleID* -TransliteratorIDParser::specsToSpecialInverse(const Specs& specs, UErrorCode &status) { - if (0!=specs.source.caseCompare(ANY, 3, U_FOLD_CASE_DEFAULT)) { - return NULL; - } - umtx_initOnce(gSpecialInversesInitOnce, init, status); - if (U_FAILURE(status)) { - return NULL; - } - - UnicodeString* inverseTarget; - - umtx_lock(&LOCK); - inverseTarget = (UnicodeString*) SPECIAL_INVERSES->get(specs.target); - umtx_unlock(&LOCK); - - if (inverseTarget != NULL) { - // If the original ID contained "Any-" then make the - // special inverse "Any-Foo"; otherwise make it "Foo". - // So "Any-NFC" => "Any-NFD" but "NFC" => "NFD". - UnicodeString buf; - if (specs.filter.length() != 0) { - buf.append(specs.filter); - } - if (specs.sawSource) { - buf.append(ANY, 3).append(TARGET_SEP); - } - buf.append(*inverseTarget); - - UnicodeString basicID(TRUE, ANY, 3); - basicID.append(TARGET_SEP).append(*inverseTarget); - - if (specs.variant.length() != 0) { - buf.append(VARIANT_SEP).append(specs.variant); - basicID.append(VARIANT_SEP).append(specs.variant); - } - return new SingleID(buf, basicID); - } - return NULL; -} - -/** - * Glue method to get around access problems in C++. This would - * ideally be inline but we want to avoid a circular header - * dependency. - */ -Transliterator* TransliteratorIDParser::createBasicInstance(const UnicodeString& id, const UnicodeString* canonID) { - return Transliterator::createBasicInstance(id, canonID); -} - -/** - * Initialize static memory. Called through umtx_initOnce only. - */ -void U_CALLCONV TransliteratorIDParser::init(UErrorCode &status) { - U_ASSERT(SPECIAL_INVERSES == NULL); - ucln_i18n_registerCleanup(UCLN_I18N_TRANSLITERATOR, utrans_transliterator_cleanup); - - SPECIAL_INVERSES = new Hashtable(TRUE, status); - if (SPECIAL_INVERSES == NULL) { - status = U_MEMORY_ALLOCATION_ERROR; - return; - } - SPECIAL_INVERSES->setValueDeleter(uprv_deleteUObject); -} - -/** - * Free static memory. - */ -void TransliteratorIDParser::cleanup() { - if (SPECIAL_INVERSES) { - delete SPECIAL_INVERSES; - SPECIAL_INVERSES = NULL; - } - gSpecialInversesInitOnce.reset(); -} - -U_NAMESPACE_END - -#endif /* #if !UCONFIG_NO_TRANSLITERATION */ - -//eof |