/home/ntakagi/work/STLport-5.1.5/stlport/stl/_time_facets.c Go to the documentation of this file. /* * 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 (__BORLANDC__) 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) /* * 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. */ 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 /* __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:

• ソフトウェア開発
• ホームページ制作
• Doxygen Source Document
• Tcl Source Document