1// Locale support -*- C++ -*-
2
3// Copyright (C) 1997, 1998, 1999, 2000, 2002 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 /mingw32/include/ctype.h.
40
41  // This should be in mingw's ctype.h but isn't in older versions
42  // Static classic C-locale table.  _ctype[0] is EOF
43  extern "C"  unsigned short  __declspec(dllimport) _ctype[];
44
45  const ctype_base::mask*
46  ctype<char>::classic_table() throw()
47  { return _ctype + 1; }
48
49  ctype<char>::ctype(__c_locale, const mask* __table, bool __del,
50		     size_t __refs)
51  : facet(__refs), _M_del(__table != 0 && __del),
52  _M_toupper(NULL), _M_tolower(NULL),
53  _M_table(__table ? __table : classic_table())
54  {
55    memset(_M_widen, 0, sizeof(_M_widen));
56    _M_widen_ok = 0;
57    memset(_M_narrow, 0, sizeof(_M_narrow));
58    _M_narrow_ok = 0;
59  }
60
61  ctype<char>::ctype(const mask* __table, bool __del, size_t __refs)
62  : facet(__refs), _M_del(__table != 0 && __del),
63  _M_toupper(NULL), _M_tolower(NULL),
64  _M_table(__table ? __table : classic_table())
65  {
66    memset(_M_widen, 0, sizeof(_M_widen));
67    _M_widen_ok = 0;
68    memset(_M_narrow, 0, sizeof(_M_narrow));
69    _M_narrow_ok = 0;
70  }
71
72  char
73  ctype<char>::do_toupper(char __c) const
74  { return (this->is(ctype_base::lower, __c) ? (__c - 'a' + 'A') : __c); }
75
76  const char*
77  ctype<char>::do_toupper(char* __low, const char* __high) const
78  {
79    while (__low < __high)
80      {
81	*__low = this->do_toupper(*__low);
82	++__low;
83      }
84    return __high;
85  }
86
87  char
88  ctype<char>::do_tolower(char __c) const
89  { return (this->is(ctype_base::upper, __c) ? (__c - 'A' + 'a') : __c); }
90
91  const char*
92  ctype<char>::do_tolower(char* __low, const char* __high) const
93  {
94    while (__low < __high)
95      {
96	*__low = this->do_tolower(*__low);
97	++__low;
98      }
99    return __high;
100  }
101
102
103
104
105