aboutsummaryrefslogtreecommitdiff
path: root/libjava/include/s390-signal.h
diff options
context:
space:
mode:
authorAndrew Haley <aph@redhat.com>2016-09-30 16:24:48 +0000
committerAndrew Haley <aph@gcc.gnu.org>2016-09-30 16:24:48 +0000
commit07b78716af6a9d7c9fd1e94d9baf94a52c873947 (patch)
tree3f22b3241c513ad168c8353805614ae1249410f4 /libjava/include/s390-signal.h
parenteae993948bae8b788c53772bcb9217c063716f93 (diff)
downloadgcc-07b78716af6a9d7c9fd1e94d9baf94a52c873947.zip
gcc-07b78716af6a9d7c9fd1e94d9baf94a52c873947.tar.gz
gcc-07b78716af6a9d7c9fd1e94d9baf94a52c873947.tar.bz2
Makefile.def: Remove libjava.
2016-09-30 Andrew Haley <aph@redhat.com> * Makefile.def: Remove libjava. * Makefile.tpl: Likewise. * Makefile.in: Regenerate. * configure.ac: Likewise. * configure: Likewise. * gcc/java: Remove. * libjava: Likewise. From-SVN: r240662
Diffstat (limited to 'libjava/include/s390-signal.h')
-rw-r--r--libjava/include/s390-signal.h288
1 files changed, 0 insertions, 288 deletions
diff --git a/libjava/include/s390-signal.h b/libjava/include/s390-signal.h
deleted file mode 100644
index 4ca4c10..0000000
--- a/libjava/include/s390-signal.h
+++ /dev/null
@@ -1,288 +0,0 @@
-// s390-signal.h - Catch runtime signals and turn them into exceptions
-// on an s390 based Linux system.
-
-/* Copyright (C) 2002, 2010 Free Software Foundation
-
- This file is part of libgcj.
-
-This software is copyrighted work licensed under the terms of the
-Libgcj License. Please consult the file "LIBGCJ_LICENSE" for
-details. */
-
-
-#ifndef JAVA_SIGNAL_H
-#define JAVA_SIGNAL_H 1
-
-#include <signal.h>
-#include <sys/syscall.h>
-#include <ucontext.h>
-#include <limits.h>
-
-#define HANDLE_SEGV 1
-#define HANDLE_FPE 1
-
-#define SIGNAL_HANDLER(_name) \
-static void _name (int, siginfo_t *_si __attribute__((unused)), \
- ucontext_t *_uc __attribute__((unused)))
-
-/* We no longer need to fiddle with the PSW address in the signal handler;
- this is now all handled correctly in MD_FALLBACK_FRAME_STATE_FOR. */
-#define MAKE_THROW_FRAME(_exception)
-
-
-/* According to the JVM spec, "if the dividend is the negative integer
- of the smallest magnitude and the divisor is -1, then overflow occurs
- and the result is equal to the dividend. Despite the overflow, no
- exception occurs".
-
- We handle this by inspecting the instruction which generated the signal,
- and if dividend and divisor are as above, we simply return from the signal
- handler. This causes execution to continue after the instruction.
- Before returning, we the set result registers as expected. */
-#define UC_EXTENDED 0x00000001
-
-#define HANDLE_DIVIDE_OVERFLOW \
-do \
-{ \
- unsigned char *_eip = (unsigned char *) \
- __builtin_extract_return_addr (_si->si_addr); \
- unsigned long *_regs = _uc->uc_mcontext.gregs; \
- int _r1, _r2, _d2, _x2, _b2; \
- struct \
- { \
- unsigned long int uc_flags; \
- struct ucontext *uc_link; \
- stack_t uc_stack; \
- mcontext_t uc_mcontext; \
- unsigned long sigmask[2]; \
- unsigned long ext_regs[16]; \
- } *_uc_ext = (typeof(_uc_ext))_uc; \
- \
- /* First, a couple of helper routines to decode instructions. */ \
- struct _decode \
- { \
- /* Decode RR instruction format. */ \
- static inline int _is_rr (unsigned char *_eip, \
- unsigned char _op, \
- int *_r1, int *_r2) \
- { \
- if (_eip[0] == _op) \
- { \
- *_r1 = _eip[1] >> 4; \
- *_r2 = _eip[1] & 0xf; \
- return 1; \
- } \
- return 0; \
- } \
- \
- /* Decode RX instruction format. */ \
- static inline int _is_rx (unsigned char *_eip, \
- unsigned char _op, \
- int *_r1, int *_d2, int *_x2, int *_b2) \
- { \
- if (_eip[0] == _op) \
- { \
- *_r1 = _eip[1] >> 4; \
- *_x2 = _eip[1] & 0xf; \
- *_b2 = _eip[2] >> 4; \
- *_d2 = ((_eip[2] & 0xf) << 8) + _eip[3]; \
- return 1; \
- } \
- return 0; \
- } \
- \
- /* Decode RRE instruction format. */ \
- static inline int _is_rre (unsigned char *_eip, \
- unsigned char _op1, unsigned char _op2,\
- int *_r1, int *_r2) \
- { \
- if (_eip[0] == _op1 && _eip[1] == _op2) \
- { \
- *_r1 = _eip[3] >> 4; \
- *_r2 = _eip[3] & 0xf; \
- return 1; \
- } \
- return 0; \
- } \
- \
- /* Decode RXY instruction format. */ \
- static inline int _is_rxy (unsigned char *_eip, \
- unsigned char _op1, unsigned char _op2,\
- int *_r1, int *_d2, int *_x2, int *_b2)\
- { \
- if (_eip[0] == _op1 && _eip[5] == _op2) \
- { \
- *_r1 = _eip[1] >> 4; \
- *_x2 = _eip[1] & 0xf; \
- *_b2 = _eip[2] >> 4; \
- *_d2 = ((_eip[2] & 0xf) << 8) + _eip[3] + (_eip[4] << 12); \
- /* We have a 20-bit signed displacement. */ \
- *_d2 = (*_d2 ^ 0x80000) - 0x80000; \
- return 1; \
- } \
- return 0; \
- } \
- \
- /* Compute effective address. */ \
- static inline unsigned long _eff (unsigned long *_regs, \
- long _d, int _x, int _b) \
- { \
- return _d + (_x? _regs[_x] : 0) + (_b? _regs[_b] : 0); \
- } \
- \
- static inline int is_long_long_min_p (unsigned long *_regs, \
- unsigned long *_ext_regs, \
- int _r) \
- { \
- return ((long long)_regs[_r] \
- | (long long)_ext_regs[_r] << 32) == \
- LONG_LONG_MIN; \
- } \
- }; \
- \
- /* DR r1,r2 */ \
- if (_decode::_is_rr (_eip, 0x1d, &_r1, &_r2) \
- && (int) _regs[_r1] == -1 && (int) _regs[_r1+1] == INT_MIN \
- && (int) _regs[_r2] == -1) \
- { \
- _regs[_r1] &= ~0xffffffff; \
- return; \
- } \
- \
- /* D r1,d2(x2,b2) */ \
- if (_decode::_is_rx (_eip, 0x5d, &_r1, &_d2, &_x2, &_b2) \
- && (int) _regs[_r1] == -1 && (int) _regs[_r1+1] == INT_MIN \
- && *(int *) _decode::_eff (_regs, _d2, _x2, _b2) == -1) \
- { \
- _regs[_r1] &= ~0xffffffff; \
- return; \
- } \
- \
- /* DSGR r1,r2 */ \
- if (_decode::_is_rre (_eip, 0xb9, 0x0d, &_r1, &_r2) \
- && (long) _regs[_r1+1] == LONG_MIN \
- && (long) _regs[_r2] == -1L) \
- { \
- _regs[_r1] = 0; \
- return; \
- } \
- \
- /* DSGFR r1,r2 */ \
- if (_decode::_is_rre (_eip, 0xb9, 0x1d, &_r1, &_r2) \
- && (long) _regs[_r1+1] == LONG_MIN \
- && (int) _regs[_r2] == -1) \
- { \
- _regs[_r1] = 0; \
- return; \
- } \
- \
- /* DSG r1,d2(x2,b2) */ \
- if (_decode::_is_rxy (_eip, 0xe3, 0x0d, &_r1, &_d2, &_x2, &_b2) \
- && (long) _regs[_r1+1] == LONG_MIN \
- && *(long *) _decode::_eff (_regs, _d2, _x2, _b2) == -1L) \
- { \
- _regs[_r1] = 0; \
- return; \
- } \
- \
- /* DSGF r1,d2(x2,b2) */ \
- if (_decode::_is_rxy (_eip, 0xe3, 0x1d, &_r1, &_d2, &_x2, &_b2) \
- && (long) _regs[_r1+1] == LONG_MIN \
- && *(int *) _decode::_eff (_regs, _d2, _x2, _b2) == -1) \
- { \
- _regs[_r1] = 0; \
- return; \
- } \
- \
- /* The extended ucontext contains the upper halfs of the 64bit \
- registers in 31bit applications. */ \
- if (_uc->uc_flags & 1 == 1) \
- { \
- /* DSGR r1,r2 */ \
- if (_decode::_is_rre (_eip, 0xb9, 0x0d, &_r1, &_r2) \
- && (int) _regs[_r2] == -1 \
- && (int) _uc_ext->ext_regs[_r2] == -1 \
- && _decode::is_long_long_min_p (_regs, _uc_ext->ext_regs, \
- _r1 + 1)) \
- { \
- _regs[_r1] = 0; \
- _uc_ext->ext_regs[_r1] = 0; \
- return; \
- } \
- \
- /* DSGFR r1,r2 */ \
- if (_decode::_is_rre (_eip, 0xb9, 0x1d, &_r1, &_r2) \
- && (int) _regs[_r2] == -1 \
- && _decode::is_long_long_min_p (_regs, _uc_ext->ext_regs, \
- _r1 + 1)) \
- { \
- _regs[_r1] = 0; \
- _uc_ext->ext_regs[_r1] = 0; \
- return; \
- } \
- \
- /* DSG r1,d2(x2,b2) */ \
- if (_decode::_is_rxy (_eip, 0xe3, 0x0d, &_r1, &_d2, &_x2, &_b2) \
- && *(int *) _decode::_eff (_regs, _d2, _x2, _b2) == -1 \
- && *(int *) _decode::_eff (_regs, _d2 + 4, _x2, _b2) == -1 \
- && _decode::is_long_long_min_p (_regs, _uc_ext->ext_regs, \
- _r1 + 1)) \
- { \
- _regs[_r1] = 0; \
- _uc_ext->ext_regs[_r1] = 0; \
- return; \
- } \
- \
- /* DSGF r1,d2(x2,b2) */ \
- if (_decode::_is_rxy (_eip, 0xe3, 0x1d, &_r1, &_d2, &_x2, &_b2) \
- && *(int *) _decode::_eff (_regs, _d2, _x2, _b2) == -1 \
- && _decode::is_long_long_min_p (_regs, _uc_ext->ext_regs, \
- _r1 + 1)) \
- { \
- _regs[_r1] = 0; \
- _uc_ext->ext_regs[_r1] = 0; \
- return; \
- } \
- } \
- } \
-while (0)
-
-/* For an explanation why we cannot simply use sigaction to
- install the handlers, see i386-signal.h. */
-
-/* We use old_kernel_sigaction here because we're calling the kernel
- directly rather than via glibc. The sigaction structure that the
- syscall uses is a different shape from the one in userland and not
- visible to us in a header file so we define it here. */
-
-struct old_s390_kernel_sigaction {
- void (*k_sa_handler) (int, siginfo_t *, ucontext_t *);
- unsigned long k_sa_mask;
- unsigned long k_sa_flags;
- void (*sa_restorer) (void);
-};
-
-#define INIT_SEGV \
-do \
- { \
- struct old_s390_kernel_sigaction kact; \
- kact.k_sa_handler = catch_segv; \
- kact.k_sa_mask = 0; \
- kact.k_sa_flags = SA_SIGINFO; \
- syscall (SYS_sigaction, SIGSEGV, &kact, NULL); \
- } \
-while (0)
-
-#define INIT_FPE \
-do \
- { \
- struct old_s390_kernel_sigaction kact; \
- kact.k_sa_handler = catch_fpe; \
- kact.k_sa_mask = 0; \
- kact.k_sa_flags = SA_SIGINFO; \
- syscall (SYS_sigaction, SIGFPE, &kact, NULL); \
- } \
-while (0)
-
-#endif /* JAVA_SIGNAL_H */
-