/* ******************************************************************************* * Copyright (C) 1997-2001, International Business Machines Corporation and * * others. All Rights Reserved. * ******************************************************************************* * * File CALENDAR.CPP * * Modification History: * * Date Name Description * 02/03/97 clhuang Creation. * 04/22/97 aliu Cleaned up, fixed memory leak, made * setWeekCountData() more robust. * Moved platform code to TPlatformUtilities. * 05/01/97 aliu Made equals(), before(), after() arguments const. * 05/20/97 aliu Changed logic of when to compute fields and time * to fix bugs. * 08/12/97 aliu Added equivalentTo. Misc other fixes. * 07/28/98 stephen Sync up with JDK 1.2 * 09/02/98 stephen Sync with JDK 1.2 8/31 build (getActualMin/Max) * 03/17/99 stephen Changed adoptTimeZone() - now fAreFieldsSet is * set to FALSE to force update of time. ******************************************************************************* */ #include "unicode/resbund.h" #include "unicode/gregocal.h" #include "unicode/calendar.h" #include "cpputils.h" U_NAMESPACE_BEGIN // Resource bundle tags read by this class const char Calendar::kDateTimeElements[] = "DateTimeElements"; // Data flow in Calendar // --------------------- // The current time is represented in two ways by Calendar: as UTC // milliseconds from the epoch start (1 January 1970 0:00 UTC), and as local // fields such as MONTH, HOUR, AM_PM, etc. It is possible to compute the // millis from the fields, and vice versa. The data needed to do this // conversion is encapsulated by a TimeZone object owned by the Calendar. // The data provided by the TimeZone object may also be overridden if the // user sets the ZONE_OFFSET and/or DST_OFFSET fields directly. The class // keeps track of what information was most recently set by the caller, and // uses that to compute any other information as needed. // If the user sets the fields using set(), the data flow is as follows. // This is implemented by the Calendar subclass's computeTime() method. // During this process, certain fields may be ignored. The disambiguation // algorithm for resolving which fields to pay attention to is described // above. // local fields (YEAR, MONTH, DATE, HOUR, MINUTE, etc.) // | // | Using Calendar-specific algorithm // V // local standard millis // | // | Using TimeZone or user-set ZONE_OFFSET / DST_OFFSET // V // UTC millis (in time data member) // If the user sets the UTC millis using setTime(), the data flow is as // follows. This is implemented by the Calendar subclass's computeFields() // method. // UTC millis (in time data member) // | // | Using TimeZone getOffset() // V // local standard millis // | // | Using Calendar-specific algorithm // V // local fields (YEAR, MONTH, DATE, HOUR, MINUTE, etc.) // In general, a round trip from fields, through local and UTC millis, and // back out to fields is made when necessary. This is implemented by the // complete() method. Resolving a partial set of fields into a UTC millis // value allows all remaining fields to be generated from that value. If // the Calendar is lenient, the fields are also renormalized to standard // ranges when they are regenerated. // ------------------------------------- Calendar::Calendar(UErrorCode& success) : UObject(), fIsTimeSet(FALSE), fAreFieldsSet(FALSE), fAreAllFieldsSet(FALSE), fNextStamp(kMinimumUserStamp), fTime(0), fLenient(TRUE), fZone(0) { clear(); fZone = TimeZone::createDefault(); setWeekCountData(Locale::getDefault(), success); } // ------------------------------------- Calendar::Calendar(TimeZone* zone, const Locale& aLocale, UErrorCode& success) : UObject(), fIsTimeSet(FALSE), fAreFieldsSet(FALSE), fAreAllFieldsSet(FALSE), fNextStamp(kMinimumUserStamp), fTime(0), fLenient(TRUE), fZone(0) { if(zone == 0) { success = U_ILLEGAL_ARGUMENT_ERROR; return; } clear(); fZone = zone; setWeekCountData(aLocale, success); } // ------------------------------------- Calendar::Calendar(const TimeZone& zone, const Locale& aLocale, UErrorCode& success) : UObject(), fIsTimeSet(FALSE), fAreFieldsSet(FALSE), fAreAllFieldsSet(FALSE), fNextStamp(kMinimumUserStamp), fTime(0), fLenient(TRUE), fZone(0) { clear(); fZone = zone.clone(); setWeekCountData(aLocale, success); } // ------------------------------------- Calendar::~Calendar() { delete fZone; } // ------------------------------------- Calendar::Calendar(const Calendar &source) : UObject(source) { fZone = 0; *this = source; } // ------------------------------------- Calendar & Calendar::operator=(const Calendar &right) { if (this != &right) { uprv_arrayCopy(right.fFields, fFields, FIELD_COUNT); uprv_arrayCopy(right.fIsSet, fIsSet, FIELD_COUNT); uprv_arrayCopy(right.fStamp, fStamp, FIELD_COUNT); fTime = right.fTime; fIsTimeSet = right.fIsTimeSet; fAreAllFieldsSet = right.fAreAllFieldsSet; fAreFieldsSet = right.fAreFieldsSet; fLenient = right.fLenient; delete fZone; fZone = right.fZone->clone(); fFirstDayOfWeek = right.fFirstDayOfWeek; fMinimalDaysInFirstWeek = right.fMinimalDaysInFirstWeek; fNextStamp = right.fNextStamp; } return *this; } // ------------------------------------- Calendar* Calendar::createInstance(UErrorCode& success) { if (U_FAILURE(success)) return 0; // right now, createInstance will always return an instance of GregorianCalendar Calendar* c = new GregorianCalendar(success); /* test for NULL */ if (c == 0) { success = U_MEMORY_ALLOCATION_ERROR; return 0; } if (U_FAILURE(success)) { delete c; c = 0; } return c; } // ------------------------------------- Calendar* Calendar::createInstance(const TimeZone& zone, UErrorCode& success) { if (U_FAILURE(success)) return 0; // since the Locale isn't specified, use the default locale Calendar* c = new GregorianCalendar(zone, Locale::getDefault(), success); /* test for NULL */ if (c == 0) { success = U_MEMORY_ALLOCATION_ERROR; return 0; } if (U_FAILURE(success)) { delete c; c = 0; } return c; } // ------------------------------------- Calendar* Calendar::createInstance(const Locale& aLocale, UErrorCode& success) { if (U_FAILURE(success)) return 0; // since the TimeZone isn't specfied, use the default time zone Calendar* c = new GregorianCalendar(TimeZone::createDefault(), aLocale, success); /* test for NULL */ if (c == 0) { success = U_MEMORY_ALLOCATION_ERROR; return 0; } if (U_FAILURE(success)) { delete c; c = 0; } return c; } // ------------------------------------- Calendar* Calendar::createInstance(TimeZone* zone, const Locale& aLocale, UErrorCode& success) { if (U_FAILURE(success)) { delete zone; return 0; } Calendar* c = new GregorianCalendar(zone, aLocale, success); if (c == 0) { success = U_MEMORY_ALLOCATION_ERROR; delete zone; } else if (U_FAILURE(success)) { delete c; c = 0; } return c; } // ------------------------------------- Calendar* Calendar::createInstance(const TimeZone& zone, const Locale& aLocale, UErrorCode& success) { if (U_FAILURE(success)) return 0; Calendar* c = new GregorianCalendar(zone, aLocale, success); /* test for NULL */ if (c == 0) { success = U_MEMORY_ALLOCATION_ERROR; return 0; } if (U_FAILURE(success)) { delete c; c = 0; } return c; } // ------------------------------------- UBool Calendar::operator==(const Calendar& that) const { UErrorCode status = U_ZERO_ERROR; // {sfb} is this correct? (Java equals) return (getDynamicClassID() == that.getDynamicClassID() && getTimeInMillis(status) == that.getTimeInMillis(status) && fLenient == that.fLenient && fFirstDayOfWeek == that.fFirstDayOfWeek && fMinimalDaysInFirstWeek == that.fMinimalDaysInFirstWeek && *fZone == *(that.fZone)); // As it stands, this is a very narrowly defined ==, since the // Calendars must not only represent the same time; they must // also be in exactly the same state. This would be looser if // we forced field or fTime computation, and then did the comparison. /* if (this == &that) return TRUE; for (int32_t i=0; i when.getTimeInMillis(status)); } // {sfb} not in Java API, but looks similar to operator== UBool Calendar::equivalentTo(const Calendar& other) const { // Return true if another Calendar object is equivalent to this one. An equivalent // Calendar will behave exactly as this one does (i.e., it will have be the same subclass // of Calendar, and have the same time zone, week-count values, and leniency level), // but may be set to a different time. return getDynamicClassID() == other.getDynamicClassID() && fLenient == other.fLenient && fFirstDayOfWeek == other.fFirstDayOfWeek && fMinimalDaysInFirstWeek == other.fMinimalDaysInFirstWeek && *fZone == *other.fZone; } // ------------------------------------- const Locale* Calendar::getAvailableLocales(int32_t& count) { return Locale::getAvailableLocales(count); } // ------------------------------------- UDate Calendar::getNow() { return (UDate)uprv_getUTCtime() * U_MILLIS_PER_SECOND; // return as milliseconds } // ------------------------------------- /** * Gets this Calendar's current time as a long. * @return the current time as UTC milliseconds from the epoch. */ double Calendar::getTimeInMillis(UErrorCode& status) const { if(U_FAILURE(status)) return 0.0; if ( ! fIsTimeSet) ((Calendar*)this)->updateTime(status); /* Test for buffer overflows */ if(U_FAILURE(status)) { return 0.0; } return fTime; } // ------------------------------------- /** * Sets this Calendar's current time from the given long value. * @param date the new time in UTC milliseconds from the epoch. */ void Calendar::setTimeInMillis( double millis, UErrorCode& status ) { if(U_FAILURE(status)) return; fIsTimeSet = TRUE; fTime = millis; fAreFieldsSet = FALSE; computeFields(status); /* Test for buffer overflows */ if(U_FAILURE(status)) { return; } fAreFieldsSet = TRUE; fAreAllFieldsSet = TRUE; } // ------------------------------------- int32_t Calendar::get(EDateFields field, UErrorCode& status) const { // field values are only computed when actually requested; for more on when computation // of various things happens, see the "data flow in Calendar" description at the top // of this file if (U_SUCCESS(status)) ((Calendar*)this)->complete(status); // Cast away const return U_SUCCESS(status) ? fFields[field] : 0; } // ------------------------------------- void Calendar::set(EDateFields field, int32_t value) { fIsTimeSet = FALSE; fFields[field] = value; fStamp[field] = fNextStamp++; fAreFieldsSet = FALSE; fIsSet[field] = TRUE; // Remove later } // ------------------------------------- void Calendar::set(int32_t year, int32_t month, int32_t date) { set(YEAR, year); set(MONTH, month); set(DATE, date); } // ------------------------------------- void Calendar::set(int32_t year, int32_t month, int32_t date, int32_t hour, int32_t minute) { set(YEAR, year); set(MONTH, month); set(DATE, date); set(HOUR_OF_DAY, hour); set(MINUTE, minute); } // ------------------------------------- void Calendar::set(int32_t year, int32_t month, int32_t date, int32_t hour, int32_t minute, int32_t second) { set(YEAR, year); set(MONTH, month); set(DATE, date); set(HOUR_OF_DAY, hour); set(MINUTE, minute); set(SECOND, second); } // ------------------------------------- void Calendar::clear() { for (int32_t i=0; i targetMs) { break; } else { max <<= 1; if (max < 0) { // Field difference too large to fit into int32_t ec = U_ILLEGAL_ARGUMENT_ERROR; } } } // Do a binary search while ((max - min) > 1 && U_SUCCESS(ec)) { int32_t t = (min + max) / 2; setTimeInMillis(startMs, ec); add(field, t, ec); double ms = getTimeInMillis(ec); if (ms == targetMs) { return t; } else if (ms > targetMs) { max = t; } else { min = t; } } } else if (startMs > targetMs) { int32_t max = -1; // Find a value that is too small while (U_SUCCESS(ec)) { setTimeInMillis(startMs, ec); add(field, max, ec); double ms = getTimeInMillis(ec); if (ms == targetMs) { return max; } else if (ms < targetMs) { break; } else { max <<= 1; if (max == 0) { // Field difference too large to fit into int32_t ec = U_ILLEGAL_ARGUMENT_ERROR; } } } // Do a binary search while ((min - max) > 1 && U_SUCCESS(ec)) { int32_t t = (min + max) / 2; setTimeInMillis(startMs, ec); add(field, t, ec); double ms = getTimeInMillis(ec); if (ms == targetMs) { return t; } else if (ms < targetMs) { max = t; } else { min = t; } } } // Set calendar to end point setTimeInMillis(startMs, ec); add(field, min, ec); /* Test for buffer overflows */ if(U_FAILURE(ec)) { return 0; } return min; } // ------------------------------------- void Calendar::adoptTimeZone(TimeZone* zone) { // Do nothing if passed-in zone is NULL if (zone == NULL) return; // fZone should always be non-null if (fZone != NULL) delete fZone; fZone = zone; // if the zone changes, we need to recompute the time fields fAreFieldsSet = FALSE; } // ------------------------------------- void Calendar::setTimeZone(const TimeZone& zone) { adoptTimeZone(zone.clone()); } // ------------------------------------- const TimeZone& Calendar::getTimeZone() const { return *fZone; } // ------------------------------------- TimeZone* Calendar::orphanTimeZone() { TimeZone *z = fZone; // we let go of the time zone; the new time zone is the system default time zone fZone = TimeZone::createDefault(); return z; } // ------------------------------------- void Calendar::setLenient(UBool lenient) { fLenient = lenient; } // ------------------------------------- UBool Calendar::isLenient() const { return fLenient; } // ------------------------------------- void Calendar::setFirstDayOfWeek(EDaysOfWeek value) { fFirstDayOfWeek = value; } // ------------------------------------- Calendar::EDaysOfWeek Calendar::getFirstDayOfWeek() const { return fFirstDayOfWeek; } // ------------------------------------- void Calendar::setMinimalDaysInFirstWeek(uint8_t value) { fMinimalDaysInFirstWeek = value; } // ------------------------------------- uint8_t Calendar::getMinimalDaysInFirstWeek() const { return fMinimalDaysInFirstWeek; } // ------------------------------------- int32_t Calendar::getActualMinimum(EDateFields field, UErrorCode& status) const { int32_t fieldValue = getGreatestMinimum(field); int32_t endValue = getMinimum(field); // if we know that the minimum value is always the same, just return it if (fieldValue == endValue) { return fieldValue; } // clone the calendar so we don't mess with the real one, and set it to // accept anything for the field values Calendar *work = (Calendar*)this->clone(); work->setLenient(TRUE); // now try each value from getLeastMaximum() to getMaximum() one by one until // we get a value that normalizes to another value. The last value that // normalizes to itself is the actual minimum for the current date int32_t result = fieldValue; do { work->set(field, fieldValue); if (work->get(field, status) != fieldValue) { break; } else { result = fieldValue; fieldValue--; } } while (fieldValue >= endValue); delete work; /* Test for buffer overflows */ if(U_FAILURE(status)) { return 0; } return result; } // ------------------------------------- int32_t Calendar::getActualMaximum(EDateFields field, UErrorCode& status) const { int32_t fieldValue = getLeastMaximum(field); int32_t endValue = getMaximum(field); // if we know that the maximum value is always the same, just return it if (fieldValue == endValue) { return fieldValue; } // clone the calendar so we don't mess with the real one, and set it to // accept anything for the field values Calendar *work = (Calendar*)this->clone(); work->setLenient(TRUE); // if we're counting weeks, set the day of the week to Sunday. We know the // last week of a month or year will contain the first day of the week. if (field == WEEK_OF_YEAR || field == WEEK_OF_MONTH) work->set(DAY_OF_WEEK, fFirstDayOfWeek); // now try each value from getLeastMaximum() to getMaximum() one by one until // we get a value that normalizes to another value. The last value that // normalizes to itself is the actual maximum for the current date int32_t result = fieldValue; do { work->set(field, fieldValue); if(work->get(field, status) != fieldValue) { break; } else { result = fieldValue; fieldValue++; } } while (fieldValue <= endValue); delete work; /* Test for buffer overflows */ if(U_FAILURE(status)) { return 0; } return result; } // ------------------------------------- void Calendar::setWeekCountData(const Locale& desiredLocale, UErrorCode& status) { // Read the week count data from the resource bundle. This should // have the form: // // DateTimeElements:intvector { // 1, // first day of week // 1 // min days in week // } // Both have a range of 1..7 if (U_FAILURE(status)) return; fFirstDayOfWeek = Calendar::SUNDAY; fMinimalDaysInFirstWeek = 1; UResourceBundle *resource = ures_open(NULL, desiredLocale.getName(), &status); // If the resource data doesn't seem to be present at all, then use last-resort // hard-coded data. if (U_FAILURE(status)) { status = U_USING_FALLBACK_ERROR; ures_close(resource); return; } //dateTimeElements = resource.getStringArray(kDateTimeElements, count, status); UResourceBundle *dateTimeElements = ures_getByKey(resource, kDateTimeElements, NULL, &status); if (U_SUCCESS(status)) { int32_t arrLen; const int32_t *dateTimeElementsArr = ures_getIntVector(dateTimeElements, &arrLen, &status); if(U_SUCCESS(status) && arrLen == 2 && 1 <= dateTimeElementsArr[0] && dateTimeElementsArr[0] <= 7 && 1 <= dateTimeElementsArr[1] && dateTimeElementsArr[1] <= 7) { fFirstDayOfWeek = (Calendar::EDaysOfWeek)dateTimeElementsArr[0]; fMinimalDaysInFirstWeek = (uint8_t)dateTimeElementsArr[1]; } else { status = U_INVALID_FORMAT_ERROR; } } ures_close(dateTimeElements); ures_close(resource); } /** * Recompute the time and update the status fields isTimeSet * and areFieldsSet. Callers should check isTimeSet and only * call this method if isTimeSet is false. */ void Calendar::updateTime(UErrorCode& status) { computeTime(status); if(U_FAILURE(status)) return; // If we are lenient, we need to recompute the fields to normalize // the values. Also, if we haven't set all the fields yet (i.e., // in a newly-created object), we need to fill in the fields. [LIU] if (isLenient() || ! fAreAllFieldsSet) fAreFieldsSet = FALSE; fIsTimeSet = TRUE; } U_NAMESPACE_END //eof