/*
* Portions Copyright (c) 2008 Nokia Corporation and/or its subsidiary(-ies). All rights reserved.
*
* Copyright (c) 1999
* Silicon Graphics Computer Systems, Inc.
*
* Copyright (c) 1999
* Boris Fomitchev
*
* This material is provided "as is", with absolutely no warranty expressed
* or implied. Any use is at your own risk.
*
* Permission to use or copy this software for any purpose is hereby granted
* without fee, provided the above notices are retained on all copies.
* Permission to modify the code and to distribute modified code is granted,
* provided the above notices are retained, and a notice that the code was
* modified is included with the above copyright notice.
*
*/
#ifndef _STLP_TIME_FACETS_C
#define _STLP_TIME_FACETS_C
#ifndef _STLP_INTERNAL_TIME_FACETS_H
# include <stl/_time_facets.h>
#endif
#ifndef _STLP_INTERNAL_NUM_PUT_H
# include <stl/_num_put.h>
#endif
#ifndef _STLP_INTERNAL_NUM_GET_H
# include <stl/_num_get.h>
#endif
_STLP_BEGIN_NAMESPACE
//----------------------------------------------------------------------
// Declarations of static template members.
#if (_STLP_STATIC_TEMPLATE_DATA > 0)
# if !defined(__SYMBIAN32__WSD__)
# if !defined (__BORLANDC__) && (defined (__SYMBIAN32__) && defined(_STLP_DESIGNATED_DLL))
template <class _CharT, class _InputIterator>
locale::id time_get<_CharT, _InputIterator>::id;
template <class _CharT, class _OutputIterator>
locale::id time_put<_CharT, _OutputIterator>::id;
# endif
# if ((defined (__CYGWIN__) || defined (__MINGW32__)) && \
defined (_STLP_USE_DYNAMIC_LIB) && !defined (__BUILDING_STLPORT)) || (defined (__SYMBIAN32__) && defined(_STLP_DESIGNATED_DLL))
/*
* Under cygwin, when STLport is used as a shared library, the id needs
* to be specified as imported otherwise they will be duplicated in the
* calling executable.
*/
# if defined (__SYMBIAN32__)
template <>
locale::id time_get<char, istreambuf_iterator<char, char_traits<char> > >::id; //_STLP_DECLSPEC removed. data should not be exported in symbian
/*
template <>
_STLP_DECLSPEC locale::id time_get<char, const char*>::id;
*/
template <>
locale::id time_put<char, ostreambuf_iterator<char, char_traits<char> > >::id;
/*
template <>
_STLP_DECLSPEC locale::id time_put<char, char*>::id;
*/
# ifndef _STLP_NO_WCHAR_T
template <>
locale::id time_get<wchar_t, istreambuf_iterator<wchar_t, char_traits<wchar_t> > >::id;
/*
template <>
_STLP_DECLSPEC locale::id time_get<wchar_t, const wchar_t*>::id;
*/
template <>
locale::id time_put<wchar_t, ostreambuf_iterator<wchar_t, char_traits<wchar_t> > >::id;
/*
template <>
_STLP_DECLSPEC locale::id time_put<wchar_t, wchar_t*>::id;
*/
# endif /* _STLP_NO_WCHAR_T */
# else
template <>
_STLP_DECLSPEC locale::id time_get<char, istreambuf_iterator<char, char_traits<char> > >::id;
/*
template <>
_STLP_DECLSPEC locale::id time_get<char, const char*>::id;
*/
template <>
_STLP_DECLSPEC locale::id time_put<char, ostreambuf_iterator<char, char_traits<char> > >::id;
/*
template <>
_STLP_DECLSPEC locale::id time_put<char, char*>::id;
*/
# ifndef _STLP_NO_WCHAR_T
template <>
_STLP_DECLSPEC locale::id time_get<wchar_t, istreambuf_iterator<wchar_t, char_traits<wchar_t> > >::id;
/*
template <>
_STLP_DECLSPEC locale::id time_get<wchar_t, const wchar_t*>::id;
*/
template <>
_STLP_DECLSPEC locale::id time_put<wchar_t, ostreambuf_iterator<wchar_t, char_traits<wchar_t> > >::id;
/*
template <>
_STLP_DECLSPEC locale::id time_put<wchar_t, wchar_t*>::id;
*/
# endif /* _STLP_NO_WCHAR_T */
# endif //__SYMBIAN32__
# endif /* _STLP_NO_WCHAR_T */
# endif /* __CUGWIN__ && _STLP_USE_DYNAMIC_LIB */
#else /* ( _STLP_STATIC_TEMPLATE_DATA > 0 ) */
//typedef time_get<char, const char*> time_get_char;
typedef time_get<char, istreambuf_iterator<char, char_traits<char> > > time_get_char_2;
//typedef time_put<char, char*> time_put_char;
typedef time_put<char, ostreambuf_iterator<char, char_traits<char> > > time_put_char_2;
//__DECLARE_INSTANCE(locale::id, time_get_char::id, );
__DECLARE_INSTANCE(locale::id, time_get_char_2::id, );
//__DECLARE_INSTANCE(locale::id, time_put_char::id, );
__DECLARE_INSTANCE(locale::id, time_put_char_2::id, );
# if !defined (_STLP_NO_WCHAR_T)
//typedef time_get<wchar_t, const wchar_t*> time_get_wchar_t;
typedef time_get<wchar_t, istreambuf_iterator<wchar_t, char_traits<wchar_t> > > time_get_wchar_t_2;
//typedef time_put<wchar_t, wchar_t*> time_put_wchar_t;
typedef time_put<wchar_t, ostreambuf_iterator<wchar_t, char_traits<wchar_t> > > time_put_wchar_t_2;
//__DECLARE_INSTANCE(locale::id, time_get_wchar_t::id, );
__DECLARE_INSTANCE(locale::id, time_get_wchar_t_2::id, );
//__DECLARE_INSTANCE(locale::id, time_put_wchar_t::id, );
__DECLARE_INSTANCE(locale::id, time_put_wchar_t_2::id, );
# endif
#endif /* ( _STLP_STATIC_TEMPLATE_DATA > 0 ) */
_STLP_MOVE_TO_PRIV_NAMESPACE
template <class _InIt, class _CharT>
const string* _STLP_CALL
__match(_InIt& __first, _InIt& __last, const string *__name, const string *__name_end,
const ctype<_CharT>& __ct) {
typedef ptrdiff_t difference_type;
difference_type __n = __name_end - __name;
difference_type __i;
size_t __pos = 0;
difference_type __check_count = __n;
bool __do_check[_MAXNAMES];
const string* __matching_name[_MAX_NAME_LENGTH];
for (__i = 0; __i < _MAXNAMES; ++__i)
__do_check[__i] = true;
for (__i = 0; __i < _MAX_NAME_LENGTH; ++__i)
__matching_name[__i] = __name_end;
while (__first != __last) {
for (__i = 0; __i < __n; ++__i) {
if (__do_check[__i]) {
if (*__first == __ct.widen(__name[__i][__pos])) {
if (__pos == (__name[__i].size() - 1)) {
__do_check[__i] = 0;
__matching_name[__pos + 1] = __name + __i;
--__check_count;
if (__check_count == 0) {
++__first;
return __name + __i;
}
}
}
else {
__do_check[__i] = 0;
--__check_count;
if (__check_count == 0)
return __matching_name[__pos];
}
}
}
++__first; ++__pos;
}
return __matching_name[__pos];
}
// __get_formatted_time reads input that is assumed to be formatted
// according to the rules for the C strftime function (C standard,
// 7.12.3.5). This function is used to implement the do_get_time
// and do_get_date virtual functions, which depend on the locale
// specifications for the time and day formats respectively.
// Note the catchall default case, intended mainly for the '%Z'
// format designator, which does not make sense here since the
// representation of timezones is not part of the locale.
//
// The case branches are implemented either by doing a match using
// the appopriate name table or by doing a __get_integer_nogroup.
//
// 'y' format is assumed to mean that the input represents years
// since 1900. That is, 2002 should be represented as 102. There
// is no century-guessing.
//
// The match is successful if and only if the second component of the
// return value is format_end.
// Note that the antepenultimate parameter is being used only to determine
// the correct overloading for the calls to __get_integer_nogroup.
template <class _InIt1, class _Ch>
string::const_iterator _STLP_CALL
__get_formatted_time _STLP_WEAK (_InIt1 __first, _InIt1 __last,
string::const_iterator __format, string::const_iterator __format_end,
_Ch*, const _Time_Info& __table,
const ios_base& __s, ios_base::iostate& __err, tm* __t) {
const ctype<_Ch>& __ct = *__STATIC_CAST(const ctype<_Ch>*, __s._M_ctype_facet());
while (__first != __last && __format != __format_end) {
if (*__format == '%') {
++__format;
char __c = *__format;
if (__c == '#') { //MS extension
++__format;
__c = *__format;
}
switch (__c) {
case 'a': {
const string* __pr = __match(__first, __last,
__table._M_dayname + 0, __table._M_dayname + 7,
__ct);
if (__pr == __table._M_dayname + 7)
return __format;
__t->tm_wday = __STATIC_CAST(int, __pr - __table._M_dayname);
break;
}
case 'A': {
const string* __pr = __match(__first, __last,
__table._M_dayname + 7, __table._M_dayname + 14,
__ct);
if (__pr == __table._M_dayname + 14)
return __format;
__t->tm_wday = __STATIC_CAST(int, __pr - __table._M_dayname - 7);
break;
}
case 'b': {
const string* __pr = __match(__first, __last,
__table._M_monthname + 0, __table._M_monthname + 12,
__ct);
if (__pr == __table._M_monthname + 12)
return __format;
__t->tm_mon = __STATIC_CAST(int, __pr - __table._M_monthname);
break;
}
case 'B': {
const string* __pr = __match(__first, __last,
__table._M_monthname + 12, __table._M_monthname + 24,
__ct);
if (__pr == __table._M_monthname + 24)
return __format;
__t->tm_mon = __STATIC_CAST(int, __pr - __table._M_monthname - 12);
break;
}
case 'd': {
bool __pr = __get_decimal_integer(__first, __last, __t->tm_mday, __STATIC_CAST(_Ch*, 0));
if (!__pr || __t->tm_mday < 1 || __t->tm_mday > 31) {
__err |= ios_base::failbit;
return __format;
}
break;
}
case 'H': case 'I': {
bool __pr = __get_decimal_integer(__first, __last, __t->tm_hour, __STATIC_CAST(_Ch*, 0));
if (!__pr)
return __format;
break;
}
case 'j': {
bool __pr = __get_decimal_integer(__first, __last, __t->tm_yday, __STATIC_CAST(_Ch*, 0));
if (!__pr)
return __format;
break;
}
case 'm': {
bool __pr = __get_decimal_integer(__first, __last, __t->tm_mon, __STATIC_CAST(_Ch*, 0));
--__t->tm_mon;
if (!__pr || __t->tm_mon < 0 || __t->tm_mon > 11) {
__err |= ios_base::failbit;
return __format;
}
break;
}
case 'M': {
bool __pr = __get_decimal_integer(__first, __last, __t->tm_min, __STATIC_CAST(_Ch*, 0));
if (!__pr)
return __format;
break;
}
case 'p': {
const string* __pr = __match(__first, __last,
__table._M_am_pm + 0, __table._M_am_pm + 2, __ct);
if (__pr == __table._M_am_pm + 2)
return __format;
// 12:00 PM <=> 12:00, 12:00 AM <=> 00:00
if (__pr == __table._M_am_pm + 1 && __t->tm_hour != 12 )
__t->tm_hour += 12;
if (__pr == __table._M_am_pm && __t->tm_hour == 12 )
__t->tm_hour = 0;
break;
}
case 'S': {
bool __pr = __get_decimal_integer(__first, __last, __t->tm_sec, __STATIC_CAST(_Ch*, 0));
if (!__pr)
return __format;
break;
}
case 'y': {
bool __pr = __get_decimal_integer(__first, __last, __t->tm_year, __STATIC_CAST(_Ch*, 0));
if (!__pr)
return __format;
break;
}
case 'Y': {
bool __pr = __get_decimal_integer(__first, __last, __t->tm_year, __STATIC_CAST(_Ch*, 0));
__t->tm_year -= 1900;
if (!__pr)
return __format;
break;
}
default:
break;
}
}
else {
if (*__first++ != __ct.widen(*__format)) break;
}
++__format;
}
return __format;
}
template <class _InIt, class _CharT>
bool _STLP_CALL
__get_short_or_long_dayname(_InIt& __first, _InIt& __last, const ctype<_CharT>& __ct,
const _Time_Info& __table, tm* __t) {
const string* __pr =
__match(__first, __last, __table._M_dayname + 0, __table._M_dayname + 14, __ct);
__t->tm_wday = __STATIC_CAST(int, (__pr - __table._M_dayname) % 7);
return __pr != __table._M_dayname + 14;
}
template <class _InIt, class _CharT>
bool _STLP_CALL
__get_short_or_long_monthname(_InIt& __first, _InIt& __last, const ctype<_CharT>& __ct,
const _Time_Info& __table, tm* __t) {
const string* __pr =
__match(__first, __last, __table._M_monthname + 0, __table._M_monthname + 24, __ct);
__t->tm_mon = __STATIC_CAST(int, (__pr - __table._M_monthname) % 12);
return __pr != __table._M_monthname + 24;
}
#if !defined (_STLP_NO_WCHAR_T)
template <class _OuIt>
_OuIt _STLP_CALL
__put_time(char * __first, char * __last, _OuIt __out_ite,
const ios_base& __s, wchar_t) {
const ctype<wchar_t>& __ct = *__STATIC_CAST(const ctype<wchar_t>*, __s._M_ctype_facet());
wchar_t __wbuf[64];
__ct.widen(__first, __last, __wbuf);
ptrdiff_t __len = __last - __first;
wchar_t * __eend = __wbuf + __len;
return copy((wchar_t*)__wbuf, __eend, __out_ite);
}
#endif
_STLP_MOVE_TO_STD_NAMESPACE
template <class _Ch, class _InIt>
_InIt
time_get<_Ch, _InIt>::do_get_date(_InIt __s, _InIt __end,
ios_base& __str, ios_base::iostate& __err,
tm* __t) const {
typedef string::const_iterator string_iterator;
string_iterator __format = _M_timeinfo._M_date_format.begin();
string_iterator __format_end = _M_timeinfo._M_date_format.end();
string_iterator __result
= _STLP_PRIV __get_formatted_time(__s, __end, __format, __format_end,
__STATIC_CAST(_Ch*, 0), _M_timeinfo,
__str, __err, __t);
if (__result == __format_end)
__err = ios_base::goodbit;
else {
__err = ios_base::failbit;
if (__s == __end)
__err |= ios_base::eofbit;
}
return __s;
}
template <class _Ch, class _InIt>
_InIt
time_get<_Ch, _InIt>::do_get_time(_InIt __s, _InIt __end,
ios_base& __str, ios_base::iostate& __err,
tm* __t) const {
typedef string::const_iterator string_iterator;
string_iterator __format = _M_timeinfo._M_time_format.begin();
string_iterator __format_end = _M_timeinfo._M_time_format.end();
string_iterator __result
= _STLP_PRIV __get_formatted_time(__s, __end, __format, __format_end,
__STATIC_CAST(_Ch*, 0), _M_timeinfo,
__str, __err, __t);
__err = __result == __format_end ? ios_base::goodbit
: ios_base::failbit;
if (__s == __end)
__err |= ios_base::eofbit;
return __s;
}
template <class _Ch, class _InIt>
_InIt
time_get<_Ch, _InIt>::do_get_year(_InIt __s, _InIt __end,
ios_base&, ios_base::iostate& __err,
tm* __t) const {
if (__s == __end) {
__err = ios_base::failbit | ios_base::eofbit;
return __s;
}
bool __pr = _STLP_PRIV __get_decimal_integer(__s, __end, __t->tm_year, __STATIC_CAST(_Ch*, 0));
__t->tm_year -= 1900;
__err = __pr ? ios_base::goodbit : ios_base::failbit;
if (__s == __end)
__err |= ios_base::eofbit;
return __s;
}
template <class _Ch, class _InIt>
_InIt
time_get<_Ch, _InIt>::do_get_weekday(_InIt __s, _InIt __end,
ios_base &__str, ios_base::iostate &__err,
tm *__t) const {
const ctype<_Ch>& __ct = *__STATIC_CAST(const ctype<_Ch>*, __str._M_ctype_facet());
bool __result =
_STLP_PRIV __get_short_or_long_dayname(__s, __end, __ct, _M_timeinfo, __t);
if (__result)
__err = ios_base::goodbit;
else {
__err = ios_base::failbit;
if (__s == __end)
__err |= ios_base::eofbit;
}
return __s;
}
template <class _Ch, class _InIt>
_InIt
time_get<_Ch, _InIt>::do_get_monthname(_InIt __s, _InIt __end,
ios_base &__str, ios_base::iostate &__err,
tm *__t) const {
const ctype<_Ch>& __ct = *__STATIC_CAST(const ctype<_Ch>*, __str._M_ctype_facet());
bool __result =
_STLP_PRIV __get_short_or_long_monthname(__s, __end, __ct, _M_timeinfo, __t);
if (__result)
__err = ios_base::goodbit;
else {
__err = ios_base::failbit;
if (__s == __end)
__err |= ios_base::eofbit;
}
return __s;
}
template<class _Ch, class _OutputIter>
_OutputIter
time_put<_Ch,_OutputIter>::put(_OutputIter __s, ios_base& __f, _Ch __fill,
const tm* __tmb, const _Ch* __pat,
const _Ch* __pat_end) const {
// locale __loc = __f.getloc();
// const ctype<_Ch>& _Ct = use_facet<ctype<_Ch> >(__loc);
const ctype<_Ch>& _Ct = *__STATIC_CAST(const ctype<_Ch>*, __f._M_ctype_facet());
while (__pat != __pat_end) {
char __c = _Ct.narrow(*__pat, 0);
if (__c == '%') {
char __mod = 0;
++__pat;
__c = _Ct.narrow(*__pat++, 0);
if (__c == '#') { // MS extension
__mod = __c;
__c = _Ct.narrow(*__pat++, 0);
}
__s = do_put(__s, __f, __fill, __tmb, __c, __mod);
}
else
*__s++ = *__pat++;
}
return __s;
}
template<class _Ch, class _OutputIter>
_OutputIter
time_put<_Ch,_OutputIter>::do_put(_OutputIter __s, ios_base& __f, _Ch /* __fill */,
const tm* __tmb, char __format,
char __modifier ) const {
char __buf[64];
char * __iend = _STLP_PRIV __write_formatted_time(_STLP_ARRAY_AND_SIZE(__buf),
__format, __modifier, _M_timeinfo, __tmb);
// locale __loc = __f.getloc();
return _STLP_PRIV __put_time(__buf, __iend, __s, __f, _Ch());
}
_STLP_END_NAMESPACE
#endif /* _STLP_TIME_FACETS_C */
// Local Variables:
// mode:C++
// End: