ceph/src/boost/libs/regex/test/collate_info/collate_info.cpp

   1 /*
   2  *
   3  * Copyright (c) 2005
   4  * John Maddock
   5  *
   6  * Use, modification and distribution are subject to the
   7  * Boost Software License, Version 1.0. (See accompanying file
   8  * LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
   9  *
  10  */
  11
  12 // most of the workarounds and headers we need are already in here:
  13 #include <boost/regex.hpp>
  14 #include <boost/regex/v4/primary_transform.hpp>
  15 #include <assert.h>
  16 #include <boost/detail/lightweight_main.hpp>
  17 #include <iostream>
  18 #include <iomanip>
  19
  20 #ifdef BOOST_INTEL
  21 #pragma warning(disable:1418 981 983 2259)
  22 #endif
  23
  24 #ifdef BOOST_NO_STDC_NAMESPACE
  25 namespace std{
  26    using ::strxfrm;
  27 #ifndef BOOST_NO_WREGEX
  28    using ::wcsxfrm;
  29 #endif
  30 }
  31 #endif
  32
  33 #include <iostream>
  34
  35 template <class charT>
  36 int make_int(charT c)
  37 {
  38    return c;
  39 }
  40
  41 int make_int(char c)
  42 {
  43    return static_cast<unsigned char>(c);
  44 }
  45
  46 template <class charT>
  47 void print_string(const std::basic_string<charT>& s)
  48 {
  49    typedef typename std::basic_string<charT>::size_type size_type;
  50    std::cout.put(static_cast<unsigned char>('"'));
  51    for(size_type i = 0; i < s.size(); ++i)
  52    {
  53       if((s[i] > ' ') && (s[i] <= 'z'))
  54       {
  55          std::cout.put(static_cast<unsigned char>(s[i]));
  56       }
  57       else
  58       {
  59          std::cout << "\\x" << std::hex << make_int(s[i]);
  60       }
  61    }
  62    std::cout.put(static_cast<unsigned char>('"'));
  63 }
  64
  65 void print_c_char(char c)
  66 {
  67    char buf[50];
  68    const char cbuf[2] = { c, 0, };
  69    std::size_t len = std::strxfrm(buf, cbuf, 50);
  70    std:: cout << len << "   ";
  71    std::string s(buf);
  72    print_string(s);
  73 }
  74 #ifndef BOOST_NO_WREGEX
  75 void print_c_char(wchar_t c)
  76 {
  77    wchar_t buf[50];
  78    const wchar_t cbuf[2] = { c, 0, };
  79    std::size_t len = std::wcsxfrm(buf, cbuf, 50);
  80    std:: cout << len << "   ";
  81    std::wstring s(buf);
  82    print_string(s);
  83 }
  84 #endif
  85 template <class charT>
  86 void print_c_info(charT, const char* name)
  87 {
  88    std::cout << "Info for " << name << " C API's:" << std::endl;
  89    std::cout << "   \"a\"  :  ";
  90    print_c_char(charT('a'));
  91    std::cout << std::endl;
  92    std::cout << "   \"A\"  :  ";
  93    print_c_char(charT('A'));
  94    std::cout << std::endl;
  95    std::cout << "   \"z\"  :  ";
  96    print_c_char(charT('z'));
  97    std::cout << std::endl;
  98    std::cout << "   \"Z\"  :  ";
  99    print_c_char(charT('Z'));
 100    std::cout << std::endl;
 101    std::cout << "   \";\"  :  ";
 102    print_c_char(charT(';'));
 103    std::cout << std::endl;
 104    std::cout << "   \"{\"  :  ";
 105    print_c_char(charT('{'));
 106    std::cout << std::endl;
 107 }
 108
 109 template <class charT>
 110 void print_cpp_char(charT c)
 111 {
 112 #ifndef BOOST_NO_STD_LOCALE
 113    std::locale l;
 114    const std::collate<charT>& col = BOOST_USE_FACET(std::collate<charT>, l);
 115    std::basic_string<charT> result = col.transform(&c, &c+1);
 116    std::cout << result.size() << "   ";
 117    print_string(result);
 118    std::size_t n = result.find(charT(0));
 119    if(n != std::basic_string<charT>::npos)
 120    {
 121       std::cerr << "(Error in location of null, found: " << n << ")";
 122    }
 123 #endif
 124 }
 125
 126 template <class charT>
 127 void print_cpp_info(charT, const char* name)
 128 {
 129    std::cout << "Info for " << name << " C++ locale API's:" << std::endl;
 130    std::cout << "   \"a\"  :  ";
 131    print_cpp_char(charT('a'));
 132    std::cout << std::endl;
 133    std::cout << "   \"A\"  :  ";
 134    print_cpp_char(charT('A'));
 135    std::cout << std::endl;
 136    std::cout << "   \"z\"  :  ";
 137    print_cpp_char(charT('z'));
 138    std::cout << std::endl;
 139    std::cout << "   \"Z\"  :  ";
 140    print_cpp_char(charT('Z'));
 141    std::cout << std::endl;
 142    std::cout << "   \";\"  :  ";
 143    print_cpp_char(charT(';'));
 144    std::cout << std::endl;
 145    std::cout << "   \"{\"  :  ";
 146    print_cpp_char(charT('{'));
 147    std::cout << std::endl;
 148 }
 149
 150 template <class traits>
 151 void print_sort_syntax(const traits& pt, const char* name)
 152 {
 153    std::cout << "Sort Key Syntax for type " << name << ":\n";
 154    typedef typename traits::char_type char_type;
 155    char_type delim;
 156    unsigned result = ::boost::BOOST_REGEX_DETAIL_NS::find_sort_syntax(&pt, &delim);
 157    std::cout << "   ";
 158    switch(result)
 159    {
 160    case boost::BOOST_REGEX_DETAIL_NS::sort_C:
 161       std::cout << "sort_C";
 162       break;
 163    case boost::BOOST_REGEX_DETAIL_NS::sort_fixed:
 164       std::cout << "sort_fixed" << "    " << static_cast<int>(delim);
 165       break;
 166    case boost::BOOST_REGEX_DETAIL_NS::sort_delim:
 167       {
 168          std::cout << "sort_delim" << "    ";
 169          std::basic_string<char_type> s(1, delim);
 170          print_string(s);
 171       }
 172       break;
 173    case boost::BOOST_REGEX_DETAIL_NS::sort_unknown:
 174       std::cout << "sort_unknown";
 175       break;
 176    default:
 177       std::cout << "bad_value";
 178       break;
 179    }
 180    std::cout << std::endl;
 181
 182    typedef typename traits::string_type string_type;
 183    typedef typename traits::char_type char_type;
 184
 185    char_type c[5] = { 'a', 'A', ';', '{', '}', };
 186    for(int i = 0; i < 5; ++i)
 187    {
 188       string_type s(1, c[i]);
 189       string_type sk = pt.transform(s.c_str(), s.c_str() + s.size());
 190       string_type skp = pt.transform_primary(s.c_str(), s.c_str() + s.size());
 191       print_string(s);
 192       std::cout << "   ";
 193       print_string(sk);
 194       std::cout << "   ";
 195       print_string(skp);
 196       std::cout << std::endl;
 197    }
 198 }
 199
 200 #ifndef BOOST_NO_STD_LOCALE
 201 template <class charT>
 202 void print_ctype_info(charT, const char* name)
 203 {
 204    std::locale l;
 205    const std::ctype<charT>& ct = BOOST_USE_FACET(std::ctype<charT>, l);
 206    typedef typename std::ctype<charT>::mask mask_type;
 207    mask_type m = static_cast<mask_type>(std::ctype<charT>::lower | std::ctype<charT>::upper);
 208    bool result = ct.is(m, static_cast<charT>('a')) && ct.is(m , static_cast<charT>('A'));
 209    std::cout << "Checking std::ctype<" << name << ">::is(mask, c):" << std::endl;
 210 #ifdef BOOST_REGEX_BUGGY_CTYPE_FACET
 211    std::cout << "   Boost.Regex believes this facet to be buggy..." << std::endl;
 212 #else
 213    std::cout << "   Boost.Regex believes this facet to be correct..." << std::endl;
 214 #endif
 215    std::cout << "   Actual behavior, appears to be " << (result ? "correct." : "buggy.") << std::endl;
 216    assert(ct.is(std::ctype<charT>::alnum, 'a'));
 217    assert(ct.is(std::ctype<charT>::alnum, 'A'));
 218    assert(ct.is(std::ctype<charT>::alnum, '0'));
 219 }
 220 #endif
 221
 222 int cpp_main(int /*argc*/, char * /*argv*/[])
 223 {
 224    print_c_info(char(0), "char");
 225 #ifndef BOOST_NO_WREGEX
 226    print_c_info(wchar_t(0), "wchar_t");
 227 #endif
 228    print_cpp_info(char(0), "char");
 229 #ifndef BOOST_NO_WREGEX
 230    print_cpp_info(wchar_t(0), "wchar_t");
 231 #endif
 232
 233 #if !BOOST_WORKAROUND(BOOST_BORLANDC, < 0x560)
 234    boost::c_regex_traits<char> a;
 235    print_sort_syntax(a, "boost::c_regex_traits<char>");
 236 #ifndef BOOST_NO_WREGEX
 237    boost::c_regex_traits<wchar_t> b;
 238    print_sort_syntax(b, "boost::c_regex_traits<wchar_t>");
 239 #endif
 240 #endif
 241 #ifndef BOOST_NO_STD_LOCALE
 242    boost::cpp_regex_traits<char> c;
 243    print_sort_syntax(c, "boost::cpp_regex_traits<char>");
 244 #ifndef BOOST_NO_WREGEX
 245    boost::cpp_regex_traits<wchar_t> d;
 246    print_sort_syntax(d, "boost::cpp_regex_traits<wchar_t>");
 247 #endif
 248    print_ctype_info(char(0), "char");
 249 #ifndef BOOST_NO_WREGEX
 250    print_ctype_info(wchar_t(0), "wchar_t");
 251 #endif
 252 #endif
 253    return 0;
 254 }
 255