+
+wxDateTime& wxDateTime::Set(double jdn)
+{
+ m_time = (jdn - 0.5 - EPOCH_JDN) * TIME_T_FACTOR;
+
+ return *this;
+}
+
+// ----------------------------------------------------------------------------
+// time_t <-> broken down time conversions
+// ----------------------------------------------------------------------------
+
+wxDateTime::Tm wxDateTime::GetTm() const
+{
+ wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
+
+ time_t time = GetTicks();
+ if ( time != (time_t)-1 )
+ {
+ // use C RTL functions
+ tm *tm = localtime(&time);
+
+ // should never happen
+ wxCHECK_MSG( tm, Tm(), _T("localtime() failed") );
+
+ return Tm(*tm);
+ }
+ else
+ {
+ // CREDIT: the algorithm was taken from Peter Baum's home page
+
+ // calculate the Gregorian date from JDN for the midnight of our date
+ wxLongLong timeMidnight = m_time;
+ long timeOnly = (m_time % MILLISECONDS_PER_DAY).GetLo();
+ timeMidnight -= timeOnly;
+
+ // TODO this probably could be optimised somehow...
+
+ double jdn = (timeMidnight / MILLISECONDS_PER_DAY).GetLo();
+ jdn += EPOCH_JDN + 0.5;
+ long z = jdn - 1721118.5;
+ double r = jdn - 1721118.5 - z;
+ double g = z - 0.25;
+ long a = g/36524.25; // number of days per year
+ long b = a - a / 4;
+ int year = (b + g) / 365.25;
+ long c = b + z - 365.25*year;
+ int month = (5*c + 456)/153;
+ int day = c - (153*month - 457)/5 + (r < 0.5 ? 0 : 1);
+ if ( month > 12 )
+ {
+ year++;
+ month -= 12;
+ }
+
+ Tm tm;
+ tm.year = year;
+ tm.mon = (Month)(month - 1); // algorithm yields 1 for January, not 0
+ tm.mday = day;
+ tm.msec = timeOnly % 1000;
+ timeOnly -= tm.msec;
+ timeOnly /= 1000; // now we have time in seconds
+
+ tm.sec = timeOnly % 60;
+ timeOnly -= tm.sec;
+ timeOnly /= 60; // now we have time in minutes
+
+ tm.min = timeOnly % 60;
+ timeOnly -= tm.min;
+
+ tm.hour = timeOnly / 60;
+
+ return tm;
+ }
+}
+
+wxDateTime& wxDateTime::SetYear(int year)
+{
+ wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
+
+ Tm tm(GetTm());
+ tm.year = year;
+ Set(tm);
+
+ return *this;
+}
+
+wxDateTime& wxDateTime::SetMonth(Month month)
+{
+ wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
+
+ Tm tm(GetTm());
+ tm.mon = month;
+ Set(tm);
+
+ return *this;
+}
+
+wxDateTime& wxDateTime::SetDay(wxDateTime_t mday)
+{
+ wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
+
+ Tm tm(GetTm());
+ tm.mday = mday;
+ Set(tm);
+
+ return *this;
+}
+
+wxDateTime& wxDateTime::SetHour(wxDateTime_t hour)
+{
+ wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
+
+ Tm tm(GetTm());
+ tm.hour = hour;
+ Set(tm);
+
+ return *this;
+}
+
+wxDateTime& wxDateTime::SetMinute(wxDateTime_t min)
+{
+ wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
+
+ Tm tm(GetTm());
+ tm.min = min;
+ Set(tm);
+
+ return *this;
+}
+
+wxDateTime& wxDateTime::SetSecond(wxDateTime_t sec)
+{
+ wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
+
+ Tm tm(GetTm());
+ tm.sec = sec;
+ Set(tm);
+
+ return *this;
+}
+
+wxDateTime& wxDateTime::SetMillisecond(wxDateTime_t millisecond)
+{
+ wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
+
+ // we don't need to use GetTm() for this one
+ m_time -= m_time % 1000l;
+ m_time += millisecond;
+
+ return *this;
+}
+
+// ----------------------------------------------------------------------------
+// wxDateTime arithmetics
+// ----------------------------------------------------------------------------
+
+wxDateTime& wxDateTime::Add(const wxDateSpan& diff)
+{
+ Tm tm(GetTm());
+
+ tm.year += diff.GetYears();
+ tm.AddMonths(diff.GetMonths());
+ tm.AddDays(diff.GetTotalDays());
+
+ Set(tm);
+
+ return *this;
+}
+
+// ----------------------------------------------------------------------------
+// Weekday and monthday stuff
+// ----------------------------------------------------------------------------
+
+wxDateTime& wxDateTime::SetToLastMonthDay(Month month,
+ int year)
+{
+ // take the current month/year if none specified
+ ReplaceDefaultYearMonthWithCurrent(&year, &month);
+
+ return Set(GetNumOfDaysInMonth(year, month), month, year);
+}
+
+bool wxDateTime::SetToWeekDay(WeekDay weekday,
+ int n,
+ Month month,
+ int year)
+{
+ wxCHECK_MSG( weekday != Inv_WeekDay, FALSE, _T("invalid weekday") );
+
+ // we don't check explicitly that -5 <= n <= 5 because we will return FALSE
+ // anyhow in such case - but may be should still give an assert for it?
+
+ // take the current month/year if none specified
+ ReplaceDefaultYearMonthWithCurrent(&year, &month);
+
+ wxDateTime dt;
+
+ // TODO this probably could be optimised somehow...
+
+ if ( n > 0 )
+ {
+ // get the first day of the month
+ dt.Set(1, month, year);
+
+ // get its wday
+ WeekDay wdayFirst = dt.GetWeekDay();
+
+ // go to the first weekday of the month
+ int diff = weekday - wdayFirst;
+ if ( diff < 0 )
+ diff += 7;
+
+ // add advance n-1 weeks more
+ diff += 7*(n - 1);
+
+ dt -= wxDateSpan::Days(diff);
+ }
+ else
+ {
+ // get the last day of the month
+ dt.SetToLastMonthDay(month, year);
+
+ // get its wday
+ WeekDay wdayLast = dt.GetWeekDay();
+
+ // go to the last weekday of the month
+ int diff = wdayLast - weekday;
+ if ( diff < 0 )
+ diff += 7;
+
+ // and rewind n-1 weeks from there
+ diff += 7*(n - 1);
+
+ dt -= wxDateSpan::Days(diff);
+ }
+
+ // check that it is still in the same month
+ if ( dt.GetMonth() == month )
+ {
+ *this = dt;
+
+ return TRUE;
+ }
+ else
+ {
+ // no such day in this month
+ return FALSE;
+ }
+}
+
+// ----------------------------------------------------------------------------
+// Julian day number conversion and related stuff
+// ----------------------------------------------------------------------------
+
+double wxDateTime::GetJulianDayNumber() const
+{
+ Tm tm(GetTm());
+
+ double result = GetTruncatedJDN(tm.mday, tm.mon, tm.year);
+
+ // add the part GetTruncatedJDN() neglected
+ result += 0.5;
+
+ // and now add the time: 86400 sec = 1 JDN
+ return result + ((double)(60*(60*tm.hour + tm.min) + tm.sec)) / 86400;
+}
+
+double wxDateTime::GetRataDie() const
+{
+ // March 1 of the year 0 is Rata Die day -306 and JDN 1721119.5
+ return GetJulianDayNumber() - 1721119.5 - 306;
+}
+
+// ----------------------------------------------------------------------------
+// timezone stuff
+// ----------------------------------------------------------------------------
+
+wxDateTime& wxDateTime::MakeUTC()
+{
+ return Add(wxTimeSpan::Seconds(GetTimeZone()));
+}
+
+wxDateTime& wxDateTime::MakeTimezone(const TimeZone& tz)
+{
+ int minDiff = GetTimeZone() / SECONDS_IN_MINUTE + tz.GetOffset();
+ return Add(wxTimeSpan::Minutes(minDiff));
+}
+
+wxDateTime& wxDateTime::MakeLocalTime(const TimeZone& tz)
+{
+ int minDiff = GetTimeZone() / SECONDS_IN_MINUTE + tz.GetOffset();
+ return Substract(wxTimeSpan::Minutes(minDiff));
+}
+
+// ----------------------------------------------------------------------------
+// wxDateTime to/from text representations
+// ----------------------------------------------------------------------------
+
+wxString wxDateTime::Format(const wxChar *format) const
+{
+ wxCHECK_MSG( format, _T(""), _T("NULL format in wxDateTime::Format") );
+
+ time_t time = GetTicks();
+ if ( time != (time_t)-1 )
+ {
+ // use strftime()
+ tm *tm = localtime(&time);
+
+ // should never happen
+ wxCHECK_MSG( tm, _T(""), _T("localtime() failed") );
+
+ return CallStrftime(format, tm);
+ }
+ else
+ {
+ // use a hack and still use strftime(): make a copy of the format and
+ // replace all occurences of YEAR in it with some unique string not
+ // appearing anywhere else in it, then use strftime() to format the
+ // date in year YEAR and then replace YEAR back by the real year and
+ // the unique replacement string back with YEAR where YEAR is any year
+ // in the range supported by strftime() (1970 - 2037) which is equal to
+ // the real year modulo 28 (so the week days coincide for them)
+
+ // find the YEAR
+ int yearReal = GetYear();
+ int year = 1970 + yearReal % 28;
+
+ wxString strYear;
+ strYear.Printf(_T("%d"), year);
+
+ // find a string not occuring in format (this is surely not optimal way
+ // of doing it... improvements welcome!)
+ wxString fmt = format;
+ wxString replacement = (wxChar)-1;
+ while ( fmt.Find(replacement) != wxNOT_FOUND )
+ {
+ replacement << (wxChar)-1;
+ }
+
+ // replace all occurences of year with it
+ bool wasReplaced = fmt.Replace(strYear, replacement) > 0;
+
+ // use strftime() to format the same date but in supported year
+ wxDateTime dt(*this);
+ dt.SetYear(year);
+ wxString str = dt.Format(format);
+
+ // now replace the occurence of 1999 with the real year
+ wxString strYearReal;
+ strYearReal.Printf(_T("%d"), yearReal);
+ str.Replace(strYear, strYearReal);
+
+ // and replace back all occurences of replacement string
+ if ( wasReplaced )
+ str.Replace(replacement, strYear);
+
+ return str;
+ }
+}
+
+// ============================================================================
+// wxTimeSpan
+// ============================================================================
+
+// not all strftime(3) format specifiers make sense here because, for example,
+// a time span doesn't have a year nor a timezone
+//
+// Here are the ones which are supported (all of them are supported by strftime
+// as well):
+// %H hour in 24 hour format
+// %M minute (00 - 59)
+// %S second (00 - 59)
+// %% percent sign
+//
+// Also, for MFC CTimeSpan compatibility, we support
+// %D number of days
+//
+// And, to be better than MFC :-), we also have
+// %E number of wEeks
+// %l milliseconds (000 - 999)
+wxString wxTimeSpan::Format(const wxChar *format) const
+{
+ wxCHECK_MSG( format, _T(""), _T("NULL format in wxTimeSpan::Format") );
+
+ wxString str;
+ str.Alloc(strlen(format));
+
+ for ( const wxChar *pch = format; pch; pch++ )
+ {
+ wxChar ch = *pch;
+
+ if ( ch == '%' )
+ {
+ wxString tmp;
+
+ ch = *pch++;
+ switch ( ch )
+ {
+ default:
+ wxFAIL_MSG( _T("invalid format character") );
+ // fall through
+
+ case '%':
+ // will get to str << ch below
+ break;
+
+ case 'D':
+ tmp.Printf(_T("%d"), GetDays());
+ break;
+
+ case 'E':
+ tmp.Printf(_T("%d"), GetWeeks());
+ break;
+
+ case 'H':
+ tmp.Printf(_T("%02d"), GetHours());
+ break;
+
+ case 'l':
+ tmp.Printf(_T("%03d"), GetMilliseconds());
+ break;
+
+ case 'M':
+ tmp.Printf(_T("%02d"), GetMinutes());
+ break;
+
+ case 'S':
+ tmp.Printf(_T("%02d"), GetSeconds());
+ break;
+ }
+
+ if ( !!tmp )
+ {
+ str += tmp;
+
+ // skip str += ch below
+ continue;
+ }
+ }
+
+ str += ch;
+ }
+
+ return str;
+}