#include <limits>
#if !defined (STLPORT) || !defined (_STLP_USE_NO_IOSTREAMS)
# include <iomanip>
# include <string>
# include <sstream>
# include <cstdio>
/*
# include <iostream>
# include <ieee754.h>
*/
# include "complete_digits.h"
# include "cppunit/cppunit_proxy.h"
# if !defined (STLPORT) || defined(_STLP_USE_NAMESPACES)
using namespace std;
# endif
//
// TestCase class
//
class NumPutGetTest : public CPPUNIT_NS::TestCase
{
CPPUNIT_TEST_SUITE(NumPutGetTest);
# if defined (__BORLANDC__)
/* Ignore FPU exceptions, set FPU precision to 64 bits */
unsigned int _float_control_word = _control87(0, 0);
_control87(PC_64|MCW_EM|IC_AFFINE, MCW_PC|MCW_EM|MCW_IC);
# endif
CPPUNIT_TEST(num_put_float);
CPPUNIT_TEST(num_put_integer);
CPPUNIT_TEST(num_get_float);
CPPUNIT_TEST(num_get_integer);
CPPUNIT_TEST(inhex);
CPPUNIT_TEST(pointer);
CPPUNIT_TEST(fix_float_long);
CPPUNIT_TEST(custom_numpunct);
# if defined (__BORLANDC__)
/* Reset floating point control word */
_clear87();
_control87(_float_control_word, MCW_PC|MCW_EM|MCW_IC);
# endif
CPPUNIT_TEST_SUITE_END();
private:
void num_put_float();
void num_put_integer();
void num_get_float();
void num_get_integer();
void inhex();
void pointer();
void fix_float_long();
void custom_numpunct();
static bool check_float(float val, float ref)
{
float epsilon = numeric_limits<float>::epsilon();
return val <= ref + epsilon && val >= ref - epsilon;
}
static bool check_double(double val, double ref)
{
double epsilon = numeric_limits<double>::epsilon();
return val <= ref + epsilon && val >= ref - epsilon;
}
static string reset_stream(ostringstream &ostr)
{
string tmp = ostr.str();
ostr.str("");
return tmp;
}
#if !defined (STLPORT) || !defined (_STLP_NO_MEMBER_TEMPLATES)
template <class F>
void check_get_float( F v )
{
F in_val_d = v;
typedef numeric_limits<F> limits;
{
stringstream str;
str << "1E+" << limits::max_exponent10;
str >> in_val_d;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_CHECK( in_val_d == in_val_d );
CPPUNIT_CHECK( in_val_d != limits::infinity() );
}
{
stringstream str;
str << "-1E+" << limits::max_exponent10;
str >> in_val_d;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_CHECK( in_val_d == in_val_d );
CPPUNIT_CHECK( in_val_d != -limits::infinity() );
}
{
stringstream str;
str << "1E" << limits::min_exponent10;
str >> in_val_d;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_CHECK( in_val_d == in_val_d );
CPPUNIT_CHECK( in_val_d != F(0.0) );
}
{
stringstream str;
str << "1E+" << (limits::max_exponent10 + 1);
str >> in_val_d;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_CHECK( in_val_d == in_val_d );
CPPUNIT_CHECK( in_val_d == limits::infinity() );
}
{
stringstream str;
str << "-1E+" << (limits::max_exponent10 + 1);
str >> in_val_d;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_CHECK( in_val_d == in_val_d );
CPPUNIT_CHECK( in_val_d == -limits::infinity() );
}
{
stringstream str;
str << "1E" << (limits::min_exponent10 - 1);
str >> in_val_d;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_CHECK( in_val_d == in_val_d );
CPPUNIT_CHECK( in_val_d >= F(0.0) && in_val_d <= limits::min() );
}
#if !defined (__MINGW32__)
{
stringstream str;
str << limits::max();
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_CHECK( str.str() != "inf" );
CPPUNIT_CHECK( str.str() != "-inf" );
CPPUNIT_CHECK( str.str() != "nan" );
CPPUNIT_CHECK( str.str() != "-nan" );
//CPPUNIT_MESSAGE( str.str().c_str() );
//str.str("");
//str << limits::max_exponent10;
//CPPUNIT_MESSAGE( str.str().c_str() );
str >> in_val_d;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_CHECK( in_val_d == in_val_d );
CPPUNIT_CHECK( in_val_d != limits::infinity() );
}
{
stringstream str;
str << fixed << limits::max();
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_CHECK( str.str() != "inf" );
CPPUNIT_CHECK( str.str() != "-inf" );
CPPUNIT_CHECK( str.str() != "nan" );
CPPUNIT_CHECK( str.str() != "-nan" );
//CPPUNIT_MESSAGE( str.str().c_str() );
//str.str("");
//str << limits::max_exponent10;
//CPPUNIT_MESSAGE( str.str().c_str() );
str >> in_val_d;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_CHECK( in_val_d == in_val_d );
CPPUNIT_CHECK( in_val_d != limits::infinity() );
}
{
stringstream str;
str << scientific << setprecision(50) << limits::max();
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_CHECK( str.str() != "inf" );
CPPUNIT_CHECK( str.str() != "-inf" );
CPPUNIT_CHECK( str.str() != "nan" );
CPPUNIT_CHECK( str.str() != "-nan" );
//CPPUNIT_MESSAGE( str.str().c_str() );
//str.str("");
//str << limits::max_exponent10;
//CPPUNIT_MESSAGE( str.str().c_str() );
str >> in_val_d;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_CHECK( in_val_d == in_val_d );
CPPUNIT_CHECK( in_val_d != limits::infinity() );
}
#endif
{
stringstream str;
str << limits::infinity();
CPPUNIT_ASSERT( !str.fail() );
CPPUNIT_ASSERT( !limits::has_infinity || str.str() == "inf" );
}
{
stringstream str;
str << -limits::infinity();
CPPUNIT_ASSERT( !str.fail() );
CPPUNIT_ASSERT( !limits::has_infinity || str.str() == "-inf" );
}
{
stringstream str;
str << limits::quiet_NaN();
CPPUNIT_ASSERT( !str.fail() );
CPPUNIT_ASSERT( !limits::has_quiet_NaN || str.str() == "nan" );
}
{
stringstream str;
str << -limits::quiet_NaN();
CPPUNIT_ASSERT( !str.fail() );
CPPUNIT_ASSERT( !limits::has_quiet_NaN || str.str() == "-nan" );
}
{
stringstream str;
str << "0." << string(limits::max_exponent10, '0') << "1e" << (limits::max_exponent10 + 1);
CPPUNIT_ASSERT( !str.fail() );
str >> in_val_d;
CPPUNIT_ASSERT( !str.fail() );
CPPUNIT_ASSERT( str.eof() );
CPPUNIT_CHECK( in_val_d == 1 );
}
{
stringstream str;
str << "1" << string(-(limits::min_exponent10 - 1), '0') << "e" << (limits::min_exponent10 - 1);
CPPUNIT_ASSERT( !str.fail() );
str >> in_val_d;
CPPUNIT_ASSERT( !str.fail() );
CPPUNIT_ASSERT( str.eof() );
CPPUNIT_CHECK( in_val_d == 1 );
}
# if defined (_STLPORT_VERSION) && (_STLPORT_VERSION >= 0x530)
// The following tests are showing that simply changing stream
// precision lead to different result. Do not seems to be a real
// problem, simply rounding approximation but additional study should
// be done after 5.2 release.
{
stringstream str;
str << setprecision(limits::digits10 + 2) << limits::max();
CPPUNIT_MESSAGE(str.str().c_str());
CPPUNIT_ASSERT( !str.fail() );
F val;
str >> val;
CPPUNIT_ASSERT( !str.fail() );
CPPUNIT_ASSERT( limits::infinity() > val );
}
{
stringstream str;
str << setprecision(limits::digits10 + 1) << limits::max();
CPPUNIT_MESSAGE(str.str().c_str());
CPPUNIT_ASSERT( !str.fail() );
F val;
str >> val;
CPPUNIT_ASSERT( !str.fail() );
CPPUNIT_ASSERT( limits::infinity() > val );
}
# endif
}
#else
# define __check_get_float( F ) \
void check_get_float( F v ) \
{ \
F in_val_d = v; \
{ \
stringstream str; \
\
str << "1E+" << numeric_limits<F>::max_exponent10; \
\
str >> in_val_d; \
CPPUNIT_ASSERT(!str.fail()); \
CPPUNIT_ASSERT(str.eof()); \
CPPUNIT_CHECK( in_val_d == in_val_d ); \
CPPUNIT_CHECK( in_val_d != numeric_limits<F>::infinity() ); \
} \
{ \
stringstream str; \
\
str << "-1E+" << numeric_limits<F>::max_exponent10; \
\
str >> in_val_d; \
CPPUNIT_ASSERT(!str.fail()); \
CPPUNIT_ASSERT(str.eof()); \
CPPUNIT_CHECK( in_val_d == in_val_d ); \
CPPUNIT_CHECK( in_val_d != -numeric_limits<F>::infinity() ); \
} \
{ \
stringstream str; \
\
str << "1E" << numeric_limits<F>::min_exponent10; \
\
str >> in_val_d; \
CPPUNIT_ASSERT(!str.fail()); \
CPPUNIT_ASSERT(str.eof()); \
CPPUNIT_CHECK( in_val_d == in_val_d ); \
CPPUNIT_CHECK( in_val_d != F(0.0) ); \
} \
{ \
stringstream str; \
\
str << "1E+" << (numeric_limits<F>::max_exponent10 + 1); \
\
str >> in_val_d; \
CPPUNIT_ASSERT(!str.fail()); \
CPPUNIT_ASSERT(str.eof()); \
CPPUNIT_CHECK( in_val_d == in_val_d ); \
CPPUNIT_CHECK( in_val_d == numeric_limits<F>::infinity() ); \
} \
{ \
stringstream str; \
\
str << "-1E+" << (numeric_limits<F>::max_exponent10 + 1); \
\
str >> in_val_d; \
CPPUNIT_ASSERT(!str.fail()); \
CPPUNIT_ASSERT(str.eof()); \
CPPUNIT_CHECK( in_val_d == in_val_d ); \
CPPUNIT_CHECK( in_val_d == -numeric_limits<F>::infinity() ); \
} \
{ \
stringstream str; \
\
str << "1E" << (numeric_limits<F>::min_exponent10 - 1); \
\
str >> in_val_d; \
CPPUNIT_ASSERT(!str.fail()); \
CPPUNIT_ASSERT(str.eof()); \
CPPUNIT_CHECK( in_val_d == in_val_d ); \
CPPUNIT_CHECK( in_val_d >= F(0.0) && in_val_d <= numeric_limits<F>::min() ); \
} \
}
__check_get_float( float )
__check_get_float( double )
# if !defined (STLPORT) || !defined (_STLP_NO_LONG_DOUBLE)
__check_get_float( long double )
# endif
# undef __check_get_float
#endif // _STLP_NO_MEMBER_TEMPLATES
};
CPPUNIT_TEST_SUITE_REGISTRATION(NumPutGetTest);
#if defined (_MSC_VER)
# pragma warning (disable : 4056)
# pragma warning (disable : 4756)
#endif
//
// tests implementation
//
void NumPutGetTest::num_put_float()
{
{
string output, digits;
{
ostringstream ostr;
ostr << 1.23457e+17f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
digits = "17";
complete_digits(digits);
CPPUNIT_CHECK(output == string("1.23457e+") + digits );
}
{
ostringstream ostr;
ostr << setprecision(200) << 1.23457e+17f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK( output.size() < 200 );
}
{
ostringstream ostr;
ostr << setprecision(200) << numeric_limits<float>::min();
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK( output.size() < 200 );
}
{
ostringstream ostr;
ostr << fixed << 1.23457e+17f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK(output.size() == 25);
CPPUNIT_CHECK(output.substr(0, 5) == "12345");
CPPUNIT_CHECK(output.substr(18) == ".000000");
}
{
ostringstream ostr;
ostr << fixed << showpos << 1.23457e+17f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK(output.size() == 26);
CPPUNIT_CHECK(output.substr(0, 6) == "+12345");
CPPUNIT_CHECK(output.substr(19) == ".000000");
}
{
ostringstream ostr;
ostr << fixed << showpos << setprecision(100) << 1.23457e+17f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK(output.size() == 120);
CPPUNIT_CHECK(output.substr(0, 6) == "+12345");
CPPUNIT_CHECK(output.substr(19) == ".0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000" );
}
{
ostringstream ostr;
ostr << scientific << setprecision(8) << 0.12345678f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
digits = "1";
complete_digits(digits);
CPPUNIT_CHECK(output == string("1.23456780e-") + digits );
}
{
ostringstream ostr;
ostr << fixed << setprecision(8) << setw(30) << setfill('0') << 0.12345678f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK(output == "000000000000000000000.12345678");
}
{
ostringstream ostr;
ostr << fixed << showpos << setprecision(8) << setw(30) << setfill('0') << 0.12345678f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK(output == "0000000000000000000+0.12345678");
}
{
ostringstream ostr;
ostr << fixed << showpos << setprecision(8) << setw(30) << left << setfill('0') << 0.12345678f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK(output == "+0.123456780000000000000000000");
}
{
ostringstream ostr;
ostr << fixed << showpos << setprecision(8) << setw(30) << internal << setfill('0') << 0.12345678f;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK(output == "+00000000000000000000.12345678");
}
{
ostringstream ostr;
ostr << fixed << showpos << setprecision(100) << 1.234567e+17;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK(output.size() == 120);
CPPUNIT_CHECK(output.substr(0, 6) == "+12345");
CPPUNIT_CHECK(output.substr(19) == ".0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000" );
}
#if !defined (STLPORT) || !defined (_STLP_NO_LONG_DOUBLE)
{
ostringstream ostr;
ostr << fixed << showpos << setprecision(100) << 1.234567e+17l;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK(output.size() == 120);
CPPUNIT_CHECK(output.substr(0, 6) == "+12345");
CPPUNIT_CHECK(output.substr(19) == ".0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000" );
}
#endif
{
ostringstream ostr;
ostr << scientific << setprecision(50) << 0.0;
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
CPPUNIT_CHECK( output == "0.00000000000000000000000000000000000000000000000000e+00" );
}
{
ostringstream ostr;
ostr << fixed << setprecision(100) << numeric_limits<float>::max();
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
//CPPUNIT_MESSAGE( output.c_str() );
}
{
ostringstream ostr;
ostr << setprecision(100) << numeric_limits<double>::max();
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
//CPPUNIT_MESSAGE( output.c_str() );
}
#if !defined (STLPORT) || !defined (_STLP_NO_LONG_DOUBLE)
{
ostringstream ostr;
ostr << setprecision(100) << numeric_limits<long double>::max();
CPPUNIT_ASSERT(ostr.good());
output = reset_stream(ostr);
//CPPUNIT_MESSAGE( output.c_str() );
}
#endif
//{
// ostringstream ostr;
// ostr << setprecision(-numeric_limits<float>::min_exponent10 + numeric_limits<float>::digits10 + 9) << numeric_limits<float>::min();
// CPPUNIT_ASSERT(ostr.good());
// output = reset_stream(ostr);
// //CPPUNIT_MESSAGE( output.c_str() );
//}
//{
// ostringstream ostr;
// ostr << setprecision(-numeric_limits<double>::min_exponent10 + numeric_limits<double>::digits10) << numeric_limits<double>::min();
// CPPUNIT_ASSERT(ostr.good());
// output = reset_stream(ostr);
// //CPPUNIT_MESSAGE( output.c_str() );
//}
//#if !defined (STLPORT) || !defined (_STLP_NO_LONG_DOUBLE)
// {
// ostringstream ostr;
// ostr << setprecision(-numeric_limits<long double>::min_exponent10 + numeric_limits<long double>::digits10) << numeric_limits<long double>::min();
// CPPUNIT_ASSERT(ostr.good());
// output = reset_stream(ostr);
// CPPUNIT_MESSAGE( output.c_str() );
// }
//#endif
}
{
ostringstream str;
str.setf(ios::fixed, ios::floatfield);
str << 1.0e+5;
// cerr << str.str() << endl;
CPPUNIT_CHECK( str.str() == "100000.000000" );
reset_stream(str);
str.precision(0);
str << 1.0e+5;
CPPUNIT_CHECK( str.str() == "100000" );
reset_stream(str);
str.precision(4);
str << 1.0e+5;
CPPUNIT_CHECK( str.str() == "100000.0000" );
reset_stream(str);
str.precision(0);
str << 1.0e+83;
CPPUNIT_CHECK( str.str().size() == 84 );
//printf("\nC result: %.0f\n", 1.0e+83);
//CPPUNIT_MESSAGE( str.str().c_str() );
//CPPUNIT_CHECK( str.str() == "100000000000000000000000000000000000000000000000000000000000000000000000000000000000" );
// cerr.setf(ios::fixed, ios::floatfield);
// cerr << DBL_MAX << endl;
// cerr << 1.0e+37 << endl;
}
}
#define CHECK_COMPLETE(type, val, base, showbase, showpos, casing, width, adjust, expected) \
{ \
type tmp = val; \
ostringstream ostr; \
ostr << base << showbase << showpos << casing << setw(width) << adjust << tmp; \
CPPUNIT_CHECK( ostr.str() == expected ); \
}
#define CHECK(type, val, base, expected) \
CHECK_COMPLETE(type, val, base, noshowbase, noshowpos, nouppercase, 0, right, expected)
void NumPutGetTest::num_put_integer()
{
//octal outputs
{
CHECK(short, 0, oct, "0")
CHECK(short, 1, oct, "1")
CHECK(short, 12345, oct, "30071")
if (sizeof(short) == 2) {
CHECK(short, -1, oct, "177777")
CHECK(short, -12345, oct, "147707")
}
CHECK(unsigned short, 0, oct, "0")
CHECK(unsigned short, 12345, oct, "30071")
CHECK(int, 0, oct, "0")
CHECK(int, 12345678, oct, "57060516")
if (sizeof(int) == 4) {
CHECK(int, -1, oct, "37777777777")
CHECK(int, -12345678, oct, "37720717262")
}
CHECK(unsigned int, 0, oct, "0")
CHECK(unsigned int, 12345678, oct, "57060516")
CHECK(long, 0, oct, "0")
CHECK(long, 12345678, oct, "57060516")
if (sizeof(long) == 4) {
CHECK(long, -1, oct, "37777777777")
CHECK(long, -12345678, oct, "37720717262")
}
CHECK(unsigned long, 0, oct, "0")
CHECK(unsigned long, 12345678, oct, "57060516")
#if defined (STLPORT) && defined (_STLP_LONG_LONG)
CHECK(_STLP_LONG_LONG, 0, oct, "0")
CHECK(_STLP_LONG_LONG, 12345678, oct, "57060516")
if (sizeof(_STLP_LONG_LONG) == 8) {
CHECK(_STLP_LONG_LONG, -1, oct, "1777777777777777777777")
CHECK(_STLP_LONG_LONG, -12345678, oct, "1777777777777720717262")
}
CHECK(unsigned _STLP_LONG_LONG, 0, oct, "0")
CHECK(unsigned _STLP_LONG_LONG, 12345678, oct, "57060516")
#endif
//Even with showbase, 0 value gives "0" (see printf documentation)
CHECK_COMPLETE(short, 0, oct, showbase, noshowpos, nouppercase, 0, right, "0")
CHECK_COMPLETE(short, 0, oct, showbase, showpos, nouppercase, 6, right, " 0")
CHECK_COMPLETE(short, 1, oct, showbase, noshowpos, nouppercase, 6, right, " 01")
CHECK_COMPLETE(short, 1, oct, showbase, noshowpos, nouppercase, 6, left, "01 ")
CHECK_COMPLETE(short, 1, oct, showbase, showpos, nouppercase, 6, internal, " 01")
}
//decimal outputs
{
CHECK(short, 0, dec, "0")
CHECK(short, -1, dec, "-1")
CHECK(short, 12345, dec, "12345")
CHECK(short, -12345, dec, "-12345")
CHECK(unsigned short, 0, dec, "0")
CHECK(unsigned short, 12345, dec, "12345")
CHECK(int, 0, dec, "0")
CHECK(int, -1, dec, "-1")
CHECK(int, 12345678, dec, "12345678")
CHECK(int, -12345678, dec, "-12345678")
CHECK(unsigned int, 0, dec, "0")
CHECK(unsigned int, 12345678, dec, "12345678")
CHECK(long, 0, dec, "0")
CHECK(long, -1, dec, "-1")
CHECK(long, 12345678, dec, "12345678")
CHECK(long, -12345678, dec, "-12345678")
CHECK(unsigned long, 0, dec, "0")
CHECK(unsigned long, 12345678, dec, "12345678")
#if defined (STLPORT) && defined (_STLP_LONG_LONG)
CHECK(_STLP_LONG_LONG, 0, dec, "0")
CHECK(_STLP_LONG_LONG, -1, dec, "-1")
CHECK(_STLP_LONG_LONG, 12345678, dec, "12345678")
CHECK(_STLP_LONG_LONG, -12345678, dec, "-12345678")
CHECK(unsigned _STLP_LONG_LONG, 0, dec, "0")
CHECK(unsigned _STLP_LONG_LONG, 12345678, dec, "12345678")
#endif
CHECK_COMPLETE(short, 0, dec, showbase, showpos, nouppercase, 0, right, "+0")
CHECK_COMPLETE(short, 0, dec, showbase, showpos, nouppercase, 6, right, " +0")
CHECK_COMPLETE(short, 1, dec, showbase, showpos, nouppercase, 6, right, " +1")
CHECK_COMPLETE(short, 1, dec, showbase, showpos, nouppercase, 6, left, "+1 ")
CHECK_COMPLETE(short, 1, dec, showbase, showpos, nouppercase, 6, internal, "+ 1")
}
//hexadecimal outputs
{
CHECK(short, 0, hex, "0")
CHECK(short, 12345, hex, "3039")
if (sizeof(short) == 2) {
CHECK(short, -1, hex, "ffff")
CHECK(short, -12345, hex, "cfc7")
}
CHECK(unsigned short, 0, hex, "0")
CHECK(unsigned short, 12345, hex, "3039")
CHECK(int, 0, hex, "0")
CHECK(int, 12345678, hex, "bc614e")
if (sizeof(int) == 4) {
CHECK(int, -1, hex, "ffffffff")
CHECK(int, -12345678, hex, "ff439eb2")
}
CHECK(unsigned int, 0, hex, "0")
CHECK(unsigned int, 12345678, hex, "bc614e")
CHECK(long, 0, hex, "0")
CHECK(long, 12345678, hex, "bc614e")
if (sizeof(long) == 4) {
CHECK(long, -1, hex, "ffffffff")
CHECK(long, -12345678, hex, "ff439eb2")
}
CHECK(unsigned long, 0, hex, "0")
CHECK(unsigned long, 12345678, hex, "bc614e")
#if defined (STLPORT) && defined (_STLP_LONG_LONG)
CHECK(_STLP_LONG_LONG, 0, hex, "0")
CHECK(_STLP_LONG_LONG, 12345678, hex, "bc614e")
if (sizeof(_STLP_LONG_LONG) == 8) {
CHECK(_STLP_LONG_LONG, -1, hex, "ffffffffffffffff")
CHECK(_STLP_LONG_LONG, -12345678, hex, "ffffffffff439eb2")
}
CHECK(unsigned _STLP_LONG_LONG, 0, hex, "0")
CHECK(unsigned _STLP_LONG_LONG, 12345678, hex, "bc614e")
#endif
//Even with showbase, 0 value gives "0" output (see printf documentation)
CHECK_COMPLETE(short, 0, hex, showbase, showpos, nouppercase, 0, right, "0")
CHECK_COMPLETE(short, 0, hex, showbase, noshowpos, nouppercase, 6, right, " 0")
CHECK_COMPLETE(short, 0, hex, showbase, noshowpos, nouppercase, 6, internal, " 0")
CHECK_COMPLETE(short, 1, hex, showbase, noshowpos, nouppercase, 6, right, " 0x1")
CHECK_COMPLETE(short, 1, hex, showbase, noshowpos, nouppercase, 6, left, "0x1 ")
CHECK_COMPLETE(short, 1, hex, showbase, noshowpos, nouppercase, 6, internal, "0x 1")
CHECK_COMPLETE(short, 1, hex, showbase, noshowpos, uppercase, 6, left, "0X1 ")
CHECK_COMPLETE(short, 1, hex, showbase, showpos, uppercase, 6, internal, "0X 1")
}
}
void NumPutGetTest::num_get_float()
{
float in_val;
istringstream istr;
istr.str("1.2345");
istr >> in_val;
CPPUNIT_ASSERT(!istr.fail());
CPPUNIT_ASSERT(istr.eof());
CPPUNIT_ASSERT(check_float(in_val, 1.2345f));
istr.clear();
istr.str("-1.2345");
istr >> in_val;
CPPUNIT_ASSERT(!istr.fail());
CPPUNIT_ASSERT(istr.eof());
CPPUNIT_ASSERT(check_float(in_val, -1.2345f));
istr.clear();
istr.str("+1.2345");
istr >> in_val;
CPPUNIT_ASSERT(!istr.fail());
CPPUNIT_ASSERT(check_float(in_val, 1.2345f));
istr.clear();
istr.str("000000000000001.234500000000");
istr >> in_val;
CPPUNIT_ASSERT(!istr.fail());
CPPUNIT_ASSERT(istr.eof());
CPPUNIT_ASSERT(check_float(in_val, 1.2345f));
istr.clear();
istr.str("1.2345e+04");
istr >> in_val;
CPPUNIT_ASSERT(!istr.fail());
CPPUNIT_ASSERT(istr.eof());
CPPUNIT_ASSERT(check_float(in_val, 12345.0f));
istr.clear();
CPPUNIT_MESSAGE( "float" );
check_get_float( 0.0F );
CPPUNIT_MESSAGE( "double" );
check_get_float( 0.0 );
#if !defined (STLPORT) || !defined (_STLP_NO_LONG_DOUBLE)
CPPUNIT_MESSAGE( "long double" );
check_get_float( 0.0L );
#endif
{
stringstream str;
str << "1e" << numeric_limits<double>::max_exponent10;
CPPUNIT_ASSERT(!str.fail());
float val;
str >> val;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_ASSERT( numeric_limits<double>::max_exponent10 <= numeric_limits<float>::max_exponent10 ||
val == numeric_limits<float>::infinity() );
}
{
stringstream str;
str << "1e" << numeric_limits<double>::min_exponent10;
CPPUNIT_ASSERT(!str.fail());
float val;
str >> val;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_ASSERT( numeric_limits<double>::min_exponent10 >= numeric_limits<float>::min_exponent10 ||
val == 0.0f );
}
#if !defined (STLPORT) || !defined (_STLP_NO_LONG_DOUBLE)
{
stringstream str;
str << "1e" << numeric_limits<long double>::max_exponent10;
CPPUNIT_ASSERT(!str.fail());
double val;
str >> val;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_ASSERT( numeric_limits<long double>::max_exponent10 <= numeric_limits<double>::max_exponent10 ||
val == numeric_limits<double>::infinity() );
}
{
stringstream str;
str << "1e" << numeric_limits<long double>::min_exponent10;
CPPUNIT_ASSERT(!str.fail());
double val;
str >> val;
CPPUNIT_ASSERT(!str.fail());
CPPUNIT_ASSERT(str.eof());
CPPUNIT_ASSERT( numeric_limits<long double>::min_exponent10 >= numeric_limits<double>::min_exponent10 ||
val == 0.0 );
}
{
const char* p = "2.718281828459045235360287471352662497757247093e0";
std::stringstream s;
s << p;
long double x;
s >> x;
CPPUNIT_ASSERT( x > 2.70l && x < 2.72l );
}
#endif
}
void NumPutGetTest::num_get_integer()
{
//octal input
{
istringstream istr;
istr.str("30071");
short val;
istr >> oct >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == 12345 );
istr.clear();
if (sizeof(short) == 2) {
istr.str("177777");
istr >> oct >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == -1 );
istr.clear();
}
}
//decimal input
{
istringstream istr;
istr.str("10000");
short val = -1;
istr >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == 10000 );
istr.clear();
istr.str("+10000");
val = -1;
istr >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == 10000 );
istr.clear();
if (sizeof(short) == 2) {
val = -1;
istr.str("10000000");
istr >> val;
CPPUNIT_ASSERT( istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == -1 );
istr.clear();
}
val = -1;
istr.str("0x0");
istr >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( !istr.eof() );
CPPUNIT_ASSERT( val == 0 );
istr.clear();
val = -1;
istr.str("000001");
istr >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == 1 );
istr.clear();
}
//hexadecimal input
{
istringstream istr;
istr.str("3039");
short val = -1;
istr >> hex >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == 12345 );
istr.clear();
istr.str("x3039");
val = -1;
istr >> hex >> val;
CPPUNIT_ASSERT( istr.fail() );
CPPUNIT_ASSERT( !istr.eof() );
CPPUNIT_ASSERT( val == -1 );
istr.clear();
istr.str("03039");
val = -1;
istr >> hex >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == 12345 );
istr.clear();
istr.str("0x3039");
istr >> hex >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == 12345 );
istr.clear();
if (sizeof(short) == 2) {
val = -1;
istr.str("cfc7");
istr >> hex >> val;
CPPUNIT_ASSERT( !istr.fail() );
CPPUNIT_ASSERT( istr.eof() );
CPPUNIT_ASSERT( val == -12345 );
istr.clear();
}
}
}
void NumPutGetTest::inhex()
{
{
ostringstream s;
s << hex << 0;
CPPUNIT_CHECK( s.str() == "0" );
}
{
ostringstream s;
s << hex << 0xff;
CPPUNIT_CHECK( s.str() == "ff" );
}
{
ostringstream s;
s << hex << setw( 4 ) << 0xff;
CPPUNIT_CHECK( s.str() == " ff" );
}
{
ostringstream s;
s << hex << setw( 4 ) << 0;
CPPUNIT_CHECK( s.str() == " 0" );
}
{
ostringstream s;
s << hex << showbase << 0;
CPPUNIT_CHECK( s.str() == "0" );
}
{
ostringstream s;
s << hex << showbase << 0xff;
CPPUNIT_CHECK( s.str() == "0xff" );
}
{
ostringstream s;
s << hex << showbase << setw( 4 ) << 0xff;
CPPUNIT_CHECK( s.str() == "0xff" );
}
{ // special case for regression (partially duplicate CHECK_COMPLETE above):
ostringstream s;
s.setf( ios_base::internal, ios_base::adjustfield );
s << hex << showbase << setw(8+2) << 0;
CPPUNIT_CHECK( s.str() == " 0" );
}
}
void NumPutGetTest::pointer()
{
// Problem with printing pointer to null
/*
* Really C's formatting not help here, due to:
*
* p The argument shall be a pointer to void. The value of
* the pointer is converted to a sequence of printable characters,
* in an implementation-defined manner.
*/
{
/*
char buf[128];
void *p = (void *)0xff00;
sprintf( buf, "%p", p );
// cerr << buf << endl;
// Hmmm, I see 0xff00 on box with 32-bits address; pointer like 'unsigned hex'?
if ( sizeof( p ) == 2 ) {
CPPUNIT_ASSERT( strcmp( buf, "0xff00" ) == 0 );
} else if ( sizeof( p ) == 4 ) {
CPPUNIT_ASSERT( strcmp( buf, "0x0000ff00" ) == 0 );
} else if ( sizeof( p ) == 8 ) {
CPPUNIT_ASSERT( strcmp( buf, "0x000000000000ff00" ) == 0 );
} else {
CPPUNIT_CHECK( sizeof( p ) == 2 || sizeof( p ) == 4 || sizeof( p ) == 8 );
}
*/
}
{
/*
char buf[128];
void *p = 0;
*/
// sprintf( buf, "%p", p );
/* Cool. "%p" print '(nil)'; "%#x" print '0' */
// sprintf( buf, "%#x", (unsigned)p );
// cerr << buf << endl;
}
{
ostringstream s;
void *p = (void *)0xff00;
s << p;
CPPUNIT_ASSERT( s.good() );
if ( sizeof( p ) == 2 ) {
CPPUNIT_ASSERT( s.str() == "0xff00" );
} else if ( sizeof( p ) == 4 ) {
CPPUNIT_ASSERT( s.str() == "0x0000ff00" ); // this pass
} else if ( sizeof( p ) == 8 ) {
CPPUNIT_ASSERT( s.str() == "0x000000000000ff00" );
} else {
CPPUNIT_CHECK( sizeof( p ) == 2 || sizeof( p ) == 4 || sizeof( p ) == 8 );
}
}
{
ostringstream s;
void *p = 0;
s << p;
CPPUNIT_ASSERT( s.good() );
if ( sizeof( p ) == 2 ) {
CPPUNIT_ASSERT( s.str() == "0x0000" );
} else if ( sizeof( p ) == 4 ) {
CPPUNIT_ASSERT( s.str() == "0x00000000" ); // but this will fail, if follow %p
} else if ( sizeof( p ) == 8 ) {
CPPUNIT_ASSERT( s.str() == "0x0000000000000000" );
} else {
CPPUNIT_CHECK( sizeof( p ) == 2 || sizeof( p ) == 4 || sizeof( p ) == 8 );
}
}
}
void NumPutGetTest::fix_float_long()
{
ostringstream str;
str.setf(ios::fixed, ios::floatfield);
str << 1.0e+5;
CPPUNIT_CHECK( str.str() == "100000.000000" );
reset_stream(str);
str.precision(0);
str << 1.0e+5;
CPPUNIT_CHECK( str.str() == "100000" );
reset_stream(str);
str.precision(4);
str << 1.0e+5;
CPPUNIT_CHECK( str.str() == "100000.0000" );
reset_stream(str);
str.precision(0);
str << 1.0e+83;
{
istringstream istr( str.str() );
double f;
istr >> f;
CPPUNIT_CHECK( !istr.fail() );
if ( int(numeric_limits<double>::digits10) < 83 ) {
double delta = 1.0;
for ( int ee = 83 - int(numeric_limits<double>::digits10); ee > 0; --ee ) {
delta *= 10.0;
}
// we may loss some digits here, but not more than mantissa:
CPPUNIT_CHECK( (f > (1.0e+83 - delta)) && (f < (1.0e+83 + delta)) );
} else {
CPPUNIT_CHECK( check_double(f, 1.0e+83) );
}
}
#if 0 // #ifndef _STLP_NO_LONG_DOUBLE
reset_stream(str);
str.precision(0);
str << 1.0e+83l;
{
istringstream istr( str.str() );
long double f;
istr >> f;
CPPUNIT_CHECK( !istr.fail() );
if ( int(numeric_limits<long double>::digits10) < 83 ) {
long double delta = 1.0l;
for ( int ee = 83 - int(numeric_limits<long double>::digits10); ee > 0; --ee ) {
delta *= 10.0l;
}
// we may loss some digits here, but not more than mantissa:
cerr << "0123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789" << endl;
cerr << str.str() << endl;
cerr << delta << endl;
cerr << f << endl;
CPPUNIT_CHECK( (f > (1.0e+83l - delta)) && (f < (1.0e+83l + delta)) );
} else {
CPPUNIT_CHECK( check_double(f, 1.0e+83l) );
}
}
#endif
reset_stream(str);
str.precision(0);
str << numeric_limits<double>::max();
{
istringstream istr( str.str() );
double f;
istr >> f;
CPPUNIT_CHECK( !istr.fail() );
if ( int(numeric_limits<double>::digits10) < int(numeric_limits<double>::max_exponent10) ) {
double delta = 9.0;
for ( int ee = int(numeric_limits<double>::max_exponent10) - int(numeric_limits<double>::digits10); ee > 0; --ee ) {
delta *= 10.0;
}
// we may loss some digits here, but not more than mantissa:
CPPUNIT_CHECK( (f > (numeric_limits<double>::max() - delta)) );
}
}
#if 0 // #ifndef _STLP_NO_LONG_DOUBLE
reset_stream(str);
str.precision(0);
str << numeric_limits<long double>::max();
{
istringstream istr( str.str() );
long double f;
istr >> f;
CPPUNIT_CHECK( !istr.fail() );
if ( int(numeric_limits<long double>::digits10) < int(numeric_limits<long double>::max_exponent10) ) {
long double delta = 1.0l;
for ( int ee = int(numeric_limits<long double>::max_exponent10) - int(numeric_limits<long double>::digits10); ee > 0; --ee ) {
delta *= 10.0l;
}
// we may loss some digits here, but not more than mantissa:
CPPUNIT_CHECK( (f > (numeric_limits<long double>::max() - delta)) );
}
}
#endif
}
class CommaSepNumPunct : public numpunct<char> {
char do_thousands_sep() const { return ','; }
string do_grouping() const { return string("\1\2\3") + (char)CHAR_MAX; }
};
#define CHECK2(val, expected) \
os.str(""); os << fixed << setprecision(3) << showpos << val; \
CPPUNIT_ASSERT( os.str() == expected )
void NumPutGetTest::custom_numpunct()
{
ostringstream os;
locale loc(os.getloc(), new CommaSepNumPunct());
os.imbue(loc);
CHECK2(1, "+1");
CHECK2(10, "+1,0");
CHECK2(100, "+10,0");
CHECK2(1000, "+1,00,0");
CHECK2(1.234, "+1.234");
CHECK2(123.456, "+12,3.456");
CHECK2(1234.567, "+1,23,4.567");
CHECK2(12345.678, "+12,34,5.678");
CHECK2(123456.789, "+123,45,6.789");
CHECK2(1234567.891, "+1,234,56,7.891");
CHECK2(123456789.123, "+123,456,78,9.123");
//CHECK2(100000000000000000000000000000.0, "+100000000000000000000000,000,00,0.000");
CHECK2(numeric_limits<double>::infinity(), "+inf");
CHECK2(-1.234, "-1.234");
CHECK2(-123.456, "-12,3.456");
CHECK2(-1234.567, "-1,23,4.567");
CHECK2(-12345.678, "-12,34,5.678");
CHECK2(-123456.789, "-123,45,6.789");
CHECK2(-1234567.891, "-1,234,56,7.891");
CHECK2(-123456789.123, "-123,456,78,9.123");
//CHECK2(-100000000000000000000000000000.0, "-100000000000000000000000,000,00,0.000");
CHECK2(-numeric_limits<double>::infinity(), "-inf");
}
#endif