* src/native/vm/Makefile.am (DIST_SUBDIRS): Added cldc1.1.
[cacao.git] / src / vm / signal.c
1 /* src/vm/signal.c - machine independent signal functions
2
3    Copyright (C) 1996-2005, 2006 R. Grafl, A. Krall, C. Kruegel,
4    C. Oates, R. Obermaisser, M. Platter, M. Probst, S. Ring,
5    E. Steiner, C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich,
6    J. Wenninger, Institut f. Computersprachen - TU Wien
7
8    This file is part of CACAO.
9
10    This program is free software; you can redistribute it and/or
11    modify it under the terms of the GNU General Public License as
12    published by the Free Software Foundation; either version 2, or (at
13    your option) any later version.
14
15    This program is distributed in the hope that it will be useful, but
16    WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18    General Public License for more details.
19
20    You should have received a copy of the GNU General Public License
21    along with this program; if not, write to the Free Software
22    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
23    02110-1301, USA.
24
25    Contact: cacao@cacaojvm.org
26
27    Authors: Christian Thalinger
28
29    $Id: signal.c 6219 2006-12-19 19:20:37Z twisti $
30
31 */
32
33
34 #include "config.h"
35
36 #include <errno.h>
37 #include <signal.h>
38 #include <stdlib.h>
39 #include <unistd.h>
40 #include <sys/mman.h>
41
42 #if defined(__DARWIN__)
43 /* If we compile with -ansi on darwin, <sys/types.h> is not
44  included. So let's do it here. */
45 # include <sys/types.h>
46 #endif
47
48 #include "vm/types.h"
49
50 #if defined(ENABLE_THREADS)
51 # include "threads/native/threads.h"
52 #endif
53
54 #include "mm/memory.h"
55 #include "vm/signallocal.h"
56 #include "vm/options.h"
57 #include "vm/vm.h"
58 #include "vm/jit/stacktrace.h"
59
60
61 /* function prototypes ********************************************************/
62
63 void signal_handler_sighup(int sig, siginfo_t *siginfo, void *_p);
64 void signal_handler_sigint(int sig, siginfo_t *siginfo, void *_p);
65 void signal_handler_sigquit(int sig, siginfo_t *siginfo, void *_p);
66
67
68 /* signal_init *****************************************************************
69
70    Initializes the signal subsystem and installs the signal handler.
71
72 *******************************************************************************/
73
74 void signal_init(void)
75 {
76 #if !defined(__CYGWIN__)
77         void            *p;
78         int              pagesize;
79         struct sigaction act;
80
81         /* mmap a memory page at address 0x0, so our hardware-exceptions
82            work. */
83
84         pagesize = getpagesize();
85
86         (void) memory_mmap_anon(NULL, pagesize, PROT_NONE, MAP_PRIVATE | MAP_FIXED);
87
88 #if defined(ENABLE_GC_BOEHM)
89         /* Allocate something so the garbage collector's signal handlers
90            are installed. */
91
92         (void) GCNEW(u1);
93 #endif
94
95         /* install signal handlers we need to convert to exceptions */
96
97         sigemptyset(&act.sa_mask);
98
99 #if defined(ENABLE_JIT)
100 # if defined(ENABLE_INTRP)
101         if (!opt_intrp) {
102 # endif
103                 /* catch NullPointerException/StackOverFlowException */
104
105                 act.sa_sigaction = md_signal_handler_sigsegv;
106                 act.sa_flags     = SA_NODEFER | SA_SIGINFO;
107
108 #if defined(SIGSEGV)
109                 sigaction(SIGSEGV, &act, NULL);
110 #endif
111
112 #if defined(SIGBUS)
113                 sigaction(SIGBUS, &act, NULL);
114 #endif
115
116                 /* catch ArithmeticException */
117
118 #if SUPPORT_HARDWARE_DIVIDE_BY_ZERO
119                 act.sa_sigaction = md_signal_handler_sigfpe;
120                 act.sa_flags     = SA_NODEFER | SA_SIGINFO;
121                 sigaction(SIGFPE, &act, NULL);
122 #endif
123 # if defined(ENABLE_INTRP)
124         }
125 # endif
126 #endif /* !defined(ENABLE_INTRP) */
127
128 #if defined(ENABLE_THREADS)
129         /* catch SIGHUP for threads_thread_interrupt */
130
131         act.sa_sigaction = signal_handler_sighup;
132         act.sa_flags     = 0;
133         sigaction(SIGHUP, &act, NULL);
134 #endif
135
136         /* catch SIGINT for exiting properly on <ctrl>-c */
137
138         act.sa_sigaction = signal_handler_sigint;
139         act.sa_flags     = SA_NODEFER | SA_SIGINFO;
140         sigaction(SIGINT, &act, NULL);
141
142 #if defined(ENABLE_THREADS)
143         /* catch SIGQUIT for thread dump */
144
145 # if !defined(__FREEBSD__)
146         act.sa_sigaction = signal_handler_sigquit;
147         act.sa_flags     = SA_SIGINFO;
148         sigaction(SIGQUIT, &act, NULL);
149 # endif
150 #endif
151
152 #if defined(ENABLE_THREADS) && defined(ENABLE_PROFILING)
153         /* install signal handler for profiling sampling */
154
155         act.sa_sigaction = md_signal_handler_sigusr2;
156         act.sa_flags     = SA_SIGINFO;
157         sigaction(SIGUSR2, &act, NULL);
158 #endif
159
160 #endif /* !defined(__CYGWIN__) */
161 }
162
163
164 /* signal_handler_sighup *******************************************************
165
166    This handler is required by threads_thread_interrupt and does
167    nothing.
168
169 *******************************************************************************/
170
171 #if defined(ENABLE_THREADS)
172 void signal_handler_sighup(int sig, siginfo_t *siginfo, void *_p)
173 {
174         /* do nothing */
175 }
176 #endif
177
178
179 /* signal_handler_sigquit ******************************************************
180
181    Handle for SIGQUIT (<ctrl>-\) which print a stacktrace for every
182    running thread.
183
184 *******************************************************************************/
185
186 #if defined(ENABLE_THREADS)
187 void signal_handler_sigquit(int sig, siginfo_t *siginfo, void *_p)
188 {
189         /* do thread dump */
190
191         threads_dump();
192 }
193 #endif
194
195
196 /* signal_handler_sigint *******************************************************
197
198    Handler for SIGINT (<ctrl>-c) which shuts down CACAO properly with
199    Runtime.exit(I)V.
200
201 *******************************************************************************/
202
203 void signal_handler_sigint(int sig, siginfo_t *siginfo, void *_p)
204 {
205         /* if we are already in Runtime.exit(), just do it hardcore */
206
207         if (vm_exiting) {
208                 fprintf(stderr, "Caught SIGINT while already shutting down. Shutdown aborted...\n");
209                 exit(0);
210         }
211
212         /* exit the vm properly */
213
214         vm_exit(0);
215 }
216
217
218 /*
219  * These are local overrides for various environment variables in Emacs.
220  * Please do not remove this and leave it at the end of the file, where
221  * Emacs will automagically detect them.
222  * ---------------------------------------------------------------------
223  * Local variables:
224  * mode: c
225  * indent-tabs-mode: t
226  * c-basic-offset: 4
227  * tab-width: 4
228  * End:
229  */