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