/* ******************************************************************************* * Copyright (C) 1999-2015, International Business Machines Corporation * and others. All Rights Reserved. ******************************************************************************* * file name: uresdata.cpp * encoding: US-ASCII * tab size: 8 (not used) * indentation:4 * * created on: 1999dec08 * created by: Markus W. Scherer * Modification History: * * Date Name Description * 06/20/2000 helena OS/400 port changes; mostly typecast. * 06/24/02 weiv Added support for resource sharing */ #include "unicode/utypes.h" #include "unicode/udata.h" #include "unicode/ustring.h" #include "unicode/utf16.h" #include "cmemory.h" #include "cstring.h" #include "resource.h" #include "uarrsort.h" #include "uassert.h" #include "ucol_swp.h" #include "udataswp.h" #include "uinvchar.h" #include "uresdata.h" #include "uresimp.h" /* * Resource access helpers */ /* get a const char* pointer to the key with the keyOffset byte offset from pRoot */ #define RES_GET_KEY16(pResData, keyOffset) \ ((keyOffset)<(pResData)->localKeyLimit ? \ (const char *)(pResData)->pRoot+(keyOffset) : \ (pResData)->poolBundleKeys+(keyOffset)-(pResData)->localKeyLimit) #define RES_GET_KEY32(pResData, keyOffset) \ ((keyOffset)>=0 ? \ (const char *)(pResData)->pRoot+(keyOffset) : \ (pResData)->poolBundleKeys+((keyOffset)&0x7fffffff)) #define URESDATA_ITEM_NOT_FOUND -1 /* empty resources, returned when the resource offset is 0 */ static const uint16_t gEmpty16=0; static const struct { int32_t length; int32_t res; } gEmpty32={ 0, 0 }; static const struct { int32_t length; UChar nul; UChar pad; } gEmptyString={ 0, 0, 0 }; /* * All the type-access functions assume that * the resource is of the expected type. */ static int32_t _res_findTableItem(const ResourceData *pResData, const uint16_t *keyOffsets, int32_t length, const char *key, const char **realKey) { const char *tableKey; int32_t mid, start, limit; int result; /* do a binary search for the key */ start=0; limit=length; while(startuseNativeStrcmp) { result = uprv_strcmp(key, tableKey); } else { result = uprv_compareInvCharsAsAscii(key, tableKey); } if (result < 0) { limit = mid; } else if (result > 0) { start = mid + 1; } else { /* We found it! */ *realKey=tableKey; return mid; } } return URESDATA_ITEM_NOT_FOUND; /* not found or table is empty. */ } static int32_t _res_findTable32Item(const ResourceData *pResData, const int32_t *keyOffsets, int32_t length, const char *key, const char **realKey) { const char *tableKey; int32_t mid, start, limit; int result; /* do a binary search for the key */ start=0; limit=length; while(startuseNativeStrcmp) { result = uprv_strcmp(key, tableKey); } else { result = uprv_compareInvCharsAsAscii(key, tableKey); } if (result < 0) { limit = mid; } else if (result > 0) { start = mid + 1; } else { /* We found it! */ *realKey=tableKey; return mid; } } return URESDATA_ITEM_NOT_FOUND; /* not found or table is empty. */ } /* helper for res_load() ---------------------------------------------------- */ static UBool U_CALLCONV isAcceptable(void *context, const char * /*type*/, const char * /*name*/, const UDataInfo *pInfo) { uprv_memcpy(context, pInfo->formatVersion, 4); return (UBool)( pInfo->size>=20 && pInfo->isBigEndian==U_IS_BIG_ENDIAN && pInfo->charsetFamily==U_CHARSET_FAMILY && pInfo->sizeofUChar==U_SIZEOF_UCHAR && pInfo->dataFormat[0]==0x52 && /* dataFormat="ResB" */ pInfo->dataFormat[1]==0x65 && pInfo->dataFormat[2]==0x73 && pInfo->dataFormat[3]==0x42 && (1<=pInfo->formatVersion[0] && pInfo->formatVersion[0]<=3)); } /* semi-public functions ---------------------------------------------------- */ static void res_init(ResourceData *pResData, UVersionInfo formatVersion, const void *inBytes, int32_t length, UErrorCode *errorCode) { UResType rootType; /* get the root resource */ pResData->pRoot=(const int32_t *)inBytes; pResData->rootRes=(Resource)*pResData->pRoot; pResData->p16BitUnits=&gEmpty16; /* formatVersion 1.1 must have a root item and at least 5 indexes */ if(length>=0 && (length/4)<((formatVersion[0]==1 && formatVersion[1]==0) ? 1 : 1+5)) { *errorCode=U_INVALID_FORMAT_ERROR; res_unload(pResData); return; } /* currently, we accept only resources that have a Table as their roots */ rootType=(UResType)RES_GET_TYPE(pResData->rootRes); if(!URES_IS_TABLE(rootType)) { *errorCode=U_INVALID_FORMAT_ERROR; res_unload(pResData); return; } if(formatVersion[0]==1 && formatVersion[1]==0) { pResData->localKeyLimit=0x10000; /* greater than any 16-bit key string offset */ } else { /* bundles with formatVersion 1.1 and later contain an indexes[] array */ const int32_t *indexes=pResData->pRoot+1; int32_t indexLength=indexes[URES_INDEX_LENGTH]&0xff; if(indexLength<=URES_INDEX_MAX_TABLE_LENGTH) { *errorCode=U_INVALID_FORMAT_ERROR; res_unload(pResData); return; } if( length>=0 && (length<((1+indexLength)<<2) || length<(indexes[URES_INDEX_BUNDLE_TOP]<<2)) ) { *errorCode=U_INVALID_FORMAT_ERROR; res_unload(pResData); return; } if(indexes[URES_INDEX_KEYS_TOP]>(1+indexLength)) { pResData->localKeyLimit=indexes[URES_INDEX_KEYS_TOP]<<2; } if(formatVersion[0]>=3) { // In formatVersion 1, the indexLength took up this whole int. // In version 2, bits 31..8 were reserved and always 0. // In version 3, they contain bits 23..0 of the poolStringIndexLimit. // Bits 27..24 are in indexes[URES_INDEX_ATTRIBUTES] bits 15..12. pResData->poolStringIndexLimit=(int32_t)((uint32_t)indexes[URES_INDEX_LENGTH]>>8); } if(indexLength>URES_INDEX_ATTRIBUTES) { int32_t att=indexes[URES_INDEX_ATTRIBUTES]; pResData->noFallback=(UBool)(att&URES_ATT_NO_FALLBACK); pResData->isPoolBundle=(UBool)((att&URES_ATT_IS_POOL_BUNDLE)!=0); pResData->usesPoolBundle=(UBool)((att&URES_ATT_USES_POOL_BUNDLE)!=0); pResData->poolStringIndexLimit|=(att&0xf000)<<12; // bits 15..12 -> 27..24 pResData->poolStringIndex16Limit=(int32_t)((uint32_t)att>>16); } if((pResData->isPoolBundle || pResData->usesPoolBundle) && indexLength<=URES_INDEX_POOL_CHECKSUM) { *errorCode=U_INVALID_FORMAT_ERROR; res_unload(pResData); return; } if( indexLength>URES_INDEX_16BIT_TOP && indexes[URES_INDEX_16BIT_TOP]>indexes[URES_INDEX_KEYS_TOP] ) { pResData->p16BitUnits=(const uint16_t *)(pResData->pRoot+indexes[URES_INDEX_KEYS_TOP]); } } if(formatVersion[0]==1 || U_CHARSET_FAMILY==U_ASCII_FAMILY) { /* * formatVersion 1: compare key strings in native-charset order * formatVersion 2 and up: compare key strings in ASCII order */ pResData->useNativeStrcmp=TRUE; } } U_CAPI void U_EXPORT2 res_read(ResourceData *pResData, const UDataInfo *pInfo, const void *inBytes, int32_t length, UErrorCode *errorCode) { UVersionInfo formatVersion; uprv_memset(pResData, 0, sizeof(ResourceData)); if(U_FAILURE(*errorCode)) { return; } if(!isAcceptable(formatVersion, NULL, NULL, pInfo)) { *errorCode=U_INVALID_FORMAT_ERROR; return; } res_init(pResData, formatVersion, inBytes, length, errorCode); } U_CFUNC void res_load(ResourceData *pResData, const char *path, const char *name, UErrorCode *errorCode) { UVersionInfo formatVersion; uprv_memset(pResData, 0, sizeof(ResourceData)); /* load the ResourceBundle file */ pResData->data=udata_openChoice(path, "res", name, isAcceptable, formatVersion, errorCode); if(U_FAILURE(*errorCode)) { return; } /* get its memory and initialize *pResData */ res_init(pResData, formatVersion, udata_getMemory(pResData->data), -1, errorCode); } U_CFUNC void res_unload(ResourceData *pResData) { if(pResData->data!=NULL) { udata_close(pResData->data); pResData->data=NULL; } } static const int8_t gPublicTypes[URES_LIMIT] = { URES_STRING, URES_BINARY, URES_TABLE, URES_ALIAS, URES_TABLE, /* URES_TABLE32 */ URES_TABLE, /* URES_TABLE16 */ URES_STRING, /* URES_STRING_V2 */ URES_INT, URES_ARRAY, URES_ARRAY, /* URES_ARRAY16 */ URES_NONE, URES_NONE, URES_NONE, URES_NONE, URES_INT_VECTOR, URES_NONE }; U_CAPI UResType U_EXPORT2 res_getPublicType(Resource res) { return (UResType)gPublicTypes[RES_GET_TYPE(res)]; } U_CAPI const UChar * U_EXPORT2 res_getString(const ResourceData *pResData, Resource res, int32_t *pLength) { const UChar *p; uint32_t offset=RES_GET_OFFSET(res); int32_t length; if(RES_GET_TYPE(res)==URES_STRING_V2) { int32_t first; if((int32_t)offsetpoolStringIndexLimit) { p=(const UChar *)pResData->poolBundleStrings+offset; } else { p=(const UChar *)pResData->p16BitUnits+(offset-pResData->poolStringIndexLimit); } first=*p; if(!U16_IS_TRAIL(first)) { length=u_strlen(p); } else if(first<0xdfef) { length=first&0x3ff; ++p; } else if(first<0xdfff) { length=((first-0xdfef)<<16)|p[1]; p+=2; } else { length=((int32_t)p[1]<<16)|p[2]; p+=3; } } else if(res==offset) /* RES_GET_TYPE(res)==URES_STRING */ { const int32_t *p32= res==0 ? &gEmptyString.length : pResData->pRoot+res; length=*p32++; p=(const UChar *)p32; } else { p=NULL; length=0; } if(pLength) { *pLength=length; } return p; } namespace { /** * CLDR string value (three empty-set symbols)=={2205, 2205, 2205} * prevents fallback to the parent bundle. * TODO: combine with other code that handles this marker, use EMPTY_SET constant. * TODO: maybe move to uresbund.cpp? */ UBool isNoInheritanceMarker(const ResourceData *pResData, Resource res) { uint32_t offset=RES_GET_OFFSET(res); if (offset == 0) { // empty string } else if (res == offset) { const int32_t *p32=pResData->pRoot+res; int32_t length=*p32; const UChar *p=(const UChar *)p32; return length == 3 && p[2] == 0x2205 && p[3] == 0x2205 && p[4] == 0x2205; } else if (RES_GET_TYPE(res) == URES_STRING_V2) { const UChar *p; if((int32_t)offsetpoolStringIndexLimit) { p=(const UChar *)pResData->poolBundleStrings+offset; } else { p=(const UChar *)pResData->p16BitUnits+(offset-pResData->poolStringIndexLimit); } int32_t first=*p; if (first == 0x2205) { // implicit length return p[1] == 0x2205 && p[2] == 0x2205 && p[3] == 0; } else if (first == 0xdc03) { // explicit length 3 (should not occur) return p[1] == 0x2205 && p[2] == 0x2205 && p[3] == 0x2205; } else { // Assume that the string has not been stored with more length units than necessary. return FALSE; } } return FALSE; } } // namespace U_CAPI const UChar * U_EXPORT2 res_getAlias(const ResourceData *pResData, Resource res, int32_t *pLength) { const UChar *p; uint32_t offset=RES_GET_OFFSET(res); int32_t length; if(RES_GET_TYPE(res)==URES_ALIAS) { const int32_t *p32= offset==0 ? &gEmptyString.length : pResData->pRoot+offset; length=*p32++; p=(const UChar *)p32; } else { p=NULL; length=0; } if(pLength) { *pLength=length; } return p; } U_CAPI const uint8_t * U_EXPORT2 res_getBinary(const ResourceData *pResData, Resource res, int32_t *pLength) { const uint8_t *p; uint32_t offset=RES_GET_OFFSET(res); int32_t length; if(RES_GET_TYPE(res)==URES_BINARY) { const int32_t *p32= offset==0 ? (const int32_t*)&gEmpty32 : pResData->pRoot+offset; length=*p32++; p=(const uint8_t *)p32; } else { p=NULL; length=0; } if(pLength) { *pLength=length; } return p; } U_CAPI const int32_t * U_EXPORT2 res_getIntVector(const ResourceData *pResData, Resource res, int32_t *pLength) { const int32_t *p; uint32_t offset=RES_GET_OFFSET(res); int32_t length; if(RES_GET_TYPE(res)==URES_INT_VECTOR) { p= offset==0 ? (const int32_t *)&gEmpty32 : pResData->pRoot+offset; length=*p++; } else { p=NULL; length=0; } if(pLength) { *pLength=length; } return p; } U_CAPI int32_t U_EXPORT2 res_countArrayItems(const ResourceData *pResData, Resource res) { uint32_t offset=RES_GET_OFFSET(res); switch(RES_GET_TYPE(res)) { case URES_STRING: case URES_STRING_V2: case URES_BINARY: case URES_ALIAS: case URES_INT: case URES_INT_VECTOR: return 1; case URES_ARRAY: case URES_TABLE32: return offset==0 ? 0 : *(pResData->pRoot+offset); case URES_TABLE: return offset==0 ? 0 : *((const uint16_t *)(pResData->pRoot+offset)); case URES_ARRAY16: case URES_TABLE16: return pResData->p16BitUnits[offset]; default: return 0; } } namespace { int32_t getArrayLength(const ResourceData *pResData, Resource res) { uint32_t offset=RES_GET_OFFSET(res); if(offset == 0) { return 0; } int32_t type = RES_GET_TYPE(res); if(type == URES_ARRAY) { return *(pResData->pRoot+offset); } else if(type == URES_ARRAY16) { return pResData->p16BitUnits[offset]; } else { return 0; } } int32_t getTableLength(const ResourceData *pResData, Resource res) { uint32_t offset=RES_GET_OFFSET(res); if(offset == 0) { return 0; } int32_t type = RES_GET_TYPE(res); if(type == URES_TABLE) { return *((const uint16_t *)(pResData->pRoot+offset)); } else if(type == URES_TABLE16) { return pResData->p16BitUnits[offset]; } else if(type == URES_TABLE32) { return *(pResData->pRoot+offset); } else { return 0; } } } // namespace U_NAMESPACE_BEGIN ResourceDataValue::~ResourceDataValue() {} UResType ResourceDataValue::getType() const { return res_getPublicType(res); } const UChar *ResourceDataValue::getString(int32_t &length, UErrorCode &errorCode) const { if(U_FAILURE(errorCode)) { return NULL; } const UChar *s = res_getString(pResData, res, &length); if(s == NULL) { errorCode = U_RESOURCE_TYPE_MISMATCH; } return s; } const UChar *ResourceDataValue::getAliasString(int32_t &length, UErrorCode &errorCode) const { if(U_FAILURE(errorCode)) { return NULL; } const UChar *s = res_getAlias(pResData, res, &length); if(s == NULL) { errorCode = U_RESOURCE_TYPE_MISMATCH; } return s; } int32_t ResourceDataValue::getInt(UErrorCode &errorCode) const { if(U_FAILURE(errorCode)) { return 0; } if(RES_GET_TYPE(res) != URES_INT) { errorCode = U_RESOURCE_TYPE_MISMATCH; } return RES_GET_INT(res); } uint32_t ResourceDataValue::getUInt(UErrorCode &errorCode) const { if(U_FAILURE(errorCode)) { return 0; } if(RES_GET_TYPE(res) != URES_INT) { errorCode = U_RESOURCE_TYPE_MISMATCH; } return RES_GET_UINT(res); } const int32_t *ResourceDataValue::getIntVector(int32_t &length, UErrorCode &errorCode) const { if(U_FAILURE(errorCode)) { return NULL; } const int32_t *iv = res_getIntVector(pResData, res, &length); if(iv == NULL) { errorCode = U_RESOURCE_TYPE_MISMATCH; } return iv; } const uint8_t *ResourceDataValue::getBinary(int32_t &length, UErrorCode &errorCode) const { if(U_FAILURE(errorCode)) { return NULL; } const uint8_t *b = res_getBinary(pResData, res, &length); if(b == NULL) { errorCode = U_RESOURCE_TYPE_MISMATCH; } return b; } U_NAMESPACE_END static Resource makeResourceFrom16(const ResourceData *pResData, int32_t res16) { if(res16poolStringIndex16Limit) { // Pool string, nothing to do. } else { // Local string, adjust the 16-bit offset to a regular one, // with a larger pool string index limit. res16=res16-pResData->poolStringIndex16Limit+pResData->poolStringIndexLimit; } return URES_MAKE_RESOURCE(URES_STRING_V2, res16); } U_CAPI Resource U_EXPORT2 res_getTableItemByKey(const ResourceData *pResData, Resource table, int32_t *indexR, const char **key) { uint32_t offset=RES_GET_OFFSET(table); int32_t length; int32_t idx; if(key == NULL || *key == NULL) { return RES_BOGUS; } switch(RES_GET_TYPE(table)) { case URES_TABLE: { if (offset!=0) { /* empty if offset==0 */ const uint16_t *p= (const uint16_t *)(pResData->pRoot+offset); length=*p++; *indexR=idx=_res_findTableItem(pResData, p, length, *key, key); if(idx>=0) { const Resource *p32=(const Resource *)(p+length+(~length&1)); return p32[idx]; } } break; } case URES_TABLE16: { const uint16_t *p=pResData->p16BitUnits+offset; length=*p++; *indexR=idx=_res_findTableItem(pResData, p, length, *key, key); if(idx>=0) { return makeResourceFrom16(pResData, p[length+idx]); } break; } case URES_TABLE32: { if (offset!=0) { /* empty if offset==0 */ const int32_t *p= pResData->pRoot+offset; length=*p++; *indexR=idx=_res_findTable32Item(pResData, p, length, *key, key); if(idx>=0) { return (Resource)p[length+idx]; } } break; } default: break; } return RES_BOGUS; } U_CAPI Resource U_EXPORT2 res_getTableItemByIndex(const ResourceData *pResData, Resource table, int32_t indexR, const char **key) { uint32_t offset=RES_GET_OFFSET(table); int32_t length; U_ASSERT(indexR>=0); /* to ensure the index is not negative */ switch(RES_GET_TYPE(table)) { case URES_TABLE: { if (offset != 0) { /* empty if offset==0 */ const uint16_t *p= (const uint16_t *)(pResData->pRoot+offset); length=*p++; if(indexRp16BitUnits+offset; length=*p++; if(indexRpRoot+offset; length=*p++; if(indexRrootRes, &idx, &realKey); } // TODO: Ported from Java, but enumerating at this low level may prevent us // from doing necessary things, like resolving aliases, // which need access to higher-level UResourceBundle code. // Consider porting the low-level Container/Array/Table classes from Java, // with getters for keys and values, // and doing the enumeration in the higher-level code on top of those accessors. U_CFUNC void ures_getAllTableItems(const ResourceData *pResData, Resource table, icu::ResourceDataValue &value, icu::ResourceTableSink &sink, UErrorCode &errorCode) { if(U_FAILURE(errorCode)) { return; } const uint16_t *keys16 = NULL; const int32_t *keys32 = NULL; const uint16_t *items16 = NULL; const Resource *items32 = NULL; uint32_t offset = RES_GET_OFFSET(table); int32_t length = 0; switch(RES_GET_TYPE(table)) { case URES_TABLE: { if (offset != 0) { /* empty if offset==0 */ keys16 = (const uint16_t *)(pResData->pRoot+offset); length = *keys16++; items32 = (const Resource *)(keys16+length+(~length&1)); } break; } case URES_TABLE16: { keys16 = pResData->p16BitUnits+offset; length = *keys16++; items16 = keys16 + length; break; } case URES_TABLE32: { if (offset != 0) { /* empty if offset==0 */ keys32 = pResData->pRoot+offset; length = *keys32++; items32 = (const Resource *)keys32 + length; } break; } default: errorCode = U_RESOURCE_TYPE_MISMATCH; return; } for (int32_t i = 0; i < length; ++i) { const char *key; if (keys16 != NULL) { key=RES_GET_KEY16(pResData, keys16[i]); } else { key=RES_GET_KEY32(pResData, keys32[i]); } Resource res; if (items16 != NULL) { res = makeResourceFrom16(pResData, items16[i]); } else { res = items32[i]; } int32_t type = RES_GET_TYPE(res); if (URES_IS_ARRAY(type)) { int32_t numItems = getArrayLength(pResData, res); icu::ResourceArraySink *subSink = sink.getOrCreateArraySink(key, numItems, errorCode); if (subSink != NULL) { ures_getAllArrayItems(pResData, res, value, *subSink, errorCode); } } else if (URES_IS_TABLE(type)) { int32_t numItems = getTableLength(pResData, res); icu::ResourceTableSink *subSink = sink.getOrCreateTableSink(key, numItems, errorCode); if (subSink != NULL) { ures_getAllTableItems(pResData, res, value, *subSink, errorCode); } /* TODO: settle on how to deal with aliases, port to Java } else if (type == URES_ALIAS) { // aliases not handled in resource enumeration errorCode = U_UNSUPPORTED_ERROR; return; */ } else if (isNoInheritanceMarker(pResData, res)) { sink.putNoFallback(key, errorCode); } else { value.setResource(res); sink.put(key, value, errorCode); } if(U_FAILURE(errorCode)) { return; } } sink.leave(errorCode); } U_CAPI Resource U_EXPORT2 res_getArrayItem(const ResourceData *pResData, Resource array, int32_t indexR) { uint32_t offset=RES_GET_OFFSET(array); U_ASSERT(indexR>=0); /* to ensure the index is not negative */ switch(RES_GET_TYPE(array)) { case URES_ARRAY: { if (offset!=0) { /* empty if offset==0 */ const int32_t *p= pResData->pRoot+offset; if(indexR<*p) { return (Resource)p[1+indexR]; } } break; } case URES_ARRAY16: { const uint16_t *p=pResData->p16BitUnits+offset; if(indexR<*p) { return makeResourceFrom16(pResData, p[1+indexR]); } break; } default: break; } return RES_BOGUS; } U_CFUNC void ures_getAllArrayItems(const ResourceData *pResData, Resource array, icu::ResourceDataValue &value, icu::ResourceArraySink &sink, UErrorCode &errorCode) { if(U_FAILURE(errorCode)) { return; } const uint16_t *items16 = NULL; const Resource *items32 = NULL; uint32_t offset=RES_GET_OFFSET(array); int32_t length = 0; switch(RES_GET_TYPE(array)) { case URES_ARRAY: { if (offset!=0) { /* empty if offset==0 */ items32 = (const Resource *)pResData->pRoot+offset; length = *items32++; } break; } case URES_ARRAY16: { items16 = pResData->p16BitUnits+offset; length = *items16++; break; } default: errorCode = U_RESOURCE_TYPE_MISMATCH; return; } for (int32_t i = 0; i < length; ++i) { Resource res; if (items16 != NULL) { res = makeResourceFrom16(pResData, items16[i]); } else { res = items32[i]; } int32_t type = RES_GET_TYPE(res); if (URES_IS_ARRAY(type)) { int32_t numItems = getArrayLength(pResData, res); icu::ResourceArraySink *subSink = sink.getOrCreateArraySink(i, numItems, errorCode); if (subSink != NULL) { ures_getAllArrayItems(pResData, res, value, *subSink, errorCode); } } else if (URES_IS_TABLE(type)) { int32_t numItems = getTableLength(pResData, res); icu::ResourceTableSink *subSink = sink.getOrCreateTableSink(i, numItems, errorCode); if (subSink != NULL) { ures_getAllTableItems(pResData, res, value, *subSink, errorCode); } /* TODO: settle on how to deal with aliases, port to Java } else if (type == URES_ALIAS) { // aliases not handled in resource enumeration errorCode = U_UNSUPPORTED_ERROR; return; */ } else { value.setResource(res); sink.put(i, value, errorCode); } if(U_FAILURE(errorCode)) { return; } } sink.leave(errorCode); } U_CFUNC Resource res_findResource(const ResourceData *pResData, Resource r, char** path, const char** key) { char *pathP = *path, *nextSepP = *path; char *closeIndex = NULL; Resource t1 = r; Resource t2; int32_t indexR = 0; UResType type = (UResType)RES_GET_TYPE(t1); /* if you come in with an empty path, you'll be getting back the same resource */ if(!uprv_strlen(pathP)) { return r; } /* one needs to have an aggregate resource in order to search in it */ if(!URES_IS_CONTAINER(type)) { return RES_BOGUS; } while(nextSepP && *pathP && t1 != RES_BOGUS && URES_IS_CONTAINER(type)) { /* Iteration stops if: the path has been consumed, we found a non-existing * resource (t1 == RES_BOGUS) or we found a scalar resource (including alias) */ nextSepP = uprv_strchr(pathP, RES_PATH_SEPARATOR); /* if there are more separators, terminate string * and set path to the remaining part of the string */ if(nextSepP != NULL) { if(nextSepP == pathP) { // Empty key string. return RES_BOGUS; } *nextSepP = 0; /* overwrite the separator with a NUL to terminate the key */ *path = nextSepP+1; } else { *path = uprv_strchr(pathP, 0); } /* if the resource is a table */ /* try the key based access */ if(URES_IS_TABLE(type)) { *key = pathP; t2 = res_getTableItemByKey(pResData, t1, &indexR, key); if(t2 == RES_BOGUS) { /* if we fail to get the resource by key, maybe we got an index */ indexR = uprv_strtol(pathP, &closeIndex, 10); if(*closeIndex == 0) { /* if we indeed have an index, try to get the item by index */ t2 = res_getTableItemByIndex(pResData, t1, indexR, key); } } } else if(URES_IS_ARRAY(type)) { indexR = uprv_strtol(pathP, &closeIndex, 10); if(*closeIndex == 0) { t2 = res_getArrayItem(pResData, t1, indexR); } else { t2 = RES_BOGUS; /* have an array, but don't have a valid index */ } *key = NULL; } else { /* can't do much here, except setting t2 to bogus */ t2 = RES_BOGUS; } t1 = t2; type = (UResType)RES_GET_TYPE(t1); /* position pathP to next resource key/index */ pathP = *path; } return t1; } /* resource bundle swapping ------------------------------------------------- */ /* * Need to always enumerate the entire item tree, * track the lowest address of any item to use as the limit for char keys[], * track the highest address of any item to return the size of the data. * * We should have thought of storing those in the data... * It is possible to extend the data structure by putting additional values * in places that are inaccessible by ordinary enumeration of the item tree. * For example, additional integers could be stored at the beginning or * end of the key strings; this could be indicated by a minor version number, * and the data swapping would have to know about these values. * * The data structure does not forbid keys to be shared, so we must swap * all keys once instead of each key when it is referenced. * * These swapping functions assume that a resource bundle always has a length * that is a multiple of 4 bytes. * Currently, this is trivially true because genrb writes bundle tree leaves * physically first, before their branches, so that the root table with its * array of resource items (uint32_t values) is always last. */ /* definitions for table sorting ------------------------ */ /* * row of a temporary array * * gets platform-endian key string indexes and sorting indexes; * after sorting this array by keys, the actual key/value arrays are permutated * according to the sorting indexes */ typedef struct Row { int32_t keyIndex, sortIndex; } Row; static int32_t ures_compareRows(const void *context, const void *left, const void *right) { const char *keyChars=(const char *)context; return (int32_t)uprv_strcmp(keyChars+((const Row *)left)->keyIndex, keyChars+((const Row *)right)->keyIndex); } typedef struct TempTable { const char *keyChars; Row *rows; int32_t *resort; uint32_t *resFlags; int32_t localKeyLimit; uint8_t majorFormatVersion; } TempTable; enum { STACK_ROW_CAPACITY=200 }; /* The table item key string is not locally available. */ static const char *const gUnknownKey=""; /* resource table key for collation binaries: "%%CollationBin" */ static const UChar gCollationBinKey[]={ 0x25, 0x25, 0x43, 0x6f, 0x6c, 0x6c, 0x61, 0x74, 0x69, 0x6f, 0x6e, 0x42, 0x69, 0x6e, 0 }; /* * swap one resource item */ static void ures_swapResource(const UDataSwapper *ds, const Resource *inBundle, Resource *outBundle, Resource res, /* caller swaps res itself */ const char *key, TempTable *pTempTable, UErrorCode *pErrorCode) { const Resource *p; Resource *q; int32_t offset, count; switch(RES_GET_TYPE(res)) { case URES_TABLE16: case URES_STRING_V2: case URES_INT: case URES_ARRAY16: /* integer, or points to 16-bit units, nothing to do here */ return; default: break; } /* all other types use an offset to point to their data */ offset=(int32_t)RES_GET_OFFSET(res); if(offset==0) { /* special offset indicating an empty item */ return; } if(pTempTable->resFlags[offset>>5]&((uint32_t)1<<(offset&0x1f))) { /* we already swapped this resource item */ return; } else { /* mark it as swapped now */ pTempTable->resFlags[offset>>5]|=((uint32_t)1<<(offset&0x1f)); } p=inBundle+offset; q=outBundle+offset; switch(RES_GET_TYPE(res)) { case URES_ALIAS: /* physically same value layout as string, fall through */ case URES_STRING: count=udata_readInt32(ds, (int32_t)*p); /* swap length */ ds->swapArray32(ds, p, 4, q, pErrorCode); /* swap each UChar (the terminating NUL would not change) */ ds->swapArray16(ds, p+1, 2*count, q+1, pErrorCode); break; case URES_BINARY: count=udata_readInt32(ds, (int32_t)*p); /* swap length */ ds->swapArray32(ds, p, 4, q, pErrorCode); /* no need to swap or copy bytes - ures_swap() copied them all */ /* swap known formats */ #if !UCONFIG_NO_COLLATION if( key!=NULL && /* the binary is in a table */ (key!=gUnknownKey ? /* its table key string is "%%CollationBin" */ 0==ds->compareInvChars(ds, key, -1, gCollationBinKey, UPRV_LENGTHOF(gCollationBinKey)-1) : /* its table key string is unknown but it looks like a collation binary */ ucol_looksLikeCollationBinary(ds, p+1, count)) ) { ucol_swap(ds, p+1, count, q+1, pErrorCode); } #endif break; case URES_TABLE: case URES_TABLE32: { const uint16_t *pKey16; uint16_t *qKey16; const int32_t *pKey32; int32_t *qKey32; Resource item; int32_t i, oldIndex; if(RES_GET_TYPE(res)==URES_TABLE) { /* get table item count */ pKey16=(const uint16_t *)p; qKey16=(uint16_t *)q; count=ds->readUInt16(*pKey16); pKey32=qKey32=NULL; /* swap count */ ds->swapArray16(ds, pKey16++, 2, qKey16++, pErrorCode); offset+=((1+count)+1)/2; } else { /* get table item count */ pKey32=(const int32_t *)p; qKey32=(int32_t *)q; count=udata_readInt32(ds, *pKey32); pKey16=qKey16=NULL; /* swap count */ ds->swapArray32(ds, pKey32++, 4, qKey32++, pErrorCode); offset+=1+count; } if(count==0) { break; } p=inBundle+offset; /* pointer to table resources */ q=outBundle+offset; /* recurse */ for(i=0; ireadUInt16(pKey16[i]); if(keyOffsetlocalKeyLimit) { itemKey=(const char *)outBundle+keyOffset; } } else { int32_t keyOffset=udata_readInt32(ds, pKey32[i]); if(keyOffset>=0) { itemKey=(const char *)outBundle+keyOffset; } } item=ds->readUInt32(p[i]); ures_swapResource(ds, inBundle, outBundle, item, itemKey, pTempTable, pErrorCode); if(U_FAILURE(*pErrorCode)) { udata_printError(ds, "ures_swapResource(table res=%08x)[%d].recurse(%08x) failed\n", res, i, item); return; } } if(pTempTable->majorFormatVersion>1 || ds->inCharset==ds->outCharset) { /* no need to sort, just swap the offset/value arrays */ if(pKey16!=NULL) { ds->swapArray16(ds, pKey16, count*2, qKey16, pErrorCode); ds->swapArray32(ds, p, count*4, q, pErrorCode); } else { /* swap key offsets and items as one array */ ds->swapArray32(ds, pKey32, count*2*4, qKey32, pErrorCode); } break; } /* * We need to sort tables by outCharset key strings because they * sort differently for different charset families. * ures_swap() already set pTempTable->keyChars appropriately. * First we set up a temporary table with the key indexes and * sorting indexes and sort that. * Then we permutate and copy/swap the actual values. */ if(pKey16!=NULL) { for(i=0; irows[i].keyIndex=ds->readUInt16(pKey16[i]); pTempTable->rows[i].sortIndex=i; } } else { for(i=0; irows[i].keyIndex=udata_readInt32(ds, pKey32[i]); pTempTable->rows[i].sortIndex=i; } } uprv_sortArray(pTempTable->rows, count, sizeof(Row), ures_compareRows, pTempTable->keyChars, FALSE, pErrorCode); if(U_FAILURE(*pErrorCode)) { udata_printError(ds, "ures_swapResource(table res=%08x).uprv_sortArray(%d items) failed\n", res, count); return; } /* * copy/swap/permutate items * * If we swap in-place, then the permutation must use another * temporary array (pTempTable->resort) * before the results are copied to the outBundle. */ /* keys */ if(pKey16!=NULL) { uint16_t *rKey16; if(pKey16!=qKey16) { rKey16=qKey16; } else { rKey16=(uint16_t *)pTempTable->resort; } for(i=0; irows[i].sortIndex; ds->swapArray16(ds, pKey16+oldIndex, 2, rKey16+i, pErrorCode); } if(qKey16!=rKey16) { uprv_memcpy(qKey16, rKey16, 2*count); } } else { int32_t *rKey32; if(pKey32!=qKey32) { rKey32=qKey32; } else { rKey32=pTempTable->resort; } for(i=0; irows[i].sortIndex; ds->swapArray32(ds, pKey32+oldIndex, 4, rKey32+i, pErrorCode); } if(qKey32!=rKey32) { uprv_memcpy(qKey32, rKey32, 4*count); } } /* resources */ { Resource *r; if(p!=q) { r=q; } else { r=(Resource *)pTempTable->resort; } for(i=0; irows[i].sortIndex; ds->swapArray32(ds, p+oldIndex, 4, r+i, pErrorCode); } if(q!=r) { uprv_memcpy(q, r, 4*count); } } } break; case URES_ARRAY: { Resource item; int32_t i; count=udata_readInt32(ds, (int32_t)*p); /* swap length */ ds->swapArray32(ds, p++, 4, q++, pErrorCode); /* recurse */ for(i=0; ireadUInt32(p[i]); ures_swapResource(ds, inBundle, outBundle, item, NULL, pTempTable, pErrorCode); if(U_FAILURE(*pErrorCode)) { udata_printError(ds, "ures_swapResource(array res=%08x)[%d].recurse(%08x) failed\n", res, i, item); return; } } /* swap items */ ds->swapArray32(ds, p, 4*count, q, pErrorCode); } break; case URES_INT_VECTOR: count=udata_readInt32(ds, (int32_t)*p); /* swap length and each integer */ ds->swapArray32(ds, p, 4*(1+count), q, pErrorCode); break; default: /* also catches RES_BOGUS */ *pErrorCode=U_UNSUPPORTED_ERROR; break; } } U_CAPI int32_t U_EXPORT2 ures_swap(const UDataSwapper *ds, const void *inData, int32_t length, void *outData, UErrorCode *pErrorCode) { const UDataInfo *pInfo; const Resource *inBundle; Resource rootRes; int32_t headerSize, maxTableLength; Row rows[STACK_ROW_CAPACITY]; int32_t resort[STACK_ROW_CAPACITY]; TempTable tempTable; const int32_t *inIndexes; /* the following integers count Resource item offsets (4 bytes each), not bytes */ int32_t bundleLength, indexLength, keysBottom, keysTop, resBottom, top; /* udata_swapDataHeader checks the arguments */ headerSize=udata_swapDataHeader(ds, inData, length, outData, pErrorCode); if(pErrorCode==NULL || U_FAILURE(*pErrorCode)) { return 0; } /* check data format and format version */ pInfo=(const UDataInfo *)((const char *)inData+4); if(!( pInfo->dataFormat[0]==0x52 && /* dataFormat="ResB" */ pInfo->dataFormat[1]==0x65 && pInfo->dataFormat[2]==0x73 && pInfo->dataFormat[3]==0x42 && /* formatVersion 1.1+ or 2.x or 3.x */ ((pInfo->formatVersion[0]==1 && pInfo->formatVersion[1]>=1) || pInfo->formatVersion[0]==2 || pInfo->formatVersion[0]==3) )) { udata_printError(ds, "ures_swap(): data format %02x.%02x.%02x.%02x (format version %02x.%02x) is not a resource bundle\n", pInfo->dataFormat[0], pInfo->dataFormat[1], pInfo->dataFormat[2], pInfo->dataFormat[3], pInfo->formatVersion[0], pInfo->formatVersion[1]); *pErrorCode=U_UNSUPPORTED_ERROR; return 0; } tempTable.majorFormatVersion=pInfo->formatVersion[0]; /* a resource bundle must contain at least one resource item */ if(length<0) { bundleLength=-1; } else { bundleLength=(length-headerSize)/4; /* formatVersion 1.1 must have a root item and at least 5 indexes */ if(bundleLength<(1+5)) { udata_printError(ds, "ures_swap(): too few bytes (%d after header) for a resource bundle\n", length-headerSize); *pErrorCode=U_INDEX_OUTOFBOUNDS_ERROR; return 0; } } inBundle=(const Resource *)((const char *)inData+headerSize); rootRes=ds->readUInt32(*inBundle); /* formatVersion 1.1 adds the indexes[] array */ inIndexes=(const int32_t *)(inBundle+1); indexLength=udata_readInt32(ds, inIndexes[URES_INDEX_LENGTH])&0xff; if(indexLength<=URES_INDEX_MAX_TABLE_LENGTH) { udata_printError(ds, "ures_swap(): too few indexes for a 1.1+ resource bundle\n"); *pErrorCode=U_INDEX_OUTOFBOUNDS_ERROR; return 0; } keysBottom=1+indexLength; keysTop=udata_readInt32(ds, inIndexes[URES_INDEX_KEYS_TOP]); if(indexLength>URES_INDEX_16BIT_TOP) { resBottom=udata_readInt32(ds, inIndexes[URES_INDEX_16BIT_TOP]); } else { resBottom=keysTop; } top=udata_readInt32(ds, inIndexes[URES_INDEX_BUNDLE_TOP]); maxTableLength=udata_readInt32(ds, inIndexes[URES_INDEX_MAX_TABLE_LENGTH]); if(0<=bundleLength && bundleLength(1+indexLength)) { tempTable.localKeyLimit=keysTop<<2; } else { tempTable.localKeyLimit=0; } if(length>=0) { Resource *outBundle=(Resource *)((char *)outData+headerSize); /* track which resources we have already swapped */ uint32_t stackResFlags[STACK_ROW_CAPACITY]; int32_t resFlagsLength; /* * We need one bit per 4 resource bundle bytes so that we can track * every possible Resource for whether we have swapped it already. * Multiple Resource words can refer to the same bundle offsets * for sharing identical values. * We could optimize this by allocating only for locations above * where Resource values are stored (above keys & strings). */ resFlagsLength=(length+31)>>5; /* number of bytes needed */ resFlagsLength=(resFlagsLength+3)&~3; /* multiple of 4 bytes for uint32_t */ if(resFlagsLength<=(int32_t)sizeof(stackResFlags)) { tempTable.resFlags=stackResFlags; } else { tempTable.resFlags=(uint32_t *)uprv_malloc(resFlagsLength); if(tempTable.resFlags==NULL) { udata_printError(ds, "ures_swap(): unable to allocate memory for tracking resources\n"); *pErrorCode=U_MEMORY_ALLOCATION_ERROR; return 0; } } uprv_memset(tempTable.resFlags, 0, resFlagsLength); /* copy the bundle for binary and inaccessible data */ if(inData!=outData) { uprv_memcpy(outBundle, inBundle, 4*top); } /* swap the key strings, but not the padding bytes (0xaa) after the last string and its NUL */ udata_swapInvStringBlock(ds, inBundle+keysBottom, 4*(keysTop-keysBottom), outBundle+keysBottom, pErrorCode); if(U_FAILURE(*pErrorCode)) { udata_printError(ds, "ures_swap().udata_swapInvStringBlock(keys[%d]) failed\n", 4*(keysTop-keysBottom)); return 0; } /* swap the 16-bit units (strings, table16, array16) */ if(keysTopswapArray16(ds, inBundle+keysTop, (resBottom-keysTop)*4, outBundle+keysTop, pErrorCode); if(U_FAILURE(*pErrorCode)) { udata_printError(ds, "ures_swap().swapArray16(16-bit units[%d]) failed\n", 2*(resBottom-keysTop)); return 0; } } /* allocate the temporary table for sorting resource tables */ tempTable.keyChars=(const char *)outBundle; /* sort by outCharset */ if(tempTable.majorFormatVersion>1 || maxTableLength<=STACK_ROW_CAPACITY) { tempTable.rows=rows; tempTable.resort=resort; } else { tempTable.rows=(Row *)uprv_malloc(maxTableLength*sizeof(Row)+maxTableLength*4); if(tempTable.rows==NULL) { udata_printError(ds, "ures_swap(): unable to allocate memory for sorting tables (max length: %d)\n", maxTableLength); *pErrorCode=U_MEMORY_ALLOCATION_ERROR; if(tempTable.resFlags!=stackResFlags) { uprv_free(tempTable.resFlags); } return 0; } tempTable.resort=(int32_t *)(tempTable.rows+maxTableLength); } /* swap the resources */ ures_swapResource(ds, inBundle, outBundle, rootRes, NULL, &tempTable, pErrorCode); if(U_FAILURE(*pErrorCode)) { udata_printError(ds, "ures_swapResource(root res=%08x) failed\n", rootRes); } if(tempTable.rows!=rows) { uprv_free(tempTable.rows); } if(tempTable.resFlags!=stackResFlags) { uprv_free(tempTable.resFlags); } /* swap the root resource and indexes */ ds->swapArray32(ds, inBundle, keysBottom*4, outBundle, pErrorCode); } return headerSize+4*top; }