-const wxChar *wxDateTime::ParseDate(const wxChar *date)
-{
- // this is a simplified version of ParseDateTime() which understands only
- // "today" (for wxDate compatibility) and digits only otherwise (and not
- // all esoteric constructions ParseDateTime() knows about)
-
- wxCHECK_MSG( date, (wxChar *)NULL, _T("NULL pointer in wxDateTime::Parse") );
-
- const wxChar *p = date;
- while ( wxIsspace(*p) )
- p++;
-
- wxString today = _T("today");
- size_t len = today.length();
- if ( wxString(p, len).CmpNoCase(today) == 0 )
- {
- // nothing can follow this, so stop here
- p += len;
-
- *this = Today();
-
- return p;
- }
-
- // what do we have?
- bool haveDay = FALSE, // the months day?
- haveWDay = FALSE, // the day of week?
- haveMon = FALSE, // the month?
- haveYear = FALSE; // the year?
-
- // and the value of the items we have (init them to get rid of warnings)
- WeekDay wday = Inv_WeekDay;
- wxDateTime_t day = 0;
- wxDateTime::Month mon = Inv_Month;
- int year = 0;
-
- // tokenize the string
- wxStringTokenizer tok(p, _T(",/-\t\n "));
- while ( tok.HasMoreTokens() )
- {
- wxString token = tok.GetNextToken();
-
- // is it a number?
- unsigned long val;
- if ( token.ToULong(&val) )
- {
- // guess what this number is
-
- bool isDay = FALSE,
- isMonth = FALSE,
- // only years are counted from 0
- isYear = (val == 0) || (val > 31);
- if ( !isYear )
- {
- // may be the month or month day or the year, assume the
- // month day by default and fallback to month if the range
- // allow it or to the year if our assumption doesn't work
- if ( haveDay )
- {
- // we already have the day, so may only be a month or year
- if ( val > 12 )
- {
- isYear = TRUE;
- }
- else
- {
- isMonth = TRUE;
- }
- }
- else // it may be day
- {
- isDay = TRUE;
-
- // check the range
- if ( haveMon )
- {
- if ( val > GetNumOfDaysInMonth(haveYear ? year
- : Inv_Year,
- mon) )
- {
- // oops, it can't be a day finally
- isDay = FALSE;
-
- if ( val > 12 )
- {
- isYear = TRUE;
- }
- else
- {
- isMonth = TRUE;
- }
- }
- }
- }
- }
-
- // remember that we have this and stop the scan if it's the second
- // time we find this, except for the day logic (see there)
- if ( isYear )
- {
- if ( haveYear )
- {
- break;
- }
-
- haveYear = TRUE;
-
- // no roll over - 99 means 99, not 1999 for us
- year = (wxDateTime_t)val;
- }
- else if ( isMonth )
- {
- if ( haveMon )
- {
- break;
- }
-
- haveMon = TRUE;
-
- mon = (wxDateTime::Month)val;
- }
- else
- {
- wxASSERT_MSG( isDay, _T("logic error") );
-
- if ( haveDay )
- {
- // may be were mistaken when we found it for the first
- // time? may be it was a month or year instead?
- //
- // this ability to "backtrack" allows us to correctly parse
- // both things like 01/13 and 13/01 - but, of course, we
- // still can't resolve the ambiguity in 01/02 (it will be
- // Feb 1 for us, not Jan 2 as americans might expect!)
- if ( (day <= 12) && !haveMon )
- {
- // exchange day and month
- mon = (wxDateTime::Month)day;
-
- haveMon = TRUE;
- }
- else if ( !haveYear )
- {
- // exchange day and year
- year = day;
-
- haveYear = TRUE;
- }
- }
-
- haveDay = TRUE;
-
- day = (wxDateTime_t)val;
- }
- }
- else // not a number
- {
- mon = GetMonthFromName(token, Name_Full | Name_Abbr);
- if ( mon != Inv_Month )
- {
- // it's a month
- if ( haveMon )
- {
- break;
- }
-
- haveMon = TRUE;
- }
- else
- {
- wday = GetWeekDayFromName(token, Name_Full | Name_Abbr);
- if ( wday != Inv_WeekDay )
- {
- // a week day
- if ( haveWDay )
- {
- break;
- }
-
- haveWDay = TRUE;
- }
- else
- {
- // try the ordinals
- static const wxChar *ordinals[] =
- {
- wxTRANSLATE("first"),
- wxTRANSLATE("second"),
- wxTRANSLATE("third"),
- wxTRANSLATE("fourth"),
- wxTRANSLATE("fifth"),
- wxTRANSLATE("sixth"),
- wxTRANSLATE("seventh"),
- wxTRANSLATE("eighth"),
- wxTRANSLATE("ninth"),
- wxTRANSLATE("tenth"),
- wxTRANSLATE("eleventh"),
- wxTRANSLATE("twelfth"),
- wxTRANSLATE("thirteenth"),
- wxTRANSLATE("fourteenth"),
- wxTRANSLATE("fifteenth"),
- wxTRANSLATE("sixteenth"),
- wxTRANSLATE("seventeenth"),
- wxTRANSLATE("eighteenth"),
- wxTRANSLATE("nineteenth"),
- wxTRANSLATE("twentieth"),
- // that's enough - otherwise we'd have problems with
- // composite (or not) ordinals otherwise
- };
-
- size_t n;
- for ( n = 0; n < WXSIZEOF(ordinals); n++ )
- {
- if ( token.CmpNoCase(ordinals[n]) == 0 )
- {
- break;
- }
- }
-
- if ( n == WXSIZEOF(ordinals) )
- {
- // stop here - something unknown
- break;
- }
-
- // it's a day
- if ( haveDay )
- {
- // don't try anything here (as in case of numeric day
- // above) - the symbolic day spec should always
- // precede the month/year
- break;
- }
-
- haveDay = TRUE;
-
- day = n + 1;
- }
- }
- }
- }
-
- // either no more tokens or the scan was stopped by something we couldn't
- // parse - in any case, see if we can construct a date from what we have
- if ( !haveDay && !haveWDay )
- {
- wxLogDebug(_T("no day, no weekday hence no date."));
-
- return (wxChar *)NULL;
- }
-
- if ( haveWDay && (haveMon || haveYear || haveDay) &&
- !(haveMon && haveMon && haveYear) )
- {
- // without adjectives (which we don't support here) the week day only
- // makes sense completely separately or with the full date
- // specification (what would "Wed 1999" mean?)
- return (wxChar *)NULL;
- }
-
- if ( !haveMon )
- {
- mon = GetCurrentMonth();
- }
-
- if ( !haveYear )
- {
- year = GetCurrentYear();
- }
-
- if ( haveDay )
- {
- Set(day, mon, year);
-
- if ( haveWDay )
- {
- // check that it is really the same
- if ( GetWeekDay() != wday )
- {
- // inconsistency detected
- return (wxChar *)NULL;
- }
- }
- }
- else // haveWDay
- {
- *this = Today();
-
- SetToWeekDayInSameWeek(wday);
- }
-
- // return the pointer to the next char
- return p + wxStrlen(p) - wxStrlen(tok.GetString());
-}
-
-const wxChar *wxDateTime::ParseTime(const wxChar *time)
-{
- wxCHECK_MSG( time, (wxChar *)NULL, _T("NULL pointer in wxDateTime::Parse") );
-
- // first try some extra things
- static const struct
- {
- const wxChar *name;
- wxDateTime_t hour;
- } stdTimes[] =
- {
- { wxTRANSLATE("noon"), 12 },
- { wxTRANSLATE("midnight"), 00 },
- // anything else?
- };
-
- for ( size_t n = 0; n < WXSIZEOF(stdTimes); n++ )
- {
- wxString timeString = wxGetTranslation(stdTimes[n].name);
- size_t len = timeString.length();
- if ( timeString.CmpNoCase(wxString(time, len)) == 0 )
- {
- Set(stdTimes[n].hour, 0, 0);
-
- return time + len;
- }
- }
-
- // try all time formats we may think about starting with the standard one
- const wxChar *result = ParseFormat(time, _T("%X"));
- if ( !result )
- {
- // normally, it's the same, but why not try it?
- result = ParseFormat(time, _T("%H:%M:%S"));
- }
-
- if ( !result )
- {
- // 12hour with AM/PM?
- result = ParseFormat(time, _T("%I:%M:%S %p"));
- }
-
- if ( !result )
- {
- // without seconds?
- result = ParseFormat(time, _T("%H:%M"));
- }
-
- if ( !result )
- {
- // 12hour with AM/PM but without seconds?
- result = ParseFormat(time, _T("%I:%M %p"));
- }
-
- if ( !result )
- {
- // just the hour?
- result = ParseFormat(time, _T("%H"));
- }
-
- if ( !result )
- {
- // just the hour and AM/PM?
- result = ParseFormat(time, _T("%I %p"));
- }
-
- // TODO: parse timezones
-
- return result;
-}
-
-// ----------------------------------------------------------------------------
-// Workdays and holidays support
-// ----------------------------------------------------------------------------
-
-bool wxDateTime::IsWorkDay(Country WXUNUSED(country)) const
-{
- return !wxDateTimeHolidayAuthority::IsHoliday(*this);
-}
-
-// ============================================================================
-// wxTimeSpan
-// ============================================================================
-
-// not all strftime(3) format specifiers make sense here because, for example,
-// a time span doesn't have a year nor a timezone
-//
-// Here are the ones which are supported (all of them are supported by strftime
-// as well):
-// %H hour in 24 hour format
-// %M minute (00 - 59)
-// %S second (00 - 59)
-// %% percent sign
-//
-// Also, for MFC CTimeSpan compatibility, we support
-// %D number of days
-//
-// And, to be better than MFC :-), we also have
-// %E number of wEeks
-// %l milliseconds (000 - 999)
-wxString wxTimeSpan::Format(const wxChar *format) const
-{
- wxCHECK_MSG( format, _T(""), _T("NULL format in wxTimeSpan::Format") );
-
- wxString str;
- str.Alloc(wxStrlen(format));
-
- for ( const wxChar *pch = format; pch; pch++ )
- {
- wxChar ch = *pch;
-
- if ( ch == '%' )
- {
- wxString tmp;
-
- ch = *pch++;
- switch ( ch )
- {
- default:
- wxFAIL_MSG( _T("invalid format character") );
- // fall through
-
- case '%':
- // will get to str << ch below
- break;
-
- case 'D':
- tmp.Printf(_T("%d"), GetDays());
- break;
-
- case 'E':
- tmp.Printf(_T("%d"), GetWeeks());
- break;
-
- case 'H':
- tmp.Printf(_T("%02d"), GetHours());
- break;
-
- case 'l':
- tmp.Printf(_T("%03ld"), GetMilliseconds().ToLong());
- break;
-
- case 'M':
- tmp.Printf(_T("%02d"), GetMinutes());
- break;
-
- case 'S':
- tmp.Printf(_T("%02ld"), GetSeconds().ToLong());
- break;
- }
-
- if ( !!tmp )
- {
- str += tmp;
-
- // skip str += ch below
- continue;
- }
- }
-
- str += ch;
- }
-
- return str;
-}
-
-// ============================================================================
-// wxDateTimeHolidayAuthority and related classes
-// ============================================================================
-
-#include "wx/arrimpl.cpp"
-
-WX_DEFINE_OBJARRAY(wxDateTimeArray)
-
-static int wxCMPFUNC_CONV
-wxDateTimeCompareFunc(wxDateTime **first, wxDateTime **second)
-{
- wxDateTime dt1 = **first,
- dt2 = **second;
-
- return dt1 == dt2 ? 0 : dt1 < dt2 ? -1 : +1;
-}
-
-// ----------------------------------------------------------------------------
-// wxDateTimeHolidayAuthority
-// ----------------------------------------------------------------------------
-
-wxHolidayAuthoritiesArray wxDateTimeHolidayAuthority::ms_authorities;
-
-/* static */
-bool wxDateTimeHolidayAuthority::IsHoliday(const wxDateTime& dt)
-{
- size_t count = ms_authorities.GetCount();
- for ( size_t n = 0; n < count; n++ )
- {
- if ( ms_authorities[n]->DoIsHoliday(dt) )
- {
- return TRUE;
- }
- }
-
- return FALSE;
-}
-
-/* static */
-size_t
-wxDateTimeHolidayAuthority::GetHolidaysInRange(const wxDateTime& dtStart,
- const wxDateTime& dtEnd,
- wxDateTimeArray& holidays)
-{
- wxDateTimeArray hol;
-
- holidays.Empty();
-
- size_t count = ms_authorities.GetCount();
- for ( size_t n = 0; n < count; n++ )
- {
- ms_authorities[n]->DoGetHolidaysInRange(dtStart, dtEnd, hol);
-
- WX_APPEND_ARRAY(holidays, hol);
- }
-
- holidays.Sort(wxDateTimeCompareFunc);
-
- return holidays.GetCount();
-}
-
-/* static */
-void wxDateTimeHolidayAuthority::ClearAllAuthorities()
-{
- WX_CLEAR_ARRAY(ms_authorities);
-}
-
-/* static */
-void wxDateTimeHolidayAuthority::AddAuthority(wxDateTimeHolidayAuthority *auth)
-{
- ms_authorities.Add(auth);
-}
-
-// ----------------------------------------------------------------------------
-// wxDateTimeWorkDays
-// ----------------------------------------------------------------------------
-
-bool wxDateTimeWorkDays::DoIsHoliday(const wxDateTime& dt) const
-{
- wxDateTime::WeekDay wd = dt.GetWeekDay();
-
- return (wd == wxDateTime::Sun) || (wd == wxDateTime::Sat);
-}
-
-size_t wxDateTimeWorkDays::DoGetHolidaysInRange(const wxDateTime& dtStart,
- const wxDateTime& dtEnd,
- wxDateTimeArray& holidays) const
-{
- if ( dtStart > dtEnd )
- {
- wxFAIL_MSG( _T("invalid date range in GetHolidaysInRange") );
-
- return 0u;
- }
-
- holidays.Empty();
-
- // instead of checking all days, start with the first Sat after dtStart and
- // end with the last Sun before dtEnd
- wxDateTime dtSatFirst = dtStart.GetNextWeekDay(wxDateTime::Sat),
- dtSatLast = dtEnd.GetPrevWeekDay(wxDateTime::Sat),
- dtSunFirst = dtStart.GetNextWeekDay(wxDateTime::Sun),
- dtSunLast = dtEnd.GetPrevWeekDay(wxDateTime::Sun),
- dt;
-
- for ( dt = dtSatFirst; dt <= dtSatLast; dt += wxDateSpan::Week() )
- {
- holidays.Add(dt);
- }
-
- for ( dt = dtSunFirst; dt <= dtSunLast; dt += wxDateSpan::Week() )
- {
- holidays.Add(dt);
- }
-
- return holidays.GetCount();
-}