1//===-- Unittests for nanl ------------------------------------------------===//
2//
3// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4// See https://llvm.org/LICENSE.txt for license information.
5// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6//
7//===----------------------------------------------------------------------===//
8
9#include "hdr/signal_macros.h"
10#include "src/__support/FPUtil/FPBits.h"
11#include "src/__support/macros/sanitizer.h"
12#include "src/math/nanl.h"
13#include "test/UnitTest/FEnvSafeTest.h"
14#include "test/UnitTest/FPMatcher.h"
15#include "test/UnitTest/Test.h"
16
17#if defined(LIBC_TYPES_LONG_DOUBLE_IS_FLOAT64)
18#define SELECT_LONG_DOUBLE(val, _, __) val
19#elif defined(LIBC_TYPES_LONG_DOUBLE_IS_X86_FLOAT80)
20#define SELECT_LONG_DOUBLE(_, val, __) val
21#elif defined(LIBC_TYPES_LONG_DOUBLE_IS_FLOAT128)
22#define SELECT_LONG_DOUBLE(_, __, val) val
23#else
24#error "Unknown long double type"
25#endif
26
27class LlvmLibcNanlTest : public LIBC_NAMESPACE::testing::FEnvSafeTest {
28public:
29 using StorageType = LIBC_NAMESPACE::fputil::FPBits<long double>::StorageType;
30
31 void run_test(const char *input_str, StorageType bits) {
32 long double result = LIBC_NAMESPACE::nanl(input_str);
33 auto actual_fp = LIBC_NAMESPACE::fputil::FPBits<long double>(result);
34 auto expected_fp = LIBC_NAMESPACE::fputil::FPBits<long double>(bits);
35 EXPECT_EQ(actual_fp.uintval(), expected_fp.uintval());
36 }
37};
38
39TEST_F(LlvmLibcNanlTest, NCharSeq) {
40 run_test("",
41 SELECT_LONG_DOUBLE(0x7ff8000000000000, (UInt128(0x7fffc00000) << 40),
42 (UInt128(0x7fff800000000000) << 64)));
43 run_test("1234", SELECT_LONG_DOUBLE(
44 0x7ff80000000004d2,
45 (UInt128(0x7fffc00000) << 40) + UInt128(0x4d2),
46 (UInt128(0x7fff800000000000) << 64) + UInt128(0x4d2)));
47 run_test("0x1234",
48 SELECT_LONG_DOUBLE(0x7ff8000000001234,
49 (UInt128(0x7fffc00000) << 40) + UInt128(0x1234),
50 (UInt128(0x7fff800000000000) << 64) +
51 UInt128(0x1234)));
52 run_test("1a",
53 SELECT_LONG_DOUBLE(0x7ff8000000000000, (UInt128(0x7fffc00000) << 40),
54 (UInt128(0x7fff800000000000) << 64)));
55 run_test("1234567890qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM_",
56 SELECT_LONG_DOUBLE(0x7ff8000000000000, (UInt128(0x7fffc00000) << 40),
57 (UInt128(0x7fff800000000000) << 64)));
58 run_test("10000000000000000000000000000000000000000000000000",
59 SELECT_LONG_DOUBLE(0x7ff8000000000000, (UInt128(0x7fffc00000) << 40),
60 (UInt128(0x7fff800000000000) << 64)));
61}
62
63TEST_F(LlvmLibcNanlTest, RandomString) {
64 StorageType expected =
65 SELECT_LONG_DOUBLE(0x7ff8000000000000, (UInt128(0x7fffc00000) << 40),
66 (UInt128(0x7fff800000000000) << 64));
67
68 run_test(" 1234", expected);
69 run_test("-1234", expected);
70 run_test("asd&f", expected);
71 run_test("123 ", expected);
72}
73
74#if defined(LIBC_ADD_NULL_CHECKS) && !defined(LIBC_HAS_SANITIZER)
75TEST_F(LlvmLibcNanlTest, InvalidInput) {
76 EXPECT_DEATH([] { LIBC_NAMESPACE::nanl(nullptr); }, WITH_SIGNAL(-1));
77}
78#endif // LIBC_HAS_ADDRESS_SANITIZER
79

source code of libc/test/src/math/smoke/nanl_test.cpp