nptl/tst-tls3mod.c

   1 /* Copyright (C) 2003-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 <semaphore.h>
  20 #include <signal.h>
  21 #include <stdint.h>
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <unistd.h>
  25 #include <pthreaddef.h>
  26 #include <descr.h>
  27
  28
  29 extern pthread_barrier_t b;
  30
  31 #define TOTAL_SIGS 1000
  32 extern int nsigs;
  33
  34 extern sem_t s;
  35
  36
  37 static __thread void (*fp) (void);
  38
  39
  40 #define THE_SIG SIGUSR1
  41 void
  42 handler (int sig)
  43 {
  44   if (sig != THE_SIG)
  45     {
  46       write (STDOUT_FILENO, "wrong signal\n", 13);
  47       _exit (1);
  48     }
  49
  50   fp ();
  51
  52   if (sem_post (&s) != 0)
  53     {
  54       write (STDOUT_FILENO, "sem_post failed\n", 16);
  55       _exit (1);
  56     }
  57 }
  58
  59
  60 void *
  61 tf (void *arg)
  62 {
  63   if ((uintptr_t) pthread_self () & (TCB_ALIGNMENT - 1))
  64     {
  65       puts ("thread's struct pthread not aligned enough");
  66       exit (1);
  67     }
  68
  69   if (fp != NULL)
  70     {
  71       puts ("fp not initially NULL");
  72       exit (1);
  73     }
  74
  75   fp = arg;
  76
  77   pthread_barrier_wait (&b);
  78
  79   pthread_barrier_wait (&b);
  80
  81   if (nsigs != TOTAL_SIGS)
  82     {
  83       puts ("barrier_wait prematurely returns");
  84       exit (1);
  85     }
  86
  87   return NULL;
  88 }