1 ///////////////////////////////////////////////////////////////////////////////
3 // Purpose: implementation of time/date related classes
4 // Author: Vadim Zeitlin
8 // Copyright: (c) 1999 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
9 // parts of code taken from sndcal library by Scott E. Lee:
11 // Copyright 1993-1995, Scott E. Lee, all rights reserved.
12 // Permission granted to use, copy, modify, distribute and sell
13 // so long as the above copyright and this permission statement
14 // are retained in all copies.
16 // Licence: wxWindows license
17 ///////////////////////////////////////////////////////////////////////////////
20 * Implementation notes:
22 * 1. the time is stored as a 64bit integer containing the signed number of
23 * milliseconds since Jan 1. 1970 (the Unix Epoch) - so it is always
26 * 2. the range is thus something about 580 million years, but due to current
27 * algorithms limitations, only dates from Nov 24, 4714BC are handled
29 * 3. standard ANSI C functions are used to do time calculations whenever
30 * possible, i.e. when the date is in the range Jan 1, 1970 to 2038
32 * 4. otherwise, the calculations are done by converting the date to/from JDN
33 * first (the range limitation mentioned above comes from here: the
34 * algorithm used by Scott E. Lee's code only works for positive JDNs, more
37 * 5. the object constructed for the given DD-MM-YYYY HH:MM:SS corresponds to
38 * this moment in local time and may be converted to the object
39 * corresponding to the same date/time in another time zone by using
42 * 6. the conversions to the current (or any other) timezone are done when the
43 * internal time representation is converted to the broken-down one in
47 // ============================================================================
49 // ============================================================================
51 // ----------------------------------------------------------------------------
53 // ----------------------------------------------------------------------------
56 #pragma implementation "datetime.h"
59 // For compilers that support precompilation, includes "wx.h".
60 #include "wx/wxprec.h"
67 #include "wx/string.h"
72 #include "wx/thread.h"
73 #include "wx/tokenzr.h"
74 #include "wx/module.h"
76 #define wxDEFINE_TIME_CONSTANTS // before including datetime.h
80 #include "wx/datetime.h"
81 #include "wx/timer.h" // for wxGetLocalTimeMillis()
83 // ----------------------------------------------------------------------------
84 // conditional compilation
85 // ----------------------------------------------------------------------------
87 #if defined(HAVE_STRPTIME) && defined(__LINUX__)
88 // glibc 2.0.7 strptime() is broken - the following snippet causes it to
89 // crash (instead of just failing):
91 // strncpy(buf, "Tue Dec 21 20:25:40 1999", 128);
92 // strptime(buf, "%x", &tm);
96 #endif // broken strptime()
99 #if defined(__BORLANDC__) || defined(__MINGW32__) || defined(__VISAGECPP__)
100 #define WX_TIMEZONE _timezone
101 #elif defined(__MWERKS__)
102 long wxmw_timezone
= 28800;
103 #define WX_TIMEZONE wxmw_timezone;
104 #else // unknown platform - try timezone
105 #define WX_TIMEZONE timezone
107 #endif // !WX_TIMEZONE
109 // ----------------------------------------------------------------------------
111 // ----------------------------------------------------------------------------
113 // debugging helper: just a convenient replacement of wxCHECK()
114 #define wxDATETIME_CHECK(expr, msg) \
118 *this = wxInvalidDateTime; \
122 // ----------------------------------------------------------------------------
124 // ----------------------------------------------------------------------------
126 class wxDateTimeHolidaysModule
: public wxModule
129 virtual bool OnInit()
131 wxDateTimeHolidayAuthority::AddAuthority(new wxDateTimeWorkDays
);
136 virtual void OnExit()
138 wxDateTimeHolidayAuthority::ClearAllAuthorities();
139 wxDateTimeHolidayAuthority::ms_authorities
.Clear();
143 DECLARE_DYNAMIC_CLASS(wxDateTimeHolidaysModule
)
146 IMPLEMENT_DYNAMIC_CLASS(wxDateTimeHolidaysModule
, wxModule
)
148 // ----------------------------------------------------------------------------
150 // ----------------------------------------------------------------------------
153 static const int MONTHS_IN_YEAR
= 12;
155 static const int SEC_PER_MIN
= 60;
157 static const int MIN_PER_HOUR
= 60;
159 static const int HOURS_PER_DAY
= 24;
161 static const long SECONDS_PER_DAY
= 86400l;
163 static const int DAYS_PER_WEEK
= 7;
165 static const long MILLISECONDS_PER_DAY
= 86400000l;
167 // this is the integral part of JDN of the midnight of Jan 1, 1970
168 // (i.e. JDN(Jan 1, 1970) = 2440587.5)
169 static const long EPOCH_JDN
= 2440587l;
171 // the date of JDN -0.5 (as we don't work with fractional parts, this is the
172 // reference date for us) is Nov 24, 4714BC
173 static const int JDN_0_YEAR
= -4713;
174 static const int JDN_0_MONTH
= wxDateTime::Nov
;
175 static const int JDN_0_DAY
= 24;
177 // the constants used for JDN calculations
178 static const long JDN_OFFSET
= 32046l;
179 static const long DAYS_PER_5_MONTHS
= 153l;
180 static const long DAYS_PER_4_YEARS
= 1461l;
181 static const long DAYS_PER_400_YEARS
= 146097l;
183 // this array contains the cumulated number of days in all previous months for
184 // normal and leap years
185 static const wxDateTime::wxDateTime_t gs_cumulatedDays
[2][MONTHS_IN_YEAR
] =
187 { 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334 },
188 { 0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335 }
191 // ----------------------------------------------------------------------------
193 // ----------------------------------------------------------------------------
195 // in the fine tradition of ANSI C we use our equivalent of (time_t)-1 to
196 // indicate an invalid wxDateTime object
198 static const wxDateTime gs_dtDefault
;
200 const wxDateTime
& wxDefaultDateTime
= gs_dtDefault
;
202 wxDateTime::Country
wxDateTime::ms_country
= wxDateTime::Country_Unknown
;
204 // ----------------------------------------------------------------------------
206 // ----------------------------------------------------------------------------
208 // a critical section is needed to protect GetTimeZone() static
209 // variable in MT case
211 static wxCriticalSection gs_critsectTimezone
;
212 #endif // wxUSE_THREADS
214 // ----------------------------------------------------------------------------
216 // ----------------------------------------------------------------------------
218 // debugger helper: shows what the date really is
220 extern const wxChar
*wxDumpDate(const wxDateTime
* dt
)
222 static wxChar buf
[128];
224 wxStrcpy(buf
, dt
->Format(_T("%Y-%m-%d (%a) %H:%M:%S")));
230 // get the number of days in the given month of the given year
232 wxDateTime::wxDateTime_t
GetNumOfDaysInMonth(int year
, wxDateTime::Month month
)
234 // the number of days in month in Julian/Gregorian calendar: the first line
235 // is for normal years, the second one is for the leap ones
236 static wxDateTime::wxDateTime_t daysInMonth
[2][MONTHS_IN_YEAR
] =
238 { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 },
239 { 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }
242 return daysInMonth
[wxDateTime::IsLeapYear(year
)][month
];
245 // ensure that the timezone variable is set by calling localtime
246 static int GetTimeZone()
248 // set to TRUE when the timezone is set
249 static bool s_timezoneSet
= FALSE
;
251 wxCRIT_SECT_LOCKER(lock
, gs_critsectTimezone
);
253 if ( !s_timezoneSet
)
255 // just call localtime() instead of figuring out whether this system
256 // supports tzset(), _tzset() or something else
260 s_timezoneSet
= TRUE
;
263 return (int)WX_TIMEZONE
;
266 // return the integral part of the JDN for the midnight of the given date (to
267 // get the real JDN you need to add 0.5, this is, in fact, JDN of the
268 // noon of the previous day)
269 static long GetTruncatedJDN(wxDateTime::wxDateTime_t day
,
270 wxDateTime::Month mon
,
273 // CREDIT: code below is by Scott E. Lee (but bugs are mine)
275 // check the date validity
277 (year
> JDN_0_YEAR
) ||
278 ((year
== JDN_0_YEAR
) && (mon
> JDN_0_MONTH
)) ||
279 ((year
== JDN_0_YEAR
) && (mon
== JDN_0_MONTH
) && (day
>= JDN_0_DAY
)),
280 _T("date out of range - can't convert to JDN")
283 // make the year positive to avoid problems with negative numbers division
286 // months are counted from March here
288 if ( mon
>= wxDateTime::Mar
)
298 // now we can simply add all the contributions together
299 return ((year
/ 100) * DAYS_PER_400_YEARS
) / 4
300 + ((year
% 100) * DAYS_PER_4_YEARS
) / 4
301 + (month
* DAYS_PER_5_MONTHS
+ 2) / 5
306 // this function is a wrapper around strftime(3)
307 static wxString
CallStrftime(const wxChar
*format
, const tm
* tm
)
310 if ( !wxStrftime(buf
, WXSIZEOF(buf
), format
, tm
) )
312 // buffer is too small?
313 wxFAIL_MSG(_T("strftime() failed"));
316 return wxString(buf
);
319 // if year and/or month have invalid values, replace them with the current ones
320 static void ReplaceDefaultYearMonthWithCurrent(int *year
,
321 wxDateTime::Month
*month
)
323 struct tm
*tmNow
= NULL
;
325 if ( *year
== wxDateTime::Inv_Year
)
327 tmNow
= wxDateTime::GetTmNow();
329 *year
= 1900 + tmNow
->tm_year
;
332 if ( *month
== wxDateTime::Inv_Month
)
335 tmNow
= wxDateTime::GetTmNow();
337 *month
= (wxDateTime::Month
)tmNow
->tm_mon
;
341 // fll the struct tm with default values
342 static void InitTm(struct tm
& tm
)
344 // struct tm may have etxra fields (undocumented and with unportable
345 // names) which, nevertheless, must be set to 0
346 memset(&tm
, 0, sizeof(struct tm
));
348 tm
.tm_mday
= 1; // mday 0 is invalid
349 tm
.tm_year
= 76; // any valid year
350 tm
.tm_isdst
= -1; // auto determine
356 // return the month if the string is a month name or Inv_Month otherwise
357 static wxDateTime::Month
GetMonthFromName(const wxString
& name
, int flags
)
359 wxDateTime::Month mon
;
360 for ( mon
= wxDateTime::Jan
; mon
< wxDateTime::Inv_Month
; wxNextMonth(mon
) )
362 // case-insensitive comparison either one of or with both abbreviated
364 if ( flags
& wxDateTime::Name_Full
)
366 if ( name
.CmpNoCase(wxDateTime::
367 GetMonthName(mon
, wxDateTime::Name_Full
)) == 0 )
373 if ( flags
& wxDateTime::Name_Abbr
)
375 if ( name
.CmpNoCase(wxDateTime::
376 GetMonthName(mon
, wxDateTime::Name_Abbr
)) == 0 )
386 // return the weekday if the string is a weekday name or Inv_WeekDay otherwise
387 static wxDateTime::WeekDay
GetWeekDayFromName(const wxString
& name
, int flags
)
389 wxDateTime::WeekDay wd
;
390 for ( wd
= wxDateTime::Sun
; wd
< wxDateTime::Inv_WeekDay
; wxNextWDay(wd
) )
392 // case-insensitive comparison either one of or with both abbreviated
394 if ( flags
& wxDateTime::Name_Full
)
396 if ( name
.CmpNoCase(wxDateTime::
397 GetWeekDayName(wd
, wxDateTime::Name_Full
)) == 0 )
403 if ( flags
& wxDateTime::Name_Abbr
)
405 if ( name
.CmpNoCase(wxDateTime::
406 GetWeekDayName(wd
, wxDateTime::Name_Abbr
)) == 0 )
416 // scans all digits (but no more than len) and returns the resulting number
417 static bool GetNumericToken(size_t len
, const wxChar
*& p
, unsigned long *number
)
421 while ( wxIsdigit(*p
) )
425 if ( len
&& ++n
> len
)
429 return !!s
&& s
.ToULong(number
);
432 // scans all alphabetic characters and returns the resulting string
433 static wxString
GetAlphaToken(const wxChar
*& p
)
436 while ( wxIsalpha(*p
) )
444 // ============================================================================
445 // implementation of wxDateTime
446 // ============================================================================
448 // ----------------------------------------------------------------------------
450 // ----------------------------------------------------------------------------
454 year
= (wxDateTime_t
)wxDateTime::Inv_Year
;
455 mon
= wxDateTime::Inv_Month
;
457 hour
= min
= sec
= msec
= 0;
458 wday
= wxDateTime::Inv_WeekDay
;
461 wxDateTime::Tm::Tm(const struct tm
& tm
, const TimeZone
& tz
)
469 mon
= (wxDateTime::Month
)tm
.tm_mon
;
470 year
= 1900 + tm
.tm_year
;
475 bool wxDateTime::Tm::IsValid() const
477 // we allow for the leap seconds, although we don't use them (yet)
478 return (year
!= wxDateTime::Inv_Year
) && (mon
!= wxDateTime::Inv_Month
) &&
479 (mday
<= GetNumOfDaysInMonth(year
, mon
)) &&
480 (hour
< 24) && (min
< 60) && (sec
< 62) && (msec
< 1000);
483 void wxDateTime::Tm::ComputeWeekDay()
485 // compute the week day from day/month/year: we use the dumbest algorithm
486 // possible: just compute our JDN and then use the (simple to derive)
487 // formula: weekday = (JDN + 1.5) % 7
488 wday
= (wxDateTime::WeekDay
)(GetTruncatedJDN(mday
, mon
, year
) + 2) % 7;
491 void wxDateTime::Tm::AddMonths(int monDiff
)
493 // normalize the months field
494 while ( monDiff
< -mon
)
498 monDiff
+= MONTHS_IN_YEAR
;
501 while ( monDiff
+ mon
>= MONTHS_IN_YEAR
)
505 monDiff
-= MONTHS_IN_YEAR
;
508 mon
= (wxDateTime::Month
)(mon
+ monDiff
);
510 wxASSERT_MSG( mon
>= 0 && mon
< MONTHS_IN_YEAR
, _T("logic error") );
512 // NB: we don't check here that the resulting date is valid, this function
513 // is private and the caller must check it if needed
516 void wxDateTime::Tm::AddDays(int dayDiff
)
518 // normalize the days field
519 while ( dayDiff
+ mday
< 1 )
523 dayDiff
+= GetNumOfDaysInMonth(year
, mon
);
527 while ( mday
> GetNumOfDaysInMonth(year
, mon
) )
529 mday
-= GetNumOfDaysInMonth(year
, mon
);
534 wxASSERT_MSG( mday
> 0 && mday
<= GetNumOfDaysInMonth(year
, mon
),
538 // ----------------------------------------------------------------------------
540 // ----------------------------------------------------------------------------
542 wxDateTime::TimeZone::TimeZone(wxDateTime::TZ tz
)
546 case wxDateTime::Local
:
547 // get the offset from C RTL: it returns the difference GMT-local
548 // while we want to have the offset _from_ GMT, hence the '-'
549 m_offset
= -GetTimeZone();
552 case wxDateTime::GMT_12
:
553 case wxDateTime::GMT_11
:
554 case wxDateTime::GMT_10
:
555 case wxDateTime::GMT_9
:
556 case wxDateTime::GMT_8
:
557 case wxDateTime::GMT_7
:
558 case wxDateTime::GMT_6
:
559 case wxDateTime::GMT_5
:
560 case wxDateTime::GMT_4
:
561 case wxDateTime::GMT_3
:
562 case wxDateTime::GMT_2
:
563 case wxDateTime::GMT_1
:
564 m_offset
= -3600*(wxDateTime::GMT0
- tz
);
567 case wxDateTime::GMT0
:
568 case wxDateTime::GMT1
:
569 case wxDateTime::GMT2
:
570 case wxDateTime::GMT3
:
571 case wxDateTime::GMT4
:
572 case wxDateTime::GMT5
:
573 case wxDateTime::GMT6
:
574 case wxDateTime::GMT7
:
575 case wxDateTime::GMT8
:
576 case wxDateTime::GMT9
:
577 case wxDateTime::GMT10
:
578 case wxDateTime::GMT11
:
579 case wxDateTime::GMT12
:
580 m_offset
= 3600*(tz
- wxDateTime::GMT0
);
583 case wxDateTime::A_CST
:
584 // Central Standard Time in use in Australia = UTC + 9.5
585 m_offset
= 60l*(9*60 + 30);
589 wxFAIL_MSG( _T("unknown time zone") );
593 // ----------------------------------------------------------------------------
595 // ----------------------------------------------------------------------------
598 bool wxDateTime::IsLeapYear(int year
, wxDateTime::Calendar cal
)
600 if ( year
== Inv_Year
)
601 year
= GetCurrentYear();
603 if ( cal
== Gregorian
)
605 // in Gregorian calendar leap years are those divisible by 4 except
606 // those divisible by 100 unless they're also divisible by 400
607 // (in some countries, like Russia and Greece, additional corrections
608 // exist, but they won't manifest themselves until 2700)
609 return (year
% 4 == 0) && ((year
% 100 != 0) || (year
% 400 == 0));
611 else if ( cal
== Julian
)
613 // in Julian calendar the rule is simpler
614 return year
% 4 == 0;
618 wxFAIL_MSG(_T("unknown calendar"));
625 int wxDateTime::GetCentury(int year
)
627 return year
> 0 ? year
/ 100 : year
/ 100 - 1;
631 int wxDateTime::ConvertYearToBC(int year
)
634 return year
> 0 ? year
: year
- 1;
638 int wxDateTime::GetCurrentYear(wxDateTime::Calendar cal
)
643 return Now().GetYear();
646 wxFAIL_MSG(_T("TODO"));
650 wxFAIL_MSG(_T("unsupported calendar"));
658 wxDateTime::Month
wxDateTime::GetCurrentMonth(wxDateTime::Calendar cal
)
663 return Now().GetMonth();
666 wxFAIL_MSG(_T("TODO"));
670 wxFAIL_MSG(_T("unsupported calendar"));
678 wxDateTime::wxDateTime_t
wxDateTime::GetNumberOfDays(int year
, Calendar cal
)
680 if ( year
== Inv_Year
)
682 // take the current year if none given
683 year
= GetCurrentYear();
690 return IsLeapYear(year
) ? 366 : 365;
693 wxFAIL_MSG(_T("unsupported calendar"));
701 wxDateTime::wxDateTime_t
wxDateTime::GetNumberOfDays(wxDateTime::Month month
,
703 wxDateTime::Calendar cal
)
705 wxCHECK_MSG( month
< MONTHS_IN_YEAR
, 0, _T("invalid month") );
707 if ( cal
== Gregorian
|| cal
== Julian
)
709 if ( year
== Inv_Year
)
711 // take the current year if none given
712 year
= GetCurrentYear();
715 return GetNumOfDaysInMonth(year
, month
);
719 wxFAIL_MSG(_T("unsupported calendar"));
726 wxString
wxDateTime::GetMonthName(wxDateTime::Month month
,
727 wxDateTime::NameFlags flags
)
729 wxCHECK_MSG( month
!= Inv_Month
, _T(""), _T("invalid month") );
731 // notice that we must set all the fields to avoid confusing libc (GNU one
732 // gets confused to a crash if we don't do this)
737 return CallStrftime(flags
== Name_Abbr
? _T("%b") : _T("%B"), &tm
);
741 wxString
wxDateTime::GetWeekDayName(wxDateTime::WeekDay wday
,
742 wxDateTime::NameFlags flags
)
744 wxCHECK_MSG( wday
!= Inv_WeekDay
, _T(""), _T("invalid weekday") );
746 // take some arbitrary Sunday
753 // and offset it by the number of days needed to get the correct wday
756 // call mktime() to normalize it...
759 // ... and call strftime()
760 return CallStrftime(flags
== Name_Abbr
? _T("%a") : _T("%A"), &tm
);
764 void wxDateTime::GetAmPmStrings(wxString
*am
, wxString
*pm
)
770 *am
= CallStrftime(_T("%p"), &tm
);
775 *pm
= CallStrftime(_T("%p"), &tm
);
779 // ----------------------------------------------------------------------------
780 // Country stuff: date calculations depend on the country (DST, work days,
781 // ...), so we need to know which rules to follow.
782 // ----------------------------------------------------------------------------
785 wxDateTime::Country
wxDateTime::GetCountry()
787 // TODO use LOCALE_ICOUNTRY setting under Win32
789 if ( ms_country
== Country_Unknown
)
791 // try to guess from the time zone name
792 time_t t
= time(NULL
);
793 struct tm
*tm
= localtime(&t
);
795 wxString tz
= CallStrftime(_T("%Z"), tm
);
796 if ( tz
== _T("WET") || tz
== _T("WEST") )
800 else if ( tz
== _T("CET") || tz
== _T("CEST") )
802 ms_country
= Country_EEC
;
804 else if ( tz
== _T("MSK") || tz
== _T("MSD") )
808 else if ( tz
== _T("AST") || tz
== _T("ADT") ||
809 tz
== _T("EST") || tz
== _T("EDT") ||
810 tz
== _T("CST") || tz
== _T("CDT") ||
811 tz
== _T("MST") || tz
== _T("MDT") ||
812 tz
== _T("PST") || tz
== _T("PDT") )
818 // well, choose a default one
827 void wxDateTime::SetCountry(wxDateTime::Country country
)
829 ms_country
= country
;
833 bool wxDateTime::IsWestEuropeanCountry(Country country
)
835 if ( country
== Country_Default
)
837 country
= GetCountry();
840 return (Country_WesternEurope_Start
<= country
) &&
841 (country
<= Country_WesternEurope_End
);
844 // ----------------------------------------------------------------------------
845 // DST calculations: we use 3 different rules for the West European countries,
846 // USA and for the rest of the world. This is undoubtedly false for many
847 // countries, but I lack the necessary info (and the time to gather it),
848 // please add the other rules here!
849 // ----------------------------------------------------------------------------
852 bool wxDateTime::IsDSTApplicable(int year
, Country country
)
854 if ( year
== Inv_Year
)
856 // take the current year if none given
857 year
= GetCurrentYear();
860 if ( country
== Country_Default
)
862 country
= GetCountry();
869 // DST was first observed in the US and UK during WWI, reused
870 // during WWII and used again since 1966
871 return year
>= 1966 ||
872 (year
>= 1942 && year
<= 1945) ||
873 (year
== 1918 || year
== 1919);
876 // assume that it started after WWII
882 wxDateTime
wxDateTime::GetBeginDST(int year
, Country country
)
884 if ( year
== Inv_Year
)
886 // take the current year if none given
887 year
= GetCurrentYear();
890 if ( country
== Country_Default
)
892 country
= GetCountry();
895 if ( !IsDSTApplicable(year
, country
) )
897 return wxInvalidDateTime
;
902 if ( IsWestEuropeanCountry(country
) || (country
== Russia
) )
904 // DST begins at 1 a.m. GMT on the last Sunday of March
905 if ( !dt
.SetToLastWeekDay(Sun
, Mar
, year
) )
908 wxFAIL_MSG( _T("no last Sunday in March?") );
911 dt
+= wxTimeSpan::Hours(1);
913 // disable DST tests because it could result in an infinite recursion!
916 else switch ( country
)
923 // don't know for sure - assume it was in effect all year
928 dt
.Set(1, Jan
, year
);
932 // DST was installed Feb 2, 1942 by the Congress
933 dt
.Set(2, Feb
, year
);
936 // Oil embargo changed the DST period in the US
938 dt
.Set(6, Jan
, 1974);
942 dt
.Set(23, Feb
, 1975);
946 // before 1986, DST begun on the last Sunday of April, but
947 // in 1986 Reagan changed it to begin at 2 a.m. of the
948 // first Sunday in April
951 if ( !dt
.SetToLastWeekDay(Sun
, Apr
, year
) )
954 wxFAIL_MSG( _T("no first Sunday in April?") );
959 if ( !dt
.SetToWeekDay(Sun
, 1, Apr
, year
) )
962 wxFAIL_MSG( _T("no first Sunday in April?") );
966 dt
+= wxTimeSpan::Hours(2);
968 // TODO what about timezone??
974 // assume Mar 30 as the start of the DST for the rest of the world
975 // - totally bogus, of course
976 dt
.Set(30, Mar
, year
);
983 wxDateTime
wxDateTime::GetEndDST(int year
, Country country
)
985 if ( year
== Inv_Year
)
987 // take the current year if none given
988 year
= GetCurrentYear();
991 if ( country
== Country_Default
)
993 country
= GetCountry();
996 if ( !IsDSTApplicable(year
, country
) )
998 return wxInvalidDateTime
;
1003 if ( IsWestEuropeanCountry(country
) || (country
== Russia
) )
1005 // DST ends at 1 a.m. GMT on the last Sunday of October
1006 if ( !dt
.SetToLastWeekDay(Sun
, Oct
, year
) )
1008 // weirder and weirder...
1009 wxFAIL_MSG( _T("no last Sunday in October?") );
1012 dt
+= wxTimeSpan::Hours(1);
1014 // disable DST tests because it could result in an infinite recursion!
1017 else switch ( country
)
1024 // don't know for sure - assume it was in effect all year
1028 dt
.Set(31, Dec
, year
);
1032 // the time was reset after the end of the WWII
1033 dt
.Set(30, Sep
, year
);
1037 // DST ends at 2 a.m. on the last Sunday of October
1038 if ( !dt
.SetToLastWeekDay(Sun
, Oct
, year
) )
1040 // weirder and weirder...
1041 wxFAIL_MSG( _T("no last Sunday in October?") );
1044 dt
+= wxTimeSpan::Hours(2);
1046 // TODO what about timezone??
1051 // assume October 26th as the end of the DST - totally bogus too
1052 dt
.Set(26, Oct
, year
);
1058 // ----------------------------------------------------------------------------
1059 // constructors and assignment operators
1060 // ----------------------------------------------------------------------------
1062 // return the current time with ms precision
1063 /* static */ wxDateTime
wxDateTime::UNow()
1065 return wxDateTime(wxGetLocalTimeMillis());
1068 // the values in the tm structure contain the local time
1069 wxDateTime
& wxDateTime::Set(const struct tm
& tm
)
1072 time_t timet
= mktime(&tm2
);
1074 if ( timet
== (time_t)-1 )
1076 // mktime() rather unintuitively fails for Jan 1, 1970 if the hour is
1077 // less than timezone - try to make it work for this case
1078 if ( tm2
.tm_year
== 70 && tm2
.tm_mon
== 0 && tm2
.tm_mday
== 1 )
1080 // add timezone to make sure that date is in range
1081 tm2
.tm_sec
-= GetTimeZone();
1083 timet
= mktime(&tm2
);
1084 if ( timet
!= (time_t)-1 )
1086 timet
+= GetTimeZone();
1092 wxFAIL_MSG( _T("mktime() failed") );
1094 *this = wxInvalidDateTime
;
1104 wxDateTime
& wxDateTime::Set(wxDateTime_t hour
,
1105 wxDateTime_t minute
,
1106 wxDateTime_t second
,
1107 wxDateTime_t millisec
)
1109 // we allow seconds to be 61 to account for the leap seconds, even if we
1110 // don't use them really
1111 wxDATETIME_CHECK( hour
< 24 &&
1115 _T("Invalid time in wxDateTime::Set()") );
1117 // get the current date from system
1118 struct tm
*tm
= GetTmNow();
1120 wxDATETIME_CHECK( tm
, _T("localtime() failed") );
1124 tm
->tm_min
= minute
;
1125 tm
->tm_sec
= second
;
1129 // and finally adjust milliseconds
1130 return SetMillisecond(millisec
);
1133 wxDateTime
& wxDateTime::Set(wxDateTime_t day
,
1137 wxDateTime_t minute
,
1138 wxDateTime_t second
,
1139 wxDateTime_t millisec
)
1141 wxDATETIME_CHECK( hour
< 24 &&
1145 _T("Invalid time in wxDateTime::Set()") );
1147 ReplaceDefaultYearMonthWithCurrent(&year
, &month
);
1149 wxDATETIME_CHECK( (0 < day
) && (day
<= GetNumberOfDays(month
, year
)),
1150 _T("Invalid date in wxDateTime::Set()") );
1152 // the range of time_t type (inclusive)
1153 static const int yearMinInRange
= 1970;
1154 static const int yearMaxInRange
= 2037;
1156 // test only the year instead of testing for the exact end of the Unix
1157 // time_t range - it doesn't bring anything to do more precise checks
1158 if ( year
>= yearMinInRange
&& year
<= yearMaxInRange
)
1160 // use the standard library version if the date is in range - this is
1161 // probably more efficient than our code
1163 tm
.tm_year
= year
- 1900;
1169 tm
.tm_isdst
= -1; // mktime() will guess it
1173 // and finally adjust milliseconds
1174 return SetMillisecond(millisec
);
1178 // do time calculations ourselves: we want to calculate the number of
1179 // milliseconds between the given date and the epoch
1181 // get the JDN for the midnight of this day
1182 m_time
= GetTruncatedJDN(day
, month
, year
);
1183 m_time
-= EPOCH_JDN
;
1184 m_time
*= SECONDS_PER_DAY
* TIME_T_FACTOR
;
1186 // JDN corresponds to GMT, we take localtime
1187 Add(wxTimeSpan(hour
, minute
, second
+ GetTimeZone(), millisec
));
1193 wxDateTime
& wxDateTime::Set(double jdn
)
1195 // so that m_time will be 0 for the midnight of Jan 1, 1970 which is jdn
1197 jdn
-= EPOCH_JDN
+ 0.5;
1199 jdn
*= MILLISECONDS_PER_DAY
;
1206 wxDateTime
& wxDateTime::ResetTime()
1210 if ( tm
.hour
|| tm
.min
|| tm
.sec
|| tm
.msec
)
1223 // ----------------------------------------------------------------------------
1224 // time_t <-> broken down time conversions
1225 // ----------------------------------------------------------------------------
1227 wxDateTime::Tm
wxDateTime::GetTm(const TimeZone
& tz
) const
1229 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1231 time_t time
= GetTicks();
1232 if ( time
!= (time_t)-1 )
1234 // use C RTL functions
1236 if ( tz
.GetOffset() == -GetTimeZone() )
1238 // we are working with local time
1239 tm
= localtime(&time
);
1241 // should never happen
1242 wxCHECK_MSG( tm
, Tm(), _T("localtime() failed") );
1246 time
+= (time_t)tz
.GetOffset();
1247 #if defined(__VMS__) || defined(__WATCOMC__) // time is unsigned so avoid warning
1248 int time2
= (int) time
;
1256 // should never happen
1257 wxCHECK_MSG( tm
, Tm(), _T("gmtime() failed") );
1261 tm
= (struct tm
*)NULL
;
1267 // adjust the milliseconds
1269 long timeOnly
= (m_time
% MILLISECONDS_PER_DAY
).ToLong();
1270 tm2
.msec
= (wxDateTime_t
)(timeOnly
% 1000);
1273 //else: use generic code below
1276 // remember the time and do the calculations with the date only - this
1277 // eliminates rounding errors of the floating point arithmetics
1279 wxLongLong timeMidnight
= m_time
+ tz
.GetOffset() * 1000;
1281 long timeOnly
= (timeMidnight
% MILLISECONDS_PER_DAY
).ToLong();
1283 // we want to always have positive time and timeMidnight to be really
1284 // the midnight before it
1287 timeOnly
= MILLISECONDS_PER_DAY
+ timeOnly
;
1290 timeMidnight
-= timeOnly
;
1292 // calculate the Gregorian date from JDN for the midnight of our date:
1293 // this will yield day, month (in 1..12 range) and year
1295 // actually, this is the JDN for the noon of the previous day
1296 long jdn
= (timeMidnight
/ MILLISECONDS_PER_DAY
).ToLong() + EPOCH_JDN
;
1298 // CREDIT: code below is by Scott E. Lee (but bugs are mine)
1300 wxASSERT_MSG( jdn
> -2, _T("JDN out of range") );
1302 // calculate the century
1303 long temp
= (jdn
+ JDN_OFFSET
) * 4 - 1;
1304 long century
= temp
/ DAYS_PER_400_YEARS
;
1306 // then the year and day of year (1 <= dayOfYear <= 366)
1307 temp
= ((temp
% DAYS_PER_400_YEARS
) / 4) * 4 + 3;
1308 long year
= (century
* 100) + (temp
/ DAYS_PER_4_YEARS
);
1309 long dayOfYear
= (temp
% DAYS_PER_4_YEARS
) / 4 + 1;
1311 // and finally the month and day of the month
1312 temp
= dayOfYear
* 5 - 3;
1313 long month
= temp
/ DAYS_PER_5_MONTHS
;
1314 long day
= (temp
% DAYS_PER_5_MONTHS
) / 5 + 1;
1316 // month is counted from March - convert to normal
1327 // year is offset by 4800
1330 // check that the algorithm gave us something reasonable
1331 wxASSERT_MSG( (0 < month
) && (month
<= 12), _T("invalid month") );
1332 wxASSERT_MSG( (1 <= day
) && (day
< 32), _T("invalid day") );
1333 wxASSERT_MSG( (INT_MIN
<= year
) && (year
<= INT_MAX
),
1334 _T("year range overflow") );
1336 // construct Tm from these values
1338 tm
.year
= (int)year
;
1339 tm
.mon
= (Month
)(month
- 1); // algorithm yields 1 for January, not 0
1340 tm
.mday
= (wxDateTime_t
)day
;
1341 tm
.msec
= (wxDateTime_t
)(timeOnly
% 1000);
1342 timeOnly
-= tm
.msec
;
1343 timeOnly
/= 1000; // now we have time in seconds
1345 tm
.sec
= (wxDateTime_t
)(timeOnly
% 60);
1347 timeOnly
/= 60; // now we have time in minutes
1349 tm
.min
= (wxDateTime_t
)(timeOnly
% 60);
1352 tm
.hour
= (wxDateTime_t
)(timeOnly
/ 60);
1357 wxDateTime
& wxDateTime::SetYear(int year
)
1359 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1368 wxDateTime
& wxDateTime::SetMonth(Month month
)
1370 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1379 wxDateTime
& wxDateTime::SetDay(wxDateTime_t mday
)
1381 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1390 wxDateTime
& wxDateTime::SetHour(wxDateTime_t hour
)
1392 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1401 wxDateTime
& wxDateTime::SetMinute(wxDateTime_t min
)
1403 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1412 wxDateTime
& wxDateTime::SetSecond(wxDateTime_t sec
)
1414 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1423 wxDateTime
& wxDateTime::SetMillisecond(wxDateTime_t millisecond
)
1425 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1427 // we don't need to use GetTm() for this one
1428 m_time
-= m_time
% 1000l;
1429 m_time
+= millisecond
;
1434 // ----------------------------------------------------------------------------
1435 // wxDateTime arithmetics
1436 // ----------------------------------------------------------------------------
1438 wxDateTime
& wxDateTime::Add(const wxDateSpan
& diff
)
1442 tm
.year
+= diff
.GetYears();
1443 tm
.AddMonths(diff
.GetMonths());
1445 // check that the resulting date is valid
1446 if ( tm
.mday
> GetNumOfDaysInMonth(tm
.year
, tm
.mon
) )
1448 // We suppose that when adding one month to Jan 31 we want to get Feb
1449 // 28 (or 29), i.e. adding a month to the last day of the month should
1450 // give the last day of the next month which is quite logical.
1452 // Unfortunately, there is no logic way to understand what should
1453 // Jan 30 + 1 month be - Feb 28 too or Feb 27 (assuming non leap year)?
1454 // We make it Feb 28 (last day too), but it is highly questionable.
1455 tm
.mday
= GetNumOfDaysInMonth(tm
.year
, tm
.mon
);
1458 tm
.AddDays(diff
.GetTotalDays());
1462 wxASSERT_MSG( IsSameTime(tm
),
1463 _T("Add(wxDateSpan) shouldn't modify time") );
1468 // ----------------------------------------------------------------------------
1469 // Weekday and monthday stuff
1470 // ----------------------------------------------------------------------------
1472 bool wxDateTime::SetToTheWeek(wxDateTime_t numWeek
, WeekDay weekday
)
1474 int year
= GetYear();
1476 // Jan 4 always lies in the 1st week of the year
1478 SetToWeekDayInSameWeek(weekday
) += wxDateSpan::Weeks(numWeek
);
1480 if ( GetYear() != year
)
1482 // oops... numWeek was too big
1489 wxDateTime
& wxDateTime::SetToLastMonthDay(Month month
,
1492 // take the current month/year if none specified
1493 if ( year
== Inv_Year
)
1495 if ( month
== Inv_Month
)
1498 return Set(GetNumOfDaysInMonth(year
, month
), month
, year
);
1501 wxDateTime
& wxDateTime::SetToWeekDayInSameWeek(WeekDay weekday
)
1503 wxDATETIME_CHECK( weekday
!= Inv_WeekDay
, _T("invalid weekday") );
1505 WeekDay wdayThis
= GetWeekDay();
1506 if ( weekday
== wdayThis
)
1511 else if ( weekday
< wdayThis
)
1513 return Subtract(wxDateSpan::Days(wdayThis
- weekday
));
1515 else // weekday > wdayThis
1517 return Add(wxDateSpan::Days(weekday
- wdayThis
));
1521 wxDateTime
& wxDateTime::SetToNextWeekDay(WeekDay weekday
)
1523 wxDATETIME_CHECK( weekday
!= Inv_WeekDay
, _T("invalid weekday") );
1526 WeekDay wdayThis
= GetWeekDay();
1527 if ( weekday
== wdayThis
)
1532 else if ( weekday
< wdayThis
)
1534 // need to advance a week
1535 diff
= 7 - (wdayThis
- weekday
);
1537 else // weekday > wdayThis
1539 diff
= weekday
- wdayThis
;
1542 return Add(wxDateSpan::Days(diff
));
1545 wxDateTime
& wxDateTime::SetToPrevWeekDay(WeekDay weekday
)
1547 wxDATETIME_CHECK( weekday
!= Inv_WeekDay
, _T("invalid weekday") );
1550 WeekDay wdayThis
= GetWeekDay();
1551 if ( weekday
== wdayThis
)
1556 else if ( weekday
> wdayThis
)
1558 // need to go to previous week
1559 diff
= 7 - (weekday
- wdayThis
);
1561 else // weekday < wdayThis
1563 diff
= wdayThis
- weekday
;
1566 return Subtract(wxDateSpan::Days(diff
));
1569 bool wxDateTime::SetToWeekDay(WeekDay weekday
,
1574 wxCHECK_MSG( weekday
!= Inv_WeekDay
, FALSE
, _T("invalid weekday") );
1576 // we don't check explicitly that -5 <= n <= 5 because we will return FALSE
1577 // anyhow in such case - but may be should still give an assert for it?
1579 // take the current month/year if none specified
1580 ReplaceDefaultYearMonthWithCurrent(&year
, &month
);
1584 // TODO this probably could be optimised somehow...
1588 // get the first day of the month
1589 dt
.Set(1, month
, year
);
1592 WeekDay wdayFirst
= dt
.GetWeekDay();
1594 // go to the first weekday of the month
1595 int diff
= weekday
- wdayFirst
;
1599 // add advance n-1 weeks more
1602 dt
+= wxDateSpan::Days(diff
);
1604 else // count from the end of the month
1606 // get the last day of the month
1607 dt
.SetToLastMonthDay(month
, year
);
1610 WeekDay wdayLast
= dt
.GetWeekDay();
1612 // go to the last weekday of the month
1613 int diff
= wdayLast
- weekday
;
1617 // and rewind n-1 weeks from there
1620 dt
-= wxDateSpan::Days(diff
);
1623 // check that it is still in the same month
1624 if ( dt
.GetMonth() == month
)
1632 // no such day in this month
1637 wxDateTime::wxDateTime_t
wxDateTime::GetDayOfYear(const TimeZone
& tz
) const
1641 return gs_cumulatedDays
[IsLeapYear(tm
.year
)][tm
.mon
] + tm
.mday
;
1644 wxDateTime::wxDateTime_t
wxDateTime::GetWeekOfYear(wxDateTime::WeekFlags flags
,
1645 const TimeZone
& tz
) const
1647 if ( flags
== Default_First
)
1649 flags
= GetCountry() == USA
? Sunday_First
: Monday_First
;
1652 wxDateTime_t nDayInYear
= GetDayOfYear(tz
);
1655 WeekDay wd
= GetWeekDay(tz
);
1656 if ( flags
== Sunday_First
)
1658 week
= (nDayInYear
- wd
+ 7) / 7;
1662 // have to shift the week days values
1663 week
= (nDayInYear
- (wd
- 1 + 7) % 7 + 7) / 7;
1666 // FIXME some more elegant way??
1667 WeekDay wdYearStart
= wxDateTime(1, Jan
, GetYear()).GetWeekDay();
1668 if ( wdYearStart
== Wed
|| wdYearStart
== Thu
)
1676 wxDateTime::wxDateTime_t
wxDateTime::GetWeekOfMonth(wxDateTime::WeekFlags flags
,
1677 const TimeZone
& tz
) const
1680 wxDateTime dtMonthStart
= wxDateTime(1, tm
.mon
, tm
.year
);
1681 int nWeek
= GetWeekOfYear(flags
) - dtMonthStart
.GetWeekOfYear(flags
) + 1;
1684 // this may happen for January when Jan, 1 is the last week of the
1686 nWeek
+= IsLeapYear(tm
.year
- 1) ? 53 : 52;
1689 return (wxDateTime::wxDateTime_t
)nWeek
;
1692 wxDateTime
& wxDateTime::SetToYearDay(wxDateTime::wxDateTime_t yday
)
1694 int year
= GetYear();
1695 wxDATETIME_CHECK( (0 < yday
) && (yday
<= GetNumberOfDays(year
)),
1696 _T("invalid year day") );
1698 bool isLeap
= IsLeapYear(year
);
1699 for ( Month mon
= Jan
; mon
< Inv_Month
; wxNextMonth(mon
) )
1701 // for Dec, we can't compare with gs_cumulatedDays[mon + 1], but we
1702 // don't need it neither - because of the CHECK above we know that
1703 // yday lies in December then
1704 if ( (mon
== Dec
) || (yday
< gs_cumulatedDays
[isLeap
][mon
+ 1]) )
1706 Set(yday
- gs_cumulatedDays
[isLeap
][mon
], mon
, year
);
1715 // ----------------------------------------------------------------------------
1716 // Julian day number conversion and related stuff
1717 // ----------------------------------------------------------------------------
1719 double wxDateTime::GetJulianDayNumber() const
1721 // JDN are always expressed for the GMT dates
1722 Tm
tm(ToTimezone(GMT0
).GetTm(GMT0
));
1724 double result
= GetTruncatedJDN(tm
.mday
, tm
.mon
, tm
.year
);
1726 // add the part GetTruncatedJDN() neglected
1729 // and now add the time: 86400 sec = 1 JDN
1730 return result
+ ((double)(60*(60*tm
.hour
+ tm
.min
) + tm
.sec
)) / 86400;
1733 double wxDateTime::GetRataDie() const
1735 // March 1 of the year 0 is Rata Die day -306 and JDN 1721119.5
1736 return GetJulianDayNumber() - 1721119.5 - 306;
1739 // ----------------------------------------------------------------------------
1740 // timezone and DST stuff
1741 // ----------------------------------------------------------------------------
1743 int wxDateTime::IsDST(wxDateTime::Country country
) const
1745 wxCHECK_MSG( country
== Country_Default
, -1,
1746 _T("country support not implemented") );
1748 // use the C RTL for the dates in the standard range
1749 time_t timet
= GetTicks();
1750 if ( timet
!= (time_t)-1 )
1752 tm
*tm
= localtime(&timet
);
1754 wxCHECK_MSG( tm
, -1, _T("localtime() failed") );
1756 return tm
->tm_isdst
;
1760 int year
= GetYear();
1762 if ( !IsDSTApplicable(year
, country
) )
1764 // no DST time in this year in this country
1768 return IsBetween(GetBeginDST(year
, country
), GetEndDST(year
, country
));
1772 wxDateTime
& wxDateTime::MakeTimezone(const TimeZone
& tz
, bool noDST
)
1774 long secDiff
= GetTimeZone() + tz
.GetOffset();
1776 // we need to know whether DST is or not in effect for this date unless
1777 // the test disabled by the caller
1778 if ( !noDST
&& (IsDST() == 1) )
1780 // FIXME we assume that the DST is always shifted by 1 hour
1784 return Subtract(wxTimeSpan::Seconds(secDiff
));
1787 // ----------------------------------------------------------------------------
1788 // wxDateTime to/from text representations
1789 // ----------------------------------------------------------------------------
1791 wxString
wxDateTime::Format(const wxChar
*format
, const TimeZone
& tz
) const
1793 wxCHECK_MSG( format
, _T(""), _T("NULL format in wxDateTime::Format") );
1795 // we have to use our own implementation if the date is out of range of
1796 // strftime() or if we use non standard specificators
1797 time_t time
= GetTicks();
1798 if ( (time
!= (time_t)-1) && !wxStrstr(format
, _T("%l")) )
1802 if ( tz
.GetOffset() == -GetTimeZone() )
1804 // we are working with local time
1805 tm
= localtime(&time
);
1807 // should never happen
1808 wxCHECK_MSG( tm
, wxEmptyString
, _T("localtime() failed") );
1812 time
+= (int)tz
.GetOffset();
1814 #if defined(__VMS__) || defined(__WATCOMC__) // time is unsigned so avoid warning
1815 int time2
= (int) time
;
1823 // should never happen
1824 wxCHECK_MSG( tm
, wxEmptyString
, _T("gmtime() failed") );
1828 tm
= (struct tm
*)NULL
;
1834 return CallStrftime(format
, tm
);
1836 //else: use generic code below
1839 // we only parse ANSI C format specifications here, no POSIX 2
1840 // complications, no GNU extensions but we do add support for a "%l" format
1841 // specifier allowing to get the number of milliseconds
1844 // used for calls to strftime() when we only deal with time
1845 struct tm tmTimeOnly
;
1846 tmTimeOnly
.tm_hour
= tm
.hour
;
1847 tmTimeOnly
.tm_min
= tm
.min
;
1848 tmTimeOnly
.tm_sec
= tm
.sec
;
1849 tmTimeOnly
.tm_wday
= 0;
1850 tmTimeOnly
.tm_yday
= 0;
1851 tmTimeOnly
.tm_mday
= 1; // any date will do
1852 tmTimeOnly
.tm_mon
= 0;
1853 tmTimeOnly
.tm_year
= 76;
1854 tmTimeOnly
.tm_isdst
= 0; // no DST, we adjust for tz ourselves
1856 wxString tmp
, res
, fmt
;
1857 for ( const wxChar
*p
= format
; *p
; p
++ )
1859 if ( *p
!= _T('%') )
1867 // set the default format
1870 case _T('Y'): // year has 4 digits
1874 case _T('j'): // day of year has 3 digits
1875 case _T('l'): // milliseconds have 3 digits
1880 // it's either another valid format specifier in which case
1881 // the format is "%02d" (for all the rest) or we have the
1882 // field width preceding the format in which case it will
1883 // override the default format anyhow
1887 bool restart
= TRUE
;
1892 // start of the format specification
1895 case _T('a'): // a weekday name
1897 // second parameter should be TRUE for abbreviated names
1898 res
+= GetWeekDayName(tm
.GetWeekDay(),
1899 *p
== _T('a') ? Name_Abbr
: Name_Full
);
1902 case _T('b'): // a month name
1904 res
+= GetMonthName(tm
.mon
,
1905 *p
== _T('b') ? Name_Abbr
: Name_Full
);
1908 case _T('c'): // locale default date and time representation
1909 case _T('x'): // locale default date representation
1911 // the problem: there is no way to know what do these format
1912 // specifications correspond to for the current locale.
1914 // the solution: use a hack and still use strftime(): first
1915 // find the YEAR which is a year in the strftime() range (1970
1916 // - 2038) whose Jan 1 falls on the same week day as the Jan 1
1917 // of the real year. Then make a copy of the format and
1918 // replace all occurences of YEAR in it with some unique
1919 // string not appearing anywhere else in it, then use
1920 // strftime() to format the date in year YEAR and then replace
1921 // YEAR back by the real year and the unique replacement
1922 // string back with YEAR. Notice that "all occurences of YEAR"
1923 // means all occurences of 4 digit as well as 2 digit form!
1925 // the bugs: we assume that neither of %c nor %x contains any
1926 // fields which may change between the YEAR and real year. For
1927 // example, the week number (%U, %W) and the day number (%j)
1928 // will change if one of these years is leap and the other one
1931 // find the YEAR: normally, for any year X, Jan 1 or the
1932 // year X + 28 is the same weekday as Jan 1 of X (because
1933 // the weekday advances by 1 for each normal X and by 2
1934 // for each leap X, hence by 5 every 4 years or by 35
1935 // which is 0 mod 7 every 28 years) but this rule breaks
1936 // down if there are years between X and Y which are
1937 // divisible by 4 but not leap (i.e. divisible by 100 but
1938 // not 400), hence the correction.
1940 int yearReal
= GetYear(tz
);
1941 int mod28
= yearReal
% 28;
1943 // be careful to not go too far - we risk to leave the
1948 year
= 1988 + mod28
; // 1988 == 0 (mod 28)
1952 year
= 1970 + mod28
- 10; // 1970 == 10 (mod 28)
1955 int nCentury
= year
/ 100,
1956 nCenturyReal
= yearReal
/ 100;
1958 // need to adjust for the years divisble by 400 which are
1959 // not leap but are counted like leap ones if we just take
1960 // the number of centuries in between for nLostWeekDays
1961 int nLostWeekDays
= (nCentury
- nCenturyReal
) -
1962 (nCentury
/ 4 - nCenturyReal
/ 4);
1964 // we have to gain back the "lost" weekdays: note that the
1965 // effect of this loop is to not do anything to
1966 // nLostWeekDays (which we won't use any more), but to
1967 // (indirectly) set the year correctly
1968 while ( (nLostWeekDays
% 7) != 0 )
1970 nLostWeekDays
+= year
++ % 4 ? 1 : 2;
1973 // at any rate, we couldn't go further than 1988 + 9 + 28!
1974 wxASSERT_MSG( year
< 2030,
1975 _T("logic error in wxDateTime::Format") );
1977 wxString strYear
, strYear2
;
1978 strYear
.Printf(_T("%d"), year
);
1979 strYear2
.Printf(_T("%d"), year
% 100);
1981 // find two strings not occuring in format (this is surely
1982 // not optimal way of doing it... improvements welcome!)
1983 wxString fmt
= format
;
1984 wxString replacement
= (wxChar
)-1;
1985 while ( fmt
.Find(replacement
) != wxNOT_FOUND
)
1987 replacement
<< (wxChar
)-1;
1990 wxString replacement2
= (wxChar
)-2;
1991 while ( fmt
.Find(replacement
) != wxNOT_FOUND
)
1993 replacement
<< (wxChar
)-2;
1996 // replace all occurences of year with it
1997 bool wasReplaced
= fmt
.Replace(strYear
, replacement
) > 0;
1999 wasReplaced
= fmt
.Replace(strYear2
, replacement2
) > 0;
2001 // use strftime() to format the same date but in supported
2004 // NB: we assume that strftime() doesn't check for the
2005 // date validity and will happily format the date
2006 // corresponding to Feb 29 of a non leap year (which
2007 // may happen if yearReal was leap and year is not)
2008 struct tm tmAdjusted
;
2010 tmAdjusted
.tm_hour
= tm
.hour
;
2011 tmAdjusted
.tm_min
= tm
.min
;
2012 tmAdjusted
.tm_sec
= tm
.sec
;
2013 tmAdjusted
.tm_wday
= tm
.GetWeekDay();
2014 tmAdjusted
.tm_yday
= GetDayOfYear();
2015 tmAdjusted
.tm_mday
= tm
.mday
;
2016 tmAdjusted
.tm_mon
= tm
.mon
;
2017 tmAdjusted
.tm_year
= year
- 1900;
2018 tmAdjusted
.tm_isdst
= 0; // no DST, already adjusted
2019 wxString str
= CallStrftime(*p
== _T('c') ? _T("%c")
2023 // now replace the occurence of 1999 with the real year
2024 wxString strYearReal
, strYearReal2
;
2025 strYearReal
.Printf(_T("%04d"), yearReal
);
2026 strYearReal2
.Printf(_T("%02d"), yearReal
% 100);
2027 str
.Replace(strYear
, strYearReal
);
2028 str
.Replace(strYear2
, strYearReal2
);
2030 // and replace back all occurences of replacement string
2033 str
.Replace(replacement2
, strYear2
);
2034 str
.Replace(replacement
, strYear
);
2041 case _T('d'): // day of a month (01-31)
2042 res
+= wxString::Format(fmt
, tm
.mday
);
2045 case _T('H'): // hour in 24h format (00-23)
2046 res
+= wxString::Format(fmt
, tm
.hour
);
2049 case _T('I'): // hour in 12h format (01-12)
2051 // 24h -> 12h, 0h -> 12h too
2052 int hour12
= tm
.hour
> 12 ? tm
.hour
- 12
2053 : tm
.hour
? tm
.hour
: 12;
2054 res
+= wxString::Format(fmt
, hour12
);
2058 case _T('j'): // day of the year
2059 res
+= wxString::Format(fmt
, GetDayOfYear(tz
));
2062 case _T('l'): // milliseconds (NOT STANDARD)
2063 res
+= wxString::Format(fmt
, GetMillisecond(tz
));
2066 case _T('m'): // month as a number (01-12)
2067 res
+= wxString::Format(fmt
, tm
.mon
+ 1);
2070 case _T('M'): // minute as a decimal number (00-59)
2071 res
+= wxString::Format(fmt
, tm
.min
);
2074 case _T('p'): // AM or PM string
2075 res
+= CallStrftime(_T("%p"), &tmTimeOnly
);
2078 case _T('S'): // second as a decimal number (00-61)
2079 res
+= wxString::Format(fmt
, tm
.sec
);
2082 case _T('U'): // week number in the year (Sunday 1st week day)
2083 res
+= wxString::Format(fmt
, GetWeekOfYear(Sunday_First
, tz
));
2086 case _T('W'): // week number in the year (Monday 1st week day)
2087 res
+= wxString::Format(fmt
, GetWeekOfYear(Monday_First
, tz
));
2090 case _T('w'): // weekday as a number (0-6), Sunday = 0
2091 res
+= wxString::Format(fmt
, tm
.GetWeekDay());
2094 // case _T('x'): -- handled with "%c"
2096 case _T('X'): // locale default time representation
2097 // just use strftime() to format the time for us
2098 res
+= CallStrftime(_T("%X"), &tmTimeOnly
);
2101 case _T('y'): // year without century (00-99)
2102 res
+= wxString::Format(fmt
, tm
.year
% 100);
2105 case _T('Y'): // year with century
2106 res
+= wxString::Format(fmt
, tm
.year
);
2109 case _T('Z'): // timezone name
2110 res
+= CallStrftime(_T("%Z"), &tmTimeOnly
);
2114 // is it the format width?
2116 while ( *p
== _T('-') || *p
== _T('+') ||
2117 *p
== _T(' ') || wxIsdigit(*p
) )
2122 if ( !fmt
.IsEmpty() )
2124 // we've only got the flags and width so far in fmt
2125 fmt
.Prepend(_T('%'));
2126 fmt
.Append(_T('d'));
2133 // no, it wasn't the width
2134 wxFAIL_MSG(_T("unknown format specificator"));
2136 // fall through and just copy it nevertheless
2138 case _T('%'): // a percent sign
2142 case 0: // the end of string
2143 wxFAIL_MSG(_T("missing format at the end of string"));
2145 // just put the '%' which was the last char in format
2155 // this function parses a string in (strict) RFC 822 format: see the section 5
2156 // of the RFC for the detailed description, but briefly it's something of the
2157 // form "Sat, 18 Dec 1999 00:48:30 +0100"
2159 // this function is "strict" by design - it must reject anything except true
2160 // RFC822 time specs.
2162 // TODO a great candidate for using reg exps
2163 const wxChar
*wxDateTime::ParseRfc822Date(const wxChar
* date
)
2165 wxCHECK_MSG( date
, (wxChar
*)NULL
, _T("NULL pointer in wxDateTime::Parse") );
2167 const wxChar
*p
= date
;
2168 const wxChar
*comma
= wxStrchr(p
, _T(','));
2171 // the part before comma is the weekday
2173 // skip it for now - we don't use but might check that it really
2174 // corresponds to the specfied date
2177 if ( *p
!= _T(' ') )
2179 wxLogDebug(_T("no space after weekday in RFC822 time spec"));
2181 return (wxChar
*)NULL
;
2187 // the following 1 or 2 digits are the day number
2188 if ( !wxIsdigit(*p
) )
2190 wxLogDebug(_T("day number expected in RFC822 time spec, none found"));
2192 return (wxChar
*)NULL
;
2195 wxDateTime_t day
= *p
++ - _T('0');
2196 if ( wxIsdigit(*p
) )
2199 day
+= *p
++ - _T('0');
2202 if ( *p
++ != _T(' ') )
2204 return (wxChar
*)NULL
;
2207 // the following 3 letters specify the month
2208 wxString
monName(p
, 3);
2210 if ( monName
== _T("Jan") )
2212 else if ( monName
== _T("Feb") )
2214 else if ( monName
== _T("Mar") )
2216 else if ( monName
== _T("Apr") )
2218 else if ( monName
== _T("May") )
2220 else if ( monName
== _T("Jun") )
2222 else if ( monName
== _T("Jul") )
2224 else if ( monName
== _T("Aug") )
2226 else if ( monName
== _T("Sep") )
2228 else if ( monName
== _T("Oct") )
2230 else if ( monName
== _T("Nov") )
2232 else if ( monName
== _T("Dec") )
2236 wxLogDebug(_T("Invalid RFC 822 month name '%s'"), monName
.c_str());
2238 return (wxChar
*)NULL
;
2243 if ( *p
++ != _T(' ') )
2245 return (wxChar
*)NULL
;
2249 if ( !wxIsdigit(*p
) )
2252 return (wxChar
*)NULL
;
2255 int year
= *p
++ - _T('0');
2257 if ( !wxIsdigit(*p
) )
2259 // should have at least 2 digits in the year
2260 return (wxChar
*)NULL
;
2264 year
+= *p
++ - _T('0');
2266 // is it a 2 digit year (as per original RFC 822) or a 4 digit one?
2267 if ( wxIsdigit(*p
) )
2270 year
+= *p
++ - _T('0');
2272 if ( !wxIsdigit(*p
) )
2274 // no 3 digit years please
2275 return (wxChar
*)NULL
;
2279 year
+= *p
++ - _T('0');
2282 if ( *p
++ != _T(' ') )
2284 return (wxChar
*)NULL
;
2287 // time is in the format hh:mm:ss and seconds are optional
2288 if ( !wxIsdigit(*p
) )
2290 return (wxChar
*)NULL
;
2293 wxDateTime_t hour
= *p
++ - _T('0');
2295 if ( !wxIsdigit(*p
) )
2297 return (wxChar
*)NULL
;
2301 hour
+= *p
++ - _T('0');
2303 if ( *p
++ != _T(':') )
2305 return (wxChar
*)NULL
;
2308 if ( !wxIsdigit(*p
) )
2310 return (wxChar
*)NULL
;
2313 wxDateTime_t min
= *p
++ - _T('0');
2315 if ( !wxIsdigit(*p
) )
2317 return (wxChar
*)NULL
;
2321 min
+= *p
++ - _T('0');
2323 wxDateTime_t sec
= 0;
2324 if ( *p
++ == _T(':') )
2326 if ( !wxIsdigit(*p
) )
2328 return (wxChar
*)NULL
;
2331 sec
= *p
++ - _T('0');
2333 if ( !wxIsdigit(*p
) )
2335 return (wxChar
*)NULL
;
2339 sec
+= *p
++ - _T('0');
2342 if ( *p
++ != _T(' ') )
2344 return (wxChar
*)NULL
;
2347 // and now the interesting part: the timezone
2349 if ( *p
== _T('-') || *p
== _T('+') )
2351 // the explicit offset given: it has the form of hhmm
2352 bool plus
= *p
++ == _T('+');
2354 if ( !wxIsdigit(*p
) || !wxIsdigit(*(p
+ 1)) )
2356 return (wxChar
*)NULL
;
2360 offset
= 60*(10*(*p
- _T('0')) + (*(p
+ 1) - _T('0')));
2364 if ( !wxIsdigit(*p
) || !wxIsdigit(*(p
+ 1)) )
2366 return (wxChar
*)NULL
;
2370 offset
+= 10*(*p
- _T('0')) + (*(p
+ 1) - _T('0'));
2381 // the symbolic timezone given: may be either military timezone or one
2382 // of standard abbreviations
2385 // military: Z = UTC, J unused, A = -1, ..., Y = +12
2386 static const int offsets
[26] =
2388 //A B C D E F G H I J K L M
2389 -1, -2, -3, -4, -5, -6, -7, -8, -9, 0, -10, -11, -12,
2390 //N O P R Q S T U V W Z Y Z
2391 +1, +2, +3, +4, +5, +6, +7, +8, +9, +10, +11, +12, 0
2394 if ( *p
< _T('A') || *p
> _T('Z') || *p
== _T('J') )
2396 wxLogDebug(_T("Invalid militaty timezone '%c'"), *p
);
2398 return (wxChar
*)NULL
;
2401 offset
= offsets
[*p
++ - _T('A')];
2407 if ( tz
== _T("UT") || tz
== _T("UTC") || tz
== _T("GMT") )
2409 else if ( tz
== _T("AST") )
2410 offset
= AST
- GMT0
;
2411 else if ( tz
== _T("ADT") )
2412 offset
= ADT
- GMT0
;
2413 else if ( tz
== _T("EST") )
2414 offset
= EST
- GMT0
;
2415 else if ( tz
== _T("EDT") )
2416 offset
= EDT
- GMT0
;
2417 else if ( tz
== _T("CST") )
2418 offset
= CST
- GMT0
;
2419 else if ( tz
== _T("CDT") )
2420 offset
= CDT
- GMT0
;
2421 else if ( tz
== _T("MST") )
2422 offset
= MST
- GMT0
;
2423 else if ( tz
== _T("MDT") )
2424 offset
= MDT
- GMT0
;
2425 else if ( tz
== _T("PST") )
2426 offset
= PST
- GMT0
;
2427 else if ( tz
== _T("PDT") )
2428 offset
= PDT
- GMT0
;
2431 wxLogDebug(_T("Unknown RFC 822 timezone '%s'"), p
);
2433 return (wxChar
*)NULL
;
2443 // the spec was correct
2444 Set(day
, mon
, year
, hour
, min
, sec
);
2445 MakeTimezone((wxDateTime_t
)(60*offset
));
2450 const wxChar
*wxDateTime::ParseFormat(const wxChar
*date
,
2451 const wxChar
*format
,
2452 const wxDateTime
& dateDef
)
2454 wxCHECK_MSG( date
&& format
, (wxChar
*)NULL
,
2455 _T("NULL pointer in wxDateTime::ParseFormat()") );
2460 // what fields have we found?
2461 bool haveWDay
= FALSE
,
2470 bool hourIsIn12hFormat
= FALSE
, // or in 24h one?
2471 isPM
= FALSE
; // AM by default
2473 // and the value of the items we have (init them to get rid of warnings)
2474 wxDateTime_t sec
= 0,
2477 WeekDay wday
= Inv_WeekDay
;
2478 wxDateTime_t yday
= 0,
2480 wxDateTime::Month mon
= Inv_Month
;
2483 const wxChar
*input
= date
;
2484 for ( const wxChar
*fmt
= format
; *fmt
; fmt
++ )
2486 if ( *fmt
!= _T('%') )
2488 if ( wxIsspace(*fmt
) )
2490 // a white space in the format string matches 0 or more white
2491 // spaces in the input
2492 while ( wxIsspace(*input
) )
2499 // any other character (not whitespace, not '%') must be
2500 // matched by itself in the input
2501 if ( *input
++ != *fmt
)
2504 return (wxChar
*)NULL
;
2508 // done with this format char
2512 // start of a format specification
2514 // parse the optional width
2516 while ( isdigit(*++fmt
) )
2519 width
+= *fmt
- _T('0');
2522 // then the format itself
2525 case _T('a'): // a weekday name
2528 int flag
= *fmt
== _T('a') ? Name_Abbr
: Name_Full
;
2529 wday
= GetWeekDayFromName(GetAlphaToken(input
), flag
);
2530 if ( wday
== Inv_WeekDay
)
2533 return (wxChar
*)NULL
;
2539 case _T('b'): // a month name
2542 int flag
= *fmt
== _T('b') ? Name_Abbr
: Name_Full
;
2543 mon
= GetMonthFromName(GetAlphaToken(input
), flag
);
2544 if ( mon
== Inv_Month
)
2547 return (wxChar
*)NULL
;
2553 case _T('c'): // locale default date and time representation
2557 // this is the format which corresponds to ctime() output
2558 // and strptime("%c") should parse it, so try it first
2559 static const wxChar
*fmtCtime
= _T("%a %b %d %H:%M:%S %Y");
2561 const wxChar
*result
= dt
.ParseFormat(input
, fmtCtime
);
2564 result
= dt
.ParseFormat(input
, _T("%x %X"));
2569 result
= dt
.ParseFormat(input
, _T("%X %x"));
2574 // we've tried everything and still no match
2575 return (wxChar
*)NULL
;
2580 haveDay
= haveMon
= haveYear
=
2581 haveHour
= haveMin
= haveSec
= TRUE
;
2595 case _T('d'): // day of a month (01-31)
2596 if ( !GetNumericToken(width
, input
, &num
) ||
2597 (num
> 31) || (num
< 1) )
2600 return (wxChar
*)NULL
;
2603 // we can't check whether the day range is correct yet, will
2604 // do it later - assume ok for now
2606 mday
= (wxDateTime_t
)num
;
2609 case _T('H'): // hour in 24h format (00-23)
2610 if ( !GetNumericToken(width
, input
, &num
) || (num
> 23) )
2613 return (wxChar
*)NULL
;
2617 hour
= (wxDateTime_t
)num
;
2620 case _T('I'): // hour in 12h format (01-12)
2621 if ( !GetNumericToken(width
, input
, &num
) || !num
|| (num
> 12) )
2624 return (wxChar
*)NULL
;
2628 hourIsIn12hFormat
= TRUE
;
2629 hour
= (wxDateTime_t
)(num
% 12); // 12 should be 0
2632 case _T('j'): // day of the year
2633 if ( !GetNumericToken(width
, input
, &num
) || !num
|| (num
> 366) )
2636 return (wxChar
*)NULL
;
2640 yday
= (wxDateTime_t
)num
;
2643 case _T('m'): // month as a number (01-12)
2644 if ( !GetNumericToken(width
, input
, &num
) || !num
|| (num
> 12) )
2647 return (wxChar
*)NULL
;
2651 mon
= (Month
)(num
- 1);
2654 case _T('M'): // minute as a decimal number (00-59)
2655 if ( !GetNumericToken(width
, input
, &num
) || (num
> 59) )
2658 return (wxChar
*)NULL
;
2662 min
= (wxDateTime_t
)num
;
2665 case _T('p'): // AM or PM string
2667 wxString am
, pm
, token
= GetAlphaToken(input
);
2669 GetAmPmStrings(&am
, &pm
);
2670 if ( token
.CmpNoCase(pm
) == 0 )
2674 else if ( token
.CmpNoCase(am
) != 0 )
2677 return (wxChar
*)NULL
;
2682 case _T('r'): // time as %I:%M:%S %p
2685 input
= dt
.ParseFormat(input
, _T("%I:%M:%S %p"));
2689 return (wxChar
*)NULL
;
2692 haveHour
= haveMin
= haveSec
= TRUE
;
2701 case _T('R'): // time as %H:%M
2704 input
= dt
.ParseFormat(input
, _T("%H:%M"));
2708 return (wxChar
*)NULL
;
2711 haveHour
= haveMin
= TRUE
;
2718 case _T('S'): // second as a decimal number (00-61)
2719 if ( !GetNumericToken(width
, input
, &num
) || (num
> 61) )
2722 return (wxChar
*)NULL
;
2726 sec
= (wxDateTime_t
)num
;
2729 case _T('T'): // time as %H:%M:%S
2732 input
= dt
.ParseFormat(input
, _T("%H:%M:%S"));
2736 return (wxChar
*)NULL
;
2739 haveHour
= haveMin
= haveSec
= TRUE
;
2748 case _T('w'): // weekday as a number (0-6), Sunday = 0
2749 if ( !GetNumericToken(width
, input
, &num
) || (wday
> 6) )
2752 return (wxChar
*)NULL
;
2756 wday
= (WeekDay
)num
;
2759 case _T('x'): // locale default date representation
2760 #ifdef HAVE_STRPTIME
2761 // try using strptime() - it may fail even if the input is
2762 // correct but the date is out of range, so we will fall back
2763 // to our generic code anyhow (FIXME !Unicode friendly)
2766 const wxChar
*result
= strptime(input
, "%x", &tm
);
2771 haveDay
= haveMon
= haveYear
= TRUE
;
2773 year
= 1900 + tm
.tm_year
;
2774 mon
= (Month
)tm
.tm_mon
;
2780 #endif // HAVE_STRPTIME
2782 // TODO query the LOCALE_IDATE setting under Win32
2786 wxString fmtDate
, fmtDateAlt
;
2787 if ( IsWestEuropeanCountry(GetCountry()) ||
2788 GetCountry() == Russia
)
2790 fmtDate
= _T("%d/%m/%y");
2791 fmtDateAlt
= _T("%m/%d/%y");
2795 fmtDate
= _T("%m/%d/%y");
2796 fmtDateAlt
= _T("%d/%m/%y");
2799 const wxChar
*result
= dt
.ParseFormat(input
, fmtDate
);
2803 // ok, be nice and try another one
2804 result
= dt
.ParseFormat(input
, fmtDateAlt
);
2810 return (wxChar
*)NULL
;
2815 haveDay
= haveMon
= haveYear
= TRUE
;
2826 case _T('X'): // locale default time representation
2827 #ifdef HAVE_STRPTIME
2829 // use strptime() to do it for us (FIXME !Unicode friendly)
2831 input
= strptime(input
, "%X", &tm
);
2834 return (wxChar
*)NULL
;
2837 haveHour
= haveMin
= haveSec
= TRUE
;
2843 #else // !HAVE_STRPTIME
2844 // TODO under Win32 we can query the LOCALE_ITIME system
2845 // setting which says whether the default time format is
2848 // try to parse what follows as "%H:%M:%S" and, if this
2849 // fails, as "%I:%M:%S %p" - this should catch the most
2853 const wxChar
*result
= dt
.ParseFormat(input
, _T("%T"));
2856 result
= dt
.ParseFormat(input
, _T("%r"));
2862 return (wxChar
*)NULL
;
2865 haveHour
= haveMin
= haveSec
= TRUE
;
2874 #endif // HAVE_STRPTIME/!HAVE_STRPTIME
2877 case _T('y'): // year without century (00-99)
2878 if ( !GetNumericToken(width
, input
, &num
) || (num
> 99) )
2881 return (wxChar
*)NULL
;
2886 // TODO should have an option for roll over date instead of
2887 // hard coding it here
2888 year
= (num
> 30 ? 1900 : 2000) + (wxDateTime_t
)num
;
2891 case _T('Y'): // year with century
2892 if ( !GetNumericToken(width
, input
, &num
) )
2895 return (wxChar
*)NULL
;
2899 year
= (wxDateTime_t
)num
;
2902 case _T('Z'): // timezone name
2903 wxFAIL_MSG(_T("TODO"));
2906 case _T('%'): // a percent sign
2907 if ( *input
++ != _T('%') )
2910 return (wxChar
*)NULL
;
2914 case 0: // the end of string
2915 wxFAIL_MSG(_T("unexpected format end"));
2919 default: // not a known format spec
2920 return (wxChar
*)NULL
;
2924 // format matched, try to construct a date from what we have now
2926 if ( dateDef
.IsValid() )
2928 // take this date as default
2929 tmDef
= dateDef
.GetTm();
2931 else if ( IsValid() )
2933 // if this date is valid, don't change it
2938 // no default and this date is invalid - fall back to Today()
2939 tmDef
= Today().GetTm();
2950 // TODO we don't check here that the values are consistent, if both year
2951 // day and month/day were found, we just ignore the year day and we
2952 // also always ignore the week day
2953 if ( haveMon
&& haveDay
)
2955 if ( mday
> GetNumOfDaysInMonth(tm
.year
, mon
) )
2957 wxLogDebug(_T("bad month day in wxDateTime::ParseFormat"));
2959 return (wxChar
*)NULL
;
2965 else if ( haveYDay
)
2967 if ( yday
> GetNumberOfDays(tm
.year
) )
2969 wxLogDebug(_T("bad year day in wxDateTime::ParseFormat"));
2971 return (wxChar
*)NULL
;
2974 Tm tm2
= wxDateTime(1, Jan
, tm
.year
).SetToYearDay(yday
).GetTm();
2981 if ( haveHour
&& hourIsIn12hFormat
&& isPM
)
2983 // translate to 24hour format
2986 //else: either already in 24h format or no translation needed
3009 const wxChar
*wxDateTime::ParseDateTime(const wxChar
*date
)
3011 wxCHECK_MSG( date
, (wxChar
*)NULL
, _T("NULL pointer in wxDateTime::Parse") );
3013 // there is a public domain version of getdate.y, but it only works for
3015 wxFAIL_MSG(_T("TODO"));
3017 return (wxChar
*)NULL
;
3020 const wxChar
*wxDateTime::ParseDate(const wxChar
*date
)
3022 // this is a simplified version of ParseDateTime() which understands only
3023 // "today" (for wxDate compatibility) and digits only otherwise (and not
3024 // all esoteric constructions ParseDateTime() knows about)
3026 wxCHECK_MSG( date
, (wxChar
*)NULL
, _T("NULL pointer in wxDateTime::Parse") );
3028 const wxChar
*p
= date
;
3029 while ( wxIsspace(*p
) )
3032 // some special cases
3036 int dayDiffFromToday
;
3039 { wxTRANSLATE("today"), 0 },
3040 { wxTRANSLATE("yesterday"), -1 },
3041 { wxTRANSLATE("tomorrow"), 1 },
3044 for ( size_t n
= 0; n
< WXSIZEOF(literalDates
); n
++ )
3046 wxString date
= wxGetTranslation(literalDates
[n
].str
);
3047 size_t len
= date
.length();
3048 if ( wxStrlen(p
) >= len
&& (wxString(p
, len
).CmpNoCase(date
) == 0) )
3050 // nothing can follow this, so stop here
3053 int dayDiffFromToday
= literalDates
[n
].dayDiffFromToday
;
3055 if ( dayDiffFromToday
)
3057 *this += wxDateSpan::Days(dayDiffFromToday
);
3064 // We try to guess what we have here: for each new (numeric) token, we
3065 // determine if it can be a month, day or a year. Of course, there is an
3066 // ambiguity as some numbers may be days as well as months, so we also
3067 // have the ability to back track.
3070 bool haveDay
= FALSE
, // the months day?
3071 haveWDay
= FALSE
, // the day of week?
3072 haveMon
= FALSE
, // the month?
3073 haveYear
= FALSE
; // the year?
3075 // and the value of the items we have (init them to get rid of warnings)
3076 WeekDay wday
= Inv_WeekDay
;
3077 wxDateTime_t day
= 0;
3078 wxDateTime::Month mon
= Inv_Month
;
3081 // tokenize the string
3083 static const wxChar
*dateDelimiters
= _T(".,/-\t\n ");
3084 wxStringTokenizer
tok(p
, dateDelimiters
);
3085 while ( tok
.HasMoreTokens() )
3087 wxString token
= tok
.GetNextToken();
3093 if ( token
.ToULong(&val
) )
3095 // guess what this number is
3101 if ( !haveMon
&& val
> 0 && val
<= 12 )
3103 // assume it is month
3106 else // not the month
3108 wxDateTime_t maxDays
= haveMon
3109 ? GetNumOfDaysInMonth(haveYear
? year
: Inv_Year
, mon
)
3113 if ( (val
== 0) || (val
> (unsigned long)maxDays
) ) // cast to shut up compiler warning in BCC
3130 year
= (wxDateTime_t
)val
;
3139 day
= (wxDateTime_t
)val
;
3145 mon
= (Month
)(val
- 1);
3148 else // not a number
3150 // be careful not to overwrite the current mon value
3151 Month mon2
= GetMonthFromName(token
, Name_Full
| Name_Abbr
);
3152 if ( mon2
!= Inv_Month
)
3157 // but we already have a month - maybe we guessed wrong?
3160 // no need to check in month range as always < 12, but
3161 // the days are counted from 1 unlike the months
3162 day
= (wxDateTime_t
)mon
+ 1;
3167 // could possible be the year (doesn't the year come
3168 // before the month in the japanese format?) (FIXME)
3177 else // not a valid month name
3179 wday
= GetWeekDayFromName(token
, Name_Full
| Name_Abbr
);
3180 if ( wday
!= Inv_WeekDay
)
3190 else // not a valid weekday name
3193 static const wxChar
*ordinals
[] =
3195 wxTRANSLATE("first"),
3196 wxTRANSLATE("second"),
3197 wxTRANSLATE("third"),
3198 wxTRANSLATE("fourth"),
3199 wxTRANSLATE("fifth"),
3200 wxTRANSLATE("sixth"),
3201 wxTRANSLATE("seventh"),
3202 wxTRANSLATE("eighth"),
3203 wxTRANSLATE("ninth"),
3204 wxTRANSLATE("tenth"),
3205 wxTRANSLATE("eleventh"),
3206 wxTRANSLATE("twelfth"),
3207 wxTRANSLATE("thirteenth"),
3208 wxTRANSLATE("fourteenth"),
3209 wxTRANSLATE("fifteenth"),
3210 wxTRANSLATE("sixteenth"),
3211 wxTRANSLATE("seventeenth"),
3212 wxTRANSLATE("eighteenth"),
3213 wxTRANSLATE("nineteenth"),
3214 wxTRANSLATE("twentieth"),
3215 // that's enough - otherwise we'd have problems with
3216 // composite (or not) ordinals
3220 for ( n
= 0; n
< WXSIZEOF(ordinals
); n
++ )
3222 if ( token
.CmpNoCase(ordinals
[n
]) == 0 )
3228 if ( n
== WXSIZEOF(ordinals
) )
3230 // stop here - something unknown
3237 // don't try anything here (as in case of numeric day
3238 // above) - the symbolic day spec should always
3239 // precede the month/year
3245 day
= (wxDateTime_t
)(n
+ 1);
3250 nPosCur
= tok
.GetPosition();
3253 // either no more tokens or the scan was stopped by something we couldn't
3254 // parse - in any case, see if we can construct a date from what we have
3255 if ( !haveDay
&& !haveWDay
)
3257 wxLogDebug(_T("ParseDate: no day, no weekday hence no date."));
3259 return (wxChar
*)NULL
;
3262 if ( haveWDay
&& (haveMon
|| haveYear
|| haveDay
) &&
3263 !(haveDay
&& haveMon
&& haveYear
) )
3265 // without adjectives (which we don't support here) the week day only
3266 // makes sense completely separately or with the full date
3267 // specification (what would "Wed 1999" mean?)
3268 return (wxChar
*)NULL
;
3271 if ( !haveWDay
&& haveYear
&& !(haveDay
&& haveMon
) )
3273 // may be we have month and day instead of day and year?
3274 if ( haveDay
&& !haveMon
)
3278 // exchange day and month
3279 mon
= (wxDateTime::Month
)(day
- 1);
3281 // we're in the current year then
3283 (unsigned)year
<= GetNumOfDaysInMonth(Inv_Year
, mon
) )
3290 //else: no, can't exchange, leave haveMon == FALSE
3296 // if we give the year, month and day must be given too
3297 wxLogDebug(_T("ParseDate: day and month should be specified if year is."));
3299 return (wxChar
*)NULL
;
3305 mon
= GetCurrentMonth();
3310 year
= GetCurrentYear();
3315 Set(day
, mon
, year
);
3319 // check that it is really the same
3320 if ( GetWeekDay() != wday
)
3322 // inconsistency detected
3323 wxLogDebug(_T("ParseDate: inconsistent day/weekday."));
3325 return (wxChar
*)NULL
;
3333 SetToWeekDayInSameWeek(wday
);
3336 // return the pointer to the first unparsed char
3338 if ( nPosCur
&& wxStrchr(dateDelimiters
, *(p
- 1)) )
3340 // if we couldn't parse the token after the delimiter, put back the
3341 // delimiter as well
3348 const wxChar
*wxDateTime::ParseTime(const wxChar
*time
)
3350 wxCHECK_MSG( time
, (wxChar
*)NULL
, _T("NULL pointer in wxDateTime::Parse") );
3352 // first try some extra things
3359 { wxTRANSLATE("noon"), 12 },
3360 { wxTRANSLATE("midnight"), 00 },
3364 for ( size_t n
= 0; n
< WXSIZEOF(stdTimes
); n
++ )
3366 wxString timeString
= wxGetTranslation(stdTimes
[n
].name
);
3367 size_t len
= timeString
.length();
3368 if ( timeString
.CmpNoCase(wxString(time
, len
)) == 0 )
3370 Set(stdTimes
[n
].hour
, 0, 0);
3376 // try all time formats we may think about starting with the standard one
3377 const wxChar
*result
= ParseFormat(time
, _T("%X"));
3380 // normally, it's the same, but why not try it?
3381 result
= ParseFormat(time
, _T("%H:%M:%S"));
3386 // 12hour with AM/PM?
3387 result
= ParseFormat(time
, _T("%I:%M:%S %p"));
3393 result
= ParseFormat(time
, _T("%H:%M"));
3398 // 12hour with AM/PM but without seconds?
3399 result
= ParseFormat(time
, _T("%I:%M %p"));
3405 result
= ParseFormat(time
, _T("%H"));
3410 // just the hour and AM/PM?
3411 result
= ParseFormat(time
, _T("%I %p"));
3414 // TODO: parse timezones
3419 // ----------------------------------------------------------------------------
3420 // Workdays and holidays support
3421 // ----------------------------------------------------------------------------
3423 bool wxDateTime::IsWorkDay(Country
WXUNUSED(country
)) const
3425 return !wxDateTimeHolidayAuthority::IsHoliday(*this);
3428 // ============================================================================
3430 // ============================================================================
3432 // not all strftime(3) format specifiers make sense here because, for example,
3433 // a time span doesn't have a year nor a timezone
3435 // Here are the ones which are supported (all of them are supported by strftime
3437 // %H hour in 24 hour format
3438 // %M minute (00 - 59)
3439 // %S second (00 - 59)
3442 // Also, for MFC CTimeSpan compatibility, we support
3443 // %D number of days
3445 // And, to be better than MFC :-), we also have
3446 // %E number of wEeks
3447 // %l milliseconds (000 - 999)
3448 wxString
wxTimeSpan::Format(const wxChar
*format
) const
3450 wxCHECK_MSG( format
, _T(""), _T("NULL format in wxTimeSpan::Format") );
3453 str
.Alloc(wxStrlen(format
));
3455 // Suppose we have wxTimeSpan ts(1 /* hour */, 2 /* min */, 3 /* sec */)
3457 // Then, of course, ts.Format("%H:%M:%S") must return "01:02:03", but the
3458 // question is what should ts.Format("%S") do? The code here returns "3273"
3459 // in this case (i.e. the total number of seconds, not just seconds % 60)
3460 // because, for me, this call means "give me entire time interval in
3461 // seconds" and not "give me the seconds part of the time interval"
3463 // If we agree that it should behave like this, it is clear that the
3464 // interpretation of each format specifier depends on the presence of the
3465 // other format specs in the string: if there was "%H" before "%M", we
3466 // should use GetMinutes() % 60, otherwise just GetMinutes() &c
3468 // we remember the most important unit found so far
3477 } partBiggest
= Part_MSec
;
3479 for ( const wxChar
*pch
= format
; *pch
; pch
++ )
3483 if ( ch
== _T('%') )
3485 // the start of the format specification of the printf() below
3486 wxString fmtPrefix
= _T('%');
3491 ch
= *++pch
; // get the format spec char
3495 wxFAIL_MSG( _T("invalid format character") );
3501 // skip the part below switch
3506 if ( partBiggest
< Part_Day
)
3512 partBiggest
= Part_Day
;
3517 partBiggest
= Part_Week
;
3523 if ( partBiggest
< Part_Hour
)
3529 partBiggest
= Part_Hour
;
3532 fmtPrefix
+= _T("02");
3536 n
= GetMilliseconds().ToLong();
3537 if ( partBiggest
< Part_MSec
)
3541 //else: no need to reset partBiggest to Part_MSec, it is
3542 // the least significant one anyhow
3544 fmtPrefix
+= _T("03");
3549 if ( partBiggest
< Part_Min
)
3555 partBiggest
= Part_Min
;
3558 fmtPrefix
+= _T("02");
3562 n
= GetSeconds().ToLong();
3563 if ( partBiggest
< Part_Sec
)
3569 partBiggest
= Part_Sec
;
3572 fmtPrefix
+= _T("02");
3576 str
+= wxString::Format(fmtPrefix
+ _T("ld"), n
);
3580 // normal character, just copy
3588 // ============================================================================
3589 // wxDateTimeHolidayAuthority and related classes
3590 // ============================================================================
3592 #include "wx/arrimpl.cpp"
3594 WX_DEFINE_OBJARRAY(wxDateTimeArray
);
3596 static int wxCMPFUNC_CONV
3597 wxDateTimeCompareFunc(wxDateTime
**first
, wxDateTime
**second
)
3599 wxDateTime dt1
= **first
,
3602 return dt1
== dt2
? 0 : dt1
< dt2
? -1 : +1;
3605 // ----------------------------------------------------------------------------
3606 // wxDateTimeHolidayAuthority
3607 // ----------------------------------------------------------------------------
3609 wxHolidayAuthoritiesArray
wxDateTimeHolidayAuthority::ms_authorities
;
3612 bool wxDateTimeHolidayAuthority::IsHoliday(const wxDateTime
& dt
)
3614 size_t count
= ms_authorities
.GetCount();
3615 for ( size_t n
= 0; n
< count
; n
++ )
3617 if ( ms_authorities
[n
]->DoIsHoliday(dt
) )
3628 wxDateTimeHolidayAuthority::GetHolidaysInRange(const wxDateTime
& dtStart
,
3629 const wxDateTime
& dtEnd
,
3630 wxDateTimeArray
& holidays
)
3632 wxDateTimeArray hol
;
3636 size_t count
= ms_authorities
.GetCount();
3637 for ( size_t nAuth
= 0; nAuth
< count
; nAuth
++ )
3639 ms_authorities
[nAuth
]->DoGetHolidaysInRange(dtStart
, dtEnd
, hol
);
3641 WX_APPEND_ARRAY(holidays
, hol
);
3644 holidays
.Sort(wxDateTimeCompareFunc
);
3646 return holidays
.GetCount();
3650 void wxDateTimeHolidayAuthority::ClearAllAuthorities()
3652 WX_CLEAR_ARRAY(ms_authorities
);
3656 void wxDateTimeHolidayAuthority::AddAuthority(wxDateTimeHolidayAuthority
*auth
)
3658 ms_authorities
.Add(auth
);
3661 // ----------------------------------------------------------------------------
3662 // wxDateTimeWorkDays
3663 // ----------------------------------------------------------------------------
3665 bool wxDateTimeWorkDays::DoIsHoliday(const wxDateTime
& dt
) const
3667 wxDateTime::WeekDay wd
= dt
.GetWeekDay();
3669 return (wd
== wxDateTime::Sun
) || (wd
== wxDateTime::Sat
);
3672 size_t wxDateTimeWorkDays::DoGetHolidaysInRange(const wxDateTime
& dtStart
,
3673 const wxDateTime
& dtEnd
,
3674 wxDateTimeArray
& holidays
) const
3676 if ( dtStart
> dtEnd
)
3678 wxFAIL_MSG( _T("invalid date range in GetHolidaysInRange") );
3685 // instead of checking all days, start with the first Sat after dtStart and
3686 // end with the last Sun before dtEnd
3687 wxDateTime dtSatFirst
= dtStart
.GetNextWeekDay(wxDateTime::Sat
),
3688 dtSatLast
= dtEnd
.GetPrevWeekDay(wxDateTime::Sat
),
3689 dtSunFirst
= dtStart
.GetNextWeekDay(wxDateTime::Sun
),
3690 dtSunLast
= dtEnd
.GetPrevWeekDay(wxDateTime::Sun
),
3693 for ( dt
= dtSatFirst
; dt
<= dtSatLast
; dt
+= wxDateSpan::Week() )
3698 for ( dt
= dtSunFirst
; dt
<= dtSunLast
; dt
+= wxDateSpan::Week() )
3703 return holidays
.GetCount();