added another ParseFormat() overload for better backwards compatibility
[wxWidgets.git] / src / common / datetime.cpp
1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: src/common/datetime.cpp
3 // Purpose: implementation of time/date related classes
4 // Author: Vadim Zeitlin
5 // Modified by:
6 // Created: 11.05.99
7 // RCS-ID: $Id$
8 // Copyright: (c) 1999 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
9 // parts of code taken from sndcal library by Scott E. Lee:
10 //
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.
15 //
16 // Licence: wxWindows licence
17 ///////////////////////////////////////////////////////////////////////////////
18
19 /*
20 * Implementation notes:
21 *
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
24 * expressed in GMT.
25 *
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
28 *
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
31 *
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
35 * or less)
36 *
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
40 * ToTimezone()
41 *
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
44 * wxDateTime::Tm.
45 */
46
47 // ============================================================================
48 // declarations
49 // ============================================================================
50
51 // ----------------------------------------------------------------------------
52 // headers
53 // ----------------------------------------------------------------------------
54
55 // For compilers that support precompilation, includes "wx.h".
56 #include "wx/wxprec.h"
57
58 #ifdef __BORLANDC__
59 #pragma hdrstop
60 #endif
61
62 #if !defined(wxUSE_DATETIME) || wxUSE_DATETIME
63
64 #ifndef WX_PRECOMP
65 #ifdef __WXMSW__
66 #include "wx/msw/wrapwin.h"
67 #endif
68 #include "wx/string.h"
69 #include "wx/log.h"
70 #include "wx/intl.h"
71 #include "wx/stopwatch.h" // for wxGetLocalTimeMillis()
72 #include "wx/module.h"
73 #include "wx/crt.h"
74 #endif // WX_PRECOMP
75
76 #include "wx/thread.h"
77 #include "wx/tokenzr.h"
78
79 #include <ctype.h>
80
81 #ifdef __WINDOWS__
82 #include <winnls.h>
83 #ifndef __WXWINCE__
84 #include <locale.h>
85 #endif
86 #endif
87
88 #include "wx/datetime.h"
89
90 const long wxDateTime::TIME_T_FACTOR = 1000l;
91
92 #if wxUSE_EXTENDED_RTTI
93
94 template<> void wxStringReadValue(const wxString &s , wxDateTime &data )
95 {
96 data.ParseFormat(s,wxT("%Y-%m-%d %H:%M:%S")) ;
97 }
98
99 template<> void wxStringWriteValue(wxString &s , const wxDateTime &data )
100 {
101 s = data.Format(wxT("%Y-%m-%d %H:%M:%S")) ;
102 }
103
104 wxCUSTOM_TYPE_INFO(wxDateTime, wxToStringConverter<wxDateTime> , wxFromStringConverter<wxDateTime>)
105
106 #endif
107
108 //
109 // ----------------------------------------------------------------------------
110 // conditional compilation
111 // ----------------------------------------------------------------------------
112
113 #if defined(HAVE_STRPTIME) && defined(__GLIBC__) && \
114 ((__GLIBC__ == 2) && (__GLIBC_MINOR__ == 0))
115 // glibc 2.0.7 strptime() is broken - the following snippet causes it to
116 // crash (instead of just failing):
117 //
118 // strncpy(buf, "Tue Dec 21 20:25:40 1999", 128);
119 // strptime(buf, "%x", &tm);
120 //
121 // so don't use it
122 #undef HAVE_STRPTIME
123 #endif // broken strptime()
124
125 #if defined(HAVE_STRPTIME) && defined(__DARWIN__) && defined(_MSL_USING_MW_C_HEADERS) && _MSL_USING_MW_C_HEADERS
126 // configure detects strptime as linkable because it's in the OS X
127 // System library but MSL headers don't declare it.
128
129 // char *strptime(const char *, const char *, struct tm *);
130 // However, we DON'T want to just provide it here because we would
131 // crash and/or overwrite data when strptime from OS X tries
132 // to fill in MW's struct tm which is two fields shorter (no TZ stuff)
133 // So for now let's just say we don't have strptime
134 #undef HAVE_STRPTIME
135 #endif
136
137 #if defined(__MWERKS__) && wxUSE_UNICODE
138 #include <wtime.h>
139 #endif
140
141 // define a special symbol for VC8 instead of writing tests for 1400 repeatedly
142 #ifdef __VISUALC__
143 #if __VISUALC__ >= 1400
144 #define __VISUALC8__
145 #endif
146 #endif
147
148 #if !defined(WX_TIMEZONE) && !defined(WX_GMTOFF_IN_TM)
149 #if defined(__WXPALMOS__)
150 #define WX_GMTOFF_IN_TM
151 #elif defined(__BORLANDC__) || defined(__MINGW32__) || defined(__VISAGECPP__)
152 #define WX_TIMEZONE _timezone
153 #elif defined(__MWERKS__)
154 long wxmw_timezone = 28800;
155 #define WX_TIMEZONE wxmw_timezone
156 #elif defined(__DJGPP__) || defined(__WINE__)
157 #include <sys/timeb.h>
158 #include <values.h>
159 static long wxGetTimeZone()
160 {
161 static long timezone = MAXLONG; // invalid timezone
162 if (timezone == MAXLONG)
163 {
164 struct timeb tb;
165 ftime(&tb);
166 timezone = tb.timezone;
167 }
168 return timezone;
169 }
170 #define WX_TIMEZONE wxGetTimeZone()
171 #elif defined(__DARWIN__)
172 #define WX_GMTOFF_IN_TM
173 #elif defined(__WXWINCE__) && defined(__VISUALC8__)
174 // _timezone is not present in dynamic run-time library
175 #if 0
176 // Solution (1): use the function equivalent of _timezone
177 static long wxGetTimeZone()
178 {
179 static long s_Timezone = MAXLONG; // invalid timezone
180 if (s_Timezone == MAXLONG)
181 {
182 int t;
183 _get_timezone(& t);
184 s_Timezone = (long) t;
185 }
186 return s_Timezone;
187 }
188 #define WX_TIMEZONE wxGetTimeZone()
189 #elif 1
190 // Solution (2): using GetTimeZoneInformation
191 static long wxGetTimeZone()
192 {
193 static long timezone = MAXLONG; // invalid timezone
194 if (timezone == MAXLONG)
195 {
196 TIME_ZONE_INFORMATION tzi;
197 ::GetTimeZoneInformation(&tzi);
198 timezone = tzi.Bias;
199 }
200 return timezone;
201 }
202 #define WX_TIMEZONE wxGetTimeZone()
203 #else
204 // Old method using _timezone: this symbol doesn't exist in the dynamic run-time library (i.e. using /MD)
205 #define WX_TIMEZONE _timezone
206 #endif
207 #else // unknown platform - try timezone
208 #define WX_TIMEZONE timezone
209 #endif
210 #endif // !WX_TIMEZONE && !WX_GMTOFF_IN_TM
211
212 // everyone has strftime except Win CE unless VC8 is used
213 #if !defined(__WXWINCE__) || defined(__VISUALC8__)
214 #define HAVE_STRFTIME
215 #endif
216
217 // NB: VC8 safe time functions could/should be used for wxMSW as well probably
218 #if defined(__WXWINCE__) && defined(__VISUALC8__)
219
220 struct tm *wxLocaltime_r(const time_t *t, struct tm* tm)
221 {
222 __time64_t t64 = *t;
223 return _localtime64_s(tm, &t64) == 0 ? tm : NULL;
224 }
225
226 struct tm *wxGmtime_r(const time_t* t, struct tm* tm)
227 {
228 __time64_t t64 = *t;
229 return _gmtime64_s(tm, &t64) == 0 ? tm : NULL;
230 }
231
232 #else // !wxWinCE with VC8
233
234 #if (!defined(HAVE_LOCALTIME_R) || !defined(HAVE_GMTIME_R)) && wxUSE_THREADS && !defined(__WINDOWS__)
235 static wxMutex timeLock;
236 #endif
237
238 #ifndef HAVE_LOCALTIME_R
239 struct tm *wxLocaltime_r(const time_t* ticks, struct tm* temp)
240 {
241 #if wxUSE_THREADS && !defined(__WINDOWS__)
242 // No need to waste time with a mutex on windows since it's using
243 // thread local storage for localtime anyway.
244 wxMutexLocker locker(timeLock);
245 #endif
246
247 // Borland CRT crashes when passed 0 ticks for some reason, see SF bug 1704438
248 #ifdef __BORLANDC__
249 if ( !*ticks )
250 return NULL;
251 #endif
252
253 const tm * const t = localtime(ticks);
254 if ( !t )
255 return NULL;
256
257 memcpy(temp, t, sizeof(struct tm));
258 return temp;
259 }
260 #endif // !HAVE_LOCALTIME_R
261
262 #ifndef HAVE_GMTIME_R
263 struct tm *wxGmtime_r(const time_t* ticks, struct tm* temp)
264 {
265 #if wxUSE_THREADS && !defined(__WINDOWS__)
266 // No need to waste time with a mutex on windows since it's
267 // using thread local storage for gmtime anyway.
268 wxMutexLocker locker(timeLock);
269 #endif
270
271 #ifdef __BORLANDC__
272 if ( !*ticks )
273 return NULL;
274 #endif
275
276 const tm * const t = gmtime(ticks);
277 if ( !t )
278 return NULL;
279
280 memcpy(temp, gmtime(ticks), sizeof(struct tm));
281 return temp;
282 }
283 #endif // !HAVE_GMTIME_R
284
285 #endif // wxWinCE with VC8/other platforms
286
287 // ----------------------------------------------------------------------------
288 // macros
289 // ----------------------------------------------------------------------------
290
291 // debugging helper: just a convenient replacement of wxCHECK()
292 #define wxDATETIME_CHECK(expr, msg) \
293 wxCHECK2_MSG(expr, *this = wxInvalidDateTime; return *this, msg)
294
295 // ----------------------------------------------------------------------------
296 // private classes
297 // ----------------------------------------------------------------------------
298
299 class wxDateTimeHolidaysModule : public wxModule
300 {
301 public:
302 virtual bool OnInit()
303 {
304 wxDateTimeHolidayAuthority::AddAuthority(new wxDateTimeWorkDays);
305
306 return true;
307 }
308
309 virtual void OnExit()
310 {
311 wxDateTimeHolidayAuthority::ClearAllAuthorities();
312 wxDateTimeHolidayAuthority::ms_authorities.clear();
313 }
314
315 private:
316 DECLARE_DYNAMIC_CLASS(wxDateTimeHolidaysModule)
317 };
318
319 IMPLEMENT_DYNAMIC_CLASS(wxDateTimeHolidaysModule, wxModule)
320
321 // ----------------------------------------------------------------------------
322 // constants
323 // ----------------------------------------------------------------------------
324
325 // some trivial ones
326 static const int MONTHS_IN_YEAR = 12;
327
328 static const int SEC_PER_MIN = 60;
329
330 static const int MIN_PER_HOUR = 60;
331
332 static const int HOURS_PER_DAY = 24;
333
334 static const long SECONDS_PER_DAY = 86400l;
335
336 static const int DAYS_PER_WEEK = 7;
337
338 static const long MILLISECONDS_PER_DAY = 86400000l;
339
340 // this is the integral part of JDN of the midnight of Jan 1, 1970
341 // (i.e. JDN(Jan 1, 1970) = 2440587.5)
342 static const long EPOCH_JDN = 2440587l;
343
344 // used only in asserts
345 #ifdef __WXDEBUG__
346 // the date of JDN -0.5 (as we don't work with fractional parts, this is the
347 // reference date for us) is Nov 24, 4714BC
348 static const int JDN_0_YEAR = -4713;
349 static const int JDN_0_MONTH = wxDateTime::Nov;
350 static const int JDN_0_DAY = 24;
351 #endif // __WXDEBUG__
352
353 // the constants used for JDN calculations
354 static const long JDN_OFFSET = 32046l;
355 static const long DAYS_PER_5_MONTHS = 153l;
356 static const long DAYS_PER_4_YEARS = 1461l;
357 static const long DAYS_PER_400_YEARS = 146097l;
358
359 // this array contains the cumulated number of days in all previous months for
360 // normal and leap years
361 static const wxDateTime::wxDateTime_t gs_cumulatedDays[2][MONTHS_IN_YEAR] =
362 {
363 { 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334 },
364 { 0, 31, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335 }
365 };
366
367 // ----------------------------------------------------------------------------
368 // global data
369 // ----------------------------------------------------------------------------
370
371 const char *wxDefaultDateTimeFormat = "%c";
372 const char *wxDefaultTimeSpanFormat = "%H:%M:%S";
373
374 // in the fine tradition of ANSI C we use our equivalent of (time_t)-1 to
375 // indicate an invalid wxDateTime object
376 const wxDateTime wxDefaultDateTime;
377
378 wxDateTime::Country wxDateTime::ms_country = wxDateTime::Country_Unknown;
379
380 // ----------------------------------------------------------------------------
381 // private functions
382 // ----------------------------------------------------------------------------
383
384 // debugger helper: shows what the date really is
385 #ifdef __WXDEBUG__
386 extern const wxChar *wxDumpDate(const wxDateTime* dt)
387 {
388 static wxChar buf[128];
389
390 wxStrcpy(buf, dt->Format(_T("%Y-%m-%d (%a) %H:%M:%S")));
391
392 return buf;
393 }
394 #endif // Debug
395
396 // get the number of days in the given month of the given year
397 static inline
398 wxDateTime::wxDateTime_t GetNumOfDaysInMonth(int year, wxDateTime::Month month)
399 {
400 // the number of days in month in Julian/Gregorian calendar: the first line
401 // is for normal years, the second one is for the leap ones
402 static wxDateTime::wxDateTime_t daysInMonth[2][MONTHS_IN_YEAR] =
403 {
404 { 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 },
405 { 31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 }
406 };
407
408 return daysInMonth[wxDateTime::IsLeapYear(year)][month];
409 }
410
411 // returns the time zone in the C sense, i.e. the difference UTC - local
412 // (in seconds)
413 static int GetTimeZone()
414 {
415 // set to true when the timezone is set
416 static bool s_timezoneSet = false;
417 static long gmtoffset = LONG_MAX; // invalid timezone
418
419 // ensure that the timezone variable is set by calling wxLocaltime_r
420 if ( !s_timezoneSet )
421 {
422 // just call wxLocaltime_r() instead of figuring out whether this
423 // system supports tzset(), _tzset() or something else
424 time_t t = 0;
425 struct tm tm;
426
427 wxLocaltime_r(&t, &tm);
428 s_timezoneSet = true;
429
430 #ifdef WX_GMTOFF_IN_TM
431 // note that GMT offset is the opposite of time zone and so to return
432 // consistent results in both WX_GMTOFF_IN_TM and !WX_GMTOFF_IN_TM
433 // cases we have to negate it
434 gmtoffset = -tm.tm_gmtoff;
435 #else // !WX_GMTOFF_IN_TM
436 gmtoffset = WX_TIMEZONE;
437 #endif // WX_GMTOFF_IN_TM/!WX_GMTOFF_IN_TM
438 }
439
440 return (int)gmtoffset;
441 }
442
443 // return the integral part of the JDN for the midnight of the given date (to
444 // get the real JDN you need to add 0.5, this is, in fact, JDN of the
445 // noon of the previous day)
446 static long GetTruncatedJDN(wxDateTime::wxDateTime_t day,
447 wxDateTime::Month mon,
448 int year)
449 {
450 // CREDIT: code below is by Scott E. Lee (but bugs are mine)
451
452 // check the date validity
453 wxASSERT_MSG(
454 (year > JDN_0_YEAR) ||
455 ((year == JDN_0_YEAR) && (mon > JDN_0_MONTH)) ||
456 ((year == JDN_0_YEAR) && (mon == JDN_0_MONTH) && (day >= JDN_0_DAY)),
457 _T("date out of range - can't convert to JDN")
458 );
459
460 // make the year positive to avoid problems with negative numbers division
461 year += 4800;
462
463 // months are counted from March here
464 int month;
465 if ( mon >= wxDateTime::Mar )
466 {
467 month = mon - 2;
468 }
469 else
470 {
471 month = mon + 10;
472 year--;
473 }
474
475 // now we can simply add all the contributions together
476 return ((year / 100) * DAYS_PER_400_YEARS) / 4
477 + ((year % 100) * DAYS_PER_4_YEARS) / 4
478 + (month * DAYS_PER_5_MONTHS + 2) / 5
479 + day
480 - JDN_OFFSET;
481 }
482
483 #ifdef HAVE_STRFTIME
484
485 // this function is a wrapper around strftime(3) adding error checking
486 static wxString CallStrftime(const wxString& format, const tm* tm)
487 {
488 wxChar buf[4096];
489 // Create temp wxString here to work around mingw/cygwin bug 1046059
490 // http://sourceforge.net/tracker/?func=detail&atid=102435&aid=1046059&group_id=2435
491 wxString s;
492
493 if ( !wxStrftime(buf, WXSIZEOF(buf), format, tm) )
494 {
495 // buffer is too small?
496 wxFAIL_MSG(_T("strftime() failed"));
497 }
498
499 s = buf;
500 return s;
501 }
502
503 #endif // HAVE_STRFTIME
504
505 #ifdef HAVE_STRPTIME
506
507 #if wxUSE_UNIX && !defined(HAVE_STRPTIME_DECL)
508 // configure detected that we had strptime() but not its declaration,
509 // provide it ourselves
510 extern "C" char *strptime(const char *, const char *, struct tm *);
511 #endif
512
513 // Unicode-friendly strptime() wrapper
514 static const wxStringCharType *
515 CallStrptime(const wxStringCharType *input, const char *fmt, tm *tm)
516 {
517 // the problem here is that strptime() returns pointer into the string we
518 // passed to it while we're really interested in the pointer into the
519 // original, Unicode, string so we try to transform the pointer back
520 #if wxUSE_UNICODE_WCHAR
521 wxCharBuffer inputMB(wxConvertWX2MB(input));
522 #else // ASCII
523 const char * const inputMB = input;
524 #endif // Unicode/Ascii
525
526 const char *result = strptime(inputMB, fmt, tm);
527 if ( !result )
528 return NULL;
529
530 #if wxUSE_UNICODE_WCHAR
531 // FIXME: this is wrong in presence of surrogates &c
532 return input + (result - inputMB.data());
533 #else // ASCII
534 return result;
535 #endif // Unicode/Ascii
536 }
537
538 #endif // HAVE_STRPTIME
539
540 // if year and/or month have invalid values, replace them with the current ones
541 static void ReplaceDefaultYearMonthWithCurrent(int *year,
542 wxDateTime::Month *month)
543 {
544 struct tm *tmNow = NULL;
545 struct tm tmstruct;
546
547 if ( *year == wxDateTime::Inv_Year )
548 {
549 tmNow = wxDateTime::GetTmNow(&tmstruct);
550
551 *year = 1900 + tmNow->tm_year;
552 }
553
554 if ( *month == wxDateTime::Inv_Month )
555 {
556 if ( !tmNow )
557 tmNow = wxDateTime::GetTmNow(&tmstruct);
558
559 *month = (wxDateTime::Month)tmNow->tm_mon;
560 }
561 }
562
563 // fll the struct tm with default values
564 static void InitTm(struct tm& tm)
565 {
566 // struct tm may have etxra fields (undocumented and with unportable
567 // names) which, nevertheless, must be set to 0
568 memset(&tm, 0, sizeof(struct tm));
569
570 tm.tm_mday = 1; // mday 0 is invalid
571 tm.tm_year = 76; // any valid year
572 tm.tm_isdst = -1; // auto determine
573 }
574
575 // parsing helpers
576 // ---------------
577
578 // return the month if the string is a month name or Inv_Month otherwise
579 static wxDateTime::Month GetMonthFromName(const wxString& name, int flags)
580 {
581 wxDateTime::Month mon;
582 for ( mon = wxDateTime::Jan; mon < wxDateTime::Inv_Month; wxNextMonth(mon) )
583 {
584 // case-insensitive comparison either one of or with both abbreviated
585 // and not versions
586 if ( flags & wxDateTime::Name_Full )
587 {
588 if ( name.CmpNoCase(wxDateTime::
589 GetMonthName(mon, wxDateTime::Name_Full)) == 0 )
590 {
591 break;
592 }
593 }
594
595 if ( flags & wxDateTime::Name_Abbr )
596 {
597 if ( name.CmpNoCase(wxDateTime::
598 GetMonthName(mon, wxDateTime::Name_Abbr)) == 0 )
599 {
600 break;
601 }
602 }
603 }
604
605 return mon;
606 }
607
608 // return the weekday if the string is a weekday name or Inv_WeekDay otherwise
609 static wxDateTime::WeekDay GetWeekDayFromName(const wxString& name, int flags)
610 {
611 wxDateTime::WeekDay wd;
612 for ( wd = wxDateTime::Sun; wd < wxDateTime::Inv_WeekDay; wxNextWDay(wd) )
613 {
614 // case-insensitive comparison either one of or with both abbreviated
615 // and not versions
616 if ( flags & wxDateTime::Name_Full )
617 {
618 if ( name.CmpNoCase(wxDateTime::
619 GetWeekDayName(wd, wxDateTime::Name_Full)) == 0 )
620 {
621 break;
622 }
623 }
624
625 if ( flags & wxDateTime::Name_Abbr )
626 {
627 if ( name.CmpNoCase(wxDateTime::
628 GetWeekDayName(wd, wxDateTime::Name_Abbr)) == 0 )
629 {
630 break;
631 }
632 }
633 }
634
635 return wd;
636 }
637
638 /* static */
639 struct tm *wxDateTime::GetTmNow(struct tm *tmstruct)
640 {
641 time_t t = GetTimeNow();
642 return wxLocaltime_r(&t, tmstruct);
643 }
644
645 // scans all digits (but no more than len) and returns the resulting number
646 static bool GetNumericToken(size_t len,
647 const wxStringCharType*& p,
648 unsigned long *number)
649 {
650 size_t n = 1;
651 wxString s;
652 while ( wxIsdigit(*p) )
653 {
654 s += *p++;
655
656 if ( len && ++n > len )
657 break;
658 }
659
660 return !s.empty() && s.ToULong(number);
661 }
662
663 // scans all alphabetic characters and returns the resulting string
664 static wxString GetAlphaToken(const wxStringCharType*& p)
665 {
666 wxString s;
667 while ( wxIsalpha(*p) )
668 {
669 s += *p++;
670 }
671
672 return s;
673 }
674
675 // ============================================================================
676 // implementation of wxDateTime
677 // ============================================================================
678
679 // ----------------------------------------------------------------------------
680 // struct Tm
681 // ----------------------------------------------------------------------------
682
683 wxDateTime::Tm::Tm()
684 {
685 year = (wxDateTime_t)wxDateTime::Inv_Year;
686 mon = wxDateTime::Inv_Month;
687 mday = 0;
688 hour = min = sec = msec = 0;
689 wday = wxDateTime::Inv_WeekDay;
690 }
691
692 wxDateTime::Tm::Tm(const struct tm& tm, const TimeZone& tz)
693 : m_tz(tz)
694 {
695 msec = 0;
696 sec = (wxDateTime::wxDateTime_t)tm.tm_sec;
697 min = (wxDateTime::wxDateTime_t)tm.tm_min;
698 hour = (wxDateTime::wxDateTime_t)tm.tm_hour;
699 mday = (wxDateTime::wxDateTime_t)tm.tm_mday;
700 mon = (wxDateTime::Month)tm.tm_mon;
701 year = 1900 + tm.tm_year;
702 wday = (wxDateTime::wxDateTime_t)tm.tm_wday;
703 yday = (wxDateTime::wxDateTime_t)tm.tm_yday;
704 }
705
706 bool wxDateTime::Tm::IsValid() const
707 {
708 // we allow for the leap seconds, although we don't use them (yet)
709 return (year != wxDateTime::Inv_Year) && (mon != wxDateTime::Inv_Month) &&
710 (mday <= GetNumOfDaysInMonth(year, mon)) &&
711 (hour < 24) && (min < 60) && (sec < 62) && (msec < 1000);
712 }
713
714 void wxDateTime::Tm::ComputeWeekDay()
715 {
716 // compute the week day from day/month/year: we use the dumbest algorithm
717 // possible: just compute our JDN and then use the (simple to derive)
718 // formula: weekday = (JDN + 1.5) % 7
719 wday = (wxDateTime::wxDateTime_t)((GetTruncatedJDN(mday, mon, year) + 2) % 7);
720 }
721
722 void wxDateTime::Tm::AddMonths(int monDiff)
723 {
724 // normalize the months field
725 while ( monDiff < -mon )
726 {
727 year--;
728
729 monDiff += MONTHS_IN_YEAR;
730 }
731
732 while ( monDiff + mon >= MONTHS_IN_YEAR )
733 {
734 year++;
735
736 monDiff -= MONTHS_IN_YEAR;
737 }
738
739 mon = (wxDateTime::Month)(mon + monDiff);
740
741 wxASSERT_MSG( mon >= 0 && mon < MONTHS_IN_YEAR, _T("logic error") );
742
743 // NB: we don't check here that the resulting date is valid, this function
744 // is private and the caller must check it if needed
745 }
746
747 void wxDateTime::Tm::AddDays(int dayDiff)
748 {
749 // normalize the days field
750 while ( dayDiff + mday < 1 )
751 {
752 AddMonths(-1);
753
754 dayDiff += GetNumOfDaysInMonth(year, mon);
755 }
756
757 mday = (wxDateTime::wxDateTime_t)( mday + dayDiff );
758 while ( mday > GetNumOfDaysInMonth(year, mon) )
759 {
760 mday -= GetNumOfDaysInMonth(year, mon);
761
762 AddMonths(1);
763 }
764
765 wxASSERT_MSG( mday > 0 && mday <= GetNumOfDaysInMonth(year, mon),
766 _T("logic error") );
767 }
768
769 // ----------------------------------------------------------------------------
770 // class TimeZone
771 // ----------------------------------------------------------------------------
772
773 wxDateTime::TimeZone::TimeZone(wxDateTime::TZ tz)
774 {
775 switch ( tz )
776 {
777 case wxDateTime::Local:
778 // get the offset from C RTL: it returns the difference GMT-local
779 // while we want to have the offset _from_ GMT, hence the '-'
780 m_offset = -GetTimeZone();
781 break;
782
783 case wxDateTime::GMT_12:
784 case wxDateTime::GMT_11:
785 case wxDateTime::GMT_10:
786 case wxDateTime::GMT_9:
787 case wxDateTime::GMT_8:
788 case wxDateTime::GMT_7:
789 case wxDateTime::GMT_6:
790 case wxDateTime::GMT_5:
791 case wxDateTime::GMT_4:
792 case wxDateTime::GMT_3:
793 case wxDateTime::GMT_2:
794 case wxDateTime::GMT_1:
795 m_offset = -3600*(wxDateTime::GMT0 - tz);
796 break;
797
798 case wxDateTime::GMT0:
799 case wxDateTime::GMT1:
800 case wxDateTime::GMT2:
801 case wxDateTime::GMT3:
802 case wxDateTime::GMT4:
803 case wxDateTime::GMT5:
804 case wxDateTime::GMT6:
805 case wxDateTime::GMT7:
806 case wxDateTime::GMT8:
807 case wxDateTime::GMT9:
808 case wxDateTime::GMT10:
809 case wxDateTime::GMT11:
810 case wxDateTime::GMT12:
811 case wxDateTime::GMT13:
812 m_offset = 3600*(tz - wxDateTime::GMT0);
813 break;
814
815 case wxDateTime::A_CST:
816 // Central Standard Time in use in Australia = UTC + 9.5
817 m_offset = 60l*(9*MIN_PER_HOUR + MIN_PER_HOUR/2);
818 break;
819
820 default:
821 wxFAIL_MSG( _T("unknown time zone") );
822 }
823 }
824
825 // ----------------------------------------------------------------------------
826 // static functions
827 // ----------------------------------------------------------------------------
828
829 /* static */
830 bool wxDateTime::IsLeapYear(int year, wxDateTime::Calendar cal)
831 {
832 if ( year == Inv_Year )
833 year = GetCurrentYear();
834
835 if ( cal == Gregorian )
836 {
837 // in Gregorian calendar leap years are those divisible by 4 except
838 // those divisible by 100 unless they're also divisible by 400
839 // (in some countries, like Russia and Greece, additional corrections
840 // exist, but they won't manifest themselves until 2700)
841 return (year % 4 == 0) && ((year % 100 != 0) || (year % 400 == 0));
842 }
843 else if ( cal == Julian )
844 {
845 // in Julian calendar the rule is simpler
846 return year % 4 == 0;
847 }
848 else
849 {
850 wxFAIL_MSG(_T("unknown calendar"));
851
852 return false;
853 }
854 }
855
856 /* static */
857 int wxDateTime::GetCentury(int year)
858 {
859 return year > 0 ? year / 100 : year / 100 - 1;
860 }
861
862 /* static */
863 int wxDateTime::ConvertYearToBC(int year)
864 {
865 // year 0 is BC 1
866 return year > 0 ? year : year - 1;
867 }
868
869 /* static */
870 int wxDateTime::GetCurrentYear(wxDateTime::Calendar cal)
871 {
872 switch ( cal )
873 {
874 case Gregorian:
875 return Now().GetYear();
876
877 case Julian:
878 wxFAIL_MSG(_T("TODO"));
879 break;
880
881 default:
882 wxFAIL_MSG(_T("unsupported calendar"));
883 break;
884 }
885
886 return Inv_Year;
887 }
888
889 /* static */
890 wxDateTime::Month wxDateTime::GetCurrentMonth(wxDateTime::Calendar cal)
891 {
892 switch ( cal )
893 {
894 case Gregorian:
895 return Now().GetMonth();
896
897 case Julian:
898 wxFAIL_MSG(_T("TODO"));
899 break;
900
901 default:
902 wxFAIL_MSG(_T("unsupported calendar"));
903 break;
904 }
905
906 return Inv_Month;
907 }
908
909 /* static */
910 wxDateTime::wxDateTime_t wxDateTime::GetNumberOfDays(int year, Calendar cal)
911 {
912 if ( year == Inv_Year )
913 {
914 // take the current year if none given
915 year = GetCurrentYear();
916 }
917
918 switch ( cal )
919 {
920 case Gregorian:
921 case Julian:
922 return IsLeapYear(year) ? 366 : 365;
923
924 default:
925 wxFAIL_MSG(_T("unsupported calendar"));
926 break;
927 }
928
929 return 0;
930 }
931
932 /* static */
933 wxDateTime::wxDateTime_t wxDateTime::GetNumberOfDays(wxDateTime::Month month,
934 int year,
935 wxDateTime::Calendar cal)
936 {
937 wxCHECK_MSG( month < MONTHS_IN_YEAR, 0, _T("invalid month") );
938
939 if ( cal == Gregorian || cal == Julian )
940 {
941 if ( year == Inv_Year )
942 {
943 // take the current year if none given
944 year = GetCurrentYear();
945 }
946
947 return GetNumOfDaysInMonth(year, month);
948 }
949 else
950 {
951 wxFAIL_MSG(_T("unsupported calendar"));
952
953 return 0;
954 }
955 }
956
957 /* static */
958 wxString wxDateTime::GetMonthName(wxDateTime::Month month,
959 wxDateTime::NameFlags flags)
960 {
961 wxCHECK_MSG( month != Inv_Month, wxEmptyString, _T("invalid month") );
962 #ifdef HAVE_STRFTIME
963 // notice that we must set all the fields to avoid confusing libc (GNU one
964 // gets confused to a crash if we don't do this)
965 tm tm;
966 InitTm(tm);
967 tm.tm_mon = month;
968
969 return CallStrftime(flags == Name_Abbr ? _T("%b") : _T("%B"), &tm);
970 #else // !HAVE_STRFTIME
971 wxString ret;
972 switch(month)
973 {
974 case Jan:
975 ret = (flags == Name_Abbr ? wxT("Jan"): wxT("January"));
976 break;
977 case Feb:
978 ret = (flags == Name_Abbr ? wxT("Feb"): wxT("Febuary"));
979 break;
980 case Mar:
981 ret = (flags == Name_Abbr ? wxT("Mar"): wxT("March"));
982 break;
983 case Apr:
984 ret = (flags == Name_Abbr ? wxT("Apr"): wxT("April"));
985 break;
986 case May:
987 ret = (flags == Name_Abbr ? wxT("May"): wxT("May"));
988 break;
989 case Jun:
990 ret = (flags == Name_Abbr ? wxT("Jun"): wxT("June"));
991 break;
992 case Jul:
993 ret = (flags == Name_Abbr ? wxT("Jul"): wxT("July"));
994 break;
995 case Aug:
996 ret = (flags == Name_Abbr ? wxT("Aug"): wxT("August"));
997 break;
998 case Sep:
999 ret = (flags == Name_Abbr ? wxT("Sep"): wxT("September"));
1000 break;
1001 case Oct:
1002 ret = (flags == Name_Abbr ? wxT("Oct"): wxT("October"));
1003 break;
1004 case Nov:
1005 ret = (flags == Name_Abbr ? wxT("Nov"): wxT("November"));
1006 break;
1007 case Dec:
1008 ret = (flags == Name_Abbr ? wxT("Dec"): wxT("December"));
1009 break;
1010 }
1011 return ret;
1012 #endif // HAVE_STRFTIME/!HAVE_STRFTIME
1013 }
1014
1015 /* static */
1016 wxString wxDateTime::GetWeekDayName(wxDateTime::WeekDay wday,
1017 wxDateTime::NameFlags flags)
1018 {
1019 wxCHECK_MSG( wday != Inv_WeekDay, wxEmptyString, _T("invalid weekday") );
1020 #ifdef HAVE_STRFTIME
1021 // take some arbitrary Sunday (but notice that the day should be such that
1022 // after adding wday to it below we still have a valid date, e.g. don't
1023 // take 28 here!)
1024 tm tm;
1025 InitTm(tm);
1026 tm.tm_mday = 21;
1027 tm.tm_mon = Nov;
1028 tm.tm_year = 99;
1029
1030 // and offset it by the number of days needed to get the correct wday
1031 tm.tm_mday += wday;
1032
1033 // call mktime() to normalize it...
1034 (void)mktime(&tm);
1035
1036 // ... and call strftime()
1037 return CallStrftime(flags == Name_Abbr ? _T("%a") : _T("%A"), &tm);
1038 #else // !HAVE_STRFTIME
1039 wxString ret;
1040 switch(wday)
1041 {
1042 case Sun:
1043 ret = (flags == Name_Abbr ? wxT("Sun") : wxT("Sunday"));
1044 break;
1045 case Mon:
1046 ret = (flags == Name_Abbr ? wxT("Mon") : wxT("Monday"));
1047 break;
1048 case Tue:
1049 ret = (flags == Name_Abbr ? wxT("Tue") : wxT("Tuesday"));
1050 break;
1051 case Wed:
1052 ret = (flags == Name_Abbr ? wxT("Wed") : wxT("Wednesday"));
1053 break;
1054 case Thu:
1055 ret = (flags == Name_Abbr ? wxT("Thu") : wxT("Thursday"));
1056 break;
1057 case Fri:
1058 ret = (flags == Name_Abbr ? wxT("Fri") : wxT("Friday"));
1059 break;
1060 case Sat:
1061 ret = (flags == Name_Abbr ? wxT("Sat") : wxT("Saturday"));
1062 break;
1063 }
1064 return ret;
1065 #endif // HAVE_STRFTIME/!HAVE_STRFTIME
1066 }
1067
1068 /* static */
1069 void wxDateTime::GetAmPmStrings(wxString *am, wxString *pm)
1070 {
1071 tm tm;
1072 InitTm(tm);
1073 wxChar buffer[64];
1074 // @Note: Do not call 'CallStrftime' here! CallStrftime checks the return code
1075 // and causes an assertion failed if the buffer is to small (which is good) - OR -
1076 // if strftime does not return anything because the format string is invalid - OR -
1077 // if there are no 'am' / 'pm' tokens defined for the current locale (which is not good).
1078 // wxDateTime::ParseTime will try several different formats to parse the time.
1079 // As a result, GetAmPmStrings might get called, even if the current locale
1080 // does not define any 'am' / 'pm' tokens. In this case, wxStrftime would
1081 // assert, even though it is a perfectly legal use.
1082 if ( am )
1083 {
1084 if (wxStrftime(buffer, sizeof(buffer)/sizeof(wxChar), _T("%p"), &tm) > 0)
1085 *am = wxString(buffer);
1086 else
1087 *am = wxString();
1088 }
1089 if ( pm )
1090 {
1091 tm.tm_hour = 13;
1092 if (wxStrftime(buffer, sizeof(buffer)/sizeof(wxChar), _T("%p"), &tm) > 0)
1093 *pm = wxString(buffer);
1094 else
1095 *pm = wxString();
1096 }
1097 }
1098
1099 // ----------------------------------------------------------------------------
1100 // Country stuff: date calculations depend on the country (DST, work days,
1101 // ...), so we need to know which rules to follow.
1102 // ----------------------------------------------------------------------------
1103
1104 /* static */
1105 wxDateTime::Country wxDateTime::GetCountry()
1106 {
1107 // TODO use LOCALE_ICOUNTRY setting under Win32
1108 #ifndef __WXWINCE__
1109 if ( ms_country == Country_Unknown )
1110 {
1111 // try to guess from the time zone name
1112 time_t t = time(NULL);
1113 struct tm tmstruct;
1114 struct tm *tm = wxLocaltime_r(&t, &tmstruct);
1115
1116 wxString tz = CallStrftime(_T("%Z"), tm);
1117 if ( tz == _T("WET") || tz == _T("WEST") )
1118 {
1119 ms_country = UK;
1120 }
1121 else if ( tz == _T("CET") || tz == _T("CEST") )
1122 {
1123 ms_country = Country_EEC;
1124 }
1125 else if ( tz == _T("MSK") || tz == _T("MSD") )
1126 {
1127 ms_country = Russia;
1128 }
1129 else if ( tz == _T("AST") || tz == _T("ADT") ||
1130 tz == _T("EST") || tz == _T("EDT") ||
1131 tz == _T("CST") || tz == _T("CDT") ||
1132 tz == _T("MST") || tz == _T("MDT") ||
1133 tz == _T("PST") || tz == _T("PDT") )
1134 {
1135 ms_country = USA;
1136 }
1137 else
1138 {
1139 // well, choose a default one
1140 ms_country = USA;
1141 }
1142 }
1143 #else // __WXWINCE__
1144 ms_country = USA;
1145 #endif // !__WXWINCE__/__WXWINCE__
1146
1147 return ms_country;
1148 }
1149
1150 /* static */
1151 void wxDateTime::SetCountry(wxDateTime::Country country)
1152 {
1153 ms_country = country;
1154 }
1155
1156 /* static */
1157 bool wxDateTime::IsWestEuropeanCountry(Country country)
1158 {
1159 if ( country == Country_Default )
1160 {
1161 country = GetCountry();
1162 }
1163
1164 return (Country_WesternEurope_Start <= country) &&
1165 (country <= Country_WesternEurope_End);
1166 }
1167
1168 // ----------------------------------------------------------------------------
1169 // DST calculations: we use 3 different rules for the West European countries,
1170 // USA and for the rest of the world. This is undoubtedly false for many
1171 // countries, but I lack the necessary info (and the time to gather it),
1172 // please add the other rules here!
1173 // ----------------------------------------------------------------------------
1174
1175 /* static */
1176 bool wxDateTime::IsDSTApplicable(int year, Country country)
1177 {
1178 if ( year == Inv_Year )
1179 {
1180 // take the current year if none given
1181 year = GetCurrentYear();
1182 }
1183
1184 if ( country == Country_Default )
1185 {
1186 country = GetCountry();
1187 }
1188
1189 switch ( country )
1190 {
1191 case USA:
1192 case UK:
1193 // DST was first observed in the US and UK during WWI, reused
1194 // during WWII and used again since 1966
1195 return year >= 1966 ||
1196 (year >= 1942 && year <= 1945) ||
1197 (year == 1918 || year == 1919);
1198
1199 default:
1200 // assume that it started after WWII
1201 return year > 1950;
1202 }
1203 }
1204
1205 /* static */
1206 wxDateTime wxDateTime::GetBeginDST(int year, Country country)
1207 {
1208 if ( year == Inv_Year )
1209 {
1210 // take the current year if none given
1211 year = GetCurrentYear();
1212 }
1213
1214 if ( country == Country_Default )
1215 {
1216 country = GetCountry();
1217 }
1218
1219 if ( !IsDSTApplicable(year, country) )
1220 {
1221 return wxInvalidDateTime;
1222 }
1223
1224 wxDateTime dt;
1225
1226 if ( IsWestEuropeanCountry(country) || (country == Russia) )
1227 {
1228 // DST begins at 1 a.m. GMT on the last Sunday of March
1229 if ( !dt.SetToLastWeekDay(Sun, Mar, year) )
1230 {
1231 // weird...
1232 wxFAIL_MSG( _T("no last Sunday in March?") );
1233 }
1234
1235 dt += wxTimeSpan::Hours(1);
1236 }
1237 else switch ( country )
1238 {
1239 case USA:
1240 switch ( year )
1241 {
1242 case 1918:
1243 case 1919:
1244 // don't know for sure - assume it was in effect all year
1245
1246 case 1943:
1247 case 1944:
1248 case 1945:
1249 dt.Set(1, Jan, year);
1250 break;
1251
1252 case 1942:
1253 // DST was installed Feb 2, 1942 by the Congress
1254 dt.Set(2, Feb, year);
1255 break;
1256
1257 // Oil embargo changed the DST period in the US
1258 case 1974:
1259 dt.Set(6, Jan, 1974);
1260 break;
1261
1262 case 1975:
1263 dt.Set(23, Feb, 1975);
1264 break;
1265
1266 default:
1267 // before 1986, DST begun on the last Sunday of April, but
1268 // in 1986 Reagan changed it to begin at 2 a.m. of the
1269 // first Sunday in April
1270 if ( year < 1986 )
1271 {
1272 if ( !dt.SetToLastWeekDay(Sun, Apr, year) )
1273 {
1274 // weird...
1275 wxFAIL_MSG( _T("no first Sunday in April?") );
1276 }
1277 }
1278 else
1279 {
1280 if ( !dt.SetToWeekDay(Sun, 1, Apr, year) )
1281 {
1282 // weird...
1283 wxFAIL_MSG( _T("no first Sunday in April?") );
1284 }
1285 }
1286
1287 dt += wxTimeSpan::Hours(2);
1288
1289 // TODO what about timezone??
1290 }
1291
1292 break;
1293
1294 default:
1295 // assume Mar 30 as the start of the DST for the rest of the world
1296 // - totally bogus, of course
1297 dt.Set(30, Mar, year);
1298 }
1299
1300 return dt;
1301 }
1302
1303 /* static */
1304 wxDateTime wxDateTime::GetEndDST(int year, Country country)
1305 {
1306 if ( year == Inv_Year )
1307 {
1308 // take the current year if none given
1309 year = GetCurrentYear();
1310 }
1311
1312 if ( country == Country_Default )
1313 {
1314 country = GetCountry();
1315 }
1316
1317 if ( !IsDSTApplicable(year, country) )
1318 {
1319 return wxInvalidDateTime;
1320 }
1321
1322 wxDateTime dt;
1323
1324 if ( IsWestEuropeanCountry(country) || (country == Russia) )
1325 {
1326 // DST ends at 1 a.m. GMT on the last Sunday of October
1327 if ( !dt.SetToLastWeekDay(Sun, Oct, year) )
1328 {
1329 // weirder and weirder...
1330 wxFAIL_MSG( _T("no last Sunday in October?") );
1331 }
1332
1333 dt += wxTimeSpan::Hours(1);
1334 }
1335 else switch ( country )
1336 {
1337 case USA:
1338 switch ( year )
1339 {
1340 case 1918:
1341 case 1919:
1342 // don't know for sure - assume it was in effect all year
1343
1344 case 1943:
1345 case 1944:
1346 dt.Set(31, Dec, year);
1347 break;
1348
1349 case 1945:
1350 // the time was reset after the end of the WWII
1351 dt.Set(30, Sep, year);
1352 break;
1353
1354 default:
1355 // DST ends at 2 a.m. on the last Sunday of October
1356 if ( !dt.SetToLastWeekDay(Sun, Oct, year) )
1357 {
1358 // weirder and weirder...
1359 wxFAIL_MSG( _T("no last Sunday in October?") );
1360 }
1361
1362 dt += wxTimeSpan::Hours(2);
1363
1364 // TODO what about timezone??
1365 }
1366 break;
1367
1368 default:
1369 // assume October 26th as the end of the DST - totally bogus too
1370 dt.Set(26, Oct, year);
1371 }
1372
1373 return dt;
1374 }
1375
1376 // ----------------------------------------------------------------------------
1377 // constructors and assignment operators
1378 // ----------------------------------------------------------------------------
1379
1380 // return the current time with ms precision
1381 /* static */ wxDateTime wxDateTime::UNow()
1382 {
1383 return wxDateTime(wxGetLocalTimeMillis());
1384 }
1385
1386 // the values in the tm structure contain the local time
1387 wxDateTime& wxDateTime::Set(const struct tm& tm)
1388 {
1389 struct tm tm2(tm);
1390 time_t timet = mktime(&tm2);
1391
1392 if ( timet == (time_t)-1 )
1393 {
1394 // mktime() rather unintuitively fails for Jan 1, 1970 if the hour is
1395 // less than timezone - try to make it work for this case
1396 if ( tm2.tm_year == 70 && tm2.tm_mon == 0 && tm2.tm_mday == 1 )
1397 {
1398 return Set((time_t)(
1399 GetTimeZone() +
1400 tm2.tm_hour * MIN_PER_HOUR * SEC_PER_MIN +
1401 tm2.tm_min * SEC_PER_MIN +
1402 tm2.tm_sec));
1403 }
1404
1405 wxFAIL_MSG( _T("mktime() failed") );
1406
1407 *this = wxInvalidDateTime;
1408
1409 return *this;
1410 }
1411 else
1412 {
1413 return Set(timet);
1414 }
1415 }
1416
1417 wxDateTime& wxDateTime::Set(wxDateTime_t hour,
1418 wxDateTime_t minute,
1419 wxDateTime_t second,
1420 wxDateTime_t millisec)
1421 {
1422 // we allow seconds to be 61 to account for the leap seconds, even if we
1423 // don't use them really
1424 wxDATETIME_CHECK( hour < 24 &&
1425 second < 62 &&
1426 minute < 60 &&
1427 millisec < 1000,
1428 _T("Invalid time in wxDateTime::Set()") );
1429
1430 // get the current date from system
1431 struct tm tmstruct;
1432 struct tm *tm = GetTmNow(&tmstruct);
1433
1434 wxDATETIME_CHECK( tm, _T("wxLocaltime_r() failed") );
1435
1436 // make a copy so it isn't clobbered by the call to mktime() below
1437 struct tm tm1(*tm);
1438
1439 // adjust the time
1440 tm1.tm_hour = hour;
1441 tm1.tm_min = minute;
1442 tm1.tm_sec = second;
1443
1444 // and the DST in case it changes on this date
1445 struct tm tm2(tm1);
1446 mktime(&tm2);
1447 if ( tm2.tm_isdst != tm1.tm_isdst )
1448 tm1.tm_isdst = tm2.tm_isdst;
1449
1450 (void)Set(tm1);
1451
1452 // and finally adjust milliseconds
1453 return SetMillisecond(millisec);
1454 }
1455
1456 wxDateTime& wxDateTime::Set(wxDateTime_t day,
1457 Month month,
1458 int year,
1459 wxDateTime_t hour,
1460 wxDateTime_t minute,
1461 wxDateTime_t second,
1462 wxDateTime_t millisec)
1463 {
1464 wxDATETIME_CHECK( hour < 24 &&
1465 second < 62 &&
1466 minute < 60 &&
1467 millisec < 1000,
1468 _T("Invalid time in wxDateTime::Set()") );
1469
1470 ReplaceDefaultYearMonthWithCurrent(&year, &month);
1471
1472 wxDATETIME_CHECK( (0 < day) && (day <= GetNumberOfDays(month, year)),
1473 _T("Invalid date in wxDateTime::Set()") );
1474
1475 // the range of time_t type (inclusive)
1476 static const int yearMinInRange = 1970;
1477 static const int yearMaxInRange = 2037;
1478
1479 // test only the year instead of testing for the exact end of the Unix
1480 // time_t range - it doesn't bring anything to do more precise checks
1481 if ( year >= yearMinInRange && year <= yearMaxInRange )
1482 {
1483 // use the standard library version if the date is in range - this is
1484 // probably more efficient than our code
1485 struct tm tm;
1486 tm.tm_year = year - 1900;
1487 tm.tm_mon = month;
1488 tm.tm_mday = day;
1489 tm.tm_hour = hour;
1490 tm.tm_min = minute;
1491 tm.tm_sec = second;
1492 tm.tm_isdst = -1; // mktime() will guess it
1493
1494 (void)Set(tm);
1495
1496 // and finally adjust milliseconds
1497 if (IsValid())
1498 SetMillisecond(millisec);
1499
1500 return *this;
1501 }
1502 else
1503 {
1504 // do time calculations ourselves: we want to calculate the number of
1505 // milliseconds between the given date and the epoch
1506
1507 // get the JDN for the midnight of this day
1508 m_time = GetTruncatedJDN(day, month, year);
1509 m_time -= EPOCH_JDN;
1510 m_time *= SECONDS_PER_DAY * TIME_T_FACTOR;
1511
1512 // JDN corresponds to GMT, we take localtime
1513 Add(wxTimeSpan(hour, minute, second + GetTimeZone(), millisec));
1514 }
1515
1516 return *this;
1517 }
1518
1519 wxDateTime& wxDateTime::Set(double jdn)
1520 {
1521 // so that m_time will be 0 for the midnight of Jan 1, 1970 which is jdn
1522 // EPOCH_JDN + 0.5
1523 jdn -= EPOCH_JDN + 0.5;
1524
1525 m_time.Assign(jdn*MILLISECONDS_PER_DAY);
1526
1527 // JDNs always are in UTC, so we don't need any adjustments for time zone
1528
1529 return *this;
1530 }
1531
1532 wxDateTime& wxDateTime::ResetTime()
1533 {
1534 Tm tm = GetTm();
1535
1536 if ( tm.hour || tm.min || tm.sec || tm.msec )
1537 {
1538 tm.msec =
1539 tm.sec =
1540 tm.min =
1541 tm.hour = 0;
1542
1543 Set(tm);
1544 }
1545
1546 return *this;
1547 }
1548
1549 wxDateTime wxDateTime::GetDateOnly() const
1550 {
1551 Tm tm = GetTm();
1552 tm.msec =
1553 tm.sec =
1554 tm.min =
1555 tm.hour = 0;
1556 return wxDateTime(tm);
1557 }
1558
1559 // ----------------------------------------------------------------------------
1560 // DOS Date and Time Format functions
1561 // ----------------------------------------------------------------------------
1562 // the dos date and time value is an unsigned 32 bit value in the format:
1563 // YYYYYYYMMMMDDDDDhhhhhmmmmmmsssss
1564 //
1565 // Y = year offset from 1980 (0-127)
1566 // M = month (1-12)
1567 // D = day of month (1-31)
1568 // h = hour (0-23)
1569 // m = minute (0-59)
1570 // s = bisecond (0-29) each bisecond indicates two seconds
1571 // ----------------------------------------------------------------------------
1572
1573 wxDateTime& wxDateTime::SetFromDOS(unsigned long ddt)
1574 {
1575 struct tm tm;
1576 InitTm(tm);
1577
1578 long year = ddt & 0xFE000000;
1579 year >>= 25;
1580 year += 80;
1581 tm.tm_year = year;
1582
1583 long month = ddt & 0x1E00000;
1584 month >>= 21;
1585 month -= 1;
1586 tm.tm_mon = month;
1587
1588 long day = ddt & 0x1F0000;
1589 day >>= 16;
1590 tm.tm_mday = day;
1591
1592 long hour = ddt & 0xF800;
1593 hour >>= 11;
1594 tm.tm_hour = hour;
1595
1596 long minute = ddt & 0x7E0;
1597 minute >>= 5;
1598 tm.tm_min = minute;
1599
1600 long second = ddt & 0x1F;
1601 tm.tm_sec = second * 2;
1602
1603 return Set(mktime(&tm));
1604 }
1605
1606 unsigned long wxDateTime::GetAsDOS() const
1607 {
1608 unsigned long ddt;
1609 time_t ticks = GetTicks();
1610 struct tm tmstruct;
1611 struct tm *tm = wxLocaltime_r(&ticks, &tmstruct);
1612 wxCHECK_MSG( tm, ULONG_MAX, _T("time can't be represented in DOS format") );
1613
1614 long year = tm->tm_year;
1615 year -= 80;
1616 year <<= 25;
1617
1618 long month = tm->tm_mon;
1619 month += 1;
1620 month <<= 21;
1621
1622 long day = tm->tm_mday;
1623 day <<= 16;
1624
1625 long hour = tm->tm_hour;
1626 hour <<= 11;
1627
1628 long minute = tm->tm_min;
1629 minute <<= 5;
1630
1631 long second = tm->tm_sec;
1632 second /= 2;
1633
1634 ddt = year | month | day | hour | minute | second;
1635 return ddt;
1636 }
1637
1638 // ----------------------------------------------------------------------------
1639 // time_t <-> broken down time conversions
1640 // ----------------------------------------------------------------------------
1641
1642 wxDateTime::Tm wxDateTime::GetTm(const TimeZone& tz) const
1643 {
1644 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1645
1646 time_t time = GetTicks();
1647 if ( time != (time_t)-1 )
1648 {
1649 // use C RTL functions
1650 struct tm tmstruct;
1651 tm *tm;
1652 if ( tz.GetOffset() == -GetTimeZone() )
1653 {
1654 // we are working with local time
1655 tm = wxLocaltime_r(&time, &tmstruct);
1656
1657 // should never happen
1658 wxCHECK_MSG( tm, Tm(), _T("wxLocaltime_r() failed") );
1659 }
1660 else
1661 {
1662 time += (time_t)tz.GetOffset();
1663 #if defined(__VMS__) || defined(__WATCOMC__) // time is unsigned so avoid warning
1664 int time2 = (int) time;
1665 if ( time2 >= 0 )
1666 #else
1667 if ( time >= 0 )
1668 #endif
1669 {
1670 tm = wxGmtime_r(&time, &tmstruct);
1671
1672 // should never happen
1673 wxCHECK_MSG( tm, Tm(), _T("wxGmtime_r() failed") );
1674 }
1675 else
1676 {
1677 tm = (struct tm *)NULL;
1678 }
1679 }
1680
1681 if ( tm )
1682 {
1683 // adjust the milliseconds
1684 Tm tm2(*tm, tz);
1685 long timeOnly = (m_time % MILLISECONDS_PER_DAY).ToLong();
1686 tm2.msec = (wxDateTime_t)(timeOnly % 1000);
1687 return tm2;
1688 }
1689 //else: use generic code below
1690 }
1691
1692 // remember the time and do the calculations with the date only - this
1693 // eliminates rounding errors of the floating point arithmetics
1694
1695 wxLongLong timeMidnight = m_time + tz.GetOffset() * 1000;
1696
1697 long timeOnly = (timeMidnight % MILLISECONDS_PER_DAY).ToLong();
1698
1699 // we want to always have positive time and timeMidnight to be really
1700 // the midnight before it
1701 if ( timeOnly < 0 )
1702 {
1703 timeOnly = MILLISECONDS_PER_DAY + timeOnly;
1704 }
1705
1706 timeMidnight -= timeOnly;
1707
1708 // calculate the Gregorian date from JDN for the midnight of our date:
1709 // this will yield day, month (in 1..12 range) and year
1710
1711 // actually, this is the JDN for the noon of the previous day
1712 long jdn = (timeMidnight / MILLISECONDS_PER_DAY).ToLong() + EPOCH_JDN;
1713
1714 // CREDIT: code below is by Scott E. Lee (but bugs are mine)
1715
1716 wxASSERT_MSG( jdn > -2, _T("JDN out of range") );
1717
1718 // calculate the century
1719 long temp = (jdn + JDN_OFFSET) * 4 - 1;
1720 long century = temp / DAYS_PER_400_YEARS;
1721
1722 // then the year and day of year (1 <= dayOfYear <= 366)
1723 temp = ((temp % DAYS_PER_400_YEARS) / 4) * 4 + 3;
1724 long year = (century * 100) + (temp / DAYS_PER_4_YEARS);
1725 long dayOfYear = (temp % DAYS_PER_4_YEARS) / 4 + 1;
1726
1727 // and finally the month and day of the month
1728 temp = dayOfYear * 5 - 3;
1729 long month = temp / DAYS_PER_5_MONTHS;
1730 long day = (temp % DAYS_PER_5_MONTHS) / 5 + 1;
1731
1732 // month is counted from March - convert to normal
1733 if ( month < 10 )
1734 {
1735 month += 3;
1736 }
1737 else
1738 {
1739 year += 1;
1740 month -= 9;
1741 }
1742
1743 // year is offset by 4800
1744 year -= 4800;
1745
1746 // check that the algorithm gave us something reasonable
1747 wxASSERT_MSG( (0 < month) && (month <= 12), _T("invalid month") );
1748 wxASSERT_MSG( (1 <= day) && (day < 32), _T("invalid day") );
1749
1750 // construct Tm from these values
1751 Tm tm;
1752 tm.year = (int)year;
1753 tm.mon = (Month)(month - 1); // algorithm yields 1 for January, not 0
1754 tm.mday = (wxDateTime_t)day;
1755 tm.msec = (wxDateTime_t)(timeOnly % 1000);
1756 timeOnly -= tm.msec;
1757 timeOnly /= 1000; // now we have time in seconds
1758
1759 tm.sec = (wxDateTime_t)(timeOnly % SEC_PER_MIN);
1760 timeOnly -= tm.sec;
1761 timeOnly /= SEC_PER_MIN; // now we have time in minutes
1762
1763 tm.min = (wxDateTime_t)(timeOnly % MIN_PER_HOUR);
1764 timeOnly -= tm.min;
1765
1766 tm.hour = (wxDateTime_t)(timeOnly / MIN_PER_HOUR);
1767
1768 return tm;
1769 }
1770
1771 wxDateTime& wxDateTime::SetYear(int year)
1772 {
1773 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1774
1775 Tm tm(GetTm());
1776 tm.year = year;
1777 Set(tm);
1778
1779 return *this;
1780 }
1781
1782 wxDateTime& wxDateTime::SetMonth(Month month)
1783 {
1784 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1785
1786 Tm tm(GetTm());
1787 tm.mon = month;
1788 Set(tm);
1789
1790 return *this;
1791 }
1792
1793 wxDateTime& wxDateTime::SetDay(wxDateTime_t mday)
1794 {
1795 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1796
1797 Tm tm(GetTm());
1798 tm.mday = mday;
1799 Set(tm);
1800
1801 return *this;
1802 }
1803
1804 wxDateTime& wxDateTime::SetHour(wxDateTime_t hour)
1805 {
1806 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1807
1808 Tm tm(GetTm());
1809 tm.hour = hour;
1810 Set(tm);
1811
1812 return *this;
1813 }
1814
1815 wxDateTime& wxDateTime::SetMinute(wxDateTime_t min)
1816 {
1817 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1818
1819 Tm tm(GetTm());
1820 tm.min = min;
1821 Set(tm);
1822
1823 return *this;
1824 }
1825
1826 wxDateTime& wxDateTime::SetSecond(wxDateTime_t sec)
1827 {
1828 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1829
1830 Tm tm(GetTm());
1831 tm.sec = sec;
1832 Set(tm);
1833
1834 return *this;
1835 }
1836
1837 wxDateTime& wxDateTime::SetMillisecond(wxDateTime_t millisecond)
1838 {
1839 wxASSERT_MSG( IsValid(), _T("invalid wxDateTime") );
1840
1841 // we don't need to use GetTm() for this one
1842 m_time -= m_time % 1000l;
1843 m_time += millisecond;
1844
1845 return *this;
1846 }
1847
1848 // ----------------------------------------------------------------------------
1849 // wxDateTime arithmetics
1850 // ----------------------------------------------------------------------------
1851
1852 wxDateTime& wxDateTime::Add(const wxDateSpan& diff)
1853 {
1854 Tm tm(GetTm());
1855
1856 tm.year += diff.GetYears();
1857 tm.AddMonths(diff.GetMonths());
1858
1859 // check that the resulting date is valid
1860 if ( tm.mday > GetNumOfDaysInMonth(tm.year, tm.mon) )
1861 {
1862 // We suppose that when adding one month to Jan 31 we want to get Feb
1863 // 28 (or 29), i.e. adding a month to the last day of the month should
1864 // give the last day of the next month which is quite logical.
1865 //
1866 // Unfortunately, there is no logic way to understand what should
1867 // Jan 30 + 1 month be - Feb 28 too or Feb 27 (assuming non leap year)?
1868 // We make it Feb 28 (last day too), but it is highly questionable.
1869 tm.mday = GetNumOfDaysInMonth(tm.year, tm.mon);
1870 }
1871
1872 tm.AddDays(diff.GetTotalDays());
1873
1874 Set(tm);
1875
1876 wxASSERT_MSG( IsSameTime(tm),
1877 _T("Add(wxDateSpan) shouldn't modify time") );
1878
1879 return *this;
1880 }
1881
1882 // ----------------------------------------------------------------------------
1883 // Weekday and monthday stuff
1884 // ----------------------------------------------------------------------------
1885
1886 // convert Sun, Mon, ..., Sat into 6, 0, ..., 5
1887 static inline int ConvertWeekDayToMondayBase(int wd)
1888 {
1889 return wd == wxDateTime::Sun ? 6 : wd - 1;
1890 }
1891
1892 /* static */
1893 wxDateTime
1894 wxDateTime::SetToWeekOfYear(int year, wxDateTime_t numWeek, WeekDay wd)
1895 {
1896 wxASSERT_MSG( numWeek > 0,
1897 _T("invalid week number: weeks are counted from 1") );
1898
1899 // Jan 4 always lies in the 1st week of the year
1900 wxDateTime dt(4, Jan, year);
1901 dt.SetToWeekDayInSameWeek(wd);
1902 dt += wxDateSpan::Weeks(numWeek - 1);
1903
1904 return dt;
1905 }
1906
1907 #if WXWIN_COMPATIBILITY_2_6
1908 // use a separate function to avoid warnings about using deprecated
1909 // SetToTheWeek in GetWeek below
1910 static wxDateTime
1911 SetToTheWeek(int year,
1912 wxDateTime::wxDateTime_t numWeek,
1913 wxDateTime::WeekDay weekday,
1914 wxDateTime::WeekFlags flags)
1915 {
1916 // Jan 4 always lies in the 1st week of the year
1917 wxDateTime dt(4, wxDateTime::Jan, year);
1918 dt.SetToWeekDayInSameWeek(weekday, flags);
1919 dt += wxDateSpan::Weeks(numWeek - 1);
1920
1921 return dt;
1922 }
1923
1924 bool wxDateTime::SetToTheWeek(wxDateTime_t numWeek,
1925 WeekDay weekday,
1926 WeekFlags flags)
1927 {
1928 int year = GetYear();
1929 *this = ::SetToTheWeek(year, numWeek, weekday, flags);
1930 if ( GetYear() != year )
1931 {
1932 // oops... numWeek was too big
1933 return false;
1934 }
1935
1936 return true;
1937 }
1938
1939 wxDateTime wxDateTime::GetWeek(wxDateTime_t numWeek,
1940 WeekDay weekday,
1941 WeekFlags flags) const
1942 {
1943 return ::SetToTheWeek(GetYear(), numWeek, weekday, flags);
1944 }
1945 #endif // WXWIN_COMPATIBILITY_2_6
1946
1947 wxDateTime& wxDateTime::SetToLastMonthDay(Month month,
1948 int year)
1949 {
1950 // take the current month/year if none specified
1951 if ( year == Inv_Year )
1952 year = GetYear();
1953 if ( month == Inv_Month )
1954 month = GetMonth();
1955
1956 return Set(GetNumOfDaysInMonth(year, month), month, year);
1957 }
1958
1959 wxDateTime& wxDateTime::SetToWeekDayInSameWeek(WeekDay weekday, WeekFlags flags)
1960 {
1961 wxDATETIME_CHECK( weekday != Inv_WeekDay, _T("invalid weekday") );
1962
1963 int wdayDst = weekday,
1964 wdayThis = GetWeekDay();
1965 if ( wdayDst == wdayThis )
1966 {
1967 // nothing to do
1968 return *this;
1969 }
1970
1971 if ( flags == Default_First )
1972 {
1973 flags = GetCountry() == USA ? Sunday_First : Monday_First;
1974 }
1975
1976 // the logic below based on comparing weekday and wdayThis works if Sun (0)
1977 // is the first day in the week, but breaks down for Monday_First case so
1978 // we adjust the week days in this case
1979 if ( flags == Monday_First )
1980 {
1981 if ( wdayThis == Sun )
1982 wdayThis += 7;
1983 if ( wdayDst == Sun )
1984 wdayDst += 7;
1985 }
1986 //else: Sunday_First, nothing to do
1987
1988 // go forward or back in time to the day we want
1989 if ( wdayDst < wdayThis )
1990 {
1991 return Subtract(wxDateSpan::Days(wdayThis - wdayDst));
1992 }
1993 else // weekday > wdayThis
1994 {
1995 return Add(wxDateSpan::Days(wdayDst - wdayThis));
1996 }
1997 }
1998
1999 wxDateTime& wxDateTime::SetToNextWeekDay(WeekDay weekday)
2000 {
2001 wxDATETIME_CHECK( weekday != Inv_WeekDay, _T("invalid weekday") );
2002
2003 int diff;
2004 WeekDay wdayThis = GetWeekDay();
2005 if ( weekday == wdayThis )
2006 {
2007 // nothing to do
2008 return *this;
2009 }
2010 else if ( weekday < wdayThis )
2011 {
2012 // need to advance a week
2013 diff = 7 - (wdayThis - weekday);
2014 }
2015 else // weekday > wdayThis
2016 {
2017 diff = weekday - wdayThis;
2018 }
2019
2020 return Add(wxDateSpan::Days(diff));
2021 }
2022
2023 wxDateTime& wxDateTime::SetToPrevWeekDay(WeekDay weekday)
2024 {
2025 wxDATETIME_CHECK( weekday != Inv_WeekDay, _T("invalid weekday") );
2026
2027 int diff;
2028 WeekDay wdayThis = GetWeekDay();
2029 if ( weekday == wdayThis )
2030 {
2031 // nothing to do
2032 return *this;
2033 }
2034 else if ( weekday > wdayThis )
2035 {
2036 // need to go to previous week
2037 diff = 7 - (weekday - wdayThis);
2038 }
2039 else // weekday < wdayThis
2040 {
2041 diff = wdayThis - weekday;
2042 }
2043
2044 return Subtract(wxDateSpan::Days(diff));
2045 }
2046
2047 bool wxDateTime::SetToWeekDay(WeekDay weekday,
2048 int n,
2049 Month month,
2050 int year)
2051 {
2052 wxCHECK_MSG( weekday != Inv_WeekDay, false, _T("invalid weekday") );
2053
2054 // we don't check explicitly that -5 <= n <= 5 because we will return false
2055 // anyhow in such case - but may be should still give an assert for it?
2056
2057 // take the current month/year if none specified
2058 ReplaceDefaultYearMonthWithCurrent(&year, &month);
2059
2060 wxDateTime dt;
2061
2062 // TODO this probably could be optimised somehow...
2063
2064 if ( n > 0 )
2065 {
2066 // get the first day of the month
2067 dt.Set(1, month, year);
2068
2069 // get its wday
2070 WeekDay wdayFirst = dt.GetWeekDay();
2071
2072 // go to the first weekday of the month
2073 int diff = weekday - wdayFirst;
2074 if ( diff < 0 )
2075 diff += 7;
2076
2077 // add advance n-1 weeks more
2078 diff += 7*(n - 1);
2079
2080 dt += wxDateSpan::Days(diff);
2081 }
2082 else // count from the end of the month
2083 {
2084 // get the last day of the month
2085 dt.SetToLastMonthDay(month, year);
2086
2087 // get its wday
2088 WeekDay wdayLast = dt.GetWeekDay();
2089
2090 // go to the last weekday of the month
2091 int diff = wdayLast - weekday;
2092 if ( diff < 0 )
2093 diff += 7;
2094
2095 // and rewind n-1 weeks from there
2096 diff += 7*(-n - 1);
2097
2098 dt -= wxDateSpan::Days(diff);
2099 }
2100
2101 // check that it is still in the same month
2102 if ( dt.GetMonth() == month )
2103 {
2104 *this = dt;
2105
2106 return true;
2107 }
2108 else
2109 {
2110 // no such day in this month
2111 return false;
2112 }
2113 }
2114
2115 static inline
2116 wxDateTime::wxDateTime_t GetDayOfYearFromTm(const wxDateTime::Tm& tm)
2117 {
2118 return (wxDateTime::wxDateTime_t)(gs_cumulatedDays[wxDateTime::IsLeapYear(tm.year)][tm.mon] + tm.mday);
2119 }
2120
2121 wxDateTime::wxDateTime_t wxDateTime::GetDayOfYear(const TimeZone& tz) const
2122 {
2123 return GetDayOfYearFromTm(GetTm(tz));
2124 }
2125
2126 wxDateTime::wxDateTime_t
2127 wxDateTime::GetWeekOfYear(wxDateTime::WeekFlags flags, const TimeZone& tz) const
2128 {
2129 if ( flags == Default_First )
2130 {
2131 flags = GetCountry() == USA ? Sunday_First : Monday_First;
2132 }
2133
2134 Tm tm(GetTm(tz));
2135 wxDateTime_t nDayInYear = GetDayOfYearFromTm(tm);
2136
2137 int wdTarget = GetWeekDay(tz);
2138 int wdYearStart = wxDateTime(1, Jan, GetYear()).GetWeekDay();
2139 int week;
2140 if ( flags == Sunday_First )
2141 {
2142 // FIXME: First week is not calculated correctly.
2143 week = (nDayInYear - wdTarget + 7) / 7;
2144 if ( wdYearStart == Wed || wdYearStart == Thu )
2145 week++;
2146 }
2147 else // week starts with monday
2148 {
2149 // adjust the weekdays to non-US style.
2150 wdYearStart = ConvertWeekDayToMondayBase(wdYearStart);
2151 wdTarget = ConvertWeekDayToMondayBase(wdTarget);
2152
2153 // quoting from http://www.cl.cam.ac.uk/~mgk25/iso-time.html:
2154 //
2155 // Week 01 of a year is per definition the first week that has the
2156 // Thursday in this year, which is equivalent to the week that
2157 // contains the fourth day of January. In other words, the first
2158 // week of a new year is the week that has the majority of its
2159 // days in the new year. Week 01 might also contain days from the
2160 // previous year and the week before week 01 of a year is the last
2161 // week (52 or 53) of the previous year even if it contains days
2162 // from the new year. A week starts with Monday (day 1) and ends
2163 // with Sunday (day 7).
2164 //
2165
2166 // if Jan 1 is Thursday or less, it is in the first week of this year
2167 if ( wdYearStart < 4 )
2168 {
2169 // count the number of entire weeks between Jan 1 and this date
2170 week = (nDayInYear + wdYearStart + 6 - wdTarget)/7;
2171
2172 // be careful to check for overflow in the next year
2173 if ( week == 53 && tm.mday - wdTarget > 28 )
2174 week = 1;
2175 }
2176 else // Jan 1 is in the last week of the previous year
2177 {
2178 // check if we happen to be at the last week of previous year:
2179 if ( tm.mon == Jan && tm.mday < 8 - wdYearStart )
2180 week = wxDateTime(31, Dec, GetYear()-1).GetWeekOfYear();
2181 else
2182 week = (nDayInYear + wdYearStart - 1 - wdTarget)/7;
2183 }
2184 }
2185
2186 return (wxDateTime::wxDateTime_t)week;
2187 }
2188
2189 wxDateTime::wxDateTime_t wxDateTime::GetWeekOfMonth(wxDateTime::WeekFlags flags,
2190 const TimeZone& tz) const
2191 {
2192 Tm tm = GetTm(tz);
2193 wxDateTime dtMonthStart = wxDateTime(1, tm.mon, tm.year);
2194 int nWeek = GetWeekOfYear(flags) - dtMonthStart.GetWeekOfYear(flags) + 1;
2195 if ( nWeek < 0 )
2196 {
2197 // this may happen for January when Jan, 1 is the last week of the
2198 // previous year
2199 nWeek += IsLeapYear(tm.year - 1) ? 53 : 52;
2200 }
2201
2202 return (wxDateTime::wxDateTime_t)nWeek;
2203 }
2204
2205 wxDateTime& wxDateTime::SetToYearDay(wxDateTime::wxDateTime_t yday)
2206 {
2207 int year = GetYear();
2208 wxDATETIME_CHECK( (0 < yday) && (yday <= GetNumberOfDays(year)),
2209 _T("invalid year day") );
2210
2211 bool isLeap = IsLeapYear(year);
2212 for ( Month mon = Jan; mon < Inv_Month; wxNextMonth(mon) )
2213 {
2214 // for Dec, we can't compare with gs_cumulatedDays[mon + 1], but we
2215 // don't need it neither - because of the CHECK above we know that
2216 // yday lies in December then
2217 if ( (mon == Dec) || (yday <= gs_cumulatedDays[isLeap][mon + 1]) )
2218 {
2219 Set((wxDateTime::wxDateTime_t)(yday - gs_cumulatedDays[isLeap][mon]), mon, year);
2220
2221 break;
2222 }
2223 }
2224
2225 return *this;
2226 }
2227
2228 // ----------------------------------------------------------------------------
2229 // Julian day number conversion and related stuff
2230 // ----------------------------------------------------------------------------
2231
2232 double wxDateTime::GetJulianDayNumber() const
2233 {
2234 return m_time.ToDouble() / MILLISECONDS_PER_DAY + EPOCH_JDN + 0.5;
2235 }
2236
2237 double wxDateTime::GetRataDie() const
2238 {
2239 // March 1 of the year 0 is Rata Die day -306 and JDN 1721119.5
2240 return GetJulianDayNumber() - 1721119.5 - 306;
2241 }
2242
2243 // ----------------------------------------------------------------------------
2244 // timezone and DST stuff
2245 // ----------------------------------------------------------------------------
2246
2247 int wxDateTime::IsDST(wxDateTime::Country country) const
2248 {
2249 wxCHECK_MSG( country == Country_Default, -1,
2250 _T("country support not implemented") );
2251
2252 // use the C RTL for the dates in the standard range
2253 time_t timet = GetTicks();
2254 if ( timet != (time_t)-1 )
2255 {
2256 struct tm tmstruct;
2257 tm *tm = wxLocaltime_r(&timet, &tmstruct);
2258
2259 wxCHECK_MSG( tm, -1, _T("wxLocaltime_r() failed") );
2260
2261 return tm->tm_isdst;
2262 }
2263 else
2264 {
2265 int year = GetYear();
2266
2267 if ( !IsDSTApplicable(year, country) )
2268 {
2269 // no DST time in this year in this country
2270 return -1;
2271 }
2272
2273 return IsBetween(GetBeginDST(year, country), GetEndDST(year, country));
2274 }
2275 }
2276
2277 wxDateTime& wxDateTime::MakeTimezone(const TimeZone& tz, bool noDST)
2278 {
2279 long secDiff = GetTimeZone() + tz.GetOffset();
2280
2281 // we need to know whether DST is or not in effect for this date unless
2282 // the test disabled by the caller
2283 if ( !noDST && (IsDST() == 1) )
2284 {
2285 // FIXME we assume that the DST is always shifted by 1 hour
2286 secDiff -= 3600;
2287 }
2288
2289 return Add(wxTimeSpan::Seconds(secDiff));
2290 }
2291
2292 wxDateTime& wxDateTime::MakeFromTimezone(const TimeZone& tz, bool noDST)
2293 {
2294 long secDiff = GetTimeZone() + tz.GetOffset();
2295
2296 // we need to know whether DST is or not in effect for this date unless
2297 // the test disabled by the caller
2298 if ( !noDST && (IsDST() == 1) )
2299 {
2300 // FIXME we assume that the DST is always shifted by 1 hour
2301 secDiff -= 3600;
2302 }
2303
2304 return Subtract(wxTimeSpan::Seconds(secDiff));
2305 }
2306
2307 // ----------------------------------------------------------------------------
2308 // wxDateTime to/from text representations
2309 // ----------------------------------------------------------------------------
2310
2311 wxString wxDateTime::Format(const wxString& format, const TimeZone& tz) const
2312 {
2313 wxCHECK_MSG( !format.empty(), wxEmptyString,
2314 _T("NULL format in wxDateTime::Format") );
2315
2316 // we have to use our own implementation if the date is out of range of
2317 // strftime() or if we use non standard specificators
2318 #ifdef HAVE_STRFTIME
2319 time_t time = GetTicks();
2320
2321 if ( (time != (time_t)-1) && !wxStrstr(format, _T("%l")) )
2322 {
2323 // use strftime()
2324 struct tm tmstruct;
2325 struct tm *tm;
2326 if ( tz.GetOffset() == -GetTimeZone() )
2327 {
2328 // we are working with local time
2329 tm = wxLocaltime_r(&time, &tmstruct);
2330
2331 // should never happen
2332 wxCHECK_MSG( tm, wxEmptyString, _T("wxLocaltime_r() failed") );
2333 }
2334 else
2335 {
2336 time += (int)tz.GetOffset();
2337
2338 #if defined(__VMS__) || defined(__WATCOMC__) // time is unsigned so avoid warning
2339 int time2 = (int) time;
2340 if ( time2 >= 0 )
2341 #else
2342 if ( time >= 0 )
2343 #endif
2344 {
2345 tm = wxGmtime_r(&time, &tmstruct);
2346
2347 // should never happen
2348 wxCHECK_MSG( tm, wxEmptyString, _T("wxGmtime_r() failed") );
2349 }
2350 else
2351 {
2352 tm = (struct tm *)NULL;
2353 }
2354 }
2355
2356 if ( tm )
2357 {
2358 return CallStrftime(format, tm);
2359 }
2360 }
2361 //else: use generic code below
2362 #endif // HAVE_STRFTIME
2363
2364 // we only parse ANSI C format specifications here, no POSIX 2
2365 // complications, no GNU extensions but we do add support for a "%l" format
2366 // specifier allowing to get the number of milliseconds
2367 Tm tm = GetTm(tz);
2368
2369 // used for calls to strftime() when we only deal with time
2370 struct tm tmTimeOnly;
2371 tmTimeOnly.tm_hour = tm.hour;
2372 tmTimeOnly.tm_min = tm.min;
2373 tmTimeOnly.tm_sec = tm.sec;
2374 tmTimeOnly.tm_wday = 0;
2375 tmTimeOnly.tm_yday = 0;
2376 tmTimeOnly.tm_mday = 1; // any date will do
2377 tmTimeOnly.tm_mon = 0;
2378 tmTimeOnly.tm_year = 76;
2379 tmTimeOnly.tm_isdst = 0; // no DST, we adjust for tz ourselves
2380
2381 wxString tmp, res, fmt;
2382 for ( wxString::const_iterator p = format.begin(); p != format.end(); ++p )
2383 {
2384 if ( *p != _T('%') )
2385 {
2386 // copy as is
2387 res += *p;
2388
2389 continue;
2390 }
2391
2392 // set the default format
2393 switch ( (*++p).GetValue() )
2394 {
2395 case _T('Y'): // year has 4 digits
2396 fmt = _T("%04d");
2397 break;
2398
2399 case _T('j'): // day of year has 3 digits
2400 case _T('l'): // milliseconds have 3 digits
2401 fmt = _T("%03d");
2402 break;
2403
2404 case _T('w'): // week day as number has only one
2405 fmt = _T("%d");
2406 break;
2407
2408 default:
2409 // it's either another valid format specifier in which case
2410 // the format is "%02d" (for all the rest) or we have the
2411 // field width preceding the format in which case it will
2412 // override the default format anyhow
2413 fmt = _T("%02d");
2414 }
2415
2416 bool restart = true;
2417 while ( restart )
2418 {
2419 restart = false;
2420
2421 // start of the format specification
2422 switch ( (*p).GetValue() )
2423 {
2424 case _T('a'): // a weekday name
2425 case _T('A'):
2426 // second parameter should be true for abbreviated names
2427 res += GetWeekDayName(tm.GetWeekDay(),
2428 *p == _T('a') ? Name_Abbr : Name_Full);
2429 break;
2430
2431 case _T('b'): // a month name
2432 case _T('B'):
2433 res += GetMonthName(tm.mon,
2434 *p == _T('b') ? Name_Abbr : Name_Full);
2435 break;
2436
2437 case _T('c'): // locale default date and time representation
2438 case _T('x'): // locale default date representation
2439 #ifdef HAVE_STRFTIME
2440 //
2441 // the problem: there is no way to know what do these format
2442 // specifications correspond to for the current locale.
2443 //
2444 // the solution: use a hack and still use strftime(): first
2445 // find the YEAR which is a year in the strftime() range (1970
2446 // - 2038) whose Jan 1 falls on the same week day as the Jan 1
2447 // of the real year. Then make a copy of the format and
2448 // replace all occurrences of YEAR in it with some unique
2449 // string not appearing anywhere else in it, then use
2450 // strftime() to format the date in year YEAR and then replace
2451 // YEAR back by the real year and the unique replacement
2452 // string back with YEAR. Notice that "all occurrences of YEAR"
2453 // means all occurrences of 4 digit as well as 2 digit form!
2454 //
2455 // the bugs: we assume that neither of %c nor %x contains any
2456 // fields which may change between the YEAR and real year. For
2457 // example, the week number (%U, %W) and the day number (%j)
2458 // will change if one of these years is leap and the other one
2459 // is not!
2460 {
2461 // find the YEAR: normally, for any year X, Jan 1 of the
2462 // year X + 28 is the same weekday as Jan 1 of X (because
2463 // the weekday advances by 1 for each normal X and by 2
2464 // for each leap X, hence by 5 every 4 years or by 35
2465 // which is 0 mod 7 every 28 years) but this rule breaks
2466 // down if there are years between X and Y which are
2467 // divisible by 4 but not leap (i.e. divisible by 100 but
2468 // not 400), hence the correction.
2469
2470 int yearReal = GetYear(tz);
2471 int mod28 = yearReal % 28;
2472
2473 // be careful to not go too far - we risk to leave the
2474 // supported range
2475 int year;
2476 if ( mod28 < 10 )
2477 {
2478 year = 1988 + mod28; // 1988 == 0 (mod 28)
2479 }
2480 else
2481 {
2482 year = 1970 + mod28 - 10; // 1970 == 10 (mod 28)
2483 }
2484
2485 int nCentury = year / 100,
2486 nCenturyReal = yearReal / 100;
2487
2488 // need to adjust for the years divisble by 400 which are
2489 // not leap but are counted like leap ones if we just take
2490 // the number of centuries in between for nLostWeekDays
2491 int nLostWeekDays = (nCentury - nCenturyReal) -
2492 (nCentury / 4 - nCenturyReal / 4);
2493
2494 // we have to gain back the "lost" weekdays: note that the
2495 // effect of this loop is to not do anything to
2496 // nLostWeekDays (which we won't use any more), but to
2497 // (indirectly) set the year correctly
2498 while ( (nLostWeekDays % 7) != 0 )
2499 {
2500 nLostWeekDays += year++ % 4 ? 1 : 2;
2501 }
2502
2503 // finally move the year below 2000 so that the 2-digit
2504 // year number can never match the month or day of the
2505 // month when we do the replacements below
2506 if ( year >= 2000 )
2507 year -= 28;
2508
2509 wxASSERT_MSG( year >= 1970 && year < 2000,
2510 _T("logic error in wxDateTime::Format") );
2511
2512
2513 // use strftime() to format the same date but in supported
2514 // year
2515 //
2516 // NB: we assume that strftime() doesn't check for the
2517 // date validity and will happily format the date
2518 // corresponding to Feb 29 of a non leap year (which
2519 // may happen if yearReal was leap and year is not)
2520 struct tm tmAdjusted;
2521 InitTm(tmAdjusted);
2522 tmAdjusted.tm_hour = tm.hour;
2523 tmAdjusted.tm_min = tm.min;
2524 tmAdjusted.tm_sec = tm.sec;
2525 tmAdjusted.tm_wday = tm.GetWeekDay();
2526 tmAdjusted.tm_yday = GetDayOfYear();
2527 tmAdjusted.tm_mday = tm.mday;
2528 tmAdjusted.tm_mon = tm.mon;
2529 tmAdjusted.tm_year = year - 1900;
2530 tmAdjusted.tm_isdst = 0; // no DST, already adjusted
2531 wxString str = CallStrftime(*p == _T('c') ? _T("%c")
2532 : _T("%x"),
2533 &tmAdjusted);
2534
2535 // now replace the replacement year with the real year:
2536 // notice that we have to replace the 4 digit year with
2537 // a unique string not appearing in strftime() output
2538 // first to prevent the 2 digit year from matching any
2539 // substring of the 4 digit year (but any day, month,
2540 // hours or minutes components should be safe because
2541 // they are never in 70-99 range)
2542 wxString replacement("|");
2543 while ( str.find(replacement) != wxString::npos )
2544 replacement += '|';
2545
2546 str.Replace(wxString::Format("%d", year),
2547 replacement);
2548 str.Replace(wxString::Format("%d", year % 100),
2549 wxString::Format("%d", yearReal % 100));
2550 str.Replace(replacement,
2551 wxString::Format("%d", yearReal));
2552
2553 res += str;
2554 }
2555 #else // !HAVE_STRFTIME
2556 // Use "%m/%d/%y %H:%M:%S" format instead
2557 res += wxString::Format(wxT("%02d/%02d/%04d %02d:%02d:%02d"),
2558 tm.mon+1,tm.mday, tm.year, tm.hour, tm.min, tm.sec);
2559 #endif // HAVE_STRFTIME/!HAVE_STRFTIME
2560 break;
2561
2562 case _T('d'): // day of a month (01-31)
2563 res += wxString::Format(fmt, tm.mday);
2564 break;
2565
2566 case _T('H'): // hour in 24h format (00-23)
2567 res += wxString::Format(fmt, tm.hour);
2568 break;
2569
2570 case _T('I'): // hour in 12h format (01-12)
2571 {
2572 // 24h -> 12h, 0h -> 12h too
2573 int hour12 = tm.hour > 12 ? tm.hour - 12
2574 : tm.hour ? tm.hour : 12;
2575 res += wxString::Format(fmt, hour12);
2576 }
2577 break;
2578
2579 case _T('j'): // day of the year
2580 res += wxString::Format(fmt, GetDayOfYear(tz));
2581 break;
2582
2583 case _T('l'): // milliseconds (NOT STANDARD)
2584 res += wxString::Format(fmt, GetMillisecond(tz));
2585 break;
2586
2587 case _T('m'): // month as a number (01-12)
2588 res += wxString::Format(fmt, tm.mon + 1);
2589 break;
2590
2591 case _T('M'): // minute as a decimal number (00-59)
2592 res += wxString::Format(fmt, tm.min);
2593 break;
2594
2595 case _T('p'): // AM or PM string
2596 #ifdef HAVE_STRFTIME
2597 res += CallStrftime(_T("%p"), &tmTimeOnly);
2598 #else // !HAVE_STRFTIME
2599 res += (tmTimeOnly.tm_hour > 12) ? wxT("pm") : wxT("am");
2600 #endif // HAVE_STRFTIME/!HAVE_STRFTIME
2601 break;
2602
2603 case _T('S'): // second as a decimal number (00-61)
2604 res += wxString::Format(fmt, tm.sec);
2605 break;
2606
2607 case _T('U'): // week number in the year (Sunday 1st week day)
2608 res += wxString::Format(fmt, GetWeekOfYear(Sunday_First, tz));
2609 break;
2610
2611 case _T('W'): // week number in the year (Monday 1st week day)
2612 res += wxString::Format(fmt, GetWeekOfYear(Monday_First, tz));
2613 break;
2614
2615 case _T('w'): // weekday as a number (0-6), Sunday = 0
2616 res += wxString::Format(fmt, tm.GetWeekDay());
2617 break;
2618
2619 // case _T('x'): -- handled with "%c"
2620
2621 case _T('X'): // locale default time representation
2622 // just use strftime() to format the time for us
2623 #ifdef HAVE_STRFTIME
2624 res += CallStrftime(_T("%X"), &tmTimeOnly);
2625 #else // !HAVE_STRFTIME
2626 res += wxString::Format(wxT("%02d:%02d:%02d"),tm.hour, tm.min, tm.sec);
2627 #endif // HAVE_STRFTIME/!HAVE_STRFTIME
2628 break;
2629
2630 case _T('y'): // year without century (00-99)
2631 res += wxString::Format(fmt, tm.year % 100);
2632 break;
2633
2634 case _T('Y'): // year with century
2635 res += wxString::Format(fmt, tm.year);
2636 break;
2637
2638 case _T('Z'): // timezone name
2639 #ifdef HAVE_STRFTIME
2640 res += CallStrftime(_T("%Z"), &tmTimeOnly);
2641 #endif
2642 break;
2643
2644 default:
2645 // is it the format width?
2646 fmt.Empty();
2647 while ( *p == _T('-') || *p == _T('+') ||
2648 *p == _T(' ') || wxIsdigit(*p) )
2649 {
2650 fmt += *p;
2651 }
2652
2653 if ( !fmt.empty() )
2654 {
2655 // we've only got the flags and width so far in fmt
2656 fmt.Prepend(_T('%'));
2657 fmt.Append(_T('d'));
2658
2659 restart = true;
2660
2661 break;
2662 }
2663
2664 // no, it wasn't the width
2665 wxFAIL_MSG(_T("unknown format specificator"));
2666
2667 // fall through and just copy it nevertheless
2668
2669 case _T('%'): // a percent sign
2670 res += *p;
2671 break;
2672
2673 case 0: // the end of string
2674 wxFAIL_MSG(_T("missing format at the end of string"));
2675
2676 // just put the '%' which was the last char in format
2677 res += _T('%');
2678 break;
2679 }
2680 }
2681 }
2682
2683 return res;
2684 }
2685
2686 // this function parses a string in (strict) RFC 822 format: see the section 5
2687 // of the RFC for the detailed description, but briefly it's something of the
2688 // form "Sat, 18 Dec 1999 00:48:30 +0100"
2689 //
2690 // this function is "strict" by design - it must reject anything except true
2691 // RFC822 time specs.
2692 //
2693 // TODO a great candidate for using reg exps
2694 const char *
2695 wxDateTime::ParseRfc822Date(const wxString& date, wxString::const_iterator *end)
2696 {
2697 // TODO: rewrite using iterators instead of wxChar pointers
2698 const wxStringCharType *p = date.wx_str();
2699 const wxStringCharType *comma = wxStrchr(p, wxS(','));
2700 if ( comma )
2701 {
2702 // the part before comma is the weekday
2703
2704 // skip it for now - we don't use but might check that it really
2705 // corresponds to the specfied date
2706 p = comma + 1;
2707
2708 if ( *p != _T(' ') )
2709 {
2710 wxLogDebug(_T("no space after weekday in RFC822 time spec"));
2711
2712 return NULL;
2713 }
2714
2715 p++; // skip space
2716 }
2717
2718 // the following 1 or 2 digits are the day number
2719 if ( !wxIsdigit(*p) )
2720 {
2721 wxLogDebug(_T("day number expected in RFC822 time spec, none found"));
2722
2723 return NULL;
2724 }
2725
2726 wxDateTime_t day = (wxDateTime_t)(*p++ - _T('0'));
2727 if ( wxIsdigit(*p) )
2728 {
2729 day *= 10;
2730 day = (wxDateTime_t)(day + (*p++ - _T('0')));
2731 }
2732
2733 if ( *p++ != _T(' ') )
2734 {
2735 return NULL;
2736 }
2737
2738 // the following 3 letters specify the month
2739 wxString monName(p, 3);
2740 Month mon;
2741 if ( monName == _T("Jan") )
2742 mon = Jan;
2743 else if ( monName == _T("Feb") )
2744 mon = Feb;
2745 else if ( monName == _T("Mar") )
2746 mon = Mar;
2747 else if ( monName == _T("Apr") )
2748 mon = Apr;
2749 else if ( monName == _T("May") )
2750 mon = May;
2751 else if ( monName == _T("Jun") )
2752 mon = Jun;
2753 else if ( monName == _T("Jul") )
2754 mon = Jul;
2755 else if ( monName == _T("Aug") )
2756 mon = Aug;
2757 else if ( monName == _T("Sep") )
2758 mon = Sep;
2759 else if ( monName == _T("Oct") )
2760 mon = Oct;
2761 else if ( monName == _T("Nov") )
2762 mon = Nov;
2763 else if ( monName == _T("Dec") )
2764 mon = Dec;
2765 else
2766 {
2767 wxLogDebug(_T("Invalid RFC 822 month name '%s'"), monName.c_str());
2768
2769 return NULL;
2770 }
2771
2772 p += 3;
2773
2774 if ( *p++ != _T(' ') )
2775 {
2776 return NULL;
2777 }
2778
2779 // next is the year
2780 if ( !wxIsdigit(*p) )
2781 {
2782 // no year?
2783 return NULL;
2784 }
2785
2786 int year = *p++ - _T('0');
2787
2788 if ( !wxIsdigit(*p) )
2789 {
2790 // should have at least 2 digits in the year
2791 return NULL;
2792 }
2793
2794 year *= 10;
2795 year += *p++ - _T('0');
2796
2797 // is it a 2 digit year (as per original RFC 822) or a 4 digit one?
2798 if ( wxIsdigit(*p) )
2799 {
2800 year *= 10;
2801 year += *p++ - _T('0');
2802
2803 if ( !wxIsdigit(*p) )
2804 {
2805 // no 3 digit years please
2806 return NULL;
2807 }
2808
2809 year *= 10;
2810 year += *p++ - _T('0');
2811 }
2812
2813 if ( *p++ != _T(' ') )
2814 {
2815 return NULL;
2816 }
2817
2818 // time is in the format hh:mm:ss and seconds are optional
2819 if ( !wxIsdigit(*p) )
2820 {
2821 return NULL;
2822 }
2823
2824 wxDateTime_t hour = (wxDateTime_t)(*p++ - _T('0'));
2825
2826 if ( !wxIsdigit(*p) )
2827 {
2828 return NULL;
2829 }
2830
2831 hour *= 10;
2832 hour = (wxDateTime_t)(hour + (*p++ - _T('0')));
2833
2834 if ( *p++ != _T(':') )
2835 {
2836 return NULL;
2837 }
2838
2839 if ( !wxIsdigit(*p) )
2840 {
2841 return NULL;
2842 }
2843
2844 wxDateTime_t min = (wxDateTime_t)(*p++ - _T('0'));
2845
2846 if ( !wxIsdigit(*p) )
2847 {
2848 return NULL;
2849 }
2850
2851 min *= 10;
2852 min = (wxDateTime_t)(min + *p++ - _T('0'));
2853
2854 wxDateTime_t sec = 0;
2855 if ( *p++ == _T(':') )
2856 {
2857 if ( !wxIsdigit(*p) )
2858 {
2859 return NULL;
2860 }
2861
2862 sec = (wxDateTime_t)(*p++ - _T('0'));
2863
2864 if ( !wxIsdigit(*p) )
2865 {
2866 return NULL;
2867 }
2868
2869 sec *= 10;
2870 sec = (wxDateTime_t)(sec + *p++ - _T('0'));
2871 }
2872
2873 if ( *p++ != _T(' ') )
2874 {
2875 return NULL;
2876 }
2877
2878 // and now the interesting part: the timezone
2879 int offset wxDUMMY_INITIALIZE(0);
2880 if ( *p == _T('-') || *p == _T('+') )
2881 {
2882 // the explicit offset given: it has the form of hhmm
2883 bool plus = *p++ == _T('+');
2884
2885 if ( !wxIsdigit(*p) || !wxIsdigit(*(p + 1)) )
2886 {
2887 return NULL;
2888 }
2889
2890 // hours
2891 offset = MIN_PER_HOUR*(10*(*p - _T('0')) + (*(p + 1) - _T('0')));
2892
2893 p += 2;
2894
2895 if ( !wxIsdigit(*p) || !wxIsdigit(*(p + 1)) )
2896 {
2897 return NULL;
2898 }
2899
2900 // minutes
2901 offset += 10*(*p - _T('0')) + (*(p + 1) - _T('0'));
2902
2903 if ( !plus )
2904 {
2905 offset = -offset;
2906 }
2907
2908 p += 2;
2909 }
2910 else
2911 {
2912 // the symbolic timezone given: may be either military timezone or one
2913 // of standard abbreviations
2914 if ( !*(p + 1) )
2915 {
2916 // military: Z = UTC, J unused, A = -1, ..., Y = +12
2917 static const int offsets[26] =
2918 {
2919 //A B C D E F G H I J K L M
2920 -1, -2, -3, -4, -5, -6, -7, -8, -9, 0, -10, -11, -12,
2921 //N O P R Q S T U V W Z Y Z
2922 +1, +2, +3, +4, +5, +6, +7, +8, +9, +10, +11, +12, 0
2923 };
2924
2925 if ( *p < _T('A') || *p > _T('Z') || *p == _T('J') )
2926 {
2927 wxLogDebug(_T("Invalid militaty timezone '%c'"), *p);
2928
2929 return NULL;
2930 }
2931
2932 offset = offsets[*p++ - _T('A')];
2933 }
2934 else
2935 {
2936 // abbreviation
2937 wxString tz = p;
2938 if ( tz == _T("UT") || tz == _T("UTC") || tz == _T("GMT") )
2939 offset = 0;
2940 else if ( tz == _T("AST") )
2941 offset = AST - GMT0;
2942 else if ( tz == _T("ADT") )
2943 offset = ADT - GMT0;
2944 else if ( tz == _T("EST") )
2945 offset = EST - GMT0;
2946 else if ( tz == _T("EDT") )
2947 offset = EDT - GMT0;
2948 else if ( tz == _T("CST") )
2949 offset = CST - GMT0;
2950 else if ( tz == _T("CDT") )
2951 offset = CDT - GMT0;
2952 else if ( tz == _T("MST") )
2953 offset = MST - GMT0;
2954 else if ( tz == _T("MDT") )
2955 offset = MDT - GMT0;
2956 else if ( tz == _T("PST") )
2957 offset = PST - GMT0;
2958 else if ( tz == _T("PDT") )
2959 offset = PDT - GMT0;
2960 else
2961 {
2962 wxLogDebug(_T("Unknown RFC 822 timezone '%s'"), p);
2963
2964 return NULL;
2965 }
2966
2967 p += tz.length();
2968 }
2969
2970 // make it minutes
2971 offset *= MIN_PER_HOUR;
2972 }
2973
2974 // the spec was correct, construct the date from the values we found
2975 Set(day, mon, year, hour, min, sec);
2976 MakeFromTimezone(TimeZone::Make(offset*SEC_PER_MIN));
2977
2978 const size_t endpos = p - date.wx_str();
2979 if ( end )
2980 *end = date.begin() + endpos;
2981
2982 return date.c_str() + endpos;
2983 }
2984
2985 #ifdef __WINDOWS__
2986
2987 // returns the string containing strftime() format used for short dates in the
2988 // current locale or an empty string
2989 static wxString GetLocaleDateFormat()
2990 {
2991 wxString fmtWX;
2992
2993 // there is no setlocale() under Windows CE, so just always query the
2994 // system there
2995 #ifndef __WXWINCE__
2996 if ( strcmp(setlocale(LC_ALL, NULL), "C") != 0 )
2997 #endif
2998 {
2999 // The locale was programatically set to non-C. We assume that this was
3000 // done using wxLocale, in which case thread's current locale is also
3001 // set to correct LCID value and we can use GetLocaleInfo to determine
3002 // the correct formatting string:
3003 #ifdef __WXWINCE__
3004 LCID lcid = LOCALE_USER_DEFAULT;
3005 #else
3006 LCID lcid = GetThreadLocale();
3007 #endif
3008 // according to MSDN 80 chars is max allowed for short date format
3009 wxChar fmt[81];
3010 if ( ::GetLocaleInfo(lcid, LOCALE_SSHORTDATE, fmt, WXSIZEOF(fmt)) )
3011 {
3012 wxChar chLast = _T('\0');
3013 size_t lastCount = 0;
3014 for ( const wxChar *p = fmt; /* NUL handled inside */; p++ )
3015 {
3016 if ( *p == chLast )
3017 {
3018 lastCount++;
3019 continue;
3020 }
3021
3022 switch ( *p )
3023 {
3024 // these characters come in groups, start counting them
3025 case _T('d'):
3026 case _T('M'):
3027 case _T('y'):
3028 case _T('g'):
3029 chLast = *p;
3030 lastCount = 1;
3031 break;
3032
3033 default:
3034 // first deal with any special characters we have had
3035 if ( lastCount )
3036 {
3037 switch ( chLast )
3038 {
3039 case _T('d'):
3040 switch ( lastCount )
3041 {
3042 case 1: // d
3043 case 2: // dd
3044 // these two are the same as we
3045 // don't distinguish between 1 and
3046 // 2 digits for days
3047 fmtWX += _T("%d");
3048 break;
3049
3050 case 3: // ddd
3051 fmtWX += _T("%a");
3052 break;
3053
3054 case 4: // dddd
3055 fmtWX += _T("%A");
3056 break;
3057
3058 default:
3059 wxFAIL_MSG( _T("too many 'd's") );
3060 }
3061 break;
3062
3063 case _T('M'):
3064 switch ( lastCount )
3065 {
3066 case 1: // M
3067 case 2: // MM
3068 // as for 'd' and 'dd' above
3069 fmtWX += _T("%m");
3070 break;
3071
3072 case 3:
3073 fmtWX += _T("%b");
3074 break;
3075
3076 case 4:
3077 fmtWX += _T("%B");
3078 break;
3079
3080 default:
3081 wxFAIL_MSG( _T("too many 'M's") );
3082 }
3083 break;
3084
3085 case _T('y'):
3086 switch ( lastCount )
3087 {
3088 case 1: // y
3089 case 2: // yy
3090 fmtWX += _T("%y");
3091 break;
3092
3093 case 4: // yyyy
3094 fmtWX += _T("%Y");
3095 break;
3096
3097 default:
3098 wxFAIL_MSG( _T("wrong number of 'y's") );
3099 }
3100 break;
3101
3102 case _T('g'):
3103 // strftime() doesn't have era string,
3104 // ignore this format
3105 wxASSERT_MSG( lastCount <= 2,
3106 _T("too many 'g's") );
3107 break;
3108
3109 default:
3110 wxFAIL_MSG( _T("unreachable") );
3111 }
3112
3113 chLast = _T('\0');
3114 lastCount = 0;
3115 }
3116
3117 // not a special character so must be just a separator,
3118 // treat as is
3119 if ( *p != _T('\0') )
3120 {
3121 if ( *p == _T('%') )
3122 {
3123 // this one needs to be escaped
3124 fmtWX += _T('%');
3125 }
3126
3127 fmtWX += *p;
3128 }
3129 }
3130
3131 if ( *p == _T('\0') )
3132 break;
3133 }
3134 }
3135 //else: GetLocaleInfo() failed, leave fmtDate value unchanged and
3136 // try our luck with the default formats
3137 }
3138 //else: default C locale, default formats should work
3139
3140 return fmtWX;
3141 }
3142
3143 #endif // __WINDOWS__
3144
3145 const char *
3146 wxDateTime::ParseFormat(const wxString& date,
3147 const wxString& format,
3148 const wxDateTime& dateDef,
3149 wxString::const_iterator *end)
3150 {
3151 wxCHECK_MSG( !format.empty(), NULL, "format can't be empty" );
3152
3153 wxString str;
3154 unsigned long num;
3155
3156 // what fields have we found?
3157 bool haveWDay = false,
3158 haveYDay = false,
3159 haveDay = false,
3160 haveMon = false,
3161 haveYear = false,
3162 haveHour = false,
3163 haveMin = false,
3164 haveSec = false;
3165
3166 bool hourIsIn12hFormat = false, // or in 24h one?
3167 isPM = false; // AM by default
3168
3169 // and the value of the items we have (init them to get rid of warnings)
3170 wxDateTime_t sec = 0,
3171 min = 0,
3172 hour = 0;
3173 WeekDay wday = Inv_WeekDay;
3174 wxDateTime_t yday = 0,
3175 mday = 0;
3176 wxDateTime::Month mon = Inv_Month;
3177 int year = 0;
3178
3179 const wxStringCharType *input = date.wx_str();
3180 for ( wxString::const_iterator fmt = format.begin(); fmt != format.end(); ++fmt )
3181 {
3182 if ( *fmt != _T('%') )
3183 {
3184 if ( wxIsspace(*fmt) )
3185 {
3186 // a white space in the format string matches 0 or more white
3187 // spaces in the input
3188 while ( wxIsspace(*input) )
3189 {
3190 input++;
3191 }
3192 }
3193 else // !space
3194 {
3195 // any other character (not whitespace, not '%') must be
3196 // matched by itself in the input
3197 if ( *input++ != *fmt )
3198 {
3199 // no match
3200 return NULL;
3201 }
3202 }
3203
3204 // done with this format char
3205 continue;
3206 }
3207
3208 // start of a format specification
3209
3210 // parse the optional width
3211 size_t width = 0;
3212 while ( wxIsdigit(*++fmt) )
3213 {
3214 width *= 10;
3215 width += *fmt - _T('0');
3216 }
3217
3218 // the default widths for the various fields
3219 if ( !width )
3220 {
3221 switch ( (*fmt).GetValue() )
3222 {
3223 case _T('Y'): // year has 4 digits
3224 width = 4;
3225 break;
3226
3227 case _T('j'): // day of year has 3 digits
3228 case _T('l'): // milliseconds have 3 digits
3229 width = 3;
3230 break;
3231
3232 case _T('w'): // week day as number has only one
3233 width = 1;
3234 break;
3235
3236 default:
3237 // default for all other fields
3238 width = 2;
3239 }
3240 }
3241
3242 // then the format itself
3243 switch ( (*fmt).GetValue() )
3244 {
3245 case _T('a'): // a weekday name
3246 case _T('A'):
3247 {
3248 int flag = *fmt == _T('a') ? Name_Abbr : Name_Full;
3249 wday = GetWeekDayFromName(GetAlphaToken(input), flag);
3250 if ( wday == Inv_WeekDay )
3251 {
3252 // no match
3253 return NULL;
3254 }
3255 }
3256 haveWDay = true;
3257 break;
3258
3259 case _T('b'): // a month name
3260 case _T('B'):
3261 {
3262 int flag = *fmt == _T('b') ? Name_Abbr : Name_Full;
3263 mon = GetMonthFromName(GetAlphaToken(input), flag);
3264 if ( mon == Inv_Month )
3265 {
3266 // no match
3267 return NULL;
3268 }
3269 }
3270 haveMon = true;
3271 break;
3272
3273 case _T('c'): // locale default date and time representation
3274 {
3275 wxDateTime dt;
3276
3277 const wxString inc(input);
3278
3279 // try the format which corresponds to ctime() output first
3280 wxString::const_iterator endc;
3281 if ( !dt.ParseFormat(inc, wxS("%a %b %d %H:%M:%S %Y"), &endc) &&
3282 !dt.ParseFormat(inc, wxS("%x %X"), &endc) &&
3283 !dt.ParseFormat(inc, wxS("%X %x"), &endc) )
3284 {
3285 // we've tried everything and still no match
3286 return NULL;
3287 }
3288
3289 Tm tm = dt.GetTm();
3290
3291 haveDay = haveMon = haveYear =
3292 haveHour = haveMin = haveSec = true;
3293
3294 hour = tm.hour;
3295 min = tm.min;
3296 sec = tm.sec;
3297
3298 year = tm.year;
3299 mon = tm.mon;
3300 mday = tm.mday;
3301
3302 input += endc - inc.begin();
3303 }
3304 break;
3305
3306 case _T('d'): // day of a month (01-31)
3307 if ( !GetNumericToken(width, input, &num) ||
3308 (num > 31) || (num < 1) )
3309 {
3310 // no match
3311 return NULL;
3312 }
3313
3314 // we can't check whether the day range is correct yet, will
3315 // do it later - assume ok for now
3316 haveDay = true;
3317 mday = (wxDateTime_t)num;
3318 break;
3319
3320 case _T('H'): // hour in 24h format (00-23)
3321 if ( !GetNumericToken(width, input, &num) || (num > 23) )
3322 {
3323 // no match
3324 return NULL;
3325 }
3326
3327 haveHour = true;
3328 hour = (wxDateTime_t)num;
3329 break;
3330
3331 case _T('I'): // hour in 12h format (01-12)
3332 if ( !GetNumericToken(width, input, &num) || !num || (num > 12) )
3333 {
3334 // no match
3335 return NULL;
3336 }
3337
3338 haveHour = true;
3339 hourIsIn12hFormat = true;
3340 hour = (wxDateTime_t)(num % 12); // 12 should be 0
3341 break;
3342
3343 case _T('j'): // day of the year
3344 if ( !GetNumericToken(width, input, &num) || !num || (num > 366) )
3345 {
3346 // no match
3347 return NULL;
3348 }
3349
3350 haveYDay = true;
3351 yday = (wxDateTime_t)num;
3352 break;
3353
3354 case _T('m'): // month as a number (01-12)
3355 if ( !GetNumericToken(width, input, &num) || !num || (num > 12) )
3356 {
3357 // no match
3358 return NULL;
3359 }
3360
3361 haveMon = true;
3362 mon = (Month)(num - 1);
3363 break;
3364
3365 case _T('M'): // minute as a decimal number (00-59)
3366 if ( !GetNumericToken(width, input, &num) || (num > 59) )
3367 {
3368 // no match
3369 return NULL;
3370 }
3371
3372 haveMin = true;
3373 min = (wxDateTime_t)num;
3374 break;
3375
3376 case _T('p'): // AM or PM string
3377 {
3378 wxString am, pm, token = GetAlphaToken(input);
3379
3380 GetAmPmStrings(&am, &pm);
3381 if (am.empty() && pm.empty())
3382 return NULL; // no am/pm strings defined
3383 if ( token.CmpNoCase(pm) == 0 )
3384 {
3385 isPM = true;
3386 }
3387 else if ( token.CmpNoCase(am) != 0 )
3388 {
3389 // no match
3390 return NULL;
3391 }
3392 }
3393 break;
3394
3395 case _T('r'): // time as %I:%M:%S %p
3396 {
3397 wxDateTime dt;
3398 input = dt.ParseFormat(input, wxS("%I:%M:%S %p"));
3399 if ( !input )
3400 {
3401 // no match
3402 return NULL;
3403 }
3404
3405 haveHour = haveMin = haveSec = true;
3406
3407 Tm tm = dt.GetTm();
3408 hour = tm.hour;
3409 min = tm.min;
3410 sec = tm.sec;
3411 }
3412 break;
3413
3414 case _T('R'): // time as %H:%M
3415 {
3416 wxDateTime dt;
3417 input = dt.ParseFormat(input, wxS("%H:%M"));
3418 if ( !input )
3419 {
3420 // no match
3421 return NULL;
3422 }
3423
3424 haveHour = haveMin = true;
3425
3426 Tm tm = dt.GetTm();
3427 hour = tm.hour;
3428 min = tm.min;
3429 }
3430 break;
3431
3432 case _T('S'): // second as a decimal number (00-61)
3433 if ( !GetNumericToken(width, input, &num) || (num > 61) )
3434 {
3435 // no match
3436 return NULL;
3437 }
3438
3439 haveSec = true;
3440 sec = (wxDateTime_t)num;
3441 break;
3442
3443 case _T('T'): // time as %H:%M:%S
3444 {
3445 wxDateTime dt;
3446 input = dt.ParseFormat(input, _T("%H:%M:%S"));
3447 if ( !input )
3448 {
3449 // no match
3450 return NULL;
3451 }
3452
3453 haveHour = haveMin = haveSec = true;
3454
3455 Tm tm = dt.GetTm();
3456 hour = tm.hour;
3457 min = tm.min;
3458 sec = tm.sec;
3459 }
3460 break;
3461
3462 case _T('w'): // weekday as a number (0-6), Sunday = 0
3463 if ( !GetNumericToken(width, input, &num) || (wday > 6) )
3464 {
3465 // no match
3466 return NULL;
3467 }
3468
3469 haveWDay = true;
3470 wday = (WeekDay)num;
3471 break;
3472
3473 case _T('x'): // locale default date representation
3474 #ifdef HAVE_STRPTIME
3475 // try using strptime() -- it may fail even if the input is
3476 // correct but the date is out of range, so we will fall back
3477 // to our generic code anyhow
3478 {
3479 struct tm tm;
3480
3481 const wxStringCharType *
3482 result = CallStrptime(input, "%x", &tm);
3483 if ( result )
3484 {
3485 input = result;
3486
3487 haveDay = haveMon = haveYear = true;
3488
3489 year = 1900 + tm.tm_year;
3490 mon = (Month)tm.tm_mon;
3491 mday = tm.tm_mday;
3492
3493 break;
3494 }
3495 }
3496 #endif // HAVE_STRPTIME
3497
3498 {
3499 wxDateTime dt;
3500 wxString fmtDate,
3501 fmtDateAlt;
3502
3503 #ifdef __WINDOWS__
3504 // The above doesn't work for all locales, try to query
3505 // Windows for the right way of formatting the date:
3506 fmtDate = GetLocaleDateFormat();
3507 if ( fmtDate.empty() )
3508 #endif // __WINDOWS__
3509 {
3510 if ( IsWestEuropeanCountry(GetCountry()) ||
3511 GetCountry() == Russia )
3512 {
3513 fmtDate = _T("%d/%m/%y");
3514 fmtDateAlt = _T("%m/%d/%y");
3515 }
3516 else // assume USA
3517 {
3518 fmtDate = _T("%m/%d/%y");
3519 fmtDateAlt = _T("%d/%m/%y");
3520 }
3521 }
3522
3523 const wxString indate(input);
3524 wxString::const_iterator endDate;
3525 if ( !dt.ParseFormat(indate, fmtDate, &endDate) )
3526 {
3527 // try another one if we have it
3528 if ( fmtDateAlt.empty() ||
3529 !dt.ParseFormat(indate, fmtDateAlt, &endDate) )
3530 {
3531 return NULL;
3532 }
3533 }
3534
3535 Tm tm = dt.GetTm();
3536
3537 haveDay =
3538 haveMon =
3539 haveYear = true;
3540
3541 year = tm.year;
3542 mon = tm.mon;
3543 mday = tm.mday;
3544
3545 input += endDate - indate.begin();
3546 }
3547
3548 break;
3549
3550 case _T('X'): // locale default time representation
3551 #ifdef HAVE_STRPTIME
3552 {
3553 // use strptime() to do it for us (FIXME !Unicode friendly)
3554 struct tm tm;
3555 input = CallStrptime(input, "%X", &tm);
3556 if ( !input )
3557 {
3558 return NULL;
3559 }
3560
3561 haveHour = haveMin = haveSec = true;
3562
3563 hour = tm.tm_hour;
3564 min = tm.tm_min;
3565 sec = tm.tm_sec;
3566 }
3567 #else // !HAVE_STRPTIME
3568 // TODO under Win32 we can query the LOCALE_ITIME system
3569 // setting which says whether the default time format is
3570 // 24 or 12 hour
3571 {
3572 // try to parse what follows as "%H:%M:%S" and, if this
3573 // fails, as "%I:%M:%S %p" - this should catch the most
3574 // common cases
3575 wxDateTime dt;
3576
3577 const wxChar *result = dt.ParseFormat(input, _T("%T"));
3578 if ( !result )
3579 {
3580 result = dt.ParseFormat(input, _T("%r"));
3581 }
3582
3583 if ( !result )
3584 {
3585 // no match
3586 return NULL;
3587 }
3588
3589 haveHour = haveMin = haveSec = true;
3590
3591 Tm tm = dt.GetTm();
3592 hour = tm.hour;
3593 min = tm.min;
3594 sec = tm.sec;
3595
3596 input = result;
3597 }
3598 #endif // HAVE_STRPTIME/!HAVE_STRPTIME
3599 break;
3600
3601 case _T('y'): // year without century (00-99)
3602 if ( !GetNumericToken(width, input, &num) || (num > 99) )
3603 {
3604 // no match
3605 return NULL;
3606 }
3607
3608 haveYear = true;
3609
3610 // TODO should have an option for roll over date instead of
3611 // hard coding it here
3612 year = (num > 30 ? 1900 : 2000) + (wxDateTime_t)num;
3613 break;
3614
3615 case _T('Y'): // year with century
3616 if ( !GetNumericToken(width, input, &num) )
3617 {
3618 // no match
3619 return NULL;
3620 }
3621
3622 haveYear = true;
3623 year = (wxDateTime_t)num;
3624 break;
3625
3626 case _T('Z'): // timezone name
3627 wxFAIL_MSG(_T("TODO"));
3628 break;
3629
3630 case _T('%'): // a percent sign
3631 if ( *input++ != _T('%') )
3632 {
3633 // no match
3634 return NULL;
3635 }
3636 break;
3637
3638 case 0: // the end of string
3639 wxFAIL_MSG(_T("unexpected format end"));
3640
3641 // fall through
3642
3643 default: // not a known format spec
3644 return NULL;
3645 }
3646 }
3647
3648 // format matched, try to construct a date from what we have now
3649 Tm tmDef;
3650 if ( dateDef.IsValid() )
3651 {
3652 // take this date as default
3653 tmDef = dateDef.GetTm();
3654 }
3655 else if ( IsValid() )
3656 {
3657 // if this date is valid, don't change it
3658 tmDef = GetTm();
3659 }
3660 else
3661 {
3662 // no default and this date is invalid - fall back to Today()
3663 tmDef = Today().GetTm();
3664 }
3665
3666 Tm tm = tmDef;
3667
3668 // set the date
3669 if ( haveYear )
3670 {
3671 tm.year = year;
3672 }
3673
3674 // TODO we don't check here that the values are consistent, if both year
3675 // day and month/day were found, we just ignore the year day and we
3676 // also always ignore the week day
3677 if ( haveMon && haveDay )
3678 {
3679 if ( mday > GetNumOfDaysInMonth(tm.year, mon) )
3680 {
3681 wxLogDebug(_T("bad month day in wxDateTime::ParseFormat"));
3682
3683 return NULL;
3684 }
3685
3686 tm.mon = mon;
3687 tm.mday = mday;
3688 }
3689 else if ( haveYDay )
3690 {
3691 if ( yday > GetNumberOfDays(tm.year) )
3692 {
3693 wxLogDebug(_T("bad year day in wxDateTime::ParseFormat"));
3694
3695 return NULL;
3696 }
3697
3698 Tm tm2 = wxDateTime(1, Jan, tm.year).SetToYearDay(yday).GetTm();
3699
3700 tm.mon = tm2.mon;
3701 tm.mday = tm2.mday;
3702 }
3703
3704 // deal with AM/PM
3705 if ( haveHour && hourIsIn12hFormat && isPM )
3706 {
3707 // translate to 24hour format
3708 hour += 12;
3709 }
3710 //else: either already in 24h format or no translation needed
3711
3712 // set the time
3713 if ( haveHour )
3714 {
3715 tm.hour = hour;
3716 }
3717
3718 if ( haveMin )
3719 {
3720 tm.min = min;
3721 }
3722
3723 if ( haveSec )
3724 {
3725 tm.sec = sec;
3726 }
3727
3728 Set(tm);
3729
3730 // finally check that the week day is consistent -- if we had it
3731 if ( haveWDay && GetWeekDay() != wday )
3732 {
3733 wxLogDebug(_T("inconsistsnet week day in wxDateTime::ParseFormat()"));
3734
3735 return NULL;
3736 }
3737
3738 const size_t endpos = input - date.wx_str();
3739 if ( end )
3740 *end = date.begin() + endpos;
3741
3742 return date.c_str() + endpos;
3743 }
3744
3745 const char *
3746 wxDateTime::ParseDateTime(const wxString& date, wxString::const_iterator *end)
3747 {
3748 // Set to current day and hour, so strings like '14:00' becomes today at
3749 // 14, not some other random date
3750 wxDateTime dtDate = wxDateTime::Today();
3751 wxDateTime dtTime = wxDateTime::Today();
3752
3753 wxString::const_iterator
3754 endTime,
3755 endDate,
3756 endBoth;
3757
3758 // If we got a date in the beginning, see if there is a time specified
3759 // after the date
3760 if ( dtDate.ParseDate(date, &endDate) )
3761 {
3762 // Skip spaces, as the ParseTime() function fails on spaces
3763 while ( endDate != date.end() && wxIsspace(*endDate) )
3764 ++endDate;
3765
3766 const wxString timestr(endDate, date.end());
3767 if ( !dtTime.ParseTime(timestr, &endTime) )
3768 return NULL;
3769
3770 endBoth = endDate + (endTime - timestr.begin());
3771 }
3772 else // no date in the beginning
3773 {
3774 // check if we have a time followed by a date
3775 if ( !dtTime.ParseTime(date, &endTime) )
3776 return NULL;
3777
3778 while ( endTime != date.end() && wxIsspace(*endTime) )
3779 ++endTime;
3780
3781 const wxString datestr(endTime, date.end());
3782 if ( !dtDate.ParseDate(datestr, &endDate) )
3783 return NULL;
3784
3785 endBoth = endTime + (endDate - datestr.begin());
3786 }
3787
3788 Set(dtDate.GetDay(), dtDate.GetMonth(), dtDate.GetYear(),
3789 dtTime.GetHour(), dtTime.GetMinute(), dtTime.GetSecond(),
3790 dtTime.GetMillisecond());
3791
3792 // Return endpoint of scan
3793 if ( end )
3794 *end = endBoth;
3795
3796 return date.c_str() + (endBoth - date.begin());
3797 }
3798
3799 const char *
3800 wxDateTime::ParseDate(const wxString& date, wxString::const_iterator *end)
3801 {
3802 // this is a simplified version of ParseDateTime() which understands only
3803 // "today" (for wxDate compatibility) and digits only otherwise (and not
3804 // all esoteric constructions ParseDateTime() knows about)
3805
3806 const wxStringCharType *p = date.wx_str();
3807 while ( wxIsspace(*p) )
3808 p++;
3809
3810 // some special cases
3811 static struct
3812 {
3813 const char *str;
3814 int dayDiffFromToday;
3815 } literalDates[] =
3816 {
3817 { wxTRANSLATE("today"), 0 },
3818 { wxTRANSLATE("yesterday"), -1 },
3819 { wxTRANSLATE("tomorrow"), 1 },
3820 };
3821
3822 for ( size_t n = 0; n < WXSIZEOF(literalDates); n++ )
3823 {
3824 const wxString dateStr = wxGetTranslation(literalDates[n].str);
3825 size_t len = dateStr.length();
3826 if ( wxStrlen(p) >= len )
3827 {
3828 wxString str(p, len);
3829 if ( str.CmpNoCase(dateStr) == 0 )
3830 {
3831 // nothing can follow this, so stop here
3832 p += len;
3833
3834 int dayDiffFromToday = literalDates[n].dayDiffFromToday;
3835 *this = Today();
3836 if ( dayDiffFromToday )
3837 {
3838 *this += wxDateSpan::Days(dayDiffFromToday);
3839 }
3840
3841 const size_t endpos = p - date.wx_str();
3842
3843 if ( end )
3844 *end = date.begin() + endpos;
3845 return date.c_str() + endpos;
3846 }
3847 }
3848 }
3849
3850 // We try to guess what we have here: for each new (numeric) token, we
3851 // determine if it can be a month, day or a year. Of course, there is an
3852 // ambiguity as some numbers may be days as well as months, so we also
3853 // have the ability to back track.
3854
3855 // what do we have?
3856 bool haveDay = false, // the months day?
3857 haveWDay = false, // the day of week?
3858 haveMon = false, // the month?
3859 haveYear = false; // the year?
3860
3861 // and the value of the items we have (init them to get rid of warnings)
3862 WeekDay wday = Inv_WeekDay;
3863 wxDateTime_t day = 0;
3864 wxDateTime::Month mon = Inv_Month;
3865 int year = 0;
3866
3867 // tokenize the string
3868 size_t nPosCur = 0;
3869 static const wxStringCharType *dateDelimiters = wxS(".,/-\t\r\n ");
3870 wxStringTokenizer tok(p, dateDelimiters);
3871 while ( tok.HasMoreTokens() )
3872 {
3873 wxString token = tok.GetNextToken();
3874 if ( !token )
3875 continue;
3876
3877 // is it a number?
3878 unsigned long val;
3879 if ( token.ToULong(&val) )
3880 {
3881 // guess what this number is
3882
3883 bool isDay = false,
3884 isMonth = false,
3885 isYear = false;
3886
3887 if ( !haveMon && val > 0 && val <= 12 )
3888 {
3889 // assume it is month
3890 isMonth = true;
3891 }
3892 else // not the month
3893 {
3894 if ( haveDay )
3895 {
3896 // this can only be the year
3897 isYear = true;
3898 }
3899 else // may be either day or year
3900 {
3901 // use a leap year if we don't have the year yet to allow
3902 // dates like 2/29/1976 which would be rejected otherwise
3903 wxDateTime_t max_days = (wxDateTime_t)(
3904 haveMon
3905 ? GetNumOfDaysInMonth(haveYear ? year : 1976, mon)
3906 : 31
3907 );
3908
3909 // can it be day?
3910 if ( (val == 0) || (val > (unsigned long)max_days) )
3911 {
3912 // no
3913 isYear = true;
3914 }
3915 else // yes, suppose it's the day
3916 {
3917 isDay = true;
3918 }
3919 }
3920 }
3921
3922 if ( isYear )
3923 {
3924 if ( haveYear )
3925 break;
3926
3927 haveYear = true;
3928
3929 year = (wxDateTime_t)val;
3930 }
3931 else if ( isDay )
3932 {
3933 if ( haveDay )
3934 break;
3935
3936 haveDay = true;
3937
3938 day = (wxDateTime_t)val;
3939 }
3940 else if ( isMonth )
3941 {
3942 haveMon = true;
3943
3944 mon = (Month)(val - 1);
3945 }
3946 }
3947 else // not a number
3948 {
3949 // be careful not to overwrite the current mon value
3950 Month mon2 = GetMonthFromName(token, Name_Full | Name_Abbr);
3951 if ( mon2 != Inv_Month )
3952 {
3953 // it's a month
3954 if ( haveMon )
3955 {
3956 // but we already have a month - maybe we guessed wrong?
3957 if ( !haveDay )
3958 {
3959 // no need to check in month range as always < 12, but
3960 // the days are counted from 1 unlike the months
3961 day = (wxDateTime_t)(mon + 1);
3962 haveDay = true;
3963 }
3964 else
3965 {
3966 // could possible be the year (doesn't the year come
3967 // before the month in the japanese format?) (FIXME)
3968 break;
3969 }
3970 }
3971
3972 mon = mon2;
3973
3974 haveMon = true;
3975 }
3976 else // not a valid month name
3977 {
3978 WeekDay wday2 = GetWeekDayFromName(token, Name_Full | Name_Abbr);
3979 if ( wday2 != Inv_WeekDay )
3980 {
3981 // a week day
3982 if ( haveWDay )
3983 {
3984 break;
3985 }
3986
3987 wday = wday2;
3988
3989 haveWDay = true;
3990 }
3991 else // not a valid weekday name
3992 {
3993 // try the ordinals
3994 static const char *ordinals[] =
3995 {
3996 wxTRANSLATE("first"),
3997 wxTRANSLATE("second"),
3998 wxTRANSLATE("third"),
3999 wxTRANSLATE("fourth"),
4000 wxTRANSLATE("fifth"),
4001 wxTRANSLATE("sixth"),
4002 wxTRANSLATE("seventh"),
4003 wxTRANSLATE("eighth"),
4004 wxTRANSLATE("ninth"),
4005 wxTRANSLATE("tenth"),
4006 wxTRANSLATE("eleventh"),
4007 wxTRANSLATE("twelfth"),
4008 wxTRANSLATE("thirteenth"),
4009 wxTRANSLATE("fourteenth"),
4010 wxTRANSLATE("fifteenth"),
4011 wxTRANSLATE("sixteenth"),
4012 wxTRANSLATE("seventeenth"),
4013 wxTRANSLATE("eighteenth"),
4014 wxTRANSLATE("nineteenth"),
4015 wxTRANSLATE("twentieth"),
4016 // that's enough - otherwise we'd have problems with
4017 // composite (or not) ordinals
4018 };
4019
4020 size_t n;
4021 for ( n = 0; n < WXSIZEOF(ordinals); n++ )
4022 {
4023 if ( token.CmpNoCase(ordinals[n]) == 0 )
4024 {
4025 break;
4026 }
4027 }
4028
4029 if ( n == WXSIZEOF(ordinals) )
4030 {
4031 // stop here - something unknown
4032 break;
4033 }
4034
4035 // it's a day
4036 if ( haveDay )
4037 {
4038 // don't try anything here (as in case of numeric day
4039 // above) - the symbolic day spec should always
4040 // precede the month/year
4041 break;
4042 }
4043
4044 haveDay = true;
4045
4046 day = (wxDateTime_t)(n + 1);
4047 }
4048 }
4049 }
4050
4051 nPosCur = tok.GetPosition();
4052 }
4053
4054 // either no more tokens or the scan was stopped by something we couldn't
4055 // parse - in any case, see if we can construct a date from what we have
4056 if ( !haveDay && !haveWDay )
4057 {
4058 wxLogDebug(_T("ParseDate: no day, no weekday hence no date."));
4059
4060 return NULL;
4061 }
4062
4063 if ( haveWDay && (haveMon || haveYear || haveDay) &&
4064 !(haveDay && haveMon && haveYear) )
4065 {
4066 // without adjectives (which we don't support here) the week day only
4067 // makes sense completely separately or with the full date
4068 // specification (what would "Wed 1999" mean?)
4069 return NULL;
4070 }
4071
4072 if ( !haveWDay && haveYear && !(haveDay && haveMon) )
4073 {
4074 // may be we have month and day instead of day and year?
4075 if ( haveDay && !haveMon )
4076 {
4077 if ( day <= 12 )
4078 {
4079 // exchange day and month
4080 mon = (wxDateTime::Month)(day - 1);
4081
4082 // we're in the current year then
4083 if ( (year > 0) && (year <= (int)GetNumOfDaysInMonth(Inv_Year, mon)) )
4084 {
4085 day = (wxDateTime_t)year;
4086
4087 haveMon = true;
4088 haveYear = false;
4089 }
4090 //else: no, can't exchange, leave haveMon == false
4091 }
4092 }
4093
4094 if ( !haveMon )
4095 {
4096 // if we give the year, month and day must be given too
4097 wxLogDebug(_T("ParseDate: day and month should be specified if year is."));
4098
4099 return NULL;
4100 }
4101 }
4102
4103 if ( !haveMon )
4104 {
4105 mon = GetCurrentMonth();
4106 }
4107
4108 if ( !haveYear )
4109 {
4110 year = GetCurrentYear();
4111 }
4112
4113 if ( haveDay )
4114 {
4115 // normally we check the day above but the check is optimistic in case
4116 // we find the day before its month/year so we have to redo it now
4117 if ( day > GetNumOfDaysInMonth(year, mon) )
4118 return NULL;
4119
4120 Set(day, mon, year);
4121
4122 if ( haveWDay )
4123 {
4124 // check that it is really the same
4125 if ( GetWeekDay() != wday )
4126 {
4127 // inconsistency detected
4128 wxLogDebug(_T("ParseDate: inconsistent day/weekday."));
4129
4130 return NULL;
4131 }
4132 }
4133 }
4134 else // haveWDay
4135 {
4136 *this = Today();
4137
4138 SetToWeekDayInSameWeek(wday);
4139 }
4140
4141 // return the pointer to the first unparsed char
4142 p += nPosCur;
4143 if ( nPosCur && wxStrchr(dateDelimiters, *(p - 1)) )
4144 {
4145 // if we couldn't parse the token after the delimiter, put back the
4146 // delimiter as well
4147 p--;
4148 }
4149
4150 const size_t endpos = p - date.wx_str();
4151 if ( end )
4152 *end = date.begin() + endpos;
4153
4154 return date.c_str() + endpos;
4155 }
4156
4157 const char *
4158 wxDateTime::ParseTime(const wxString& time, wxString::const_iterator *end)
4159 {
4160 // first try some extra things
4161 static const struct
4162 {
4163 const char *name;
4164 wxDateTime_t hour;
4165 } stdTimes[] =
4166 {
4167 { wxTRANSLATE("noon"), 12 },
4168 { wxTRANSLATE("midnight"), 00 },
4169 // anything else?
4170 };
4171
4172 for ( size_t n = 0; n < WXSIZEOF(stdTimes); n++ )
4173 {
4174 wxString timeString = wxGetTranslation(stdTimes[n].name);
4175 size_t len = timeString.length();
4176 if ( timeString.CmpNoCase(wxString(time, len)) == 0 )
4177 {
4178 // casts required by DigitalMars
4179 Set(stdTimes[n].hour, wxDateTime_t(0), wxDateTime_t(0));
4180
4181 if ( end )
4182 *end = time.begin() + len;
4183
4184 return time.c_str() + len;
4185 }
4186 }
4187
4188 // try all time formats we may think about in the order from longest to
4189 // shortest
4190 static const char *timeFormats[] =
4191 {
4192 "%I:%M:%S %p", // 12hour with AM/PM
4193 "%H:%M:%S", // could be the same or 24 hour one so try it too
4194 "%I:%M %p", // 12hour with AM/PM but without seconds
4195 "%H:%M:%S", // and a possibly 24 hour version without seconds
4196 "%X", // possibly something from above or maybe something
4197 // completely different -- try it last
4198
4199 // TODO: parse timezones
4200 };
4201
4202 for ( size_t nFmt = 0; nFmt < WXSIZEOF(timeFormats); nFmt++ )
4203 {
4204 const char *result = ParseFormat(time, timeFormats[nFmt], end);
4205 if ( result )
4206 return result;
4207 }
4208
4209 return NULL;
4210 }
4211
4212 // ----------------------------------------------------------------------------
4213 // Workdays and holidays support
4214 // ----------------------------------------------------------------------------
4215
4216 bool wxDateTime::IsWorkDay(Country WXUNUSED(country)) const
4217 {
4218 return !wxDateTimeHolidayAuthority::IsHoliday(*this);
4219 }
4220
4221 // ============================================================================
4222 // wxDateSpan
4223 // ============================================================================
4224
4225 wxDateSpan WXDLLIMPEXP_BASE operator*(int n, const wxDateSpan& ds)
4226 {
4227 wxDateSpan ds1(ds);
4228 return ds1.Multiply(n);
4229 }
4230
4231 // ============================================================================
4232 // wxTimeSpan
4233 // ============================================================================
4234
4235 wxTimeSpan WXDLLIMPEXP_BASE operator*(int n, const wxTimeSpan& ts)
4236 {
4237 return wxTimeSpan(ts).Multiply(n);
4238 }
4239
4240 // this enum is only used in wxTimeSpan::Format() below but we can't declare
4241 // it locally to the method as it provokes an internal compiler error in egcs
4242 // 2.91.60 when building with -O2
4243 enum TimeSpanPart
4244 {
4245 Part_Week,
4246 Part_Day,
4247 Part_Hour,
4248 Part_Min,
4249 Part_Sec,
4250 Part_MSec
4251 };
4252
4253 // not all strftime(3) format specifiers make sense here because, for example,
4254 // a time span doesn't have a year nor a timezone
4255 //
4256 // Here are the ones which are supported (all of them are supported by strftime
4257 // as well):
4258 // %H hour in 24 hour format
4259 // %M minute (00 - 59)
4260 // %S second (00 - 59)
4261 // %% percent sign
4262 //
4263 // Also, for MFC CTimeSpan compatibility, we support
4264 // %D number of days
4265 //
4266 // And, to be better than MFC :-), we also have
4267 // %E number of wEeks
4268 // %l milliseconds (000 - 999)
4269 wxString wxTimeSpan::Format(const wxString& format) const
4270 {
4271 wxCHECK_MSG( !format.empty(), wxEmptyString,
4272 _T("NULL format in wxTimeSpan::Format") );
4273
4274 wxString str;
4275 str.Alloc(format.length());
4276
4277 // Suppose we have wxTimeSpan ts(1 /* hour */, 2 /* min */, 3 /* sec */)
4278 //
4279 // Then, of course, ts.Format("%H:%M:%S") must return "01:02:03", but the
4280 // question is what should ts.Format("%S") do? The code here returns "3273"
4281 // in this case (i.e. the total number of seconds, not just seconds % 60)
4282 // because, for me, this call means "give me entire time interval in
4283 // seconds" and not "give me the seconds part of the time interval"
4284 //
4285 // If we agree that it should behave like this, it is clear that the
4286 // interpretation of each format specifier depends on the presence of the
4287 // other format specs in the string: if there was "%H" before "%M", we
4288 // should use GetMinutes() % 60, otherwise just GetMinutes() &c
4289
4290 // we remember the most important unit found so far
4291 TimeSpanPart partBiggest = Part_MSec;
4292
4293 for ( wxString::const_iterator pch = format.begin(); pch != format.end(); ++pch )
4294 {
4295 wxChar ch = *pch;
4296
4297 if ( ch == _T('%') )
4298 {
4299 // the start of the format specification of the printf() below
4300 wxString fmtPrefix(_T('%'));
4301
4302 // the number
4303 long n;
4304
4305 // the number of digits for the format string, 0 if unused
4306 unsigned digits = 0;
4307
4308 ch = *++pch; // get the format spec char
4309 switch ( ch )
4310 {
4311 default:
4312 wxFAIL_MSG( _T("invalid format character") );
4313 // fall through
4314
4315 case _T('%'):
4316 str += ch;
4317
4318 // skip the part below switch
4319 continue;
4320
4321 case _T('D'):
4322 n = GetDays();
4323 if ( partBiggest < Part_Day )
4324 {
4325 n %= DAYS_PER_WEEK;
4326 }
4327 else
4328 {
4329 partBiggest = Part_Day;
4330 }
4331 break;
4332
4333 case _T('E'):
4334 partBiggest = Part_Week;
4335 n = GetWeeks();
4336 break;
4337
4338 case _T('H'):
4339 n = GetHours();
4340 if ( partBiggest < Part_Hour )
4341 {
4342 if ( n < 0 )
4343 {
4344 // the sign has already been taken into account
4345 // when outputting the biggest part
4346 n = -n;
4347 }
4348
4349 n %= HOURS_PER_DAY;
4350 }
4351 else
4352 {
4353 partBiggest = Part_Hour;
4354 }
4355
4356 digits = 2;
4357 break;
4358
4359 case _T('l'):
4360 n = GetMilliseconds().ToLong();
4361 if ( partBiggest < Part_MSec )
4362 {
4363 if ( n < 0 )
4364 n = -n;
4365
4366 n %= 1000;
4367 }
4368 //else: no need to reset partBiggest to Part_MSec, it is
4369 // the least significant one anyhow
4370
4371 digits = 3;
4372 break;
4373
4374 case _T('M'):
4375 n = GetMinutes();
4376 if ( partBiggest < Part_Min )
4377 {
4378 if ( n < 0 )
4379 n = -n;
4380
4381 n %= MIN_PER_HOUR;
4382 }
4383 else
4384 {
4385 partBiggest = Part_Min;
4386 }
4387
4388 digits = 2;
4389 break;
4390
4391 case _T('S'):
4392 n = GetSeconds().ToLong();
4393 if ( partBiggest < Part_Sec )
4394 {
4395 if ( n < 0 )
4396 n = -n;
4397
4398 n %= SEC_PER_MIN;
4399 }
4400 else
4401 {
4402 partBiggest = Part_Sec;
4403 }
4404
4405 digits = 2;
4406 break;
4407 }
4408
4409 if ( digits )
4410 {
4411 // negative numbers need one extra position for '-' display
4412 if ( n < 0 )
4413 digits++;
4414
4415 fmtPrefix << _T("0") << digits;
4416 }
4417
4418 str += wxString::Format(fmtPrefix + _T("ld"), n);
4419 }
4420 else
4421 {
4422 // normal character, just copy
4423 str += ch;
4424 }
4425 }
4426
4427 return str;
4428 }
4429
4430 // ============================================================================
4431 // wxDateTimeHolidayAuthority and related classes
4432 // ============================================================================
4433
4434 #include "wx/arrimpl.cpp"
4435
4436 WX_DEFINE_OBJARRAY(wxDateTimeArray)
4437
4438 static int wxCMPFUNC_CONV
4439 wxDateTimeCompareFunc(wxDateTime **first, wxDateTime **second)
4440 {
4441 wxDateTime dt1 = **first,
4442 dt2 = **second;
4443
4444 return dt1 == dt2 ? 0 : dt1 < dt2 ? -1 : +1;
4445 }
4446
4447 // ----------------------------------------------------------------------------
4448 // wxDateTimeHolidayAuthority
4449 // ----------------------------------------------------------------------------
4450
4451 wxHolidayAuthoritiesArray wxDateTimeHolidayAuthority::ms_authorities;
4452
4453 /* static */
4454 bool wxDateTimeHolidayAuthority::IsHoliday(const wxDateTime& dt)
4455 {
4456 size_t count = ms_authorities.size();
4457 for ( size_t n = 0; n < count; n++ )
4458 {
4459 if ( ms_authorities[n]->DoIsHoliday(dt) )
4460 {
4461 return true;
4462 }
4463 }
4464
4465 return false;
4466 }
4467
4468 /* static */
4469 size_t
4470 wxDateTimeHolidayAuthority::GetHolidaysInRange(const wxDateTime& dtStart,
4471 const wxDateTime& dtEnd,
4472 wxDateTimeArray& holidays)
4473 {
4474 wxDateTimeArray hol;
4475
4476 holidays.Clear();
4477
4478 const size_t countAuth = ms_authorities.size();
4479 for ( size_t nAuth = 0; nAuth < countAuth; nAuth++ )
4480 {
4481 ms_authorities[nAuth]->DoGetHolidaysInRange(dtStart, dtEnd, hol);
4482
4483 WX_APPEND_ARRAY(holidays, hol);
4484 }
4485
4486 holidays.Sort(wxDateTimeCompareFunc);
4487
4488 return holidays.size();
4489 }
4490
4491 /* static */
4492 void wxDateTimeHolidayAuthority::ClearAllAuthorities()
4493 {
4494 WX_CLEAR_ARRAY(ms_authorities);
4495 }
4496
4497 /* static */
4498 void wxDateTimeHolidayAuthority::AddAuthority(wxDateTimeHolidayAuthority *auth)
4499 {
4500 ms_authorities.push_back(auth);
4501 }
4502
4503 wxDateTimeHolidayAuthority::~wxDateTimeHolidayAuthority()
4504 {
4505 // required here for Darwin
4506 }
4507
4508 // ----------------------------------------------------------------------------
4509 // wxDateTimeWorkDays
4510 // ----------------------------------------------------------------------------
4511
4512 bool wxDateTimeWorkDays::DoIsHoliday(const wxDateTime& dt) const
4513 {
4514 wxDateTime::WeekDay wd = dt.GetWeekDay();
4515
4516 return (wd == wxDateTime::Sun) || (wd == wxDateTime::Sat);
4517 }
4518
4519 size_t wxDateTimeWorkDays::DoGetHolidaysInRange(const wxDateTime& dtStart,
4520 const wxDateTime& dtEnd,
4521 wxDateTimeArray& holidays) const
4522 {
4523 if ( dtStart > dtEnd )
4524 {
4525 wxFAIL_MSG( _T("invalid date range in GetHolidaysInRange") );
4526
4527 return 0u;
4528 }
4529
4530 holidays.Empty();
4531
4532 // instead of checking all days, start with the first Sat after dtStart and
4533 // end with the last Sun before dtEnd
4534 wxDateTime dtSatFirst = dtStart.GetNextWeekDay(wxDateTime::Sat),
4535 dtSatLast = dtEnd.GetPrevWeekDay(wxDateTime::Sat),
4536 dtSunFirst = dtStart.GetNextWeekDay(wxDateTime::Sun),
4537 dtSunLast = dtEnd.GetPrevWeekDay(wxDateTime::Sun),
4538 dt;
4539
4540 for ( dt = dtSatFirst; dt <= dtSatLast; dt += wxDateSpan::Week() )
4541 {
4542 holidays.Add(dt);
4543 }
4544
4545 for ( dt = dtSunFirst; dt <= dtSunLast; dt += wxDateSpan::Week() )
4546 {
4547 holidays.Add(dt);
4548 }
4549
4550 return holidays.GetCount();
4551 }
4552
4553 // ============================================================================
4554 // other helper functions
4555 // ============================================================================
4556
4557 // ----------------------------------------------------------------------------
4558 // iteration helpers: can be used to write a for loop over enum variable like
4559 // this:
4560 // for ( m = wxDateTime::Jan; m < wxDateTime::Inv_Month; wxNextMonth(m) )
4561 // ----------------------------------------------------------------------------
4562
4563 WXDLLIMPEXP_BASE void wxNextMonth(wxDateTime::Month& m)
4564 {
4565 wxASSERT_MSG( m < wxDateTime::Inv_Month, _T("invalid month") );
4566
4567 // no wrapping or the for loop above would never end!
4568 m = (wxDateTime::Month)(m + 1);
4569 }
4570
4571 WXDLLIMPEXP_BASE void wxPrevMonth(wxDateTime::Month& m)
4572 {
4573 wxASSERT_MSG( m < wxDateTime::Inv_Month, _T("invalid month") );
4574
4575 m = m == wxDateTime::Jan ? wxDateTime::Inv_Month
4576 : (wxDateTime::Month)(m - 1);
4577 }
4578
4579 WXDLLIMPEXP_BASE void wxNextWDay(wxDateTime::WeekDay& wd)
4580 {
4581 wxASSERT_MSG( wd < wxDateTime::Inv_WeekDay, _T("invalid week day") );
4582
4583 // no wrapping or the for loop above would never end!
4584 wd = (wxDateTime::WeekDay)(wd + 1);
4585 }
4586
4587 WXDLLIMPEXP_BASE void wxPrevWDay(wxDateTime::WeekDay& wd)
4588 {
4589 wxASSERT_MSG( wd < wxDateTime::Inv_WeekDay, _T("invalid week day") );
4590
4591 wd = wd == wxDateTime::Sun ? wxDateTime::Inv_WeekDay
4592 : (wxDateTime::WeekDay)(wd - 1);
4593 }
4594
4595 #endif // wxUSE_DATETIME