1/* Copyright (C) 2003-2024 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
27struct 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
45check_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
56static void
57check_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, ptr_name: "s.a", ptr: &s.a, alignment: 0x20);
63 check_alignment (thr_name, ptr_name: "s.b", ptr: &s.b, alignment: 0x200);
64}
65
66static void *
67tf (void *arg)
68{
69 check_s (thr_name: "child");
70
71 ++s.a;
72
73 return NULL;
74}
75
76
77int
78do_test (void)
79{
80 check_s (thr_name: "main");
81
82 pthread_attr_t a;
83
84 xpthread_attr_init (attr: &a);
85
86#define STACK_SIZE (1 * 1024 * 1024)
87 xpthread_attr_setstacksize (attr: &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 (attr: &a, thread_func: tf, NULL);
98
99 for (j = 0; j < M; ++j)
100 xpthread_join (thr: 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 (alignment: 0x200, STACK_SIZE + 1);
108 xpthread_attr_setstack (attr: &a, stackaddr: thr_stack + 1, STACK_SIZE);
109 th = xpthread_create (attr: &a, thread_func: tf, NULL);
110 xpthread_join (thr: th);
111 free (ptr: thr_stack);
112
113 xpthread_attr_destroy (attr: &a);
114
115 return 0;
116}
117
118#include <support/test-driver.c>
119

source code of glibc/sysdeps/pthread/tst-pt-tls1.c