libstdc++-v3/testsuite/22_locale/num_get/get/char/12.cc

   1 // 2003-12-22  Paolo Carlini  <pcarlini@suse.de>
   2
   3 // Copyright (C) 2003 Free Software Foundation
   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, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
  19 // USA.
  20
  21 // 22.2.2.1.1  num_get members
  22
  23 #include <locale>
  24 #include <sstream>
  25 #include <testsuite_hooks.h>
  26
  27 struct Punct1: std::numpunct<char>
  28 {
  29   std::string do_grouping() const { return "\1"; }
  30   char do_thousands_sep() const { return '+'; }
  31   char do_decimal_point() const { return 'x'; }
  32 };
  33
  34 struct Punct2: std::numpunct<char>
  35 {
  36   std::string do_grouping() const { return "\1"; }
  37   char do_thousands_sep() const { return 'X'; }
  38   char do_decimal_point() const { return '-'; }
  39 };
  40
  41 // http://gcc.gnu.org/ml/libstdc++/2003-12/msg00201.html
  42 void test01()
  43 {
  44   using namespace std;
  45   typedef istreambuf_iterator<char> iterator_type;
  46
  47   bool test __attribute__((unused)) = true;
  48
  49   istringstream iss1, iss2;
  50   iss1.imbue(locale(iss1.getloc(), new Punct1));
  51   iss2.imbue(locale(iss2.getloc(), new Punct2));
  52   const num_get<char>& ng1 = use_facet<num_get<char> >(iss1.getloc());
  53   const num_get<char>& ng2 = use_facet<num_get<char> >(iss2.getloc());
  54
  55   ios_base::iostate err = ios_base::goodbit;
  56   iterator_type end;
  57   long l = 1l;
  58   long l1 = 0l;
  59   long l2 = 10l;
  60   long l3 = 1l;
  61   long l4 = 63l;
  62   double d = 0.0;
  63   double d1 = .4;
  64   double d2 = .1;
  65
  66   iss1.str("+3");
  67   err = ios_base::goodbit;
  68   end = ng1.get(iss1.rdbuf(), 0, iss1, err, l);
  69   VERIFY( err == ios_base::failbit );
  70   VERIFY( *end == '+' );
  71
  72   iss1.str("0x1");
  73   iss1.clear();
  74   err = ios_base::goodbit;
  75   end = ng1.get(iss1.rdbuf(), 0, iss1, err, l);
  76   VERIFY( err == ios_base::goodbit );
  77   VERIFY( *end == 'x' );
  78   VERIFY( l == l1 );
  79
  80   iss1.str("0Xa");
  81   iss1.clear();
  82   iss1.unsetf(ios::basefield);
  83   err = ios_base::goodbit;
  84   end = ng1.get(iss1.rdbuf(), 0, iss1, err, l);
  85   VERIFY( err == ios_base::eofbit );
  86   VERIFY( l == l2 );
  87
  88   iss1.str("0xa");
  89   iss1.clear();
  90   err = ios_base::goodbit;
  91   end = ng1.get(iss1.rdbuf(), 0, iss1, err, l);
  92   VERIFY( err == ios_base::goodbit );
  93   VERIFY( *end == 'x' );
  94   VERIFY( l == l1 );
  95
  96   iss1.str("+5");
  97   iss1.clear();
  98   err = ios_base::goodbit;
  99   end = ng1.get(iss1.rdbuf(), 0, iss1, err, d);
 100   VERIFY( err == ios_base::failbit );
 101   VERIFY( *end == '+' );
 102
 103   iss1.str("x4");
 104   iss1.clear();
 105   err = ios_base::goodbit;
 106   end = ng1.get(iss1.rdbuf(), 0, iss1, err, d);
 107   VERIFY( err == ios_base::eofbit );
 108   VERIFY( d == d1 );
 109
 110   iss2.str("0001-");
 111   err = ios_base::goodbit;
 112   end = ng2.get(iss2.rdbuf(), 0, iss2, err, l);
 113   VERIFY( err == ios_base::goodbit );
 114   VERIFY( *end == '-' );
 115   VERIFY( l == l3 );
 116
 117   iss2.str("-2");
 118   iss2.clear();
 119   err = ios_base::goodbit;
 120   end = ng2.get(iss2.rdbuf(), 0, iss2, err, l);
 121   VERIFY( err == ios_base::failbit );
 122   VERIFY( *end == '-' );
 123
 124   iss2.str("0X1");
 125   iss2.clear();
 126   iss2.unsetf(ios::basefield);
 127   err = ios_base::goodbit;
 128   end = ng2.get(iss2.rdbuf(), 0, iss2, err, l);
 129   VERIFY( err == ios_base::failbit );
 130   VERIFY( *end == 'X' );
 131
 132   iss2.str("000778");
 133   iss2.clear();
 134   err = ios_base::goodbit;
 135   end = ng2.get(iss2.rdbuf(), 0, iss2, err, l);
 136   VERIFY( err == ios_base::goodbit );
 137   VERIFY( *end == '8' );
 138   VERIFY( l == l4 );
 139
 140   iss2.str("00X");
 141   iss2.clear();
 142   err = ios_base::goodbit;
 143   end = ng2.get(iss2.rdbuf(), 0, iss2, err, d);
 144   VERIFY( err == ios_base::failbit );
 145   VERIFY( *end == 'X' );
 146
 147   iss2.str("-1");
 148   iss2.clear();
 149   err = ios_base::goodbit;
 150   end = ng2.get(iss2.rdbuf(), 0, iss2, err, d);
 151   VERIFY( err == ios_base::eofbit );
 152   VERIFY( d == d2 );
 153 }
 154
 155
 156 int main()
 157 {
 158   test01();
 159   return 0;
 160 }