1// Locale support -*- C++ -*- 2 3// Copyright (C) 2000, 2003, 2004, 2005 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// 31// ISO C++ 14882: 22.1 Locales 32// 33 34// ctype bits to be inlined go here. Non-inlinable (ie virtual do_*) 35// functions go in ctype.cc 36 37 bool 38 ctype<char>:: 39 is(mask __m, char __c) const 40 { 41 if (_M_table) 42 return _M_table[static_cast<unsigned char>(__c)] & __m; 43 else 44 return __istype(__c, __m); 45 } 46 47 const char* 48 ctype<char>:: 49 is(const char* __low, const char* __high, mask* __vec) const 50 { 51 if (_M_table) 52 while (__low < __high) 53 *__vec++ = _M_table[static_cast<unsigned char>(*__low++)]; 54 else 55 for (;__low < __high; ++__vec, ++__low) 56 { 57#if defined (_CTYPE_S) || defined (__istype) 58 *__vec = __maskrune (*__low, upper | lower | alpha | digit | xdigit 59 | space | print | graph | cntrl | punct | alnum); 60#else 61 mask __m = 0; 62 if (this->is(upper, *__low)) __m |= upper; 63 if (this->is(lower, *__low)) __m |= lower; 64 if (this->is(alpha, *__low)) __m |= alpha; 65 if (this->is(digit, *__low)) __m |= digit; 66 if (this->is(xdigit, *__low)) __m |= xdigit; 67 if (this->is(space, *__low)) __m |= space; 68 if (this->is(print, *__low)) __m |= print; 69 if (this->is(graph, *__low)) __m |= graph; 70 if (this->is(cntrl, *__low)) __m |= cntrl; 71 if (this->is(punct, *__low)) __m |= punct; 72 // Do not include explicit line for alnum mask since it is a 73 // pure composite of masks on FreeBSD. 74 *__vec = __m; 75#endif 76 } 77 return __high; 78 } 79 80 const char* 81 ctype<char>:: 82 scan_is(mask __m, const char* __low, const char* __high) const 83 { 84 if (_M_table) 85 while (__low < __high 86 && !(_M_table[static_cast<unsigned char>(*__low)] & __m)) 87 ++__low; 88 else 89 while (__low < __high && !this->is(__m, *__low)) 90 ++__low; 91 return __low; 92 } 93 94 const char* 95 ctype<char>:: 96 scan_not(mask __m, const char* __low, const char* __high) const 97 { 98 if (_M_table) 99 while (__low < __high 100 && (_M_table[static_cast<unsigned char>(*__low)] & __m) != 0) 101 ++__low; 102 else 103 while (__low < __high && this->is(__m, *__low) != 0) 104 ++__low; 105 return __low; 106 } 107 108#ifdef _GLIBCXX_USE_WCHAR_T 109 inline bool 110 ctype<wchar_t>:: 111 do_is(mask __m, wchar_t __c) const 112 { 113 return __istype (__c, __m); 114 } 115 116 inline const wchar_t* 117 ctype<wchar_t>:: 118 do_is(const wchar_t* __lo, const wchar_t* __hi, mask* __vec) const 119 { 120 for (; __lo < __hi; ++__vec, ++__lo) 121 *__vec = __maskrune (*__lo, upper | lower | alpha | digit | xdigit 122 | space | print | graph | cntrl | punct | alnum); 123 return __hi; 124 } 125 126 inline const wchar_t* 127 ctype<wchar_t>:: 128 do_scan_is(mask __m, const wchar_t* __lo, const wchar_t* __hi) const 129 { 130 while (__lo < __hi && ! __istype (*__lo, __m)) 131 ++__lo; 132 return __lo; 133 } 134 135 inline const wchar_t* 136 ctype<wchar_t>:: 137 do_scan_not(mask __m, const char_type* __lo, const char_type* __hi) const 138 { 139 while (__lo < __hi && __istype (*__lo, __m)) 140 ++__lo; 141 return __lo; 142 } 143#endif 144