1 /* Test for large alignment in TLS blocks (extern case), BZ#18383.
2    Copyright (C) 2015-2022 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
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 <stdint.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 
23 /* This is the same as tst-tlsalign-static.c, except that it uses
24    TLS variables that are defined in a separate translation unit
25    (ts-tlsalign-vars.c).  It turned out that the cause of BZ#18383
26    on ARM was actually an ARM assembler bug triggered by the ways of
27    using .tdata/.tbss sections and relocs referring to them that GCC
28    chooses when the variables are defined in the same translation
29    unit that contains the references.  */
30 
31 extern __thread int tdata1;
32 extern __thread int tdata2;
33 extern __thread int tdata3;
34 extern __thread int tbss1;
35 extern __thread int tbss2;
36 extern __thread int tbss3;
37 
38 static int
test_one(const char * which,unsigned int alignment,int * var,int value)39 test_one (const char *which, unsigned int alignment, int *var, int value)
40 {
41   uintptr_t addr = (uintptr_t) var;
42   unsigned int misalign = addr & (alignment - 1);
43 
44   printf ("%s TLS address %p %% %u = %u\n",
45 	  which, (void *) var, alignment, misalign);
46 
47   int got = *var;
48   if (got != value)
49     {
50       printf ("%s value %d should be %d\n", which, got, value);
51       return 1;
52     }
53 
54   return misalign != 0;
55 }
56 
57 static int
do_test(void)58 do_test (void)
59 {
60   int fail = 0;
61 
62   fail |= test_one ("tdata1", 4, &tdata1, 1);
63   fail |= test_one ("tdata2", 0x10, &tdata2, 2);
64   fail |= test_one ("tdata3", 0x1000, &tdata3, 4);
65 
66   fail |= test_one ("tbss1", 4, &tbss1, 0);
67   fail |= test_one ("tbss2", 0x10, &tbss2, 0);
68   fail |= test_one ("tbss3", 0x1000, &tbss3, 0);
69 
70   return fail ? EXIT_FAILURE : EXIT_SUCCESS;
71 }
72 
73 #include <support/test-driver.c>
74