locales, libconv: Sync with FreeBSD (extensive reach)
[dragonfly.git] / contrib / gcc-4.4 / libstdc++-v3 / config / os / bsd / dragonfly / ctype_noninline.h
1 // Locale support -*- C++ -*-
2
3 // Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2009, 2010
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 3, 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 // Under Section 7 of GPL version 3, you are granted additional
18 // permissions described in the GCC Runtime Library Exception, version
19 // 3.1, as published by the Free Software Foundation.
20
21 // You should have received a copy of the GNU General Public License and
22 // a copy of the GCC Runtime Library Exception along with this program;
23 // see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
24 // <http://www.gnu.org/licenses/>.
25
26 /** @file bits/ctype_noninline.h
27  *  This is an internal header file, included by other library headers.
28  *  Do not attempt to use it directly. @headername{locale}
29  */
30
31 //
32 // ISO C++ 14882: 22.1  Locales
33 //
34
35 // Information as gleaned from /usr/include/ctype.h
36
37 #ifdef _CTYPE_S
38   extern "C" const unsigned long __libc_C_ctype_[];
39 #else
40   extern "C" const __uint16_t __libc_C_ctype_[];
41 #endif
42
43   const ctype_base::mask*
44   ctype<char>::classic_table() throw()
45   { return __libc_C_ctype_ + 1; }
46
47   ctype<char>::ctype(__c_locale, const mask* __table, bool __del,
48                      size_t __refs)
49   : facet(__refs), _M_del(__table != 0 && __del),
50   _M_toupper(NULL), _M_tolower(NULL),
51   _M_table(__table ? __table : classic_table())
52   {
53     memset(_M_widen, 0, sizeof(_M_widen));
54     _M_widen_ok = 0;
55     memset(_M_narrow, 0, sizeof(_M_narrow));
56     _M_narrow_ok = 0;
57   }
58
59   ctype<char>::ctype(const mask* __table, bool __del, size_t __refs)
60   : facet(__refs), _M_del(__table != 0 && __del),
61   _M_toupper(NULL), _M_tolower(NULL),
62   _M_table(__table ? __table : classic_table())
63   {
64     memset(_M_widen, 0, sizeof(_M_widen));
65     _M_widen_ok = 0;
66     memset(_M_narrow, 0, sizeof(_M_narrow));
67     _M_narrow_ok = 0;
68   }
69
70   char
71   ctype<char>::do_toupper(char __c) const
72   { return ::toupper((int) __c); }
73
74   const char*
75   ctype<char>::do_toupper(char* __low, const char* __high) const
76   {
77     while (__low < __high)
78       {
79         *__low = ::toupper((int) *__low);
80         ++__low;
81       }
82     return __high;
83   }
84
85   char
86   ctype<char>::do_tolower(char __c) const
87   { return ::tolower((int) __c); }
88
89   const char*
90   ctype<char>::do_tolower(char* __low, const char* __high) const
91   {
92     while (__low < __high)
93       {
94         *__low = ::tolower((int) *__low);
95         ++__low;
96       }
97     return __high;
98   }