1/* Test nan functions stack overflow (bug 16962).
2 Copyright (C) 2015-2022 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
18
19#include <math.h>
20#include <stdio.h>
21#include <string.h>
22#include <sys/resource.h>
23#include <stdlib.h>
24
25#define STACK_LIM 1048576
26#define STRING_SIZE (2 * STACK_LIM)
27
28static int
29do_test (void)
30{
31 int result = 0;
32 struct rlimit lim;
33 getrlimit (RLIMIT_STACK, rlimits: &lim);
34 lim.rlim_cur = STACK_LIM;
35 setrlimit (RLIMIT_STACK, rlimits: &lim);
36 char *nanstr = malloc (STRING_SIZE);
37 if (nanstr == NULL)
38 {
39 puts (s: "malloc failed, cannot test");
40 return 77;
41 }
42 memset (s: nanstr, c: '0', STRING_SIZE - 1);
43 nanstr[STRING_SIZE - 1] = 0;
44#define NAN_TEST(TYPE, FUNC) \
45 do \
46 { \
47 char *volatile p = nanstr; \
48 volatile TYPE v = FUNC (p); \
49 if (isnan (v)) \
50 puts ("PASS: " #FUNC); \
51 else \
52 { \
53 puts ("FAIL: " #FUNC); \
54 result = 1; \
55 } \
56 } \
57 while (0)
58 NAN_TEST (float, nanf);
59 NAN_TEST (double, nan);
60 NAN_TEST (long double, nanl);
61 return result;
62}
63
64#define TEST_FUNCTION do_test ()
65#include "../test-skeleton.c"
66

source code of glibc/math/test-nan-overflow.c