nptl/tst-tsd3.c

   1 /* Copyright (C) 2003-2021 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Ulrich Drepper <drepper@redhat.com>, 2003.
   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 <limits.h>
  20 #include <pthread.h>
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <unistd.h>
  24
  25
  26 static pthread_key_t key1;
  27 static pthread_key_t key2;
  28
  29
  30 static int left;
  31
  32
  33 static void
  34 destr1 (void *arg)
  35 {
  36   if (--left > 0)
  37     {
  38       puts ("set key2");
  39
  40       /* Use an arbirary but valid pointer to avoid GCC warnings.  */
  41       if (pthread_setspecific (key2, (void *) &left) != 0)
  42         {
  43           puts ("destr1: setspecific failed");
  44           exit (1);
  45         }
  46     }
  47 }
  48
  49
  50 static void
  51 destr2 (void *arg)
  52 {
  53   if (--left > 0)
  54     {
  55       puts ("set key1");
  56
  57       /* Use an arbirary but valid pointer to avoid GCC warnings.  */
  58       if (pthread_setspecific (key1, (void *) &left) != 0)
  59         {
  60           puts ("destr2: setspecific failed");
  61           exit (1);
  62         }
  63     }
  64 }
  65
  66
  67 static void *
  68 tf (void *arg)
  69 {
  70   /* Let the destructors work.  */
  71   left = 7;
  72
  73   /* Use an arbirary but valid pointer to avoid GCC warnings.  */
  74   if (pthread_setspecific (key1, (void *) &left) != 0
  75       || pthread_setspecific (key2, (void *) &left) != 0)
  76     {
  77       puts ("tf: setspecific failed");
  78       exit (1);
  79     }
  80
  81   return NULL;
  82 }
  83
  84
  85 static int
  86 do_test (void)
  87 {
  88   /* Allocate two keys, both with destructors.  */
  89   if (pthread_key_create (&key1, destr1) != 0
  90       || pthread_key_create (&key2, destr2) != 0)
  91     {
  92       puts ("key_create failed");
  93       return 1;
  94     }
  95
  96   pthread_t th;
  97   if (pthread_create (&th, NULL, tf, NULL) != 0)
  98     {
  99       puts ("create failed");
 100       return 1;
 101     }
 102
 103   if (pthread_join (th, NULL) != 0)
 104     {
 105       puts ("join failed");
 106       return 1;
 107     }
 108
 109   if (left != 0)
 110     {
 111       printf ("left == %d\n", left);
 112       return 1;
 113     }
 114
 115   if (pthread_getspecific (key1) != NULL)
 116     {
 117       puts ("key1 data != NULL");
 118       return 1;
 119     }
 120   if (pthread_getspecific (key2) != NULL)
 121     {
 122       puts ("key2 data != NULL");
 123       return 1;
 124     }
 125
 126   return 0;
 127 }
 128
 129
 130 #define TEST_FUNCTION do_test ()
 131 #include "../test-skeleton.c"