/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/* * This file is part of the LibreOffice project. * * This Source Code Form is subject to the terms of the Mozilla Public * License, v. 2.0. If a copy of the MPL was not distributed with this * file, You can obtain one at http://mozilla.org/MPL/2.0/. * * This file incorporates work covered by the following license notice: * * Licensed to the Apache Software Foundation (ASF) under one or more * contributor license agreements. See the NOTICE file distributed * with this work for additional information regarding copyright * ownership. The ASF licenses this file to you under the Apache * License, Version 2.0 (the "License"); you may not use this file * except in compliance with the License. You may obtain a copy of * the License at http://www.apache.org/licenses/LICENSE-2.0 .
#include <sal/types.h>
#include <cppunit/TestAssert.h>
#include <cppunit/TestFixture.h>
#include <cppunit/extensions/HelperMacros.h>
#include <rtl/math.hxx>
#include <rtl/ustring.hxx>
#include <limits>
#include <test/nanpayload_test.hxx>
template <>
inline std::string CPPUNIT_NS::assertion_traits<rtl_math_ConversionStatus>::
toString(const rtl_math_ConversionStatus& x )static_cast <unsigned int >(x);return ost.str();namespace {class Test: public CppUnit::TestFixture {public :void test_stringToDouble_good() {double res = rtl::math::stringToDouble(" +1.E01foo" ,'.' , ',' , &status, &end);" +1.E01" ), end);10 .0 , res);"NaN" ,'.' , ',' , &status, &end);3 ), end);"NaN1.23" ,'.' , ',' , &status, &end);3 ), end);"+NaN" ,'.' , ',' , &status, &end);0 ), end);0 .0 , res);"-NaN" ,'.' , ',' , &status, &end);0 ), end);0 .0 , res);"+1.#NAN" ,'.' , ',' , &status, &end);7 ), end);"-1.#NAN" ,'.' , ',' , &status, &end);7 ), end);"INF" ,'.' , ',' , &status, &end);3 ), end);"INF1.23" ,'.' , ',' , &status, &end);3 ), end);".5" ,'.' , ',' , &status, &end);2 ), end);0 .5 , res);"5." ,'.' , ',' , &status, &end);2 ), end);5 .0 , res);// Leading 0 and group separator. "0,123" ,'.' , ',' , &status, &end);5 ), end);123 .0 , res);// Leading 0 and two consecutive group separators are none. "0,,1" ,'.' , ',' , &status, &end);1 ), end);0 .0 , res);// Leading 0 and group separator at end is none. "0," ,'.' , ',' , &status, &end);1 ), end);0 .0 , res);// Leading 0 and group separator before non-digit is none. "0,x" ,'.' , ',' , &status, &end);1 ), end);0 .0 , res);// Trailing group separator is none. "1,234," ,'.' , ',' , &status, &end);5 ), end);1234 .0 , res);// Group separator followed by non-digit is none. "1,234,x" ,'.' , ',' , &status, &end);5 ), end);1234 .0 , res);// Check that the value is the nearest double-precision representation of the decimal 0.0042 // (it was 0.0042000000000000006 instead of 0.0041999999999999997) "0,0042" , ',' , ' ' , &status, &end);0 .0042 , res);// "- 1" is nothing "- 1" , '.' , ',' , &status, &end);0 ), end);0 .0 , res);// "-1E+E" : no exponent "-1E+E" , '.' , ',' , &status, &end);2 ), end);1 .0 , res);// "-0" is negative zero "-0" , '.' , ',' , &status, &end);2 ), end);0 .0 , res);// Compensating: "0.001E311" is 1E308, not overflow/inf "0.001E311" , '.' , ',' , &status, &end);9 ), end);1 E308, res);"1E8589934590" , '.' , ',' , &status, &end);12 ), end);double >::infinity(), res);// DBL_MAX and 4 nextafters double fValAfter = DBL_MAX;"1.7976931348623157e+308" , '.' , ',' , &status, &end);23 ), end);0 );"1.7976931348623155e+308" , '.' , ',' , &status, &end);23 ), end);0 );"1.7976931348623153e+308" , '.' , ',' , &status, &end);23 ), end);0 );"1.7976931348623151e+308" , '.' , ',' , &status, &end);23 ), end);0 );"1.7976931348623149e+308" , '.' , ',' , &status, &end);23 ), end);// Minimal subnormal value, as documented for Basic "4.94065645841247E-324" , '.' , ',' , &status, &end);21 ), end);0 x1p-1074 , res);void test_stringToDouble_bad() {double res = rtl::math::stringToDouble(" +Efoo" ,'.' , ',' , &status, &end);0 ), end);0 .0 , res);"." ,'.' , ',' , &status, &end);0 ), end);0 .0 , res);" +.Efoo" ,'.' , ',' , &status, &end);0 ), end);0 .0 , res);" +,.Efoo" ,'.' , ',' , &status, &end);0 ), end);0 .0 , res);// Leading group separator is none. ",1234" ,'.' , ',' , &status, &end);0 ), end);0 .0 , res);void test_stringToDouble_exponent_without_digit() {double res = rtl::math::stringToDouble("1e" ,'.' , ',' , &status, &end);"1" ), end);1 .0 , res);"0e" ,'.' , ',' , &status, &end);"1" ), end);0 .0 , res);void test_round() {double fVal = 5000000000000001 .0 ;5000000000000001 .0 , rtl::math::round( fVal, 9 , rtl_math_RoundingMode_Corrected));8796093022188 .0 ;6093022188 .0 , rtl::math::round( fVal, 9 , rtl_math_RoundingMode_Corrected) - 8790000000000 );4503599627370491 .0 ;4503599627370000 .0 , rtl::math::round( fVal, -3 , rtl_math_RoundingMode_Corrected));// test #tdf158190: ROUND(16.83 * 650, 0) 16 .83 ;10940 .0 , rtl::math::round( fVal * 650 , 0 , rtl_math_RoundingMode_Corrected));void test_doubleToString() {double fVal = 999999999999999 .0 ;3 ] = { 3 , 2 , 0 };'.' , aGroups, ',' , true ));"99,99,99,99,99,99,999" _ustr, aRes);949 .0 ;2 , // round before decimals '.' , aGroups, ',' , true );"900" _ustr, aRes);950 .0 ;2 , // round before decimals '.' , aGroups, ',' , true );"1,000" _ustr, aRes);// Check non-ASCII separators: Arabic decimal separator U+066B, thousand separator U+066C 123456 .78 ;2 ,'٫' , aGroups, u'٬' , true );"1٬23٬456٫78" _ustr, aRes);4503599627370495 .0 ;'.' );"4503599627370495" _ustr, aRes);4503599627370496 .0 ;2 , '.' );"4503599627370496.00" _ustr, aRes);4503599627370496 .0 ;2 , '.' );"-4503599627370496.00" _ustr, aRes);9007199254740991 .0 ; // (2^53)-1 '.' , true );"9007199254740991" _ustr, aRes);9007199254740992 .0 ; // (2^53), algorithm switch '.' , true );"9.00719925474099E+015" _ustr, aRes);9007199254740993 .0 ; // (2^53)+1 would be but is 9007199254740992 '.' , true );"9.00719925474099E+015" _ustr, aRes);// Test rtl_math_StringFormat_G 0 .001234567 ;3 , '.' , true );"0.00123" _ustr, aRes);123 .4567 ;3 , '.' , true );"123" _ustr, aRes);123 .4567 ;4 , '.' , true );"123.5" _ustr, aRes);99 .6 ;3 , '.' , true );"99.6" _ustr, aRes);// Expected could be 1E+03 (as 999.6 rounded to 3 significant digits // results in 1000 with an exponent equal to significant digits). // Currently we don't and output 1000 instead, negligible. 999 .6 ;3 , '.' , true );"1000" _ustr, aRes);9999 .6 ;3 , '.' , true );"1E+004" _ustr, aRes);12345 .6789 ;3 , '.' , true );"1.2E+004" _ustr, aRes);2000000528764739 .0 ;15 , '.' , true );"2.00000052876474E+015" _ustr, aRes);// The original problem of tdf#160985 was nDecPlaces = 16 with // RTL_STR_MAX_VALUEOFDOUBLE - std::size("-x.E-xxx") 2000000528764739 .0 ;16 , '.' , true );"2000000528764739" _ustr, aRes);2000000528764739 .0 ;18 , '.' , false );"2000000528764739.00" _ustr, aRes);// DBL_MAX and 4 nextafters '.' , true );"1.7976931348623157E+308" _ustr, aRes);0 );'.' , true );"1.7976931348623155E+308" _ustr, aRes);0 );'.' , true );"1.7976931348623153E+308" _ustr, aRes);0 );'.' , true );"1.7976931348623151E+308" _ustr, aRes);0 );'.' , true );"1.797693134862315E+308" _ustr, aRes);'.' , ',' )); // Test roundtrip // DBL_MAX and 4 nextafters rounded to 15 decimals 15 , '.' , true );"1.797693134862316E+308" _ustr, aRes);0 );15 , '.' , true );"1.797693134862316E+308" _ustr, aRes);0 );15 , '.' , true );"1.797693134862315E+308" _ustr, aRes);0 );15 , '.' , true );"1.797693134862315E+308" _ustr, aRes);0 );15 , '.' , true );"1.797693134862315E+308" _ustr, aRes);// DBL_MAX rounded to 14 decimals 14 , '.' , true );"1.79769313486232E+308" _ustr, aRes);// DBL_MAX rounded to 2 decimals 2 , '.' , true );"1.8E+308" _ustr, aRes);// Crashed after commit eae24a9488814e77254d175c11fc4a138c1dbd30 123456 .789 ;2 , '.' , false );"1.23E+005" _ustr, aRes);9 .9999999999999929 ;cimalPlaces_Max, '.' , true );"9.99999999999999" _ustr, aRes);0 .99999999999999933 ;ces_Max, '.' , true );"0.999999999999999" _ustr, aRes);void test_approx() {// (2^53)-1 , (2^53)-3 false , rtl::math::approxEqual( 9007199254740991 .0 , 9007199254740989 .0 ));// (2^53)-1 , (2^53)-2 false , rtl::math::approxEqual( 9007199254740991 .0 , 9007199254740990 .0 ));// Note: the following are internally represented as 900719925474099.12 // and 900719925474098.88 and the difference is 0.25 ... true , rtl::math::approxEqual( 900719925474099 .1 , 900719925474098 .9 ));true , rtl::math::approxEqual( 72 .944444444444443 , 72 .9444444444444 ));true , rtl::math::approxEqual( 359650 .27322404372 , 359650 .27322404401 ));true , rtl::math::approxEqual( 5 .3590326375710063 e+238 , 5 .3590326375710109 e+238 ));true , rtl::math::approxEqual( 7 .4124095894894475 e+158 , 7 .4124095894894514 e+158 ));true , rtl::math::approxEqual( 1 .2905754687023132 e+79 , 1 .2905754687023098 e+79 ));true , rtl::math::approxEqual( 3 .5612905090455637 e+38 , 3 .5612905090455599 e+38 ));true , rtl::math::approxEqual( 0 .001000810185185185 , 0 .00100081018518519 ));// 0.3 - 0.2 - 0.1 == 0.0 0 .0 , rtl::math::approxSub( rtl::math::approxSub( 0 .3 , 0 .2 ), 0 .1 ));// ((2^53)-1) - ((2^53)-2) == 1.0 1 .0 , rtl::math::approxSub( 9007199254740991 .0 , 9007199254740990 .0 ));// (3^31) - ((3^31)-1) == 1.0 1 .0 , rtl::math::approxSub( 617673396283947 .0 , 617673396283946 .0 void test_erf() {double x, res;0 .0 ;0 .0 ,res);false );1 .0 ,res);true );1 .0 ,res);3 .0 ;1 E-12 );void test_erfc() {double x, res;0 .0 ;1 .0 ,res);false );0 .0 ,res);true );2 .0 ,res);3 .0 ;2 .0 - rtl::math::erfc(x), res, 1 E-12 );void test_expm1() {double x, res;0 .0 ;0 .0 ,res);0 .0 ;0 .0 ,res);false );true , std::isinf(res) && !std::signbit(res));true );1 .0 ,res);void test_log1p() {double x, res;0 .0 ;0 .0 ,res);0 .0 ;0 .0 ,res);false );true , std::isinf(res) && !std::signbit(res));1 .0 ;true , std::isinf(res) && std::signbit(res));1 .1 ;true );void test_acosh() {double res;1 .0 ); // NaN 0 .0 ); // NaN 0 .5 ); // NaN 0 .0 , rtl::math::acosh(1 .0 ));double >::infinity()); // +Inf // #i97605 692 .56728736744176 , rtl::math::acosh(3 e+300 ), 1 e-15 );0 .014142017775252324 , rtl::math::acosh(1 .0001 ), 1 e-15 );void test_asinh() {double res;double >::infinity()); // -Inf 0 .0 , rtl::math::asinh(0 .0 ));double >::infinity()); // +Inf // #i97605 691 .67568924815798 , rtl::math::asinh(1 .23 e+300 ), 1 e-15 );1 .0350378961923076 , rtl::math::asinh(1 .23 ), 1 e-16 );1 .23 e-300 , rtl::math::asinh(1 .23 e-300 ), 1 e-303 );// asinh is an odd function 1 .23 e+300 ), rtl::math::asinh(-1 .23 e+300 ));1 .23 ), rtl::math::asinh(-1 .23 ));1 .23 e-300 ), rtl::math::asinh(-1 .23 e-300 ));void test_atanh() {double res;2 .0 ); // NaN 1 .0 ); // -Inf 0 .0 , rtl::math::atanh(0 .0 ));1 .0 ); // +Inf 2 .0 ); // NaN void test_payloadNaN() {#ifndef DISABLE_NAN_TESTS#endif /* vim:set shiftwidth=4 softtabstop=4 expandtab: */ Messung V0.5 in Prozent C=92 H=100 G=95
¤ Dauer der Verarbeitung: 0.18 Sekunden
(vorverarbeitet am 2026-06-05)
¤ *© Formatika GbR, Deutschland
