| /* |
| ****************************************************************************** |
| * |
| * Copyright (C) 1999-2001, International Business Machines |
| * Corporation and others. All Rights Reserved. |
| * |
| ****************************************************************************** |
| * |
| * |
| * ucnv_io.c: |
| * initializes global variables and defines functions pertaining to file |
| * access, and name resolution aspect of the library. |
| * |
| * new implementation: |
| * |
| * created on: 1999nov22 |
| * created by: Markus W. Scherer |
| * |
| * Use the binary cnvalias.icu (created from convrtrs.txt) to work |
| * with aliases for converter names. |
| * |
| * Date Name Description |
| * 11/22/1999 markus Created |
| * 06/28/2002 grhoten Major overhaul of the converter alias design. |
| * Now an alias can map to different converters |
| * depending on the specified standard. |
| ******************************************************************************* |
| */ |
| |
| #include "unicode/utypes.h" |
| #include "unicode/putil.h" |
| #include "unicode/ucnv.h" /* This file implements ucnv_xXXX() APIs */ |
| #include "unicode/udata.h" |
| |
| #include "umutex.h" |
| #include "cstring.h" |
| #include "cmemory.h" |
| #include "ucnv_io.h" |
| #include "uenumimp.h" |
| #include "ucln_cmn.h" |
| |
| /* Format of cnvalias.icu ----------------------------------------------------- |
| * |
| * cnvalias.icu is a binary, memory-mappable form of convrtrs.txt. |
| * This binary form contains several tables. All indexes are to uint16_t |
| * units, and not to the bytes (uint8_t units). Addressing everything on |
| * 16-bit boundaries allows us to store more information with small index |
| * numbers, which are also 16-bit in size. The majority of the table (except |
| * the string table) are 16-bit numbers. |
| * |
| * First there is the size of the Table of Contents (TOC). The TOC |
| * entries contain the size of each section. In order to find the offset |
| * you just need to sum up the previous offsets. |
| * |
| * 1) This section contains a list of converters. This list contains indexes |
| * into the string table for the converter name. The index of this list is |
| * also used by other sections, which are mentioned later on. |
| * |
| * 2) This section contains a list of tags. This list contains indexes |
| * into the string table for the tag name. The index of this list is |
| * also used by other sections, which are mentioned later on. |
| * |
| * 3) This section contains a list of sorted list of unique aliases. This |
| * list contains indexes into the string table for the alias name. The |
| * index of this list is also used by other sections, which are mentioned |
| * later on. |
| * |
| * 4) This section contains a list of mapped converter names. Consider this |
| * as a table that maps the 3rd section to the 1st section. This list contains |
| * indexes into the 1st section. The index of this list is the same index in |
| * the 3rd section. There is also some extra information in the high bits of |
| * each converter index in this table. Currently it's only used to say that |
| * an alias mapped to this converter is ambiguous. See UCNV_CONVERTER_INDEX_MASK |
| * and UCNV_AMBIGUOUS_ALIAS_MAP_BIT for more information. This section is |
| * the predigested form of the 5th section so that an alias lookup can be fast. |
| * |
| * 5) This section contains a 2D array with indexes to the 6th section. This |
| * section is the full form of all alias mappings. The column index is the |
| * index into the converter list (column header). The row index is the index |
| * to tag list (row header). This 2D array is the top part a 3D array. The |
| * third dimension is in the 6th section. |
| * |
| * 6) This is blob of variable length arrays. Each array starts with a size, |
| * and is followed by indexes to alias names in the string table. This is |
| * the third dimension to the section 5. No other section should be referencing |
| * this section. |
| * |
| * 7) Reserved at this time (There is no information). This _usually_ has a |
| * size of 0. Future versions may add more information here. |
| * |
| * 8) This is the string table. All strings are indexed on an even address. |
| * There are two reasons for this. First many chip architectures locate strings |
| * faster on even address boundaries. Second, since all indexes are 16-bit |
| * numbers, this string table can be 128KB in size instead of 64KB when we |
| * only have strings starting on an even address. |
| * |
| * |
| * Here is the concept of section 5 and 6. It's a 3D cube. Each tag |
| * has a unique alias among all converters. That same alias can |
| * be mentioned in other standards on different converters, |
| * but only one alias per tag can be unique. |
| * |
| * |
| * Converter Names (Usually in TR22 form) |
| * -------------------------------------------. |
| * T / /| |
| * a / / | |
| * g / / | |
| * s / / | |
| * / / | |
| * ------------------------------------------/ | |
| * A | | | |
| * l | | | |
| * i | | / |
| * a | | / |
| * s | | / |
| * e | | / |
| * s | |/ |
| * ------------------------------------------- |
| * |
| * |
| * |
| * Here is what it really looks like. It's like swiss cheese. |
| * There are holes. Some converters aren't recognized by |
| * a standard, or they are really old converters that the |
| * standard doesn't recognize anymore. |
| * |
| * Converter Names (Usually in TR22 form) |
| * -------------------------------------------. |
| * T /##########################################/| |
| * a / # # /# |
| * g / # ## ## ### # ### ### ### #/ |
| * s / # ##### #### ## ## #/# |
| * / ### # # ## # # # ### # # #/## |
| * ------------------------------------------/# # |
| * A |### # # ## # # # ### # # #|# # |
| * l |# # # # # ## # #|# # |
| * i |# # # # # # #|# |
| * a |# #|# |
| * s | #|# |
| * e |
| * s |
| * |
| */ |
| |
| typedef struct UAliasContext { |
| uint32_t stanardNum; |
| uint32_t convNum; |
| uint32_t listIdx; |
| } UAliasContext; |
| |
| static const char DATA_NAME[] = "cnvalias"; |
| static const char DATA_TYPE[] = "icu"; |
| |
| static UDataMemory *aliasData=NULL; |
| |
| static const uint16_t *converterList = NULL; |
| static const uint16_t *tagList = NULL; |
| static const uint16_t *aliasList = NULL; |
| static const uint16_t *untaggedConvArray = NULL; |
| static const uint16_t *taggedAliasArray = NULL; |
| static const uint16_t *taggedAliasLists = NULL; |
| static const uint16_t *stringTable = NULL; |
| |
| static uint32_t converterListNum; |
| static uint32_t tagListNum; |
| static uint32_t aliasListNum; |
| static uint32_t untaggedConvArraySize; |
| static uint32_t taggedAliasArraySize; |
| static uint32_t taggedAliasListsSize; |
| static uint32_t stringTableSize; |
| |
| static const char **availableConverters = NULL; |
| static uint16_t availableConverterCount = 0; |
| |
| static char defaultConverterNameBuffer[UCNV_MAX_CONVERTER_NAME_LENGTH + 1]; /* +1 for NULL */ |
| static const char *defaultConverterName = NULL; |
| |
| #define GET_STRING(idx) (const char *)(stringTable + (idx)) |
| #define NUM_RESERVED_TAGS 2 |
| |
| static UBool |
| isAcceptable(void *context, |
| const char *type, const char *name, |
| const UDataInfo *pInfo) { |
| return (UBool)( |
| pInfo->size>=20 && |
| pInfo->isBigEndian==U_IS_BIG_ENDIAN && |
| pInfo->charsetFamily==U_CHARSET_FAMILY && |
| pInfo->dataFormat[0]==0x43 && /* dataFormat="CvAl" */ |
| pInfo->dataFormat[1]==0x76 && |
| pInfo->dataFormat[2]==0x41 && |
| pInfo->dataFormat[3]==0x6c && |
| pInfo->formatVersion[0]==3); |
| } |
| |
| static UBool |
| haveAliasData(UErrorCode *pErrorCode) { |
| if(pErrorCode==NULL || U_FAILURE(*pErrorCode)) { |
| return FALSE; |
| } |
| |
| /* load converter alias data from file if necessary */ |
| if(aliasData==NULL) { |
| UDataMemory *data = NULL; |
| const uint16_t *table = NULL; |
| uint32_t tableStart; |
| uint32_t currOffset; |
| uint32_t reservedSize1; |
| |
| data = udata_openChoice(NULL, DATA_TYPE, DATA_NAME, isAcceptable, NULL, pErrorCode); |
| if(U_FAILURE(*pErrorCode)) { |
| return FALSE; |
| } |
| |
| table = (const uint16_t *)udata_getMemory(data); |
| |
| tableStart = ((const uint32_t *)(table))[0]; |
| if (tableStart < 8) { |
| *pErrorCode = U_INVALID_FORMAT_ERROR; |
| return FALSE; |
| } |
| |
| umtx_lock(NULL); |
| if(aliasData==NULL) { |
| aliasData = data; |
| data=NULL; |
| |
| converterListNum = ((const uint32_t *)(table))[1]; |
| tagListNum = ((const uint32_t *)(table))[2]; |
| aliasListNum = ((const uint32_t *)(table))[3]; |
| untaggedConvArraySize = ((const uint32_t *)(table))[4]; |
| taggedAliasArraySize = ((const uint32_t *)(table))[5]; |
| taggedAliasListsSize = ((const uint32_t *)(table))[6]; |
| reservedSize1 = ((const uint32_t *)(table))[7]; /* reserved */ |
| stringTableSize = ((const uint32_t *)(table))[8]; |
| |
| currOffset = tableStart * (sizeof(uint32_t)/sizeof(uint16_t)) + (sizeof(uint32_t)/sizeof(uint16_t)); |
| converterList = table + currOffset; |
| |
| currOffset += converterListNum; |
| tagList = table + currOffset; |
| |
| currOffset += tagListNum; |
| aliasList = table + currOffset; |
| |
| currOffset += aliasListNum; |
| untaggedConvArray = table + currOffset; |
| |
| currOffset += untaggedConvArraySize; |
| taggedAliasArray = table + currOffset; |
| |
| /* aliasLists is a 1's based array, but it has a padding character */ |
| currOffset += taggedAliasArraySize; |
| taggedAliasLists = table + currOffset; |
| |
| currOffset += taggedAliasListsSize; |
| /* reserved */ |
| |
| currOffset += reservedSize1; |
| stringTable = table + currOffset; |
| |
| } |
| umtx_unlock(NULL); |
| |
| /* if a different thread set it first, then close the extra data */ |
| if(data!=NULL) { |
| udata_close(data); /* NULL if it was set correctly */ |
| } |
| } |
| |
| return TRUE; |
| } |
| |
| static UBool |
| isAlias(const char *alias, UErrorCode *pErrorCode) { |
| if(alias==NULL) { |
| *pErrorCode=U_ILLEGAL_ARGUMENT_ERROR; |
| return FALSE; |
| } else if(*alias==0) { |
| return FALSE; |
| } else { |
| return TRUE; |
| } |
| } |
| |
| UBool |
| ucnv_io_cleanup() |
| { |
| if (aliasData) { |
| udata_close(aliasData); |
| aliasData = NULL; |
| } |
| |
| ucnv_io_flushAvailableConverterCache(); |
| |
| converterListNum = 0; |
| tagListNum = 0; |
| aliasListNum = 0; |
| untaggedConvArraySize = 0; |
| taggedAliasArraySize = 0; |
| taggedAliasListsSize = 0; |
| stringTableSize = 0; |
| |
| converterList = NULL; |
| tagList = NULL; |
| aliasList = NULL; |
| untaggedConvArray = NULL; |
| taggedAliasArray = NULL; |
| taggedAliasLists = NULL; |
| stringTable = NULL; |
| |
| defaultConverterName = NULL; |
| defaultConverterNameBuffer[0] = 0; |
| |
| return TRUE; /* Everything was cleaned up */ |
| } |
| |
| |
| static uint32_t getTagNumber(const char *tagname) { |
| if (tagList) { |
| uint32_t tagNum; |
| for (tagNum = 0; tagNum < tagListNum; tagNum++) { |
| if (!uprv_stricmp(GET_STRING(tagList[tagNum]), tagname)) { |
| return tagNum; |
| } |
| } |
| } |
| |
| return UINT32_MAX; |
| } |
| |
| /** |
| * Do a fuzzy compare of a two converter/alias names. The comparison |
| * is case-insensitive. It also ignores the characters '-', '_', and |
| * ' ' (dash, underscore, and space). Thus the strings "UTF-8", |
| * "utf_8", and "Utf 8" are exactly equivalent. |
| * |
| * This is a symmetrical (commutative) operation; order of arguments |
| * is insignificant. This is an important property for sorting the |
| * list (when the list is preprocessed into binary form) and for |
| * performing binary searches on it at run time. |
| * |
| * @param name1 a converter name or alias, zero-terminated |
| * @param name2 a converter name or alias, zero-terminated |
| * @return 0 if the names match, or a negative value if the name1 |
| * lexically precedes name2, or a positive value if the name1 |
| * lexically follows name2. |
| */ |
| U_CAPI int U_EXPORT2 |
| ucnv_compareNames(const char *name1, const char *name2) { |
| int rc; |
| char c1, c2; |
| |
| for (;;) { |
| /* Ignore delimiters '-', '_', and ' ' */ |
| while ((c1 = *name1) == '-' || c1 == '_' || c1 == ' ') { |
| ++name1; |
| } |
| while ((c2 = *name2) == '-' || c2 == '_' || c2 == ' ') { |
| ++name2; |
| } |
| |
| /* If we reach the ends of both strings then they match */ |
| if ((c1|c2)==0) { |
| return 0; |
| } |
| |
| /* Case-insensitive comparison */ |
| rc = (int)(unsigned char)uprv_tolower(c1) - |
| (int)(unsigned char)uprv_tolower(c2); |
| if (rc != 0) { |
| return rc; |
| } |
| ++name1; |
| ++name2; |
| } |
| } |
| |
| /* |
| * search for an alias |
| * return the converter number index for converterList |
| */ |
| static uint32_t |
| findConverter(const char *alias, UErrorCode *pErrorCode) { |
| uint32_t mid, start, limit; |
| int result; |
| |
| /* do a binary search for the alias */ |
| start = 0; |
| limit = untaggedConvArraySize - 1; |
| mid = limit; |
| |
| /* Once mid == 0 we've already checked the 0'th element and we can stop */ |
| while (start <= limit && mid != 0) { |
| mid = (uint32_t)((start + limit + 1) / 2); /* +1 is to round properly */ |
| result = ucnv_compareNames(alias, GET_STRING(aliasList[mid])); |
| |
| if (result < 0) { |
| limit = mid-1; |
| } else if (result > 0) { |
| start = mid+1; |
| } else { |
| /* Since the gencnval tool folds duplicates into one entry, |
| * this alias in aliasList is unique, but different standards |
| * may map an alias to different converters. |
| */ |
| if (untaggedConvArray[mid] & UCNV_AMBIGUOUS_ALIAS_MAP_BIT) { |
| *pErrorCode = U_AMBIGUOUS_ALIAS_WARNING; |
| } |
| return untaggedConvArray[mid] & UCNV_CONVERTER_INDEX_MASK; |
| } |
| } |
| |
| return UINT32_MAX; |
| } |
| |
| U_CFUNC const char * |
| ucnv_io_getConverterName(const char *alias, UErrorCode *pErrorCode) { |
| if(haveAliasData(pErrorCode) && isAlias(alias, pErrorCode)) { |
| uint32_t convNum = findConverter(alias, pErrorCode); |
| if (convNum < converterListNum) { |
| return GET_STRING(converterList[convNum]); |
| } |
| /* else converter not found */ |
| } |
| return NULL; |
| } |
| |
| static int32_t U_CALLCONV |
| ucnv_io_countStandardAliases(UEnumeration *enumerator, UErrorCode *pErrorCode) { |
| int32_t value = -1; |
| if (!pErrorCode || U_FAILURE(*pErrorCode)) { |
| return -1; |
| } |
| if (enumerator) { |
| UAliasContext *myContext = (UAliasContext *)(enumerator->context); |
| uint32_t listOffset = taggedAliasArray[myContext->stanardNum*converterListNum + myContext->convNum]; |
| |
| if (listOffset) { |
| value = taggedAliasLists[listOffset]; |
| } |
| else { |
| value = 0; |
| } |
| } |
| else { |
| *pErrorCode = U_ILLEGAL_ARGUMENT_ERROR; |
| } |
| return value; |
| } |
| |
| static const char* U_CALLCONV |
| ucnv_io_nextStandardAliases(UEnumeration *enumerator, |
| int32_t* resultLength, |
| UErrorCode *pErrorCode) |
| { |
| if (!pErrorCode || U_FAILURE(*pErrorCode)) { |
| return NULL; |
| } |
| if (enumerator) { |
| UAliasContext *myContext = (UAliasContext *)(enumerator->context); |
| uint32_t listOffset = taggedAliasArray[myContext->stanardNum*converterListNum + myContext->convNum]; |
| |
| if (listOffset) { |
| uint32_t listCount = taggedAliasLists[listOffset]; |
| const uint16_t *currList = taggedAliasLists + listOffset + 1; |
| |
| if (myContext->listIdx < listCount) { |
| return GET_STRING(currList[myContext->listIdx++]); |
| } |
| } |
| /* Either we accessed a zero length list, or we enumerated too far. */ |
| *pErrorCode = U_INDEX_OUTOFBOUNDS_ERROR; |
| } |
| else { |
| *pErrorCode = U_ILLEGAL_ARGUMENT_ERROR; |
| } |
| return NULL; |
| } |
| |
| static void U_CALLCONV |
| ucnv_io_resetStandardAliases(UEnumeration *enumerator, UErrorCode *pErrorCode) { |
| if (pErrorCode && U_SUCCESS(*pErrorCode)) { |
| if (enumerator) { |
| ((UAliasContext *)(enumerator->context))->listIdx = 0; |
| } |
| else { |
| *pErrorCode = U_ILLEGAL_ARGUMENT_ERROR; |
| } |
| } |
| } |
| |
| static void U_CALLCONV |
| ucnv_io_closeUEnumeration(UEnumeration *enumerator) { |
| uprv_free(enumerator->context); |
| uprv_free(enumerator); |
| } |
| |
| /* Enumerate the aliases for the specified converter and standard tag */ |
| static const UEnumeration gEnumAliases = { |
| NULL, |
| ucnv_io_closeUEnumeration, |
| ucnv_io_countStandardAliases, |
| NULL, |
| ucnv_io_nextStandardAliases, |
| ucnv_io_resetStandardAliases |
| }; |
| |
| U_CAPI UEnumeration * |
| ucnv_openStandardNames(const char *convName, |
| const char *standard, |
| UErrorCode *pErrorCode) |
| { |
| UEnumeration *myEnum = NULL; |
| if (haveAliasData(pErrorCode) && isAlias(convName, pErrorCode)) { |
| uint32_t convNum = findConverter(convName, pErrorCode); |
| uint32_t tagNum = getTagNumber(standard); |
| if (tagNum < (tagListNum - NUM_RESERVED_TAGS) && convNum < converterListNum) { |
| UAliasContext *myContext; |
| |
| myEnum = uprv_malloc(sizeof(UEnumeration)); |
| if (myEnum == NULL) { |
| *pErrorCode = U_MEMORY_ALLOCATION_ERROR; |
| return NULL; |
| } |
| uprv_memcpy(myEnum, &gEnumAliases, sizeof(UEnumeration)); |
| myContext = uprv_malloc(sizeof(UAliasContext)); |
| if (myContext == NULL) { |
| *pErrorCode = U_MEMORY_ALLOCATION_ERROR; |
| uprv_free(myEnum); |
| return NULL; |
| } |
| myEnum->context = myContext; |
| myContext->stanardNum = tagNum; |
| myContext->convNum = convNum; |
| myContext->listIdx = 0; |
| } |
| /* else converter or tag not found */ |
| } |
| return myEnum; |
| } |
| |
| U_CFUNC uint16_t |
| ucnv_io_countAliases(const char *alias, UErrorCode *pErrorCode) { |
| if(haveAliasData(pErrorCode) && isAlias(alias, pErrorCode)) { |
| uint32_t convNum = findConverter(alias, pErrorCode); |
| if (convNum < converterListNum) { |
| /* tagListNum - 1 is the ALL tag */ |
| int32_t listOffset = taggedAliasArray[(tagListNum - 1)*converterListNum + convNum]; |
| |
| if (listOffset) { |
| return taggedAliasLists[listOffset]; |
| } |
| /* else this shouldn't happen. internal program error */ |
| } |
| /* else converter not found */ |
| } |
| return 0; |
| } |
| |
| U_CFUNC uint16_t |
| ucnv_io_getAliases(const char *alias, uint16_t start, const char **aliases, UErrorCode *pErrorCode) { |
| if(haveAliasData(pErrorCode) && isAlias(alias, pErrorCode)) { |
| uint32_t currAlias; |
| uint32_t convNum = findConverter(alias, pErrorCode); |
| if (convNum < converterListNum) { |
| /* tagListNum - 1 is the ALL tag */ |
| int32_t listOffset = taggedAliasArray[(tagListNum - 1)*converterListNum + convNum]; |
| |
| if (listOffset) { |
| uint32_t listCount = taggedAliasLists[listOffset]; |
| /* +1 to skip listCount */ |
| const uint16_t *currList = taggedAliasLists + listOffset + 1; |
| |
| for (currAlias = start; currAlias < listCount; currAlias++) { |
| aliases[currAlias] = GET_STRING(currList[currAlias]); |
| } |
| } |
| /* else this shouldn't happen. internal program error */ |
| } |
| /* else converter not found */ |
| } |
| return 0; |
| } |
| |
| U_CFUNC const char * |
| ucnv_io_getAlias(const char *alias, uint16_t n, UErrorCode *pErrorCode) { |
| if(haveAliasData(pErrorCode) && isAlias(alias, pErrorCode)) { |
| uint32_t convNum = findConverter(alias, pErrorCode); |
| if (convNum < converterListNum) { |
| /* tagListNum - 1 is the ALL tag */ |
| int32_t listOffset = taggedAliasArray[(tagListNum - 1)*converterListNum + convNum]; |
| |
| if (listOffset) { |
| uint32_t listCount = taggedAliasLists[listOffset]; |
| /* +1 to skip listCount */ |
| const uint16_t *currList = taggedAliasLists + listOffset + 1; |
| |
| if (n < listCount) { |
| return GET_STRING(currList[n]); |
| } |
| *pErrorCode = U_INDEX_OUTOFBOUNDS_ERROR; |
| } |
| /* else this shouldn't happen. internal program error */ |
| } |
| /* else converter not found */ |
| } |
| return NULL; |
| } |
| |
| U_CFUNC uint16_t |
| ucnv_io_countStandards(UErrorCode *pErrorCode) { |
| if (haveAliasData(pErrorCode)) { |
| /* Don't include the empty list */ |
| return (uint16_t)(tagListNum - NUM_RESERVED_TAGS); |
| } |
| |
| return 0; |
| } |
| |
| U_CAPI const char * U_EXPORT2 |
| ucnv_getStandard(uint16_t n, UErrorCode *pErrorCode) { |
| if (haveAliasData(pErrorCode)) { |
| if (n < tagListNum - NUM_RESERVED_TAGS) { |
| return GET_STRING(tagList[n]); |
| } |
| *pErrorCode = U_INDEX_OUTOFBOUNDS_ERROR; |
| } |
| |
| return NULL; |
| } |
| |
| U_CAPI const char * U_EXPORT2 |
| ucnv_getStandardName(const char *alias, const char *standard, UErrorCode *pErrorCode) { |
| if (haveAliasData(pErrorCode) && isAlias(alias, pErrorCode)) { |
| uint32_t idx; |
| uint32_t listOffset; |
| uint32_t convNum; |
| uint32_t tagNum = getTagNumber(standard); |
| UErrorCode myErr = U_ZERO_ERROR; |
| |
| /* Make a quick guess. Hopefully they used a TR22 canonical alias. */ |
| convNum = findConverter(alias, &myErr); |
| |
| if (tagNum < (tagListNum - NUM_RESERVED_TAGS) && convNum < converterListNum) { |
| if (myErr == U_AMBIGUOUS_ALIAS_WARNING) { |
| /* Uh Oh! They used an ambiguous alias. |
| Hopefully the standard knows the alias. |
| This may take a while. |
| */ |
| for (idx = 0; idx < converterListNum; idx++) { |
| listOffset = taggedAliasArray[tagNum*converterListNum + idx]; |
| if (listOffset) { |
| uint32_t currAlias; |
| uint32_t listCount = taggedAliasLists[listOffset]; |
| /* +1 to skip listCount */ |
| const uint16_t *currList = taggedAliasLists + listOffset + 1; |
| for (currAlias = 0; currAlias < listCount; currAlias++) { |
| if (currList[currAlias] |
| && ucnv_compareNames(alias, GET_STRING(currList[currAlias]))==0) |
| { |
| if (currList[0]) { |
| return GET_STRING(currList[0]); |
| } |
| else { |
| /* Someone screwed up the alias table. */ |
| return NULL; |
| } |
| } |
| } |
| } |
| } |
| /* The standard doesn't know about the alias */ |
| *pErrorCode = U_AMBIGUOUS_ALIAS_WARNING; |
| } |
| listOffset = taggedAliasArray[tagNum*converterListNum + convNum]; |
| if (listOffset && taggedAliasLists[listOffset + 1]) { |
| return GET_STRING(taggedAliasLists[listOffset + 1]); |
| } |
| /* else no default name */ |
| } |
| /* else converter or tag not found */ |
| } |
| |
| return NULL; |
| } |
| |
| void |
| ucnv_io_flushAvailableConverterCache() { |
| if (availableConverters) { |
| umtx_lock(NULL); |
| availableConverterCount = 0; |
| uprv_free((char **)availableConverters); |
| availableConverters = NULL; |
| umtx_unlock(NULL); |
| } |
| } |
| |
| static UBool haveAvailableConverterList(UErrorCode *pErrorCode) { |
| if (availableConverters == NULL) { |
| uint16_t idx; |
| uint16_t localConverterCount; |
| UErrorCode status; |
| const char *converterName; |
| const char **localConverterList; |
| |
| if (!haveAliasData(pErrorCode)) { |
| return FALSE; |
| } |
| |
| /* We can't have more than "*converterTable" converters to open */ |
| localConverterList = (const char **) uprv_malloc(converterListNum * sizeof(char*)); |
| if (!localConverterList) { |
| *pErrorCode = U_MEMORY_ALLOCATION_ERROR; |
| return FALSE; |
| } |
| |
| localConverterCount = 0; |
| |
| for (idx = 0; idx < converterListNum; idx++) { |
| status = U_ZERO_ERROR; |
| converterName = GET_STRING(converterList[idx]); |
| ucnv_close(ucnv_open(converterName, &status)); |
| if (U_SUCCESS(status)) { |
| localConverterList[localConverterCount++] = converterName; |
| } |
| } |
| |
| umtx_lock(NULL); |
| if (availableConverters == NULL) { |
| availableConverters = localConverterList; |
| availableConverterCount = localConverterCount; |
| } |
| else { |
| uprv_free((char **)localConverterList); |
| } |
| umtx_unlock(NULL); |
| } |
| return TRUE; |
| } |
| |
| U_CFUNC uint16_t |
| ucnv_io_countAvailableConverters(UErrorCode *pErrorCode) { |
| if (haveAvailableConverterList(pErrorCode)) { |
| return availableConverterCount; |
| } |
| return 0; |
| } |
| |
| U_CFUNC const char * |
| ucnv_io_getAvailableConverter(uint16_t n, UErrorCode *pErrorCode) { |
| if (haveAvailableConverterList(pErrorCode)) { |
| if (n < availableConverterCount) { |
| return availableConverters[n]; |
| } |
| *pErrorCode = U_INDEX_OUTOFBOUNDS_ERROR; |
| } |
| return NULL; |
| } |
| |
| U_CFUNC void |
| ucnv_io_fillAvailableConverters(const char **aliases, UErrorCode *pErrorCode) { |
| if (haveAvailableConverterList(pErrorCode)) { |
| uint16_t count = 0; |
| while (count < availableConverterCount) { |
| *aliases++=availableConverters[count++]; |
| } |
| } |
| } |
| |
| U_CFUNC uint16_t |
| ucnv_io_countAvailableAliases(UErrorCode *pErrorCode) { |
| if (haveAliasData(pErrorCode)) { |
| return (uint16_t)aliasListNum; |
| } |
| return 0; |
| } |
| |
| /* default converter name --------------------------------------------------- */ |
| |
| /* |
| * In order to be really thread-safe, the get function would have to take |
| * a buffer parameter and copy the current string inside a mutex block. |
| * This implementation only tries to be really thread-safe while |
| * setting the name. |
| * It assumes that setting a pointer is atomic. |
| */ |
| |
| U_CFUNC const char * |
| ucnv_io_getDefaultConverterName() { |
| /* local variable to be thread-safe */ |
| const char *name=defaultConverterName; |
| if(name==NULL) { |
| const char *codepage = uprv_getDefaultCodepage(); |
| if(codepage!=NULL) { |
| UErrorCode errorCode=U_ZERO_ERROR; |
| name=ucnv_io_getConverterName(codepage, &errorCode); |
| if(U_FAILURE(errorCode) || name==NULL) { |
| name=codepage; |
| } |
| } |
| |
| /* if the name is there, test it out */ |
| if(name != NULL) { |
| UErrorCode errorCode = U_ZERO_ERROR; |
| UConverter *cnv = ucnv_open(name, &errorCode); |
| if(U_FAILURE(errorCode) || (cnv == NULL)) { |
| /* Panic time, let's use a fallback. */ |
| #if (U_CHARSET_FAMILY == U_ASCII_FAMILY) |
| name = "US-ASCII"; |
| /* there is no 'algorithmic' converter for EBCDIC */ |
| #elif defined(OS390) |
| name = "ibm-1047-s390"; |
| #else |
| name = "ibm-37"; |
| #endif |
| } |
| ucnv_close(cnv); |
| } |
| |
| if(name != NULL) { |
| umtx_lock(NULL); |
| /* Did find a name. And it works.*/ |
| defaultConverterName=name; |
| umtx_unlock(NULL); |
| } |
| } |
| |
| return name; |
| } |
| |
| U_CFUNC void |
| ucnv_io_setDefaultConverterName(const char *converterName) { |
| if(converterName==NULL) { |
| /* reset to the default codepage */ |
| defaultConverterName=NULL; |
| } else { |
| UErrorCode errorCode=U_ZERO_ERROR; |
| const char *name=ucnv_io_getConverterName(converterName, &errorCode); |
| if(U_SUCCESS(errorCode) && name!=NULL) { |
| defaultConverterName=name; |
| } else { |
| /* do not set the name if the alias lookup failed and it is too long */ |
| int32_t length=(int32_t)(uprv_strlen(converterName)); |
| if(length<sizeof(defaultConverterNameBuffer)) { |
| /* it was not found as an alias, so copy it - accept an empty name */ |
| UBool didLock; |
| if(defaultConverterName==defaultConverterNameBuffer) { |
| umtx_lock(NULL); |
| didLock=TRUE; |
| } else { |
| didLock=FALSE; |
| } |
| uprv_memcpy(defaultConverterNameBuffer, converterName, length); |
| defaultConverterNameBuffer[length]=0; |
| defaultConverterName=defaultConverterNameBuffer; |
| if(didLock) { |
| umtx_unlock(NULL); |
| } |
| } |
| } |
| } |
| } |
| |
| /* |
| * Hey, Emacs, please set the following: |
| * |
| * Local Variables: |
| * indent-tabs-mode: nil |
| * End: |
| * |
| */ |
| |
