477 lines
18 KiB
C++
477 lines
18 KiB
C++
/***********************************************************************
|
|
* COPYRIGHT:
|
|
* Copyright (c) 1997-2013, International Business Machines Corporation
|
|
* and others. All Rights Reserved.
|
|
***********************************************************************/
|
|
|
|
#include "unicode/utypes.h"
|
|
|
|
#if !UCONFIG_NO_FORMATTING
|
|
|
|
#include "callimts.h"
|
|
#include "caltest.h"
|
|
#include "unicode/calendar.h"
|
|
#include "unicode/gregocal.h"
|
|
#include "unicode/datefmt.h"
|
|
#include "unicode/smpdtfmt.h"
|
|
#include "putilimp.h"
|
|
#include "cstring.h"
|
|
|
|
U_NAMESPACE_USE
|
|
void CalendarLimitTest::runIndexedTest( int32_t index, UBool exec, const char* &name, char* /*par*/ )
|
|
{
|
|
if (exec) logln("TestSuite TestCalendarLimit");
|
|
switch (index) {
|
|
// Re-enable this later
|
|
case 0:
|
|
name = "TestCalendarExtremeLimit";
|
|
if (exec) {
|
|
logln("TestCalendarExtremeLimit---"); logln("");
|
|
TestCalendarExtremeLimit();
|
|
}
|
|
break;
|
|
case 1:
|
|
name = "TestLimits";
|
|
if (exec) {
|
|
logln("TestLimits---"); logln("");
|
|
TestLimits();
|
|
}
|
|
break;
|
|
|
|
default: name = ""; break;
|
|
}
|
|
}
|
|
|
|
|
|
// *****************************************************************************
|
|
// class CalendarLimitTest
|
|
// *****************************************************************************
|
|
|
|
// -------------------------------------
|
|
void
|
|
CalendarLimitTest::test(UDate millis, icu::Calendar* cal, icu::DateFormat* fmt)
|
|
{
|
|
static const UDate kDrift = 1e-10;
|
|
UErrorCode exception = U_ZERO_ERROR;
|
|
UnicodeString theDate;
|
|
UErrorCode status = U_ZERO_ERROR;
|
|
cal->setTime(millis, exception);
|
|
if (U_SUCCESS(exception)) {
|
|
fmt->format(millis, theDate);
|
|
UDate dt = fmt->parse(theDate, status);
|
|
// allow a small amount of error (drift)
|
|
if(! withinErr(dt, millis, kDrift)) {
|
|
errln("FAIL:round trip for large milli, got: %.1lf wanted: %.1lf. (delta %.2lf greater than %.2lf)",
|
|
dt, millis, uprv_fabs(millis-dt), uprv_fabs(dt*kDrift));
|
|
logln(UnicodeString(" ") + theDate + " " + CalendarTest::calToStr(*cal));
|
|
} else {
|
|
logln(UnicodeString("OK: got ") + dt + ", wanted " + millis);
|
|
logln(UnicodeString(" ") + theDate);
|
|
}
|
|
}
|
|
}
|
|
|
|
// -------------------------------------
|
|
|
|
// bug 986c: deprecate nextDouble/previousDouble
|
|
//|double
|
|
//|CalendarLimitTest::nextDouble(double a)
|
|
//|{
|
|
//| return uprv_nextDouble(a, TRUE);
|
|
//|}
|
|
//|
|
|
//|double
|
|
//|CalendarLimitTest::previousDouble(double a)
|
|
//|{
|
|
//| return uprv_nextDouble(a, FALSE);
|
|
//|}
|
|
|
|
UBool
|
|
CalendarLimitTest::withinErr(double a, double b, double err)
|
|
{
|
|
return ( uprv_fabs(a - b) < uprv_fabs(a * err) );
|
|
}
|
|
|
|
void
|
|
CalendarLimitTest::TestCalendarExtremeLimit()
|
|
{
|
|
UErrorCode status = U_ZERO_ERROR;
|
|
Calendar *cal = Calendar::createInstance(status);
|
|
if (failure(status, "Calendar::createInstance", TRUE)) return;
|
|
cal->adoptTimeZone(TimeZone::createTimeZone("GMT"));
|
|
DateFormat *fmt = DateFormat::createDateTimeInstance();
|
|
if(!fmt || !cal) {
|
|
dataerrln("can't open cal and/or fmt");
|
|
return;
|
|
}
|
|
fmt->adoptCalendar(cal);
|
|
((SimpleDateFormat*) fmt)->applyPattern("HH:mm:ss.SSS Z, EEEE, MMMM d, yyyy G");
|
|
|
|
|
|
// This test used to test the algorithmic limits of the dates that
|
|
// GregorianCalendar could handle. However, the algorithm has
|
|
// been rewritten completely since then and the prior limits no
|
|
// longer apply. Instead, we now do basic round-trip testing of
|
|
// some extreme (but still manageable) dates.
|
|
UDate m;
|
|
logln("checking 1e16..1e17");
|
|
for ( m = 1e16; m < 1e17; m *= 1.1) {
|
|
test(m, cal, fmt);
|
|
}
|
|
logln("checking -1e14..-1e15");
|
|
for ( m = -1e14; m > -1e15; m *= 1.1) {
|
|
test(m, cal, fmt);
|
|
}
|
|
|
|
// This is 2^52 - 1, the largest allowable mantissa with a 0
|
|
// exponent in a 64-bit double
|
|
UDate VERY_EARLY_MILLIS = - 4503599627370495.0;
|
|
UDate VERY_LATE_MILLIS = 4503599627370495.0;
|
|
|
|
// I am removing the previousDouble and nextDouble calls below for
|
|
// two reasons: 1. As part of jitterbug 986, I am deprecating
|
|
// these methods and removing calls to them. 2. This test is a
|
|
// non-critical boundary behavior test.
|
|
test(VERY_EARLY_MILLIS, cal, fmt);
|
|
//test(previousDouble(VERY_EARLY_MILLIS), cal, fmt);
|
|
test(VERY_LATE_MILLIS, cal, fmt);
|
|
//test(nextDouble(VERY_LATE_MILLIS), cal, fmt);
|
|
delete fmt;
|
|
}
|
|
|
|
void
|
|
CalendarLimitTest::TestLimits(void) {
|
|
static const UDate DEFAULT_START = 944006400000.0; // 1999-12-01T00:00Z
|
|
static const int32_t DEFAULT_END = -120; // Default for non-quick is run 2 minutes
|
|
|
|
static const struct {
|
|
const char *type;
|
|
UBool hasLeapMonth;
|
|
UDate actualTestStart;
|
|
int32_t actualTestEnd;
|
|
} TestCases[] = {
|
|
{"gregorian", FALSE, DEFAULT_START, DEFAULT_END},
|
|
{"japanese", FALSE, 596937600000.0, DEFAULT_END}, // 1988-12-01T00:00Z, Showa 63
|
|
{"buddhist", FALSE, DEFAULT_START, DEFAULT_END},
|
|
{"roc", FALSE, DEFAULT_START, DEFAULT_END},
|
|
{"persian", FALSE, DEFAULT_START, DEFAULT_END},
|
|
{"islamic-civil", FALSE, DEFAULT_START, DEFAULT_END},
|
|
{"islamic", FALSE, DEFAULT_START, 800000}, // Approx. 2250 years from now, after which some rounding errors occur in Islamic calendar
|
|
{"hebrew", TRUE, DEFAULT_START, DEFAULT_END},
|
|
{"chinese", TRUE, DEFAULT_START, DEFAULT_END},
|
|
{"dangi", TRUE, DEFAULT_START, DEFAULT_END},
|
|
{"indian", FALSE, DEFAULT_START, DEFAULT_END},
|
|
{"coptic", FALSE, DEFAULT_START, DEFAULT_END},
|
|
{"ethiopic", FALSE, DEFAULT_START, DEFAULT_END},
|
|
{"ethiopic-amete-alem", FALSE, DEFAULT_START, DEFAULT_END},
|
|
{NULL, FALSE, 0, 0}
|
|
};
|
|
|
|
int16_t i = 0;
|
|
char buf[64];
|
|
|
|
for (i = 0; TestCases[i].type; i++) {
|
|
UErrorCode status = U_ZERO_ERROR;
|
|
uprv_strcpy(buf, "root@calendar=");
|
|
strcat(buf, TestCases[i].type);
|
|
Calendar *cal = Calendar::createInstance(buf, status);
|
|
if (failure(status, "Calendar::createInstance", TRUE)) {
|
|
continue;
|
|
}
|
|
if (uprv_strcmp(cal->getType(), TestCases[i].type) != 0) {
|
|
errln((UnicodeString)"FAIL: Wrong calendar type: " + cal->getType()
|
|
+ " Requested: " + TestCases[i].type);
|
|
delete cal;
|
|
continue;
|
|
}
|
|
// Do the test
|
|
doTheoreticalLimitsTest(*cal, TestCases[i].hasLeapMonth);
|
|
doLimitsTest(*cal, TestCases[i].actualTestStart,TestCases[i].actualTestEnd);
|
|
delete cal;
|
|
}
|
|
}
|
|
|
|
void
|
|
CalendarLimitTest::doTheoreticalLimitsTest(Calendar& cal, UBool leapMonth) {
|
|
const char* calType = cal.getType();
|
|
|
|
int32_t nDOW = cal.getMaximum(UCAL_DAY_OF_WEEK);
|
|
int32_t maxDOY = cal.getMaximum(UCAL_DAY_OF_YEAR);
|
|
int32_t lmaxDOW = cal.getLeastMaximum(UCAL_DAY_OF_YEAR);
|
|
int32_t maxWOY = cal.getMaximum(UCAL_WEEK_OF_YEAR);
|
|
int32_t lmaxWOY = cal.getLeastMaximum(UCAL_WEEK_OF_YEAR);
|
|
int32_t maxM = cal.getMaximum(UCAL_MONTH) + 1;
|
|
int32_t lmaxM = cal.getLeastMaximum(UCAL_MONTH) + 1;
|
|
int32_t maxDOM = cal.getMaximum(UCAL_DAY_OF_MONTH);
|
|
int32_t lmaxDOM = cal.getLeastMaximum(UCAL_DAY_OF_MONTH);
|
|
int32_t maxDOWIM = cal.getMaximum(UCAL_DAY_OF_WEEK_IN_MONTH);
|
|
int32_t lmaxDOWIM = cal.getLeastMaximum(UCAL_DAY_OF_WEEK_IN_MONTH);
|
|
int32_t maxWOM = cal.getMaximum(UCAL_WEEK_OF_MONTH);
|
|
int32_t lmaxWOM = cal.getLeastMaximum(UCAL_WEEK_OF_MONTH);
|
|
int32_t minDaysInFirstWeek = cal.getMinimalDaysInFirstWeek();
|
|
|
|
// Day of year
|
|
int32_t expected;
|
|
if (!leapMonth) {
|
|
expected = maxM*maxDOM;
|
|
if (maxDOY > expected) {
|
|
errln((UnicodeString)"FAIL: [" + calType + "] Maximum value of DAY_OF_YEAR is too big: "
|
|
+ maxDOY + "/expected: <=" + expected);
|
|
}
|
|
expected = lmaxM*lmaxDOM;
|
|
if (lmaxDOW < expected) {
|
|
errln((UnicodeString)"FAIL: [" + calType + "] Least maximum value of DAY_OF_YEAR is too small: "
|
|
+ lmaxDOW + "/expected: >=" + expected);
|
|
}
|
|
}
|
|
|
|
// Week of year
|
|
expected = maxDOY/nDOW + 1;
|
|
if (maxWOY > expected) {
|
|
errln((UnicodeString)"FAIL: [" + calType + "] Maximum value of WEEK_OF_YEAR is too big: "
|
|
+ maxWOY + "/expected: <=" + expected);
|
|
}
|
|
expected = lmaxDOW/nDOW;
|
|
if (lmaxWOY < expected) {
|
|
errln((UnicodeString)"FAIL: [" + calType + "] Least maximum value of WEEK_OF_YEAR is too small: "
|
|
+ lmaxWOY + "/expected >=" + expected);
|
|
}
|
|
|
|
// Day of week in month
|
|
expected = (maxDOM + nDOW - 1)/nDOW;
|
|
if (maxDOWIM != expected) {
|
|
errln((UnicodeString)"FAIL: [" + calType + "] Maximum value of DAY_OF_WEEK_IN_MONTH is incorrect: "
|
|
+ maxDOWIM + "/expected: " + expected);
|
|
}
|
|
expected = (lmaxDOM + nDOW - 1)/nDOW;
|
|
if (lmaxDOWIM != expected) {
|
|
errln((UnicodeString)"FAIL: [" + calType + "] Least maximum value of DAY_OF_WEEK_IN_MONTH is incorrect: "
|
|
+ lmaxDOWIM + "/expected: " + expected);
|
|
}
|
|
|
|
// Week of month
|
|
expected = (maxDOM + (nDOW - 1) + (nDOW - minDaysInFirstWeek)) / nDOW;
|
|
if (maxWOM != expected) {
|
|
errln((UnicodeString)"FAIL: [" + calType + "] Maximum value of WEEK_OF_MONTH is incorrect: "
|
|
+ maxWOM + "/expected: " + expected);
|
|
}
|
|
expected = (lmaxDOM + (nDOW - minDaysInFirstWeek)) / nDOW;
|
|
if (lmaxWOM != expected) {
|
|
errln((UnicodeString)"FAIL: [" + calType + "] Least maximum value of WEEK_OF_MONTH is incorrect: "
|
|
+ lmaxWOM + "/expected: " + expected);
|
|
}
|
|
}
|
|
|
|
void
|
|
CalendarLimitTest::doLimitsTest(Calendar& cal, UDate startDate, int32_t endTime) {
|
|
int32_t testTime = quick ? ( endTime / 40 ) : endTime;
|
|
doLimitsTest(cal, NULL /*default fields*/, startDate, testTime);
|
|
}
|
|
|
|
void
|
|
CalendarLimitTest::doLimitsTest(Calendar& cal,
|
|
const int32_t* fieldsToTest,
|
|
UDate startDate,
|
|
int32_t testDuration) {
|
|
static const int32_t FIELDS[] = {
|
|
UCAL_ERA,
|
|
UCAL_YEAR,
|
|
UCAL_MONTH,
|
|
UCAL_WEEK_OF_YEAR,
|
|
UCAL_WEEK_OF_MONTH,
|
|
UCAL_DAY_OF_MONTH,
|
|
UCAL_DAY_OF_YEAR,
|
|
UCAL_DAY_OF_WEEK_IN_MONTH,
|
|
UCAL_YEAR_WOY,
|
|
UCAL_EXTENDED_YEAR,
|
|
-1,
|
|
};
|
|
|
|
static const char* FIELD_NAME[] = {
|
|
"ERA", "YEAR", "MONTH", "WEEK_OF_YEAR", "WEEK_OF_MONTH",
|
|
"DAY_OF_MONTH", "DAY_OF_YEAR", "DAY_OF_WEEK",
|
|
"DAY_OF_WEEK_IN_MONTH", "AM_PM", "HOUR", "HOUR_OF_DAY",
|
|
"MINUTE", "SECOND", "MILLISECOND", "ZONE_OFFSET",
|
|
"DST_OFFSET", "YEAR_WOY", "DOW_LOCAL", "EXTENDED_YEAR",
|
|
"JULIAN_DAY", "MILLISECONDS_IN_DAY",
|
|
"IS_LEAP_MONTH"
|
|
};
|
|
|
|
UErrorCode status = U_ZERO_ERROR;
|
|
int32_t i, j;
|
|
UnicodeString ymd;
|
|
|
|
GregorianCalendar greg(status);
|
|
if (failure(status, "new GregorianCalendar")) {
|
|
return;
|
|
}
|
|
greg.setTime(startDate, status);
|
|
if (failure(status, "GregorianCalendar::setTime")) {
|
|
return;
|
|
}
|
|
logln((UnicodeString)"Start: " + startDate);
|
|
|
|
if (fieldsToTest == NULL) {
|
|
fieldsToTest = FIELDS;
|
|
}
|
|
|
|
|
|
// Keep a record of minima and maxima that we actually see.
|
|
// These are kept in an array of arrays of hashes.
|
|
int32_t limits[UCAL_FIELD_COUNT][4];
|
|
for (j = 0; j < UCAL_FIELD_COUNT; j++) {
|
|
limits[j][0] = INT32_MAX;
|
|
limits[j][1] = INT32_MIN;
|
|
limits[j][2] = INT32_MAX;
|
|
limits[j][3] = INT32_MIN;
|
|
}
|
|
|
|
// This test can run for a long time; show progress.
|
|
UDate millis = ucal_getNow();
|
|
UDate mark = millis + 5000; // 5 sec
|
|
millis -= testDuration * 1000; // stop time if testDuration<0
|
|
|
|
for (i = 0;
|
|
testDuration > 0 ? i < testDuration
|
|
: ucal_getNow() < millis;
|
|
++i) {
|
|
if (ucal_getNow() >= mark) {
|
|
logln((UnicodeString)"(" + i + " days)");
|
|
mark += 5000; // 5 sec
|
|
}
|
|
UDate testMillis = greg.getTime(status);
|
|
cal.setTime(testMillis, status);
|
|
cal.setMinimalDaysInFirstWeek(1);
|
|
if (failure(status, "Calendar set/getTime")) {
|
|
return;
|
|
}
|
|
for (j = 0; fieldsToTest[j] >= 0; ++j) {
|
|
UCalendarDateFields f = (UCalendarDateFields)fieldsToTest[j];
|
|
int32_t v = cal.get(f, status);
|
|
int32_t minActual = cal.getActualMinimum(f, status);
|
|
int32_t maxActual = cal.getActualMaximum(f, status);
|
|
int32_t minLow = cal.getMinimum(f);
|
|
int32_t minHigh = cal.getGreatestMinimum(f);
|
|
int32_t maxLow = cal.getLeastMaximum(f);
|
|
int32_t maxHigh = cal.getMaximum(f);
|
|
|
|
if (limits[j][0] > minActual) {
|
|
// the minimum
|
|
limits[j][0] = minActual;
|
|
}
|
|
if (limits[j][1] < minActual) {
|
|
// the greatest minimum
|
|
limits[j][1] = minActual;
|
|
}
|
|
if (limits[j][2] > maxActual) {
|
|
// the least maximum
|
|
limits[j][2] = maxActual;
|
|
}
|
|
if (limits[j][3] < maxActual) {
|
|
// the maximum
|
|
limits[j][3] = maxActual;
|
|
}
|
|
|
|
if (minActual < minLow || minActual > minHigh) {
|
|
errln((UnicodeString)"Fail: [" + cal.getType() + "] " +
|
|
ymdToString(cal, ymd) +
|
|
" Range for min of " + FIELD_NAME[f] + "(" + f +
|
|
")=" + minLow + ".." + minHigh +
|
|
", actual_min=" + minActual);
|
|
}
|
|
if (maxActual < maxLow || maxActual > maxHigh) {
|
|
errln((UnicodeString)"Fail: [" + cal.getType() + "] " +
|
|
ymdToString(cal, ymd) +
|
|
" Range for max of " + FIELD_NAME[f] + "(" + f +
|
|
")=" + maxLow + ".." + maxHigh +
|
|
", actual_max=" + maxActual);
|
|
}
|
|
if (v < minActual || v > maxActual) {
|
|
// timebomb per #9967, fix with #9972
|
|
if ( uprv_strcmp(cal.getType(), "dangi") == 0 &&
|
|
testMillis >= 1865635198000.0 &&
|
|
logKnownIssue("9972", "as per #9967")) { // Feb 2029 gregorian, end of dangi 4361
|
|
logln((UnicodeString)"Fail: [" + cal.getType() + "] " +
|
|
ymdToString(cal, ymd) +
|
|
" " + FIELD_NAME[f] + "(" + f + ")=" + v +
|
|
", actual=" + minActual + ".." + maxActual +
|
|
", allowed=(" + minLow + ".." + minHigh + ")..(" +
|
|
maxLow + ".." + maxHigh + ")");
|
|
} else {
|
|
errln((UnicodeString)"Fail: [" + cal.getType() + "] " +
|
|
ymdToString(cal, ymd) +
|
|
" " + FIELD_NAME[f] + "(" + f + ")=" + v +
|
|
", actual=" + minActual + ".." + maxActual +
|
|
", allowed=(" + minLow + ".." + minHigh + ")..(" +
|
|
maxLow + ".." + maxHigh + ")");
|
|
}
|
|
}
|
|
}
|
|
greg.add(UCAL_DAY_OF_YEAR, 1, status);
|
|
if (failure(status, "Calendar::add")) {
|
|
return;
|
|
}
|
|
}
|
|
|
|
// Check actual maxima and minima seen against ranges returned
|
|
// by API.
|
|
UnicodeString buf;
|
|
for (j = 0; fieldsToTest[j] >= 0; ++j) {
|
|
int32_t rangeLow, rangeHigh;
|
|
UBool fullRangeSeen = TRUE;
|
|
UCalendarDateFields f = (UCalendarDateFields)fieldsToTest[j];
|
|
|
|
buf.remove();
|
|
buf.append((UnicodeString)"[" + cal.getType() + "] " + FIELD_NAME[f]);
|
|
|
|
// Minumum
|
|
rangeLow = cal.getMinimum(f);
|
|
rangeHigh = cal.getGreatestMinimum(f);
|
|
if (limits[j][0] != rangeLow || limits[j][1] != rangeHigh) {
|
|
fullRangeSeen = FALSE;
|
|
}
|
|
buf.append((UnicodeString)" minima range=" + rangeLow + ".." + rangeHigh);
|
|
buf.append((UnicodeString)" minima actual=" + limits[j][0] + ".." + limits[j][1]);
|
|
|
|
// Maximum
|
|
rangeLow = cal.getLeastMaximum(f);
|
|
rangeHigh = cal.getMaximum(f);
|
|
if (limits[j][2] != rangeLow || limits[j][3] != rangeHigh) {
|
|
fullRangeSeen = FALSE;
|
|
}
|
|
buf.append((UnicodeString)" maxima range=" + rangeLow + ".." + rangeHigh);
|
|
buf.append((UnicodeString)" maxima actual=" + limits[j][2] + ".." + limits[j][3]);
|
|
|
|
if (fullRangeSeen) {
|
|
logln((UnicodeString)"OK: " + buf);
|
|
} else {
|
|
// This may or may not be an error -- if the range of dates
|
|
// we scan over doesn't happen to contain a minimum or
|
|
// maximum, it doesn't mean some other range won't.
|
|
logln((UnicodeString)"Warning: " + buf);
|
|
}
|
|
}
|
|
|
|
logln((UnicodeString)"End: " + greg.getTime(status));
|
|
}
|
|
|
|
UnicodeString&
|
|
CalendarLimitTest::ymdToString(const Calendar& cal, UnicodeString& str) {
|
|
UErrorCode status = U_ZERO_ERROR;
|
|
str.remove();
|
|
str.append((UnicodeString)"" + cal.get(UCAL_EXTENDED_YEAR, status)
|
|
+ "/" + (cal.get(UCAL_MONTH, status) + 1)
|
|
+ (cal.get(UCAL_IS_LEAP_MONTH, status) == 1 ? "(leap)" : "")
|
|
+ "/" + cal.get(UCAL_DATE, status)
|
|
+ " " + cal.get(UCAL_HOUR_OF_DAY, status)
|
|
+ ":" + cal.get(UCAL_MINUTE, status)
|
|
+ " zone(hrs) " + cal.get(UCAL_ZONE_OFFSET, status)/(60.0*60.0*1000.0)
|
|
+ " dst(hrs) " + cal.get(UCAL_DST_OFFSET, status)/(60.0*60.0*1000.0)
|
|
+ ", time(millis)=" + cal.getTime(status));
|
|
return str;
|
|
}
|
|
|
|
#endif /* #if !UCONFIG_NO_FORMATTING */
|
|
|
|
// eof
|