]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/common/datetimefmt.cpp
projects / wxWidgets.git / blame_incremental
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (non-incremental) | history | HEAD
add src/common/affinematrix2d.cpp to OpenVMS makefiles
[wxWidgets.git] / src / common / datetimefmt.cpp
... / ...
CommitLineData
1///////////////////////////////////////////////////////////////////////////////
2// Name: src/common/datetimefmt.cpp
3// Purpose: wxDateTime formatting & parsing code
4// Author: Vadim Zeitlin
5// Modified by:
6// Created: 11.05.99
7// RCS-ID: $Id$
8// Copyright: (c) 1999 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
9// parts of code taken from sndcal library by Scott E. Lee:
10//
11// Copyright 1993-1995, Scott E. Lee, all rights reserved.
12// Permission granted to use, copy, modify, distribute and sell
13// so long as the above copyright and this permission statement
14// are retained in all copies.
15//
16// Licence: wxWindows licence
17///////////////////////////////////////////////////////////////////////////////
18
19// ============================================================================
20// declarations
21// ============================================================================
22
23// ----------------------------------------------------------------------------
24// headers
25// ----------------------------------------------------------------------------
26
27// For compilers that support precompilation, includes "wx.h".
28#include "wx/wxprec.h"
29
30#ifdef __BORLANDC__
31 #pragma hdrstop
32#endif
33
34#if !defined(wxUSE_DATETIME) || wxUSE_DATETIME
35
36#ifndef WX_PRECOMP
37 #ifdef __WXMSW__
38 #include "wx/msw/wrapwin.h"
39 #endif
40 #include "wx/string.h"
41 #include "wx/log.h"
42 #include "wx/intl.h"
43 #include "wx/stopwatch.h" // for wxGetLocalTimeMillis()
44 #include "wx/module.h"
45 #include "wx/crt.h"
46#endif // WX_PRECOMP
47
48#include "wx/thread.h"
49
50#include <ctype.h>
51
52#ifdef __WINDOWS__
53 #include <winnls.h>
54 #ifndef __WXWINCE__
55 #include <locale.h>
56 #endif
57#endif
58
59#include "wx/datetime.h"
60
61// ============================================================================
62// implementation of wxDateTime
63// ============================================================================
64
65// ----------------------------------------------------------------------------
66// helpers shared between datetime.cpp and datetimefmt.cpp
67// ----------------------------------------------------------------------------
68
69extern void InitTm(struct tm& tm);
70
71extern int GetTimeZone();
72
73extern wxString CallStrftime(const wxString& format, const tm* tm);
74
75// ----------------------------------------------------------------------------
76// constants (see also datetime.cpp)
77// ----------------------------------------------------------------------------
78
79static const int DAYS_PER_WEEK = 7;
80
81static const int HOURS_PER_DAY = 24;
82
83static const int SEC_PER_MIN = 60;
84
85static const int MIN_PER_HOUR = 60;
86
87// ----------------------------------------------------------------------------
88// parsing helpers
89// ----------------------------------------------------------------------------
90
91namespace
92{
93
94// all the functions below taking non-const wxString::const_iterator p advance
95// it until the end of the match
96
97// scans all digits (but no more than len) and returns the resulting number
98bool GetNumericToken(size_t len,
99 wxString::const_iterator& p,
100 const wxString::const_iterator& end,
101 unsigned long *number)
102{
103 size_t n = 1;
104 wxString s;
105 while ( p != end && wxIsdigit(*p) )
106 {
107 s += *p++;
108
109 if ( len && ++n > len )
110 break;
111 }
112
113 return !s.empty() && s.ToULong(number);
114}
115
116// scans all alphabetic characters and returns the resulting string
117wxString
118GetAlphaToken(wxString::const_iterator& p,
119 const wxString::const_iterator& end)
120{
121 wxString s;
122 while ( p != end && wxIsalpha(*p) )
123 {
124 s += *p++;
125 }
126
127 return s;
128}
129
130enum
131{
132 DateLang_English = 1,
133 DateLang_Local = 2
134};
135
136// return the month if the string is a month name or Inv_Month otherwise
137//
138// flags can contain wxDateTime::Name_Abbr/Name_Full or both of them and lang
139// can be either DateLang_Local (default) to interpret string as a localized
140// month name or DateLang_English to parse it as a standard English name or
141// their combination to interpret it in any way
142wxDateTime::Month
143GetMonthFromName(wxString::const_iterator& p,
144 const wxString::const_iterator& end,
145 int flags,
146 int lang)
147{
148 const wxString::const_iterator pOrig = p;
149 const wxString name = GetAlphaToken(p, end);
150 if ( name.empty() )
151 return wxDateTime::Inv_Month;
152
153 wxDateTime::Month mon;
154 for ( mon = wxDateTime::Jan; mon < wxDateTime::Inv_Month; wxNextMonth(mon) )
155 {
156 // case-insensitive comparison either one of or with both abbreviated
157 // and not versions
158 if ( flags & wxDateTime::Name_Full )
159 {
160 if ( lang & DateLang_English )
161 {
162 if ( name.CmpNoCase(wxDateTime::GetEnglishMonthName(mon,
163 wxDateTime::Name_Full)) == 0 )
164 break;
165 }
166
167 if ( lang & DateLang_Local )
168 {
169 if ( name.CmpNoCase(wxDateTime::GetMonthName(mon,
170 wxDateTime::Name_Full)) == 0 )
171 break;
172 }
173 }
174
175 if ( flags & wxDateTime::Name_Abbr )
176 {
177 if ( lang & DateLang_English )
178 {
179 if ( name.CmpNoCase(wxDateTime::GetEnglishMonthName(mon,
180 wxDateTime::Name_Abbr)) == 0 )
181 break;
182 }
183
184 if ( lang & DateLang_Local )
185 {
186 // some locales (e.g. French one) use periods for the
187 // abbreviated month names but it's never part of name so
188 // compare it specially
189 wxString nameAbbr = wxDateTime::GetMonthName(mon,
190 wxDateTime::Name_Abbr);
191 const bool hasPeriod = *nameAbbr.rbegin() == '.';
192 if ( hasPeriod )
193 nameAbbr.erase(nameAbbr.end() - 1);
194
195 if ( name.CmpNoCase(nameAbbr) == 0 )
196 {
197 if ( hasPeriod )
198 {
199 // skip trailing period if it was part of the match
200 if ( *p == '.' )
201 ++p;
202 else // no match as no matching period
203 continue;
204 }
205
206 break;
207 }
208 }
209 }
210 }
211
212 if ( mon == wxDateTime::Inv_Month )
213 p = pOrig;
214
215 return mon;
216}
217
218// return the weekday if the string is a weekday name or Inv_WeekDay otherwise
219//
220// flags and lang parameters have the same meaning as for GetMonthFromName()
221// above
222wxDateTime::WeekDay
223GetWeekDayFromName(wxString::const_iterator& p,
224 const wxString::const_iterator& end,
225 int flags, int lang)
226{
227 const wxString::const_iterator pOrig = p;
228 const wxString name = GetAlphaToken(p, end);
229 if ( name.empty() )
230 return wxDateTime::Inv_WeekDay;
231
232 wxDateTime::WeekDay wd;
233 for ( wd = wxDateTime::Sun; wd < wxDateTime::Inv_WeekDay; wxNextWDay(wd) )
234 {
235 if ( flags & wxDateTime::Name_Full )
236 {
237 if ( lang & DateLang_English )
238 {
239 if ( name.CmpNoCase(wxDateTime::GetEnglishWeekDayName(wd,
240 wxDateTime::Name_Full)) == 0 )
241 break;
242 }
243
244 if ( lang & DateLang_Local )
245 {
246 if ( name.CmpNoCase(wxDateTime::GetWeekDayName(wd,
247 wxDateTime::Name_Full)) == 0 )
248 break;
249 }
250 }
251
252 if ( flags & wxDateTime::Name_Abbr )
253 {
254 if ( lang & DateLang_English )
255 {
256 if ( name.CmpNoCase(wxDateTime::GetEnglishWeekDayName(wd,
257 wxDateTime::Name_Abbr)) == 0 )
258 break;
259 }
260
261 if ( lang & DateLang_Local )
262 {
263 if ( name.CmpNoCase(wxDateTime::GetWeekDayName(wd,
264 wxDateTime::Name_Abbr)) == 0 )
265 break;
266 }
267 }
268 }
269
270 if ( wd == wxDateTime::Inv_WeekDay )
271 p = pOrig;
272
273 return wd;
274}
275
276// parses string starting at given iterator using the specified format and,
277// optionally, a fall back format (and optionally another one... but it stops
278// there, really)
279//
280// if unsuccessful, returns invalid wxDateTime without changing p; otherwise
281// advance p to the end of the match and returns wxDateTime containing the
282// results of the parsing
283wxDateTime
284ParseFormatAt(wxString::const_iterator& p,
285 const wxString::const_iterator& end,
286 const wxString& fmt,
287 // FIXME-VC6: using wxString() instead of wxEmptyString in the
288 // line below results in error C2062: type 'class
289 // wxString (__cdecl *)(void)' unexpected
290 const wxString& fmtAlt = wxEmptyString)
291{
292 const wxString str(p, end);
293 wxString::const_iterator endParse;
294 wxDateTime dt;
295 if ( dt.ParseFormat(str, fmt, &endParse) ||
296 (!fmtAlt.empty() && dt.ParseFormat(str, fmtAlt, &endParse)) )
297 {
298 p += endParse - str.begin();
299 }
300 //else: all formats failed
301
302 return dt;
303}
304
305} // anonymous namespace
306
307// ----------------------------------------------------------------------------
308// wxDateTime to/from text representations
309// ----------------------------------------------------------------------------
310
311wxString wxDateTime::Format(const wxString& formatp, const TimeZone& tz) const
312{
313 wxCHECK_MSG( !formatp.empty(), wxEmptyString,
314 wxT("NULL format in wxDateTime::Format") );
315
316 wxString format = formatp;
317#ifdef __WXOSX__
318 format.Replace("%c",wxLocale::GetInfo(wxLOCALE_DATE_TIME_FMT));
319 format.Replace("%x",wxLocale::GetInfo(wxLOCALE_SHORT_DATE_FMT));
320 format.Replace("%X",wxLocale::GetInfo(wxLOCALE_TIME_FMT));
321#endif
322 // we have to use our own implementation if the date is out of range of
323 // strftime() or if we use non standard specifiers
324#ifdef wxHAS_STRFTIME
325 time_t time = GetTicks();
326
327 if ( (time != (time_t)-1) && !wxStrstr(format, wxT("%l")) )
328 {
329 // use strftime()
330 struct tm tmstruct;
331 struct tm *tm;
332 if ( tz.GetOffset() == -GetTimeZone() )
333 {
334 // we are working with local time
335 tm = wxLocaltime_r(&time, &tmstruct);
336
337 // should never happen
338 wxCHECK_MSG( tm, wxEmptyString, wxT("wxLocaltime_r() failed") );
339 }
340 else
341 {
342 time += (int)tz.GetOffset();
343
344#if defined(__VMS__) || defined(__WATCOMC__) // time is unsigned so avoid warning
345 int time2 = (int) time;
346 if ( time2 >= 0 )
347#else
348 if ( time >= 0 )
349#endif
350 {
351 tm = wxGmtime_r(&time, &tmstruct);
352
353 // should never happen
354 wxCHECK_MSG( tm, wxEmptyString, wxT("wxGmtime_r() failed") );
355 }
356 else
357 {
358 tm = (struct tm *)NULL;
359 }
360 }
361
362 if ( tm )
363 {
364 return CallStrftime(format, tm);
365 }
366 }
367 //else: use generic code below
368#endif // wxHAS_STRFTIME
369
370 // we only parse ANSI C format specifications here, no POSIX 2
371 // complications, no GNU extensions but we do add support for a "%l" format
372 // specifier allowing to get the number of milliseconds
373 Tm tm = GetTm(tz);
374
375 // used for calls to strftime() when we only deal with time
376 struct tm tmTimeOnly;
377 memset(&tmTimeOnly, 0, sizeof(tmTimeOnly));
378 tmTimeOnly.tm_hour = tm.hour;
379 tmTimeOnly.tm_min = tm.min;
380 tmTimeOnly.tm_sec = tm.sec;
381 tmTimeOnly.tm_mday = 1; // any date will do, use 1976-01-01
382 tmTimeOnly.tm_mon = 0;
383 tmTimeOnly.tm_year = 76;
384 tmTimeOnly.tm_isdst = 0; // no DST, we adjust for tz ourselves
385
386 wxString tmp, res, fmt;
387 for ( wxString::const_iterator p = format.begin(); p != format.end(); ++p )
388 {
389 if ( *p != wxT('%') )
390 {
391 // copy as is
392 res += *p;
393
394 continue;
395 }
396
397 // set the default format
398 switch ( (*++p).GetValue() )
399 {
400 case wxT('Y'): // year has 4 digits
401 fmt = wxT("%04d");
402 break;
403
404 case wxT('j'): // day of year has 3 digits
405 case wxT('l'): // milliseconds have 3 digits
406 fmt = wxT("%03d");
407 break;
408
409 case wxT('w'): // week day as number has only one
410 fmt = wxT("%d");
411 break;
412
413 default:
414 // it's either another valid format specifier in which case
415 // the format is "%02d" (for all the rest) or we have the
416 // field width preceding the format in which case it will
417 // override the default format anyhow
418 fmt = wxT("%02d");
419 }
420
421 bool restart = true;
422 while ( restart )
423 {
424 restart = false;
425
426 // start of the format specification
427 switch ( (*p).GetValue() )
428 {
429 case wxT('a'): // a weekday name
430 case wxT('A'):
431 // second parameter should be true for abbreviated names
432 res += GetWeekDayName(tm.GetWeekDay(),
433 *p == wxT('a') ? Name_Abbr : Name_Full);
434 break;
435
436 case wxT('b'): // a month name
437 case wxT('B'):
438 res += GetMonthName(tm.mon,
439 *p == wxT('b') ? Name_Abbr : Name_Full);
440 break;
441
442 case wxT('c'): // locale default date and time representation
443 case wxT('x'): // locale default date representation
444#ifdef wxHAS_STRFTIME
445 //
446 // the problem: there is no way to know what do these format
447 // specifications correspond to for the current locale.
448 //
449 // the solution: use a hack and still use strftime(): first
450 // find the YEAR which is a year in the strftime() range (1970
451 // - 2038) whose Jan 1 falls on the same week day as the Jan 1
452 // of the real year. Then make a copy of the format and
453 // replace all occurrences of YEAR in it with some unique
454 // string not appearing anywhere else in it, then use
455 // strftime() to format the date in year YEAR and then replace
456 // YEAR back by the real year and the unique replacement
457 // string back with YEAR. Notice that "all occurrences of YEAR"
458 // means all occurrences of 4 digit as well as 2 digit form!
459 //
460 // the bugs: we assume that neither of %c nor %x contains any
461 // fields which may change between the YEAR and real year. For
462 // example, the week number (%U, %W) and the day number (%j)
463 // will change if one of these years is leap and the other one
464 // is not!
465 {
466 // find the YEAR: normally, for any year X, Jan 1 of the
467 // year X + 28 is the same weekday as Jan 1 of X (because
468 // the weekday advances by 1 for each normal X and by 2
469 // for each leap X, hence by 5 every 4 years or by 35
470 // which is 0 mod 7 every 28 years) but this rule breaks
471 // down if there are years between X and Y which are
472 // divisible by 4 but not leap (i.e. divisible by 100 but
473 // not 400), hence the correction.
474
475 int yearReal = GetYear(tz);
476 int mod28 = yearReal % 28;
477
478 // be careful to not go too far - we risk to leave the
479 // supported range
480 int year;
481 if ( mod28 < 10 )
482 {
483 year = 1988 + mod28; // 1988 == 0 (mod 28)
484 }
485 else
486 {
487 year = 1970 + mod28 - 10; // 1970 == 10 (mod 28)
488 }
489
490 int nCentury = year / 100,
491 nCenturyReal = yearReal / 100;
492
493 // need to adjust for the years divisble by 400 which are
494 // not leap but are counted like leap ones if we just take
495 // the number of centuries in between for nLostWeekDays
496 int nLostWeekDays = (nCentury - nCenturyReal) -
497 (nCentury / 4 - nCenturyReal / 4);
498
499 // we have to gain back the "lost" weekdays: note that the
500 // effect of this loop is to not do anything to
501 // nLostWeekDays (which we won't use any more), but to
502 // (indirectly) set the year correctly
503 while ( (nLostWeekDays % 7) != 0 )
504 {
505 nLostWeekDays += year++ % 4 ? 1 : 2;
506 }
507
508 // finally move the year below 2000 so that the 2-digit
509 // year number can never match the month or day of the
510 // month when we do the replacements below
511 if ( year >= 2000 )
512 year -= 28;
513
514 wxASSERT_MSG( year >= 1970 && year < 2000,
515 wxT("logic error in wxDateTime::Format") );
516
517
518 // use strftime() to format the same date but in supported
519 // year
520 //
521 // NB: we assume that strftime() doesn't check for the
522 // date validity and will happily format the date
523 // corresponding to Feb 29 of a non leap year (which
524 // may happen if yearReal was leap and year is not)
525 struct tm tmAdjusted;
526 InitTm(tmAdjusted);
527 tmAdjusted.tm_hour = tm.hour;
528 tmAdjusted.tm_min = tm.min;
529 tmAdjusted.tm_sec = tm.sec;
530 tmAdjusted.tm_wday = tm.GetWeekDay();
531 tmAdjusted.tm_yday = GetDayOfYear();
532 tmAdjusted.tm_mday = tm.mday;
533 tmAdjusted.tm_mon = tm.mon;
534 tmAdjusted.tm_year = year - 1900;
535 tmAdjusted.tm_isdst = 0; // no DST, already adjusted
536 wxString str = CallStrftime(*p == wxT('c') ? wxT("%c")
537 : wxT("%x"),
538 &tmAdjusted);
539
540 // now replace the replacement year with the real year:
541 // notice that we have to replace the 4 digit year with
542 // a unique string not appearing in strftime() output
543 // first to prevent the 2 digit year from matching any
544 // substring of the 4 digit year (but any day, month,
545 // hours or minutes components should be safe because
546 // they are never in 70-99 range)
547 wxString replacement("|");
548 while ( str.find(replacement) != wxString::npos )
549 replacement += '|';
550
551 str.Replace(wxString::Format("%d", year),
552 replacement);
553 str.Replace(wxString::Format("%d", year % 100),
554 wxString::Format("%d", yearReal % 100));
555 str.Replace(replacement,
556 wxString::Format("%d", yearReal));
557
558 res += str;
559 }
560#else // !wxHAS_STRFTIME
561 // Use "%m/%d/%y %H:%M:%S" format instead
562 res += wxString::Format(wxT("%02d/%02d/%04d %02d:%02d:%02d"),
563 tm.mon+1,tm.mday, tm.year, tm.hour, tm.min, tm.sec);
564#endif // wxHAS_STRFTIME/!wxHAS_STRFTIME
565 break;
566
567 case wxT('d'): // day of a month (01-31)
568 res += wxString::Format(fmt, tm.mday);
569 break;
570
571 case wxT('H'): // hour in 24h format (00-23)
572 res += wxString::Format(fmt, tm.hour);
573 break;
574
575 case wxT('I'): // hour in 12h format (01-12)
576 {
577 // 24h -> 12h, 0h -> 12h too
578 int hour12 = tm.hour > 12 ? tm.hour - 12
579 : tm.hour ? tm.hour : 12;
580 res += wxString::Format(fmt, hour12);
581 }
582 break;
583
584 case wxT('j'): // day of the year
585 res += wxString::Format(fmt, GetDayOfYear(tz));
586 break;
587
588 case wxT('l'): // milliseconds (NOT STANDARD)
589 res += wxString::Format(fmt, GetMillisecond(tz));
590 break;
591
592 case wxT('m'): // month as a number (01-12)
593 res += wxString::Format(fmt, tm.mon + 1);
594 break;
595
596 case wxT('M'): // minute as a decimal number (00-59)
597 res += wxString::Format(fmt, tm.min);
598 break;
599
600 case wxT('p'): // AM or PM string
601#ifdef wxHAS_STRFTIME
602 res += CallStrftime(wxT("%p"), &tmTimeOnly);
603#else // !wxHAS_STRFTIME
604 res += (tmTimeOnly.tm_hour > 12) ? wxT("pm") : wxT("am");
605#endif // wxHAS_STRFTIME/!wxHAS_STRFTIME
606 break;
607
608 case wxT('S'): // second as a decimal number (00-61)
609 res += wxString::Format(fmt, tm.sec);
610 break;
611
612 case wxT('U'): // week number in the year (Sunday 1st week day)
613 res += wxString::Format(fmt, GetWeekOfYear(Sunday_First, tz));
614 break;
615
616 case wxT('W'): // week number in the year (Monday 1st week day)
617 res += wxString::Format(fmt, GetWeekOfYear(Monday_First, tz));
618 break;
619
620 case wxT('w'): // weekday as a number (0-6), Sunday = 0
621 res += wxString::Format(fmt, tm.GetWeekDay());
622 break;
623
624 // case wxT('x'): -- handled with "%c"
625
626 case wxT('X'): // locale default time representation
627 // just use strftime() to format the time for us
628#ifdef wxHAS_STRFTIME
629 res += CallStrftime(wxT("%X"), &tmTimeOnly);
630#else // !wxHAS_STRFTIME
631 res += wxString::Format(wxT("%02d:%02d:%02d"),tm.hour, tm.min, tm.sec);
632#endif // wxHAS_STRFTIME/!wxHAS_STRFTIME
633 break;
634
635 case wxT('y'): // year without century (00-99)
636 res += wxString::Format(fmt, tm.year % 100);
637 break;
638
639 case wxT('Y'): // year with century
640 res += wxString::Format(fmt, tm.year);
641 break;
642
643 case wxT('Z'): // timezone name
644#ifdef wxHAS_STRFTIME
645 res += CallStrftime(wxT("%Z"), &tmTimeOnly);
646#endif
647 break;
648
649 default:
650 // is it the format width?
651 for ( fmt.clear();
652 *p == wxT('-') || *p == wxT('+') ||
653 *p == wxT(' ') || wxIsdigit(*p);
654 ++p )
655 {
656 fmt += *p;
657 }
658
659 if ( !fmt.empty() )
660 {
661 // we've only got the flags and width so far in fmt
662 fmt.Prepend(wxT('%'));
663 fmt.Append(wxT('d'));
664
665 restart = true;
666
667 break;
668 }
669
670 // no, it wasn't the width
671 wxFAIL_MSG(wxT("unknown format specifier"));
672
673 // fall through and just copy it nevertheless
674
675 case wxT('%'): // a percent sign
676 res += *p;
677 break;
678
679 case 0: // the end of string
680 wxFAIL_MSG(wxT("missing format at the end of string"));
681
682 // just put the '%' which was the last char in format
683 res += wxT('%');
684 break;
685 }
686 }
687 }
688
689 return res;
690}
691
692// this function parses a string in (strict) RFC 822 format: see the section 5
693// of the RFC for the detailed description, but briefly it's something of the
694// form "Sat, 18 Dec 1999 00:48:30 +0100"
695//
696// this function is "strict" by design - it must reject anything except true
697// RFC822 time specs.
698bool
699wxDateTime::ParseRfc822Date(const wxString& date, wxString::const_iterator *end)
700{
701 const wxString::const_iterator pEnd = date.end();
702 wxString::const_iterator p = date.begin();
703
704 // 1. week day
705 const wxDateTime::WeekDay
706 wd = GetWeekDayFromName(p, pEnd, Name_Abbr, DateLang_English);
707 if ( wd == Inv_WeekDay )
708 return false;
709 //else: ignore week day for now, we could also check that it really
710 // corresponds to the specified date
711
712 // 2. separating comma
713 if ( *p++ != ',' || *p++ != ' ' )
714 return false;
715
716 // 3. day number
717 if ( !wxIsdigit(*p) )
718 return false;
719
720 wxDateTime_t day = (wxDateTime_t)(*p++ - '0');
721 if ( wxIsdigit(*p) )
722 {
723 day *= 10;
724 day = (wxDateTime_t)(day + (*p++ - '0'));
725 }
726
727 if ( *p++ != ' ' )
728 return false;
729
730 // 4. month name
731 const Month mon = GetMonthFromName(p, pEnd, Name_Abbr, DateLang_English);
732 if ( mon == Inv_Month )
733 return false;
734
735 if ( *p++ != ' ' )
736 return false;
737
738 // 5. year
739 if ( !wxIsdigit(*p) )
740 return false;
741
742 int year = *p++ - '0';
743 if ( !wxIsdigit(*p) ) // should have at least 2 digits in the year
744 return false;
745
746 year *= 10;
747 year += *p++ - '0';
748
749 // is it a 2 digit year (as per original RFC 822) or a 4 digit one?
750 if ( wxIsdigit(*p) )
751 {
752 year *= 10;
753 year += *p++ - '0';
754
755 if ( !wxIsdigit(*p) )
756 {
757 // no 3 digit years please
758 return false;
759 }
760
761 year *= 10;
762 year += *p++ - '0';
763 }
764
765 if ( *p++ != ' ' )
766 return false;
767
768 // 6. time in hh:mm:ss format with seconds being optional
769 if ( !wxIsdigit(*p) )
770 return false;
771
772 wxDateTime_t hour = (wxDateTime_t)(*p++ - '0');
773
774 if ( !wxIsdigit(*p) )
775 return false;
776
777 hour *= 10;
778 hour = (wxDateTime_t)(hour + (*p++ - '0'));
779
780 if ( *p++ != ':' )
781 return false;
782
783 if ( !wxIsdigit(*p) )
784 return false;
785
786 wxDateTime_t min = (wxDateTime_t)(*p++ - '0');
787
788 if ( !wxIsdigit(*p) )
789 return false;
790
791 min *= 10;
792 min += (wxDateTime_t)(*p++ - '0');
793
794 wxDateTime_t sec = 0;
795 if ( *p == ':' )
796 {
797 p++;
798 if ( !wxIsdigit(*p) )
799 return false;
800
801 sec = (wxDateTime_t)(*p++ - '0');
802
803 if ( !wxIsdigit(*p) )
804 return false;
805
806 sec *= 10;
807 sec += (wxDateTime_t)(*p++ - '0');
808 }
809
810 if ( *p++ != ' ' )
811 return false;
812
813 // 7. now the interesting part: the timezone
814 int offset = 0; // just to suppress warnings
815 if ( *p == '-' || *p == '+' )
816 {
817 // the explicit offset given: it has the form of hhmm
818 bool plus = *p++ == '+';
819
820 if ( !wxIsdigit(*p) || !wxIsdigit(*(p + 1)) )
821 return false;
822
823
824 // hours
825 offset = MIN_PER_HOUR*(10*(*p - '0') + (*(p + 1) - '0'));
826
827 p += 2;
828
829 if ( !wxIsdigit(*p) || !wxIsdigit(*(p + 1)) )
830 return false;
831
832 // minutes
833 offset += 10*(*p - '0') + (*(p + 1) - '0');
834
835 if ( !plus )
836 offset = -offset;
837
838 p += 2;
839 }
840 else // not numeric
841 {
842 // the symbolic timezone given: may be either military timezone or one
843 // of standard abbreviations
844 if ( !*(p + 1) )
845 {
846 // military: Z = UTC, J unused, A = -1, ..., Y = +12
847 static const int offsets[26] =
848 {
849 //A B C D E F G H I J K L M
850 -1, -2, -3, -4, -5, -6, -7, -8, -9, 0, -10, -11, -12,
851 //N O P R Q S T U V W Z Y Z
852 +1, +2, +3, +4, +5, +6, +7, +8, +9, +10, +11, +12, 0
853 };
854
855 if ( *p < wxT('A') || *p > wxT('Z') || *p == wxT('J') )
856 return false;
857
858 offset = offsets[*p++ - 'A'];
859 }
860 else
861 {
862 // abbreviation
863 const wxString tz(p, date.end());
864 if ( tz == wxT("UT") || tz == wxT("UTC") || tz == wxT("GMT") )
865 offset = 0;
866 else if ( tz == wxT("AST") )
867 offset = AST - GMT0;
868 else if ( tz == wxT("ADT") )
869 offset = ADT - GMT0;
870 else if ( tz == wxT("EST") )
871 offset = EST - GMT0;
872 else if ( tz == wxT("EDT") )
873 offset = EDT - GMT0;
874 else if ( tz == wxT("CST") )
875 offset = CST - GMT0;
876 else if ( tz == wxT("CDT") )
877 offset = CDT - GMT0;
878 else if ( tz == wxT("MST") )
879 offset = MST - GMT0;
880 else if ( tz == wxT("MDT") )
881 offset = MDT - GMT0;
882 else if ( tz == wxT("PST") )
883 offset = PST - GMT0;
884 else if ( tz == wxT("PDT") )
885 offset = PDT - GMT0;
886 else
887 return false;
888
889 p += tz.length();
890 }
891
892 // make it minutes
893 offset *= MIN_PER_HOUR;
894 }
895
896
897 // the spec was correct, construct the date from the values we found
898 Set(day, mon, year, hour, min, sec);
899 MakeFromTimezone(TimeZone::Make(offset*SEC_PER_MIN));
900
901 if ( end )
902 *end = p;
903
904 return true;
905}
906
907bool
908wxDateTime::ParseFormat(const wxString& date,
909 const wxString& format,
910 const wxDateTime& dateDef,
911 wxString::const_iterator *endParse)
912{
913 wxCHECK_MSG( !format.empty(), false, "format can't be empty" );
914 wxCHECK_MSG( endParse, false, "end iterator pointer must be specified" );
915
916 wxString str;
917 unsigned long num;
918
919 // what fields have we found?
920 bool haveWDay = false,
921 haveYDay = false,
922 haveDay = false,
923 haveMon = false,
924 haveYear = false,
925 haveHour = false,
926 haveMin = false,
927 haveSec = false,
928 haveMsec = false;
929
930 bool hourIsIn12hFormat = false, // or in 24h one?
931 isPM = false; // AM by default
932
933 // and the value of the items we have (init them to get rid of warnings)
934 wxDateTime_t msec = 0,
935 sec = 0,
936 min = 0,
937 hour = 0;
938 WeekDay wday = Inv_WeekDay;
939 wxDateTime_t yday = 0,
940 mday = 0;
941 wxDateTime::Month mon = Inv_Month;
942 int year = 0;
943
944 wxString::const_iterator input = date.begin();
945 const wxString::const_iterator end = date.end();
946 for ( wxString::const_iterator fmt = format.begin(); fmt != format.end(); ++fmt )
947 {
948 if ( *fmt != wxT('%') )
949 {
950 if ( wxIsspace(*fmt) )
951 {
952 // a white space in the format string matches 0 or more white
953 // spaces in the input
954 while ( input != end && wxIsspace(*input) )
955 {
956 input++;
957 }
958 }
959 else // !space
960 {
961 // any other character (not whitespace, not '%') must be
962 // matched by itself in the input
963 if ( input == end || *input++ != *fmt )
964 {
965 // no match
966 return false;
967 }
968 }
969
970 // done with this format char
971 continue;
972 }
973
974 // start of a format specification
975
976 // parse the optional width
977 size_t width = 0;
978 while ( wxIsdigit(*++fmt) )
979 {
980 width *= 10;
981 width += *fmt - '0';
982 }
983
984 // the default widths for the various fields
985 if ( !width )
986 {
987 switch ( (*fmt).GetValue() )
988 {
989 case wxT('Y'): // year has 4 digits
990 width = 4;
991 break;
992
993 case wxT('j'): // day of year has 3 digits
994 case wxT('l'): // milliseconds have 3 digits
995 width = 3;
996 break;
997
998 case wxT('w'): // week day as number has only one
999 width = 1;
1000 break;
1001
1002 default:
1003 // default for all other fields
1004 width = 2;
1005 }
1006 }
1007
1008 // then the format itself
1009 switch ( (*fmt).GetValue() )
1010 {
1011 case wxT('a'): // a weekday name
1012 case wxT('A'):
1013 {
1014 wday = GetWeekDayFromName
1015 (
1016 input, end,
1017 *fmt == 'a' ? Name_Abbr : Name_Full,
1018 DateLang_Local
1019 );
1020 if ( wday == Inv_WeekDay )
1021 {
1022 // no match
1023 return false;
1024 }
1025 }
1026 haveWDay = true;
1027 break;
1028
1029 case wxT('b'): // a month name
1030 case wxT('B'):
1031 {
1032 mon = GetMonthFromName
1033 (
1034 input, end,
1035 *fmt == 'b' ? Name_Abbr : Name_Full,
1036 DateLang_Local
1037 );
1038 if ( mon == Inv_Month )
1039 {
1040 // no match
1041 return false;
1042 }
1043 }
1044 haveMon = true;
1045 break;
1046
1047 case wxT('c'): // locale default date and time representation
1048 {
1049 wxDateTime dt;
1050
1051#if wxUSE_INTL
1052 const wxString
1053 fmtDateTime = wxLocale::GetInfo(wxLOCALE_DATE_TIME_FMT);
1054 if ( !fmtDateTime.empty() )
1055 dt = ParseFormatAt(input, end, fmtDateTime);
1056#endif // wxUSE_INTL
1057 if ( !dt.IsValid() )
1058 {
1059 // also try the format which corresponds to ctime()
1060 // output (i.e. the "C" locale default)
1061 dt = ParseFormatAt(input, end, wxS("%a %b %d %H:%M:%S %Y"));
1062 }
1063
1064 if ( !dt.IsValid() )
1065 {
1066 // and finally also the two generic date/time formats
1067 dt = ParseFormatAt(input, end, wxS("%x %X"), wxS("%X %x"));
1068 }
1069
1070 if ( !dt.IsValid() )
1071 return false;
1072
1073 const Tm tm = dt.GetTm();
1074
1075 hour = tm.hour;
1076 min = tm.min;
1077 sec = tm.sec;
1078
1079 year = tm.year;
1080 mon = tm.mon;
1081 mday = tm.mday;
1082
1083 haveDay = haveMon = haveYear =
1084 haveHour = haveMin = haveSec = true;
1085 }
1086 break;
1087
1088 case wxT('d'): // day of a month (01-31)
1089 case 'e': // day of a month (1-31) (GNU extension)
1090 if ( !GetNumericToken(width, input, end, &num) ||
1091 (num > 31) || (num < 1) )
1092 {
1093 // no match
1094 return false;
1095 }
1096
1097 // we can't check whether the day range is correct yet, will
1098 // do it later - assume ok for now
1099 haveDay = true;
1100 mday = (wxDateTime_t)num;
1101 break;
1102
1103 case wxT('H'): // hour in 24h format (00-23)
1104 if ( !GetNumericToken(width, input, end, &num) || (num > 23) )
1105 {
1106 // no match
1107 return false;
1108 }
1109
1110 haveHour = true;
1111 hour = (wxDateTime_t)num;
1112 break;
1113
1114 case wxT('I'): // hour in 12h format (01-12)
1115 if ( !GetNumericToken(width, input, end, &num) ||
1116 !num || (num > 12) )
1117 {
1118 // no match
1119 return false;
1120 }
1121
1122 haveHour = true;
1123 hourIsIn12hFormat = true;
1124 hour = (wxDateTime_t)(num % 12); // 12 should be 0
1125 break;
1126
1127 case wxT('j'): // day of the year
1128 if ( !GetNumericToken(width, input, end, &num) ||
1129 !num || (num > 366) )
1130 {
1131 // no match
1132 return false;
1133 }
1134
1135 haveYDay = true;
1136 yday = (wxDateTime_t)num;
1137 break;
1138
1139 case wxT('l'): // milliseconds (0-999)
1140 if ( !GetNumericToken(width, input, end, &num) )
1141 return false;
1142
1143 haveMsec = true;
1144 msec = (wxDateTime_t)num;
1145 break;
1146
1147 case wxT('m'): // month as a number (01-12)
1148 if ( !GetNumericToken(width, input, end, &num) ||
1149 !num || (num > 12) )
1150 {
1151 // no match
1152 return false;
1153 }
1154
1155 haveMon = true;
1156 mon = (Month)(num - 1);
1157 break;
1158
1159 case wxT('M'): // minute as a decimal number (00-59)
1160 if ( !GetNumericToken(width, input, end, &num) ||
1161 (num > 59) )
1162 {
1163 // no match
1164 return false;
1165 }
1166
1167 haveMin = true;
1168 min = (wxDateTime_t)num;
1169 break;
1170
1171 case wxT('p'): // AM or PM string
1172 {
1173 wxString am, pm;
1174 GetAmPmStrings(&am, &pm);
1175
1176 // we can never match %p in locales which don't use AM/PM
1177 if ( am.empty() || pm.empty() )
1178 return false;
1179
1180 const size_t pos = input - date.begin();
1181 if ( date.compare(pos, pm.length(), pm) == 0 )
1182 {
1183 isPM = true;
1184 input += pm.length();
1185 }
1186 else if ( date.compare(pos, am.length(), am) == 0 )
1187 {
1188 input += am.length();
1189 }
1190 else // no match
1191 {
1192 return false;
1193 }
1194 }
1195 break;
1196
1197 case wxT('r'): // time as %I:%M:%S %p
1198 {
1199 wxDateTime dt;
1200 if ( !dt.ParseFormat(wxString(input, end),
1201 wxS("%I:%M:%S %p"), &input) )
1202 return false;
1203
1204 haveHour = haveMin = haveSec = true;
1205
1206 const Tm tm = dt.GetTm();
1207 hour = tm.hour;
1208 min = tm.min;
1209 sec = tm.sec;
1210 }
1211 break;
1212
1213 case wxT('R'): // time as %H:%M
1214 {
1215 const wxDateTime
1216 dt = ParseFormatAt(input, end, wxS("%H:%M"));
1217 if ( !dt.IsValid() )
1218 return false;
1219
1220 haveHour =
1221 haveMin = true;
1222
1223 const Tm tm = dt.GetTm();
1224 hour = tm.hour;
1225 min = tm.min;
1226 }
1227 break;
1228
1229 case wxT('S'): // second as a decimal number (00-61)
1230 if ( !GetNumericToken(width, input, end, &num) ||
1231 (num > 61) )
1232 {
1233 // no match
1234 return false;
1235 }
1236
1237 haveSec = true;
1238 sec = (wxDateTime_t)num;
1239 break;
1240
1241 case wxT('T'): // time as %H:%M:%S
1242 {
1243 const wxDateTime
1244 dt = ParseFormatAt(input, end, wxS("%H:%M:%S"));
1245 if ( !dt.IsValid() )
1246 return false;
1247
1248 haveHour =
1249 haveMin =
1250 haveSec = true;
1251
1252 const Tm tm = dt.GetTm();
1253 hour = tm.hour;
1254 min = tm.min;
1255 sec = tm.sec;
1256 }
1257 break;
1258
1259 case wxT('w'): // weekday as a number (0-6), Sunday = 0
1260 if ( !GetNumericToken(width, input, end, &num) ||
1261 (wday > 6) )
1262 {
1263 // no match
1264 return false;
1265 }
1266
1267 haveWDay = true;
1268 wday = (WeekDay)num;
1269 break;
1270
1271 case wxT('x'): // locale default date representation
1272 {
1273#if wxUSE_INTL
1274 wxString
1275 fmtDate = wxLocale::GetInfo(wxLOCALE_SHORT_DATE_FMT),
1276 fmtDateAlt = wxLocale::GetInfo(wxLOCALE_LONG_DATE_FMT);
1277#else // !wxUSE_INTL
1278 wxString fmtDate, fmtDateAlt;
1279#endif // wxUSE_INTL/!wxUSE_INTL
1280 if ( fmtDate.empty() )
1281 {
1282 if ( IsWestEuropeanCountry(GetCountry()) ||
1283 GetCountry() == Russia )
1284 {
1285 fmtDate = wxS("%d/%m/%Y");
1286 fmtDateAlt = wxS("%m/%d/%Y");
1287 }
1288 else // assume USA
1289 {
1290 fmtDate = wxS("%m/%d/%Y");
1291 fmtDateAlt = wxS("%d/%m/%Y");
1292 }
1293 }
1294
1295 wxDateTime
1296 dt = ParseFormatAt(input, end, fmtDate, fmtDateAlt);
1297
1298 if ( !dt.IsValid() )
1299 {
1300 // try with short years too
1301 fmtDate.Replace("%Y","%y");
1302 fmtDateAlt.Replace("%Y","%y");
1303 dt = ParseFormatAt(input, end, fmtDate, fmtDateAlt);
1304
1305 if ( !dt.IsValid() )
1306 return false;
1307 }
1308
1309 const Tm tm = dt.GetTm();
1310
1311 haveDay =
1312 haveMon =
1313 haveYear = true;
1314
1315 year = tm.year;
1316 mon = tm.mon;
1317 mday = tm.mday;
1318 }
1319
1320 break;
1321
1322 case wxT('X'): // locale default time representation
1323 {
1324#if wxUSE_INTL
1325 wxString fmtTime = wxLocale::GetInfo(wxLOCALE_TIME_FMT),
1326 fmtTimeAlt;
1327#else // !wxUSE_INTL
1328 wxString fmtTime, fmtTimeAlt;
1329#endif // wxUSE_INTL/!wxUSE_INTL
1330 if ( fmtTime.empty() )
1331 {
1332 // try to parse what follows as "%H:%M:%S" and, if this
1333 // fails, as "%I:%M:%S %p" - this should catch the most
1334 // common cases
1335 fmtTime = "%T";
1336 fmtTimeAlt = "%r";
1337 }
1338
1339 const wxDateTime
1340 dt = ParseFormatAt(input, end, fmtTime, fmtTimeAlt);
1341 if ( !dt.IsValid() )
1342 return false;
1343
1344 haveHour =
1345 haveMin =
1346 haveSec = true;
1347
1348 const Tm tm = dt.GetTm();
1349 hour = tm.hour;
1350 min = tm.min;
1351 sec = tm.sec;
1352 }
1353 break;
1354
1355 case wxT('y'): // year without century (00-99)
1356 if ( !GetNumericToken(width, input, end, &num) ||
1357 (num > 99) )
1358 {
1359 // no match
1360 return false;
1361 }
1362
1363 haveYear = true;
1364
1365 // TODO should have an option for roll over date instead of
1366 // hard coding it here
1367 year = (num > 30 ? 1900 : 2000) + (wxDateTime_t)num;
1368 break;
1369
1370 case wxT('Y'): // year with century
1371 if ( !GetNumericToken(width, input, end, &num) )
1372 {
1373 // no match
1374 return false;
1375 }
1376
1377 haveYear = true;
1378 year = (wxDateTime_t)num;
1379 break;
1380
1381 case wxT('Z'): // timezone name
1382 // FIXME: currently we just ignore everything that looks like a
1383 // time zone here
1384 GetAlphaToken(input, end);
1385 break;
1386
1387 case wxT('%'): // a percent sign
1388 if ( *input++ != wxT('%') )
1389 {
1390 // no match
1391 return false;
1392 }
1393 break;
1394
1395 case 0: // the end of string
1396 wxFAIL_MSG(wxT("unexpected format end"));
1397
1398 // fall through
1399
1400 default: // not a known format spec
1401 return false;
1402 }
1403 }
1404
1405 // format matched, try to construct a date from what we have now
1406 Tm tmDef;
1407 if ( dateDef.IsValid() )
1408 {
1409 // take this date as default
1410 tmDef = dateDef.GetTm();
1411 }
1412 else if ( IsValid() )
1413 {
1414 // if this date is valid, don't change it
1415 tmDef = GetTm();
1416 }
1417 else
1418 {
1419 // no default and this date is invalid - fall back to Today()
1420 tmDef = Today().GetTm();
1421 }
1422
1423 Tm tm = tmDef;
1424
1425 // set the date
1426 if ( haveMon )
1427 {
1428 tm.mon = mon;
1429 }
1430
1431 if ( haveYear )
1432 {
1433 tm.year = year;
1434 }
1435
1436 // TODO we don't check here that the values are consistent, if both year
1437 // day and month/day were found, we just ignore the year day and we
1438 // also always ignore the week day
1439 if ( haveDay )
1440 {
1441 if ( mday > GetNumberOfDays(tm.mon, tm.year) )
1442 return false;
1443
1444 tm.mday = mday;
1445 }
1446 else if ( haveYDay )
1447 {
1448 if ( yday > GetNumberOfDays(tm.year) )
1449 return false;
1450
1451 Tm tm2 = wxDateTime(1, Jan, tm.year).SetToYearDay(yday).GetTm();
1452
1453 tm.mon = tm2.mon;
1454 tm.mday = tm2.mday;
1455 }
1456
1457 // deal with AM/PM
1458 if ( haveHour && hourIsIn12hFormat && isPM )
1459 {
1460 // translate to 24hour format
1461 hour += 12;
1462 }
1463 //else: either already in 24h format or no translation needed
1464
1465 // set the time
1466 if ( haveHour )
1467 {
1468 tm.hour = hour;
1469 }
1470
1471 if ( haveMin )
1472 {
1473 tm.min = min;
1474 }
1475
1476 if ( haveSec )
1477 {
1478 tm.sec = sec;
1479 }
1480
1481 if ( haveMsec )
1482 tm.msec = msec;
1483
1484 Set(tm);
1485
1486 // finally check that the week day is consistent -- if we had it
1487 if ( haveWDay && GetWeekDay() != wday )
1488 return false;
1489
1490 *endParse = input;
1491
1492 return true;
1493}
1494
1495bool
1496wxDateTime::ParseDateTime(const wxString& date, wxString::const_iterator *end)
1497{
1498 wxCHECK_MSG( end, false, "end iterator pointer must be specified" );
1499
1500 wxDateTime
1501 dtDate,
1502 dtTime;
1503
1504 wxString::const_iterator
1505 endTime,
1506 endDate,
1507 endBoth;
1508
1509 // If we got a date in the beginning, see if there is a time specified
1510 // after the date
1511 if ( dtDate.ParseDate(date, &endDate) )
1512 {
1513 // Skip spaces, as the ParseTime() function fails on spaces
1514 while ( endDate != date.end() && wxIsspace(*endDate) )
1515 ++endDate;
1516
1517 const wxString timestr(endDate, date.end());
1518 if ( !dtTime.ParseTime(timestr, &endTime) )
1519 return false;
1520
1521 endBoth = endDate + (endTime - timestr.begin());
1522 }
1523 else // no date in the beginning
1524 {
1525 // check if we have a time followed by a date
1526 if ( !dtTime.ParseTime(date, &endTime) )
1527 return false;
1528
1529 while ( endTime != date.end() && wxIsspace(*endTime) )
1530 ++endTime;
1531
1532 const wxString datestr(endTime, date.end());
1533 if ( !dtDate.ParseDate(datestr, &endDate) )
1534 return false;
1535
1536 endBoth = endTime + (endDate - datestr.begin());
1537 }
1538
1539 Set(dtDate.GetDay(), dtDate.GetMonth(), dtDate.GetYear(),
1540 dtTime.GetHour(), dtTime.GetMinute(), dtTime.GetSecond(),
1541 dtTime.GetMillisecond());
1542
1543 *end = endBoth;
1544
1545 return true;
1546}
1547
1548bool
1549wxDateTime::ParseDate(const wxString& date, wxString::const_iterator *end)
1550{
1551 wxCHECK_MSG( end, false, "end iterator pointer must be specified" );
1552
1553 // this is a simplified version of ParseDateTime() which understands only
1554 // "today" (for wxDate compatibility) and digits only otherwise (and not
1555 // all esoteric constructions ParseDateTime() knows about)
1556
1557 const wxString::const_iterator pBegin = date.begin();
1558 const wxString::const_iterator pEnd = date.end();
1559
1560 wxString::const_iterator p = pBegin;
1561 while ( p != pEnd && wxIsspace(*p) )
1562 p++;
1563
1564 // some special cases
1565 static struct
1566 {
1567 const char *str;
1568 int dayDiffFromToday;
1569 } literalDates[] =
1570 {
1571 { wxTRANSLATE("today"), 0 },
1572 { wxTRANSLATE("yesterday"), -1 },
1573 { wxTRANSLATE("tomorrow"), 1 },
1574 };
1575
1576 const size_t lenRest = pEnd - p;
1577 for ( size_t n = 0; n < WXSIZEOF(literalDates); n++ )
1578 {
1579 const wxString dateStr = wxGetTranslation(literalDates[n].str);
1580 size_t len = dateStr.length();
1581
1582 if ( len > lenRest )
1583 continue;
1584
1585 const wxString::const_iterator pEnd = p + len;
1586 if ( wxString(p, pEnd).CmpNoCase(dateStr) == 0 )
1587 {
1588 // nothing can follow this, so stop here
1589
1590 p = pEnd;
1591
1592 int dayDiffFromToday = literalDates[n].dayDiffFromToday;
1593 *this = Today();
1594 if ( dayDiffFromToday )
1595 {
1596 *this += wxDateSpan::Days(dayDiffFromToday);
1597 }
1598
1599 *end = pEnd;
1600
1601 return true;
1602 }
1603 }
1604
1605 // We try to guess what we have here: for each new (numeric) token, we
1606 // determine if it can be a month, day or a year. Of course, there is an
1607 // ambiguity as some numbers may be days as well as months, so we also
1608 // have the ability to back track.
1609
1610 // what do we have?
1611 bool haveDay = false, // the months day?
1612 haveWDay = false, // the day of week?
1613 haveMon = false, // the month?
1614 haveYear = false; // the year?
1615
1616 bool monWasNumeric = false; // was month specified as a number?
1617
1618 // and the value of the items we have (init them to get rid of warnings)
1619 WeekDay wday = Inv_WeekDay;
1620 wxDateTime_t day = 0;
1621 wxDateTime::Month mon = Inv_Month;
1622 int year = 0;
1623
1624 // tokenize the string
1625 while ( p != pEnd )
1626 {
1627 // skip white space and date delimiters
1628 if ( wxStrchr(".,/-\t\r\n ", *p) )
1629 {
1630 ++p;
1631 continue;
1632 }
1633
1634 // modify copy of the iterator as we're not sure if the next token is
1635 // still part of the date at all
1636 wxString::const_iterator pCopy = p;
1637
1638 // we can have either alphabetic or numeric token, start by testing if
1639 // it's the latter
1640 unsigned long val;
1641 if ( GetNumericToken(10 /* max length */, pCopy, pEnd, &val) )
1642 {
1643 // guess what this number is
1644
1645 bool isDay = false,
1646 isMonth = false,
1647 isYear = false;
1648
1649 if ( !haveMon && val > 0 && val <= 12 )
1650 {
1651 // assume it is month
1652 isMonth = true;
1653 }
1654 else // not the month
1655 {
1656 if ( haveDay )
1657 {
1658 // this can only be the year
1659 isYear = true;
1660 }
1661 else // may be either day or year
1662 {
1663 // use a leap year if we don't have the year yet to allow
1664 // dates like 2/29/1976 which would be rejected otherwise
1665 wxDateTime_t max_days = (wxDateTime_t)(
1666 haveMon
1667 ? GetNumberOfDays(mon, haveYear ? year : 1976)
1668 : 31
1669 );
1670
1671 // can it be day?
1672 if ( (val == 0) || (val > (unsigned long)max_days) )
1673 {
1674 // no
1675 isYear = true;
1676 }
1677 else // yes, suppose it's the day
1678 {
1679 isDay = true;
1680 }
1681 }
1682 }
1683
1684 if ( isYear )
1685 {
1686 if ( haveYear )
1687 break;
1688
1689 haveYear = true;
1690
1691 year = (wxDateTime_t)val;
1692 }
1693 else if ( isDay )
1694 {
1695 if ( haveDay )
1696 break;
1697
1698 haveDay = true;
1699
1700 day = (wxDateTime_t)val;
1701 }
1702 else if ( isMonth )
1703 {
1704 haveMon = true;
1705 monWasNumeric = true;
1706
1707 mon = (Month)(val - 1);
1708 }
1709 }
1710 else // not a number
1711 {
1712 // be careful not to overwrite the current mon value
1713 Month mon2 = GetMonthFromName
1714 (
1715 pCopy, pEnd,
1716 Name_Full | Name_Abbr,
1717 DateLang_Local | DateLang_English
1718 );
1719 if ( mon2 != Inv_Month )
1720 {
1721 // it's a month
1722 if ( haveMon )
1723 {
1724 // but we already have a month - maybe we guessed wrong
1725 // when we had interpreted that numeric value as a month
1726 // and it was the day number instead?
1727 if ( haveDay || !monWasNumeric )
1728 break;
1729
1730 // assume we did and change our mind: reinterpret the month
1731 // value as a day (notice that there is no need to check
1732 // that it is valid as month values are always < 12, but
1733 // the days are counted from 1 unlike the months)
1734 day = (wxDateTime_t)(mon + 1);
1735 haveDay = true;
1736 }
1737
1738 mon = mon2;
1739
1740 haveMon = true;
1741 }
1742 else // not a valid month name
1743 {
1744 WeekDay wday2 = GetWeekDayFromName
1745 (
1746 pCopy, pEnd,
1747 Name_Full | Name_Abbr,
1748 DateLang_Local | DateLang_English
1749 );
1750 if ( wday2 != Inv_WeekDay )
1751 {
1752 // a week day
1753 if ( haveWDay )
1754 break;
1755
1756 wday = wday2;
1757
1758 haveWDay = true;
1759 }
1760 else // not a valid weekday name
1761 {
1762 // try the ordinals
1763 static const char *const ordinals[] =
1764 {
1765 wxTRANSLATE("first"),
1766 wxTRANSLATE("second"),
1767 wxTRANSLATE("third"),
1768 wxTRANSLATE("fourth"),
1769 wxTRANSLATE("fifth"),
1770 wxTRANSLATE("sixth"),
1771 wxTRANSLATE("seventh"),
1772 wxTRANSLATE("eighth"),
1773 wxTRANSLATE("ninth"),
1774 wxTRANSLATE("tenth"),
1775 wxTRANSLATE("eleventh"),
1776 wxTRANSLATE("twelfth"),
1777 wxTRANSLATE("thirteenth"),
1778 wxTRANSLATE("fourteenth"),
1779 wxTRANSLATE("fifteenth"),
1780 wxTRANSLATE("sixteenth"),
1781 wxTRANSLATE("seventeenth"),
1782 wxTRANSLATE("eighteenth"),
1783 wxTRANSLATE("nineteenth"),
1784 wxTRANSLATE("twentieth"),
1785 // that's enough - otherwise we'd have problems with
1786 // composite (or not) ordinals
1787 };
1788
1789 size_t n;
1790 for ( n = 0; n < WXSIZEOF(ordinals); n++ )
1791 {
1792 const wxString ord = wxGetTranslation(ordinals[n]);
1793 const size_t len = ord.length();
1794 if ( date.compare(p - pBegin, len, ord) == 0 )
1795 {
1796 p += len;
1797 break;
1798 }
1799 }
1800
1801 if ( n == WXSIZEOF(ordinals) )
1802 {
1803 // stop here - something unknown
1804 break;
1805 }
1806
1807 // it's a day
1808 if ( haveDay )
1809 {
1810 // don't try anything here (as in case of numeric day
1811 // above) - the symbolic day spec should always
1812 // precede the month/year
1813 break;
1814 }
1815
1816 haveDay = true;
1817
1818 day = (wxDateTime_t)(n + 1);
1819 }
1820 }
1821 }
1822
1823 // advance iterator past a successfully parsed token
1824 p = pCopy;
1825 }
1826
1827 // either no more tokens or the scan was stopped by something we couldn't
1828 // parse - in any case, see if we can construct a date from what we have
1829 if ( !haveDay && !haveWDay )
1830 return false;
1831
1832 if ( haveWDay && (haveMon || haveYear || haveDay) &&
1833 !(haveDay && haveMon && haveYear) )
1834 {
1835 // without adjectives (which we don't support here) the week day only
1836 // makes sense completely separately or with the full date
1837 // specification (what would "Wed 1999" mean?)
1838 return false;
1839 }
1840
1841 if ( !haveWDay && haveYear && !(haveDay && haveMon) )
1842 {
1843 // may be we have month and day instead of day and year?
1844 if ( haveDay && !haveMon )
1845 {
1846 if ( day <= 12 )
1847 {
1848 // exchange day and month
1849 mon = (wxDateTime::Month)(day - 1);
1850
1851 // we're in the current year then
1852 if ( (year > 0) && (year <= (int)GetNumberOfDays(mon, Inv_Year)) )
1853 {
1854 day = (wxDateTime_t)year;
1855
1856 haveMon = true;
1857 haveYear = false;
1858 }
1859 //else: no, can't exchange, leave haveMon == false
1860 }
1861 }
1862
1863 if ( !haveMon )
1864 return false;
1865 }
1866
1867 if ( !haveMon )
1868 {
1869 mon = GetCurrentMonth();
1870 }
1871
1872 if ( !haveYear )
1873 {
1874 year = GetCurrentYear();
1875 }
1876
1877 if ( haveDay )
1878 {
1879 // normally we check the day above but the check is optimistic in case
1880 // we find the day before its month/year so we have to redo it now
1881 if ( day > GetNumberOfDays(mon, year) )
1882 return false;
1883
1884 Set(day, mon, year);
1885
1886 if ( haveWDay )
1887 {
1888 // check that it is really the same
1889 if ( GetWeekDay() != wday )
1890 return false;
1891 }
1892 }
1893 else // haveWDay
1894 {
1895 *this = Today();
1896
1897 SetToWeekDayInSameWeek(wday);
1898 }
1899
1900 *end = p;
1901
1902 return true;
1903}
1904
1905bool
1906wxDateTime::ParseTime(const wxString& time, wxString::const_iterator *end)
1907{
1908 wxCHECK_MSG( end, false, "end iterator pointer must be specified" );
1909
1910 // first try some extra things
1911 static const struct
1912 {
1913 const char *name;
1914 wxDateTime_t hour;
1915 } stdTimes[] =
1916 {
1917 { wxTRANSLATE("noon"), 12 },
1918 { wxTRANSLATE("midnight"), 00 },
1919 // anything else?
1920 };
1921
1922 for ( size_t n = 0; n < WXSIZEOF(stdTimes); n++ )
1923 {
1924 const wxString timeString = wxGetTranslation(stdTimes[n].name);
1925 if ( timeString.CmpNoCase(wxString(time, timeString.length())) == 0 )
1926 {
1927 // casts required by DigitalMars
1928 Set(stdTimes[n].hour, wxDateTime_t(0), wxDateTime_t(0));
1929
1930 if ( end )
1931 *end = time.begin() + timeString.length();
1932
1933 return true;
1934 }
1935 }
1936
1937 // try all time formats we may think about in the order from longest to
1938 // shortest
1939 static const char *const timeFormats[] =
1940 {
1941 "%I:%M:%S %p", // 12hour with AM/PM
1942 "%H:%M:%S", // could be the same or 24 hour one so try it too
1943 "%I:%M %p", // 12hour with AM/PM but without seconds
1944 "%H:%M", // and a possibly 24 hour version without seconds
1945 "%X", // possibly something from above or maybe something
1946 // completely different -- try it last
1947
1948 // TODO: parse timezones
1949 };
1950
1951 for ( size_t nFmt = 0; nFmt < WXSIZEOF(timeFormats); nFmt++ )
1952 {
1953 if ( ParseFormat(time, timeFormats[nFmt], end) )
1954 return true;
1955 }
1956
1957 return false;
1958}
1959
1960// ----------------------------------------------------------------------------
1961// Workdays and holidays support
1962// ----------------------------------------------------------------------------
1963
1964bool wxDateTime::IsWorkDay(Country WXUNUSED(country)) const
1965{
1966 return !wxDateTimeHolidayAuthority::IsHoliday(*this);
1967}
1968
1969// ============================================================================
1970// wxDateSpan
1971// ============================================================================
1972
1973wxDateSpan WXDLLIMPEXP_BASE operator*(int n, const wxDateSpan& ds)
1974{
1975 wxDateSpan ds1(ds);
1976 return ds1.Multiply(n);
1977}
1978
1979// ============================================================================
1980// wxTimeSpan
1981// ============================================================================
1982
1983wxTimeSpan WXDLLIMPEXP_BASE operator*(int n, const wxTimeSpan& ts)
1984{
1985 return wxTimeSpan(ts).Multiply(n);
1986}
1987
1988// this enum is only used in wxTimeSpan::Format() below but we can't declare
1989// it locally to the method as it provokes an internal compiler error in egcs
1990// 2.91.60 when building with -O2
1991enum TimeSpanPart
1992{
1993 Part_Week,
1994 Part_Day,
1995 Part_Hour,
1996 Part_Min,
1997 Part_Sec,
1998 Part_MSec
1999};
2000
2001// not all strftime(3) format specifiers make sense here because, for example,
2002// a time span doesn't have a year nor a timezone
2003//
2004// Here are the ones which are supported (all of them are supported by strftime
2005// as well):
2006// %H hour in 24 hour format
2007// %M minute (00 - 59)
2008// %S second (00 - 59)
2009// %% percent sign
2010//
2011// Also, for MFC CTimeSpan compatibility, we support
2012// %D number of days
2013//
2014// And, to be better than MFC :-), we also have
2015// %E number of wEeks
2016// %l milliseconds (000 - 999)
2017wxString wxTimeSpan::Format(const wxString& format) const
2018{
2019 // we deal with only positive time spans here and just add the sign in
2020 // front for the negative ones
2021 if ( IsNegative() )
2022 {
2023 wxString str(Negate().Format(format));
2024 return "-" + str;
2025 }
2026
2027 wxCHECK_MSG( !format.empty(), wxEmptyString,
2028 wxT("NULL format in wxTimeSpan::Format") );
2029
2030 wxString str;
2031 str.Alloc(format.length());
2032
2033 // Suppose we have wxTimeSpan ts(1 /* hour */, 2 /* min */, 3 /* sec */)
2034 //
2035 // Then, of course, ts.Format("%H:%M:%S") must return "01:02:03", but the
2036 // question is what should ts.Format("%S") do? The code here returns "3273"
2037 // in this case (i.e. the total number of seconds, not just seconds % 60)
2038 // because, for me, this call means "give me entire time interval in
2039 // seconds" and not "give me the seconds part of the time interval"
2040 //
2041 // If we agree that it should behave like this, it is clear that the
2042 // interpretation of each format specifier depends on the presence of the
2043 // other format specs in the string: if there was "%H" before "%M", we
2044 // should use GetMinutes() % 60, otherwise just GetMinutes() &c
2045
2046 // we remember the most important unit found so far
2047 TimeSpanPart partBiggest = Part_MSec;
2048
2049 for ( wxString::const_iterator pch = format.begin(); pch != format.end(); ++pch )
2050 {
2051 wxChar ch = *pch;
2052
2053 if ( ch == wxT('%') )
2054 {
2055 // the start of the format specification of the printf() below
2056 wxString fmtPrefix(wxT('%'));
2057
2058 // the number
2059 long n;
2060
2061 // the number of digits for the format string, 0 if unused
2062 unsigned digits = 0;
2063
2064 ch = *++pch; // get the format spec char
2065 switch ( ch )
2066 {
2067 default:
2068 wxFAIL_MSG( wxT("invalid format character") );
2069 // fall through
2070
2071 case wxT('%'):
2072 str += ch;
2073
2074 // skip the part below switch
2075 continue;
2076
2077 case wxT('D'):
2078 n = GetDays();
2079 if ( partBiggest < Part_Day )
2080 {
2081 n %= DAYS_PER_WEEK;
2082 }
2083 else
2084 {
2085 partBiggest = Part_Day;
2086 }
2087 break;
2088
2089 case wxT('E'):
2090 partBiggest = Part_Week;
2091 n = GetWeeks();
2092 break;
2093
2094 case wxT('H'):
2095 n = GetHours();
2096 if ( partBiggest < Part_Hour )
2097 {
2098 n %= HOURS_PER_DAY;
2099 }
2100 else
2101 {
2102 partBiggest = Part_Hour;
2103 }
2104
2105 digits = 2;
2106 break;
2107
2108 case wxT('l'):
2109 n = GetMilliseconds().ToLong();
2110 if ( partBiggest < Part_MSec )
2111 {
2112 n %= 1000;
2113 }
2114 //else: no need to reset partBiggest to Part_MSec, it is
2115 // the least significant one anyhow
2116
2117 digits = 3;
2118 break;
2119
2120 case wxT('M'):
2121 n = GetMinutes();
2122 if ( partBiggest < Part_Min )
2123 {
2124 n %= MIN_PER_HOUR;
2125 }
2126 else
2127 {
2128 partBiggest = Part_Min;
2129 }
2130
2131 digits = 2;
2132 break;
2133
2134 case wxT('S'):
2135 n = GetSeconds().ToLong();
2136 if ( partBiggest < Part_Sec )
2137 {
2138 n %= SEC_PER_MIN;
2139 }
2140 else
2141 {
2142 partBiggest = Part_Sec;
2143 }
2144
2145 digits = 2;
2146 break;
2147 }
2148
2149 if ( digits )
2150 {
2151 fmtPrefix << wxT("0") << digits;
2152 }
2153
2154 str += wxString::Format(fmtPrefix + wxT("ld"), n);
2155 }
2156 else
2157 {
2158 // normal character, just copy
2159 str += ch;
2160 }
2161 }
2162
2163 return str;
2164}
2165
2166#endif // wxUSE_DATETIME
wxWidgets (Impactor)