]> git.ipfire.org Git - thirdparty/gcc.git/blob - libstdc++-v3/include/bits/locale_facets.h
re PR libstdc++/9858 (Extra virtual functions in ctype<char>)
[thirdparty/gcc.git] / libstdc++-v3 / include / bits / locale_facets.h
1 // Locale support -*- C++ -*-
2
3 // Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003
4 // Free Software Foundation, Inc.
5 //
6 // This file is part of the GNU ISO C++ Library. This library is free
7 // software; you can redistribute it and/or modify it under the
8 // terms of the GNU General Public License as published by the
9 // Free Software Foundation; either version 2, or (at your option)
10 // any later version.
11
12 // This library is distributed in the hope that it will be useful,
13 // but WITHOUT ANY WARRANTY; without even the implied warranty of
14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 // GNU General Public License for more details.
16
17 // You should have received a copy of the GNU General Public License along
18 // with this library; see the file COPYING. If not, write to the Free
19 // Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
20 // USA.
21
22 // As a special exception, you may use this file as part of a free software
23 // library without restriction. Specifically, if other files instantiate
24 // templates or use macros or inline functions from this file, or you compile
25 // this file and link it with other files to produce an executable, this
26 // file does not by itself cause the resulting executable to be covered by
27 // the GNU General Public License. This exception does not however
28 // invalidate any other reasons why the executable file might be covered by
29 // the GNU General Public License.
30
31 //
32 // ISO C++ 14882: 22.1 Locales
33 //
34
35 /** @file locale_facets.h
36 * This is an internal header file, included by other library headers.
37 * You should not attempt to use it directly.
38 */
39
40 #ifndef _LOCALE_FACETS_H
41 #define _LOCALE_FACETS_H 1
42
43 #pragma GCC system_header
44
45 #include <ctime> // For struct tm
46 #include <cwctype> // For wctype_t
47 #include <iosfwd>
48 #include <bits/ios_base.h> // For ios_base, ios_base::iostate
49 #include <streambuf>
50
51 namespace std
52 {
53 // NB: Don't instantiate required wchar_t facets if no wchar_t support.
54 #ifdef _GLIBCXX_USE_WCHAR_T
55 # define _GLIBCXX_NUM_FACETS 28
56 #else
57 # define _GLIBCXX_NUM_FACETS 14
58 #endif
59
60 // Convert string to numeric value of type _Tv and store results.
61 // NB: This is specialized for all required types, there is no
62 // generic definition.
63 template<typename _Tv>
64 void
65 __convert_to_v(const char* __in, _Tv& __out, ios_base::iostate& __err,
66 const __c_locale& __cloc, int __base = 10);
67
68 // Explicit specializations for required types.
69 template<>
70 void
71 __convert_to_v(const char*, long&, ios_base::iostate&,
72 const __c_locale&, int);
73
74 template<>
75 void
76 __convert_to_v(const char*, unsigned long&, ios_base::iostate&,
77 const __c_locale&, int);
78
79 #ifdef _GLIBCXX_USE_LONG_LONG
80 template<>
81 void
82 __convert_to_v(const char*, long long&, ios_base::iostate&,
83 const __c_locale&, int);
84
85 template<>
86 void
87 __convert_to_v(const char*, unsigned long long&, ios_base::iostate&,
88 const __c_locale&, int);
89 #endif
90
91 template<>
92 void
93 __convert_to_v(const char*, float&, ios_base::iostate&,
94 const __c_locale&, int);
95
96 template<>
97 void
98 __convert_to_v(const char*, double&, ios_base::iostate&,
99 const __c_locale&, int);
100
101 template<>
102 void
103 __convert_to_v(const char*, long double&, ios_base::iostate&,
104 const __c_locale&, int);
105
106 // NB: __pad is a struct, rather than a function, so it can be
107 // partially-specialized.
108 template<typename _CharT, typename _Traits>
109 struct __pad
110 {
111 static void
112 _S_pad(ios_base& __io, _CharT __fill, _CharT* __news,
113 const _CharT* __olds, const streamsize __newlen,
114 const streamsize __oldlen, const bool __num);
115 };
116
117 // Used by both numeric and monetary facets.
118 // Check to make sure that the __grouping_tmp string constructed in
119 // money_get or num_get matches the canonical grouping for a given
120 // locale.
121 // __grouping_tmp is parsed L to R
122 // 1,222,444 == __grouping_tmp of "\1\3\3"
123 // __grouping is parsed R to L
124 // 1,222,444 == __grouping of "\3" == "\3\3\3"
125 template<typename _CharT>
126 bool
127 __verify_grouping(const basic_string<_CharT>& __grouping,
128 basic_string<_CharT>& __grouping_tmp);
129
130 // Used by both numeric and monetary facets.
131 // Inserts "group separator" characters into an array of characters.
132 // It's recursive, one iteration per group. It moves the characters
133 // in the buffer this way: "xxxx12345" -> "12,345xxx". Call this
134 // only with __gbeg != __gend.
135 template<typename _CharT>
136 _CharT*
137 __add_grouping(_CharT* __s, _CharT __sep,
138 const char* __gbeg, const char* __gend,
139 const _CharT* __first, const _CharT* __last);
140
141 // This template permits specializing facet output code for
142 // ostreambuf_iterator. For ostreambuf_iterator, sputn is
143 // significantly more efficient than incrementing iterators.
144 template<typename _CharT>
145 inline
146 ostreambuf_iterator<_CharT>
147 __write(ostreambuf_iterator<_CharT> __s, const _CharT* __ws, int __len)
148 {
149 __s._M_put(__ws, __len);
150 return __s;
151 }
152
153 // This is the unspecialized form of the template.
154 template<typename _CharT, typename _OutIter>
155 inline
156 _OutIter
157 __write(_OutIter __s, const _CharT* __ws, int __len)
158 {
159 for (int __j = 0; __j < __len; __j++, ++__s)
160 *__s = __ws[__j];
161 return __s;
162 }
163
164
165 // 22.2.1.1 Template class ctype
166 // Include host and configuration specific ctype enums for ctype_base.
167 #include <bits/ctype_base.h>
168
169 // Common base for ctype<_CharT>.
170 template<typename _CharT>
171 class __ctype_abstract_base : public locale::facet, public ctype_base
172 {
173 public:
174 // Types:
175 typedef _CharT char_type;
176
177 bool
178 is(mask __m, char_type __c) const
179 { return this->do_is(__m, __c); }
180
181 const char_type*
182 is(const char_type *__lo, const char_type *__hi, mask *__vec) const
183 { return this->do_is(__lo, __hi, __vec); }
184
185 const char_type*
186 scan_is(mask __m, const char_type* __lo, const char_type* __hi) const
187 { return this->do_scan_is(__m, __lo, __hi); }
188
189 const char_type*
190 scan_not(mask __m, const char_type* __lo, const char_type* __hi) const
191 { return this->do_scan_not(__m, __lo, __hi); }
192
193 char_type
194 toupper(char_type __c) const
195 { return this->do_toupper(__c); }
196
197 const char_type*
198 toupper(char_type *__lo, const char_type* __hi) const
199 { return this->do_toupper(__lo, __hi); }
200
201 char_type
202 tolower(char_type __c) const
203 { return this->do_tolower(__c); }
204
205 const char_type*
206 tolower(char_type* __lo, const char_type* __hi) const
207 { return this->do_tolower(__lo, __hi); }
208
209 char_type
210 widen(char __c) const
211 { return this->do_widen(__c); }
212
213 const char*
214 widen(const char* __lo, const char* __hi, char_type* __to) const
215 { return this->do_widen(__lo, __hi, __to); }
216
217 char
218 narrow(char_type __c, char __dfault) const
219 { return this->do_narrow(__c, __dfault); }
220
221 const char_type*
222 narrow(const char_type* __lo, const char_type* __hi,
223 char __dfault, char *__to) const
224 { return this->do_narrow(__lo, __hi, __dfault, __to); }
225
226 protected:
227 explicit
228 __ctype_abstract_base(size_t __refs = 0): facet(__refs) { }
229
230 virtual
231 ~__ctype_abstract_base() { }
232
233 virtual bool
234 do_is(mask __m, char_type __c) const = 0;
235
236 virtual const char_type*
237 do_is(const char_type* __lo, const char_type* __hi,
238 mask* __vec) const = 0;
239
240 virtual const char_type*
241 do_scan_is(mask __m, const char_type* __lo,
242 const char_type* __hi) const = 0;
243
244 virtual const char_type*
245 do_scan_not(mask __m, const char_type* __lo,
246 const char_type* __hi) const = 0;
247
248 virtual char_type
249 do_toupper(char_type) const = 0;
250
251 virtual const char_type*
252 do_toupper(char_type* __lo, const char_type* __hi) const = 0;
253
254 virtual char_type
255 do_tolower(char_type) const = 0;
256
257 virtual const char_type*
258 do_tolower(char_type* __lo, const char_type* __hi) const = 0;
259
260 virtual char_type
261 do_widen(char) const = 0;
262
263 virtual const char*
264 do_widen(const char* __lo, const char* __hi,
265 char_type* __dest) const = 0;
266
267 virtual char
268 do_narrow(char_type, char __dfault) const = 0;
269
270 virtual const char_type*
271 do_narrow(const char_type* __lo, const char_type* __hi,
272 char __dfault, char* __dest) const = 0;
273 };
274
275 // NB: Generic, mostly useless implementation.
276 template<typename _CharT>
277 class ctype : public __ctype_abstract_base<_CharT>
278 {
279 public:
280 // Types:
281 typedef _CharT char_type;
282 typedef typename ctype::mask mask;
283
284 static locale::id id;
285
286 explicit
287 ctype(size_t __refs = 0) : __ctype_abstract_base<_CharT>(__refs) { }
288
289 protected:
290 virtual
291 ~ctype();
292
293 virtual bool
294 do_is(mask __m, char_type __c) const;
295
296 virtual const char_type*
297 do_is(const char_type* __lo, const char_type* __hi, mask* __vec) const;
298
299 virtual const char_type*
300 do_scan_is(mask __m, const char_type* __lo, const char_type* __hi) const;
301
302 virtual const char_type*
303 do_scan_not(mask __m, const char_type* __lo,
304 const char_type* __hi) const;
305
306 virtual char_type
307 do_toupper(char_type __c) const;
308
309 virtual const char_type*
310 do_toupper(char_type* __lo, const char_type* __hi) const;
311
312 virtual char_type
313 do_tolower(char_type __c) const;
314
315 virtual const char_type*
316 do_tolower(char_type* __lo, const char_type* __hi) const;
317
318 virtual char_type
319 do_widen(char __c) const;
320
321 virtual const char*
322 do_widen(const char* __lo, const char* __hi, char_type* __dest) const;
323
324 virtual char
325 do_narrow(char_type, char __dfault) const;
326
327 virtual const char_type*
328 do_narrow(const char_type* __lo, const char_type* __hi,
329 char __dfault, char* __dest) const;
330 };
331
332 template<typename _CharT>
333 locale::id ctype<_CharT>::id;
334
335 // 22.2.1.3 ctype<char> specialization.
336 template<>
337 class ctype<char> : public locale::facet, public ctype_base
338 {
339 public:
340 // Types:
341 typedef char char_type;
342
343 protected:
344 // Data Members:
345 __c_locale _M_c_locale_ctype;
346 bool _M_del;
347 __to_type _M_toupper;
348 __to_type _M_tolower;
349 const mask* _M_table;
350
351 public:
352 static locale::id id;
353 static const size_t table_size = 1 + static_cast<unsigned char>(-1);
354
355 explicit
356 ctype(const mask* __table = 0, bool __del = false, size_t __refs = 0);
357
358 explicit
359 ctype(__c_locale __cloc, const mask* __table = 0, bool __del = false,
360 size_t __refs = 0);
361
362 inline bool
363 is(mask __m, char __c) const;
364
365 inline const char*
366 is(const char* __lo, const char* __hi, mask* __vec) const;
367
368 inline const char*
369 scan_is(mask __m, const char* __lo, const char* __hi) const;
370
371 inline const char*
372 scan_not(mask __m, const char* __lo, const char* __hi) const;
373
374 char_type
375 toupper(char_type __c) const
376 { return this->do_toupper(__c); }
377
378 const char_type*
379 toupper(char_type *__lo, const char_type* __hi) const
380 { return this->do_toupper(__lo, __hi); }
381
382 char_type
383 tolower(char_type __c) const
384 { return this->do_tolower(__c); }
385
386 const char_type*
387 tolower(char_type* __lo, const char_type* __hi) const
388 { return this->do_tolower(__lo, __hi); }
389
390 char_type
391 widen(char __c) const
392 { return this->do_widen(__c); }
393
394 const char*
395 widen(const char* __lo, const char* __hi, char_type* __to) const
396 { return this->do_widen(__lo, __hi, __to); }
397
398 char
399 narrow(char_type __c, char __dfault) const
400 { return this->do_narrow(__c, __dfault); }
401
402 const char_type*
403 narrow(const char_type* __lo, const char_type* __hi,
404 char __dfault, char *__to) const
405 { return this->do_narrow(__lo, __hi, __dfault, __to); }
406
407 protected:
408 const mask*
409 table() const throw()
410 { return _M_table; }
411
412 static const mask*
413 classic_table() throw();
414
415 virtual
416 ~ctype();
417
418 virtual char_type
419 do_toupper(char_type) const;
420
421 virtual const char_type*
422 do_toupper(char_type* __lo, const char_type* __hi) const;
423
424 virtual char_type
425 do_tolower(char_type) const;
426
427 virtual const char_type*
428 do_tolower(char_type* __lo, const char_type* __hi) const;
429
430 virtual char_type
431 do_widen(char __c) const
432 { return __c; }
433
434 virtual const char*
435 do_widen(const char* __lo, const char* __hi, char_type* __dest) const
436 {
437 memcpy(__dest, __lo, __hi - __lo);
438 return __hi;
439 }
440
441 virtual char
442 do_narrow(char_type __c, char) const
443 { return __c; }
444
445 virtual const char_type*
446 do_narrow(const char_type* __lo, const char_type* __hi,
447 char, char* __dest) const
448 {
449 memcpy(__dest, __lo, __hi - __lo);
450 return __hi;
451 }
452 };
453
454 template<>
455 const ctype<char>&
456 use_facet<ctype<char> >(const locale& __loc);
457
458 #ifdef _GLIBCXX_USE_WCHAR_T
459 // 22.2.1.3 ctype<wchar_t> specialization
460 template<>
461 class ctype<wchar_t> : public __ctype_abstract_base<wchar_t>
462 {
463 public:
464 // Types:
465 typedef wchar_t char_type;
466 typedef wctype_t __wmask_type;
467
468 protected:
469 __c_locale _M_c_locale_ctype;
470
471 public:
472 // Data Members:
473 static locale::id id;
474
475 explicit
476 ctype(size_t __refs = 0);
477
478 explicit
479 ctype(__c_locale __cloc, size_t __refs = 0);
480
481 protected:
482 __wmask_type
483 _M_convert_to_wmask(const mask __m) const;
484
485 virtual
486 ~ctype();
487
488 virtual bool
489 do_is(mask __m, char_type __c) const;
490
491 virtual const char_type*
492 do_is(const char_type* __lo, const char_type* __hi, mask* __vec) const;
493
494 virtual const char_type*
495 do_scan_is(mask __m, const char_type* __lo, const char_type* __hi) const;
496
497 virtual const char_type*
498 do_scan_not(mask __m, const char_type* __lo,
499 const char_type* __hi) const;
500
501 virtual char_type
502 do_toupper(char_type) const;
503
504 virtual const char_type*
505 do_toupper(char_type* __lo, const char_type* __hi) const;
506
507 virtual char_type
508 do_tolower(char_type) const;
509
510 virtual const char_type*
511 do_tolower(char_type* __lo, const char_type* __hi) const;
512
513 virtual char_type
514 do_widen(char) const;
515
516 virtual const char*
517 do_widen(const char* __lo, const char* __hi, char_type* __dest) const;
518
519 virtual char
520 do_narrow(char_type, char __dfault) const;
521
522 virtual const char_type*
523 do_narrow(const char_type* __lo, const char_type* __hi,
524 char __dfault, char* __dest) const;
525 };
526
527 template<>
528 const ctype<wchar_t>&
529 use_facet<ctype<wchar_t> >(const locale& __loc);
530 #endif //_GLIBCXX_USE_WCHAR_T
531
532 // Include host and configuration specific ctype inlines.
533 #include <bits/ctype_inline.h>
534
535 // 22.2.1.2 Template class ctype_byname
536 template<typename _CharT>
537 class ctype_byname : public ctype<_CharT>
538 {
539 public:
540 typedef _CharT char_type;
541
542 explicit
543 ctype_byname(const char* __s, size_t __refs = 0);
544
545 protected:
546 virtual
547 ~ctype_byname() { };
548 };
549
550 // 22.2.1.4 Class ctype_byname specializations.
551 template<>
552 ctype_byname<char>::ctype_byname(const char*, size_t refs);
553
554 template<>
555 ctype_byname<wchar_t>::ctype_byname(const char*, size_t refs);
556
557 // 22.2.1.5 Template class codecvt
558 #include <bits/codecvt.h>
559
560 // 22.2.2 The numeric category.
561 class __num_base
562 {
563 public:
564 // NB: Code depends on the order of _S_atoms_out elements.
565 // Below are the indices into _S_atoms_out.
566 enum
567 {
568 _S_ominus,
569 _S_oplus,
570 _S_ox,
571 _S_oX,
572 _S_odigits,
573 _S_odigits_end = _S_odigits + 16,
574 _S_oudigits = _S_odigits_end,
575 _S_oudigits_end = _S_oudigits + 16,
576 _S_oe = _S_odigits + 14, // For scientific notation, 'e'
577 _S_oE = _S_oudigits + 14, // For scientific notation, 'E'
578 _S_oend = _S_oudigits_end
579 };
580
581 // A list of valid numeric literals for output. This array
582 // contains chars that will be passed through the current locale's
583 // ctype<_CharT>.widen() and then used to render numbers.
584 // For the standard "C" locale, this is
585 // "-+xX0123456789abcdef0123456789ABCDEF".
586 static const char* _S_atoms_out;
587
588 // String literal of acceptable (narrow) input, for num_get.
589 // "-+xX0123456789eEabcdfABCDF"
590 static const char* _S_atoms_in;
591
592 enum
593 {
594 _S_iminus,
595 _S_iplus,
596 _S_ix,
597 _S_iX,
598 _S_izero,
599 _S_ie = _S_izero + 10,
600 _S_iE = _S_izero + 11,
601 _S_iend = 26
602 };
603
604 // num_put
605 // Construct and return valid scanf format for floating point types.
606 static void
607 _S_format_float(const ios_base& __io, char* __fptr, char __mod);
608 };
609
610 template<typename _CharT>
611 struct __numpunct_cache : public locale::facet
612 {
613 const char* _M_grouping;
614 bool _M_use_grouping;
615 const _CharT* _M_truename;
616 const _CharT* _M_falsename;
617 _CharT _M_decimal_point;
618 _CharT _M_thousands_sep;
619
620 // A list of valid numeric literals for output: in the standard
621 // "C" locale, this is "-+xX0123456789abcdef0123456789ABCDEF".
622 // This array contains the chars after having been passed
623 // through the current locale's ctype<_CharT>.widen().
624 _CharT _M_atoms_out[__num_base::_S_oend + 1];
625
626 // A list of valid numeric literals for input: in the standard
627 // "C" locale, this is "-+xX0123456789eEabcdfABCDF"
628 // This array contains the chars after having been passed
629 // through the current locale's ctype<_CharT>.widen().
630 _CharT _M_atoms_in[__num_base::_S_iend + 1];
631
632 bool _M_allocated;
633
634 __numpunct_cache(size_t __refs = 0) : facet(__refs),
635 _M_grouping(NULL), _M_use_grouping(false), _M_truename(NULL),
636 _M_falsename(NULL), _M_decimal_point(_CharT()),
637 _M_thousands_sep(_CharT()), _M_allocated(false)
638 { }
639
640 ~__numpunct_cache();
641
642 void
643 _M_cache(const locale& __loc);
644 };
645
646 template<typename _CharT>
647 void
648 __numpunct_cache<_CharT>::_M_cache(const locale& __loc)
649 {
650 const numpunct<_CharT>& __np = use_facet<numpunct<_CharT> >(__loc);
651 string __grouping = __np.grouping();
652 char* __group = new char[__grouping.length() + 1];
653 __grouping.copy(__group, __grouping.length());
654 __group[__grouping.length()] = char();
655 _M_grouping = __group;
656
657 _M_use_grouping = __grouping.length() != 0 && __grouping.data()[0] != 0;
658
659 typedef basic_string<_CharT> __string_type;
660
661 __string_type __true = __np.truename();
662 _CharT* __truename = new _CharT[__true.length() + 1];
663 __true.copy(__truename, __true.length());
664 __truename[__true.length()] = _CharT();
665 _M_truename = __truename;
666
667 __string_type __false = __np.falsename();
668 _CharT* __falsename = new _CharT[__false.length() + 1];
669 __false.copy(__falsename, __false.length());
670 __falsename[__false.length()] = _CharT();
671 _M_falsename = __falsename;
672
673 _M_decimal_point = __np.decimal_point();
674 _M_thousands_sep = __np.thousands_sep();
675
676 const ctype<_CharT>& __ct = use_facet<ctype<_CharT> >(__loc);
677 __ct.widen(__num_base::_S_atoms_out,
678 __num_base::_S_atoms_out + __num_base::_S_oend, _M_atoms_out);
679 _M_atoms_out[__num_base::_S_oend] = _CharT();
680 __ct.widen(__num_base::_S_atoms_in,
681 __num_base::_S_atoms_in + __num_base::_S_iend, _M_atoms_in);
682 _M_atoms_in[__num_base::_S_iend] = _CharT();
683
684 _M_allocated = true;
685 }
686
687 template<typename _CharT>
688 __numpunct_cache<_CharT>::~__numpunct_cache()
689 {
690 if (_M_allocated)
691 {
692 delete [] _M_grouping;
693 delete [] _M_truename;
694 delete [] _M_falsename;
695 }
696 }
697
698 template<typename _CharT>
699 class numpunct : public locale::facet
700 {
701 public:
702 // Types:
703 typedef _CharT char_type;
704 typedef basic_string<_CharT> string_type;
705 typedef __numpunct_cache<_CharT> __cache_type;
706
707 protected:
708 __cache_type* _M_data;
709
710 public:
711 static locale::id id;
712
713 explicit
714 numpunct(size_t __refs = 0) : facet(__refs), _M_data(NULL)
715 { _M_initialize_numpunct(); }
716
717 explicit
718 numpunct(__cache_type* __cache, size_t __refs = 0)
719 : facet(__refs), _M_data(__cache)
720 { _M_initialize_numpunct(); }
721
722 explicit
723 numpunct(__c_locale __cloc, size_t __refs = 0)
724 : facet(__refs), _M_data(NULL)
725 { _M_initialize_numpunct(__cloc); }
726
727 char_type
728 decimal_point() const
729 { return this->do_decimal_point(); }
730
731 char_type
732 thousands_sep() const
733 { return this->do_thousands_sep(); }
734
735 string
736 grouping() const
737 { return this->do_grouping(); }
738
739 string_type
740 truename() const
741 { return this->do_truename(); }
742
743 string_type
744 falsename() const
745 { return this->do_falsename(); }
746
747 protected:
748 virtual
749 ~numpunct();
750
751 virtual char_type
752 do_decimal_point() const
753 { return _M_data->_M_decimal_point; }
754
755 virtual char_type
756 do_thousands_sep() const
757 { return _M_data->_M_thousands_sep; }
758
759 virtual string
760 do_grouping() const
761 { return _M_data->_M_grouping; }
762
763 virtual string_type
764 do_truename() const
765 { return _M_data->_M_truename; }
766
767 virtual string_type
768 do_falsename() const
769 { return _M_data->_M_falsename; }
770
771 // For use at construction time only.
772 void
773 _M_initialize_numpunct(__c_locale __cloc = NULL);
774 };
775
776 template<typename _CharT>
777 locale::id numpunct<_CharT>::id;
778
779 template<>
780 numpunct<char>::~numpunct();
781
782 template<>
783 void
784 numpunct<char>::_M_initialize_numpunct(__c_locale __cloc);
785
786 #ifdef _GLIBCXX_USE_WCHAR_T
787 template<>
788 numpunct<wchar_t>::~numpunct();
789
790 template<>
791 void
792 numpunct<wchar_t>::_M_initialize_numpunct(__c_locale __cloc);
793 #endif
794
795 template<typename _CharT>
796 class numpunct_byname : public numpunct<_CharT>
797 {
798 // Data Member.
799 __c_locale _M_c_locale_numpunct;
800
801 public:
802 typedef _CharT char_type;
803 typedef basic_string<_CharT> string_type;
804
805 explicit
806 numpunct_byname(const char* __s, size_t __refs = 0)
807 : numpunct<_CharT>(__refs)
808 {
809 this->_S_create_c_locale(_M_c_locale_numpunct, __s);
810 this->_M_initialize_numpunct(_M_c_locale_numpunct);
811 }
812
813 protected:
814 virtual
815 ~numpunct_byname()
816 { this->_S_destroy_c_locale(_M_c_locale_numpunct); }
817 };
818
819 template<typename _CharT, typename _InIter>
820 class num_get : public locale::facet, public __num_base
821 {
822 public:
823 // Types:
824 typedef _CharT char_type;
825 typedef _InIter iter_type;
826
827 static locale::id id;
828
829 explicit
830 num_get(size_t __refs = 0) : facet(__refs) { }
831
832 iter_type
833 get(iter_type __in, iter_type __end, ios_base& __io,
834 ios_base::iostate& __err, bool& __v) const
835 { return this->do_get(__in, __end, __io, __err, __v); }
836
837 iter_type
838 get(iter_type __in, iter_type __end, ios_base& __io,
839 ios_base::iostate& __err, long& __v) const
840 { return this->do_get(__in, __end, __io, __err, __v); }
841
842 iter_type
843 get(iter_type __in, iter_type __end, ios_base& __io,
844 ios_base::iostate& __err, unsigned short& __v) const
845 { return this->do_get(__in, __end, __io, __err, __v); }
846
847 iter_type
848 get(iter_type __in, iter_type __end, ios_base& __io,
849 ios_base::iostate& __err, unsigned int& __v) const
850 { return this->do_get(__in, __end, __io, __err, __v); }
851
852 iter_type
853 get(iter_type __in, iter_type __end, ios_base& __io,
854 ios_base::iostate& __err, unsigned long& __v) const
855 { return this->do_get(__in, __end, __io, __err, __v); }
856
857 #ifdef _GLIBCXX_USE_LONG_LONG
858 iter_type
859 get(iter_type __in, iter_type __end, ios_base& __io,
860 ios_base::iostate& __err, long long& __v) const
861 { return this->do_get(__in, __end, __io, __err, __v); }
862
863 iter_type
864 get(iter_type __in, iter_type __end, ios_base& __io,
865 ios_base::iostate& __err, unsigned long long& __v) const
866 { return this->do_get(__in, __end, __io, __err, __v); }
867 #endif
868
869 iter_type
870 get(iter_type __in, iter_type __end, ios_base& __io,
871 ios_base::iostate& __err, float& __v) const
872 { return this->do_get(__in, __end, __io, __err, __v); }
873
874 iter_type
875 get(iter_type __in, iter_type __end, ios_base& __io,
876 ios_base::iostate& __err, double& __v) const
877 { return this->do_get(__in, __end, __io, __err, __v); }
878
879 iter_type
880 get(iter_type __in, iter_type __end, ios_base& __io,
881 ios_base::iostate& __err, long double& __v) const
882 { return this->do_get(__in, __end, __io, __err, __v); }
883
884 iter_type
885 get(iter_type __in, iter_type __end, ios_base& __io,
886 ios_base::iostate& __err, void*& __v) const
887 { return this->do_get(__in, __end, __io, __err, __v); }
888
889 protected:
890 virtual ~num_get() { }
891
892 iter_type
893 _M_extract_float(iter_type, iter_type, ios_base&, ios_base::iostate&,
894 string& __xtrc) const;
895
896 iter_type
897 _M_extract_int(iter_type, iter_type, ios_base&, ios_base::iostate&,
898 string& __xtrc, int& __base) const;
899
900 virtual iter_type
901 do_get(iter_type, iter_type, ios_base&, ios_base::iostate&, bool&) const;
902
903
904 virtual iter_type
905 do_get(iter_type, iter_type, ios_base&, ios_base::iostate&, long&) const;
906
907 virtual iter_type
908 do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
909 unsigned short&) const;
910
911 virtual iter_type
912 do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
913 unsigned int&) const;
914
915 virtual iter_type
916 do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
917 unsigned long&) const;
918
919 #ifdef _GLIBCXX_USE_LONG_LONG
920 virtual iter_type
921 do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
922 long long&) const;
923
924 virtual iter_type
925 do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
926 unsigned long long&) const;
927 #endif
928
929 virtual iter_type
930 do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
931 float&) const;
932
933 virtual iter_type
934 do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
935 double&) const;
936
937 virtual iter_type
938 do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
939 long double&) const;
940
941 virtual iter_type
942 do_get(iter_type, iter_type, ios_base&, ios_base::iostate& __err,
943 void*&) const;
944 };
945
946 template<typename _CharT, typename _InIter>
947 locale::id num_get<_CharT, _InIter>::id;
948
949
950 template<typename _CharT, typename _OutIter>
951 class num_put : public locale::facet, public __num_base
952 {
953 public:
954 // Types:
955 typedef _CharT char_type;
956 typedef _OutIter iter_type;
957 static locale::id id;
958
959 explicit
960 num_put(size_t __refs = 0) : facet(__refs) { }
961
962 iter_type
963 put(iter_type __s, ios_base& __f, char_type __fill, bool __v) const
964 { return this->do_put(__s, __f, __fill, __v); }
965
966 iter_type
967 put(iter_type __s, ios_base& __f, char_type __fill, long __v) const
968 { return this->do_put(__s, __f, __fill, __v); }
969
970 iter_type
971 put(iter_type __s, ios_base& __f, char_type __fill,
972 unsigned long __v) const
973 { return this->do_put(__s, __f, __fill, __v); }
974
975 #ifdef _GLIBCXX_USE_LONG_LONG
976 iter_type
977 put(iter_type __s, ios_base& __f, char_type __fill, long long __v) const
978 { return this->do_put(__s, __f, __fill, __v); }
979
980 iter_type
981 put(iter_type __s, ios_base& __f, char_type __fill,
982 unsigned long long __v) const
983 { return this->do_put(__s, __f, __fill, __v); }
984 #endif
985
986 iter_type
987 put(iter_type __s, ios_base& __f, char_type __fill, double __v) const
988 { return this->do_put(__s, __f, __fill, __v); }
989
990 iter_type
991 put(iter_type __s, ios_base& __f, char_type __fill,
992 long double __v) const
993 { return this->do_put(__s, __f, __fill, __v); }
994
995 iter_type
996 put(iter_type __s, ios_base& __f, char_type __fill,
997 const void* __v) const
998 { return this->do_put(__s, __f, __fill, __v); }
999
1000 protected:
1001 template<typename _ValueT>
1002 iter_type
1003 _M_insert_float(iter_type, ios_base& __io, char_type __fill,
1004 char __mod, _ValueT __v) const;
1005
1006 void
1007 _M_group_float(const string& __grouping, char_type __sep,
1008 const char_type* __p, char_type* __new, char_type* __cs,
1009 int& __len) const;
1010
1011 template<typename _ValueT>
1012 iter_type
1013 _M_insert_int(iter_type, ios_base& __io, char_type __fill,
1014 _ValueT __v) const;
1015
1016 void
1017 _M_group_int(const string& __grouping, char_type __sep,
1018 ios_base& __io, char_type* __new, char_type* __cs,
1019 int& __len) const;
1020
1021 void
1022 _M_pad(char_type __fill, streamsize __w, ios_base& __io,
1023 char_type* __new, const char_type* __cs, int& __len) const;
1024
1025 virtual
1026 ~num_put() { };
1027
1028 virtual iter_type
1029 do_put(iter_type, ios_base&, char_type __fill, bool __v) const;
1030
1031 virtual iter_type
1032 do_put(iter_type, ios_base&, char_type __fill, long __v) const;
1033
1034 virtual iter_type
1035 do_put(iter_type, ios_base&, char_type __fill, unsigned long) const;
1036
1037 #ifdef _GLIBCXX_USE_LONG_LONG
1038 virtual iter_type
1039 do_put(iter_type, ios_base&, char_type __fill, long long __v) const;
1040
1041 virtual iter_type
1042 do_put(iter_type, ios_base&, char_type __fill, unsigned long long) const;
1043 #endif
1044
1045 virtual iter_type
1046 do_put(iter_type, ios_base&, char_type __fill, double __v) const;
1047
1048 virtual iter_type
1049 do_put(iter_type, ios_base&, char_type __fill, long double __v) const;
1050
1051 virtual iter_type
1052 do_put(iter_type, ios_base&, char_type __fill, const void* __v) const;
1053 };
1054
1055 template <typename _CharT, typename _OutIter>
1056 locale::id num_put<_CharT, _OutIter>::id;
1057
1058
1059 template<typename _CharT>
1060 class collate : public locale::facet
1061 {
1062 public:
1063 // Types:
1064 typedef _CharT char_type;
1065 typedef basic_string<_CharT> string_type;
1066
1067 protected:
1068 // Underlying "C" library locale information saved from
1069 // initialization, needed by collate_byname as well.
1070 __c_locale _M_c_locale_collate;
1071
1072 public:
1073 static locale::id id;
1074
1075 explicit
1076 collate(size_t __refs = 0)
1077 : facet(__refs)
1078 { _M_c_locale_collate = _S_get_c_locale(); }
1079
1080 explicit
1081 collate(__c_locale __cloc, size_t __refs = 0)
1082 : facet(__refs)
1083 { _M_c_locale_collate = _S_clone_c_locale(__cloc); }
1084
1085 int
1086 compare(const _CharT* __lo1, const _CharT* __hi1,
1087 const _CharT* __lo2, const _CharT* __hi2) const
1088 { return this->do_compare(__lo1, __hi1, __lo2, __hi2); }
1089
1090 string_type
1091 transform(const _CharT* __lo, const _CharT* __hi) const
1092 { return this->do_transform(__lo, __hi); }
1093
1094 long
1095 hash(const _CharT* __lo, const _CharT* __hi) const
1096 { return this->do_hash(__lo, __hi); }
1097
1098 // Used to abstract out _CharT bits in virtual member functions, below.
1099 int
1100 _M_compare(const _CharT*, const _CharT*) const;
1101
1102 size_t
1103 _M_transform(_CharT*, const _CharT*, size_t) const;
1104
1105 protected:
1106 virtual
1107 ~collate()
1108 { _S_destroy_c_locale(_M_c_locale_collate); }
1109
1110 virtual int
1111 do_compare(const _CharT* __lo1, const _CharT* __hi1,
1112 const _CharT* __lo2, const _CharT* __hi2) const;
1113
1114 virtual string_type
1115 do_transform(const _CharT* __lo, const _CharT* __hi) const;
1116
1117 virtual long
1118 do_hash(const _CharT* __lo, const _CharT* __hi) const;
1119 };
1120
1121 template<typename _CharT>
1122 locale::id collate<_CharT>::id;
1123
1124 // Specializations.
1125 template<>
1126 int
1127 collate<char>::_M_compare(const char*, const char*) const;
1128
1129 template<>
1130 size_t
1131 collate<char>::_M_transform(char*, const char*, size_t) const;
1132
1133 #ifdef _GLIBCXX_USE_WCHAR_T
1134 template<>
1135 int
1136 collate<wchar_t>::_M_compare(const wchar_t*, const wchar_t*) const;
1137
1138 template<>
1139 size_t
1140 collate<wchar_t>::_M_transform(wchar_t*, const wchar_t*, size_t) const;
1141 #endif
1142
1143 template<typename _CharT>
1144 class collate_byname : public collate<_CharT>
1145 {
1146 public:
1147 typedef _CharT char_type;
1148 typedef basic_string<_CharT> string_type;
1149
1150 explicit
1151 collate_byname(const char* __s, size_t __refs = 0)
1152 : collate<_CharT>(__refs)
1153 {
1154 this->_S_destroy_c_locale(this->_M_c_locale_collate);
1155 this->_S_create_c_locale(this->_M_c_locale_collate, __s);
1156 }
1157
1158 protected:
1159 virtual
1160 ~collate_byname() { }
1161 };
1162
1163
1164 class time_base
1165 {
1166 public:
1167 enum dateorder { no_order, dmy, mdy, ymd, ydm };
1168 };
1169
1170 template<typename _CharT>
1171 struct __timepunct_cache : public locale::facet
1172 {
1173 // List of all known timezones, with GMT first.
1174 static const _CharT* _S_timezones[14];
1175
1176 const _CharT* _M_date_format;
1177 const _CharT* _M_date_era_format;
1178 const _CharT* _M_time_format;
1179 const _CharT* _M_time_era_format;
1180 const _CharT* _M_date_time_format;
1181 const _CharT* _M_date_time_era_format;
1182 const _CharT* _M_am;
1183 const _CharT* _M_pm;
1184 const _CharT* _M_am_pm_format;
1185
1186 // Day names, starting with "C"'s Sunday.
1187 const _CharT* _M_day1;
1188 const _CharT* _M_day2;
1189 const _CharT* _M_day3;
1190 const _CharT* _M_day4;
1191 const _CharT* _M_day5;
1192 const _CharT* _M_day6;
1193 const _CharT* _M_day7;
1194
1195 // Abbreviated day names, starting with "C"'s Sun.
1196 const _CharT* _M_aday1;
1197 const _CharT* _M_aday2;
1198 const _CharT* _M_aday3;
1199 const _CharT* _M_aday4;
1200 const _CharT* _M_aday5;
1201 const _CharT* _M_aday6;
1202 const _CharT* _M_aday7;
1203
1204 // Month names, starting with "C"'s January.
1205 const _CharT* _M_month01;
1206 const _CharT* _M_month02;
1207 const _CharT* _M_month03;
1208 const _CharT* _M_month04;
1209 const _CharT* _M_month05;
1210 const _CharT* _M_month06;
1211 const _CharT* _M_month07;
1212 const _CharT* _M_month08;
1213 const _CharT* _M_month09;
1214 const _CharT* _M_month10;
1215 const _CharT* _M_month11;
1216 const _CharT* _M_month12;
1217
1218 // Abbreviated month names, starting with "C"'s Jan.
1219 const _CharT* _M_amonth01;
1220 const _CharT* _M_amonth02;
1221 const _CharT* _M_amonth03;
1222 const _CharT* _M_amonth04;
1223 const _CharT* _M_amonth05;
1224 const _CharT* _M_amonth06;
1225 const _CharT* _M_amonth07;
1226 const _CharT* _M_amonth08;
1227 const _CharT* _M_amonth09;
1228 const _CharT* _M_amonth10;
1229 const _CharT* _M_amonth11;
1230 const _CharT* _M_amonth12;
1231
1232 bool _M_allocated;
1233
1234 __timepunct_cache(size_t __refs = 0) : facet(__refs),
1235 _M_date_format(NULL), _M_date_era_format(NULL), _M_time_format(NULL),
1236 _M_time_era_format(NULL), _M_date_time_format(NULL),
1237 _M_date_time_era_format(NULL), _M_am(NULL), _M_pm(NULL),
1238 _M_am_pm_format(NULL), _M_day1(NULL), _M_day2(NULL), _M_day3(NULL),
1239 _M_day4(NULL), _M_day5(NULL), _M_day6(NULL), _M_day7(NULL),
1240 _M_aday1(NULL), _M_aday2(NULL), _M_aday3(NULL), _M_aday4(NULL),
1241 _M_aday5(NULL), _M_aday6(NULL), _M_aday7(NULL), _M_month01(NULL),
1242 _M_month02(NULL), _M_month03(NULL), _M_month04(NULL), _M_month05(NULL),
1243 _M_month06(NULL), _M_month07(NULL), _M_month08(NULL), _M_month09(NULL),
1244 _M_month10(NULL), _M_month11(NULL), _M_month12(NULL), _M_amonth01(NULL),
1245 _M_amonth02(NULL), _M_amonth03(NULL), _M_amonth04(NULL),
1246 _M_amonth05(NULL), _M_amonth06(NULL), _M_amonth07(NULL),
1247 _M_amonth08(NULL), _M_amonth09(NULL), _M_amonth10(NULL),
1248 _M_amonth11(NULL), _M_amonth12(NULL), _M_allocated(false)
1249 { }
1250
1251 ~__timepunct_cache();
1252
1253 void
1254 _M_cache(const locale& __loc);
1255 };
1256
1257 template<typename _CharT>
1258 __timepunct_cache<_CharT>::~__timepunct_cache()
1259 {
1260 if (_M_allocated)
1261 {
1262 // XXX.
1263 }
1264 }
1265
1266 // Specializations.
1267 template<>
1268 const char*
1269 __timepunct_cache<char>::_S_timezones[14];
1270
1271 #ifdef _GLIBCXX_USE_WCHAR_T
1272 template<>
1273 const wchar_t*
1274 __timepunct_cache<wchar_t>::_S_timezones[14];
1275 #endif
1276
1277 // Generic.
1278 template<typename _CharT>
1279 const _CharT* __timepunct_cache<_CharT>::_S_timezones[14];
1280
1281 template<typename _CharT>
1282 class __timepunct : public locale::facet
1283 {
1284 public:
1285 // Types:
1286 typedef _CharT __char_type;
1287 typedef basic_string<_CharT> __string_type;
1288 typedef __timepunct_cache<_CharT> __cache_type;
1289
1290 protected:
1291 __cache_type* _M_data;
1292 __c_locale _M_c_locale_timepunct;
1293 const char* _M_name_timepunct;
1294
1295 public:
1296 static locale::id id;
1297
1298 explicit
1299 __timepunct(size_t __refs = 0);
1300
1301 explicit
1302 __timepunct(__cache_type* __cache, size_t __refs = 0);
1303
1304 explicit
1305 __timepunct(__c_locale __cloc, const char* __s, size_t __refs = 0);
1306
1307 void
1308 _M_put(_CharT* __s, size_t __maxlen, const _CharT* __format,
1309 const tm* __tm) const;
1310
1311 void
1312 _M_date_formats(const _CharT** __date) const
1313 {
1314 // Always have default first.
1315 __date[0] = _M_data->_M_date_format;
1316 __date[1] = _M_data->_M_date_era_format;
1317 }
1318
1319 void
1320 _M_time_formats(const _CharT** __time) const
1321 {
1322 // Always have default first.
1323 __time[0] = _M_data->_M_time_format;
1324 __time[1] = _M_data->_M_time_era_format;
1325 }
1326
1327 void
1328 _M_ampm(const _CharT** __ampm) const
1329 {
1330 __ampm[0] = _M_data->_M_am;
1331 __ampm[1] = _M_data->_M_pm;
1332 }
1333
1334 void
1335 _M_date_time_formats(const _CharT** __dt) const
1336 {
1337 // Always have default first.
1338 __dt[0] = _M_data->_M_date_time_format;
1339 __dt[1] = _M_data->_M_date_time_era_format;
1340 }
1341
1342 void
1343 _M_days(const _CharT** __days) const
1344 {
1345 __days[0] = _M_data->_M_day1;
1346 __days[1] = _M_data->_M_day2;
1347 __days[2] = _M_data->_M_day3;
1348 __days[3] = _M_data->_M_day4;
1349 __days[4] = _M_data->_M_day5;
1350 __days[5] = _M_data->_M_day6;
1351 __days[6] = _M_data->_M_day7;
1352 }
1353
1354 void
1355 _M_days_abbreviated(const _CharT** __days) const
1356 {
1357 __days[0] = _M_data->_M_aday1;
1358 __days[1] = _M_data->_M_aday2;
1359 __days[2] = _M_data->_M_aday3;
1360 __days[3] = _M_data->_M_aday4;
1361 __days[4] = _M_data->_M_aday5;
1362 __days[5] = _M_data->_M_aday6;
1363 __days[6] = _M_data->_M_aday7;
1364 }
1365
1366 void
1367 _M_months(const _CharT** __months) const
1368 {
1369 __months[0] = _M_data->_M_month01;
1370 __months[1] = _M_data->_M_month02;
1371 __months[2] = _M_data->_M_month03;
1372 __months[3] = _M_data->_M_month04;
1373 __months[4] = _M_data->_M_month05;
1374 __months[5] = _M_data->_M_month06;
1375 __months[6] = _M_data->_M_month07;
1376 __months[7] = _M_data->_M_month08;
1377 __months[8] = _M_data->_M_month09;
1378 __months[9] = _M_data->_M_month10;
1379 __months[10] = _M_data->_M_month11;
1380 __months[11] = _M_data->_M_month12;
1381 }
1382
1383 void
1384 _M_months_abbreviated(const _CharT** __months) const
1385 {
1386 __months[0] = _M_data->_M_amonth01;
1387 __months[1] = _M_data->_M_amonth02;
1388 __months[2] = _M_data->_M_amonth03;
1389 __months[3] = _M_data->_M_amonth04;
1390 __months[4] = _M_data->_M_amonth05;
1391 __months[5] = _M_data->_M_amonth06;
1392 __months[6] = _M_data->_M_amonth07;
1393 __months[7] = _M_data->_M_amonth08;
1394 __months[8] = _M_data->_M_amonth09;
1395 __months[9] = _M_data->_M_amonth10;
1396 __months[10] = _M_data->_M_amonth11;
1397 __months[11] = _M_data->_M_amonth12;
1398 }
1399
1400 protected:
1401 virtual
1402 ~__timepunct();
1403
1404 // For use at construction time only.
1405 void
1406 _M_initialize_timepunct(__c_locale __cloc = NULL);
1407 };
1408
1409 template<typename _CharT>
1410 locale::id __timepunct<_CharT>::id;
1411
1412 // Specializations.
1413 template<>
1414 void
1415 __timepunct<char>::_M_initialize_timepunct(__c_locale __cloc);
1416
1417 template<>
1418 void
1419 __timepunct<char>::_M_put(char*, size_t, const char*, const tm*) const;
1420
1421 #ifdef _GLIBCXX_USE_WCHAR_T
1422 template<>
1423 void
1424 __timepunct<wchar_t>::_M_initialize_timepunct(__c_locale __cloc);
1425
1426 template<>
1427 void
1428 __timepunct<wchar_t>::_M_put(wchar_t*, size_t, const wchar_t*,
1429 const tm*) const;
1430 #endif
1431
1432 // Include host and configuration specific timepunct functions.
1433 #include <bits/time_members.h>
1434
1435 template<typename _CharT, typename _InIter>
1436 class time_get : public locale::facet, public time_base
1437 {
1438 public:
1439 // Types:
1440 typedef _CharT char_type;
1441 typedef _InIter iter_type;
1442 typedef basic_string<_CharT> __string_type;
1443
1444 static locale::id id;
1445
1446 explicit
1447 time_get(size_t __refs = 0)
1448 : facet (__refs) { }
1449
1450 dateorder
1451 date_order() const
1452 { return this->do_date_order(); }
1453
1454 iter_type
1455 get_time(iter_type __beg, iter_type __end, ios_base& __io,
1456 ios_base::iostate& __err, tm* __tm) const
1457 { return this->do_get_time(__beg, __end, __io, __err, __tm); }
1458
1459 iter_type
1460 get_date(iter_type __beg, iter_type __end, ios_base& __io,
1461 ios_base::iostate& __err, tm* __tm) const
1462 { return this->do_get_date(__beg, __end, __io, __err, __tm); }
1463
1464 iter_type
1465 get_weekday(iter_type __beg, iter_type __end, ios_base& __io,
1466 ios_base::iostate& __err, tm* __tm) const
1467 { return this->do_get_weekday(__beg, __end, __io, __err, __tm); }
1468
1469 iter_type
1470 get_monthname(iter_type __beg, iter_type __end, ios_base& __io,
1471 ios_base::iostate& __err, tm* __tm) const
1472 { return this->do_get_monthname(__beg, __end, __io, __err, __tm); }
1473
1474 iter_type
1475 get_year(iter_type __beg, iter_type __end, ios_base& __io,
1476 ios_base::iostate& __err, tm* __tm) const
1477 { return this->do_get_year(__beg, __end, __io, __err, __tm); }
1478
1479 protected:
1480 virtual
1481 ~time_get() { }
1482
1483 virtual dateorder
1484 do_date_order() const;
1485
1486 virtual iter_type
1487 do_get_time(iter_type __beg, iter_type __end, ios_base& __io,
1488 ios_base::iostate& __err, tm* __tm) const;
1489
1490 virtual iter_type
1491 do_get_date(iter_type __beg, iter_type __end, ios_base& __io,
1492 ios_base::iostate& __err, tm* __tm) const;
1493
1494 virtual iter_type
1495 do_get_weekday(iter_type __beg, iter_type __end, ios_base&,
1496 ios_base::iostate& __err, tm* __tm) const;
1497
1498 virtual iter_type
1499 do_get_monthname(iter_type __beg, iter_type __end, ios_base&,
1500 ios_base::iostate& __err, tm* __tm) const;
1501
1502 virtual iter_type
1503 do_get_year(iter_type __beg, iter_type __end, ios_base& __io,
1504 ios_base::iostate& __err, tm* __tm) const;
1505
1506 // Extract numeric component of length __len.
1507 void
1508 _M_extract_num(iter_type& __beg, iter_type& __end, int& __member,
1509 int __min, int __max, size_t __len,
1510 const ctype<_CharT>& __ctype,
1511 ios_base::iostate& __err) const;
1512
1513 // Extract day or month name, or any unique array of string
1514 // literals in a const _CharT* array.
1515 void
1516 _M_extract_name(iter_type& __beg, iter_type& __end, int& __member,
1517 const _CharT** __names, size_t __indexlen,
1518 ios_base::iostate& __err) const;
1519
1520 // Extract on a component-by-component basis, via __format argument.
1521 void
1522 _M_extract_via_format(iter_type& __beg, iter_type& __end, ios_base& __io,
1523 ios_base::iostate& __err, tm* __tm,
1524 const _CharT* __format) const;
1525 };
1526
1527 template<typename _CharT, typename _InIter>
1528 locale::id time_get<_CharT, _InIter>::id;
1529
1530 template<typename _CharT, typename _InIter>
1531 class time_get_byname : public time_get<_CharT, _InIter>
1532 {
1533 public:
1534 // Types:
1535 typedef _CharT char_type;
1536 typedef _InIter iter_type;
1537
1538 explicit
1539 time_get_byname(const char*, size_t __refs = 0)
1540 : time_get<_CharT, _InIter>(__refs) { }
1541
1542 protected:
1543 virtual
1544 ~time_get_byname() { }
1545 };
1546
1547 template<typename _CharT, typename _OutIter>
1548 class time_put : public locale::facet, public time_base
1549 {
1550 public:
1551 // Types:
1552 typedef _CharT char_type;
1553 typedef _OutIter iter_type;
1554
1555 static locale::id id;
1556
1557 explicit
1558 time_put(size_t __refs = 0)
1559 : facet(__refs) { }
1560
1561 iter_type
1562 put(iter_type __s, ios_base& __io, char_type __fill, const tm* __tm,
1563 const _CharT* __beg, const _CharT* __end) const;
1564
1565 iter_type
1566 put(iter_type __s, ios_base& __io, char_type __fill,
1567 const tm* __tm, char __format, char __mod = 0) const
1568 { return this->do_put(__s, __io, __fill, __tm, __format, __mod); }
1569
1570 protected:
1571 virtual
1572 ~time_put()
1573 { }
1574
1575 virtual iter_type
1576 do_put(iter_type __s, ios_base& __io, char_type __fill, const tm* __tm,
1577 char __format, char __mod) const;
1578 };
1579
1580 template<typename _CharT, typename _OutIter>
1581 locale::id time_put<_CharT, _OutIter>::id;
1582
1583 template<typename _CharT, typename _OutIter>
1584 class time_put_byname : public time_put<_CharT, _OutIter>
1585 {
1586 public:
1587 // Types:
1588 typedef _CharT char_type;
1589 typedef _OutIter iter_type;
1590
1591 explicit
1592 time_put_byname(const char* /*__s*/, size_t __refs = 0)
1593 : time_put<_CharT, _OutIter>(__refs)
1594 { };
1595
1596 protected:
1597 virtual
1598 ~time_put_byname() { }
1599 };
1600
1601
1602 class money_base
1603 {
1604 public:
1605 enum part { none, space, symbol, sign, value };
1606 struct pattern { char field[4]; };
1607
1608 static const pattern _S_default_pattern;
1609
1610 // Construct and return valid pattern consisting of some combination of:
1611 // space none symbol sign value
1612 static pattern
1613 _S_construct_pattern(char __precedes, char __space, char __posn);
1614 };
1615
1616 template<typename _CharT>
1617 struct __moneypunct_cache : public locale::facet
1618 {
1619 const char* _M_grouping;
1620 bool _M_use_grouping;
1621 _CharT _M_decimal_point;
1622 _CharT _M_thousands_sep;
1623 const _CharT* _M_curr_symbol;
1624 const _CharT* _M_positive_sign;
1625 const _CharT* _M_negative_sign;
1626 int _M_frac_digits;
1627 money_base::pattern _M_pos_format;
1628 money_base::pattern _M_neg_format;
1629
1630 bool _M_allocated;
1631
1632 __moneypunct_cache(size_t __refs = 0) : facet(__refs),
1633 _M_grouping(NULL), _M_use_grouping(false), _M_decimal_point(_CharT()),
1634 _M_thousands_sep(_CharT()), _M_curr_symbol(NULL), _M_positive_sign(NULL),
1635 _M_negative_sign(NULL), _M_frac_digits(0),
1636 _M_pos_format(money_base::pattern()),
1637 _M_neg_format(money_base::pattern()), _M_allocated(false)
1638 { }
1639
1640 ~__moneypunct_cache();
1641
1642 void
1643 _M_cache(const locale& __loc);
1644 };
1645
1646 template<typename _CharT>
1647 __moneypunct_cache<_CharT>::~__moneypunct_cache()
1648 {
1649 if (_M_allocated)
1650 {
1651 // XXX.
1652 }
1653 }
1654
1655 template<typename _CharT, bool _Intl>
1656 class moneypunct : public locale::facet, public money_base
1657 {
1658 public:
1659 // Types:
1660 typedef _CharT char_type;
1661 typedef basic_string<_CharT> string_type;
1662 typedef __moneypunct_cache<_CharT> __cache_type;
1663
1664 private:
1665 __cache_type* _M_data;
1666
1667 public:
1668 static const bool intl = _Intl;
1669 static locale::id id;
1670
1671 explicit
1672 moneypunct(size_t __refs = 0) : facet(__refs), _M_data(NULL)
1673 { _M_initialize_moneypunct(); }
1674
1675 explicit
1676 moneypunct(__cache_type* __cache, size_t __refs = 0)
1677 : facet(__refs), _M_data(__cache)
1678 { _M_initialize_moneypunct(); }
1679
1680 explicit
1681 moneypunct(__c_locale __cloc, const char* __s, size_t __refs = 0)
1682 : facet(__refs), _M_data(NULL)
1683 { _M_initialize_moneypunct(__cloc, __s); }
1684
1685 char_type
1686 decimal_point() const
1687 { return this->do_decimal_point(); }
1688
1689 char_type
1690 thousands_sep() const
1691 { return this->do_thousands_sep(); }
1692
1693 string
1694 grouping() const
1695 { return this->do_grouping(); }
1696
1697 string_type
1698 curr_symbol() const
1699 { return this->do_curr_symbol(); }
1700
1701 string_type
1702 positive_sign() const
1703 { return this->do_positive_sign(); }
1704
1705 string_type
1706 negative_sign() const
1707 { return this->do_negative_sign(); }
1708
1709 int
1710 frac_digits() const
1711 { return this->do_frac_digits(); }
1712
1713 pattern
1714 pos_format() const
1715 { return this->do_pos_format(); }
1716
1717 pattern
1718 neg_format() const
1719 { return this->do_neg_format(); }
1720
1721 protected:
1722 virtual
1723 ~moneypunct();
1724
1725 virtual char_type
1726 do_decimal_point() const
1727 { return _M_data->_M_decimal_point; }
1728
1729 virtual char_type
1730 do_thousands_sep() const
1731 { return _M_data->_M_thousands_sep; }
1732
1733 virtual string
1734 do_grouping() const
1735 { return _M_data->_M_grouping; }
1736
1737 virtual string_type
1738 do_curr_symbol() const
1739 { return _M_data->_M_curr_symbol; }
1740
1741 virtual string_type
1742 do_positive_sign() const
1743 { return _M_data->_M_positive_sign; }
1744
1745 virtual string_type
1746 do_negative_sign() const
1747 { return _M_data->_M_negative_sign; }
1748
1749 virtual int
1750 do_frac_digits() const
1751 { return _M_data->_M_frac_digits; }
1752
1753 virtual pattern
1754 do_pos_format() const
1755 { return _M_data->_M_pos_format; }
1756
1757 virtual pattern
1758 do_neg_format() const
1759 { return _M_data->_M_neg_format; }
1760
1761 // For use at construction time only.
1762 void
1763 _M_initialize_moneypunct(__c_locale __cloc = NULL,
1764 const char* __name = NULL);
1765 };
1766
1767 template<typename _CharT, bool _Intl>
1768 locale::id moneypunct<_CharT, _Intl>::id;
1769
1770 template<typename _CharT, bool _Intl>
1771 const bool moneypunct<_CharT, _Intl>::intl;
1772
1773 template<>
1774 moneypunct<char, true>::~moneypunct();
1775
1776 template<>
1777 moneypunct<char, false>::~moneypunct();
1778
1779 template<>
1780 void
1781 moneypunct<char, true>::_M_initialize_moneypunct(__c_locale, const char*);
1782
1783 template<>
1784 void
1785 moneypunct<char, false>::_M_initialize_moneypunct(__c_locale, const char*);
1786
1787 #ifdef _GLIBCXX_USE_WCHAR_T
1788 template<>
1789 moneypunct<wchar_t, true>::~moneypunct();
1790
1791 template<>
1792 moneypunct<wchar_t, false>::~moneypunct();
1793
1794 template<>
1795 void
1796 moneypunct<wchar_t, true>::_M_initialize_moneypunct(__c_locale,
1797 const char*);
1798
1799 template<>
1800 void
1801 moneypunct<wchar_t, false>::_M_initialize_moneypunct(__c_locale,
1802 const char*);
1803 #endif
1804
1805 template<typename _CharT, bool _Intl>
1806 class moneypunct_byname : public moneypunct<_CharT, _Intl>
1807 {
1808 __c_locale _M_c_locale_moneypunct;
1809
1810 public:
1811 typedef _CharT char_type;
1812 typedef basic_string<_CharT> string_type;
1813
1814 static const bool intl = _Intl;
1815
1816 explicit
1817 moneypunct_byname(const char* __s, size_t __refs = 0)
1818 : moneypunct<_CharT, _Intl>(__refs)
1819 {
1820 this->_S_create_c_locale(_M_c_locale_moneypunct, __s);
1821 this->_M_initialize_moneypunct(_M_c_locale_moneypunct);
1822 }
1823
1824 protected:
1825 virtual
1826 ~moneypunct_byname()
1827 { this->_S_destroy_c_locale(_M_c_locale_moneypunct); }
1828 };
1829
1830 template<typename _CharT, bool _Intl>
1831 const bool moneypunct_byname<_CharT, _Intl>::intl;
1832
1833 template<typename _CharT, typename _InIter>
1834 class money_get : public locale::facet
1835 {
1836 public:
1837 // Types:
1838 typedef _CharT char_type;
1839 typedef _InIter iter_type;
1840 typedef basic_string<_CharT> string_type;
1841
1842 static locale::id id;
1843
1844 explicit
1845 money_get(size_t __refs = 0) : facet(__refs) { }
1846
1847 iter_type
1848 get(iter_type __s, iter_type __end, bool __intl, ios_base& __io,
1849 ios_base::iostate& __err, long double& __units) const
1850 { return this->do_get(__s, __end, __intl, __io, __err, __units); }
1851
1852 iter_type
1853 get(iter_type __s, iter_type __end, bool __intl, ios_base& __io,
1854 ios_base::iostate& __err, string_type& __digits) const
1855 { return this->do_get(__s, __end, __intl, __io, __err, __digits); }
1856
1857 protected:
1858 virtual
1859 ~money_get() { }
1860
1861 virtual iter_type
1862 do_get(iter_type __s, iter_type __end, bool __intl, ios_base& __io,
1863 ios_base::iostate& __err, long double& __units) const;
1864
1865 virtual iter_type
1866 do_get(iter_type __s, iter_type __end, bool __intl, ios_base& __io,
1867 ios_base::iostate& __err, string_type& __digits) const;
1868 };
1869
1870 template<typename _CharT, typename _InIter>
1871 locale::id money_get<_CharT, _InIter>::id;
1872
1873 template<typename _CharT, typename _OutIter>
1874 class money_put : public locale::facet
1875 {
1876 public:
1877 typedef _CharT char_type;
1878 typedef _OutIter iter_type;
1879 typedef basic_string<_CharT> string_type;
1880
1881 static locale::id id;
1882
1883 explicit
1884 money_put(size_t __refs = 0) : facet(__refs) { }
1885
1886 iter_type
1887 put(iter_type __s, bool __intl, ios_base& __io,
1888 char_type __fill, long double __units) const
1889 { return this->do_put(__s, __intl, __io, __fill, __units); }
1890
1891 iter_type
1892 put(iter_type __s, bool __intl, ios_base& __io,
1893 char_type __fill, const string_type& __digits) const
1894 { return this->do_put(__s, __intl, __io, __fill, __digits); }
1895
1896 protected:
1897 virtual
1898 ~money_put() { }
1899
1900 virtual iter_type
1901 do_put(iter_type __s, bool __intl, ios_base& __io, char_type __fill,
1902 long double __units) const;
1903
1904 virtual iter_type
1905 do_put(iter_type __s, bool __intl, ios_base& __io, char_type __fill,
1906 const string_type& __digits) const;
1907 };
1908
1909 template<typename _CharT, typename _OutIter>
1910 locale::id money_put<_CharT, _OutIter>::id;
1911
1912
1913 struct messages_base
1914 {
1915 typedef int catalog;
1916 };
1917
1918 template<typename _CharT>
1919 class messages : public locale::facet, public messages_base
1920 {
1921 public:
1922 // Types:
1923 typedef _CharT char_type;
1924 typedef basic_string<_CharT> string_type;
1925
1926 protected:
1927 // Underlying "C" library locale information saved from
1928 // initialization, needed by messages_byname as well.
1929 __c_locale _M_c_locale_messages;
1930 const char* _M_name_messages;
1931
1932 public:
1933 static locale::id id;
1934
1935 explicit
1936 messages(size_t __refs = 0);
1937
1938 // Non-standard.
1939 explicit
1940 messages(__c_locale __cloc, const char* __s, size_t __refs = 0);
1941
1942 catalog
1943 open(const basic_string<char>& __s, const locale& __loc) const
1944 { return this->do_open(__s, __loc); }
1945
1946 // Non-standard and unorthodox, yet effective.
1947 catalog
1948 open(const basic_string<char>&, const locale&, const char*) const;
1949
1950 string_type
1951 get(catalog __c, int __set, int __msgid, const string_type& __s) const
1952 { return this->do_get(__c, __set, __msgid, __s); }
1953
1954 void
1955 close(catalog __c) const
1956 { return this->do_close(__c); }
1957
1958 protected:
1959 virtual
1960 ~messages();
1961
1962 virtual catalog
1963 do_open(const basic_string<char>&, const locale&) const;
1964
1965 virtual string_type
1966 do_get(catalog, int, int, const string_type& __dfault) const;
1967
1968 virtual void
1969 do_close(catalog) const;
1970
1971 // Returns a locale and codeset-converted string, given a char* message.
1972 char*
1973 _M_convert_to_char(const string_type& __msg) const
1974 {
1975 // XXX
1976 return reinterpret_cast<char*>(const_cast<_CharT*>(__msg.c_str()));
1977 }
1978
1979 // Returns a locale and codeset-converted string, given a char* message.
1980 string_type
1981 _M_convert_from_char(char* __msg) const
1982 {
1983 // Length of message string without terminating null.
1984 size_t __len = char_traits<char>::length(__msg) - 1;
1985
1986 // "everybody can easily convert the string using
1987 // mbsrtowcs/wcsrtombs or with iconv()"
1988 #if 0
1989 // Convert char* to _CharT in locale used to open catalog.
1990 // XXX need additional template parameter on messages class for this..
1991 // typedef typename codecvt<char, _CharT, _StateT> __codecvt_type;
1992 typedef typename codecvt<char, _CharT, mbstate_t> __codecvt_type;
1993
1994 __codecvt_type::state_type __state;
1995 // XXX may need to initialize state.
1996 //initialize_state(__state._M_init());
1997
1998 char* __from_next;
1999 // XXX what size for this string?
2000 _CharT* __to = static_cast<_CharT*>(__builtin_alloca(__len + 1));
2001 const __codecvt_type& __cvt = use_facet<__codecvt_type>(_M_locale_conv);
2002 __cvt.out(__state, __msg, __msg + __len, __from_next,
2003 __to, __to + __len + 1, __to_next);
2004 return string_type(__to);
2005 #endif
2006 #if 0
2007 typedef ctype<_CharT> __ctype_type;
2008 // const __ctype_type& __cvt = use_facet<__ctype_type>(_M_locale_msg);
2009 const __ctype_type& __cvt = use_facet<__ctype_type>(locale());
2010 // XXX Again, proper length of converted string an issue here.
2011 // For now, assume the converted length is not larger.
2012 _CharT* __dest = static_cast<_CharT*>(__builtin_alloca(__len + 1));
2013 __cvt.widen(__msg, __msg + __len, __dest);
2014 return basic_string<_CharT>(__dest);
2015 #endif
2016 return string_type();
2017 }
2018 };
2019
2020 template<typename _CharT>
2021 locale::id messages<_CharT>::id;
2022
2023 // Specializations for required instantiations.
2024 template<>
2025 string
2026 messages<char>::do_get(catalog, int, int, const string&) const;
2027
2028 #ifdef _GLIBCXX_USE_WCHAR_T
2029 template<>
2030 wstring
2031 messages<wchar_t>::do_get(catalog, int, int, const wstring&) const;
2032 #endif
2033
2034 template<typename _CharT>
2035 class messages_byname : public messages<_CharT>
2036 {
2037 public:
2038 typedef _CharT char_type;
2039 typedef basic_string<_CharT> string_type;
2040
2041 explicit
2042 messages_byname(const char* __s, size_t __refs = 0);
2043
2044 protected:
2045 virtual
2046 ~messages_byname()
2047 { }
2048 };
2049
2050 // Include host and configuration specific messages functions.
2051 #include <bits/messages_members.h>
2052
2053
2054 // Subclause convenience interfaces, inlines.
2055 // NB: These are inline because, when used in a loop, some compilers
2056 // can hoist the body out of the loop; then it's just as fast as the
2057 // C is*() function.
2058 template<typename _CharT>
2059 inline bool
2060 isspace(_CharT __c, const locale& __loc)
2061 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::space, __c); }
2062
2063 template<typename _CharT>
2064 inline bool
2065 isprint(_CharT __c, const locale& __loc)
2066 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::print, __c); }
2067
2068 template<typename _CharT>
2069 inline bool
2070 iscntrl(_CharT __c, const locale& __loc)
2071 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::cntrl, __c); }
2072
2073 template<typename _CharT>
2074 inline bool
2075 isupper(_CharT __c, const locale& __loc)
2076 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::upper, __c); }
2077
2078 template<typename _CharT>
2079 inline bool islower(_CharT __c, const locale& __loc)
2080 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::lower, __c); }
2081
2082 template<typename _CharT>
2083 inline bool
2084 isalpha(_CharT __c, const locale& __loc)
2085 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::alpha, __c); }
2086
2087 template<typename _CharT>
2088 inline bool
2089 isdigit(_CharT __c, const locale& __loc)
2090 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::digit, __c); }
2091
2092 template<typename _CharT>
2093 inline bool
2094 ispunct(_CharT __c, const locale& __loc)
2095 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::punct, __c); }
2096
2097 template<typename _CharT>
2098 inline bool
2099 isxdigit(_CharT __c, const locale& __loc)
2100 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::xdigit, __c); }
2101
2102 template<typename _CharT>
2103 inline bool
2104 isalnum(_CharT __c, const locale& __loc)
2105 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::alnum, __c); }
2106
2107 template<typename _CharT>
2108 inline bool
2109 isgraph(_CharT __c, const locale& __loc)
2110 { return use_facet<ctype<_CharT> >(__loc).is(ctype_base::graph, __c); }
2111
2112 template<typename _CharT>
2113 inline _CharT
2114 toupper(_CharT __c, const locale& __loc)
2115 { return use_facet<ctype<_CharT> >(__loc).toupper(__c); }
2116
2117 template<typename _CharT>
2118 inline _CharT
2119 tolower(_CharT __c, const locale& __loc)
2120 { return use_facet<ctype<_CharT> >(__loc).tolower(__c); }
2121 } // namespace std
2122
2123 #endif