ctype_noninline.h revision 169691
1// Locale support -*- C++ -*-
2
3// Copyright (C) 2004 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 2, 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// You should have received a copy of the GNU General Public License along
17// with this library; see the file COPYING.  If not, write to the Free
18// Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
19// USA.
20
21// As a special exception, you may use this file as part of a free software
22// library without restriction.  Specifically, if other files instantiate
23// templates or use macros or inline functions from this file, or you compile
24// this file and link it with other files to produce an executable, this
25// file does not by itself cause the resulting executable to be covered by
26// the GNU General Public License.  This exception does not however
27// invalidate any other reasons why the executable file might be covered by
28// the GNU General Public License.
29
30/** @file ctype_noninline.h
31 *  This is an internal header file, included by other library headers.
32 *  You should not attempt to use it directly.
33 */
34
35//
36// ISO C++ 14882: 22.1  Locales
37//
38
39// Information as gleaned from /usr/include/ctype.h
40
41  const ctype_base::mask*
42  ctype<char>::classic_table() throw()
43  {
44    const ctype_base::mask* __ret;
45    char* __old = strdup(setlocale(LC_CTYPE, NULL));
46    setlocale(LC_CTYPE, "C");
47    __ret = *__ctype_b_loc();
48    setlocale(LC_CTYPE, __old);
49    free(__old);
50    return __ret;
51  }
52
53  ctype<char>::ctype(__c_locale, const mask* __table, bool __del,
54		     size_t __refs)
55  : facet(__refs), _M_del(__table != 0 && __del)
56  {
57    char* __old=strdup(setlocale(LC_CTYPE, NULL));
58    setlocale(LC_CTYPE, "C");
59    _M_toupper = *__ctype_toupper_loc();
60    _M_tolower = *__ctype_tolower_loc();
61    _M_table = __table ? __table : *__ctype_b_loc();
62    setlocale(LC_CTYPE, __old);
63    free(__old);
64    _M_c_locale_ctype = _S_get_c_locale();
65  }
66
67  ctype<char>::ctype(const mask* __table, bool __del, size_t __refs)
68  : facet(__refs), _M_del(__table != 0 && __del)
69  {
70    char* __old=strdup(setlocale(LC_CTYPE, NULL));
71    setlocale(LC_CTYPE, "C");
72    _M_toupper = *__ctype_toupper_loc();
73    _M_tolower = *__ctype_tolower_loc();
74    _M_table = __table ? __table : *__ctype_b_loc();
75    setlocale(LC_CTYPE, __old);
76    free(__old);
77    _M_c_locale_ctype = _S_get_c_locale();
78  }
79
80  char
81  ctype<char>::do_toupper(char __c) const
82  { return _M_toupper[static_cast<unsigned char>(__c)]; }
83
84  const char*
85  ctype<char>::do_toupper(char* __low, const char* __high) const
86  {
87    while (__low < __high)
88      {
89	*__low = _M_toupper[static_cast<unsigned char>(*__low)];
90	++__low;
91      }
92    return __high;
93  }
94
95  char
96  ctype<char>::do_tolower(char __c) const
97  { return _M_tolower[static_cast<unsigned char>(__c)]; }
98
99  const char*
100  ctype<char>::do_tolower(char* __low, const char* __high) const
101  {
102    while (__low < __high)
103      {
104	*__low = _M_tolower[static_cast<unsigned char>(*__low)];
105	++__low;
106      }
107    return __high;
108  }
109