1 /* Test setjmp interoperability with static dlopen BZ #21895.
2 Copyright (C) 2017-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 <setjmp.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <dlfcn.h>
23
24 /* Set TOC area pointed by sp to zero. */
25 #define SET_TOC_TO_ZERO(sp) \
26 ({ \
27 unsigned int zero = 0; \
28 asm volatile ("std %0, 24(%1)\n\t" :: "r" (zero), "r" (sp)); \
29 })
30
31 static void
bar(jmp_buf jb,unsigned long sp)32 bar (jmp_buf jb, unsigned long sp)
33 {
34 static int i;
35 if (i++==1)
36 exit(0); /* Success. */
37
38 /* This will set TOC are on caller frame (foo) to zero. __longjmp
39 must restore r2 otherwise a segmentation fault will happens after
40 it jumps back to foo. */
41 SET_TOC_TO_ZERO(sp);
42 longjmp(jb, i);
43 }
44
45 static int
do_test(void)46 do_test (void)
47 {
48 void *h = dlopen("setjmp-bug21895.so", RTLD_NOW);
49 if (!h)
50 {
51 puts(dlerror());
52 return 1;
53 }
54
55 void (*pfoo)(void) = dlsym(h, "foo");
56 if (!pfoo)
57 {
58 puts(dlerror());
59 return 1;
60 }
61
62 void (**ppbar)(jmp_buf, unsigned long) = dlsym(h, "bar");
63 if (!ppbar)
64 {
65 puts(dlerror());
66 return 1;
67 }
68
69 *ppbar = bar;
70 pfoo();
71
72 for(;;);
73 }
74
75 #include <support/test-driver.c>
76