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