1 /* Copyright (C) 2000-2023 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 /* This file must be compiled as PIE to avoid copy relocation when
19 accessing protected symbols defined in shared libraries since copy
20 relocation doesn't work with protected symbols and linker in
21 binutils 2.26 enforces this rule. */
22
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <string.h>
26
27 #include "vismod.h"
28
29 /* Prototype for our test function. */
30 extern int do_test (void);
31
32
33 /* This defines the `main' function and some more. */
34 #include <support/test-driver.c>
35
36
37 /* Prototypes for local functions. */
38 extern int protlocal (void);
39
40 const char *protvarlocal = __FILE__;
41 extern const char *protvarinmod;
42 extern const char *protvaritcpt;
43
44 int
45 do_test (void)
46 {
47 int res = 0;
48 int val;
49
50 /* First test: check whether .protected is handled correctly by the
51 assembler/linker. The uses of `protlocal' in the DSOs and in the
52 main program should all be resolved with the local definitions. */
53 val = protlocal () + calllocal1 () + calllocal2 ();
54 if (val != 0x155)
55 {
56 puts ("\
57 The handling of `.protected' seems to be implemented incorrectly: giving up");
58 abort ();
59 }
60 puts ("`.protected' seems to be handled correctly, good!");
61
62 /* Function pointers: for functions which are marked local and for
63 which definitions are available all function pointers must be
64 distinct. */
65 if (protlocal == getlocal1 ())
66 {
67 puts ("`protlocal' in main and mod1 have same address");
68 res = 1;
69 }
70 if (protlocal == getlocal2 ())
71 {
72 puts ("`protlocal' in main and mod2 have same address");
73 res = 1;
74 }
75 if (getlocal1 () == getlocal2 ())
76 {
77 puts ("`protlocal' in mod1 and mod2 have same address");
78 res = 1;
79 }
80 if (getlocal1 () () + getlocal2 () () != 0x44)
81 {
82 puts ("pointers to `protlocal' in mod1 or mod2 incorrect");
83 res = 1;
84 }
85
86 /* Next test. This is similar to the last one but the function we
87 are calling is not defined in the main object. This means that
88 the invocation in the main object uses the definition in the
89 first DSO. */
90 if (protinmod != getinmod1 ())
91 {
92 printf ("&protinmod in main (%p) != &protinmod in mod1 (%p)\n",
93 protinmod, getinmod1 ());
94 res = 1;
95 }
96 if (protinmod == getinmod2 ())
97 {
98 puts ("`protinmod' in main and mod2 have same address");
99 res = 1;
100 }
101 if (getinmod1 () == getinmod2 ())
102 {
103 puts ("`protinmod' in mod1 and mod2 have same address");
104 res = 1;
105 }
106 if (protinmod () + getinmod1 () () + getinmod2 () () != 0x4800)
107 {
108 puts ("pointers to `protinmod' in mod1 or mod2 incorrect");
109 res = 1;
110 }
111 val = protinmod () + callinmod1 () + callinmod2 ();
112 if (val != 0x15800)
113 {
114 printf ("calling of `protinmod' leads to wrong result (%#x)\n", val);
115 res = 1;
116 }
117
118 /* A very similar text. Same setup for the main object and the modules
119 but this time we have another definition in a preloaded module. This
120 one intercepts the references from the main object. */
121 if (protitcpt != getitcpt3 ())
122 {
123 printf ("&protitcpt in main (%p) != &protitcpt in mod3 (%p)\n",
124 &protitcpt, getitcpt3 ());
125 res = 1;
126 }
127 if (protitcpt == getitcpt1 ())
128 {
129 puts ("`protitcpt' in main and mod1 have same address");
130 res = 1;
131 }
132 if (protitcpt == getitcpt2 ())
133 {
134 puts ("`protitcpt' in main and mod2 have same address");
135 res = 1;
136 }
137 if (getitcpt1 () == getitcpt2 ())
138 {
139 puts ("`protitcpt' in mod1 and mod2 have same address");
140 res = 1;
141 }
142 val = protitcpt () + getitcpt1 () () + getitcpt2 () () + getitcpt3 () ();
143 if (val != 0x8440000)
144 {
145 printf ("\
146 pointers to `protitcpt' in mod1 or mod2 or mod3 incorrect (%#x)\n", val);
147 res = 1;
148 }
149 val = protitcpt () + callitcpt1 () + callitcpt2 () + callitcpt3 ();
150 if (val != 0x19540000)
151 {
152 printf ("calling of `protitcpt' leads to wrong result (%#x)\n", val);
153 res = 1;
154 }
155
156 /* Now look at variables. First a variable which is available
157 everywhere. We must have three different addresses. */
158 if (&protvarlocal == getvarlocal1 ())
159 {
160 puts ("`protvarlocal' in main and mod1 have same address");
161 res = 1;
162 }
163 if (&protvarlocal == getvarlocal2 ())
164 {
165 puts ("`protvarlocal' in main and mod2 have same address");
166 res = 1;
167 }
168 if (getvarlocal1 () == getvarlocal2 ())
169 {
170 puts ("`protvarlocal' in mod1 and mod2 have same address");
171 res = 1;
172 }
173 if (strcmp (protvarlocal, __FILE__) != 0)
174 {
175 puts ("`protvarlocal in main has wrong value");
176 res = 1;
177 }
178 if (strcmp (*getvarlocal1 (), "vismod1.c") != 0)
179 {
180 puts ("`getvarlocal1' returns wrong value");
181 res = 1;
182 }
183 if (strcmp (*getvarlocal2 (), "vismod2.c") != 0)
184 {
185 puts ("`getvarlocal2' returns wrong value");
186 res = 1;
187 }
188
189 /* Now the case where there is no local definition. */
190 if (&protvarinmod != getvarinmod1 ())
191 {
192 printf ("&protvarinmod in main (%p) != &protitcpt in mod1 (%p)\n",
193 &protvarinmod, getvarinmod1 ());
194 // XXX Possibly enable once fixed.
195 // res = 1;
196 }
197 if (&protvarinmod == getvarinmod2 ())
198 {
199 puts ("`protvarinmod' in main and mod2 have same address");
200 res = 1;
201 }
202 if (strcmp (*getvarinmod1 (), "vismod1.c") != 0)
203 {
204 puts ("`getvarinmod1' returns wrong value");
205 res = 1;
206 }
207 if (strcmp (*getvarinmod2 (), "vismod2.c") != 0)
208 {
209 puts ("`getvarinmod2' returns wrong value");
210 res = 1;
211 }
212
213 /* And a test where a variable definition is intercepted. */
214 if (&protvaritcpt == getvaritcpt1 ())
215 {
216 puts ("`protvaritcpt' in main and mod1 have same address");
217 res = 1;
218 }
219 if (&protvaritcpt == getvaritcpt2 ())
220 {
221 puts ("`protvaritcpt' in main and mod2 have same address");
222 res = 1;
223 }
224 if (&protvaritcpt != getvaritcpt3 ())
225 {
226 printf ("&protvaritcpt in main (%p) != &protvaritcpt in mod3 (%p)\n",
227 &protvaritcpt, getvaritcpt3 ());
228 // XXX Possibly enable once fixed.
229 // res = 1;
230 }
231 if (getvaritcpt1 () == getvaritcpt2 ())
232 {
233 puts ("`protvaritcpt' in mod1 and mod2 have same address");
234 res = 1;
235 }
236 if (strcmp (protvaritcpt, "vismod3.c") != 0)
237 {
238 puts ("`protvaritcpt in main has wrong value");
239 res = 1;
240 }
241 if (strcmp (*getvaritcpt1 (), "vismod1.c") != 0)
242 {
243 puts ("`getvaritcpt1' returns wrong value");
244 res = 1;
245 }
246 if (strcmp (*getvaritcpt2 (), "vismod2.c") != 0)
247 {
248 puts ("`getvaritcpt2' returns wrong value");
249 res = 1;
250 }
251
252 return res;
253 }
254
255
256 int
257 protlocal (void)
258 {
259 return 0x1;
260 }