nptl/tst-key4.c

   1 /* Copyright (C) 2003, 2004 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    <http://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 #ifdef PTHREAD_KEYS_MAX
  27 const int max = PTHREAD_KEYS_MAX;
  28 #else
  29 const int max = _POSIX_THREAD_KEYS_MAX;
  30 #endif
  31 static pthread_key_t *keys;
  32
  33
  34 static void *
  35 tf1 (void *arg)
  36 {
  37   int i;
  38   for (i = 0; i < max; ++i)
  39     if (pthread_setspecific (keys[i], (void *) (long int) (i + 1)) != 0)
  40       {
  41         puts ("setspecific failed");
  42         exit (1);
  43       }
  44
  45   return NULL;
  46 }
  47
  48
  49 static void *
  50 tf2 (void *arg)
  51 {
  52   int i;
  53   for (i = 0; i < max; ++i)
  54     if (pthread_getspecific (keys[i]) != NULL)
  55       {
  56         printf ("getspecific for key %d not NULL\n", i);
  57         exit (1);
  58       }
  59
  60   return NULL;
  61 }
  62
  63
  64 static int
  65 do_test (void)
  66 {
  67   keys = alloca (max * sizeof (pthread_key_t));
  68
  69   int i;
  70   for (i = 0; i < max; ++i)
  71     if (pthread_key_create (&keys[i], NULL) != 0)
  72       {
  73         puts ("key_create failed");
  74         exit (1);
  75       }
  76
  77   pthread_attr_t a;
  78
  79   if (pthread_attr_init (&a) != 0)
  80     {
  81       puts ("attr_init failed");
  82       exit (1);
  83     }
  84
  85   if (pthread_attr_setstacksize (&a, 1 * 1024 * 1024) != 0)
  86     {
  87       puts ("attr_setstacksize failed");
  88       return 1;
  89     }
  90
  91   for (i = 0; i < 10; ++i)
  92     {
  93       int j;
  94 #define N 2
  95       pthread_t th[N];
  96       for (j = 0; j < N; ++j)
  97         if (pthread_create (&th[j], NULL, tf1, NULL) != 0)
  98           {
  99             puts ("1st create failed");
 100             exit (1);
 101           }
 102
 103       for (j = 0; j < N; ++j)
 104         if (pthread_join (th[j], NULL) != 0)
 105           {
 106             puts ("1st join failed");
 107             exit (1);
 108           }
 109
 110       for (j = 0; j < N; ++j)
 111         if (pthread_create (&th[j], NULL, tf2, NULL) != 0)
 112           {
 113             puts ("2nd create failed");
 114             exit (1);
 115           }
 116
 117       for (j = 0; j < N; ++j)
 118         if (pthread_join (th[j], NULL) != 0)
 119           {
 120             puts ("2nd join failed");
 121             exit (1);
 122           }
 123     }
 124
 125   if (pthread_attr_destroy (&a) != 0)
 126     {
 127       puts ("attr_destroy failed");
 128       exit (1);
 129     }
 130
 131   return 0;
 132 }
 133
 134
 135 #define TEST_FUNCTION do_test ()
 136 #include "../test-skeleton.c"