/*

  * © Portions copyright (c) 2006-2007 Nokia Corporation.  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.

  *

  */ 

 // WARNING: This is an internal header file, included by other C++

 // standard library headers.  You should not attempt to use this header

 // file directly.

 #ifndef _STLP_INTERNAL_TIME_FACETS_H

 #define _STLP_INTERNAL_TIME_FACETS_H

 #ifndef _STLP_CTIME

 # include <ctime>                // Needed (for struct tm) by time facets

 #endif

 #include <stl/c_locale.h>

 #include <stl/_ios_base.h>

 _STLP_BEGIN_NAMESPACE

 // Template functions used by time_get

 // Matching input against a list of names

 // Alphabetic input of the names of months and the names

 // of weekdays requires matching input against a list of names.

 // We use a simple generic algorithm to accomplish this.  This

 // algorithm is not very efficient, especially for longer lists

 // of names, but it probably does not matter for the initial

 // implementation and it may never matter, since we do not expect

 // this kind of input to be used very often.  The algorithm

 // could be improved fairly simply by creating a new list of

 // names still in the running at each iteration.  A more sophisticated

 // approach would be to build a trie to do the matching.

 //

 // We compare each character of the input to the corresponding

 // character of each name on the list that has not been eliminated,

 // either because every character in the name has already been

 // matched, or because some character has not been matched.  We

 // continue only as long as there are some names that have not been

 // eliminated.

 // We do not really need a random access iterator (a forward iterator

 // would do), but the extra generality makes the notation clumsier,

 // and we don't really need it.

 // We can recognize a failed match by the fact that the second

 // component of the return value will be __name_end.

 #define _MAXNAMES        64

 #define _MAX_NAME_LENGTH 64

 // Both time_get and time_put need a structure of type _Time_Info

 // to provide names and abbreviated names for months and days,

 // as well as the am/pm designator.  The month and weekday tables

 // have the all the abbreviated names before all the full names.

 // The _Time_Info tables are initialized using the non-template

 // function _Init_timeinfo, which has two overloadings:  one

 // with a single reference parameter for the table to be initialized,

 // and one with a second _Locale_time * parameter.  The first form

 // is called by the default constructor and the second by a special

 // constructor invoked from the _byname subclass constructor to

 // construct the base class.

 class _STLP_CLASS_DECLSPEC _Time_Info {

 public:

   string _M_dayname[14];

   string _M_monthname[24];

   string _M_am_pm[2];

   string _M_time_format;

   string _M_date_format;

   string _M_date_time_format;

   string _M_long_date_format;

   string _M_long_date_time_format;

 };

 _STLP_DECLSPEC void _STLP_CALL _Init_timeinfo(_Time_Info&);

 _STLP_DECLSPEC void _STLP_CALL _Init_timeinfo(_Time_Info&, _Locale_time*);

 class _STLP_CLASS_DECLSPEC time_base {

 public:

   enum dateorder {no_order, dmy, mdy, ymd, ydm};

 };

 template <class _Ch, __DFL_TMPL_PARAM( _InIt , istreambuf_iterator<_Ch>) >

 class time_get : public locale::facet, public time_base 

 {

   friend class _Locale;

 public:

   typedef _Ch   char_type;

   typedef _InIt iter_type;

   explicit  time_get(size_t __refs = 0)   : _BaseFacet(__refs) {

       _Init_timeinfo(_M_timeinfo);

   }

   dateorder date_order() const { return do_date_order(); }

   iter_type get_time(iter_type __s, iter_type  __end, ios_base&  __str,

                      ios_base::iostate&  __err, tm* __t) const

     { return do_get_time(__s,  __end,  __str,  __err, __t); }

   iter_type get_date(iter_type __s, iter_type  __end, ios_base&  __str,

                      ios_base::iostate&  __err, tm* __t) const

     { return do_get_date(__s,  __end,  __str,  __err, __t); }

   iter_type get_weekday(iter_type __s, iter_type  __end, ios_base&  __str,

                         ios_base::iostate&  __err, tm* __t) const

     { return do_get_weekday(__s,  __end,  __str,  __err, __t); }

   iter_type get_monthname(iter_type __s, iter_type  __end, ios_base&  __str,

                           ios_base::iostate&  __err, tm* __t) const

     { return do_get_monthname(__s,  __end,  __str,  __err, __t); }

   iter_type get_year(iter_type __s, iter_type  __end, ios_base&  __str,

                      ios_base::iostate&  __err, tm* __t) const

     { return do_get_year(__s,  __end,  __str,  __err, __t); }

 #if defined(__LIBSTD_CPP_SYMBIAN32_WSD__) || defined(_STLP_LIBSTD_CPP_NO_STATIC_VAR_)

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId();

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId(istreambuf_iterator<wchar_t, char_traits<wchar_t> >*);

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId(const wchar_t**);

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId(istreambuf_iterator<char, char_traits<char> >*);

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId(const char**);

 #else

  	_STLP_STATIC_MEMBER_DECLSPEC static locale::id id;

 #endif

 protected:

   _Time_Info _M_timeinfo;

   time_get(_Locale_time *, size_t __refs) : _BaseFacet(__refs) {}

   ~time_get() {}

   virtual dateorder do_date_order() const {return no_order;}

   virtual iter_type do_get_time(iter_type __s, iter_type  __end,

                                 ios_base&, ios_base::iostate&  __err,

                                 tm* __t) const;

   virtual iter_type do_get_date(iter_type __s, iter_type  __end,

                                 ios_base&, ios_base::iostate& __err,

                                 tm* __t) const;

   virtual iter_type do_get_weekday(iter_type __s, iter_type  __end,

                                    ios_base&,

                                    ios_base::iostate& __err,

                                    tm* __t) const;

   virtual iter_type do_get_monthname(iter_type __s, iter_type  __end,

                                      ios_base&,

                                      ios_base::iostate& __err,

                                      tm* __t) const;

   virtual iter_type do_get_year(iter_type __s, iter_type  __end,

                                 ios_base&, ios_base::iostate& __err,

                                 tm* __t) const;

 };

 time_base::dateorder _STLP_CALL

 _STLP_DECLSPEC __get_date_order(_Locale_time*);

 _Locale_time* _STLP_CALL __acquire_time(const char* __name);

 void          _STLP_CALL __release_time(_Locale_time* __time);

 template <class _Ch, __DFL_TMPL_PARAM( _InIt , istreambuf_iterator<_Ch>) >

 class time_get_byname : public time_get<_Ch, _InIt> 

 {

 public:

   typedef  time_base::dateorder dateorder;

   typedef _InIt                 iter_type;

   explicit   time_get_byname(const char* __name, size_t __refs = 0)

     : time_get<_Ch, _InIt>((_Locale_time*) 0, __refs),

       _M_time(__acquire_time(__name))

     { _Init_timeinfo(this->_M_timeinfo, this->_M_time); }

 protected:

   ~time_get_byname() { __release_time(_M_time); }

   dateorder do_date_order() const { return __get_date_order(_M_time); }

 private:

   _Locale_time* _M_time;

 };

 // time_put facet

 // For the formats 'x, 'X', and 'c', do_put calls the first form of

 // put with the pattern obtained from _M_timeinfo._M_date_format or

 // _M_timeinfo._M_time_format.

 // Helper function:  __  takes a single-character

 // format.  As indicated by the foregoing remark, this will never be

 // 'x', 'X', or 'c'.

 _STLP_DECLSPEC char * _STLP_CALL

 __write_formatted_time(char * __buf, char __format, char __modifier,

                        const _Time_Info& __table, const tm* __t);

 template <class _OuIt>

 inline _OuIt _STLP_CALL __put_time(char * __first, char * __last, _OuIt __out,

                                    const ios_base& /* __loc */, char) {

     return copy(__first, __last, __out);

 }

 # ifndef _STLP_NO_WCHAR_T

 template <class _OuIt>

 _OuIt _STLP_CALL __put_time(char * __first, char * __last, _OuIt __out,

                             const ios_base& __s, wchar_t);

 # endif

 template<class _Ch, __DFL_TMPL_PARAM( _OutputIter , ostreambuf_iterator<_Ch> ) >

 class time_put : public locale::facet, public time_base

 {

   friend class _Locale;

 public:

   typedef _Ch      char_type;

   typedef _OutputIter iter_type;

   explicit   time_put(size_t __refs = 0) : _BaseFacet(__refs) {

     _Init_timeinfo(_M_timeinfo);

   }

   _OutputIter put(iter_type __s, ios_base& __f, _Ch __fill,

 		  const tm* __tmb,

 		  const _Ch* __pat, const _Ch* __pat_end) const;

   _OutputIter put(iter_type __s, ios_base& __f, _Ch  __fill,

 		  const tm* __tmb, char __format, char __modifier = 0) const { 

     return do_put(__s, __f,  __fill, __tmb, __format, __modifier); 

   }

 #if defined(__LIBSTD_CPP_SYMBIAN32_WSD__) || defined(_STLP_LIBSTD_CPP_NO_STATIC_VAR_)

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId();

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId(ostreambuf_iterator<wchar_t, char_traits<wchar_t> >*);

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId(wchar_t**);

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId(ostreambuf_iterator<char, char_traits<char> >*);

     _STLP_STATIC_MEMBER_DECLSPEC static locale::id& GetFacetLocaleId(char**);

 #else

    	_STLP_STATIC_MEMBER_DECLSPEC static locale::id id;

 #endif

 protected:

   _Time_Info _M_timeinfo;

   time_put(_Locale_time* /*__time*/, size_t __refs) : _BaseFacet(__refs) {

     //    _Init_timeinfo(_M_timeinfo, __time);

   }

   ~time_put() {}

   virtual iter_type do_put(iter_type __s, ios_base& __f,

                            char_type  /* __fill */, const tm* __tmb,

                            char __format, char /* __modifier */) const;

 };

 template <class _Ch, __DFL_TMPL_PARAM( _InIt , ostreambuf_iterator<_Ch> ) >

 class time_put_byname : public time_put<_Ch, _InIt> 

 {

   friend class _Locale;

 public:

   typedef time_base::dateorder dateorder;

   typedef _InIt iter_type;

   typedef _Ch   char_type;

   explicit    time_put_byname(const char * __name, size_t __refs = 0)

     : time_put<_Ch, _InIt>((_Locale_time*) 0, __refs),

     _M_time(__acquire_time(__name))

   { _Init_timeinfo(this->_M_timeinfo, this->_M_time); }

 protected:

   ~time_put_byname() { __release_time(_M_time); }

 private:

   _Locale_time* _M_time;

 };

 # ifdef _STLP_USE_TEMPLATE_EXPORT

 _STLP_EXPORT_TEMPLATE_CLASS time_get<char, istreambuf_iterator<char, char_traits<char> > >;

 _STLP_EXPORT_TEMPLATE_CLASS time_put<char, ostreambuf_iterator<char, char_traits<char> > >;

 // _STLP_EXPORT_TEMPLATE_CLASS time_get<char, const char*>;

 // _STLP_EXPORT_TEMPLATE_CLASS time_put<char, char*>;

 #  ifndef _STLP_NO_WCHAR_T

 _STLP_EXPORT_TEMPLATE_CLASS time_get<wchar_t, istreambuf_iterator<wchar_t, char_traits<wchar_t> > >;

 _STLP_EXPORT_TEMPLATE_CLASS time_put<wchar_t, ostreambuf_iterator<wchar_t, char_traits<wchar_t> > >;

 // _STLP_EXPORT_TEMPLATE_CLASS time_get<wchar_t, const wchar_t*>;

 // _STLP_EXPORT_TEMPLATE_CLASS time_put<wchar_t, wchar_t*>;

 #  endif /* INSTANTIATE_WIDE_STREAMS */

 # endif

 # if defined (__BORLANDC__) && defined (_RTLDLL)

 inline void _Stl_loc_init_time_facets() {

 #if defined(__LIBSTD_CPP_SYMBIAN32_WSD__) || defined(_STLP_LIBSTD_CPP_NO_STATIC_VAR_)

   time_get<char, istreambuf_iterator<char, char_traits<char> > >::GetFacetLocaleId()._M_index                      = 16;

   time_get<char, const char*>::GetFacetLocaleId()._M_index         = 17;

   time_put<char, ostreambuf_iterator<char, char_traits<char> > >::GetFacetLocaleId()._M_index                      = 18;

   time_put<char, char*>::GetFacetLocaleId()._M_index               = 19;

 #else

   time_get<char, istreambuf_iterator<char, char_traits<char> > >::GetFacetLocaleId()._M_index                      = 16;

   time_get<char, const char*>::id._M_index         = 17;

   time_put<char, ostreambuf_iterator<char, char_traits<char> > >::GetFacetLocaleId()._M_index                      = 18;

   time_put<char, char*>::id._M_index               = 19;

 #endif

 # ifndef _STLP_NO_WCHAR_T

 #if defined(__LIBSTD_CPP_SYMBIAN32_WSD__) || defined(_STLP_LIBSTD_CPP_NO_STATIC_VAR_)

   time_get<wchar_t, istreambuf_iterator<wchar_t, char_traits<wchar_t> > >::GetFacetLocaleId()._M_index                   = 35;

   time_get<wchar_t, const wchar_t*>::GetFacetLocaleId()._M_index   = 36;

   time_put<wchar_t, ostreambuf_iterator<wchar_t, char_traits<wchar_t> > >::GetFacetLocaleId()._M_index                   = 37;

   time_put<wchar_t, wchar_t*>::GetFacetLocaleId()._M_index         = 38;

 #else

   time_get<wchar_t, istreambuf_iterator<wchar_t, char_traits<wchar_t> > >::id._M_index                   = 35;

   time_get<wchar_t, const wchar_t*>::id._M_index   = 36;

   time_put<wchar_t, ostreambuf_iterator<wchar_t, char_traits<wchar_t> > >::id._M_index                   = 37;

   time_put<wchar_t, wchar_t*>::id._M_index         = 38;

 #endif //__SYMBIAN32__

 # endif //!_STLP_NO_WCHAR_T

 }

 # endif

 _STLP_END_NAMESPACE

 #if defined (_STLP_EXPOSE_STREAM_IMPLEMENTATION) && !defined (_STLP_LINK_TIME_INSTANTIATION)

 #  include <stl/_time_facets.c>

 # endif

 #endif /* _STLP_INTERNAL_TIME_FACETS_H */

 // Local Variables:

 // mode:C++

 // End: