| // Locale support -*- C++ -*- |
| |
| // Copyright (C) 2000, 2003 Free Software Foundation, Inc. |
| // |
| // This file is part of the GNU ISO C++ Library. This library is free |
| // software; you can redistribute it and/or modify it under the |
| // terms of the GNU General Public License as published by the |
| // Free Software Foundation; either version 2, or (at your option) |
| // any later version. |
| |
| // This library is distributed in the hope that it will be useful, |
| // but WITHOUT ANY WARRANTY; without even the implied warranty of |
| // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| // GNU General Public License for more details. |
| |
| // You should have received a copy of the GNU General Public License along |
| // with this library; see the file COPYING. If not, write to the Free |
| // Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
| // USA. |
| |
| // As a special exception, you may use this file as part of a free software |
| // library without restriction. Specifically, if other files instantiate |
| // templates or use macros or inline functions from this file, or you compile |
| // this file and link it with other files to produce an executable, this |
| // file does not by itself cause the resulting executable to be covered by |
| // the GNU General Public License. This exception does not however |
| // invalidate any other reasons why the executable file might be covered by |
| // the GNU General Public License. |
| |
| // |
| // ISO C++ 14882: 22.1 Locales |
| // |
| |
| // ctype bits to be inlined go here. Non-inlinable (ie virtual do_*) |
| // functions go in ctype.cc |
| |
| // The following definitions are portable, but insanely slow. If one |
| // cares at all about performance, then specialized ctype |
| // functionality should be added for the native os in question: see |
| // the config/os/bits/ctype_*.h files. |
| |
| // Constructing a synthetic "C" table should be seriously considered... |
| |
| bool |
| ctype<char>:: |
| is(mask __m, char __c) const |
| { |
| if (_M_table) |
| return _M_table[static_cast<unsigned char>(__c)] & __m; |
| else |
| { |
| bool __ret = false; |
| const size_t __bitmasksize = 15; |
| size_t __bitcur = 0; // Lowest bitmask in ctype_base == 0 |
| for (; __bitcur <= __bitmasksize; ++__bitcur) |
| { |
| const mask __bit = static_cast<mask>(1 << __bitcur); |
| if (__m & __bit) |
| { |
| bool __testis; |
| switch (__bit) |
| { |
| case space: |
| __testis = isspace(__c); |
| break; |
| case print: |
| __testis = isprint(__c); |
| break; |
| case cntrl: |
| __testis = iscntrl(__c); |
| break; |
| case upper: |
| __testis = isupper(__c); |
| break; |
| case lower: |
| __testis = islower(__c); |
| break; |
| case alpha: |
| __testis = isalpha(__c); |
| break; |
| case digit: |
| __testis = isdigit(__c); |
| break; |
| case punct: |
| __testis = ispunct(__c); |
| break; |
| case xdigit: |
| __testis = isxdigit(__c); |
| break; |
| case alnum: |
| __testis = isalnum(__c); |
| break; |
| case graph: |
| __testis = isgraph(__c); |
| break; |
| default: |
| __testis = false; |
| break; |
| } |
| __ret |= __testis; |
| } |
| } |
| return __ret; |
| } |
| } |
| |
| const char* |
| ctype<char>:: |
| is(const char* __low, const char* __high, mask* __vec) const |
| { |
| if (_M_table) |
| while (__low < __high) |
| *__vec++ = _M_table[static_cast<unsigned char>(*__low++)]; |
| else |
| { |
| // Highest bitmask in ctype_base == 10. |
| const size_t __bitmasksize = 15; |
| for (;__low < __high; ++__vec, ++__low) |
| { |
| mask __m = 0; |
| // Lowest bitmask in ctype_base == 0 |
| size_t __i = 0; |
| for (;__i <= __bitmasksize; ++__i) |
| { |
| const mask __bit = static_cast<mask>(1 << __i); |
| if (this->is(__bit, *__low)) |
| __m |= __bit; |
| } |
| *__vec = __m; |
| } |
| } |
| return __high; |
| } |
| |
| const char* |
| ctype<char>:: |
| scan_is(mask __m, const char* __low, const char* __high) const |
| { |
| if (_M_table) |
| while (__low < __high |
| && !(_M_table[static_cast<unsigned char>(*__low)] & __m)) |
| ++__low; |
| else |
| while (__low < __high && !this->is(__m, *__low)) |
| ++__low; |
| return __low; |
| } |
| |
| const char* |
| ctype<char>:: |
| scan_not(mask __m, const char* __low, const char* __high) const |
| { |
| if (_M_table) |
| while (__low < __high |
| && (_M_table[static_cast<unsigned char>(*__low)] & __m) != 0) |
| ++__low; |
| else |
| while (__low < __high && this->is(__m, *__low) != 0) |
| ++__low; |
| return __low; |
| } |