Home | History | Annotate | Download | only in i18n 
      1 //  2016 and later: Unicode, Inc. and others.
      2 // License & terms of use: http://www.unicode.org/copyright.html
      3 /*
      4  ******************************************************************************
      5  * Copyright (C) 2013, International Business Machines Corporation
      6  * and others. All Rights Reserved.
      7  ******************************************************************************
      8  *
      9  * File DANGICAL.CPP
     10  *****************************************************************************
     11  */
     12 
     13 #include "chnsecal.h"
     14 #include "dangical.h"
     15 
     16 #if !UCONFIG_NO_FORMATTING
     17 
     18 #include "gregoimp.h" // Math
     19 #include "uassert.h"
     20 #include "ucln_in.h"
     21 #include "umutex.h"
     22 #include "unicode/rbtz.h"
     23 #include "unicode/tzrule.h"
     24 
     25 // --- The cache --
     26 static icu::TimeZone *gDangiCalendarZoneAstroCalc = NULL;
     27 static icu::UInitOnce gDangiCalendarInitOnce = U_INITONCE_INITIALIZER;
     28 
     29 /**
     30  * The start year of the Korean traditional calendar (Dan-gi) is the inaugural
     31  * year of Dan-gun (BC 2333).
     32  */
     33 static const int32_t DANGI_EPOCH_YEAR = -2332; // Gregorian year
     34 
     35 U_CDECL_BEGIN
     36 static UBool calendar_dangi_cleanup(void) {
     37     if (gDangiCalendarZoneAstroCalc) {
     38         delete gDangiCalendarZoneAstroCalc;
     39         gDangiCalendarZoneAstroCalc = NULL;
     40     }
     41     gDangiCalendarInitOnce.reset();
     42     return TRUE;
     43 }
     44 U_CDECL_END
     45 
     46 U_NAMESPACE_BEGIN
     47 
     48 // Implementation of the DangiCalendar class
     49 
     50 //-------------------------------------------------------------------------
     51 // Constructors...
     52 //-------------------------------------------------------------------------
     53 
     54 DangiCalendar::DangiCalendar(const Locale& aLocale, UErrorCode& success)
     55 :   ChineseCalendar(aLocale, DANGI_EPOCH_YEAR, getDangiCalZoneAstroCalc(), success)
     56 {
     57 }
     58 
     59 DangiCalendar::DangiCalendar (const DangiCalendar& other)
     60 : ChineseCalendar(other)
     61 {
     62 }
     63 
     64 DangiCalendar::~DangiCalendar()
     65 {
     66 }
     67 
     68 Calendar*
     69 DangiCalendar::clone() const
     70 {
     71     return new DangiCalendar(*this);
     72 }
     73 
     74 const char *DangiCalendar::getType() const {
     75     return "dangi";
     76 }
     77 
     78 /**
     79  * The time zone used for performing astronomical computations for
     80  * Dangi calendar. In Korea various timezones have been used historically
     81  * (cf. http://www.math.snu.ac.kr/~kye/others/lunar.html):
     82  *
     83  *            - 1908/04/01: GMT+8
     84  * 1908/04/01 - 1911/12/31: GMT+8.5
     85  * 1912/01/01 - 1954/03/20: GMT+9
     86  * 1954/03/21 - 1961/08/09: GMT+8.5
     87  * 1961/08/10 -           : GMT+9
     88  *
     89  * Note that, in 1908-1911, the government did not apply the timezone change
     90  * but used GMT+8. In addition, 1954-1961's timezone change does not affect
     91  * the lunar date calculation. Therefore, the following simpler rule works:
     92  *
     93  * -1911: GMT+8
     94  * 1912-: GMT+9
     95  *
     96  * Unfortunately, our astronomer's approximation doesn't agree with the
     97  * references (http://www.math.snu.ac.kr/~kye/others/lunar.html and
     98  * http://astro.kasi.re.kr/Life/ConvertSolarLunarForm.aspx?MenuID=115)
     99  * in 1897/7/30. So the following ad hoc fix is used here:
    100  *
    101  *     -1896: GMT+8
    102  *      1897: GMT+7
    103  * 1898-1911: GMT+8
    104  * 1912-    : GMT+9
    105  */
    106 static void U_CALLCONV initDangiCalZoneAstroCalc(void) {
    107     U_ASSERT(gDangiCalendarZoneAstroCalc == NULL);
    108     const UDate millis1897[] = { (UDate)((1897 - 1970) * 365 * kOneDay) }; // some days of error is not a problem here
    109     const UDate millis1898[] = { (UDate)((1898 - 1970) * 365 * kOneDay) }; // some days of error is not a problem here
    110     const UDate millis1912[] = { (UDate)((1912 - 1970) * 365 * kOneDay) }; // this doesn't create an issue for 1911/12/20
    111     InitialTimeZoneRule* initialTimeZone = new InitialTimeZoneRule(UNICODE_STRING_SIMPLE("GMT+8"), 8*kOneHour, 0);
    112     TimeZoneRule* rule1897 = new TimeArrayTimeZoneRule(UNICODE_STRING_SIMPLE("Korean 1897"), 7*kOneHour, 0, millis1897, 1, DateTimeRule::STANDARD_TIME);
    113     TimeZoneRule* rule1898to1911 = new TimeArrayTimeZoneRule(UNICODE_STRING_SIMPLE("Korean 1898-1911"), 8*kOneHour, 0, millis1898, 1, DateTimeRule::STANDARD_TIME);
    114     TimeZoneRule* ruleFrom1912 = new TimeArrayTimeZoneRule(UNICODE_STRING_SIMPLE("Korean 1912-"), 9*kOneHour, 0, millis1912, 1, DateTimeRule::STANDARD_TIME);
    115     UErrorCode status = U_ZERO_ERROR;
    116     RuleBasedTimeZone* dangiCalZoneAstroCalc = new RuleBasedTimeZone(UNICODE_STRING_SIMPLE("KOREA_ZONE"), initialTimeZone); // adopts initialTimeZone
    117     dangiCalZoneAstroCalc->addTransitionRule(rule1897, status); // adopts rule1897
    118     dangiCalZoneAstroCalc->addTransitionRule(rule1898to1911, status);
    119     dangiCalZoneAstroCalc->addTransitionRule(ruleFrom1912, status);
    120     dangiCalZoneAstroCalc->complete(status);
    121     if (U_SUCCESS(status)) {
    122         gDangiCalendarZoneAstroCalc = dangiCalZoneAstroCalc;
    123     } else {
    124         delete dangiCalZoneAstroCalc;
    125         gDangiCalendarZoneAstroCalc = NULL;
    126     }
    127     ucln_i18n_registerCleanup(UCLN_I18N_DANGI_CALENDAR, calendar_dangi_cleanup);
    128 }
    129 
    130 const TimeZone* DangiCalendar::getDangiCalZoneAstroCalc(void) const {
    131     umtx_initOnce(gDangiCalendarInitOnce, &initDangiCalZoneAstroCalc);
    132     return gDangiCalendarZoneAstroCalc;
    133 }
    134 
    135 
    136 UOBJECT_DEFINE_RTTI_IMPLEMENTATION(DangiCalendar)
    137 
    138 U_NAMESPACE_END
    139 
    140 #endif
    141 
    142