Mercurial > pub > dyncall > dyncall
annotate test/thunk/test_thunk.c @ 624:d28b09fa2ff9
cleanup: removal of actually unnecessary require lines
author | Tassilo Philipp |
---|---|
date | Fri, 28 Oct 2022 12:22:12 +0200 |
parents | 7608e34098b0 |
children | 57faec8b7600 |
rev | line source |
---|---|
0 | 1 /* |
2 | |
3 Package: dyncall | |
4 Library: test | |
5 File: test/thunk/test_thunk.c | |
6 Description: | |
7 License: | |
8 | |
384 | 9 Copyright (c) 2011-2021 Daniel Adler <dadler@uni-goettingen.de>, |
0 | 10 Tassilo Philipp <tphilipp@potion-studios.com> |
11 | |
12 Permission to use, copy, modify, and distribute this software for any | |
13 purpose with or without fee is hereby granted, provided that the above | |
14 copyright notice and this permission notice appear in all copies. | |
15 | |
16 THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |
17 WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |
18 MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |
19 ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |
20 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |
21 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |
22 OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |
23 | |
24 */ | |
25 | |
26 #include "../../dyncall/dyncall.h" | |
27 #include "../../dyncallback/dyncall_thunk.h" | |
28 #include "../../dyncallback/dyncall_alloc_wx.h" | |
29 #include "../common/platformInit.h" | |
30 #include "../common/platformInit.c" /* Impl. for functions only used in this translation unit */ | |
31 | |
32 | |
33 /** | |
34 ** test: thunks with several allocation modes | |
35 ** such as on stack, on heap and explicit wx | |
36 ** | |
37 **/ | |
38 | |
39 #include <errno.h> | |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
40 #include <signal.h> |
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
41 #include <setjmp.h> |
176 | 42 #include <string.h> |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
43 |
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
44 jmp_buf jbuf; |
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
45 |
383
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
46 static int last_sig; |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
47 |
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
48 void segv_handler(int sig) |
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
49 { |
383
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
50 last_sig = sig; |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
51 longjmp(jbuf, 1); |
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
52 } |
0 | 53 |
54 void my_entry(const char* text) | |
55 { | |
155 | 56 printf("%s: %d\n", text, strcmp(text, "wx") == 0 || strcmp(text, "stack") == 0 || strcmp(text, "heap") == 0); /* @@@ */ |
0 | 57 } |
58 | |
59 typedef void (printfun)(const char*); | |
60 | |
61 void test_stack() | |
62 { | |
63 DCThunk t; | |
64 printfun* fp; | |
65 dcbInitThunk(&t, &my_entry); | |
66 fp = (printfun*)&t; | |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
67 if(setjmp(jbuf) != 0) |
383
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
68 printf(last_sig == SIGSEGV ? "sigsegv\n" : "sigbus\n"); |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
69 else |
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
70 fp("stack"); |
0 | 71 } |
72 | |
73 #include <stdlib.h> | |
74 | |
75 void test_heap() | |
76 { | |
77 printfun* fp; | |
78 DCThunk* p = (DCThunk*)malloc(sizeof(DCThunk)); | |
79 if(!p) { | |
80 printf("0\n"); | |
81 return; | |
82 } | |
83 dcbInitThunk(p, &my_entry); | |
84 fp = (printfun*)p; | |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
85 if(setjmp(jbuf) != 0) |
383
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
86 printf(last_sig == SIGSEGV ? "sigsegv\n" : "sigbus\n"); |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
87 else |
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
88 fp("heap"); |
0 | 89 free(p); |
90 } | |
91 | |
92 void test_wx() | |
93 { | |
94 DCThunk* p; | |
95 printfun* fp; | |
96 int err = dcAllocWX(sizeof(DCThunk), (void**)&p); | |
97 if(err || !p) { | |
98 printf("0\n"); | |
99 return; | |
100 } | |
101 dcbInitThunk(p, &my_entry); | |
203
3999750fae28
- allocwx changes from last commit mentioned in Changelog and adapted testcode
Tassilo Philipp
parents:
176
diff
changeset
|
102 err = dcInitExecWX((void*)p, sizeof(DCThunk)); |
3999750fae28
- allocwx changes from last commit mentioned in Changelog and adapted testcode
Tassilo Philipp
parents:
176
diff
changeset
|
103 if(err) { |
3999750fae28
- allocwx changes from last commit mentioned in Changelog and adapted testcode
Tassilo Philipp
parents:
176
diff
changeset
|
104 dcFreeWX((void*)p, sizeof(DCThunk)); |
3999750fae28
- allocwx changes from last commit mentioned in Changelog and adapted testcode
Tassilo Philipp
parents:
176
diff
changeset
|
105 printf("0\n"); |
3999750fae28
- allocwx changes from last commit mentioned in Changelog and adapted testcode
Tassilo Philipp
parents:
176
diff
changeset
|
106 return; |
3999750fae28
- allocwx changes from last commit mentioned in Changelog and adapted testcode
Tassilo Philipp
parents:
176
diff
changeset
|
107 } |
0 | 108 fp = (printfun*)p; |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
109 if(setjmp(jbuf) != 0) |
383
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
110 printf(last_sig == SIGSEGV ? "sigsegv\n" : "sigbus\n"); |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
111 else |
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
112 fp("wx"); |
0 | 113 dcFreeWX((void*)p, sizeof(DCThunk)); |
114 } | |
115 | |
116 int main() | |
117 { | |
118 dcTest_initPlatform(); | |
119 | |
383
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
120 /* handle sigsegv and sigbus (latter used on some platforms for some mem */ |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
121 /* access errors); use more complex setup if SA_ONSTACK is available */ |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
122 |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
123 #if defined(SA_ONSTACK) |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
124 /* notes: |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
125 - use sigaction(2) to pass SA_ONSTACK, to handle segfaults on stack (as |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
126 handler would use same stack, this needs to be requested explicitly) |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
127 - not using sigaltstack(2), as no need in our case |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
128 */ |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
129 struct sigaction sigAct; |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
130 sigfillset(&(sigAct.sa_mask)); |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
131 sigAct.sa_sigaction = segv_handler; |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
132 sigAct.sa_flags = SA_ONSTACK; |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
133 sigaction(SIGSEGV, &sigAct, NULL); |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
134 sigaction(SIGBUS, &sigAct, NULL); |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
135 #else |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
136 signal(SIGSEGV, segv_handler); |
381 | 137 #if !defined(DC_WINDOWS) |
383
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
138 signal(SIGBUS, segv_handler); |
381 | 139 #endif |
383
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
140 #endif |
268378d66610
- thunk test: better signal handling, using sigaction(2) with SA_ONSTACK
Tassilo Philipp
parents:
381
diff
changeset
|
141 |
32
f533c5ad1b6e
- added some exception handling to thunk test, to catch w^x tests, etc.
cslag
parents:
0
diff
changeset
|
142 |
0 | 143 printf("Allocating ...\n"); |
144 printf("... W^X memory: "); | |
145 test_wx(); | |
146 printf("... heap memory: "); | |
147 test_heap(); | |
148 printf("... stack memory: "); | |
149 test_stack(); | |
150 | |
151 dcTest_deInitPlatform(); | |
152 | |
153 return 0; | |
154 } | |
155 |