X-Git-Url: https://git.saurik.com/apple/icu.git/blobdiff_plain/b75a7d8f3b4adbae880cab104ce2c6a50eee4db2..b331163bffd790ced0e88b73f44f86d49ccc48a5:/icuSources/i18n/timezone.cpp diff --git a/icuSources/i18n/timezone.cpp b/icuSources/i18n/timezone.cpp index 12aa249f..59c38915 100644 --- a/icuSources/i18n/timezone.cpp +++ b/icuSources/i18n/timezone.cpp @@ -1,7 +1,7 @@ /* ******************************************************************************* -* Copyright (C) 1997-2003, International Business Machines Corporation and * -* others. All Rights Reserved. * +* Copyright (C) 1997-2015, International Business Machines Corporation and +* others. All Rights Reserved. ******************************************************************************* * * File TIMEZONE.CPP @@ -35,215 +35,290 @@ * available IDs code. Misc. cleanup. *********************************************************************************/ +#include "utypeinfo.h" // for 'typeid' to work + #include "unicode/utypes.h" +#include "unicode/ustring.h" +#include "uassert.h" +#include "ustr_imp.h" + +#ifdef U_DEBUG_TZ +# include +# include "uresimp.h" // for debugging + +static void debug_tz_loc(const char *f, int32_t l) +{ + fprintf(stderr, "%s:%d: ", f, l); +} + +static void debug_tz_msg(const char *pat, ...) +{ + va_list ap; + va_start(ap, pat); + vfprintf(stderr, pat, ap); + fflush(stderr); +} +static char gStrBuf[256]; +#define U_DEBUG_TZ_STR(x) u_austrncpy(gStrBuf,x,sizeof(gStrBuf)-1) +// must use double parens, i.e.: U_DEBUG_TZ_MSG(("four is: %d",4)); +#define U_DEBUG_TZ_MSG(x) {debug_tz_loc(__FILE__,__LINE__);debug_tz_msg x;} +#else +#define U_DEBUG_TZ_MSG(x) +#endif #if !UCONFIG_NO_FORMATTING #include "unicode/simpletz.h" -#include "unicode/smpdtfmt.h" #include "unicode/calendar.h" +#include "unicode/gregocal.h" +#include "unicode/ures.h" +#include "unicode/tzfmt.h" +#include "unicode/numfmt.h" +#include "gregoimp.h" +#include "uresimp.h" // struct UResourceBundle +#include "olsontz.h" #include "mutex.h" #include "unicode/udata.h" -#include "tzdat.h" #include "ucln_in.h" #include "cstring.h" #include "cmemory.h" #include "unicode/strenum.h" #include "uassert.h" - -/** - * udata callback to verify the zone data. - */ -U_CDECL_BEGIN -static UBool U_CALLCONV -isTimeZoneDataAcceptable(void * /*context*/, - const char * /*type*/, const char * /*name*/, - const UDataInfo *pInfo) { - return - pInfo->size >= sizeof(UDataInfo) && - pInfo->isBigEndian == U_IS_BIG_ENDIAN && - pInfo->charsetFamily == U_CHARSET_FAMILY && - pInfo->dataFormat[0] == TZ_SIG_0 && - pInfo->dataFormat[1] == TZ_SIG_1 && - pInfo->dataFormat[2] == TZ_SIG_2 && - pInfo->dataFormat[3] == TZ_SIG_3 && - pInfo->formatVersion[0] == TZ_FORMAT_VERSION; -} -U_CDECL_END +#include "zonemeta.h" + +#define kZONEINFO "zoneinfo64" +#define kREGIONS "Regions" +#define kZONES "Zones" +#define kRULES "Rules" +#define kNAMES "Names" +#define kTZVERSION "TZVersion" +#define kLINKS "links" +#define kMAX_CUSTOM_HOUR 23 +#define kMAX_CUSTOM_MIN 59 +#define kMAX_CUSTOM_SEC 59 +#define MINUS 0x002D +#define PLUS 0x002B +#define ZERO_DIGIT 0x0030 +#define COLON 0x003A // Static data and constants +static const UChar WORLD[] = {0x30, 0x30, 0x31, 0x00}; /* "001" */ + static const UChar GMT_ID[] = {0x47, 0x4D, 0x54, 0x00}; /* "GMT" */ +static const UChar UNKNOWN_ZONE_ID[] = {0x45, 0x74, 0x63, 0x2F, 0x55, 0x6E, 0x6B, 0x6E, 0x6F, 0x77, 0x6E, 0x00}; /* "Etc/Unknown" */ static const int32_t GMT_ID_LENGTH = 3; -static const UChar CUSTOM_ID[] = -{ - 0x43, 0x75, 0x73, 0x74, 0x6F, 0x6D, 0x00 /* "Custom" */ -}; +static const int32_t UNKNOWN_ZONE_ID_LENGTH = 11; -// See header file for documentation of the following -static const TZHeader * DATA = NULL; // alias into UDATA_MEMORY -static const uint32_t* INDEX_BY_ID = 0; // alias into UDATA_MEMORY -static const OffsetIndex* INDEX_BY_OFFSET = 0; // alias into UDATA_MEMORY -static const CountryIndex* INDEX_BY_COUNTRY = 0; // alias into UDATA_MEMORY +static icu::TimeZone* DEFAULT_ZONE = NULL; +static icu::UInitOnce gDefaultZoneInitOnce = U_INITONCE_INITIALIZER; -static UDataMemory* UDATA_MEMORY = 0; -static UMTX LOCK; -static TimeZone* DEFAULT_ZONE = NULL; -static TimeZone* _GMT = NULL; // cf. TimeZone::GMT -static UnicodeString* ZONE_IDS = 0; -const char TimeZone::fgClassID = 0; // Value is irrelevant +static icu::TimeZone* _GMT = NULL; +static icu::TimeZone* _UNKNOWN_ZONE = NULL; +static icu::UInitOnce gStaticZonesInitOnce = U_INITONCE_INITIALIZER; -UBool timeZone_cleanup() -{ - // Aliases into UDATA_MEMORY; do NOT delete - DATA = NULL; - INDEX_BY_ID = NULL; - INDEX_BY_OFFSET = NULL; - INDEX_BY_COUNTRY = NULL; +static char TZDATA_VERSION[16]; +static icu::UInitOnce gTZDataVersionInitOnce = U_INITONCE_INITIALIZER; - delete []ZONE_IDS; - ZONE_IDS = NULL; +static int32_t* MAP_SYSTEM_ZONES = NULL; +static int32_t* MAP_CANONICAL_SYSTEM_ZONES = NULL; +static int32_t* MAP_CANONICAL_SYSTEM_LOCATION_ZONES = NULL; +static int32_t LEN_SYSTEM_ZONES = 0; +static int32_t LEN_CANONICAL_SYSTEM_ZONES = 0; +static int32_t LEN_CANONICAL_SYSTEM_LOCATION_ZONES = 0; + +static icu::UInitOnce gSystemZonesInitOnce = U_INITONCE_INITIALIZER; +static icu::UInitOnce gCanonicalZonesInitOnce = U_INITONCE_INITIALIZER; +static icu::UInitOnce gCanonicalLocationZonesInitOnce = U_INITONCE_INITIALIZER; + +U_CDECL_BEGIN +static UBool U_CALLCONV timeZone_cleanup(void) +{ + U_NAMESPACE_USE delete DEFAULT_ZONE; DEFAULT_ZONE = NULL; + gDefaultZoneInitOnce.reset(); delete _GMT; _GMT = NULL; + delete _UNKNOWN_ZONE; + _UNKNOWN_ZONE = NULL; + gStaticZonesInitOnce.reset(); - if (UDATA_MEMORY) { - udata_close(UDATA_MEMORY); - UDATA_MEMORY = NULL; - } + uprv_memset(TZDATA_VERSION, 0, sizeof(TZDATA_VERSION)); + gTZDataVersionInitOnce.reset(); - if (LOCK) { - umtx_destroy(&LOCK); - LOCK = NULL; - } + LEN_SYSTEM_ZONES = 0; + uprv_free(MAP_SYSTEM_ZONES); + MAP_SYSTEM_ZONES = 0; + gSystemZonesInitOnce.reset(); + + LEN_CANONICAL_SYSTEM_ZONES = 0; + uprv_free(MAP_CANONICAL_SYSTEM_ZONES); + MAP_CANONICAL_SYSTEM_ZONES = 0; + gCanonicalZonesInitOnce.reset(); + + LEN_CANONICAL_SYSTEM_LOCATION_ZONES = 0; + uprv_free(MAP_CANONICAL_SYSTEM_LOCATION_ZONES); + MAP_CANONICAL_SYSTEM_LOCATION_ZONES = 0; + gCanonicalLocationZonesInitOnce.reset(); return TRUE; } +U_CDECL_END U_NAMESPACE_BEGIN -/** - * Load the system time zone data from icudata.dll (or its - * equivalent). If this call succeeds, it will return TRUE and - * UDATA_MEMORY will be non-null, and DATA and INDEX_BY_* will be set - * to point into it. If this call fails, either because the data - * could not be opened, or because the ID array could not be - * allocated, then it will return FALSE. - * - * Must be called OUTSIDE mutex. - */ -static UBool loadZoneData() { - - // Open a data memory object, to be closed either later in this - // function or in timeZone_cleanup(). Purify (etc.) may - // mistakenly report this as a leak. - UErrorCode status = U_ZERO_ERROR; - UDataMemory* udata = udata_openChoice(0, TZ_DATA_TYPE, TZ_DATA_NAME, - (UDataMemoryIsAcceptable*)isTimeZoneDataAcceptable, 0, &status); - if (U_FAILURE(status)) { - U_ASSERT(udata==0); - return FALSE; +static int32_t findInStringArray(UResourceBundle* array, const UnicodeString& id, UErrorCode &status) +{ + UnicodeString copy; + const UChar *u; + int32_t len; + + int32_t start = 0; + int32_t limit = ures_getSize(array); + int32_t mid; + int32_t lastMid = INT32_MAX; + if(U_FAILURE(status) || (limit < 1)) { + return -1; } + U_DEBUG_TZ_MSG(("fisa: Looking for %s, between %d and %d\n", U_DEBUG_TZ_STR(UnicodeString(id).getTerminatedBuffer()), start, limit)); - U_ASSERT(udata!=0); - TZHeader* tzh = (TZHeader*)udata_getMemory(udata); - U_ASSERT(tzh!=0); - - const uint32_t* index_by_id = - (const uint32_t*)((int8_t*)tzh + tzh->nameIndexDelta); - const OffsetIndex* index_by_offset = - (const OffsetIndex*)((int8_t*)tzh + tzh->offsetIndexDelta); - const CountryIndex* index_by_country = - (const CountryIndex*)((int8_t*)tzh + tzh->countryIndexDelta); - - // Construct the available IDs array. The ordering - // of this array conforms to the ordering of the - // index by name table. - UnicodeString* zone_ids = new UnicodeString[tzh->count ? tzh->count : 1]; - if (zone_ids == 0) { - udata_close(udata); - return FALSE; - } - // Find start of name table, and walk through it - // linearly. If you're wondering why we don't use - // the INDEX_BY_ID, it's because that indexes the - // zone objects, not the name table. The name - // table is unindexed. - const char* name = (const char*)tzh + tzh->nameTableDelta; - int32_t length; - for (uint32_t i=0; icount; ++i) { - zone_ids[i] = UnicodeString(name, ""); // invariant converter - length = zone_ids[i].length(); // add a NUL but don't count it so that - zone_ids[i].append((UChar)0); // getBuffer() gets a terminated string - zone_ids[i].truncate(length); - name += uprv_strlen(name) + 1; + for (;;) { + mid = (int32_t)((start + limit) / 2); + if (lastMid == mid) { /* Have we moved? */ + break; /* We haven't moved, and it wasn't found. */ + } + lastMid = mid; + u = ures_getStringByIndex(array, mid, &len, &status); + if (U_FAILURE(status)) { + break; + } + U_DEBUG_TZ_MSG(("tz: compare to %s, %d .. [%d] .. %d\n", U_DEBUG_TZ_STR(u), start, mid, limit)); + copy.setTo(TRUE, u, len); + int r = id.compare(copy); + if(r==0) { + U_DEBUG_TZ_MSG(("fisa: found at %d\n", mid)); + return mid; + } else if(r<0) { + limit = mid; + } else { + start = mid; + } } + U_DEBUG_TZ_MSG(("fisa: not found\n")); + return -1; +} - // Keep mutexed operations as short as possible by doing all - // computations first, then doing pointer copies within the mutex. - umtx_lock(&LOCK); - if (UDATA_MEMORY == 0) { - UDATA_MEMORY = udata; - DATA = tzh; - INDEX_BY_ID = index_by_id; - INDEX_BY_OFFSET = index_by_offset; - INDEX_BY_COUNTRY = index_by_country; - ZONE_IDS = zone_ids; - - udata = NULL; - zone_ids = NULL; +/** + * Fetch a specific zone by name. Replaces the getByKey call. + * @param top Top timezone resource + * @param id Time zone ID + * @param oldbundle Bundle for reuse (or NULL). see 'ures_open()' + * @return the zone's bundle if found, or undefined if error. Reuses oldbundle. + */ +static UResourceBundle* getZoneByName(const UResourceBundle* top, const UnicodeString& id, UResourceBundle *oldbundle, UErrorCode& status) { + // load the Rules object + UResourceBundle *tmp = ures_getByKey(top, kNAMES, NULL, &status); + + // search for the string + int32_t idx = findInStringArray(tmp, id, status); + + if((idx == -1) && U_SUCCESS(status)) { + // not found + status = U_MISSING_RESOURCE_ERROR; + //ures_close(oldbundle); + //oldbundle = NULL; + } else { + U_DEBUG_TZ_MSG(("gzbn: oldbundle= size %d, type %d, %s\n", ures_getSize(tmp), ures_getType(tmp), u_errorName(status))); + tmp = ures_getByKey(top, kZONES, tmp, &status); // get Zones object from top + U_DEBUG_TZ_MSG(("gzbn: loaded ZONES, size %d, type %d, path %s %s\n", ures_getSize(tmp), ures_getType(tmp), ures_getPath(tmp), u_errorName(status))); + oldbundle = ures_getByIndex(tmp, idx, oldbundle, &status); // get nth Zone object + U_DEBUG_TZ_MSG(("gzbn: loaded z#%d, size %d, type %d, path %s, %s\n", idx, ures_getSize(oldbundle), ures_getType(oldbundle), ures_getPath(oldbundle), u_errorName(status))); } - umtx_unlock(&LOCK); - - // If another thread initialized the statics first, then delete - // our unused data. - if (udata != NULL) { - udata_close(udata); - delete[] zone_ids; + ures_close(tmp); + if(U_FAILURE(status)) { + //ures_close(oldbundle); + return NULL; + } else { + return oldbundle; } +} - // Cleanup handles both _GMT and the UDataMemory-based statics - ucln_i18n_registerCleanup(); - return TRUE; +UResourceBundle* TimeZone::loadRule(const UResourceBundle* top, const UnicodeString& ruleid, UResourceBundle* oldbundle, UErrorCode& status) { + char key[64]; + ruleid.extract(0, sizeof(key)-1, key, (int32_t)sizeof(key)-1, US_INV); + U_DEBUG_TZ_MSG(("loadRule(%s)\n", key)); + UResourceBundle *r = ures_getByKey(top, kRULES, oldbundle, &status); + U_DEBUG_TZ_MSG(("loadRule(%s) -> kRULES [%s]\n", key, u_errorName(status))); + r = ures_getByKey(r, key, r, &status); + U_DEBUG_TZ_MSG(("loadRule(%s) -> item [%s]\n", key, u_errorName(status))); + return r; } /** - * Inline function that returns TRUE if we have zone data, loading it - * if necessary. The only time this function will return false is if - * loadZoneData() fails, and UDATA_MEMORY and associated pointers are - * NULL (rare). - * - * The difference between this function and loadZoneData() is that - * this is an inline function that expands to code which avoids making - * a function call in the case where the data is already loaded (the - * common case). - * - * Must be called OUTSIDE mutex. + * Given an ID, open the appropriate resource for the given time zone. + * Dereference aliases if necessary. + * @param id zone id + * @param res resource, which must be ready for use (initialized but not open) + * @param ec input-output error code + * @return top-level resource bundle */ -static inline UBool haveZoneData() { - umtx_init(&LOCK); /* This is here to prevent race conditions. */ - umtx_lock(&LOCK); - UBool f = (UDATA_MEMORY != 0); - umtx_unlock(&LOCK); - return f || loadZoneData(); +static UResourceBundle* openOlsonResource(const UnicodeString& id, + UResourceBundle& res, + UErrorCode& ec) +{ +#if U_DEBUG_TZ + char buf[128]; + id.extract(0, sizeof(buf)-1, buf, sizeof(buf), ""); +#endif + UResourceBundle *top = ures_openDirect(0, kZONEINFO, &ec); + U_DEBUG_TZ_MSG(("pre: res sz=%d\n", ures_getSize(&res))); + /* &res = */ getZoneByName(top, id, &res, ec); + // Dereference if this is an alias. Docs say result should be 1 + // but it is 0 in 2.8 (?). + U_DEBUG_TZ_MSG(("Loading zone '%s' (%s, size %d) - %s\n", buf, ures_getKey((UResourceBundle*)&res), ures_getSize(&res), u_errorName(ec))); + if (ures_getType(&res) == URES_INT) { + int32_t deref = ures_getInt(&res, &ec) + 0; + U_DEBUG_TZ_MSG(("getInt: %s - type is %d\n", u_errorName(ec), ures_getType(&res))); + UResourceBundle *ares = ures_getByKey(top, kZONES, NULL, &ec); // dereference Zones section + ures_getByIndex(ares, deref, &res, &ec); + ures_close(ares); + U_DEBUG_TZ_MSG(("alias to #%d (%s) - %s\n", deref, "??", u_errorName(ec))); + } else { + U_DEBUG_TZ_MSG(("not an alias - size %d\n", ures_getSize(&res))); + } + U_DEBUG_TZ_MSG(("%s - final status is %s\n", buf, u_errorName(ec))); + return top; } // ------------------------------------- -const TimeZone* -TimeZone::getGMT(void) -{ - umtx_init(&LOCK); /* This is here to prevent race conditions. */ - Mutex lock(&LOCK); +namespace { + +void U_CALLCONV initStaticTimeZones() { // Initialize _GMT independently of other static data; it should // be valid even if we can't load the time zone UDataMemory. - if (_GMT == 0) { - _GMT = new SimpleTimeZone(0, UnicodeString(GMT_ID, GMT_ID_LENGTH)); - } + ucln_i18n_registerCleanup(UCLN_I18N_TIMEZONE, timeZone_cleanup); + _UNKNOWN_ZONE = new SimpleTimeZone(0, UnicodeString(TRUE, UNKNOWN_ZONE_ID, UNKNOWN_ZONE_ID_LENGTH)); + _GMT = new SimpleTimeZone(0, UnicodeString(TRUE, GMT_ID, GMT_ID_LENGTH)); +} + +} // anonymous namespace + +const TimeZone& U_EXPORT2 +TimeZone::getUnknown() +{ + umtx_initOnce(gStaticZonesInitOnce, &initStaticTimeZones); + return *_UNKNOWN_ZONE; +} + +const TimeZone* U_EXPORT2 +TimeZone::getGMT(void) +{ + umtx_initOnce(gStaticZonesInitOnce, &initStaticTimeZones); return _GMT; } @@ -251,6 +326,8 @@ TimeZone::getGMT(void) // class TimeZone // ***************************************************************************** +UOBJECT_DEFINE_ABSTRACT_RTTI_IMPLEMENTATION(TimeZone) + TimeZone::TimeZone() : UObject(), fID() { @@ -290,95 +367,87 @@ TimeZone::operator=(const TimeZone &right) UBool TimeZone::operator==(const TimeZone& that) const { - return getDynamicClassID() == that.getDynamicClassID() && + return typeid(*this) == typeid(that) && fID == that.fID; } // ------------------------------------- +namespace { +TimeZone* +createSystemTimeZone(const UnicodeString& id, UErrorCode& ec) { + if (U_FAILURE(ec)) { + return NULL; + } + TimeZone* z = 0; + UResourceBundle res; + ures_initStackObject(&res); + U_DEBUG_TZ_MSG(("pre-err=%s\n", u_errorName(ec))); + UResourceBundle *top = openOlsonResource(id, res, ec); + U_DEBUG_TZ_MSG(("post-err=%s\n", u_errorName(ec))); + if (U_SUCCESS(ec)) { + z = new OlsonTimeZone(top, &res, id, ec); + if (z == NULL) { + U_DEBUG_TZ_MSG(("cstz: olson time zone failed to initialize - err %s\n", u_errorName(ec))); + } + } + ures_close(&res); + ures_close(top); + if (U_FAILURE(ec)) { + U_DEBUG_TZ_MSG(("cstz: failed to create, err %s\n", u_errorName(ec))); + delete z; + z = 0; + } + return z; +} + +/** + * Lookup the given name in our system zone table. If found, + * instantiate a new zone of that name and return it. If not + * found, return 0. + */ TimeZone* +createSystemTimeZone(const UnicodeString& id) { + UErrorCode ec = U_ZERO_ERROR; + return createSystemTimeZone(id, ec); +} + +} + +TimeZone* U_EXPORT2 TimeZone::createTimeZone(const UnicodeString& ID) { /* We first try to lookup the zone ID in our system list. If this * fails, we try to parse it as a custom string GMT[+-]hh:mm. If * all else fails, we return GMT, which is probably not what the * user wants, but at least is a functioning TimeZone object. + * + * We cannot return NULL, because that would break compatibility + * with the JDK. */ - TimeZone* result = 0; + TimeZone* result = createSystemTimeZone(ID); - if (haveZoneData()) { - result = createSystemTimeZone(ID); - } - if (result == 0) { + if (result == NULL) { + U_DEBUG_TZ_MSG(("failed to load system time zone with id - falling to custom")); result = createCustomTimeZone(ID); } - if (result == 0) { - result = getGMT()->clone(); - } - return result; -} - -/** - * Lookup the given ID in the system time zone equivalency group table. - * Return a pointer to the equivalency group, or NULL if not found. - * DATA MUST BE INITIALIZED AND NON-NULL. - */ -static const TZEquivalencyGroup* -lookupEquivalencyGroup(const UnicodeString& id) { - // Perform a binary search. Possible optimization: Unroll the - // search. Not worth it given the small number of zones (416 in - // 1999j). - uint32_t low = 0; - uint32_t high = DATA->count; - while (high > low) { - // Invariant: match, if present, must be in the range [low, - // high). - uint32_t i = (low + high) / 2; - int8_t c = id.compare(ZONE_IDS[i]); - if (c == 0) { - return (TZEquivalencyGroup*) ((int8_t*)DATA + INDEX_BY_ID[i]); - } else if (c < 0) { - high = i; + if (result == NULL) { + U_DEBUG_TZ_MSG(("failed to load time zone with id - falling to Etc/Unknown(GMT)")); + const TimeZone& unknown = getUnknown(); + if (_UNKNOWN_ZONE == NULL) { // Cannot test (&unknown == NULL) because the + U_DEBUG_TZ_MSG(("failed to getUnknown()")); // behavior of NULL references is undefined. } else { - low = i + 1; + result = unknown.clone(); } } - return 0; -} - -/** - * Lookup the given name in our system zone table. If found, - * instantiate a new zone of that name and return it. If not - * found, return 0. - * - * The caller must ensure that haveZoneData() returns TRUE before - * calling. - */ -TimeZone* -TimeZone::createSystemTimeZone(const UnicodeString& name) { - U_ASSERT(UDATA_MEMORY != 0); - const TZEquivalencyGroup *eg = lookupEquivalencyGroup(name); - if (eg != NULL) { - return eg->isDST ? - new SimpleTimeZone(eg->u.d.zone, name) : - new SimpleTimeZone(eg->u.s.zone, name); - } - return NULL; + return result; } // ------------------------------------- -/** - * Initialize DEFAULT_ZONE from the system default time zone. The - * caller should confirm that DEFAULT_ZONE is NULL before calling. - * Upon return, DEFAULT_ZONE will not be NULL, unless operator new() - * returns NULL. - * - * Must be called OUTSIDE mutex. - */ -void -TimeZone::initDefault() -{ +TimeZone* U_EXPORT2 +TimeZone::detectHostTimeZone() +{ // We access system timezone data through TPlatformUtilities, // including tzset(), timezone, and tzname[]. int32_t rawOffset = 0; @@ -386,546 +455,711 @@ TimeZone::initDefault() // First, try to create a system timezone, based // on the string ID in tzname[0]. - { - // NOTE: Global mutex here; TimeZone mutex above - // mutexed to avoid threading issues in the platform fcns. - // Some of the locale/timezone OS functions may not be thread safe, - // so the intent is that any setting from anywhere within ICU - // happens with the ICU global mutex held. - Mutex lock; - uprv_tzset(); // Initialize tz... system data - - // Get the timezone ID from the host. This function should do - // any required host-specific remapping; e.g., on Windows this - // function maps the Date and Time control panel setting to an - // ICU timezone ID. - hostID = uprv_tzname(0); - - // Invert sign because UNIX semantics are backwards - rawOffset = uprv_timezone() * -U_MILLIS_PER_SECOND; - } - TimeZone* default_zone = NULL; + uprv_tzset(); // Initialize tz... system data - if (haveZoneData()) { - default_zone = createSystemTimeZone(hostID); + // Get the timezone ID from the host. This function should do + // any required host-specific remapping; e.g., on Windows this + // function maps the Date and Time control panel setting to an + // ICU timezone ID. + hostID = uprv_tzname(0); - // If we couldn't get the time zone ID from the host, use - // the default host timezone offset. Further refinements - // to this include querying the host to determine if DST - // is in use or not and possibly using the host locale to - // select from multiple zones at a the same offset. We - // don't do any of this now, but we could easily add this. - if (default_zone == NULL) { - // Use the designated default in the time zone list that has the - // appropriate GMT offset, if there is one. + // Invert sign because UNIX semantics are backwards + rawOffset = uprv_timezone() * -U_MILLIS_PER_SECOND; - const OffsetIndex* index = INDEX_BY_OFFSET; + TimeZone* hostZone = NULL; - for (;;) { - if (index->gmtOffset > rawOffset) { - // Went past our desired offset; no match found - break; - } - if (index->gmtOffset == rawOffset) { - // Found our desired offset - default_zone = createSystemTimeZone(ZONE_IDS[index->defaultZone]); - break; - } - // Compute the position of the next entry. If the delta value - // in this entry is zero, then there is no next entry. - uint16_t delta = index->nextEntryDelta; - if (delta == 0) { - break; - } - index = (const OffsetIndex*)((int8_t*)index + delta); - } - } + /* Make sure that the string is NULL terminated to prevent BoundsChecker/Purify warnings. */ + UnicodeString hostStrID(hostID, -1, US_INV); + hostStrID.append((UChar)0); + hostStrID.truncate(hostStrID.length()-1); + hostZone = createSystemTimeZone(hostStrID); + +#if U_PLATFORM_USES_ONLY_WIN32_API + // hostID points to a heap-allocated location on Windows. + uprv_free(const_cast(hostID)); +#endif + + int32_t hostIDLen = hostStrID.length(); + if (hostZone != NULL && rawOffset != hostZone->getRawOffset() + && (3 <= hostIDLen && hostIDLen <= 4)) + { + // Uh oh. This probably wasn't a good id. + // It was probably an ambiguous abbreviation + delete hostZone; + hostZone = NULL; } - // If we _still_ don't have a time zone, use GMT. This - // can only happen if the raw offset returned by - // uprv_timezone() does not correspond to any system zone. - if (default_zone == NULL) { - default_zone = getGMT()->clone(); + // Construct a fixed standard zone with the host's ID + // and raw offset. + if (hostZone == NULL) { + hostZone = new SimpleTimeZone(rawOffset, hostStrID); } - // If DEFAULT_ZONE is still NULL, set it up. - umtx_lock(&LOCK); - if (DEFAULT_ZONE == NULL) { - DEFAULT_ZONE = default_zone; - default_zone = NULL; + // If we _still_ don't have a time zone, use GMT. + // + // Note: This is extremely unlikely situation. If + // new SimpleTimeZone(...) above fails, the following + // code may also fail. + if (hostZone == NULL) { + const TimeZone* temptz = TimeZone::getGMT(); + // If we can't use GMT, get out. + if (temptz == NULL) { + return NULL; + } + hostZone = temptz->clone(); } - umtx_unlock(&LOCK); - delete default_zone; + return hostZone; } // ------------------------------------- -TimeZone* -TimeZone::createDefault() +/** + * Initialize DEFAULT_ZONE from the system default time zone. + * Upon return, DEFAULT_ZONE will not be NULL, unless operator new() + * returns NULL. + */ +static void U_CALLCONV initDefault() { - umtx_init(&LOCK); /* This is here to prevent race conditions. */ - umtx_lock(&LOCK); - UBool f = (DEFAULT_ZONE != 0); - umtx_unlock(&LOCK); - if (!f) { - initDefault(); + ucln_i18n_registerCleanup(UCLN_I18N_TIMEZONE, timeZone_cleanup); + + // If setDefault() has already been called we can skip getting the + // default zone information from the system. + if (DEFAULT_ZONE != NULL) { + return; } + + // NOTE: this code is safely single threaded, being only + // run via umtx_initOnce(). + // + // Some of the locale/timezone OS functions may not be thread safe, + // + // The operating system might actually use ICU to implement timezones. + // So we may have ICU calling ICU here, like on AIX. + // There shouldn't be a problem with this; initOnce does not hold a mutex + // while the init function is being run. + + // The code detecting the host time zone was separated from this + // and implemented as TimeZone::detectHostTimeZone() + + TimeZone *default_zone = TimeZone::detectHostTimeZone(); + + // The only way for DEFAULT_ZONE to be non-null at this point is if the user + // made a thread-unsafe call to setDefault() or adoptDefault() in another + // thread while this thread was doing something that required getting the default. + U_ASSERT(DEFAULT_ZONE == NULL); - Mutex lock(&LOCK); // In case adoptDefault is called - return DEFAULT_ZONE->clone(); + DEFAULT_ZONE = default_zone; } // ------------------------------------- -void +TimeZone* U_EXPORT2 +TimeZone::createDefault() +{ + umtx_initOnce(gDefaultZoneInitOnce, initDefault); + return (DEFAULT_ZONE != NULL) ? DEFAULT_ZONE->clone() : NULL; +} + +// ------------------------------------- + +void U_EXPORT2 TimeZone::adoptDefault(TimeZone* zone) { if (zone != NULL) { - TimeZone* old = NULL; - - umtx_init(&LOCK); /* This is here to prevent race conditions. */ - umtx_lock(&LOCK); - old = DEFAULT_ZONE; + TimeZone *old = DEFAULT_ZONE; DEFAULT_ZONE = zone; - umtx_unlock(&LOCK); - delete old; + ucln_i18n_registerCleanup(UCLN_I18N_TIMEZONE, timeZone_cleanup); } } // ------------------------------------- -void +void U_EXPORT2 TimeZone::setDefault(const TimeZone& zone) { adoptDefault(zone.clone()); } +//---------------------------------------------------------------------- + + +static void U_CALLCONV initMap(USystemTimeZoneType type, UErrorCode& ec) { + ucln_i18n_registerCleanup(UCLN_I18N_TIMEZONE, timeZone_cleanup); + + UResourceBundle *res = ures_openDirect(0, kZONEINFO, &ec); + res = ures_getByKey(res, kNAMES, res, &ec); // dereference Zones section + if (U_SUCCESS(ec)) { + int32_t size = ures_getSize(res); + int32_t *m = (int32_t *)uprv_malloc(size * sizeof(int32_t)); + if (m == NULL) { + ec = U_MEMORY_ALLOCATION_ERROR; + } else { + int32_t numEntries = 0; + for (int32_t i = 0; i < size; i++) { + UnicodeString id = ures_getUnicodeStringByIndex(res, i, &ec); + if (U_FAILURE(ec)) { + break; + } + if (0 == id.compare(UNKNOWN_ZONE_ID, UNKNOWN_ZONE_ID_LENGTH)) { + // exclude Etc/Unknown + continue; + } + if (type == UCAL_ZONE_TYPE_CANONICAL || type == UCAL_ZONE_TYPE_CANONICAL_LOCATION) { + UnicodeString canonicalID; + ZoneMeta::getCanonicalCLDRID(id, canonicalID, ec); + if (U_FAILURE(ec)) { + break; + } + if (canonicalID != id) { + // exclude aliases + continue; + } + } + if (type == UCAL_ZONE_TYPE_CANONICAL_LOCATION) { + const UChar *region = TimeZone::getRegion(id, ec); + if (U_FAILURE(ec)) { + break; + } + if (u_strcmp(region, WORLD) == 0) { + // exclude non-location ("001") + continue; + } + } + m[numEntries++] = i; + } + if (U_SUCCESS(ec)) { + int32_t *tmp = m; + m = (int32_t *)uprv_realloc(tmp, numEntries * sizeof(int32_t)); + if (m == NULL) { + // realloc failed.. use the original one even it has unused + // area at the end + m = tmp; + } + + switch(type) { + case UCAL_ZONE_TYPE_ANY: + U_ASSERT(MAP_SYSTEM_ZONES == NULL); + MAP_SYSTEM_ZONES = m; + LEN_SYSTEM_ZONES = numEntries; + break; + case UCAL_ZONE_TYPE_CANONICAL: + U_ASSERT(MAP_CANONICAL_SYSTEM_ZONES == NULL); + MAP_CANONICAL_SYSTEM_ZONES = m; + LEN_CANONICAL_SYSTEM_ZONES = numEntries; + break; + case UCAL_ZONE_TYPE_CANONICAL_LOCATION: + U_ASSERT(MAP_CANONICAL_SYSTEM_LOCATION_ZONES == NULL); + MAP_CANONICAL_SYSTEM_LOCATION_ZONES = m; + LEN_CANONICAL_SYSTEM_LOCATION_ZONES = numEntries; + break; + } + } + } + } + ures_close(res); +} + + +/** + * This is the default implementation for subclasses that do not + * override this method. This implementation calls through to the + * 8-argument getOffset() method after suitable computations, and + * correctly adjusts GMT millis to local millis when necessary. + */ +void TimeZone::getOffset(UDate date, UBool local, int32_t& rawOffset, + int32_t& dstOffset, UErrorCode& ec) const { + if (U_FAILURE(ec)) { + return; + } + + rawOffset = getRawOffset(); + if (!local) { + date += rawOffset; // now in local standard millis + } + + // When local == TRUE, date might not be in local standard + // millis. getOffset taking 7 parameters used here assume + // the given time in day is local standard time. + // At STD->DST transition, there is a range of time which + // does not exist. When 'date' is in this time range + // (and local == TRUE), this method interprets the specified + // local time as DST. At DST->STD transition, there is a + // range of time which occurs twice. In this case, this + // method interprets the specified local time as STD. + // To support the behavior above, we need to call getOffset + // (with 7 args) twice when local == true and DST is + // detected in the initial call. + for (int32_t pass=0; ; ++pass) { + int32_t year, month, dom, dow; + double day = uprv_floor(date / U_MILLIS_PER_DAY); + int32_t millis = (int32_t) (date - day * U_MILLIS_PER_DAY); + + Grego::dayToFields(day, year, month, dom, dow); + + dstOffset = getOffset(GregorianCalendar::AD, year, month, dom, + (uint8_t) dow, millis, + Grego::monthLength(year, month), + ec) - rawOffset; + + // Recompute if local==TRUE, dstOffset!=0. + if (pass!=0 || !local || dstOffset == 0) { + break; + } + // adjust to local standard millis + date -= dstOffset; + } +} + // ------------------------------------- // New available IDs API as of ICU 2.4. Uses StringEnumeration API. class TZEnumeration : public StringEnumeration { - // Map into to ZONE_IDS. Our results are ZONE_IDS[map[i]] for - // i=0..len-1. If map==NULL then our results are ZONE_IDS[i] - // for i=0..len-1. Len will be zero iff the zone data could - // not be loaded. +private: + + // Map into to zones. Our results are zone[map[i]] for + // i=0..len-1, where zone[i] is the i-th Olson zone. If map==NULL + // then our results are zone[i] for i=0..len-1. Len will be zero + // if the zone data could not be loaded. int32_t* map; + int32_t* localMap; int32_t len; int32_t pos; - void* _bufp; - int32_t _buflen; -public: - TZEnumeration() { - map = NULL; - _bufp = NULL; - len = pos = _buflen = 0; - if (haveZoneData()) { - len = DATA->count; - } + TZEnumeration(int32_t* mapData, int32_t mapLen, UBool adoptMapData) : pos(0) { + map = mapData; + localMap = adoptMapData ? mapData : NULL; + len = mapLen; } - TZEnumeration(int32_t rawOffset) { - map = NULL; - _bufp = NULL; - len = pos = _buflen = 0; - - if (!haveZoneData()) { - return; + UBool getID(int32_t i) { + UErrorCode ec = U_ZERO_ERROR; + int32_t idLen = 0; + const UChar* id = NULL; + UResourceBundle *top = ures_openDirect(0, kZONEINFO, &ec); + top = ures_getByKey(top, kNAMES, top, &ec); // dereference Zones section + id = ures_getStringByIndex(top, i, &idLen, &ec); + if(U_FAILURE(ec)) { + unistr.truncate(0); } + else { + unistr.fastCopyFrom(UnicodeString(TRUE, id, idLen)); + } + ures_close(top); + return U_SUCCESS(ec); + } - /* The offset index table is a table of variable-sized objects. - * Each entry has an offset to the next entry; the last entry has - * a next entry offset of zero. - * - * The entries are sorted in ascending numerical order of GMT - * offset. Each entry lists all the system zones at that offset, - * in lexicographic order of ID. Note that this ordering is - * somewhat significant in that the _first_ zone in each list is - * what will be chosen as the default under certain fallback - * conditions. We currently just let that be the - * lexicographically first zone, but we could also adjust the list - * to pick which zone was first for this situation -- probably not - * worth the trouble. - * - * The list of zones is actually just a list of integers, from - * 0..n-1, where n is the total number of system zones. The - * numbering corresponds exactly to the ordering of ZONE_IDS. - */ - const OffsetIndex* index = INDEX_BY_OFFSET; - - for (;;) { - if (index->gmtOffset > rawOffset) { - // Went past our desired offset; no match found - break; - } - if (index->gmtOffset == rawOffset) { - // Found our desired offset - map = (int32_t*)uprv_malloc(sizeof(int32_t) * index->count); - if (map != NULL) { - len = index->count; - const uint16_t* zoneNumberArray = &(index->zoneNumber); - for (uint16_t i=0; inextEntryDelta; - if (delta == 0) { - break; - } - index = (const OffsetIndex*)((int8_t*)index + delta); + static int32_t* getMap(USystemTimeZoneType type, int32_t& len, UErrorCode& ec) { + len = 0; + if (U_FAILURE(ec)) { + return NULL; } + int32_t* m = NULL; + switch (type) { + case UCAL_ZONE_TYPE_ANY: + umtx_initOnce(gSystemZonesInitOnce, &initMap, type, ec); + m = MAP_SYSTEM_ZONES; + len = LEN_SYSTEM_ZONES; + break; + case UCAL_ZONE_TYPE_CANONICAL: + umtx_initOnce(gCanonicalZonesInitOnce, &initMap, type, ec); + m = MAP_CANONICAL_SYSTEM_ZONES; + len = LEN_CANONICAL_SYSTEM_ZONES; + break; + case UCAL_ZONE_TYPE_CANONICAL_LOCATION: + umtx_initOnce(gCanonicalLocationZonesInitOnce, &initMap, type, ec); + m = MAP_CANONICAL_SYSTEM_LOCATION_ZONES; + len = LEN_CANONICAL_SYSTEM_LOCATION_ZONES; + break; + default: + ec = U_ILLEGAL_ARGUMENT_ERROR; + m = NULL; + len = 0; + break; + } + return m; } - TZEnumeration(const char* country) { - map = NULL; - _bufp = NULL; - len = pos = _buflen = 0; +public: + +#define DEFAULT_FILTERED_MAP_SIZE 8 +#define MAP_INCREMENT_SIZE 8 - if (!haveZoneData()) { - return; + static TZEnumeration* create(USystemTimeZoneType type, const char* region, const int32_t* rawOffset, UErrorCode& ec) { + if (U_FAILURE(ec)) { + return NULL; } - /* The country index table is a table of variable-sized objects. - * Each entry has an offset to the next entry; the last entry has - * a next entry offset of zero. - * - * The entries are sorted in ascending numerical order of intcode. - * This is an integer representation of the 2-letter ISO 3166 - * country code. It is computed as (c1-'A')*32 + (c0-'A'), where - * the country code is c1 c0, with 'A' <= ci <= 'Z'. - * - * The list of zones is a list of integers, from 0..n-1, where n - * is the total number of system zones. The numbering corresponds - * exactly to the ordering of ZONE_IDS. - */ - const CountryIndex* index = INDEX_BY_COUNTRY; - - uint16_t intcode = 0; - if (country != NULL && *country != 0) { - intcode = (uint16_t)((U_UPPER_ORDINAL(country[0]) << 5) - + U_UPPER_ORDINAL(country[1])); + int32_t baseLen; + int32_t *baseMap = getMap(type, baseLen, ec); + + if (U_FAILURE(ec)) { + return NULL; } - for (;;) { - if (index->intcode > intcode) { - // Went past our desired country; no match found - break; + // If any additional conditions are available, + // create instance local map filtered by the conditions. + + int32_t *filteredMap = NULL; + int32_t numEntries = 0; + + if (region != NULL || rawOffset != NULL) { + int32_t filteredMapSize = DEFAULT_FILTERED_MAP_SIZE; + filteredMap = (int32_t *)uprv_malloc(filteredMapSize * sizeof(int32_t)); + if (filteredMap == NULL) { + ec = U_MEMORY_ALLOCATION_ERROR; + return NULL; } - if (index->intcode == intcode) { - // Found our desired country - map = (int32_t*)uprv_malloc(sizeof(int32_t) * index->count); - if (map != NULL) { - len = index->count; - const uint16_t* zoneNumberArray = &(index->zoneNumber); - for (uint16_t i=0; igetRawOffset(); + delete z; + + if (tzoffset != *rawOffset) { + continue; + } + } + + if (filteredMapSize <= numEntries) { + filteredMapSize += MAP_INCREMENT_SIZE; + int32_t *tmp = (int32_t *)uprv_realloc(filteredMap, filteredMapSize * sizeof(int32_t)); + if (tmp == NULL) { + ec = U_MEMORY_ALLOCATION_ERROR; + break; + } else { + filteredMap = tmp; } } + + filteredMap[numEntries++] = zidx; } - // Compute the position of the next entry. If the delta value - // in this entry is zero, then there is no next entry. - uint16_t delta = index->nextEntryDelta; - if (delta == 0) { - break; + + if (U_FAILURE(ec)) { + uprv_free(filteredMap); + filteredMap = NULL; } - index = (const CountryIndex*)((int8_t*)index + delta); + + ures_close(res); } - } - virtual ~TZEnumeration() { - uprv_free(map); - uprv_free(_bufp); - } + TZEnumeration *result = NULL; + if (U_SUCCESS(ec)) { + // Finally, create a new enumeration instance + if (filteredMap == NULL) { + result = new TZEnumeration(baseMap, baseLen, FALSE); + } else { + result = new TZEnumeration(filteredMap, numEntries, TRUE); + filteredMap = NULL; + } + if (result == NULL) { + ec = U_MEMORY_ALLOCATION_ERROR; + } + } - int32_t count(UErrorCode& status) const { - return U_FAILURE(status) ? 0 : len; + if (filteredMap != NULL) { + uprv_free(filteredMap); + } + + return result; } - const char* next(int32_t* resultLength, UErrorCode& status) { - // TODO: Later a subclass of StringEnumeration will be available - // that implements next() and unext() in terms of snext(). - // Inherit from that class when available and remove this method - // (and its declaration). - const UnicodeString* us = snext(status); - int32_t newlen; - if (us != NULL && ensureCapacity((newlen=us->length()) + 1)) { - us->extract(0, INT32_MAX, (char*) _bufp, ""); - if (resultLength) { - resultLength[0] = newlen; + TZEnumeration(const TZEnumeration &other) : StringEnumeration(), map(NULL), localMap(NULL), len(0), pos(0) { + if (other.localMap != NULL) { + localMap = (int32_t *)uprv_malloc(other.len * sizeof(int32_t)); + if (localMap != NULL) { + len = other.len; + uprv_memcpy(localMap, other.localMap, len * sizeof(int32_t)); + pos = other.pos; + map = localMap; + } else { + len = 0; + pos = 0; + map = NULL; } - return (const char*)_bufp; + } else { + map = other.map; + localMap = NULL; + len = other.len; + pos = other.pos; } - return NULL; } - const UChar* unext(int32_t* resultLength, UErrorCode& status) { - const UnicodeString* us = snext(status); - if (us != NULL) { - if (resultLength) { - resultLength[0] = us->length(); - } - // TimeZone terminates the ID strings when it builds them - return us->getBuffer(); - } - return NULL; + virtual ~TZEnumeration(); + + virtual StringEnumeration *clone() const { + return new TZEnumeration(*this); } - const UnicodeString* snext(UErrorCode& status) { - if (U_SUCCESS(status) && pos < len) { - return (map != NULL) ? - &ZONE_IDS[map[pos++]] : &ZONE_IDS[pos++]; + virtual int32_t count(UErrorCode& status) const { + return U_FAILURE(status) ? 0 : len; + } + + virtual const UnicodeString* snext(UErrorCode& status) { + if (U_SUCCESS(status) && map != NULL && pos < len) { + getID(map[pos]); + ++pos; + return &unistr; } - return NULL; + return 0; } - void reset(UErrorCode& /*status*/) { + virtual void reset(UErrorCode& /*status*/) { pos = 0; } -private: - static const char fgClassID; - public: - static inline UClassID getStaticClassID(void) { return (UClassID)&fgClassID; } - virtual UClassID getDynamicClassID(void) const { return getStaticClassID(); } -private: - /** - * Guarantee that _bufp is allocated to include _buflen characters - * where _buflen >= minlen. Return TRUE if successful, FALSE - * otherwise. - */ - UBool ensureCapacity(int32_t minlen) { - if (_bufp != NULL && _buflen >= minlen) { - return TRUE; - } - _buflen = minlen + 8; // add 8 to prevent thrashing - _bufp = (_bufp == NULL) ? uprv_malloc(_buflen) - : uprv_realloc(_bufp, _buflen); - return _bufp != NULL; - } + static UClassID U_EXPORT2 getStaticClassID(void); + virtual UClassID getDynamicClassID(void) const; }; -const char TZEnumeration::fgClassID = '\0'; +TZEnumeration::~TZEnumeration() { + if (localMap != NULL) { + uprv_free(localMap); + } +} + +UOBJECT_DEFINE_RTTI_IMPLEMENTATION(TZEnumeration) + +StringEnumeration* U_EXPORT2 +TimeZone::createTimeZoneIDEnumeration( + USystemTimeZoneType zoneType, + const char* region, + const int32_t* rawOffset, + UErrorCode& ec) { + return TZEnumeration::create(zoneType, region, rawOffset, ec); +} -StringEnumeration* +StringEnumeration* U_EXPORT2 TimeZone::createEnumeration() { - return new TZEnumeration(); + UErrorCode ec = U_ZERO_ERROR; + return TZEnumeration::create(UCAL_ZONE_TYPE_ANY, NULL, NULL, ec); } -StringEnumeration* +StringEnumeration* U_EXPORT2 TimeZone::createEnumeration(int32_t rawOffset) { - return new TZEnumeration(rawOffset); + UErrorCode ec = U_ZERO_ERROR; + return TZEnumeration::create(UCAL_ZONE_TYPE_ANY, NULL, &rawOffset, ec); } -StringEnumeration* +StringEnumeration* U_EXPORT2 TimeZone::createEnumeration(const char* country) { - return new TZEnumeration(country); + UErrorCode ec = U_ZERO_ERROR; + return TZEnumeration::create(UCAL_ZONE_TYPE_ANY, country, NULL, ec); } -// ------------------------------------- - -// TODO: #ifdef out this code after 8-Nov-2003 -// #ifdef ICU_TIMEZONE_USE_DEPRECATES +// --------------------------------------- -const UnicodeString** -TimeZone::createAvailableIDs(int32_t rawOffset, int32_t& numIDs) -{ - // We are creating a new array to existing UnicodeString pointers. - // The caller will delete the array when done, but not the pointers - // in the array. - - if (!haveZoneData()) { - numIDs = 0; - return 0; +int32_t U_EXPORT2 +TimeZone::countEquivalentIDs(const UnicodeString& id) { + int32_t result = 0; + UErrorCode ec = U_ZERO_ERROR; + UResourceBundle res; + ures_initStackObject(&res); + U_DEBUG_TZ_MSG(("countEquivalentIDs..\n")); + UResourceBundle *top = openOlsonResource(id, res, ec); + if (U_SUCCESS(ec)) { + UResourceBundle r; + ures_initStackObject(&r); + ures_getByKey(&res, kLINKS, &r, &ec); + ures_getIntVector(&r, &result, &ec); + ures_close(&r); } + ures_close(&res); + ures_close(top); + return result; +} - /* The offset index table is a table of variable-sized objects. - * Each entry has an offset to the next entry; the last entry has - * a next entry offset of zero. - * - * The entries are sorted in ascending numerical order of GMT - * offset. Each entry lists all the system zones at that offset, - * in lexicographic order of ID. Note that this ordering is - * somewhat significant in that the _first_ zone in each list is - * what will be chosen as the default under certain fallback - * conditions. We currently just let that be the - * lexicographically first zone, but we could also adjust the list - * to pick which zone was first for this situation -- probably not - * worth the trouble. - * - * The list of zones is actually just a list of integers, from - * 0..n-1, where n is the total number of system zones. The - * numbering corresponds exactly to the ordering of ZONE_IDS. - */ - const OffsetIndex* index = INDEX_BY_OFFSET; +// --------------------------------------- - for (;;) { - if (index->gmtOffset > rawOffset) { - // Went past our desired offset; no match found - break; - } - if (index->gmtOffset == rawOffset) { - // Found our desired offset - const UnicodeString** result = - (const UnicodeString**)uprv_malloc(index->count * sizeof(UnicodeString *)); - const uint16_t* zoneNumberArray = &(index->zoneNumber); - for (uint16_t i=0; icount; ++i) { - // Pointer assignment - use existing UnicodeString object! - // Don't create a new UnicodeString on the heap here! - result[i] = &ZONE_IDS[zoneNumberArray[i]]; +const UnicodeString U_EXPORT2 +TimeZone::getEquivalentID(const UnicodeString& id, int32_t index) { + U_DEBUG_TZ_MSG(("gEI(%d)\n", index)); + UnicodeString result; + UErrorCode ec = U_ZERO_ERROR; + UResourceBundle res; + ures_initStackObject(&res); + UResourceBundle *top = openOlsonResource(id, res, ec); + int32_t zone = -1; + if (U_SUCCESS(ec)) { + UResourceBundle r; + ures_initStackObject(&r); + int32_t size; + ures_getByKey(&res, kLINKS, &r, &ec); + const int32_t* v = ures_getIntVector(&r, &size, &ec); + if (U_SUCCESS(ec)) { + if (index >= 0 && index < size) { + zone = v[index]; } - numIDs = index->count; - return result; } - // Compute the position of the next entry. If the delta value - // in this entry is zero, then there is no next entry. - uint16_t delta = index->nextEntryDelta; - if (delta == 0) { - break; + ures_close(&r); + } + ures_close(&res); + if (zone >= 0) { + UResourceBundle *ares = ures_getByKey(top, kNAMES, NULL, &ec); // dereference Zones section + if (U_SUCCESS(ec)) { + int32_t idLen = 0; + const UChar* id = ures_getStringByIndex(ares, zone, &idLen, &ec); + result.fastCopyFrom(UnicodeString(TRUE, id, idLen)); + U_DEBUG_TZ_MSG(("gei(%d) -> %d, len%d, %s\n", index, zone, result.length(), u_errorName(ec))); } - index = (const OffsetIndex*)((int8_t*)index + delta); + ures_close(ares); } - - numIDs = 0; - return 0; + ures_close(top); +#if defined(U_DEBUG_TZ) + if(result.length() ==0) { + U_DEBUG_TZ_MSG(("equiv [__, #%d] -> 0 (%s)\n", index, u_errorName(ec))); + } +#endif + return result; } -// ------------------------------------- +// --------------------------------------- -const UnicodeString** -TimeZone::createAvailableIDs(const char* country, int32_t& numIDs) { +// These methods are used by ZoneMeta class only. - // We are creating a new array to existing UnicodeString pointers. - // The caller will delete the array when done, but not the pointers - // in the array. - - if (!haveZoneData()) { - numIDs = 0; - return 0; +const UChar* +TimeZone::findID(const UnicodeString& id) { + const UChar *result = NULL; + UErrorCode ec = U_ZERO_ERROR; + UResourceBundle *rb = ures_openDirect(NULL, kZONEINFO, &ec); + + // resolve zone index by name + UResourceBundle *names = ures_getByKey(rb, kNAMES, NULL, &ec); + int32_t idx = findInStringArray(names, id, ec); + result = ures_getStringByIndex(names, idx, NULL, &ec); + if (U_FAILURE(ec)) { + result = NULL; } + ures_close(names); + ures_close(rb); + return result; +} - /* The country index table is a table of variable-sized objects. - * Each entry has an offset to the next entry; the last entry has - * a next entry offset of zero. - * - * The entries are sorted in ascending numerical order of intcode. - * This is an integer representation of the 2-letter ISO 3166 - * country code. It is computed as (c1-'A')*32 + (c0-'A'), where - * the country code is c1 c0, with 'A' <= ci <= 'Z'. - * - * The list of zones is a list of integers, from 0..n-1, where n - * is the total number of system zones. The numbering corresponds - * exactly to the ordering of ZONE_IDS. - */ - const CountryIndex* index = INDEX_BY_COUNTRY; - uint16_t intcode = 0; - if (country != NULL && *country != 0) { - intcode = (uint16_t)((U_UPPER_ORDINAL(country[0]) << 5) - + U_UPPER_ORDINAL(country[1])); - } - - for (;;) { - if (index->intcode > intcode) { - // Went past our desired country; no match found - break; - } - if (index->intcode == intcode) { - // Found our desired country - const UnicodeString** result = - (const UnicodeString**)uprv_malloc(index->count * sizeof(UnicodeString *)); - const uint16_t* zoneNumberArray = &(index->zoneNumber); - for (uint16_t i=0; icount; ++i) { - // Pointer assignment - use existing UnicodeString object! - // Don't create a new UnicodeString on the heap here! - result[i] = &ZONE_IDS[zoneNumberArray[i]]; +const UChar* +TimeZone::dereferOlsonLink(const UnicodeString& id) { + const UChar *result = NULL; + UErrorCode ec = U_ZERO_ERROR; + UResourceBundle *rb = ures_openDirect(NULL, kZONEINFO, &ec); + + // resolve zone index by name + UResourceBundle *names = ures_getByKey(rb, kNAMES, NULL, &ec); + int32_t idx = findInStringArray(names, id, ec); + result = ures_getStringByIndex(names, idx, NULL, &ec); + + // open the zone bundle by index + ures_getByKey(rb, kZONES, rb, &ec); + ures_getByIndex(rb, idx, rb, &ec); + + if (U_SUCCESS(ec)) { + if (ures_getType(rb) == URES_INT) { + // this is a link - dereference the link + int32_t deref = ures_getInt(rb, &ec); + const UChar* tmp = ures_getStringByIndex(names, deref, NULL, &ec); + if (U_SUCCESS(ec)) { + result = tmp; } - numIDs = index->count; - return result; } - // Compute the position of the next entry. If the delta value - // in this entry is zero, then there is no next entry. - uint16_t delta = index->nextEntryDelta; - if (delta == 0) { - break; - } - index = (const CountryIndex*)((int8_t*)index + delta); } - numIDs = 0; - return 0; -} + ures_close(names); + ures_close(rb); -// ------------------------------------- + return result; +} -const UnicodeString** -TimeZone::createAvailableIDs(int32_t& numIDs) -{ - // We are creating a new array to existing UnicodeString pointers. - // The caller will delete the array when done, but not the pointers - // in the array. - // - // This is really unnecessary, given the fact that we have an - // array of the IDs already constructed, and we could just return - // that. However, that would be a breaking API change, and some - // callers familiar with the original API might try to delete it. +const UChar* +TimeZone::getRegion(const UnicodeString& id) { + UErrorCode status = U_ZERO_ERROR; + return getRegion(id, status); +} - if (!haveZoneData()) { - numIDs = 0; - return 0; +const UChar* +TimeZone::getRegion(const UnicodeString& id, UErrorCode& status) { + if (U_FAILURE(status)) { + return NULL; } - - const UnicodeString** result = - (const UnicodeString** )uprv_malloc(DATA->count * sizeof(UnicodeString *)); - - // Create a list of pointers to each and every zone ID - for (uint32_t i=0; icount; ++i) { - // Pointer assignment - use existing UnicodeString object! - // Don't create a new UnicodeString on the heap here! - result[i] = &ZONE_IDS[i]; + const UChar *result = NULL; + UResourceBundle *rb = ures_openDirect(NULL, kZONEINFO, &status); + + // resolve zone index by name + UResourceBundle *res = ures_getByKey(rb, kNAMES, NULL, &status); + int32_t idx = findInStringArray(res, id, status); + + // get region mapping + ures_getByKey(rb, kREGIONS, res, &status); + const UChar *tmp = ures_getStringByIndex(res, idx, NULL, &status); + if (U_SUCCESS(status)) { + result = tmp; } - numIDs = DATA->count; + ures_close(res); + ures_close(rb); + return result; } -// ICU_TIMEZONE_USE_DEPRECATES -// #endif -// see above // --------------------------------------- - int32_t -TimeZone::countEquivalentIDs(const UnicodeString& id) { - if (!haveZoneData()) { +TimeZone::getRegion(const UnicodeString& id, char *region, int32_t capacity, UErrorCode& status) +{ + int32_t resultLen = 0; + *region = 0; + if (U_FAILURE(status)) { return 0; } - const TZEquivalencyGroup *eg = lookupEquivalencyGroup(id); - return (eg != 0) ? (eg->isDST ? eg->u.d.count : eg->u.s.count) : 0; -} -// --------------------------------------- + const UChar *uregion = NULL; + // "Etc/Unknown" is not a system zone ID, + // but in the zone data + if (id.compare(UNKNOWN_ZONE_ID, UNKNOWN_ZONE_ID_LENGTH) != 0) { + uregion = getRegion(id); + } + if (uregion == NULL) { + status = U_ILLEGAL_ARGUMENT_ERROR; + return 0; + } + resultLen = u_strlen(uregion); + // A region code is represented by invariant characters + u_UCharsToChars(uregion, region, uprv_min(resultLen, capacity)); -const UnicodeString -TimeZone::getEquivalentID(const UnicodeString& id, int32_t index) { - if (haveZoneData()) { - const TZEquivalencyGroup *eg = lookupEquivalencyGroup(id); - if (eg != 0) { - const uint16_t *p = eg->isDST ? &eg->u.d.count : &eg->u.s.count; - if (index >= 0 && index < *p) { - return ZONE_IDS[p[index+1]]; - } - } + if (capacity < resultLen) { + status = U_BUFFER_OVERFLOW_ERROR; + return resultLen; } - return UnicodeString(); + + return u_terminateChars(region, capacity, resultLen, &status); } // --------------------------------------- @@ -948,45 +1182,110 @@ TimeZone::getDisplayName(UBool daylight, EDisplayType style, UnicodeString& resu { return getDisplayName(daylight,style, Locale::getDefault(), result); } - +//-------------------------------------- +int32_t +TimeZone::getDSTSavings()const { + if (useDaylightTime()) { + return 3600000; + } + return 0; +} +//--------------------------------------- UnicodeString& TimeZone::getDisplayName(UBool daylight, EDisplayType style, const Locale& locale, UnicodeString& result) const { - // SRL TODO: cache the SDF, just like java. UErrorCode status = U_ZERO_ERROR; + UDate date = Calendar::getNow(); + UTimeZoneFormatTimeType timeType; + int32_t offset; + + if (style == GENERIC_LOCATION || style == LONG_GENERIC || style == SHORT_GENERIC) { + LocalPointer tzfmt(TimeZoneFormat::createInstance(locale, status)); + if (U_FAILURE(status)) { + result.remove(); + return result; + } + // Generic format + switch (style) { + case GENERIC_LOCATION: + tzfmt->format(UTZFMT_STYLE_GENERIC_LOCATION, *this, date, result, &timeType); + break; + case LONG_GENERIC: + tzfmt->format(UTZFMT_STYLE_GENERIC_LONG, *this, date, result, &timeType); + break; + case SHORT_GENERIC: + tzfmt->format(UTZFMT_STYLE_GENERIC_SHORT, *this, date, result, &timeType); + break; + default: + U_ASSERT(FALSE); + } + // Generic format many use Localized GMT as the final fallback. + // When Localized GMT format is used, the result might not be + // appropriate for the requested daylight value. + if ((daylight && timeType == UTZFMT_TIME_TYPE_STANDARD) || (!daylight && timeType == UTZFMT_TIME_TYPE_DAYLIGHT)) { + offset = daylight ? getRawOffset() + getDSTSavings() : getRawOffset(); + if (style == SHORT_GENERIC) { + tzfmt->formatOffsetShortLocalizedGMT(offset, result, status); + } else { + tzfmt->formatOffsetLocalizedGMT(offset, result, status); + } + } + } else if (style == LONG_GMT || style == SHORT_GMT) { + LocalPointer tzfmt(TimeZoneFormat::createInstance(locale, status)); + if (U_FAILURE(status)) { + result.remove(); + return result; + } + offset = daylight && useDaylightTime() ? getRawOffset() + getDSTSavings() : getRawOffset(); + switch (style) { + case LONG_GMT: + tzfmt->formatOffsetLocalizedGMT(offset, result, status); + break; + case SHORT_GMT: + tzfmt->formatOffsetISO8601Basic(offset, FALSE, FALSE, FALSE, result, status); + break; + default: + U_ASSERT(FALSE); + } - SimpleDateFormat format(style == LONG ? "zzzz" : "z",locale,status); - - if(!U_SUCCESS(status)) - { - // *** SRL what do I do here?!! - return result.remove(); + } else { + U_ASSERT(style == LONG || style == SHORT || style == SHORT_COMMONLY_USED); + UTimeZoneNameType nameType = UTZNM_UNKNOWN; + switch (style) { + case LONG: + nameType = daylight ? UTZNM_LONG_DAYLIGHT : UTZNM_LONG_STANDARD; + break; + case SHORT: + case SHORT_COMMONLY_USED: + nameType = daylight ? UTZNM_SHORT_DAYLIGHT : UTZNM_SHORT_STANDARD; + break; + default: + U_ASSERT(FALSE); + } + LocalPointer tznames(TimeZoneNames::createInstance(locale, status)); + if (U_FAILURE(status)) { + result.remove(); + return result; + } + UnicodeString canonicalID(ZoneMeta::getCanonicalCLDRID(*this)); + tznames->getDisplayName(canonicalID, nameType, date, result); + if (result.isEmpty()) { + // Fallback to localized GMT + LocalPointer tzfmt(TimeZoneFormat::createInstance(locale, status)); + offset = daylight && useDaylightTime() ? getRawOffset() + getDSTSavings() : getRawOffset(); + if (style == LONG) { + tzfmt->formatOffsetLocalizedGMT(offset, result, status); + } else { + tzfmt->formatOffsetShortLocalizedGMT(offset, result, status); + } + } } - - // Create a new SimpleTimeZone as a stand-in for this zone; the - // stand-in will have no DST, or all DST, but the same ID and offset, - // and hence the same display name. - // We don't cache these because they're small and cheap to create. - UnicodeString tempID; - SimpleTimeZone *tz = daylight ? - // For the pure-DST zone, we use JANUARY and DECEMBER - - new SimpleTimeZone(getRawOffset(), getID(tempID), - UCAL_JANUARY , 1, 0, 0, - UCAL_DECEMBER , 31, 0, U_MILLIS_PER_DAY, status) : - new SimpleTimeZone(getRawOffset(), getID(tempID)); - - format.applyPattern(style == LONG ? "zzzz" : "z"); - Calendar *myCalendar = (Calendar*)format.getCalendar(); - myCalendar->setTimeZone(*tz); // copy - - delete tz; - - FieldPosition pos(FieldPosition::DONT_CARE); - return format.format(UDate(196262345678.), result, pos); // Must use a valid date here. + if (U_FAILURE(status)) { + result.remove(); + } + return result; } - /** * Parse a custom time zone identifier and return a corresponding zone. * @param id a string of the form GMT[+-]hh:mm, GMT[+-]hhmm, or @@ -997,89 +1296,399 @@ TimeZone::getDisplayName(UBool daylight, EDisplayType style, const Locale& local TimeZone* TimeZone::createCustomTimeZone(const UnicodeString& id) { + int32_t sign, hour, min, sec; + if (parseCustomID(id, sign, hour, min, sec)) { + UnicodeString customID; + formatCustomID(hour, min, sec, (sign < 0), customID); + int32_t offset = sign * ((hour * 60 + min) * 60 + sec) * 1000; + return new SimpleTimeZone(offset, customID); + } + return NULL; +} + +UnicodeString& +TimeZone::getCustomID(const UnicodeString& id, UnicodeString& normalized, UErrorCode& status) { + normalized.remove(); + if (U_FAILURE(status)) { + return normalized; + } + int32_t sign, hour, min, sec; + if (parseCustomID(id, sign, hour, min, sec)) { + formatCustomID(hour, min, sec, (sign < 0), normalized); + } else { + status = U_ILLEGAL_ARGUMENT_ERROR; + } + return normalized; +} + +UBool +TimeZone::parseCustomID(const UnicodeString& id, int32_t& sign, + int32_t& hour, int32_t& min, int32_t& sec) { static const int32_t kParseFailed = -99999; NumberFormat* numberFormat = 0; - UnicodeString idUppercase = id; - idUppercase.toUpper(); + idUppercase.toUpper(""); if (id.length() > GMT_ID_LENGTH && - idUppercase.startsWith(GMT_ID)) + idUppercase.startsWith(GMT_ID, GMT_ID_LENGTH)) { ParsePosition pos(GMT_ID_LENGTH); - UBool negative = FALSE; - int32_t offset; - - if (id[pos.getIndex()] == 0x002D /*'-'*/) - negative = TRUE; - else if (id[pos.getIndex()] != 0x002B /*'+'*/) - return 0; + sign = 1; + hour = 0; + min = 0; + sec = 0; + + if (id[pos.getIndex()] == MINUS /*'-'*/) { + sign = -1; + } else if (id[pos.getIndex()] != PLUS /*'+'*/) { + return FALSE; + } pos.setIndex(pos.getIndex() + 1); UErrorCode success = U_ZERO_ERROR; numberFormat = NumberFormat::createInstance(success); + if(U_FAILURE(success)){ + return FALSE; + } numberFormat->setParseIntegerOnly(TRUE); + //numberFormat->setLenient(TRUE); // TODO: May need to set this, depends on latest timezone parsing - // Look for either hh:mm, hhmm, or hh int32_t start = pos.getIndex(); - Formattable n(kParseFailed); - numberFormat->parse(id, n, pos); if (pos.getIndex() == start) { delete numberFormat; - return 0; + return FALSE; } - offset = n.getLong(); + hour = n.getLong(); - if (pos.getIndex() < id.length() && - id[pos.getIndex()] == 0x003A /*':'*/) - { + if (pos.getIndex() < id.length()) { + if (pos.getIndex() - start > 2 + || id[pos.getIndex()] != COLON) { + delete numberFormat; + return FALSE; + } // hh:mm - offset *= 60; pos.setIndex(pos.getIndex() + 1); int32_t oldPos = pos.getIndex(); n.setLong(kParseFailed); numberFormat->parse(id, n, pos); - if (pos.getIndex() == oldPos) { + if ((pos.getIndex() - oldPos) != 2) { + // must be 2 digits + delete numberFormat; + return FALSE; + } + min = n.getLong(); + if (pos.getIndex() < id.length()) { + if (id[pos.getIndex()] != COLON) { + delete numberFormat; + return FALSE; + } + // [:ss] + pos.setIndex(pos.getIndex() + 1); + oldPos = pos.getIndex(); + n.setLong(kParseFailed); + numberFormat->parse(id, n, pos); + if (pos.getIndex() != id.length() + || (pos.getIndex() - oldPos) != 2) { + delete numberFormat; + return FALSE; + } + sec = n.getLong(); + } + } else { + // Supported formats are below - + // + // HHmmss + // Hmmss + // HHmm + // Hmm + // HH + // H + + int32_t length = pos.getIndex() - start; + if (length <= 0 || 6 < length) { + // invalid length delete numberFormat; - return 0; + return FALSE; + } + switch (length) { + case 1: + case 2: + // already set to hour + break; + case 3: + case 4: + min = hour % 100; + hour /= 100; + break; + case 5: + case 6: + sec = hour % 100; + min = (hour/100) % 100; + hour /= 10000; + break; } - offset += n.getLong(); } - else - { - // hhmm or hh - - // Be strict about interpreting something as hh; it must be - // an offset < 30, and it must be one or two digits. Thus - // 0010 is interpreted as 00:10, but 10 is interpreted as - // 10:00. - if (offset < 30 && (pos.getIndex() - start) <= 2) - offset *= 60; // hh, from 00 to 29; 30 is 00:30 - else - offset = offset % 100 + offset / 100 * 60; // hhmm + + delete numberFormat; + + if (hour > kMAX_CUSTOM_HOUR || min > kMAX_CUSTOM_MIN || sec > kMAX_CUSTOM_SEC) { + return FALSE; } + return TRUE; + } + return FALSE; +} - if(negative) - offset = -offset; +UnicodeString& +TimeZone::formatCustomID(int32_t hour, int32_t min, int32_t sec, + UBool negative, UnicodeString& id) { + // Create time zone ID - GMT[+|-]hhmm[ss] + id.setTo(GMT_ID, GMT_ID_LENGTH); + if (hour | min | sec) { + if (negative) { + id += (UChar)MINUS; + } else { + id += (UChar)PLUS; + } - delete numberFormat; - return new SimpleTimeZone(offset * 60000, CUSTOM_ID); + if (hour < 10) { + id += (UChar)ZERO_DIGIT; + } else { + id += (UChar)(ZERO_DIGIT + hour/10); + } + id += (UChar)(ZERO_DIGIT + hour%10); + id += (UChar)COLON; + if (min < 10) { + id += (UChar)ZERO_DIGIT; + } else { + id += (UChar)(ZERO_DIGIT + min/10); + } + id += (UChar)(ZERO_DIGIT + min%10); + + if (sec) { + id += (UChar)COLON; + if (sec < 10) { + id += (UChar)ZERO_DIGIT; + } else { + id += (UChar)(ZERO_DIGIT + sec/10); + } + id += (UChar)(ZERO_DIGIT + sec%10); + } } - return 0; + return id; } -UBool +UBool TimeZone::hasSameRules(const TimeZone& other) const { - return (getRawOffset() == other.getRawOffset() && + return (getRawOffset() == other.getRawOffset() && useDaylightTime() == other.useDaylightTime()); } +static void U_CALLCONV initTZDataVersion(UErrorCode &status) { + ucln_i18n_registerCleanup(UCLN_I18N_TIMEZONE, timeZone_cleanup); + int32_t len = 0; + UResourceBundle *bundle = ures_openDirect(NULL, kZONEINFO, &status); + const UChar *tzver = ures_getStringByKey(bundle, kTZVERSION, &len, &status); + + if (U_SUCCESS(status)) { + if (len >= (int32_t)sizeof(TZDATA_VERSION)) { + // Ensure that there is always space for a trailing nul in TZDATA_VERSION + len = sizeof(TZDATA_VERSION) - 1; + } + u_UCharsToChars(tzver, TZDATA_VERSION, len); + } + ures_close(bundle); + +} + +const char* +TimeZone::getTZDataVersion(UErrorCode& status) +{ + umtx_initOnce(gTZDataVersionInitOnce, &initTZDataVersion, status); + return (const char*)TZDATA_VERSION; +} + +UnicodeString& +TimeZone::getCanonicalID(const UnicodeString& id, UnicodeString& canonicalID, UErrorCode& status) +{ + UBool isSystemID = FALSE; + return getCanonicalID(id, canonicalID, isSystemID, status); +} + +UnicodeString& +TimeZone::getCanonicalID(const UnicodeString& id, UnicodeString& canonicalID, UBool& isSystemID, + UErrorCode& status) +{ + canonicalID.remove(); + isSystemID = FALSE; + if (U_FAILURE(status)) { + return canonicalID; + } + if (id.compare(UNKNOWN_ZONE_ID, UNKNOWN_ZONE_ID_LENGTH) == 0) { + // special case - Etc/Unknown is a canonical ID, but not system ID + canonicalID.fastCopyFrom(id); + isSystemID = FALSE; + } else { + ZoneMeta::getCanonicalCLDRID(id, canonicalID, status); + if (U_SUCCESS(status)) { + isSystemID = TRUE; + } else { + // Not a system ID + status = U_ZERO_ERROR; + getCustomID(id, canonicalID, status); + } + } + return canonicalID; +} + +UnicodeString& +TimeZone::getWindowsID(const UnicodeString& id, UnicodeString& winid, UErrorCode& status) { + winid.remove(); + if (U_FAILURE(status)) { + return winid; + } + + // canonicalize the input ID + UnicodeString canonicalID; + UBool isSystemID = FALSE; + + getCanonicalID(id, canonicalID, isSystemID, status); + if (U_FAILURE(status) || !isSystemID) { + // mapping data is only applicable to tz database IDs + if (status == U_ILLEGAL_ARGUMENT_ERROR) { + // getWindowsID() sets an empty string where + // getCanonicalID() sets a U_ILLEGAL_ARGUMENT_ERROR. + status = U_ZERO_ERROR; + } + return winid; + } + + UResourceBundle *mapTimezones = ures_openDirect(NULL, "windowsZones", &status); + ures_getByKey(mapTimezones, "mapTimezones", mapTimezones, &status); + + if (U_FAILURE(status)) { + return winid; + } + + UResourceBundle *winzone = NULL; + UBool found = FALSE; + while (ures_hasNext(mapTimezones) && !found) { + winzone = ures_getNextResource(mapTimezones, winzone, &status); + if (U_FAILURE(status)) { + break; + } + if (ures_getType(winzone) != URES_TABLE) { + continue; + } + UResourceBundle *regionalData = NULL; + while (ures_hasNext(winzone) && !found) { + regionalData = ures_getNextResource(winzone, regionalData, &status); + if (U_FAILURE(status)) { + break; + } + if (ures_getType(regionalData) != URES_STRING) { + continue; + } + int32_t len; + const UChar *tzids = ures_getString(regionalData, &len, &status); + if (U_FAILURE(status)) { + break; + } + + const UChar *start = tzids; + UBool hasNext = TRUE; + while (hasNext) { + const UChar *end = u_strchr(start, (UChar)0x20); + if (end == NULL) { + end = tzids + len; + hasNext = FALSE; + } + if (canonicalID.compare(start, end - start) == 0) { + winid = UnicodeString(ures_getKey(winzone), -1 , US_INV); + found = TRUE; + break; + } + start = end + 1; + } + } + ures_close(regionalData); + } + ures_close(winzone); + ures_close(mapTimezones); + + return winid; +} + +#define MAX_WINDOWS_ID_SIZE 128 + +UnicodeString& +TimeZone::getIDForWindowsID(const UnicodeString& winid, const char* region, UnicodeString& id, UErrorCode& status) { + id.remove(); + if (U_FAILURE(status)) { + return id; + } + + UResourceBundle *zones = ures_openDirect(NULL, "windowsZones", &status); + ures_getByKey(zones, "mapTimezones", zones, &status); + if (U_FAILURE(status)) { + ures_close(zones); + return id; + } + + UErrorCode tmperr = U_ZERO_ERROR; + char winidKey[MAX_WINDOWS_ID_SIZE]; + int32_t winKeyLen = winid.extract(0, winid.length(), winidKey, sizeof(winidKey) - 1, US_INV); + + if (winKeyLen == 0 || winKeyLen >= (int32_t)sizeof(winidKey)) { + ures_close(zones); + return id; + } + winidKey[winKeyLen] = 0; + + ures_getByKey(zones, winidKey, zones, &tmperr); // use tmperr, because windows mapping might not + // be avaiable by design + if (U_FAILURE(tmperr)) { + ures_close(zones); + return id; + } + + const UChar *tzid = NULL; + int32_t len = 0; + UBool gotID = FALSE; + if (region) { + const UChar *tzids = ures_getStringByKey(zones, region, &len, &tmperr); // use tmperr, because + // regional mapping is optional + if (U_SUCCESS(tmperr)) { + // first ID delimited by space is the defasult one + const UChar *end = u_strchr(tzids, (UChar)0x20); + if (end == NULL) { + id.setTo(tzids, -1); + } else { + id.setTo(tzids, end - tzids); + } + gotID = TRUE; + } + } + + if (!gotID) { + tzid = ures_getStringByKey(zones, "001", &len, &status); // using status, because "001" must be + // available at this point + if (U_SUCCESS(status)) { + id.setTo(tzid, len); + } + } + + ures_close(zones); + return id; +} + + U_NAMESPACE_END #endif /* #if !UCONFIG_NO_FORMATTING */