* src/vm/jit/optimizing/profile.c: Set Id keyword.
[cacao.git] / src / vm / signal.c
index ec8f6d6d0928d6e48069198e2045d1efbdc4bc05..f1f1b462b970606fc4ecfecbfb54ea29c6f4a9db 100644 (file)
@@ -1,9 +1,9 @@
 /* src/vm/signal.c - machine independent signal functions
 
-   Copyright (C) 1996-2005 R. Grafl, A. Krall, C. Kruegel, C. Oates,
-   R. Obermaisser, M. Platter, M. Probst, S. Ring, E. Steiner,
-   C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich, J. Wenninger,
-   Institut f. Computersprachen - TU Wien
+   Copyright (C) 1996-2005, 2006, 2007 R. Grafl, A. Krall, C. Kruegel,
+   C. Oates, R. Obermaisser, M. Platter, M. Probst, S. Ring,
+   E. Steiner, C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich,
+   J. Wenninger, Institut f. Computersprachen - TU Wien
 
    This file is part of CACAO.
 
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
-   02111-1307, USA.
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA.
 
-   Contact: cacao@complang.tuwien.ac.at
-
-   Authors: Christian Thalinger
-
-   Changes:
-
-   $Id: signal.c 3340 2005-10-04 20:19:37Z twisti $
+   $Id: signal.c 7831 2007-04-26 12:48:16Z twisti $
 
 */
 
 
+#include "config.h"
+
+#include <assert.h>
+#include <errno.h>
 #include <signal.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <sys/mman.h>
+
+#if defined(__DARWIN__)
+/* If we compile with -ansi on darwin, <sys/types.h> is not
+ included. So let's do it here. */
+# include <sys/types.h>
+#endif
 
-#include "config.h"
+#include "vm/types.h"
+
+#include "arch.h"
 
-#include "cacao/cacao.h"
+#include "mm/memory.h"
 
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
-# include "threads/native/threads.h"
+#if defined(ENABLE_THREADS)
+# include "threads/threads-common.h"
 #endif
 
-#include "vm/options.h"
-#include "vm/jit/stacktrace.h"
+#include "vm/exceptions.h"
+#include "vm/signallocal.h"
+#include "vm/vm.h"
+
+#include "vmcore/options.h"
+
+#if defined(ENABLE_STATISTICS)
+# include "vmcore/statistics.h"
+#endif
 
 
 /* function prototypes ********************************************************/
 
-void signal_handler_sigsegv(int sig, siginfo_t *siginfo, void *_p);
-void signal_handler_sigfpe(int sig, siginfo_t *siginfo, void *_p);
-void signal_handler_sigquit(int sig, siginfo_t *siginfo, void *_p);
-void signal_handler_sigint(int sig, siginfo_t *siginfo, void *_p);
-void signal_handler_sigusr1(int sig, siginfo_t *siginfo, void *_p);
+void signal_handler_sighup(int sig, siginfo_t *siginfo, void *_p);
 
 
 /* signal_init *****************************************************************
@@ -64,114 +76,219 @@ void signal_handler_sigusr1(int sig, siginfo_t *siginfo, void *_p);
 
 void signal_init(void)
 {
+#if !defined(__CYGWIN__)
+       int              pagesize;
+       sigset_t         mask;
        struct sigaction act;
 
-       /* install signal handlers we need to convert to exceptions */
+       /* mmap a memory page at address 0x0, so our hardware-exceptions
+          work. */
 
-       sigemptyset(&act.sa_mask);
+       pagesize = getpagesize();
 
+       (void) memory_mmap_anon(NULL, pagesize, PROT_NONE, MAP_PRIVATE | MAP_FIXED);
 
-#if defined(ENABLE_JIT)
-# if defined(ENABLE_INTRP)
-       if (!opt_intrp) {
-# endif
-               /* catch NullPointerException/StackOverFlowException */
+       /* check if we get into trouble with our hardware-exceptions */
 
-               if (!checknull) {
-                       act.sa_sigaction = signal_handler_sigsegv;
-                       act.sa_flags = SA_NODEFER | SA_SIGINFO;
+       assert(OFFSET(java_bytearray, data) > EXCEPTION_HARDWARE_PATCHER);
 
-#if defined(SIGSEGV)
-                       sigaction(SIGSEGV, &act, NULL);
-#endif
+       /* Block the following signals (SIGINT for <ctrl>-c, SIGQUIT for
+          <ctrl>-\).  We enable them later in signal_thread, but only for
+          this thread. */
+
+       if (sigemptyset(&mask) != 0)
+               vm_abort("signal_init: sigemptyset failed: %s", strerror(errno));
 
-#if defined(SIGBUS)
-                       sigaction(SIGBUS, &act, NULL);
+       if (sigaddset(&mask, SIGINT) != 0)
+               vm_abort("signal_init: sigaddset failed: %s", strerror(errno));
+
+#if !defined(__FREEBSD__)
+       if (sigaddset(&mask, SIGQUIT) != 0)
+               vm_abort("signal_init: sigaddset failed: %s", strerror(errno));
 #endif
-               }
 
+       if (sigprocmask(SIG_BLOCK, &mask, NULL) != 0)
+               vm_abort("signal_init: sigprocmask failed: %s", strerror(errno));
 
-               /* catch ArithmeticException */
+#if defined(ENABLE_GC_BOEHM)
+       /* Allocate something so the garbage collector's signal handlers
+          are installed. */
 
-#if defined(__I386__) || defined(__X86_64__)
-               act.sa_sigaction = signal_handler_sigfpe;
-               act.sa_flags = SA_NODEFER | SA_SIGINFO;
-               sigaction(SIGFPE, &act, NULL);
+       (void) GCNEW(u1);
 #endif
+
+       /* Install signal handlers for signals we want to catch in all
+          threads. */
+
+       sigemptyset(&act.sa_mask);
+
+#if defined(ENABLE_JIT)
 # if defined(ENABLE_INTRP)
-       }
+       if (!opt_intrp) {
 # endif
-#endif /* !defined(__INTRP__) */
+               /* SIGSEGV handler */
 
+               act.sa_sigaction = md_signal_handler_sigsegv;
+               act.sa_flags     = SA_NODEFER | SA_SIGINFO;
 
-       /* catch SIGINT for exiting properly on <ctrl>-c */
+#  if defined(SIGSEGV)
+               sigaction(SIGSEGV, &act, NULL);
+#  endif
 
-       act.sa_sigaction = signal_handler_sigint;
-       act.sa_flags = SA_SIGINFO;
-       sigaction(SIGINT, &act, NULL);
+#  if defined(SIGBUS)
+               sigaction(SIGBUS, &act, NULL);
+#  endif
 
+#  if SUPPORT_HARDWARE_DIVIDE_BY_ZERO
+               /* SIGFPE handler */
 
+               act.sa_sigaction = md_signal_handler_sigfpe;
+               act.sa_flags     = SA_NODEFER | SA_SIGINFO;
+               sigaction(SIGFPE, &act, NULL);
+#  endif
 
-       /* catch SIGQUIT for thread dump */
+#  if defined(__ARM__)
+               /* XXX use better defines for that (in arch.h) */
+               /* SIGILL handler */
 
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
-#if !defined(__FREEBSD__)
-       act.sa_sigaction = signal_handler_sigquit;
-       act.sa_flags = SA_SIGINFO;
-       sigaction(SIGQUIT, &act, NULL);
+               act.sa_sigaction = md_signal_handler_sigill;
+               act.sa_flags     = SA_NODEFER | SA_SIGINFO;
+               sigaction(SIGILL, &act, NULL);
+#  endif
 
-       /* XXX boehm uses SIGUSR1 for suspend on freebsd */
+#  if defined(__POWERPC__)
+               /* XXX use better defines for that (in arch.h) */
+               /* SIGTRAP handler */
 
-       act.sa_sigaction = signal_handler_sigusr1;
-       act.sa_flags = SA_SIGINFO;
-       sigaction(SIGUSR1, &act, NULL);
+               act.sa_sigaction = md_signal_handler_sigtrap;
+               act.sa_flags     = SA_NODEFER | SA_SIGINFO;
+               sigaction(SIGTRAP, &act, NULL);
+#  endif
+# if defined(ENABLE_INTRP)
+       }
+# endif
+#endif /* !defined(ENABLE_INTRP) */
+
+#if defined(ENABLE_THREADS)
+       /* SIGHUP handler for threads_thread_interrupt */
+
+       act.sa_sigaction = signal_handler_sighup;
+       act.sa_flags     = 0;
+       sigaction(SIGHUP, &act, NULL);
 #endif
+
+#if defined(ENABLE_THREADS) && defined(ENABLE_PROFILING)
+       /* SIGUSR2 handler for profiling sampling */
+
+       act.sa_sigaction = md_signal_handler_sigusr2;
+       act.sa_flags     = SA_SIGINFO;
+       sigaction(SIGUSR2, &act, NULL);
 #endif
+
+#endif /* !defined(__CYGWIN__) */
 }
 
 
-/* signal_handler_sigquit ******************************************************
+/* signal_thread ************************************************************
 
-   XXX
+   This thread sets the signal mask to catch the user input signals
+   (SIGINT, SIGQUIT).  We use such a thread, so we don't get the
+   signals on every single thread running.  Especially, this makes
+   problems on slow machines.
 
 *******************************************************************************/
 
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
-void signal_handler_sigquit(int sig, siginfo_t *siginfo, void *_p)
+static void signal_thread(void)
 {
-       /* do thread dump */
+       sigset_t mask;
+       int      sig;
 
-       thread_dump();
-}
+       if (sigemptyset(&mask) != 0)
+               vm_abort("signal_thread: sigemptyset failed: %s", strerror(errno));
+
+       if (sigaddset(&mask, SIGINT) != 0)
+               vm_abort("signal_thread: sigaddset failed: %s", strerror(errno));
+
+#if !defined(__FREEBSD__)
+       if (sigaddset(&mask, SIGQUIT) != 0)
+               vm_abort("signal_thread: sigaddset failed: %s", strerror(errno));
 #endif
 
+       while (true) {
+               /* just wait for a signal */
 
-/* signal_handler_sigint *******************************************************
+               /* XXX We don't check for an error here, although the man-page
+                  states sigwait does not return an error (which is wrong!),
+                  but it seems to make problems with Boehm-GC.  We should
+                  revisit this code with our new exact-GC. */
 
-   XXX
+/*             if (sigwait(&mask, &sig) != 0) */
+/*                     vm_abort("signal_thread: sigwait failed: %s", strerror(errno)); */
+               (void) sigwait(&mask, &sig);
+
+               switch (sig) {
+               case SIGINT:
+                       /* exit the vm properly */
+
+                       vm_exit(0);
+                       break;
+
+               case SIGQUIT:
+                       /* print a thread dump */
+#if defined(ENABLE_THREADS)
+                       threads_dump();
+#endif
+
+#if defined(ENABLE_STATISTICS)
+                       if (opt_stat)
+                               statistics_print_memory_usage();
+#endif
+                       break;
+               }
+       }
+
+       /* this should not happen */
+
+       vm_abort("signal_thread: this thread should not exit!");
+}
+
+
+/* signal_start_thread *********************************************************
+
+   Starts the signal handler thread.
 
 *******************************************************************************/
 
-void signal_handler_sigint(int sig, siginfo_t *siginfo, void *_p)
+bool signal_start_thread(void)
 {
-       /* exit the vm properly */
+#if defined(ENABLE_THREADS)
+       utf *name;
+
+       name = utf_new_char("Signal Handler");
+
+       if (!threads_thread_start_internal(name, signal_thread))
+               return false;
 
-       cacao_exit(0);
+       /* everything's ok */
+
+       return true;
+#else
+#warning FIX ME!
+#endif
 }
 
 
-/* signal_handler_sigusr1 ******************************************************
+/* signal_handler_sighup *******************************************************
 
-   XXX
+   This handler is required by threads_thread_interrupt and does
+   nothing.
 
 *******************************************************************************/
 
-#if defined(USE_THREADS) && defined(NATIVE_THREADS)
-void signal_handler_sigusr1(int sig, siginfo_t *siginfo, void *_p)
+#if defined(ENABLE_THREADS)
+void signal_handler_sighup(int sig, siginfo_t *siginfo, void *_p)
 {
-       /* call stacktrace function */
-
-       stacktrace_dump_trace();
+       /* do nothing */
 }
 #endif