1 /* Copyright (C) 2003-2021 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 <stdio.h>
20 #include <stdlib.h>
21 #include <stdint.h>
22 #include <inttypes.h>
23 #include <support/support.h>
24 #include <support/check.h>
25 #include <support/xthread.h>
26
27 struct test_s
28 {
29 __attribute__ ((aligned(0x20))) int a;
30 __attribute__ ((aligned(0x200))) int b;
31 };
32
33 #define INIT_A 1
34 #define INIT_B 42
35 /* Deliberately not static. */
36 __thread struct test_s s __attribute__ ((tls_model ("initial-exec"))) =
37 {
38 .a = INIT_A,
39 .b = INIT_B
40 };
41
42 /* Use noinline in combination with not static to ensure that the
43 alignment check is really done. Otherwise it was optimized out! */
44 __attribute__ ((noinline)) void
check_alignment(const char * thr_name,const char * ptr_name,int * ptr,int alignment)45 check_alignment (const char *thr_name, const char *ptr_name,
46 int *ptr, int alignment)
47 {
48 uintptr_t offset_aligment = ((uintptr_t) ptr) & (alignment - 1);
49 if (offset_aligment)
50 {
51 FAIL_EXIT1 ("%s (%p) is not 0x%x-byte aligned in %s thread\n",
52 ptr_name, ptr, alignment, thr_name);
53 }
54 }
55
56 static void
check_s(const char * thr_name)57 check_s (const char *thr_name)
58 {
59 if (s.a != INIT_A || s.b != INIT_B)
60 FAIL_EXIT1 ("initial value of s in %s thread wrong\n", thr_name);
61
62 check_alignment (thr_name, "s.a", &s.a, 0x20);
63 check_alignment (thr_name, "s.b", &s.b, 0x200);
64 }
65
66 static void *
tf(void * arg)67 tf (void *arg)
68 {
69 check_s ("child");
70
71 ++s.a;
72
73 return NULL;
74 }
75
76
77 int
do_test(void)78 do_test (void)
79 {
80 check_s ("main");
81
82 pthread_attr_t a;
83
84 xpthread_attr_init (&a);
85
86 #define STACK_SIZE (1 * 1024 * 1024)
87 xpthread_attr_setstacksize (&a, STACK_SIZE);
88
89 #define N 10
90 int i;
91 for (i = 0; i < N; ++i)
92 {
93 #define M 10
94 pthread_t th[M];
95 int j;
96 for (j = 0; j < M; ++j, ++s.a)
97 th[j] = xpthread_create (&a, tf, NULL);
98
99 for (j = 0; j < M; ++j)
100 xpthread_join (th[j]);
101 }
102
103 /* Also check the alignment of the tls variables if a misaligned stack is
104 specified. */
105 pthread_t th;
106 void *thr_stack = NULL;
107 thr_stack = xposix_memalign (0x200, STACK_SIZE + 1);
108 xpthread_attr_setstack (&a, thr_stack + 1, STACK_SIZE);
109 th = xpthread_create (&a, tf, NULL);
110 xpthread_join (th);
111 free (thr_stack);
112
113 xpthread_attr_destroy (&a);
114
115 return 0;
116 }
117
118 #include <support/test-driver.c>
119