Back to index

glibc  2.9
tst-tls1.c
Go to the documentation of this file.
00001 /* Copyright (C) 2003, 2004 Free Software Foundation, Inc.
00002    This file is part of the GNU C Library.
00003    Contributed by Ulrich Drepper <drepper@redhat.com>, 2003.
00004 
00005    The GNU C Library is free software; you can redistribute it and/or
00006    modify it under the terms of the GNU Lesser General Public
00007    License as published by the Free Software Foundation; either
00008    version 2.1 of the License, or (at your option) any later version.
00009 
00010    The GNU C Library is distributed in the hope that it will be useful,
00011    but WITHOUT ANY WARRANTY; without even the implied warranty of
00012    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00013    Lesser General Public License for more details.
00014 
00015    You should have received a copy of the GNU Lesser General Public
00016    License along with the GNU C Library; if not, write to the Free
00017    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
00018    02111-1307 USA.  */
00019 
00020 #include <pthread.h>
00021 #include <stdio.h>
00022 #include <stdlib.h>
00023 
00024 
00025 #if HAVE___THREAD
00026 struct test_s
00027 {
00028   int a;
00029   int b;
00030 };
00031 
00032 #define INIT_A 1
00033 #define INIT_B 42
00034 /* Deliberately not static.  */
00035 __thread struct test_s s __attribute__ ((tls_model ("initial-exec"))) =
00036 {
00037   .a = INIT_A,
00038   .b = INIT_B
00039 };
00040 
00041 
00042 static void *
00043 tf (void *arg)
00044 {
00045   if (s.a != INIT_A || s.b != INIT_B)
00046     {
00047       puts ("initial value of s in child thread wrong");
00048       exit (1);
00049     }
00050 
00051   ++s.a;
00052 
00053   return NULL;
00054 }
00055 #endif
00056 
00057 
00058 int
00059 do_test (void)
00060 {
00061 #if !HAVE___THREAD
00062 
00063   puts ("No __thread support in compiler, test skipped.");
00064 
00065   return 0;
00066 #else
00067 
00068   if (s.a != INIT_A || s.b != INIT_B)
00069     {
00070       puts ("initial value of s in main thread wrong");
00071       exit (1);
00072     }
00073 
00074   pthread_attr_t a;
00075 
00076   if (pthread_attr_init (&a) != 0)
00077     {
00078       puts ("attr_init failed");
00079       exit (1);
00080     }
00081 
00082   if (pthread_attr_setstacksize (&a, 1 * 1024 * 1024) != 0)
00083     {
00084       puts ("attr_setstacksize failed");
00085       return 1;
00086     }
00087 
00088 #define N 10
00089   int i;
00090   for (i = 0; i < N; ++i)
00091     {
00092 #define M 10
00093       pthread_t th[M];
00094       int j;
00095       for (j = 0; j < M; ++j, ++s.a)
00096        if (pthread_create (&th[j], &a, tf, NULL) != 0)
00097          {
00098            puts ("pthread_create failed");
00099            exit (1);
00100          }
00101 
00102       for (j = 0; j < M; ++j)
00103        if (pthread_join (th[j], NULL) != 0)
00104          {
00105            puts ("pthread_join failed");
00106            exit (1);
00107          }
00108     }
00109 
00110   if (pthread_attr_destroy (&a) != 0)
00111     {
00112       puts ("attr_destroy failed");
00113       exit (1);
00114     }
00115 
00116   return 0;
00117 #endif
00118 }
00119 
00120 
00121 #define TEST_FUNCTION do_test ()
00122 #include "../test-skeleton.c"