]> git.saurik.com Git - apple/icu.git/blobdiff - icuSources/i18n/ucol_sit.cpp
ICU-461.12.tar.gz
[apple/icu.git] / icuSources / i18n / ucol_sit.cpp
index 7fa8fb54b83365715162696a1f34c047c65cff23..45f24ea9fe7ee7e120ad8737bf671f676590e216 100644 (file)
@@ -1,6 +1,6 @@
 /*
 *******************************************************************************
-*   Copyright (C) 2004-2006, International Business Machines
+*   Copyright (C) 2004-2010, International Business Machines
 *   Corporation and others.  All Rights Reserved.
 *******************************************************************************
 *   file name:  ucol_sit.cpp
 */
 
 #include "unicode/ustring.h"
+#include "unicode/udata.h"
 
 #include "utracimp.h"
 #include "ucol_imp.h"
 #include "ucol_tok.h"
-#include "unormimp.h"
 #include "cmemory.h"
 #include "cstring.h"
+#include "uresimp.h"
 
 #if !UCONFIG_NO_COLLATION
 
@@ -30,7 +31,7 @@ enum OptionsList {
     UCOL_SIT_REGION,
     UCOL_SIT_VARIANT,
     UCOL_SIT_KEYWORD,
-    UCOL_SIT_RFC3166BIS,
+    UCOL_SIT_BCP47,
     UCOL_SIT_STRENGTH,
     UCOL_SIT_CASE_LEVEL,
     UCOL_SIT_CASE_FIRST,
@@ -44,34 +45,6 @@ enum OptionsList {
     UCOL_SIT_ITEMS_COUNT
 };
 
-/* list of locales for packing of a collator to an integer.
- * This list corresponds to ICU 3.0. If more collation bearing
- * locales are added in the future, this won't be a simple array
- * but a mapping allowing forward and reverse lookup would have to 
- * be established. Currently, the mapping is from locale name to 
- * index.
- */
-static const char* const locales[] = {
-/* 00 - 09 */ "ar", "be", "bg", "ca", "cs", "da", "de", "de__PHONEBOOK", "el", "en",
-/* 10 - 19 */ "en_BE", "eo", "es", "es__TRADITIONAL", "et", "fa", "fa_AF", "fi", "fo", "fr",
-/* 20 - 29 */ "gu", "he", "hi", "hi__DIRECT", "hr", "hu", "is", "it", "ja", "kk",
-/* 30 - 39 */ "kl", "kn", "ko", "lt", "lv", "mk", "mr", "mt", "nb", "nn",
-/* 40 - 49 */ "om", "pa", "pl", "ps", "ro", "root", "ru", "sh", "sk", "sl",
-/* 50 - 59 */ "sq", "sr", "sv", "ta", "te", "th", "tr", "uk", "vi", "zh",
-/* 60 - 64 */ "zh_HK", "zh_MO", "zh_TW", "zh_TW_STROKE", "zh__PINYIN"
-};
-
-static const char* const keywords[] = {
-/* 00 */ "",
-/* 01 */ "direct",
-/* 02 */ "phonebook",
-/* 03 */ "pinyin",
-/* 04 */ "standard",
-/* 05 */ "stroke",
-/* 06 */ "traditional"
-};
-
-
 /* option starters chars. */
 static const char alternateHArg     = 'A';
 static const char variableTopValArg = 'B';
@@ -140,7 +113,7 @@ static const AttributeConversion conversions[12] = {
 };
 
 
-static char 
+static char
 ucol_sit_attributeValueToLetter(UColAttributeValue value, UErrorCode *status) {
     uint32_t i = 0;
     for(i = 0; i < sizeof(conversions)/sizeof(conversions[0]); i++) {
@@ -152,7 +125,7 @@ ucol_sit_attributeValueToLetter(UColAttributeValue value, UErrorCode *status) {
     return 0;
 }
 
-static UColAttributeValue 
+static UColAttributeValue
 ucol_sit_letterToAttributeValue(char letter, UErrorCode *status) {
     uint32_t i = 0;
     for(i = 0; i < sizeof(conversions)/sizeof(conversions[0]); i++) {
@@ -173,8 +146,8 @@ U_CDECL_END
 
 U_CDECL_BEGIN
 static const char* U_CALLCONV
-_processLocaleElement(CollatorSpec *spec, uint32_t value, const char* string, 
-                      UErrorCode *status) 
+_processLocaleElement(CollatorSpec *spec, uint32_t value, const char* string,
+                      UErrorCode *status)
 {
     int32_t len = 0;
     do {
@@ -195,8 +168,8 @@ U_CDECL_END
 
 U_CDECL_BEGIN
 static const char* U_CALLCONV
-_processRFC3066Locale(CollatorSpec *spec, uint32_t, const char* string, 
-                      UErrorCode *status) 
+_processRFC3066Locale(CollatorSpec *spec, uint32_t, const char* string,
+                      UErrorCode *status)
 {
     char terminator = *string;
     string++;
@@ -214,8 +187,8 @@ U_CDECL_END
 
 U_CDECL_BEGIN
 static const char* U_CALLCONV
-_processCollatorOption(CollatorSpec *spec, uint32_t option, const char* string, 
-                       UErrorCode *status) 
+_processCollatorOption(CollatorSpec *spec, uint32_t option, const char* string,
+                       UErrorCode *status)
 {
     spec->options[option] = ucol_sit_letterToAttributeValue(*string, status);
     if((*(++string) != '_' && *string) || U_FAILURE(*status)) {
@@ -226,8 +199,8 @@ _processCollatorOption(CollatorSpec *spec, uint32_t option, const char* string,
 U_CDECL_END
 
 
-static UChar 
-readHexCodeUnit(const char **string, UErrorCode *status) 
+static UChar
+readHexCodeUnit(const char **string, UErrorCode *status)
 {
     UChar result = 0;
     int32_t value = 0;
@@ -257,7 +230,7 @@ readHexCodeUnit(const char **string, UErrorCode *status)
 
 U_CDECL_BEGIN
 static const char* U_CALLCONV
-_processVariableTop(CollatorSpec *spec, uint32_t value1, const char* string, UErrorCode *status) 
+_processVariableTop(CollatorSpec *spec, uint32_t value1, const char* string, UErrorCode *status)
 {
     // get four digits
     int32_t i = 0;
@@ -274,7 +247,7 @@ _processVariableTop(CollatorSpec *spec, uint32_t value1, const char* string, UEr
     }
     if(U_SUCCESS(*status)) {
         spec->variableTopSet = TRUE;
-    } 
+    }
     return string;
 }
 U_CDECL_END
@@ -289,7 +262,7 @@ struct ShortStringOptions {
 
 static const ShortStringOptions options[UCOL_SIT_ITEMS_COUNT] =
 {
-/* 10 ALTERNATE_HANDLING */   {alternateHArg,     _processCollatorOption, UCOL_ALTERNATE_HANDLING }, // alternate  N, S, D 
+/* 10 ALTERNATE_HANDLING */   {alternateHArg,     _processCollatorOption, UCOL_ALTERNATE_HANDLING }, // alternate  N, S, D
 /* 15 VARIABLE_TOP_VALUE */   {variableTopValArg, _processVariableTop,    1 },
 /* 08 CASE_FIRST */           {caseFirstArg,      _processCollatorOption, UCOL_CASE_FIRST }, // case first L, U, X, D
 /* 09 NUMERIC_COLLATION */    {numericCollArg,    _processCollatorOption, UCOL_NUMERIC_COLLATION }, // codan      O, X, D
@@ -309,8 +282,8 @@ static const ShortStringOptions options[UCOL_SIT_ITEMS_COUNT] =
 
 
 static
-const char* ucol_sit_readOption(const char *start, CollatorSpec *spec, 
-                            UErrorCode *status) 
+const char* ucol_sit_readOption(const char *start, CollatorSpec *spec,
+                            UErrorCode *status)
 {
   int32_t i = 0;
 
@@ -318,7 +291,7 @@ const char* ucol_sit_readOption(const char *start, CollatorSpec *spec,
       if(*start == options[i].optionStart) {
           spec->entries[i].start = start;
           const char* end = options[i].action(spec, options[i].attr, start+1, status);
-          spec->entries[i].len = end - start;
+          spec->entries[i].len = (int32_t)(end - start);
           return end;
       }
   }
@@ -327,7 +300,7 @@ const char* ucol_sit_readOption(const char *start, CollatorSpec *spec,
 }
 
 static
-void ucol_sit_initCollatorSpecs(CollatorSpec *spec) 
+void ucol_sit_initCollatorSpecs(CollatorSpec *spec)
 {
     // reset everything
     uprv_memset(spec, 0, sizeof(CollatorSpec));
@@ -338,12 +311,12 @@ void ucol_sit_initCollatorSpecs(CollatorSpec *spec)
     }
 }
 
-static const char* 
-ucol_sit_readSpecs(CollatorSpec *s, const char *string, 
+static const char*
+ucol_sit_readSpecs(CollatorSpec *s, const char *string,
                         UParseError *parseError, UErrorCode *status)
 {
     const char *definition = string;
-    while(U_SUCCESS(*status) && *string) { 
+    while(U_SUCCESS(*status) && *string) {
         string = ucol_sit_readOption(string, s, status);
         // advance over '_'
         while(*string && *string == '_') {
@@ -351,7 +324,7 @@ ucol_sit_readSpecs(CollatorSpec *s, const char *string,
         }
     }
     if(U_FAILURE(*status)) {
-        parseError->offset = string - definition;
+        parseError->offset = (int32_t)(string - definition);
     }
     return string;
 }
@@ -361,7 +334,7 @@ int32_t ucol_sit_dumpSpecs(CollatorSpec *s, char *destination, int32_t capacity,
 {
     int32_t i = 0, j = 0;
     int32_t len = 0;
-    char optName; 
+    char optName;
     if(U_SUCCESS(*status)) {
         for(i = 0; i < UCOL_SIT_ITEMS_COUNT; i++) {
             if(s->entries[i].start) {
@@ -370,7 +343,7 @@ int32_t ucol_sit_dumpSpecs(CollatorSpec *s, char *destination, int32_t capacity,
                         uprv_strcat(destination, "_");
                     }
                     len++;
-                } 
+                }
                 optName = *(s->entries[i].start);
                 if(optName == languageArg || optName == regionArg || optName == variantArg || optName == keywordArg) {
                     for(j = 0; j < s->entries[i].len; j++) {
@@ -451,12 +424,11 @@ ucol_prepareShortStringOpen( const char *definition,
     // settings
 
     // analyse the string in order to get everything we need.
-    const char *string = definition;
     CollatorSpec s;
     ucol_sit_initCollatorSpecs(&s);
-    string = ucol_sit_readSpecs(&s, definition, parseError, status);
+    ucol_sit_readSpecs(&s, definition, parseError, status);
     ucol_sit_calculateWholeLocale(&s);
-    
+
     char buffer[internalBufferSize];
     uprv_memset(buffer, 0, internalBufferSize);
     uloc_canonicalize(s.locale, buffer, internalBufferSize, status);
@@ -520,7 +492,7 @@ ucol_openFromShortString( const char *definition,
     ucol_sit_initCollatorSpecs(&s);
     string = ucol_sit_readSpecs(&s, definition, parseError, status);
     ucol_sit_calculateWholeLocale(&s);
-    
+
     char buffer[internalBufferSize];
     uprv_memset(buffer, 0, internalBufferSize);
     uloc_canonicalize(s.locale, buffer, internalBufferSize, status);
@@ -535,7 +507,7 @@ ucol_openFromShortString( const char *definition,
             }
 
             if(U_FAILURE(*status)) {
-                parseError->offset = string - definition;
+                parseError->offset = (int32_t)(string - definition);
                 ucol_close(result);
                 return NULL;
             }
@@ -598,23 +570,23 @@ ucol_getShortDefinitionString(const UCollator *coll,
     ucol_sit_initCollatorSpecs(&s);
 
     if(!locale) {
-        locale = ucol_getLocale(coll, ULOC_VALID_LOCALE, status);
+        locale = ucol_getLocaleByType(coll, ULOC_VALID_LOCALE, status);
     }
     elementSize = ucol_getFunctionalEquivalent(locBuff, internalBufferSize, "collation", locale, &isAvailable, status);
 
     if(elementSize) {
         // we should probably canonicalize here...
         elementSize = uloc_getLanguage(locBuff, tempbuff, internalBufferSize, status);
-        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, capacity, languageArg);
+        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, /*capacity*/internalBufferSize, languageArg);
         elementSize = uloc_getCountry(locBuff, tempbuff, internalBufferSize, status);
-        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, capacity, regionArg);
+        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, /*capacity*/internalBufferSize, regionArg);
         elementSize = uloc_getScript(locBuff, tempbuff, internalBufferSize, status);
-        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, capacity, scriptArg);
+        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, /*capacity*/internalBufferSize, scriptArg);
         elementSize = uloc_getVariant(locBuff, tempbuff, internalBufferSize, status);
-        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, capacity, variantArg);
+        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, /*capacity*/internalBufferSize, variantArg);
         elementSize = uloc_getKeywordValue(locBuff, "collation", tempbuff, internalBufferSize, status);
-        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, capacity, keywordArg);
-    } 
+        appendShortStringElement(tempbuff, elementSize, buffer, &resultSize, /*capacity*/internalBufferSize, keywordArg);
+    }
 
     int32_t i = 0;
     UColAttributeValue attribute = UCOL_DEFAULT;
@@ -623,8 +595,8 @@ ucol_getShortDefinitionString(const UCollator *coll,
             attribute = ucol_getAttributeOrDefault(coll, (UColAttribute)options[i].attr, status);
             if(attribute != UCOL_DEFAULT) {
                 char letter = ucol_sit_attributeValueToLetter(attribute, status);
-                appendShortStringElement(&letter, 1, 
-                    buffer, &resultSize, capacity, options[i].optionStart);
+                appendShortStringElement(&letter, 1,
+                    buffer, &resultSize, /*capacity*/internalBufferSize, options[i].optionStart);
             }
         }
     }
@@ -666,253 +638,8 @@ ucol_normalizeShortDefinitionString(const char *definition,
     return ucol_sit_dumpSpecs(&s, destination, capacity, status);
 }
 
-// structure for packing the bits of the attributes in the
-// identifier number.
-// locale is packed separately
-struct bitPacking {
-    char letter;
-    uint32_t offset;
-    uint32_t width;
-    UColAttribute attribute;
-    UColAttributeValue values[6];
-};
-
-static const bitPacking attributesToBits[UCOL_ATTRIBUTE_COUNT] = {
-    /* french */        { frenchCollArg,    29, 2, UCOL_FRENCH_COLLATION,         { UCOL_DEFAULT, UCOL_OFF, UCOL_ON }},
-    /* alternate */     { alternateHArg,    27, 2, UCOL_ALTERNATE_HANDLING,       { UCOL_DEFAULT, UCOL_NON_IGNORABLE, UCOL_SHIFTED }}, 
-    /* case first */    { caseFirstArg,     25, 2, UCOL_CASE_FIRST,               { UCOL_DEFAULT, UCOL_OFF, UCOL_LOWER_FIRST, UCOL_UPPER_FIRST }},
-    /* case level */    { caseLevelArg,     23, 2, UCOL_CASE_LEVEL,               { UCOL_DEFAULT, UCOL_OFF, UCOL_ON }},
-    /* normalization */ { normArg,          21, 2, UCOL_NORMALIZATION_MODE,       { UCOL_DEFAULT, UCOL_OFF, UCOL_ON }},
-    /* strength */      { strengthArg,      18, 3, UCOL_STRENGTH,                 { UCOL_DEFAULT, UCOL_PRIMARY, UCOL_SECONDARY, UCOL_TERTIARY, UCOL_QUATERNARY, UCOL_IDENTICAL }},
-    /* hiragana */      { hiraganaQArg,     16, 2, UCOL_HIRAGANA_QUATERNARY_MODE, { UCOL_DEFAULT, UCOL_OFF, UCOL_ON }},
-    /* numeric coll */  { numericCollArg,   14, 2, UCOL_NUMERIC_COLLATION,        { UCOL_DEFAULT, UCOL_OFF, UCOL_ON }}
-};
-
-static const uint32_t keywordShift =   9;
-static const uint32_t keywordWidth =   5;
-static const uint32_t localeShift =    0;
-static const uint32_t localeWidth =    7;
-
-
-static uint32_t ucol_sit_putLocaleInIdentifier(uint32_t result, const char* locale, UErrorCode* status) {
-    char buffer[internalBufferSize], keywordBuffer[internalBufferSize], 
-        baseName[internalBufferSize], localeBuffer[internalBufferSize];
-    int32_t len = 0, keywordLen = 0,
-        baseNameLen = 0, localeLen = 0;
-    uint32_t i = 0;
-    UBool isAvailable = FALSE;
-    if(locale) {
-        len = uloc_canonicalize(locale, buffer, internalBufferSize, status);
-        localeLen = ucol_getFunctionalEquivalent(localeBuffer, internalBufferSize, "collation", buffer, &isAvailable, status);
-        keywordLen = uloc_getKeywordValue(buffer, "collation", keywordBuffer, internalBufferSize, status);
-        baseNameLen = uloc_getBaseName(buffer, baseName, internalBufferSize, status);
-
-        /*Binary search for the map entry for normal cases */
-
-        uint32_t   low     = 0;
-        uint32_t   high    = sizeof(locales)/sizeof(locales[0]);
-        uint32_t   mid     = high;
-        uint32_t   oldmid  = 0;
-        int32_t    compVal = 0;
-
-
-        while (high > low)  /*binary search*/{
-
-            mid = (high+low) >> 1; /*Finds median*/
-
-            if (mid == oldmid) 
-                return UCOL_SIT_COLLATOR_NOT_ENCODABLE; // we didn't find it
-
-            compVal = uprv_strcmp(baseName, locales[mid]);
-            if (compVal < 0){
-                high = mid;
-            }
-            else if (compVal > 0){
-                low = mid;
-            }
-            else /*we found it*/{
-                break;
-            }
-            oldmid = mid;
-        }
-
-        result |= (mid & ((1 << localeWidth) - 1)) << localeShift;
-    }
-
-    if(keywordLen) {
-        for(i = 1; i < sizeof(keywords)/sizeof(keywords[0]); i++) {
-            if(uprv_strcmp(keywords[i], keywordBuffer) == 0) {
-                result |= (i & ((1 << keywordWidth) - 1)) << keywordShift;
-                break;
-            }
-        }
-    }
-    return result;
-}
-
-U_CAPI uint32_t U_EXPORT2
-ucol_collatorToIdentifier(const UCollator *coll,
-                          const char *locale,
-                          UErrorCode *status) 
-{
-    uint32_t result = 0;
-    uint32_t i = 0, j = 0;
-    UColAttributeValue attrValue = UCOL_DEFAULT;
-
-    // if variable top is not default, we need to use strings
-    if(coll->variableTopValueisDefault != TRUE) {
-        return UCOL_SIT_COLLATOR_NOT_ENCODABLE;
-    }
-
-    if(locale == NULL) {
-        locale = ucol_getLocale(coll, ULOC_VALID_LOCALE, status);
-    }
-
-    result = ucol_sit_putLocaleInIdentifier(result, locale, status);
-
-    for(i = 0; i < sizeof(attributesToBits)/sizeof(attributesToBits[0]); i++) {
-        attrValue = ucol_getAttributeOrDefault(coll, attributesToBits[i].attribute, status);
-        j = 0;
-        while(attributesToBits[i].values[j] != attrValue) {
-            j++;
-        }
-        result |= (j & ((1 << attributesToBits[i].width) - 1)) << attributesToBits[i].offset;
-    }
-    
-    return result;
-}
-
-U_CAPI UCollator* U_EXPORT2
-ucol_openFromIdentifier(uint32_t identifier,
-                        UBool forceDefaults,
-                        UErrorCode *status) 
-{
-    uint32_t i = 0;
-    int32_t value = 0, keyword = 0;
-    char locale[internalBufferSize];
-
-    value = (identifier >> localeShift) & ((1 << localeWidth) - 1);
-    keyword = (identifier >> keywordShift) & ((1 << keywordWidth) - 1);
-    
-    uprv_strcpy(locale, locales[value]);
-
-    if(keyword) {
-        uprv_strcat(locale, collationKeyword);
-        uprv_strcat(locale, keywords[keyword]);
-    }
-
-    UColAttributeValue attrValue = UCOL_DEFAULT;
-
-    UCollator *result = ucol_open(locale, status);
-
-    // variable top is not set in the identifier, so we can easily skip that on
-
-    for(i = 0; i < sizeof(attributesToBits)/sizeof(attributesToBits[0]); i++) {
-        value = (identifier >> attributesToBits[i].offset) & ((1 << attributesToBits[i].width) - 1);
-        attrValue = attributesToBits[i].values[value];
-        // the collator is all default, so we will set only the values that will differ from 
-        // the default values.
-        if(attrValue != UCOL_DEFAULT) {
-            if(forceDefaults ||
-                ucol_getAttribute(result, attributesToBits[i].attribute, status) != attrValue) {
-                ucol_setAttribute(result, attributesToBits[i].attribute, attrValue, status);
-            }
-        }
-    }
-
-    return result;
-}
-
-U_CAPI int32_t U_EXPORT2
-ucol_identifierToShortString(uint32_t identifier,
-                             char *buffer,
-                             int32_t capacity,
-                             UBool forceDefaults,
-                             UErrorCode *status) 
-{
-    int32_t locIndex = (identifier >> localeShift) & ((1 << localeWidth) - 1);
-    int32_t keywordIndex = (identifier >> keywordShift) & ((1 << keywordWidth) - 1);
-    CollatorSpec s;
-    ucol_sit_initCollatorSpecs(&s);
-    uprv_strcpy(s.locale, locales[locIndex]);
-    if(keywordIndex) {
-        uprv_strcat(s.locale, collationKeyword);
-        uprv_strcat(s.locale, keywords[keywordIndex]);
-    }
-    UCollator *coll = ucol_openFromIdentifier(identifier, forceDefaults, status);
-    int32_t resultLen = ucol_getShortDefinitionString(coll, s.locale, buffer, capacity, status);
-    ucol_close(coll);
-    return resultLen;
-
-#if 0
-    // TODO: Crumy, crumy, crumy... Very hard to currently go algorithmically from 
-    // identifier to short string. Do rethink
-    if(forceDefaults == FALSE) {
-        UCollator *coll = ucol_openFromIdentifier(identifier, FALSE, status);
-        int32_t resultLen = ucol_getShortDefinitionString(coll, s.locale, buffer, capacity, status);
-        ucol_close(coll);
-        return resultLen;
-    } else { // forceDefaults == TRUE
-        char letter;
-        UColAttributeValue value;
-        int32_t i = 0;
-        for(i = 0; i < sizeof(attributesToBits)/sizeof(attributesToBits[0]); i++) {
-            value = attributesToBits[i].values[(identifier >> attributesToBits[i].offset) & ((1 << attributesToBits[i].width) - 1)];
-            if(value != UCOL_DEFAULT) {
-                uprv_strcat(buffer, "_");
-                uprv_strncat(buffer, &attributesToBits[i].letter, 1);
-                letter = ucol_sit_attributeValueToLetter(value, status);
-                uprv_strncat(buffer, &letter, 1);
-            }
-        }
-        return ucol_sit_dumpSpecs(&s, buffer, capacity, status);
-    }
-#endif
-}
-
-U_CAPI uint32_t U_EXPORT2
-ucol_shortStringToIdentifier(const char *definition,
-                             UBool forceDefaults,
-                             UErrorCode *status) 
-{
-    UParseError parseError;
-    CollatorSpec s;
-    uint32_t result = 0;
-    uint32_t i = 0, j = 0;
-    ucol_sit_initCollatorSpecs(&s);
-
-    ucol_sit_readSpecs(&s, definition, &parseError, status);
-    ucol_sit_calculateWholeLocale(&s);
-
-    char locBuffer[internalBufferSize];
-    UBool isAvailable = FALSE;
-    UColAttributeValue attrValue = UCOL_DEFAULT;
-
-    ucol_getFunctionalEquivalent(locBuffer, internalBufferSize, "collation", s.locale, &isAvailable, status);
-
-    if(forceDefaults == FALSE) {
-        UCollator *coll = ucol_openFromShortString(definition, FALSE, &parseError, status);
-        result = ucol_collatorToIdentifier(coll, locBuffer, status);
-        ucol_close(coll);
-    } else { // forceDefaults == TRUE
-        result = ucol_sit_putLocaleInIdentifier(result, locBuffer, status);
-
-        for(i = 0; i < sizeof(attributesToBits)/sizeof(attributesToBits[0]); i++) {
-            attrValue = s.options[i];
-            j = 0;
-            while(attributesToBits[i].values[j] != attrValue) {
-                j++;
-            }
-            result |= (j & ((1 << attributesToBits[i].width) - 1)) << attributesToBits[i].offset;
-        }
-
-    }
-    return result;
-        
-}
-
 U_CAPI UColAttributeValue  U_EXPORT2
-ucol_getAttributeOrDefault(const UCollator *coll, UColAttribute attr, UErrorCode *status) 
+ucol_getAttributeOrDefault(const UCollator *coll, UColAttribute attr, UErrorCode *status)
 {
     if(U_FAILURE(*status) || coll == NULL) {
       return UCOL_DEFAULT;
@@ -955,8 +682,8 @@ struct contContext {
 
 
 static void
-addSpecial(contContext *context, UChar *buffer, int32_t bufLen, 
-               uint32_t CE, int32_t leftIndex, int32_t rightIndex, UErrorCode *status) 
+addSpecial(contContext *context, UChar *buffer, int32_t bufLen,
+               uint32_t CE, int32_t leftIndex, int32_t rightIndex, UErrorCode *status)
 {
   const UCollator *coll = context->coll;
   USet *contractions = context->conts;
@@ -976,7 +703,7 @@ addSpecial(contContext *context, UChar *buffer, int32_t bufLen,
               uset_addString(expansions, buffer+leftIndex, rightIndex-leftIndex);
             }
       }
-    }    
+    }
 
     UCharOffset++;
     // check whether we're doing contraction or prefix
@@ -1027,7 +754,7 @@ addSpecial(contContext *context, UChar *buffer, int32_t bufLen,
 
 U_CDECL_BEGIN
 static UBool U_CALLCONV
-_processSpecials(const void *context, UChar32 start, UChar32 limit, uint32_t CE) 
+_processSpecials(const void *context, UChar32 start, UChar32 limit, uint32_t CE)
 {
     UErrorCode *status = ((contContext *)context)->status;
     USet *expansions = ((contContext *)context)->expansions;
@@ -1037,7 +764,7 @@ _processSpecials(const void *context, UChar32 start, UChar32 limit, uint32_t CE)
     if(isSpecial(CE)) {
       if(((getCETag(CE) == SPEC_PROC_TAG && addPrefixes) || getCETag(CE) == CONTRACTION_TAG)) {
         while(start < limit && U_SUCCESS(*status)) {
-            // if there are suppressed contractions, we don't 
+            // if there are suppressed contractions, we don't
             // want to add them.
             if(removed && uset_contains(removed, start)) {
                 start++;
@@ -1073,8 +800,6 @@ U_CDECL_END
  * @param conts the set to hold the result
  * @param status to hold the error code
  * @return the size of the contraction set
- *
- * @draft ICU 3.0
  */
 U_CAPI int32_t U_EXPORT2
 ucol_getContractions( const UCollator *coll,
@@ -1119,14 +844,15 @@ ucol_getContractionsAndExpansions( const UCollator *coll,
     int32_t rulesLen = 0;
     const UChar* rules = ucol_getRules(coll, &rulesLen);
     UColTokenParser src;
-    ucol_tok_initTokenList(&src, rules, rulesLen, coll->UCA, status);
+    ucol_tok_initTokenList(&src, rules, rulesLen, coll->UCA,
+                           ucol_tok_getRulesFromBundle, NULL, status);
 
     contContext c = { NULL, contractions, expansions, src.removeSet, addPrefixes, status };
 
     // Add the UCA contractions
     c.coll = coll->UCA;
     utrie_enum(&coll->UCA->mapping, NULL, _processSpecials, &c);
-    
+
     // This is collator specific. Add contractions from a collator
     c.coll = coll;
     c.removedContractions =  NULL;
@@ -1163,7 +889,7 @@ ucol_getUnsafeSet( const UCollator *coll,
     int32_t contsSize = ucol_getContractions(coll, contractions, status);
     UChar32 c = 0;
     // Contraction set consists only of strings
-    // to get unsafe code points, we need to 
+    // to get unsafe code points, we need to
     // break the strings apart and add them to the unsafe set
     for(i = 0; i < contsSize; i++) {
         len = uset_getItem(contractions, i, NULL, NULL, buffer, internalBufferSize, status);