You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and dots ('.'), can be up to 35 characters long. Letters must be lowercase.
694 lines
25 KiB
694 lines
25 KiB
/////////////////////////////////////////////////////////////////////////////// |
|
/// \file cpp_regex_traits.hpp |
|
/// Contains the definition of the cpp_regex_traits\<\> template, which is a |
|
/// wrapper for std::locale that can be used to customize the behavior of |
|
/// static and dynamic regexes. |
|
// |
|
// Copyright 2008 Eric Niebler. Distributed under the Boost |
|
// Software License, Version 1.0. (See accompanying file |
|
// LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt) |
|
|
|
#ifndef BOOST_XPRESSIVE_TRAITS_CPP_REGEX_TRAITS_HPP_EAN_10_04_2005 |
|
#define BOOST_XPRESSIVE_TRAITS_CPP_REGEX_TRAITS_HPP_EAN_10_04_2005 |
|
|
|
// MS compatible compilers support #pragma once |
|
#if defined(_MSC_VER) && (_MSC_VER >= 1020) |
|
# pragma once |
|
#endif |
|
|
|
#include <ios> |
|
#include <string> |
|
#include <locale> |
|
#include <sstream> |
|
#include <boost/config.hpp> |
|
#include <boost/assert.hpp> |
|
#include <boost/integer.hpp> |
|
#include <boost/mpl/assert.hpp> |
|
#include <boost/detail/workaround.hpp> |
|
#include <boost/type_traits/is_same.hpp> |
|
#include <boost/xpressive/detail/detail_fwd.hpp> |
|
#include <boost/xpressive/detail/utility/literals.hpp> |
|
|
|
// From John Maddock: |
|
// Fix for gcc prior to 3.4: std::ctype<wchar_t> doesn't allow masks to be combined, for example: |
|
// std::use_facet<std::ctype<wchar_t> >(locale()).is(std::ctype_base::lower|std::ctype_base::upper, L'a'); |
|
// incorrectly returns false. |
|
// NOTE: later version of the gcc define __GLIBCXX__, not __GLIBCPP__ |
|
#if BOOST_WORKAROUND(__GLIBCPP__, != 0) |
|
# define BOOST_XPRESSIVE_BUGGY_CTYPE_FACET |
|
#endif |
|
|
|
namespace boost { namespace xpressive |
|
{ |
|
|
|
namespace detail |
|
{ |
|
// define an unsigned integral typedef of the same size as std::ctype_base::mask |
|
typedef boost::uint_t<sizeof(std::ctype_base::mask) * CHAR_BIT>::least umask_t; |
|
BOOST_MPL_ASSERT_RELATION(sizeof(std::ctype_base::mask), ==, sizeof(umask_t)); |
|
|
|
// Calculate what the size of the umaskex_t type should be to fix the 3 extra bitmasks |
|
// 11 char categories in ctype_base |
|
// + 3 extra categories for xpressive |
|
// = 14 total bits needed |
|
int const umaskex_bits = (14 > (sizeof(umask_t) * CHAR_BIT)) ? 14 : sizeof(umask_t) * CHAR_BIT; |
|
|
|
// define an unsigned integral type with at least umaskex_bits |
|
typedef boost::uint_t<umaskex_bits>::fast umaskex_t; |
|
BOOST_MPL_ASSERT_RELATION(sizeof(umask_t), <=, sizeof(umaskex_t)); |
|
|
|
// cast a ctype mask to a umaskex_t |
|
template<std::ctype_base::mask Mask> |
|
struct mask_cast |
|
{ |
|
BOOST_STATIC_CONSTANT(umaskex_t, value = static_cast<umask_t>(Mask)); |
|
}; |
|
|
|
#ifdef __CYGWIN__ |
|
// Work around a gcc warning on cygwin |
|
template<> |
|
struct mask_cast<std::ctype_base::print> |
|
{ |
|
BOOST_MPL_ASSERT_RELATION('\227', ==, std::ctype_base::print); |
|
BOOST_STATIC_CONSTANT(umaskex_t, value = 0227); |
|
}; |
|
#endif |
|
|
|
#ifndef BOOST_NO_INCLASS_MEMBER_INITIALIZATION |
|
template<std::ctype_base::mask Mask> |
|
umaskex_t const mask_cast<Mask>::value; |
|
#endif |
|
|
|
#ifndef BOOST_XPRESSIVE_BUGGY_CTYPE_FACET |
|
// an unsigned integer with the highest bit set |
|
umaskex_t const highest_bit = static_cast<umaskex_t>(1) << (sizeof(umaskex_t) * CHAR_BIT - 1); |
|
|
|
/////////////////////////////////////////////////////////////////////////////// |
|
// unused_mask |
|
// find a bit in an int that isn't set |
|
template<umaskex_t In, umaskex_t Out = highest_bit, bool Done = (0 == (Out & In))> |
|
struct unused_mask |
|
{ |
|
BOOST_MPL_ASSERT_RELATION(1, !=, Out); |
|
BOOST_STATIC_CONSTANT(umaskex_t, value = (unused_mask<In, (Out >> 1)>::value)); |
|
}; |
|
|
|
template<umaskex_t In, umaskex_t Out> |
|
struct unused_mask<In, Out, true> |
|
{ |
|
BOOST_STATIC_CONSTANT(umaskex_t, value = Out); |
|
}; |
|
|
|
#ifndef BOOST_NO_INCLASS_MEMBER_INITIALIZATION |
|
template<umaskex_t In, umaskex_t Out, bool Done> |
|
umaskex_t const unused_mask<In, Out, Done>::value; |
|
#endif |
|
|
|
umaskex_t const std_ctype_alnum = mask_cast<std::ctype_base::alnum>::value; |
|
umaskex_t const std_ctype_alpha = mask_cast<std::ctype_base::alpha>::value; |
|
umaskex_t const std_ctype_cntrl = mask_cast<std::ctype_base::cntrl>::value; |
|
umaskex_t const std_ctype_digit = mask_cast<std::ctype_base::digit>::value; |
|
umaskex_t const std_ctype_graph = mask_cast<std::ctype_base::graph>::value; |
|
umaskex_t const std_ctype_lower = mask_cast<std::ctype_base::lower>::value; |
|
umaskex_t const std_ctype_print = mask_cast<std::ctype_base::print>::value; |
|
umaskex_t const std_ctype_punct = mask_cast<std::ctype_base::punct>::value; |
|
umaskex_t const std_ctype_space = mask_cast<std::ctype_base::space>::value; |
|
umaskex_t const std_ctype_upper = mask_cast<std::ctype_base::upper>::value; |
|
umaskex_t const std_ctype_xdigit = mask_cast<std::ctype_base::xdigit>::value; |
|
|
|
// Reserve some bits for the implementation |
|
#if defined(__GLIBCXX__) |
|
umaskex_t const std_ctype_reserved = 0x8000; |
|
#elif defined(_CPPLIB_VER) && defined(BOOST_WINDOWS) |
|
umaskex_t const std_ctype_reserved = 0x8200; |
|
#else |
|
umaskex_t const std_ctype_reserved = 0; |
|
#endif |
|
|
|
// Bitwise-or all the ctype masks together |
|
umaskex_t const all_ctype_masks = std_ctype_reserved |
|
| std_ctype_alnum | std_ctype_alpha | std_ctype_cntrl | std_ctype_digit |
|
| std_ctype_graph | std_ctype_lower | std_ctype_print | std_ctype_punct |
|
| std_ctype_space | std_ctype_upper | std_ctype_xdigit; |
|
|
|
// define a new mask for "underscore" ("word" == alnum | underscore) |
|
umaskex_t const non_std_ctype_underscore = unused_mask<all_ctype_masks>::value; |
|
|
|
// define a new mask for "blank" |
|
umaskex_t const non_std_ctype_blank = unused_mask<all_ctype_masks | non_std_ctype_underscore>::value; |
|
|
|
// define a new mask for "newline" |
|
umaskex_t const non_std_ctype_newline = unused_mask<all_ctype_masks | non_std_ctype_underscore | non_std_ctype_blank>::value; |
|
|
|
#else |
|
/////////////////////////////////////////////////////////////////////////////// |
|
// Ugly work-around for buggy ctype facets. |
|
umaskex_t const std_ctype_alnum = 1 << 0; |
|
umaskex_t const std_ctype_alpha = 1 << 1; |
|
umaskex_t const std_ctype_cntrl = 1 << 2; |
|
umaskex_t const std_ctype_digit = 1 << 3; |
|
umaskex_t const std_ctype_graph = 1 << 4; |
|
umaskex_t const std_ctype_lower = 1 << 5; |
|
umaskex_t const std_ctype_print = 1 << 6; |
|
umaskex_t const std_ctype_punct = 1 << 7; |
|
umaskex_t const std_ctype_space = 1 << 8; |
|
umaskex_t const std_ctype_upper = 1 << 9; |
|
umaskex_t const std_ctype_xdigit = 1 << 10; |
|
umaskex_t const non_std_ctype_underscore = 1 << 11; |
|
umaskex_t const non_std_ctype_blank = 1 << 12; |
|
umaskex_t const non_std_ctype_newline = 1 << 13; |
|
|
|
static umaskex_t const std_masks[] = |
|
{ |
|
mask_cast<std::ctype_base::alnum>::value |
|
, mask_cast<std::ctype_base::alpha>::value |
|
, mask_cast<std::ctype_base::cntrl>::value |
|
, mask_cast<std::ctype_base::digit>::value |
|
, mask_cast<std::ctype_base::graph>::value |
|
, mask_cast<std::ctype_base::lower>::value |
|
, mask_cast<std::ctype_base::print>::value |
|
, mask_cast<std::ctype_base::punct>::value |
|
, mask_cast<std::ctype_base::space>::value |
|
, mask_cast<std::ctype_base::upper>::value |
|
, mask_cast<std::ctype_base::xdigit>::value |
|
}; |
|
|
|
inline int mylog2(umaskex_t i) |
|
{ |
|
return "\0\0\1\0\2\0\0\0\3"[i & 0xf] |
|
+ "\0\4\5\0\6\0\0\0\7"[(i & 0xf0) >> 04] |
|
+ "\0\10\11\0\12\0\0\0\13"[(i & 0xf00) >> 010]; |
|
} |
|
#endif |
|
|
|
// convenient constant for the extra masks |
|
umaskex_t const non_std_ctype_masks = non_std_ctype_underscore | non_std_ctype_blank | non_std_ctype_newline; |
|
|
|
/////////////////////////////////////////////////////////////////////////////// |
|
// cpp_regex_traits_base |
|
// BUGBUG this should be replaced with a regex facet that lets you query for |
|
// an array of underscore characters and an array of line separator characters. |
|
template<typename Char, std::size_t SizeOfChar = sizeof(Char)> |
|
struct cpp_regex_traits_base |
|
{ |
|
protected: |
|
void imbue(std::locale const &) |
|
{ |
|
} |
|
|
|
static bool is(std::ctype<Char> const &ct, Char ch, umaskex_t mask) |
|
{ |
|
#ifndef BOOST_XPRESSIVE_BUGGY_CTYPE_FACET |
|
|
|
if(ct.is((std::ctype_base::mask)(umask_t)mask, ch)) |
|
{ |
|
return true; |
|
} |
|
|
|
#else |
|
|
|
umaskex_t tmp = mask & ~non_std_ctype_masks; |
|
for(umaskex_t i; 0 != (i = (tmp & (~tmp+1))); tmp &= ~i) |
|
{ |
|
std::ctype_base::mask m = (std::ctype_base::mask)(umask_t)std_masks[mylog2(i)]; |
|
if(ct.is(m, ch)) |
|
{ |
|
return true; |
|
} |
|
} |
|
|
|
#endif |
|
|
|
return ((mask & non_std_ctype_blank) && cpp_regex_traits_base::is_blank(ch)) |
|
|| ((mask & non_std_ctype_underscore) && cpp_regex_traits_base::is_underscore(ch)) |
|
|| ((mask & non_std_ctype_newline) && cpp_regex_traits_base::is_newline(ch)); |
|
} |
|
|
|
private: |
|
static bool is_blank(Char ch) |
|
{ |
|
BOOST_MPL_ASSERT_RELATION('\t', ==, L'\t'); |
|
BOOST_MPL_ASSERT_RELATION(' ', ==, L' '); |
|
return L' ' == ch || L'\t' == ch; |
|
} |
|
|
|
static bool is_underscore(Char ch) |
|
{ |
|
BOOST_MPL_ASSERT_RELATION('_', ==, L'_'); |
|
return L'_' == ch; |
|
} |
|
|
|
static bool is_newline(Char ch) |
|
{ |
|
BOOST_MPL_ASSERT_RELATION('\r', ==, L'\r'); |
|
BOOST_MPL_ASSERT_RELATION('\n', ==, L'\n'); |
|
BOOST_MPL_ASSERT_RELATION('\f', ==, L'\f'); |
|
return L'\r' == ch || L'\n' == ch || L'\f' == ch |
|
|| (1 < SizeOfChar && (0x2028u == ch || 0x2029u == ch || 0x85u == ch)); |
|
} |
|
}; |
|
|
|
#ifndef BOOST_XPRESSIVE_BUGGY_CTYPE_FACET |
|
|
|
template<typename Char> |
|
struct cpp_regex_traits_base<Char, 1> |
|
{ |
|
protected: |
|
void imbue(std::locale const &loc) |
|
{ |
|
int i = 0; |
|
Char allchars[UCHAR_MAX + 1]; |
|
for(i = 0; i <= static_cast<int>(UCHAR_MAX); ++i) |
|
{ |
|
allchars[i] = static_cast<Char>(i); |
|
} |
|
|
|
std::ctype<Char> const &ct = BOOST_USE_FACET(std::ctype<Char>, loc); |
|
std::ctype_base::mask tmp[UCHAR_MAX + 1]; |
|
ct.is(allchars, allchars + UCHAR_MAX + 1, tmp); |
|
for(i = 0; i <= static_cast<int>(UCHAR_MAX); ++i) |
|
{ |
|
this->masks_[i] = static_cast<umask_t>(tmp[i]); |
|
BOOST_ASSERT(0 == (this->masks_[i] & non_std_ctype_masks)); |
|
} |
|
|
|
this->masks_[static_cast<unsigned char>('_')] |= non_std_ctype_underscore; |
|
this->masks_[static_cast<unsigned char>(' ')] |= non_std_ctype_blank; |
|
this->masks_[static_cast<unsigned char>('\t')] |= non_std_ctype_blank; |
|
this->masks_[static_cast<unsigned char>('\n')] |= non_std_ctype_newline; |
|
this->masks_[static_cast<unsigned char>('\r')] |= non_std_ctype_newline; |
|
this->masks_[static_cast<unsigned char>('\f')] |= non_std_ctype_newline; |
|
} |
|
|
|
bool is(std::ctype<Char> const &, Char ch, umaskex_t mask) const |
|
{ |
|
return 0 != (this->masks_[static_cast<unsigned char>(ch)] & mask); |
|
} |
|
|
|
private: |
|
umaskex_t masks_[UCHAR_MAX + 1]; |
|
}; |
|
|
|
#endif |
|
|
|
} // namespace detail |
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////// |
|
// cpp_regex_traits |
|
// |
|
/// \brief Encapsaulates a std::locale for use by the |
|
/// basic_regex\<\> class template. |
|
template<typename Char> |
|
struct cpp_regex_traits |
|
: detail::cpp_regex_traits_base<Char> |
|
{ |
|
typedef Char char_type; |
|
typedef std::basic_string<char_type> string_type; |
|
typedef std::locale locale_type; |
|
typedef detail::umaskex_t char_class_type; |
|
typedef regex_traits_version_2_tag version_tag; |
|
typedef detail::cpp_regex_traits_base<Char> base_type; |
|
|
|
/// Initialize a cpp_regex_traits object to use the specified std::locale, |
|
/// or the global std::locale if none is specified. |
|
/// |
|
cpp_regex_traits(locale_type const &loc = locale_type()) |
|
: base_type() |
|
, loc_() |
|
{ |
|
this->imbue(loc); |
|
} |
|
|
|
/// Checks two cpp_regex_traits objects for equality |
|
/// |
|
/// \return this->getloc() == that.getloc(). |
|
bool operator ==(cpp_regex_traits<char_type> const &that) const |
|
{ |
|
return this->loc_ == that.loc_; |
|
} |
|
|
|
/// Checks two cpp_regex_traits objects for inequality |
|
/// |
|
/// \return this->getloc() != that.getloc(). |
|
bool operator !=(cpp_regex_traits<char_type> const &that) const |
|
{ |
|
return this->loc_ != that.loc_; |
|
} |
|
|
|
/// Convert a char to a Char |
|
/// |
|
/// \param ch The source character. |
|
/// \return std::use_facet\<std::ctype\<char_type\> \>(this->getloc()).widen(ch). |
|
char_type widen(char ch) const |
|
{ |
|
return this->ctype_->widen(ch); |
|
} |
|
|
|
/// Returns a hash value for a Char in the range [0, UCHAR_MAX] |
|
/// |
|
/// \param ch The source character. |
|
/// \return a value between 0 and UCHAR_MAX, inclusive. |
|
static unsigned char hash(char_type ch) |
|
{ |
|
return static_cast<unsigned char>(std::char_traits<Char>::to_int_type(ch)); |
|
} |
|
|
|
/// No-op |
|
/// |
|
/// \param ch The source character. |
|
/// \return ch |
|
static char_type translate(char_type ch) |
|
{ |
|
return ch; |
|
} |
|
|
|
/// Converts a character to lower-case using the internally-stored std::locale. |
|
/// |
|
/// \param ch The source character. |
|
/// \return std::tolower(ch, this->getloc()). |
|
char_type translate_nocase(char_type ch) const |
|
{ |
|
return this->ctype_->tolower(ch); |
|
} |
|
|
|
/// Converts a character to lower-case using the internally-stored std::locale. |
|
/// |
|
/// \param ch The source character. |
|
/// \return std::tolower(ch, this->getloc()). |
|
char_type tolower(char_type ch) const |
|
{ |
|
return this->ctype_->tolower(ch); |
|
} |
|
|
|
/// Converts a character to upper-case using the internally-stored std::locale. |
|
/// |
|
/// \param ch The source character. |
|
/// \return std::toupper(ch, this->getloc()). |
|
char_type toupper(char_type ch) const |
|
{ |
|
return this->ctype_->toupper(ch); |
|
} |
|
|
|
/// Returns a string_type containing all the characters that compare equal |
|
/// disregrarding case to the one passed in. This function can only be called |
|
/// if has_fold_case\<cpp_regex_traits\<Char\> \>::value is true. |
|
/// |
|
/// \param ch The source character. |
|
/// \return string_type containing all chars which are equal to ch when disregarding |
|
/// case |
|
string_type fold_case(char_type ch) const |
|
{ |
|
BOOST_MPL_ASSERT((is_same<char_type, char>)); |
|
char_type ntcs[] = { |
|
this->ctype_->tolower(ch) |
|
, this->ctype_->toupper(ch) |
|
, 0 |
|
}; |
|
if(ntcs[1] == ntcs[0]) |
|
ntcs[1] = 0; |
|
return string_type(ntcs); |
|
} |
|
|
|
/// Checks to see if a character is within a character range. |
|
/// |
|
/// \param first The bottom of the range, inclusive. |
|
/// \param last The top of the range, inclusive. |
|
/// \param ch The source character. |
|
/// \return first <= ch && ch <= last. |
|
static bool in_range(char_type first, char_type last, char_type ch) |
|
{ |
|
return first <= ch && ch <= last; |
|
} |
|
|
|
/// Checks to see if a character is within a character range, irregardless of case. |
|
/// |
|
/// \param first The bottom of the range, inclusive. |
|
/// \param last The top of the range, inclusive. |
|
/// \param ch The source character. |
|
/// \return in_range(first, last, ch) || in_range(first, last, tolower(ch, this->getloc())) || |
|
/// in_range(first, last, toupper(ch, this->getloc())) |
|
/// \attention The default implementation doesn't do proper Unicode |
|
/// case folding, but this is the best we can do with the standard |
|
/// ctype facet. |
|
bool in_range_nocase(char_type first, char_type last, char_type ch) const |
|
{ |
|
// NOTE: this default implementation doesn't do proper Unicode |
|
// case folding, but this is the best we can do with the standard |
|
// std::ctype facet. |
|
return this->in_range(first, last, ch) |
|
|| this->in_range(first, last, this->ctype_->toupper(ch)) |
|
|| this->in_range(first, last, this->ctype_->tolower(ch)); |
|
} |
|
|
|
/// INTERNAL ONLY |
|
//string_type transform(char_type const *begin, char_type const *end) const |
|
//{ |
|
// return this->collate_->transform(begin, end); |
|
//} |
|
|
|
/// Returns a sort key for the character sequence designated by the iterator range [F1, F2) |
|
/// such that if the character sequence [G1, G2) sorts before the character sequence [H1, H2) |
|
/// then v.transform(G1, G2) \< v.transform(H1, H2). |
|
/// |
|
/// \attention Not currently used |
|
template<typename FwdIter> |
|
string_type transform(FwdIter begin, FwdIter end) const |
|
{ |
|
//string_type str(begin, end); |
|
//return this->transform(str.data(), str.data() + str.size()); |
|
|
|
BOOST_ASSERT(false); |
|
return string_type(); |
|
} |
|
|
|
/// Returns a sort key for the character sequence designated by the iterator range [F1, F2) |
|
/// such that if the character sequence [G1, G2) sorts before the character sequence [H1, H2) |
|
/// when character case is not considered then |
|
/// v.transform_primary(G1, G2) \< v.transform_primary(H1, H2). |
|
/// |
|
/// \attention Not currently used |
|
template<typename FwdIter> |
|
string_type transform_primary(FwdIter begin, FwdIter end) const |
|
{ |
|
BOOST_ASSERT(false); // TODO implement me |
|
return string_type(); |
|
} |
|
|
|
/// Returns a sequence of characters that represents the collating element |
|
/// consisting of the character sequence designated by the iterator range [F1, F2). |
|
/// Returns an empty string if the character sequence is not a valid collating element. |
|
/// |
|
/// \attention Not currently used |
|
template<typename FwdIter> |
|
string_type lookup_collatename(FwdIter begin, FwdIter end) const |
|
{ |
|
BOOST_ASSERT(false); // TODO implement me |
|
return string_type(); |
|
} |
|
|
|
/// For the character class name represented by the specified character sequence, |
|
/// return the corresponding bitmask representation. |
|
/// |
|
/// \param begin A forward iterator to the start of the character sequence representing |
|
/// the name of the character class. |
|
/// \param end The end of the character sequence. |
|
/// \param icase Specifies whether the returned bitmask should represent the case-insensitive |
|
/// version of the character class. |
|
/// \return A bitmask representing the character class. |
|
template<typename FwdIter> |
|
char_class_type lookup_classname(FwdIter begin, FwdIter end, bool icase) const |
|
{ |
|
static detail::umaskex_t const icase_masks = |
|
detail::std_ctype_lower | detail::std_ctype_upper; |
|
|
|
BOOST_ASSERT(begin != end); |
|
char_class_type char_class = this->lookup_classname_impl_(begin, end); |
|
if(0 == char_class) |
|
{ |
|
// convert the string to lowercase |
|
string_type classname(begin, end); |
|
for(typename string_type::size_type i = 0, len = classname.size(); i < len; ++i) |
|
{ |
|
classname[i] = this->translate_nocase(classname[i]); |
|
} |
|
char_class = this->lookup_classname_impl_(classname.begin(), classname.end()); |
|
} |
|
// erase case-sensitivity if icase==true |
|
if(icase && 0 != (char_class & icase_masks)) |
|
{ |
|
char_class |= icase_masks; |
|
} |
|
return char_class; |
|
} |
|
|
|
/// Tests a character against a character class bitmask. |
|
/// |
|
/// \param ch The character to test. |
|
/// \param mask The character class bitmask against which to test. |
|
/// \pre mask is a bitmask returned by lookup_classname, or is several such masks bit-or'ed |
|
/// together. |
|
/// \return true if the character is a member of any of the specified character classes, false |
|
/// otherwise. |
|
bool isctype(char_type ch, char_class_type mask) const |
|
{ |
|
return this->base_type::is(*this->ctype_, ch, mask); |
|
} |
|
|
|
/// Convert a digit character into the integer it represents. |
|
/// |
|
/// \param ch The digit character. |
|
/// \param radix The radix to use for the conversion. |
|
/// \pre radix is one of 8, 10, or 16. |
|
/// \return -1 if ch is not a digit character, the integer value of the character otherwise. |
|
/// The conversion is performed by imbueing a std::stringstream with this-\>getloc(); |
|
/// setting the radix to one of oct, hex or dec; inserting ch into the stream; and |
|
/// extracting an int. |
|
int value(char_type ch, int radix) const |
|
{ |
|
BOOST_ASSERT(8 == radix || 10 == radix || 16 == radix); |
|
int val = -1; |
|
std::basic_stringstream<char_type> str; |
|
str.imbue(this->getloc()); |
|
str << (8 == radix ? std::oct : (16 == radix ? std::hex : std::dec)); |
|
str.put(ch); |
|
str >> val; |
|
return str.fail() ? -1 : val; |
|
} |
|
|
|
/// Imbues *this with loc |
|
/// |
|
/// \param loc A std::locale. |
|
/// \return the previous std::locale used by *this. |
|
locale_type imbue(locale_type loc) |
|
{ |
|
locale_type old_loc = this->loc_; |
|
this->loc_ = loc; |
|
this->ctype_ = &BOOST_USE_FACET(std::ctype<char_type>, this->loc_); |
|
//this->collate_ = &BOOST_USE_FACET(std::collate<char_type>, this->loc_); |
|
this->base_type::imbue(this->loc_); |
|
return old_loc; |
|
} |
|
|
|
/// Returns the current std::locale used by *this. |
|
/// |
|
locale_type getloc() const |
|
{ |
|
return this->loc_; |
|
} |
|
|
|
private: |
|
|
|
/////////////////////////////////////////////////////////////////////////////// |
|
// char_class_pair |
|
/// INTERNAL ONLY |
|
struct char_class_pair |
|
{ |
|
char_type const *class_name_; |
|
char_class_type class_type_; |
|
}; |
|
|
|
/////////////////////////////////////////////////////////////////////////////// |
|
// char_class |
|
/// INTERNAL ONLY |
|
static char_class_pair const &char_class(std::size_t j) |
|
{ |
|
static char_class_pair const s_char_class_map[] = |
|
{ |
|
{ BOOST_XPR_CSTR_(char_type, "alnum"), detail::std_ctype_alnum } |
|
, { BOOST_XPR_CSTR_(char_type, "alpha"), detail::std_ctype_alpha } |
|
, { BOOST_XPR_CSTR_(char_type, "blank"), detail::non_std_ctype_blank } |
|
, { BOOST_XPR_CSTR_(char_type, "cntrl"), detail::std_ctype_cntrl } |
|
, { BOOST_XPR_CSTR_(char_type, "d"), detail::std_ctype_digit } |
|
, { BOOST_XPR_CSTR_(char_type, "digit"), detail::std_ctype_digit } |
|
, { BOOST_XPR_CSTR_(char_type, "graph"), detail::std_ctype_graph } |
|
, { BOOST_XPR_CSTR_(char_type, "lower"), detail::std_ctype_lower } |
|
, { BOOST_XPR_CSTR_(char_type, "newline"),detail::non_std_ctype_newline } |
|
, { BOOST_XPR_CSTR_(char_type, "print"), detail::std_ctype_print } |
|
, { BOOST_XPR_CSTR_(char_type, "punct"), detail::std_ctype_punct } |
|
, { BOOST_XPR_CSTR_(char_type, "s"), detail::std_ctype_space } |
|
, { BOOST_XPR_CSTR_(char_type, "space"), detail::std_ctype_space } |
|
, { BOOST_XPR_CSTR_(char_type, "upper"), detail::std_ctype_upper } |
|
, { BOOST_XPR_CSTR_(char_type, "w"), detail::std_ctype_alnum | detail::non_std_ctype_underscore } |
|
, { BOOST_XPR_CSTR_(char_type, "xdigit"), detail::std_ctype_xdigit } |
|
, { 0, 0 } |
|
}; |
|
return s_char_class_map[j]; |
|
} |
|
|
|
/////////////////////////////////////////////////////////////////////////////// |
|
// lookup_classname_impl |
|
/// INTERNAL ONLY |
|
template<typename FwdIter> |
|
static char_class_type lookup_classname_impl_(FwdIter begin, FwdIter end) |
|
{ |
|
// find the classname |
|
typedef cpp_regex_traits<Char> this_t; |
|
for(std::size_t j = 0; 0 != this_t::char_class(j).class_name_; ++j) |
|
{ |
|
if(this_t::compare_(this_t::char_class(j).class_name_, begin, end)) |
|
{ |
|
return this_t::char_class(j).class_type_; |
|
} |
|
} |
|
return 0; |
|
} |
|
|
|
/// INTERNAL ONLY |
|
template<typename FwdIter> |
|
static bool compare_(char_type const *name, FwdIter begin, FwdIter end) |
|
{ |
|
for(; *name && begin != end; ++name, ++begin) |
|
{ |
|
if(*name != *begin) |
|
{ |
|
return false; |
|
} |
|
} |
|
return !*name && begin == end; |
|
} |
|
|
|
locale_type loc_; |
|
std::ctype<char_type> const *ctype_; |
|
//std::collate<char_type> const *collate_; |
|
}; |
|
|
|
/////////////////////////////////////////////////////////////////////////////// |
|
// cpp_regex_traits<>::hash specializations |
|
template<> |
|
inline unsigned char cpp_regex_traits<unsigned char>::hash(unsigned char ch) |
|
{ |
|
return ch; |
|
} |
|
|
|
template<> |
|
inline unsigned char cpp_regex_traits<char>::hash(char ch) |
|
{ |
|
return static_cast<unsigned char>(ch); |
|
} |
|
|
|
template<> |
|
inline unsigned char cpp_regex_traits<signed char>::hash(signed char ch) |
|
{ |
|
return static_cast<unsigned char>(ch); |
|
} |
|
|
|
#ifndef BOOST_XPRESSIVE_NO_WREGEX |
|
template<> |
|
inline unsigned char cpp_regex_traits<wchar_t>::hash(wchar_t ch) |
|
{ |
|
return static_cast<unsigned char>(ch); |
|
} |
|
#endif |
|
|
|
// Narrow C++ traits has fold_case() member function. |
|
template<> |
|
struct has_fold_case<cpp_regex_traits<char> > |
|
: mpl::true_ |
|
{ |
|
}; |
|
|
|
|
|
}} |
|
|
|
#endif
|
|
|