Wed, 31 Dec 2014 06:09:35 +0100
Cloned upstream origin tor-browser at tor-browser-31.3.0esr-4.5-1-build1
revision ID fc1c9ff7c1b2defdbc039f12214767608f46423f for hacking purpose.
1 /*
2 *******************************************************************************
3 * Copyright (C) 2007-2013, International Business Machines Corporation and
4 * others. All Rights Reserved.
5 *******************************************************************************
6 */
8 #include "unicode/utypes.h"
10 #if !UCONFIG_NO_FORMATTING
12 #include "zonemeta.h"
14 #include "unicode/timezone.h"
15 #include "unicode/ustring.h"
16 #include "unicode/putil.h"
17 #include "unicode/simpletz.h"
19 #include "umutex.h"
20 #include "uvector.h"
21 #include "cmemory.h"
22 #include "gregoimp.h"
23 #include "cstring.h"
24 #include "ucln_in.h"
25 #include "uassert.h"
26 #include "uresimp.h"
27 #include "uhash.h"
28 #include "olsontz.h"
30 static UMutex gZoneMetaLock = U_MUTEX_INITIALIZER;
32 // CLDR Canonical ID mapping table
33 static UHashtable *gCanonicalIDCache = NULL;
34 static icu::UInitOnce gCanonicalIDCacheInitOnce = U_INITONCE_INITIALIZER;
36 // Metazone mapping table
37 static UHashtable *gOlsonToMeta = NULL;
38 static icu::UInitOnce gOlsonToMetaInitOnce = U_INITONCE_INITIALIZER;
40 // Available metazone IDs vector and table
41 static icu::UVector *gMetaZoneIDs = NULL;
42 static UHashtable *gMetaZoneIDTable = NULL;
43 static icu::UInitOnce gMetaZoneIDsInitOnce = U_INITONCE_INITIALIZER;
45 // Country info vectors
46 static icu::UVector *gSingleZoneCountries = NULL;
47 static icu::UVector *gMultiZonesCountries = NULL;
48 static icu::UInitOnce gCountryInfoVectorsInitOnce = U_INITONCE_INITIALIZER;
50 U_CDECL_BEGIN
52 /**
53 * Cleanup callback func
54 */
55 static UBool U_CALLCONV zoneMeta_cleanup(void)
56 {
57 if (gCanonicalIDCache != NULL) {
58 uhash_close(gCanonicalIDCache);
59 gCanonicalIDCache = NULL;
60 }
61 gCanonicalIDCacheInitOnce.reset();
63 if (gOlsonToMeta != NULL) {
64 uhash_close(gOlsonToMeta);
65 gOlsonToMeta = NULL;
66 }
67 gOlsonToMetaInitOnce.reset();
69 if (gMetaZoneIDTable != NULL) {
70 uhash_close(gMetaZoneIDTable);
71 gMetaZoneIDTable = NULL;
72 }
73 // delete after closing gMetaZoneIDTable, because it holds
74 // value objects held by the hashtable
75 delete gMetaZoneIDs;
76 gMetaZoneIDs = NULL;
77 gMetaZoneIDsInitOnce.reset();
79 delete gSingleZoneCountries;
80 gSingleZoneCountries = NULL;
81 delete gMultiZonesCountries;
82 gMultiZonesCountries = NULL;
83 gCountryInfoVectorsInitOnce.reset();
85 return TRUE;
86 }
88 /**
89 * Deleter for UChar* string
90 */
91 static void U_CALLCONV
92 deleteUCharString(void *obj) {
93 UChar *entry = (UChar*)obj;
94 uprv_free(entry);
95 }
97 /**
98 * Deleter for UVector
99 */
100 static void U_CALLCONV
101 deleteUVector(void *obj) {
102 delete (icu::UVector*) obj;
103 }
105 /**
106 * Deleter for OlsonToMetaMappingEntry
107 */
108 static void U_CALLCONV
109 deleteOlsonToMetaMappingEntry(void *obj) {
110 icu::OlsonToMetaMappingEntry *entry = (icu::OlsonToMetaMappingEntry*)obj;
111 uprv_free(entry);
112 }
114 U_CDECL_END
116 U_NAMESPACE_BEGIN
118 #define ZID_KEY_MAX 128
120 static const char gMetaZones[] = "metaZones";
121 static const char gMetazoneInfo[] = "metazoneInfo";
122 static const char gMapTimezonesTag[] = "mapTimezones";
124 static const char gKeyTypeData[] = "keyTypeData";
125 static const char gTypeAliasTag[] = "typeAlias";
126 static const char gTypeMapTag[] = "typeMap";
127 static const char gTimezoneTag[] = "timezone";
129 static const char gPrimaryZonesTag[] = "primaryZones";
131 static const char gWorldTag[] = "001";
133 static const UChar gWorld[] = {0x30, 0x30, 0x31, 0x00}; // "001"
135 static const UChar gDefaultFrom[] = {0x31, 0x39, 0x37, 0x30, 0x2D, 0x30, 0x31, 0x2D, 0x30, 0x31,
136 0x20, 0x30, 0x30, 0x3A, 0x30, 0x30, 0x00}; // "1970-01-01 00:00"
137 static const UChar gDefaultTo[] = {0x39, 0x39, 0x39, 0x39, 0x2D, 0x31, 0x32, 0x2D, 0x33, 0x31,
138 0x20, 0x32, 0x33, 0x3A, 0x35, 0x39, 0x00}; // "9999-12-31 23:59"
140 static const UChar gCustomTzPrefix[] = {0x47, 0x4D, 0x54, 0}; // "GMT"
142 #define ASCII_DIGIT(c) (((c)>=0x30 && (c)<=0x39) ? (c)-0x30 : -1)
144 /*
145 * Convert a date string used by metazone mappings to UDate.
146 * The format used by CLDR metazone mapping is "yyyy-MM-dd HH:mm".
147 */
148 static UDate
149 parseDate (const UChar *text, UErrorCode &status) {
150 if (U_FAILURE(status)) {
151 return 0;
152 }
153 int32_t len = u_strlen(text);
154 if (len != 16 && len != 10) {
155 // It must be yyyy-MM-dd HH:mm (length 16) or yyyy-MM-dd (length 10)
156 status = U_INVALID_FORMAT_ERROR;
157 return 0;
158 }
160 int32_t year = 0, month = 0, day = 0, hour = 0, min = 0, n;
161 int32_t idx;
163 // "yyyy" (0 - 3)
164 for (idx = 0; idx <= 3 && U_SUCCESS(status); idx++) {
165 n = ASCII_DIGIT((int32_t)text[idx]);
166 if (n >= 0) {
167 year = 10*year + n;
168 } else {
169 status = U_INVALID_FORMAT_ERROR;
170 }
171 }
172 // "MM" (5 - 6)
173 for (idx = 5; idx <= 6 && U_SUCCESS(status); idx++) {
174 n = ASCII_DIGIT((int32_t)text[idx]);
175 if (n >= 0) {
176 month = 10*month + n;
177 } else {
178 status = U_INVALID_FORMAT_ERROR;
179 }
180 }
181 // "dd" (8 - 9)
182 for (idx = 8; idx <= 9 && U_SUCCESS(status); idx++) {
183 n = ASCII_DIGIT((int32_t)text[idx]);
184 if (n >= 0) {
185 day = 10*day + n;
186 } else {
187 status = U_INVALID_FORMAT_ERROR;
188 }
189 }
190 if (len == 16) {
191 // "HH" (11 - 12)
192 for (idx = 11; idx <= 12 && U_SUCCESS(status); idx++) {
193 n = ASCII_DIGIT((int32_t)text[idx]);
194 if (n >= 0) {
195 hour = 10*hour + n;
196 } else {
197 status = U_INVALID_FORMAT_ERROR;
198 }
199 }
200 // "mm" (14 - 15)
201 for (idx = 14; idx <= 15 && U_SUCCESS(status); idx++) {
202 n = ASCII_DIGIT((int32_t)text[idx]);
203 if (n >= 0) {
204 min = 10*min + n;
205 } else {
206 status = U_INVALID_FORMAT_ERROR;
207 }
208 }
209 }
211 if (U_SUCCESS(status)) {
212 UDate date = Grego::fieldsToDay(year, month - 1, day) * U_MILLIS_PER_DAY
213 + hour * U_MILLIS_PER_HOUR + min * U_MILLIS_PER_MINUTE;
214 return date;
215 }
216 return 0;
217 }
219 static void U_CALLCONV initCanonicalIDCache(UErrorCode &status) {
220 gCanonicalIDCache = uhash_open(uhash_hashUChars, uhash_compareUChars, NULL, &status);
221 if (gCanonicalIDCache == NULL) {
222 status = U_MEMORY_ALLOCATION_ERROR;
223 }
224 if (U_FAILURE(status)) {
225 gCanonicalIDCache = NULL;
226 }
227 // No key/value deleters - keys/values are from a resource bundle
228 ucln_i18n_registerCleanup(UCLN_I18N_ZONEMETA, zoneMeta_cleanup);
229 }
232 const UChar* U_EXPORT2
233 ZoneMeta::getCanonicalCLDRID(const UnicodeString &tzid, UErrorCode& status) {
234 if (U_FAILURE(status)) {
235 return NULL;
236 }
238 int32_t len = tzid.length();
239 if (len > ZID_KEY_MAX) {
240 status = U_ILLEGAL_ARGUMENT_ERROR;
241 return NULL;
242 }
244 // Checking the cached results
245 umtx_initOnce(gCanonicalIDCacheInitOnce, &initCanonicalIDCache, status);
246 if (U_FAILURE(status)) {
247 return NULL;
248 }
250 const UChar *canonicalID = NULL;
252 UErrorCode tmpStatus = U_ZERO_ERROR;
253 UChar utzid[ZID_KEY_MAX + 1];
254 tzid.extract(utzid, ZID_KEY_MAX + 1, tmpStatus);
255 U_ASSERT(tmpStatus == U_ZERO_ERROR); // we checked the length of tzid already
257 // Check if it was already cached
258 umtx_lock(&gZoneMetaLock);
259 {
260 canonicalID = (const UChar *)uhash_get(gCanonicalIDCache, utzid);
261 }
262 umtx_unlock(&gZoneMetaLock);
264 if (canonicalID != NULL) {
265 return canonicalID;
266 }
268 // If not, resolve CLDR canonical ID with resource data
269 UBool isInputCanonical = FALSE;
270 char id[ZID_KEY_MAX + 1];
271 const UChar* idChars = tzid.getBuffer();
273 u_UCharsToChars(idChars,id,len);
274 id[len] = (char) 0; // Make sure it is null terminated.
276 // replace '/' with ':'
277 char *p = id;
278 while (*p++) {
279 if (*p == '/') {
280 *p = ':';
281 }
282 }
284 UResourceBundle *top = ures_openDirect(NULL, gKeyTypeData, &tmpStatus);
285 UResourceBundle *rb = ures_getByKey(top, gTypeMapTag, NULL, &tmpStatus);
286 ures_getByKey(rb, gTimezoneTag, rb, &tmpStatus);
287 ures_getByKey(rb, id, rb, &tmpStatus);
288 if (U_SUCCESS(tmpStatus)) {
289 // type entry (canonical) found
290 // the input is the canonical ID. resolve to const UChar*
291 canonicalID = TimeZone::findID(tzid);
292 isInputCanonical = TRUE;
293 }
295 if (canonicalID == NULL) {
296 // If a map element not found, then look for an alias
297 tmpStatus = U_ZERO_ERROR;
298 ures_getByKey(top, gTypeAliasTag, rb, &tmpStatus);
299 ures_getByKey(rb, gTimezoneTag, rb, &tmpStatus);
300 const UChar *canonical = ures_getStringByKey(rb,id,NULL,&tmpStatus);
301 if (U_SUCCESS(tmpStatus)) {
302 // canonical map found
303 canonicalID = canonical;
304 }
306 if (canonicalID == NULL) {
307 // Dereference the input ID using the tz data
308 const UChar *derefer = TimeZone::dereferOlsonLink(tzid);
309 if (derefer == NULL) {
310 status = U_ILLEGAL_ARGUMENT_ERROR;
311 } else {
312 len = u_strlen(derefer);
313 u_UCharsToChars(derefer,id,len);
314 id[len] = (char) 0; // Make sure it is null terminated.
316 // replace '/' with ':'
317 char *p = id;
318 while (*p++) {
319 if (*p == '/') {
320 *p = ':';
321 }
322 }
324 // If a dereference turned something up then look for an alias.
325 // rb still points to the alias table, so we don't have to go looking
326 // for it.
327 tmpStatus = U_ZERO_ERROR;
328 canonical = ures_getStringByKey(rb,id,NULL,&tmpStatus);
329 if (U_SUCCESS(tmpStatus)) {
330 // canonical map for the dereferenced ID found
331 canonicalID = canonical;
332 } else {
333 canonicalID = derefer;
334 isInputCanonical = TRUE;
335 }
336 }
337 }
338 }
339 ures_close(rb);
340 ures_close(top);
342 if (U_SUCCESS(status)) {
343 U_ASSERT(canonicalID != NULL); // canocanilD must be non-NULL here
345 // Put the resolved canonical ID to the cache
346 umtx_lock(&gZoneMetaLock);
347 {
348 const UChar* idInCache = (const UChar *)uhash_get(gCanonicalIDCache, utzid);
349 if (idInCache == NULL) {
350 const UChar* key = ZoneMeta::findTimeZoneID(tzid);
351 U_ASSERT(key != NULL);
352 if (key != NULL) {
353 idInCache = (const UChar *)uhash_put(gCanonicalIDCache, (void *)key, (void *)canonicalID, &status);
354 U_ASSERT(idInCache == NULL);
355 }
356 }
357 if (U_SUCCESS(status) && isInputCanonical) {
358 // Also put canonical ID itself into the cache if not exist
359 const UChar *canonicalInCache = (const UChar*)uhash_get(gCanonicalIDCache, canonicalID);
360 if (canonicalInCache == NULL) {
361 canonicalInCache = (const UChar *)uhash_put(gCanonicalIDCache, (void *)canonicalID, (void *)canonicalID, &status);
362 U_ASSERT(canonicalInCache == NULL);
363 }
364 }
365 }
366 umtx_unlock(&gZoneMetaLock);
367 }
369 return canonicalID;
370 }
372 UnicodeString& U_EXPORT2
373 ZoneMeta::getCanonicalCLDRID(const UnicodeString &tzid, UnicodeString &systemID, UErrorCode& status) {
374 const UChar *canonicalID = getCanonicalCLDRID(tzid, status);
375 if (U_FAILURE(status) || canonicalID == NULL) {
376 systemID.setToBogus();
377 return systemID;
378 }
379 systemID.setTo(TRUE, canonicalID, -1);
380 return systemID;
381 }
383 const UChar* U_EXPORT2
384 ZoneMeta::getCanonicalCLDRID(const TimeZone& tz) {
385 if (dynamic_cast<const OlsonTimeZone *>(&tz) != NULL) {
386 // short cut for OlsonTimeZone
387 const OlsonTimeZone *otz = (const OlsonTimeZone*)&tz;
388 return otz->getCanonicalID();
389 }
390 UErrorCode status = U_ZERO_ERROR;
391 UnicodeString tzID;
392 return getCanonicalCLDRID(tz.getID(tzID), status);
393 }
395 static void U_CALLCONV countryInfoVectorsInit(UErrorCode &status) {
396 // Create empty vectors
397 // No deleters for these UVectors, it's a reference to a resource bundle string.
398 gSingleZoneCountries = new UVector(NULL, uhash_compareUChars, status);
399 if (gSingleZoneCountries == NULL) {
400 status = U_MEMORY_ALLOCATION_ERROR;
401 }
402 gMultiZonesCountries = new UVector(NULL, uhash_compareUChars, status);
403 if (gMultiZonesCountries == NULL) {
404 status = U_MEMORY_ALLOCATION_ERROR;
405 }
407 if (U_FAILURE(status)) {
408 delete gSingleZoneCountries;
409 delete gMultiZonesCountries;
410 gSingleZoneCountries = NULL;
411 gMultiZonesCountries = NULL;
412 }
413 ucln_i18n_registerCleanup(UCLN_I18N_ZONEMETA, zoneMeta_cleanup);
414 }
417 UnicodeString& U_EXPORT2
418 ZoneMeta::getCanonicalCountry(const UnicodeString &tzid, UnicodeString &country, UBool *isPrimary /* = NULL */) {
419 if (isPrimary != NULL) {
420 *isPrimary = FALSE;
421 }
423 const UChar *region = TimeZone::getRegion(tzid);
424 if (region != NULL && u_strcmp(gWorld, region) != 0) {
425 country.setTo(region, -1);
426 } else {
427 country.setToBogus();
428 return country;
429 }
431 if (isPrimary != NULL) {
432 char regionBuf[] = {0, 0, 0};
434 // Checking the cached results
435 UErrorCode status = U_ZERO_ERROR;
436 umtx_initOnce(gCountryInfoVectorsInitOnce, &countryInfoVectorsInit, status);
437 if (U_FAILURE(status)) {
438 return country;
439 }
441 // Check if it was already cached
442 UBool cached = FALSE;
443 UBool singleZone = FALSE;
444 umtx_lock(&gZoneMetaLock);
445 {
446 singleZone = cached = gSingleZoneCountries->contains((void*)region);
447 if (!cached) {
448 cached = gMultiZonesCountries->contains((void*)region);
449 }
450 }
451 umtx_unlock(&gZoneMetaLock);
453 if (!cached) {
454 // We need to go through all zones associated with the region.
455 // This is relatively heavy operation.
457 U_ASSERT(u_strlen(region) == 2);
459 u_UCharsToChars(region, regionBuf, 2);
461 StringEnumeration *ids = TimeZone::createTimeZoneIDEnumeration(UCAL_ZONE_TYPE_CANONICAL_LOCATION, regionBuf, NULL, status);
462 int32_t idsLen = ids->count(status);
463 if (U_SUCCESS(status) && idsLen == 1) {
464 // only the single zone is available for the region
465 singleZone = TRUE;
466 }
467 delete ids;
469 // Cache the result
470 umtx_lock(&gZoneMetaLock);
471 {
472 UErrorCode ec = U_ZERO_ERROR;
473 if (singleZone) {
474 if (!gSingleZoneCountries->contains((void*)region)) {
475 gSingleZoneCountries->addElement((void*)region, ec);
476 }
477 } else {
478 if (!gMultiZonesCountries->contains((void*)region)) {
479 gMultiZonesCountries->addElement((void*)region, ec);
480 }
481 }
482 }
483 umtx_unlock(&gZoneMetaLock);
484 }
486 if (singleZone) {
487 *isPrimary = TRUE;
488 } else {
489 // Note: We may cache the primary zone map in future.
491 // Even a country has multiple zones, one of them might be
492 // dominant and treated as a primary zone
493 int32_t idLen = 0;
494 if (regionBuf[0] == 0) {
495 u_UCharsToChars(region, regionBuf, 2);
496 }
498 UResourceBundle *rb = ures_openDirect(NULL, gMetaZones, &status);
499 ures_getByKey(rb, gPrimaryZonesTag, rb, &status);
500 const UChar *primaryZone = ures_getStringByKey(rb, regionBuf, &idLen, &status);
501 if (U_SUCCESS(status)) {
502 if (tzid.compare(primaryZone, idLen) == 0) {
503 *isPrimary = TRUE;
504 } else {
505 // The given ID might not be a canonical ID
506 UnicodeString canonicalID;
507 TimeZone::getCanonicalID(tzid, canonicalID, status);
508 if (U_SUCCESS(status) && canonicalID.compare(primaryZone, idLen) == 0) {
509 *isPrimary = TRUE;
510 }
511 }
512 }
513 ures_close(rb);
514 }
515 }
517 return country;
518 }
520 UnicodeString& U_EXPORT2
521 ZoneMeta::getMetazoneID(const UnicodeString &tzid, UDate date, UnicodeString &result) {
522 UBool isSet = FALSE;
523 const UVector *mappings = getMetazoneMappings(tzid);
524 if (mappings != NULL) {
525 for (int32_t i = 0; i < mappings->size(); i++) {
526 OlsonToMetaMappingEntry *mzm = (OlsonToMetaMappingEntry*)mappings->elementAt(i);
527 if (mzm->from <= date && mzm->to > date) {
528 result.setTo(mzm->mzid, -1);
529 isSet = TRUE;
530 break;
531 }
532 }
533 }
534 if (!isSet) {
535 result.setToBogus();
536 }
537 return result;
538 }
540 static void U_CALLCONV olsonToMetaInit(UErrorCode &status) {
541 U_ASSERT(gOlsonToMeta == NULL);
542 ucln_i18n_registerCleanup(UCLN_I18N_ZONEMETA, zoneMeta_cleanup);
543 gOlsonToMeta = uhash_open(uhash_hashUChars, uhash_compareUChars, NULL, &status);
544 if (U_FAILURE(status)) {
545 gOlsonToMeta = NULL;
546 } else {
547 uhash_setKeyDeleter(gOlsonToMeta, deleteUCharString);
548 uhash_setValueDeleter(gOlsonToMeta, deleteUVector);
549 }
550 }
553 const UVector* U_EXPORT2
554 ZoneMeta::getMetazoneMappings(const UnicodeString &tzid) {
555 UErrorCode status = U_ZERO_ERROR;
556 UChar tzidUChars[ZID_KEY_MAX + 1];
557 tzid.extract(tzidUChars, ZID_KEY_MAX + 1, status);
558 if (U_FAILURE(status) || status == U_STRING_NOT_TERMINATED_WARNING) {
559 return NULL;
560 }
562 umtx_initOnce(gOlsonToMetaInitOnce, &olsonToMetaInit, status);
563 if (U_FAILURE(status)) {
564 return NULL;
565 }
567 // get the mapping from cache
568 const UVector *result = NULL;
570 umtx_lock(&gZoneMetaLock);
571 {
572 result = (UVector*) uhash_get(gOlsonToMeta, tzidUChars);
573 }
574 umtx_unlock(&gZoneMetaLock);
576 if (result != NULL) {
577 return result;
578 }
580 // miss the cache - create new one
581 UVector *tmpResult = createMetazoneMappings(tzid);
582 if (tmpResult == NULL) {
583 // not available
584 return NULL;
585 }
587 // put the new one into the cache
588 umtx_lock(&gZoneMetaLock);
589 {
590 // make sure it's already created
591 result = (UVector*) uhash_get(gOlsonToMeta, tzidUChars);
592 if (result == NULL) {
593 // add the one just created
594 int32_t tzidLen = tzid.length() + 1;
595 UChar *key = (UChar*)uprv_malloc(tzidLen * sizeof(UChar));
596 if (key == NULL) {
597 // memory allocation error.. just return NULL
598 result = NULL;
599 delete tmpResult;
600 } else {
601 tzid.extract(key, tzidLen, status);
602 uhash_put(gOlsonToMeta, key, tmpResult, &status);
603 if (U_FAILURE(status)) {
604 // delete the mapping
605 result = NULL;
606 delete tmpResult;
607 } else {
608 result = tmpResult;
609 }
610 }
611 } else {
612 // another thread already put the one
613 delete tmpResult;
614 }
615 }
616 umtx_unlock(&gZoneMetaLock);
618 return result;
619 }
621 UVector*
622 ZoneMeta::createMetazoneMappings(const UnicodeString &tzid) {
623 UVector *mzMappings = NULL;
624 UErrorCode status = U_ZERO_ERROR;
626 UnicodeString canonicalID;
627 UResourceBundle *rb = ures_openDirect(NULL, gMetaZones, &status);
628 ures_getByKey(rb, gMetazoneInfo, rb, &status);
629 getCanonicalCLDRID(tzid, canonicalID, status);
631 if (U_SUCCESS(status)) {
632 char tzKey[ZID_KEY_MAX + 1];
633 int32_t tzKeyLen = canonicalID.extract(0, canonicalID.length(), tzKey, sizeof(tzKey), US_INV);
634 tzKey[tzKeyLen] = 0;
636 // tzid keys are using ':' as separators
637 char *p = tzKey;
638 while (*p) {
639 if (*p == '/') {
640 *p = ':';
641 }
642 p++;
643 }
645 ures_getByKey(rb, tzKey, rb, &status);
647 if (U_SUCCESS(status)) {
648 UResourceBundle *mz = NULL;
649 while (ures_hasNext(rb)) {
650 mz = ures_getNextResource(rb, mz, &status);
652 const UChar *mz_name = ures_getStringByIndex(mz, 0, NULL, &status);
653 const UChar *mz_from = gDefaultFrom;
654 const UChar *mz_to = gDefaultTo;
656 if (ures_getSize(mz) == 3) {
657 mz_from = ures_getStringByIndex(mz, 1, NULL, &status);
658 mz_to = ures_getStringByIndex(mz, 2, NULL, &status);
659 }
661 if(U_FAILURE(status)){
662 status = U_ZERO_ERROR;
663 continue;
664 }
665 // We do not want to use SimpleDateformat to parse boundary dates,
666 // because this code could be triggered by the initialization code
667 // used by SimpleDateFormat.
668 UDate from = parseDate(mz_from, status);
669 UDate to = parseDate(mz_to, status);
670 if (U_FAILURE(status)) {
671 status = U_ZERO_ERROR;
672 continue;
673 }
675 OlsonToMetaMappingEntry *entry = (OlsonToMetaMappingEntry*)uprv_malloc(sizeof(OlsonToMetaMappingEntry));
676 if (entry == NULL) {
677 status = U_MEMORY_ALLOCATION_ERROR;
678 break;
679 }
680 entry->mzid = mz_name;
681 entry->from = from;
682 entry->to = to;
684 if (mzMappings == NULL) {
685 mzMappings = new UVector(deleteOlsonToMetaMappingEntry, NULL, status);
686 if (U_FAILURE(status)) {
687 delete mzMappings;
688 deleteOlsonToMetaMappingEntry(entry);
689 uprv_free(entry);
690 break;
691 }
692 }
694 mzMappings->addElement(entry, status);
695 if (U_FAILURE(status)) {
696 break;
697 }
698 }
699 ures_close(mz);
700 if (U_FAILURE(status)) {
701 if (mzMappings != NULL) {
702 delete mzMappings;
703 mzMappings = NULL;
704 }
705 }
706 }
707 }
708 ures_close(rb);
709 return mzMappings;
710 }
712 UnicodeString& U_EXPORT2
713 ZoneMeta::getZoneIdByMetazone(const UnicodeString &mzid, const UnicodeString ®ion, UnicodeString &result) {
714 UErrorCode status = U_ZERO_ERROR;
715 const UChar *tzid = NULL;
716 int32_t tzidLen = 0;
717 char keyBuf[ZID_KEY_MAX + 1];
718 int32_t keyLen = 0;
720 if (mzid.length() > ZID_KEY_MAX) {
721 result.setToBogus();
722 return result;
723 }
725 keyLen = mzid.extract(0, mzid.length(), keyBuf, ZID_KEY_MAX + 1, US_INV);
726 keyBuf[keyLen] = 0;
728 UResourceBundle *rb = ures_openDirect(NULL, gMetaZones, &status);
729 ures_getByKey(rb, gMapTimezonesTag, rb, &status);
730 ures_getByKey(rb, keyBuf, rb, &status);
732 if (U_SUCCESS(status)) {
733 // check region mapping
734 if (region.length() == 2 || region.length() == 3) {
735 keyLen = region.extract(0, region.length(), keyBuf, ZID_KEY_MAX + 1, US_INV);
736 keyBuf[keyLen] = 0;
737 tzid = ures_getStringByKey(rb, keyBuf, &tzidLen, &status);
738 if (status == U_MISSING_RESOURCE_ERROR) {
739 status = U_ZERO_ERROR;
740 }
741 }
742 if (U_SUCCESS(status) && tzid == NULL) {
743 // try "001"
744 tzid = ures_getStringByKey(rb, gWorldTag, &tzidLen, &status);
745 }
746 }
747 ures_close(rb);
749 if (tzid == NULL) {
750 result.setToBogus();
751 } else {
752 result.setTo(tzid, tzidLen);
753 }
755 return result;
756 }
758 static void U_CALLCONV initAvailableMetaZoneIDs () {
759 U_ASSERT(gMetaZoneIDs == NULL);
760 U_ASSERT(gMetaZoneIDTable == NULL);
761 ucln_i18n_registerCleanup(UCLN_I18N_ZONEMETA, zoneMeta_cleanup);
763 UErrorCode status = U_ZERO_ERROR;
764 gMetaZoneIDTable = uhash_open(uhash_hashUnicodeString, uhash_compareUnicodeString, NULL, &status);
765 if (U_FAILURE(status) || gMetaZoneIDTable == NULL) {
766 gMetaZoneIDTable = NULL;
767 return;
768 }
769 uhash_setKeyDeleter(gMetaZoneIDTable, uprv_deleteUObject);
770 // No valueDeleter, because the vector maintain the value objects
771 gMetaZoneIDs = new UVector(NULL, uhash_compareUChars, status);
772 if (U_FAILURE(status) || gMetaZoneIDs == NULL) {
773 gMetaZoneIDs = NULL;
774 uhash_close(gMetaZoneIDTable);
775 gMetaZoneIDTable = NULL;
776 return;
777 }
778 gMetaZoneIDs->setDeleter(uprv_free);
780 UResourceBundle *rb = ures_openDirect(NULL, gMetaZones, &status);
781 UResourceBundle *bundle = ures_getByKey(rb, gMapTimezonesTag, NULL, &status);
782 UResourceBundle res;
783 ures_initStackObject(&res);
784 while (U_SUCCESS(status) && ures_hasNext(bundle)) {
785 ures_getNextResource(bundle, &res, &status);
786 if (U_FAILURE(status)) {
787 break;
788 }
789 const char *mzID = ures_getKey(&res);
790 int32_t len = uprv_strlen(mzID);
791 UChar *uMzID = (UChar*)uprv_malloc(sizeof(UChar) * (len + 1));
792 if (uMzID == NULL) {
793 status = U_MEMORY_ALLOCATION_ERROR;
794 break;
795 }
796 u_charsToUChars(mzID, uMzID, len);
797 uMzID[len] = 0;
798 UnicodeString *usMzID = new UnicodeString(uMzID);
799 if (uhash_get(gMetaZoneIDTable, usMzID) == NULL) {
800 gMetaZoneIDs->addElement((void *)uMzID, status);
801 uhash_put(gMetaZoneIDTable, (void *)usMzID, (void *)uMzID, &status);
802 } else {
803 uprv_free(uMzID);
804 delete usMzID;
805 }
806 }
807 ures_close(&res);
808 ures_close(bundle);
809 ures_close(rb);
811 if (U_FAILURE(status)) {
812 uhash_close(gMetaZoneIDTable);
813 delete gMetaZoneIDs;
814 gMetaZoneIDTable = NULL;
815 gMetaZoneIDs = NULL;
816 }
817 }
819 const UVector*
820 ZoneMeta::getAvailableMetazoneIDs() {
821 umtx_initOnce(gMetaZoneIDsInitOnce, &initAvailableMetaZoneIDs);
822 return gMetaZoneIDs;
823 }
825 const UChar*
826 ZoneMeta::findMetaZoneID(const UnicodeString& mzid) {
827 umtx_initOnce(gMetaZoneIDsInitOnce, &initAvailableMetaZoneIDs);
828 if (gMetaZoneIDTable == NULL) {
829 return NULL;
830 }
831 return (const UChar*)uhash_get(gMetaZoneIDTable, &mzid);
832 }
834 const UChar*
835 ZoneMeta::findTimeZoneID(const UnicodeString& tzid) {
836 return TimeZone::findID(tzid);
837 }
840 TimeZone*
841 ZoneMeta::createCustomTimeZone(int32_t offset) {
842 UBool negative = FALSE;
843 int32_t tmp = offset;
844 if (offset < 0) {
845 negative = TRUE;
846 tmp = -offset;
847 }
848 int32_t hour, min, sec;
850 tmp /= 1000;
851 sec = tmp % 60;
852 tmp /= 60;
853 min = tmp % 60;
854 hour = tmp / 60;
856 UnicodeString zid;
857 formatCustomID(hour, min, sec, negative, zid);
858 return new SimpleTimeZone(offset, zid);
859 }
861 UnicodeString&
862 ZoneMeta::formatCustomID(uint8_t hour, uint8_t min, uint8_t sec, UBool negative, UnicodeString& id) {
863 // Create normalized time zone ID - GMT[+|-]HH:mm[:ss]
864 id.setTo(gCustomTzPrefix, -1);
865 if (hour != 0 || min != 0) {
866 if (negative) {
867 id.append((UChar)0x2D); // '-'
868 } else {
869 id.append((UChar)0x2B); // '+'
870 }
871 // Always use US-ASCII digits
872 id.append((UChar)(0x30 + (hour%100)/10));
873 id.append((UChar)(0x30 + (hour%10)));
874 id.append((UChar)0x3A); // ':'
875 id.append((UChar)(0x30 + (min%100)/10));
876 id.append((UChar)(0x30 + (min%10)));
877 if (sec != 0) {
878 id.append((UChar)0x3A); // ':'
879 id.append((UChar)(0x30 + (sec%100)/10));
880 id.append((UChar)(0x30 + (sec%10)));
881 }
882 }
883 return id;
884 }
886 const UChar*
887 ZoneMeta::getShortID(const TimeZone& tz) {
888 const UChar* canonicalID = NULL;
889 if (dynamic_cast<const OlsonTimeZone *>(&tz) != NULL) {
890 // short cut for OlsonTimeZone
891 const OlsonTimeZone *otz = (const OlsonTimeZone*)&tz;
892 canonicalID = otz->getCanonicalID();
893 }
894 if (canonicalID == NULL) {
895 return NULL;
896 }
897 return getShortIDFromCanonical(canonicalID);
898 }
900 const UChar*
901 ZoneMeta::getShortID(const UnicodeString& id) {
902 UErrorCode status = U_ZERO_ERROR;
903 const UChar* canonicalID = ZoneMeta::getCanonicalCLDRID(id, status);
904 if (U_FAILURE(status) || canonicalID == NULL) {
905 return NULL;
906 }
907 return ZoneMeta::getShortIDFromCanonical(canonicalID);
908 }
910 const UChar*
911 ZoneMeta::getShortIDFromCanonical(const UChar* canonicalID) {
912 const UChar* shortID = NULL;
913 int32_t len = u_strlen(canonicalID);
914 char tzidKey[ZID_KEY_MAX + 1];
916 u_UCharsToChars(canonicalID, tzidKey, len);
917 tzidKey[len] = (char) 0; // Make sure it is null terminated.
919 // replace '/' with ':'
920 char *p = tzidKey;
921 while (*p++) {
922 if (*p == '/') {
923 *p = ':';
924 }
925 }
927 UErrorCode status = U_ZERO_ERROR;
928 UResourceBundle *rb = ures_openDirect(NULL, gKeyTypeData, &status);
929 ures_getByKey(rb, gTypeMapTag, rb, &status);
930 ures_getByKey(rb, gTimezoneTag, rb, &status);
931 shortID = ures_getStringByKey(rb, tzidKey, NULL, &status);
932 ures_close(rb);
934 return shortID;
935 }
937 U_NAMESPACE_END
939 #endif /* #if !UCONFIG_NO_FORMATTING */