1 /* { dg-do run { target hppa*-*-hpux* *-*-linux* *-*-gnu* powerpc*-*-darwin* *-*-darwin[912]* } } */
2 /* { dg-options "-fexceptions -fnon-call-exceptions -O2" } */
3 /* Verify that cleanups work with exception handling through realtime signal
4 frames on alternate stack. */
5
6 #include <unwind.h>
7 #include <stdlib.h>
8 #include <signal.h>
9 #include <unistd.h>
10 #include <string.h>
11
12 static _Unwind_Reason_Code
force_unwind_stop(int version,_Unwind_Action actions,_Unwind_Exception_Class exc_class,struct _Unwind_Exception * exc_obj,struct _Unwind_Context * context,void * stop_parameter)13 force_unwind_stop (int version, _Unwind_Action actions,
14 _Unwind_Exception_Class exc_class,
15 struct _Unwind_Exception *exc_obj,
16 struct _Unwind_Context *context,
17 void *stop_parameter)
18 {
19 if (actions & _UA_END_OF_STACK)
20 abort ();
21 return _URC_NO_REASON;
22 }
23
force_unwind()24 static void force_unwind ()
25 {
26 struct _Unwind_Exception *exc = malloc (sizeof (*exc));
27 memset (&exc->exception_class, 0, sizeof (exc->exception_class));
28 exc->exception_cleanup = 0;
29
30 #ifndef __USING_SJLJ_EXCEPTIONS__
31 _Unwind_ForcedUnwind (exc, force_unwind_stop, 0);
32 #else
33 _Unwind_SjLj_ForcedUnwind (exc, force_unwind_stop, 0);
34 #endif
35
36 abort ();
37 }
38
39 int count;
40 char *null;
41
counter(void * p)42 static void counter (void *p __attribute__((unused)))
43 {
44 ++count;
45 }
46
handler(void * p)47 static void handler (void *p __attribute__((unused)))
48 {
49 if (count != 2)
50 abort ();
51 exit (0);
52 }
53
fn5()54 static int __attribute__((noinline)) fn5 ()
55 {
56 char dummy __attribute__((cleanup (counter)));
57 force_unwind ();
58 return 0;
59 }
60
fn4(int sig,siginfo_t * info,void * ctx)61 static void fn4 (int sig, siginfo_t *info, void *ctx)
62 {
63 char dummy __attribute__((cleanup (counter)));
64 fn5 ();
65 null = NULL;
66 }
67
fn3()68 static void fn3 ()
69 {
70 abort ();
71 }
72
fn2()73 static int __attribute__((noinline)) fn2 ()
74 {
75 *null = 0;
76 fn3 ();
77 return 0;
78 }
79
fn1()80 static int __attribute__((noinline)) fn1 ()
81 {
82 stack_t ss;
83 struct sigaction s;
84
85 ss.ss_size = 4 * sysconf (_SC_PAGESIZE);
86 if (ss.ss_size < SIGSTKSZ)
87 ss.ss_size = SIGSTKSZ;
88 ss.ss_sp = malloc (ss.ss_size);
89 if (ss.ss_sp == NULL)
90 exit (1);
91 ss.ss_flags = 0;
92 if (sigaltstack (&ss, NULL) < 0)
93 exit (1);
94
95 sigemptyset (&s.sa_mask);
96 s.sa_sigaction = fn4;
97 s.sa_flags = SA_RESETHAND | SA_ONSTACK | SA_SIGINFO;
98 sigaction (SIGSEGV, &s, NULL);
99 sigaction (SIGBUS, &s, NULL);
100 fn2 ();
101 return 0;
102 }
103
fn0()104 static int __attribute__((noinline)) fn0 ()
105 {
106 char dummy __attribute__((cleanup (handler)));
107 fn1 ();
108 null = 0;
109 return 0;
110 }
111
main()112 int main()
113 {
114 fn0 ();
115 abort ();
116 }
117