1 /* 2 * Emulation of Linux signals 3 * 4 * Copyright (c) 2003 Fabrice Bellard 5 * 6 * This program is free software; you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License as published by 8 * the Free Software Foundation; either version 2 of the License, or 9 * (at your option) any later version. 10 * 11 * This program 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 14 * GNU General Public License for more details. 15 * 16 * You should have received a copy of the GNU General Public License 17 * along with this program; if not, write to the Free Software 18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 19 */ 20 #include <stdlib.h> 21 #include <stdio.h> 22 #include <string.h> 23 #include <stdarg.h> 24 #include <unistd.h> 25 #include <signal.h> 26 #include <errno.h> 27 #include <sys/ucontext.h> 28 29 #include "qemu.h" 30 #include "target_signal.h" 31 32 //#define DEBUG_SIGNAL 33 34 #define MAX_SIGQUEUE_SIZE 1024 35 36 struct sigqueue { 37 struct sigqueue *next; 38 target_siginfo_t info; 39 }; 40 41 struct emulated_sigaction { 42 struct target_sigaction sa; 43 int pending; /* true if signal is pending */ 44 struct sigqueue *first; 45 struct sigqueue info; /* in order to always have memory for the 46 first signal, we put it here */ 47 }; 48 49 struct target_sigaltstack target_sigaltstack_used = { 50 .ss_sp = 0, 51 .ss_size = 0, 52 .ss_flags = TARGET_SS_DISABLE, 53 }; 54 55 static struct emulated_sigaction sigact_table[TARGET_NSIG]; 56 static struct sigqueue sigqueue_table[MAX_SIGQUEUE_SIZE]; /* siginfo queue */ 57 static struct sigqueue *first_free; /* first free siginfo queue entry */ 58 static int signal_pending; /* non zero if a signal may be pending */ 59 60 static void host_signal_handler(int host_signum, siginfo_t *info, 61 void *puc); 62 63 static uint8_t host_to_target_signal_table[65] = { 64 [SIGHUP] = TARGET_SIGHUP, 65 [SIGINT] = TARGET_SIGINT, 66 [SIGQUIT] = TARGET_SIGQUIT, 67 [SIGILL] = TARGET_SIGILL, 68 [SIGTRAP] = TARGET_SIGTRAP, 69 [SIGABRT] = TARGET_SIGABRT, 70 /* [SIGIOT] = TARGET_SIGIOT,*/ 71 [SIGBUS] = TARGET_SIGBUS, 72 [SIGFPE] = TARGET_SIGFPE, 73 [SIGKILL] = TARGET_SIGKILL, 74 [SIGUSR1] = TARGET_SIGUSR1, 75 [SIGSEGV] = TARGET_SIGSEGV, 76 [SIGUSR2] = TARGET_SIGUSR2, 77 [SIGPIPE] = TARGET_SIGPIPE, 78 [SIGALRM] = TARGET_SIGALRM, 79 [SIGTERM] = TARGET_SIGTERM, 80 #ifdef SIGSTKFLT 81 [SIGSTKFLT] = TARGET_SIGSTKFLT, 82 #endif 83 [SIGCHLD] = TARGET_SIGCHLD, 84 [SIGCONT] = TARGET_SIGCONT, 85 [SIGSTOP] = TARGET_SIGSTOP, 86 [SIGTSTP] = TARGET_SIGTSTP, 87 [SIGTTIN] = TARGET_SIGTTIN, 88 [SIGTTOU] = TARGET_SIGTTOU, 89 [SIGURG] = TARGET_SIGURG, 90 [SIGXCPU] = TARGET_SIGXCPU, 91 [SIGXFSZ] = TARGET_SIGXFSZ, 92 [SIGVTALRM] = TARGET_SIGVTALRM, 93 [SIGPROF] = TARGET_SIGPROF, 94 [SIGWINCH] = TARGET_SIGWINCH, 95 [SIGIO] = TARGET_SIGIO, 96 [SIGPWR] = TARGET_SIGPWR, 97 [SIGSYS] = TARGET_SIGSYS, 98 /* next signals stay the same */ 99 }; 100 static uint8_t target_to_host_signal_table[65]; 101 102 static inline int on_sig_stack(unsigned long sp) 103 { 104 return (sp - target_sigaltstack_used.ss_sp 105 < target_sigaltstack_used.ss_size); 106 } 107 108 static inline int sas_ss_flags(unsigned long sp) 109 { 110 return (target_sigaltstack_used.ss_size == 0 ? SS_DISABLE 111 : on_sig_stack(sp) ? SS_ONSTACK : 0); 112 } 113 114 static inline int host_to_target_signal(int sig) 115 { 116 return host_to_target_signal_table[sig]; 117 } 118 119 static inline int target_to_host_signal(int sig) 120 { 121 return target_to_host_signal_table[sig]; 122 } 123 124 static void host_to_target_sigset_internal(target_sigset_t *d, 125 const sigset_t *s) 126 { 127 int i; 128 unsigned long sigmask; 129 uint32_t target_sigmask; 130 131 sigmask = ((unsigned long *)s)[0]; 132 target_sigmask = 0; 133 for(i = 0; i < 32; i++) { 134 if (sigmask & (1 << i)) 135 target_sigmask |= 1 << (host_to_target_signal(i + 1) - 1); 136 } 137 #if TARGET_ABI_BITS == 32 && HOST_LONG_BITS == 32 138 d->sig[0] = target_sigmask; 139 for(i = 1;i < TARGET_NSIG_WORDS; i++) { 140 d->sig[i] = ((unsigned long *)s)[i]; 141 } 142 #elif TARGET_ABI_BITS == 32 && HOST_LONG_BITS == 64 && TARGET_NSIG_WORDS == 2 143 d->sig[0] = target_sigmask; 144 d->sig[1] = sigmask >> 32; 145 #else 146 /* XXX: do it */ 147 #endif 148 } 149 150 void host_to_target_sigset(target_sigset_t *d, const sigset_t *s) 151 { 152 target_sigset_t d1; 153 int i; 154 155 host_to_target_sigset_internal(&d1, s); 156 for(i = 0;i < TARGET_NSIG_WORDS; i++) 157 d->sig[i] = tswapl(d1.sig[i]); 158 } 159 160 void target_to_host_sigset_internal(sigset_t *d, const target_sigset_t *s) 161 { 162 int i; 163 unsigned long sigmask; 164 abi_ulong target_sigmask; 165 166 target_sigmask = s->sig[0]; 167 sigmask = 0; 168 for(i = 0; i < 32; i++) { 169 if (target_sigmask & (1 << i)) 170 sigmask |= 1 << (target_to_host_signal(i + 1) - 1); 171 } 172 #if TARGET_ABI_BITS == 32 && HOST_LONG_BITS == 32 173 ((unsigned long *)d)[0] = sigmask; 174 for(i = 1;i < TARGET_NSIG_WORDS; i++) { 175 ((unsigned long *)d)[i] = s->sig[i]; 176 } 177 #elif TARGET_ABI_BITS == 32 && HOST_LONG_BITS == 64 && TARGET_NSIG_WORDS == 2 178 ((unsigned long *)d)[0] = sigmask | ((unsigned long)(s->sig[1]) << 32); 179 #else 180 /* XXX: do it */ 181 #endif /* TARGET_ABI_BITS */ 182 } 183 184 void target_to_host_sigset(sigset_t *d, const target_sigset_t *s) 185 { 186 target_sigset_t s1; 187 int i; 188 189 for(i = 0;i < TARGET_NSIG_WORDS; i++) 190 s1.sig[i] = tswapl(s->sig[i]); 191 target_to_host_sigset_internal(d, &s1); 192 } 193 194 void host_to_target_old_sigset(abi_ulong *old_sigset, 195 const sigset_t *sigset) 196 { 197 target_sigset_t d; 198 host_to_target_sigset(&d, sigset); 199 *old_sigset = d.sig[0]; 200 } 201 202 void target_to_host_old_sigset(sigset_t *sigset, 203 const abi_ulong *old_sigset) 204 { 205 target_sigset_t d; 206 int i; 207 208 d.sig[0] = *old_sigset; 209 for(i = 1;i < TARGET_NSIG_WORDS; i++) 210 d.sig[i] = 0; 211 target_to_host_sigset(sigset, &d); 212 } 213 214 /* siginfo conversion */ 215 216 static inline void host_to_target_siginfo_noswap(target_siginfo_t *tinfo, 217 const siginfo_t *info) 218 { 219 int sig; 220 sig = host_to_target_signal(info->si_signo); 221 tinfo->si_signo = sig; 222 tinfo->si_errno = 0; 223 tinfo->si_code = 0; 224 if (sig == SIGILL || sig == SIGFPE || sig == SIGSEGV || 225 sig == SIGBUS || sig == SIGTRAP) { 226 /* should never come here, but who knows. The information for 227 the target is irrelevant */ 228 tinfo->_sifields._sigfault._addr = 0; 229 } else if (sig == SIGIO) { 230 tinfo->_sifields._sigpoll._fd = info->si_fd; 231 } else if (sig >= TARGET_SIGRTMIN) { 232 tinfo->_sifields._rt._pid = info->si_pid; 233 tinfo->_sifields._rt._uid = info->si_uid; 234 /* XXX: potential problem if 64 bit */ 235 tinfo->_sifields._rt._sigval.sival_ptr = 236 (abi_ulong)(unsigned long)info->si_value.sival_ptr; 237 } 238 } 239 240 static void tswap_siginfo(target_siginfo_t *tinfo, 241 const target_siginfo_t *info) 242 { 243 int sig; 244 sig = info->si_signo; 245 tinfo->si_signo = tswap32(sig); 246 tinfo->si_errno = tswap32(info->si_errno); 247 tinfo->si_code = tswap32(info->si_code); 248 if (sig == SIGILL || sig == SIGFPE || sig == SIGSEGV || 249 sig == SIGBUS || sig == SIGTRAP) { 250 tinfo->_sifields._sigfault._addr = 251 tswapl(info->_sifields._sigfault._addr); 252 } else if (sig == SIGIO) { 253 tinfo->_sifields._sigpoll._fd = tswap32(info->_sifields._sigpoll._fd); 254 } else if (sig >= TARGET_SIGRTMIN) { 255 tinfo->_sifields._rt._pid = tswap32(info->_sifields._rt._pid); 256 tinfo->_sifields._rt._uid = tswap32(info->_sifields._rt._uid); 257 tinfo->_sifields._rt._sigval.sival_ptr = 258 tswapl(info->_sifields._rt._sigval.sival_ptr); 259 } 260 } 261 262 263 void host_to_target_siginfo(target_siginfo_t *tinfo, const siginfo_t *info) 264 { 265 host_to_target_siginfo_noswap(tinfo, info); 266 tswap_siginfo(tinfo, tinfo); 267 } 268 269 /* XXX: we support only POSIX RT signals are used. */ 270 /* XXX: find a solution for 64 bit (additional malloced data is needed) */ 271 void target_to_host_siginfo(siginfo_t *info, const target_siginfo_t *tinfo) 272 { 273 info->si_signo = tswap32(tinfo->si_signo); 274 info->si_errno = tswap32(tinfo->si_errno); 275 info->si_code = tswap32(tinfo->si_code); 276 info->si_pid = tswap32(tinfo->_sifields._rt._pid); 277 info->si_uid = tswap32(tinfo->_sifields._rt._uid); 278 info->si_value.sival_ptr = 279 (void *)(long)tswapl(tinfo->_sifields._rt._sigval.sival_ptr); 280 } 281 282 void signal_init(void) 283 { 284 struct sigaction act; 285 int i, j; 286 287 /* generate signal conversion tables */ 288 for(i = 1; i <= 64; i++) { 289 if (host_to_target_signal_table[i] == 0) 290 host_to_target_signal_table[i] = i; 291 } 292 for(i = 1; i <= 64; i++) { 293 j = host_to_target_signal_table[i]; 294 target_to_host_signal_table[j] = i; 295 } 296 297 /* set all host signal handlers. ALL signals are blocked during 298 the handlers to serialize them. */ 299 sigfillset(&act.sa_mask); 300 act.sa_flags = SA_SIGINFO; 301 act.sa_sigaction = host_signal_handler; 302 for(i = 1; i < NSIG; i++) { 303 sigaction(i, &act, NULL); 304 } 305 306 memset(sigact_table, 0, sizeof(sigact_table)); 307 308 first_free = &sigqueue_table[0]; 309 for(i = 0; i < MAX_SIGQUEUE_SIZE - 1; i++) 310 sigqueue_table[i].next = &sigqueue_table[i + 1]; 311 sigqueue_table[MAX_SIGQUEUE_SIZE - 1].next = NULL; 312 } 313 314 /* signal queue handling */ 315 316 static inline struct sigqueue *alloc_sigqueue(void) 317 { 318 struct sigqueue *q = first_free; 319 if (!q) 320 return NULL; 321 first_free = q->next; 322 return q; 323 } 324 325 static inline void free_sigqueue(struct sigqueue *q) 326 { 327 q->next = first_free; 328 first_free = q; 329 } 330 331 /* abort execution with signal */ 332 void __attribute((noreturn)) force_sig(int sig) 333 { 334 int host_sig; 335 host_sig = target_to_host_signal(sig); 336 fprintf(stderr, "qemu: uncaught target signal %d (%s) - exiting\n", 337 sig, strsignal(host_sig)); 338 #if 1 339 _exit(-host_sig); 340 #else 341 { 342 struct sigaction act; 343 sigemptyset(&act.sa_mask); 344 act.sa_flags = SA_SIGINFO; 345 act.sa_sigaction = SIG_DFL; 346 sigaction(SIGABRT, &act, NULL); 347 abort(); 348 } 349 #endif 350 } 351 352 /* queue a signal so that it will be send to the virtual CPU as soon 353 as possible */ 354 int queue_signal(int sig, target_siginfo_t *info) 355 { 356 struct emulated_sigaction *k; 357 struct sigqueue *q, **pq; 358 abi_ulong handler; 359 360 #if defined(DEBUG_SIGNAL) 361 fprintf(stderr, "queue_signal: sig=%d\n", 362 sig); 363 #endif 364 k = &sigact_table[sig - 1]; 365 handler = k->sa._sa_handler; 366 if (handler == TARGET_SIG_DFL) { 367 /* default handler : ignore some signal. The other are fatal */ 368 if (sig != TARGET_SIGCHLD && 369 sig != TARGET_SIGURG && 370 sig != TARGET_SIGWINCH) { 371 force_sig(sig); 372 } else { 373 return 0; /* indicate ignored */ 374 } 375 } else if (handler == TARGET_SIG_IGN) { 376 /* ignore signal */ 377 return 0; 378 } else if (handler == TARGET_SIG_ERR) { 379 force_sig(sig); 380 } else { 381 pq = &k->first; 382 if (sig < TARGET_SIGRTMIN) { 383 /* if non real time signal, we queue exactly one signal */ 384 if (!k->pending) 385 q = &k->info; 386 else 387 return 0; 388 } else { 389 if (!k->pending) { 390 /* first signal */ 391 q = &k->info; 392 } else { 393 q = alloc_sigqueue(); 394 if (!q) 395 return -EAGAIN; 396 while (*pq != NULL) 397 pq = &(*pq)->next; 398 } 399 } 400 *pq = q; 401 q->info = *info; 402 q->next = NULL; 403 k->pending = 1; 404 /* signal that a new signal is pending */ 405 signal_pending = 1; 406 return 1; /* indicates that the signal was queued */ 407 } 408 } 409 410 static void host_signal_handler(int host_signum, siginfo_t *info, 411 void *puc) 412 { 413 int sig; 414 target_siginfo_t tinfo; 415 416 /* the CPU emulator uses some host signals to detect exceptions, 417 we we forward to it some signals */ 418 if (host_signum == SIGSEGV || host_signum == SIGBUS) { 419 if (cpu_signal_handler(host_signum, info, puc)) 420 return; 421 } 422 423 /* get target signal number */ 424 sig = host_to_target_signal(host_signum); 425 if (sig < 1 || sig > TARGET_NSIG) 426 return; 427 #if defined(DEBUG_SIGNAL) 428 fprintf(stderr, "qemu: got signal %d\n", sig); 429 #endif 430 host_to_target_siginfo_noswap(&tinfo, info); 431 if (queue_signal(sig, &tinfo) == 1) { 432 /* interrupt the virtual CPU as soon as possible */ 433 cpu_interrupt(global_env, CPU_INTERRUPT_EXIT); 434 } 435 } 436 437 /* do_sigaltstack() returns target values and errnos. */ 438 /* compare linux/kernel/signal.c:do_sigaltstack() */ 439 abi_long do_sigaltstack(abi_ulong uss_addr, abi_ulong uoss_addr, abi_ulong sp) 440 { 441 int ret; 442 struct target_sigaltstack oss; 443 444 /* XXX: test errors */ 445 if(uoss_addr) 446 { 447 __put_user(target_sigaltstack_used.ss_sp, &oss.ss_sp); 448 __put_user(target_sigaltstack_used.ss_size, &oss.ss_size); 449 __put_user(sas_ss_flags(sp), &oss.ss_flags); 450 } 451 452 if(uss_addr) 453 { 454 struct target_sigaltstack *uss; 455 struct target_sigaltstack ss; 456 457 ret = -TARGET_EFAULT; 458 if (!lock_user_struct(VERIFY_READ, uss, uss_addr, 1) 459 || __get_user(ss.ss_sp, &uss->ss_sp) 460 || __get_user(ss.ss_size, &uss->ss_size) 461 || __get_user(ss.ss_flags, &uss->ss_flags)) 462 goto out; 463 unlock_user_struct(uss, uss_addr, 0); 464 465 ret = -TARGET_EPERM; 466 if (on_sig_stack(sp)) 467 goto out; 468 469 ret = -TARGET_EINVAL; 470 if (ss.ss_flags != TARGET_SS_DISABLE 471 && ss.ss_flags != TARGET_SS_ONSTACK 472 && ss.ss_flags != 0) 473 goto out; 474 475 if (ss.ss_flags == TARGET_SS_DISABLE) { 476 ss.ss_size = 0; 477 ss.ss_sp = 0; 478 } else { 479 ret = -TARGET_ENOMEM; 480 if (ss.ss_size < MINSIGSTKSZ) 481 goto out; 482 } 483 484 target_sigaltstack_used.ss_sp = ss.ss_sp; 485 target_sigaltstack_used.ss_size = ss.ss_size; 486 } 487 488 if (uoss_addr) { 489 ret = -TARGET_EFAULT; 490 if (copy_to_user(uoss_addr, &oss, sizeof(oss))) 491 goto out; 492 } 493 494 ret = 0; 495 out: 496 return ret; 497 } 498 499 /* do_sigaction() return host values and errnos */ 500 int do_sigaction(int sig, const struct target_sigaction *act, 501 struct target_sigaction *oact) 502 { 503 struct emulated_sigaction *k; 504 struct sigaction act1; 505 int host_sig; 506 int ret = 0; 507 508 if (sig < 1 || sig > TARGET_NSIG || sig == SIGKILL || sig == SIGSTOP) 509 return -EINVAL; 510 k = &sigact_table[sig - 1]; 511 #if defined(DEBUG_SIGNAL) 512 fprintf(stderr, "sigaction sig=%d act=0x%08x, oact=0x%08x\n", 513 sig, (int)act, (int)oact); 514 #endif 515 if (oact) { 516 oact->_sa_handler = tswapl(k->sa._sa_handler); 517 oact->sa_flags = tswapl(k->sa.sa_flags); 518 #if !defined(TARGET_MIPS) 519 oact->sa_restorer = tswapl(k->sa.sa_restorer); 520 #endif 521 oact->sa_mask = k->sa.sa_mask; 522 } 523 if (act) { 524 k->sa._sa_handler = tswapl(act->_sa_handler); 525 k->sa.sa_flags = tswapl(act->sa_flags); 526 #if !defined(TARGET_MIPS) 527 k->sa.sa_restorer = tswapl(act->sa_restorer); 528 #endif 529 k->sa.sa_mask = act->sa_mask; 530 531 /* we update the host linux signal state */ 532 host_sig = target_to_host_signal(sig); 533 if (host_sig != SIGSEGV && host_sig != SIGBUS) { 534 sigfillset(&act1.sa_mask); 535 act1.sa_flags = SA_SIGINFO; 536 if (k->sa.sa_flags & TARGET_SA_RESTART) 537 act1.sa_flags |= SA_RESTART; 538 /* NOTE: it is important to update the host kernel signal 539 ignore state to avoid getting unexpected interrupted 540 syscalls */ 541 if (k->sa._sa_handler == TARGET_SIG_IGN) { 542 act1.sa_sigaction = (void *)SIG_IGN; 543 } else if (k->sa._sa_handler == TARGET_SIG_DFL) { 544 act1.sa_sigaction = (void *)SIG_DFL; 545 } else { 546 act1.sa_sigaction = host_signal_handler; 547 } 548 ret = sigaction(host_sig, &act1, NULL); 549 } 550 } 551 return ret; 552 } 553 554 #ifndef offsetof 555 #define offsetof(type, field) ((size_t) &((type *)0)->field) 556 #endif 557 558 static inline int copy_siginfo_to_user(target_siginfo_t *tinfo, 559 const target_siginfo_t *info) 560 { 561 tswap_siginfo(tinfo, info); 562 return 0; 563 } 564 565 #if defined(TARGET_I386) && TARGET_ABI_BITS == 32 566 567 /* from the Linux kernel */ 568 569 struct target_fpreg { 570 uint16_t significand[4]; 571 uint16_t exponent; 572 }; 573 574 struct target_fpxreg { 575 uint16_t significand[4]; 576 uint16_t exponent; 577 uint16_t padding[3]; 578 }; 579 580 struct target_xmmreg { 581 abi_ulong element[4]; 582 }; 583 584 struct target_fpstate { 585 /* Regular FPU environment */ 586 abi_ulong cw; 587 abi_ulong sw; 588 abi_ulong tag; 589 abi_ulong ipoff; 590 abi_ulong cssel; 591 abi_ulong dataoff; 592 abi_ulong datasel; 593 struct target_fpreg _st[8]; 594 uint16_t status; 595 uint16_t magic; /* 0xffff = regular FPU data only */ 596 597 /* FXSR FPU environment */ 598 abi_ulong _fxsr_env[6]; /* FXSR FPU env is ignored */ 599 abi_ulong mxcsr; 600 abi_ulong reserved; 601 struct target_fpxreg _fxsr_st[8]; /* FXSR FPU reg data is ignored */ 602 struct target_xmmreg _xmm[8]; 603 abi_ulong padding[56]; 604 }; 605 606 #define X86_FXSR_MAGIC 0x0000 607 608 struct target_sigcontext { 609 uint16_t gs, __gsh; 610 uint16_t fs, __fsh; 611 uint16_t es, __esh; 612 uint16_t ds, __dsh; 613 abi_ulong edi; 614 abi_ulong esi; 615 abi_ulong ebp; 616 abi_ulong esp; 617 abi_ulong ebx; 618 abi_ulong edx; 619 abi_ulong ecx; 620 abi_ulong eax; 621 abi_ulong trapno; 622 abi_ulong err; 623 abi_ulong eip; 624 uint16_t cs, __csh; 625 abi_ulong eflags; 626 abi_ulong esp_at_signal; 627 uint16_t ss, __ssh; 628 abi_ulong fpstate; /* pointer */ 629 abi_ulong oldmask; 630 abi_ulong cr2; 631 }; 632 633 struct target_ucontext { 634 abi_ulong tuc_flags; 635 abi_ulong tuc_link; 636 target_stack_t tuc_stack; 637 struct target_sigcontext tuc_mcontext; 638 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 639 }; 640 641 struct sigframe 642 { 643 abi_ulong pretcode; 644 int sig; 645 struct target_sigcontext sc; 646 struct target_fpstate fpstate; 647 abi_ulong extramask[TARGET_NSIG_WORDS-1]; 648 char retcode[8]; 649 }; 650 651 struct rt_sigframe 652 { 653 abi_ulong pretcode; 654 int sig; 655 abi_ulong pinfo; 656 abi_ulong puc; 657 struct target_siginfo info; 658 struct target_ucontext uc; 659 struct target_fpstate fpstate; 660 char retcode[8]; 661 }; 662 663 /* 664 * Set up a signal frame. 665 */ 666 667 /* XXX: save x87 state */ 668 static int 669 setup_sigcontext(struct target_sigcontext *sc, struct target_fpstate *fpstate, 670 CPUX86State *env, unsigned long mask) 671 { 672 int err = 0; 673 uint16_t magic; 674 675 /* already locked in setup_frame() */ 676 err |= __put_user(env->segs[R_GS].selector, (unsigned int *)&sc->gs); 677 err |= __put_user(env->segs[R_FS].selector, (unsigned int *)&sc->fs); 678 err |= __put_user(env->segs[R_ES].selector, (unsigned int *)&sc->es); 679 err |= __put_user(env->segs[R_DS].selector, (unsigned int *)&sc->ds); 680 err |= __put_user(env->regs[R_EDI], &sc->edi); 681 err |= __put_user(env->regs[R_ESI], &sc->esi); 682 err |= __put_user(env->regs[R_EBP], &sc->ebp); 683 err |= __put_user(env->regs[R_ESP], &sc->esp); 684 err |= __put_user(env->regs[R_EBX], &sc->ebx); 685 err |= __put_user(env->regs[R_EDX], &sc->edx); 686 err |= __put_user(env->regs[R_ECX], &sc->ecx); 687 err |= __put_user(env->regs[R_EAX], &sc->eax); 688 err |= __put_user(env->exception_index, &sc->trapno); 689 err |= __put_user(env->error_code, &sc->err); 690 err |= __put_user(env->eip, &sc->eip); 691 err |= __put_user(env->segs[R_CS].selector, (unsigned int *)&sc->cs); 692 err |= __put_user(env->eflags, &sc->eflags); 693 err |= __put_user(env->regs[R_ESP], &sc->esp_at_signal); 694 err |= __put_user(env->segs[R_SS].selector, (unsigned int *)&sc->ss); 695 696 cpu_x86_fsave(env, (void *)fpstate, 1); 697 fpstate->status = fpstate->sw; 698 magic = 0xffff; 699 err |= __put_user(magic, &fpstate->magic); 700 err |= __put_user(fpstate, &sc->fpstate); 701 702 /* non-iBCS2 extensions.. */ 703 err |= __put_user(mask, &sc->oldmask); 704 err |= __put_user(env->cr[2], &sc->cr2); 705 return err; 706 } 707 708 /* 709 * Determine which stack to use.. 710 */ 711 712 static inline abi_ulong 713 get_sigframe(struct emulated_sigaction *ka, CPUX86State *env, size_t frame_size) 714 { 715 unsigned long esp; 716 717 /* Default to using normal stack */ 718 esp = env->regs[R_ESP]; 719 /* This is the X/Open sanctioned signal stack switching. */ 720 if (ka->sa.sa_flags & TARGET_SA_ONSTACK) { 721 if (sas_ss_flags(esp) == 0) 722 esp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 723 } 724 725 /* This is the legacy signal stack switching. */ 726 else 727 if ((env->segs[R_SS].selector & 0xffff) != __USER_DS && 728 !(ka->sa.sa_flags & TARGET_SA_RESTORER) && 729 ka->sa.sa_restorer) { 730 esp = (unsigned long) ka->sa.sa_restorer; 731 } 732 return (esp - frame_size) & -8ul; 733 } 734 735 /* compare linux/arch/i386/kernel/signal.c:setup_frame() */ 736 static void setup_frame(int sig, struct emulated_sigaction *ka, 737 target_sigset_t *set, CPUX86State *env) 738 { 739 abi_ulong frame_addr; 740 struct sigframe *frame; 741 int i, err = 0; 742 743 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 744 745 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) 746 goto give_sigsegv; 747 748 err |= __put_user((/*current->exec_domain 749 && current->exec_domain->signal_invmap 750 && sig < 32 751 ? current->exec_domain->signal_invmap[sig] 752 : */ sig), 753 &frame->sig); 754 if (err) 755 goto give_sigsegv; 756 757 setup_sigcontext(&frame->sc, &frame->fpstate, env, set->sig[0]); 758 if (err) 759 goto give_sigsegv; 760 761 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 762 if (__put_user(set->sig[i], &frame->extramask[i - 1])) 763 goto give_sigsegv; 764 } 765 766 /* Set up to return from userspace. If provided, use a stub 767 already in userspace. */ 768 if (ka->sa.sa_flags & TARGET_SA_RESTORER) { 769 err |= __put_user(ka->sa.sa_restorer, &frame->pretcode); 770 } else { 771 uint16_t val16; 772 err |= __put_user(frame->retcode, &frame->pretcode); 773 /* This is popl %eax ; movl $,%eax ; int $0x80 */ 774 val16 = 0xb858; 775 err |= __put_user(val16, (uint16_t *)(frame->retcode+0)); 776 err |= __put_user(TARGET_NR_sigreturn, (int *)(frame->retcode+2)); 777 val16 = 0x80cd; 778 err |= __put_user(val16, (uint16_t *)(frame->retcode+6)); 779 } 780 781 if (err) 782 goto give_sigsegv; 783 784 /* Set up registers for signal handler */ 785 env->regs[R_ESP] = h2g(frame); 786 env->eip = (unsigned long) ka->sa._sa_handler; 787 788 cpu_x86_load_seg(env, R_DS, __USER_DS); 789 cpu_x86_load_seg(env, R_ES, __USER_DS); 790 cpu_x86_load_seg(env, R_SS, __USER_DS); 791 cpu_x86_load_seg(env, R_CS, __USER_CS); 792 env->eflags &= ~TF_MASK; 793 794 unlock_user_struct(frame, frame_addr, 1); 795 796 return; 797 798 give_sigsegv: 799 unlock_user_struct(frame, frame_addr, 1); 800 if (sig == TARGET_SIGSEGV) 801 ka->sa._sa_handler = TARGET_SIG_DFL; 802 force_sig(TARGET_SIGSEGV /* , current */); 803 } 804 805 /* compare linux/arch/i386/kernel/signal.c:setup_rt_frame() */ 806 static void setup_rt_frame(int sig, struct emulated_sigaction *ka, 807 target_siginfo_t *info, 808 target_sigset_t *set, CPUX86State *env) 809 { 810 abi_ulong frame_addr; 811 struct rt_sigframe *frame; 812 int i, err = 0; 813 814 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 815 816 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) 817 goto give_sigsegv; 818 819 err |= __put_user((/*current->exec_domain 820 && current->exec_domain->signal_invmap 821 && sig < 32 822 ? current->exec_domain->signal_invmap[sig] 823 : */sig), 824 &frame->sig); 825 err |= __put_user((abi_ulong)&frame->info, &frame->pinfo); 826 err |= __put_user((abi_ulong)&frame->uc, &frame->puc); 827 err |= copy_siginfo_to_user(&frame->info, info); 828 if (err) 829 goto give_sigsegv; 830 831 /* Create the ucontext. */ 832 err |= __put_user(0, &frame->uc.tuc_flags); 833 err |= __put_user(0, &frame->uc.tuc_link); 834 err |= __put_user(target_sigaltstack_used.ss_sp, 835 &frame->uc.tuc_stack.ss_sp); 836 err |= __put_user(sas_ss_flags(get_sp_from_cpustate(env)), 837 &frame->uc.tuc_stack.ss_flags); 838 err |= __put_user(target_sigaltstack_used.ss_size, 839 &frame->uc.tuc_stack.ss_size); 840 err |= setup_sigcontext(&frame->uc.tuc_mcontext, &frame->fpstate, 841 env, set->sig[0]); 842 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 843 if (__put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i])) 844 goto give_sigsegv; 845 } 846 847 /* Set up to return from userspace. If provided, use a stub 848 already in userspace. */ 849 if (ka->sa.sa_flags & TARGET_SA_RESTORER) { 850 err |= __put_user(ka->sa.sa_restorer, &frame->pretcode); 851 } else { 852 uint16_t val16; 853 854 err |= __put_user(frame->retcode, &frame->pretcode); 855 /* This is movl $,%eax ; int $0x80 */ 856 err |= __put_user(0xb8, (char *)(frame->retcode+0)); 857 err |= __put_user(TARGET_NR_rt_sigreturn, (int *)(frame->retcode+1)); 858 val16 = 0x80cd; 859 err |= __put_user(val16, (uint16_t *)(frame->retcode+5)); 860 } 861 862 if (err) 863 goto give_sigsegv; 864 865 /* Set up registers for signal handler */ 866 env->regs[R_ESP] = (unsigned long) frame; 867 env->eip = (unsigned long) ka->sa._sa_handler; 868 869 cpu_x86_load_seg(env, R_DS, __USER_DS); 870 cpu_x86_load_seg(env, R_ES, __USER_DS); 871 cpu_x86_load_seg(env, R_SS, __USER_DS); 872 cpu_x86_load_seg(env, R_CS, __USER_CS); 873 env->eflags &= ~TF_MASK; 874 875 unlock_user_struct(frame, frame_addr, 1); 876 877 return; 878 879 give_sigsegv: 880 unlock_user_struct(frame, frame_addr, 1); 881 if (sig == TARGET_SIGSEGV) 882 ka->sa._sa_handler = TARGET_SIG_DFL; 883 force_sig(TARGET_SIGSEGV /* , current */); 884 } 885 886 static int 887 restore_sigcontext(CPUX86State *env, struct target_sigcontext *sc, int *peax) 888 { 889 unsigned int err = 0; 890 891 cpu_x86_load_seg(env, R_GS, lduw(&sc->gs)); 892 cpu_x86_load_seg(env, R_FS, lduw(&sc->fs)); 893 cpu_x86_load_seg(env, R_ES, lduw(&sc->es)); 894 cpu_x86_load_seg(env, R_DS, lduw(&sc->ds)); 895 896 env->regs[R_EDI] = ldl(&sc->edi); 897 env->regs[R_ESI] = ldl(&sc->esi); 898 env->regs[R_EBP] = ldl(&sc->ebp); 899 env->regs[R_ESP] = ldl(&sc->esp); 900 env->regs[R_EBX] = ldl(&sc->ebx); 901 env->regs[R_EDX] = ldl(&sc->edx); 902 env->regs[R_ECX] = ldl(&sc->ecx); 903 env->eip = ldl(&sc->eip); 904 905 cpu_x86_load_seg(env, R_CS, lduw(&sc->cs) | 3); 906 cpu_x86_load_seg(env, R_SS, lduw(&sc->ss) | 3); 907 908 { 909 unsigned int tmpflags; 910 tmpflags = ldl(&sc->eflags); 911 env->eflags = (env->eflags & ~0x40DD5) | (tmpflags & 0x40DD5); 912 // regs->orig_eax = -1; /* disable syscall checks */ 913 } 914 915 { 916 struct _fpstate * buf; 917 buf = (void *)ldl(&sc->fpstate); 918 if (buf) { 919 #if 0 920 if (verify_area(VERIFY_READ, buf, sizeof(*buf))) 921 goto badframe; 922 #endif 923 cpu_x86_frstor(env, (void *)buf, 1); 924 } 925 } 926 927 *peax = ldl(&sc->eax); 928 return err; 929 #if 0 930 badframe: 931 return 1; 932 #endif 933 } 934 935 long do_sigreturn(CPUX86State *env) 936 { 937 struct sigframe *frame; 938 abi_ulong frame_addr = env->regs[R_ESP] - 8; 939 target_sigset_t target_set; 940 sigset_t set; 941 int eax, i; 942 943 #if defined(DEBUG_SIGNAL) 944 fprintf(stderr, "do_sigreturn\n"); 945 #endif 946 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) 947 goto badframe; 948 /* set blocked signals */ 949 if (__get_user(target_set.sig[0], &frame->sc.oldmask)) 950 goto badframe; 951 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 952 if (__get_user(target_set.sig[i], &frame->extramask[i - 1])) 953 goto badframe; 954 } 955 956 target_to_host_sigset_internal(&set, &target_set); 957 sigprocmask(SIG_SETMASK, &set, NULL); 958 959 /* restore registers */ 960 if (restore_sigcontext(env, &frame->sc, &eax)) 961 goto badframe; 962 unlock_user_struct(frame, frame_addr, 0); 963 return eax; 964 965 badframe: 966 unlock_user_struct(frame, frame_addr, 0); 967 force_sig(TARGET_SIGSEGV); 968 return 0; 969 } 970 971 long do_rt_sigreturn(CPUX86State *env) 972 { 973 struct rt_sigframe *frame = (struct rt_sigframe *)g2h(env->regs[R_ESP] - 4); 974 sigset_t set; 975 int eax; 976 977 #if 0 978 if (verify_area(VERIFY_READ, frame, sizeof(*frame))) 979 goto badframe; 980 #endif 981 target_to_host_sigset(&set, &frame->uc.tuc_sigmask); 982 sigprocmask(SIG_SETMASK, &set, NULL); 983 984 if (restore_sigcontext(env, &frame->uc.tuc_mcontext, &eax)) 985 goto badframe; 986 987 if (do_sigaltstack(h2g(&frame->uc.tuc_stack), 0, get_sp_from_cpustate(env)) == -EFAULT) 988 goto badframe; 989 990 return eax; 991 992 badframe: 993 force_sig(TARGET_SIGSEGV); 994 return 0; 995 } 996 997 #elif defined(TARGET_ARM) 998 999 struct target_sigcontext { 1000 abi_ulong trap_no; 1001 abi_ulong error_code; 1002 abi_ulong oldmask; 1003 abi_ulong arm_r0; 1004 abi_ulong arm_r1; 1005 abi_ulong arm_r2; 1006 abi_ulong arm_r3; 1007 abi_ulong arm_r4; 1008 abi_ulong arm_r5; 1009 abi_ulong arm_r6; 1010 abi_ulong arm_r7; 1011 abi_ulong arm_r8; 1012 abi_ulong arm_r9; 1013 abi_ulong arm_r10; 1014 abi_ulong arm_fp; 1015 abi_ulong arm_ip; 1016 abi_ulong arm_sp; 1017 abi_ulong arm_lr; 1018 abi_ulong arm_pc; 1019 abi_ulong arm_cpsr; 1020 abi_ulong fault_address; 1021 }; 1022 1023 struct target_ucontext { 1024 abi_ulong tuc_flags; 1025 abi_ulong tuc_link; 1026 target_stack_t tuc_stack; 1027 struct target_sigcontext tuc_mcontext; 1028 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 1029 }; 1030 1031 struct sigframe 1032 { 1033 struct target_sigcontext sc; 1034 abi_ulong extramask[TARGET_NSIG_WORDS-1]; 1035 abi_ulong retcode; 1036 }; 1037 1038 struct rt_sigframe 1039 { 1040 struct target_siginfo *pinfo; 1041 void *puc; 1042 struct target_siginfo info; 1043 struct target_ucontext uc; 1044 abi_ulong retcode; 1045 }; 1046 1047 #define TARGET_CONFIG_CPU_32 1 1048 1049 /* 1050 * For ARM syscalls, we encode the syscall number into the instruction. 1051 */ 1052 #define SWI_SYS_SIGRETURN (0xef000000|(TARGET_NR_sigreturn + ARM_SYSCALL_BASE)) 1053 #define SWI_SYS_RT_SIGRETURN (0xef000000|(TARGET_NR_rt_sigreturn + ARM_SYSCALL_BASE)) 1054 1055 /* 1056 * For Thumb syscalls, we pass the syscall number via r7. We therefore 1057 * need two 16-bit instructions. 1058 */ 1059 #define SWI_THUMB_SIGRETURN (0xdf00 << 16 | 0x2700 | (TARGET_NR_sigreturn)) 1060 #define SWI_THUMB_RT_SIGRETURN (0xdf00 << 16 | 0x2700 | (TARGET_NR_rt_sigreturn)) 1061 1062 static const abi_ulong retcodes[4] = { 1063 SWI_SYS_SIGRETURN, SWI_THUMB_SIGRETURN, 1064 SWI_SYS_RT_SIGRETURN, SWI_THUMB_RT_SIGRETURN 1065 }; 1066 1067 1068 #define __put_user_error(x,p,e) __put_user(x, p) 1069 #define __get_user_error(x,p,e) __get_user(x, p) 1070 1071 static inline int valid_user_regs(CPUState *regs) 1072 { 1073 return 1; 1074 } 1075 1076 static int 1077 setup_sigcontext(struct target_sigcontext *sc, /*struct _fpstate *fpstate,*/ 1078 CPUState *env, unsigned long mask) 1079 { 1080 int err = 0; 1081 1082 __put_user_error(env->regs[0], &sc->arm_r0, err); 1083 __put_user_error(env->regs[1], &sc->arm_r1, err); 1084 __put_user_error(env->regs[2], &sc->arm_r2, err); 1085 __put_user_error(env->regs[3], &sc->arm_r3, err); 1086 __put_user_error(env->regs[4], &sc->arm_r4, err); 1087 __put_user_error(env->regs[5], &sc->arm_r5, err); 1088 __put_user_error(env->regs[6], &sc->arm_r6, err); 1089 __put_user_error(env->regs[7], &sc->arm_r7, err); 1090 __put_user_error(env->regs[8], &sc->arm_r8, err); 1091 __put_user_error(env->regs[9], &sc->arm_r9, err); 1092 __put_user_error(env->regs[10], &sc->arm_r10, err); 1093 __put_user_error(env->regs[11], &sc->arm_fp, err); 1094 __put_user_error(env->regs[12], &sc->arm_ip, err); 1095 __put_user_error(env->regs[13], &sc->arm_sp, err); 1096 __put_user_error(env->regs[14], &sc->arm_lr, err); 1097 __put_user_error(env->regs[15], &sc->arm_pc, err); 1098 #ifdef TARGET_CONFIG_CPU_32 1099 __put_user_error(cpsr_read(env), &sc->arm_cpsr, err); 1100 #endif 1101 1102 __put_user_error(/* current->thread.trap_no */ 0, &sc->trap_no, err); 1103 __put_user_error(/* current->thread.error_code */ 0, &sc->error_code, err); 1104 __put_user_error(/* current->thread.address */ 0, &sc->fault_address, err); 1105 __put_user_error(mask, &sc->oldmask, err); 1106 1107 return err; 1108 } 1109 1110 static inline abi_ulong 1111 get_sigframe(struct emulated_sigaction *ka, CPUState *regs, int framesize) 1112 { 1113 unsigned long sp = regs->regs[13]; 1114 1115 /* 1116 * This is the X/Open sanctioned signal stack switching. 1117 */ 1118 if ((ka->sa.sa_flags & TARGET_SA_ONSTACK) && !sas_ss_flags(sp)) 1119 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 1120 /* 1121 * ATPCS B01 mandates 8-byte alignment 1122 */ 1123 return (sp - framesize) & ~7; 1124 } 1125 1126 static int 1127 setup_return(CPUState *env, struct emulated_sigaction *ka, 1128 abi_ulong *rc, void *frame, int usig) 1129 { 1130 abi_ulong handler = (abi_ulong)ka->sa._sa_handler; 1131 abi_ulong retcode; 1132 int thumb = 0; 1133 #if defined(TARGET_CONFIG_CPU_32) 1134 #if 0 1135 abi_ulong cpsr = env->cpsr; 1136 1137 /* 1138 * Maybe we need to deliver a 32-bit signal to a 26-bit task. 1139 */ 1140 if (ka->sa.sa_flags & SA_THIRTYTWO) 1141 cpsr = (cpsr & ~MODE_MASK) | USR_MODE; 1142 1143 #ifdef CONFIG_ARM_THUMB 1144 if (elf_hwcap & HWCAP_THUMB) { 1145 /* 1146 * The LSB of the handler determines if we're going to 1147 * be using THUMB or ARM mode for this signal handler. 1148 */ 1149 thumb = handler & 1; 1150 1151 if (thumb) 1152 cpsr |= T_BIT; 1153 else 1154 cpsr &= ~T_BIT; 1155 } 1156 #endif /* CONFIG_ARM_THUMB */ 1157 #endif /* 0 */ 1158 #endif /* TARGET_CONFIG_CPU_32 */ 1159 1160 if (ka->sa.sa_flags & TARGET_SA_RESTORER) { 1161 retcode = (abi_ulong)ka->sa.sa_restorer; 1162 } else { 1163 unsigned int idx = thumb; 1164 1165 if (ka->sa.sa_flags & TARGET_SA_SIGINFO) 1166 idx += 2; 1167 1168 if (__put_user(retcodes[idx], rc)) 1169 return 1; 1170 #if 0 1171 flush_icache_range((abi_ulong)rc, 1172 (abi_ulong)(rc + 1)); 1173 #endif 1174 retcode = ((abi_ulong)rc) + thumb; 1175 } 1176 1177 env->regs[0] = usig; 1178 env->regs[13] = h2g(frame); 1179 env->regs[14] = retcode; 1180 env->regs[15] = handler & (thumb ? ~1 : ~3); 1181 1182 #if 0 1183 #ifdef TARGET_CONFIG_CPU_32 1184 env->cpsr = cpsr; 1185 #endif 1186 #endif 1187 1188 return 0; 1189 } 1190 1191 /* compare linux/arch/arm/kernel/signal.c:setup_frame() */ 1192 static void setup_frame(int usig, struct emulated_sigaction *ka, 1193 target_sigset_t *set, CPUState *regs) 1194 { 1195 struct sigframe *frame; 1196 abi_ulong frame_addr = get_sigframe(ka, regs, sizeof(*frame)); 1197 int i, err = 0; 1198 1199 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) 1200 return; 1201 1202 err |= setup_sigcontext(&frame->sc, /*&frame->fpstate,*/ regs, set->sig[0]); 1203 1204 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 1205 if (__put_user(set->sig[i], &frame->extramask[i - 1])) 1206 goto end; 1207 } 1208 1209 if (err == 0) 1210 err = setup_return(regs, ka, &frame->retcode, frame, usig); 1211 1212 end: 1213 unlock_user_struct(frame, frame_addr, 1); 1214 // return err; 1215 } 1216 1217 /* compare linux/arch/arm/kernel/signal.c:setup_rt_frame() */ 1218 static void setup_rt_frame(int usig, struct emulated_sigaction *ka, 1219 target_siginfo_t *info, 1220 target_sigset_t *set, CPUState *env) 1221 { 1222 struct rt_sigframe *frame; 1223 abi_ulong frame_addr = get_sigframe(ka, env, sizeof(*frame)); 1224 struct target_sigaltstack stack; 1225 int i, err = 0; 1226 1227 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) 1228 return /* 1 */; 1229 1230 __put_user_error(&frame->info, (abi_ulong *)&frame->pinfo, err); 1231 __put_user_error(&frame->uc, (abi_ulong *)&frame->puc, err); 1232 err |= copy_siginfo_to_user(&frame->info, info); 1233 1234 /* Clear all the bits of the ucontext we don't use. */ 1235 memset(&frame->uc, 0, offsetof(struct target_ucontext, tuc_mcontext)); 1236 1237 memset(&stack, 0, sizeof(stack)); 1238 __put_user(target_sigaltstack_used.ss_sp, &stack.ss_sp); 1239 __put_user(target_sigaltstack_used.ss_size, &stack.ss_size); 1240 __put_user(sas_ss_flags(get_sp_from_cpustate(env)), &stack.ss_flags); 1241 memcpy(&frame->uc.tuc_stack, &stack, sizeof(stack)); 1242 1243 err |= setup_sigcontext(&frame->uc.tuc_mcontext, /*&frame->fpstate,*/ 1244 env, set->sig[0]); 1245 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 1246 if (__put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i])) 1247 goto end; 1248 } 1249 1250 if (err == 0) 1251 err = setup_return(env, ka, &frame->retcode, frame, usig); 1252 1253 if (err == 0) { 1254 /* 1255 * For realtime signals we must also set the second and third 1256 * arguments for the signal handler. 1257 * -- Peter Maydell <pmaydell@chiark.greenend.org.uk> 2000-12-06 1258 */ 1259 env->regs[1] = (abi_ulong)frame->pinfo; 1260 env->regs[2] = (abi_ulong)frame->puc; 1261 } 1262 1263 end: 1264 unlock_user_struct(frame, frame_addr, 1); 1265 1266 // return err; 1267 } 1268 1269 static int 1270 restore_sigcontext(CPUState *env, struct target_sigcontext *sc) 1271 { 1272 int err = 0; 1273 uint32_t cpsr; 1274 1275 __get_user_error(env->regs[0], &sc->arm_r0, err); 1276 __get_user_error(env->regs[1], &sc->arm_r1, err); 1277 __get_user_error(env->regs[2], &sc->arm_r2, err); 1278 __get_user_error(env->regs[3], &sc->arm_r3, err); 1279 __get_user_error(env->regs[4], &sc->arm_r4, err); 1280 __get_user_error(env->regs[5], &sc->arm_r5, err); 1281 __get_user_error(env->regs[6], &sc->arm_r6, err); 1282 __get_user_error(env->regs[7], &sc->arm_r7, err); 1283 __get_user_error(env->regs[8], &sc->arm_r8, err); 1284 __get_user_error(env->regs[9], &sc->arm_r9, err); 1285 __get_user_error(env->regs[10], &sc->arm_r10, err); 1286 __get_user_error(env->regs[11], &sc->arm_fp, err); 1287 __get_user_error(env->regs[12], &sc->arm_ip, err); 1288 __get_user_error(env->regs[13], &sc->arm_sp, err); 1289 __get_user_error(env->regs[14], &sc->arm_lr, err); 1290 __get_user_error(env->regs[15], &sc->arm_pc, err); 1291 #ifdef TARGET_CONFIG_CPU_32 1292 __get_user_error(cpsr, &sc->arm_cpsr, err); 1293 cpsr_write(env, cpsr, 0xffffffff); 1294 #endif 1295 1296 err |= !valid_user_regs(env); 1297 1298 return err; 1299 } 1300 1301 long do_sigreturn(CPUState *env) 1302 { 1303 struct sigframe *frame; 1304 target_sigset_t set; 1305 sigset_t host_set; 1306 int i; 1307 1308 /* 1309 * Since we stacked the signal on a 64-bit boundary, 1310 * then 'sp' should be word aligned here. If it's 1311 * not, then the user is trying to mess with us. 1312 */ 1313 if (env->regs[13] & 7) 1314 goto badframe; 1315 1316 frame = (struct sigframe *)g2h(env->regs[13]); 1317 1318 #if 0 1319 if (verify_area(VERIFY_READ, frame, sizeof (*frame))) 1320 goto badframe; 1321 #endif 1322 if (__get_user(set.sig[0], &frame->sc.oldmask)) 1323 goto badframe; 1324 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 1325 if (__get_user(set.sig[i], &frame->extramask[i - 1])) 1326 goto badframe; 1327 } 1328 1329 target_to_host_sigset_internal(&host_set, &set); 1330 sigprocmask(SIG_SETMASK, &host_set, NULL); 1331 1332 if (restore_sigcontext(env, &frame->sc)) 1333 goto badframe; 1334 1335 #if 0 1336 /* Send SIGTRAP if we're single-stepping */ 1337 if (ptrace_cancel_bpt(current)) 1338 send_sig(SIGTRAP, current, 1); 1339 #endif 1340 return env->regs[0]; 1341 1342 badframe: 1343 force_sig(SIGSEGV /* , current */); 1344 return 0; 1345 } 1346 1347 long do_rt_sigreturn(CPUState *env) 1348 { 1349 struct rt_sigframe *frame; 1350 sigset_t host_set; 1351 1352 /* 1353 * Since we stacked the signal on a 64-bit boundary, 1354 * then 'sp' should be word aligned here. If it's 1355 * not, then the user is trying to mess with us. 1356 */ 1357 if (env->regs[13] & 7) 1358 goto badframe; 1359 1360 frame = (struct rt_sigframe *)env->regs[13]; 1361 1362 #if 0 1363 if (verify_area(VERIFY_READ, frame, sizeof (*frame))) 1364 goto badframe; 1365 #endif 1366 target_to_host_sigset(&host_set, &frame->uc.tuc_sigmask); 1367 sigprocmask(SIG_SETMASK, &host_set, NULL); 1368 1369 if (restore_sigcontext(env, &frame->uc.tuc_mcontext)) 1370 goto badframe; 1371 1372 if (do_sigaltstack(h2g(&frame->uc.tuc_stack), 0, get_sp_from_cpustate(env)) == -EFAULT) 1373 goto badframe; 1374 1375 #if 0 1376 /* Send SIGTRAP if we're single-stepping */ 1377 if (ptrace_cancel_bpt(current)) 1378 send_sig(SIGTRAP, current, 1); 1379 #endif 1380 return env->regs[0]; 1381 1382 badframe: 1383 force_sig(SIGSEGV /* , current */); 1384 return 0; 1385 } 1386 1387 #elif defined(TARGET_SPARC) 1388 1389 #define __SUNOS_MAXWIN 31 1390 1391 /* This is what SunOS does, so shall I. */ 1392 struct target_sigcontext { 1393 abi_ulong sigc_onstack; /* state to restore */ 1394 1395 abi_ulong sigc_mask; /* sigmask to restore */ 1396 abi_ulong sigc_sp; /* stack pointer */ 1397 abi_ulong sigc_pc; /* program counter */ 1398 abi_ulong sigc_npc; /* next program counter */ 1399 abi_ulong sigc_psr; /* for condition codes etc */ 1400 abi_ulong sigc_g1; /* User uses these two registers */ 1401 abi_ulong sigc_o0; /* within the trampoline code. */ 1402 1403 /* Now comes information regarding the users window set 1404 * at the time of the signal. 1405 */ 1406 abi_ulong sigc_oswins; /* outstanding windows */ 1407 1408 /* stack ptrs for each regwin buf */ 1409 char *sigc_spbuf[__SUNOS_MAXWIN]; 1410 1411 /* Windows to restore after signal */ 1412 struct { 1413 abi_ulong locals[8]; 1414 abi_ulong ins[8]; 1415 } sigc_wbuf[__SUNOS_MAXWIN]; 1416 }; 1417 /* A Sparc stack frame */ 1418 struct sparc_stackf { 1419 abi_ulong locals[8]; 1420 abi_ulong ins[6]; 1421 struct sparc_stackf *fp; 1422 abi_ulong callers_pc; 1423 char *structptr; 1424 abi_ulong xargs[6]; 1425 abi_ulong xxargs[1]; 1426 }; 1427 1428 typedef struct { 1429 struct { 1430 abi_ulong psr; 1431 abi_ulong pc; 1432 abi_ulong npc; 1433 abi_ulong y; 1434 abi_ulong u_regs[16]; /* globals and ins */ 1435 } si_regs; 1436 int si_mask; 1437 } __siginfo_t; 1438 1439 typedef struct { 1440 unsigned long si_float_regs [32]; 1441 unsigned long si_fsr; 1442 unsigned long si_fpqdepth; 1443 struct { 1444 unsigned long *insn_addr; 1445 unsigned long insn; 1446 } si_fpqueue [16]; 1447 } qemu_siginfo_fpu_t; 1448 1449 1450 struct target_signal_frame { 1451 struct sparc_stackf ss; 1452 __siginfo_t info; 1453 qemu_siginfo_fpu_t *fpu_save; 1454 abi_ulong insns[2] __attribute__ ((aligned (8))); 1455 abi_ulong extramask[TARGET_NSIG_WORDS - 1]; 1456 abi_ulong extra_size; /* Should be 0 */ 1457 qemu_siginfo_fpu_t fpu_state; 1458 }; 1459 struct target_rt_signal_frame { 1460 struct sparc_stackf ss; 1461 siginfo_t info; 1462 abi_ulong regs[20]; 1463 sigset_t mask; 1464 qemu_siginfo_fpu_t *fpu_save; 1465 unsigned int insns[2]; 1466 stack_t stack; 1467 unsigned int extra_size; /* Should be 0 */ 1468 qemu_siginfo_fpu_t fpu_state; 1469 }; 1470 1471 #define UREG_O0 16 1472 #define UREG_O6 22 1473 #define UREG_I0 0 1474 #define UREG_I1 1 1475 #define UREG_I2 2 1476 #define UREG_I3 3 1477 #define UREG_I4 4 1478 #define UREG_I5 5 1479 #define UREG_I6 6 1480 #define UREG_I7 7 1481 #define UREG_L0 8 1482 #define UREG_FP UREG_I6 1483 #define UREG_SP UREG_O6 1484 1485 static inline abi_ulong get_sigframe(struct emulated_sigaction *sa, 1486 CPUState *env, unsigned long framesize) 1487 { 1488 abi_ulong sp; 1489 1490 sp = env->regwptr[UREG_FP]; 1491 1492 /* This is the X/Open sanctioned signal stack switching. */ 1493 if (sa->sa.sa_flags & TARGET_SA_ONSTACK) { 1494 if (!on_sig_stack(sp) 1495 && !((target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size) & 7)) 1496 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 1497 } 1498 return sp - framesize; 1499 } 1500 1501 static int 1502 setup___siginfo(__siginfo_t *si, CPUState *env, abi_ulong mask) 1503 { 1504 int err = 0, i; 1505 1506 err |= __put_user(env->psr, &si->si_regs.psr); 1507 err |= __put_user(env->pc, &si->si_regs.pc); 1508 err |= __put_user(env->npc, &si->si_regs.npc); 1509 err |= __put_user(env->y, &si->si_regs.y); 1510 for (i=0; i < 8; i++) { 1511 err |= __put_user(env->gregs[i], &si->si_regs.u_regs[i]); 1512 } 1513 for (i=0; i < 8; i++) { 1514 err |= __put_user(env->regwptr[UREG_I0 + i], &si->si_regs.u_regs[i+8]); 1515 } 1516 err |= __put_user(mask, &si->si_mask); 1517 return err; 1518 } 1519 1520 #if 0 1521 static int 1522 setup_sigcontext(struct target_sigcontext *sc, /*struct _fpstate *fpstate,*/ 1523 CPUState *env, unsigned long mask) 1524 { 1525 int err = 0; 1526 1527 err |= __put_user(mask, &sc->sigc_mask); 1528 err |= __put_user(env->regwptr[UREG_SP], &sc->sigc_sp); 1529 err |= __put_user(env->pc, &sc->sigc_pc); 1530 err |= __put_user(env->npc, &sc->sigc_npc); 1531 err |= __put_user(env->psr, &sc->sigc_psr); 1532 err |= __put_user(env->gregs[1], &sc->sigc_g1); 1533 err |= __put_user(env->regwptr[UREG_O0], &sc->sigc_o0); 1534 1535 return err; 1536 } 1537 #endif 1538 #define NF_ALIGNEDSZ (((sizeof(struct target_signal_frame) + 7) & (~7))) 1539 1540 static void setup_frame(int sig, struct emulated_sigaction *ka, 1541 target_sigset_t *set, CPUState *env) 1542 { 1543 abi_ulong sf_addr; 1544 struct target_signal_frame *sf; 1545 int sigframe_size, err, i; 1546 1547 /* 1. Make sure everything is clean */ 1548 //synchronize_user_stack(); 1549 1550 sigframe_size = NF_ALIGNEDSZ; 1551 sf_addr = get_sigframe(ka, env, sigframe_size); 1552 1553 sf = lock_user(VERIFY_WRITE, sf_addr, 1554 sizeof(struct target_signal_frame), 0); 1555 if (!sf) 1556 goto sigsegv; 1557 1558 //fprintf(stderr, "sf: %x pc %x fp %x sp %x\n", sf, env->pc, env->regwptr[UREG_FP], env->regwptr[UREG_SP]); 1559 #if 0 1560 if (invalid_frame_pointer(sf, sigframe_size)) 1561 goto sigill_and_return; 1562 #endif 1563 /* 2. Save the current process state */ 1564 err = setup___siginfo(&sf->info, env, set->sig[0]); 1565 err |= __put_user(0, &sf->extra_size); 1566 1567 //err |= save_fpu_state(regs, &sf->fpu_state); 1568 //err |= __put_user(&sf->fpu_state, &sf->fpu_save); 1569 1570 err |= __put_user(set->sig[0], &sf->info.si_mask); 1571 for (i = 0; i < TARGET_NSIG_WORDS - 1; i++) { 1572 err |= __put_user(set->sig[i + 1], &sf->extramask[i]); 1573 } 1574 1575 for (i = 0; i < 8; i++) { 1576 err |= __put_user(env->regwptr[i + UREG_L0], &sf->ss.locals[i]); 1577 } 1578 for (i = 0; i < 8; i++) { 1579 err |= __put_user(env->regwptr[i + UREG_I0], &sf->ss.ins[i]); 1580 } 1581 if (err) 1582 goto sigsegv; 1583 1584 /* 3. signal handler back-trampoline and parameters */ 1585 env->regwptr[UREG_FP] = sf_addr; 1586 env->regwptr[UREG_I0] = sig; 1587 env->regwptr[UREG_I1] = sf_addr + 1588 offsetof(struct target_signal_frame, info); 1589 env->regwptr[UREG_I2] = sf_addr + 1590 offsetof(struct target_signal_frame, info); 1591 1592 /* 4. signal handler */ 1593 env->pc = ka->sa._sa_handler; 1594 env->npc = (env->pc + 4); 1595 /* 5. return to kernel instructions */ 1596 if (ka->sa.sa_restorer) 1597 env->regwptr[UREG_I7] = ka->sa.sa_restorer; 1598 else { 1599 uint32_t val32; 1600 1601 env->regwptr[UREG_I7] = sf_addr + 1602 offsetof(struct target_signal_frame, insns) - 2 * 4; 1603 1604 /* mov __NR_sigreturn, %g1 */ 1605 val32 = 0x821020d8; 1606 err |= __put_user(val32, &sf->insns[0]); 1607 1608 /* t 0x10 */ 1609 val32 = 0x91d02010; 1610 err |= __put_user(val32, &sf->insns[1]); 1611 if (err) 1612 goto sigsegv; 1613 1614 /* Flush instruction space. */ 1615 //flush_sig_insns(current->mm, (unsigned long) &(sf->insns[0])); 1616 // tb_flush(env); 1617 } 1618 unlock_user(sf, sf_addr, sizeof(struct target_signal_frame)); 1619 return; 1620 #if 0 1621 sigill_and_return: 1622 force_sig(TARGET_SIGILL); 1623 #endif 1624 sigsegv: 1625 //fprintf(stderr, "force_sig\n"); 1626 unlock_user(sf, sf_addr, sizeof(struct target_signal_frame)); 1627 force_sig(TARGET_SIGSEGV); 1628 } 1629 static inline int 1630 restore_fpu_state(CPUState *env, qemu_siginfo_fpu_t *fpu) 1631 { 1632 int err; 1633 #if 0 1634 #ifdef CONFIG_SMP 1635 if (current->flags & PF_USEDFPU) 1636 regs->psr &= ~PSR_EF; 1637 #else 1638 if (current == last_task_used_math) { 1639 last_task_used_math = 0; 1640 regs->psr &= ~PSR_EF; 1641 } 1642 #endif 1643 current->used_math = 1; 1644 current->flags &= ~PF_USEDFPU; 1645 #endif 1646 #if 0 1647 if (verify_area (VERIFY_READ, fpu, sizeof(*fpu))) 1648 return -EFAULT; 1649 #endif 1650 1651 #if 0 1652 /* XXX: incorrect */ 1653 err = __copy_from_user(&env->fpr[0], &fpu->si_float_regs[0], 1654 (sizeof(unsigned long) * 32)); 1655 #endif 1656 err |= __get_user(env->fsr, &fpu->si_fsr); 1657 #if 0 1658 err |= __get_user(current->thread.fpqdepth, &fpu->si_fpqdepth); 1659 if (current->thread.fpqdepth != 0) 1660 err |= __copy_from_user(¤t->thread.fpqueue[0], 1661 &fpu->si_fpqueue[0], 1662 ((sizeof(unsigned long) + 1663 (sizeof(unsigned long *)))*16)); 1664 #endif 1665 return err; 1666 } 1667 1668 1669 static void setup_rt_frame(int sig, struct emulated_sigaction *ka, 1670 target_siginfo_t *info, 1671 target_sigset_t *set, CPUState *env) 1672 { 1673 fprintf(stderr, "setup_rt_frame: not implemented\n"); 1674 } 1675 1676 long do_sigreturn(CPUState *env) 1677 { 1678 struct target_signal_frame *sf; 1679 uint32_t up_psr, pc, npc; 1680 target_sigset_t set; 1681 sigset_t host_set; 1682 abi_ulong fpu_save; 1683 int err, i; 1684 1685 sf = (struct target_signal_frame *)g2h(env->regwptr[UREG_FP]); 1686 #if 0 1687 fprintf(stderr, "sigreturn\n"); 1688 fprintf(stderr, "sf: %x pc %x fp %x sp %x\n", sf, env->pc, env->regwptr[UREG_FP], env->regwptr[UREG_SP]); 1689 #endif 1690 //cpu_dump_state(env, stderr, fprintf, 0); 1691 1692 /* 1. Make sure we are not getting garbage from the user */ 1693 #if 0 1694 if (verify_area (VERIFY_READ, sf, sizeof (*sf))) 1695 goto segv_and_exit; 1696 #endif 1697 1698 if (((uint) sf) & 3) 1699 goto segv_and_exit; 1700 1701 err = __get_user(pc, &sf->info.si_regs.pc); 1702 err |= __get_user(npc, &sf->info.si_regs.npc); 1703 1704 if ((pc | npc) & 3) 1705 goto segv_and_exit; 1706 1707 /* 2. Restore the state */ 1708 err |= __get_user(up_psr, &sf->info.si_regs.psr); 1709 1710 /* User can only change condition codes and FPU enabling in %psr. */ 1711 env->psr = (up_psr & (PSR_ICC /* | PSR_EF */)) 1712 | (env->psr & ~(PSR_ICC /* | PSR_EF */)); 1713 1714 env->pc = pc; 1715 env->npc = npc; 1716 err |= __get_user(env->y, &sf->info.si_regs.y); 1717 for (i=0; i < 8; i++) { 1718 err |= __get_user(env->gregs[i], &sf->info.si_regs.u_regs[i]); 1719 } 1720 for (i=0; i < 8; i++) { 1721 err |= __get_user(env->regwptr[i + UREG_I0], &sf->info.si_regs.u_regs[i+8]); 1722 } 1723 1724 err |= __get_user(fpu_save, (abi_ulong *)&sf->fpu_save); 1725 1726 //if (fpu_save) 1727 // err |= restore_fpu_state(env, fpu_save); 1728 1729 /* This is pretty much atomic, no amount locking would prevent 1730 * the races which exist anyways. 1731 */ 1732 err |= __get_user(set.sig[0], &sf->info.si_mask); 1733 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 1734 err |= (__get_user(set.sig[i], &sf->extramask[i - 1])); 1735 } 1736 1737 target_to_host_sigset_internal(&host_set, &set); 1738 sigprocmask(SIG_SETMASK, &host_set, NULL); 1739 1740 if (err) 1741 goto segv_and_exit; 1742 1743 return env->regwptr[0]; 1744 1745 segv_and_exit: 1746 force_sig(TARGET_SIGSEGV); 1747 } 1748 1749 long do_rt_sigreturn(CPUState *env) 1750 { 1751 fprintf(stderr, "do_rt_sigreturn: not implemented\n"); 1752 return -ENOSYS; 1753 } 1754 1755 #if defined(TARGET_SPARC64) && !defined(TARGET_ABI32) 1756 #define MC_TSTATE 0 1757 #define MC_PC 1 1758 #define MC_NPC 2 1759 #define MC_Y 3 1760 #define MC_G1 4 1761 #define MC_G2 5 1762 #define MC_G3 6 1763 #define MC_G4 7 1764 #define MC_G5 8 1765 #define MC_G6 9 1766 #define MC_G7 10 1767 #define MC_O0 11 1768 #define MC_O1 12 1769 #define MC_O2 13 1770 #define MC_O3 14 1771 #define MC_O4 15 1772 #define MC_O5 16 1773 #define MC_O6 17 1774 #define MC_O7 18 1775 #define MC_NGREG 19 1776 1777 typedef abi_ulong target_mc_greg_t; 1778 typedef target_mc_greg_t target_mc_gregset_t[MC_NGREG]; 1779 1780 struct target_mc_fq { 1781 abi_ulong *mcfq_addr; 1782 uint32_t mcfq_insn; 1783 }; 1784 1785 struct target_mc_fpu { 1786 union { 1787 uint32_t sregs[32]; 1788 uint64_t dregs[32]; 1789 //uint128_t qregs[16]; 1790 } mcfpu_fregs; 1791 abi_ulong mcfpu_fsr; 1792 abi_ulong mcfpu_fprs; 1793 abi_ulong mcfpu_gsr; 1794 struct target_mc_fq *mcfpu_fq; 1795 unsigned char mcfpu_qcnt; 1796 unsigned char mcfpu_qentsz; 1797 unsigned char mcfpu_enab; 1798 }; 1799 typedef struct target_mc_fpu target_mc_fpu_t; 1800 1801 typedef struct { 1802 target_mc_gregset_t mc_gregs; 1803 target_mc_greg_t mc_fp; 1804 target_mc_greg_t mc_i7; 1805 target_mc_fpu_t mc_fpregs; 1806 } target_mcontext_t; 1807 1808 struct target_ucontext { 1809 struct target_ucontext *uc_link; 1810 abi_ulong uc_flags; 1811 target_sigset_t uc_sigmask; 1812 target_mcontext_t uc_mcontext; 1813 }; 1814 1815 /* A V9 register window */ 1816 struct target_reg_window { 1817 abi_ulong locals[8]; 1818 abi_ulong ins[8]; 1819 }; 1820 1821 #define TARGET_STACK_BIAS 2047 1822 1823 /* {set, get}context() needed for 64-bit SparcLinux userland. */ 1824 void sparc64_set_context(CPUSPARCState *env) 1825 { 1826 abi_ulong ucp_addr; 1827 struct target_ucontext *ucp; 1828 target_mc_gregset_t *grp; 1829 abi_ulong pc, npc, tstate; 1830 abi_ulong fp, i7, w_addr; 1831 unsigned char fenab; 1832 int err; 1833 unsigned int i; 1834 1835 ucp_addr = env->regwptr[UREG_I0]; 1836 if (!lock_user_struct(VERIFY_READ, ucp, ucp_addr, 1)) 1837 goto do_sigsegv; 1838 grp = &ucp->uc_mcontext.mc_gregs; 1839 err = __get_user(pc, &((*grp)[MC_PC])); 1840 err |= __get_user(npc, &((*grp)[MC_NPC])); 1841 if (err || ((pc | npc) & 3)) 1842 goto do_sigsegv; 1843 if (env->regwptr[UREG_I1]) { 1844 target_sigset_t target_set; 1845 sigset_t set; 1846 1847 if (TARGET_NSIG_WORDS == 1) { 1848 if (__get_user(target_set.sig[0], &ucp->uc_sigmask.sig[0])) 1849 goto do_sigsegv; 1850 } else { 1851 abi_ulong *src, *dst; 1852 src = ucp->uc_sigmask.sig; 1853 dst = target_set.sig; 1854 for (i = 0; i < sizeof(target_sigset_t) / sizeof(abi_ulong); 1855 i++, dst++, src++) 1856 err |= __get_user(*dst, src); 1857 if (err) 1858 goto do_sigsegv; 1859 } 1860 target_to_host_sigset_internal(&set, &target_set); 1861 sigprocmask(SIG_SETMASK, &set, NULL); 1862 } 1863 env->pc = pc; 1864 env->npc = npc; 1865 err |= __get_user(env->y, &((*grp)[MC_Y])); 1866 err |= __get_user(tstate, &((*grp)[MC_TSTATE])); 1867 env->asi = (tstate >> 24) & 0xff; 1868 PUT_CCR(env, tstate >> 32); 1869 PUT_CWP64(env, tstate & 0x1f); 1870 err |= __get_user(env->gregs[1], (&(*grp)[MC_G1])); 1871 err |= __get_user(env->gregs[2], (&(*grp)[MC_G2])); 1872 err |= __get_user(env->gregs[3], (&(*grp)[MC_G3])); 1873 err |= __get_user(env->gregs[4], (&(*grp)[MC_G4])); 1874 err |= __get_user(env->gregs[5], (&(*grp)[MC_G5])); 1875 err |= __get_user(env->gregs[6], (&(*grp)[MC_G6])); 1876 err |= __get_user(env->gregs[7], (&(*grp)[MC_G7])); 1877 err |= __get_user(env->regwptr[UREG_I0], (&(*grp)[MC_O0])); 1878 err |= __get_user(env->regwptr[UREG_I1], (&(*grp)[MC_O1])); 1879 err |= __get_user(env->regwptr[UREG_I2], (&(*grp)[MC_O2])); 1880 err |= __get_user(env->regwptr[UREG_I3], (&(*grp)[MC_O3])); 1881 err |= __get_user(env->regwptr[UREG_I4], (&(*grp)[MC_O4])); 1882 err |= __get_user(env->regwptr[UREG_I5], (&(*grp)[MC_O5])); 1883 err |= __get_user(env->regwptr[UREG_I6], (&(*grp)[MC_O6])); 1884 err |= __get_user(env->regwptr[UREG_I7], (&(*grp)[MC_O7])); 1885 1886 err |= __get_user(fp, &(ucp->uc_mcontext.mc_fp)); 1887 err |= __get_user(i7, &(ucp->uc_mcontext.mc_i7)); 1888 1889 w_addr = TARGET_STACK_BIAS+env->regwptr[UREG_I6]; 1890 if (put_user(fp, w_addr + offsetof(struct target_reg_window, ins[6]), 1891 abi_ulong) != 0) 1892 goto do_sigsegv; 1893 if (put_user(i7, w_addr + offsetof(struct target_reg_window, ins[7]), 1894 abi_ulong) != 0) 1895 goto do_sigsegv; 1896 err |= __get_user(fenab, &(ucp->uc_mcontext.mc_fpregs.mcfpu_enab)); 1897 err |= __get_user(env->fprs, &(ucp->uc_mcontext.mc_fpregs.mcfpu_fprs)); 1898 { 1899 uint32_t *src, *dst; 1900 src = ucp->uc_mcontext.mc_fpregs.mcfpu_fregs.sregs; 1901 dst = env->fpr; 1902 /* XXX: check that the CPU storage is the same as user context */ 1903 for (i = 0; i < 64; i++, dst++, src++) 1904 err |= __get_user(*dst, src); 1905 } 1906 err |= __get_user(env->fsr, 1907 &(ucp->uc_mcontext.mc_fpregs.mcfpu_fsr)); 1908 err |= __get_user(env->gsr, 1909 &(ucp->uc_mcontext.mc_fpregs.mcfpu_gsr)); 1910 if (err) 1911 goto do_sigsegv; 1912 unlock_user_struct(ucp, ucp_addr, 0); 1913 return; 1914 do_sigsegv: 1915 unlock_user_struct(ucp, ucp_addr, 0); 1916 force_sig(SIGSEGV); 1917 } 1918 1919 void sparc64_get_context(CPUSPARCState *env) 1920 { 1921 abi_ulong ucp_addr; 1922 struct target_ucontext *ucp; 1923 target_mc_gregset_t *grp; 1924 target_mcontext_t *mcp; 1925 abi_ulong fp, i7, w_addr; 1926 int err; 1927 unsigned int i; 1928 target_sigset_t target_set; 1929 sigset_t set; 1930 1931 ucp_addr = env->regwptr[UREG_I0]; 1932 if (!lock_user_struct(VERIFY_WRITE, ucp, ucp_addr, 0)) 1933 goto do_sigsegv; 1934 1935 mcp = &ucp->uc_mcontext; 1936 grp = &mcp->mc_gregs; 1937 1938 /* Skip over the trap instruction, first. */ 1939 env->pc = env->npc; 1940 env->npc += 4; 1941 1942 err = 0; 1943 1944 sigprocmask(0, NULL, &set); 1945 host_to_target_sigset_internal(&target_set, &set); 1946 if (TARGET_NSIG_WORDS == 1) { 1947 err |= __put_user(target_set.sig[0], 1948 (abi_ulong *)&ucp->uc_sigmask); 1949 } else { 1950 abi_ulong *src, *dst; 1951 src = target_set.sig; 1952 dst = ucp->uc_sigmask.sig; 1953 for (i = 0; i < sizeof(target_sigset_t) / sizeof(abi_ulong); 1954 i++, dst++, src++) 1955 err |= __put_user(*src, dst); 1956 if (err) 1957 goto do_sigsegv; 1958 } 1959 1960 /* XXX: tstate must be saved properly */ 1961 // err |= __put_user(env->tstate, &((*grp)[MC_TSTATE])); 1962 err |= __put_user(env->pc, &((*grp)[MC_PC])); 1963 err |= __put_user(env->npc, &((*grp)[MC_NPC])); 1964 err |= __put_user(env->y, &((*grp)[MC_Y])); 1965 err |= __put_user(env->gregs[1], &((*grp)[MC_G1])); 1966 err |= __put_user(env->gregs[2], &((*grp)[MC_G2])); 1967 err |= __put_user(env->gregs[3], &((*grp)[MC_G3])); 1968 err |= __put_user(env->gregs[4], &((*grp)[MC_G4])); 1969 err |= __put_user(env->gregs[5], &((*grp)[MC_G5])); 1970 err |= __put_user(env->gregs[6], &((*grp)[MC_G6])); 1971 err |= __put_user(env->gregs[7], &((*grp)[MC_G7])); 1972 err |= __put_user(env->regwptr[UREG_I0], &((*grp)[MC_O0])); 1973 err |= __put_user(env->regwptr[UREG_I1], &((*grp)[MC_O1])); 1974 err |= __put_user(env->regwptr[UREG_I2], &((*grp)[MC_O2])); 1975 err |= __put_user(env->regwptr[UREG_I3], &((*grp)[MC_O3])); 1976 err |= __put_user(env->regwptr[UREG_I4], &((*grp)[MC_O4])); 1977 err |= __put_user(env->regwptr[UREG_I5], &((*grp)[MC_O5])); 1978 err |= __put_user(env->regwptr[UREG_I6], &((*grp)[MC_O6])); 1979 err |= __put_user(env->regwptr[UREG_I7], &((*grp)[MC_O7])); 1980 1981 w_addr = TARGET_STACK_BIAS+env->regwptr[UREG_I6]; 1982 fp = i7 = 0; 1983 if (get_user(fp, w_addr + offsetof(struct target_reg_window, ins[6]), 1984 abi_ulong) != 0) 1985 goto do_sigsegv; 1986 if (get_user(i7, w_addr + offsetof(struct target_reg_window, ins[7]), 1987 abi_ulong) != 0) 1988 goto do_sigsegv; 1989 err |= __put_user(fp, &(mcp->mc_fp)); 1990 err |= __put_user(i7, &(mcp->mc_i7)); 1991 1992 { 1993 uint32_t *src, *dst; 1994 src = env->fpr; 1995 dst = ucp->uc_mcontext.mc_fpregs.mcfpu_fregs.sregs; 1996 /* XXX: check that the CPU storage is the same as user context */ 1997 for (i = 0; i < 64; i++, dst++, src++) 1998 err |= __put_user(*src, dst); 1999 } 2000 err |= __put_user(env->fsr, &(mcp->mc_fpregs.mcfpu_fsr)); 2001 err |= __put_user(env->gsr, &(mcp->mc_fpregs.mcfpu_gsr)); 2002 err |= __put_user(env->fprs, &(mcp->mc_fpregs.mcfpu_fprs)); 2003 2004 if (err) 2005 goto do_sigsegv; 2006 unlock_user_struct(ucp, ucp_addr, 1); 2007 return; 2008 do_sigsegv: 2009 unlock_user_struct(ucp, ucp_addr, 1); 2010 force_sig(SIGSEGV); 2011 } 2012 #endif 2013 #elif defined(TARGET_ABI_MIPSN64) 2014 2015 # warning signal handling not implemented 2016 2017 static void setup_frame(int sig, struct emulated_sigaction *ka, 2018 target_sigset_t *set, CPUState *env) 2019 { 2020 fprintf(stderr, "setup_frame: not implemented\n"); 2021 } 2022 2023 static void setup_rt_frame(int sig, struct emulated_sigaction *ka, 2024 target_siginfo_t *info, 2025 target_sigset_t *set, CPUState *env) 2026 { 2027 fprintf(stderr, "setup_rt_frame: not implemented\n"); 2028 } 2029 2030 long do_sigreturn(CPUState *env) 2031 { 2032 fprintf(stderr, "do_sigreturn: not implemented\n"); 2033 return -ENOSYS; 2034 } 2035 2036 long do_rt_sigreturn(CPUState *env) 2037 { 2038 fprintf(stderr, "do_rt_sigreturn: not implemented\n"); 2039 return -ENOSYS; 2040 } 2041 2042 #elif defined(TARGET_ABI_MIPSN32) 2043 2044 # warning signal handling not implemented 2045 2046 static void setup_frame(int sig, struct emulated_sigaction *ka, 2047 target_sigset_t *set, CPUState *env) 2048 { 2049 fprintf(stderr, "setup_frame: not implemented\n"); 2050 } 2051 2052 static void setup_rt_frame(int sig, struct emulated_sigaction *ka, 2053 target_siginfo_t *info, 2054 target_sigset_t *set, CPUState *env) 2055 { 2056 fprintf(stderr, "setup_rt_frame: not implemented\n"); 2057 } 2058 2059 long do_sigreturn(CPUState *env) 2060 { 2061 fprintf(stderr, "do_sigreturn: not implemented\n"); 2062 return -ENOSYS; 2063 } 2064 2065 long do_rt_sigreturn(CPUState *env) 2066 { 2067 fprintf(stderr, "do_rt_sigreturn: not implemented\n"); 2068 return -ENOSYS; 2069 } 2070 2071 #elif defined(TARGET_ABI_MIPSO32) 2072 2073 struct target_sigcontext { 2074 uint32_t sc_regmask; /* Unused */ 2075 uint32_t sc_status; 2076 uint64_t sc_pc; 2077 uint64_t sc_regs[32]; 2078 uint64_t sc_fpregs[32]; 2079 uint32_t sc_ownedfp; /* Unused */ 2080 uint32_t sc_fpc_csr; 2081 uint32_t sc_fpc_eir; /* Unused */ 2082 uint32_t sc_used_math; 2083 uint32_t sc_dsp; /* dsp status, was sc_ssflags */ 2084 uint64_t sc_mdhi; 2085 uint64_t sc_mdlo; 2086 target_ulong sc_hi1; /* Was sc_cause */ 2087 target_ulong sc_lo1; /* Was sc_badvaddr */ 2088 target_ulong sc_hi2; /* Was sc_sigset[4] */ 2089 target_ulong sc_lo2; 2090 target_ulong sc_hi3; 2091 target_ulong sc_lo3; 2092 }; 2093 2094 struct sigframe { 2095 uint32_t sf_ass[4]; /* argument save space for o32 */ 2096 uint32_t sf_code[2]; /* signal trampoline */ 2097 struct target_sigcontext sf_sc; 2098 target_sigset_t sf_mask; 2099 }; 2100 2101 /* Install trampoline to jump back from signal handler */ 2102 static inline int install_sigtramp(unsigned int *tramp, unsigned int syscall) 2103 { 2104 int err; 2105 2106 /* 2107 * Set up the return code ... 2108 * 2109 * li v0, __NR__foo_sigreturn 2110 * syscall 2111 */ 2112 2113 err = __put_user(0x24020000 + syscall, tramp + 0); 2114 err |= __put_user(0x0000000c , tramp + 1); 2115 /* flush_cache_sigtramp((unsigned long) tramp); */ 2116 return err; 2117 } 2118 2119 static inline int 2120 setup_sigcontext(CPUState *regs, struct target_sigcontext *sc) 2121 { 2122 int err = 0; 2123 2124 err |= __put_user(regs->PC[regs->current_tc], &sc->sc_pc); 2125 2126 #define save_gp_reg(i) do { \ 2127 err |= __put_user(regs->gpr[i][regs->current_tc], &sc->sc_regs[i]); \ 2128 } while(0) 2129 __put_user(0, &sc->sc_regs[0]); save_gp_reg(1); save_gp_reg(2); 2130 save_gp_reg(3); save_gp_reg(4); save_gp_reg(5); save_gp_reg(6); 2131 save_gp_reg(7); save_gp_reg(8); save_gp_reg(9); save_gp_reg(10); 2132 save_gp_reg(11); save_gp_reg(12); save_gp_reg(13); save_gp_reg(14); 2133 save_gp_reg(15); save_gp_reg(16); save_gp_reg(17); save_gp_reg(18); 2134 save_gp_reg(19); save_gp_reg(20); save_gp_reg(21); save_gp_reg(22); 2135 save_gp_reg(23); save_gp_reg(24); save_gp_reg(25); save_gp_reg(26); 2136 save_gp_reg(27); save_gp_reg(28); save_gp_reg(29); save_gp_reg(30); 2137 save_gp_reg(31); 2138 #undef save_gp_reg 2139 2140 err |= __put_user(regs->HI[0][regs->current_tc], &sc->sc_mdhi); 2141 err |= __put_user(regs->LO[0][regs->current_tc], &sc->sc_mdlo); 2142 2143 /* Not used yet, but might be useful if we ever have DSP suppport */ 2144 #if 0 2145 if (cpu_has_dsp) { 2146 err |= __put_user(mfhi1(), &sc->sc_hi1); 2147 err |= __put_user(mflo1(), &sc->sc_lo1); 2148 err |= __put_user(mfhi2(), &sc->sc_hi2); 2149 err |= __put_user(mflo2(), &sc->sc_lo2); 2150 err |= __put_user(mfhi3(), &sc->sc_hi3); 2151 err |= __put_user(mflo3(), &sc->sc_lo3); 2152 err |= __put_user(rddsp(DSP_MASK), &sc->sc_dsp); 2153 } 2154 /* same with 64 bit */ 2155 #ifdef CONFIG_64BIT 2156 err |= __put_user(regs->hi, &sc->sc_hi[0]); 2157 err |= __put_user(regs->lo, &sc->sc_lo[0]); 2158 if (cpu_has_dsp) { 2159 err |= __put_user(mfhi1(), &sc->sc_hi[1]); 2160 err |= __put_user(mflo1(), &sc->sc_lo[1]); 2161 err |= __put_user(mfhi2(), &sc->sc_hi[2]); 2162 err |= __put_user(mflo2(), &sc->sc_lo[2]); 2163 err |= __put_user(mfhi3(), &sc->sc_hi[3]); 2164 err |= __put_user(mflo3(), &sc->sc_lo[3]); 2165 err |= __put_user(rddsp(DSP_MASK), &sc->sc_dsp); 2166 } 2167 #endif 2168 #endif 2169 2170 #if 0 2171 err |= __put_user(!!used_math(), &sc->sc_used_math); 2172 2173 if (!used_math()) 2174 goto out; 2175 2176 /* 2177 * Save FPU state to signal context. Signal handler will "inherit" 2178 * current FPU state. 2179 */ 2180 preempt_disable(); 2181 2182 if (!is_fpu_owner()) { 2183 own_fpu(); 2184 restore_fp(current); 2185 } 2186 err |= save_fp_context(sc); 2187 2188 preempt_enable(); 2189 out: 2190 #endif 2191 return err; 2192 } 2193 2194 static inline int 2195 restore_sigcontext(CPUState *regs, struct target_sigcontext *sc) 2196 { 2197 int err = 0; 2198 2199 err |= __get_user(regs->CP0_EPC, &sc->sc_pc); 2200 2201 err |= __get_user(regs->HI[0][regs->current_tc], &sc->sc_mdhi); 2202 err |= __get_user(regs->LO[0][regs->current_tc], &sc->sc_mdlo); 2203 2204 #define restore_gp_reg(i) do { \ 2205 err |= __get_user(regs->gpr[i][regs->current_tc], &sc->sc_regs[i]); \ 2206 } while(0) 2207 restore_gp_reg( 1); restore_gp_reg( 2); restore_gp_reg( 3); 2208 restore_gp_reg( 4); restore_gp_reg( 5); restore_gp_reg( 6); 2209 restore_gp_reg( 7); restore_gp_reg( 8); restore_gp_reg( 9); 2210 restore_gp_reg(10); restore_gp_reg(11); restore_gp_reg(12); 2211 restore_gp_reg(13); restore_gp_reg(14); restore_gp_reg(15); 2212 restore_gp_reg(16); restore_gp_reg(17); restore_gp_reg(18); 2213 restore_gp_reg(19); restore_gp_reg(20); restore_gp_reg(21); 2214 restore_gp_reg(22); restore_gp_reg(23); restore_gp_reg(24); 2215 restore_gp_reg(25); restore_gp_reg(26); restore_gp_reg(27); 2216 restore_gp_reg(28); restore_gp_reg(29); restore_gp_reg(30); 2217 restore_gp_reg(31); 2218 #undef restore_gp_reg 2219 2220 #if 0 2221 if (cpu_has_dsp) { 2222 err |= __get_user(treg, &sc->sc_hi1); mthi1(treg); 2223 err |= __get_user(treg, &sc->sc_lo1); mtlo1(treg); 2224 err |= __get_user(treg, &sc->sc_hi2); mthi2(treg); 2225 err |= __get_user(treg, &sc->sc_lo2); mtlo2(treg); 2226 err |= __get_user(treg, &sc->sc_hi3); mthi3(treg); 2227 err |= __get_user(treg, &sc->sc_lo3); mtlo3(treg); 2228 err |= __get_user(treg, &sc->sc_dsp); wrdsp(treg, DSP_MASK); 2229 } 2230 #ifdef CONFIG_64BIT 2231 err |= __get_user(regs->hi, &sc->sc_hi[0]); 2232 err |= __get_user(regs->lo, &sc->sc_lo[0]); 2233 if (cpu_has_dsp) { 2234 err |= __get_user(treg, &sc->sc_hi[1]); mthi1(treg); 2235 err |= __get_user(treg, &sc->sc_lo[1]); mthi1(treg); 2236 err |= __get_user(treg, &sc->sc_hi[2]); mthi2(treg); 2237 err |= __get_user(treg, &sc->sc_lo[2]); mthi2(treg); 2238 err |= __get_user(treg, &sc->sc_hi[3]); mthi3(treg); 2239 err |= __get_user(treg, &sc->sc_lo[3]); mthi3(treg); 2240 err |= __get_user(treg, &sc->sc_dsp); wrdsp(treg, DSP_MASK); 2241 } 2242 #endif 2243 2244 err |= __get_user(used_math, &sc->sc_used_math); 2245 conditional_used_math(used_math); 2246 2247 preempt_disable(); 2248 2249 if (used_math()) { 2250 /* restore fpu context if we have used it before */ 2251 own_fpu(); 2252 err |= restore_fp_context(sc); 2253 } else { 2254 /* signal handler may have used FPU. Give it up. */ 2255 lose_fpu(); 2256 } 2257 2258 preempt_enable(); 2259 #endif 2260 return err; 2261 } 2262 /* 2263 * Determine which stack to use.. 2264 */ 2265 static inline abi_ulong 2266 get_sigframe(struct emulated_sigaction *ka, CPUState *regs, size_t frame_size) 2267 { 2268 unsigned long sp; 2269 2270 /* Default to using normal stack */ 2271 sp = regs->gpr[29][regs->current_tc]; 2272 2273 /* 2274 * FPU emulator may have it's own trampoline active just 2275 * above the user stack, 16-bytes before the next lowest 2276 * 16 byte boundary. Try to avoid trashing it. 2277 */ 2278 sp -= 32; 2279 2280 /* This is the X/Open sanctioned signal stack switching. */ 2281 if ((ka->sa.sa_flags & TARGET_SA_ONSTACK) && (sas_ss_flags (sp) == 0)) { 2282 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 2283 } 2284 2285 return (sp - frame_size) & ~7; 2286 } 2287 2288 /* compare linux/arch/mips/kernel/signal.c:setup_frame() */ 2289 static void setup_frame(int sig, struct emulated_sigaction * ka, 2290 target_sigset_t *set, CPUState *regs) 2291 { 2292 struct sigframe *frame; 2293 abi_ulong frame_addr; 2294 int i; 2295 2296 frame_addr = get_sigframe(ka, regs, sizeof(*frame)); 2297 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) 2298 goto give_sigsegv; 2299 2300 install_sigtramp(frame->sf_code, TARGET_NR_sigreturn); 2301 2302 if(setup_sigcontext(regs, &frame->sf_sc)) 2303 goto give_sigsegv; 2304 2305 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 2306 if(__put_user(set->sig[i], &frame->sf_mask.sig[i])) 2307 goto give_sigsegv; 2308 } 2309 2310 /* 2311 * Arguments to signal handler: 2312 * 2313 * a0 = signal number 2314 * a1 = 0 (should be cause) 2315 * a2 = pointer to struct sigcontext 2316 * 2317 * $25 and PC point to the signal handler, $29 points to the 2318 * struct sigframe. 2319 */ 2320 regs->gpr[ 4][regs->current_tc] = sig; 2321 regs->gpr[ 5][regs->current_tc] = 0; 2322 regs->gpr[ 6][regs->current_tc] = h2g(&frame->sf_sc); 2323 regs->gpr[29][regs->current_tc] = h2g(frame); 2324 regs->gpr[31][regs->current_tc] = h2g(frame->sf_code); 2325 /* The original kernel code sets CP0_EPC to the handler 2326 * since it returns to userland using eret 2327 * we cannot do this here, and we must set PC directly */ 2328 regs->PC[regs->current_tc] = regs->gpr[25][regs->current_tc] = ka->sa._sa_handler; 2329 unlock_user_struct(frame, frame_addr, 1); 2330 return; 2331 2332 give_sigsegv: 2333 unlock_user_struct(frame, frame_addr, 1); 2334 force_sig(TARGET_SIGSEGV/*, current*/); 2335 return; 2336 } 2337 2338 long do_sigreturn(CPUState *regs) 2339 { 2340 struct sigframe *frame; 2341 abi_ulong frame_addr; 2342 sigset_t blocked; 2343 target_sigset_t target_set; 2344 int i; 2345 2346 #if defined(DEBUG_SIGNAL) 2347 fprintf(stderr, "do_sigreturn\n"); 2348 #endif 2349 frame_addr = regs->gpr[29][regs->current_tc]; 2350 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) 2351 goto badframe; 2352 2353 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 2354 if(__get_user(target_set.sig[i], &frame->sf_mask.sig[i])) 2355 goto badframe; 2356 } 2357 2358 target_to_host_sigset_internal(&blocked, &target_set); 2359 sigprocmask(SIG_SETMASK, &blocked, NULL); 2360 2361 if (restore_sigcontext(regs, &frame->sf_sc)) 2362 goto badframe; 2363 2364 #if 0 2365 /* 2366 * Don't let your children do this ... 2367 */ 2368 __asm__ __volatile__( 2369 "move\t$29, %0\n\t" 2370 "j\tsyscall_exit" 2371 :/* no outputs */ 2372 :"r" (®s)); 2373 /* Unreached */ 2374 #endif 2375 2376 regs->PC[regs->current_tc] = regs->CP0_EPC; 2377 /* I am not sure this is right, but it seems to work 2378 * maybe a problem with nested signals ? */ 2379 regs->CP0_EPC = 0; 2380 return 0; 2381 2382 badframe: 2383 force_sig(TARGET_SIGSEGV/*, current*/); 2384 return 0; 2385 } 2386 2387 static void setup_rt_frame(int sig, struct emulated_sigaction *ka, 2388 target_siginfo_t *info, 2389 target_sigset_t *set, CPUState *env) 2390 { 2391 fprintf(stderr, "setup_rt_frame: not implemented\n"); 2392 } 2393 2394 long do_rt_sigreturn(CPUState *env) 2395 { 2396 fprintf(stderr, "do_rt_sigreturn: not implemented\n"); 2397 return -ENOSYS; 2398 } 2399 2400 #else 2401 2402 static void setup_frame(int sig, struct emulated_sigaction *ka, 2403 target_sigset_t *set, CPUState *env) 2404 { 2405 fprintf(stderr, "setup_frame: not implemented\n"); 2406 } 2407 2408 static void setup_rt_frame(int sig, struct emulated_sigaction *ka, 2409 target_siginfo_t *info, 2410 target_sigset_t *set, CPUState *env) 2411 { 2412 fprintf(stderr, "setup_rt_frame: not implemented\n"); 2413 } 2414 2415 long do_sigreturn(CPUState *env) 2416 { 2417 fprintf(stderr, "do_sigreturn: not implemented\n"); 2418 return -ENOSYS; 2419 } 2420 2421 long do_rt_sigreturn(CPUState *env) 2422 { 2423 fprintf(stderr, "do_rt_sigreturn: not implemented\n"); 2424 return -ENOSYS; 2425 } 2426 2427 #endif 2428 2429 void process_pending_signals(void *cpu_env) 2430 { 2431 int sig; 2432 abi_ulong handler; 2433 sigset_t set, old_set; 2434 target_sigset_t target_old_set; 2435 struct emulated_sigaction *k; 2436 struct sigqueue *q; 2437 2438 if (!signal_pending) 2439 return; 2440 2441 k = sigact_table; 2442 for(sig = 1; sig <= TARGET_NSIG; sig++) { 2443 if (k->pending) 2444 goto handle_signal; 2445 k++; 2446 } 2447 /* if no signal is pending, just return */ 2448 signal_pending = 0; 2449 return; 2450 2451 handle_signal: 2452 #ifdef DEBUG_SIGNAL 2453 fprintf(stderr, "qemu: process signal %d\n", sig); 2454 #endif 2455 /* dequeue signal */ 2456 q = k->first; 2457 k->first = q->next; 2458 if (!k->first) 2459 k->pending = 0; 2460 2461 sig = gdb_handlesig (cpu_env, sig); 2462 if (!sig) { 2463 fprintf (stderr, "Lost signal\n"); 2464 abort(); 2465 } 2466 2467 handler = k->sa._sa_handler; 2468 if (handler == TARGET_SIG_DFL) { 2469 /* default handler : ignore some signal. The other are fatal */ 2470 if (sig != TARGET_SIGCHLD && 2471 sig != TARGET_SIGURG && 2472 sig != TARGET_SIGWINCH) { 2473 force_sig(sig); 2474 } 2475 } else if (handler == TARGET_SIG_IGN) { 2476 /* ignore sig */ 2477 } else if (handler == TARGET_SIG_ERR) { 2478 force_sig(sig); 2479 } else { 2480 /* compute the blocked signals during the handler execution */ 2481 target_to_host_sigset(&set, &k->sa.sa_mask); 2482 /* SA_NODEFER indicates that the current signal should not be 2483 blocked during the handler */ 2484 if (!(k->sa.sa_flags & TARGET_SA_NODEFER)) 2485 sigaddset(&set, target_to_host_signal(sig)); 2486 2487 /* block signals in the handler using Linux */ 2488 sigprocmask(SIG_BLOCK, &set, &old_set); 2489 /* save the previous blocked signal state to restore it at the 2490 end of the signal execution (see do_sigreturn) */ 2491 host_to_target_sigset_internal(&target_old_set, &old_set); 2492 2493 /* if the CPU is in VM86 mode, we restore the 32 bit values */ 2494 #if defined(TARGET_I386) && !defined(TARGET_X86_64) 2495 { 2496 CPUX86State *env = cpu_env; 2497 if (env->eflags & VM_MASK) 2498 save_v86_state(env); 2499 } 2500 #endif 2501 /* prepare the stack frame of the virtual CPU */ 2502 if (k->sa.sa_flags & TARGET_SA_SIGINFO) 2503 setup_rt_frame(sig, k, &q->info, &target_old_set, cpu_env); 2504 else 2505 setup_frame(sig, k, &target_old_set, cpu_env); 2506 if (k->sa.sa_flags & TARGET_SA_RESETHAND) 2507 k->sa._sa_handler = TARGET_SIG_DFL; 2508 } 2509 if (q != &k->info) 2510 free_sigqueue(q); 2511 } 2512