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