+++ /dev/null
-// 2001-11-26 Benjamin Kosnik <bkoz@redhat.com>
-
-// Copyright (C) 2001, 2002 Free Software Foundation
-//
-// 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.
-
-// 22.2.2.1.1 num_get members
-
-#include <locale>
-#include <sstream>
-#include <testsuite_hooks.h>
-
-// XXX This test is not working for non-glibc locale models.
-// { dg-do run { xfail *-*-* } }
-
-#ifdef _GLIBCPP_USE_WCHAR_T
-void test01()
-{
- using namespace std;
- typedef istreambuf_iterator<wchar_t> iterator_type;
-
- bool test = true;
-
- // basic construction
- locale loc_c = locale::classic();
- locale loc_hk("en_HK");
- locale loc_fr("fr_FR@euro");
- locale loc_de("de_DE");
- VERIFY( loc_c != loc_de );
- VERIFY( loc_hk != loc_fr );
- VERIFY( loc_hk != loc_de );
- VERIFY( loc_de != loc_fr );
-
- // cache the numpunct facets
- const numpunct<wchar_t>& numpunct_c = use_facet<numpunct<wchar_t> >(loc_c);
- const numpunct<wchar_t>& numpunct_de = use_facet<numpunct<wchar_t> >(loc_de);
- const numpunct<wchar_t>& numpunct_hk = use_facet<numpunct<wchar_t> >(loc_hk);
-
- // sanity check the data is correct.
- const string empty;
- char c;
-
- bool b1 = true;
- bool b0 = false;
- long l1 = 2147483647;
- long l2 = -2147483647;
- long l;
- unsigned long ul1 = 1294967294;
- unsigned long ul2 = 0;
- unsigned long ul;
- double d1 = 1.02345e+308;
- double d2 = 3.15e-308;
- double d;
- long double ld1 = 6.630025e+4;
- long double ld2 = 0.0;
- long double ld;
- void* v;
- const void* cv = &ul2;
-
- // cache the num_get facet
- wistringstream iss;
- iss.imbue(loc_de);
- const num_get<wchar_t>& ng = use_facet<num_get<wchar_t> >(iss.getloc());
- const ios_base::iostate goodbit = ios_base::goodbit;
- const ios_base::iostate eofbit = ios_base::eofbit;
- ios_base::iostate err = ios_base::goodbit;
-
- // bool, simple
- iss.str(L"1");
- iterator_type os_it00 = iss.rdbuf();
- iterator_type os_it01 = ng.get(os_it00, 0, iss, err, b1);
- VERIFY( b1 == true );
- VERIFY( err & ios_base::eofbit );
-
- iss.str(L"0");
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, b0);
- VERIFY( b0 == false );
- VERIFY( err & eofbit );
-
- // bool, more twisted examples
- iss.imbue(loc_c);
- iss.str(L"true ");
- iss.clear();
- iss.setf(ios_base::boolalpha);
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, b0);
- VERIFY( b0 == true );
- VERIFY( err == goodbit );
-
- iss.str(L"false ");
- iss.clear();
- iss.setf(ios_base::boolalpha);
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, b1);
- VERIFY( b1 == false );
- VERIFY( err == goodbit );
-
- // long, in a locale that expects grouping
- iss.imbue(loc_hk);
- iss.str(L"2,147,483,647 ");
- iss.clear();
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, l);
- VERIFY( l == l1 );
- VERIFY( err == goodbit );
-
- iss.str(L"-2,147,483,647++++++");
- iss.clear();
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, l);
- VERIFY( l == l2 );
- VERIFY( err == goodbit );
-
- // unsigned long, in a locale that does not group
- iss.imbue(loc_c);
- iss.str(L"1294967294");
- iss.clear();
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ul);
- VERIFY( ul == ul1);
- VERIFY( err == eofbit );
-
- iss.str(L"0+++++++++++++++++++");
- iss.clear();
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ul);
- VERIFY( ul == ul2);
- VERIFY( err == goodbit );
-
- // ... and one that does
- iss.imbue(loc_de);
- iss.str(L"1.294.967.294+++++++");
- iss.clear();
- iss.width(20);
- iss.setf(ios_base::left, ios_base::adjustfield);
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ul);
- VERIFY( ul == ul1 );
- VERIFY( err == goodbit );
-
- // double
- iss.imbue(loc_c);
- iss.str(L"1.02345e+308++++++++");
- iss.clear();
- iss.width(20);
- iss.setf(ios_base::left, ios_base::adjustfield);
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, d);
- VERIFY( d == d1 );
- VERIFY( err == goodbit );
-
- iss.str(L"+3.15e-308");
- iss.clear();
- iss.width(20);
- iss.setf(ios_base::right, ios_base::adjustfield);
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, d);
- VERIFY( d == d2 );
- VERIFY( err == eofbit );
-
- iss.imbue(loc_de);
- iss.str(L"+1,02345e+308");
- iss.clear();
- iss.width(20);
- iss.setf(ios_base::right, ios_base::adjustfield);
- iss.setf(ios_base::scientific, ios_base::floatfield);
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, d);
- VERIFY( d == d1 );
- VERIFY( err == eofbit );
-
- iss.str(L"3,15E-308 ");
- iss.clear();
- iss.width(20);
- iss.precision(10);
- iss.setf(ios_base::right, ios_base::adjustfield);
- iss.setf(ios_base::scientific, ios_base::floatfield);
- iss.setf(ios_base::uppercase);
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, d);
- VERIFY( d == d2 );
- VERIFY( err == goodbit );
-
- // long double
- iss.str(L"6,630025e+4");
- iss.clear();
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ld);
- VERIFY( ld == ld1 );
- VERIFY( err == eofbit );
-
- iss.str(L"0 ");
- iss.clear();
- iss.precision(0);
- iss.setf(ios_base::fixed, ios_base::floatfield);
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ld);
- VERIFY( ld == 0 );
- VERIFY( err == goodbit );
-
- // const void
- iss.str(L"0xbffff74c,");
- iss.clear();
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, v);
- VERIFY( &v != &cv );
- VERIFY( err == goodbit );
-
-
-#ifdef _GLIBCPP_USE_LONG_LONG
- long long ll1 = 9223372036854775807LL;
- long long ll2 = -9223372036854775807LL;
- long long ll;
-
- iss.str(L"9.223.372.036.854.775.807");
- iss.clear();
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ll);
- VERIFY( ll == ll1 );
- VERIFY( err == eofbit );
-#endif
-}
-
-// 2002-01-10 David Seymour <seymour_dj@yahoo.com>
-// libstdc++/5331
-void test02()
-{
- using namespace std;
- bool test = true;
-
- // Check num_get works with other iterators besides streambuf
- // output iterators. (As long as output_iterator requirements are met.)
- typedef wstring::const_iterator iter_type;
- typedef num_get<wchar_t, iter_type> num_get_type;
- const ios_base::iostate goodbit = ios_base::goodbit;
- const ios_base::iostate eofbit = ios_base::eofbit;
- ios_base::iostate err = ios_base::goodbit;
- const locale loc_c = locale::classic();
- const wstring str(L"20000106 Elizabeth Durack");
- const wstring str2(L"0 true 0xbffff74c Durack");
-
- istringstream iss; // need an ios, add my num_get facet
- iss.imbue(locale(loc_c, new num_get_type));
-
- // Iterator advanced, state, output.
- const num_get_type& ng = use_facet<num_get_type>(iss.getloc());
-
- // 01 get(long)
- // 02 get(long double)
- // 03 get(bool)
- // 04 get(void*)
-
- // 01 get(long)
- long i = 0;
- err = goodbit;
- iter_type end1 = ng.get(str.begin(), str.end(), iss, err, i);
- wstring rem1(end1, str.end());
- VERIFY( err == goodbit );
- VERIFY( i == 20000106);
- VERIFY( rem1 == L" Elizabeth Durack" );
-
- // 02 get(long double)
- long double ld = 0.0;
- err = goodbit;
- iter_type end2 = ng.get(str.begin(), str.end(), iss, err, ld);
- wstring rem2(end2, str.end());
- VERIFY( err == goodbit );
- VERIFY( ld == 20000106);
- VERIFY( rem2 == L" Elizabeth Durack" );
-
- // 03 get(bool)
- // const string str2("0 true 0xbffff74c Durack");
- bool b = 1;
- iss.clear();
- err = goodbit;
- iter_type end3 = ng.get(str2.begin(), str2.end(), iss, err, b);
- wstring rem3(end3, str2.end());
- VERIFY( err == goodbit );
- VERIFY( b == 0 );
- VERIFY( rem3 == L" true 0xbffff74c Durack" );
-
- iss.clear();
- err = goodbit;
- iss.setf(ios_base::boolalpha);
- iter_type end4 = ng.get(++end3, str2.end(), iss, err, b);
- wstring rem4(end4, str2.end());
- VERIFY( err == goodbit );
- VERIFY( b == true );
- VERIFY( rem4 == L" 0xbffff74c Durack" );
-
- // 04 get(void*)
- void* v;
- iss.clear();
- err = goodbit;
- iss.setf(ios_base::fixed, ios_base::floatfield);
- iter_type end5 = ng.get(++end4, str2.end(), iss, err, v);
- wstring rem5(end5, str2.end());
- VERIFY( err == goodbit );
- VERIFY( b == true );
- VERIFY( rem5 == L" Durack" );
-}
-
-// libstdc++/5280
-void test03()
-{
-#ifdef _GLIBCPP_HAVE_SETENV
- // Set the global locale to non-"C".
- std::locale loc_de("de_DE");
- std::locale::global(loc_de);
-
- // Set LANG environment variable to de_DE.
- const char* oldLANG = getenv("LANG");
- if (!setenv("LANG", "de_DE", 1))
- {
- test01();
- test02();
- setenv("LANG", oldLANG ? oldLANG : "", 1);
- }
-#endif
-}
-
-// Testing the correct parsing of grouped hexadecimals and octals.
-void test04()
-{
- using namespace std;
-
- bool test = true;
-
- unsigned long ul;
-
- wistringstream iss;
-
- // A locale that expects grouping
- locale loc_de("de_DE");
- iss.imbue(loc_de);
-
- const num_get<wchar_t>& ng = use_facet<num_get<wchar_t> >(iss.getloc());
- const ios_base::iostate goodbit = ios_base::goodbit;
- ios_base::iostate err = ios_base::goodbit;
-
- iss.setf(ios::hex, ios::basefield);
- iss.str(L"0xbf.fff.74c ");
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ul);
- VERIFY( err == goodbit );
- VERIFY( ul == 0xbffff74c );
-
- iss.str(L"0Xf.fff ");
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ul);
- VERIFY( err == goodbit );
- VERIFY( ul == 0xffff );
-
- iss.str(L"ffe ");
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ul);
- VERIFY( err == goodbit );
- VERIFY( ul == 0xffe );
-
- iss.setf(ios::oct, ios::basefield);
- iss.str(L"07.654.321 ");
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ul);
- VERIFY( err == goodbit );
- VERIFY( ul == 07654321 );
-
- iss.str(L"07.777 ");
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ul);
- VERIFY( err == goodbit );
- VERIFY( ul == 07777 );
-
- iss.str(L"776 ");
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, ul);
- VERIFY( err == goodbit );
- VERIFY( ul == 0776 );
-}
-
-// libstdc++/5816
-void test05()
-{
- using namespace std;
- bool test = true;
-
- double d = 0.0;
-
- wistringstream iss;
- locale loc_de("de_DE");
- iss.imbue(loc_de);
-
- const num_get<wchar_t>& ng = use_facet<num_get<wchar_t> >(iss.getloc());
- const ios_base::iostate goodbit = ios_base::goodbit;
- ios_base::iostate err = ios_base::goodbit;
-
- iss.str(L"1234,5 ");
- err = goodbit;
- ng.get(iss.rdbuf(), 0, iss, err, d);
- VERIFY( err == goodbit );
- VERIFY( d == 1234.5 );
-}
-
-// http://gcc.gnu.org/ml/libstdc++/2002-05/msg00038.html
-void test06()
-{
- bool test = true;
-
- const char* tentLANG = std::setlocale(LC_ALL, "ja_JP.eucjp");
- if (tentLANG != NULL)
- {
- std::string preLANG = tentLANG;
- test01();
- test02();
- test04();
- test05();
- std::string postLANG = std::setlocale(LC_ALL, NULL);
- VERIFY( preLANG == postLANG );
- }
-}
-#endif
-
-int main()
-{
-#ifdef _GLIBCPP_USE_WCHAR_T
- test01();
- test02();
- test03();
- test04();
- test05();
- test06();
-#endif
- return 0;
-}
-
-
-// Kathleen Hannah, humanitarian, woman, art-thief
-
-
-
-
-
projects / msp430-gcc.git / blobdiff