1  /* Copyright (C) 2002-2023 Free Software Foundation, Inc.
       2     This file is part of the GNU C Library.
       3  
       4     The GNU C Library is free software; you can redistribute it and/or
       5     modify it under the terms of the GNU Lesser General Public
       6     License as published by the Free Software Foundation; either
       7     version 2.1 of the License, or (at your option) any later version.
       8  
       9     The GNU C Library is distributed in the hope that it will be useful,
      10     but WITHOUT ANY WARRANTY; without even the implied warranty of
      11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      12     Lesser General Public License for more details.
      13  
      14     You should have received a copy of the GNU Lesser General Public
      15     License along with the GNU C Library; if not, see
      16     <https://www.gnu.org/licenses/>.  */
      17  
      18  #include <pthread.h>
      19  #include <stdio.h>
      20  #include <stdlib.h>
      21  #include <time.h>
      22  
      23  
      24  #define N 100
      25  
      26  static pthread_once_t once = PTHREAD_ONCE_INIT;
      27  
      28  static int global;
      29  
      30  static void
      31  once_handler (void)
      32  {
      33    struct timespec ts;
      34  
      35    ++global;
      36  
      37    ts.tv_sec = 2;
      38    ts.tv_nsec = 0;
      39    nanosleep (&ts, NULL);
      40  }
      41  
      42  
      43  static void *
      44  tf (void *arg)
      45  {
      46    pthread_once (&once, once_handler);
      47  
      48    if (global != 1)
      49      {
      50        printf ("thread %ld: global == %d\n", (long int) arg, global);
      51        exit (1);
      52      }
      53  
      54    return NULL;
      55  }
      56  
      57  
      58  static int
      59  do_test (void)
      60  {
      61    pthread_attr_t at;
      62    pthread_t th[N];
      63    int cnt;
      64  
      65    if (pthread_attr_init (&at) != 0)
      66      {
      67        puts ("attr_init failed");
      68        return 1;
      69      }
      70  
      71    if (pthread_attr_setstacksize (&at, 1 * 1024 * 1024) != 0)
      72      {
      73        puts ("attr_setstacksize failed");
      74        return 1;
      75      }
      76  
      77    for (cnt = 0; cnt < N; ++cnt)
      78      if (pthread_create (&th[cnt], &at, tf, (void *) (long int) cnt) != 0)
      79        {
      80  	printf ("creation of thread %d failed\n", cnt);
      81  	return 1;
      82        }
      83  
      84    if (pthread_attr_destroy (&at) != 0)
      85      {
      86        puts ("attr_destroy failed");
      87        return 1;
      88      }
      89  
      90    for (cnt = 0; cnt < N; ++cnt)
      91      if (pthread_join (th[cnt], NULL) != 0)
      92        {
      93  	printf ("join of thread %d failed\n", cnt);
      94  	return 1;
      95        }
      96  
      97    return 0;
      98  }
      99  
     100  #define TEST_FUNCTION do_test ()
     101  #include "../test-skeleton.c"