]> git.saurik.com Git - apple/icu.git/blobdiff - icuSources/i18n/ucol_res.cpp
ICU-59117.0.1.tar.gz
[apple/icu.git] / icuSources / i18n / ucol_res.cpp
index 7796ad159c426dbc750f41c781f1796c15dc6bcc..d1597021c3ee4751d7304111ea8e802de20c4b88 100644 (file)
@@ -1,10 +1,12 @@
+// © 2016 and later: Unicode, Inc. and others.
+// License & terms of use: http://www.unicode.org/copyright.html
 /*
 *******************************************************************************
-*   Copyright (C) 1996-2008, International Business Machines
+*   Copyright (C) 1996-2016, International Business Machines
 *   Corporation and others.  All Rights Reserved.
 *******************************************************************************
 *   file name:  ucol_res.cpp
-*   encoding:   US-ASCII
+*   encoding:   UTF-8
 *   tab size:   8 (not used)
 *   indentation:4
 *
 * 03/01/2001  synwee    Added maxexpansion functionality.
 * 03/16/2001  weiv      Collation framework is rewritten in C and made UCA compliant
 * 12/08/2004  grhoten   Split part of ucol.cpp into ucol_res.cpp
+* 2012-2014   markus    Rewritten in C++ again.
 */
 
 #include "unicode/utypes.h"
 
 #if !UCONFIG_NO_COLLATION
-#include "unicode/uloc.h"
+
 #include "unicode/coll.h"
+#include "unicode/localpointer.h"
+#include "unicode/locid.h"
 #include "unicode/tblcoll.h"
-#include "unicode/caniter.h"
-#include "unicode/ustring.h"
-
-#include "ucol_bld.h"
-#include "ucol_imp.h"
-#include "ucol_tok.h"
-#include "ucol_elm.h"
-#include "uresimp.h"
-#include "ustr_imp.h"
+#include "unicode/ucol.h"
+#include "unicode/uloc.h"
+#include "unicode/unistr.h"
+#include "unicode/ures.h"
+#include "charstr.h"
+#include "cmemory.h"
 #include "cstring.h"
-#include "umutex.h"
+#include "collationdatareader.h"
+#include "collationroot.h"
+#include "collationtailoring.h"
+#include "resource.h"
+#include "putilimp.h"
+#include "uassert.h"
 #include "ucln_in.h"
+#include "ucol_imp.h"
+#include "uenumimp.h"
+#include "ulist.h"
+#include "umutex.h"
+#include "unifiedcache.h"
+#include "uresimp.h"
 #include "ustrenum.h"
-#include "putilimp.h"
 #include "utracimp.h"
-#include "cmemory.h"
 
-U_NAMESPACE_USE
+U_NAMESPACE_BEGIN
+
+namespace {
 
-// static UCA. There is only one. Collators don't use it.
-// It is referenced only in ucol_initUCA and ucol_cleanup
-static UCollator* _staticUCA = NULL;
-// static pointer to udata memory. Inited in ucol_initUCA
-// used for cleanup in ucol_cleanup
-static UDataMemory* UCA_DATA_MEM = NULL;
+static const UChar *rootRules = NULL;
+static int32_t rootRulesLength = 0;
+static UResourceBundle *rootBundle = NULL;
+static UInitOnce gInitOnce = U_INITONCE_INITIALIZER;
+
+}  // namespace
 
 U_CDECL_BEGIN
+
 static UBool U_CALLCONV
-ucol_res_cleanup(void)
-{
-    if (UCA_DATA_MEM) {
-        udata_close(UCA_DATA_MEM);
-        UCA_DATA_MEM = NULL;
-    }
-    if (_staticUCA) {
-        ucol_close(_staticUCA);
-        _staticUCA = NULL;
-    }
+ucol_res_cleanup() {
+    rootRules = NULL;
+    rootRulesLength = 0;
+    ures_close(rootBundle);
+    rootBundle = NULL;
+    gInitOnce.reset();
     return TRUE;
 }
 
-static UBool U_CALLCONV
-isAcceptableUCA(void * /*context*/,
-             const char * /*type*/, const char * /*name*/,
-             const UDataInfo *pInfo){
-  /* context, type & name are intentionally not used */
-    if( pInfo->size>=20 &&
-        pInfo->isBigEndian==U_IS_BIG_ENDIAN &&
-        pInfo->charsetFamily==U_CHARSET_FAMILY &&
-        pInfo->dataFormat[0]==UCA_DATA_FORMAT_0 &&   /* dataFormat="UCol" */
-        pInfo->dataFormat[1]==UCA_DATA_FORMAT_1 &&
-        pInfo->dataFormat[2]==UCA_DATA_FORMAT_2 &&
-        pInfo->dataFormat[3]==UCA_DATA_FORMAT_3 &&
-        pInfo->formatVersion[0]==UCA_FORMAT_VERSION_0 &&
-        pInfo->formatVersion[1]>=UCA_FORMAT_VERSION_1// &&
-        //pInfo->formatVersion[1]==UCA_FORMAT_VERSION_1 &&
-        //pInfo->formatVersion[2]==UCA_FORMAT_VERSION_2 && // Too harsh
-        //pInfo->formatVersion[3]==UCA_FORMAT_VERSION_3 && // Too harsh
-        ) {
-        UVersionInfo UCDVersion;
-        u_getUnicodeVersion(UCDVersion);
-        return (UBool)(pInfo->dataVersion[0]==UCDVersion[0]
-            && pInfo->dataVersion[1]==UCDVersion[1]);
-            //&& pInfo->dataVersion[2]==ucaDataInfo.dataVersion[2]
-            //&& pInfo->dataVersion[3]==ucaDataInfo.dataVersion[3]);
-    } else {
-        return FALSE;
-    }
+void U_CALLCONV
+CollationLoader::loadRootRules(UErrorCode &errorCode) {
+    if(U_FAILURE(errorCode)) { return; }
+    rootBundle = ures_open(U_ICUDATA_COLL, kRootLocaleName, &errorCode);
+    if(U_FAILURE(errorCode)) { return; }
+    rootRules = ures_getStringByKey(rootBundle, "UCARules", &rootRulesLength, &errorCode);
+    if(U_FAILURE(errorCode)) {
+        ures_close(rootBundle);
+        rootBundle = NULL;
+        return;
+    }
+    ucln_i18n_registerCleanup(UCLN_I18N_UCOL_RES, ucol_res_cleanup);
 }
-U_CDECL_END
 
-/* do not close UCA returned by ucol_initUCA! */
-UCollator *
-ucol_initUCA(UErrorCode *status) {
-    if(U_FAILURE(*status)) {
-        return NULL;
-    }
-    UBool needsInit;
-    UMTX_CHECK(NULL, (_staticUCA == NULL), needsInit);
-
-    if(needsInit) {
-        UDataMemory *result = udata_openChoice(NULL, UCA_DATA_TYPE, UCA_DATA_NAME, isAcceptableUCA, NULL, status);
-
-        if(U_SUCCESS(*status)){
-            UCollator *newUCA = ucol_initCollator((const UCATableHeader *)udata_getMemory(result), NULL, NULL, status);
-            if(U_SUCCESS(*status)){
-                umtx_lock(NULL);
-                if(_staticUCA == NULL) {
-                    _staticUCA = newUCA;
-                    newUCA = NULL;
-                    UCA_DATA_MEM = result;
-                    result = NULL;
-                }
-                umtx_unlock(NULL);
+U_CDECL_END
 
-                ucln_i18n_registerCleanup(UCLN_I18N_UCOL_RES, ucol_res_cleanup);
-                if(newUCA != NULL) {
-                    ucol_close(newUCA);
-                    udata_close(result);
-                }
-                // Initalize variables for implicit generation
-                uprv_uca_initImplicitConstants(status);
-            }else{
-                ucol_close(newUCA);
-                udata_close(result);
-            }
-        }
-        else {
-            udata_close(result);
-        }
+void
+CollationLoader::appendRootRules(UnicodeString &s) {
+    UErrorCode errorCode = U_ZERO_ERROR;
+    umtx_initOnce(gInitOnce, CollationLoader::loadRootRules, errorCode);
+    if(U_SUCCESS(errorCode)) {
+        s.append(rootRules, rootRulesLength);
     }
-    return _staticUCA;
 }
 
-U_CAPI void U_EXPORT2
-ucol_forgetUCA(void)
-{
-    _staticUCA = NULL;
-    UCA_DATA_MEM = NULL;
+void
+CollationLoader::loadRules(const char *localeID, const char *collationType,
+                           UnicodeString &rules, UErrorCode &errorCode) {
+    if(U_FAILURE(errorCode)) { return; }
+    U_ASSERT(collationType != NULL && *collationType != 0);
+    // Copy the type for lowercasing.
+    char type[16];
+    int32_t typeLength = uprv_strlen(collationType);
+    if(typeLength >= UPRV_LENGTHOF(type)) {
+        errorCode = U_ILLEGAL_ARGUMENT_ERROR;
+        return;
+    }
+    uprv_memcpy(type, collationType, typeLength + 1);
+    T_CString_toLowerCase(type);
+
+    LocalUResourceBundlePointer bundle(ures_open(U_ICUDATA_COLL, localeID, &errorCode));
+    LocalUResourceBundlePointer collations(
+            ures_getByKey(bundle.getAlias(), "collations", NULL, &errorCode));
+    LocalUResourceBundlePointer data(
+            ures_getByKeyWithFallback(collations.getAlias(), type, NULL, &errorCode));
+    int32_t length;
+    const UChar *s =  ures_getStringByKey(data.getAlias(), "Sequence", &length, &errorCode);
+    if(U_FAILURE(errorCode)) { return; }
+
+    // No string pointer aliasing so that we need not hold onto the resource bundle.
+    rules.setTo(s, length);
+    if(rules.isBogus()) {
+        errorCode = U_MEMORY_ALLOCATION_ERROR;
+    }
 }
 
-/****************************************************************************/
-/* Following are the open/close functions                                   */
-/*                                                                          */
-/****************************************************************************/
-static UCollator*
-tryOpeningFromRules(UResourceBundle *collElem, UErrorCode *status) {
-    int32_t rulesLen = 0;
-    const UChar *rules = ures_getStringByKey(collElem, "Sequence", &rulesLen, status);
-    return ucol_openRules(rules, rulesLen, UCOL_DEFAULT, UCOL_DEFAULT, NULL, status);
+template<> U_I18N_API
+const CollationCacheEntry *
+LocaleCacheKey<CollationCacheEntry>::createObject(const void *creationContext,
+                                                  UErrorCode &errorCode) const {
+    CollationLoader *loader =
+            reinterpret_cast<CollationLoader *>(
+                    const_cast<void *>(creationContext));
+    return loader->createCacheEntry(errorCode);
 }
 
+const CollationCacheEntry *
+CollationLoader::loadTailoring(const Locale &locale, UErrorCode &errorCode) {
+    const CollationCacheEntry *rootEntry = CollationRoot::getRootCacheEntry(errorCode);
+    if(U_FAILURE(errorCode)) { return NULL; }
+    const char *name = locale.getName();
+    if(*name == 0 || uprv_strcmp(name, "root") == 0) {
 
-// API in ucol_imp.h
-
-U_CFUNC UCollator*
-ucol_open_internal(const char *loc,
-                   UErrorCode *status)
-{
-    UErrorCode intStatus = U_ZERO_ERROR;
-    const UCollator* UCA = ucol_initUCA(status);
-
-    /* New version */
-    if(U_FAILURE(*status)) return 0;
-
-
-
-    UCollator *result = NULL;
-    UResourceBundle *b = ures_open(U_ICUDATA_COLL, loc, status);
-
-    /* we try to find stuff from keyword */
-    UResourceBundle *collations = ures_getByKey(b, "collations", NULL, status);
-    UResourceBundle *collElem = NULL;
-    char keyBuffer[256];
-    // if there is a keyword, we pick it up and try to get elements
-    if(!uloc_getKeywordValue(loc, "collation", keyBuffer, 256, status)) {
-        // no keyword. we try to find the default setting, which will give us the keyword value
-        intStatus = U_ZERO_ERROR;
-        // finding default value does not affect collation fallback status
-        UResourceBundle *defaultColl = ures_getByKeyWithFallback(collations, "default", NULL, &intStatus);
-        if(U_SUCCESS(intStatus)) {
-            int32_t defaultKeyLen = 0;
-            const UChar *defaultKey = ures_getString(defaultColl, &defaultKeyLen, &intStatus);
-            u_UCharsToChars(defaultKey, keyBuffer, defaultKeyLen);
-            keyBuffer[defaultKeyLen] = 0;
-        } else {
-            *status = U_INTERNAL_PROGRAM_ERROR;
-            return NULL;
-        }
-        ures_close(defaultColl);
+        // Have to add a ref.
+        rootEntry->addRef();
+        return rootEntry;
     }
-    collElem = ures_getByKeyWithFallback(collations, keyBuffer, collations, status);
-    collations = NULL; // We just reused the collations object as collElem.
 
-    UResourceBundle *binary = NULL;
-
-    if(*status == U_MISSING_RESOURCE_ERROR) { /* We didn't find the tailoring data, we fallback to the UCA */
-        *status = U_USING_DEFAULT_WARNING;
-        result = ucol_initCollator(UCA->image, result, UCA, status);
-        if (U_FAILURE(*status)) {
-            goto clean;
-        }
-        // if we use UCA, real locale is root
-        ures_close(b);
-        b = ures_open(U_ICUDATA_COLL, "", status);
-        ures_close(collElem);
-        collElem = ures_open(U_ICUDATA_COLL, "", status);
-        if(U_FAILURE(*status)) {
-            goto clean;
-        }
-        result->hasRealData = FALSE;
-    } else if(U_SUCCESS(*status)) {
-        intStatus = U_ZERO_ERROR;
+    // Clear warning codes before loading where they get cached.
+    errorCode = U_ZERO_ERROR;
+    CollationLoader loader(rootEntry, locale, errorCode);
 
-        binary = ures_getByKey(collElem, "%%CollationBin", NULL, &intStatus);
+    // getCacheEntry adds a ref for us.
+    return loader.getCacheEntry(errorCode);
+}
 
-        if(intStatus == U_MISSING_RESOURCE_ERROR) { /* we didn't find the binary image, we should use the rules */
-            binary = NULL;
-            result = tryOpeningFromRules(collElem, status);
-            if(U_FAILURE(*status)) {
-                goto clean;
-            }
-        } else if(U_SUCCESS(*status)) { /* otherwise, we'll pick a collation data that exists */
-            int32_t len = 0;
-            const uint8_t *inData = ures_getBinary(binary, &len, status);
-            UCATableHeader *colData = (UCATableHeader *)inData;
-            if(uprv_memcmp(colData->UCAVersion, UCA->image->UCAVersion, sizeof(UVersionInfo)) != 0 ||
-                uprv_memcmp(colData->UCDVersion, UCA->image->UCDVersion, sizeof(UVersionInfo)) != 0 ||
-                colData->version[0] != UCOL_BUILDER_VERSION)
-            {
-                *status = U_DIFFERENT_UCA_VERSION;
-                result = tryOpeningFromRules(collElem, status);
-            } else {
-                if(U_FAILURE(*status)){
-                    goto clean;
-                }
-                if((uint32_t)len > (paddedsize(sizeof(UCATableHeader)) + paddedsize(sizeof(UColOptionSet)))) {
-                    result = ucol_initCollator((const UCATableHeader *)inData, result, UCA, status);
-                    if(U_FAILURE(*status)){
-                        goto clean;
-                    }
-                    result->hasRealData = TRUE;
-                } else {
-                    result = ucol_initCollator(UCA->image, result, UCA, status);
-                    ucol_setOptionsFromHeader(result, (UColOptionSet *)(inData+((const UCATableHeader *)inData)->options), status);
-                    if(U_FAILURE(*status)){
-                        goto clean;
-                    }
-                    result->hasRealData = FALSE;
-                }
-                result->freeImageOnClose = FALSE;
-            }
+CollationLoader::CollationLoader(const CollationCacheEntry *re, const Locale &requested,
+                                 UErrorCode &errorCode)
+        : cache(UnifiedCache::getInstance(errorCode)), rootEntry(re),
+          validLocale(re->validLocale), locale(requested),
+          typesTried(0), typeFallback(FALSE),
+          bundle(NULL), collations(NULL), data(NULL) {
+    type[0] = 0;
+    defaultType[0] = 0;
+    if(U_FAILURE(errorCode)) { return; }
+
+    // Canonicalize the locale ID: Ignore all irrelevant keywords.
+    const char *baseName = locale.getBaseName();
+    if(uprv_strcmp(locale.getName(), baseName) != 0) {
+        locale = Locale(baseName);
+
+        // Fetch the collation type from the locale ID.
+        int32_t typeLength = requested.getKeywordValue("collation",
+                type, UPRV_LENGTHOF(type) - 1, errorCode);
+        if(U_FAILURE(errorCode)) {
+            errorCode = U_ILLEGAL_ARGUMENT_ERROR;
+            return;
+        }
+        type[typeLength] = 0;  // in case of U_NOT_TERMINATED_WARNING
+        if(typeLength == 0) {
+            // No collation type.
+        } else if(uprv_stricmp(type, "default") == 0) {
+            // Ignore "default" (case-insensitive).
+            type[0] = 0;
+        } else {
+            // Copy the collation type.
+            T_CString_toLowerCase(type);
+            locale.setKeywordValue("collation", type, errorCode);
         }
-        intStatus = U_ZERO_ERROR;
-        result->rules = ures_getStringByKey(collElem, "Sequence", &result->rulesLength, &intStatus);
-        result->freeRulesOnClose = FALSE;
-    } else { /* There is another error, and we're just gonna clean up */
-        goto clean;
-    }
-
-    intStatus = U_ZERO_ERROR;
-    result->ucaRules = ures_getStringByKey(b,"UCARules",NULL,&intStatus);
-
-    if(loc == NULL) {
-        loc = ures_getLocale(b, status);
-    }
-    result->requestedLocale = uprv_strdup(loc);
-    /* test for NULL */
-    if (result->requestedLocale == NULL) {
-        *status = U_MEMORY_ALLOCATION_ERROR;
-        goto clean;
-    }
-    loc = ures_getLocale(collElem, status);
-    result->actualLocale = uprv_strdup(loc);
-    /* test for NULL */
-    if (result->actualLocale == NULL) {
-        *status = U_MEMORY_ALLOCATION_ERROR;
-        goto clean;
-    }
-    loc = ures_getLocale(b, status);
-    result->validLocale = uprv_strdup(loc);
-    /* test for NULL */
-    if (result->validLocale == NULL) {
-        *status = U_MEMORY_ALLOCATION_ERROR;
-        goto clean;
     }
-
-    ures_close(b);
-    ures_close(collElem);
-    ures_close(binary);
-    return result;
-
-clean:
-    ures_close(b);
-    ures_close(collElem);
-    ures_close(binary);
-    ucol_close(result);
-    return NULL;
 }
 
-U_CAPI UCollator*
-ucol_open(const char *loc,
-          UErrorCode *status)
-{
-    U_NAMESPACE_USE
-
-    UTRACE_ENTRY_OC(UTRACE_UCOL_OPEN);
-    UTRACE_DATA1(UTRACE_INFO, "locale = \"%s\"", loc);
-    UCollator *result = NULL;
+CollationLoader::~CollationLoader() {
+    ures_close(data);
+    ures_close(collations);
+    ures_close(bundle);
+}
 
-    u_init(status);
-#if !UCONFIG_NO_SERVICE
-    result = Collator::createUCollator(loc, status);
-    if (result == NULL)
-#endif
-    {
-        result = ucol_open_internal(loc, status);
+const CollationCacheEntry *
+CollationLoader::createCacheEntry(UErrorCode &errorCode) {
+    // This is a linear lookup and fallback flow turned into a state machine.
+    // Most local variables have been turned into instance fields.
+    // In a cache miss, cache.get() calls CacheKey::createObject(),
+    // which means that we progress via recursion.
+    // loadFromCollations() will recurse to itself as well for collation type fallback.
+    if(bundle == NULL) {
+        return loadFromLocale(errorCode);
+    } else if(collations == NULL) {
+        return loadFromBundle(errorCode);
+    } else if(data == NULL) {
+        return loadFromCollations(errorCode);
+    } else {
+        return loadFromData(errorCode);
     }
-    UTRACE_EXIT_PTR_STATUS(result, *status);
-    return result;
 }
 
-U_CAPI UCollator* U_EXPORT2
-ucol_openRules( const UChar        *rules,
-               int32_t            rulesLength,
-               UColAttributeValue normalizationMode,
-               UCollationStrength strength,
-               UParseError        *parseError,
-               UErrorCode         *status)
-{
-    UColTokenParser src;
-    UColAttributeValue norm;
-    UParseError tErr;
-
-    if(status == NULL || U_FAILURE(*status)){
-        return 0;
+const CollationCacheEntry *
+CollationLoader::loadFromLocale(UErrorCode &errorCode) {
+    if(U_FAILURE(errorCode)) { return NULL; }
+    U_ASSERT(bundle == NULL);
+    bundle = ures_openNoDefault(U_ICUDATA_COLL, locale.getBaseName(), &errorCode);
+    if(errorCode == U_MISSING_RESOURCE_ERROR) {
+        errorCode = U_USING_DEFAULT_WARNING;
+
+        // Have to add that ref that we promise.
+        rootEntry->addRef();
+        return rootEntry;
+    }
+    Locale requestedLocale(locale);
+    const char *vLocale = ures_getLocaleByType(bundle, ULOC_ACTUAL_LOCALE, &errorCode);
+    if(U_FAILURE(errorCode)) { return NULL; }
+    locale = validLocale = Locale(vLocale);  // no type until loadFromCollations()
+    if(type[0] != 0) {
+        locale.setKeywordValue("collation", type, errorCode);
+    }
+    if(locale != requestedLocale) {
+        return getCacheEntry(errorCode);
+    } else {
+        return loadFromBundle(errorCode);
     }
+}
 
-    u_init(status);
-    if (U_FAILURE(*status)) {
-        return NULL;
+const CollationCacheEntry *
+CollationLoader::loadFromBundle(UErrorCode &errorCode) {
+    if(U_FAILURE(errorCode)) { return NULL; }
+    U_ASSERT(collations == NULL);
+    // There are zero or more tailorings in the collations table.
+    collations = ures_getByKey(bundle, "collations", NULL, &errorCode);
+    if(errorCode == U_MISSING_RESOURCE_ERROR) {
+        errorCode = U_USING_DEFAULT_WARNING;
+        // Return the root tailoring with the validLocale, without collation type.
+        return makeCacheEntryFromRoot(validLocale, errorCode);
     }
+    if(U_FAILURE(errorCode)) { return NULL; }
 
-    if(rules == NULL || rulesLength < -1) {
-        *status = U_ILLEGAL_ARGUMENT_ERROR;
-        return 0;
+    // Fetch the default type from the data.
+    {
+        UErrorCode internalErrorCode = U_ZERO_ERROR;
+        LocalUResourceBundlePointer def(
+                ures_getByKeyWithFallback(collations, "default", NULL, &internalErrorCode));
+        int32_t length;
+        const UChar *s = ures_getString(def.getAlias(), &length, &internalErrorCode);
+        if(U_SUCCESS(internalErrorCode) && 0 < length && length < UPRV_LENGTHOF(defaultType)) {
+            u_UCharsToChars(s, defaultType, length + 1);
+        } else {
+            uprv_strcpy(defaultType, "standard");
+        }
     }
 
-    if(rulesLength == -1) {
-        rulesLength = u_strlen(rules);
+    // Record which collation types we have looked for already,
+    // so that we do not deadlock in the cache.
+    //
+    // If there is no explicit type, then we look in the cache
+    // for the entry with the default type.
+    // If the explicit type is the default type, then we do not look in the cache
+    // for the entry with an empty type.
+    // Otherwise, two concurrent requests with opposite fallbacks would deadlock each other.
+    // Also, it is easier to always enter the next method with a non-empty type.
+    if(type[0] == 0) {
+        uprv_strcpy(type, defaultType);
+        typesTried |= TRIED_DEFAULT;
+        if(uprv_strcmp(type, "search") == 0) {
+            typesTried |= TRIED_SEARCH;
+        }
+        if(uprv_strcmp(type, "standard") == 0) {
+            typesTried |= TRIED_STANDARD;
+        }
+        locale.setKeywordValue("collation", type, errorCode);
+        return getCacheEntry(errorCode);
+    } else {
+        if(uprv_strcmp(type, defaultType) == 0) {
+            typesTried |= TRIED_DEFAULT;
+        }
+        if(uprv_strcmp(type, "search") == 0) {
+            typesTried |= TRIED_SEARCH;
+        }
+        if(uprv_strcmp(type, "standard") == 0) {
+            typesTried |= TRIED_STANDARD;
+        }
+        return loadFromCollations(errorCode);
     }
+}
 
-    if(parseError == NULL){
-        parseError = &tErr;
+const CollationCacheEntry *
+CollationLoader::loadFromCollations(UErrorCode &errorCode) {
+    if(U_FAILURE(errorCode)) { return NULL; }
+    U_ASSERT(data == NULL);
+    // Load the collations/type tailoring, with type fallback.
+    LocalUResourceBundlePointer localData(
+            ures_getByKeyWithFallback(collations, type, NULL, &errorCode));
+    int32_t typeLength = uprv_strlen(type);
+    if(errorCode == U_MISSING_RESOURCE_ERROR) {
+        errorCode = U_USING_DEFAULT_WARNING;
+        typeFallback = TRUE;
+        if((typesTried & TRIED_SEARCH) == 0 &&
+                typeLength > 6 && uprv_strncmp(type, "search", 6) == 0) {
+            // fall back from something like "searchjl" to "search"
+            typesTried |= TRIED_SEARCH;
+            type[6] = 0;
+        } else if((typesTried & TRIED_DEFAULT) == 0) {
+            // fall back to the default type
+            typesTried |= TRIED_DEFAULT;
+            uprv_strcpy(type, defaultType);
+        } else if((typesTried & TRIED_STANDARD) == 0) {
+            // fall back to the "standard" type
+            typesTried |= TRIED_STANDARD;
+            uprv_strcpy(type, "standard");
+        } else {
+            // Return the root tailoring with the validLocale, without collation type.
+            return makeCacheEntryFromRoot(validLocale, errorCode);
+        }
+        locale.setKeywordValue("collation", type, errorCode);
+        return getCacheEntry(errorCode);
+    }
+    if(U_FAILURE(errorCode)) { return NULL; }
+
+    data = localData.orphan();
+    const char *actualLocale = ures_getLocaleByType(data, ULOC_ACTUAL_LOCALE, &errorCode);
+    if(U_FAILURE(errorCode)) { return NULL; }
+    const char *vLocale = validLocale.getBaseName();
+    UBool actualAndValidLocalesAreDifferent = uprv_strcmp(actualLocale, vLocale) != 0;
+
+    // Set the collation types on the informational locales,
+    // except when they match the default types (for brevity and backwards compatibility).
+    // For the valid locale, suppress the default type.
+    if(uprv_strcmp(type, defaultType) != 0) {
+        validLocale.setKeywordValue("collation", type, errorCode);
+        if(U_FAILURE(errorCode)) { return NULL; }
+    }
+
+    // Is this the same as the root collator? If so, then use that instead.
+    if((*actualLocale == 0 || uprv_strcmp(actualLocale, "root") == 0) &&
+            uprv_strcmp(type, "standard") == 0) {
+        if(typeFallback) {
+            errorCode = U_USING_DEFAULT_WARNING;
+        }
+        return makeCacheEntryFromRoot(validLocale, errorCode);
     }
 
-    switch(normalizationMode) {
-    case UCOL_OFF:
-    case UCOL_ON:
-    case UCOL_DEFAULT:
-        norm = normalizationMode;
-        break;
-    default:
-        *status = U_ILLEGAL_ARGUMENT_ERROR;
-        return 0;
+    locale = Locale(actualLocale);
+    if(actualAndValidLocalesAreDifferent) {
+        locale.setKeywordValue("collation", type, errorCode);
+        const CollationCacheEntry *entry = getCacheEntry(errorCode);
+        return makeCacheEntry(validLocale, entry, errorCode);
+    } else {
+        return loadFromData(errorCode);
     }
+}
 
-    UCollator *result = NULL;
-    UCATableHeader *table = NULL;
-    UCollator *UCA = ucol_initUCA(status);
-
-    if(U_FAILURE(*status)){
+const CollationCacheEntry *
+CollationLoader::loadFromData(UErrorCode &errorCode) {
+    if(U_FAILURE(errorCode)) { return NULL; }
+    LocalPointer<CollationTailoring> t(new CollationTailoring(rootEntry->tailoring->settings));
+    if(t.isNull() || t->isBogus()) {
+        errorCode = U_MEMORY_ALLOCATION_ERROR;
         return NULL;
     }
 
-    ucol_tok_initTokenList(&src, rules, rulesLength, UCA, status);
-    ucol_tok_assembleTokenList(&src,parseError, status);
+    // deserialize
+    LocalUResourceBundlePointer binary(ures_getByKey(data, "%%CollationBin", NULL, &errorCode));
+    // Note: U_MISSING_RESOURCE_ERROR --> The old code built from rules if available
+    // but that created undesirable dependencies.
+    int32_t length;
+    const uint8_t *inBytes = ures_getBinary(binary.getAlias(), &length, &errorCode);
+    CollationDataReader::read(rootEntry->tailoring, inBytes, length, *t, errorCode);
+    // Note: U_COLLATOR_VERSION_MISMATCH --> The old code built from rules if available
+    // but that created undesirable dependencies.
+    if(U_FAILURE(errorCode)) { return NULL; }
 
-    if(U_FAILURE(*status)) {
-        /* if status is U_ILLEGAL_ARGUMENT_ERROR, src->current points at the offending option */
-        /* if status is U_INVALID_FORMAT_ERROR, src->current points after the problematic part of the rules */
-        /* so something might be done here... or on lower level */
-#ifdef UCOL_DEBUG
-        if(*status == U_ILLEGAL_ARGUMENT_ERROR) {
-            fprintf(stderr, "bad option starting at offset %i\n", src.current-src.source);
-        } else {
-            fprintf(stderr, "invalid rule just before offset %i\n", src.current-src.source);
-        }
-#endif
-        goto cleanup;
-    }
-
-    if(src.resultLen > 0 || src.removeSet != NULL) { /* we have a set of rules, let's make something of it */
-        /* also, if we wanted to remove some contractions, we should make a tailoring */
-        table = ucol_assembleTailoringTable(&src, status);
-        if(U_SUCCESS(*status)) {
-            // builder version
-            table->version[0] = UCOL_BUILDER_VERSION;
-            // no tailoring information on this level
-            table->version[1] = table->version[2] = table->version[3] = 0;
-            // set UCD version
-            u_getUnicodeVersion(table->UCDVersion);
-            // set UCA version
-            uprv_memcpy(table->UCAVersion, UCA->image->UCAVersion, sizeof(UVersionInfo));
-            result = ucol_initCollator(table, 0, UCA, status);
-            if (U_FAILURE(*status)) {
-                goto cleanup;
-            }
-            result->hasRealData = TRUE;
-            result->freeImageOnClose = TRUE;
-        }
-    } else { /* no rules, but no error either */
-        // must be only options
-        // We will init the collator from UCA
-        result = ucol_initCollator(UCA->image, 0, UCA, status);
-        // Check for null result
-        if (U_FAILURE(*status)) {
-            goto cleanup;
-        }
-        // And set only the options
-        UColOptionSet *opts = (UColOptionSet *)uprv_malloc(sizeof(UColOptionSet));
-        /* test for NULL */
-        if (opts == NULL) {
-            *status = U_MEMORY_ALLOCATION_ERROR;
-            goto cleanup;
+    // Try to fetch the optional rules string.
+    {
+        UErrorCode internalErrorCode = U_ZERO_ERROR;
+        int32_t length;
+        const UChar *s = ures_getStringByKey(data, "Sequence", &length,
+                                             &internalErrorCode);
+        if(U_SUCCESS(internalErrorCode)) {
+            t->rules.setTo(TRUE, s, length);
         }
-        uprv_memcpy(opts, src.opts, sizeof(UColOptionSet));
-        ucol_setOptionsFromHeader(result, opts, status);
-        result->freeOptionsOnClose = TRUE;
-        result->hasRealData = FALSE;
-        result->freeImageOnClose = FALSE;
     }
 
-    if(U_SUCCESS(*status)) {
-        UChar *newRules;
-        result->dataVersion[0] = UCOL_BUILDER_VERSION;
-        if(rulesLength > 0) {
-            newRules = (UChar *)uprv_malloc((rulesLength+1)*U_SIZEOF_UCHAR);
-            /* test for NULL */
-            if (newRules == NULL) {
-                *status = U_MEMORY_ALLOCATION_ERROR;
-                goto cleanup;
-            }
-            uprv_memcpy(newRules, rules, rulesLength*U_SIZEOF_UCHAR);
-            newRules[rulesLength]=0;
-            result->rules = newRules;
-            result->rulesLength = rulesLength;
-            result->freeRulesOnClose = TRUE;
-        }
-        result->ucaRules = NULL;
-        result->actualLocale = NULL;
-        result->validLocale = NULL;
-        result->requestedLocale = NULL;
-        ucol_setAttribute(result, UCOL_STRENGTH, strength, status);
-        ucol_setAttribute(result, UCOL_NORMALIZATION_MODE, norm, status);
-    } else {
-cleanup:
-        if(result != NULL) {
-            ucol_close(result);
+    const char *actualLocale = locale.getBaseName();  // without type
+    const char *vLocale = validLocale.getBaseName();
+    UBool actualAndValidLocalesAreDifferent = uprv_strcmp(actualLocale, vLocale) != 0;
+
+    // For the actual locale, suppress the default type *according to the actual locale*.
+    // For example, zh has default=pinyin and contains all of the Chinese tailorings.
+    // zh_Hant has default=stroke but has no other data.
+    // For the valid locale "zh_Hant" we need to suppress stroke.
+    // For the actual locale "zh" we need to suppress pinyin instead.
+    if(actualAndValidLocalesAreDifferent) {
+        // Opening a bundle for the actual locale should always succeed.
+        LocalUResourceBundlePointer actualBundle(
+                ures_open(U_ICUDATA_COLL, actualLocale, &errorCode));
+        if(U_FAILURE(errorCode)) { return NULL; }
+        UErrorCode internalErrorCode = U_ZERO_ERROR;
+        LocalUResourceBundlePointer def(
+                ures_getByKeyWithFallback(actualBundle.getAlias(), "collations/default", NULL,
+                                          &internalErrorCode));
+        int32_t length;
+        const UChar *s = ures_getString(def.getAlias(), &length, &internalErrorCode);
+        if(U_SUCCESS(internalErrorCode) && length < UPRV_LENGTHOF(defaultType)) {
+            u_UCharsToChars(s, defaultType, length + 1);
         } else {
-            if(table != NULL) {
-                uprv_free(table);
-            }
+            uprv_strcpy(defaultType, "standard");
         }
-        result = NULL;
     }
+    t->actualLocale = locale;
+    if(uprv_strcmp(type, defaultType) != 0) {
+        t->actualLocale.setKeywordValue("collation", type, errorCode);
+    } else if(uprv_strcmp(locale.getName(), locale.getBaseName()) != 0) {
+        // Remove the collation keyword if it was set.
+        t->actualLocale.setKeywordValue("collation", NULL, errorCode);
+    }
+    if(U_FAILURE(errorCode)) { return NULL; }
 
-    ucol_tok_closeTokenList(&src);
-
-    return result;
-}
-
-U_CAPI int32_t U_EXPORT2
-ucol_getRulesEx(const UCollator *coll, UColRuleOption delta, UChar *buffer, int32_t bufferLen) {
-    UErrorCode status = U_ZERO_ERROR;
-    int32_t len = 0;
-    int32_t UCAlen = 0;
-    const UChar* ucaRules = 0;
-    const UChar *rules = ucol_getRules(coll, &len);
-    if(delta == UCOL_FULL_RULES) {
-        /* take the UCA rules and append real rules at the end */
-        /* UCA rules will be probably coming from the root RB */
-        ucaRules = coll->ucaRules;
-        if (ucaRules) {
-            UCAlen = u_strlen(ucaRules);
-        }
-        /*
-        ucaRules = ures_getStringByKey(coll->rb,"UCARules",&UCAlen,&status);
-        UResourceBundle* cresb = ures_getByKeyWithFallback(coll->rb, "collations", NULL, &status);
-        UResourceBundle*  uca = ures_getByKeyWithFallback(cresb, "UCA", NULL, &status);
-        ucaRules = ures_getStringByKey(uca,"Sequence",&UCAlen,&status);
-        ures_close(uca);
-        ures_close(cresb);
-        */
-    }
-    if(U_FAILURE(status)) {
-        return 0;
-    }
-    if(buffer!=0 && bufferLen>0){
-        *buffer=0;
-        if(UCAlen > 0) {
-            u_memcpy(buffer, ucaRules, uprv_min(UCAlen, bufferLen));
-        }
-        if(len > 0 && bufferLen > UCAlen) {
-            u_memcpy(buffer+UCAlen, rules, uprv_min(len, bufferLen-UCAlen));
-        }
+    if(typeFallback) {
+        errorCode = U_USING_DEFAULT_WARNING;
     }
-    return u_terminateUChars(buffer, bufferLen, len+UCAlen, &status);
+    t->bundle = bundle;
+    bundle = NULL;
+    const CollationCacheEntry *entry = new CollationCacheEntry(validLocale, t.getAlias());
+    if(entry == NULL) {
+        errorCode = U_MEMORY_ALLOCATION_ERROR;
+    } else {
+        t.orphan();
+    }
+    // Have to add that reference that we promise.
+    entry->addRef();
+    return entry;
 }
 
-static const UChar _NUL = 0;
+const CollationCacheEntry *
+CollationLoader::getCacheEntry(UErrorCode &errorCode) {
+    LocaleCacheKey<CollationCacheEntry> key(locale);
+    const CollationCacheEntry *entry = NULL;
+    cache->get(key, this, entry, errorCode);
+    return entry;
+}
 
-U_CAPI const UChar* U_EXPORT2
-ucol_getRules(    const    UCollator       *coll,
-              int32_t            *length)
-{
-    if(coll->rules != NULL) {
-        *length = coll->rulesLength;
-        return coll->rules;
-    }
-    else {
-        *length = 0;
-        return &_NUL;
+const CollationCacheEntry *
+CollationLoader::makeCacheEntryFromRoot(
+        const Locale &/*loc*/,
+        UErrorCode &errorCode) const {
+    if (U_FAILURE(errorCode)) {
+        return NULL;
     }
+    rootEntry->addRef();
+    return makeCacheEntry(validLocale, rootEntry, errorCode);
 }
 
-U_CAPI UBool U_EXPORT2
-ucol_equals(const UCollator *source, const UCollator *target) {
-    UErrorCode status = U_ZERO_ERROR;
-    // if pointers are equal, collators are equal
-    if(source == target) {
-        return TRUE;
-    }
-    int32_t i = 0, j = 0;
-    // if any of attributes are different, collators are not equal
-    for(i = 0; i < UCOL_ATTRIBUTE_COUNT; i++) {
-        if(ucol_getAttribute(source, (UColAttribute)i, &status) != ucol_getAttribute(target, (UColAttribute)i, &status) || U_FAILURE(status)) {
-            return FALSE;
-        }
+const CollationCacheEntry *
+CollationLoader::makeCacheEntry(
+        const Locale &loc,
+        const CollationCacheEntry *entryFromCache,
+        UErrorCode &errorCode) {
+    if(U_FAILURE(errorCode) || loc == entryFromCache->validLocale) {
+        return entryFromCache;
+    }
+    CollationCacheEntry *entry = new CollationCacheEntry(loc, entryFromCache->tailoring);
+    if(entry == NULL) {
+        errorCode = U_MEMORY_ALLOCATION_ERROR;
+        entryFromCache->removeRef();
+        return NULL;
     }
+    entry->addRef();
+    entryFromCache->removeRef();
+    return entry;
+}
 
-    int32_t sourceRulesLen = 0, targetRulesLen = 0;
-    const UChar *sourceRules = ucol_getRules(source, &sourceRulesLen);
-    const UChar *targetRules = ucol_getRules(target, &targetRulesLen);
+U_NAMESPACE_END
 
-    if(sourceRulesLen == targetRulesLen && u_strncmp(sourceRules, targetRules, sourceRulesLen) == 0) {
-        // all the attributes are equal and the rules are equal - collators are equal
-        return(TRUE);
-    }
-    // hard part, need to construct tree from rules and see if they yield the same tailoring
-    UBool result = TRUE;
-    UParseError parseError;
-    UColTokenParser sourceParser, targetParser;
-    int32_t sourceListLen = 0, targetListLen = 0;
-    ucol_tok_initTokenList(&sourceParser, sourceRules, sourceRulesLen, source->UCA, &status);
-    ucol_tok_initTokenList(&targetParser, targetRules, targetRulesLen, target->UCA, &status);
-    sourceListLen = ucol_tok_assembleTokenList(&sourceParser, &parseError, &status);
-    targetListLen = ucol_tok_assembleTokenList(&targetParser, &parseError, &status);
-
-    if(sourceListLen != targetListLen) {
-        // different number of resets
-        result = FALSE;
-    } else {
-        UColToken *sourceReset = NULL, *targetReset = NULL;
-        UChar *sourceResetString = NULL, *targetResetString = NULL;
-        int32_t sourceStringLen = 0, targetStringLen = 0;
-        for(i = 0; i < sourceListLen; i++) {
-            sourceReset = sourceParser.lh[i].reset;
-            sourceResetString = sourceParser.source+(sourceReset->source & 0xFFFFFF);
-            sourceStringLen = sourceReset->source >> 24;
-            for(j = 0; j < sourceListLen; j++) {
-                targetReset = targetParser.lh[j].reset;
-                targetResetString = targetParser.source+(targetReset->source & 0xFFFFFF);
-                targetStringLen = targetReset->source >> 24;
-                if(sourceStringLen == targetStringLen && (u_strncmp(sourceResetString, targetResetString, sourceStringLen) == 0)) {
-                    sourceReset = sourceParser.lh[i].first;
-                    targetReset = targetParser.lh[j].first;
-                    while(sourceReset != NULL && targetReset != NULL) {
-                        sourceResetString = sourceParser.source+(sourceReset->source & 0xFFFFFF);
-                        sourceStringLen = sourceReset->source >> 24;
-                        targetResetString = targetParser.source+(targetReset->source & 0xFFFFFF);
-                        targetStringLen = targetReset->source >> 24;
-                        if(sourceStringLen != targetStringLen || (u_strncmp(sourceResetString, targetResetString, sourceStringLen) != 0)) {
-                            result = FALSE;
-                            goto returnResult;
-                        }
-                        // probably also need to check the expansions
-                        if(sourceReset->expansion) {
-                            if(!targetReset->expansion) {
-                                result = FALSE;
-                                goto returnResult;
-                            } else {
-                                // compare expansions
-                                sourceResetString = sourceParser.source+(sourceReset->expansion& 0xFFFFFF);
-                                sourceStringLen = sourceReset->expansion >> 24;
-                                targetResetString = targetParser.source+(targetReset->expansion & 0xFFFFFF);
-                                targetStringLen = targetReset->expansion >> 24;
-                                if(sourceStringLen != targetStringLen || (u_strncmp(sourceResetString, targetResetString, sourceStringLen) != 0)) {
-                                    result = FALSE;
-                                    goto returnResult;
-                                }
-                            }
-                        } else {
-                            if(targetReset->expansion) {
-                                result = FALSE;
-                                goto returnResult;
-                            }
-                        }
-                        sourceReset = sourceReset->next;
-                        targetReset = targetReset->next;
-                    }
-                    if(sourceReset != targetReset) { // at least one is not NULL
-                        // there are more tailored elements in one list
-                        result = FALSE;
-                        goto returnResult;
-                    }
+U_NAMESPACE_USE
 
+U_CAPI UCollator*
+ucol_open(const char *loc,
+          UErrorCode *status)
+{
+    UTRACE_ENTRY_OC(UTRACE_UCOL_OPEN);
+    UTRACE_DATA1(UTRACE_INFO, "locale = \"%s\"", loc);
+    UCollator *result = NULL;
 
-                    break;
-                }
-            }
-            // couldn't find the reset anchor, so the collators are not equal
-            if(j == sourceListLen) {
-                result = FALSE;
-                goto returnResult;
-            }
-        }
+    Collator *coll = Collator::createInstance(loc, *status);
+    if(U_SUCCESS(*status)) {
+        result = coll->toUCollator();
     }
-
-returnResult:
-    ucol_tok_closeTokenList(&sourceParser);
-    ucol_tok_closeTokenList(&targetParser);
+    UTRACE_EXIT_PTR_STATUS(result, *status);
     return result;
-
 }
 
+
 U_CAPI int32_t U_EXPORT2
 ucol_getDisplayName(    const    char        *objLoc,
                     const    char        *dispLoc,
@@ -650,8 +525,6 @@ ucol_getDisplayName(    const    char        *objLoc,
                     int32_t         resultLength,
                     UErrorCode        *status)
 {
-    U_NAMESPACE_USE
-
     if(U_FAILURE(*status)) return -1;
     UnicodeString dst;
     if(!(result==NULL && resultLength==0)) {
@@ -685,18 +558,16 @@ ucol_countAvailable()
 #if !UCONFIG_NO_SERVICE
 U_CAPI UEnumeration* U_EXPORT2
 ucol_openAvailableLocales(UErrorCode *status) {
-    U_NAMESPACE_USE
-
     // This is a wrapper over Collator::getAvailableLocales()
     if (U_FAILURE(*status)) {
         return NULL;
     }
-    StringEnumeration *s = Collator::getAvailableLocales();
+    StringEnumeration *s = icu::Collator::getAvailableLocales();
     if (s == NULL) {
         *status = U_MEMORY_ALLOCATION_ERROR;
         return NULL;
     }
-    return uenum_openStringEnumeration(s, status);
+    return uenum_openFromStringEnumeration(s, status);
 }
 #endif
 
@@ -706,7 +577,7 @@ static const char RESOURCE_NAME[] = "collations";
 
 static const char* const KEYWORDS[] = { "collation" };
 
-#define KEYWORD_COUNT (sizeof(KEYWORDS)/sizeof(KEYWORDS[0]))
+#define KEYWORD_COUNT UPRV_LENGTHOF(KEYWORDS)
 
 U_CAPI UEnumeration* U_EXPORT2
 ucol_getKeywords(UErrorCode *status) {
@@ -732,6 +603,89 @@ ucol_getKeywordValues(const char *keyword, UErrorCode *status) {
     return ures_getKeywordValues(U_ICUDATA_COLL, RESOURCE_NAME, status);
 }
 
+static const UEnumeration defaultKeywordValues = {
+    NULL,
+    NULL,
+    ulist_close_keyword_values_iterator,
+    ulist_count_keyword_values,
+    uenum_unextDefault,
+    ulist_next_keyword_value,
+    ulist_reset_keyword_values_iterator
+};
+
+namespace {
+
+struct KeywordsSink : public ResourceSink {
+public:
+    KeywordsSink(UErrorCode &errorCode) :
+            values(ulist_createEmptyList(&errorCode)), hasDefault(FALSE) {}
+    virtual ~KeywordsSink();
+
+    virtual void put(const char *key, ResourceValue &value, UBool /*noFallback*/,
+                     UErrorCode &errorCode) {
+        if (U_FAILURE(errorCode)) { return; }
+        ResourceTable collations = value.getTable(errorCode);
+        for (int32_t i = 0; collations.getKeyAndValue(i, key, value); ++i) {
+            UResType type = value.getType();
+            if (type == URES_STRING) {
+                if (!hasDefault && uprv_strcmp(key, "default") == 0) {
+                    CharString defcoll;
+                    defcoll.appendInvariantChars(value.getUnicodeString(errorCode), errorCode);
+                    if (U_SUCCESS(errorCode) && !defcoll.isEmpty()) {
+                        char *ownedDefault = uprv_strdup(defcoll.data());
+                        if (ownedDefault == NULL) {
+                            errorCode = U_MEMORY_ALLOCATION_ERROR;
+                            return;
+                        }
+                        ulist_removeString(values, defcoll.data());
+                        ulist_addItemBeginList(values, ownedDefault, TRUE, &errorCode);
+                        hasDefault = TRUE;
+                    }
+                }
+            } else if (type == URES_TABLE && uprv_strncmp(key, "private-", 8) != 0) {
+                if (!ulist_containsString(values, key, (int32_t)uprv_strlen(key))) {
+                    ulist_addItemEndList(values, key, FALSE, &errorCode);
+                }
+            }
+            if (U_FAILURE(errorCode)) { return; }
+        }
+    }
+
+    UList *values;
+    UBool hasDefault;
+};
+
+KeywordsSink::~KeywordsSink() {
+    ulist_deleteList(values);
+}
+
+}  // namespace
+
+U_CAPI UEnumeration* U_EXPORT2
+ucol_getKeywordValuesForLocale(const char* /*key*/, const char* locale,
+                               UBool /*commonlyUsed*/, UErrorCode* status) {
+    // Note: The parameter commonlyUsed is not used.
+    // The switch is in the method signature for consistency
+    // with other locale services.
+
+    // Read available collation values from collation bundles.
+    LocalUResourceBundlePointer bundle(ures_open(U_ICUDATA_COLL, locale, status));
+    KeywordsSink sink(*status);
+    ures_getAllItemsWithFallback(bundle.getAlias(), RESOURCE_NAME, sink, *status);
+    if (U_FAILURE(*status)) { return NULL; }
+
+    UEnumeration *en = (UEnumeration *)uprv_malloc(sizeof(UEnumeration));
+    if (en == NULL) {
+        *status = U_MEMORY_ALLOCATION_ERROR;
+        return NULL;
+    }
+    memcpy(en, &defaultKeywordValues, sizeof(UEnumeration));
+    ulist_resetList(sink.values);  // Initialize the iterator.
+    en->context = sink.values;
+    sink.values = NULL;  // Avoid deletion in the sink destructor.
+    return en;
+}
+
 U_CAPI int32_t U_EXPORT2
 ucol_getFunctionalEquivalent(char* result, int32_t resultCapacity,
                              const char* keyword, const char* locale,
@@ -743,104 +697,4 @@ ucol_getFunctionalEquivalent(char* result, int32_t resultCapacity,
         isAvailable, TRUE, status);
 }
 
-/* returns the locale name the collation data comes from */
-U_CAPI const char * U_EXPORT2
-ucol_getLocale(const UCollator *coll, ULocDataLocaleType type, UErrorCode *status) {
-    return ucol_getLocaleByType(coll, type, status);
-}
-
-U_CAPI const char * U_EXPORT2
-ucol_getLocaleByType(const UCollator *coll, ULocDataLocaleType type, UErrorCode *status) {
-    const char *result = NULL;
-    if(status == NULL || U_FAILURE(*status)) {
-        return NULL;
-    }
-    UTRACE_ENTRY(UTRACE_UCOL_GETLOCALE);
-    UTRACE_DATA1(UTRACE_INFO, "coll=%p", coll);
-
-    switch(type) {
-    case ULOC_ACTUAL_LOCALE:
-        result = coll->actualLocale;
-        break;
-    case ULOC_VALID_LOCALE:
-        result = coll->validLocale;
-        break;
-    case ULOC_REQUESTED_LOCALE:
-        result = coll->requestedLocale;
-        break;
-    default:
-        *status = U_ILLEGAL_ARGUMENT_ERROR;
-    }
-    UTRACE_DATA1(UTRACE_INFO, "result = %s", result);
-    UTRACE_EXIT_STATUS(*status);
-    return result;
-}
-
-U_CFUNC void U_EXPORT2
-ucol_setReqValidLocales(UCollator *coll, char *requestedLocaleToAdopt, char *validLocaleToAdopt, char *actualLocaleToAdopt)
-{
-    if (coll) {
-        if (coll->validLocale) {
-            uprv_free(coll->validLocale);
-        }
-        coll->validLocale = validLocaleToAdopt;
-        if (coll->requestedLocale) { // should always have
-            uprv_free(coll->requestedLocale);
-        }
-        coll->requestedLocale = requestedLocaleToAdopt;
-        if (coll->actualLocale) {
-            uprv_free(coll->actualLocale);
-        }
-        coll->actualLocale = actualLocaleToAdopt;
-    }
-}
-
-U_CAPI USet * U_EXPORT2
-ucol_getTailoredSet(const UCollator *coll, UErrorCode *status)
-{
-    U_NAMESPACE_USE
-
-    if(status == NULL || U_FAILURE(*status)) {
-        return NULL;
-    }
-    if(coll == NULL || coll->UCA == NULL) {
-        *status = U_ILLEGAL_ARGUMENT_ERROR;
-        return NULL;
-    }
-    UParseError parseError;
-    UColTokenParser src;
-    int32_t rulesLen = 0;
-    const UChar *rules = ucol_getRules(coll, &rulesLen);
-    UBool startOfRules = TRUE;
-    // we internally use the C++ class, for the following reasons:
-    // 1. we need to utilize canonical iterator, which is a C++ only class
-    // 2. canonical iterator returns UnicodeStrings - USet cannot take them
-    // 3. USet is internally really UnicodeSet, C is just a wrapper
-    UnicodeSet *tailored = new UnicodeSet();
-    UnicodeString pattern;
-    UnicodeString empty;
-    CanonicalIterator it(empty, *status);
-
-
-    // The idea is to tokenize the rule set. For each non-reset token,
-    // we add all the canonicaly equivalent FCD sequences
-    ucol_tok_initTokenList(&src, rules, rulesLen, coll->UCA, status);
-    while (ucol_tok_parseNextToken(&src, startOfRules, &parseError, status) != NULL) {
-        startOfRules = FALSE;
-        if(src.parsedToken.strength != UCOL_TOK_RESET) {
-            const UChar *stuff = src.source+(src.parsedToken.charsOffset);
-            it.setSource(UnicodeString(stuff, src.parsedToken.charsLen), *status);
-            pattern = it.next();
-            while(!pattern.isBogus()) {
-                if(Normalizer::quickCheck(pattern, UNORM_FCD, *status) != UNORM_NO) {
-                    tailored->add(pattern);
-                }
-                pattern = it.next();
-            }
-        }
-    }
-    ucol_tok_closeTokenList(&src);
-    return (USet *)tailored;
-}
-
 #endif /* #if !UCONFIG_NO_COLLATION */