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