sysdeps/pthread/tst-once2.c

   1 /* Copyright (C) 2002-2024 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"