2 * User emulator execution
4 * Copyright (c) 2003-2005 Fabrice Bellard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
21 #include "disas/disas.h"
35 #include <sys/ucontext.h>
38 //#define DEBUG_SIGNAL
40 static void exception_action(CPUArchState
*env1
)
42 #if defined(TARGET_I386)
43 raise_exception_err(env1
, env1
->exception_index
, env1
->error_code
);
49 /* exit the current TB from a signal handler. The host registers are
50 restored in a state compatible with the CPU emulator
52 void cpu_resume_from_signal(CPUArchState
*env1
, void *puc
)
55 struct ucontext
*uc
= puc
;
56 #elif defined(__OpenBSD__)
57 struct sigcontext
*uc
= puc
;
61 /* XXX: use siglongjmp ? */
64 sigprocmask(SIG_SETMASK
, (sigset_t
*)&uc
->uc_sigmask
, NULL
);
66 sigprocmask(SIG_SETMASK
, &uc
->uc_sigmask
, NULL
);
68 #elif defined(__OpenBSD__)
69 sigprocmask(SIG_SETMASK
, &uc
->sc_mask
, NULL
);
72 env1
->exception_index
= -1;
73 siglongjmp(env1
->jmp_env
, 1);
76 /* 'pc' is the host PC at which the exception was raised. 'address' is
77 the effective address of the memory exception. 'is_write' is 1 if a
78 write caused the exception and otherwise 0'. 'old_set' is the
79 signal set which should be restored */
80 static inline int handle_cpu_signal(uintptr_t pc
, unsigned long address
,
81 int is_write
, sigset_t
*old_set
,
86 #if defined(DEBUG_SIGNAL)
87 qemu_printf("qemu: SIGSEGV pc=0x%08lx address=%08lx w=%d oldset=0x%08lx\n",
88 pc
, address
, is_write
, *(unsigned long *)old_set
);
90 /* XXX: locking issue */
91 if (is_write
&& h2g_valid(address
)
92 && page_unprotect(h2g(address
), pc
, puc
)) {
96 /* see if it is an MMU fault */
97 ret
= cpu_handle_mmu_fault(cpu_single_env
, address
, is_write
,
100 return 0; /* not an MMU fault */
103 return 1; /* the MMU fault was handled without causing real CPU fault */
105 /* now we have a real cpu fault */
106 cpu_restore_state(cpu_single_env
, pc
);
108 /* we restore the process signal mask as the sigreturn should
109 do it (XXX: use sigsetjmp) */
110 sigprocmask(SIG_SETMASK
, old_set
, NULL
);
111 exception_action(cpu_single_env
);
113 /* never comes here */
117 #if defined(__i386__)
119 #if defined(__APPLE__)
120 #include <sys/ucontext.h>
122 #define EIP_sig(context) (*((unsigned long *)&(context)->uc_mcontext->ss.eip))
123 #define TRAP_sig(context) ((context)->uc_mcontext->es.trapno)
124 #define ERROR_sig(context) ((context)->uc_mcontext->es.err)
125 #define MASK_sig(context) ((context)->uc_sigmask)
126 #elif defined(__NetBSD__)
127 #include <ucontext.h>
129 #define EIP_sig(context) ((context)->uc_mcontext.__gregs[_REG_EIP])
130 #define TRAP_sig(context) ((context)->uc_mcontext.__gregs[_REG_TRAPNO])
131 #define ERROR_sig(context) ((context)->uc_mcontext.__gregs[_REG_ERR])
132 #define MASK_sig(context) ((context)->uc_sigmask)
133 #elif defined(__FreeBSD__) || defined(__DragonFly__)
134 #include <ucontext.h>
136 #define EIP_sig(context) (*((unsigned long *)&(context)->uc_mcontext.mc_eip))
137 #define TRAP_sig(context) ((context)->uc_mcontext.mc_trapno)
138 #define ERROR_sig(context) ((context)->uc_mcontext.mc_err)
139 #define MASK_sig(context) ((context)->uc_sigmask)
140 #elif defined(__OpenBSD__)
141 #define EIP_sig(context) ((context)->sc_eip)
142 #define TRAP_sig(context) ((context)->sc_trapno)
143 #define ERROR_sig(context) ((context)->sc_err)
144 #define MASK_sig(context) ((context)->sc_mask)
146 #define EIP_sig(context) ((context)->uc_mcontext.gregs[REG_EIP])
147 #define TRAP_sig(context) ((context)->uc_mcontext.gregs[REG_TRAPNO])
148 #define ERROR_sig(context) ((context)->uc_mcontext.gregs[REG_ERR])
149 #define MASK_sig(context) ((context)->uc_sigmask)
152 int cpu_signal_handler(int host_signum
, void *pinfo
,
155 siginfo_t
*info
= pinfo
;
156 #if defined(__NetBSD__) || defined(__FreeBSD__) || defined(__DragonFly__)
157 ucontext_t
*uc
= puc
;
158 #elif defined(__OpenBSD__)
159 struct sigcontext
*uc
= puc
;
161 struct ucontext
*uc
= puc
;
170 #define REG_TRAPNO TRAPNO
173 trapno
= TRAP_sig(uc
);
174 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
176 (ERROR_sig(uc
) >> 1) & 1 : 0,
180 #elif defined(__x86_64__)
183 #define PC_sig(context) _UC_MACHINE_PC(context)
184 #define TRAP_sig(context) ((context)->uc_mcontext.__gregs[_REG_TRAPNO])
185 #define ERROR_sig(context) ((context)->uc_mcontext.__gregs[_REG_ERR])
186 #define MASK_sig(context) ((context)->uc_sigmask)
187 #elif defined(__OpenBSD__)
188 #define PC_sig(context) ((context)->sc_rip)
189 #define TRAP_sig(context) ((context)->sc_trapno)
190 #define ERROR_sig(context) ((context)->sc_err)
191 #define MASK_sig(context) ((context)->sc_mask)
192 #elif defined(__FreeBSD__) || defined(__DragonFly__)
193 #include <ucontext.h>
195 #define PC_sig(context) (*((unsigned long *)&(context)->uc_mcontext.mc_rip))
196 #define TRAP_sig(context) ((context)->uc_mcontext.mc_trapno)
197 #define ERROR_sig(context) ((context)->uc_mcontext.mc_err)
198 #define MASK_sig(context) ((context)->uc_sigmask)
200 #define PC_sig(context) ((context)->uc_mcontext.gregs[REG_RIP])
201 #define TRAP_sig(context) ((context)->uc_mcontext.gregs[REG_TRAPNO])
202 #define ERROR_sig(context) ((context)->uc_mcontext.gregs[REG_ERR])
203 #define MASK_sig(context) ((context)->uc_sigmask)
206 int cpu_signal_handler(int host_signum
, void *pinfo
,
209 siginfo_t
*info
= pinfo
;
211 #if defined(__NetBSD__) || defined(__FreeBSD__) || defined(__DragonFly__)
212 ucontext_t
*uc
= puc
;
213 #elif defined(__OpenBSD__)
214 struct sigcontext
*uc
= puc
;
216 struct ucontext
*uc
= puc
;
220 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
221 TRAP_sig(uc
) == 0xe ?
222 (ERROR_sig(uc
) >> 1) & 1 : 0,
226 #elif defined(_ARCH_PPC)
228 /***********************************************************************
229 * signal context platform-specific definitions
233 /* All Registers access - only for local access */
234 #define REG_sig(reg_name, context) \
235 ((context)->uc_mcontext.regs->reg_name)
236 /* Gpr Registers access */
237 #define GPR_sig(reg_num, context) REG_sig(gpr[reg_num], context)
238 /* Program counter */
239 #define IAR_sig(context) REG_sig(nip, context)
240 /* Machine State Register (Supervisor) */
241 #define MSR_sig(context) REG_sig(msr, context)
243 #define CTR_sig(context) REG_sig(ctr, context)
244 /* User's integer exception register */
245 #define XER_sig(context) REG_sig(xer, context)
247 #define LR_sig(context) REG_sig(link, context)
248 /* Condition register */
249 #define CR_sig(context) REG_sig(ccr, context)
251 /* Float Registers access */
252 #define FLOAT_sig(reg_num, context) \
253 (((double *)((char *)((context)->uc_mcontext.regs + 48 * 4)))[reg_num])
254 #define FPSCR_sig(context) \
255 (*(int *)((char *)((context)->uc_mcontext.regs + (48 + 32 * 2) * 4)))
256 /* Exception Registers access */
257 #define DAR_sig(context) REG_sig(dar, context)
258 #define DSISR_sig(context) REG_sig(dsisr, context)
259 #define TRAP_sig(context) REG_sig(trap, context)
262 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
263 #include <ucontext.h>
264 #define IAR_sig(context) ((context)->uc_mcontext.mc_srr0)
265 #define MSR_sig(context) ((context)->uc_mcontext.mc_srr1)
266 #define CTR_sig(context) ((context)->uc_mcontext.mc_ctr)
267 #define XER_sig(context) ((context)->uc_mcontext.mc_xer)
268 #define LR_sig(context) ((context)->uc_mcontext.mc_lr)
269 #define CR_sig(context) ((context)->uc_mcontext.mc_cr)
270 /* Exception Registers access */
271 #define DAR_sig(context) ((context)->uc_mcontext.mc_dar)
272 #define DSISR_sig(context) ((context)->uc_mcontext.mc_dsisr)
273 #define TRAP_sig(context) ((context)->uc_mcontext.mc_exc)
274 #endif /* __FreeBSD__|| __FreeBSD_kernel__ */
277 #include <sys/ucontext.h>
278 typedef struct ucontext SIGCONTEXT
;
279 /* All Registers access - only for local access */
280 #define REG_sig(reg_name, context) \
281 ((context)->uc_mcontext->ss.reg_name)
282 #define FLOATREG_sig(reg_name, context) \
283 ((context)->uc_mcontext->fs.reg_name)
284 #define EXCEPREG_sig(reg_name, context) \
285 ((context)->uc_mcontext->es.reg_name)
286 #define VECREG_sig(reg_name, context) \
287 ((context)->uc_mcontext->vs.reg_name)
288 /* Gpr Registers access */
289 #define GPR_sig(reg_num, context) REG_sig(r##reg_num, context)
290 /* Program counter */
291 #define IAR_sig(context) REG_sig(srr0, context)
292 /* Machine State Register (Supervisor) */
293 #define MSR_sig(context) REG_sig(srr1, context)
294 #define CTR_sig(context) REG_sig(ctr, context)
296 #define XER_sig(context) REG_sig(xer, context)
297 /* User's integer exception register */
298 #define LR_sig(context) REG_sig(lr, context)
299 /* Condition register */
300 #define CR_sig(context) REG_sig(cr, context)
301 /* Float Registers access */
302 #define FLOAT_sig(reg_num, context) \
303 FLOATREG_sig(fpregs[reg_num], context)
304 #define FPSCR_sig(context) \
305 ((double)FLOATREG_sig(fpscr, context))
306 /* Exception Registers access */
307 /* Fault registers for coredump */
308 #define DAR_sig(context) EXCEPREG_sig(dar, context)
309 #define DSISR_sig(context) EXCEPREG_sig(dsisr, context)
310 /* number of powerpc exception taken */
311 #define TRAP_sig(context) EXCEPREG_sig(exception, context)
312 #endif /* __APPLE__ */
314 int cpu_signal_handler(int host_signum
, void *pinfo
,
317 siginfo_t
*info
= pinfo
;
318 #if defined(__FreeBSD__) || defined(__FreeBSD_kernel__)
319 ucontext_t
*uc
= puc
;
321 struct ucontext
*uc
= puc
;
330 if (DSISR_sig(uc
) & 0x00800000) {
334 if (TRAP_sig(uc
) != 0x400 && (DSISR_sig(uc
) & 0x02000000)) {
338 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
339 is_write
, &uc
->uc_sigmask
, puc
);
342 #elif defined(__alpha__)
344 int cpu_signal_handler(int host_signum
, void *pinfo
,
347 siginfo_t
*info
= pinfo
;
348 struct ucontext
*uc
= puc
;
349 uint32_t *pc
= uc
->uc_mcontext
.sc_pc
;
353 /* XXX: need kernel patch to get write flag faster */
354 switch (insn
>> 26) {
357 case 0x0f: /* stq_u */
364 case 0x2e: /* stl_c */
365 case 0x2f: /* stq_c */
369 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
370 is_write
, &uc
->uc_sigmask
, puc
);
372 #elif defined(__sparc__)
374 int cpu_signal_handler(int host_signum
, void *pinfo
,
377 siginfo_t
*info
= pinfo
;
380 #if !defined(__arch64__) || defined(CONFIG_SOLARIS)
381 uint32_t *regs
= (uint32_t *)(info
+ 1);
382 void *sigmask
= (regs
+ 20);
383 /* XXX: is there a standard glibc define ? */
384 unsigned long pc
= regs
[1];
387 struct sigcontext
*sc
= puc
;
388 unsigned long pc
= sc
->sigc_regs
.tpc
;
389 void *sigmask
= (void *)sc
->sigc_mask
;
390 #elif defined(__OpenBSD__)
391 struct sigcontext
*uc
= puc
;
392 unsigned long pc
= uc
->sc_pc
;
393 void *sigmask
= (void *)(long)uc
->sc_mask
;
397 /* XXX: need kernel patch to get write flag faster */
399 insn
= *(uint32_t *)pc
;
400 if ((insn
>> 30) == 3) {
401 switch ((insn
>> 19) & 0x3f) {
403 case 0x15: /* stba */
405 case 0x16: /* stha */
409 case 0x17: /* stda */
411 case 0x1e: /* stxa */
413 case 0x34: /* stfa */
414 case 0x27: /* stdf */
415 case 0x37: /* stdfa */
416 case 0x26: /* stqf */
417 case 0x36: /* stqfa */
418 case 0x25: /* stfsr */
419 case 0x3c: /* casa */
420 case 0x3e: /* casxa */
425 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
426 is_write
, sigmask
, NULL
);
429 #elif defined(__arm__)
431 int cpu_signal_handler(int host_signum
, void *pinfo
,
434 siginfo_t
*info
= pinfo
;
435 struct ucontext
*uc
= puc
;
439 #if defined(__GLIBC__) && (__GLIBC__ < 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ <= 3))
440 pc
= uc
->uc_mcontext
.gregs
[R15
];
442 pc
= uc
->uc_mcontext
.arm_pc
;
444 /* XXX: compute is_write */
446 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
448 &uc
->uc_sigmask
, puc
);
451 #elif defined(__mc68000)
453 int cpu_signal_handler(int host_signum
, void *pinfo
,
456 siginfo_t
*info
= pinfo
;
457 struct ucontext
*uc
= puc
;
461 pc
= uc
->uc_mcontext
.gregs
[16];
462 /* XXX: compute is_write */
464 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
466 &uc
->uc_sigmask
, puc
);
469 #elif defined(__ia64)
472 /* This ought to be in <bits/siginfo.h>... */
473 # define __ISR_VALID 1
476 int cpu_signal_handler(int host_signum
, void *pinfo
, void *puc
)
478 siginfo_t
*info
= pinfo
;
479 struct ucontext
*uc
= puc
;
483 ip
= uc
->uc_mcontext
.sc_ip
;
484 switch (host_signum
) {
490 if (info
->si_code
&& (info
->si_segvflags
& __ISR_VALID
)) {
491 /* ISR.W (write-access) is bit 33: */
492 is_write
= (info
->si_isr
>> 33) & 1;
499 return handle_cpu_signal(ip
, (unsigned long)info
->si_addr
,
501 (sigset_t
*)&uc
->uc_sigmask
, puc
);
504 #elif defined(__s390__)
506 int cpu_signal_handler(int host_signum
, void *pinfo
,
509 siginfo_t
*info
= pinfo
;
510 struct ucontext
*uc
= puc
;
515 pc
= uc
->uc_mcontext
.psw
.addr
;
517 /* ??? On linux, the non-rt signal handler has 4 (!) arguments instead
518 of the normal 2 arguments. The 3rd argument contains the "int_code"
519 from the hardware which does in fact contain the is_write value.
520 The rt signal handler, as far as I can tell, does not give this value
521 at all. Not that we could get to it from here even if it were. */
522 /* ??? This is not even close to complete, since it ignores all
523 of the read-modify-write instructions. */
524 pinsn
= (uint16_t *)pc
;
525 switch (pinsn
[0] >> 8) {
531 case 0xc4: /* RIL format insns */
532 switch (pinsn
[0] & 0xf) {
534 case 0xb: /* STGRL */
535 case 0x7: /* STHRL */
539 case 0xe3: /* RXY format insns */
540 switch (pinsn
[2] & 0xff) {
543 case 0x72: /* STCY */
544 case 0x70: /* STHY */
545 case 0x8e: /* STPQ */
546 case 0x3f: /* STRVH */
547 case 0x3e: /* STRV */
548 case 0x2f: /* STRVG */
553 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
554 is_write
, &uc
->uc_sigmask
, puc
);
557 #elif defined(__mips__)
559 int cpu_signal_handler(int host_signum
, void *pinfo
,
562 siginfo_t
*info
= pinfo
;
563 struct ucontext
*uc
= puc
;
564 greg_t pc
= uc
->uc_mcontext
.pc
;
567 /* XXX: compute is_write */
569 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
570 is_write
, &uc
->uc_sigmask
, puc
);
573 #elif defined(__hppa__)
575 int cpu_signal_handler(int host_signum
, void *pinfo
,
578 siginfo_t
*info
= pinfo
;
579 struct ucontext
*uc
= puc
;
580 unsigned long pc
= uc
->uc_mcontext
.sc_iaoq
[0];
581 uint32_t insn
= *(uint32_t *)pc
;
584 /* XXX: need kernel patch to get write flag faster. */
585 switch (insn
>> 26) {
589 case 0x1b: /* STWM */
593 case 0x09: /* CSTWX, FSTWX, FSTWS */
594 case 0x0b: /* CSTDX, FSTDX, FSTDS */
595 /* Distinguish from coprocessor load ... */
596 is_write
= (insn
>> 9) & 1;
600 switch ((insn
>> 6) & 15) {
604 case 0xe: /* STWAS */
605 case 0xc: /* STBYS */
611 return handle_cpu_signal(pc
, (unsigned long)info
->si_addr
,
612 is_write
, &uc
->uc_sigmask
, puc
);
617 #error host CPU specific signal handler needed