* src/vm/jit/stacktrace.h (stackframeinfo): Renamed to
[cacao.git] / src / vm / signal.c
index 270765bf1cc11a78f91475f734b3cba464fed72c..090b7ef169c0bfe077a47754804c6778c38c370c 100644 (file)
@@ -22,8 +22,6 @@
    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
    02110-1301, USA.
 
-   $Id: signal.c 7966 2007-05-25 12:41:03Z pm $
-
 */
 
 
@@ -32,9 +30,8 @@
 #include <assert.h>
 #include <errno.h>
 #include <signal.h>
+#include <stdint.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
 # include <sys/types.h>
 #endif
 
-#include "vm/types.h"
-
 #include "arch.h"
 
 #include "mm/memory.h"
 
+#include "native/llni.h"
+
 #if defined(ENABLE_THREADS)
 # include "threads/threads-common.h"
+#else
+# include "threads/none/threads.h"
 #endif
 
+#include "toolbox/logging.h"
+
 #include "vm/exceptions.h"
 #include "vm/signallocal.h"
 #include "vm/vm.h"
 
+#include "vm/jit/codegen-common.h"
+#include "vm/jit/disass.h"
+#include "vm/jit/patcher-common.h"
+
 #include "vmcore/options.h"
 
 #if defined(ENABLE_STATISTICS)
@@ -74,23 +79,15 @@ void signal_handler_sighup(int sig, siginfo_t *siginfo, void *_p);
 
 *******************************************************************************/
 
-void signal_init(void)
+bool signal_init(void)
 {
 #if !defined(__CYGWIN__)
-       int              pagesize;
-       sigset_t         mask;
-       struct sigaction act;
-
-       /* mmap a memory page at address 0x0, so our hardware-exceptions
-          work. */
-
-       pagesize = getpagesize();
-
-       (void) memory_mmap_anon(NULL, pagesize, PROT_NONE, MAP_PRIVATE | MAP_FIXED);
-
-       /* check if we get into trouble with our hardware-exceptions */
+       sigset_t mask;
 
-       assert(OFFSET(java_bytearray, data) > EXCEPTION_HARDWARE_PATCHER);
+#if defined(__LINUX__) && defined(ENABLE_THREADS)
+       /* XXX Remove for exact-GC. */
+       if (threads_pthreads_implementation_nptl) {
+#endif
 
        /* Block the following signals (SIGINT for <ctrl>-c, SIGQUIT for
           <ctrl>-\).  We enable them later in signal_thread, but only for
@@ -99,8 +96,12 @@ void signal_init(void)
        if (sigemptyset(&mask) != 0)
                vm_abort("signal_init: sigemptyset failed: %s", strerror(errno));
 
+#if !defined(WITH_CLASSPATH_SUN)
+       /* Let OpenJDK handle SIGINT itself. */
+
        if (sigaddset(&mask, SIGINT) != 0)
                vm_abort("signal_init: sigaddset failed: %s", strerror(errno));
+#endif
 
 #if !defined(__FREEBSD__)
        if (sigaddset(&mask, SIGQUIT) != 0)
@@ -110,59 +111,56 @@ void signal_init(void)
        if (sigprocmask(SIG_BLOCK, &mask, NULL) != 0)
                vm_abort("signal_init: sigprocmask failed: %s", strerror(errno));
 
+#if defined(__LINUX__) && defined(ENABLE_THREADS)
+       /* XXX Remove for exact-GC. */
+       }
+#endif
+
 #if defined(ENABLE_GC_BOEHM)
        /* Allocate something so the garbage collector's signal handlers
           are installed. */
 
-       (void) GCNEW(u1);
+       (void) GCNEW(int);
 #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
                /* SIGSEGV handler */
 
-               act.sa_sigaction = md_signal_handler_sigsegv;
-               act.sa_flags     = SA_NODEFER | SA_SIGINFO;
-
-#  if defined(SIGSEGV)
-               sigaction(SIGSEGV, &act, NULL);
-#  endif
+               signal_register_signal(SIGSEGV, (functionptr) md_signal_handler_sigsegv,
+                                                          SA_NODEFER | SA_SIGINFO);
 
 #  if defined(SIGBUS)
-               sigaction(SIGBUS, &act, NULL);
+               signal_register_signal(SIGBUS, (functionptr) md_signal_handler_sigsegv,
+                                                          SA_NODEFER | SA_SIGINFO);
 #  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);
+               signal_register_signal(SIGFPE, (functionptr) md_signal_handler_sigfpe,
+                                                          SA_NODEFER | SA_SIGINFO);
 #  endif
 
-#  if defined(__ARM__) || defined(__S390__)
+#  if defined(__ARM__) || defined(__I386__) || defined(__S390__) || defined(__X86_64__)
                /* XXX use better defines for that (in arch.h) */
                /* SIGILL handler */
 
-               act.sa_sigaction = md_signal_handler_sigill;
-               act.sa_flags     = SA_NODEFER | SA_SIGINFO;
-               sigaction(SIGILL, &act, NULL);
+               signal_register_signal(SIGILL, (functionptr) md_signal_handler_sigill,
+                                                          SA_NODEFER | SA_SIGINFO);
 #  endif
 
 #  if defined(__POWERPC__)
                /* XXX use better defines for that (in arch.h) */
                /* SIGTRAP handler */
 
-               act.sa_sigaction = md_signal_handler_sigtrap;
-               act.sa_flags     = SA_NODEFER | SA_SIGINFO;
-               sigaction(SIGTRAP, &act, NULL);
+               signal_register_signal(SIGTRAP, (functionptr) md_signal_handler_sigtrap,
+                                                          SA_NODEFER | SA_SIGINFO);
 #  endif
 # if defined(ENABLE_INTRP)
        }
@@ -172,20 +170,177 @@ void signal_init(void)
 #if defined(ENABLE_THREADS)
        /* SIGHUP handler for threads_thread_interrupt */
 
-       act.sa_sigaction = signal_handler_sighup;
-       act.sa_flags     = 0;
-       sigaction(SIGHUP, &act, NULL);
+       signal_register_signal(SIGHUP, (functionptr) signal_handler_sighup, 0);
+#endif
+
+#if defined(ENABLE_THREADS) && defined(ENABLE_GC_CACAO)
+       /* SIGUSR1 handler for the exact GC to suspend threads */
+
+       signal_register_signal(SIGUSR1, (functionptr) md_signal_handler_sigusr1,
+                                                  SA_SIGINFO);
 #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);
+       signal_register_signal(SIGUSR2, (functionptr) md_signal_handler_sigusr2,
+                                                  SA_SIGINFO);
 #endif
 
 #endif /* !defined(__CYGWIN__) */
+
+       return true;
+}
+
+
+/* signal_register_signal ******************************************************
+
+   Register the specified handler with the specified signal.
+
+*******************************************************************************/
+
+void signal_register_signal(int signum, functionptr handler, int flags)
+{
+       struct sigaction act;
+
+       void (*function)(int, siginfo_t *, void *);
+
+       function = (void (*)(int, siginfo_t *, void *)) handler;
+
+       if (sigemptyset(&act.sa_mask) != 0)
+               vm_abort("signal_register_signal: sigemptyset failed: %s",
+                                strerror(errno));
+
+       act.sa_sigaction = function;
+       act.sa_flags     = flags;
+
+       if (sigaction(signum, &act, NULL) != 0)
+               vm_abort("signal_register_signal: sigaction failed: %s",
+                                strerror(errno));
+}
+
+
+/* signal_handle ***************************************************************
+
+   Handles the signal caught by a signal handler and calls the correct
+   function.
+
+*******************************************************************************/
+
+void *signal_handle(int type, intptr_t val,
+                                       void *pv, void *sp, void *ra, void *xpc, void *context)
+{
+       stackframeinfo_t  sfi;
+       int32_t           index;
+       java_handle_t    *o;
+       methodinfo       *m;
+       java_handle_t    *p;
+
+       /* wrap the value into a handle if it is a reference */
+       /* BEFORE: creating stackframeinfo */
+
+       switch (type) {
+       case EXCEPTION_HARDWARE_CLASSCAST:
+               o = LLNI_WRAP((java_object_t *) val);
+               break;
+
+       case EXCEPTION_HARDWARE_COMPILER:
+               /* In this case the passed PV points to the compiler stub.  We
+                  get the methodinfo pointer here and set PV to NULL so
+                  stacktrace_stackframeinfo_add determines the PV for the
+                  parent Java method. */
+
+               m  = code_get_methodinfo_for_pv(pv);
+               pv = NULL;
+               break;
+
+       default:
+               /* do nothing */
+               break;
+       }
+
+       /* Fill and add a stackframeinfo. */
+
+       stacktrace_stackframeinfo_add(&sfi, pv, sp, ra, xpc);
+
+       switch (type) {
+       case EXCEPTION_HARDWARE_NULLPOINTER:
+               p = exceptions_new_nullpointerexception();
+               break;
+
+       case EXCEPTION_HARDWARE_ARITHMETIC:
+               p = exceptions_new_arithmeticexception();
+               break;
+
+       case EXCEPTION_HARDWARE_ARRAYINDEXOUTOFBOUNDS:
+               index = (s4) val;
+               p = exceptions_new_arrayindexoutofboundsexception(index);
+               break;
+
+       case EXCEPTION_HARDWARE_ARRAYSTORE:
+               p = exceptions_new_arraystoreexception();
+               break;
+
+       case EXCEPTION_HARDWARE_CLASSCAST:
+               p = exceptions_new_classcastexception(o);
+               break;
+
+       case EXCEPTION_HARDWARE_EXCEPTION:
+               p = exceptions_fillinstacktrace();
+               break;
+
+       case EXCEPTION_HARDWARE_PATCHER:
+#if defined(ENABLE_REPLACEMENT)
+               if (replace_me_wrapper(xpc, context)) {
+                       p = NULL;
+                       break;
+               }
+#endif
+               p = patcher_handler(xpc);
+               break;
+
+       case EXCEPTION_HARDWARE_COMPILER:
+               p = jit_compile_handle(m, sfi.pv, ra, (void *) val);
+               break;
+
+       default:
+               /* Let's try to get a backtrace. */
+
+               codegen_get_pv_from_pc(xpc);
+
+               /* If that does not work, print more debug info. */
+
+               log_println("signal_handle: unknown hardware exception type %d", type);
+
+#if SIZEOF_VOID_P == 8
+               log_println("PC=0x%016lx", xpc);
+#else
+               log_println("PC=0x%08x", xpc);
+#endif
+
+#if defined(ENABLE_DISASSEMBLER)
+               log_println("machine instruction at PC:");
+               disassinstr(xpc);
+#endif
+
+               vm_abort("Exiting...");
+
+               /* keep compiler happy */
+
+               p = NULL;
+       }
+
+       /* Remove stackframeinfo. */
+
+       stacktrace_stackframeinfo_remove(&sfi);
+
+       /* unwrap and return the exception object */
+       /* AFTER: removing stackframeinfo */
+
+       if (type == EXCEPTION_HARDWARE_COMPILER)
+               return p;
+       else
+               return LLNI_UNWRAP(p);
 }
 
 
@@ -193,30 +348,40 @@ void signal_init(void)
 
    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.
+   signals on every single thread running.
 
 *******************************************************************************/
 
 static void signal_thread(void)
 {
-       sigset_t mask;
-       int      sig;
+       threadobject *t;
+       sigset_t      mask;
+       int           sig;
+
+       t = THREADOBJECT;
 
        if (sigemptyset(&mask) != 0)
                vm_abort("signal_thread: sigemptyset failed: %s", strerror(errno));
 
+#if !defined(WITH_CLASSPATH_SUN)
+       /* Let OpenJDK handle SIGINT itself. */
+
        if (sigaddset(&mask, SIGINT) != 0)
                vm_abort("signal_thread: sigaddset failed: %s", strerror(errno));
+#endif
 
 #if !defined(__FREEBSD__)
        if (sigaddset(&mask, SIGQUIT) != 0)
                vm_abort("signal_thread: sigaddset failed: %s", strerror(errno));
 #endif
 
-       while (true) {
+       for (;;) {
                /* just wait for a signal */
 
+#if defined(ENABLE_THREADS)
+               threads_thread_state_waiting(t);
+#endif
+
                /* 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
@@ -226,30 +391,45 @@ static void signal_thread(void)
 /*                     vm_abort("signal_thread: sigwait failed: %s", strerror(errno)); */
                (void) sigwait(&mask, &sig);
 
-               switch (sig) {
-               case SIGINT:
-                       /* exit the vm properly */
+#if defined(ENABLE_THREADS)
+               threads_thread_state_runnable(t);
+#endif
+
+               /* Handle the signal. */
 
-                       vm_exit(0);
-                       break;
+               signal_thread_handler(sig);
+       }
+}
+
+
+/* signal_thread_handler *******************************************************
+
+   Handles the signals caught in the signal handler thread.  Also used
+   from sun.misc.Signal with OpenJDK.
 
-               case SIGQUIT:
-                       /* print a thread dump */
+*******************************************************************************/
+
+void signal_thread_handler(int 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();
+               threads_dump();
 #endif
 
 #if defined(ENABLE_STATISTICS)
-                       if (opt_stat)
-                               statistics_print_memory_usage();
+               if (opt_stat)
+                       statistics_print_memory_usage();
 #endif
-                       break;
-               }
+               break;
        }
-
-       /* this should not happen */
-
-       vm_abort("signal_thread: this thread should not exit!");
 }