1  /* Test nan functions stack overflow (bug 16962).
       2     Copyright (C) 2015-2023 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  
      28  static int
      29  do_test (void)
      30  {
      31    int result = 0;
      32    struct rlimit lim;
      33    getrlimit (RLIMIT_STACK, &lim);
      34    lim.rlim_cur = STACK_LIM;
      35    setrlimit (RLIMIT_STACK, &lim);
      36    char *nanstr = malloc (STRING_SIZE);
      37    if (nanstr == NULL)
      38      {
      39        puts ("malloc failed, cannot test");
      40        return 77;
      41      }
      42    memset (nanstr, '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"