1// std::time_get, std::time_put implementation, GNU version -*- C++ -*-
2
3// Copyright (C) 2001-2020 Free Software Foundation, Inc.
4//
5// This file is part of the GNU ISO C++ Library.  This library is free
6// software; you can redistribute it and/or modify it under the
7// terms of the GNU General Public License as published by the
8// Free Software Foundation; either version 3, or (at your option)
9// any later version.
10
11// This library is distributed in the hope that it will be useful,
12// but WITHOUT ANY WARRANTY; without even the implied warranty of
13// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14// GNU General Public License for more details.
15
16// Under Section 7 of GPL version 3, you are granted additional
17// permissions described in the GCC Runtime Library Exception, version
18// 3.1, as published by the Free Software Foundation.
19
20// You should have received a copy of the GNU General Public License and
21// a copy of the GCC Runtime Library Exception along with this program;
22// see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
23// <http://www.gnu.org/licenses/>.
24
25//
26// ISO C++ 14882: 22.2.5.1.2 - time_get virtual functions
27// ISO C++ 14882: 22.2.5.3.2 - time_put virtual functions
28//
29
30// Written by Benjamin Kosnik <bkoz@redhat.com>
31
32#include <locale>
33#include <bits/c++locale_internal.h>
34
35namespace std _GLIBCXX_VISIBILITY(default)
36{
37_GLIBCXX_BEGIN_NAMESPACE_VERSION
38
39  template<>
40    void
41    __timepunct<char>::
42    _M_put(char* __s, size_t __maxlen, const char* __format,
43	   const tm* __tm) const throw()
44    {
45#if __GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ > 2)
46      const size_t __len = __strftime_l(__s, __maxlen, __format, __tm,
47					_M_c_locale_timepunct);
48#else
49      char* __old = setlocale(LC_ALL, 0);
50      const size_t __llen = strlen(__old) + 1;
51      char* __sav = new char[__llen];
52      memcpy(__sav, __old, __llen);
53      setlocale(LC_ALL, _M_name_timepunct);
54      const size_t __len = strftime(__s, __maxlen, __format, __tm);
55      setlocale(LC_ALL, __sav);
56      delete [] __sav;
57#endif
58      // Make sure __s is null terminated.
59      if (__len == 0)
60	__s[0] = '\0';
61    }
62
63  template<>
64    void
65    __timepunct<char>::_M_initialize_timepunct(__c_locale __cloc)
66    {
67      if (!_M_data)
68	_M_data = new __timepunct_cache<char>;
69
70      if (!__cloc)
71	{
72	  // "C" locale
73	  _M_c_locale_timepunct = _S_get_c_locale();
74
75	  _M_data->_M_date_format = "%m/%d/%y";
76	  _M_data->_M_date_era_format = "%m/%d/%y";
77	  _M_data->_M_time_format = "%H:%M:%S";
78	  _M_data->_M_time_era_format = "%H:%M:%S";
79	  _M_data->_M_date_time_format = "";
80	  _M_data->_M_date_time_era_format = "";
81	  _M_data->_M_am = "AM";
82	  _M_data->_M_pm = "PM";
83	  _M_data->_M_am_pm_format = "";
84
85	  // Day names, starting with "C"'s Sunday.
86	  _M_data->_M_day1 = "Sunday";
87	  _M_data->_M_day2 = "Monday";
88	  _M_data->_M_day3 = "Tuesday";
89	  _M_data->_M_day4 = "Wednesday";
90	  _M_data->_M_day5 = "Thursday";
91	  _M_data->_M_day6 = "Friday";
92	  _M_data->_M_day7 = "Saturday";
93
94	  // Abbreviated day names, starting with "C"'s Sun.
95	  _M_data->_M_aday1 = "Sun";
96	  _M_data->_M_aday2 = "Mon";
97	  _M_data->_M_aday3 = "Tue";
98	  _M_data->_M_aday4 = "Wed";
99	  _M_data->_M_aday5 = "Thu";
100	  _M_data->_M_aday6 = "Fri";
101	  _M_data->_M_aday7 = "Sat";
102
103	  // Month names, starting with "C"'s January.
104	  _M_data->_M_month01 = "January";
105	  _M_data->_M_month02 = "February";
106	  _M_data->_M_month03 = "March";
107	  _M_data->_M_month04 = "April";
108	  _M_data->_M_month05 = "May";
109	  _M_data->_M_month06 = "June";
110	  _M_data->_M_month07 = "July";
111	  _M_data->_M_month08 = "August";
112	  _M_data->_M_month09 = "September";
113	  _M_data->_M_month10 = "October";
114	  _M_data->_M_month11 = "November";
115	  _M_data->_M_month12 = "December";
116
117	  // Abbreviated month names, starting with "C"'s Jan.
118	  _M_data->_M_amonth01 = "Jan";
119	  _M_data->_M_amonth02 = "Feb";
120	  _M_data->_M_amonth03 = "Mar";
121	  _M_data->_M_amonth04 = "Apr";
122	  _M_data->_M_amonth05 = "May";
123	  _M_data->_M_amonth06 = "Jun";
124	  _M_data->_M_amonth07 = "Jul";
125	  _M_data->_M_amonth08 = "Aug";
126	  _M_data->_M_amonth09 = "Sep";
127	  _M_data->_M_amonth10 = "Oct";
128	  _M_data->_M_amonth11 = "Nov";
129	  _M_data->_M_amonth12 = "Dec";
130	}
131      else
132	{
133	  _M_c_locale_timepunct = _S_clone_c_locale(__cloc);
134
135	  _M_data->_M_date_format = __nl_langinfo_l(D_FMT, __cloc);
136	  _M_data->_M_date_era_format = __nl_langinfo_l(ERA_D_FMT, __cloc);
137	  _M_data->_M_time_format = __nl_langinfo_l(T_FMT, __cloc);
138	  _M_data->_M_time_era_format = __nl_langinfo_l(ERA_T_FMT, __cloc);
139	  _M_data->_M_date_time_format = __nl_langinfo_l(D_T_FMT, __cloc);
140	  _M_data->_M_date_time_era_format = __nl_langinfo_l(ERA_D_T_FMT,
141							     __cloc);
142	  _M_data->_M_am = __nl_langinfo_l(AM_STR, __cloc);
143	  _M_data->_M_pm = __nl_langinfo_l(PM_STR, __cloc);
144	  _M_data->_M_am_pm_format = __nl_langinfo_l(T_FMT_AMPM, __cloc);
145
146	  // Day names, starting with "C"'s Sunday.
147	  _M_data->_M_day1 = __nl_langinfo_l(DAY_1, __cloc);
148	  _M_data->_M_day2 = __nl_langinfo_l(DAY_2, __cloc);
149	  _M_data->_M_day3 = __nl_langinfo_l(DAY_3, __cloc);
150	  _M_data->_M_day4 = __nl_langinfo_l(DAY_4, __cloc);
151	  _M_data->_M_day5 = __nl_langinfo_l(DAY_5, __cloc);
152	  _M_data->_M_day6 = __nl_langinfo_l(DAY_6, __cloc);
153	  _M_data->_M_day7 = __nl_langinfo_l(DAY_7, __cloc);
154
155	  // Abbreviated day names, starting with "C"'s Sun.
156	  _M_data->_M_aday1 = __nl_langinfo_l(ABDAY_1, __cloc);
157	  _M_data->_M_aday2 = __nl_langinfo_l(ABDAY_2, __cloc);
158	  _M_data->_M_aday3 = __nl_langinfo_l(ABDAY_3, __cloc);
159	  _M_data->_M_aday4 = __nl_langinfo_l(ABDAY_4, __cloc);
160	  _M_data->_M_aday5 = __nl_langinfo_l(ABDAY_5, __cloc);
161	  _M_data->_M_aday6 = __nl_langinfo_l(ABDAY_6, __cloc);
162	  _M_data->_M_aday7 = __nl_langinfo_l(ABDAY_7, __cloc);
163
164	  // Month names, starting with "C"'s January.
165	  _M_data->_M_month01 = __nl_langinfo_l(MON_1, __cloc);
166	  _M_data->_M_month02 = __nl_langinfo_l(MON_2, __cloc);
167	  _M_data->_M_month03 = __nl_langinfo_l(MON_3, __cloc);
168	  _M_data->_M_month04 = __nl_langinfo_l(MON_4, __cloc);
169	  _M_data->_M_month05 = __nl_langinfo_l(MON_5, __cloc);
170	  _M_data->_M_month06 = __nl_langinfo_l(MON_6, __cloc);
171	  _M_data->_M_month07 = __nl_langinfo_l(MON_7, __cloc);
172	  _M_data->_M_month08 = __nl_langinfo_l(MON_8, __cloc);
173	  _M_data->_M_month09 = __nl_langinfo_l(MON_9, __cloc);
174	  _M_data->_M_month10 = __nl_langinfo_l(MON_10, __cloc);
175	  _M_data->_M_month11 = __nl_langinfo_l(MON_11, __cloc);
176	  _M_data->_M_month12 = __nl_langinfo_l(MON_12, __cloc);
177
178	  // Abbreviated month names, starting with "C"'s Jan.
179	  _M_data->_M_amonth01 = __nl_langinfo_l(ABMON_1, __cloc);
180	  _M_data->_M_amonth02 = __nl_langinfo_l(ABMON_2, __cloc);
181	  _M_data->_M_amonth03 = __nl_langinfo_l(ABMON_3, __cloc);
182	  _M_data->_M_amonth04 = __nl_langinfo_l(ABMON_4, __cloc);
183	  _M_data->_M_amonth05 = __nl_langinfo_l(ABMON_5, __cloc);
184	  _M_data->_M_amonth06 = __nl_langinfo_l(ABMON_6, __cloc);
185	  _M_data->_M_amonth07 = __nl_langinfo_l(ABMON_7, __cloc);
186	  _M_data->_M_amonth08 = __nl_langinfo_l(ABMON_8, __cloc);
187	  _M_data->_M_amonth09 = __nl_langinfo_l(ABMON_9, __cloc);
188	  _M_data->_M_amonth10 = __nl_langinfo_l(ABMON_10, __cloc);
189	  _M_data->_M_amonth11 = __nl_langinfo_l(ABMON_11, __cloc);
190	  _M_data->_M_amonth12 = __nl_langinfo_l(ABMON_12, __cloc);
191	}
192    }
193
194#ifdef _GLIBCXX_USE_WCHAR_T
195  template<>
196    void
197    __timepunct<wchar_t>::
198    _M_put(wchar_t* __s, size_t __maxlen, const wchar_t* __format,
199	   const tm* __tm) const throw()
200    {
201#if __GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ > 2)
202      const size_t __len = __wcsftime_l(__s, __maxlen, __format, __tm,
203					_M_c_locale_timepunct);
204#else
205      char* __old = setlocale(LC_ALL, 0);
206      const size_t __llen = strlen(__old) + 1;
207      char* __sav = new char[__llen];
208      memcpy(__sav, __old, __llen);
209      setlocale(LC_ALL, _M_name_timepunct);
210      const size_t __len = wcsftime(__s, __maxlen, __format, __tm);
211      setlocale(LC_ALL, __sav);
212      delete [] __sav;
213#endif
214      // Make sure __s is null terminated.
215      if (__len == 0)
216	__s[0] = L'\0';
217    }
218
219  template<>
220    void
221    __timepunct<wchar_t>::_M_initialize_timepunct(__c_locale __cloc)
222    {
223      if (!_M_data)
224	_M_data = new __timepunct_cache<wchar_t>;
225
226      if (!__cloc)
227	{
228	  // "C" locale
229	  _M_c_locale_timepunct = _S_get_c_locale();
230
231	  _M_data->_M_date_format = L"%m/%d/%y";
232	  _M_data->_M_date_era_format = L"%m/%d/%y";
233	  _M_data->_M_time_format = L"%H:%M:%S";
234	  _M_data->_M_time_era_format = L"%H:%M:%S";
235	  _M_data->_M_date_time_format = L"";
236	  _M_data->_M_date_time_era_format = L"";
237	  _M_data->_M_am = L"AM";
238	  _M_data->_M_pm = L"PM";
239	  _M_data->_M_am_pm_format = L"";
240
241	  // Day names, starting with "C"'s Sunday.
242	  _M_data->_M_day1 = L"Sunday";
243	  _M_data->_M_day2 = L"Monday";
244	  _M_data->_M_day3 = L"Tuesday";
245	  _M_data->_M_day4 = L"Wednesday";
246	  _M_data->_M_day5 = L"Thursday";
247	  _M_data->_M_day6 = L"Friday";
248	  _M_data->_M_day7 = L"Saturday";
249
250	  // Abbreviated day names, starting with "C"'s Sun.
251	  _M_data->_M_aday1 = L"Sun";
252	  _M_data->_M_aday2 = L"Mon";
253	  _M_data->_M_aday3 = L"Tue";
254	  _M_data->_M_aday4 = L"Wed";
255	  _M_data->_M_aday5 = L"Thu";
256	  _M_data->_M_aday6 = L"Fri";
257	  _M_data->_M_aday7 = L"Sat";
258
259	  // Month names, starting with "C"'s January.
260	  _M_data->_M_month01 = L"January";
261	  _M_data->_M_month02 = L"February";
262	  _M_data->_M_month03 = L"March";
263	  _M_data->_M_month04 = L"April";
264	  _M_data->_M_month05 = L"May";
265	  _M_data->_M_month06 = L"June";
266	  _M_data->_M_month07 = L"July";
267	  _M_data->_M_month08 = L"August";
268	  _M_data->_M_month09 = L"September";
269	  _M_data->_M_month10 = L"October";
270	  _M_data->_M_month11 = L"November";
271	  _M_data->_M_month12 = L"December";
272
273	  // Abbreviated month names, starting with "C"'s Jan.
274	  _M_data->_M_amonth01 = L"Jan";
275	  _M_data->_M_amonth02 = L"Feb";
276	  _M_data->_M_amonth03 = L"Mar";
277	  _M_data->_M_amonth04 = L"Apr";
278	  _M_data->_M_amonth05 = L"May";
279	  _M_data->_M_amonth06 = L"Jun";
280	  _M_data->_M_amonth07 = L"Jul";
281	  _M_data->_M_amonth08 = L"Aug";
282	  _M_data->_M_amonth09 = L"Sep";
283	  _M_data->_M_amonth10 = L"Oct";
284	  _M_data->_M_amonth11 = L"Nov";
285	  _M_data->_M_amonth12 = L"Dec";
286	}
287      else
288	{
289	  _M_c_locale_timepunct = _S_clone_c_locale(__cloc);
290
291	  union { char *__s; wchar_t *__w; } __u;
292
293	  __u.__s = __nl_langinfo_l(_NL_WD_FMT, __cloc);
294	  _M_data->_M_date_format = __u.__w;
295	  __u.__s = __nl_langinfo_l(_NL_WERA_D_FMT, __cloc);
296	  _M_data->_M_date_era_format = __u.__w;
297	  __u.__s = __nl_langinfo_l(_NL_WT_FMT, __cloc);
298	  _M_data->_M_time_format = __u.__w;
299	  __u.__s = __nl_langinfo_l(_NL_WERA_T_FMT, __cloc);
300	  _M_data->_M_time_era_format = __u.__w;
301	  __u.__s = __nl_langinfo_l(_NL_WD_T_FMT, __cloc);
302	  _M_data->_M_date_time_format = __u.__w;
303	  __u.__s = __nl_langinfo_l(_NL_WERA_D_T_FMT, __cloc);
304	  _M_data->_M_date_time_era_format = __u.__w;
305	  __u.__s = __nl_langinfo_l(_NL_WAM_STR, __cloc);
306	  _M_data->_M_am = __u.__w;
307	  __u.__s = __nl_langinfo_l(_NL_WPM_STR, __cloc);
308	  _M_data->_M_pm = __u.__w;
309	  __u.__s = __nl_langinfo_l(_NL_WT_FMT_AMPM, __cloc);
310	  _M_data->_M_am_pm_format = __u.__w;
311
312	  // Day names, starting with "C"'s Sunday.
313	  __u.__s = __nl_langinfo_l(_NL_WDAY_1, __cloc);
314	  _M_data->_M_day1 = __u.__w;
315	  __u.__s = __nl_langinfo_l(_NL_WDAY_2, __cloc);
316	  _M_data->_M_day2 = __u.__w;
317	  __u.__s = __nl_langinfo_l(_NL_WDAY_3, __cloc);
318	  _M_data->_M_day3 = __u.__w;
319	  __u.__s = __nl_langinfo_l(_NL_WDAY_4, __cloc);
320	  _M_data->_M_day4 = __u.__w;
321	  __u.__s = __nl_langinfo_l(_NL_WDAY_5, __cloc);
322	  _M_data->_M_day5 = __u.__w;
323	  __u.__s = __nl_langinfo_l(_NL_WDAY_6, __cloc);
324	  _M_data->_M_day6 = __u.__w;
325	  __u.__s = __nl_langinfo_l(_NL_WDAY_7, __cloc);
326	  _M_data->_M_day7 = __u.__w;
327
328	  // Abbreviated day names, starting with "C"'s Sun.
329	  __u.__s = __nl_langinfo_l(_NL_WABDAY_1, __cloc);
330	  _M_data->_M_aday1 = __u.__w;
331	  __u.__s = __nl_langinfo_l(_NL_WABDAY_2, __cloc);
332	  _M_data->_M_aday2 = __u.__w;
333	  __u.__s = __nl_langinfo_l(_NL_WABDAY_3, __cloc);
334	  _M_data->_M_aday3 = __u.__w;
335	  __u.__s = __nl_langinfo_l(_NL_WABDAY_4, __cloc);
336	  _M_data->_M_aday4 = __u.__w;
337	  __u.__s = __nl_langinfo_l(_NL_WABDAY_5, __cloc);
338	  _M_data->_M_aday5 = __u.__w;
339	  __u.__s = __nl_langinfo_l(_NL_WABDAY_6, __cloc);
340	  _M_data->_M_aday6 = __u.__w;
341	  __u.__s = __nl_langinfo_l(_NL_WABDAY_7, __cloc);
342	  _M_data->_M_aday7 = __u.__w;
343
344	  // Month names, starting with "C"'s January.
345	  __u.__s = __nl_langinfo_l(_NL_WMON_1, __cloc);
346	  _M_data->_M_month01 = __u.__w;
347	  __u.__s = __nl_langinfo_l(_NL_WMON_2, __cloc);
348	  _M_data->_M_month02 = __u.__w;
349	  __u.__s = __nl_langinfo_l(_NL_WMON_3, __cloc);
350	  _M_data->_M_month03 = __u.__w;
351	  __u.__s = __nl_langinfo_l(_NL_WMON_4, __cloc);
352	  _M_data->_M_month04 = __u.__w;
353	  __u.__s = __nl_langinfo_l(_NL_WMON_5, __cloc);
354	  _M_data->_M_month05 = __u.__w;
355	  __u.__s = __nl_langinfo_l(_NL_WMON_6, __cloc);
356	  _M_data->_M_month06 = __u.__w;
357	  __u.__s = __nl_langinfo_l(_NL_WMON_7, __cloc);
358	  _M_data->_M_month07 = __u.__w;
359	  __u.__s = __nl_langinfo_l(_NL_WMON_8, __cloc);
360	  _M_data->_M_month08 = __u.__w;
361	  __u.__s = __nl_langinfo_l(_NL_WMON_9, __cloc);
362	  _M_data->_M_month09 = __u.__w;
363	  __u.__s = __nl_langinfo_l(_NL_WMON_10, __cloc);
364	  _M_data->_M_month10 = __u.__w;
365	  __u.__s = __nl_langinfo_l(_NL_WMON_11, __cloc);
366	  _M_data->_M_month11 = __u.__w;
367	  __u.__s = __nl_langinfo_l(_NL_WMON_12, __cloc);
368	  _M_data->_M_month12 = __u.__w;
369
370	  // Abbreviated month names, starting with "C"'s Jan.
371	  __u.__s = __nl_langinfo_l(_NL_WABMON_1, __cloc);
372	  _M_data->_M_amonth01 = __u.__w;
373	  __u.__s = __nl_langinfo_l(_NL_WABMON_2, __cloc);
374	  _M_data->_M_amonth02 = __u.__w;
375	  __u.__s = __nl_langinfo_l(_NL_WABMON_3, __cloc);
376	  _M_data->_M_amonth03 = __u.__w;
377	  __u.__s = __nl_langinfo_l(_NL_WABMON_4, __cloc);
378	  _M_data->_M_amonth04 = __u.__w;
379	  __u.__s = __nl_langinfo_l(_NL_WABMON_5, __cloc);
380	  _M_data->_M_amonth05 = __u.__w;
381	  __u.__s = __nl_langinfo_l(_NL_WABMON_6, __cloc);
382	  _M_data->_M_amonth06 = __u.__w;
383	  __u.__s = __nl_langinfo_l(_NL_WABMON_7, __cloc);
384	  _M_data->_M_amonth07 = __u.__w;
385	  __u.__s = __nl_langinfo_l(_NL_WABMON_8, __cloc);
386	  _M_data->_M_amonth08 = __u.__w;
387	  __u.__s = __nl_langinfo_l(_NL_WABMON_9, __cloc);
388	  _M_data->_M_amonth09 = __u.__w;
389	  __u.__s = __nl_langinfo_l(_NL_WABMON_10, __cloc);
390	  _M_data->_M_amonth10 = __u.__w;
391	  __u.__s = __nl_langinfo_l(_NL_WABMON_11, __cloc);
392	  _M_data->_M_amonth11 = __u.__w;
393	  __u.__s = __nl_langinfo_l(_NL_WABMON_12, __cloc);
394	  _M_data->_M_amonth12 = __u.__w;
395	}
396    }
397#endif
398
399_GLIBCXX_END_NAMESPACE_VERSION
400} // namespace
401