mirror of https://github.com/proxmox/mirror_qemu
139 lines
3.9 KiB
C
139 lines
3.9 KiB
C
/*
|
|
* host-signal.h: signal info dependent on the host architecture
|
|
*
|
|
* Copyright (c) 2003-2005 Fabrice Bellard
|
|
* Copyright (c) 2021 Linaro Limited
|
|
*
|
|
* This work is licensed under the terms of the GNU LGPL, version 2.1 or later.
|
|
* See the COPYING file in the top-level directory.
|
|
*/
|
|
|
|
#ifndef S390_HOST_SIGNAL_H
|
|
#define S390_HOST_SIGNAL_H
|
|
|
|
/* The third argument to a SA_SIGINFO handler is ucontext_t. */
|
|
typedef ucontext_t host_sigcontext;
|
|
|
|
static inline uintptr_t host_signal_pc(host_sigcontext *uc)
|
|
{
|
|
return uc->uc_mcontext.psw.addr;
|
|
}
|
|
|
|
static inline void host_signal_set_pc(host_sigcontext *uc, uintptr_t pc)
|
|
{
|
|
uc->uc_mcontext.psw.addr = pc;
|
|
}
|
|
|
|
static inline void *host_signal_mask(host_sigcontext *uc)
|
|
{
|
|
return &uc->uc_sigmask;
|
|
}
|
|
|
|
static inline bool host_signal_write(siginfo_t *info, host_sigcontext *uc)
|
|
{
|
|
uint16_t *pinsn = (uint16_t *)host_signal_pc(uc);
|
|
|
|
/*
|
|
* ??? On linux, the non-rt signal handler has 4 (!) arguments instead
|
|
* of the normal 2 arguments. The 4th argument contains the "Translation-
|
|
* Exception Identification for DAT Exceptions" from the hardware (aka
|
|
* "int_parm_long"), which does in fact contain the is_write value.
|
|
* The rt signal handler, as far as I can tell, does not give this value
|
|
* at all. Not that we could get to it from here even if it were.
|
|
* So fall back to parsing instructions. Treat read-modify-write ones as
|
|
* writes, which is not fully correct, but for tracking self-modifying code
|
|
* this is better than treating them as reads. Checking si_addr page flags
|
|
* might be a viable improvement, albeit a racy one.
|
|
*/
|
|
/* ??? This is not even close to complete. */
|
|
switch (pinsn[0] >> 8) {
|
|
case 0x50: /* ST */
|
|
case 0x42: /* STC */
|
|
case 0x40: /* STH */
|
|
case 0x44: /* EX */
|
|
case 0xba: /* CS */
|
|
case 0xbb: /* CDS */
|
|
return true;
|
|
case 0xc4: /* RIL format insns */
|
|
switch (pinsn[0] & 0xf) {
|
|
case 0xf: /* STRL */
|
|
case 0xb: /* STGRL */
|
|
case 0x7: /* STHRL */
|
|
return true;
|
|
}
|
|
break;
|
|
case 0xc6: /* RIL-b format insns */
|
|
switch (pinsn[0] & 0xf) {
|
|
case 0x0: /* EXRL */
|
|
return true;
|
|
}
|
|
break;
|
|
case 0xc8: /* SSF format insns */
|
|
switch (pinsn[0] & 0xf) {
|
|
case 0x2: /* CSST */
|
|
return true;
|
|
}
|
|
break;
|
|
case 0xe3: /* RXY format insns */
|
|
switch (pinsn[2] & 0xff) {
|
|
case 0x50: /* STY */
|
|
case 0x24: /* STG */
|
|
case 0x72: /* STCY */
|
|
case 0x70: /* STHY */
|
|
case 0x8e: /* STPQ */
|
|
case 0x3f: /* STRVH */
|
|
case 0x3e: /* STRV */
|
|
case 0x2f: /* STRVG */
|
|
return true;
|
|
}
|
|
break;
|
|
case 0xe6:
|
|
switch (pinsn[2] & 0xff) {
|
|
case 0x09: /* VSTEBRH */
|
|
case 0x0a: /* VSTEBRG */
|
|
case 0x0b: /* VSTEBRF */
|
|
case 0x0e: /* VSTBR */
|
|
case 0x0f: /* VSTER */
|
|
case 0x3f: /* VSTRLR */
|
|
return true;
|
|
}
|
|
break;
|
|
case 0xe7:
|
|
switch (pinsn[2] & 0xff) {
|
|
case 0x08: /* VSTEB */
|
|
case 0x09: /* VSTEH */
|
|
case 0x0a: /* VSTEG */
|
|
case 0x0b: /* VSTEF */
|
|
case 0x0e: /* VST */
|
|
case 0x1a: /* VSCEG */
|
|
case 0x1b: /* VSCEF */
|
|
case 0x3e: /* VSTM */
|
|
case 0x3f: /* VSTL */
|
|
return true;
|
|
}
|
|
break;
|
|
case 0xeb: /* RSY format insns */
|
|
switch (pinsn[2] & 0xff) {
|
|
case 0x14: /* CSY */
|
|
case 0x30: /* CSG */
|
|
case 0x31: /* CDSY */
|
|
case 0x3e: /* CDSG */
|
|
case 0xe4: /* LANG */
|
|
case 0xe6: /* LAOG */
|
|
case 0xe7: /* LAXG */
|
|
case 0xe8: /* LAAG */
|
|
case 0xea: /* LAALG */
|
|
case 0xf4: /* LAN */
|
|
case 0xf6: /* LAO */
|
|
case 0xf7: /* LAX */
|
|
case 0xfa: /* LAAL */
|
|
case 0xf8: /* LAA */
|
|
return true;
|
|
}
|
|
break;
|
|
}
|
|
return false;
|
|
}
|
|
|
|
#endif
|