l4/pkg/libstdc++-v3/contrib/libstdc++-v3-4.8/config/os/newlib/ctype_configure_char.cc

   1 // Locale support -*- C++ -*-
   2
   3 // Copyright (C) 2011-2013 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 /** @file ctype_configure_char.cc */
  26
  27 //
  28 // ISO C++ 14882: 22.1  Locales
  29 //
  30
  31 #include <locale>
  32 #include <cstdlib>
  33 #include <cstring>
  34
  35 namespace std _GLIBCXX_VISIBILITY(default)
  36 {
  37 _GLIBCXX_BEGIN_NAMESPACE_VERSION
  38
  39 // Information as gleaned from /usr/include/ctype.h
  40
  41   const ctype_base::mask*
  42   ctype<char>::classic_table() throw()
  43   { return _ctype_ + 1; }
  44
  45   ctype<char>::ctype(__c_locale, const mask* __table, bool __del,
  46                      size_t __refs)
  47   : facet(__refs), _M_del(__table != 0 && __del),
  48   _M_toupper(NULL), _M_tolower(NULL),
  49   _M_table(__table ? __table : classic_table())
  50   {
  51     memset(_M_widen, 0, sizeof(_M_widen));
  52     _M_widen_ok = 0;
  53     memset(_M_narrow, 0, sizeof(_M_narrow));
  54     _M_narrow_ok = 0;
  55   }
  56
  57   ctype<char>::ctype(const mask* __table, bool __del, size_t __refs)
  58   : facet(__refs), _M_del(__table != 0 && __del),
  59   _M_toupper(NULL), _M_tolower(NULL),
  60   _M_table(__table ? __table : classic_table())
  61   {
  62     memset(_M_widen, 0, sizeof(_M_widen));
  63     _M_widen_ok = 0;
  64     memset(_M_narrow, 0, sizeof(_M_narrow));
  65     _M_narrow_ok = 0;
  66   }
  67
  68   char
  69   ctype<char>::do_toupper(char __c) const
  70   {
  71     int __x = __c;
  72     return (this->is(ctype_base::lower, __c) ? (__x - 'a' + 'A') : __x);
  73   }
  74
  75   const char*
  76   ctype<char>::do_toupper(char* __low, const char* __high) const
  77   {
  78     while (__low < __high)
  79       {
  80         *__low = this->do_toupper(*__low);
  81         ++__low;
  82       }
  83     return __high;
  84   }
  85
  86   char
  87   ctype<char>::do_tolower(char __c) const
  88   {
  89     int __x = __c;
  90     return (this->is(ctype_base::upper, __c) ? (__x - 'A' + 'a') : __x);
  91   }
  92
  93   const char*
  94   ctype<char>::do_tolower(char* __low, const char* __high) const
  95   {
  96     while (__low < __high)
  97       {
  98         *__low = this->do_tolower(*__low);
  99         ++__low;
 100       }
 101     return __high;
 102   }
 103
 104 _GLIBCXX_END_NAMESPACE_VERSION
 105 } // namespace