2634 lines
88 KiB
C++
2634 lines
88 KiB
C++
// © 2016 and later: Unicode, Inc. and others.
|
|
// License & terms of use: http://www.unicode.org/copyright.html
|
|
/*
|
|
*******************************************************************************
|
|
* Copyright (C) 2007-2016, International Business Machines Corporation and
|
|
* others. All Rights Reserved.
|
|
*******************************************************************************
|
|
*/
|
|
|
|
#include "utypeinfo.h" // for 'typeid' to work
|
|
|
|
#include "unicode/utypes.h"
|
|
|
|
#if !UCONFIG_NO_FORMATTING
|
|
|
|
#include "unicode/vtzone.h"
|
|
#include "unicode/rbtz.h"
|
|
#include "unicode/ucal.h"
|
|
#include "unicode/ures.h"
|
|
#include "cmemory.h"
|
|
#include "uvector.h"
|
|
#include "gregoimp.h"
|
|
#include "uassert.h"
|
|
|
|
U_NAMESPACE_BEGIN
|
|
|
|
// This is the deleter that will be use to remove TimeZoneRule
|
|
U_CDECL_BEGIN
|
|
static void U_CALLCONV
|
|
deleteTimeZoneRule(void* obj) {
|
|
delete (TimeZoneRule*) obj;
|
|
}
|
|
U_CDECL_END
|
|
|
|
// Smybol characters used by RFC2445 VTIMEZONE
|
|
static const UChar COLON = 0x3A; /* : */
|
|
static const UChar SEMICOLON = 0x3B; /* ; */
|
|
static const UChar EQUALS_SIGN = 0x3D; /* = */
|
|
static const UChar COMMA = 0x2C; /* , */
|
|
static const UChar PLUS = 0x2B; /* + */
|
|
static const UChar MINUS = 0x2D; /* - */
|
|
|
|
// RFC2445 VTIMEZONE tokens
|
|
static const UChar ICAL_BEGIN_VTIMEZONE[] = {0x42, 0x45, 0x47, 0x49, 0x4E, 0x3A, 0x56, 0x54, 0x49, 0x4D, 0x45, 0x5A, 0x4F, 0x4E, 0x45, 0}; /* "BEGIN:VTIMEZONE" */
|
|
static const UChar ICAL_END_VTIMEZONE[] = {0x45, 0x4E, 0x44, 0x3A, 0x56, 0x54, 0x49, 0x4D, 0x45, 0x5A, 0x4F, 0x4E, 0x45, 0}; /* "END:VTIMEZONE" */
|
|
static const UChar ICAL_BEGIN[] = {0x42, 0x45, 0x47, 0x49, 0x4E, 0}; /* "BEGIN" */
|
|
static const UChar ICAL_END[] = {0x45, 0x4E, 0x44, 0}; /* "END" */
|
|
static const UChar ICAL_VTIMEZONE[] = {0x56, 0x54, 0x49, 0x4D, 0x45, 0x5A, 0x4F, 0x4E, 0x45, 0}; /* "VTIMEZONE" */
|
|
static const UChar ICAL_TZID[] = {0x54, 0x5A, 0x49, 0x44, 0}; /* "TZID" */
|
|
static const UChar ICAL_STANDARD[] = {0x53, 0x54, 0x41, 0x4E, 0x44, 0x41, 0x52, 0x44, 0}; /* "STANDARD" */
|
|
static const UChar ICAL_DAYLIGHT[] = {0x44, 0x41, 0x59, 0x4C, 0x49, 0x47, 0x48, 0x54, 0}; /* "DAYLIGHT" */
|
|
static const UChar ICAL_DTSTART[] = {0x44, 0x54, 0x53, 0x54, 0x41, 0x52, 0x54, 0}; /* "DTSTART" */
|
|
static const UChar ICAL_TZOFFSETFROM[] = {0x54, 0x5A, 0x4F, 0x46, 0x46, 0x53, 0x45, 0x54, 0x46, 0x52, 0x4F, 0x4D, 0}; /* "TZOFFSETFROM" */
|
|
static const UChar ICAL_TZOFFSETTO[] = {0x54, 0x5A, 0x4F, 0x46, 0x46, 0x53, 0x45, 0x54, 0x54, 0x4F, 0}; /* "TZOFFSETTO" */
|
|
static const UChar ICAL_RDATE[] = {0x52, 0x44, 0x41, 0x54, 0x45, 0}; /* "RDATE" */
|
|
static const UChar ICAL_RRULE[] = {0x52, 0x52, 0x55, 0x4C, 0x45, 0}; /* "RRULE" */
|
|
static const UChar ICAL_TZNAME[] = {0x54, 0x5A, 0x4E, 0x41, 0x4D, 0x45, 0}; /* "TZNAME" */
|
|
static const UChar ICAL_TZURL[] = {0x54, 0x5A, 0x55, 0x52, 0x4C, 0}; /* "TZURL" */
|
|
static const UChar ICAL_LASTMOD[] = {0x4C, 0x41, 0x53, 0x54, 0x2D, 0x4D, 0x4F, 0x44, 0x49, 0x46, 0x49, 0x45, 0x44, 0}; /* "LAST-MODIFIED" */
|
|
|
|
static const UChar ICAL_FREQ[] = {0x46, 0x52, 0x45, 0x51, 0}; /* "FREQ" */
|
|
static const UChar ICAL_UNTIL[] = {0x55, 0x4E, 0x54, 0x49, 0x4C, 0}; /* "UNTIL" */
|
|
static const UChar ICAL_YEARLY[] = {0x59, 0x45, 0x41, 0x52, 0x4C, 0x59, 0}; /* "YEARLY" */
|
|
static const UChar ICAL_BYMONTH[] = {0x42, 0x59, 0x4D, 0x4F, 0x4E, 0x54, 0x48, 0}; /* "BYMONTH" */
|
|
static const UChar ICAL_BYDAY[] = {0x42, 0x59, 0x44, 0x41, 0x59, 0}; /* "BYDAY" */
|
|
static const UChar ICAL_BYMONTHDAY[] = {0x42, 0x59, 0x4D, 0x4F, 0x4E, 0x54, 0x48, 0x44, 0x41, 0x59, 0}; /* "BYMONTHDAY" */
|
|
|
|
static const UChar ICAL_NEWLINE[] = {0x0D, 0x0A, 0}; /* CRLF */
|
|
|
|
static const UChar ICAL_DOW_NAMES[7][3] = {
|
|
{0x53, 0x55, 0}, /* "SU" */
|
|
{0x4D, 0x4F, 0}, /* "MO" */
|
|
{0x54, 0x55, 0}, /* "TU" */
|
|
{0x57, 0x45, 0}, /* "WE" */
|
|
{0x54, 0x48, 0}, /* "TH" */
|
|
{0x46, 0x52, 0}, /* "FR" */
|
|
{0x53, 0x41, 0} /* "SA" */};
|
|
|
|
// Month length for non-leap year
|
|
static const int32_t MONTHLENGTH[] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
|
|
|
|
// ICU custom property
|
|
static const UChar ICU_TZINFO_PROP[] = {0x58, 0x2D, 0x54, 0x5A, 0x49, 0x4E, 0x46, 0x4F, 0x3A, 0}; /* "X-TZINFO:" */
|
|
static const UChar ICU_TZINFO_PARTIAL[] = {0x2F, 0x50, 0x61, 0x72, 0x74, 0x69, 0x61, 0x6C, 0x40, 0}; /* "/Partial@" */
|
|
static const UChar ICU_TZINFO_SIMPLE[] = {0x2F, 0x53, 0x69, 0x6D, 0x70, 0x6C, 0x65, 0x40, 0}; /* "/Simple@" */
|
|
|
|
|
|
/*
|
|
* Simple fixed digit ASCII number to integer converter
|
|
*/
|
|
static int32_t parseAsciiDigits(const UnicodeString& str, int32_t start, int32_t length, UErrorCode& status) {
|
|
if (U_FAILURE(status)) {
|
|
return 0;
|
|
}
|
|
if (length <= 0 || str.length() < start || (start + length) > str.length()) {
|
|
status = U_INVALID_FORMAT_ERROR;
|
|
return 0;
|
|
}
|
|
int32_t sign = 1;
|
|
if (str.charAt(start) == PLUS) {
|
|
start++;
|
|
length--;
|
|
} else if (str.charAt(start) == MINUS) {
|
|
sign = -1;
|
|
start++;
|
|
length--;
|
|
}
|
|
int32_t num = 0;
|
|
for (int32_t i = 0; i < length; i++) {
|
|
int32_t digit = str.charAt(start + i) - 0x0030;
|
|
if (digit < 0 || digit > 9) {
|
|
status = U_INVALID_FORMAT_ERROR;
|
|
return 0;
|
|
}
|
|
num = 10 * num + digit;
|
|
}
|
|
return sign * num;
|
|
}
|
|
|
|
static UnicodeString& appendAsciiDigits(int32_t number, uint8_t length, UnicodeString& str) {
|
|
UBool negative = FALSE;
|
|
int32_t digits[10]; // max int32_t is 10 decimal digits
|
|
int32_t i;
|
|
|
|
if (number < 0) {
|
|
negative = TRUE;
|
|
number *= -1;
|
|
}
|
|
|
|
length = length > 10 ? 10 : length;
|
|
if (length == 0) {
|
|
// variable length
|
|
i = 0;
|
|
do {
|
|
digits[i++] = number % 10;
|
|
number /= 10;
|
|
} while (number != 0);
|
|
length = i;
|
|
} else {
|
|
// fixed digits
|
|
for (i = 0; i < length; i++) {
|
|
digits[i] = number % 10;
|
|
number /= 10;
|
|
}
|
|
}
|
|
if (negative) {
|
|
str.append(MINUS);
|
|
}
|
|
for (i = length - 1; i >= 0; i--) {
|
|
str.append((UChar)(digits[i] + 0x0030));
|
|
}
|
|
return str;
|
|
}
|
|
|
|
static UnicodeString& appendMillis(UDate date, UnicodeString& str) {
|
|
UBool negative = FALSE;
|
|
int32_t digits[20]; // max int64_t is 20 decimal digits
|
|
int32_t i;
|
|
int64_t number;
|
|
|
|
if (date < MIN_MILLIS) {
|
|
number = (int64_t)MIN_MILLIS;
|
|
} else if (date > MAX_MILLIS) {
|
|
number = (int64_t)MAX_MILLIS;
|
|
} else {
|
|
number = (int64_t)date;
|
|
}
|
|
if (number < 0) {
|
|
negative = TRUE;
|
|
number *= -1;
|
|
}
|
|
i = 0;
|
|
do {
|
|
digits[i++] = (int32_t)(number % 10);
|
|
number /= 10;
|
|
} while (number != 0);
|
|
|
|
if (negative) {
|
|
str.append(MINUS);
|
|
}
|
|
i--;
|
|
while (i >= 0) {
|
|
str.append((UChar)(digits[i--] + 0x0030));
|
|
}
|
|
return str;
|
|
}
|
|
|
|
/*
|
|
* Convert date/time to RFC2445 Date-Time form #1 DATE WITH LOCAL TIME
|
|
*/
|
|
static UnicodeString& getDateTimeString(UDate time, UnicodeString& str) {
|
|
int32_t year, month, dom, dow, doy, mid;
|
|
Grego::timeToFields(time, year, month, dom, dow, doy, mid);
|
|
|
|
str.remove();
|
|
appendAsciiDigits(year, 4, str);
|
|
appendAsciiDigits(month + 1, 2, str);
|
|
appendAsciiDigits(dom, 2, str);
|
|
str.append((UChar)0x0054 /*'T'*/);
|
|
|
|
int32_t t = mid;
|
|
int32_t hour = t / U_MILLIS_PER_HOUR;
|
|
t %= U_MILLIS_PER_HOUR;
|
|
int32_t min = t / U_MILLIS_PER_MINUTE;
|
|
t %= U_MILLIS_PER_MINUTE;
|
|
int32_t sec = t / U_MILLIS_PER_SECOND;
|
|
|
|
appendAsciiDigits(hour, 2, str);
|
|
appendAsciiDigits(min, 2, str);
|
|
appendAsciiDigits(sec, 2, str);
|
|
return str;
|
|
}
|
|
|
|
/*
|
|
* Convert date/time to RFC2445 Date-Time form #2 DATE WITH UTC TIME
|
|
*/
|
|
static UnicodeString& getUTCDateTimeString(UDate time, UnicodeString& str) {
|
|
getDateTimeString(time, str);
|
|
str.append((UChar)0x005A /*'Z'*/);
|
|
return str;
|
|
}
|
|
|
|
/*
|
|
* Parse RFC2445 Date-Time form #1 DATE WITH LOCAL TIME and
|
|
* #2 DATE WITH UTC TIME
|
|
*/
|
|
static UDate parseDateTimeString(const UnicodeString& str, int32_t offset, UErrorCode& status) {
|
|
if (U_FAILURE(status)) {
|
|
return 0.0;
|
|
}
|
|
|
|
int32_t year = 0, month = 0, day = 0, hour = 0, min = 0, sec = 0;
|
|
UBool isUTC = FALSE;
|
|
UBool isValid = FALSE;
|
|
do {
|
|
int length = str.length();
|
|
if (length != 15 && length != 16) {
|
|
// FORM#1 15 characters, such as "20060317T142115"
|
|
// FORM#2 16 characters, such as "20060317T142115Z"
|
|
break;
|
|
}
|
|
if (str.charAt(8) != 0x0054) {
|
|
// charcter "T" must be used for separating date and time
|
|
break;
|
|
}
|
|
if (length == 16) {
|
|
if (str.charAt(15) != 0x005A) {
|
|
// invalid format
|
|
break;
|
|
}
|
|
isUTC = TRUE;
|
|
}
|
|
|
|
year = parseAsciiDigits(str, 0, 4, status);
|
|
month = parseAsciiDigits(str, 4, 2, status) - 1; // 0-based
|
|
day = parseAsciiDigits(str, 6, 2, status);
|
|
hour = parseAsciiDigits(str, 9, 2, status);
|
|
min = parseAsciiDigits(str, 11, 2, status);
|
|
sec = parseAsciiDigits(str, 13, 2, status);
|
|
|
|
if (U_FAILURE(status)) {
|
|
break;
|
|
}
|
|
|
|
// check valid range
|
|
int32_t maxDayOfMonth = Grego::monthLength(year, month);
|
|
if (year < 0 || month < 0 || month > 11 || day < 1 || day > maxDayOfMonth ||
|
|
hour < 0 || hour >= 24 || min < 0 || min >= 60 || sec < 0 || sec >= 60) {
|
|
break;
|
|
}
|
|
|
|
isValid = TRUE;
|
|
} while(false);
|
|
|
|
if (!isValid) {
|
|
status = U_INVALID_FORMAT_ERROR;
|
|
return 0.0;
|
|
}
|
|
// Calculate the time
|
|
UDate time = Grego::fieldsToDay(year, month, day) * U_MILLIS_PER_DAY;
|
|
time += (hour * U_MILLIS_PER_HOUR + min * U_MILLIS_PER_MINUTE + sec * U_MILLIS_PER_SECOND);
|
|
if (!isUTC) {
|
|
time -= offset;
|
|
}
|
|
return time;
|
|
}
|
|
|
|
/*
|
|
* Convert RFC2445 utc-offset string to milliseconds
|
|
*/
|
|
static int32_t offsetStrToMillis(const UnicodeString& str, UErrorCode& status) {
|
|
if (U_FAILURE(status)) {
|
|
return 0;
|
|
}
|
|
|
|
UBool isValid = FALSE;
|
|
int32_t sign = 0, hour = 0, min = 0, sec = 0;
|
|
|
|
do {
|
|
int length = str.length();
|
|
if (length != 5 && length != 7) {
|
|
// utf-offset must be 5 or 7 characters
|
|
break;
|
|
}
|
|
// sign
|
|
UChar s = str.charAt(0);
|
|
if (s == PLUS) {
|
|
sign = 1;
|
|
} else if (s == MINUS) {
|
|
sign = -1;
|
|
} else {
|
|
// utf-offset must start with "+" or "-"
|
|
break;
|
|
}
|
|
hour = parseAsciiDigits(str, 1, 2, status);
|
|
min = parseAsciiDigits(str, 3, 2, status);
|
|
if (length == 7) {
|
|
sec = parseAsciiDigits(str, 5, 2, status);
|
|
}
|
|
if (U_FAILURE(status)) {
|
|
break;
|
|
}
|
|
isValid = true;
|
|
} while(false);
|
|
|
|
if (!isValid) {
|
|
status = U_INVALID_FORMAT_ERROR;
|
|
return 0;
|
|
}
|
|
int32_t millis = sign * ((hour * 60 + min) * 60 + sec) * 1000;
|
|
return millis;
|
|
}
|
|
|
|
/*
|
|
* Convert milliseconds to RFC2445 utc-offset string
|
|
*/
|
|
static void millisToOffset(int32_t millis, UnicodeString& str) {
|
|
str.remove();
|
|
if (millis >= 0) {
|
|
str.append(PLUS);
|
|
} else {
|
|
str.append(MINUS);
|
|
millis = -millis;
|
|
}
|
|
int32_t hour, min, sec;
|
|
int32_t t = millis / 1000;
|
|
|
|
sec = t % 60;
|
|
t = (t - sec) / 60;
|
|
min = t % 60;
|
|
hour = t / 60;
|
|
|
|
appendAsciiDigits(hour, 2, str);
|
|
appendAsciiDigits(min, 2, str);
|
|
appendAsciiDigits(sec, 2, str);
|
|
}
|
|
|
|
/*
|
|
* Create a default TZNAME from TZID
|
|
*/
|
|
static void getDefaultTZName(const UnicodeString &tzid, UBool isDST, UnicodeString& zonename) {
|
|
zonename = tzid;
|
|
if (isDST) {
|
|
zonename += UNICODE_STRING_SIMPLE("(DST)");
|
|
} else {
|
|
zonename += UNICODE_STRING_SIMPLE("(STD)");
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Parse individual RRULE
|
|
*
|
|
* On return -
|
|
*
|
|
* month calculated by BYMONTH-1, or -1 when not found
|
|
* dow day of week in BYDAY, or 0 when not found
|
|
* wim day of week ordinal number in BYDAY, or 0 when not found
|
|
* dom an array of day of month
|
|
* domCount number of availble days in dom (domCount is specifying the size of dom on input)
|
|
* until time defined by UNTIL attribute or MIN_MILLIS if not available
|
|
*/
|
|
static void parseRRULE(const UnicodeString& rrule, int32_t& month, int32_t& dow, int32_t& wim,
|
|
int32_t* dom, int32_t& domCount, UDate& until, UErrorCode& status) {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
int32_t numDom = 0;
|
|
|
|
month = -1;
|
|
dow = 0;
|
|
wim = 0;
|
|
until = MIN_MILLIS;
|
|
|
|
UBool yearly = FALSE;
|
|
//UBool parseError = FALSE;
|
|
|
|
int32_t prop_start = 0;
|
|
int32_t prop_end;
|
|
UnicodeString prop, attr, value;
|
|
UBool nextProp = TRUE;
|
|
|
|
while (nextProp) {
|
|
prop_end = rrule.indexOf(SEMICOLON, prop_start);
|
|
if (prop_end == -1) {
|
|
prop.setTo(rrule, prop_start);
|
|
nextProp = FALSE;
|
|
} else {
|
|
prop.setTo(rrule, prop_start, prop_end - prop_start);
|
|
prop_start = prop_end + 1;
|
|
}
|
|
int32_t eql = prop.indexOf(EQUALS_SIGN);
|
|
if (eql != -1) {
|
|
attr.setTo(prop, 0, eql);
|
|
value.setTo(prop, eql + 1);
|
|
} else {
|
|
goto rruleParseError;
|
|
}
|
|
|
|
if (attr.compare(ICAL_FREQ, -1) == 0) {
|
|
// only support YEARLY frequency type
|
|
if (value.compare(ICAL_YEARLY, -1) == 0) {
|
|
yearly = TRUE;
|
|
} else {
|
|
goto rruleParseError;
|
|
}
|
|
} else if (attr.compare(ICAL_UNTIL, -1) == 0) {
|
|
// ISO8601 UTC format, for example, "20060315T020000Z"
|
|
until = parseDateTimeString(value, 0, status);
|
|
if (U_FAILURE(status)) {
|
|
goto rruleParseError;
|
|
}
|
|
} else if (attr.compare(ICAL_BYMONTH, -1) == 0) {
|
|
// Note: BYMONTH may contain multiple months, but only single month make sense for
|
|
// VTIMEZONE property.
|
|
if (value.length() > 2) {
|
|
goto rruleParseError;
|
|
}
|
|
month = parseAsciiDigits(value, 0, value.length(), status) - 1;
|
|
if (U_FAILURE(status) || month < 0 || month >= 12) {
|
|
goto rruleParseError;
|
|
}
|
|
} else if (attr.compare(ICAL_BYDAY, -1) == 0) {
|
|
// Note: BYDAY may contain multiple day of week separated by comma. It is unlikely used for
|
|
// VTIMEZONE property. We do not support the case.
|
|
|
|
// 2-letter format is used just for representing a day of week, for example, "SU" for Sunday
|
|
// 3 or 4-letter format is used for represeinging Nth day of week, for example, "-1SA" for last Saturday
|
|
int32_t length = value.length();
|
|
if (length < 2 || length > 4) {
|
|
goto rruleParseError;
|
|
}
|
|
if (length > 2) {
|
|
// Nth day of week
|
|
int32_t sign = 1;
|
|
if (value.charAt(0) == PLUS) {
|
|
sign = 1;
|
|
} else if (value.charAt(0) == MINUS) {
|
|
sign = -1;
|
|
} else if (length == 4) {
|
|
goto rruleParseError;
|
|
}
|
|
int32_t n = parseAsciiDigits(value, length - 3, 1, status);
|
|
if (U_FAILURE(status) || n == 0 || n > 4) {
|
|
goto rruleParseError;
|
|
}
|
|
wim = n * sign;
|
|
value.remove(0, length - 2);
|
|
}
|
|
int32_t wday;
|
|
for (wday = 0; wday < 7; wday++) {
|
|
if (value.compare(ICAL_DOW_NAMES[wday], 2) == 0) {
|
|
break;
|
|
}
|
|
}
|
|
if (wday < 7) {
|
|
// Sunday(1) - Saturday(7)
|
|
dow = wday + 1;
|
|
} else {
|
|
goto rruleParseError;
|
|
}
|
|
} else if (attr.compare(ICAL_BYMONTHDAY, -1) == 0) {
|
|
// Note: BYMONTHDAY may contain multiple days delimitted by comma
|
|
//
|
|
// A value of BYMONTHDAY could be negative, for example, -1 means
|
|
// the last day in a month
|
|
int32_t dom_idx = 0;
|
|
int32_t dom_start = 0;
|
|
int32_t dom_end;
|
|
UBool nextDOM = TRUE;
|
|
while (nextDOM) {
|
|
dom_end = value.indexOf(COMMA, dom_start);
|
|
if (dom_end == -1) {
|
|
dom_end = value.length();
|
|
nextDOM = FALSE;
|
|
}
|
|
if (dom_idx < domCount) {
|
|
dom[dom_idx] = parseAsciiDigits(value, dom_start, dom_end - dom_start, status);
|
|
if (U_FAILURE(status)) {
|
|
goto rruleParseError;
|
|
}
|
|
dom_idx++;
|
|
} else {
|
|
status = U_BUFFER_OVERFLOW_ERROR;
|
|
goto rruleParseError;
|
|
}
|
|
dom_start = dom_end + 1;
|
|
}
|
|
numDom = dom_idx;
|
|
}
|
|
}
|
|
if (!yearly) {
|
|
// FREQ=YEARLY must be set
|
|
goto rruleParseError;
|
|
}
|
|
// Set actual number of parsed DOM (ICAL_BYMONTHDAY)
|
|
domCount = numDom;
|
|
return;
|
|
|
|
rruleParseError:
|
|
if (U_SUCCESS(status)) {
|
|
// Set error status
|
|
status = U_INVALID_FORMAT_ERROR;
|
|
}
|
|
}
|
|
|
|
static TimeZoneRule* createRuleByRRULE(const UnicodeString& zonename, int rawOffset, int dstSavings, UDate start,
|
|
UVector* dates, int fromOffset, UErrorCode& status) {
|
|
if (U_FAILURE(status)) {
|
|
return NULL;
|
|
}
|
|
if (dates == NULL || dates->size() == 0) {
|
|
status = U_ILLEGAL_ARGUMENT_ERROR;
|
|
return NULL;
|
|
}
|
|
|
|
int32_t i, j;
|
|
DateTimeRule *adtr = NULL;
|
|
|
|
// Parse the first rule
|
|
UnicodeString rrule = *((UnicodeString*)dates->elementAt(0));
|
|
int32_t month, dayOfWeek, nthDayOfWeek, dayOfMonth = 0;
|
|
int32_t days[7];
|
|
int32_t daysCount = UPRV_LENGTHOF(days);
|
|
UDate until;
|
|
|
|
parseRRULE(rrule, month, dayOfWeek, nthDayOfWeek, days, daysCount, until, status);
|
|
if (U_FAILURE(status)) {
|
|
return NULL;
|
|
}
|
|
|
|
if (dates->size() == 1) {
|
|
// No more rules
|
|
if (daysCount > 1) {
|
|
// Multiple BYMONTHDAY values
|
|
if (daysCount != 7 || month == -1 || dayOfWeek == 0) {
|
|
// Only support the rule using 7 continuous days
|
|
// BYMONTH and BYDAY must be set at the same time
|
|
goto unsupportedRRule;
|
|
}
|
|
int32_t firstDay = 31; // max possible number of dates in a month
|
|
for (i = 0; i < 7; i++) {
|
|
// Resolve negative day numbers. A negative day number should
|
|
// not be used in February, but if we see such case, we use 28
|
|
// as the base.
|
|
if (days[i] < 0) {
|
|
days[i] = MONTHLENGTH[month] + days[i] + 1;
|
|
}
|
|
if (days[i] < firstDay) {
|
|
firstDay = days[i];
|
|
}
|
|
}
|
|
// Make sure days are continuous
|
|
for (i = 1; i < 7; i++) {
|
|
UBool found = FALSE;
|
|
for (j = 0; j < 7; j++) {
|
|
if (days[j] == firstDay + i) {
|
|
found = TRUE;
|
|
break;
|
|
}
|
|
}
|
|
if (!found) {
|
|
// days are not continuous
|
|
goto unsupportedRRule;
|
|
}
|
|
}
|
|
// Use DOW_GEQ_DOM rule with firstDay as the start date
|
|
dayOfMonth = firstDay;
|
|
}
|
|
} else {
|
|
// Check if BYMONTH + BYMONTHDAY + BYDAY rule with multiple RRULE lines.
|
|
// Otherwise, not supported.
|
|
if (month == -1 || dayOfWeek == 0 || daysCount == 0) {
|
|
// This is not the case
|
|
goto unsupportedRRule;
|
|
}
|
|
// Parse the rest of rules if number of rules is not exceeding 7.
|
|
// We can only support 7 continuous days starting from a day of month.
|
|
if (dates->size() > 7) {
|
|
goto unsupportedRRule;
|
|
}
|
|
|
|
// Note: To check valid date range across multiple rule is a little
|
|
// bit complicated. For now, this code is not doing strict range
|
|
// checking across month boundary
|
|
|
|
int32_t earliestMonth = month;
|
|
int32_t earliestDay = 31;
|
|
for (i = 0; i < daysCount; i++) {
|
|
int32_t dom = days[i];
|
|
dom = dom > 0 ? dom : MONTHLENGTH[month] + dom + 1;
|
|
earliestDay = dom < earliestDay ? dom : earliestDay;
|
|
}
|
|
|
|
int32_t anotherMonth = -1;
|
|
for (i = 1; i < dates->size(); i++) {
|
|
rrule = *((UnicodeString*)dates->elementAt(i));
|
|
UDate tmp_until;
|
|
int32_t tmp_month, tmp_dayOfWeek, tmp_nthDayOfWeek;
|
|
int32_t tmp_days[7];
|
|
int32_t tmp_daysCount = UPRV_LENGTHOF(tmp_days);
|
|
parseRRULE(rrule, tmp_month, tmp_dayOfWeek, tmp_nthDayOfWeek, tmp_days, tmp_daysCount, tmp_until, status);
|
|
if (U_FAILURE(status)) {
|
|
return NULL;
|
|
}
|
|
// If UNTIL is newer than previous one, use the one
|
|
if (tmp_until > until) {
|
|
until = tmp_until;
|
|
}
|
|
|
|
// Check if BYMONTH + BYMONTHDAY + BYDAY rule
|
|
if (tmp_month == -1 || tmp_dayOfWeek == 0 || tmp_daysCount == 0) {
|
|
goto unsupportedRRule;
|
|
}
|
|
// Count number of BYMONTHDAY
|
|
if (daysCount + tmp_daysCount > 7) {
|
|
// We cannot support BYMONTHDAY more than 7
|
|
goto unsupportedRRule;
|
|
}
|
|
// Check if the same BYDAY is used. Otherwise, we cannot
|
|
// support the rule
|
|
if (tmp_dayOfWeek != dayOfWeek) {
|
|
goto unsupportedRRule;
|
|
}
|
|
// Check if the month is same or right next to the primary month
|
|
if (tmp_month != month) {
|
|
if (anotherMonth == -1) {
|
|
int32_t diff = tmp_month - month;
|
|
if (diff == -11 || diff == -1) {
|
|
// Previous month
|
|
anotherMonth = tmp_month;
|
|
earliestMonth = anotherMonth;
|
|
// Reset earliest day
|
|
earliestDay = 31;
|
|
} else if (diff == 11 || diff == 1) {
|
|
// Next month
|
|
anotherMonth = tmp_month;
|
|
} else {
|
|
// The day range cannot exceed more than 2 months
|
|
goto unsupportedRRule;
|
|
}
|
|
} else if (tmp_month != month && tmp_month != anotherMonth) {
|
|
// The day range cannot exceed more than 2 months
|
|
goto unsupportedRRule;
|
|
}
|
|
}
|
|
// If ealier month, go through days to find the earliest day
|
|
if (tmp_month == earliestMonth) {
|
|
for (j = 0; j < tmp_daysCount; j++) {
|
|
tmp_days[j] = tmp_days[j] > 0 ? tmp_days[j] : MONTHLENGTH[tmp_month] + tmp_days[j] + 1;
|
|
earliestDay = tmp_days[j] < earliestDay ? tmp_days[j] : earliestDay;
|
|
}
|
|
}
|
|
daysCount += tmp_daysCount;
|
|
}
|
|
if (daysCount != 7) {
|
|
// Number of BYMONTHDAY entries must be 7
|
|
goto unsupportedRRule;
|
|
}
|
|
month = earliestMonth;
|
|
dayOfMonth = earliestDay;
|
|
}
|
|
|
|
// Calculate start/end year and missing fields
|
|
int32_t startYear, startMonth, startDOM, startDOW, startDOY, startMID;
|
|
Grego::timeToFields(start + fromOffset, startYear, startMonth, startDOM,
|
|
startDOW, startDOY, startMID);
|
|
if (month == -1) {
|
|
// If BYMONTH is not set, use the month of DTSTART
|
|
month = startMonth;
|
|
}
|
|
if (dayOfWeek == 0 && nthDayOfWeek == 0 && dayOfMonth == 0) {
|
|
// If only YEARLY is set, use the day of DTSTART as BYMONTHDAY
|
|
dayOfMonth = startDOM;
|
|
}
|
|
|
|
int32_t endYear;
|
|
if (until != MIN_MILLIS) {
|
|
int32_t endMonth, endDOM, endDOW, endDOY, endMID;
|
|
Grego::timeToFields(until, endYear, endMonth, endDOM, endDOW, endDOY, endMID);
|
|
} else {
|
|
endYear = AnnualTimeZoneRule::MAX_YEAR;
|
|
}
|
|
|
|
// Create the AnnualDateTimeRule
|
|
if (dayOfWeek == 0 && nthDayOfWeek == 0 && dayOfMonth != 0) {
|
|
// Day in month rule, for example, 15th day in the month
|
|
adtr = new DateTimeRule(month, dayOfMonth, startMID, DateTimeRule::WALL_TIME);
|
|
} else if (dayOfWeek != 0 && nthDayOfWeek != 0 && dayOfMonth == 0) {
|
|
// Nth day of week rule, for example, last Sunday
|
|
adtr = new DateTimeRule(month, nthDayOfWeek, dayOfWeek, startMID, DateTimeRule::WALL_TIME);
|
|
} else if (dayOfWeek != 0 && nthDayOfWeek == 0 && dayOfMonth != 0) {
|
|
// First day of week after day of month rule, for example,
|
|
// first Sunday after 15th day in the month
|
|
adtr = new DateTimeRule(month, dayOfMonth, dayOfWeek, TRUE, startMID, DateTimeRule::WALL_TIME);
|
|
}
|
|
if (adtr == NULL) {
|
|
goto unsupportedRRule;
|
|
}
|
|
return new AnnualTimeZoneRule(zonename, rawOffset, dstSavings, adtr, startYear, endYear);
|
|
|
|
unsupportedRRule:
|
|
status = U_INVALID_STATE_ERROR;
|
|
return NULL;
|
|
}
|
|
|
|
/*
|
|
* Create a TimeZoneRule by the RDATE definition
|
|
*/
|
|
static TimeZoneRule* createRuleByRDATE(const UnicodeString& zonename, int32_t rawOffset, int32_t dstSavings,
|
|
UDate start, UVector* dates, int32_t fromOffset, UErrorCode& status) {
|
|
if (U_FAILURE(status)) {
|
|
return NULL;
|
|
}
|
|
TimeArrayTimeZoneRule *retVal = NULL;
|
|
if (dates == NULL || dates->size() == 0) {
|
|
// When no RDATE line is provided, use start (DTSTART)
|
|
// as the transition time
|
|
retVal = new TimeArrayTimeZoneRule(zonename, rawOffset, dstSavings,
|
|
&start, 1, DateTimeRule::UTC_TIME);
|
|
} else {
|
|
// Create an array of transition times
|
|
int32_t size = dates->size();
|
|
UDate* times = (UDate*)uprv_malloc(sizeof(UDate) * size);
|
|
if (times == NULL) {
|
|
status = U_MEMORY_ALLOCATION_ERROR;
|
|
return NULL;
|
|
}
|
|
for (int32_t i = 0; i < size; i++) {
|
|
UnicodeString *datestr = (UnicodeString*)dates->elementAt(i);
|
|
times[i] = parseDateTimeString(*datestr, fromOffset, status);
|
|
if (U_FAILURE(status)) {
|
|
uprv_free(times);
|
|
return NULL;
|
|
}
|
|
}
|
|
retVal = new TimeArrayTimeZoneRule(zonename, rawOffset, dstSavings,
|
|
times, size, DateTimeRule::UTC_TIME);
|
|
uprv_free(times);
|
|
}
|
|
return retVal;
|
|
}
|
|
|
|
/*
|
|
* Check if the DOW rule specified by month, weekInMonth and dayOfWeek is equivalent
|
|
* to the DateTimerule.
|
|
*/
|
|
static UBool isEquivalentDateRule(int32_t month, int32_t weekInMonth, int32_t dayOfWeek, const DateTimeRule *dtrule) {
|
|
if (month != dtrule->getRuleMonth() || dayOfWeek != dtrule->getRuleDayOfWeek()) {
|
|
return FALSE;
|
|
}
|
|
if (dtrule->getTimeRuleType() != DateTimeRule::WALL_TIME) {
|
|
// Do not try to do more intelligent comparison for now.
|
|
return FALSE;
|
|
}
|
|
if (dtrule->getDateRuleType() == DateTimeRule::DOW
|
|
&& dtrule->getRuleWeekInMonth() == weekInMonth) {
|
|
return TRUE;
|
|
}
|
|
int32_t ruleDOM = dtrule->getRuleDayOfMonth();
|
|
if (dtrule->getDateRuleType() == DateTimeRule::DOW_GEQ_DOM) {
|
|
if (ruleDOM%7 == 1 && (ruleDOM + 6)/7 == weekInMonth) {
|
|
return TRUE;
|
|
}
|
|
if (month != UCAL_FEBRUARY && (MONTHLENGTH[month] - ruleDOM)%7 == 6
|
|
&& weekInMonth == -1*((MONTHLENGTH[month]-ruleDOM+1)/7)) {
|
|
return TRUE;
|
|
}
|
|
}
|
|
if (dtrule->getDateRuleType() == DateTimeRule::DOW_LEQ_DOM) {
|
|
if (ruleDOM%7 == 0 && ruleDOM/7 == weekInMonth) {
|
|
return TRUE;
|
|
}
|
|
if (month != UCAL_FEBRUARY && (MONTHLENGTH[month] - ruleDOM)%7 == 0
|
|
&& weekInMonth == -1*((MONTHLENGTH[month] - ruleDOM)/7 + 1)) {
|
|
return TRUE;
|
|
}
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
/*
|
|
* Convert the rule to its equivalent rule using WALL_TIME mode.
|
|
* This function returns NULL when the specified DateTimeRule is already
|
|
* using WALL_TIME mode.
|
|
*/
|
|
static DateTimeRule* toWallTimeRule(const DateTimeRule* rule, int32_t rawOffset, int32_t dstSavings) {
|
|
if (rule->getTimeRuleType() == DateTimeRule::WALL_TIME) {
|
|
return NULL;
|
|
}
|
|
int32_t wallt = rule->getRuleMillisInDay();
|
|
if (rule->getTimeRuleType() == DateTimeRule::UTC_TIME) {
|
|
wallt += (rawOffset + dstSavings);
|
|
} else if (rule->getTimeRuleType() == DateTimeRule::STANDARD_TIME) {
|
|
wallt += dstSavings;
|
|
}
|
|
|
|
int32_t month = -1, dom = 0, dow = 0;
|
|
DateTimeRule::DateRuleType dtype;
|
|
int32_t dshift = 0;
|
|
if (wallt < 0) {
|
|
dshift = -1;
|
|
wallt += U_MILLIS_PER_DAY;
|
|
} else if (wallt >= U_MILLIS_PER_DAY) {
|
|
dshift = 1;
|
|
wallt -= U_MILLIS_PER_DAY;
|
|
}
|
|
|
|
month = rule->getRuleMonth();
|
|
dom = rule->getRuleDayOfMonth();
|
|
dow = rule->getRuleDayOfWeek();
|
|
dtype = rule->getDateRuleType();
|
|
|
|
if (dshift != 0) {
|
|
if (dtype == DateTimeRule::DOW) {
|
|
// Convert to DOW_GEW_DOM or DOW_LEQ_DOM rule first
|
|
int32_t wim = rule->getRuleWeekInMonth();
|
|
if (wim > 0) {
|
|
dtype = DateTimeRule::DOW_GEQ_DOM;
|
|
dom = 7 * (wim - 1) + 1;
|
|
} else {
|
|
dtype = DateTimeRule::DOW_LEQ_DOM;
|
|
dom = MONTHLENGTH[month] + 7 * (wim + 1);
|
|
}
|
|
}
|
|
// Shift one day before or after
|
|
dom += dshift;
|
|
if (dom == 0) {
|
|
month--;
|
|
month = month < UCAL_JANUARY ? UCAL_DECEMBER : month;
|
|
dom = MONTHLENGTH[month];
|
|
} else if (dom > MONTHLENGTH[month]) {
|
|
month++;
|
|
month = month > UCAL_DECEMBER ? UCAL_JANUARY : month;
|
|
dom = 1;
|
|
}
|
|
if (dtype != DateTimeRule::DOM) {
|
|
// Adjust day of week
|
|
dow += dshift;
|
|
if (dow < UCAL_SUNDAY) {
|
|
dow = UCAL_SATURDAY;
|
|
} else if (dow > UCAL_SATURDAY) {
|
|
dow = UCAL_SUNDAY;
|
|
}
|
|
}
|
|
}
|
|
// Create a new rule
|
|
DateTimeRule *modifiedRule;
|
|
if (dtype == DateTimeRule::DOM) {
|
|
modifiedRule = new DateTimeRule(month, dom, wallt, DateTimeRule::WALL_TIME);
|
|
} else {
|
|
modifiedRule = new DateTimeRule(month, dom, dow,
|
|
(dtype == DateTimeRule::DOW_GEQ_DOM), wallt, DateTimeRule::WALL_TIME);
|
|
}
|
|
return modifiedRule;
|
|
}
|
|
|
|
/*
|
|
* Minumum implementations of stream writer/reader, writing/reading
|
|
* UnicodeString. For now, we do not want to introduce the dependency
|
|
* on the ICU I/O stream in this module. But we want to keep the code
|
|
* equivalent to the ICU4J implementation, which utilizes java.io.Writer/
|
|
* Reader.
|
|
*/
|
|
class VTZWriter {
|
|
public:
|
|
VTZWriter(UnicodeString& out);
|
|
~VTZWriter();
|
|
|
|
void write(const UnicodeString& str);
|
|
void write(UChar ch);
|
|
void write(const UChar* str);
|
|
//void write(const UChar* str, int32_t length);
|
|
private:
|
|
UnicodeString* out;
|
|
};
|
|
|
|
VTZWriter::VTZWriter(UnicodeString& output) {
|
|
out = &output;
|
|
}
|
|
|
|
VTZWriter::~VTZWriter() {
|
|
}
|
|
|
|
void
|
|
VTZWriter::write(const UnicodeString& str) {
|
|
out->append(str);
|
|
}
|
|
|
|
void
|
|
VTZWriter::write(UChar ch) {
|
|
out->append(ch);
|
|
}
|
|
|
|
void
|
|
VTZWriter::write(const UChar* str) {
|
|
out->append(str, -1);
|
|
}
|
|
|
|
/*
|
|
void
|
|
VTZWriter::write(const UChar* str, int32_t length) {
|
|
out->append(str, length);
|
|
}
|
|
*/
|
|
|
|
class VTZReader {
|
|
public:
|
|
VTZReader(const UnicodeString& input);
|
|
~VTZReader();
|
|
|
|
UChar read(void);
|
|
private:
|
|
const UnicodeString* in;
|
|
int32_t index;
|
|
};
|
|
|
|
VTZReader::VTZReader(const UnicodeString& input) {
|
|
in = &input;
|
|
index = 0;
|
|
}
|
|
|
|
VTZReader::~VTZReader() {
|
|
}
|
|
|
|
UChar
|
|
VTZReader::read(void) {
|
|
UChar ch = 0xFFFF;
|
|
if (index < in->length()) {
|
|
ch = in->charAt(index);
|
|
}
|
|
index++;
|
|
return ch;
|
|
}
|
|
|
|
|
|
UOBJECT_DEFINE_RTTI_IMPLEMENTATION(VTimeZone)
|
|
|
|
VTimeZone::VTimeZone()
|
|
: BasicTimeZone(), tz(NULL), vtzlines(NULL),
|
|
lastmod(MAX_MILLIS) {
|
|
}
|
|
|
|
VTimeZone::VTimeZone(const VTimeZone& source)
|
|
: BasicTimeZone(source), tz(NULL), vtzlines(NULL),
|
|
tzurl(source.tzurl), lastmod(source.lastmod),
|
|
olsonzid(source.olsonzid), icutzver(source.icutzver) {
|
|
if (source.tz != NULL) {
|
|
tz = (BasicTimeZone*)source.tz->clone();
|
|
}
|
|
if (source.vtzlines != NULL) {
|
|
UErrorCode status = U_ZERO_ERROR;
|
|
int32_t size = source.vtzlines->size();
|
|
vtzlines = new UVector(uprv_deleteUObject, uhash_compareUnicodeString, size, status);
|
|
if (U_SUCCESS(status)) {
|
|
for (int32_t i = 0; i < size; i++) {
|
|
UnicodeString *line = (UnicodeString*)source.vtzlines->elementAt(i);
|
|
vtzlines->addElement(line->clone(), status);
|
|
if (U_FAILURE(status)) {
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
if (U_FAILURE(status) && vtzlines != NULL) {
|
|
delete vtzlines;
|
|
}
|
|
}
|
|
}
|
|
|
|
VTimeZone::~VTimeZone() {
|
|
if (tz != NULL) {
|
|
delete tz;
|
|
}
|
|
if (vtzlines != NULL) {
|
|
delete vtzlines;
|
|
}
|
|
}
|
|
|
|
VTimeZone&
|
|
VTimeZone::operator=(const VTimeZone& right) {
|
|
if (this == &right) {
|
|
return *this;
|
|
}
|
|
if (*this != right) {
|
|
BasicTimeZone::operator=(right);
|
|
if (tz != NULL) {
|
|
delete tz;
|
|
tz = NULL;
|
|
}
|
|
if (right.tz != NULL) {
|
|
tz = (BasicTimeZone*)right.tz->clone();
|
|
}
|
|
if (vtzlines != NULL) {
|
|
delete vtzlines;
|
|
}
|
|
if (right.vtzlines != NULL) {
|
|
UErrorCode status = U_ZERO_ERROR;
|
|
int32_t size = right.vtzlines->size();
|
|
vtzlines = new UVector(uprv_deleteUObject, uhash_compareUnicodeString, size, status);
|
|
if (U_SUCCESS(status)) {
|
|
for (int32_t i = 0; i < size; i++) {
|
|
UnicodeString *line = (UnicodeString*)right.vtzlines->elementAt(i);
|
|
vtzlines->addElement(line->clone(), status);
|
|
if (U_FAILURE(status)) {
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
if (U_FAILURE(status) && vtzlines != NULL) {
|
|
delete vtzlines;
|
|
vtzlines = NULL;
|
|
}
|
|
}
|
|
tzurl = right.tzurl;
|
|
lastmod = right.lastmod;
|
|
olsonzid = right.olsonzid;
|
|
icutzver = right.icutzver;
|
|
}
|
|
return *this;
|
|
}
|
|
|
|
UBool
|
|
VTimeZone::operator==(const TimeZone& that) const {
|
|
if (this == &that) {
|
|
return TRUE;
|
|
}
|
|
if (typeid(*this) != typeid(that) || !BasicTimeZone::operator==(that)) {
|
|
return FALSE;
|
|
}
|
|
VTimeZone *vtz = (VTimeZone*)&that;
|
|
if (*tz == *(vtz->tz)
|
|
&& tzurl == vtz->tzurl
|
|
&& lastmod == vtz->lastmod
|
|
/* && olsonzid = that.olsonzid */
|
|
/* && icutzver = that.icutzver */) {
|
|
return TRUE;
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
UBool
|
|
VTimeZone::operator!=(const TimeZone& that) const {
|
|
return !operator==(that);
|
|
}
|
|
|
|
VTimeZone*
|
|
VTimeZone::createVTimeZoneByID(const UnicodeString& ID) {
|
|
VTimeZone *vtz = new VTimeZone();
|
|
vtz->tz = (BasicTimeZone*)TimeZone::createTimeZone(ID);
|
|
vtz->tz->getID(vtz->olsonzid);
|
|
|
|
// Set ICU tzdata version
|
|
UErrorCode status = U_ZERO_ERROR;
|
|
UResourceBundle *bundle = NULL;
|
|
const UChar* versionStr = NULL;
|
|
int32_t len = 0;
|
|
bundle = ures_openDirect(NULL, "zoneinfo64", &status);
|
|
versionStr = ures_getStringByKey(bundle, "TZVersion", &len, &status);
|
|
if (U_SUCCESS(status)) {
|
|
vtz->icutzver.setTo(versionStr, len);
|
|
}
|
|
ures_close(bundle);
|
|
return vtz;
|
|
}
|
|
|
|
VTimeZone*
|
|
VTimeZone::createVTimeZoneFromBasicTimeZone(const BasicTimeZone& basic_time_zone, UErrorCode &status) {
|
|
if (U_FAILURE(status)) {
|
|
return NULL;
|
|
}
|
|
VTimeZone *vtz = new VTimeZone();
|
|
if (vtz == NULL) {
|
|
status = U_MEMORY_ALLOCATION_ERROR;
|
|
return NULL;
|
|
}
|
|
vtz->tz = (BasicTimeZone *)basic_time_zone.clone();
|
|
if (vtz->tz == NULL) {
|
|
status = U_MEMORY_ALLOCATION_ERROR;
|
|
delete vtz;
|
|
return NULL;
|
|
}
|
|
vtz->tz->getID(vtz->olsonzid);
|
|
|
|
// Set ICU tzdata version
|
|
UResourceBundle *bundle = NULL;
|
|
const UChar* versionStr = NULL;
|
|
int32_t len = 0;
|
|
bundle = ures_openDirect(NULL, "zoneinfo64", &status);
|
|
versionStr = ures_getStringByKey(bundle, "TZVersion", &len, &status);
|
|
if (U_SUCCESS(status)) {
|
|
vtz->icutzver.setTo(versionStr, len);
|
|
}
|
|
ures_close(bundle);
|
|
return vtz;
|
|
}
|
|
|
|
VTimeZone*
|
|
VTimeZone::createVTimeZone(const UnicodeString& vtzdata, UErrorCode& status) {
|
|
if (U_FAILURE(status)) {
|
|
return NULL;
|
|
}
|
|
VTZReader reader(vtzdata);
|
|
VTimeZone *vtz = new VTimeZone();
|
|
vtz->load(reader, status);
|
|
if (U_FAILURE(status)) {
|
|
delete vtz;
|
|
return NULL;
|
|
}
|
|
return vtz;
|
|
}
|
|
|
|
UBool
|
|
VTimeZone::getTZURL(UnicodeString& url) const {
|
|
if (tzurl.length() > 0) {
|
|
url = tzurl;
|
|
return TRUE;
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
void
|
|
VTimeZone::setTZURL(const UnicodeString& url) {
|
|
tzurl = url;
|
|
}
|
|
|
|
UBool
|
|
VTimeZone::getLastModified(UDate& lastModified) const {
|
|
if (lastmod != MAX_MILLIS) {
|
|
lastModified = lastmod;
|
|
return TRUE;
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
void
|
|
VTimeZone::setLastModified(UDate lastModified) {
|
|
lastmod = lastModified;
|
|
}
|
|
|
|
void
|
|
VTimeZone::write(UnicodeString& result, UErrorCode& status) const {
|
|
result.remove();
|
|
VTZWriter writer(result);
|
|
write(writer, status);
|
|
}
|
|
|
|
void
|
|
VTimeZone::write(UDate start, UnicodeString& result, UErrorCode& status) const {
|
|
result.remove();
|
|
VTZWriter writer(result);
|
|
write(start, writer, status);
|
|
}
|
|
|
|
void
|
|
VTimeZone::writeSimple(UDate time, UnicodeString& result, UErrorCode& status) const {
|
|
result.remove();
|
|
VTZWriter writer(result);
|
|
writeSimple(time, writer, status);
|
|
}
|
|
|
|
TimeZone*
|
|
VTimeZone::clone(void) const {
|
|
return new VTimeZone(*this);
|
|
}
|
|
|
|
int32_t
|
|
VTimeZone::getOffset(uint8_t era, int32_t year, int32_t month, int32_t day,
|
|
uint8_t dayOfWeek, int32_t millis, UErrorCode& status) const {
|
|
return tz->getOffset(era, year, month, day, dayOfWeek, millis, status);
|
|
}
|
|
|
|
int32_t
|
|
VTimeZone::getOffset(uint8_t era, int32_t year, int32_t month, int32_t day,
|
|
uint8_t dayOfWeek, int32_t millis,
|
|
int32_t monthLength, UErrorCode& status) const {
|
|
return tz->getOffset(era, year, month, day, dayOfWeek, millis, monthLength, status);
|
|
}
|
|
|
|
void
|
|
VTimeZone::getOffset(UDate date, UBool local, int32_t& rawOffset,
|
|
int32_t& dstOffset, UErrorCode& status) const {
|
|
return tz->getOffset(date, local, rawOffset, dstOffset, status);
|
|
}
|
|
|
|
void
|
|
VTimeZone::setRawOffset(int32_t offsetMillis) {
|
|
tz->setRawOffset(offsetMillis);
|
|
}
|
|
|
|
int32_t
|
|
VTimeZone::getRawOffset(void) const {
|
|
return tz->getRawOffset();
|
|
}
|
|
|
|
UBool
|
|
VTimeZone::useDaylightTime(void) const {
|
|
return tz->useDaylightTime();
|
|
}
|
|
|
|
UBool
|
|
VTimeZone::inDaylightTime(UDate date, UErrorCode& status) const {
|
|
return tz->inDaylightTime(date, status);
|
|
}
|
|
|
|
UBool
|
|
VTimeZone::hasSameRules(const TimeZone& other) const {
|
|
return tz->hasSameRules(other);
|
|
}
|
|
|
|
UBool
|
|
VTimeZone::getNextTransition(UDate base, UBool inclusive, TimeZoneTransition& result) const {
|
|
return tz->getNextTransition(base, inclusive, result);
|
|
}
|
|
|
|
UBool
|
|
VTimeZone::getPreviousTransition(UDate base, UBool inclusive, TimeZoneTransition& result) const {
|
|
return tz->getPreviousTransition(base, inclusive, result);
|
|
}
|
|
|
|
int32_t
|
|
VTimeZone::countTransitionRules(UErrorCode& status) const {
|
|
return tz->countTransitionRules(status);
|
|
}
|
|
|
|
void
|
|
VTimeZone::getTimeZoneRules(const InitialTimeZoneRule*& initial,
|
|
const TimeZoneRule* trsrules[], int32_t& trscount,
|
|
UErrorCode& status) const {
|
|
tz->getTimeZoneRules(initial, trsrules, trscount, status);
|
|
}
|
|
|
|
void
|
|
VTimeZone::load(VTZReader& reader, UErrorCode& status) {
|
|
vtzlines = new UVector(uprv_deleteUObject, uhash_compareUnicodeString, DEFAULT_VTIMEZONE_LINES, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
UBool eol = FALSE;
|
|
UBool start = FALSE;
|
|
UBool success = FALSE;
|
|
UnicodeString line;
|
|
|
|
while (TRUE) {
|
|
UChar ch = reader.read();
|
|
if (ch == 0xFFFF) {
|
|
// end of file
|
|
if (start && line.startsWith(ICAL_END_VTIMEZONE, -1)) {
|
|
vtzlines->addElement(new UnicodeString(line), status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupVtzlines;
|
|
}
|
|
success = TRUE;
|
|
}
|
|
break;
|
|
}
|
|
if (ch == 0x000D) {
|
|
// CR, must be followed by LF according to the definition in RFC2445
|
|
continue;
|
|
}
|
|
if (eol) {
|
|
if (ch != 0x0009 && ch != 0x0020) {
|
|
// NOT followed by TAB/SP -> new line
|
|
if (start) {
|
|
if (line.length() > 0) {
|
|
vtzlines->addElement(new UnicodeString(line), status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupVtzlines;
|
|
}
|
|
}
|
|
}
|
|
line.remove();
|
|
if (ch != 0x000A) {
|
|
line.append(ch);
|
|
}
|
|
}
|
|
eol = FALSE;
|
|
} else {
|
|
if (ch == 0x000A) {
|
|
// LF
|
|
eol = TRUE;
|
|
if (start) {
|
|
if (line.startsWith(ICAL_END_VTIMEZONE, -1)) {
|
|
vtzlines->addElement(new UnicodeString(line), status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupVtzlines;
|
|
}
|
|
success = TRUE;
|
|
break;
|
|
}
|
|
} else {
|
|
if (line.startsWith(ICAL_BEGIN_VTIMEZONE, -1)) {
|
|
vtzlines->addElement(new UnicodeString(line), status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupVtzlines;
|
|
}
|
|
line.remove();
|
|
start = TRUE;
|
|
eol = FALSE;
|
|
}
|
|
}
|
|
} else {
|
|
line.append(ch);
|
|
}
|
|
}
|
|
}
|
|
if (!success) {
|
|
if (U_SUCCESS(status)) {
|
|
status = U_INVALID_STATE_ERROR;
|
|
}
|
|
goto cleanupVtzlines;
|
|
}
|
|
parse(status);
|
|
return;
|
|
|
|
cleanupVtzlines:
|
|
delete vtzlines;
|
|
vtzlines = NULL;
|
|
}
|
|
|
|
// parser state
|
|
#define INI 0 // Initial state
|
|
#define VTZ 1 // In VTIMEZONE
|
|
#define TZI 2 // In STANDARD or DAYLIGHT
|
|
|
|
#define DEF_DSTSAVINGS (60*60*1000)
|
|
#define DEF_TZSTARTTIME (0.0)
|
|
|
|
void
|
|
VTimeZone::parse(UErrorCode& status) {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
if (vtzlines == NULL || vtzlines->size() == 0) {
|
|
status = U_INVALID_STATE_ERROR;
|
|
return;
|
|
}
|
|
InitialTimeZoneRule *initialRule = NULL;
|
|
RuleBasedTimeZone *rbtz = NULL;
|
|
|
|
// timezone ID
|
|
UnicodeString tzid;
|
|
|
|
int32_t state = INI;
|
|
int32_t n = 0;
|
|
UBool dst = FALSE; // current zone type
|
|
UnicodeString from; // current zone from offset
|
|
UnicodeString to; // current zone offset
|
|
UnicodeString zonename; // current zone name
|
|
UnicodeString dtstart; // current zone starts
|
|
UBool isRRULE = FALSE; // true if the rule is described by RRULE
|
|
int32_t initialRawOffset = 0; // initial offset
|
|
int32_t initialDSTSavings = 0; // initial offset
|
|
UDate firstStart = MAX_MILLIS; // the earliest rule start time
|
|
UnicodeString name; // RFC2445 prop name
|
|
UnicodeString value; // RFC2445 prop value
|
|
|
|
UVector *dates = NULL; // list of RDATE or RRULE strings
|
|
UVector *rules = NULL; // list of TimeZoneRule instances
|
|
|
|
int32_t finalRuleIdx = -1;
|
|
int32_t finalRuleCount = 0;
|
|
|
|
rules = new UVector(status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
// Set the deleter to remove TimeZoneRule vectors to avoid memory leaks due to unowned TimeZoneRules.
|
|
rules->setDeleter(deleteTimeZoneRule);
|
|
|
|
dates = new UVector(uprv_deleteUObject, uhash_compareUnicodeString, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
if (rules == NULL || dates == NULL) {
|
|
status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto cleanupParse;
|
|
}
|
|
|
|
for (n = 0; n < vtzlines->size(); n++) {
|
|
UnicodeString *line = (UnicodeString*)vtzlines->elementAt(n);
|
|
int32_t valueSep = line->indexOf(COLON);
|
|
if (valueSep < 0) {
|
|
continue;
|
|
}
|
|
name.setTo(*line, 0, valueSep);
|
|
value.setTo(*line, valueSep + 1);
|
|
|
|
switch (state) {
|
|
case INI:
|
|
if (name.compare(ICAL_BEGIN, -1) == 0
|
|
&& value.compare(ICAL_VTIMEZONE, -1) == 0) {
|
|
state = VTZ;
|
|
}
|
|
break;
|
|
|
|
case VTZ:
|
|
if (name.compare(ICAL_TZID, -1) == 0) {
|
|
tzid = value;
|
|
} else if (name.compare(ICAL_TZURL, -1) == 0) {
|
|
tzurl = value;
|
|
} else if (name.compare(ICAL_LASTMOD, -1) == 0) {
|
|
// Always in 'Z' format, so the offset argument for the parse method
|
|
// can be any value.
|
|
lastmod = parseDateTimeString(value, 0, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
} else if (name.compare(ICAL_BEGIN, -1) == 0) {
|
|
UBool isDST = (value.compare(ICAL_DAYLIGHT, -1) == 0);
|
|
if (value.compare(ICAL_STANDARD, -1) == 0 || isDST) {
|
|
// tzid must be ready at this point
|
|
if (tzid.length() == 0) {
|
|
goto cleanupParse;
|
|
}
|
|
// initialize current zone properties
|
|
if (dates->size() != 0) {
|
|
dates->removeAllElements();
|
|
}
|
|
isRRULE = FALSE;
|
|
from.remove();
|
|
to.remove();
|
|
zonename.remove();
|
|
dst = isDST;
|
|
state = TZI;
|
|
} else {
|
|
// BEGIN property other than STANDARD/DAYLIGHT
|
|
// must not be there.
|
|
goto cleanupParse;
|
|
}
|
|
} else if (name.compare(ICAL_END, -1) == 0) {
|
|
break;
|
|
}
|
|
break;
|
|
case TZI:
|
|
if (name.compare(ICAL_DTSTART, -1) == 0) {
|
|
dtstart = value;
|
|
} else if (name.compare(ICAL_TZNAME, -1) == 0) {
|
|
zonename = value;
|
|
} else if (name.compare(ICAL_TZOFFSETFROM, -1) == 0) {
|
|
from = value;
|
|
} else if (name.compare(ICAL_TZOFFSETTO, -1) == 0) {
|
|
to = value;
|
|
} else if (name.compare(ICAL_RDATE, -1) == 0) {
|
|
// RDATE mixed with RRULE is not supported
|
|
if (isRRULE) {
|
|
goto cleanupParse;
|
|
}
|
|
// RDATE value may contain multiple date delimited
|
|
// by comma
|
|
UBool nextDate = TRUE;
|
|
int32_t dstart = 0;
|
|
UnicodeString *dstr;
|
|
while (nextDate) {
|
|
int32_t dend = value.indexOf(COMMA, dstart);
|
|
if (dend == -1) {
|
|
dstr = new UnicodeString(value, dstart);
|
|
nextDate = FALSE;
|
|
} else {
|
|
dstr = new UnicodeString(value, dstart, dend - dstart);
|
|
}
|
|
dates->addElement(dstr, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
dstart = dend + 1;
|
|
}
|
|
} else if (name.compare(ICAL_RRULE, -1) == 0) {
|
|
// RRULE mixed with RDATE is not supported
|
|
if (!isRRULE && dates->size() != 0) {
|
|
goto cleanupParse;
|
|
}
|
|
isRRULE = true;
|
|
dates->addElement(new UnicodeString(value), status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
} else if (name.compare(ICAL_END, -1) == 0) {
|
|
// Mandatory properties
|
|
if (dtstart.length() == 0 || from.length() == 0 || to.length() == 0) {
|
|
goto cleanupParse;
|
|
}
|
|
// if zonename is not available, create one from tzid
|
|
if (zonename.length() == 0) {
|
|
getDefaultTZName(tzid, dst, zonename);
|
|
}
|
|
|
|
// create a time zone rule
|
|
TimeZoneRule *rule = NULL;
|
|
int32_t fromOffset = 0;
|
|
int32_t toOffset = 0;
|
|
int32_t rawOffset = 0;
|
|
int32_t dstSavings = 0;
|
|
UDate start = 0;
|
|
|
|
// Parse TZOFFSETFROM/TZOFFSETTO
|
|
fromOffset = offsetStrToMillis(from, status);
|
|
toOffset = offsetStrToMillis(to, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
|
|
if (dst) {
|
|
// If daylight, use the previous offset as rawoffset if positive
|
|
if (toOffset - fromOffset > 0) {
|
|
rawOffset = fromOffset;
|
|
dstSavings = toOffset - fromOffset;
|
|
} else {
|
|
// This is rare case.. just use 1 hour DST savings
|
|
rawOffset = toOffset - DEF_DSTSAVINGS;
|
|
dstSavings = DEF_DSTSAVINGS;
|
|
}
|
|
} else {
|
|
rawOffset = toOffset;
|
|
dstSavings = 0;
|
|
}
|
|
|
|
// start time
|
|
start = parseDateTimeString(dtstart, fromOffset, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
|
|
// Create the rule
|
|
UDate actualStart = MAX_MILLIS;
|
|
if (isRRULE) {
|
|
rule = createRuleByRRULE(zonename, rawOffset, dstSavings, start, dates, fromOffset, status);
|
|
} else {
|
|
rule = createRuleByRDATE(zonename, rawOffset, dstSavings, start, dates, fromOffset, status);
|
|
}
|
|
if (U_FAILURE(status) || rule == NULL) {
|
|
goto cleanupParse;
|
|
} else {
|
|
UBool startAvail = rule->getFirstStart(fromOffset, 0, actualStart);
|
|
if (startAvail && actualStart < firstStart) {
|
|
// save from offset information for the earliest rule
|
|
firstStart = actualStart;
|
|
// If this is STD, assume the time before this transtion
|
|
// is DST when the difference is 1 hour. This might not be
|
|
// accurate, but VTIMEZONE data does not have such info.
|
|
if (dstSavings > 0) {
|
|
initialRawOffset = fromOffset;
|
|
initialDSTSavings = 0;
|
|
} else {
|
|
if (fromOffset - toOffset == DEF_DSTSAVINGS) {
|
|
initialRawOffset = fromOffset - DEF_DSTSAVINGS;
|
|
initialDSTSavings = DEF_DSTSAVINGS;
|
|
} else {
|
|
initialRawOffset = fromOffset;
|
|
initialDSTSavings = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
rules->addElement(rule, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
state = VTZ;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
// Must have at least one rule
|
|
if (rules->size() == 0) {
|
|
goto cleanupParse;
|
|
}
|
|
|
|
// Create a initial rule
|
|
getDefaultTZName(tzid, FALSE, zonename);
|
|
initialRule = new InitialTimeZoneRule(zonename,
|
|
initialRawOffset, initialDSTSavings);
|
|
if (initialRule == NULL) {
|
|
status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto cleanupParse;
|
|
}
|
|
|
|
// Finally, create the RuleBasedTimeZone
|
|
rbtz = new RuleBasedTimeZone(tzid, initialRule);
|
|
if (rbtz == NULL) {
|
|
status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto cleanupParse;
|
|
}
|
|
initialRule = NULL; // already adopted by RBTZ, no need to delete
|
|
|
|
for (n = 0; n < rules->size(); n++) {
|
|
TimeZoneRule *r = (TimeZoneRule*)rules->elementAt(n);
|
|
AnnualTimeZoneRule *atzrule = dynamic_cast<AnnualTimeZoneRule *>(r);
|
|
if (atzrule != NULL) {
|
|
if (atzrule->getEndYear() == AnnualTimeZoneRule::MAX_YEAR) {
|
|
finalRuleCount++;
|
|
finalRuleIdx = n;
|
|
}
|
|
}
|
|
}
|
|
if (finalRuleCount > 2) {
|
|
// Too many final rules
|
|
status = U_ILLEGAL_ARGUMENT_ERROR;
|
|
goto cleanupParse;
|
|
}
|
|
|
|
if (finalRuleCount == 1) {
|
|
if (rules->size() == 1) {
|
|
// Only one final rule, only governs the initial rule,
|
|
// which is already initialized, thus, we do not need to
|
|
// add this transition rule
|
|
rules->removeAllElements();
|
|
} else {
|
|
// Normalize the final rule
|
|
AnnualTimeZoneRule *finalRule = (AnnualTimeZoneRule*)rules->elementAt(finalRuleIdx);
|
|
int32_t tmpRaw = finalRule->getRawOffset();
|
|
int32_t tmpDST = finalRule->getDSTSavings();
|
|
|
|
// Find the last non-final rule
|
|
UDate finalStart, start;
|
|
finalRule->getFirstStart(initialRawOffset, initialDSTSavings, finalStart);
|
|
start = finalStart;
|
|
for (n = 0; n < rules->size(); n++) {
|
|
if (finalRuleIdx == n) {
|
|
continue;
|
|
}
|
|
TimeZoneRule *r = (TimeZoneRule*)rules->elementAt(n);
|
|
UDate lastStart;
|
|
r->getFinalStart(tmpRaw, tmpDST, lastStart);
|
|
if (lastStart > start) {
|
|
finalRule->getNextStart(lastStart,
|
|
r->getRawOffset(),
|
|
r->getDSTSavings(),
|
|
FALSE,
|
|
start);
|
|
}
|
|
}
|
|
|
|
TimeZoneRule *newRule;
|
|
UnicodeString tznam;
|
|
if (start == finalStart) {
|
|
// Transform this into a single transition
|
|
newRule = new TimeArrayTimeZoneRule(
|
|
finalRule->getName(tznam),
|
|
finalRule->getRawOffset(),
|
|
finalRule->getDSTSavings(),
|
|
&finalStart,
|
|
1,
|
|
DateTimeRule::UTC_TIME);
|
|
} else {
|
|
// Update the end year
|
|
int32_t y, m, d, dow, doy, mid;
|
|
Grego::timeToFields(start, y, m, d, dow, doy, mid);
|
|
newRule = new AnnualTimeZoneRule(
|
|
finalRule->getName(tznam),
|
|
finalRule->getRawOffset(),
|
|
finalRule->getDSTSavings(),
|
|
*(finalRule->getRule()),
|
|
finalRule->getStartYear(),
|
|
y);
|
|
}
|
|
if (newRule == NULL) {
|
|
status = U_MEMORY_ALLOCATION_ERROR;
|
|
goto cleanupParse;
|
|
}
|
|
rules->removeElementAt(finalRuleIdx);
|
|
rules->addElement(newRule, status);
|
|
if (U_FAILURE(status)) {
|
|
delete newRule;
|
|
goto cleanupParse;
|
|
}
|
|
}
|
|
}
|
|
|
|
while (!rules->isEmpty()) {
|
|
TimeZoneRule *tzr = (TimeZoneRule*)rules->orphanElementAt(0);
|
|
rbtz->addTransitionRule(tzr, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
}
|
|
rbtz->complete(status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupParse;
|
|
}
|
|
delete rules;
|
|
delete dates;
|
|
|
|
tz = rbtz;
|
|
setID(tzid);
|
|
return;
|
|
|
|
cleanupParse:
|
|
if (rules != NULL) {
|
|
while (!rules->isEmpty()) {
|
|
TimeZoneRule *r = (TimeZoneRule*)rules->orphanElementAt(0);
|
|
delete r;
|
|
}
|
|
delete rules;
|
|
}
|
|
if (dates != NULL) {
|
|
delete dates;
|
|
}
|
|
if (initialRule != NULL) {
|
|
delete initialRule;
|
|
}
|
|
if (rbtz != NULL) {
|
|
delete rbtz;
|
|
}
|
|
return;
|
|
}
|
|
|
|
void
|
|
VTimeZone::write(VTZWriter& writer, UErrorCode& status) const {
|
|
if (vtzlines != NULL) {
|
|
for (int32_t i = 0; i < vtzlines->size(); i++) {
|
|
UnicodeString *line = (UnicodeString*)vtzlines->elementAt(i);
|
|
if (line->startsWith(ICAL_TZURL, -1)
|
|
&& line->charAt(u_strlen(ICAL_TZURL)) == COLON) {
|
|
writer.write(ICAL_TZURL);
|
|
writer.write(COLON);
|
|
writer.write(tzurl);
|
|
writer.write(ICAL_NEWLINE);
|
|
} else if (line->startsWith(ICAL_LASTMOD, -1)
|
|
&& line->charAt(u_strlen(ICAL_LASTMOD)) == COLON) {
|
|
UnicodeString utcString;
|
|
writer.write(ICAL_LASTMOD);
|
|
writer.write(COLON);
|
|
writer.write(getUTCDateTimeString(lastmod, utcString));
|
|
writer.write(ICAL_NEWLINE);
|
|
} else {
|
|
writer.write(*line);
|
|
writer.write(ICAL_NEWLINE);
|
|
}
|
|
}
|
|
} else {
|
|
UnicodeString icutzprop;
|
|
UVector customProps(nullptr, uhash_compareUnicodeString, status);
|
|
if (olsonzid.length() > 0 && icutzver.length() > 0) {
|
|
icutzprop.append(olsonzid);
|
|
icutzprop.append(u'[');
|
|
icutzprop.append(icutzver);
|
|
icutzprop.append(u']');
|
|
customProps.addElement(&icutzprop, status);
|
|
}
|
|
writeZone(writer, *tz, &customProps, status);
|
|
}
|
|
}
|
|
|
|
void
|
|
VTimeZone::write(UDate start, VTZWriter& writer, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
InitialTimeZoneRule *initial = NULL;
|
|
UVector *transitionRules = NULL;
|
|
UVector customProps(uprv_deleteUObject, uhash_compareUnicodeString, status);
|
|
UnicodeString tzid;
|
|
|
|
// Extract rules applicable to dates after the start time
|
|
getTimeZoneRulesAfter(start, initial, transitionRules, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
|
|
// Create a RuleBasedTimeZone with the subset rule
|
|
getID(tzid);
|
|
RuleBasedTimeZone rbtz(tzid, initial);
|
|
if (transitionRules != NULL) {
|
|
while (!transitionRules->isEmpty()) {
|
|
TimeZoneRule *tr = (TimeZoneRule*)transitionRules->orphanElementAt(0);
|
|
rbtz.addTransitionRule(tr, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWritePartial;
|
|
}
|
|
}
|
|
delete transitionRules;
|
|
transitionRules = NULL;
|
|
}
|
|
rbtz.complete(status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWritePartial;
|
|
}
|
|
|
|
if (olsonzid.length() > 0 && icutzver.length() > 0) {
|
|
UnicodeString *icutzprop = new UnicodeString(ICU_TZINFO_PROP);
|
|
icutzprop->append(olsonzid);
|
|
icutzprop->append((UChar)0x005B/*'['*/);
|
|
icutzprop->append(icutzver);
|
|
icutzprop->append(ICU_TZINFO_PARTIAL, -1);
|
|
appendMillis(start, *icutzprop);
|
|
icutzprop->append((UChar)0x005D/*']'*/);
|
|
customProps.addElement(icutzprop, status);
|
|
if (U_FAILURE(status)) {
|
|
delete icutzprop;
|
|
goto cleanupWritePartial;
|
|
}
|
|
}
|
|
writeZone(writer, rbtz, &customProps, status);
|
|
return;
|
|
|
|
cleanupWritePartial:
|
|
if (initial != NULL) {
|
|
delete initial;
|
|
}
|
|
if (transitionRules != NULL) {
|
|
while (!transitionRules->isEmpty()) {
|
|
TimeZoneRule *tr = (TimeZoneRule*)transitionRules->orphanElementAt(0);
|
|
delete tr;
|
|
}
|
|
delete transitionRules;
|
|
}
|
|
}
|
|
|
|
void
|
|
VTimeZone::writeSimple(UDate time, VTZWriter& writer, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
|
|
UVector customProps(uprv_deleteUObject, uhash_compareUnicodeString, status);
|
|
UnicodeString tzid;
|
|
|
|
// Extract simple rules
|
|
InitialTimeZoneRule *initial = NULL;
|
|
AnnualTimeZoneRule *std = NULL, *dst = NULL;
|
|
getSimpleRulesNear(time, initial, std, dst, status);
|
|
if (U_SUCCESS(status)) {
|
|
// Create a RuleBasedTimeZone with the subset rule
|
|
getID(tzid);
|
|
RuleBasedTimeZone rbtz(tzid, initial);
|
|
if (std != NULL && dst != NULL) {
|
|
rbtz.addTransitionRule(std, status);
|
|
rbtz.addTransitionRule(dst, status);
|
|
}
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteSimple;
|
|
}
|
|
|
|
if (olsonzid.length() > 0 && icutzver.length() > 0) {
|
|
UnicodeString *icutzprop = new UnicodeString(ICU_TZINFO_PROP);
|
|
icutzprop->append(olsonzid);
|
|
icutzprop->append((UChar)0x005B/*'['*/);
|
|
icutzprop->append(icutzver);
|
|
icutzprop->append(ICU_TZINFO_SIMPLE, -1);
|
|
appendMillis(time, *icutzprop);
|
|
icutzprop->append((UChar)0x005D/*']'*/);
|
|
customProps.addElement(icutzprop, status);
|
|
if (U_FAILURE(status)) {
|
|
delete icutzprop;
|
|
goto cleanupWriteSimple;
|
|
}
|
|
}
|
|
writeZone(writer, rbtz, &customProps, status);
|
|
}
|
|
return;
|
|
|
|
cleanupWriteSimple:
|
|
if (initial != NULL) {
|
|
delete initial;
|
|
}
|
|
if (std != NULL) {
|
|
delete std;
|
|
}
|
|
if (dst != NULL) {
|
|
delete dst;
|
|
}
|
|
}
|
|
|
|
void
|
|
VTimeZone::writeZone(VTZWriter& w, BasicTimeZone& basictz,
|
|
UVector* customProps, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
writeHeaders(w, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
|
|
if (customProps != NULL) {
|
|
for (int32_t i = 0; i < customProps->size(); i++) {
|
|
UnicodeString *custprop = (UnicodeString*)customProps->elementAt(i);
|
|
w.write(*custprop);
|
|
w.write(ICAL_NEWLINE);
|
|
}
|
|
}
|
|
|
|
UDate t = MIN_MILLIS;
|
|
UnicodeString dstName;
|
|
int32_t dstFromOffset = 0;
|
|
int32_t dstFromDSTSavings = 0;
|
|
int32_t dstToOffset = 0;
|
|
int32_t dstStartYear = 0;
|
|
int32_t dstMonth = 0;
|
|
int32_t dstDayOfWeek = 0;
|
|
int32_t dstWeekInMonth = 0;
|
|
int32_t dstMillisInDay = 0;
|
|
UDate dstStartTime = 0.0;
|
|
UDate dstUntilTime = 0.0;
|
|
int32_t dstCount = 0;
|
|
AnnualTimeZoneRule *finalDstRule = NULL;
|
|
|
|
UnicodeString stdName;
|
|
int32_t stdFromOffset = 0;
|
|
int32_t stdFromDSTSavings = 0;
|
|
int32_t stdToOffset = 0;
|
|
int32_t stdStartYear = 0;
|
|
int32_t stdMonth = 0;
|
|
int32_t stdDayOfWeek = 0;
|
|
int32_t stdWeekInMonth = 0;
|
|
int32_t stdMillisInDay = 0;
|
|
UDate stdStartTime = 0.0;
|
|
UDate stdUntilTime = 0.0;
|
|
int32_t stdCount = 0;
|
|
AnnualTimeZoneRule *finalStdRule = NULL;
|
|
|
|
int32_t year, month, dom, dow, doy, mid;
|
|
UBool hasTransitions = FALSE;
|
|
TimeZoneTransition tzt;
|
|
UBool tztAvail;
|
|
UnicodeString name;
|
|
UBool isDst;
|
|
|
|
// Going through all transitions
|
|
while (TRUE) {
|
|
tztAvail = basictz.getNextTransition(t, FALSE, tzt);
|
|
if (!tztAvail) {
|
|
break;
|
|
}
|
|
hasTransitions = TRUE;
|
|
t = tzt.getTime();
|
|
tzt.getTo()->getName(name);
|
|
isDst = (tzt.getTo()->getDSTSavings() != 0);
|
|
int32_t fromOffset = tzt.getFrom()->getRawOffset() + tzt.getFrom()->getDSTSavings();
|
|
int32_t fromDSTSavings = tzt.getFrom()->getDSTSavings();
|
|
int32_t toOffset = tzt.getTo()->getRawOffset() + tzt.getTo()->getDSTSavings();
|
|
Grego::timeToFields(tzt.getTime() + fromOffset, year, month, dom, dow, doy, mid);
|
|
int32_t weekInMonth = Grego::dayOfWeekInMonth(year, month, dom);
|
|
UBool sameRule = FALSE;
|
|
const AnnualTimeZoneRule *atzrule;
|
|
if (isDst) {
|
|
if (finalDstRule == NULL
|
|
&& (atzrule = dynamic_cast<const AnnualTimeZoneRule *>(tzt.getTo())) != NULL
|
|
&& atzrule->getEndYear() == AnnualTimeZoneRule::MAX_YEAR
|
|
) {
|
|
finalDstRule = (AnnualTimeZoneRule*)tzt.getTo()->clone();
|
|
}
|
|
if (dstCount > 0) {
|
|
if (year == dstStartYear + dstCount
|
|
&& name.compare(dstName) == 0
|
|
&& dstFromOffset == fromOffset
|
|
&& dstToOffset == toOffset
|
|
&& dstMonth == month
|
|
&& dstDayOfWeek == dow
|
|
&& dstWeekInMonth == weekInMonth
|
|
&& dstMillisInDay == mid) {
|
|
// Update until time
|
|
dstUntilTime = t;
|
|
dstCount++;
|
|
sameRule = TRUE;
|
|
}
|
|
if (!sameRule) {
|
|
if (dstCount == 1) {
|
|
writeZonePropsByTime(w, TRUE, dstName, dstFromOffset, dstToOffset, dstStartTime,
|
|
TRUE, status);
|
|
} else {
|
|
writeZonePropsByDOW(w, TRUE, dstName, dstFromOffset, dstToOffset,
|
|
dstMonth, dstWeekInMonth, dstDayOfWeek, dstStartTime, dstUntilTime, status);
|
|
}
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
}
|
|
}
|
|
if (!sameRule) {
|
|
// Reset this DST information
|
|
dstName = name;
|
|
dstFromOffset = fromOffset;
|
|
dstFromDSTSavings = fromDSTSavings;
|
|
dstToOffset = toOffset;
|
|
dstStartYear = year;
|
|
dstMonth = month;
|
|
dstDayOfWeek = dow;
|
|
dstWeekInMonth = weekInMonth;
|
|
dstMillisInDay = mid;
|
|
dstStartTime = dstUntilTime = t;
|
|
dstCount = 1;
|
|
}
|
|
if (finalStdRule != NULL && finalDstRule != NULL) {
|
|
break;
|
|
}
|
|
} else {
|
|
if (finalStdRule == NULL
|
|
&& (atzrule = dynamic_cast<const AnnualTimeZoneRule *>(tzt.getTo())) != NULL
|
|
&& atzrule->getEndYear() == AnnualTimeZoneRule::MAX_YEAR
|
|
) {
|
|
finalStdRule = (AnnualTimeZoneRule*)tzt.getTo()->clone();
|
|
}
|
|
if (stdCount > 0) {
|
|
if (year == stdStartYear + stdCount
|
|
&& name.compare(stdName) == 0
|
|
&& stdFromOffset == fromOffset
|
|
&& stdToOffset == toOffset
|
|
&& stdMonth == month
|
|
&& stdDayOfWeek == dow
|
|
&& stdWeekInMonth == weekInMonth
|
|
&& stdMillisInDay == mid) {
|
|
// Update until time
|
|
stdUntilTime = t;
|
|
stdCount++;
|
|
sameRule = TRUE;
|
|
}
|
|
if (!sameRule) {
|
|
if (stdCount == 1) {
|
|
writeZonePropsByTime(w, FALSE, stdName, stdFromOffset, stdToOffset, stdStartTime,
|
|
TRUE, status);
|
|
} else {
|
|
writeZonePropsByDOW(w, FALSE, stdName, stdFromOffset, stdToOffset,
|
|
stdMonth, stdWeekInMonth, stdDayOfWeek, stdStartTime, stdUntilTime, status);
|
|
}
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
}
|
|
}
|
|
if (!sameRule) {
|
|
// Reset this STD information
|
|
stdName = name;
|
|
stdFromOffset = fromOffset;
|
|
stdFromDSTSavings = fromDSTSavings;
|
|
stdToOffset = toOffset;
|
|
stdStartYear = year;
|
|
stdMonth = month;
|
|
stdDayOfWeek = dow;
|
|
stdWeekInMonth = weekInMonth;
|
|
stdMillisInDay = mid;
|
|
stdStartTime = stdUntilTime = t;
|
|
stdCount = 1;
|
|
}
|
|
if (finalStdRule != NULL && finalDstRule != NULL) {
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
if (!hasTransitions) {
|
|
// No transition - put a single non transition RDATE
|
|
int32_t raw, dst, offset;
|
|
basictz.getOffset(0.0/*any time*/, FALSE, raw, dst, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
offset = raw + dst;
|
|
isDst = (dst != 0);
|
|
UnicodeString tzid;
|
|
basictz.getID(tzid);
|
|
getDefaultTZName(tzid, isDst, name);
|
|
writeZonePropsByTime(w, isDst, name,
|
|
offset, offset, DEF_TZSTARTTIME - offset, FALSE, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
} else {
|
|
if (dstCount > 0) {
|
|
if (finalDstRule == NULL) {
|
|
if (dstCount == 1) {
|
|
writeZonePropsByTime(w, TRUE, dstName, dstFromOffset, dstToOffset, dstStartTime,
|
|
TRUE, status);
|
|
} else {
|
|
writeZonePropsByDOW(w, TRUE, dstName, dstFromOffset, dstToOffset,
|
|
dstMonth, dstWeekInMonth, dstDayOfWeek, dstStartTime, dstUntilTime, status);
|
|
}
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
} else {
|
|
if (dstCount == 1) {
|
|
writeFinalRule(w, TRUE, finalDstRule,
|
|
dstFromOffset - dstFromDSTSavings, dstFromDSTSavings, dstStartTime, status);
|
|
} else {
|
|
// Use a single rule if possible
|
|
if (isEquivalentDateRule(dstMonth, dstWeekInMonth, dstDayOfWeek, finalDstRule->getRule())) {
|
|
writeZonePropsByDOW(w, TRUE, dstName, dstFromOffset, dstToOffset,
|
|
dstMonth, dstWeekInMonth, dstDayOfWeek, dstStartTime, MAX_MILLIS, status);
|
|
} else {
|
|
// Not equivalent rule - write out two different rules
|
|
writeZonePropsByDOW(w, TRUE, dstName, dstFromOffset, dstToOffset,
|
|
dstMonth, dstWeekInMonth, dstDayOfWeek, dstStartTime, dstUntilTime, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
UDate nextStart;
|
|
UBool nextStartAvail = finalDstRule->getNextStart(dstUntilTime, dstFromOffset - dstFromDSTSavings, dstFromDSTSavings, false, nextStart);
|
|
U_ASSERT(nextStartAvail);
|
|
if (nextStartAvail) {
|
|
writeFinalRule(w, TRUE, finalDstRule,
|
|
dstFromOffset - dstFromDSTSavings, dstFromDSTSavings, nextStart, status);
|
|
}
|
|
}
|
|
}
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
}
|
|
}
|
|
if (stdCount > 0) {
|
|
if (finalStdRule == NULL) {
|
|
if (stdCount == 1) {
|
|
writeZonePropsByTime(w, FALSE, stdName, stdFromOffset, stdToOffset, stdStartTime,
|
|
TRUE, status);
|
|
} else {
|
|
writeZonePropsByDOW(w, FALSE, stdName, stdFromOffset, stdToOffset,
|
|
stdMonth, stdWeekInMonth, stdDayOfWeek, stdStartTime, stdUntilTime, status);
|
|
}
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
} else {
|
|
if (stdCount == 1) {
|
|
writeFinalRule(w, FALSE, finalStdRule,
|
|
stdFromOffset - stdFromDSTSavings, stdFromDSTSavings, stdStartTime, status);
|
|
} else {
|
|
// Use a single rule if possible
|
|
if (isEquivalentDateRule(stdMonth, stdWeekInMonth, stdDayOfWeek, finalStdRule->getRule())) {
|
|
writeZonePropsByDOW(w, FALSE, stdName, stdFromOffset, stdToOffset,
|
|
stdMonth, stdWeekInMonth, stdDayOfWeek, stdStartTime, MAX_MILLIS, status);
|
|
} else {
|
|
// Not equivalent rule - write out two different rules
|
|
writeZonePropsByDOW(w, FALSE, stdName, stdFromOffset, stdToOffset,
|
|
stdMonth, stdWeekInMonth, stdDayOfWeek, stdStartTime, stdUntilTime, status);
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
UDate nextStart;
|
|
UBool nextStartAvail = finalStdRule->getNextStart(stdUntilTime, stdFromOffset - stdFromDSTSavings, stdFromDSTSavings, false, nextStart);
|
|
U_ASSERT(nextStartAvail);
|
|
if (nextStartAvail) {
|
|
writeFinalRule(w, FALSE, finalStdRule,
|
|
stdFromOffset - stdFromDSTSavings, stdFromDSTSavings, nextStart, status);
|
|
}
|
|
}
|
|
}
|
|
if (U_FAILURE(status)) {
|
|
goto cleanupWriteZone;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
writeFooter(w, status);
|
|
|
|
cleanupWriteZone:
|
|
|
|
if (finalStdRule != NULL) {
|
|
delete finalStdRule;
|
|
}
|
|
if (finalDstRule != NULL) {
|
|
delete finalDstRule;
|
|
}
|
|
}
|
|
|
|
void
|
|
VTimeZone::writeHeaders(VTZWriter& writer, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
UnicodeString tzid;
|
|
tz->getID(tzid);
|
|
|
|
writer.write(ICAL_BEGIN);
|
|
writer.write(COLON);
|
|
writer.write(ICAL_VTIMEZONE);
|
|
writer.write(ICAL_NEWLINE);
|
|
writer.write(ICAL_TZID);
|
|
writer.write(COLON);
|
|
writer.write(tzid);
|
|
writer.write(ICAL_NEWLINE);
|
|
if (tzurl.length() != 0) {
|
|
writer.write(ICAL_TZURL);
|
|
writer.write(COLON);
|
|
writer.write(tzurl);
|
|
writer.write(ICAL_NEWLINE);
|
|
}
|
|
if (lastmod != MAX_MILLIS) {
|
|
UnicodeString lastmodStr;
|
|
writer.write(ICAL_LASTMOD);
|
|
writer.write(COLON);
|
|
writer.write(getUTCDateTimeString(lastmod, lastmodStr));
|
|
writer.write(ICAL_NEWLINE);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Write the closing section of the VTIMEZONE definition block
|
|
*/
|
|
void
|
|
VTimeZone::writeFooter(VTZWriter& writer, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
writer.write(ICAL_END);
|
|
writer.write(COLON);
|
|
writer.write(ICAL_VTIMEZONE);
|
|
writer.write(ICAL_NEWLINE);
|
|
}
|
|
|
|
/*
|
|
* Write a single start time
|
|
*/
|
|
void
|
|
VTimeZone::writeZonePropsByTime(VTZWriter& writer, UBool isDst, const UnicodeString& zonename,
|
|
int32_t fromOffset, int32_t toOffset, UDate time, UBool withRDATE,
|
|
UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
beginZoneProps(writer, isDst, zonename, fromOffset, toOffset, time, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
if (withRDATE) {
|
|
writer.write(ICAL_RDATE);
|
|
writer.write(COLON);
|
|
UnicodeString timestr;
|
|
writer.write(getDateTimeString(time + fromOffset, timestr));
|
|
writer.write(ICAL_NEWLINE);
|
|
}
|
|
endZoneProps(writer, isDst, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Write start times defined by a DOM rule using VTIMEZONE RRULE
|
|
*/
|
|
void
|
|
VTimeZone::writeZonePropsByDOM(VTZWriter& writer, UBool isDst, const UnicodeString& zonename,
|
|
int32_t fromOffset, int32_t toOffset,
|
|
int32_t month, int32_t dayOfMonth, UDate startTime, UDate untilTime,
|
|
UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
beginZoneProps(writer, isDst, zonename, fromOffset, toOffset, startTime, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
beginRRULE(writer, month, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
writer.write(ICAL_BYMONTHDAY);
|
|
writer.write(EQUALS_SIGN);
|
|
UnicodeString dstr;
|
|
appendAsciiDigits(dayOfMonth, 0, dstr);
|
|
writer.write(dstr);
|
|
if (untilTime != MAX_MILLIS) {
|
|
appendUNTIL(writer, getDateTimeString(untilTime + fromOffset, dstr), status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
}
|
|
writer.write(ICAL_NEWLINE);
|
|
endZoneProps(writer, isDst, status);
|
|
}
|
|
|
|
/*
|
|
* Write start times defined by a DOW rule using VTIMEZONE RRULE
|
|
*/
|
|
void
|
|
VTimeZone::writeZonePropsByDOW(VTZWriter& writer, UBool isDst, const UnicodeString& zonename,
|
|
int32_t fromOffset, int32_t toOffset,
|
|
int32_t month, int32_t weekInMonth, int32_t dayOfWeek,
|
|
UDate startTime, UDate untilTime, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
beginZoneProps(writer, isDst, zonename, fromOffset, toOffset, startTime, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
beginRRULE(writer, month, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
writer.write(ICAL_BYDAY);
|
|
writer.write(EQUALS_SIGN);
|
|
UnicodeString dstr;
|
|
appendAsciiDigits(weekInMonth, 0, dstr);
|
|
writer.write(dstr); // -4, -3, -2, -1, 1, 2, 3, 4
|
|
writer.write(ICAL_DOW_NAMES[dayOfWeek - 1]); // SU, MO, TU...
|
|
|
|
if (untilTime != MAX_MILLIS) {
|
|
appendUNTIL(writer, getDateTimeString(untilTime + fromOffset, dstr), status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
}
|
|
writer.write(ICAL_NEWLINE);
|
|
endZoneProps(writer, isDst, status);
|
|
}
|
|
|
|
/*
|
|
* Write start times defined by a DOW_GEQ_DOM rule using VTIMEZONE RRULE
|
|
*/
|
|
void
|
|
VTimeZone::writeZonePropsByDOW_GEQ_DOM(VTZWriter& writer, UBool isDst, const UnicodeString& zonename,
|
|
int32_t fromOffset, int32_t toOffset,
|
|
int32_t month, int32_t dayOfMonth, int32_t dayOfWeek,
|
|
UDate startTime, UDate untilTime, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
// Check if this rule can be converted to DOW rule
|
|
if (dayOfMonth%7 == 1) {
|
|
// Can be represented by DOW rule
|
|
writeZonePropsByDOW(writer, isDst, zonename, fromOffset, toOffset,
|
|
month, (dayOfMonth + 6)/7, dayOfWeek, startTime, untilTime, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
} else if (month != UCAL_FEBRUARY && (MONTHLENGTH[month] - dayOfMonth)%7 == 6) {
|
|
// Can be represented by DOW rule with negative week number
|
|
writeZonePropsByDOW(writer, isDst, zonename, fromOffset, toOffset,
|
|
month, -1*((MONTHLENGTH[month] - dayOfMonth + 1)/7), dayOfWeek, startTime, untilTime, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
} else {
|
|
// Otherwise, use BYMONTHDAY to include all possible dates
|
|
beginZoneProps(writer, isDst, zonename, fromOffset, toOffset, startTime, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
// Check if all days are in the same month
|
|
int32_t startDay = dayOfMonth;
|
|
int32_t currentMonthDays = 7;
|
|
|
|
if (dayOfMonth <= 0) {
|
|
// The start day is in previous month
|
|
int32_t prevMonthDays = 1 - dayOfMonth;
|
|
currentMonthDays -= prevMonthDays;
|
|
|
|
int32_t prevMonth = (month - 1) < 0 ? 11 : month - 1;
|
|
|
|
// Note: When a rule is separated into two, UNTIL attribute needs to be
|
|
// calculated for each of them. For now, we skip this, because we basically use this method
|
|
// only for final rules, which does not have the UNTIL attribute
|
|
writeZonePropsByDOW_GEQ_DOM_sub(writer, prevMonth, -prevMonthDays, dayOfWeek, prevMonthDays,
|
|
MAX_MILLIS /* Do not use UNTIL */, fromOffset, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
|
|
// Start from 1 for the rest
|
|
startDay = 1;
|
|
} else if (dayOfMonth + 6 > MONTHLENGTH[month]) {
|
|
// Note: This code does not actually work well in February. For now, days in month in
|
|
// non-leap year.
|
|
int32_t nextMonthDays = dayOfMonth + 6 - MONTHLENGTH[month];
|
|
currentMonthDays -= nextMonthDays;
|
|
|
|
int32_t nextMonth = (month + 1) > 11 ? 0 : month + 1;
|
|
|
|
writeZonePropsByDOW_GEQ_DOM_sub(writer, nextMonth, 1, dayOfWeek, nextMonthDays,
|
|
MAX_MILLIS /* Do not use UNTIL */, fromOffset, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
}
|
|
writeZonePropsByDOW_GEQ_DOM_sub(writer, month, startDay, dayOfWeek, currentMonthDays,
|
|
untilTime, fromOffset, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
endZoneProps(writer, isDst, status);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Called from writeZonePropsByDOW_GEQ_DOM
|
|
*/
|
|
void
|
|
VTimeZone::writeZonePropsByDOW_GEQ_DOM_sub(VTZWriter& writer, int32_t month, int32_t dayOfMonth,
|
|
int32_t dayOfWeek, int32_t numDays,
|
|
UDate untilTime, int32_t fromOffset, UErrorCode& status) const {
|
|
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
int32_t startDayNum = dayOfMonth;
|
|
UBool isFeb = (month == UCAL_FEBRUARY);
|
|
if (dayOfMonth < 0 && !isFeb) {
|
|
// Use positive number if possible
|
|
startDayNum = MONTHLENGTH[month] + dayOfMonth + 1;
|
|
}
|
|
beginRRULE(writer, month, status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
writer.write(ICAL_BYDAY);
|
|
writer.write(EQUALS_SIGN);
|
|
writer.write(ICAL_DOW_NAMES[dayOfWeek - 1]); // SU, MO, TU...
|
|
writer.write(SEMICOLON);
|
|
writer.write(ICAL_BYMONTHDAY);
|
|
writer.write(EQUALS_SIGN);
|
|
|
|
UnicodeString dstr;
|
|
appendAsciiDigits(startDayNum, 0, dstr);
|
|
writer.write(dstr);
|
|
for (int32_t i = 1; i < numDays; i++) {
|
|
writer.write(COMMA);
|
|
dstr.remove();
|
|
appendAsciiDigits(startDayNum + i, 0, dstr);
|
|
writer.write(dstr);
|
|
}
|
|
|
|
if (untilTime != MAX_MILLIS) {
|
|
appendUNTIL(writer, getDateTimeString(untilTime + fromOffset, dstr), status);
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
}
|
|
writer.write(ICAL_NEWLINE);
|
|
}
|
|
|
|
/*
|
|
* Write start times defined by a DOW_LEQ_DOM rule using VTIMEZONE RRULE
|
|
*/
|
|
void
|
|
VTimeZone::writeZonePropsByDOW_LEQ_DOM(VTZWriter& writer, UBool isDst, const UnicodeString& zonename,
|
|
int32_t fromOffset, int32_t toOffset,
|
|
int32_t month, int32_t dayOfMonth, int32_t dayOfWeek,
|
|
UDate startTime, UDate untilTime, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
// Check if this rule can be converted to DOW rule
|
|
if (dayOfMonth%7 == 0) {
|
|
// Can be represented by DOW rule
|
|
writeZonePropsByDOW(writer, isDst, zonename, fromOffset, toOffset,
|
|
month, dayOfMonth/7, dayOfWeek, startTime, untilTime, status);
|
|
} else if (month != UCAL_FEBRUARY && (MONTHLENGTH[month] - dayOfMonth)%7 == 0){
|
|
// Can be represented by DOW rule with negative week number
|
|
writeZonePropsByDOW(writer, isDst, zonename, fromOffset, toOffset,
|
|
month, -1*((MONTHLENGTH[month] - dayOfMonth)/7 + 1), dayOfWeek, startTime, untilTime, status);
|
|
} else if (month == UCAL_FEBRUARY && dayOfMonth == 29) {
|
|
// Specical case for February
|
|
writeZonePropsByDOW(writer, isDst, zonename, fromOffset, toOffset,
|
|
UCAL_FEBRUARY, -1, dayOfWeek, startTime, untilTime, status);
|
|
} else {
|
|
// Otherwise, convert this to DOW_GEQ_DOM rule
|
|
writeZonePropsByDOW_GEQ_DOM(writer, isDst, zonename, fromOffset, toOffset,
|
|
month, dayOfMonth - 6, dayOfWeek, startTime, untilTime, status);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Write the final time zone rule using RRULE, with no UNTIL attribute
|
|
*/
|
|
void
|
|
VTimeZone::writeFinalRule(VTZWriter& writer, UBool isDst, const AnnualTimeZoneRule* rule,
|
|
int32_t fromRawOffset, int32_t fromDSTSavings,
|
|
UDate startTime, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
UBool modifiedRule = TRUE;
|
|
const DateTimeRule *dtrule = toWallTimeRule(rule->getRule(), fromRawOffset, fromDSTSavings);
|
|
if (dtrule == NULL) {
|
|
modifiedRule = FALSE;
|
|
dtrule = rule->getRule();
|
|
}
|
|
|
|
// If the rule's mills in a day is out of range, adjust start time.
|
|
// Olson tzdata supports 24:00 of a day, but VTIMEZONE does not.
|
|
// See ticket#7008/#7518
|
|
|
|
int32_t timeInDay = dtrule->getRuleMillisInDay();
|
|
if (timeInDay < 0) {
|
|
startTime = startTime + (0 - timeInDay);
|
|
} else if (timeInDay >= U_MILLIS_PER_DAY) {
|
|
startTime = startTime - (timeInDay - (U_MILLIS_PER_DAY - 1));
|
|
}
|
|
|
|
int32_t toOffset = rule->getRawOffset() + rule->getDSTSavings();
|
|
UnicodeString name;
|
|
rule->getName(name);
|
|
switch (dtrule->getDateRuleType()) {
|
|
case DateTimeRule::DOM:
|
|
writeZonePropsByDOM(writer, isDst, name, fromRawOffset + fromDSTSavings, toOffset,
|
|
dtrule->getRuleMonth(), dtrule->getRuleDayOfMonth(), startTime, MAX_MILLIS, status);
|
|
break;
|
|
case DateTimeRule::DOW:
|
|
writeZonePropsByDOW(writer, isDst, name, fromRawOffset + fromDSTSavings, toOffset,
|
|
dtrule->getRuleMonth(), dtrule->getRuleWeekInMonth(), dtrule->getRuleDayOfWeek(), startTime, MAX_MILLIS, status);
|
|
break;
|
|
case DateTimeRule::DOW_GEQ_DOM:
|
|
writeZonePropsByDOW_GEQ_DOM(writer, isDst, name, fromRawOffset + fromDSTSavings, toOffset,
|
|
dtrule->getRuleMonth(), dtrule->getRuleDayOfMonth(), dtrule->getRuleDayOfWeek(), startTime, MAX_MILLIS, status);
|
|
break;
|
|
case DateTimeRule::DOW_LEQ_DOM:
|
|
writeZonePropsByDOW_LEQ_DOM(writer, isDst, name, fromRawOffset + fromDSTSavings, toOffset,
|
|
dtrule->getRuleMonth(), dtrule->getRuleDayOfMonth(), dtrule->getRuleDayOfWeek(), startTime, MAX_MILLIS, status);
|
|
break;
|
|
}
|
|
if (modifiedRule) {
|
|
delete dtrule;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Write the opening section of zone properties
|
|
*/
|
|
void
|
|
VTimeZone::beginZoneProps(VTZWriter& writer, UBool isDst, const UnicodeString& zonename,
|
|
int32_t fromOffset, int32_t toOffset, UDate startTime, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
writer.write(ICAL_BEGIN);
|
|
writer.write(COLON);
|
|
if (isDst) {
|
|
writer.write(ICAL_DAYLIGHT);
|
|
} else {
|
|
writer.write(ICAL_STANDARD);
|
|
}
|
|
writer.write(ICAL_NEWLINE);
|
|
|
|
UnicodeString dstr;
|
|
|
|
// TZOFFSETTO
|
|
writer.write(ICAL_TZOFFSETTO);
|
|
writer.write(COLON);
|
|
millisToOffset(toOffset, dstr);
|
|
writer.write(dstr);
|
|
writer.write(ICAL_NEWLINE);
|
|
|
|
// TZOFFSETFROM
|
|
writer.write(ICAL_TZOFFSETFROM);
|
|
writer.write(COLON);
|
|
millisToOffset(fromOffset, dstr);
|
|
writer.write(dstr);
|
|
writer.write(ICAL_NEWLINE);
|
|
|
|
// TZNAME
|
|
writer.write(ICAL_TZNAME);
|
|
writer.write(COLON);
|
|
writer.write(zonename);
|
|
writer.write(ICAL_NEWLINE);
|
|
|
|
// DTSTART
|
|
writer.write(ICAL_DTSTART);
|
|
writer.write(COLON);
|
|
writer.write(getDateTimeString(startTime + fromOffset, dstr));
|
|
writer.write(ICAL_NEWLINE);
|
|
}
|
|
|
|
/*
|
|
* Writes the closing section of zone properties
|
|
*/
|
|
void
|
|
VTimeZone::endZoneProps(VTZWriter& writer, UBool isDst, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
// END:STANDARD or END:DAYLIGHT
|
|
writer.write(ICAL_END);
|
|
writer.write(COLON);
|
|
if (isDst) {
|
|
writer.write(ICAL_DAYLIGHT);
|
|
} else {
|
|
writer.write(ICAL_STANDARD);
|
|
}
|
|
writer.write(ICAL_NEWLINE);
|
|
}
|
|
|
|
/*
|
|
* Write the beggining part of RRULE line
|
|
*/
|
|
void
|
|
VTimeZone::beginRRULE(VTZWriter& writer, int32_t month, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
UnicodeString dstr;
|
|
writer.write(ICAL_RRULE);
|
|
writer.write(COLON);
|
|
writer.write(ICAL_FREQ);
|
|
writer.write(EQUALS_SIGN);
|
|
writer.write(ICAL_YEARLY);
|
|
writer.write(SEMICOLON);
|
|
writer.write(ICAL_BYMONTH);
|
|
writer.write(EQUALS_SIGN);
|
|
appendAsciiDigits(month + 1, 0, dstr);
|
|
writer.write(dstr);
|
|
writer.write(SEMICOLON);
|
|
}
|
|
|
|
/*
|
|
* Append the UNTIL attribute after RRULE line
|
|
*/
|
|
void
|
|
VTimeZone::appendUNTIL(VTZWriter& writer, const UnicodeString& until, UErrorCode& status) const {
|
|
if (U_FAILURE(status)) {
|
|
return;
|
|
}
|
|
if (until.length() > 0) {
|
|
writer.write(SEMICOLON);
|
|
writer.write(ICAL_UNTIL);
|
|
writer.write(EQUALS_SIGN);
|
|
writer.write(until);
|
|
}
|
|
}
|
|
|
|
U_NAMESPACE_END
|
|
|
|
#endif /* #if !UCONFIG_NO_FORMATTING */
|
|
|
|
//eof
|