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, see <http://www.gnu.org/licenses/>. 18 */ 19 #include "qemu/osdep.h" 20 #include "qemu/bitops.h" 21 #include <sys/ucontext.h> 22 #include <sys/resource.h> 23 24 #include "qemu.h" 25 #include "qemu-common.h" 26 #include "target_signal.h" 27 #include "trace.h" 28 29 static struct target_sigaltstack target_sigaltstack_used = { 30 .ss_sp = 0, 31 .ss_size = 0, 32 .ss_flags = TARGET_SS_DISABLE, 33 }; 34 35 static struct target_sigaction sigact_table[TARGET_NSIG]; 36 37 static void host_signal_handler(int host_signum, siginfo_t *info, 38 void *puc); 39 40 static uint8_t host_to_target_signal_table[_NSIG] = { 41 [SIGHUP] = TARGET_SIGHUP, 42 [SIGINT] = TARGET_SIGINT, 43 [SIGQUIT] = TARGET_SIGQUIT, 44 [SIGILL] = TARGET_SIGILL, 45 [SIGTRAP] = TARGET_SIGTRAP, 46 [SIGABRT] = TARGET_SIGABRT, 47 /* [SIGIOT] = TARGET_SIGIOT,*/ 48 [SIGBUS] = TARGET_SIGBUS, 49 [SIGFPE] = TARGET_SIGFPE, 50 [SIGKILL] = TARGET_SIGKILL, 51 [SIGUSR1] = TARGET_SIGUSR1, 52 [SIGSEGV] = TARGET_SIGSEGV, 53 [SIGUSR2] = TARGET_SIGUSR2, 54 [SIGPIPE] = TARGET_SIGPIPE, 55 [SIGALRM] = TARGET_SIGALRM, 56 [SIGTERM] = TARGET_SIGTERM, 57 #ifdef SIGSTKFLT 58 [SIGSTKFLT] = TARGET_SIGSTKFLT, 59 #endif 60 [SIGCHLD] = TARGET_SIGCHLD, 61 [SIGCONT] = TARGET_SIGCONT, 62 [SIGSTOP] = TARGET_SIGSTOP, 63 [SIGTSTP] = TARGET_SIGTSTP, 64 [SIGTTIN] = TARGET_SIGTTIN, 65 [SIGTTOU] = TARGET_SIGTTOU, 66 [SIGURG] = TARGET_SIGURG, 67 [SIGXCPU] = TARGET_SIGXCPU, 68 [SIGXFSZ] = TARGET_SIGXFSZ, 69 [SIGVTALRM] = TARGET_SIGVTALRM, 70 [SIGPROF] = TARGET_SIGPROF, 71 [SIGWINCH] = TARGET_SIGWINCH, 72 [SIGIO] = TARGET_SIGIO, 73 [SIGPWR] = TARGET_SIGPWR, 74 [SIGSYS] = TARGET_SIGSYS, 75 /* next signals stay the same */ 76 /* Nasty hack: Reverse SIGRTMIN and SIGRTMAX to avoid overlap with 77 host libpthread signals. This assumes no one actually uses SIGRTMAX :-/ 78 To fix this properly we need to do manual signal delivery multiplexed 79 over a single host signal. */ 80 [__SIGRTMIN] = __SIGRTMAX, 81 [__SIGRTMAX] = __SIGRTMIN, 82 }; 83 static uint8_t target_to_host_signal_table[_NSIG]; 84 85 static inline int on_sig_stack(unsigned long sp) 86 { 87 return (sp - target_sigaltstack_used.ss_sp 88 < target_sigaltstack_used.ss_size); 89 } 90 91 static inline int sas_ss_flags(unsigned long sp) 92 { 93 return (target_sigaltstack_used.ss_size == 0 ? SS_DISABLE 94 : on_sig_stack(sp) ? SS_ONSTACK : 0); 95 } 96 97 int host_to_target_signal(int sig) 98 { 99 if (sig < 0 || sig >= _NSIG) 100 return sig; 101 return host_to_target_signal_table[sig]; 102 } 103 104 int target_to_host_signal(int sig) 105 { 106 if (sig < 0 || sig >= _NSIG) 107 return sig; 108 return target_to_host_signal_table[sig]; 109 } 110 111 static inline void target_sigemptyset(target_sigset_t *set) 112 { 113 memset(set, 0, sizeof(*set)); 114 } 115 116 static inline void target_sigaddset(target_sigset_t *set, int signum) 117 { 118 signum--; 119 abi_ulong mask = (abi_ulong)1 << (signum % TARGET_NSIG_BPW); 120 set->sig[signum / TARGET_NSIG_BPW] |= mask; 121 } 122 123 static inline int target_sigismember(const target_sigset_t *set, int signum) 124 { 125 signum--; 126 abi_ulong mask = (abi_ulong)1 << (signum % TARGET_NSIG_BPW); 127 return ((set->sig[signum / TARGET_NSIG_BPW] & mask) != 0); 128 } 129 130 static void host_to_target_sigset_internal(target_sigset_t *d, 131 const sigset_t *s) 132 { 133 int i; 134 target_sigemptyset(d); 135 for (i = 1; i <= TARGET_NSIG; i++) { 136 if (sigismember(s, i)) { 137 target_sigaddset(d, host_to_target_signal(i)); 138 } 139 } 140 } 141 142 void host_to_target_sigset(target_sigset_t *d, const sigset_t *s) 143 { 144 target_sigset_t d1; 145 int i; 146 147 host_to_target_sigset_internal(&d1, s); 148 for(i = 0;i < TARGET_NSIG_WORDS; i++) 149 d->sig[i] = tswapal(d1.sig[i]); 150 } 151 152 static void target_to_host_sigset_internal(sigset_t *d, 153 const target_sigset_t *s) 154 { 155 int i; 156 sigemptyset(d); 157 for (i = 1; i <= TARGET_NSIG; i++) { 158 if (target_sigismember(s, i)) { 159 sigaddset(d, target_to_host_signal(i)); 160 } 161 } 162 } 163 164 void target_to_host_sigset(sigset_t *d, const target_sigset_t *s) 165 { 166 target_sigset_t s1; 167 int i; 168 169 for(i = 0;i < TARGET_NSIG_WORDS; i++) 170 s1.sig[i] = tswapal(s->sig[i]); 171 target_to_host_sigset_internal(d, &s1); 172 } 173 174 void host_to_target_old_sigset(abi_ulong *old_sigset, 175 const sigset_t *sigset) 176 { 177 target_sigset_t d; 178 host_to_target_sigset(&d, sigset); 179 *old_sigset = d.sig[0]; 180 } 181 182 void target_to_host_old_sigset(sigset_t *sigset, 183 const abi_ulong *old_sigset) 184 { 185 target_sigset_t d; 186 int i; 187 188 d.sig[0] = *old_sigset; 189 for(i = 1;i < TARGET_NSIG_WORDS; i++) 190 d.sig[i] = 0; 191 target_to_host_sigset(sigset, &d); 192 } 193 194 int block_signals(void) 195 { 196 TaskState *ts = (TaskState *)thread_cpu->opaque; 197 sigset_t set; 198 199 /* It's OK to block everything including SIGSEGV, because we won't 200 * run any further guest code before unblocking signals in 201 * process_pending_signals(). 202 */ 203 sigfillset(&set); 204 sigprocmask(SIG_SETMASK, &set, 0); 205 206 return atomic_xchg(&ts->signal_pending, 1); 207 } 208 209 /* Wrapper for sigprocmask function 210 * Emulates a sigprocmask in a safe way for the guest. Note that set and oldset 211 * are host signal set, not guest ones. Returns -TARGET_ERESTARTSYS if 212 * a signal was already pending and the syscall must be restarted, or 213 * 0 on success. 214 * If set is NULL, this is guaranteed not to fail. 215 */ 216 int do_sigprocmask(int how, const sigset_t *set, sigset_t *oldset) 217 { 218 TaskState *ts = (TaskState *)thread_cpu->opaque; 219 220 if (oldset) { 221 *oldset = ts->signal_mask; 222 } 223 224 if (set) { 225 int i; 226 227 if (block_signals()) { 228 return -TARGET_ERESTARTSYS; 229 } 230 231 switch (how) { 232 case SIG_BLOCK: 233 sigorset(&ts->signal_mask, &ts->signal_mask, set); 234 break; 235 case SIG_UNBLOCK: 236 for (i = 1; i <= NSIG; ++i) { 237 if (sigismember(set, i)) { 238 sigdelset(&ts->signal_mask, i); 239 } 240 } 241 break; 242 case SIG_SETMASK: 243 ts->signal_mask = *set; 244 break; 245 default: 246 g_assert_not_reached(); 247 } 248 249 /* Silently ignore attempts to change blocking status of KILL or STOP */ 250 sigdelset(&ts->signal_mask, SIGKILL); 251 sigdelset(&ts->signal_mask, SIGSTOP); 252 } 253 return 0; 254 } 255 256 #if !defined(TARGET_OPENRISC) && !defined(TARGET_UNICORE32) && \ 257 !defined(TARGET_NIOS2) 258 /* Just set the guest's signal mask to the specified value; the 259 * caller is assumed to have called block_signals() already. 260 */ 261 static void set_sigmask(const sigset_t *set) 262 { 263 TaskState *ts = (TaskState *)thread_cpu->opaque; 264 265 ts->signal_mask = *set; 266 } 267 #endif 268 269 /* siginfo conversion */ 270 271 static inline void host_to_target_siginfo_noswap(target_siginfo_t *tinfo, 272 const siginfo_t *info) 273 { 274 int sig = host_to_target_signal(info->si_signo); 275 int si_code = info->si_code; 276 int si_type; 277 tinfo->si_signo = sig; 278 tinfo->si_errno = 0; 279 tinfo->si_code = info->si_code; 280 281 /* This memset serves two purposes: 282 * (1) ensure we don't leak random junk to the guest later 283 * (2) placate false positives from gcc about fields 284 * being used uninitialized if it chooses to inline both this 285 * function and tswap_siginfo() into host_to_target_siginfo(). 286 */ 287 memset(tinfo->_sifields._pad, 0, sizeof(tinfo->_sifields._pad)); 288 289 /* This is awkward, because we have to use a combination of 290 * the si_code and si_signo to figure out which of the union's 291 * members are valid. (Within the host kernel it is always possible 292 * to tell, but the kernel carefully avoids giving userspace the 293 * high 16 bits of si_code, so we don't have the information to 294 * do this the easy way...) We therefore make our best guess, 295 * bearing in mind that a guest can spoof most of the si_codes 296 * via rt_sigqueueinfo() if it likes. 297 * 298 * Once we have made our guess, we record it in the top 16 bits of 299 * the si_code, so that tswap_siginfo() later can use it. 300 * tswap_siginfo() will strip these top bits out before writing 301 * si_code to the guest (sign-extending the lower bits). 302 */ 303 304 switch (si_code) { 305 case SI_USER: 306 case SI_TKILL: 307 case SI_KERNEL: 308 /* Sent via kill(), tkill() or tgkill(), or direct from the kernel. 309 * These are the only unspoofable si_code values. 310 */ 311 tinfo->_sifields._kill._pid = info->si_pid; 312 tinfo->_sifields._kill._uid = info->si_uid; 313 si_type = QEMU_SI_KILL; 314 break; 315 default: 316 /* Everything else is spoofable. Make best guess based on signal */ 317 switch (sig) { 318 case TARGET_SIGCHLD: 319 tinfo->_sifields._sigchld._pid = info->si_pid; 320 tinfo->_sifields._sigchld._uid = info->si_uid; 321 tinfo->_sifields._sigchld._status 322 = host_to_target_waitstatus(info->si_status); 323 tinfo->_sifields._sigchld._utime = info->si_utime; 324 tinfo->_sifields._sigchld._stime = info->si_stime; 325 si_type = QEMU_SI_CHLD; 326 break; 327 case TARGET_SIGIO: 328 tinfo->_sifields._sigpoll._band = info->si_band; 329 tinfo->_sifields._sigpoll._fd = info->si_fd; 330 si_type = QEMU_SI_POLL; 331 break; 332 default: 333 /* Assume a sigqueue()/mq_notify()/rt_sigqueueinfo() source. */ 334 tinfo->_sifields._rt._pid = info->si_pid; 335 tinfo->_sifields._rt._uid = info->si_uid; 336 /* XXX: potential problem if 64 bit */ 337 tinfo->_sifields._rt._sigval.sival_ptr 338 = (abi_ulong)(unsigned long)info->si_value.sival_ptr; 339 si_type = QEMU_SI_RT; 340 break; 341 } 342 break; 343 } 344 345 tinfo->si_code = deposit32(si_code, 16, 16, si_type); 346 } 347 348 static void tswap_siginfo(target_siginfo_t *tinfo, 349 const target_siginfo_t *info) 350 { 351 int si_type = extract32(info->si_code, 16, 16); 352 int si_code = sextract32(info->si_code, 0, 16); 353 354 __put_user(info->si_signo, &tinfo->si_signo); 355 __put_user(info->si_errno, &tinfo->si_errno); 356 __put_user(si_code, &tinfo->si_code); 357 358 /* We can use our internal marker of which fields in the structure 359 * are valid, rather than duplicating the guesswork of 360 * host_to_target_siginfo_noswap() here. 361 */ 362 switch (si_type) { 363 case QEMU_SI_KILL: 364 __put_user(info->_sifields._kill._pid, &tinfo->_sifields._kill._pid); 365 __put_user(info->_sifields._kill._uid, &tinfo->_sifields._kill._uid); 366 break; 367 case QEMU_SI_TIMER: 368 __put_user(info->_sifields._timer._timer1, 369 &tinfo->_sifields._timer._timer1); 370 __put_user(info->_sifields._timer._timer2, 371 &tinfo->_sifields._timer._timer2); 372 break; 373 case QEMU_SI_POLL: 374 __put_user(info->_sifields._sigpoll._band, 375 &tinfo->_sifields._sigpoll._band); 376 __put_user(info->_sifields._sigpoll._fd, 377 &tinfo->_sifields._sigpoll._fd); 378 break; 379 case QEMU_SI_FAULT: 380 __put_user(info->_sifields._sigfault._addr, 381 &tinfo->_sifields._sigfault._addr); 382 break; 383 case QEMU_SI_CHLD: 384 __put_user(info->_sifields._sigchld._pid, 385 &tinfo->_sifields._sigchld._pid); 386 __put_user(info->_sifields._sigchld._uid, 387 &tinfo->_sifields._sigchld._uid); 388 __put_user(info->_sifields._sigchld._status, 389 &tinfo->_sifields._sigchld._status); 390 __put_user(info->_sifields._sigchld._utime, 391 &tinfo->_sifields._sigchld._utime); 392 __put_user(info->_sifields._sigchld._stime, 393 &tinfo->_sifields._sigchld._stime); 394 break; 395 case QEMU_SI_RT: 396 __put_user(info->_sifields._rt._pid, &tinfo->_sifields._rt._pid); 397 __put_user(info->_sifields._rt._uid, &tinfo->_sifields._rt._uid); 398 __put_user(info->_sifields._rt._sigval.sival_ptr, 399 &tinfo->_sifields._rt._sigval.sival_ptr); 400 break; 401 default: 402 g_assert_not_reached(); 403 } 404 } 405 406 void host_to_target_siginfo(target_siginfo_t *tinfo, const siginfo_t *info) 407 { 408 target_siginfo_t tgt_tmp; 409 host_to_target_siginfo_noswap(&tgt_tmp, info); 410 tswap_siginfo(tinfo, &tgt_tmp); 411 } 412 413 /* XXX: we support only POSIX RT signals are used. */ 414 /* XXX: find a solution for 64 bit (additional malloced data is needed) */ 415 void target_to_host_siginfo(siginfo_t *info, const target_siginfo_t *tinfo) 416 { 417 /* This conversion is used only for the rt_sigqueueinfo syscall, 418 * and so we know that the _rt fields are the valid ones. 419 */ 420 abi_ulong sival_ptr; 421 422 __get_user(info->si_signo, &tinfo->si_signo); 423 __get_user(info->si_errno, &tinfo->si_errno); 424 __get_user(info->si_code, &tinfo->si_code); 425 __get_user(info->si_pid, &tinfo->_sifields._rt._pid); 426 __get_user(info->si_uid, &tinfo->_sifields._rt._uid); 427 __get_user(sival_ptr, &tinfo->_sifields._rt._sigval.sival_ptr); 428 info->si_value.sival_ptr = (void *)(long)sival_ptr; 429 } 430 431 static int fatal_signal (int sig) 432 { 433 switch (sig) { 434 case TARGET_SIGCHLD: 435 case TARGET_SIGURG: 436 case TARGET_SIGWINCH: 437 /* Ignored by default. */ 438 return 0; 439 case TARGET_SIGCONT: 440 case TARGET_SIGSTOP: 441 case TARGET_SIGTSTP: 442 case TARGET_SIGTTIN: 443 case TARGET_SIGTTOU: 444 /* Job control signals. */ 445 return 0; 446 default: 447 return 1; 448 } 449 } 450 451 /* returns 1 if given signal should dump core if not handled */ 452 static int core_dump_signal(int sig) 453 { 454 switch (sig) { 455 case TARGET_SIGABRT: 456 case TARGET_SIGFPE: 457 case TARGET_SIGILL: 458 case TARGET_SIGQUIT: 459 case TARGET_SIGSEGV: 460 case TARGET_SIGTRAP: 461 case TARGET_SIGBUS: 462 return (1); 463 default: 464 return (0); 465 } 466 } 467 468 void signal_init(void) 469 { 470 TaskState *ts = (TaskState *)thread_cpu->opaque; 471 struct sigaction act; 472 struct sigaction oact; 473 int i, j; 474 int host_sig; 475 476 /* generate signal conversion tables */ 477 for(i = 1; i < _NSIG; i++) { 478 if (host_to_target_signal_table[i] == 0) 479 host_to_target_signal_table[i] = i; 480 } 481 for(i = 1; i < _NSIG; i++) { 482 j = host_to_target_signal_table[i]; 483 target_to_host_signal_table[j] = i; 484 } 485 486 /* Set the signal mask from the host mask. */ 487 sigprocmask(0, 0, &ts->signal_mask); 488 489 /* set all host signal handlers. ALL signals are blocked during 490 the handlers to serialize them. */ 491 memset(sigact_table, 0, sizeof(sigact_table)); 492 493 sigfillset(&act.sa_mask); 494 act.sa_flags = SA_SIGINFO; 495 act.sa_sigaction = host_signal_handler; 496 for(i = 1; i <= TARGET_NSIG; i++) { 497 host_sig = target_to_host_signal(i); 498 sigaction(host_sig, NULL, &oact); 499 if (oact.sa_sigaction == (void *)SIG_IGN) { 500 sigact_table[i - 1]._sa_handler = TARGET_SIG_IGN; 501 } else if (oact.sa_sigaction == (void *)SIG_DFL) { 502 sigact_table[i - 1]._sa_handler = TARGET_SIG_DFL; 503 } 504 /* If there's already a handler installed then something has 505 gone horribly wrong, so don't even try to handle that case. */ 506 /* Install some handlers for our own use. We need at least 507 SIGSEGV and SIGBUS, to detect exceptions. We can not just 508 trap all signals because it affects syscall interrupt 509 behavior. But do trap all default-fatal signals. */ 510 if (fatal_signal (i)) 511 sigaction(host_sig, &act, NULL); 512 } 513 } 514 515 #ifndef TARGET_UNICORE32 516 /* Force a synchronously taken signal. The kernel force_sig() function 517 * also forces the signal to "not blocked, not ignored", but for QEMU 518 * that work is done in process_pending_signals(). 519 */ 520 static void force_sig(int sig) 521 { 522 CPUState *cpu = thread_cpu; 523 CPUArchState *env = cpu->env_ptr; 524 target_siginfo_t info; 525 526 info.si_signo = sig; 527 info.si_errno = 0; 528 info.si_code = TARGET_SI_KERNEL; 529 info._sifields._kill._pid = 0; 530 info._sifields._kill._uid = 0; 531 queue_signal(env, info.si_signo, QEMU_SI_KILL, &info); 532 } 533 534 /* Force a SIGSEGV if we couldn't write to memory trying to set 535 * up the signal frame. oldsig is the signal we were trying to handle 536 * at the point of failure. 537 */ 538 static void force_sigsegv(int oldsig) 539 { 540 if (oldsig == SIGSEGV) { 541 /* Make sure we don't try to deliver the signal again; this will 542 * end up with handle_pending_signal() calling dump_core_and_abort(). 543 */ 544 sigact_table[oldsig - 1]._sa_handler = TARGET_SIG_DFL; 545 } 546 force_sig(TARGET_SIGSEGV); 547 } 548 #endif 549 550 /* abort execution with signal */ 551 static void QEMU_NORETURN dump_core_and_abort(int target_sig) 552 { 553 CPUState *cpu = thread_cpu; 554 CPUArchState *env = cpu->env_ptr; 555 TaskState *ts = (TaskState *)cpu->opaque; 556 int host_sig, core_dumped = 0; 557 struct sigaction act; 558 559 host_sig = target_to_host_signal(target_sig); 560 trace_user_force_sig(env, target_sig, host_sig); 561 gdb_signalled(env, target_sig); 562 563 /* dump core if supported by target binary format */ 564 if (core_dump_signal(target_sig) && (ts->bprm->core_dump != NULL)) { 565 stop_all_tasks(); 566 core_dumped = 567 ((*ts->bprm->core_dump)(target_sig, env) == 0); 568 } 569 if (core_dumped) { 570 /* we already dumped the core of target process, we don't want 571 * a coredump of qemu itself */ 572 struct rlimit nodump; 573 getrlimit(RLIMIT_CORE, &nodump); 574 nodump.rlim_cur=0; 575 setrlimit(RLIMIT_CORE, &nodump); 576 (void) fprintf(stderr, "qemu: uncaught target signal %d (%s) - %s\n", 577 target_sig, strsignal(host_sig), "core dumped" ); 578 } 579 580 /* The proper exit code for dying from an uncaught signal is 581 * -<signal>. The kernel doesn't allow exit() or _exit() to pass 582 * a negative value. To get the proper exit code we need to 583 * actually die from an uncaught signal. Here the default signal 584 * handler is installed, we send ourself a signal and we wait for 585 * it to arrive. */ 586 sigfillset(&act.sa_mask); 587 act.sa_handler = SIG_DFL; 588 act.sa_flags = 0; 589 sigaction(host_sig, &act, NULL); 590 591 /* For some reason raise(host_sig) doesn't send the signal when 592 * statically linked on x86-64. */ 593 kill(getpid(), host_sig); 594 595 /* Make sure the signal isn't masked (just reuse the mask inside 596 of act) */ 597 sigdelset(&act.sa_mask, host_sig); 598 sigsuspend(&act.sa_mask); 599 600 /* unreachable */ 601 abort(); 602 } 603 604 /* queue a signal so that it will be send to the virtual CPU as soon 605 as possible */ 606 int queue_signal(CPUArchState *env, int sig, int si_type, 607 target_siginfo_t *info) 608 { 609 CPUState *cpu = ENV_GET_CPU(env); 610 TaskState *ts = cpu->opaque; 611 612 trace_user_queue_signal(env, sig); 613 614 info->si_code = deposit32(info->si_code, 16, 16, si_type); 615 616 ts->sync_signal.info = *info; 617 ts->sync_signal.pending = sig; 618 /* signal that a new signal is pending */ 619 atomic_set(&ts->signal_pending, 1); 620 return 1; /* indicates that the signal was queued */ 621 } 622 623 #ifndef HAVE_SAFE_SYSCALL 624 static inline void rewind_if_in_safe_syscall(void *puc) 625 { 626 /* Default version: never rewind */ 627 } 628 #endif 629 630 static void host_signal_handler(int host_signum, siginfo_t *info, 631 void *puc) 632 { 633 CPUArchState *env = thread_cpu->env_ptr; 634 CPUState *cpu = ENV_GET_CPU(env); 635 TaskState *ts = cpu->opaque; 636 637 int sig; 638 target_siginfo_t tinfo; 639 ucontext_t *uc = puc; 640 struct emulated_sigtable *k; 641 642 /* the CPU emulator uses some host signals to detect exceptions, 643 we forward to it some signals */ 644 if ((host_signum == SIGSEGV || host_signum == SIGBUS) 645 && info->si_code > 0) { 646 if (cpu_signal_handler(host_signum, info, puc)) 647 return; 648 } 649 650 /* get target signal number */ 651 sig = host_to_target_signal(host_signum); 652 if (sig < 1 || sig > TARGET_NSIG) 653 return; 654 trace_user_host_signal(env, host_signum, sig); 655 656 rewind_if_in_safe_syscall(puc); 657 658 host_to_target_siginfo_noswap(&tinfo, info); 659 k = &ts->sigtab[sig - 1]; 660 k->info = tinfo; 661 k->pending = sig; 662 ts->signal_pending = 1; 663 664 /* Block host signals until target signal handler entered. We 665 * can't block SIGSEGV or SIGBUS while we're executing guest 666 * code in case the guest code provokes one in the window between 667 * now and it getting out to the main loop. Signals will be 668 * unblocked again in process_pending_signals(). 669 * 670 * WARNING: we cannot use sigfillset() here because the uc_sigmask 671 * field is a kernel sigset_t, which is much smaller than the 672 * libc sigset_t which sigfillset() operates on. Using sigfillset() 673 * would write 0xff bytes off the end of the structure and trash 674 * data on the struct. 675 * We can't use sizeof(uc->uc_sigmask) either, because the libc 676 * headers define the struct field with the wrong (too large) type. 677 */ 678 memset(&uc->uc_sigmask, 0xff, SIGSET_T_SIZE); 679 sigdelset(&uc->uc_sigmask, SIGSEGV); 680 sigdelset(&uc->uc_sigmask, SIGBUS); 681 682 /* interrupt the virtual CPU as soon as possible */ 683 cpu_exit(thread_cpu); 684 } 685 686 /* do_sigaltstack() returns target values and errnos. */ 687 /* compare linux/kernel/signal.c:do_sigaltstack() */ 688 abi_long do_sigaltstack(abi_ulong uss_addr, abi_ulong uoss_addr, abi_ulong sp) 689 { 690 int ret; 691 struct target_sigaltstack oss; 692 693 /* XXX: test errors */ 694 if(uoss_addr) 695 { 696 __put_user(target_sigaltstack_used.ss_sp, &oss.ss_sp); 697 __put_user(target_sigaltstack_used.ss_size, &oss.ss_size); 698 __put_user(sas_ss_flags(sp), &oss.ss_flags); 699 } 700 701 if(uss_addr) 702 { 703 struct target_sigaltstack *uss; 704 struct target_sigaltstack ss; 705 size_t minstacksize = TARGET_MINSIGSTKSZ; 706 707 #if defined(TARGET_PPC64) 708 /* ELF V2 for PPC64 has a 4K minimum stack size for signal handlers */ 709 struct image_info *image = ((TaskState *)thread_cpu->opaque)->info; 710 if (get_ppc64_abi(image) > 1) { 711 minstacksize = 4096; 712 } 713 #endif 714 715 ret = -TARGET_EFAULT; 716 if (!lock_user_struct(VERIFY_READ, uss, uss_addr, 1)) { 717 goto out; 718 } 719 __get_user(ss.ss_sp, &uss->ss_sp); 720 __get_user(ss.ss_size, &uss->ss_size); 721 __get_user(ss.ss_flags, &uss->ss_flags); 722 unlock_user_struct(uss, uss_addr, 0); 723 724 ret = -TARGET_EPERM; 725 if (on_sig_stack(sp)) 726 goto out; 727 728 ret = -TARGET_EINVAL; 729 if (ss.ss_flags != TARGET_SS_DISABLE 730 && ss.ss_flags != TARGET_SS_ONSTACK 731 && ss.ss_flags != 0) 732 goto out; 733 734 if (ss.ss_flags == TARGET_SS_DISABLE) { 735 ss.ss_size = 0; 736 ss.ss_sp = 0; 737 } else { 738 ret = -TARGET_ENOMEM; 739 if (ss.ss_size < minstacksize) { 740 goto out; 741 } 742 } 743 744 target_sigaltstack_used.ss_sp = ss.ss_sp; 745 target_sigaltstack_used.ss_size = ss.ss_size; 746 } 747 748 if (uoss_addr) { 749 ret = -TARGET_EFAULT; 750 if (copy_to_user(uoss_addr, &oss, sizeof(oss))) 751 goto out; 752 } 753 754 ret = 0; 755 out: 756 return ret; 757 } 758 759 /* do_sigaction() return target values and host errnos */ 760 int do_sigaction(int sig, const struct target_sigaction *act, 761 struct target_sigaction *oact) 762 { 763 struct target_sigaction *k; 764 struct sigaction act1; 765 int host_sig; 766 int ret = 0; 767 768 if (sig < 1 || sig > TARGET_NSIG || sig == TARGET_SIGKILL || sig == TARGET_SIGSTOP) { 769 return -TARGET_EINVAL; 770 } 771 772 if (block_signals()) { 773 return -TARGET_ERESTARTSYS; 774 } 775 776 k = &sigact_table[sig - 1]; 777 if (oact) { 778 __put_user(k->_sa_handler, &oact->_sa_handler); 779 __put_user(k->sa_flags, &oact->sa_flags); 780 #if !defined(TARGET_MIPS) 781 __put_user(k->sa_restorer, &oact->sa_restorer); 782 #endif 783 /* Not swapped. */ 784 oact->sa_mask = k->sa_mask; 785 } 786 if (act) { 787 /* FIXME: This is not threadsafe. */ 788 __get_user(k->_sa_handler, &act->_sa_handler); 789 __get_user(k->sa_flags, &act->sa_flags); 790 #if !defined(TARGET_MIPS) 791 __get_user(k->sa_restorer, &act->sa_restorer); 792 #endif 793 /* To be swapped in target_to_host_sigset. */ 794 k->sa_mask = act->sa_mask; 795 796 /* we update the host linux signal state */ 797 host_sig = target_to_host_signal(sig); 798 if (host_sig != SIGSEGV && host_sig != SIGBUS) { 799 sigfillset(&act1.sa_mask); 800 act1.sa_flags = SA_SIGINFO; 801 if (k->sa_flags & TARGET_SA_RESTART) 802 act1.sa_flags |= SA_RESTART; 803 /* NOTE: it is important to update the host kernel signal 804 ignore state to avoid getting unexpected interrupted 805 syscalls */ 806 if (k->_sa_handler == TARGET_SIG_IGN) { 807 act1.sa_sigaction = (void *)SIG_IGN; 808 } else if (k->_sa_handler == TARGET_SIG_DFL) { 809 if (fatal_signal (sig)) 810 act1.sa_sigaction = host_signal_handler; 811 else 812 act1.sa_sigaction = (void *)SIG_DFL; 813 } else { 814 act1.sa_sigaction = host_signal_handler; 815 } 816 ret = sigaction(host_sig, &act1, NULL); 817 } 818 } 819 return ret; 820 } 821 822 #if defined(TARGET_I386) 823 /* from the Linux kernel - /arch/x86/include/uapi/asm/sigcontext.h */ 824 825 struct target_fpreg { 826 uint16_t significand[4]; 827 uint16_t exponent; 828 }; 829 830 struct target_fpxreg { 831 uint16_t significand[4]; 832 uint16_t exponent; 833 uint16_t padding[3]; 834 }; 835 836 struct target_xmmreg { 837 uint32_t element[4]; 838 }; 839 840 struct target_fpstate_32 { 841 /* Regular FPU environment */ 842 uint32_t cw; 843 uint32_t sw; 844 uint32_t tag; 845 uint32_t ipoff; 846 uint32_t cssel; 847 uint32_t dataoff; 848 uint32_t datasel; 849 struct target_fpreg st[8]; 850 uint16_t status; 851 uint16_t magic; /* 0xffff = regular FPU data only */ 852 853 /* FXSR FPU environment */ 854 uint32_t _fxsr_env[6]; /* FXSR FPU env is ignored */ 855 uint32_t mxcsr; 856 uint32_t reserved; 857 struct target_fpxreg fxsr_st[8]; /* FXSR FPU reg data is ignored */ 858 struct target_xmmreg xmm[8]; 859 uint32_t padding[56]; 860 }; 861 862 struct target_fpstate_64 { 863 /* FXSAVE format */ 864 uint16_t cw; 865 uint16_t sw; 866 uint16_t twd; 867 uint16_t fop; 868 uint64_t rip; 869 uint64_t rdp; 870 uint32_t mxcsr; 871 uint32_t mxcsr_mask; 872 uint32_t st_space[32]; 873 uint32_t xmm_space[64]; 874 uint32_t reserved[24]; 875 }; 876 877 #ifndef TARGET_X86_64 878 # define target_fpstate target_fpstate_32 879 #else 880 # define target_fpstate target_fpstate_64 881 #endif 882 883 struct target_sigcontext_32 { 884 uint16_t gs, __gsh; 885 uint16_t fs, __fsh; 886 uint16_t es, __esh; 887 uint16_t ds, __dsh; 888 uint32_t edi; 889 uint32_t esi; 890 uint32_t ebp; 891 uint32_t esp; 892 uint32_t ebx; 893 uint32_t edx; 894 uint32_t ecx; 895 uint32_t eax; 896 uint32_t trapno; 897 uint32_t err; 898 uint32_t eip; 899 uint16_t cs, __csh; 900 uint32_t eflags; 901 uint32_t esp_at_signal; 902 uint16_t ss, __ssh; 903 uint32_t fpstate; /* pointer */ 904 uint32_t oldmask; 905 uint32_t cr2; 906 }; 907 908 struct target_sigcontext_64 { 909 uint64_t r8; 910 uint64_t r9; 911 uint64_t r10; 912 uint64_t r11; 913 uint64_t r12; 914 uint64_t r13; 915 uint64_t r14; 916 uint64_t r15; 917 918 uint64_t rdi; 919 uint64_t rsi; 920 uint64_t rbp; 921 uint64_t rbx; 922 uint64_t rdx; 923 uint64_t rax; 924 uint64_t rcx; 925 uint64_t rsp; 926 uint64_t rip; 927 928 uint64_t eflags; 929 930 uint16_t cs; 931 uint16_t gs; 932 uint16_t fs; 933 uint16_t ss; 934 935 uint64_t err; 936 uint64_t trapno; 937 uint64_t oldmask; 938 uint64_t cr2; 939 940 uint64_t fpstate; /* pointer */ 941 uint64_t padding[8]; 942 }; 943 944 #ifndef TARGET_X86_64 945 # define target_sigcontext target_sigcontext_32 946 #else 947 # define target_sigcontext target_sigcontext_64 948 #endif 949 950 /* see Linux/include/uapi/asm-generic/ucontext.h */ 951 struct target_ucontext { 952 abi_ulong tuc_flags; 953 abi_ulong tuc_link; 954 target_stack_t tuc_stack; 955 struct target_sigcontext tuc_mcontext; 956 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 957 }; 958 959 #ifndef TARGET_X86_64 960 struct sigframe { 961 abi_ulong pretcode; 962 int sig; 963 struct target_sigcontext sc; 964 struct target_fpstate fpstate; 965 abi_ulong extramask[TARGET_NSIG_WORDS-1]; 966 char retcode[8]; 967 }; 968 969 struct rt_sigframe { 970 abi_ulong pretcode; 971 int sig; 972 abi_ulong pinfo; 973 abi_ulong puc; 974 struct target_siginfo info; 975 struct target_ucontext uc; 976 struct target_fpstate fpstate; 977 char retcode[8]; 978 }; 979 980 #else 981 982 struct rt_sigframe { 983 abi_ulong pretcode; 984 struct target_ucontext uc; 985 struct target_siginfo info; 986 struct target_fpstate fpstate; 987 }; 988 989 #endif 990 991 /* 992 * Set up a signal frame. 993 */ 994 995 /* XXX: save x87 state */ 996 static void setup_sigcontext(struct target_sigcontext *sc, 997 struct target_fpstate *fpstate, CPUX86State *env, abi_ulong mask, 998 abi_ulong fpstate_addr) 999 { 1000 CPUState *cs = CPU(x86_env_get_cpu(env)); 1001 #ifndef TARGET_X86_64 1002 uint16_t magic; 1003 1004 /* already locked in setup_frame() */ 1005 __put_user(env->segs[R_GS].selector, (unsigned int *)&sc->gs); 1006 __put_user(env->segs[R_FS].selector, (unsigned int *)&sc->fs); 1007 __put_user(env->segs[R_ES].selector, (unsigned int *)&sc->es); 1008 __put_user(env->segs[R_DS].selector, (unsigned int *)&sc->ds); 1009 __put_user(env->regs[R_EDI], &sc->edi); 1010 __put_user(env->regs[R_ESI], &sc->esi); 1011 __put_user(env->regs[R_EBP], &sc->ebp); 1012 __put_user(env->regs[R_ESP], &sc->esp); 1013 __put_user(env->regs[R_EBX], &sc->ebx); 1014 __put_user(env->regs[R_EDX], &sc->edx); 1015 __put_user(env->regs[R_ECX], &sc->ecx); 1016 __put_user(env->regs[R_EAX], &sc->eax); 1017 __put_user(cs->exception_index, &sc->trapno); 1018 __put_user(env->error_code, &sc->err); 1019 __put_user(env->eip, &sc->eip); 1020 __put_user(env->segs[R_CS].selector, (unsigned int *)&sc->cs); 1021 __put_user(env->eflags, &sc->eflags); 1022 __put_user(env->regs[R_ESP], &sc->esp_at_signal); 1023 __put_user(env->segs[R_SS].selector, (unsigned int *)&sc->ss); 1024 1025 cpu_x86_fsave(env, fpstate_addr, 1); 1026 fpstate->status = fpstate->sw; 1027 magic = 0xffff; 1028 __put_user(magic, &fpstate->magic); 1029 __put_user(fpstate_addr, &sc->fpstate); 1030 1031 /* non-iBCS2 extensions.. */ 1032 __put_user(mask, &sc->oldmask); 1033 __put_user(env->cr[2], &sc->cr2); 1034 #else 1035 __put_user(env->regs[R_EDI], &sc->rdi); 1036 __put_user(env->regs[R_ESI], &sc->rsi); 1037 __put_user(env->regs[R_EBP], &sc->rbp); 1038 __put_user(env->regs[R_ESP], &sc->rsp); 1039 __put_user(env->regs[R_EBX], &sc->rbx); 1040 __put_user(env->regs[R_EDX], &sc->rdx); 1041 __put_user(env->regs[R_ECX], &sc->rcx); 1042 __put_user(env->regs[R_EAX], &sc->rax); 1043 1044 __put_user(env->regs[8], &sc->r8); 1045 __put_user(env->regs[9], &sc->r9); 1046 __put_user(env->regs[10], &sc->r10); 1047 __put_user(env->regs[11], &sc->r11); 1048 __put_user(env->regs[12], &sc->r12); 1049 __put_user(env->regs[13], &sc->r13); 1050 __put_user(env->regs[14], &sc->r14); 1051 __put_user(env->regs[15], &sc->r15); 1052 1053 __put_user(cs->exception_index, &sc->trapno); 1054 __put_user(env->error_code, &sc->err); 1055 __put_user(env->eip, &sc->rip); 1056 1057 __put_user(env->eflags, &sc->eflags); 1058 __put_user(env->segs[R_CS].selector, &sc->cs); 1059 __put_user((uint16_t)0, &sc->gs); 1060 __put_user((uint16_t)0, &sc->fs); 1061 __put_user(env->segs[R_SS].selector, &sc->ss); 1062 1063 __put_user(mask, &sc->oldmask); 1064 __put_user(env->cr[2], &sc->cr2); 1065 1066 /* fpstate_addr must be 16 byte aligned for fxsave */ 1067 assert(!(fpstate_addr & 0xf)); 1068 1069 cpu_x86_fxsave(env, fpstate_addr); 1070 __put_user(fpstate_addr, &sc->fpstate); 1071 #endif 1072 } 1073 1074 /* 1075 * Determine which stack to use.. 1076 */ 1077 1078 static inline abi_ulong 1079 get_sigframe(struct target_sigaction *ka, CPUX86State *env, size_t frame_size) 1080 { 1081 unsigned long esp; 1082 1083 /* Default to using normal stack */ 1084 esp = env->regs[R_ESP]; 1085 #ifdef TARGET_X86_64 1086 esp -= 128; /* this is the redzone */ 1087 #endif 1088 1089 /* This is the X/Open sanctioned signal stack switching. */ 1090 if (ka->sa_flags & TARGET_SA_ONSTACK) { 1091 if (sas_ss_flags(esp) == 0) { 1092 esp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 1093 } 1094 } else { 1095 #ifndef TARGET_X86_64 1096 /* This is the legacy signal stack switching. */ 1097 if ((env->segs[R_SS].selector & 0xffff) != __USER_DS && 1098 !(ka->sa_flags & TARGET_SA_RESTORER) && 1099 ka->sa_restorer) { 1100 esp = (unsigned long) ka->sa_restorer; 1101 } 1102 #endif 1103 } 1104 1105 #ifndef TARGET_X86_64 1106 return (esp - frame_size) & -8ul; 1107 #else 1108 return ((esp - frame_size) & (~15ul)) - 8; 1109 #endif 1110 } 1111 1112 #ifndef TARGET_X86_64 1113 /* compare linux/arch/i386/kernel/signal.c:setup_frame() */ 1114 static void setup_frame(int sig, struct target_sigaction *ka, 1115 target_sigset_t *set, CPUX86State *env) 1116 { 1117 abi_ulong frame_addr; 1118 struct sigframe *frame; 1119 int i; 1120 1121 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 1122 trace_user_setup_frame(env, frame_addr); 1123 1124 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) 1125 goto give_sigsegv; 1126 1127 __put_user(sig, &frame->sig); 1128 1129 setup_sigcontext(&frame->sc, &frame->fpstate, env, set->sig[0], 1130 frame_addr + offsetof(struct sigframe, fpstate)); 1131 1132 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 1133 __put_user(set->sig[i], &frame->extramask[i - 1]); 1134 } 1135 1136 /* Set up to return from userspace. If provided, use a stub 1137 already in userspace. */ 1138 if (ka->sa_flags & TARGET_SA_RESTORER) { 1139 __put_user(ka->sa_restorer, &frame->pretcode); 1140 } else { 1141 uint16_t val16; 1142 abi_ulong retcode_addr; 1143 retcode_addr = frame_addr + offsetof(struct sigframe, retcode); 1144 __put_user(retcode_addr, &frame->pretcode); 1145 /* This is popl %eax ; movl $,%eax ; int $0x80 */ 1146 val16 = 0xb858; 1147 __put_user(val16, (uint16_t *)(frame->retcode+0)); 1148 __put_user(TARGET_NR_sigreturn, (int *)(frame->retcode+2)); 1149 val16 = 0x80cd; 1150 __put_user(val16, (uint16_t *)(frame->retcode+6)); 1151 } 1152 1153 /* Set up registers for signal handler */ 1154 env->regs[R_ESP] = frame_addr; 1155 env->eip = ka->_sa_handler; 1156 1157 cpu_x86_load_seg(env, R_DS, __USER_DS); 1158 cpu_x86_load_seg(env, R_ES, __USER_DS); 1159 cpu_x86_load_seg(env, R_SS, __USER_DS); 1160 cpu_x86_load_seg(env, R_CS, __USER_CS); 1161 env->eflags &= ~TF_MASK; 1162 1163 unlock_user_struct(frame, frame_addr, 1); 1164 1165 return; 1166 1167 give_sigsegv: 1168 force_sigsegv(sig); 1169 } 1170 #endif 1171 1172 /* compare linux/arch/x86/kernel/signal.c:setup_rt_frame() */ 1173 static void setup_rt_frame(int sig, struct target_sigaction *ka, 1174 target_siginfo_t *info, 1175 target_sigset_t *set, CPUX86State *env) 1176 { 1177 abi_ulong frame_addr; 1178 #ifndef TARGET_X86_64 1179 abi_ulong addr; 1180 #endif 1181 struct rt_sigframe *frame; 1182 int i; 1183 1184 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 1185 trace_user_setup_rt_frame(env, frame_addr); 1186 1187 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) 1188 goto give_sigsegv; 1189 1190 /* These fields are only in rt_sigframe on 32 bit */ 1191 #ifndef TARGET_X86_64 1192 __put_user(sig, &frame->sig); 1193 addr = frame_addr + offsetof(struct rt_sigframe, info); 1194 __put_user(addr, &frame->pinfo); 1195 addr = frame_addr + offsetof(struct rt_sigframe, uc); 1196 __put_user(addr, &frame->puc); 1197 #endif 1198 if (ka->sa_flags & TARGET_SA_SIGINFO) { 1199 tswap_siginfo(&frame->info, info); 1200 } 1201 1202 /* Create the ucontext. */ 1203 __put_user(0, &frame->uc.tuc_flags); 1204 __put_user(0, &frame->uc.tuc_link); 1205 __put_user(target_sigaltstack_used.ss_sp, &frame->uc.tuc_stack.ss_sp); 1206 __put_user(sas_ss_flags(get_sp_from_cpustate(env)), 1207 &frame->uc.tuc_stack.ss_flags); 1208 __put_user(target_sigaltstack_used.ss_size, 1209 &frame->uc.tuc_stack.ss_size); 1210 setup_sigcontext(&frame->uc.tuc_mcontext, &frame->fpstate, env, 1211 set->sig[0], frame_addr + offsetof(struct rt_sigframe, fpstate)); 1212 1213 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 1214 __put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]); 1215 } 1216 1217 /* Set up to return from userspace. If provided, use a stub 1218 already in userspace. */ 1219 #ifndef TARGET_X86_64 1220 if (ka->sa_flags & TARGET_SA_RESTORER) { 1221 __put_user(ka->sa_restorer, &frame->pretcode); 1222 } else { 1223 uint16_t val16; 1224 addr = frame_addr + offsetof(struct rt_sigframe, retcode); 1225 __put_user(addr, &frame->pretcode); 1226 /* This is movl $,%eax ; int $0x80 */ 1227 __put_user(0xb8, (char *)(frame->retcode+0)); 1228 __put_user(TARGET_NR_rt_sigreturn, (int *)(frame->retcode+1)); 1229 val16 = 0x80cd; 1230 __put_user(val16, (uint16_t *)(frame->retcode+5)); 1231 } 1232 #else 1233 /* XXX: Would be slightly better to return -EFAULT here if test fails 1234 assert(ka->sa_flags & TARGET_SA_RESTORER); */ 1235 __put_user(ka->sa_restorer, &frame->pretcode); 1236 #endif 1237 1238 /* Set up registers for signal handler */ 1239 env->regs[R_ESP] = frame_addr; 1240 env->eip = ka->_sa_handler; 1241 1242 #ifndef TARGET_X86_64 1243 env->regs[R_EAX] = sig; 1244 env->regs[R_EDX] = (unsigned long)&frame->info; 1245 env->regs[R_ECX] = (unsigned long)&frame->uc; 1246 #else 1247 env->regs[R_EAX] = 0; 1248 env->regs[R_EDI] = sig; 1249 env->regs[R_ESI] = (unsigned long)&frame->info; 1250 env->regs[R_EDX] = (unsigned long)&frame->uc; 1251 #endif 1252 1253 cpu_x86_load_seg(env, R_DS, __USER_DS); 1254 cpu_x86_load_seg(env, R_ES, __USER_DS); 1255 cpu_x86_load_seg(env, R_CS, __USER_CS); 1256 cpu_x86_load_seg(env, R_SS, __USER_DS); 1257 env->eflags &= ~TF_MASK; 1258 1259 unlock_user_struct(frame, frame_addr, 1); 1260 1261 return; 1262 1263 give_sigsegv: 1264 force_sigsegv(sig); 1265 } 1266 1267 static int 1268 restore_sigcontext(CPUX86State *env, struct target_sigcontext *sc) 1269 { 1270 unsigned int err = 0; 1271 abi_ulong fpstate_addr; 1272 unsigned int tmpflags; 1273 1274 #ifndef TARGET_X86_64 1275 cpu_x86_load_seg(env, R_GS, tswap16(sc->gs)); 1276 cpu_x86_load_seg(env, R_FS, tswap16(sc->fs)); 1277 cpu_x86_load_seg(env, R_ES, tswap16(sc->es)); 1278 cpu_x86_load_seg(env, R_DS, tswap16(sc->ds)); 1279 1280 env->regs[R_EDI] = tswapl(sc->edi); 1281 env->regs[R_ESI] = tswapl(sc->esi); 1282 env->regs[R_EBP] = tswapl(sc->ebp); 1283 env->regs[R_ESP] = tswapl(sc->esp); 1284 env->regs[R_EBX] = tswapl(sc->ebx); 1285 env->regs[R_EDX] = tswapl(sc->edx); 1286 env->regs[R_ECX] = tswapl(sc->ecx); 1287 env->regs[R_EAX] = tswapl(sc->eax); 1288 1289 env->eip = tswapl(sc->eip); 1290 #else 1291 env->regs[8] = tswapl(sc->r8); 1292 env->regs[9] = tswapl(sc->r9); 1293 env->regs[10] = tswapl(sc->r10); 1294 env->regs[11] = tswapl(sc->r11); 1295 env->regs[12] = tswapl(sc->r12); 1296 env->regs[13] = tswapl(sc->r13); 1297 env->regs[14] = tswapl(sc->r14); 1298 env->regs[15] = tswapl(sc->r15); 1299 1300 env->regs[R_EDI] = tswapl(sc->rdi); 1301 env->regs[R_ESI] = tswapl(sc->rsi); 1302 env->regs[R_EBP] = tswapl(sc->rbp); 1303 env->regs[R_EBX] = tswapl(sc->rbx); 1304 env->regs[R_EDX] = tswapl(sc->rdx); 1305 env->regs[R_EAX] = tswapl(sc->rax); 1306 env->regs[R_ECX] = tswapl(sc->rcx); 1307 env->regs[R_ESP] = tswapl(sc->rsp); 1308 1309 env->eip = tswapl(sc->rip); 1310 #endif 1311 1312 cpu_x86_load_seg(env, R_CS, lduw_p(&sc->cs) | 3); 1313 cpu_x86_load_seg(env, R_SS, lduw_p(&sc->ss) | 3); 1314 1315 tmpflags = tswapl(sc->eflags); 1316 env->eflags = (env->eflags & ~0x40DD5) | (tmpflags & 0x40DD5); 1317 // regs->orig_eax = -1; /* disable syscall checks */ 1318 1319 fpstate_addr = tswapl(sc->fpstate); 1320 if (fpstate_addr != 0) { 1321 if (!access_ok(VERIFY_READ, fpstate_addr, 1322 sizeof(struct target_fpstate))) 1323 goto badframe; 1324 #ifndef TARGET_X86_64 1325 cpu_x86_frstor(env, fpstate_addr, 1); 1326 #else 1327 cpu_x86_fxrstor(env, fpstate_addr); 1328 #endif 1329 } 1330 1331 return err; 1332 badframe: 1333 return 1; 1334 } 1335 1336 /* Note: there is no sigreturn on x86_64, there is only rt_sigreturn */ 1337 #ifndef TARGET_X86_64 1338 long do_sigreturn(CPUX86State *env) 1339 { 1340 struct sigframe *frame; 1341 abi_ulong frame_addr = env->regs[R_ESP] - 8; 1342 target_sigset_t target_set; 1343 sigset_t set; 1344 int i; 1345 1346 trace_user_do_sigreturn(env, frame_addr); 1347 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) 1348 goto badframe; 1349 /* set blocked signals */ 1350 __get_user(target_set.sig[0], &frame->sc.oldmask); 1351 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 1352 __get_user(target_set.sig[i], &frame->extramask[i - 1]); 1353 } 1354 1355 target_to_host_sigset_internal(&set, &target_set); 1356 set_sigmask(&set); 1357 1358 /* restore registers */ 1359 if (restore_sigcontext(env, &frame->sc)) 1360 goto badframe; 1361 unlock_user_struct(frame, frame_addr, 0); 1362 return -TARGET_QEMU_ESIGRETURN; 1363 1364 badframe: 1365 unlock_user_struct(frame, frame_addr, 0); 1366 force_sig(TARGET_SIGSEGV); 1367 return -TARGET_QEMU_ESIGRETURN; 1368 } 1369 #endif 1370 1371 long do_rt_sigreturn(CPUX86State *env) 1372 { 1373 abi_ulong frame_addr; 1374 struct rt_sigframe *frame; 1375 sigset_t set; 1376 1377 frame_addr = env->regs[R_ESP] - sizeof(abi_ulong); 1378 trace_user_do_rt_sigreturn(env, frame_addr); 1379 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) 1380 goto badframe; 1381 target_to_host_sigset(&set, &frame->uc.tuc_sigmask); 1382 set_sigmask(&set); 1383 1384 if (restore_sigcontext(env, &frame->uc.tuc_mcontext)) { 1385 goto badframe; 1386 } 1387 1388 if (do_sigaltstack(frame_addr + offsetof(struct rt_sigframe, uc.tuc_stack), 0, 1389 get_sp_from_cpustate(env)) == -EFAULT) { 1390 goto badframe; 1391 } 1392 1393 unlock_user_struct(frame, frame_addr, 0); 1394 return -TARGET_QEMU_ESIGRETURN; 1395 1396 badframe: 1397 unlock_user_struct(frame, frame_addr, 0); 1398 force_sig(TARGET_SIGSEGV); 1399 return -TARGET_QEMU_ESIGRETURN; 1400 } 1401 1402 #elif defined(TARGET_AARCH64) 1403 1404 struct target_sigcontext { 1405 uint64_t fault_address; 1406 /* AArch64 registers */ 1407 uint64_t regs[31]; 1408 uint64_t sp; 1409 uint64_t pc; 1410 uint64_t pstate; 1411 /* 4K reserved for FP/SIMD state and future expansion */ 1412 char __reserved[4096] __attribute__((__aligned__(16))); 1413 }; 1414 1415 struct target_ucontext { 1416 abi_ulong tuc_flags; 1417 abi_ulong tuc_link; 1418 target_stack_t tuc_stack; 1419 target_sigset_t tuc_sigmask; 1420 /* glibc uses a 1024-bit sigset_t */ 1421 char __unused[1024 / 8 - sizeof(target_sigset_t)]; 1422 /* last for future expansion */ 1423 struct target_sigcontext tuc_mcontext; 1424 }; 1425 1426 /* 1427 * Header to be used at the beginning of structures extending the user 1428 * context. Such structures must be placed after the rt_sigframe on the stack 1429 * and be 16-byte aligned. The last structure must be a dummy one with the 1430 * magic and size set to 0. 1431 */ 1432 struct target_aarch64_ctx { 1433 uint32_t magic; 1434 uint32_t size; 1435 }; 1436 1437 #define TARGET_FPSIMD_MAGIC 0x46508001 1438 1439 struct target_fpsimd_context { 1440 struct target_aarch64_ctx head; 1441 uint32_t fpsr; 1442 uint32_t fpcr; 1443 uint64_t vregs[32 * 2]; /* really uint128_t vregs[32] */ 1444 }; 1445 1446 /* 1447 * Auxiliary context saved in the sigcontext.__reserved array. Not exported to 1448 * user space as it will change with the addition of new context. User space 1449 * should check the magic/size information. 1450 */ 1451 struct target_aux_context { 1452 struct target_fpsimd_context fpsimd; 1453 /* additional context to be added before "end" */ 1454 struct target_aarch64_ctx end; 1455 }; 1456 1457 struct target_rt_sigframe { 1458 struct target_siginfo info; 1459 struct target_ucontext uc; 1460 uint64_t fp; 1461 uint64_t lr; 1462 uint32_t tramp[2]; 1463 }; 1464 1465 static int target_setup_sigframe(struct target_rt_sigframe *sf, 1466 CPUARMState *env, target_sigset_t *set) 1467 { 1468 int i; 1469 struct target_aux_context *aux = 1470 (struct target_aux_context *)sf->uc.tuc_mcontext.__reserved; 1471 1472 /* set up the stack frame for unwinding */ 1473 __put_user(env->xregs[29], &sf->fp); 1474 __put_user(env->xregs[30], &sf->lr); 1475 1476 for (i = 0; i < 31; i++) { 1477 __put_user(env->xregs[i], &sf->uc.tuc_mcontext.regs[i]); 1478 } 1479 __put_user(env->xregs[31], &sf->uc.tuc_mcontext.sp); 1480 __put_user(env->pc, &sf->uc.tuc_mcontext.pc); 1481 __put_user(pstate_read(env), &sf->uc.tuc_mcontext.pstate); 1482 1483 __put_user(env->exception.vaddress, &sf->uc.tuc_mcontext.fault_address); 1484 1485 for (i = 0; i < TARGET_NSIG_WORDS; i++) { 1486 __put_user(set->sig[i], &sf->uc.tuc_sigmask.sig[i]); 1487 } 1488 1489 for (i = 0; i < 32; i++) { 1490 #ifdef TARGET_WORDS_BIGENDIAN 1491 __put_user(env->vfp.regs[i * 2], &aux->fpsimd.vregs[i * 2 + 1]); 1492 __put_user(env->vfp.regs[i * 2 + 1], &aux->fpsimd.vregs[i * 2]); 1493 #else 1494 __put_user(env->vfp.regs[i * 2], &aux->fpsimd.vregs[i * 2]); 1495 __put_user(env->vfp.regs[i * 2 + 1], &aux->fpsimd.vregs[i * 2 + 1]); 1496 #endif 1497 } 1498 __put_user(vfp_get_fpsr(env), &aux->fpsimd.fpsr); 1499 __put_user(vfp_get_fpcr(env), &aux->fpsimd.fpcr); 1500 __put_user(TARGET_FPSIMD_MAGIC, &aux->fpsimd.head.magic); 1501 __put_user(sizeof(struct target_fpsimd_context), 1502 &aux->fpsimd.head.size); 1503 1504 /* set the "end" magic */ 1505 __put_user(0, &aux->end.magic); 1506 __put_user(0, &aux->end.size); 1507 1508 return 0; 1509 } 1510 1511 static int target_restore_sigframe(CPUARMState *env, 1512 struct target_rt_sigframe *sf) 1513 { 1514 sigset_t set; 1515 int i; 1516 struct target_aux_context *aux = 1517 (struct target_aux_context *)sf->uc.tuc_mcontext.__reserved; 1518 uint32_t magic, size, fpsr, fpcr; 1519 uint64_t pstate; 1520 1521 target_to_host_sigset(&set, &sf->uc.tuc_sigmask); 1522 set_sigmask(&set); 1523 1524 for (i = 0; i < 31; i++) { 1525 __get_user(env->xregs[i], &sf->uc.tuc_mcontext.regs[i]); 1526 } 1527 1528 __get_user(env->xregs[31], &sf->uc.tuc_mcontext.sp); 1529 __get_user(env->pc, &sf->uc.tuc_mcontext.pc); 1530 __get_user(pstate, &sf->uc.tuc_mcontext.pstate); 1531 pstate_write(env, pstate); 1532 1533 __get_user(magic, &aux->fpsimd.head.magic); 1534 __get_user(size, &aux->fpsimd.head.size); 1535 1536 if (magic != TARGET_FPSIMD_MAGIC 1537 || size != sizeof(struct target_fpsimd_context)) { 1538 return 1; 1539 } 1540 1541 for (i = 0; i < 32; i++) { 1542 #ifdef TARGET_WORDS_BIGENDIAN 1543 __get_user(env->vfp.regs[i * 2], &aux->fpsimd.vregs[i * 2 + 1]); 1544 __get_user(env->vfp.regs[i * 2 + 1], &aux->fpsimd.vregs[i * 2]); 1545 #else 1546 __get_user(env->vfp.regs[i * 2], &aux->fpsimd.vregs[i * 2]); 1547 __get_user(env->vfp.regs[i * 2 + 1], &aux->fpsimd.vregs[i * 2 + 1]); 1548 #endif 1549 } 1550 __get_user(fpsr, &aux->fpsimd.fpsr); 1551 vfp_set_fpsr(env, fpsr); 1552 __get_user(fpcr, &aux->fpsimd.fpcr); 1553 vfp_set_fpcr(env, fpcr); 1554 1555 return 0; 1556 } 1557 1558 static abi_ulong get_sigframe(struct target_sigaction *ka, CPUARMState *env) 1559 { 1560 abi_ulong sp; 1561 1562 sp = env->xregs[31]; 1563 1564 /* 1565 * This is the X/Open sanctioned signal stack switching. 1566 */ 1567 if ((ka->sa_flags & TARGET_SA_ONSTACK) && !sas_ss_flags(sp)) { 1568 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 1569 } 1570 1571 sp = (sp - sizeof(struct target_rt_sigframe)) & ~15; 1572 1573 return sp; 1574 } 1575 1576 static void target_setup_frame(int usig, struct target_sigaction *ka, 1577 target_siginfo_t *info, target_sigset_t *set, 1578 CPUARMState *env) 1579 { 1580 struct target_rt_sigframe *frame; 1581 abi_ulong frame_addr, return_addr; 1582 1583 frame_addr = get_sigframe(ka, env); 1584 trace_user_setup_frame(env, frame_addr); 1585 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 1586 goto give_sigsegv; 1587 } 1588 1589 __put_user(0, &frame->uc.tuc_flags); 1590 __put_user(0, &frame->uc.tuc_link); 1591 1592 __put_user(target_sigaltstack_used.ss_sp, 1593 &frame->uc.tuc_stack.ss_sp); 1594 __put_user(sas_ss_flags(env->xregs[31]), 1595 &frame->uc.tuc_stack.ss_flags); 1596 __put_user(target_sigaltstack_used.ss_size, 1597 &frame->uc.tuc_stack.ss_size); 1598 target_setup_sigframe(frame, env, set); 1599 if (ka->sa_flags & TARGET_SA_RESTORER) { 1600 return_addr = ka->sa_restorer; 1601 } else { 1602 /* mov x8,#__NR_rt_sigreturn; svc #0 */ 1603 __put_user(0xd2801168, &frame->tramp[0]); 1604 __put_user(0xd4000001, &frame->tramp[1]); 1605 return_addr = frame_addr + offsetof(struct target_rt_sigframe, tramp); 1606 } 1607 env->xregs[0] = usig; 1608 env->xregs[31] = frame_addr; 1609 env->xregs[29] = env->xregs[31] + offsetof(struct target_rt_sigframe, fp); 1610 env->pc = ka->_sa_handler; 1611 env->xregs[30] = return_addr; 1612 if (info) { 1613 tswap_siginfo(&frame->info, info); 1614 env->xregs[1] = frame_addr + offsetof(struct target_rt_sigframe, info); 1615 env->xregs[2] = frame_addr + offsetof(struct target_rt_sigframe, uc); 1616 } 1617 1618 unlock_user_struct(frame, frame_addr, 1); 1619 return; 1620 1621 give_sigsegv: 1622 unlock_user_struct(frame, frame_addr, 1); 1623 force_sigsegv(usig); 1624 } 1625 1626 static void setup_rt_frame(int sig, struct target_sigaction *ka, 1627 target_siginfo_t *info, target_sigset_t *set, 1628 CPUARMState *env) 1629 { 1630 target_setup_frame(sig, ka, info, set, env); 1631 } 1632 1633 static void setup_frame(int sig, struct target_sigaction *ka, 1634 target_sigset_t *set, CPUARMState *env) 1635 { 1636 target_setup_frame(sig, ka, 0, set, env); 1637 } 1638 1639 long do_rt_sigreturn(CPUARMState *env) 1640 { 1641 struct target_rt_sigframe *frame = NULL; 1642 abi_ulong frame_addr = env->xregs[31]; 1643 1644 trace_user_do_rt_sigreturn(env, frame_addr); 1645 if (frame_addr & 15) { 1646 goto badframe; 1647 } 1648 1649 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 1650 goto badframe; 1651 } 1652 1653 if (target_restore_sigframe(env, frame)) { 1654 goto badframe; 1655 } 1656 1657 if (do_sigaltstack(frame_addr + 1658 offsetof(struct target_rt_sigframe, uc.tuc_stack), 1659 0, get_sp_from_cpustate(env)) == -EFAULT) { 1660 goto badframe; 1661 } 1662 1663 unlock_user_struct(frame, frame_addr, 0); 1664 return -TARGET_QEMU_ESIGRETURN; 1665 1666 badframe: 1667 unlock_user_struct(frame, frame_addr, 0); 1668 force_sig(TARGET_SIGSEGV); 1669 return -TARGET_QEMU_ESIGRETURN; 1670 } 1671 1672 long do_sigreturn(CPUARMState *env) 1673 { 1674 return do_rt_sigreturn(env); 1675 } 1676 1677 #elif defined(TARGET_ARM) 1678 1679 struct target_sigcontext { 1680 abi_ulong trap_no; 1681 abi_ulong error_code; 1682 abi_ulong oldmask; 1683 abi_ulong arm_r0; 1684 abi_ulong arm_r1; 1685 abi_ulong arm_r2; 1686 abi_ulong arm_r3; 1687 abi_ulong arm_r4; 1688 abi_ulong arm_r5; 1689 abi_ulong arm_r6; 1690 abi_ulong arm_r7; 1691 abi_ulong arm_r8; 1692 abi_ulong arm_r9; 1693 abi_ulong arm_r10; 1694 abi_ulong arm_fp; 1695 abi_ulong arm_ip; 1696 abi_ulong arm_sp; 1697 abi_ulong arm_lr; 1698 abi_ulong arm_pc; 1699 abi_ulong arm_cpsr; 1700 abi_ulong fault_address; 1701 }; 1702 1703 struct target_ucontext_v1 { 1704 abi_ulong tuc_flags; 1705 abi_ulong tuc_link; 1706 target_stack_t tuc_stack; 1707 struct target_sigcontext tuc_mcontext; 1708 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 1709 }; 1710 1711 struct target_ucontext_v2 { 1712 abi_ulong tuc_flags; 1713 abi_ulong tuc_link; 1714 target_stack_t tuc_stack; 1715 struct target_sigcontext tuc_mcontext; 1716 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 1717 char __unused[128 - sizeof(target_sigset_t)]; 1718 abi_ulong tuc_regspace[128] __attribute__((__aligned__(8))); 1719 }; 1720 1721 struct target_user_vfp { 1722 uint64_t fpregs[32]; 1723 abi_ulong fpscr; 1724 }; 1725 1726 struct target_user_vfp_exc { 1727 abi_ulong fpexc; 1728 abi_ulong fpinst; 1729 abi_ulong fpinst2; 1730 }; 1731 1732 struct target_vfp_sigframe { 1733 abi_ulong magic; 1734 abi_ulong size; 1735 struct target_user_vfp ufp; 1736 struct target_user_vfp_exc ufp_exc; 1737 } __attribute__((__aligned__(8))); 1738 1739 struct target_iwmmxt_sigframe { 1740 abi_ulong magic; 1741 abi_ulong size; 1742 uint64_t regs[16]; 1743 /* Note that not all the coprocessor control registers are stored here */ 1744 uint32_t wcssf; 1745 uint32_t wcasf; 1746 uint32_t wcgr0; 1747 uint32_t wcgr1; 1748 uint32_t wcgr2; 1749 uint32_t wcgr3; 1750 } __attribute__((__aligned__(8))); 1751 1752 #define TARGET_VFP_MAGIC 0x56465001 1753 #define TARGET_IWMMXT_MAGIC 0x12ef842a 1754 1755 struct sigframe_v1 1756 { 1757 struct target_sigcontext sc; 1758 abi_ulong extramask[TARGET_NSIG_WORDS-1]; 1759 abi_ulong retcode; 1760 }; 1761 1762 struct sigframe_v2 1763 { 1764 struct target_ucontext_v2 uc; 1765 abi_ulong retcode; 1766 }; 1767 1768 struct rt_sigframe_v1 1769 { 1770 abi_ulong pinfo; 1771 abi_ulong puc; 1772 struct target_siginfo info; 1773 struct target_ucontext_v1 uc; 1774 abi_ulong retcode; 1775 }; 1776 1777 struct rt_sigframe_v2 1778 { 1779 struct target_siginfo info; 1780 struct target_ucontext_v2 uc; 1781 abi_ulong retcode; 1782 }; 1783 1784 #define TARGET_CONFIG_CPU_32 1 1785 1786 /* 1787 * For ARM syscalls, we encode the syscall number into the instruction. 1788 */ 1789 #define SWI_SYS_SIGRETURN (0xef000000|(TARGET_NR_sigreturn + ARM_SYSCALL_BASE)) 1790 #define SWI_SYS_RT_SIGRETURN (0xef000000|(TARGET_NR_rt_sigreturn + ARM_SYSCALL_BASE)) 1791 1792 /* 1793 * For Thumb syscalls, we pass the syscall number via r7. We therefore 1794 * need two 16-bit instructions. 1795 */ 1796 #define SWI_THUMB_SIGRETURN (0xdf00 << 16 | 0x2700 | (TARGET_NR_sigreturn)) 1797 #define SWI_THUMB_RT_SIGRETURN (0xdf00 << 16 | 0x2700 | (TARGET_NR_rt_sigreturn)) 1798 1799 static const abi_ulong retcodes[4] = { 1800 SWI_SYS_SIGRETURN, SWI_THUMB_SIGRETURN, 1801 SWI_SYS_RT_SIGRETURN, SWI_THUMB_RT_SIGRETURN 1802 }; 1803 1804 1805 static inline int valid_user_regs(CPUARMState *regs) 1806 { 1807 return 1; 1808 } 1809 1810 static void 1811 setup_sigcontext(struct target_sigcontext *sc, /*struct _fpstate *fpstate,*/ 1812 CPUARMState *env, abi_ulong mask) 1813 { 1814 __put_user(env->regs[0], &sc->arm_r0); 1815 __put_user(env->regs[1], &sc->arm_r1); 1816 __put_user(env->regs[2], &sc->arm_r2); 1817 __put_user(env->regs[3], &sc->arm_r3); 1818 __put_user(env->regs[4], &sc->arm_r4); 1819 __put_user(env->regs[5], &sc->arm_r5); 1820 __put_user(env->regs[6], &sc->arm_r6); 1821 __put_user(env->regs[7], &sc->arm_r7); 1822 __put_user(env->regs[8], &sc->arm_r8); 1823 __put_user(env->regs[9], &sc->arm_r9); 1824 __put_user(env->regs[10], &sc->arm_r10); 1825 __put_user(env->regs[11], &sc->arm_fp); 1826 __put_user(env->regs[12], &sc->arm_ip); 1827 __put_user(env->regs[13], &sc->arm_sp); 1828 __put_user(env->regs[14], &sc->arm_lr); 1829 __put_user(env->regs[15], &sc->arm_pc); 1830 #ifdef TARGET_CONFIG_CPU_32 1831 __put_user(cpsr_read(env), &sc->arm_cpsr); 1832 #endif 1833 1834 __put_user(/* current->thread.trap_no */ 0, &sc->trap_no); 1835 __put_user(/* current->thread.error_code */ 0, &sc->error_code); 1836 __put_user(/* current->thread.address */ 0, &sc->fault_address); 1837 __put_user(mask, &sc->oldmask); 1838 } 1839 1840 static inline abi_ulong 1841 get_sigframe(struct target_sigaction *ka, CPUARMState *regs, int framesize) 1842 { 1843 unsigned long sp = regs->regs[13]; 1844 1845 /* 1846 * This is the X/Open sanctioned signal stack switching. 1847 */ 1848 if ((ka->sa_flags & TARGET_SA_ONSTACK) && !sas_ss_flags(sp)) { 1849 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 1850 } 1851 /* 1852 * ATPCS B01 mandates 8-byte alignment 1853 */ 1854 return (sp - framesize) & ~7; 1855 } 1856 1857 static void 1858 setup_return(CPUARMState *env, struct target_sigaction *ka, 1859 abi_ulong *rc, abi_ulong frame_addr, int usig, abi_ulong rc_addr) 1860 { 1861 abi_ulong handler = ka->_sa_handler; 1862 abi_ulong retcode; 1863 int thumb = handler & 1; 1864 uint32_t cpsr = cpsr_read(env); 1865 1866 cpsr &= ~CPSR_IT; 1867 if (thumb) { 1868 cpsr |= CPSR_T; 1869 } else { 1870 cpsr &= ~CPSR_T; 1871 } 1872 1873 if (ka->sa_flags & TARGET_SA_RESTORER) { 1874 retcode = ka->sa_restorer; 1875 } else { 1876 unsigned int idx = thumb; 1877 1878 if (ka->sa_flags & TARGET_SA_SIGINFO) { 1879 idx += 2; 1880 } 1881 1882 __put_user(retcodes[idx], rc); 1883 1884 retcode = rc_addr + thumb; 1885 } 1886 1887 env->regs[0] = usig; 1888 env->regs[13] = frame_addr; 1889 env->regs[14] = retcode; 1890 env->regs[15] = handler & (thumb ? ~1 : ~3); 1891 cpsr_write(env, cpsr, CPSR_IT | CPSR_T, CPSRWriteByInstr); 1892 } 1893 1894 static abi_ulong *setup_sigframe_v2_vfp(abi_ulong *regspace, CPUARMState *env) 1895 { 1896 int i; 1897 struct target_vfp_sigframe *vfpframe; 1898 vfpframe = (struct target_vfp_sigframe *)regspace; 1899 __put_user(TARGET_VFP_MAGIC, &vfpframe->magic); 1900 __put_user(sizeof(*vfpframe), &vfpframe->size); 1901 for (i = 0; i < 32; i++) { 1902 __put_user(float64_val(env->vfp.regs[i]), &vfpframe->ufp.fpregs[i]); 1903 } 1904 __put_user(vfp_get_fpscr(env), &vfpframe->ufp.fpscr); 1905 __put_user(env->vfp.xregs[ARM_VFP_FPEXC], &vfpframe->ufp_exc.fpexc); 1906 __put_user(env->vfp.xregs[ARM_VFP_FPINST], &vfpframe->ufp_exc.fpinst); 1907 __put_user(env->vfp.xregs[ARM_VFP_FPINST2], &vfpframe->ufp_exc.fpinst2); 1908 return (abi_ulong*)(vfpframe+1); 1909 } 1910 1911 static abi_ulong *setup_sigframe_v2_iwmmxt(abi_ulong *regspace, 1912 CPUARMState *env) 1913 { 1914 int i; 1915 struct target_iwmmxt_sigframe *iwmmxtframe; 1916 iwmmxtframe = (struct target_iwmmxt_sigframe *)regspace; 1917 __put_user(TARGET_IWMMXT_MAGIC, &iwmmxtframe->magic); 1918 __put_user(sizeof(*iwmmxtframe), &iwmmxtframe->size); 1919 for (i = 0; i < 16; i++) { 1920 __put_user(env->iwmmxt.regs[i], &iwmmxtframe->regs[i]); 1921 } 1922 __put_user(env->vfp.xregs[ARM_IWMMXT_wCSSF], &iwmmxtframe->wcssf); 1923 __put_user(env->vfp.xregs[ARM_IWMMXT_wCASF], &iwmmxtframe->wcssf); 1924 __put_user(env->vfp.xregs[ARM_IWMMXT_wCGR0], &iwmmxtframe->wcgr0); 1925 __put_user(env->vfp.xregs[ARM_IWMMXT_wCGR1], &iwmmxtframe->wcgr1); 1926 __put_user(env->vfp.xregs[ARM_IWMMXT_wCGR2], &iwmmxtframe->wcgr2); 1927 __put_user(env->vfp.xregs[ARM_IWMMXT_wCGR3], &iwmmxtframe->wcgr3); 1928 return (abi_ulong*)(iwmmxtframe+1); 1929 } 1930 1931 static void setup_sigframe_v2(struct target_ucontext_v2 *uc, 1932 target_sigset_t *set, CPUARMState *env) 1933 { 1934 struct target_sigaltstack stack; 1935 int i; 1936 abi_ulong *regspace; 1937 1938 /* Clear all the bits of the ucontext we don't use. */ 1939 memset(uc, 0, offsetof(struct target_ucontext_v2, tuc_mcontext)); 1940 1941 memset(&stack, 0, sizeof(stack)); 1942 __put_user(target_sigaltstack_used.ss_sp, &stack.ss_sp); 1943 __put_user(target_sigaltstack_used.ss_size, &stack.ss_size); 1944 __put_user(sas_ss_flags(get_sp_from_cpustate(env)), &stack.ss_flags); 1945 memcpy(&uc->tuc_stack, &stack, sizeof(stack)); 1946 1947 setup_sigcontext(&uc->tuc_mcontext, env, set->sig[0]); 1948 /* Save coprocessor signal frame. */ 1949 regspace = uc->tuc_regspace; 1950 if (arm_feature(env, ARM_FEATURE_VFP)) { 1951 regspace = setup_sigframe_v2_vfp(regspace, env); 1952 } 1953 if (arm_feature(env, ARM_FEATURE_IWMMXT)) { 1954 regspace = setup_sigframe_v2_iwmmxt(regspace, env); 1955 } 1956 1957 /* Write terminating magic word */ 1958 __put_user(0, regspace); 1959 1960 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 1961 __put_user(set->sig[i], &uc->tuc_sigmask.sig[i]); 1962 } 1963 } 1964 1965 /* compare linux/arch/arm/kernel/signal.c:setup_frame() */ 1966 static void setup_frame_v1(int usig, struct target_sigaction *ka, 1967 target_sigset_t *set, CPUARMState *regs) 1968 { 1969 struct sigframe_v1 *frame; 1970 abi_ulong frame_addr = get_sigframe(ka, regs, sizeof(*frame)); 1971 int i; 1972 1973 trace_user_setup_frame(regs, frame_addr); 1974 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 1975 goto sigsegv; 1976 } 1977 1978 setup_sigcontext(&frame->sc, regs, set->sig[0]); 1979 1980 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 1981 __put_user(set->sig[i], &frame->extramask[i - 1]); 1982 } 1983 1984 setup_return(regs, ka, &frame->retcode, frame_addr, usig, 1985 frame_addr + offsetof(struct sigframe_v1, retcode)); 1986 1987 unlock_user_struct(frame, frame_addr, 1); 1988 return; 1989 sigsegv: 1990 force_sigsegv(usig); 1991 } 1992 1993 static void setup_frame_v2(int usig, struct target_sigaction *ka, 1994 target_sigset_t *set, CPUARMState *regs) 1995 { 1996 struct sigframe_v2 *frame; 1997 abi_ulong frame_addr = get_sigframe(ka, regs, sizeof(*frame)); 1998 1999 trace_user_setup_frame(regs, frame_addr); 2000 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 2001 goto sigsegv; 2002 } 2003 2004 setup_sigframe_v2(&frame->uc, set, regs); 2005 2006 setup_return(regs, ka, &frame->retcode, frame_addr, usig, 2007 frame_addr + offsetof(struct sigframe_v2, retcode)); 2008 2009 unlock_user_struct(frame, frame_addr, 1); 2010 return; 2011 sigsegv: 2012 force_sigsegv(usig); 2013 } 2014 2015 static void setup_frame(int usig, struct target_sigaction *ka, 2016 target_sigset_t *set, CPUARMState *regs) 2017 { 2018 if (get_osversion() >= 0x020612) { 2019 setup_frame_v2(usig, ka, set, regs); 2020 } else { 2021 setup_frame_v1(usig, ka, set, regs); 2022 } 2023 } 2024 2025 /* compare linux/arch/arm/kernel/signal.c:setup_rt_frame() */ 2026 static void setup_rt_frame_v1(int usig, struct target_sigaction *ka, 2027 target_siginfo_t *info, 2028 target_sigset_t *set, CPUARMState *env) 2029 { 2030 struct rt_sigframe_v1 *frame; 2031 abi_ulong frame_addr = get_sigframe(ka, env, sizeof(*frame)); 2032 struct target_sigaltstack stack; 2033 int i; 2034 abi_ulong info_addr, uc_addr; 2035 2036 trace_user_setup_rt_frame(env, frame_addr); 2037 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 2038 goto sigsegv; 2039 } 2040 2041 info_addr = frame_addr + offsetof(struct rt_sigframe_v1, info); 2042 __put_user(info_addr, &frame->pinfo); 2043 uc_addr = frame_addr + offsetof(struct rt_sigframe_v1, uc); 2044 __put_user(uc_addr, &frame->puc); 2045 tswap_siginfo(&frame->info, info); 2046 2047 /* Clear all the bits of the ucontext we don't use. */ 2048 memset(&frame->uc, 0, offsetof(struct target_ucontext_v1, tuc_mcontext)); 2049 2050 memset(&stack, 0, sizeof(stack)); 2051 __put_user(target_sigaltstack_used.ss_sp, &stack.ss_sp); 2052 __put_user(target_sigaltstack_used.ss_size, &stack.ss_size); 2053 __put_user(sas_ss_flags(get_sp_from_cpustate(env)), &stack.ss_flags); 2054 memcpy(&frame->uc.tuc_stack, &stack, sizeof(stack)); 2055 2056 setup_sigcontext(&frame->uc.tuc_mcontext, env, set->sig[0]); 2057 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 2058 __put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]); 2059 } 2060 2061 setup_return(env, ka, &frame->retcode, frame_addr, usig, 2062 frame_addr + offsetof(struct rt_sigframe_v1, retcode)); 2063 2064 env->regs[1] = info_addr; 2065 env->regs[2] = uc_addr; 2066 2067 unlock_user_struct(frame, frame_addr, 1); 2068 return; 2069 sigsegv: 2070 force_sigsegv(usig); 2071 } 2072 2073 static void setup_rt_frame_v2(int usig, struct target_sigaction *ka, 2074 target_siginfo_t *info, 2075 target_sigset_t *set, CPUARMState *env) 2076 { 2077 struct rt_sigframe_v2 *frame; 2078 abi_ulong frame_addr = get_sigframe(ka, env, sizeof(*frame)); 2079 abi_ulong info_addr, uc_addr; 2080 2081 trace_user_setup_rt_frame(env, frame_addr); 2082 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 2083 goto sigsegv; 2084 } 2085 2086 info_addr = frame_addr + offsetof(struct rt_sigframe_v2, info); 2087 uc_addr = frame_addr + offsetof(struct rt_sigframe_v2, uc); 2088 tswap_siginfo(&frame->info, info); 2089 2090 setup_sigframe_v2(&frame->uc, set, env); 2091 2092 setup_return(env, ka, &frame->retcode, frame_addr, usig, 2093 frame_addr + offsetof(struct rt_sigframe_v2, retcode)); 2094 2095 env->regs[1] = info_addr; 2096 env->regs[2] = uc_addr; 2097 2098 unlock_user_struct(frame, frame_addr, 1); 2099 return; 2100 sigsegv: 2101 force_sigsegv(usig); 2102 } 2103 2104 static void setup_rt_frame(int usig, struct target_sigaction *ka, 2105 target_siginfo_t *info, 2106 target_sigset_t *set, CPUARMState *env) 2107 { 2108 if (get_osversion() >= 0x020612) { 2109 setup_rt_frame_v2(usig, ka, info, set, env); 2110 } else { 2111 setup_rt_frame_v1(usig, ka, info, set, env); 2112 } 2113 } 2114 2115 static int 2116 restore_sigcontext(CPUARMState *env, struct target_sigcontext *sc) 2117 { 2118 int err = 0; 2119 uint32_t cpsr; 2120 2121 __get_user(env->regs[0], &sc->arm_r0); 2122 __get_user(env->regs[1], &sc->arm_r1); 2123 __get_user(env->regs[2], &sc->arm_r2); 2124 __get_user(env->regs[3], &sc->arm_r3); 2125 __get_user(env->regs[4], &sc->arm_r4); 2126 __get_user(env->regs[5], &sc->arm_r5); 2127 __get_user(env->regs[6], &sc->arm_r6); 2128 __get_user(env->regs[7], &sc->arm_r7); 2129 __get_user(env->regs[8], &sc->arm_r8); 2130 __get_user(env->regs[9], &sc->arm_r9); 2131 __get_user(env->regs[10], &sc->arm_r10); 2132 __get_user(env->regs[11], &sc->arm_fp); 2133 __get_user(env->regs[12], &sc->arm_ip); 2134 __get_user(env->regs[13], &sc->arm_sp); 2135 __get_user(env->regs[14], &sc->arm_lr); 2136 __get_user(env->regs[15], &sc->arm_pc); 2137 #ifdef TARGET_CONFIG_CPU_32 2138 __get_user(cpsr, &sc->arm_cpsr); 2139 cpsr_write(env, cpsr, CPSR_USER | CPSR_EXEC, CPSRWriteByInstr); 2140 #endif 2141 2142 err |= !valid_user_regs(env); 2143 2144 return err; 2145 } 2146 2147 static long do_sigreturn_v1(CPUARMState *env) 2148 { 2149 abi_ulong frame_addr; 2150 struct sigframe_v1 *frame = NULL; 2151 target_sigset_t set; 2152 sigset_t host_set; 2153 int i; 2154 2155 /* 2156 * Since we stacked the signal on a 64-bit boundary, 2157 * then 'sp' should be word aligned here. If it's 2158 * not, then the user is trying to mess with us. 2159 */ 2160 frame_addr = env->regs[13]; 2161 trace_user_do_sigreturn(env, frame_addr); 2162 if (frame_addr & 7) { 2163 goto badframe; 2164 } 2165 2166 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 2167 goto badframe; 2168 } 2169 2170 __get_user(set.sig[0], &frame->sc.oldmask); 2171 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 2172 __get_user(set.sig[i], &frame->extramask[i - 1]); 2173 } 2174 2175 target_to_host_sigset_internal(&host_set, &set); 2176 set_sigmask(&host_set); 2177 2178 if (restore_sigcontext(env, &frame->sc)) { 2179 goto badframe; 2180 } 2181 2182 #if 0 2183 /* Send SIGTRAP if we're single-stepping */ 2184 if (ptrace_cancel_bpt(current)) 2185 send_sig(SIGTRAP, current, 1); 2186 #endif 2187 unlock_user_struct(frame, frame_addr, 0); 2188 return -TARGET_QEMU_ESIGRETURN; 2189 2190 badframe: 2191 force_sig(TARGET_SIGSEGV); 2192 return -TARGET_QEMU_ESIGRETURN; 2193 } 2194 2195 static abi_ulong *restore_sigframe_v2_vfp(CPUARMState *env, abi_ulong *regspace) 2196 { 2197 int i; 2198 abi_ulong magic, sz; 2199 uint32_t fpscr, fpexc; 2200 struct target_vfp_sigframe *vfpframe; 2201 vfpframe = (struct target_vfp_sigframe *)regspace; 2202 2203 __get_user(magic, &vfpframe->magic); 2204 __get_user(sz, &vfpframe->size); 2205 if (magic != TARGET_VFP_MAGIC || sz != sizeof(*vfpframe)) { 2206 return 0; 2207 } 2208 for (i = 0; i < 32; i++) { 2209 __get_user(float64_val(env->vfp.regs[i]), &vfpframe->ufp.fpregs[i]); 2210 } 2211 __get_user(fpscr, &vfpframe->ufp.fpscr); 2212 vfp_set_fpscr(env, fpscr); 2213 __get_user(fpexc, &vfpframe->ufp_exc.fpexc); 2214 /* Sanitise FPEXC: ensure VFP is enabled, FPINST2 is invalid 2215 * and the exception flag is cleared 2216 */ 2217 fpexc |= (1 << 30); 2218 fpexc &= ~((1 << 31) | (1 << 28)); 2219 env->vfp.xregs[ARM_VFP_FPEXC] = fpexc; 2220 __get_user(env->vfp.xregs[ARM_VFP_FPINST], &vfpframe->ufp_exc.fpinst); 2221 __get_user(env->vfp.xregs[ARM_VFP_FPINST2], &vfpframe->ufp_exc.fpinst2); 2222 return (abi_ulong*)(vfpframe + 1); 2223 } 2224 2225 static abi_ulong *restore_sigframe_v2_iwmmxt(CPUARMState *env, 2226 abi_ulong *regspace) 2227 { 2228 int i; 2229 abi_ulong magic, sz; 2230 struct target_iwmmxt_sigframe *iwmmxtframe; 2231 iwmmxtframe = (struct target_iwmmxt_sigframe *)regspace; 2232 2233 __get_user(magic, &iwmmxtframe->magic); 2234 __get_user(sz, &iwmmxtframe->size); 2235 if (magic != TARGET_IWMMXT_MAGIC || sz != sizeof(*iwmmxtframe)) { 2236 return 0; 2237 } 2238 for (i = 0; i < 16; i++) { 2239 __get_user(env->iwmmxt.regs[i], &iwmmxtframe->regs[i]); 2240 } 2241 __get_user(env->vfp.xregs[ARM_IWMMXT_wCSSF], &iwmmxtframe->wcssf); 2242 __get_user(env->vfp.xregs[ARM_IWMMXT_wCASF], &iwmmxtframe->wcssf); 2243 __get_user(env->vfp.xregs[ARM_IWMMXT_wCGR0], &iwmmxtframe->wcgr0); 2244 __get_user(env->vfp.xregs[ARM_IWMMXT_wCGR1], &iwmmxtframe->wcgr1); 2245 __get_user(env->vfp.xregs[ARM_IWMMXT_wCGR2], &iwmmxtframe->wcgr2); 2246 __get_user(env->vfp.xregs[ARM_IWMMXT_wCGR3], &iwmmxtframe->wcgr3); 2247 return (abi_ulong*)(iwmmxtframe + 1); 2248 } 2249 2250 static int do_sigframe_return_v2(CPUARMState *env, 2251 target_ulong context_addr, 2252 struct target_ucontext_v2 *uc) 2253 { 2254 sigset_t host_set; 2255 abi_ulong *regspace; 2256 2257 target_to_host_sigset(&host_set, &uc->tuc_sigmask); 2258 set_sigmask(&host_set); 2259 2260 if (restore_sigcontext(env, &uc->tuc_mcontext)) 2261 return 1; 2262 2263 /* Restore coprocessor signal frame */ 2264 regspace = uc->tuc_regspace; 2265 if (arm_feature(env, ARM_FEATURE_VFP)) { 2266 regspace = restore_sigframe_v2_vfp(env, regspace); 2267 if (!regspace) { 2268 return 1; 2269 } 2270 } 2271 if (arm_feature(env, ARM_FEATURE_IWMMXT)) { 2272 regspace = restore_sigframe_v2_iwmmxt(env, regspace); 2273 if (!regspace) { 2274 return 1; 2275 } 2276 } 2277 2278 if (do_sigaltstack(context_addr 2279 + offsetof(struct target_ucontext_v2, tuc_stack), 2280 0, get_sp_from_cpustate(env)) == -EFAULT) { 2281 return 1; 2282 } 2283 2284 #if 0 2285 /* Send SIGTRAP if we're single-stepping */ 2286 if (ptrace_cancel_bpt(current)) 2287 send_sig(SIGTRAP, current, 1); 2288 #endif 2289 2290 return 0; 2291 } 2292 2293 static long do_sigreturn_v2(CPUARMState *env) 2294 { 2295 abi_ulong frame_addr; 2296 struct sigframe_v2 *frame = NULL; 2297 2298 /* 2299 * Since we stacked the signal on a 64-bit boundary, 2300 * then 'sp' should be word aligned here. If it's 2301 * not, then the user is trying to mess with us. 2302 */ 2303 frame_addr = env->regs[13]; 2304 trace_user_do_sigreturn(env, frame_addr); 2305 if (frame_addr & 7) { 2306 goto badframe; 2307 } 2308 2309 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 2310 goto badframe; 2311 } 2312 2313 if (do_sigframe_return_v2(env, 2314 frame_addr 2315 + offsetof(struct sigframe_v2, uc), 2316 &frame->uc)) { 2317 goto badframe; 2318 } 2319 2320 unlock_user_struct(frame, frame_addr, 0); 2321 return -TARGET_QEMU_ESIGRETURN; 2322 2323 badframe: 2324 unlock_user_struct(frame, frame_addr, 0); 2325 force_sig(TARGET_SIGSEGV); 2326 return -TARGET_QEMU_ESIGRETURN; 2327 } 2328 2329 long do_sigreturn(CPUARMState *env) 2330 { 2331 if (get_osversion() >= 0x020612) { 2332 return do_sigreturn_v2(env); 2333 } else { 2334 return do_sigreturn_v1(env); 2335 } 2336 } 2337 2338 static long do_rt_sigreturn_v1(CPUARMState *env) 2339 { 2340 abi_ulong frame_addr; 2341 struct rt_sigframe_v1 *frame = NULL; 2342 sigset_t host_set; 2343 2344 /* 2345 * Since we stacked the signal on a 64-bit boundary, 2346 * then 'sp' should be word aligned here. If it's 2347 * not, then the user is trying to mess with us. 2348 */ 2349 frame_addr = env->regs[13]; 2350 trace_user_do_rt_sigreturn(env, frame_addr); 2351 if (frame_addr & 7) { 2352 goto badframe; 2353 } 2354 2355 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 2356 goto badframe; 2357 } 2358 2359 target_to_host_sigset(&host_set, &frame->uc.tuc_sigmask); 2360 set_sigmask(&host_set); 2361 2362 if (restore_sigcontext(env, &frame->uc.tuc_mcontext)) { 2363 goto badframe; 2364 } 2365 2366 if (do_sigaltstack(frame_addr + offsetof(struct rt_sigframe_v1, uc.tuc_stack), 0, get_sp_from_cpustate(env)) == -EFAULT) 2367 goto badframe; 2368 2369 #if 0 2370 /* Send SIGTRAP if we're single-stepping */ 2371 if (ptrace_cancel_bpt(current)) 2372 send_sig(SIGTRAP, current, 1); 2373 #endif 2374 unlock_user_struct(frame, frame_addr, 0); 2375 return -TARGET_QEMU_ESIGRETURN; 2376 2377 badframe: 2378 unlock_user_struct(frame, frame_addr, 0); 2379 force_sig(TARGET_SIGSEGV); 2380 return -TARGET_QEMU_ESIGRETURN; 2381 } 2382 2383 static long do_rt_sigreturn_v2(CPUARMState *env) 2384 { 2385 abi_ulong frame_addr; 2386 struct rt_sigframe_v2 *frame = NULL; 2387 2388 /* 2389 * Since we stacked the signal on a 64-bit boundary, 2390 * then 'sp' should be word aligned here. If it's 2391 * not, then the user is trying to mess with us. 2392 */ 2393 frame_addr = env->regs[13]; 2394 trace_user_do_rt_sigreturn(env, frame_addr); 2395 if (frame_addr & 7) { 2396 goto badframe; 2397 } 2398 2399 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 2400 goto badframe; 2401 } 2402 2403 if (do_sigframe_return_v2(env, 2404 frame_addr 2405 + offsetof(struct rt_sigframe_v2, uc), 2406 &frame->uc)) { 2407 goto badframe; 2408 } 2409 2410 unlock_user_struct(frame, frame_addr, 0); 2411 return -TARGET_QEMU_ESIGRETURN; 2412 2413 badframe: 2414 unlock_user_struct(frame, frame_addr, 0); 2415 force_sig(TARGET_SIGSEGV); 2416 return -TARGET_QEMU_ESIGRETURN; 2417 } 2418 2419 long do_rt_sigreturn(CPUARMState *env) 2420 { 2421 if (get_osversion() >= 0x020612) { 2422 return do_rt_sigreturn_v2(env); 2423 } else { 2424 return do_rt_sigreturn_v1(env); 2425 } 2426 } 2427 2428 #elif defined(TARGET_SPARC) 2429 2430 #define __SUNOS_MAXWIN 31 2431 2432 /* This is what SunOS does, so shall I. */ 2433 struct target_sigcontext { 2434 abi_ulong sigc_onstack; /* state to restore */ 2435 2436 abi_ulong sigc_mask; /* sigmask to restore */ 2437 abi_ulong sigc_sp; /* stack pointer */ 2438 abi_ulong sigc_pc; /* program counter */ 2439 abi_ulong sigc_npc; /* next program counter */ 2440 abi_ulong sigc_psr; /* for condition codes etc */ 2441 abi_ulong sigc_g1; /* User uses these two registers */ 2442 abi_ulong sigc_o0; /* within the trampoline code. */ 2443 2444 /* Now comes information regarding the users window set 2445 * at the time of the signal. 2446 */ 2447 abi_ulong sigc_oswins; /* outstanding windows */ 2448 2449 /* stack ptrs for each regwin buf */ 2450 char *sigc_spbuf[__SUNOS_MAXWIN]; 2451 2452 /* Windows to restore after signal */ 2453 struct { 2454 abi_ulong locals[8]; 2455 abi_ulong ins[8]; 2456 } sigc_wbuf[__SUNOS_MAXWIN]; 2457 }; 2458 /* A Sparc stack frame */ 2459 struct sparc_stackf { 2460 abi_ulong locals[8]; 2461 abi_ulong ins[8]; 2462 /* It's simpler to treat fp and callers_pc as elements of ins[] 2463 * since we never need to access them ourselves. 2464 */ 2465 char *structptr; 2466 abi_ulong xargs[6]; 2467 abi_ulong xxargs[1]; 2468 }; 2469 2470 typedef struct { 2471 struct { 2472 abi_ulong psr; 2473 abi_ulong pc; 2474 abi_ulong npc; 2475 abi_ulong y; 2476 abi_ulong u_regs[16]; /* globals and ins */ 2477 } si_regs; 2478 int si_mask; 2479 } __siginfo_t; 2480 2481 typedef struct { 2482 abi_ulong si_float_regs[32]; 2483 unsigned long si_fsr; 2484 unsigned long si_fpqdepth; 2485 struct { 2486 unsigned long *insn_addr; 2487 unsigned long insn; 2488 } si_fpqueue [16]; 2489 } qemu_siginfo_fpu_t; 2490 2491 2492 struct target_signal_frame { 2493 struct sparc_stackf ss; 2494 __siginfo_t info; 2495 abi_ulong fpu_save; 2496 abi_ulong insns[2] __attribute__ ((aligned (8))); 2497 abi_ulong extramask[TARGET_NSIG_WORDS - 1]; 2498 abi_ulong extra_size; /* Should be 0 */ 2499 qemu_siginfo_fpu_t fpu_state; 2500 }; 2501 struct target_rt_signal_frame { 2502 struct sparc_stackf ss; 2503 siginfo_t info; 2504 abi_ulong regs[20]; 2505 sigset_t mask; 2506 abi_ulong fpu_save; 2507 unsigned int insns[2]; 2508 stack_t stack; 2509 unsigned int extra_size; /* Should be 0 */ 2510 qemu_siginfo_fpu_t fpu_state; 2511 }; 2512 2513 #define UREG_O0 16 2514 #define UREG_O6 22 2515 #define UREG_I0 0 2516 #define UREG_I1 1 2517 #define UREG_I2 2 2518 #define UREG_I3 3 2519 #define UREG_I4 4 2520 #define UREG_I5 5 2521 #define UREG_I6 6 2522 #define UREG_I7 7 2523 #define UREG_L0 8 2524 #define UREG_FP UREG_I6 2525 #define UREG_SP UREG_O6 2526 2527 static inline abi_ulong get_sigframe(struct target_sigaction *sa, 2528 CPUSPARCState *env, 2529 unsigned long framesize) 2530 { 2531 abi_ulong sp; 2532 2533 sp = env->regwptr[UREG_FP]; 2534 2535 /* This is the X/Open sanctioned signal stack switching. */ 2536 if (sa->sa_flags & TARGET_SA_ONSTACK) { 2537 if (!on_sig_stack(sp) 2538 && !((target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size) & 7)) { 2539 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 2540 } 2541 } 2542 return sp - framesize; 2543 } 2544 2545 static int 2546 setup___siginfo(__siginfo_t *si, CPUSPARCState *env, abi_ulong mask) 2547 { 2548 int err = 0, i; 2549 2550 __put_user(env->psr, &si->si_regs.psr); 2551 __put_user(env->pc, &si->si_regs.pc); 2552 __put_user(env->npc, &si->si_regs.npc); 2553 __put_user(env->y, &si->si_regs.y); 2554 for (i=0; i < 8; i++) { 2555 __put_user(env->gregs[i], &si->si_regs.u_regs[i]); 2556 } 2557 for (i=0; i < 8; i++) { 2558 __put_user(env->regwptr[UREG_I0 + i], &si->si_regs.u_regs[i+8]); 2559 } 2560 __put_user(mask, &si->si_mask); 2561 return err; 2562 } 2563 2564 #if 0 2565 static int 2566 setup_sigcontext(struct target_sigcontext *sc, /*struct _fpstate *fpstate,*/ 2567 CPUSPARCState *env, unsigned long mask) 2568 { 2569 int err = 0; 2570 2571 __put_user(mask, &sc->sigc_mask); 2572 __put_user(env->regwptr[UREG_SP], &sc->sigc_sp); 2573 __put_user(env->pc, &sc->sigc_pc); 2574 __put_user(env->npc, &sc->sigc_npc); 2575 __put_user(env->psr, &sc->sigc_psr); 2576 __put_user(env->gregs[1], &sc->sigc_g1); 2577 __put_user(env->regwptr[UREG_O0], &sc->sigc_o0); 2578 2579 return err; 2580 } 2581 #endif 2582 #define NF_ALIGNEDSZ (((sizeof(struct target_signal_frame) + 7) & (~7))) 2583 2584 static void setup_frame(int sig, struct target_sigaction *ka, 2585 target_sigset_t *set, CPUSPARCState *env) 2586 { 2587 abi_ulong sf_addr; 2588 struct target_signal_frame *sf; 2589 int sigframe_size, err, i; 2590 2591 /* 1. Make sure everything is clean */ 2592 //synchronize_user_stack(); 2593 2594 sigframe_size = NF_ALIGNEDSZ; 2595 sf_addr = get_sigframe(ka, env, sigframe_size); 2596 trace_user_setup_frame(env, sf_addr); 2597 2598 sf = lock_user(VERIFY_WRITE, sf_addr, 2599 sizeof(struct target_signal_frame), 0); 2600 if (!sf) { 2601 goto sigsegv; 2602 } 2603 #if 0 2604 if (invalid_frame_pointer(sf, sigframe_size)) 2605 goto sigill_and_return; 2606 #endif 2607 /* 2. Save the current process state */ 2608 err = setup___siginfo(&sf->info, env, set->sig[0]); 2609 __put_user(0, &sf->extra_size); 2610 2611 //save_fpu_state(regs, &sf->fpu_state); 2612 //__put_user(&sf->fpu_state, &sf->fpu_save); 2613 2614 __put_user(set->sig[0], &sf->info.si_mask); 2615 for (i = 0; i < TARGET_NSIG_WORDS - 1; i++) { 2616 __put_user(set->sig[i + 1], &sf->extramask[i]); 2617 } 2618 2619 for (i = 0; i < 8; i++) { 2620 __put_user(env->regwptr[i + UREG_L0], &sf->ss.locals[i]); 2621 } 2622 for (i = 0; i < 8; i++) { 2623 __put_user(env->regwptr[i + UREG_I0], &sf->ss.ins[i]); 2624 } 2625 if (err) 2626 goto sigsegv; 2627 2628 /* 3. signal handler back-trampoline and parameters */ 2629 env->regwptr[UREG_FP] = sf_addr; 2630 env->regwptr[UREG_I0] = sig; 2631 env->regwptr[UREG_I1] = sf_addr + 2632 offsetof(struct target_signal_frame, info); 2633 env->regwptr[UREG_I2] = sf_addr + 2634 offsetof(struct target_signal_frame, info); 2635 2636 /* 4. signal handler */ 2637 env->pc = ka->_sa_handler; 2638 env->npc = (env->pc + 4); 2639 /* 5. return to kernel instructions */ 2640 if (ka->sa_restorer) { 2641 env->regwptr[UREG_I7] = ka->sa_restorer; 2642 } else { 2643 uint32_t val32; 2644 2645 env->regwptr[UREG_I7] = sf_addr + 2646 offsetof(struct target_signal_frame, insns) - 2 * 4; 2647 2648 /* mov __NR_sigreturn, %g1 */ 2649 val32 = 0x821020d8; 2650 __put_user(val32, &sf->insns[0]); 2651 2652 /* t 0x10 */ 2653 val32 = 0x91d02010; 2654 __put_user(val32, &sf->insns[1]); 2655 if (err) 2656 goto sigsegv; 2657 2658 /* Flush instruction space. */ 2659 // flush_sig_insns(current->mm, (unsigned long) &(sf->insns[0])); 2660 // tb_flush(env); 2661 } 2662 unlock_user(sf, sf_addr, sizeof(struct target_signal_frame)); 2663 return; 2664 #if 0 2665 sigill_and_return: 2666 force_sig(TARGET_SIGILL); 2667 #endif 2668 sigsegv: 2669 unlock_user(sf, sf_addr, sizeof(struct target_signal_frame)); 2670 force_sigsegv(sig); 2671 } 2672 2673 static void setup_rt_frame(int sig, struct target_sigaction *ka, 2674 target_siginfo_t *info, 2675 target_sigset_t *set, CPUSPARCState *env) 2676 { 2677 fprintf(stderr, "setup_rt_frame: not implemented\n"); 2678 } 2679 2680 long do_sigreturn(CPUSPARCState *env) 2681 { 2682 abi_ulong sf_addr; 2683 struct target_signal_frame *sf; 2684 uint32_t up_psr, pc, npc; 2685 target_sigset_t set; 2686 sigset_t host_set; 2687 int err=0, i; 2688 2689 sf_addr = env->regwptr[UREG_FP]; 2690 trace_user_do_sigreturn(env, sf_addr); 2691 if (!lock_user_struct(VERIFY_READ, sf, sf_addr, 1)) { 2692 goto segv_and_exit; 2693 } 2694 2695 /* 1. Make sure we are not getting garbage from the user */ 2696 2697 if (sf_addr & 3) 2698 goto segv_and_exit; 2699 2700 __get_user(pc, &sf->info.si_regs.pc); 2701 __get_user(npc, &sf->info.si_regs.npc); 2702 2703 if ((pc | npc) & 3) { 2704 goto segv_and_exit; 2705 } 2706 2707 /* 2. Restore the state */ 2708 __get_user(up_psr, &sf->info.si_regs.psr); 2709 2710 /* User can only change condition codes and FPU enabling in %psr. */ 2711 env->psr = (up_psr & (PSR_ICC /* | PSR_EF */)) 2712 | (env->psr & ~(PSR_ICC /* | PSR_EF */)); 2713 2714 env->pc = pc; 2715 env->npc = npc; 2716 __get_user(env->y, &sf->info.si_regs.y); 2717 for (i=0; i < 8; i++) { 2718 __get_user(env->gregs[i], &sf->info.si_regs.u_regs[i]); 2719 } 2720 for (i=0; i < 8; i++) { 2721 __get_user(env->regwptr[i + UREG_I0], &sf->info.si_regs.u_regs[i+8]); 2722 } 2723 2724 /* FIXME: implement FPU save/restore: 2725 * __get_user(fpu_save, &sf->fpu_save); 2726 * if (fpu_save) 2727 * err |= restore_fpu_state(env, fpu_save); 2728 */ 2729 2730 /* This is pretty much atomic, no amount locking would prevent 2731 * the races which exist anyways. 2732 */ 2733 __get_user(set.sig[0], &sf->info.si_mask); 2734 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 2735 __get_user(set.sig[i], &sf->extramask[i - 1]); 2736 } 2737 2738 target_to_host_sigset_internal(&host_set, &set); 2739 set_sigmask(&host_set); 2740 2741 if (err) { 2742 goto segv_and_exit; 2743 } 2744 unlock_user_struct(sf, sf_addr, 0); 2745 return -TARGET_QEMU_ESIGRETURN; 2746 2747 segv_and_exit: 2748 unlock_user_struct(sf, sf_addr, 0); 2749 force_sig(TARGET_SIGSEGV); 2750 return -TARGET_QEMU_ESIGRETURN; 2751 } 2752 2753 long do_rt_sigreturn(CPUSPARCState *env) 2754 { 2755 trace_user_do_rt_sigreturn(env, 0); 2756 fprintf(stderr, "do_rt_sigreturn: not implemented\n"); 2757 return -TARGET_ENOSYS; 2758 } 2759 2760 #if defined(TARGET_SPARC64) && !defined(TARGET_ABI32) 2761 #define MC_TSTATE 0 2762 #define MC_PC 1 2763 #define MC_NPC 2 2764 #define MC_Y 3 2765 #define MC_G1 4 2766 #define MC_G2 5 2767 #define MC_G3 6 2768 #define MC_G4 7 2769 #define MC_G5 8 2770 #define MC_G6 9 2771 #define MC_G7 10 2772 #define MC_O0 11 2773 #define MC_O1 12 2774 #define MC_O2 13 2775 #define MC_O3 14 2776 #define MC_O4 15 2777 #define MC_O5 16 2778 #define MC_O6 17 2779 #define MC_O7 18 2780 #define MC_NGREG 19 2781 2782 typedef abi_ulong target_mc_greg_t; 2783 typedef target_mc_greg_t target_mc_gregset_t[MC_NGREG]; 2784 2785 struct target_mc_fq { 2786 abi_ulong *mcfq_addr; 2787 uint32_t mcfq_insn; 2788 }; 2789 2790 struct target_mc_fpu { 2791 union { 2792 uint32_t sregs[32]; 2793 uint64_t dregs[32]; 2794 //uint128_t qregs[16]; 2795 } mcfpu_fregs; 2796 abi_ulong mcfpu_fsr; 2797 abi_ulong mcfpu_fprs; 2798 abi_ulong mcfpu_gsr; 2799 struct target_mc_fq *mcfpu_fq; 2800 unsigned char mcfpu_qcnt; 2801 unsigned char mcfpu_qentsz; 2802 unsigned char mcfpu_enab; 2803 }; 2804 typedef struct target_mc_fpu target_mc_fpu_t; 2805 2806 typedef struct { 2807 target_mc_gregset_t mc_gregs; 2808 target_mc_greg_t mc_fp; 2809 target_mc_greg_t mc_i7; 2810 target_mc_fpu_t mc_fpregs; 2811 } target_mcontext_t; 2812 2813 struct target_ucontext { 2814 struct target_ucontext *tuc_link; 2815 abi_ulong tuc_flags; 2816 target_sigset_t tuc_sigmask; 2817 target_mcontext_t tuc_mcontext; 2818 }; 2819 2820 /* A V9 register window */ 2821 struct target_reg_window { 2822 abi_ulong locals[8]; 2823 abi_ulong ins[8]; 2824 }; 2825 2826 #define TARGET_STACK_BIAS 2047 2827 2828 /* {set, get}context() needed for 64-bit SparcLinux userland. */ 2829 void sparc64_set_context(CPUSPARCState *env) 2830 { 2831 abi_ulong ucp_addr; 2832 struct target_ucontext *ucp; 2833 target_mc_gregset_t *grp; 2834 abi_ulong pc, npc, tstate; 2835 abi_ulong fp, i7, w_addr; 2836 unsigned int i; 2837 2838 ucp_addr = env->regwptr[UREG_I0]; 2839 if (!lock_user_struct(VERIFY_READ, ucp, ucp_addr, 1)) { 2840 goto do_sigsegv; 2841 } 2842 grp = &ucp->tuc_mcontext.mc_gregs; 2843 __get_user(pc, &((*grp)[MC_PC])); 2844 __get_user(npc, &((*grp)[MC_NPC])); 2845 if ((pc | npc) & 3) { 2846 goto do_sigsegv; 2847 } 2848 if (env->regwptr[UREG_I1]) { 2849 target_sigset_t target_set; 2850 sigset_t set; 2851 2852 if (TARGET_NSIG_WORDS == 1) { 2853 __get_user(target_set.sig[0], &ucp->tuc_sigmask.sig[0]); 2854 } else { 2855 abi_ulong *src, *dst; 2856 src = ucp->tuc_sigmask.sig; 2857 dst = target_set.sig; 2858 for (i = 0; i < TARGET_NSIG_WORDS; i++, dst++, src++) { 2859 __get_user(*dst, src); 2860 } 2861 } 2862 target_to_host_sigset_internal(&set, &target_set); 2863 set_sigmask(&set); 2864 } 2865 env->pc = pc; 2866 env->npc = npc; 2867 __get_user(env->y, &((*grp)[MC_Y])); 2868 __get_user(tstate, &((*grp)[MC_TSTATE])); 2869 env->asi = (tstate >> 24) & 0xff; 2870 cpu_put_ccr(env, tstate >> 32); 2871 cpu_put_cwp64(env, tstate & 0x1f); 2872 __get_user(env->gregs[1], (&(*grp)[MC_G1])); 2873 __get_user(env->gregs[2], (&(*grp)[MC_G2])); 2874 __get_user(env->gregs[3], (&(*grp)[MC_G3])); 2875 __get_user(env->gregs[4], (&(*grp)[MC_G4])); 2876 __get_user(env->gregs[5], (&(*grp)[MC_G5])); 2877 __get_user(env->gregs[6], (&(*grp)[MC_G6])); 2878 __get_user(env->gregs[7], (&(*grp)[MC_G7])); 2879 __get_user(env->regwptr[UREG_I0], (&(*grp)[MC_O0])); 2880 __get_user(env->regwptr[UREG_I1], (&(*grp)[MC_O1])); 2881 __get_user(env->regwptr[UREG_I2], (&(*grp)[MC_O2])); 2882 __get_user(env->regwptr[UREG_I3], (&(*grp)[MC_O3])); 2883 __get_user(env->regwptr[UREG_I4], (&(*grp)[MC_O4])); 2884 __get_user(env->regwptr[UREG_I5], (&(*grp)[MC_O5])); 2885 __get_user(env->regwptr[UREG_I6], (&(*grp)[MC_O6])); 2886 __get_user(env->regwptr[UREG_I7], (&(*grp)[MC_O7])); 2887 2888 __get_user(fp, &(ucp->tuc_mcontext.mc_fp)); 2889 __get_user(i7, &(ucp->tuc_mcontext.mc_i7)); 2890 2891 w_addr = TARGET_STACK_BIAS+env->regwptr[UREG_I6]; 2892 if (put_user(fp, w_addr + offsetof(struct target_reg_window, ins[6]), 2893 abi_ulong) != 0) { 2894 goto do_sigsegv; 2895 } 2896 if (put_user(i7, w_addr + offsetof(struct target_reg_window, ins[7]), 2897 abi_ulong) != 0) { 2898 goto do_sigsegv; 2899 } 2900 /* FIXME this does not match how the kernel handles the FPU in 2901 * its sparc64_set_context implementation. In particular the FPU 2902 * is only restored if fenab is non-zero in: 2903 * __get_user(fenab, &(ucp->tuc_mcontext.mc_fpregs.mcfpu_enab)); 2904 */ 2905 __get_user(env->fprs, &(ucp->tuc_mcontext.mc_fpregs.mcfpu_fprs)); 2906 { 2907 uint32_t *src = ucp->tuc_mcontext.mc_fpregs.mcfpu_fregs.sregs; 2908 for (i = 0; i < 64; i++, src++) { 2909 if (i & 1) { 2910 __get_user(env->fpr[i/2].l.lower, src); 2911 } else { 2912 __get_user(env->fpr[i/2].l.upper, src); 2913 } 2914 } 2915 } 2916 __get_user(env->fsr, 2917 &(ucp->tuc_mcontext.mc_fpregs.mcfpu_fsr)); 2918 __get_user(env->gsr, 2919 &(ucp->tuc_mcontext.mc_fpregs.mcfpu_gsr)); 2920 unlock_user_struct(ucp, ucp_addr, 0); 2921 return; 2922 do_sigsegv: 2923 unlock_user_struct(ucp, ucp_addr, 0); 2924 force_sig(TARGET_SIGSEGV); 2925 } 2926 2927 void sparc64_get_context(CPUSPARCState *env) 2928 { 2929 abi_ulong ucp_addr; 2930 struct target_ucontext *ucp; 2931 target_mc_gregset_t *grp; 2932 target_mcontext_t *mcp; 2933 abi_ulong fp, i7, w_addr; 2934 int err; 2935 unsigned int i; 2936 target_sigset_t target_set; 2937 sigset_t set; 2938 2939 ucp_addr = env->regwptr[UREG_I0]; 2940 if (!lock_user_struct(VERIFY_WRITE, ucp, ucp_addr, 0)) { 2941 goto do_sigsegv; 2942 } 2943 2944 mcp = &ucp->tuc_mcontext; 2945 grp = &mcp->mc_gregs; 2946 2947 /* Skip over the trap instruction, first. */ 2948 env->pc = env->npc; 2949 env->npc += 4; 2950 2951 /* If we're only reading the signal mask then do_sigprocmask() 2952 * is guaranteed not to fail, which is important because we don't 2953 * have any way to signal a failure or restart this operation since 2954 * this is not a normal syscall. 2955 */ 2956 err = do_sigprocmask(0, NULL, &set); 2957 assert(err == 0); 2958 host_to_target_sigset_internal(&target_set, &set); 2959 if (TARGET_NSIG_WORDS == 1) { 2960 __put_user(target_set.sig[0], 2961 (abi_ulong *)&ucp->tuc_sigmask); 2962 } else { 2963 abi_ulong *src, *dst; 2964 src = target_set.sig; 2965 dst = ucp->tuc_sigmask.sig; 2966 for (i = 0; i < TARGET_NSIG_WORDS; i++, dst++, src++) { 2967 __put_user(*src, dst); 2968 } 2969 if (err) 2970 goto do_sigsegv; 2971 } 2972 2973 /* XXX: tstate must be saved properly */ 2974 // __put_user(env->tstate, &((*grp)[MC_TSTATE])); 2975 __put_user(env->pc, &((*grp)[MC_PC])); 2976 __put_user(env->npc, &((*grp)[MC_NPC])); 2977 __put_user(env->y, &((*grp)[MC_Y])); 2978 __put_user(env->gregs[1], &((*grp)[MC_G1])); 2979 __put_user(env->gregs[2], &((*grp)[MC_G2])); 2980 __put_user(env->gregs[3], &((*grp)[MC_G3])); 2981 __put_user(env->gregs[4], &((*grp)[MC_G4])); 2982 __put_user(env->gregs[5], &((*grp)[MC_G5])); 2983 __put_user(env->gregs[6], &((*grp)[MC_G6])); 2984 __put_user(env->gregs[7], &((*grp)[MC_G7])); 2985 __put_user(env->regwptr[UREG_I0], &((*grp)[MC_O0])); 2986 __put_user(env->regwptr[UREG_I1], &((*grp)[MC_O1])); 2987 __put_user(env->regwptr[UREG_I2], &((*grp)[MC_O2])); 2988 __put_user(env->regwptr[UREG_I3], &((*grp)[MC_O3])); 2989 __put_user(env->regwptr[UREG_I4], &((*grp)[MC_O4])); 2990 __put_user(env->regwptr[UREG_I5], &((*grp)[MC_O5])); 2991 __put_user(env->regwptr[UREG_I6], &((*grp)[MC_O6])); 2992 __put_user(env->regwptr[UREG_I7], &((*grp)[MC_O7])); 2993 2994 w_addr = TARGET_STACK_BIAS+env->regwptr[UREG_I6]; 2995 fp = i7 = 0; 2996 if (get_user(fp, w_addr + offsetof(struct target_reg_window, ins[6]), 2997 abi_ulong) != 0) { 2998 goto do_sigsegv; 2999 } 3000 if (get_user(i7, w_addr + offsetof(struct target_reg_window, ins[7]), 3001 abi_ulong) != 0) { 3002 goto do_sigsegv; 3003 } 3004 __put_user(fp, &(mcp->mc_fp)); 3005 __put_user(i7, &(mcp->mc_i7)); 3006 3007 { 3008 uint32_t *dst = ucp->tuc_mcontext.mc_fpregs.mcfpu_fregs.sregs; 3009 for (i = 0; i < 64; i++, dst++) { 3010 if (i & 1) { 3011 __put_user(env->fpr[i/2].l.lower, dst); 3012 } else { 3013 __put_user(env->fpr[i/2].l.upper, dst); 3014 } 3015 } 3016 } 3017 __put_user(env->fsr, &(mcp->mc_fpregs.mcfpu_fsr)); 3018 __put_user(env->gsr, &(mcp->mc_fpregs.mcfpu_gsr)); 3019 __put_user(env->fprs, &(mcp->mc_fpregs.mcfpu_fprs)); 3020 3021 if (err) 3022 goto do_sigsegv; 3023 unlock_user_struct(ucp, ucp_addr, 1); 3024 return; 3025 do_sigsegv: 3026 unlock_user_struct(ucp, ucp_addr, 1); 3027 force_sig(TARGET_SIGSEGV); 3028 } 3029 #endif 3030 #elif defined(TARGET_MIPS) || defined(TARGET_MIPS64) 3031 3032 # if defined(TARGET_ABI_MIPSO32) 3033 struct target_sigcontext { 3034 uint32_t sc_regmask; /* Unused */ 3035 uint32_t sc_status; 3036 uint64_t sc_pc; 3037 uint64_t sc_regs[32]; 3038 uint64_t sc_fpregs[32]; 3039 uint32_t sc_ownedfp; /* Unused */ 3040 uint32_t sc_fpc_csr; 3041 uint32_t sc_fpc_eir; /* Unused */ 3042 uint32_t sc_used_math; 3043 uint32_t sc_dsp; /* dsp status, was sc_ssflags */ 3044 uint32_t pad0; 3045 uint64_t sc_mdhi; 3046 uint64_t sc_mdlo; 3047 target_ulong sc_hi1; /* Was sc_cause */ 3048 target_ulong sc_lo1; /* Was sc_badvaddr */ 3049 target_ulong sc_hi2; /* Was sc_sigset[4] */ 3050 target_ulong sc_lo2; 3051 target_ulong sc_hi3; 3052 target_ulong sc_lo3; 3053 }; 3054 # else /* N32 || N64 */ 3055 struct target_sigcontext { 3056 uint64_t sc_regs[32]; 3057 uint64_t sc_fpregs[32]; 3058 uint64_t sc_mdhi; 3059 uint64_t sc_hi1; 3060 uint64_t sc_hi2; 3061 uint64_t sc_hi3; 3062 uint64_t sc_mdlo; 3063 uint64_t sc_lo1; 3064 uint64_t sc_lo2; 3065 uint64_t sc_lo3; 3066 uint64_t sc_pc; 3067 uint32_t sc_fpc_csr; 3068 uint32_t sc_used_math; 3069 uint32_t sc_dsp; 3070 uint32_t sc_reserved; 3071 }; 3072 # endif /* O32 */ 3073 3074 struct sigframe { 3075 uint32_t sf_ass[4]; /* argument save space for o32 */ 3076 uint32_t sf_code[2]; /* signal trampoline */ 3077 struct target_sigcontext sf_sc; 3078 target_sigset_t sf_mask; 3079 }; 3080 3081 struct target_ucontext { 3082 target_ulong tuc_flags; 3083 target_ulong tuc_link; 3084 target_stack_t tuc_stack; 3085 target_ulong pad0; 3086 struct target_sigcontext tuc_mcontext; 3087 target_sigset_t tuc_sigmask; 3088 }; 3089 3090 struct target_rt_sigframe { 3091 uint32_t rs_ass[4]; /* argument save space for o32 */ 3092 uint32_t rs_code[2]; /* signal trampoline */ 3093 struct target_siginfo rs_info; 3094 struct target_ucontext rs_uc; 3095 }; 3096 3097 /* Install trampoline to jump back from signal handler */ 3098 static inline int install_sigtramp(unsigned int *tramp, unsigned int syscall) 3099 { 3100 int err = 0; 3101 3102 /* 3103 * Set up the return code ... 3104 * 3105 * li v0, __NR__foo_sigreturn 3106 * syscall 3107 */ 3108 3109 __put_user(0x24020000 + syscall, tramp + 0); 3110 __put_user(0x0000000c , tramp + 1); 3111 return err; 3112 } 3113 3114 static inline void setup_sigcontext(CPUMIPSState *regs, 3115 struct target_sigcontext *sc) 3116 { 3117 int i; 3118 3119 __put_user(exception_resume_pc(regs), &sc->sc_pc); 3120 regs->hflags &= ~MIPS_HFLAG_BMASK; 3121 3122 __put_user(0, &sc->sc_regs[0]); 3123 for (i = 1; i < 32; ++i) { 3124 __put_user(regs->active_tc.gpr[i], &sc->sc_regs[i]); 3125 } 3126 3127 __put_user(regs->active_tc.HI[0], &sc->sc_mdhi); 3128 __put_user(regs->active_tc.LO[0], &sc->sc_mdlo); 3129 3130 /* Rather than checking for dsp existence, always copy. The storage 3131 would just be garbage otherwise. */ 3132 __put_user(regs->active_tc.HI[1], &sc->sc_hi1); 3133 __put_user(regs->active_tc.HI[2], &sc->sc_hi2); 3134 __put_user(regs->active_tc.HI[3], &sc->sc_hi3); 3135 __put_user(regs->active_tc.LO[1], &sc->sc_lo1); 3136 __put_user(regs->active_tc.LO[2], &sc->sc_lo2); 3137 __put_user(regs->active_tc.LO[3], &sc->sc_lo3); 3138 { 3139 uint32_t dsp = cpu_rddsp(0x3ff, regs); 3140 __put_user(dsp, &sc->sc_dsp); 3141 } 3142 3143 __put_user(1, &sc->sc_used_math); 3144 3145 for (i = 0; i < 32; ++i) { 3146 __put_user(regs->active_fpu.fpr[i].d, &sc->sc_fpregs[i]); 3147 } 3148 } 3149 3150 static inline void 3151 restore_sigcontext(CPUMIPSState *regs, struct target_sigcontext *sc) 3152 { 3153 int i; 3154 3155 __get_user(regs->CP0_EPC, &sc->sc_pc); 3156 3157 __get_user(regs->active_tc.HI[0], &sc->sc_mdhi); 3158 __get_user(regs->active_tc.LO[0], &sc->sc_mdlo); 3159 3160 for (i = 1; i < 32; ++i) { 3161 __get_user(regs->active_tc.gpr[i], &sc->sc_regs[i]); 3162 } 3163 3164 __get_user(regs->active_tc.HI[1], &sc->sc_hi1); 3165 __get_user(regs->active_tc.HI[2], &sc->sc_hi2); 3166 __get_user(regs->active_tc.HI[3], &sc->sc_hi3); 3167 __get_user(regs->active_tc.LO[1], &sc->sc_lo1); 3168 __get_user(regs->active_tc.LO[2], &sc->sc_lo2); 3169 __get_user(regs->active_tc.LO[3], &sc->sc_lo3); 3170 { 3171 uint32_t dsp; 3172 __get_user(dsp, &sc->sc_dsp); 3173 cpu_wrdsp(dsp, 0x3ff, regs); 3174 } 3175 3176 for (i = 0; i < 32; ++i) { 3177 __get_user(regs->active_fpu.fpr[i].d, &sc->sc_fpregs[i]); 3178 } 3179 } 3180 3181 /* 3182 * Determine which stack to use.. 3183 */ 3184 static inline abi_ulong 3185 get_sigframe(struct target_sigaction *ka, CPUMIPSState *regs, size_t frame_size) 3186 { 3187 unsigned long sp; 3188 3189 /* Default to using normal stack */ 3190 sp = regs->active_tc.gpr[29]; 3191 3192 /* 3193 * FPU emulator may have its own trampoline active just 3194 * above the user stack, 16-bytes before the next lowest 3195 * 16 byte boundary. Try to avoid trashing it. 3196 */ 3197 sp -= 32; 3198 3199 /* This is the X/Open sanctioned signal stack switching. */ 3200 if ((ka->sa_flags & TARGET_SA_ONSTACK) && (sas_ss_flags (sp) == 0)) { 3201 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 3202 } 3203 3204 return (sp - frame_size) & ~7; 3205 } 3206 3207 static void mips_set_hflags_isa_mode_from_pc(CPUMIPSState *env) 3208 { 3209 if (env->insn_flags & (ASE_MIPS16 | ASE_MICROMIPS)) { 3210 env->hflags &= ~MIPS_HFLAG_M16; 3211 env->hflags |= (env->active_tc.PC & 1) << MIPS_HFLAG_M16_SHIFT; 3212 env->active_tc.PC &= ~(target_ulong) 1; 3213 } 3214 } 3215 3216 # if defined(TARGET_ABI_MIPSO32) 3217 /* compare linux/arch/mips/kernel/signal.c:setup_frame() */ 3218 static void setup_frame(int sig, struct target_sigaction * ka, 3219 target_sigset_t *set, CPUMIPSState *regs) 3220 { 3221 struct sigframe *frame; 3222 abi_ulong frame_addr; 3223 int i; 3224 3225 frame_addr = get_sigframe(ka, regs, sizeof(*frame)); 3226 trace_user_setup_frame(regs, frame_addr); 3227 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 3228 goto give_sigsegv; 3229 } 3230 3231 install_sigtramp(frame->sf_code, TARGET_NR_sigreturn); 3232 3233 setup_sigcontext(regs, &frame->sf_sc); 3234 3235 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 3236 __put_user(set->sig[i], &frame->sf_mask.sig[i]); 3237 } 3238 3239 /* 3240 * Arguments to signal handler: 3241 * 3242 * a0 = signal number 3243 * a1 = 0 (should be cause) 3244 * a2 = pointer to struct sigcontext 3245 * 3246 * $25 and PC point to the signal handler, $29 points to the 3247 * struct sigframe. 3248 */ 3249 regs->active_tc.gpr[ 4] = sig; 3250 regs->active_tc.gpr[ 5] = 0; 3251 regs->active_tc.gpr[ 6] = frame_addr + offsetof(struct sigframe, sf_sc); 3252 regs->active_tc.gpr[29] = frame_addr; 3253 regs->active_tc.gpr[31] = frame_addr + offsetof(struct sigframe, sf_code); 3254 /* The original kernel code sets CP0_EPC to the handler 3255 * since it returns to userland using eret 3256 * we cannot do this here, and we must set PC directly */ 3257 regs->active_tc.PC = regs->active_tc.gpr[25] = ka->_sa_handler; 3258 mips_set_hflags_isa_mode_from_pc(regs); 3259 unlock_user_struct(frame, frame_addr, 1); 3260 return; 3261 3262 give_sigsegv: 3263 force_sigsegv(sig); 3264 } 3265 3266 long do_sigreturn(CPUMIPSState *regs) 3267 { 3268 struct sigframe *frame; 3269 abi_ulong frame_addr; 3270 sigset_t blocked; 3271 target_sigset_t target_set; 3272 int i; 3273 3274 frame_addr = regs->active_tc.gpr[29]; 3275 trace_user_do_sigreturn(regs, frame_addr); 3276 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) 3277 goto badframe; 3278 3279 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 3280 __get_user(target_set.sig[i], &frame->sf_mask.sig[i]); 3281 } 3282 3283 target_to_host_sigset_internal(&blocked, &target_set); 3284 set_sigmask(&blocked); 3285 3286 restore_sigcontext(regs, &frame->sf_sc); 3287 3288 #if 0 3289 /* 3290 * Don't let your children do this ... 3291 */ 3292 __asm__ __volatile__( 3293 "move\t$29, %0\n\t" 3294 "j\tsyscall_exit" 3295 :/* no outputs */ 3296 :"r" (®s)); 3297 /* Unreached */ 3298 #endif 3299 3300 regs->active_tc.PC = regs->CP0_EPC; 3301 mips_set_hflags_isa_mode_from_pc(regs); 3302 /* I am not sure this is right, but it seems to work 3303 * maybe a problem with nested signals ? */ 3304 regs->CP0_EPC = 0; 3305 return -TARGET_QEMU_ESIGRETURN; 3306 3307 badframe: 3308 force_sig(TARGET_SIGSEGV); 3309 return -TARGET_QEMU_ESIGRETURN; 3310 } 3311 # endif /* O32 */ 3312 3313 static void setup_rt_frame(int sig, struct target_sigaction *ka, 3314 target_siginfo_t *info, 3315 target_sigset_t *set, CPUMIPSState *env) 3316 { 3317 struct target_rt_sigframe *frame; 3318 abi_ulong frame_addr; 3319 int i; 3320 3321 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 3322 trace_user_setup_rt_frame(env, frame_addr); 3323 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 3324 goto give_sigsegv; 3325 } 3326 3327 install_sigtramp(frame->rs_code, TARGET_NR_rt_sigreturn); 3328 3329 tswap_siginfo(&frame->rs_info, info); 3330 3331 __put_user(0, &frame->rs_uc.tuc_flags); 3332 __put_user(0, &frame->rs_uc.tuc_link); 3333 __put_user(target_sigaltstack_used.ss_sp, &frame->rs_uc.tuc_stack.ss_sp); 3334 __put_user(target_sigaltstack_used.ss_size, &frame->rs_uc.tuc_stack.ss_size); 3335 __put_user(sas_ss_flags(get_sp_from_cpustate(env)), 3336 &frame->rs_uc.tuc_stack.ss_flags); 3337 3338 setup_sigcontext(env, &frame->rs_uc.tuc_mcontext); 3339 3340 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 3341 __put_user(set->sig[i], &frame->rs_uc.tuc_sigmask.sig[i]); 3342 } 3343 3344 /* 3345 * Arguments to signal handler: 3346 * 3347 * a0 = signal number 3348 * a1 = pointer to siginfo_t 3349 * a2 = pointer to struct ucontext 3350 * 3351 * $25 and PC point to the signal handler, $29 points to the 3352 * struct sigframe. 3353 */ 3354 env->active_tc.gpr[ 4] = sig; 3355 env->active_tc.gpr[ 5] = frame_addr 3356 + offsetof(struct target_rt_sigframe, rs_info); 3357 env->active_tc.gpr[ 6] = frame_addr 3358 + offsetof(struct target_rt_sigframe, rs_uc); 3359 env->active_tc.gpr[29] = frame_addr; 3360 env->active_tc.gpr[31] = frame_addr 3361 + offsetof(struct target_rt_sigframe, rs_code); 3362 /* The original kernel code sets CP0_EPC to the handler 3363 * since it returns to userland using eret 3364 * we cannot do this here, and we must set PC directly */ 3365 env->active_tc.PC = env->active_tc.gpr[25] = ka->_sa_handler; 3366 mips_set_hflags_isa_mode_from_pc(env); 3367 unlock_user_struct(frame, frame_addr, 1); 3368 return; 3369 3370 give_sigsegv: 3371 unlock_user_struct(frame, frame_addr, 1); 3372 force_sigsegv(sig); 3373 } 3374 3375 long do_rt_sigreturn(CPUMIPSState *env) 3376 { 3377 struct target_rt_sigframe *frame; 3378 abi_ulong frame_addr; 3379 sigset_t blocked; 3380 3381 frame_addr = env->active_tc.gpr[29]; 3382 trace_user_do_rt_sigreturn(env, frame_addr); 3383 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 3384 goto badframe; 3385 } 3386 3387 target_to_host_sigset(&blocked, &frame->rs_uc.tuc_sigmask); 3388 set_sigmask(&blocked); 3389 3390 restore_sigcontext(env, &frame->rs_uc.tuc_mcontext); 3391 3392 if (do_sigaltstack(frame_addr + 3393 offsetof(struct target_rt_sigframe, rs_uc.tuc_stack), 3394 0, get_sp_from_cpustate(env)) == -EFAULT) 3395 goto badframe; 3396 3397 env->active_tc.PC = env->CP0_EPC; 3398 mips_set_hflags_isa_mode_from_pc(env); 3399 /* I am not sure this is right, but it seems to work 3400 * maybe a problem with nested signals ? */ 3401 env->CP0_EPC = 0; 3402 return -TARGET_QEMU_ESIGRETURN; 3403 3404 badframe: 3405 force_sig(TARGET_SIGSEGV); 3406 return -TARGET_QEMU_ESIGRETURN; 3407 } 3408 3409 #elif defined(TARGET_SH4) 3410 3411 /* 3412 * code and data structures from linux kernel: 3413 * include/asm-sh/sigcontext.h 3414 * arch/sh/kernel/signal.c 3415 */ 3416 3417 struct target_sigcontext { 3418 target_ulong oldmask; 3419 3420 /* CPU registers */ 3421 target_ulong sc_gregs[16]; 3422 target_ulong sc_pc; 3423 target_ulong sc_pr; 3424 target_ulong sc_sr; 3425 target_ulong sc_gbr; 3426 target_ulong sc_mach; 3427 target_ulong sc_macl; 3428 3429 /* FPU registers */ 3430 target_ulong sc_fpregs[16]; 3431 target_ulong sc_xfpregs[16]; 3432 unsigned int sc_fpscr; 3433 unsigned int sc_fpul; 3434 unsigned int sc_ownedfp; 3435 }; 3436 3437 struct target_sigframe 3438 { 3439 struct target_sigcontext sc; 3440 target_ulong extramask[TARGET_NSIG_WORDS-1]; 3441 uint16_t retcode[3]; 3442 }; 3443 3444 3445 struct target_ucontext { 3446 target_ulong tuc_flags; 3447 struct target_ucontext *tuc_link; 3448 target_stack_t tuc_stack; 3449 struct target_sigcontext tuc_mcontext; 3450 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 3451 }; 3452 3453 struct target_rt_sigframe 3454 { 3455 struct target_siginfo info; 3456 struct target_ucontext uc; 3457 uint16_t retcode[3]; 3458 }; 3459 3460 3461 #define MOVW(n) (0x9300|((n)-2)) /* Move mem word at PC+n to R3 */ 3462 #define TRAP_NOARG 0xc310 /* Syscall w/no args (NR in R3) SH3/4 */ 3463 3464 static abi_ulong get_sigframe(struct target_sigaction *ka, 3465 unsigned long sp, size_t frame_size) 3466 { 3467 if ((ka->sa_flags & TARGET_SA_ONSTACK) && (sas_ss_flags(sp) == 0)) { 3468 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 3469 } 3470 3471 return (sp - frame_size) & -8ul; 3472 } 3473 3474 /* Notice when we're in the middle of a gUSA region and reset. 3475 Note that this will only occur for !parallel_cpus, as we will 3476 translate such sequences differently in a parallel context. */ 3477 static void unwind_gusa(CPUSH4State *regs) 3478 { 3479 /* If the stack pointer is sufficiently negative, and we haven't 3480 completed the sequence, then reset to the entry to the region. */ 3481 /* ??? The SH4 kernel checks for and address above 0xC0000000. 3482 However, the page mappings in qemu linux-user aren't as restricted 3483 and we wind up with the normal stack mapped above 0xF0000000. 3484 That said, there is no reason why the kernel should be allowing 3485 a gUSA region that spans 1GB. Use a tighter check here, for what 3486 can actually be enabled by the immediate move. */ 3487 if (regs->gregs[15] >= -128u && regs->pc < regs->gregs[0]) { 3488 /* Reset the PC to before the gUSA region, as computed from 3489 R0 = region end, SP = -(region size), plus one more for the 3490 insn that actually initializes SP to the region size. */ 3491 regs->pc = regs->gregs[0] + regs->gregs[15] - 2; 3492 3493 /* Reset the SP to the saved version in R1. */ 3494 regs->gregs[15] = regs->gregs[1]; 3495 } 3496 } 3497 3498 static void setup_sigcontext(struct target_sigcontext *sc, 3499 CPUSH4State *regs, unsigned long mask) 3500 { 3501 int i; 3502 3503 #define COPY(x) __put_user(regs->x, &sc->sc_##x) 3504 COPY(gregs[0]); COPY(gregs[1]); 3505 COPY(gregs[2]); COPY(gregs[3]); 3506 COPY(gregs[4]); COPY(gregs[5]); 3507 COPY(gregs[6]); COPY(gregs[7]); 3508 COPY(gregs[8]); COPY(gregs[9]); 3509 COPY(gregs[10]); COPY(gregs[11]); 3510 COPY(gregs[12]); COPY(gregs[13]); 3511 COPY(gregs[14]); COPY(gregs[15]); 3512 COPY(gbr); COPY(mach); 3513 COPY(macl); COPY(pr); 3514 COPY(sr); COPY(pc); 3515 #undef COPY 3516 3517 for (i=0; i<16; i++) { 3518 __put_user(regs->fregs[i], &sc->sc_fpregs[i]); 3519 } 3520 __put_user(regs->fpscr, &sc->sc_fpscr); 3521 __put_user(regs->fpul, &sc->sc_fpul); 3522 3523 /* non-iBCS2 extensions.. */ 3524 __put_user(mask, &sc->oldmask); 3525 } 3526 3527 static void restore_sigcontext(CPUSH4State *regs, struct target_sigcontext *sc) 3528 { 3529 int i; 3530 3531 #define COPY(x) __get_user(regs->x, &sc->sc_##x) 3532 COPY(gregs[0]); COPY(gregs[1]); 3533 COPY(gregs[2]); COPY(gregs[3]); 3534 COPY(gregs[4]); COPY(gregs[5]); 3535 COPY(gregs[6]); COPY(gregs[7]); 3536 COPY(gregs[8]); COPY(gregs[9]); 3537 COPY(gregs[10]); COPY(gregs[11]); 3538 COPY(gregs[12]); COPY(gregs[13]); 3539 COPY(gregs[14]); COPY(gregs[15]); 3540 COPY(gbr); COPY(mach); 3541 COPY(macl); COPY(pr); 3542 COPY(sr); COPY(pc); 3543 #undef COPY 3544 3545 for (i=0; i<16; i++) { 3546 __get_user(regs->fregs[i], &sc->sc_fpregs[i]); 3547 } 3548 __get_user(regs->fpscr, &sc->sc_fpscr); 3549 __get_user(regs->fpul, &sc->sc_fpul); 3550 3551 regs->tra = -1; /* disable syscall checks */ 3552 regs->flags &= ~(DELAY_SLOT_MASK | GUSA_MASK); 3553 } 3554 3555 static void setup_frame(int sig, struct target_sigaction *ka, 3556 target_sigset_t *set, CPUSH4State *regs) 3557 { 3558 struct target_sigframe *frame; 3559 abi_ulong frame_addr; 3560 int i; 3561 3562 unwind_gusa(regs); 3563 3564 frame_addr = get_sigframe(ka, regs->gregs[15], sizeof(*frame)); 3565 trace_user_setup_frame(regs, frame_addr); 3566 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 3567 goto give_sigsegv; 3568 } 3569 3570 setup_sigcontext(&frame->sc, regs, set->sig[0]); 3571 3572 for (i = 0; i < TARGET_NSIG_WORDS - 1; i++) { 3573 __put_user(set->sig[i + 1], &frame->extramask[i]); 3574 } 3575 3576 /* Set up to return from userspace. If provided, use a stub 3577 already in userspace. */ 3578 if (ka->sa_flags & TARGET_SA_RESTORER) { 3579 regs->pr = (unsigned long) ka->sa_restorer; 3580 } else { 3581 /* Generate return code (system call to sigreturn) */ 3582 abi_ulong retcode_addr = frame_addr + 3583 offsetof(struct target_sigframe, retcode); 3584 __put_user(MOVW(2), &frame->retcode[0]); 3585 __put_user(TRAP_NOARG, &frame->retcode[1]); 3586 __put_user((TARGET_NR_sigreturn), &frame->retcode[2]); 3587 regs->pr = (unsigned long) retcode_addr; 3588 } 3589 3590 /* Set up registers for signal handler */ 3591 regs->gregs[15] = frame_addr; 3592 regs->gregs[4] = sig; /* Arg for signal handler */ 3593 regs->gregs[5] = 0; 3594 regs->gregs[6] = frame_addr += offsetof(typeof(*frame), sc); 3595 regs->pc = (unsigned long) ka->_sa_handler; 3596 regs->flags &= ~(DELAY_SLOT_MASK | GUSA_MASK); 3597 3598 unlock_user_struct(frame, frame_addr, 1); 3599 return; 3600 3601 give_sigsegv: 3602 unlock_user_struct(frame, frame_addr, 1); 3603 force_sigsegv(sig); 3604 } 3605 3606 static void setup_rt_frame(int sig, struct target_sigaction *ka, 3607 target_siginfo_t *info, 3608 target_sigset_t *set, CPUSH4State *regs) 3609 { 3610 struct target_rt_sigframe *frame; 3611 abi_ulong frame_addr; 3612 int i; 3613 3614 unwind_gusa(regs); 3615 3616 frame_addr = get_sigframe(ka, regs->gregs[15], sizeof(*frame)); 3617 trace_user_setup_rt_frame(regs, frame_addr); 3618 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 3619 goto give_sigsegv; 3620 } 3621 3622 tswap_siginfo(&frame->info, info); 3623 3624 /* Create the ucontext. */ 3625 __put_user(0, &frame->uc.tuc_flags); 3626 __put_user(0, (unsigned long *)&frame->uc.tuc_link); 3627 __put_user((unsigned long)target_sigaltstack_used.ss_sp, 3628 &frame->uc.tuc_stack.ss_sp); 3629 __put_user(sas_ss_flags(regs->gregs[15]), 3630 &frame->uc.tuc_stack.ss_flags); 3631 __put_user(target_sigaltstack_used.ss_size, 3632 &frame->uc.tuc_stack.ss_size); 3633 setup_sigcontext(&frame->uc.tuc_mcontext, 3634 regs, set->sig[0]); 3635 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 3636 __put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]); 3637 } 3638 3639 /* Set up to return from userspace. If provided, use a stub 3640 already in userspace. */ 3641 if (ka->sa_flags & TARGET_SA_RESTORER) { 3642 regs->pr = (unsigned long) ka->sa_restorer; 3643 } else { 3644 /* Generate return code (system call to sigreturn) */ 3645 abi_ulong retcode_addr = frame_addr + 3646 offsetof(struct target_rt_sigframe, retcode); 3647 __put_user(MOVW(2), &frame->retcode[0]); 3648 __put_user(TRAP_NOARG, &frame->retcode[1]); 3649 __put_user((TARGET_NR_rt_sigreturn), &frame->retcode[2]); 3650 regs->pr = (unsigned long) retcode_addr; 3651 } 3652 3653 /* Set up registers for signal handler */ 3654 regs->gregs[15] = frame_addr; 3655 regs->gregs[4] = sig; /* Arg for signal handler */ 3656 regs->gregs[5] = frame_addr + offsetof(typeof(*frame), info); 3657 regs->gregs[6] = frame_addr + offsetof(typeof(*frame), uc); 3658 regs->pc = (unsigned long) ka->_sa_handler; 3659 regs->flags &= ~(DELAY_SLOT_MASK | GUSA_MASK); 3660 3661 unlock_user_struct(frame, frame_addr, 1); 3662 return; 3663 3664 give_sigsegv: 3665 unlock_user_struct(frame, frame_addr, 1); 3666 force_sigsegv(sig); 3667 } 3668 3669 long do_sigreturn(CPUSH4State *regs) 3670 { 3671 struct target_sigframe *frame; 3672 abi_ulong frame_addr; 3673 sigset_t blocked; 3674 target_sigset_t target_set; 3675 int i; 3676 int err = 0; 3677 3678 frame_addr = regs->gregs[15]; 3679 trace_user_do_sigreturn(regs, frame_addr); 3680 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 3681 goto badframe; 3682 } 3683 3684 __get_user(target_set.sig[0], &frame->sc.oldmask); 3685 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 3686 __get_user(target_set.sig[i], &frame->extramask[i - 1]); 3687 } 3688 3689 if (err) 3690 goto badframe; 3691 3692 target_to_host_sigset_internal(&blocked, &target_set); 3693 set_sigmask(&blocked); 3694 3695 restore_sigcontext(regs, &frame->sc); 3696 3697 unlock_user_struct(frame, frame_addr, 0); 3698 return -TARGET_QEMU_ESIGRETURN; 3699 3700 badframe: 3701 unlock_user_struct(frame, frame_addr, 0); 3702 force_sig(TARGET_SIGSEGV); 3703 return -TARGET_QEMU_ESIGRETURN; 3704 } 3705 3706 long do_rt_sigreturn(CPUSH4State *regs) 3707 { 3708 struct target_rt_sigframe *frame; 3709 abi_ulong frame_addr; 3710 sigset_t blocked; 3711 3712 frame_addr = regs->gregs[15]; 3713 trace_user_do_rt_sigreturn(regs, frame_addr); 3714 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 3715 goto badframe; 3716 } 3717 3718 target_to_host_sigset(&blocked, &frame->uc.tuc_sigmask); 3719 set_sigmask(&blocked); 3720 3721 restore_sigcontext(regs, &frame->uc.tuc_mcontext); 3722 3723 if (do_sigaltstack(frame_addr + 3724 offsetof(struct target_rt_sigframe, uc.tuc_stack), 3725 0, get_sp_from_cpustate(regs)) == -EFAULT) { 3726 goto badframe; 3727 } 3728 3729 unlock_user_struct(frame, frame_addr, 0); 3730 return -TARGET_QEMU_ESIGRETURN; 3731 3732 badframe: 3733 unlock_user_struct(frame, frame_addr, 0); 3734 force_sig(TARGET_SIGSEGV); 3735 return -TARGET_QEMU_ESIGRETURN; 3736 } 3737 #elif defined(TARGET_MICROBLAZE) 3738 3739 struct target_sigcontext { 3740 struct target_pt_regs regs; /* needs to be first */ 3741 uint32_t oldmask; 3742 }; 3743 3744 struct target_stack_t { 3745 abi_ulong ss_sp; 3746 int ss_flags; 3747 unsigned int ss_size; 3748 }; 3749 3750 struct target_ucontext { 3751 abi_ulong tuc_flags; 3752 abi_ulong tuc_link; 3753 struct target_stack_t tuc_stack; 3754 struct target_sigcontext tuc_mcontext; 3755 uint32_t tuc_extramask[TARGET_NSIG_WORDS - 1]; 3756 }; 3757 3758 /* Signal frames. */ 3759 struct target_signal_frame { 3760 struct target_ucontext uc; 3761 uint32_t extramask[TARGET_NSIG_WORDS - 1]; 3762 uint32_t tramp[2]; 3763 }; 3764 3765 struct rt_signal_frame { 3766 siginfo_t info; 3767 struct ucontext uc; 3768 uint32_t tramp[2]; 3769 }; 3770 3771 static void setup_sigcontext(struct target_sigcontext *sc, CPUMBState *env) 3772 { 3773 __put_user(env->regs[0], &sc->regs.r0); 3774 __put_user(env->regs[1], &sc->regs.r1); 3775 __put_user(env->regs[2], &sc->regs.r2); 3776 __put_user(env->regs[3], &sc->regs.r3); 3777 __put_user(env->regs[4], &sc->regs.r4); 3778 __put_user(env->regs[5], &sc->regs.r5); 3779 __put_user(env->regs[6], &sc->regs.r6); 3780 __put_user(env->regs[7], &sc->regs.r7); 3781 __put_user(env->regs[8], &sc->regs.r8); 3782 __put_user(env->regs[9], &sc->regs.r9); 3783 __put_user(env->regs[10], &sc->regs.r10); 3784 __put_user(env->regs[11], &sc->regs.r11); 3785 __put_user(env->regs[12], &sc->regs.r12); 3786 __put_user(env->regs[13], &sc->regs.r13); 3787 __put_user(env->regs[14], &sc->regs.r14); 3788 __put_user(env->regs[15], &sc->regs.r15); 3789 __put_user(env->regs[16], &sc->regs.r16); 3790 __put_user(env->regs[17], &sc->regs.r17); 3791 __put_user(env->regs[18], &sc->regs.r18); 3792 __put_user(env->regs[19], &sc->regs.r19); 3793 __put_user(env->regs[20], &sc->regs.r20); 3794 __put_user(env->regs[21], &sc->regs.r21); 3795 __put_user(env->regs[22], &sc->regs.r22); 3796 __put_user(env->regs[23], &sc->regs.r23); 3797 __put_user(env->regs[24], &sc->regs.r24); 3798 __put_user(env->regs[25], &sc->regs.r25); 3799 __put_user(env->regs[26], &sc->regs.r26); 3800 __put_user(env->regs[27], &sc->regs.r27); 3801 __put_user(env->regs[28], &sc->regs.r28); 3802 __put_user(env->regs[29], &sc->regs.r29); 3803 __put_user(env->regs[30], &sc->regs.r30); 3804 __put_user(env->regs[31], &sc->regs.r31); 3805 __put_user(env->sregs[SR_PC], &sc->regs.pc); 3806 } 3807 3808 static void restore_sigcontext(struct target_sigcontext *sc, CPUMBState *env) 3809 { 3810 __get_user(env->regs[0], &sc->regs.r0); 3811 __get_user(env->regs[1], &sc->regs.r1); 3812 __get_user(env->regs[2], &sc->regs.r2); 3813 __get_user(env->regs[3], &sc->regs.r3); 3814 __get_user(env->regs[4], &sc->regs.r4); 3815 __get_user(env->regs[5], &sc->regs.r5); 3816 __get_user(env->regs[6], &sc->regs.r6); 3817 __get_user(env->regs[7], &sc->regs.r7); 3818 __get_user(env->regs[8], &sc->regs.r8); 3819 __get_user(env->regs[9], &sc->regs.r9); 3820 __get_user(env->regs[10], &sc->regs.r10); 3821 __get_user(env->regs[11], &sc->regs.r11); 3822 __get_user(env->regs[12], &sc->regs.r12); 3823 __get_user(env->regs[13], &sc->regs.r13); 3824 __get_user(env->regs[14], &sc->regs.r14); 3825 __get_user(env->regs[15], &sc->regs.r15); 3826 __get_user(env->regs[16], &sc->regs.r16); 3827 __get_user(env->regs[17], &sc->regs.r17); 3828 __get_user(env->regs[18], &sc->regs.r18); 3829 __get_user(env->regs[19], &sc->regs.r19); 3830 __get_user(env->regs[20], &sc->regs.r20); 3831 __get_user(env->regs[21], &sc->regs.r21); 3832 __get_user(env->regs[22], &sc->regs.r22); 3833 __get_user(env->regs[23], &sc->regs.r23); 3834 __get_user(env->regs[24], &sc->regs.r24); 3835 __get_user(env->regs[25], &sc->regs.r25); 3836 __get_user(env->regs[26], &sc->regs.r26); 3837 __get_user(env->regs[27], &sc->regs.r27); 3838 __get_user(env->regs[28], &sc->regs.r28); 3839 __get_user(env->regs[29], &sc->regs.r29); 3840 __get_user(env->regs[30], &sc->regs.r30); 3841 __get_user(env->regs[31], &sc->regs.r31); 3842 __get_user(env->sregs[SR_PC], &sc->regs.pc); 3843 } 3844 3845 static abi_ulong get_sigframe(struct target_sigaction *ka, 3846 CPUMBState *env, int frame_size) 3847 { 3848 abi_ulong sp = env->regs[1]; 3849 3850 if ((ka->sa_flags & TARGET_SA_ONSTACK) != 0 && !on_sig_stack(sp)) { 3851 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 3852 } 3853 3854 return ((sp - frame_size) & -8UL); 3855 } 3856 3857 static void setup_frame(int sig, struct target_sigaction *ka, 3858 target_sigset_t *set, CPUMBState *env) 3859 { 3860 struct target_signal_frame *frame; 3861 abi_ulong frame_addr; 3862 int i; 3863 3864 frame_addr = get_sigframe(ka, env, sizeof *frame); 3865 trace_user_setup_frame(env, frame_addr); 3866 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) 3867 goto badframe; 3868 3869 /* Save the mask. */ 3870 __put_user(set->sig[0], &frame->uc.tuc_mcontext.oldmask); 3871 3872 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 3873 __put_user(set->sig[i], &frame->extramask[i - 1]); 3874 } 3875 3876 setup_sigcontext(&frame->uc.tuc_mcontext, env); 3877 3878 /* Set up to return from userspace. If provided, use a stub 3879 already in userspace. */ 3880 /* minus 8 is offset to cater for "rtsd r15,8" offset */ 3881 if (ka->sa_flags & TARGET_SA_RESTORER) { 3882 env->regs[15] = ((unsigned long)ka->sa_restorer)-8; 3883 } else { 3884 uint32_t t; 3885 /* Note, these encodings are _big endian_! */ 3886 /* addi r12, r0, __NR_sigreturn */ 3887 t = 0x31800000UL | TARGET_NR_sigreturn; 3888 __put_user(t, frame->tramp + 0); 3889 /* brki r14, 0x8 */ 3890 t = 0xb9cc0008UL; 3891 __put_user(t, frame->tramp + 1); 3892 3893 /* Return from sighandler will jump to the tramp. 3894 Negative 8 offset because return is rtsd r15, 8 */ 3895 env->regs[15] = frame_addr + offsetof(struct target_signal_frame, tramp) 3896 - 8; 3897 } 3898 3899 /* Set up registers for signal handler */ 3900 env->regs[1] = frame_addr; 3901 /* Signal handler args: */ 3902 env->regs[5] = sig; /* Arg 0: signum */ 3903 env->regs[6] = 0; 3904 /* arg 1: sigcontext */ 3905 env->regs[7] = frame_addr += offsetof(typeof(*frame), uc); 3906 3907 /* Offset of 4 to handle microblaze rtid r14, 0 */ 3908 env->sregs[SR_PC] = (unsigned long)ka->_sa_handler; 3909 3910 unlock_user_struct(frame, frame_addr, 1); 3911 return; 3912 badframe: 3913 force_sigsegv(sig); 3914 } 3915 3916 static void setup_rt_frame(int sig, struct target_sigaction *ka, 3917 target_siginfo_t *info, 3918 target_sigset_t *set, CPUMBState *env) 3919 { 3920 fprintf(stderr, "Microblaze setup_rt_frame: not implemented\n"); 3921 } 3922 3923 long do_sigreturn(CPUMBState *env) 3924 { 3925 struct target_signal_frame *frame; 3926 abi_ulong frame_addr; 3927 target_sigset_t target_set; 3928 sigset_t set; 3929 int i; 3930 3931 frame_addr = env->regs[R_SP]; 3932 trace_user_do_sigreturn(env, frame_addr); 3933 /* Make sure the guest isn't playing games. */ 3934 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 1)) 3935 goto badframe; 3936 3937 /* Restore blocked signals */ 3938 __get_user(target_set.sig[0], &frame->uc.tuc_mcontext.oldmask); 3939 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 3940 __get_user(target_set.sig[i], &frame->extramask[i - 1]); 3941 } 3942 target_to_host_sigset_internal(&set, &target_set); 3943 set_sigmask(&set); 3944 3945 restore_sigcontext(&frame->uc.tuc_mcontext, env); 3946 /* We got here through a sigreturn syscall, our path back is via an 3947 rtb insn so setup r14 for that. */ 3948 env->regs[14] = env->sregs[SR_PC]; 3949 3950 unlock_user_struct(frame, frame_addr, 0); 3951 return -TARGET_QEMU_ESIGRETURN; 3952 badframe: 3953 force_sig(TARGET_SIGSEGV); 3954 return -TARGET_QEMU_ESIGRETURN; 3955 } 3956 3957 long do_rt_sigreturn(CPUMBState *env) 3958 { 3959 trace_user_do_rt_sigreturn(env, 0); 3960 fprintf(stderr, "Microblaze do_rt_sigreturn: not implemented\n"); 3961 return -TARGET_ENOSYS; 3962 } 3963 3964 #elif defined(TARGET_CRIS) 3965 3966 struct target_sigcontext { 3967 struct target_pt_regs regs; /* needs to be first */ 3968 uint32_t oldmask; 3969 uint32_t usp; /* usp before stacking this gunk on it */ 3970 }; 3971 3972 /* Signal frames. */ 3973 struct target_signal_frame { 3974 struct target_sigcontext sc; 3975 uint32_t extramask[TARGET_NSIG_WORDS - 1]; 3976 uint16_t retcode[4]; /* Trampoline code. */ 3977 }; 3978 3979 struct rt_signal_frame { 3980 siginfo_t *pinfo; 3981 void *puc; 3982 siginfo_t info; 3983 struct ucontext uc; 3984 uint16_t retcode[4]; /* Trampoline code. */ 3985 }; 3986 3987 static void setup_sigcontext(struct target_sigcontext *sc, CPUCRISState *env) 3988 { 3989 __put_user(env->regs[0], &sc->regs.r0); 3990 __put_user(env->regs[1], &sc->regs.r1); 3991 __put_user(env->regs[2], &sc->regs.r2); 3992 __put_user(env->regs[3], &sc->regs.r3); 3993 __put_user(env->regs[4], &sc->regs.r4); 3994 __put_user(env->regs[5], &sc->regs.r5); 3995 __put_user(env->regs[6], &sc->regs.r6); 3996 __put_user(env->regs[7], &sc->regs.r7); 3997 __put_user(env->regs[8], &sc->regs.r8); 3998 __put_user(env->regs[9], &sc->regs.r9); 3999 __put_user(env->regs[10], &sc->regs.r10); 4000 __put_user(env->regs[11], &sc->regs.r11); 4001 __put_user(env->regs[12], &sc->regs.r12); 4002 __put_user(env->regs[13], &sc->regs.r13); 4003 __put_user(env->regs[14], &sc->usp); 4004 __put_user(env->regs[15], &sc->regs.acr); 4005 __put_user(env->pregs[PR_MOF], &sc->regs.mof); 4006 __put_user(env->pregs[PR_SRP], &sc->regs.srp); 4007 __put_user(env->pc, &sc->regs.erp); 4008 } 4009 4010 static void restore_sigcontext(struct target_sigcontext *sc, CPUCRISState *env) 4011 { 4012 __get_user(env->regs[0], &sc->regs.r0); 4013 __get_user(env->regs[1], &sc->regs.r1); 4014 __get_user(env->regs[2], &sc->regs.r2); 4015 __get_user(env->regs[3], &sc->regs.r3); 4016 __get_user(env->regs[4], &sc->regs.r4); 4017 __get_user(env->regs[5], &sc->regs.r5); 4018 __get_user(env->regs[6], &sc->regs.r6); 4019 __get_user(env->regs[7], &sc->regs.r7); 4020 __get_user(env->regs[8], &sc->regs.r8); 4021 __get_user(env->regs[9], &sc->regs.r9); 4022 __get_user(env->regs[10], &sc->regs.r10); 4023 __get_user(env->regs[11], &sc->regs.r11); 4024 __get_user(env->regs[12], &sc->regs.r12); 4025 __get_user(env->regs[13], &sc->regs.r13); 4026 __get_user(env->regs[14], &sc->usp); 4027 __get_user(env->regs[15], &sc->regs.acr); 4028 __get_user(env->pregs[PR_MOF], &sc->regs.mof); 4029 __get_user(env->pregs[PR_SRP], &sc->regs.srp); 4030 __get_user(env->pc, &sc->regs.erp); 4031 } 4032 4033 static abi_ulong get_sigframe(CPUCRISState *env, int framesize) 4034 { 4035 abi_ulong sp; 4036 /* Align the stack downwards to 4. */ 4037 sp = (env->regs[R_SP] & ~3); 4038 return sp - framesize; 4039 } 4040 4041 static void setup_frame(int sig, struct target_sigaction *ka, 4042 target_sigset_t *set, CPUCRISState *env) 4043 { 4044 struct target_signal_frame *frame; 4045 abi_ulong frame_addr; 4046 int i; 4047 4048 frame_addr = get_sigframe(env, sizeof *frame); 4049 trace_user_setup_frame(env, frame_addr); 4050 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) 4051 goto badframe; 4052 4053 /* 4054 * The CRIS signal return trampoline. A real linux/CRIS kernel doesn't 4055 * use this trampoline anymore but it sets it up for GDB. 4056 * In QEMU, using the trampoline simplifies things a bit so we use it. 4057 * 4058 * This is movu.w __NR_sigreturn, r9; break 13; 4059 */ 4060 __put_user(0x9c5f, frame->retcode+0); 4061 __put_user(TARGET_NR_sigreturn, 4062 frame->retcode + 1); 4063 __put_user(0xe93d, frame->retcode + 2); 4064 4065 /* Save the mask. */ 4066 __put_user(set->sig[0], &frame->sc.oldmask); 4067 4068 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 4069 __put_user(set->sig[i], &frame->extramask[i - 1]); 4070 } 4071 4072 setup_sigcontext(&frame->sc, env); 4073 4074 /* Move the stack and setup the arguments for the handler. */ 4075 env->regs[R_SP] = frame_addr; 4076 env->regs[10] = sig; 4077 env->pc = (unsigned long) ka->_sa_handler; 4078 /* Link SRP so the guest returns through the trampoline. */ 4079 env->pregs[PR_SRP] = frame_addr + offsetof(typeof(*frame), retcode); 4080 4081 unlock_user_struct(frame, frame_addr, 1); 4082 return; 4083 badframe: 4084 force_sigsegv(sig); 4085 } 4086 4087 static void setup_rt_frame(int sig, struct target_sigaction *ka, 4088 target_siginfo_t *info, 4089 target_sigset_t *set, CPUCRISState *env) 4090 { 4091 fprintf(stderr, "CRIS setup_rt_frame: not implemented\n"); 4092 } 4093 4094 long do_sigreturn(CPUCRISState *env) 4095 { 4096 struct target_signal_frame *frame; 4097 abi_ulong frame_addr; 4098 target_sigset_t target_set; 4099 sigset_t set; 4100 int i; 4101 4102 frame_addr = env->regs[R_SP]; 4103 trace_user_do_sigreturn(env, frame_addr); 4104 /* Make sure the guest isn't playing games. */ 4105 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 1)) { 4106 goto badframe; 4107 } 4108 4109 /* Restore blocked signals */ 4110 __get_user(target_set.sig[0], &frame->sc.oldmask); 4111 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 4112 __get_user(target_set.sig[i], &frame->extramask[i - 1]); 4113 } 4114 target_to_host_sigset_internal(&set, &target_set); 4115 set_sigmask(&set); 4116 4117 restore_sigcontext(&frame->sc, env); 4118 unlock_user_struct(frame, frame_addr, 0); 4119 return -TARGET_QEMU_ESIGRETURN; 4120 badframe: 4121 force_sig(TARGET_SIGSEGV); 4122 return -TARGET_QEMU_ESIGRETURN; 4123 } 4124 4125 long do_rt_sigreturn(CPUCRISState *env) 4126 { 4127 trace_user_do_rt_sigreturn(env, 0); 4128 fprintf(stderr, "CRIS do_rt_sigreturn: not implemented\n"); 4129 return -TARGET_ENOSYS; 4130 } 4131 4132 #elif defined(TARGET_NIOS2) 4133 4134 #define MCONTEXT_VERSION 2 4135 4136 struct target_sigcontext { 4137 int version; 4138 unsigned long gregs[32]; 4139 }; 4140 4141 struct target_ucontext { 4142 abi_ulong tuc_flags; 4143 abi_ulong tuc_link; 4144 target_stack_t tuc_stack; 4145 struct target_sigcontext tuc_mcontext; 4146 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 4147 }; 4148 4149 struct target_rt_sigframe { 4150 struct target_siginfo info; 4151 struct target_ucontext uc; 4152 }; 4153 4154 static unsigned long sigsp(unsigned long sp, struct target_sigaction *ka) 4155 { 4156 if (unlikely((ka->sa_flags & SA_ONSTACK)) && !sas_ss_flags(sp)) { 4157 #ifdef CONFIG_STACK_GROWSUP 4158 return target_sigaltstack_used.ss_sp; 4159 #else 4160 return target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 4161 #endif 4162 } 4163 return sp; 4164 } 4165 4166 static int rt_setup_ucontext(struct target_ucontext *uc, CPUNios2State *env) 4167 { 4168 unsigned long *gregs = uc->tuc_mcontext.gregs; 4169 4170 __put_user(MCONTEXT_VERSION, &uc->tuc_mcontext.version); 4171 __put_user(env->regs[1], &gregs[0]); 4172 __put_user(env->regs[2], &gregs[1]); 4173 __put_user(env->regs[3], &gregs[2]); 4174 __put_user(env->regs[4], &gregs[3]); 4175 __put_user(env->regs[5], &gregs[4]); 4176 __put_user(env->regs[6], &gregs[5]); 4177 __put_user(env->regs[7], &gregs[6]); 4178 __put_user(env->regs[8], &gregs[7]); 4179 __put_user(env->regs[9], &gregs[8]); 4180 __put_user(env->regs[10], &gregs[9]); 4181 __put_user(env->regs[11], &gregs[10]); 4182 __put_user(env->regs[12], &gregs[11]); 4183 __put_user(env->regs[13], &gregs[12]); 4184 __put_user(env->regs[14], &gregs[13]); 4185 __put_user(env->regs[15], &gregs[14]); 4186 __put_user(env->regs[16], &gregs[15]); 4187 __put_user(env->regs[17], &gregs[16]); 4188 __put_user(env->regs[18], &gregs[17]); 4189 __put_user(env->regs[19], &gregs[18]); 4190 __put_user(env->regs[20], &gregs[19]); 4191 __put_user(env->regs[21], &gregs[20]); 4192 __put_user(env->regs[22], &gregs[21]); 4193 __put_user(env->regs[23], &gregs[22]); 4194 __put_user(env->regs[R_RA], &gregs[23]); 4195 __put_user(env->regs[R_FP], &gregs[24]); 4196 __put_user(env->regs[R_GP], &gregs[25]); 4197 __put_user(env->regs[R_EA], &gregs[27]); 4198 __put_user(env->regs[R_SP], &gregs[28]); 4199 4200 return 0; 4201 } 4202 4203 static int rt_restore_ucontext(CPUNios2State *env, struct target_ucontext *uc, 4204 int *pr2) 4205 { 4206 int temp; 4207 abi_ulong off, frame_addr = env->regs[R_SP]; 4208 unsigned long *gregs = uc->tuc_mcontext.gregs; 4209 int err; 4210 4211 /* Always make any pending restarted system calls return -EINTR */ 4212 /* current->restart_block.fn = do_no_restart_syscall; */ 4213 4214 __get_user(temp, &uc->tuc_mcontext.version); 4215 if (temp != MCONTEXT_VERSION) { 4216 return 1; 4217 } 4218 4219 /* restore passed registers */ 4220 __get_user(env->regs[1], &gregs[0]); 4221 __get_user(env->regs[2], &gregs[1]); 4222 __get_user(env->regs[3], &gregs[2]); 4223 __get_user(env->regs[4], &gregs[3]); 4224 __get_user(env->regs[5], &gregs[4]); 4225 __get_user(env->regs[6], &gregs[5]); 4226 __get_user(env->regs[7], &gregs[6]); 4227 __get_user(env->regs[8], &gregs[7]); 4228 __get_user(env->regs[9], &gregs[8]); 4229 __get_user(env->regs[10], &gregs[9]); 4230 __get_user(env->regs[11], &gregs[10]); 4231 __get_user(env->regs[12], &gregs[11]); 4232 __get_user(env->regs[13], &gregs[12]); 4233 __get_user(env->regs[14], &gregs[13]); 4234 __get_user(env->regs[15], &gregs[14]); 4235 __get_user(env->regs[16], &gregs[15]); 4236 __get_user(env->regs[17], &gregs[16]); 4237 __get_user(env->regs[18], &gregs[17]); 4238 __get_user(env->regs[19], &gregs[18]); 4239 __get_user(env->regs[20], &gregs[19]); 4240 __get_user(env->regs[21], &gregs[20]); 4241 __get_user(env->regs[22], &gregs[21]); 4242 __get_user(env->regs[23], &gregs[22]); 4243 /* gregs[23] is handled below */ 4244 /* Verify, should this be settable */ 4245 __get_user(env->regs[R_FP], &gregs[24]); 4246 /* Verify, should this be settable */ 4247 __get_user(env->regs[R_GP], &gregs[25]); 4248 /* Not really necessary no user settable bits */ 4249 __get_user(temp, &gregs[26]); 4250 __get_user(env->regs[R_EA], &gregs[27]); 4251 4252 __get_user(env->regs[R_RA], &gregs[23]); 4253 __get_user(env->regs[R_SP], &gregs[28]); 4254 4255 off = offsetof(struct target_rt_sigframe, uc.tuc_stack); 4256 err = do_sigaltstack(frame_addr + off, 0, get_sp_from_cpustate(env)); 4257 if (err == -EFAULT) { 4258 return 1; 4259 } 4260 4261 *pr2 = env->regs[2]; 4262 return 0; 4263 } 4264 4265 static void *get_sigframe(struct target_sigaction *ka, CPUNios2State *env, 4266 size_t frame_size) 4267 { 4268 unsigned long usp; 4269 4270 /* Default to using normal stack. */ 4271 usp = env->regs[R_SP]; 4272 4273 /* This is the X/Open sanctioned signal stack switching. */ 4274 usp = sigsp(usp, ka); 4275 4276 /* Verify, is it 32 or 64 bit aligned */ 4277 return (void *)((usp - frame_size) & -8UL); 4278 } 4279 4280 static void setup_rt_frame(int sig, struct target_sigaction *ka, 4281 target_siginfo_t *info, 4282 target_sigset_t *set, 4283 CPUNios2State *env) 4284 { 4285 struct target_rt_sigframe *frame; 4286 int i, err = 0; 4287 4288 frame = get_sigframe(ka, env, sizeof(*frame)); 4289 4290 if (ka->sa_flags & SA_SIGINFO) { 4291 tswap_siginfo(&frame->info, info); 4292 } 4293 4294 /* Create the ucontext. */ 4295 __put_user(0, &frame->uc.tuc_flags); 4296 __put_user(0, &frame->uc.tuc_link); 4297 __put_user(target_sigaltstack_used.ss_sp, &frame->uc.tuc_stack.ss_sp); 4298 __put_user(sas_ss_flags(env->regs[R_SP]), &frame->uc.tuc_stack.ss_flags); 4299 __put_user(target_sigaltstack_used.ss_size, &frame->uc.tuc_stack.ss_size); 4300 err |= rt_setup_ucontext(&frame->uc, env); 4301 for (i = 0; i < TARGET_NSIG_WORDS; i++) { 4302 __put_user((abi_ulong)set->sig[i], 4303 (abi_ulong *)&frame->uc.tuc_sigmask.sig[i]); 4304 } 4305 4306 if (err) { 4307 goto give_sigsegv; 4308 } 4309 4310 /* Set up to return from userspace; jump to fixed address sigreturn 4311 trampoline on kuser page. */ 4312 env->regs[R_RA] = (unsigned long) (0x1044); 4313 4314 /* Set up registers for signal handler */ 4315 env->regs[R_SP] = (unsigned long) frame; 4316 env->regs[4] = (unsigned long) sig; 4317 env->regs[5] = (unsigned long) &frame->info; 4318 env->regs[6] = (unsigned long) &frame->uc; 4319 env->regs[R_EA] = (unsigned long) ka->_sa_handler; 4320 return; 4321 4322 give_sigsegv: 4323 if (sig == TARGET_SIGSEGV) { 4324 ka->_sa_handler = TARGET_SIG_DFL; 4325 } 4326 force_sigsegv(sig); 4327 return; 4328 } 4329 4330 long do_sigreturn(CPUNios2State *env) 4331 { 4332 trace_user_do_sigreturn(env, 0); 4333 fprintf(stderr, "do_sigreturn: not implemented\n"); 4334 return -TARGET_ENOSYS; 4335 } 4336 4337 long do_rt_sigreturn(CPUNios2State *env) 4338 { 4339 /* Verify, can we follow the stack back */ 4340 abi_ulong frame_addr = env->regs[R_SP]; 4341 struct target_rt_sigframe *frame; 4342 sigset_t set; 4343 int rval; 4344 4345 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 4346 goto badframe; 4347 } 4348 4349 target_to_host_sigset(&set, &frame->uc.tuc_sigmask); 4350 do_sigprocmask(SIG_SETMASK, &set, NULL); 4351 4352 if (rt_restore_ucontext(env, &frame->uc, &rval)) { 4353 goto badframe; 4354 } 4355 4356 unlock_user_struct(frame, frame_addr, 0); 4357 return rval; 4358 4359 badframe: 4360 unlock_user_struct(frame, frame_addr, 0); 4361 force_sig(TARGET_SIGSEGV); 4362 return 0; 4363 } 4364 /* TARGET_NIOS2 */ 4365 4366 #elif defined(TARGET_OPENRISC) 4367 4368 struct target_sigcontext { 4369 struct target_pt_regs regs; 4370 abi_ulong oldmask; 4371 abi_ulong usp; 4372 }; 4373 4374 struct target_ucontext { 4375 abi_ulong tuc_flags; 4376 abi_ulong tuc_link; 4377 target_stack_t tuc_stack; 4378 struct target_sigcontext tuc_mcontext; 4379 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 4380 }; 4381 4382 struct target_rt_sigframe { 4383 abi_ulong pinfo; 4384 uint64_t puc; 4385 struct target_siginfo info; 4386 struct target_sigcontext sc; 4387 struct target_ucontext uc; 4388 unsigned char retcode[16]; /* trampoline code */ 4389 }; 4390 4391 /* This is the asm-generic/ucontext.h version */ 4392 #if 0 4393 static int restore_sigcontext(CPUOpenRISCState *regs, 4394 struct target_sigcontext *sc) 4395 { 4396 unsigned int err = 0; 4397 unsigned long old_usp; 4398 4399 /* Alwys make any pending restarted system call return -EINTR */ 4400 current_thread_info()->restart_block.fn = do_no_restart_syscall; 4401 4402 /* restore the regs from &sc->regs (same as sc, since regs is first) 4403 * (sc is already checked for VERIFY_READ since the sigframe was 4404 * checked in sys_sigreturn previously) 4405 */ 4406 4407 if (copy_from_user(regs, &sc, sizeof(struct target_pt_regs))) { 4408 goto badframe; 4409 } 4410 4411 /* make sure the U-flag is set so user-mode cannot fool us */ 4412 4413 regs->sr &= ~SR_SM; 4414 4415 /* restore the old USP as it was before we stacked the sc etc. 4416 * (we cannot just pop the sigcontext since we aligned the sp and 4417 * stuff after pushing it) 4418 */ 4419 4420 __get_user(old_usp, &sc->usp); 4421 phx_signal("old_usp 0x%lx", old_usp); 4422 4423 __PHX__ REALLY /* ??? */ 4424 wrusp(old_usp); 4425 regs->gpr[1] = old_usp; 4426 4427 /* TODO: the other ports use regs->orig_XX to disable syscall checks 4428 * after this completes, but we don't use that mechanism. maybe we can 4429 * use it now ? 4430 */ 4431 4432 return err; 4433 4434 badframe: 4435 return 1; 4436 } 4437 #endif 4438 4439 /* Set up a signal frame. */ 4440 4441 static void setup_sigcontext(struct target_sigcontext *sc, 4442 CPUOpenRISCState *regs, 4443 unsigned long mask) 4444 { 4445 unsigned long usp = cpu_get_gpr(regs, 1); 4446 4447 /* copy the regs. they are first in sc so we can use sc directly */ 4448 4449 /*copy_to_user(&sc, regs, sizeof(struct target_pt_regs));*/ 4450 4451 /* Set the frametype to CRIS_FRAME_NORMAL for the execution of 4452 the signal handler. The frametype will be restored to its previous 4453 value in restore_sigcontext. */ 4454 /*regs->frametype = CRIS_FRAME_NORMAL;*/ 4455 4456 /* then some other stuff */ 4457 __put_user(mask, &sc->oldmask); 4458 __put_user(usp, &sc->usp); 4459 } 4460 4461 static inline unsigned long align_sigframe(unsigned long sp) 4462 { 4463 return sp & ~3UL; 4464 } 4465 4466 static inline abi_ulong get_sigframe(struct target_sigaction *ka, 4467 CPUOpenRISCState *regs, 4468 size_t frame_size) 4469 { 4470 unsigned long sp = cpu_get_gpr(regs, 1); 4471 int onsigstack = on_sig_stack(sp); 4472 4473 /* redzone */ 4474 /* This is the X/Open sanctioned signal stack switching. */ 4475 if ((ka->sa_flags & TARGET_SA_ONSTACK) != 0 && !onsigstack) { 4476 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 4477 } 4478 4479 sp = align_sigframe(sp - frame_size); 4480 4481 /* 4482 * If we are on the alternate signal stack and would overflow it, don't. 4483 * Return an always-bogus address instead so we will die with SIGSEGV. 4484 */ 4485 4486 if (onsigstack && !likely(on_sig_stack(sp))) { 4487 return -1L; 4488 } 4489 4490 return sp; 4491 } 4492 4493 static void setup_rt_frame(int sig, struct target_sigaction *ka, 4494 target_siginfo_t *info, 4495 target_sigset_t *set, CPUOpenRISCState *env) 4496 { 4497 int err = 0; 4498 abi_ulong frame_addr; 4499 unsigned long return_ip; 4500 struct target_rt_sigframe *frame; 4501 abi_ulong info_addr, uc_addr; 4502 4503 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 4504 trace_user_setup_rt_frame(env, frame_addr); 4505 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 4506 goto give_sigsegv; 4507 } 4508 4509 info_addr = frame_addr + offsetof(struct target_rt_sigframe, info); 4510 __put_user(info_addr, &frame->pinfo); 4511 uc_addr = frame_addr + offsetof(struct target_rt_sigframe, uc); 4512 __put_user(uc_addr, &frame->puc); 4513 4514 if (ka->sa_flags & SA_SIGINFO) { 4515 tswap_siginfo(&frame->info, info); 4516 } 4517 4518 /*err |= __clear_user(&frame->uc, offsetof(struct ucontext, uc_mcontext));*/ 4519 __put_user(0, &frame->uc.tuc_flags); 4520 __put_user(0, &frame->uc.tuc_link); 4521 __put_user(target_sigaltstack_used.ss_sp, 4522 &frame->uc.tuc_stack.ss_sp); 4523 __put_user(sas_ss_flags(cpu_get_gpr(env, 1)), 4524 &frame->uc.tuc_stack.ss_flags); 4525 __put_user(target_sigaltstack_used.ss_size, 4526 &frame->uc.tuc_stack.ss_size); 4527 setup_sigcontext(&frame->sc, env, set->sig[0]); 4528 4529 /*err |= copy_to_user(frame->uc.tuc_sigmask, set, sizeof(*set));*/ 4530 4531 /* trampoline - the desired return ip is the retcode itself */ 4532 return_ip = (unsigned long)&frame->retcode; 4533 /* This is l.ori r11,r0,__NR_sigreturn, l.sys 1 */ 4534 __put_user(0xa960, (short *)(frame->retcode + 0)); 4535 __put_user(TARGET_NR_rt_sigreturn, (short *)(frame->retcode + 2)); 4536 __put_user(0x20000001, (unsigned long *)(frame->retcode + 4)); 4537 __put_user(0x15000000, (unsigned long *)(frame->retcode + 8)); 4538 4539 if (err) { 4540 goto give_sigsegv; 4541 } 4542 4543 /* TODO what is the current->exec_domain stuff and invmap ? */ 4544 4545 /* Set up registers for signal handler */ 4546 env->pc = (unsigned long)ka->_sa_handler; /* what we enter NOW */ 4547 cpu_set_gpr(env, 9, (unsigned long)return_ip); /* what we enter LATER */ 4548 cpu_set_gpr(env, 3, (unsigned long)sig); /* arg 1: signo */ 4549 cpu_set_gpr(env, 4, (unsigned long)&frame->info); /* arg 2: (siginfo_t*) */ 4550 cpu_set_gpr(env, 5, (unsigned long)&frame->uc); /* arg 3: ucontext */ 4551 4552 /* actually move the usp to reflect the stacked frame */ 4553 cpu_set_gpr(env, 1, (unsigned long)frame); 4554 4555 return; 4556 4557 give_sigsegv: 4558 unlock_user_struct(frame, frame_addr, 1); 4559 force_sigsegv(sig); 4560 } 4561 4562 long do_sigreturn(CPUOpenRISCState *env) 4563 { 4564 trace_user_do_sigreturn(env, 0); 4565 fprintf(stderr, "do_sigreturn: not implemented\n"); 4566 return -TARGET_ENOSYS; 4567 } 4568 4569 long do_rt_sigreturn(CPUOpenRISCState *env) 4570 { 4571 trace_user_do_rt_sigreturn(env, 0); 4572 fprintf(stderr, "do_rt_sigreturn: not implemented\n"); 4573 return -TARGET_ENOSYS; 4574 } 4575 /* TARGET_OPENRISC */ 4576 4577 #elif defined(TARGET_S390X) 4578 4579 #define __NUM_GPRS 16 4580 #define __NUM_FPRS 16 4581 #define __NUM_ACRS 16 4582 4583 #define S390_SYSCALL_SIZE 2 4584 #define __SIGNAL_FRAMESIZE 160 /* FIXME: 31-bit mode -> 96 */ 4585 4586 #define _SIGCONTEXT_NSIG 64 4587 #define _SIGCONTEXT_NSIG_BPW 64 /* FIXME: 31-bit mode -> 32 */ 4588 #define _SIGCONTEXT_NSIG_WORDS (_SIGCONTEXT_NSIG / _SIGCONTEXT_NSIG_BPW) 4589 #define _SIGMASK_COPY_SIZE (sizeof(unsigned long)*_SIGCONTEXT_NSIG_WORDS) 4590 #define PSW_ADDR_AMODE 0x0000000000000000UL /* 0x80000000UL for 31-bit */ 4591 #define S390_SYSCALL_OPCODE ((uint16_t)0x0a00) 4592 4593 typedef struct { 4594 target_psw_t psw; 4595 target_ulong gprs[__NUM_GPRS]; 4596 unsigned int acrs[__NUM_ACRS]; 4597 } target_s390_regs_common; 4598 4599 typedef struct { 4600 unsigned int fpc; 4601 double fprs[__NUM_FPRS]; 4602 } target_s390_fp_regs; 4603 4604 typedef struct { 4605 target_s390_regs_common regs; 4606 target_s390_fp_regs fpregs; 4607 } target_sigregs; 4608 4609 struct target_sigcontext { 4610 target_ulong oldmask[_SIGCONTEXT_NSIG_WORDS]; 4611 target_sigregs *sregs; 4612 }; 4613 4614 typedef struct { 4615 uint8_t callee_used_stack[__SIGNAL_FRAMESIZE]; 4616 struct target_sigcontext sc; 4617 target_sigregs sregs; 4618 int signo; 4619 uint8_t retcode[S390_SYSCALL_SIZE]; 4620 } sigframe; 4621 4622 struct target_ucontext { 4623 target_ulong tuc_flags; 4624 struct target_ucontext *tuc_link; 4625 target_stack_t tuc_stack; 4626 target_sigregs tuc_mcontext; 4627 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 4628 }; 4629 4630 typedef struct { 4631 uint8_t callee_used_stack[__SIGNAL_FRAMESIZE]; 4632 uint8_t retcode[S390_SYSCALL_SIZE]; 4633 struct target_siginfo info; 4634 struct target_ucontext uc; 4635 } rt_sigframe; 4636 4637 static inline abi_ulong 4638 get_sigframe(struct target_sigaction *ka, CPUS390XState *env, size_t frame_size) 4639 { 4640 abi_ulong sp; 4641 4642 /* Default to using normal stack */ 4643 sp = env->regs[15]; 4644 4645 /* This is the X/Open sanctioned signal stack switching. */ 4646 if (ka->sa_flags & TARGET_SA_ONSTACK) { 4647 if (!sas_ss_flags(sp)) { 4648 sp = target_sigaltstack_used.ss_sp + 4649 target_sigaltstack_used.ss_size; 4650 } 4651 } 4652 4653 /* This is the legacy signal stack switching. */ 4654 else if (/* FIXME !user_mode(regs) */ 0 && 4655 !(ka->sa_flags & TARGET_SA_RESTORER) && 4656 ka->sa_restorer) { 4657 sp = (abi_ulong) ka->sa_restorer; 4658 } 4659 4660 return (sp - frame_size) & -8ul; 4661 } 4662 4663 static void save_sigregs(CPUS390XState *env, target_sigregs *sregs) 4664 { 4665 int i; 4666 //save_access_regs(current->thread.acrs); FIXME 4667 4668 /* Copy a 'clean' PSW mask to the user to avoid leaking 4669 information about whether PER is currently on. */ 4670 __put_user(env->psw.mask, &sregs->regs.psw.mask); 4671 __put_user(env->psw.addr, &sregs->regs.psw.addr); 4672 for (i = 0; i < 16; i++) { 4673 __put_user(env->regs[i], &sregs->regs.gprs[i]); 4674 } 4675 for (i = 0; i < 16; i++) { 4676 __put_user(env->aregs[i], &sregs->regs.acrs[i]); 4677 } 4678 /* 4679 * We have to store the fp registers to current->thread.fp_regs 4680 * to merge them with the emulated registers. 4681 */ 4682 //save_fp_regs(¤t->thread.fp_regs); FIXME 4683 for (i = 0; i < 16; i++) { 4684 __put_user(get_freg(env, i)->ll, &sregs->fpregs.fprs[i]); 4685 } 4686 } 4687 4688 static void setup_frame(int sig, struct target_sigaction *ka, 4689 target_sigset_t *set, CPUS390XState *env) 4690 { 4691 sigframe *frame; 4692 abi_ulong frame_addr; 4693 4694 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 4695 trace_user_setup_frame(env, frame_addr); 4696 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 4697 goto give_sigsegv; 4698 } 4699 4700 __put_user(set->sig[0], &frame->sc.oldmask[0]); 4701 4702 save_sigregs(env, &frame->sregs); 4703 4704 __put_user((abi_ulong)(unsigned long)&frame->sregs, 4705 (abi_ulong *)&frame->sc.sregs); 4706 4707 /* Set up to return from userspace. If provided, use a stub 4708 already in userspace. */ 4709 if (ka->sa_flags & TARGET_SA_RESTORER) { 4710 env->regs[14] = (unsigned long) 4711 ka->sa_restorer | PSW_ADDR_AMODE; 4712 } else { 4713 env->regs[14] = (frame_addr + offsetof(sigframe, retcode)) 4714 | PSW_ADDR_AMODE; 4715 __put_user(S390_SYSCALL_OPCODE | TARGET_NR_sigreturn, 4716 (uint16_t *)(frame->retcode)); 4717 } 4718 4719 /* Set up backchain. */ 4720 __put_user(env->regs[15], (abi_ulong *) frame); 4721 4722 /* Set up registers for signal handler */ 4723 env->regs[15] = frame_addr; 4724 env->psw.addr = (target_ulong) ka->_sa_handler | PSW_ADDR_AMODE; 4725 4726 env->regs[2] = sig; //map_signal(sig); 4727 env->regs[3] = frame_addr += offsetof(typeof(*frame), sc); 4728 4729 /* We forgot to include these in the sigcontext. 4730 To avoid breaking binary compatibility, they are passed as args. */ 4731 env->regs[4] = 0; // FIXME: no clue... current->thread.trap_no; 4732 env->regs[5] = 0; // FIXME: no clue... current->thread.prot_addr; 4733 4734 /* Place signal number on stack to allow backtrace from handler. */ 4735 __put_user(env->regs[2], &frame->signo); 4736 unlock_user_struct(frame, frame_addr, 1); 4737 return; 4738 4739 give_sigsegv: 4740 force_sigsegv(sig); 4741 } 4742 4743 static void setup_rt_frame(int sig, struct target_sigaction *ka, 4744 target_siginfo_t *info, 4745 target_sigset_t *set, CPUS390XState *env) 4746 { 4747 int i; 4748 rt_sigframe *frame; 4749 abi_ulong frame_addr; 4750 4751 frame_addr = get_sigframe(ka, env, sizeof *frame); 4752 trace_user_setup_rt_frame(env, frame_addr); 4753 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 4754 goto give_sigsegv; 4755 } 4756 4757 tswap_siginfo(&frame->info, info); 4758 4759 /* Create the ucontext. */ 4760 __put_user(0, &frame->uc.tuc_flags); 4761 __put_user((abi_ulong)0, (abi_ulong *)&frame->uc.tuc_link); 4762 __put_user(target_sigaltstack_used.ss_sp, &frame->uc.tuc_stack.ss_sp); 4763 __put_user(sas_ss_flags(get_sp_from_cpustate(env)), 4764 &frame->uc.tuc_stack.ss_flags); 4765 __put_user(target_sigaltstack_used.ss_size, &frame->uc.tuc_stack.ss_size); 4766 save_sigregs(env, &frame->uc.tuc_mcontext); 4767 for (i = 0; i < TARGET_NSIG_WORDS; i++) { 4768 __put_user((abi_ulong)set->sig[i], 4769 (abi_ulong *)&frame->uc.tuc_sigmask.sig[i]); 4770 } 4771 4772 /* Set up to return from userspace. If provided, use a stub 4773 already in userspace. */ 4774 if (ka->sa_flags & TARGET_SA_RESTORER) { 4775 env->regs[14] = (unsigned long) ka->sa_restorer | PSW_ADDR_AMODE; 4776 } else { 4777 env->regs[14] = (unsigned long) frame->retcode | PSW_ADDR_AMODE; 4778 __put_user(S390_SYSCALL_OPCODE | TARGET_NR_rt_sigreturn, 4779 (uint16_t *)(frame->retcode)); 4780 } 4781 4782 /* Set up backchain. */ 4783 __put_user(env->regs[15], (abi_ulong *) frame); 4784 4785 /* Set up registers for signal handler */ 4786 env->regs[15] = frame_addr; 4787 env->psw.addr = (target_ulong) ka->_sa_handler | PSW_ADDR_AMODE; 4788 4789 env->regs[2] = sig; //map_signal(sig); 4790 env->regs[3] = frame_addr + offsetof(typeof(*frame), info); 4791 env->regs[4] = frame_addr + offsetof(typeof(*frame), uc); 4792 return; 4793 4794 give_sigsegv: 4795 force_sigsegv(sig); 4796 } 4797 4798 static int 4799 restore_sigregs(CPUS390XState *env, target_sigregs *sc) 4800 { 4801 int err = 0; 4802 int i; 4803 4804 for (i = 0; i < 16; i++) { 4805 __get_user(env->regs[i], &sc->regs.gprs[i]); 4806 } 4807 4808 __get_user(env->psw.mask, &sc->regs.psw.mask); 4809 trace_user_s390x_restore_sigregs(env, (unsigned long long)sc->regs.psw.addr, 4810 (unsigned long long)env->psw.addr); 4811 __get_user(env->psw.addr, &sc->regs.psw.addr); 4812 /* FIXME: 31-bit -> | PSW_ADDR_AMODE */ 4813 4814 for (i = 0; i < 16; i++) { 4815 __get_user(env->aregs[i], &sc->regs.acrs[i]); 4816 } 4817 for (i = 0; i < 16; i++) { 4818 __get_user(get_freg(env, i)->ll, &sc->fpregs.fprs[i]); 4819 } 4820 4821 return err; 4822 } 4823 4824 long do_sigreturn(CPUS390XState *env) 4825 { 4826 sigframe *frame; 4827 abi_ulong frame_addr = env->regs[15]; 4828 target_sigset_t target_set; 4829 sigset_t set; 4830 4831 trace_user_do_sigreturn(env, frame_addr); 4832 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 4833 goto badframe; 4834 } 4835 __get_user(target_set.sig[0], &frame->sc.oldmask[0]); 4836 4837 target_to_host_sigset_internal(&set, &target_set); 4838 set_sigmask(&set); /* ~_BLOCKABLE? */ 4839 4840 if (restore_sigregs(env, &frame->sregs)) { 4841 goto badframe; 4842 } 4843 4844 unlock_user_struct(frame, frame_addr, 0); 4845 return -TARGET_QEMU_ESIGRETURN; 4846 4847 badframe: 4848 force_sig(TARGET_SIGSEGV); 4849 return -TARGET_QEMU_ESIGRETURN; 4850 } 4851 4852 long do_rt_sigreturn(CPUS390XState *env) 4853 { 4854 rt_sigframe *frame; 4855 abi_ulong frame_addr = env->regs[15]; 4856 sigset_t set; 4857 4858 trace_user_do_rt_sigreturn(env, frame_addr); 4859 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 4860 goto badframe; 4861 } 4862 target_to_host_sigset(&set, &frame->uc.tuc_sigmask); 4863 4864 set_sigmask(&set); /* ~_BLOCKABLE? */ 4865 4866 if (restore_sigregs(env, &frame->uc.tuc_mcontext)) { 4867 goto badframe; 4868 } 4869 4870 if (do_sigaltstack(frame_addr + offsetof(rt_sigframe, uc.tuc_stack), 0, 4871 get_sp_from_cpustate(env)) == -EFAULT) { 4872 goto badframe; 4873 } 4874 unlock_user_struct(frame, frame_addr, 0); 4875 return -TARGET_QEMU_ESIGRETURN; 4876 4877 badframe: 4878 unlock_user_struct(frame, frame_addr, 0); 4879 force_sig(TARGET_SIGSEGV); 4880 return -TARGET_QEMU_ESIGRETURN; 4881 } 4882 4883 #elif defined(TARGET_PPC) 4884 4885 /* Size of dummy stack frame allocated when calling signal handler. 4886 See arch/powerpc/include/asm/ptrace.h. */ 4887 #if defined(TARGET_PPC64) 4888 #define SIGNAL_FRAMESIZE 128 4889 #else 4890 #define SIGNAL_FRAMESIZE 64 4891 #endif 4892 4893 /* See arch/powerpc/include/asm/ucontext.h. Only used for 32-bit PPC; 4894 on 64-bit PPC, sigcontext and mcontext are one and the same. */ 4895 struct target_mcontext { 4896 target_ulong mc_gregs[48]; 4897 /* Includes fpscr. */ 4898 uint64_t mc_fregs[33]; 4899 #if defined(TARGET_PPC64) 4900 /* Pointer to the vector regs */ 4901 target_ulong v_regs; 4902 #else 4903 target_ulong mc_pad[2]; 4904 #endif 4905 /* We need to handle Altivec and SPE at the same time, which no 4906 kernel needs to do. Fortunately, the kernel defines this bit to 4907 be Altivec-register-large all the time, rather than trying to 4908 twiddle it based on the specific platform. */ 4909 union { 4910 /* SPE vector registers. One extra for SPEFSCR. */ 4911 uint32_t spe[33]; 4912 /* Altivec vector registers. The packing of VSCR and VRSAVE 4913 varies depending on whether we're PPC64 or not: PPC64 splits 4914 them apart; PPC32 stuffs them together. 4915 We also need to account for the VSX registers on PPC64 4916 */ 4917 #if defined(TARGET_PPC64) 4918 #define QEMU_NVRREG (34 + 16) 4919 /* On ppc64, this mcontext structure is naturally *unaligned*, 4920 * or rather it is aligned on a 8 bytes boundary but not on 4921 * a 16 bytes one. This pad fixes it up. This is also why the 4922 * vector regs are referenced by the v_regs pointer above so 4923 * any amount of padding can be added here 4924 */ 4925 target_ulong pad; 4926 #else 4927 /* On ppc32, we are already aligned to 16 bytes */ 4928 #define QEMU_NVRREG 33 4929 #endif 4930 /* We cannot use ppc_avr_t here as we do *not* want the implied 4931 * 16-bytes alignment that would result from it. This would have 4932 * the effect of making the whole struct target_mcontext aligned 4933 * which breaks the layout of struct target_ucontext on ppc64. 4934 */ 4935 uint64_t altivec[QEMU_NVRREG][2]; 4936 #undef QEMU_NVRREG 4937 } mc_vregs; 4938 }; 4939 4940 /* See arch/powerpc/include/asm/sigcontext.h. */ 4941 struct target_sigcontext { 4942 target_ulong _unused[4]; 4943 int32_t signal; 4944 #if defined(TARGET_PPC64) 4945 int32_t pad0; 4946 #endif 4947 target_ulong handler; 4948 target_ulong oldmask; 4949 target_ulong regs; /* struct pt_regs __user * */ 4950 #if defined(TARGET_PPC64) 4951 struct target_mcontext mcontext; 4952 #endif 4953 }; 4954 4955 /* Indices for target_mcontext.mc_gregs, below. 4956 See arch/powerpc/include/asm/ptrace.h for details. */ 4957 enum { 4958 TARGET_PT_R0 = 0, 4959 TARGET_PT_R1 = 1, 4960 TARGET_PT_R2 = 2, 4961 TARGET_PT_R3 = 3, 4962 TARGET_PT_R4 = 4, 4963 TARGET_PT_R5 = 5, 4964 TARGET_PT_R6 = 6, 4965 TARGET_PT_R7 = 7, 4966 TARGET_PT_R8 = 8, 4967 TARGET_PT_R9 = 9, 4968 TARGET_PT_R10 = 10, 4969 TARGET_PT_R11 = 11, 4970 TARGET_PT_R12 = 12, 4971 TARGET_PT_R13 = 13, 4972 TARGET_PT_R14 = 14, 4973 TARGET_PT_R15 = 15, 4974 TARGET_PT_R16 = 16, 4975 TARGET_PT_R17 = 17, 4976 TARGET_PT_R18 = 18, 4977 TARGET_PT_R19 = 19, 4978 TARGET_PT_R20 = 20, 4979 TARGET_PT_R21 = 21, 4980 TARGET_PT_R22 = 22, 4981 TARGET_PT_R23 = 23, 4982 TARGET_PT_R24 = 24, 4983 TARGET_PT_R25 = 25, 4984 TARGET_PT_R26 = 26, 4985 TARGET_PT_R27 = 27, 4986 TARGET_PT_R28 = 28, 4987 TARGET_PT_R29 = 29, 4988 TARGET_PT_R30 = 30, 4989 TARGET_PT_R31 = 31, 4990 TARGET_PT_NIP = 32, 4991 TARGET_PT_MSR = 33, 4992 TARGET_PT_ORIG_R3 = 34, 4993 TARGET_PT_CTR = 35, 4994 TARGET_PT_LNK = 36, 4995 TARGET_PT_XER = 37, 4996 TARGET_PT_CCR = 38, 4997 /* Yes, there are two registers with #39. One is 64-bit only. */ 4998 TARGET_PT_MQ = 39, 4999 TARGET_PT_SOFTE = 39, 5000 TARGET_PT_TRAP = 40, 5001 TARGET_PT_DAR = 41, 5002 TARGET_PT_DSISR = 42, 5003 TARGET_PT_RESULT = 43, 5004 TARGET_PT_REGS_COUNT = 44 5005 }; 5006 5007 5008 struct target_ucontext { 5009 target_ulong tuc_flags; 5010 target_ulong tuc_link; /* struct ucontext __user * */ 5011 struct target_sigaltstack tuc_stack; 5012 #if !defined(TARGET_PPC64) 5013 int32_t tuc_pad[7]; 5014 target_ulong tuc_regs; /* struct mcontext __user * 5015 points to uc_mcontext field */ 5016 #endif 5017 target_sigset_t tuc_sigmask; 5018 #if defined(TARGET_PPC64) 5019 target_sigset_t unused[15]; /* Allow for uc_sigmask growth */ 5020 struct target_sigcontext tuc_sigcontext; 5021 #else 5022 int32_t tuc_maskext[30]; 5023 int32_t tuc_pad2[3]; 5024 struct target_mcontext tuc_mcontext; 5025 #endif 5026 }; 5027 5028 /* See arch/powerpc/kernel/signal_32.c. */ 5029 struct target_sigframe { 5030 struct target_sigcontext sctx; 5031 struct target_mcontext mctx; 5032 int32_t abigap[56]; 5033 }; 5034 5035 #if defined(TARGET_PPC64) 5036 5037 #define TARGET_TRAMP_SIZE 6 5038 5039 struct target_rt_sigframe { 5040 /* sys_rt_sigreturn requires the ucontext be the first field */ 5041 struct target_ucontext uc; 5042 target_ulong _unused[2]; 5043 uint32_t trampoline[TARGET_TRAMP_SIZE]; 5044 target_ulong pinfo; /* struct siginfo __user * */ 5045 target_ulong puc; /* void __user * */ 5046 struct target_siginfo info; 5047 /* 64 bit ABI allows for 288 bytes below sp before decrementing it. */ 5048 char abigap[288]; 5049 } __attribute__((aligned(16))); 5050 5051 #else 5052 5053 struct target_rt_sigframe { 5054 struct target_siginfo info; 5055 struct target_ucontext uc; 5056 int32_t abigap[56]; 5057 }; 5058 5059 #endif 5060 5061 #if defined(TARGET_PPC64) 5062 5063 struct target_func_ptr { 5064 target_ulong entry; 5065 target_ulong toc; 5066 }; 5067 5068 #endif 5069 5070 /* We use the mc_pad field for the signal return trampoline. */ 5071 #define tramp mc_pad 5072 5073 /* See arch/powerpc/kernel/signal.c. */ 5074 static target_ulong get_sigframe(struct target_sigaction *ka, 5075 CPUPPCState *env, 5076 int frame_size) 5077 { 5078 target_ulong oldsp; 5079 5080 oldsp = env->gpr[1]; 5081 5082 if ((ka->sa_flags & TARGET_SA_ONSTACK) && 5083 (sas_ss_flags(oldsp) == 0)) { 5084 oldsp = (target_sigaltstack_used.ss_sp 5085 + target_sigaltstack_used.ss_size); 5086 } 5087 5088 return (oldsp - frame_size) & ~0xFUL; 5089 } 5090 5091 #if ((defined(TARGET_WORDS_BIGENDIAN) && defined(HOST_WORDS_BIGENDIAN)) || \ 5092 (!defined(HOST_WORDS_BIGENDIAN) && !defined(TARGET_WORDS_BIGENDIAN))) 5093 #define PPC_VEC_HI 0 5094 #define PPC_VEC_LO 1 5095 #else 5096 #define PPC_VEC_HI 1 5097 #define PPC_VEC_LO 0 5098 #endif 5099 5100 5101 static void save_user_regs(CPUPPCState *env, struct target_mcontext *frame) 5102 { 5103 target_ulong msr = env->msr; 5104 int i; 5105 target_ulong ccr = 0; 5106 5107 /* In general, the kernel attempts to be intelligent about what it 5108 needs to save for Altivec/FP/SPE registers. We don't care that 5109 much, so we just go ahead and save everything. */ 5110 5111 /* Save general registers. */ 5112 for (i = 0; i < ARRAY_SIZE(env->gpr); i++) { 5113 __put_user(env->gpr[i], &frame->mc_gregs[i]); 5114 } 5115 __put_user(env->nip, &frame->mc_gregs[TARGET_PT_NIP]); 5116 __put_user(env->ctr, &frame->mc_gregs[TARGET_PT_CTR]); 5117 __put_user(env->lr, &frame->mc_gregs[TARGET_PT_LNK]); 5118 __put_user(env->xer, &frame->mc_gregs[TARGET_PT_XER]); 5119 5120 for (i = 0; i < ARRAY_SIZE(env->crf); i++) { 5121 ccr |= env->crf[i] << (32 - ((i + 1) * 4)); 5122 } 5123 __put_user(ccr, &frame->mc_gregs[TARGET_PT_CCR]); 5124 5125 /* Save Altivec registers if necessary. */ 5126 if (env->insns_flags & PPC_ALTIVEC) { 5127 uint32_t *vrsave; 5128 for (i = 0; i < ARRAY_SIZE(env->avr); i++) { 5129 ppc_avr_t *avr = &env->avr[i]; 5130 ppc_avr_t *vreg = (ppc_avr_t *)&frame->mc_vregs.altivec[i]; 5131 5132 __put_user(avr->u64[PPC_VEC_HI], &vreg->u64[0]); 5133 __put_user(avr->u64[PPC_VEC_LO], &vreg->u64[1]); 5134 } 5135 /* Set MSR_VR in the saved MSR value to indicate that 5136 frame->mc_vregs contains valid data. */ 5137 msr |= MSR_VR; 5138 #if defined(TARGET_PPC64) 5139 vrsave = (uint32_t *)&frame->mc_vregs.altivec[33]; 5140 /* 64-bit needs to put a pointer to the vectors in the frame */ 5141 __put_user(h2g(frame->mc_vregs.altivec), &frame->v_regs); 5142 #else 5143 vrsave = (uint32_t *)&frame->mc_vregs.altivec[32]; 5144 #endif 5145 __put_user((uint32_t)env->spr[SPR_VRSAVE], vrsave); 5146 } 5147 5148 /* Save VSX second halves */ 5149 if (env->insns_flags2 & PPC2_VSX) { 5150 uint64_t *vsregs = (uint64_t *)&frame->mc_vregs.altivec[34]; 5151 for (i = 0; i < ARRAY_SIZE(env->vsr); i++) { 5152 __put_user(env->vsr[i], &vsregs[i]); 5153 } 5154 } 5155 5156 /* Save floating point registers. */ 5157 if (env->insns_flags & PPC_FLOAT) { 5158 for (i = 0; i < ARRAY_SIZE(env->fpr); i++) { 5159 __put_user(env->fpr[i], &frame->mc_fregs[i]); 5160 } 5161 __put_user((uint64_t) env->fpscr, &frame->mc_fregs[32]); 5162 } 5163 5164 /* Save SPE registers. The kernel only saves the high half. */ 5165 if (env->insns_flags & PPC_SPE) { 5166 #if defined(TARGET_PPC64) 5167 for (i = 0; i < ARRAY_SIZE(env->gpr); i++) { 5168 __put_user(env->gpr[i] >> 32, &frame->mc_vregs.spe[i]); 5169 } 5170 #else 5171 for (i = 0; i < ARRAY_SIZE(env->gprh); i++) { 5172 __put_user(env->gprh[i], &frame->mc_vregs.spe[i]); 5173 } 5174 #endif 5175 /* Set MSR_SPE in the saved MSR value to indicate that 5176 frame->mc_vregs contains valid data. */ 5177 msr |= MSR_SPE; 5178 __put_user(env->spe_fscr, &frame->mc_vregs.spe[32]); 5179 } 5180 5181 /* Store MSR. */ 5182 __put_user(msr, &frame->mc_gregs[TARGET_PT_MSR]); 5183 } 5184 5185 static void encode_trampoline(int sigret, uint32_t *tramp) 5186 { 5187 /* Set up the sigreturn trampoline: li r0,sigret; sc. */ 5188 if (sigret) { 5189 __put_user(0x38000000 | sigret, &tramp[0]); 5190 __put_user(0x44000002, &tramp[1]); 5191 } 5192 } 5193 5194 static void restore_user_regs(CPUPPCState *env, 5195 struct target_mcontext *frame, int sig) 5196 { 5197 target_ulong save_r2 = 0; 5198 target_ulong msr; 5199 target_ulong ccr; 5200 5201 int i; 5202 5203 if (!sig) { 5204 save_r2 = env->gpr[2]; 5205 } 5206 5207 /* Restore general registers. */ 5208 for (i = 0; i < ARRAY_SIZE(env->gpr); i++) { 5209 __get_user(env->gpr[i], &frame->mc_gregs[i]); 5210 } 5211 __get_user(env->nip, &frame->mc_gregs[TARGET_PT_NIP]); 5212 __get_user(env->ctr, &frame->mc_gregs[TARGET_PT_CTR]); 5213 __get_user(env->lr, &frame->mc_gregs[TARGET_PT_LNK]); 5214 __get_user(env->xer, &frame->mc_gregs[TARGET_PT_XER]); 5215 __get_user(ccr, &frame->mc_gregs[TARGET_PT_CCR]); 5216 5217 for (i = 0; i < ARRAY_SIZE(env->crf); i++) { 5218 env->crf[i] = (ccr >> (32 - ((i + 1) * 4))) & 0xf; 5219 } 5220 5221 if (!sig) { 5222 env->gpr[2] = save_r2; 5223 } 5224 /* Restore MSR. */ 5225 __get_user(msr, &frame->mc_gregs[TARGET_PT_MSR]); 5226 5227 /* If doing signal return, restore the previous little-endian mode. */ 5228 if (sig) 5229 env->msr = (env->msr & ~(1ull << MSR_LE)) | (msr & (1ull << MSR_LE)); 5230 5231 /* Restore Altivec registers if necessary. */ 5232 if (env->insns_flags & PPC_ALTIVEC) { 5233 ppc_avr_t *v_regs; 5234 uint32_t *vrsave; 5235 #if defined(TARGET_PPC64) 5236 uint64_t v_addr; 5237 /* 64-bit needs to recover the pointer to the vectors from the frame */ 5238 __get_user(v_addr, &frame->v_regs); 5239 v_regs = g2h(v_addr); 5240 #else 5241 v_regs = (ppc_avr_t *)frame->mc_vregs.altivec; 5242 #endif 5243 for (i = 0; i < ARRAY_SIZE(env->avr); i++) { 5244 ppc_avr_t *avr = &env->avr[i]; 5245 ppc_avr_t *vreg = &v_regs[i]; 5246 5247 __get_user(avr->u64[PPC_VEC_HI], &vreg->u64[0]); 5248 __get_user(avr->u64[PPC_VEC_LO], &vreg->u64[1]); 5249 } 5250 /* Set MSR_VEC in the saved MSR value to indicate that 5251 frame->mc_vregs contains valid data. */ 5252 #if defined(TARGET_PPC64) 5253 vrsave = (uint32_t *)&v_regs[33]; 5254 #else 5255 vrsave = (uint32_t *)&v_regs[32]; 5256 #endif 5257 __get_user(env->spr[SPR_VRSAVE], vrsave); 5258 } 5259 5260 /* Restore VSX second halves */ 5261 if (env->insns_flags2 & PPC2_VSX) { 5262 uint64_t *vsregs = (uint64_t *)&frame->mc_vregs.altivec[34]; 5263 for (i = 0; i < ARRAY_SIZE(env->vsr); i++) { 5264 __get_user(env->vsr[i], &vsregs[i]); 5265 } 5266 } 5267 5268 /* Restore floating point registers. */ 5269 if (env->insns_flags & PPC_FLOAT) { 5270 uint64_t fpscr; 5271 for (i = 0; i < ARRAY_SIZE(env->fpr); i++) { 5272 __get_user(env->fpr[i], &frame->mc_fregs[i]); 5273 } 5274 __get_user(fpscr, &frame->mc_fregs[32]); 5275 env->fpscr = (uint32_t) fpscr; 5276 } 5277 5278 /* Save SPE registers. The kernel only saves the high half. */ 5279 if (env->insns_flags & PPC_SPE) { 5280 #if defined(TARGET_PPC64) 5281 for (i = 0; i < ARRAY_SIZE(env->gpr); i++) { 5282 uint32_t hi; 5283 5284 __get_user(hi, &frame->mc_vregs.spe[i]); 5285 env->gpr[i] = ((uint64_t)hi << 32) | ((uint32_t) env->gpr[i]); 5286 } 5287 #else 5288 for (i = 0; i < ARRAY_SIZE(env->gprh); i++) { 5289 __get_user(env->gprh[i], &frame->mc_vregs.spe[i]); 5290 } 5291 #endif 5292 __get_user(env->spe_fscr, &frame->mc_vregs.spe[32]); 5293 } 5294 } 5295 5296 #if !defined(TARGET_PPC64) 5297 static void setup_frame(int sig, struct target_sigaction *ka, 5298 target_sigset_t *set, CPUPPCState *env) 5299 { 5300 struct target_sigframe *frame; 5301 struct target_sigcontext *sc; 5302 target_ulong frame_addr, newsp; 5303 int err = 0; 5304 5305 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 5306 trace_user_setup_frame(env, frame_addr); 5307 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 1)) 5308 goto sigsegv; 5309 sc = &frame->sctx; 5310 5311 __put_user(ka->_sa_handler, &sc->handler); 5312 __put_user(set->sig[0], &sc->oldmask); 5313 __put_user(set->sig[1], &sc->_unused[3]); 5314 __put_user(h2g(&frame->mctx), &sc->regs); 5315 __put_user(sig, &sc->signal); 5316 5317 /* Save user regs. */ 5318 save_user_regs(env, &frame->mctx); 5319 5320 /* Construct the trampoline code on the stack. */ 5321 encode_trampoline(TARGET_NR_sigreturn, (uint32_t *)&frame->mctx.tramp); 5322 5323 /* The kernel checks for the presence of a VDSO here. We don't 5324 emulate a vdso, so use a sigreturn system call. */ 5325 env->lr = (target_ulong) h2g(frame->mctx.tramp); 5326 5327 /* Turn off all fp exceptions. */ 5328 env->fpscr = 0; 5329 5330 /* Create a stack frame for the caller of the handler. */ 5331 newsp = frame_addr - SIGNAL_FRAMESIZE; 5332 err |= put_user(env->gpr[1], newsp, target_ulong); 5333 5334 if (err) 5335 goto sigsegv; 5336 5337 /* Set up registers for signal handler. */ 5338 env->gpr[1] = newsp; 5339 env->gpr[3] = sig; 5340 env->gpr[4] = frame_addr + offsetof(struct target_sigframe, sctx); 5341 5342 env->nip = (target_ulong) ka->_sa_handler; 5343 5344 /* Signal handlers are entered in big-endian mode. */ 5345 env->msr &= ~(1ull << MSR_LE); 5346 5347 unlock_user_struct(frame, frame_addr, 1); 5348 return; 5349 5350 sigsegv: 5351 unlock_user_struct(frame, frame_addr, 1); 5352 force_sigsegv(sig); 5353 } 5354 #endif /* !defined(TARGET_PPC64) */ 5355 5356 static void setup_rt_frame(int sig, struct target_sigaction *ka, 5357 target_siginfo_t *info, 5358 target_sigset_t *set, CPUPPCState *env) 5359 { 5360 struct target_rt_sigframe *rt_sf; 5361 uint32_t *trampptr = 0; 5362 struct target_mcontext *mctx = 0; 5363 target_ulong rt_sf_addr, newsp = 0; 5364 int i, err = 0; 5365 #if defined(TARGET_PPC64) 5366 struct target_sigcontext *sc = 0; 5367 struct image_info *image = ((TaskState *)thread_cpu->opaque)->info; 5368 #endif 5369 5370 rt_sf_addr = get_sigframe(ka, env, sizeof(*rt_sf)); 5371 if (!lock_user_struct(VERIFY_WRITE, rt_sf, rt_sf_addr, 1)) 5372 goto sigsegv; 5373 5374 tswap_siginfo(&rt_sf->info, info); 5375 5376 __put_user(0, &rt_sf->uc.tuc_flags); 5377 __put_user(0, &rt_sf->uc.tuc_link); 5378 __put_user((target_ulong)target_sigaltstack_used.ss_sp, 5379 &rt_sf->uc.tuc_stack.ss_sp); 5380 __put_user(sas_ss_flags(env->gpr[1]), 5381 &rt_sf->uc.tuc_stack.ss_flags); 5382 __put_user(target_sigaltstack_used.ss_size, 5383 &rt_sf->uc.tuc_stack.ss_size); 5384 #if !defined(TARGET_PPC64) 5385 __put_user(h2g (&rt_sf->uc.tuc_mcontext), 5386 &rt_sf->uc.tuc_regs); 5387 #endif 5388 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 5389 __put_user(set->sig[i], &rt_sf->uc.tuc_sigmask.sig[i]); 5390 } 5391 5392 #if defined(TARGET_PPC64) 5393 mctx = &rt_sf->uc.tuc_sigcontext.mcontext; 5394 trampptr = &rt_sf->trampoline[0]; 5395 5396 sc = &rt_sf->uc.tuc_sigcontext; 5397 __put_user(h2g(mctx), &sc->regs); 5398 __put_user(sig, &sc->signal); 5399 #else 5400 mctx = &rt_sf->uc.tuc_mcontext; 5401 trampptr = (uint32_t *)&rt_sf->uc.tuc_mcontext.tramp; 5402 #endif 5403 5404 save_user_regs(env, mctx); 5405 encode_trampoline(TARGET_NR_rt_sigreturn, trampptr); 5406 5407 /* The kernel checks for the presence of a VDSO here. We don't 5408 emulate a vdso, so use a sigreturn system call. */ 5409 env->lr = (target_ulong) h2g(trampptr); 5410 5411 /* Turn off all fp exceptions. */ 5412 env->fpscr = 0; 5413 5414 /* Create a stack frame for the caller of the handler. */ 5415 newsp = rt_sf_addr - (SIGNAL_FRAMESIZE + 16); 5416 err |= put_user(env->gpr[1], newsp, target_ulong); 5417 5418 if (err) 5419 goto sigsegv; 5420 5421 /* Set up registers for signal handler. */ 5422 env->gpr[1] = newsp; 5423 env->gpr[3] = (target_ulong) sig; 5424 env->gpr[4] = (target_ulong) h2g(&rt_sf->info); 5425 env->gpr[5] = (target_ulong) h2g(&rt_sf->uc); 5426 env->gpr[6] = (target_ulong) h2g(rt_sf); 5427 5428 #if defined(TARGET_PPC64) 5429 if (get_ppc64_abi(image) < 2) { 5430 /* ELFv1 PPC64 function pointers are pointers to OPD entries. */ 5431 struct target_func_ptr *handler = 5432 (struct target_func_ptr *)g2h(ka->_sa_handler); 5433 env->nip = tswapl(handler->entry); 5434 env->gpr[2] = tswapl(handler->toc); 5435 } else { 5436 /* ELFv2 PPC64 function pointers are entry points, but R12 5437 * must also be set */ 5438 env->nip = tswapl((target_ulong) ka->_sa_handler); 5439 env->gpr[12] = env->nip; 5440 } 5441 #else 5442 env->nip = (target_ulong) ka->_sa_handler; 5443 #endif 5444 5445 /* Signal handlers are entered in big-endian mode. */ 5446 env->msr &= ~(1ull << MSR_LE); 5447 5448 unlock_user_struct(rt_sf, rt_sf_addr, 1); 5449 return; 5450 5451 sigsegv: 5452 unlock_user_struct(rt_sf, rt_sf_addr, 1); 5453 force_sigsegv(sig); 5454 5455 } 5456 5457 #if !defined(TARGET_PPC64) 5458 long do_sigreturn(CPUPPCState *env) 5459 { 5460 struct target_sigcontext *sc = NULL; 5461 struct target_mcontext *sr = NULL; 5462 target_ulong sr_addr = 0, sc_addr; 5463 sigset_t blocked; 5464 target_sigset_t set; 5465 5466 sc_addr = env->gpr[1] + SIGNAL_FRAMESIZE; 5467 if (!lock_user_struct(VERIFY_READ, sc, sc_addr, 1)) 5468 goto sigsegv; 5469 5470 #if defined(TARGET_PPC64) 5471 set.sig[0] = sc->oldmask + ((uint64_t)(sc->_unused[3]) << 32); 5472 #else 5473 __get_user(set.sig[0], &sc->oldmask); 5474 __get_user(set.sig[1], &sc->_unused[3]); 5475 #endif 5476 target_to_host_sigset_internal(&blocked, &set); 5477 set_sigmask(&blocked); 5478 5479 __get_user(sr_addr, &sc->regs); 5480 if (!lock_user_struct(VERIFY_READ, sr, sr_addr, 1)) 5481 goto sigsegv; 5482 restore_user_regs(env, sr, 1); 5483 5484 unlock_user_struct(sr, sr_addr, 1); 5485 unlock_user_struct(sc, sc_addr, 1); 5486 return -TARGET_QEMU_ESIGRETURN; 5487 5488 sigsegv: 5489 unlock_user_struct(sr, sr_addr, 1); 5490 unlock_user_struct(sc, sc_addr, 1); 5491 force_sig(TARGET_SIGSEGV); 5492 return -TARGET_QEMU_ESIGRETURN; 5493 } 5494 #endif /* !defined(TARGET_PPC64) */ 5495 5496 /* See arch/powerpc/kernel/signal_32.c. */ 5497 static int do_setcontext(struct target_ucontext *ucp, CPUPPCState *env, int sig) 5498 { 5499 struct target_mcontext *mcp; 5500 target_ulong mcp_addr; 5501 sigset_t blocked; 5502 target_sigset_t set; 5503 5504 if (copy_from_user(&set, h2g(ucp) + offsetof(struct target_ucontext, tuc_sigmask), 5505 sizeof (set))) 5506 return 1; 5507 5508 #if defined(TARGET_PPC64) 5509 mcp_addr = h2g(ucp) + 5510 offsetof(struct target_ucontext, tuc_sigcontext.mcontext); 5511 #else 5512 __get_user(mcp_addr, &ucp->tuc_regs); 5513 #endif 5514 5515 if (!lock_user_struct(VERIFY_READ, mcp, mcp_addr, 1)) 5516 return 1; 5517 5518 target_to_host_sigset_internal(&blocked, &set); 5519 set_sigmask(&blocked); 5520 restore_user_regs(env, mcp, sig); 5521 5522 unlock_user_struct(mcp, mcp_addr, 1); 5523 return 0; 5524 } 5525 5526 long do_rt_sigreturn(CPUPPCState *env) 5527 { 5528 struct target_rt_sigframe *rt_sf = NULL; 5529 target_ulong rt_sf_addr; 5530 5531 rt_sf_addr = env->gpr[1] + SIGNAL_FRAMESIZE + 16; 5532 if (!lock_user_struct(VERIFY_READ, rt_sf, rt_sf_addr, 1)) 5533 goto sigsegv; 5534 5535 if (do_setcontext(&rt_sf->uc, env, 1)) 5536 goto sigsegv; 5537 5538 do_sigaltstack(rt_sf_addr 5539 + offsetof(struct target_rt_sigframe, uc.tuc_stack), 5540 0, env->gpr[1]); 5541 5542 unlock_user_struct(rt_sf, rt_sf_addr, 1); 5543 return -TARGET_QEMU_ESIGRETURN; 5544 5545 sigsegv: 5546 unlock_user_struct(rt_sf, rt_sf_addr, 1); 5547 force_sig(TARGET_SIGSEGV); 5548 return -TARGET_QEMU_ESIGRETURN; 5549 } 5550 5551 #elif defined(TARGET_M68K) 5552 5553 struct target_sigcontext { 5554 abi_ulong sc_mask; 5555 abi_ulong sc_usp; 5556 abi_ulong sc_d0; 5557 abi_ulong sc_d1; 5558 abi_ulong sc_a0; 5559 abi_ulong sc_a1; 5560 unsigned short sc_sr; 5561 abi_ulong sc_pc; 5562 }; 5563 5564 struct target_sigframe 5565 { 5566 abi_ulong pretcode; 5567 int sig; 5568 int code; 5569 abi_ulong psc; 5570 char retcode[8]; 5571 abi_ulong extramask[TARGET_NSIG_WORDS-1]; 5572 struct target_sigcontext sc; 5573 }; 5574 5575 typedef int target_greg_t; 5576 #define TARGET_NGREG 18 5577 typedef target_greg_t target_gregset_t[TARGET_NGREG]; 5578 5579 typedef struct target_fpregset { 5580 int f_fpcntl[3]; 5581 int f_fpregs[8*3]; 5582 } target_fpregset_t; 5583 5584 struct target_mcontext { 5585 int version; 5586 target_gregset_t gregs; 5587 target_fpregset_t fpregs; 5588 }; 5589 5590 #define TARGET_MCONTEXT_VERSION 2 5591 5592 struct target_ucontext { 5593 abi_ulong tuc_flags; 5594 abi_ulong tuc_link; 5595 target_stack_t tuc_stack; 5596 struct target_mcontext tuc_mcontext; 5597 abi_long tuc_filler[80]; 5598 target_sigset_t tuc_sigmask; 5599 }; 5600 5601 struct target_rt_sigframe 5602 { 5603 abi_ulong pretcode; 5604 int sig; 5605 abi_ulong pinfo; 5606 abi_ulong puc; 5607 char retcode[8]; 5608 struct target_siginfo info; 5609 struct target_ucontext uc; 5610 }; 5611 5612 static void setup_sigcontext(struct target_sigcontext *sc, CPUM68KState *env, 5613 abi_ulong mask) 5614 { 5615 __put_user(mask, &sc->sc_mask); 5616 __put_user(env->aregs[7], &sc->sc_usp); 5617 __put_user(env->dregs[0], &sc->sc_d0); 5618 __put_user(env->dregs[1], &sc->sc_d1); 5619 __put_user(env->aregs[0], &sc->sc_a0); 5620 __put_user(env->aregs[1], &sc->sc_a1); 5621 __put_user(env->sr, &sc->sc_sr); 5622 __put_user(env->pc, &sc->sc_pc); 5623 } 5624 5625 static void 5626 restore_sigcontext(CPUM68KState *env, struct target_sigcontext *sc) 5627 { 5628 int temp; 5629 5630 __get_user(env->aregs[7], &sc->sc_usp); 5631 __get_user(env->dregs[0], &sc->sc_d0); 5632 __get_user(env->dregs[1], &sc->sc_d1); 5633 __get_user(env->aregs[0], &sc->sc_a0); 5634 __get_user(env->aregs[1], &sc->sc_a1); 5635 __get_user(env->pc, &sc->sc_pc); 5636 __get_user(temp, &sc->sc_sr); 5637 env->sr = (env->sr & 0xff00) | (temp & 0xff); 5638 } 5639 5640 /* 5641 * Determine which stack to use.. 5642 */ 5643 static inline abi_ulong 5644 get_sigframe(struct target_sigaction *ka, CPUM68KState *regs, 5645 size_t frame_size) 5646 { 5647 unsigned long sp; 5648 5649 sp = regs->aregs[7]; 5650 5651 /* This is the X/Open sanctioned signal stack switching. */ 5652 if ((ka->sa_flags & TARGET_SA_ONSTACK) && (sas_ss_flags (sp) == 0)) { 5653 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 5654 } 5655 5656 return ((sp - frame_size) & -8UL); 5657 } 5658 5659 static void setup_frame(int sig, struct target_sigaction *ka, 5660 target_sigset_t *set, CPUM68KState *env) 5661 { 5662 struct target_sigframe *frame; 5663 abi_ulong frame_addr; 5664 abi_ulong retcode_addr; 5665 abi_ulong sc_addr; 5666 int i; 5667 5668 frame_addr = get_sigframe(ka, env, sizeof *frame); 5669 trace_user_setup_frame(env, frame_addr); 5670 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 5671 goto give_sigsegv; 5672 } 5673 5674 __put_user(sig, &frame->sig); 5675 5676 sc_addr = frame_addr + offsetof(struct target_sigframe, sc); 5677 __put_user(sc_addr, &frame->psc); 5678 5679 setup_sigcontext(&frame->sc, env, set->sig[0]); 5680 5681 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 5682 __put_user(set->sig[i], &frame->extramask[i - 1]); 5683 } 5684 5685 /* Set up to return from userspace. */ 5686 5687 retcode_addr = frame_addr + offsetof(struct target_sigframe, retcode); 5688 __put_user(retcode_addr, &frame->pretcode); 5689 5690 /* moveq #,d0; trap #0 */ 5691 5692 __put_user(0x70004e40 + (TARGET_NR_sigreturn << 16), 5693 (uint32_t *)(frame->retcode)); 5694 5695 /* Set up to return from userspace */ 5696 5697 env->aregs[7] = frame_addr; 5698 env->pc = ka->_sa_handler; 5699 5700 unlock_user_struct(frame, frame_addr, 1); 5701 return; 5702 5703 give_sigsegv: 5704 force_sigsegv(sig); 5705 } 5706 5707 static inline int target_rt_setup_ucontext(struct target_ucontext *uc, 5708 CPUM68KState *env) 5709 { 5710 target_greg_t *gregs = uc->tuc_mcontext.gregs; 5711 uint32_t sr = cpu_m68k_get_ccr(env); 5712 5713 __put_user(TARGET_MCONTEXT_VERSION, &uc->tuc_mcontext.version); 5714 __put_user(env->dregs[0], &gregs[0]); 5715 __put_user(env->dregs[1], &gregs[1]); 5716 __put_user(env->dregs[2], &gregs[2]); 5717 __put_user(env->dregs[3], &gregs[3]); 5718 __put_user(env->dregs[4], &gregs[4]); 5719 __put_user(env->dregs[5], &gregs[5]); 5720 __put_user(env->dregs[6], &gregs[6]); 5721 __put_user(env->dregs[7], &gregs[7]); 5722 __put_user(env->aregs[0], &gregs[8]); 5723 __put_user(env->aregs[1], &gregs[9]); 5724 __put_user(env->aregs[2], &gregs[10]); 5725 __put_user(env->aregs[3], &gregs[11]); 5726 __put_user(env->aregs[4], &gregs[12]); 5727 __put_user(env->aregs[5], &gregs[13]); 5728 __put_user(env->aregs[6], &gregs[14]); 5729 __put_user(env->aregs[7], &gregs[15]); 5730 __put_user(env->pc, &gregs[16]); 5731 __put_user(sr, &gregs[17]); 5732 5733 return 0; 5734 } 5735 5736 static inline int target_rt_restore_ucontext(CPUM68KState *env, 5737 struct target_ucontext *uc) 5738 { 5739 int temp; 5740 target_greg_t *gregs = uc->tuc_mcontext.gregs; 5741 5742 __get_user(temp, &uc->tuc_mcontext.version); 5743 if (temp != TARGET_MCONTEXT_VERSION) 5744 goto badframe; 5745 5746 /* restore passed registers */ 5747 __get_user(env->dregs[0], &gregs[0]); 5748 __get_user(env->dregs[1], &gregs[1]); 5749 __get_user(env->dregs[2], &gregs[2]); 5750 __get_user(env->dregs[3], &gregs[3]); 5751 __get_user(env->dregs[4], &gregs[4]); 5752 __get_user(env->dregs[5], &gregs[5]); 5753 __get_user(env->dregs[6], &gregs[6]); 5754 __get_user(env->dregs[7], &gregs[7]); 5755 __get_user(env->aregs[0], &gregs[8]); 5756 __get_user(env->aregs[1], &gregs[9]); 5757 __get_user(env->aregs[2], &gregs[10]); 5758 __get_user(env->aregs[3], &gregs[11]); 5759 __get_user(env->aregs[4], &gregs[12]); 5760 __get_user(env->aregs[5], &gregs[13]); 5761 __get_user(env->aregs[6], &gregs[14]); 5762 __get_user(env->aregs[7], &gregs[15]); 5763 __get_user(env->pc, &gregs[16]); 5764 __get_user(temp, &gregs[17]); 5765 cpu_m68k_set_ccr(env, temp); 5766 5767 return 0; 5768 5769 badframe: 5770 return 1; 5771 } 5772 5773 static void setup_rt_frame(int sig, struct target_sigaction *ka, 5774 target_siginfo_t *info, 5775 target_sigset_t *set, CPUM68KState *env) 5776 { 5777 struct target_rt_sigframe *frame; 5778 abi_ulong frame_addr; 5779 abi_ulong retcode_addr; 5780 abi_ulong info_addr; 5781 abi_ulong uc_addr; 5782 int err = 0; 5783 int i; 5784 5785 frame_addr = get_sigframe(ka, env, sizeof *frame); 5786 trace_user_setup_rt_frame(env, frame_addr); 5787 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 5788 goto give_sigsegv; 5789 } 5790 5791 __put_user(sig, &frame->sig); 5792 5793 info_addr = frame_addr + offsetof(struct target_rt_sigframe, info); 5794 __put_user(info_addr, &frame->pinfo); 5795 5796 uc_addr = frame_addr + offsetof(struct target_rt_sigframe, uc); 5797 __put_user(uc_addr, &frame->puc); 5798 5799 tswap_siginfo(&frame->info, info); 5800 5801 /* Create the ucontext */ 5802 5803 __put_user(0, &frame->uc.tuc_flags); 5804 __put_user(0, &frame->uc.tuc_link); 5805 __put_user(target_sigaltstack_used.ss_sp, 5806 &frame->uc.tuc_stack.ss_sp); 5807 __put_user(sas_ss_flags(env->aregs[7]), 5808 &frame->uc.tuc_stack.ss_flags); 5809 __put_user(target_sigaltstack_used.ss_size, 5810 &frame->uc.tuc_stack.ss_size); 5811 err |= target_rt_setup_ucontext(&frame->uc, env); 5812 5813 if (err) 5814 goto give_sigsegv; 5815 5816 for(i = 0; i < TARGET_NSIG_WORDS; i++) { 5817 __put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]); 5818 } 5819 5820 /* Set up to return from userspace. */ 5821 5822 retcode_addr = frame_addr + offsetof(struct target_sigframe, retcode); 5823 __put_user(retcode_addr, &frame->pretcode); 5824 5825 /* moveq #,d0; notb d0; trap #0 */ 5826 5827 __put_user(0x70004600 + ((TARGET_NR_rt_sigreturn ^ 0xff) << 16), 5828 (uint32_t *)(frame->retcode + 0)); 5829 __put_user(0x4e40, (uint16_t *)(frame->retcode + 4)); 5830 5831 if (err) 5832 goto give_sigsegv; 5833 5834 /* Set up to return from userspace */ 5835 5836 env->aregs[7] = frame_addr; 5837 env->pc = ka->_sa_handler; 5838 5839 unlock_user_struct(frame, frame_addr, 1); 5840 return; 5841 5842 give_sigsegv: 5843 unlock_user_struct(frame, frame_addr, 1); 5844 force_sigsegv(sig); 5845 } 5846 5847 long do_sigreturn(CPUM68KState *env) 5848 { 5849 struct target_sigframe *frame; 5850 abi_ulong frame_addr = env->aregs[7] - 4; 5851 target_sigset_t target_set; 5852 sigset_t set; 5853 int i; 5854 5855 trace_user_do_sigreturn(env, frame_addr); 5856 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) 5857 goto badframe; 5858 5859 /* set blocked signals */ 5860 5861 __get_user(target_set.sig[0], &frame->sc.sc_mask); 5862 5863 for(i = 1; i < TARGET_NSIG_WORDS; i++) { 5864 __get_user(target_set.sig[i], &frame->extramask[i - 1]); 5865 } 5866 5867 target_to_host_sigset_internal(&set, &target_set); 5868 set_sigmask(&set); 5869 5870 /* restore registers */ 5871 5872 restore_sigcontext(env, &frame->sc); 5873 5874 unlock_user_struct(frame, frame_addr, 0); 5875 return -TARGET_QEMU_ESIGRETURN; 5876 5877 badframe: 5878 force_sig(TARGET_SIGSEGV); 5879 return -TARGET_QEMU_ESIGRETURN; 5880 } 5881 5882 long do_rt_sigreturn(CPUM68KState *env) 5883 { 5884 struct target_rt_sigframe *frame; 5885 abi_ulong frame_addr = env->aregs[7] - 4; 5886 sigset_t set; 5887 5888 trace_user_do_rt_sigreturn(env, frame_addr); 5889 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) 5890 goto badframe; 5891 5892 target_to_host_sigset(&set, &frame->uc.tuc_sigmask); 5893 set_sigmask(&set); 5894 5895 /* restore registers */ 5896 5897 if (target_rt_restore_ucontext(env, &frame->uc)) 5898 goto badframe; 5899 5900 if (do_sigaltstack(frame_addr + 5901 offsetof(struct target_rt_sigframe, uc.tuc_stack), 5902 0, get_sp_from_cpustate(env)) == -EFAULT) 5903 goto badframe; 5904 5905 unlock_user_struct(frame, frame_addr, 0); 5906 return -TARGET_QEMU_ESIGRETURN; 5907 5908 badframe: 5909 unlock_user_struct(frame, frame_addr, 0); 5910 force_sig(TARGET_SIGSEGV); 5911 return -TARGET_QEMU_ESIGRETURN; 5912 } 5913 5914 #elif defined(TARGET_ALPHA) 5915 5916 struct target_sigcontext { 5917 abi_long sc_onstack; 5918 abi_long sc_mask; 5919 abi_long sc_pc; 5920 abi_long sc_ps; 5921 abi_long sc_regs[32]; 5922 abi_long sc_ownedfp; 5923 abi_long sc_fpregs[32]; 5924 abi_ulong sc_fpcr; 5925 abi_ulong sc_fp_control; 5926 abi_ulong sc_reserved1; 5927 abi_ulong sc_reserved2; 5928 abi_ulong sc_ssize; 5929 abi_ulong sc_sbase; 5930 abi_ulong sc_traparg_a0; 5931 abi_ulong sc_traparg_a1; 5932 abi_ulong sc_traparg_a2; 5933 abi_ulong sc_fp_trap_pc; 5934 abi_ulong sc_fp_trigger_sum; 5935 abi_ulong sc_fp_trigger_inst; 5936 }; 5937 5938 struct target_ucontext { 5939 abi_ulong tuc_flags; 5940 abi_ulong tuc_link; 5941 abi_ulong tuc_osf_sigmask; 5942 target_stack_t tuc_stack; 5943 struct target_sigcontext tuc_mcontext; 5944 target_sigset_t tuc_sigmask; 5945 }; 5946 5947 struct target_sigframe { 5948 struct target_sigcontext sc; 5949 unsigned int retcode[3]; 5950 }; 5951 5952 struct target_rt_sigframe { 5953 target_siginfo_t info; 5954 struct target_ucontext uc; 5955 unsigned int retcode[3]; 5956 }; 5957 5958 #define INSN_MOV_R30_R16 0x47fe0410 5959 #define INSN_LDI_R0 0x201f0000 5960 #define INSN_CALLSYS 0x00000083 5961 5962 static void setup_sigcontext(struct target_sigcontext *sc, CPUAlphaState *env, 5963 abi_ulong frame_addr, target_sigset_t *set) 5964 { 5965 int i; 5966 5967 __put_user(on_sig_stack(frame_addr), &sc->sc_onstack); 5968 __put_user(set->sig[0], &sc->sc_mask); 5969 __put_user(env->pc, &sc->sc_pc); 5970 __put_user(8, &sc->sc_ps); 5971 5972 for (i = 0; i < 31; ++i) { 5973 __put_user(env->ir[i], &sc->sc_regs[i]); 5974 } 5975 __put_user(0, &sc->sc_regs[31]); 5976 5977 for (i = 0; i < 31; ++i) { 5978 __put_user(env->fir[i], &sc->sc_fpregs[i]); 5979 } 5980 __put_user(0, &sc->sc_fpregs[31]); 5981 __put_user(cpu_alpha_load_fpcr(env), &sc->sc_fpcr); 5982 5983 __put_user(0, &sc->sc_traparg_a0); /* FIXME */ 5984 __put_user(0, &sc->sc_traparg_a1); /* FIXME */ 5985 __put_user(0, &sc->sc_traparg_a2); /* FIXME */ 5986 } 5987 5988 static void restore_sigcontext(CPUAlphaState *env, 5989 struct target_sigcontext *sc) 5990 { 5991 uint64_t fpcr; 5992 int i; 5993 5994 __get_user(env->pc, &sc->sc_pc); 5995 5996 for (i = 0; i < 31; ++i) { 5997 __get_user(env->ir[i], &sc->sc_regs[i]); 5998 } 5999 for (i = 0; i < 31; ++i) { 6000 __get_user(env->fir[i], &sc->sc_fpregs[i]); 6001 } 6002 6003 __get_user(fpcr, &sc->sc_fpcr); 6004 cpu_alpha_store_fpcr(env, fpcr); 6005 } 6006 6007 static inline abi_ulong get_sigframe(struct target_sigaction *sa, 6008 CPUAlphaState *env, 6009 unsigned long framesize) 6010 { 6011 abi_ulong sp = env->ir[IR_SP]; 6012 6013 /* This is the X/Open sanctioned signal stack switching. */ 6014 if ((sa->sa_flags & TARGET_SA_ONSTACK) != 0 && !sas_ss_flags(sp)) { 6015 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 6016 } 6017 return (sp - framesize) & -32; 6018 } 6019 6020 static void setup_frame(int sig, struct target_sigaction *ka, 6021 target_sigset_t *set, CPUAlphaState *env) 6022 { 6023 abi_ulong frame_addr, r26; 6024 struct target_sigframe *frame; 6025 int err = 0; 6026 6027 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 6028 trace_user_setup_frame(env, frame_addr); 6029 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 6030 goto give_sigsegv; 6031 } 6032 6033 setup_sigcontext(&frame->sc, env, frame_addr, set); 6034 6035 if (ka->sa_restorer) { 6036 r26 = ka->sa_restorer; 6037 } else { 6038 __put_user(INSN_MOV_R30_R16, &frame->retcode[0]); 6039 __put_user(INSN_LDI_R0 + TARGET_NR_sigreturn, 6040 &frame->retcode[1]); 6041 __put_user(INSN_CALLSYS, &frame->retcode[2]); 6042 /* imb() */ 6043 r26 = frame_addr; 6044 } 6045 6046 unlock_user_struct(frame, frame_addr, 1); 6047 6048 if (err) { 6049 give_sigsegv: 6050 force_sigsegv(sig); 6051 return; 6052 } 6053 6054 env->ir[IR_RA] = r26; 6055 env->ir[IR_PV] = env->pc = ka->_sa_handler; 6056 env->ir[IR_A0] = sig; 6057 env->ir[IR_A1] = 0; 6058 env->ir[IR_A2] = frame_addr + offsetof(struct target_sigframe, sc); 6059 env->ir[IR_SP] = frame_addr; 6060 } 6061 6062 static void setup_rt_frame(int sig, struct target_sigaction *ka, 6063 target_siginfo_t *info, 6064 target_sigset_t *set, CPUAlphaState *env) 6065 { 6066 abi_ulong frame_addr, r26; 6067 struct target_rt_sigframe *frame; 6068 int i, err = 0; 6069 6070 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 6071 trace_user_setup_rt_frame(env, frame_addr); 6072 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 6073 goto give_sigsegv; 6074 } 6075 6076 tswap_siginfo(&frame->info, info); 6077 6078 __put_user(0, &frame->uc.tuc_flags); 6079 __put_user(0, &frame->uc.tuc_link); 6080 __put_user(set->sig[0], &frame->uc.tuc_osf_sigmask); 6081 __put_user(target_sigaltstack_used.ss_sp, 6082 &frame->uc.tuc_stack.ss_sp); 6083 __put_user(sas_ss_flags(env->ir[IR_SP]), 6084 &frame->uc.tuc_stack.ss_flags); 6085 __put_user(target_sigaltstack_used.ss_size, 6086 &frame->uc.tuc_stack.ss_size); 6087 setup_sigcontext(&frame->uc.tuc_mcontext, env, frame_addr, set); 6088 for (i = 0; i < TARGET_NSIG_WORDS; ++i) { 6089 __put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]); 6090 } 6091 6092 if (ka->sa_restorer) { 6093 r26 = ka->sa_restorer; 6094 } else { 6095 __put_user(INSN_MOV_R30_R16, &frame->retcode[0]); 6096 __put_user(INSN_LDI_R0 + TARGET_NR_rt_sigreturn, 6097 &frame->retcode[1]); 6098 __put_user(INSN_CALLSYS, &frame->retcode[2]); 6099 /* imb(); */ 6100 r26 = frame_addr; 6101 } 6102 6103 if (err) { 6104 give_sigsegv: 6105 force_sigsegv(sig); 6106 return; 6107 } 6108 6109 env->ir[IR_RA] = r26; 6110 env->ir[IR_PV] = env->pc = ka->_sa_handler; 6111 env->ir[IR_A0] = sig; 6112 env->ir[IR_A1] = frame_addr + offsetof(struct target_rt_sigframe, info); 6113 env->ir[IR_A2] = frame_addr + offsetof(struct target_rt_sigframe, uc); 6114 env->ir[IR_SP] = frame_addr; 6115 } 6116 6117 long do_sigreturn(CPUAlphaState *env) 6118 { 6119 struct target_sigcontext *sc; 6120 abi_ulong sc_addr = env->ir[IR_A0]; 6121 target_sigset_t target_set; 6122 sigset_t set; 6123 6124 if (!lock_user_struct(VERIFY_READ, sc, sc_addr, 1)) { 6125 goto badframe; 6126 } 6127 6128 target_sigemptyset(&target_set); 6129 __get_user(target_set.sig[0], &sc->sc_mask); 6130 6131 target_to_host_sigset_internal(&set, &target_set); 6132 set_sigmask(&set); 6133 6134 restore_sigcontext(env, sc); 6135 unlock_user_struct(sc, sc_addr, 0); 6136 return -TARGET_QEMU_ESIGRETURN; 6137 6138 badframe: 6139 force_sig(TARGET_SIGSEGV); 6140 return -TARGET_QEMU_ESIGRETURN; 6141 } 6142 6143 long do_rt_sigreturn(CPUAlphaState *env) 6144 { 6145 abi_ulong frame_addr = env->ir[IR_A0]; 6146 struct target_rt_sigframe *frame; 6147 sigset_t set; 6148 6149 trace_user_do_rt_sigreturn(env, frame_addr); 6150 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 6151 goto badframe; 6152 } 6153 target_to_host_sigset(&set, &frame->uc.tuc_sigmask); 6154 set_sigmask(&set); 6155 6156 restore_sigcontext(env, &frame->uc.tuc_mcontext); 6157 if (do_sigaltstack(frame_addr + offsetof(struct target_rt_sigframe, 6158 uc.tuc_stack), 6159 0, env->ir[IR_SP]) == -EFAULT) { 6160 goto badframe; 6161 } 6162 6163 unlock_user_struct(frame, frame_addr, 0); 6164 return -TARGET_QEMU_ESIGRETURN; 6165 6166 6167 badframe: 6168 unlock_user_struct(frame, frame_addr, 0); 6169 force_sig(TARGET_SIGSEGV); 6170 return -TARGET_QEMU_ESIGRETURN; 6171 } 6172 6173 #elif defined(TARGET_TILEGX) 6174 6175 struct target_sigcontext { 6176 union { 6177 /* General-purpose registers. */ 6178 abi_ulong gregs[56]; 6179 struct { 6180 abi_ulong __gregs[53]; 6181 abi_ulong tp; /* Aliases gregs[TREG_TP]. */ 6182 abi_ulong sp; /* Aliases gregs[TREG_SP]. */ 6183 abi_ulong lr; /* Aliases gregs[TREG_LR]. */ 6184 }; 6185 }; 6186 abi_ulong pc; /* Program counter. */ 6187 abi_ulong ics; /* In Interrupt Critical Section? */ 6188 abi_ulong faultnum; /* Fault number. */ 6189 abi_ulong pad[5]; 6190 }; 6191 6192 struct target_ucontext { 6193 abi_ulong tuc_flags; 6194 abi_ulong tuc_link; 6195 target_stack_t tuc_stack; 6196 struct target_sigcontext tuc_mcontext; 6197 target_sigset_t tuc_sigmask; /* mask last for extensibility */ 6198 }; 6199 6200 struct target_rt_sigframe { 6201 unsigned char save_area[16]; /* caller save area */ 6202 struct target_siginfo info; 6203 struct target_ucontext uc; 6204 abi_ulong retcode[2]; 6205 }; 6206 6207 #define INSN_MOVELI_R10_139 0x00045fe551483000ULL /* { moveli r10, 139 } */ 6208 #define INSN_SWINT1 0x286b180051485000ULL /* { swint1 } */ 6209 6210 6211 static void setup_sigcontext(struct target_sigcontext *sc, 6212 CPUArchState *env, int signo) 6213 { 6214 int i; 6215 6216 for (i = 0; i < TILEGX_R_COUNT; ++i) { 6217 __put_user(env->regs[i], &sc->gregs[i]); 6218 } 6219 6220 __put_user(env->pc, &sc->pc); 6221 __put_user(0, &sc->ics); 6222 __put_user(signo, &sc->faultnum); 6223 } 6224 6225 static void restore_sigcontext(CPUTLGState *env, struct target_sigcontext *sc) 6226 { 6227 int i; 6228 6229 for (i = 0; i < TILEGX_R_COUNT; ++i) { 6230 __get_user(env->regs[i], &sc->gregs[i]); 6231 } 6232 6233 __get_user(env->pc, &sc->pc); 6234 } 6235 6236 static abi_ulong get_sigframe(struct target_sigaction *ka, CPUArchState *env, 6237 size_t frame_size) 6238 { 6239 unsigned long sp = env->regs[TILEGX_R_SP]; 6240 6241 if (on_sig_stack(sp) && !likely(on_sig_stack(sp - frame_size))) { 6242 return -1UL; 6243 } 6244 6245 if ((ka->sa_flags & SA_ONSTACK) && !sas_ss_flags(sp)) { 6246 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size; 6247 } 6248 6249 sp -= frame_size; 6250 sp &= -16UL; 6251 return sp; 6252 } 6253 6254 static void setup_rt_frame(int sig, struct target_sigaction *ka, 6255 target_siginfo_t *info, 6256 target_sigset_t *set, CPUArchState *env) 6257 { 6258 abi_ulong frame_addr; 6259 struct target_rt_sigframe *frame; 6260 unsigned long restorer; 6261 6262 frame_addr = get_sigframe(ka, env, sizeof(*frame)); 6263 trace_user_setup_rt_frame(env, frame_addr); 6264 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 6265 goto give_sigsegv; 6266 } 6267 6268 /* Always write at least the signal number for the stack backtracer. */ 6269 if (ka->sa_flags & TARGET_SA_SIGINFO) { 6270 /* At sigreturn time, restore the callee-save registers too. */ 6271 tswap_siginfo(&frame->info, info); 6272 /* regs->flags |= PT_FLAGS_RESTORE_REGS; FIXME: we can skip it? */ 6273 } else { 6274 __put_user(info->si_signo, &frame->info.si_signo); 6275 } 6276 6277 /* Create the ucontext. */ 6278 __put_user(0, &frame->uc.tuc_flags); 6279 __put_user(0, &frame->uc.tuc_link); 6280 __put_user(target_sigaltstack_used.ss_sp, &frame->uc.tuc_stack.ss_sp); 6281 __put_user(sas_ss_flags(env->regs[TILEGX_R_SP]), 6282 &frame->uc.tuc_stack.ss_flags); 6283 __put_user(target_sigaltstack_used.ss_size, &frame->uc.tuc_stack.ss_size); 6284 setup_sigcontext(&frame->uc.tuc_mcontext, env, info->si_signo); 6285 6286 if (ka->sa_flags & TARGET_SA_RESTORER) { 6287 restorer = (unsigned long) ka->sa_restorer; 6288 } else { 6289 __put_user(INSN_MOVELI_R10_139, &frame->retcode[0]); 6290 __put_user(INSN_SWINT1, &frame->retcode[1]); 6291 restorer = frame_addr + offsetof(struct target_rt_sigframe, retcode); 6292 } 6293 env->pc = (unsigned long) ka->_sa_handler; 6294 env->regs[TILEGX_R_SP] = (unsigned long) frame; 6295 env->regs[TILEGX_R_LR] = restorer; 6296 env->regs[0] = (unsigned long) sig; 6297 env->regs[1] = (unsigned long) &frame->info; 6298 env->regs[2] = (unsigned long) &frame->uc; 6299 /* regs->flags |= PT_FLAGS_CALLER_SAVES; FIXME: we can skip it? */ 6300 6301 unlock_user_struct(frame, frame_addr, 1); 6302 return; 6303 6304 give_sigsegv: 6305 force_sigsegv(sig); 6306 } 6307 6308 long do_rt_sigreturn(CPUTLGState *env) 6309 { 6310 abi_ulong frame_addr = env->regs[TILEGX_R_SP]; 6311 struct target_rt_sigframe *frame; 6312 sigset_t set; 6313 6314 trace_user_do_rt_sigreturn(env, frame_addr); 6315 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 6316 goto badframe; 6317 } 6318 target_to_host_sigset(&set, &frame->uc.tuc_sigmask); 6319 set_sigmask(&set); 6320 6321 restore_sigcontext(env, &frame->uc.tuc_mcontext); 6322 if (do_sigaltstack(frame_addr + offsetof(struct target_rt_sigframe, 6323 uc.tuc_stack), 6324 0, env->regs[TILEGX_R_SP]) == -EFAULT) { 6325 goto badframe; 6326 } 6327 6328 unlock_user_struct(frame, frame_addr, 0); 6329 return -TARGET_QEMU_ESIGRETURN; 6330 6331 6332 badframe: 6333 unlock_user_struct(frame, frame_addr, 0); 6334 force_sig(TARGET_SIGSEGV); 6335 return -TARGET_QEMU_ESIGRETURN; 6336 } 6337 6338 #elif defined(TARGET_HPPA) 6339 6340 struct target_sigcontext { 6341 abi_ulong sc_flags; 6342 abi_ulong sc_gr[32]; 6343 uint64_t sc_fr[32]; 6344 abi_ulong sc_iasq[2]; 6345 abi_ulong sc_iaoq[2]; 6346 abi_ulong sc_sar; 6347 }; 6348 6349 struct target_ucontext { 6350 abi_uint tuc_flags; 6351 abi_ulong tuc_link; 6352 target_stack_t tuc_stack; 6353 abi_uint pad[1]; 6354 struct target_sigcontext tuc_mcontext; 6355 target_sigset_t tuc_sigmask; 6356 }; 6357 6358 struct target_rt_sigframe { 6359 abi_uint tramp[9]; 6360 target_siginfo_t info; 6361 struct target_ucontext uc; 6362 /* hidden location of upper halves of pa2.0 64-bit gregs */ 6363 }; 6364 6365 static void setup_sigcontext(struct target_sigcontext *sc, CPUArchState *env) 6366 { 6367 int flags = 0; 6368 int i; 6369 6370 /* ??? if on_sig_stack, flags |= 1 (PARISC_SC_FLAG_ONSTACK). */ 6371 6372 if (env->iaoq_f < TARGET_PAGE_SIZE) { 6373 /* In the gateway page, executing a syscall. */ 6374 flags |= 2; /* PARISC_SC_FLAG_IN_SYSCALL */ 6375 __put_user(env->gr[31], &sc->sc_iaoq[0]); 6376 __put_user(env->gr[31] + 4, &sc->sc_iaoq[1]); 6377 } else { 6378 __put_user(env->iaoq_f, &sc->sc_iaoq[0]); 6379 __put_user(env->iaoq_b, &sc->sc_iaoq[1]); 6380 } 6381 __put_user(0, &sc->sc_iasq[0]); 6382 __put_user(0, &sc->sc_iasq[1]); 6383 __put_user(flags, &sc->sc_flags); 6384 6385 __put_user(cpu_hppa_get_psw(env), &sc->sc_gr[0]); 6386 for (i = 1; i < 32; ++i) { 6387 __put_user(env->gr[i], &sc->sc_gr[i]); 6388 } 6389 6390 __put_user((uint64_t)env->fr0_shadow << 32, &sc->sc_fr[0]); 6391 for (i = 1; i < 32; ++i) { 6392 __put_user(env->fr[i], &sc->sc_fr[i]); 6393 } 6394 6395 __put_user(env->sar, &sc->sc_sar); 6396 } 6397 6398 static void restore_sigcontext(CPUArchState *env, struct target_sigcontext *sc) 6399 { 6400 target_ulong psw; 6401 int i; 6402 6403 __get_user(psw, &sc->sc_gr[0]); 6404 cpu_hppa_put_psw(env, psw); 6405 6406 for (i = 1; i < 32; ++i) { 6407 __get_user(env->gr[i], &sc->sc_gr[i]); 6408 } 6409 for (i = 0; i < 32; ++i) { 6410 __get_user(env->fr[i], &sc->sc_fr[i]); 6411 } 6412 cpu_hppa_loaded_fr0(env); 6413 6414 __get_user(env->iaoq_f, &sc->sc_iaoq[0]); 6415 __get_user(env->iaoq_b, &sc->sc_iaoq[1]); 6416 __get_user(env->sar, &sc->sc_sar); 6417 } 6418 6419 /* No, this doesn't look right, but it's copied straight from the kernel. */ 6420 #define PARISC_RT_SIGFRAME_SIZE32 \ 6421 ((sizeof(struct target_rt_sigframe) + 48 + 64) & -64) 6422 6423 static void setup_rt_frame(int sig, struct target_sigaction *ka, 6424 target_siginfo_t *info, 6425 target_sigset_t *set, CPUArchState *env) 6426 { 6427 abi_ulong frame_addr, sp, haddr; 6428 struct target_rt_sigframe *frame; 6429 int i; 6430 6431 sp = env->gr[30]; 6432 if (ka->sa_flags & TARGET_SA_ONSTACK) { 6433 if (sas_ss_flags(sp) == 0) { 6434 sp = (target_sigaltstack_used.ss_sp + 0x7f) & ~0x3f; 6435 } 6436 } 6437 frame_addr = QEMU_ALIGN_UP(sp, 64); 6438 sp = frame_addr + PARISC_RT_SIGFRAME_SIZE32; 6439 6440 trace_user_setup_rt_frame(env, frame_addr); 6441 6442 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 0)) { 6443 goto give_sigsegv; 6444 } 6445 6446 tswap_siginfo(&frame->info, info); 6447 frame->uc.tuc_flags = 0; 6448 frame->uc.tuc_link = 0; 6449 6450 __put_user(target_sigaltstack_used.ss_sp, &frame->uc.tuc_stack.ss_sp); 6451 __put_user(sas_ss_flags(get_sp_from_cpustate(env)), 6452 &frame->uc.tuc_stack.ss_flags); 6453 __put_user(target_sigaltstack_used.ss_size, 6454 &frame->uc.tuc_stack.ss_size); 6455 6456 for (i = 0; i < TARGET_NSIG_WORDS; i++) { 6457 __put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]); 6458 } 6459 6460 setup_sigcontext(&frame->uc.tuc_mcontext, env); 6461 6462 __put_user(0x34190000, frame->tramp + 0); /* ldi 0,%r25 */ 6463 __put_user(0x3414015a, frame->tramp + 1); /* ldi __NR_rt_sigreturn,%r20 */ 6464 __put_user(0xe4008200, frame->tramp + 2); /* be,l 0x100(%sr2,%r0) */ 6465 __put_user(0x08000240, frame->tramp + 3); /* nop */ 6466 6467 unlock_user_struct(frame, frame_addr, 1); 6468 6469 env->gr[2] = h2g(frame->tramp); 6470 env->gr[30] = sp; 6471 env->gr[26] = sig; 6472 env->gr[25] = h2g(&frame->info); 6473 env->gr[24] = h2g(&frame->uc); 6474 6475 haddr = ka->_sa_handler; 6476 if (haddr & 2) { 6477 /* Function descriptor. */ 6478 target_ulong *fdesc, dest; 6479 6480 haddr &= -4; 6481 if (!lock_user_struct(VERIFY_READ, fdesc, haddr, 1)) { 6482 goto give_sigsegv; 6483 } 6484 __get_user(dest, fdesc); 6485 __get_user(env->gr[19], fdesc + 1); 6486 unlock_user_struct(fdesc, haddr, 1); 6487 haddr = dest; 6488 } 6489 env->iaoq_f = haddr; 6490 env->iaoq_b = haddr + 4;; 6491 return; 6492 6493 give_sigsegv: 6494 force_sigsegv(sig); 6495 } 6496 6497 long do_rt_sigreturn(CPUArchState *env) 6498 { 6499 abi_ulong frame_addr = env->gr[30] - PARISC_RT_SIGFRAME_SIZE32; 6500 struct target_rt_sigframe *frame; 6501 sigset_t set; 6502 6503 trace_user_do_rt_sigreturn(env, frame_addr); 6504 if (!lock_user_struct(VERIFY_READ, frame, frame_addr, 1)) { 6505 goto badframe; 6506 } 6507 target_to_host_sigset(&set, &frame->uc.tuc_sigmask); 6508 set_sigmask(&set); 6509 6510 restore_sigcontext(env, &frame->uc.tuc_mcontext); 6511 unlock_user_struct(frame, frame_addr, 0); 6512 6513 if (do_sigaltstack(frame_addr + offsetof(struct target_rt_sigframe, 6514 uc.tuc_stack), 6515 0, env->gr[30]) == -EFAULT) { 6516 goto badframe; 6517 } 6518 6519 unlock_user_struct(frame, frame_addr, 0); 6520 return -TARGET_QEMU_ESIGRETURN; 6521 6522 badframe: 6523 force_sig(TARGET_SIGSEGV); 6524 return -TARGET_QEMU_ESIGRETURN; 6525 } 6526 6527 #else 6528 6529 static void setup_frame(int sig, struct target_sigaction *ka, 6530 target_sigset_t *set, CPUArchState *env) 6531 { 6532 fprintf(stderr, "setup_frame: not implemented\n"); 6533 } 6534 6535 static void setup_rt_frame(int sig, struct target_sigaction *ka, 6536 target_siginfo_t *info, 6537 target_sigset_t *set, CPUArchState *env) 6538 { 6539 fprintf(stderr, "setup_rt_frame: not implemented\n"); 6540 } 6541 6542 long do_sigreturn(CPUArchState *env) 6543 { 6544 fprintf(stderr, "do_sigreturn: not implemented\n"); 6545 return -TARGET_ENOSYS; 6546 } 6547 6548 long do_rt_sigreturn(CPUArchState *env) 6549 { 6550 fprintf(stderr, "do_rt_sigreturn: not implemented\n"); 6551 return -TARGET_ENOSYS; 6552 } 6553 6554 #endif 6555 6556 static void handle_pending_signal(CPUArchState *cpu_env, int sig, 6557 struct emulated_sigtable *k) 6558 { 6559 CPUState *cpu = ENV_GET_CPU(cpu_env); 6560 abi_ulong handler; 6561 sigset_t set; 6562 target_sigset_t target_old_set; 6563 struct target_sigaction *sa; 6564 TaskState *ts = cpu->opaque; 6565 6566 trace_user_handle_signal(cpu_env, sig); 6567 /* dequeue signal */ 6568 k->pending = 0; 6569 6570 sig = gdb_handlesig(cpu, sig); 6571 if (!sig) { 6572 sa = NULL; 6573 handler = TARGET_SIG_IGN; 6574 } else { 6575 sa = &sigact_table[sig - 1]; 6576 handler = sa->_sa_handler; 6577 } 6578 6579 if (do_strace) { 6580 print_taken_signal(sig, &k->info); 6581 } 6582 6583 if (handler == TARGET_SIG_DFL) { 6584 /* default handler : ignore some signal. The other are job control or fatal */ 6585 if (sig == TARGET_SIGTSTP || sig == TARGET_SIGTTIN || sig == TARGET_SIGTTOU) { 6586 kill(getpid(),SIGSTOP); 6587 } else if (sig != TARGET_SIGCHLD && 6588 sig != TARGET_SIGURG && 6589 sig != TARGET_SIGWINCH && 6590 sig != TARGET_SIGCONT) { 6591 dump_core_and_abort(sig); 6592 } 6593 } else if (handler == TARGET_SIG_IGN) { 6594 /* ignore sig */ 6595 } else if (handler == TARGET_SIG_ERR) { 6596 dump_core_and_abort(sig); 6597 } else { 6598 /* compute the blocked signals during the handler execution */ 6599 sigset_t *blocked_set; 6600 6601 target_to_host_sigset(&set, &sa->sa_mask); 6602 /* SA_NODEFER indicates that the current signal should not be 6603 blocked during the handler */ 6604 if (!(sa->sa_flags & TARGET_SA_NODEFER)) 6605 sigaddset(&set, target_to_host_signal(sig)); 6606 6607 /* save the previous blocked signal state to restore it at the 6608 end of the signal execution (see do_sigreturn) */ 6609 host_to_target_sigset_internal(&target_old_set, &ts->signal_mask); 6610 6611 /* block signals in the handler */ 6612 blocked_set = ts->in_sigsuspend ? 6613 &ts->sigsuspend_mask : &ts->signal_mask; 6614 sigorset(&ts->signal_mask, blocked_set, &set); 6615 ts->in_sigsuspend = 0; 6616 6617 /* if the CPU is in VM86 mode, we restore the 32 bit values */ 6618 #if defined(TARGET_I386) && !defined(TARGET_X86_64) 6619 { 6620 CPUX86State *env = cpu_env; 6621 if (env->eflags & VM_MASK) 6622 save_v86_state(env); 6623 } 6624 #endif 6625 /* prepare the stack frame of the virtual CPU */ 6626 #if defined(TARGET_ABI_MIPSN32) || defined(TARGET_ABI_MIPSN64) \ 6627 || defined(TARGET_OPENRISC) || defined(TARGET_TILEGX) \ 6628 || defined(TARGET_PPC64) || defined(TARGET_HPPA) \ 6629 || defined(TARGET_NIOS2) || defined(TARGET_X86_64) 6630 /* These targets do not have traditional signals. */ 6631 setup_rt_frame(sig, sa, &k->info, &target_old_set, cpu_env); 6632 #else 6633 if (sa->sa_flags & TARGET_SA_SIGINFO) 6634 setup_rt_frame(sig, sa, &k->info, &target_old_set, cpu_env); 6635 else 6636 setup_frame(sig, sa, &target_old_set, cpu_env); 6637 #endif 6638 if (sa->sa_flags & TARGET_SA_RESETHAND) { 6639 sa->_sa_handler = TARGET_SIG_DFL; 6640 } 6641 } 6642 } 6643 6644 void process_pending_signals(CPUArchState *cpu_env) 6645 { 6646 CPUState *cpu = ENV_GET_CPU(cpu_env); 6647 int sig; 6648 TaskState *ts = cpu->opaque; 6649 sigset_t set; 6650 sigset_t *blocked_set; 6651 6652 while (atomic_read(&ts->signal_pending)) { 6653 /* FIXME: This is not threadsafe. */ 6654 sigfillset(&set); 6655 sigprocmask(SIG_SETMASK, &set, 0); 6656 6657 restart_scan: 6658 sig = ts->sync_signal.pending; 6659 if (sig) { 6660 /* Synchronous signals are forced, 6661 * see force_sig_info() and callers in Linux 6662 * Note that not all of our queue_signal() calls in QEMU correspond 6663 * to force_sig_info() calls in Linux (some are send_sig_info()). 6664 * However it seems like a kernel bug to me to allow the process 6665 * to block a synchronous signal since it could then just end up 6666 * looping round and round indefinitely. 6667 */ 6668 if (sigismember(&ts->signal_mask, target_to_host_signal_table[sig]) 6669 || sigact_table[sig - 1]._sa_handler == TARGET_SIG_IGN) { 6670 sigdelset(&ts->signal_mask, target_to_host_signal_table[sig]); 6671 sigact_table[sig - 1]._sa_handler = TARGET_SIG_DFL; 6672 } 6673 6674 handle_pending_signal(cpu_env, sig, &ts->sync_signal); 6675 } 6676 6677 for (sig = 1; sig <= TARGET_NSIG; sig++) { 6678 blocked_set = ts->in_sigsuspend ? 6679 &ts->sigsuspend_mask : &ts->signal_mask; 6680 6681 if (ts->sigtab[sig - 1].pending && 6682 (!sigismember(blocked_set, 6683 target_to_host_signal_table[sig]))) { 6684 handle_pending_signal(cpu_env, sig, &ts->sigtab[sig - 1]); 6685 /* Restart scan from the beginning, as handle_pending_signal 6686 * might have resulted in a new synchronous signal (eg SIGSEGV). 6687 */ 6688 goto restart_scan; 6689 } 6690 } 6691 6692 /* if no signal is pending, unblock signals and recheck (the act 6693 * of unblocking might cause us to take another host signal which 6694 * will set signal_pending again). 6695 */ 6696 atomic_set(&ts->signal_pending, 0); 6697 ts->in_sigsuspend = 0; 6698 set = ts->signal_mask; 6699 sigdelset(&set, SIGSEGV); 6700 sigdelset(&set, SIGBUS); 6701 sigprocmask(SIG_SETMASK, &set, 0); 6702 } 6703 ts->in_sigsuspend = 0; 6704 } 6705