Subversion Repositories scarts

// 2003-12-22  Paolo Carlini  <pcarlini@suse.de>

// Copyright (C) 2003, 2004, 2005 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, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,

// USA.

// 22.2.2.1.1  num_get members

#include <locale>

#include <sstream>

#include <testsuite_hooks.h>

struct Punct1: std::numpunct<char>

{

  std::string do_grouping() const { return "\1"; }

  char do_thousands_sep() const { return '+'; }

  char do_decimal_point() const { return 'x'; }

};

struct Punct2: std::numpunct<char>

{

  std::string do_grouping() const { return "\1"; }

  char do_thousands_sep() const { return 'X'; }

  char do_decimal_point() const { return '-'; }

};

// http://gcc.gnu.org/ml/libstdc++/2003-12/msg00201.html

void test01()

{

  using namespace std;

  typedef istreambuf_iterator<char> iterator_type;

  bool test __attribute__((unused)) = true;

  istringstream iss1, iss2;

  iss1.imbue(locale(iss1.getloc(), new Punct1));

  iss2.imbue(locale(iss2.getloc(), new Punct2));

  const num_get<char>& ng1 = use_facet<num_get<char> >(iss1.getloc());

  const num_get<char>& ng2 = use_facet<num_get<char> >(iss2.getloc());

  ios_base::iostate err = ios_base::goodbit;

  iterator_type end;

  long l = 1l;

  long l1 = 0l;

  long l2 = 10l;

  long l3 = 1l;

  long l4 = 63l;

  double d = 0.0;

  double d1 = .4;

  double d2 = 0.0;

  double d3 = .1;

  iss1.str("+3");

  err = ios_base::goodbit;

  end = ng1.get(iss1.rdbuf(), 0, iss1, err, l);

  VERIFY( err == ios_base::failbit );

  VERIFY( *end == '+' );

  iss1.str("0x1");

  iss1.clear();

  err = ios_base::goodbit;

  end = ng1.get(iss1.rdbuf(), 0, iss1, err, l);

  VERIFY( err == ios_base::goodbit );

  VERIFY( *end == 'x' );

  VERIFY( l == l1 );

  iss1.str("0Xa");

  iss1.clear();

  iss1.unsetf(ios::basefield);

  err = ios_base::goodbit;

  end = ng1.get(iss1.rdbuf(), 0, iss1, err, l);

  VERIFY( err == ios_base::eofbit );

  VERIFY( l == l2 );

  iss1.str("0xa");

  iss1.clear();

  err = ios_base::goodbit;

  end = ng1.get(iss1.rdbuf(), 0, iss1, err, l);

  VERIFY( err == ios_base::goodbit );

  VERIFY( *end == 'x' );

  VERIFY( l == l1 );

  iss1.str("+5");

  iss1.clear();

  err = ios_base::goodbit;

  end = ng1.get(iss1.rdbuf(), 0, iss1, err, d);

  VERIFY( err == ios_base::failbit );

  VERIFY( *end == '+' );

  iss1.str("x4");

  iss1.clear();

  err = ios_base::goodbit;

  end = ng1.get(iss1.rdbuf(), 0, iss1, err, d);

  VERIFY( err == ios_base::eofbit );

  VERIFY( d == d1 );

  iss2.str("0001-");

  err = ios_base::goodbit;

  end = ng2.get(iss2.rdbuf(), 0, iss2, err, l);

  VERIFY( err == ios_base::goodbit );

  VERIFY( *end == '-' );

  VERIFY( l == l3 );

  iss2.str("-2");

  iss2.clear();

  err = ios_base::goodbit;

  end = ng2.get(iss2.rdbuf(), 0, iss2, err, l);

  VERIFY( err == ios_base::failbit );

  VERIFY( *end == '-' );

  iss2.str("0X1");

  iss2.clear();

  iss2.unsetf(ios::basefield);

  err = ios_base::goodbit;

  end = ng2.get(iss2.rdbuf(), 0, iss2, err, l);

  VERIFY( err == ios_base::failbit );

  VERIFY( *end == 'X' );

  VERIFY( l == l3 );

  iss2.str("000778");

  iss2.clear();

  err = ios_base::goodbit;

  end = ng2.get(iss2.rdbuf(), 0, iss2, err, l);

  VERIFY( err == ios_base::goodbit );

  VERIFY( *end == '8' );

  VERIFY( l == l4 );

  iss2.str("00X");

  iss2.clear();

  err = ios_base::goodbit;

  end = ng2.get(iss2.rdbuf(), 0, iss2, err, d);

  VERIFY( err == (ios_base::eofbit | ios_base::failbit) );

  VERIFY( d == d2 );

  iss2.str("-1");

  iss2.clear();

  err = ios_base::goodbit;

  end = ng2.get(iss2.rdbuf(), 0, iss2, err, d);

  VERIFY( err == ios_base::eofbit );

  VERIFY( d == d3 );

}

int main()

{

  test01();

  return 0;

}