blob: 945dd14e0c42e7276700fa780f306d6c2095f331 [file] [log] [blame]
bellard31e31b82003-02-18 22:55:36 +00001/*
bellard66fb9762003-03-23 01:06:05 +00002 * Emulation of Linux signals
ths5fafdf22007-09-16 21:08:06 +00003 *
bellard31e31b82003-02-18 22:55:36 +00004 * Copyright (c) 2003 Fabrice Bellard
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
20#include <stdlib.h>
21#include <stdio.h>
bellard66fb9762003-03-23 01:06:05 +000022#include <string.h>
bellard31e31b82003-02-18 22:55:36 +000023#include <stdarg.h>
bellard2677e102003-04-10 00:03:27 +000024#include <unistd.h>
bellard31e31b82003-02-18 22:55:36 +000025#include <signal.h>
bellard66fb9762003-03-23 01:06:05 +000026#include <errno.h>
bellard31e31b82003-02-18 22:55:36 +000027#include <sys/ucontext.h>
28
thsa04e1342007-09-27 13:57:58 +000029#include "target_signal.h"
bellard3ef693a2003-03-23 20:17:16 +000030#include "qemu.h"
bellard66fb9762003-03-23 01:06:05 +000031
32//#define DEBUG_SIGNAL
33
34#define MAX_SIGQUEUE_SIZE 1024
35
36struct sigqueue {
37 struct sigqueue *next;
bellard9de5e442003-03-23 16:49:39 +000038 target_siginfo_t info;
bellard66fb9762003-03-23 01:06:05 +000039};
bellard31e31b82003-02-18 22:55:36 +000040
41struct emulated_sigaction {
42 struct target_sigaction sa;
bellard66fb9762003-03-23 01:06:05 +000043 int pending; /* true if signal is pending */
44 struct sigqueue *first;
45 struct sigqueue info; /* in order to always have memory for the
46 first signal, we put it here */
bellard31e31b82003-02-18 22:55:36 +000047};
48
thsa04e1342007-09-27 13:57:58 +000049struct target_sigaltstack target_sigaltstack_used = {
50 .ss_sp = 0,
51 .ss_size = 0,
52 .ss_flags = TARGET_SS_DISABLE,
53};
54
bellard66fb9762003-03-23 01:06:05 +000055static struct emulated_sigaction sigact_table[TARGET_NSIG];
56static struct sigqueue sigqueue_table[MAX_SIGQUEUE_SIZE]; /* siginfo queue */
57static struct sigqueue *first_free; /* first free siginfo queue entry */
58static int signal_pending; /* non zero if a signal may be pending */
bellard31e31b82003-02-18 22:55:36 +000059
ths5fafdf22007-09-16 21:08:06 +000060static void host_signal_handler(int host_signum, siginfo_t *info,
bellard66fb9762003-03-23 01:06:05 +000061 void *puc);
62
bellard9e5f5282003-07-13 17:33:54 +000063static uint8_t host_to_target_signal_table[65] = {
64 [SIGHUP] = TARGET_SIGHUP,
65 [SIGINT] = TARGET_SIGINT,
66 [SIGQUIT] = TARGET_SIGQUIT,
67 [SIGILL] = TARGET_SIGILL,
68 [SIGTRAP] = TARGET_SIGTRAP,
69 [SIGABRT] = TARGET_SIGABRT,
bellard01e3b762003-09-30 21:10:14 +000070/* [SIGIOT] = TARGET_SIGIOT,*/
bellard9e5f5282003-07-13 17:33:54 +000071 [SIGBUS] = TARGET_SIGBUS,
72 [SIGFPE] = TARGET_SIGFPE,
73 [SIGKILL] = TARGET_SIGKILL,
74 [SIGUSR1] = TARGET_SIGUSR1,
75 [SIGSEGV] = TARGET_SIGSEGV,
76 [SIGUSR2] = TARGET_SIGUSR2,
77 [SIGPIPE] = TARGET_SIGPIPE,
78 [SIGALRM] = TARGET_SIGALRM,
79 [SIGTERM] = TARGET_SIGTERM,
80#ifdef SIGSTKFLT
81 [SIGSTKFLT] = TARGET_SIGSTKFLT,
82#endif
83 [SIGCHLD] = TARGET_SIGCHLD,
84 [SIGCONT] = TARGET_SIGCONT,
85 [SIGSTOP] = TARGET_SIGSTOP,
86 [SIGTSTP] = TARGET_SIGTSTP,
87 [SIGTTIN] = TARGET_SIGTTIN,
88 [SIGTTOU] = TARGET_SIGTTOU,
89 [SIGURG] = TARGET_SIGURG,
90 [SIGXCPU] = TARGET_SIGXCPU,
91 [SIGXFSZ] = TARGET_SIGXFSZ,
92 [SIGVTALRM] = TARGET_SIGVTALRM,
93 [SIGPROF] = TARGET_SIGPROF,
94 [SIGWINCH] = TARGET_SIGWINCH,
95 [SIGIO] = TARGET_SIGIO,
96 [SIGPWR] = TARGET_SIGPWR,
97 [SIGSYS] = TARGET_SIGSYS,
98 /* next signals stay the same */
99};
100static uint8_t target_to_host_signal_table[65];
101
thsa04e1342007-09-27 13:57:58 +0000102static inline int on_sig_stack(unsigned long sp)
103{
104 return (sp - target_sigaltstack_used.ss_sp
105 < target_sigaltstack_used.ss_size);
106}
107
108static inline int sas_ss_flags(unsigned long sp)
109{
110 return (target_sigaltstack_used.ss_size == 0 ? SS_DISABLE
111 : on_sig_stack(sp) ? SS_ONSTACK : 0);
112}
113
bellard31e31b82003-02-18 22:55:36 +0000114static inline int host_to_target_signal(int sig)
115{
bellard9e5f5282003-07-13 17:33:54 +0000116 return host_to_target_signal_table[sig];
bellard31e31b82003-02-18 22:55:36 +0000117}
118
119static inline int target_to_host_signal(int sig)
120{
bellard9e5f5282003-07-13 17:33:54 +0000121 return target_to_host_signal_table[sig];
bellard31e31b82003-02-18 22:55:36 +0000122}
123
ths5fafdf22007-09-16 21:08:06 +0000124static void host_to_target_sigset_internal(target_sigset_t *d,
bellard92319442004-06-19 16:58:13 +0000125 const sigset_t *s)
bellard66fb9762003-03-23 01:06:05 +0000126{
127 int i;
bellard9e5f5282003-07-13 17:33:54 +0000128 unsigned long sigmask;
129 uint32_t target_sigmask;
ths3b46e622007-09-17 08:09:54 +0000130
bellard9e5f5282003-07-13 17:33:54 +0000131 sigmask = ((unsigned long *)s)[0];
132 target_sigmask = 0;
133 for(i = 0; i < 32; i++) {
ths5fafdf22007-09-16 21:08:06 +0000134 if (sigmask & (1 << i))
bellard9e5f5282003-07-13 17:33:54 +0000135 target_sigmask |= 1 << (host_to_target_signal(i + 1) - 1);
136 }
137#if TARGET_LONG_BITS == 32 && HOST_LONG_BITS == 32
bellard92319442004-06-19 16:58:13 +0000138 d->sig[0] = target_sigmask;
bellard9e5f5282003-07-13 17:33:54 +0000139 for(i = 1;i < TARGET_NSIG_WORDS; i++) {
bellard92319442004-06-19 16:58:13 +0000140 d->sig[i] = ((unsigned long *)s)[i];
bellard66fb9762003-03-23 01:06:05 +0000141 }
bellard9e5f5282003-07-13 17:33:54 +0000142#elif TARGET_LONG_BITS == 32 && HOST_LONG_BITS == 64 && TARGET_NSIG_WORDS == 2
bellard92319442004-06-19 16:58:13 +0000143 d->sig[0] = target_sigmask;
144 d->sig[1] = sigmask >> 32;
bellard9e5f5282003-07-13 17:33:54 +0000145#else
bellarda315a142005-01-30 22:59:18 +0000146#warning host_to_target_sigset
bellard9e5f5282003-07-13 17:33:54 +0000147#endif
bellard66fb9762003-03-23 01:06:05 +0000148}
149
bellard92319442004-06-19 16:58:13 +0000150void host_to_target_sigset(target_sigset_t *d, const sigset_t *s)
151{
152 target_sigset_t d1;
153 int i;
154
155 host_to_target_sigset_internal(&d1, s);
156 for(i = 0;i < TARGET_NSIG_WORDS; i++)
pbrook53a59602006-03-25 19:31:22 +0000157 d->sig[i] = tswapl(d1.sig[i]);
bellard92319442004-06-19 16:58:13 +0000158}
159
160void target_to_host_sigset_internal(sigset_t *d, const target_sigset_t *s)
bellard66fb9762003-03-23 01:06:05 +0000161{
162 int i;
bellard9e5f5282003-07-13 17:33:54 +0000163 unsigned long sigmask;
164 target_ulong target_sigmask;
165
bellard92319442004-06-19 16:58:13 +0000166 target_sigmask = s->sig[0];
bellard9e5f5282003-07-13 17:33:54 +0000167 sigmask = 0;
168 for(i = 0; i < 32; i++) {
ths5fafdf22007-09-16 21:08:06 +0000169 if (target_sigmask & (1 << i))
bellard9e5f5282003-07-13 17:33:54 +0000170 sigmask |= 1 << (target_to_host_signal(i + 1) - 1);
171 }
172#if TARGET_LONG_BITS == 32 && HOST_LONG_BITS == 32
173 ((unsigned long *)d)[0] = sigmask;
174 for(i = 1;i < TARGET_NSIG_WORDS; i++) {
bellard92319442004-06-19 16:58:13 +0000175 ((unsigned long *)d)[i] = s->sig[i];
bellard66fb9762003-03-23 01:06:05 +0000176 }
bellard9e5f5282003-07-13 17:33:54 +0000177#elif TARGET_LONG_BITS == 32 && HOST_LONG_BITS == 64 && TARGET_NSIG_WORDS == 2
bellard92319442004-06-19 16:58:13 +0000178 ((unsigned long *)d)[0] = sigmask | ((unsigned long)(s->sig[1]) << 32);
bellard9e5f5282003-07-13 17:33:54 +0000179#else
bellarda315a142005-01-30 22:59:18 +0000180#warning target_to_host_sigset
bellard9e5f5282003-07-13 17:33:54 +0000181#endif /* TARGET_LONG_BITS */
bellard66fb9762003-03-23 01:06:05 +0000182}
183
bellard92319442004-06-19 16:58:13 +0000184void target_to_host_sigset(sigset_t *d, const target_sigset_t *s)
185{
186 target_sigset_t s1;
187 int i;
188
189 for(i = 0;i < TARGET_NSIG_WORDS; i++)
pbrook53a59602006-03-25 19:31:22 +0000190 s1.sig[i] = tswapl(s->sig[i]);
bellard92319442004-06-19 16:58:13 +0000191 target_to_host_sigset_internal(d, &s1);
192}
ths3b46e622007-09-17 08:09:54 +0000193
ths5fafdf22007-09-16 21:08:06 +0000194void host_to_target_old_sigset(target_ulong *old_sigset,
bellard66fb9762003-03-23 01:06:05 +0000195 const sigset_t *sigset)
196{
bellard9e5f5282003-07-13 17:33:54 +0000197 target_sigset_t d;
198 host_to_target_sigset(&d, sigset);
199 *old_sigset = d.sig[0];
bellard66fb9762003-03-23 01:06:05 +0000200}
201
ths5fafdf22007-09-16 21:08:06 +0000202void target_to_host_old_sigset(sigset_t *sigset,
bellard66fb9762003-03-23 01:06:05 +0000203 const target_ulong *old_sigset)
204{
bellard9e5f5282003-07-13 17:33:54 +0000205 target_sigset_t d;
206 int i;
207
208 d.sig[0] = *old_sigset;
209 for(i = 1;i < TARGET_NSIG_WORDS; i++)
210 d.sig[i] = 0;
211 target_to_host_sigset(sigset, &d);
bellard66fb9762003-03-23 01:06:05 +0000212}
213
bellard9de5e442003-03-23 16:49:39 +0000214/* siginfo conversion */
215
ths5fafdf22007-09-16 21:08:06 +0000216static inline void host_to_target_siginfo_noswap(target_siginfo_t *tinfo,
bellard9de5e442003-03-23 16:49:39 +0000217 const siginfo_t *info)
bellard66fb9762003-03-23 01:06:05 +0000218{
bellard9de5e442003-03-23 16:49:39 +0000219 int sig;
220 sig = host_to_target_signal(info->si_signo);
221 tinfo->si_signo = sig;
222 tinfo->si_errno = 0;
223 tinfo->si_code = 0;
ths5fafdf22007-09-16 21:08:06 +0000224 if (sig == SIGILL || sig == SIGFPE || sig == SIGSEGV ||
bellard447db212003-05-10 15:10:36 +0000225 sig == SIGBUS || sig == SIGTRAP) {
bellard9de5e442003-03-23 16:49:39 +0000226 /* should never come here, but who knows. The information for
227 the target is irrelevant */
228 tinfo->_sifields._sigfault._addr = 0;
ths7f7f7c82007-07-12 11:02:46 +0000229 } else if (sig == SIGIO) {
230 tinfo->_sifields._sigpoll._fd = info->si_fd;
bellard9de5e442003-03-23 16:49:39 +0000231 } else if (sig >= TARGET_SIGRTMIN) {
232 tinfo->_sifields._rt._pid = info->si_pid;
233 tinfo->_sifields._rt._uid = info->si_uid;
234 /* XXX: potential problem if 64 bit */
ths5fafdf22007-09-16 21:08:06 +0000235 tinfo->_sifields._rt._sigval.sival_ptr =
bellard9de5e442003-03-23 16:49:39 +0000236 (target_ulong)info->si_value.sival_ptr;
237 }
bellard66fb9762003-03-23 01:06:05 +0000238}
239
ths5fafdf22007-09-16 21:08:06 +0000240static void tswap_siginfo(target_siginfo_t *tinfo,
bellard9de5e442003-03-23 16:49:39 +0000241 const target_siginfo_t *info)
242{
243 int sig;
244 sig = info->si_signo;
245 tinfo->si_signo = tswap32(sig);
246 tinfo->si_errno = tswap32(info->si_errno);
247 tinfo->si_code = tswap32(info->si_code);
ths5fafdf22007-09-16 21:08:06 +0000248 if (sig == SIGILL || sig == SIGFPE || sig == SIGSEGV ||
bellard447db212003-05-10 15:10:36 +0000249 sig == SIGBUS || sig == SIGTRAP) {
ths5fafdf22007-09-16 21:08:06 +0000250 tinfo->_sifields._sigfault._addr =
bellard9de5e442003-03-23 16:49:39 +0000251 tswapl(info->_sifields._sigfault._addr);
ths7f7f7c82007-07-12 11:02:46 +0000252 } else if (sig == SIGIO) {
253 tinfo->_sifields._sigpoll._fd = tswap32(info->_sifields._sigpoll._fd);
bellard9de5e442003-03-23 16:49:39 +0000254 } else if (sig >= TARGET_SIGRTMIN) {
255 tinfo->_sifields._rt._pid = tswap32(info->_sifields._rt._pid);
256 tinfo->_sifields._rt._uid = tswap32(info->_sifields._rt._uid);
ths5fafdf22007-09-16 21:08:06 +0000257 tinfo->_sifields._rt._sigval.sival_ptr =
bellard9de5e442003-03-23 16:49:39 +0000258 tswapl(info->_sifields._rt._sigval.sival_ptr);
259 }
260}
261
262
263void host_to_target_siginfo(target_siginfo_t *tinfo, const siginfo_t *info)
264{
265 host_to_target_siginfo_noswap(tinfo, info);
266 tswap_siginfo(tinfo, tinfo);
267}
268
269/* XXX: we support only POSIX RT signals are used. */
thsaa1f17c2007-07-11 22:48:58 +0000270/* XXX: find a solution for 64 bit (additional malloced data is needed) */
bellard9de5e442003-03-23 16:49:39 +0000271void target_to_host_siginfo(siginfo_t *info, const target_siginfo_t *tinfo)
bellard66fb9762003-03-23 01:06:05 +0000272{
273 info->si_signo = tswap32(tinfo->si_signo);
274 info->si_errno = tswap32(tinfo->si_errno);
275 info->si_code = tswap32(tinfo->si_code);
bellard9de5e442003-03-23 16:49:39 +0000276 info->si_pid = tswap32(tinfo->_sifields._rt._pid);
277 info->si_uid = tswap32(tinfo->_sifields._rt._uid);
ths5fafdf22007-09-16 21:08:06 +0000278 info->si_value.sival_ptr =
bellard9de5e442003-03-23 16:49:39 +0000279 (void *)tswapl(tinfo->_sifields._rt._sigval.sival_ptr);
bellard66fb9762003-03-23 01:06:05 +0000280}
281
bellard31e31b82003-02-18 22:55:36 +0000282void signal_init(void)
283{
284 struct sigaction act;
bellard9e5f5282003-07-13 17:33:54 +0000285 int i, j;
bellard31e31b82003-02-18 22:55:36 +0000286
bellard9e5f5282003-07-13 17:33:54 +0000287 /* generate signal conversion tables */
288 for(i = 1; i <= 64; i++) {
289 if (host_to_target_signal_table[i] == 0)
290 host_to_target_signal_table[i] = i;
291 }
292 for(i = 1; i <= 64; i++) {
293 j = host_to_target_signal_table[i];
294 target_to_host_signal_table[j] = i;
295 }
ths3b46e622007-09-17 08:09:54 +0000296
bellard9de5e442003-03-23 16:49:39 +0000297 /* set all host signal handlers. ALL signals are blocked during
298 the handlers to serialize them. */
299 sigfillset(&act.sa_mask);
bellard31e31b82003-02-18 22:55:36 +0000300 act.sa_flags = SA_SIGINFO;
301 act.sa_sigaction = host_signal_handler;
302 for(i = 1; i < NSIG; i++) {
bellardc9087c22003-05-27 23:25:41 +0000303 sigaction(i, &act, NULL);
bellard31e31b82003-02-18 22:55:36 +0000304 }
ths3b46e622007-09-17 08:09:54 +0000305
bellard31e31b82003-02-18 22:55:36 +0000306 memset(sigact_table, 0, sizeof(sigact_table));
bellard66fb9762003-03-23 01:06:05 +0000307
308 first_free = &sigqueue_table[0];
ths5fafdf22007-09-16 21:08:06 +0000309 for(i = 0; i < MAX_SIGQUEUE_SIZE - 1; i++)
bellard66fb9762003-03-23 01:06:05 +0000310 sigqueue_table[i].next = &sigqueue_table[i + 1];
311 sigqueue_table[MAX_SIGQUEUE_SIZE - 1].next = NULL;
bellard31e31b82003-02-18 22:55:36 +0000312}
313
bellard66fb9762003-03-23 01:06:05 +0000314/* signal queue handling */
315
316static inline struct sigqueue *alloc_sigqueue(void)
317{
318 struct sigqueue *q = first_free;
319 if (!q)
320 return NULL;
321 first_free = q->next;
322 return q;
323}
324
325static inline void free_sigqueue(struct sigqueue *q)
326{
327 q->next = first_free;
328 first_free = q;
329}
330
bellard9de5e442003-03-23 16:49:39 +0000331/* abort execution with signal */
332void __attribute((noreturn)) force_sig(int sig)
bellard66fb9762003-03-23 01:06:05 +0000333{
334 int host_sig;
bellard66fb9762003-03-23 01:06:05 +0000335 host_sig = target_to_host_signal(sig);
ths5fafdf22007-09-16 21:08:06 +0000336 fprintf(stderr, "qemu: uncaught target signal %d (%s) - exiting\n",
bellard66fb9762003-03-23 01:06:05 +0000337 sig, strsignal(host_sig));
bellard9de5e442003-03-23 16:49:39 +0000338#if 1
bellard66fb9762003-03-23 01:06:05 +0000339 _exit(-host_sig);
bellard9de5e442003-03-23 16:49:39 +0000340#else
341 {
342 struct sigaction act;
343 sigemptyset(&act.sa_mask);
344 act.sa_flags = SA_SIGINFO;
345 act.sa_sigaction = SIG_DFL;
346 sigaction(SIGABRT, &act, NULL);
347 abort();
348 }
349#endif
bellard66fb9762003-03-23 01:06:05 +0000350}
351
bellard9de5e442003-03-23 16:49:39 +0000352/* queue a signal so that it will be send to the virtual CPU as soon
353 as possible */
354int queue_signal(int sig, target_siginfo_t *info)
bellard31e31b82003-02-18 22:55:36 +0000355{
bellard66fb9762003-03-23 01:06:05 +0000356 struct emulated_sigaction *k;
bellard9de5e442003-03-23 16:49:39 +0000357 struct sigqueue *q, **pq;
bellard66fb9762003-03-23 01:06:05 +0000358 target_ulong handler;
359
bellard9de5e442003-03-23 16:49:39 +0000360#if defined(DEBUG_SIGNAL)
ths5fafdf22007-09-16 21:08:06 +0000361 fprintf(stderr, "queue_signal: sig=%d\n",
bellard9de5e442003-03-23 16:49:39 +0000362 sig);
bellard66fb9762003-03-23 01:06:05 +0000363#endif
bellard9de5e442003-03-23 16:49:39 +0000364 k = &sigact_table[sig - 1];
bellard66fb9762003-03-23 01:06:05 +0000365 handler = k->sa._sa_handler;
366 if (handler == TARGET_SIG_DFL) {
367 /* default handler : ignore some signal. The other are fatal */
ths5fafdf22007-09-16 21:08:06 +0000368 if (sig != TARGET_SIGCHLD &&
369 sig != TARGET_SIGURG &&
bellard66fb9762003-03-23 01:06:05 +0000370 sig != TARGET_SIGWINCH) {
371 force_sig(sig);
bellard9de5e442003-03-23 16:49:39 +0000372 } else {
373 return 0; /* indicate ignored */
bellard66fb9762003-03-23 01:06:05 +0000374 }
375 } else if (handler == TARGET_SIG_IGN) {
376 /* ignore signal */
bellard9de5e442003-03-23 16:49:39 +0000377 return 0;
bellard66fb9762003-03-23 01:06:05 +0000378 } else if (handler == TARGET_SIG_ERR) {
379 force_sig(sig);
380 } else {
bellard9de5e442003-03-23 16:49:39 +0000381 pq = &k->first;
382 if (sig < TARGET_SIGRTMIN) {
383 /* if non real time signal, we queue exactly one signal */
384 if (!k->pending)
385 q = &k->info;
386 else
387 return 0;
388 } else {
389 if (!k->pending) {
390 /* first signal */
391 q = &k->info;
392 } else {
393 q = alloc_sigqueue();
394 if (!q)
395 return -EAGAIN;
396 while (*pq != NULL)
397 pq = &(*pq)->next;
398 }
399 }
400 *pq = q;
401 q->info = *info;
402 q->next = NULL;
403 k->pending = 1;
404 /* signal that a new signal is pending */
405 signal_pending = 1;
406 return 1; /* indicates that the signal was queued */
407 }
408}
409
ths5fafdf22007-09-16 21:08:06 +0000410static void host_signal_handler(int host_signum, siginfo_t *info,
bellard9de5e442003-03-23 16:49:39 +0000411 void *puc)
412{
413 int sig;
414 target_siginfo_t tinfo;
415
416 /* the CPU emulator uses some host signals to detect exceptions,
417 we we forward to it some signals */
ths5fafdf22007-09-16 21:08:06 +0000418 if (host_signum == SIGSEGV || host_signum == SIGBUS
bellard58fe2f12004-02-16 22:11:32 +0000419#if defined(TARGET_I386) && defined(USE_CODE_COPY)
420 || host_signum == SIGFPE
421#endif
422 ) {
bellardb346ff42003-06-15 20:05:50 +0000423 if (cpu_signal_handler(host_signum, info, puc))
bellard9de5e442003-03-23 16:49:39 +0000424 return;
425 }
426
427 /* get target signal number */
428 sig = host_to_target_signal(host_signum);
429 if (sig < 1 || sig > TARGET_NSIG)
430 return;
431#if defined(DEBUG_SIGNAL)
bellardbc8a22c2003-03-30 21:02:40 +0000432 fprintf(stderr, "qemu: got signal %d\n", sig);
bellard9de5e442003-03-23 16:49:39 +0000433#endif
434 host_to_target_siginfo_noswap(&tinfo, info);
435 if (queue_signal(sig, &tinfo) == 1) {
436 /* interrupt the virtual CPU as soon as possible */
bellard68a79312003-06-30 13:12:32 +0000437 cpu_interrupt(global_env, CPU_INTERRUPT_EXIT);
bellard66fb9762003-03-23 01:06:05 +0000438 }
bellard31e31b82003-02-18 22:55:36 +0000439}
440
thsa04e1342007-09-27 13:57:58 +0000441int do_sigaltstack(const struct target_sigaltstack *uss,
442 struct target_sigaltstack *uoss,
443 target_ulong sp)
444{
445 int ret;
446 struct target_sigaltstack oss;
447
448 /* XXX: test errors */
449 if(uoss)
450 {
451 __put_user(target_sigaltstack_used.ss_sp, &oss.ss_sp);
452 __put_user(target_sigaltstack_used.ss_size, &oss.ss_size);
453 __put_user(sas_ss_flags(sp), &oss.ss_flags);
454 }
455
456 if(uss)
457 {
458 struct target_sigaltstack ss;
459
460 ret = -EFAULT;
461 if (!access_ok(VERIFY_READ, uss, sizeof(*uss))
462 || __get_user(ss.ss_sp, &uss->ss_sp)
463 || __get_user(ss.ss_size, &uss->ss_size)
464 || __get_user(ss.ss_flags, &uss->ss_flags))
465 goto out;
466
467 ret = -EPERM;
468 if (on_sig_stack(sp))
469 goto out;
470
471 ret = -EINVAL;
472 if (ss.ss_flags != TARGET_SS_DISABLE
473 && ss.ss_flags != TARGET_SS_ONSTACK
474 && ss.ss_flags != 0)
475 goto out;
476
477 if (ss.ss_flags == TARGET_SS_DISABLE) {
478 ss.ss_size = 0;
479 ss.ss_sp = 0;
480 } else {
481 ret = -ENOMEM;
482 if (ss.ss_size < MINSIGSTKSZ)
483 goto out;
484 }
485
486 target_sigaltstack_used.ss_sp = ss.ss_sp;
487 target_sigaltstack_used.ss_size = ss.ss_size;
488 }
489
490 if (uoss) {
491 ret = -EFAULT;
492 if (!access_ok(VERIFY_WRITE, uoss, sizeof(oss)))
493 goto out;
494 memcpy(uoss, &oss, sizeof(oss));
495 }
496
497 ret = 0;
498out:
499 return ret;
500}
501
bellard66fb9762003-03-23 01:06:05 +0000502int do_sigaction(int sig, const struct target_sigaction *act,
503 struct target_sigaction *oact)
bellard31e31b82003-02-18 22:55:36 +0000504{
bellard66fb9762003-03-23 01:06:05 +0000505 struct emulated_sigaction *k;
bellard773b93e2004-01-04 17:15:59 +0000506 struct sigaction act1;
507 int host_sig;
bellard31e31b82003-02-18 22:55:36 +0000508
ths0aeaa8c2007-03-31 19:29:06 +0000509 if (sig < 1 || sig > TARGET_NSIG || sig == SIGKILL || sig == SIGSTOP)
bellard66fb9762003-03-23 01:06:05 +0000510 return -EINVAL;
511 k = &sigact_table[sig - 1];
bellard773b93e2004-01-04 17:15:59 +0000512#if defined(DEBUG_SIGNAL)
ths5fafdf22007-09-16 21:08:06 +0000513 fprintf(stderr, "sigaction sig=%d act=0x%08x, oact=0x%08x\n",
bellard66fb9762003-03-23 01:06:05 +0000514 sig, (int)act, (int)oact);
515#endif
516 if (oact) {
517 oact->_sa_handler = tswapl(k->sa._sa_handler);
518 oact->sa_flags = tswapl(k->sa.sa_flags);
ths388bb212007-05-13 13:58:00 +0000519#if !defined(TARGET_MIPS)
520 oact->sa_restorer = tswapl(k->sa.sa_restorer);
521#endif
bellard66fb9762003-03-23 01:06:05 +0000522 oact->sa_mask = k->sa.sa_mask;
523 }
524 if (act) {
525 k->sa._sa_handler = tswapl(act->_sa_handler);
526 k->sa.sa_flags = tswapl(act->sa_flags);
ths388bb212007-05-13 13:58:00 +0000527#if !defined(TARGET_MIPS)
528 k->sa.sa_restorer = tswapl(act->sa_restorer);
529#endif
bellard66fb9762003-03-23 01:06:05 +0000530 k->sa.sa_mask = act->sa_mask;
bellard773b93e2004-01-04 17:15:59 +0000531
532 /* we update the host linux signal state */
533 host_sig = target_to_host_signal(sig);
534 if (host_sig != SIGSEGV && host_sig != SIGBUS) {
535 sigfillset(&act1.sa_mask);
536 act1.sa_flags = SA_SIGINFO;
537 if (k->sa.sa_flags & TARGET_SA_RESTART)
538 act1.sa_flags |= SA_RESTART;
539 /* NOTE: it is important to update the host kernel signal
540 ignore state to avoid getting unexpected interrupted
541 syscalls */
542 if (k->sa._sa_handler == TARGET_SIG_IGN) {
543 act1.sa_sigaction = (void *)SIG_IGN;
544 } else if (k->sa._sa_handler == TARGET_SIG_DFL) {
545 act1.sa_sigaction = (void *)SIG_DFL;
546 } else {
547 act1.sa_sigaction = host_signal_handler;
548 }
549 sigaction(host_sig, &act1, NULL);
550 }
bellard66fb9762003-03-23 01:06:05 +0000551 }
552 return 0;
553}
bellard31e31b82003-02-18 22:55:36 +0000554
bellard43fff232003-07-09 19:31:39 +0000555#ifndef offsetof
556#define offsetof(type, field) ((size_t) &((type *)0)->field)
557#endif
558
ths5fafdf22007-09-16 21:08:06 +0000559static inline int copy_siginfo_to_user(target_siginfo_t *tinfo,
bellard43fff232003-07-09 19:31:39 +0000560 const target_siginfo_t *info)
561{
562 tswap_siginfo(tinfo, info);
563 return 0;
564}
565
bellard66fb9762003-03-23 01:06:05 +0000566#ifdef TARGET_I386
567
568/* from the Linux kernel */
569
570struct target_fpreg {
571 uint16_t significand[4];
572 uint16_t exponent;
573};
574
575struct target_fpxreg {
576 uint16_t significand[4];
577 uint16_t exponent;
578 uint16_t padding[3];
579};
580
581struct target_xmmreg {
582 target_ulong element[4];
583};
584
585struct target_fpstate {
586 /* Regular FPU environment */
587 target_ulong cw;
588 target_ulong sw;
589 target_ulong tag;
590 target_ulong ipoff;
591 target_ulong cssel;
592 target_ulong dataoff;
593 target_ulong datasel;
594 struct target_fpreg _st[8];
595 uint16_t status;
596 uint16_t magic; /* 0xffff = regular FPU data only */
597
598 /* FXSR FPU environment */
599 target_ulong _fxsr_env[6]; /* FXSR FPU env is ignored */
600 target_ulong mxcsr;
601 target_ulong reserved;
602 struct target_fpxreg _fxsr_st[8]; /* FXSR FPU reg data is ignored */
603 struct target_xmmreg _xmm[8];
604 target_ulong padding[56];
605};
606
607#define X86_FXSR_MAGIC 0x0000
608
609struct target_sigcontext {
610 uint16_t gs, __gsh;
611 uint16_t fs, __fsh;
612 uint16_t es, __esh;
613 uint16_t ds, __dsh;
614 target_ulong edi;
615 target_ulong esi;
616 target_ulong ebp;
617 target_ulong esp;
618 target_ulong ebx;
619 target_ulong edx;
620 target_ulong ecx;
621 target_ulong eax;
622 target_ulong trapno;
623 target_ulong err;
624 target_ulong eip;
625 uint16_t cs, __csh;
626 target_ulong eflags;
627 target_ulong esp_at_signal;
628 uint16_t ss, __ssh;
629 target_ulong fpstate; /* pointer */
630 target_ulong oldmask;
631 target_ulong cr2;
632};
633
bellard66fb9762003-03-23 01:06:05 +0000634struct target_ucontext {
bellardb8076a72005-04-07 22:20:31 +0000635 target_ulong tuc_flags;
636 target_ulong tuc_link;
637 target_stack_t tuc_stack;
638 struct target_sigcontext tuc_mcontext;
639 target_sigset_t tuc_sigmask; /* mask last for extensibility */
bellard66fb9762003-03-23 01:06:05 +0000640};
641
642struct sigframe
643{
644 target_ulong pretcode;
645 int sig;
646 struct target_sigcontext sc;
647 struct target_fpstate fpstate;
648 target_ulong extramask[TARGET_NSIG_WORDS-1];
649 char retcode[8];
650};
651
652struct rt_sigframe
653{
654 target_ulong pretcode;
655 int sig;
656 target_ulong pinfo;
657 target_ulong puc;
658 struct target_siginfo info;
659 struct target_ucontext uc;
660 struct target_fpstate fpstate;
661 char retcode[8];
662};
663
664/*
665 * Set up a signal frame.
666 */
667
bellard66fb9762003-03-23 01:06:05 +0000668/* XXX: save x87 state */
669static int
670setup_sigcontext(struct target_sigcontext *sc, struct target_fpstate *fpstate,
671 CPUX86State *env, unsigned long mask)
672{
673 int err = 0;
674
bellarda52c7572003-06-21 13:14:12 +0000675 err |= __put_user(env->segs[R_GS].selector, (unsigned int *)&sc->gs);
676 err |= __put_user(env->segs[R_FS].selector, (unsigned int *)&sc->fs);
677 err |= __put_user(env->segs[R_ES].selector, (unsigned int *)&sc->es);
678 err |= __put_user(env->segs[R_DS].selector, (unsigned int *)&sc->ds);
bellard66fb9762003-03-23 01:06:05 +0000679 err |= __put_user(env->regs[R_EDI], &sc->edi);
680 err |= __put_user(env->regs[R_ESI], &sc->esi);
681 err |= __put_user(env->regs[R_EBP], &sc->ebp);
682 err |= __put_user(env->regs[R_ESP], &sc->esp);
683 err |= __put_user(env->regs[R_EBX], &sc->ebx);
684 err |= __put_user(env->regs[R_EDX], &sc->edx);
685 err |= __put_user(env->regs[R_ECX], &sc->ecx);
686 err |= __put_user(env->regs[R_EAX], &sc->eax);
bellard66099dd2003-05-08 15:34:02 +0000687 err |= __put_user(env->exception_index, &sc->trapno);
688 err |= __put_user(env->error_code, &sc->err);
bellard66fb9762003-03-23 01:06:05 +0000689 err |= __put_user(env->eip, &sc->eip);
bellarda52c7572003-06-21 13:14:12 +0000690 err |= __put_user(env->segs[R_CS].selector, (unsigned int *)&sc->cs);
bellard66fb9762003-03-23 01:06:05 +0000691 err |= __put_user(env->eflags, &sc->eflags);
692 err |= __put_user(env->regs[R_ESP], &sc->esp_at_signal);
bellarda52c7572003-06-21 13:14:12 +0000693 err |= __put_user(env->segs[R_SS].selector, (unsigned int *)&sc->ss);
bellarded2dcdf2003-05-29 20:06:27 +0000694
695 cpu_x86_fsave(env, (void *)fpstate, 1);
696 fpstate->status = fpstate->sw;
697 err |= __put_user(0xffff, &fpstate->magic);
698 err |= __put_user(fpstate, &sc->fpstate);
699
bellard66fb9762003-03-23 01:06:05 +0000700 /* non-iBCS2 extensions.. */
701 err |= __put_user(mask, &sc->oldmask);
bellarda52c7572003-06-21 13:14:12 +0000702 err |= __put_user(env->cr[2], &sc->cr2);
bellard66fb9762003-03-23 01:06:05 +0000703 return err;
704}
705
706/*
707 * Determine which stack to use..
708 */
709
710static inline void *
711get_sigframe(struct emulated_sigaction *ka, CPUX86State *env, size_t frame_size)
712{
713 unsigned long esp;
714
715 /* Default to using normal stack */
716 esp = env->regs[R_ESP];
bellard66fb9762003-03-23 01:06:05 +0000717 /* This is the X/Open sanctioned signal stack switching. */
thsa04e1342007-09-27 13:57:58 +0000718 if (ka->sa.sa_flags & TARGET_SA_ONSTACK) {
719 if (sas_ss_flags(esp) == 0)
720 esp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size;
721 }
bellard66fb9762003-03-23 01:06:05 +0000722
723 /* This is the legacy signal stack switching. */
ths5fafdf22007-09-16 21:08:06 +0000724 else
bellarda52c7572003-06-21 13:14:12 +0000725 if ((env->segs[R_SS].selector & 0xffff) != __USER_DS &&
726 !(ka->sa.sa_flags & TARGET_SA_RESTORER) &&
727 ka->sa.sa_restorer) {
728 esp = (unsigned long) ka->sa.sa_restorer;
729 }
pbrook53a59602006-03-25 19:31:22 +0000730 return g2h((esp - frame_size) & -8ul);
bellard66fb9762003-03-23 01:06:05 +0000731}
732
bellard66fb9762003-03-23 01:06:05 +0000733static void setup_frame(int sig, struct emulated_sigaction *ka,
734 target_sigset_t *set, CPUX86State *env)
735{
736 struct sigframe *frame;
bellard92319442004-06-19 16:58:13 +0000737 int i, err = 0;
bellard66fb9762003-03-23 01:06:05 +0000738
739 frame = get_sigframe(ka, env, sizeof(*frame));
740
bellard66fb9762003-03-23 01:06:05 +0000741 if (!access_ok(VERIFY_WRITE, frame, sizeof(*frame)))
742 goto give_sigsegv;
bellard66fb9762003-03-23 01:06:05 +0000743 err |= __put_user((/*current->exec_domain
744 && current->exec_domain->signal_invmap
745 && sig < 32
746 ? current->exec_domain->signal_invmap[sig]
747 : */ sig),
748 &frame->sig);
749 if (err)
750 goto give_sigsegv;
751
752 setup_sigcontext(&frame->sc, &frame->fpstate, env, set->sig[0]);
753 if (err)
754 goto give_sigsegv;
755
bellard92319442004-06-19 16:58:13 +0000756 for(i = 1; i < TARGET_NSIG_WORDS; i++) {
757 if (__put_user(set->sig[i], &frame->extramask[i - 1]))
758 goto give_sigsegv;
759 }
bellard66fb9762003-03-23 01:06:05 +0000760
761 /* Set up to return from userspace. If provided, use a stub
762 already in userspace. */
763 if (ka->sa.sa_flags & TARGET_SA_RESTORER) {
764 err |= __put_user(ka->sa.sa_restorer, &frame->pretcode);
765 } else {
766 err |= __put_user(frame->retcode, &frame->pretcode);
767 /* This is popl %eax ; movl $,%eax ; int $0x80 */
768 err |= __put_user(0xb858, (short *)(frame->retcode+0));
j_mayer84409dd2007-04-06 08:56:50 +0000769#if defined(TARGET_X86_64)
770#warning "Fix this !"
771#else
bellard66fb9762003-03-23 01:06:05 +0000772 err |= __put_user(TARGET_NR_sigreturn, (int *)(frame->retcode+2));
j_mayer84409dd2007-04-06 08:56:50 +0000773#endif
bellard66fb9762003-03-23 01:06:05 +0000774 err |= __put_user(0x80cd, (short *)(frame->retcode+6));
775 }
776
777 if (err)
778 goto give_sigsegv;
779
780 /* Set up registers for signal handler */
pbrook53a59602006-03-25 19:31:22 +0000781 env->regs[R_ESP] = h2g(frame);
bellard66fb9762003-03-23 01:06:05 +0000782 env->eip = (unsigned long) ka->sa._sa_handler;
783
784 cpu_x86_load_seg(env, R_DS, __USER_DS);
785 cpu_x86_load_seg(env, R_ES, __USER_DS);
786 cpu_x86_load_seg(env, R_SS, __USER_DS);
787 cpu_x86_load_seg(env, R_CS, __USER_CS);
788 env->eflags &= ~TF_MASK;
789
790 return;
791
792give_sigsegv:
793 if (sig == TARGET_SIGSEGV)
794 ka->sa._sa_handler = TARGET_SIG_DFL;
795 force_sig(TARGET_SIGSEGV /* , current */);
796}
797
ths5fafdf22007-09-16 21:08:06 +0000798static void setup_rt_frame(int sig, struct emulated_sigaction *ka,
bellard9de5e442003-03-23 16:49:39 +0000799 target_siginfo_t *info,
bellard66fb9762003-03-23 01:06:05 +0000800 target_sigset_t *set, CPUX86State *env)
801{
802 struct rt_sigframe *frame;
bellard92319442004-06-19 16:58:13 +0000803 int i, err = 0;
bellard66fb9762003-03-23 01:06:05 +0000804
805 frame = get_sigframe(ka, env, sizeof(*frame));
806
bellard66fb9762003-03-23 01:06:05 +0000807 if (!access_ok(VERIFY_WRITE, frame, sizeof(*frame)))
808 goto give_sigsegv;
bellard66fb9762003-03-23 01:06:05 +0000809
810 err |= __put_user((/*current->exec_domain
811 && current->exec_domain->signal_invmap
812 && sig < 32
813 ? current->exec_domain->signal_invmap[sig]
814 : */sig),
815 &frame->sig);
816 err |= __put_user((target_ulong)&frame->info, &frame->pinfo);
817 err |= __put_user((target_ulong)&frame->uc, &frame->puc);
818 err |= copy_siginfo_to_user(&frame->info, info);
819 if (err)
820 goto give_sigsegv;
821
822 /* Create the ucontext. */
bellardb8076a72005-04-07 22:20:31 +0000823 err |= __put_user(0, &frame->uc.tuc_flags);
824 err |= __put_user(0, &frame->uc.tuc_link);
thsa04e1342007-09-27 13:57:58 +0000825 err |= __put_user(target_sigaltstack_used.ss_sp,
bellardb8076a72005-04-07 22:20:31 +0000826 &frame->uc.tuc_stack.ss_sp);
thsa04e1342007-09-27 13:57:58 +0000827 err |= __put_user(sas_ss_flags(get_sp_from_cpustate(env)),
bellardb8076a72005-04-07 22:20:31 +0000828 &frame->uc.tuc_stack.ss_flags);
thsa04e1342007-09-27 13:57:58 +0000829 err |= __put_user(target_sigaltstack_used.ss_size,
bellardb8076a72005-04-07 22:20:31 +0000830 &frame->uc.tuc_stack.ss_size);
831 err |= setup_sigcontext(&frame->uc.tuc_mcontext, &frame->fpstate,
bellard66fb9762003-03-23 01:06:05 +0000832 env, set->sig[0]);
bellard92319442004-06-19 16:58:13 +0000833 for(i = 0; i < TARGET_NSIG_WORDS; i++) {
bellardb8076a72005-04-07 22:20:31 +0000834 if (__put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]))
bellard92319442004-06-19 16:58:13 +0000835 goto give_sigsegv;
836 }
bellard66fb9762003-03-23 01:06:05 +0000837
838 /* Set up to return from userspace. If provided, use a stub
839 already in userspace. */
840 if (ka->sa.sa_flags & TARGET_SA_RESTORER) {
841 err |= __put_user(ka->sa.sa_restorer, &frame->pretcode);
842 } else {
843 err |= __put_user(frame->retcode, &frame->pretcode);
844 /* This is movl $,%eax ; int $0x80 */
845 err |= __put_user(0xb8, (char *)(frame->retcode+0));
846 err |= __put_user(TARGET_NR_rt_sigreturn, (int *)(frame->retcode+1));
847 err |= __put_user(0x80cd, (short *)(frame->retcode+5));
848 }
849
850 if (err)
851 goto give_sigsegv;
852
853 /* Set up registers for signal handler */
854 env->regs[R_ESP] = (unsigned long) frame;
855 env->eip = (unsigned long) ka->sa._sa_handler;
856
857 cpu_x86_load_seg(env, R_DS, __USER_DS);
858 cpu_x86_load_seg(env, R_ES, __USER_DS);
859 cpu_x86_load_seg(env, R_SS, __USER_DS);
860 cpu_x86_load_seg(env, R_CS, __USER_CS);
861 env->eflags &= ~TF_MASK;
862
863 return;
864
865give_sigsegv:
866 if (sig == TARGET_SIGSEGV)
867 ka->sa._sa_handler = TARGET_SIG_DFL;
868 force_sig(TARGET_SIGSEGV /* , current */);
869}
870
871static int
872restore_sigcontext(CPUX86State *env, struct target_sigcontext *sc, int *peax)
873{
874 unsigned int err = 0;
875
bellard66fb9762003-03-23 01:06:05 +0000876 cpu_x86_load_seg(env, R_GS, lduw(&sc->gs));
877 cpu_x86_load_seg(env, R_FS, lduw(&sc->fs));
878 cpu_x86_load_seg(env, R_ES, lduw(&sc->es));
879 cpu_x86_load_seg(env, R_DS, lduw(&sc->ds));
880
881 env->regs[R_EDI] = ldl(&sc->edi);
882 env->regs[R_ESI] = ldl(&sc->esi);
883 env->regs[R_EBP] = ldl(&sc->ebp);
884 env->regs[R_ESP] = ldl(&sc->esp);
885 env->regs[R_EBX] = ldl(&sc->ebx);
886 env->regs[R_EDX] = ldl(&sc->edx);
887 env->regs[R_ECX] = ldl(&sc->ecx);
888 env->eip = ldl(&sc->eip);
889
890 cpu_x86_load_seg(env, R_CS, lduw(&sc->cs) | 3);
891 cpu_x86_load_seg(env, R_SS, lduw(&sc->ss) | 3);
ths5fafdf22007-09-16 21:08:06 +0000892
bellard66fb9762003-03-23 01:06:05 +0000893 {
894 unsigned int tmpflags;
895 tmpflags = ldl(&sc->eflags);
896 env->eflags = (env->eflags & ~0x40DD5) | (tmpflags & 0x40DD5);
897 // regs->orig_eax = -1; /* disable syscall checks */
898 }
899
bellard66fb9762003-03-23 01:06:05 +0000900 {
901 struct _fpstate * buf;
bellarded2dcdf2003-05-29 20:06:27 +0000902 buf = (void *)ldl(&sc->fpstate);
bellard66fb9762003-03-23 01:06:05 +0000903 if (buf) {
bellarded2dcdf2003-05-29 20:06:27 +0000904#if 0
bellard66fb9762003-03-23 01:06:05 +0000905 if (verify_area(VERIFY_READ, buf, sizeof(*buf)))
906 goto badframe;
bellarded2dcdf2003-05-29 20:06:27 +0000907#endif
908 cpu_x86_frstor(env, (void *)buf, 1);
bellard66fb9762003-03-23 01:06:05 +0000909 }
910 }
bellarded2dcdf2003-05-29 20:06:27 +0000911
bellard66fb9762003-03-23 01:06:05 +0000912 *peax = ldl(&sc->eax);
913 return err;
914#if 0
915badframe:
916 return 1;
917#endif
918}
919
920long do_sigreturn(CPUX86State *env)
921{
pbrook53a59602006-03-25 19:31:22 +0000922 struct sigframe *frame = (struct sigframe *)g2h(env->regs[R_ESP] - 8);
bellard66fb9762003-03-23 01:06:05 +0000923 target_sigset_t target_set;
924 sigset_t set;
925 int eax, i;
926
bellard447db212003-05-10 15:10:36 +0000927#if defined(DEBUG_SIGNAL)
928 fprintf(stderr, "do_sigreturn\n");
929#endif
bellard66fb9762003-03-23 01:06:05 +0000930 /* set blocked signals */
bellard92319442004-06-19 16:58:13 +0000931 if (__get_user(target_set.sig[0], &frame->sc.oldmask))
932 goto badframe;
933 for(i = 1; i < TARGET_NSIG_WORDS; i++) {
934 if (__get_user(target_set.sig[i], &frame->extramask[i - 1]))
935 goto badframe;
936 }
bellard66fb9762003-03-23 01:06:05 +0000937
bellard92319442004-06-19 16:58:13 +0000938 target_to_host_sigset_internal(&set, &target_set);
bellard66fb9762003-03-23 01:06:05 +0000939 sigprocmask(SIG_SETMASK, &set, NULL);
ths3b46e622007-09-17 08:09:54 +0000940
bellard66fb9762003-03-23 01:06:05 +0000941 /* restore registers */
942 if (restore_sigcontext(env, &frame->sc, &eax))
943 goto badframe;
944 return eax;
945
946badframe:
947 force_sig(TARGET_SIGSEGV);
948 return 0;
949}
950
951long do_rt_sigreturn(CPUX86State *env)
952{
pbrook53a59602006-03-25 19:31:22 +0000953 struct rt_sigframe *frame = (struct rt_sigframe *)g2h(env->regs[R_ESP] - 4);
bellard66fb9762003-03-23 01:06:05 +0000954 sigset_t set;
bellard66fb9762003-03-23 01:06:05 +0000955 int eax;
956
957#if 0
958 if (verify_area(VERIFY_READ, frame, sizeof(*frame)))
959 goto badframe;
960#endif
bellardb8076a72005-04-07 22:20:31 +0000961 target_to_host_sigset(&set, &frame->uc.tuc_sigmask);
bellard66fb9762003-03-23 01:06:05 +0000962 sigprocmask(SIG_SETMASK, &set, NULL);
ths5fafdf22007-09-16 21:08:06 +0000963
bellardb8076a72005-04-07 22:20:31 +0000964 if (restore_sigcontext(env, &frame->uc.tuc_mcontext, &eax))
bellard66fb9762003-03-23 01:06:05 +0000965 goto badframe;
966
thsa04e1342007-09-27 13:57:58 +0000967 if (do_sigaltstack(&frame->uc.tuc_stack, NULL, get_sp_from_cpustate(env)) == -EFAULT)
bellard66fb9762003-03-23 01:06:05 +0000968 goto badframe;
thsa04e1342007-09-27 13:57:58 +0000969
bellard66fb9762003-03-23 01:06:05 +0000970 return eax;
971
972badframe:
973 force_sig(TARGET_SIGSEGV);
974 return 0;
975}
976
bellard43fff232003-07-09 19:31:39 +0000977#elif defined(TARGET_ARM)
978
979struct target_sigcontext {
980 target_ulong trap_no;
981 target_ulong error_code;
982 target_ulong oldmask;
983 target_ulong arm_r0;
984 target_ulong arm_r1;
985 target_ulong arm_r2;
986 target_ulong arm_r3;
987 target_ulong arm_r4;
988 target_ulong arm_r5;
989 target_ulong arm_r6;
990 target_ulong arm_r7;
991 target_ulong arm_r8;
992 target_ulong arm_r9;
993 target_ulong arm_r10;
994 target_ulong arm_fp;
995 target_ulong arm_ip;
996 target_ulong arm_sp;
997 target_ulong arm_lr;
998 target_ulong arm_pc;
999 target_ulong arm_cpsr;
1000 target_ulong fault_address;
1001};
1002
bellard43fff232003-07-09 19:31:39 +00001003struct target_ucontext {
bellardb8076a72005-04-07 22:20:31 +00001004 target_ulong tuc_flags;
1005 target_ulong tuc_link;
1006 target_stack_t tuc_stack;
1007 struct target_sigcontext tuc_mcontext;
1008 target_sigset_t tuc_sigmask; /* mask last for extensibility */
bellard43fff232003-07-09 19:31:39 +00001009};
1010
1011struct sigframe
1012{
1013 struct target_sigcontext sc;
1014 target_ulong extramask[TARGET_NSIG_WORDS-1];
1015 target_ulong retcode;
1016};
1017
1018struct rt_sigframe
1019{
1020 struct target_siginfo *pinfo;
1021 void *puc;
1022 struct target_siginfo info;
1023 struct target_ucontext uc;
1024 target_ulong retcode;
1025};
1026
1027#define TARGET_CONFIG_CPU_32 1
1028
1029/*
1030 * For ARM syscalls, we encode the syscall number into the instruction.
1031 */
1032#define SWI_SYS_SIGRETURN (0xef000000|(TARGET_NR_sigreturn + ARM_SYSCALL_BASE))
1033#define SWI_SYS_RT_SIGRETURN (0xef000000|(TARGET_NR_rt_sigreturn + ARM_SYSCALL_BASE))
1034
1035/*
1036 * For Thumb syscalls, we pass the syscall number via r7. We therefore
1037 * need two 16-bit instructions.
1038 */
1039#define SWI_THUMB_SIGRETURN (0xdf00 << 16 | 0x2700 | (TARGET_NR_sigreturn))
1040#define SWI_THUMB_RT_SIGRETURN (0xdf00 << 16 | 0x2700 | (TARGET_NR_rt_sigreturn))
1041
1042static const target_ulong retcodes[4] = {
1043 SWI_SYS_SIGRETURN, SWI_THUMB_SIGRETURN,
1044 SWI_SYS_RT_SIGRETURN, SWI_THUMB_RT_SIGRETURN
1045};
1046
1047
1048#define __put_user_error(x,p,e) __put_user(x, p)
1049#define __get_user_error(x,p,e) __get_user(x, p)
1050
1051static inline int valid_user_regs(CPUState *regs)
1052{
1053 return 1;
1054}
1055
1056static int
1057setup_sigcontext(struct target_sigcontext *sc, /*struct _fpstate *fpstate,*/
1058 CPUState *env, unsigned long mask)
1059{
1060 int err = 0;
1061
1062 __put_user_error(env->regs[0], &sc->arm_r0, err);
1063 __put_user_error(env->regs[1], &sc->arm_r1, err);
1064 __put_user_error(env->regs[2], &sc->arm_r2, err);
1065 __put_user_error(env->regs[3], &sc->arm_r3, err);
1066 __put_user_error(env->regs[4], &sc->arm_r4, err);
1067 __put_user_error(env->regs[5], &sc->arm_r5, err);
1068 __put_user_error(env->regs[6], &sc->arm_r6, err);
1069 __put_user_error(env->regs[7], &sc->arm_r7, err);
1070 __put_user_error(env->regs[8], &sc->arm_r8, err);
1071 __put_user_error(env->regs[9], &sc->arm_r9, err);
1072 __put_user_error(env->regs[10], &sc->arm_r10, err);
1073 __put_user_error(env->regs[11], &sc->arm_fp, err);
1074 __put_user_error(env->regs[12], &sc->arm_ip, err);
1075 __put_user_error(env->regs[13], &sc->arm_sp, err);
1076 __put_user_error(env->regs[14], &sc->arm_lr, err);
1077 __put_user_error(env->regs[15], &sc->arm_pc, err);
1078#ifdef TARGET_CONFIG_CPU_32
bellardb5ff1b32005-11-26 10:38:39 +00001079 __put_user_error(cpsr_read(env), &sc->arm_cpsr, err);
bellard43fff232003-07-09 19:31:39 +00001080#endif
1081
1082 __put_user_error(/* current->thread.trap_no */ 0, &sc->trap_no, err);
1083 __put_user_error(/* current->thread.error_code */ 0, &sc->error_code, err);
1084 __put_user_error(/* current->thread.address */ 0, &sc->fault_address, err);
1085 __put_user_error(mask, &sc->oldmask, err);
1086
1087 return err;
1088}
1089
1090static inline void *
1091get_sigframe(struct emulated_sigaction *ka, CPUState *regs, int framesize)
1092{
1093 unsigned long sp = regs->regs[13];
1094
bellard43fff232003-07-09 19:31:39 +00001095 /*
1096 * This is the X/Open sanctioned signal stack switching.
1097 */
thsa04e1342007-09-27 13:57:58 +00001098 if ((ka->sa.sa_flags & TARGET_SA_ONSTACK) && !sas_ss_flags(sp))
1099 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size;
bellard43fff232003-07-09 19:31:39 +00001100 /*
1101 * ATPCS B01 mandates 8-byte alignment
1102 */
pbrook53a59602006-03-25 19:31:22 +00001103 return g2h((sp - framesize) & ~7);
bellard43fff232003-07-09 19:31:39 +00001104}
1105
1106static int
1107setup_return(CPUState *env, struct emulated_sigaction *ka,
1108 target_ulong *rc, void *frame, int usig)
1109{
1110 target_ulong handler = (target_ulong)ka->sa._sa_handler;
1111 target_ulong retcode;
1112 int thumb = 0;
1113#if defined(TARGET_CONFIG_CPU_32)
bellardb5ff1b32005-11-26 10:38:39 +00001114#if 0
bellard43fff232003-07-09 19:31:39 +00001115 target_ulong cpsr = env->cpsr;
1116
bellard43fff232003-07-09 19:31:39 +00001117 /*
1118 * Maybe we need to deliver a 32-bit signal to a 26-bit task.
1119 */
1120 if (ka->sa.sa_flags & SA_THIRTYTWO)
1121 cpsr = (cpsr & ~MODE_MASK) | USR_MODE;
1122
1123#ifdef CONFIG_ARM_THUMB
1124 if (elf_hwcap & HWCAP_THUMB) {
1125 /*
1126 * The LSB of the handler determines if we're going to
1127 * be using THUMB or ARM mode for this signal handler.
1128 */
1129 thumb = handler & 1;
1130
1131 if (thumb)
1132 cpsr |= T_BIT;
1133 else
1134 cpsr &= ~T_BIT;
1135 }
thsa04e1342007-09-27 13:57:58 +00001136#endif /* CONFIG_ARM_THUMB */
1137#endif /* 0 */
bellard43fff232003-07-09 19:31:39 +00001138#endif /* TARGET_CONFIG_CPU_32 */
1139
1140 if (ka->sa.sa_flags & TARGET_SA_RESTORER) {
1141 retcode = (target_ulong)ka->sa.sa_restorer;
1142 } else {
1143 unsigned int idx = thumb;
1144
1145 if (ka->sa.sa_flags & TARGET_SA_SIGINFO)
1146 idx += 2;
1147
1148 if (__put_user(retcodes[idx], rc))
1149 return 1;
1150#if 0
1151 flush_icache_range((target_ulong)rc,
1152 (target_ulong)(rc + 1));
1153#endif
1154 retcode = ((target_ulong)rc) + thumb;
1155 }
1156
1157 env->regs[0] = usig;
pbrook53a59602006-03-25 19:31:22 +00001158 env->regs[13] = h2g(frame);
bellard43fff232003-07-09 19:31:39 +00001159 env->regs[14] = retcode;
1160 env->regs[15] = handler & (thumb ? ~1 : ~3);
1161
bellardb5ff1b32005-11-26 10:38:39 +00001162#if 0
bellard43fff232003-07-09 19:31:39 +00001163#ifdef TARGET_CONFIG_CPU_32
1164 env->cpsr = cpsr;
1165#endif
bellardb5ff1b32005-11-26 10:38:39 +00001166#endif
bellard43fff232003-07-09 19:31:39 +00001167
1168 return 0;
1169}
1170
1171static void setup_frame(int usig, struct emulated_sigaction *ka,
1172 target_sigset_t *set, CPUState *regs)
1173{
1174 struct sigframe *frame = get_sigframe(ka, regs, sizeof(*frame));
bellard92319442004-06-19 16:58:13 +00001175 int i, err = 0;
bellard43fff232003-07-09 19:31:39 +00001176
1177 err |= setup_sigcontext(&frame->sc, /*&frame->fpstate,*/ regs, set->sig[0]);
1178
bellard92319442004-06-19 16:58:13 +00001179 for(i = 1; i < TARGET_NSIG_WORDS; i++) {
1180 if (__put_user(set->sig[i], &frame->extramask[i - 1]))
1181 return;
bellard43fff232003-07-09 19:31:39 +00001182 }
1183
1184 if (err == 0)
1185 err = setup_return(regs, ka, &frame->retcode, frame, usig);
1186 // return err;
1187}
1188
ths5fafdf22007-09-16 21:08:06 +00001189static void setup_rt_frame(int usig, struct emulated_sigaction *ka,
bellard43fff232003-07-09 19:31:39 +00001190 target_siginfo_t *info,
1191 target_sigset_t *set, CPUState *env)
1192{
1193 struct rt_sigframe *frame = get_sigframe(ka, env, sizeof(*frame));
thsa04e1342007-09-27 13:57:58 +00001194 struct target_sigaltstack stack;
bellard92319442004-06-19 16:58:13 +00001195 int i, err = 0;
bellard43fff232003-07-09 19:31:39 +00001196
bellard43fff232003-07-09 19:31:39 +00001197 if (!access_ok(VERIFY_WRITE, frame, sizeof (*frame)))
bellardedf779f2004-02-22 13:40:13 +00001198 return /* 1 */;
1199
bellard43fff232003-07-09 19:31:39 +00001200 __put_user_error(&frame->info, (target_ulong *)&frame->pinfo, err);
1201 __put_user_error(&frame->uc, (target_ulong *)&frame->puc, err);
1202 err |= copy_siginfo_to_user(&frame->info, info);
1203
1204 /* Clear all the bits of the ucontext we don't use. */
pbrook53a59602006-03-25 19:31:22 +00001205 memset(&frame->uc, 0, offsetof(struct target_ucontext, tuc_mcontext));
bellard43fff232003-07-09 19:31:39 +00001206
thsa04e1342007-09-27 13:57:58 +00001207 memset(&stack, 0, sizeof(stack));
1208 __put_user(target_sigaltstack_used.ss_sp, &stack.ss_sp);
1209 __put_user(target_sigaltstack_used.ss_size, &stack.ss_size);
1210 __put_user(sas_ss_flags(get_sp_from_cpustate(env)), &stack.ss_flags);
1211 if (!access_ok(VERIFY_WRITE, &frame->uc.tuc_stack, sizeof(stack)))
1212 err = 1;
1213 else
1214 memcpy(&frame->uc.tuc_stack, &stack, sizeof(stack));
1215
bellardb8076a72005-04-07 22:20:31 +00001216 err |= setup_sigcontext(&frame->uc.tuc_mcontext, /*&frame->fpstate,*/
bellard43fff232003-07-09 19:31:39 +00001217 env, set->sig[0]);
bellard92319442004-06-19 16:58:13 +00001218 for(i = 0; i < TARGET_NSIG_WORDS; i++) {
bellardb8076a72005-04-07 22:20:31 +00001219 if (__put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]))
bellard92319442004-06-19 16:58:13 +00001220 return;
1221 }
bellard43fff232003-07-09 19:31:39 +00001222
1223 if (err == 0)
1224 err = setup_return(env, ka, &frame->retcode, frame, usig);
1225
1226 if (err == 0) {
1227 /*
1228 * For realtime signals we must also set the second and third
1229 * arguments for the signal handler.
1230 * -- Peter Maydell <pmaydell@chiark.greenend.org.uk> 2000-12-06
1231 */
1232 env->regs[1] = (target_ulong)frame->pinfo;
1233 env->regs[2] = (target_ulong)frame->puc;
1234 }
1235
1236 // return err;
1237}
1238
1239static int
1240restore_sigcontext(CPUState *env, struct target_sigcontext *sc)
1241{
1242 int err = 0;
bellardb5ff1b32005-11-26 10:38:39 +00001243 uint32_t cpsr;
bellard43fff232003-07-09 19:31:39 +00001244
1245 __get_user_error(env->regs[0], &sc->arm_r0, err);
1246 __get_user_error(env->regs[1], &sc->arm_r1, err);
1247 __get_user_error(env->regs[2], &sc->arm_r2, err);
1248 __get_user_error(env->regs[3], &sc->arm_r3, err);
1249 __get_user_error(env->regs[4], &sc->arm_r4, err);
1250 __get_user_error(env->regs[5], &sc->arm_r5, err);
1251 __get_user_error(env->regs[6], &sc->arm_r6, err);
1252 __get_user_error(env->regs[7], &sc->arm_r7, err);
1253 __get_user_error(env->regs[8], &sc->arm_r8, err);
1254 __get_user_error(env->regs[9], &sc->arm_r9, err);
1255 __get_user_error(env->regs[10], &sc->arm_r10, err);
1256 __get_user_error(env->regs[11], &sc->arm_fp, err);
1257 __get_user_error(env->regs[12], &sc->arm_ip, err);
1258 __get_user_error(env->regs[13], &sc->arm_sp, err);
1259 __get_user_error(env->regs[14], &sc->arm_lr, err);
1260 __get_user_error(env->regs[15], &sc->arm_pc, err);
1261#ifdef TARGET_CONFIG_CPU_32
bellardb5ff1b32005-11-26 10:38:39 +00001262 __get_user_error(cpsr, &sc->arm_cpsr, err);
1263 cpsr_write(env, cpsr, 0xffffffff);
bellard43fff232003-07-09 19:31:39 +00001264#endif
1265
1266 err |= !valid_user_regs(env);
1267
1268 return err;
1269}
1270
1271long do_sigreturn(CPUState *env)
1272{
1273 struct sigframe *frame;
1274 target_sigset_t set;
1275 sigset_t host_set;
bellard92319442004-06-19 16:58:13 +00001276 int i;
bellard43fff232003-07-09 19:31:39 +00001277
1278 /*
1279 * Since we stacked the signal on a 64-bit boundary,
1280 * then 'sp' should be word aligned here. If it's
1281 * not, then the user is trying to mess with us.
1282 */
1283 if (env->regs[13] & 7)
1284 goto badframe;
1285
pbrook53a59602006-03-25 19:31:22 +00001286 frame = (struct sigframe *)g2h(env->regs[13]);
bellard43fff232003-07-09 19:31:39 +00001287
1288#if 0
1289 if (verify_area(VERIFY_READ, frame, sizeof (*frame)))
1290 goto badframe;
1291#endif
bellard92319442004-06-19 16:58:13 +00001292 if (__get_user(set.sig[0], &frame->sc.oldmask))
1293 goto badframe;
1294 for(i = 1; i < TARGET_NSIG_WORDS; i++) {
1295 if (__get_user(set.sig[i], &frame->extramask[i - 1]))
1296 goto badframe;
1297 }
bellard43fff232003-07-09 19:31:39 +00001298
bellard92319442004-06-19 16:58:13 +00001299 target_to_host_sigset_internal(&host_set, &set);
bellard43fff232003-07-09 19:31:39 +00001300 sigprocmask(SIG_SETMASK, &host_set, NULL);
1301
1302 if (restore_sigcontext(env, &frame->sc))
1303 goto badframe;
1304
1305#if 0
1306 /* Send SIGTRAP if we're single-stepping */
1307 if (ptrace_cancel_bpt(current))
1308 send_sig(SIGTRAP, current, 1);
1309#endif
1310 return env->regs[0];
1311
1312badframe:
1313 force_sig(SIGSEGV /* , current */);
1314 return 0;
1315}
1316
1317long do_rt_sigreturn(CPUState *env)
1318{
1319 struct rt_sigframe *frame;
bellard43fff232003-07-09 19:31:39 +00001320 sigset_t host_set;
1321
1322 /*
1323 * Since we stacked the signal on a 64-bit boundary,
1324 * then 'sp' should be word aligned here. If it's
1325 * not, then the user is trying to mess with us.
1326 */
1327 if (env->regs[13] & 7)
1328 goto badframe;
1329
1330 frame = (struct rt_sigframe *)env->regs[13];
1331
1332#if 0
1333 if (verify_area(VERIFY_READ, frame, sizeof (*frame)))
1334 goto badframe;
1335#endif
bellardb8076a72005-04-07 22:20:31 +00001336 target_to_host_sigset(&host_set, &frame->uc.tuc_sigmask);
bellard43fff232003-07-09 19:31:39 +00001337 sigprocmask(SIG_SETMASK, &host_set, NULL);
1338
bellardb8076a72005-04-07 22:20:31 +00001339 if (restore_sigcontext(env, &frame->uc.tuc_mcontext))
bellard43fff232003-07-09 19:31:39 +00001340 goto badframe;
1341
thsa04e1342007-09-27 13:57:58 +00001342 if (do_sigaltstack(&frame->uc.tuc_stack, NULL, get_sp_from_cpustate(env)) == -EFAULT)
1343 goto badframe;
1344
bellard43fff232003-07-09 19:31:39 +00001345#if 0
1346 /* Send SIGTRAP if we're single-stepping */
1347 if (ptrace_cancel_bpt(current))
1348 send_sig(SIGTRAP, current, 1);
1349#endif
1350 return env->regs[0];
1351
1352badframe:
1353 force_sig(SIGSEGV /* , current */);
1354 return 0;
1355}
1356
bellard6d5e2162004-09-30 22:04:13 +00001357#elif defined(TARGET_SPARC)
bellard80a9d032005-01-03 23:31:27 +00001358
bellard6d5e2162004-09-30 22:04:13 +00001359#define __SUNOS_MAXWIN 31
1360
1361/* This is what SunOS does, so shall I. */
1362struct target_sigcontext {
1363 target_ulong sigc_onstack; /* state to restore */
1364
1365 target_ulong sigc_mask; /* sigmask to restore */
1366 target_ulong sigc_sp; /* stack pointer */
1367 target_ulong sigc_pc; /* program counter */
1368 target_ulong sigc_npc; /* next program counter */
1369 target_ulong sigc_psr; /* for condition codes etc */
1370 target_ulong sigc_g1; /* User uses these two registers */
1371 target_ulong sigc_o0; /* within the trampoline code. */
1372
1373 /* Now comes information regarding the users window set
1374 * at the time of the signal.
1375 */
1376 target_ulong sigc_oswins; /* outstanding windows */
1377
1378 /* stack ptrs for each regwin buf */
1379 char *sigc_spbuf[__SUNOS_MAXWIN];
1380
1381 /* Windows to restore after signal */
1382 struct {
1383 target_ulong locals[8];
1384 target_ulong ins[8];
1385 } sigc_wbuf[__SUNOS_MAXWIN];
1386};
1387/* A Sparc stack frame */
1388struct sparc_stackf {
1389 target_ulong locals[8];
1390 target_ulong ins[6];
1391 struct sparc_stackf *fp;
1392 target_ulong callers_pc;
1393 char *structptr;
1394 target_ulong xargs[6];
1395 target_ulong xxargs[1];
1396};
1397
1398typedef struct {
1399 struct {
1400 target_ulong psr;
1401 target_ulong pc;
1402 target_ulong npc;
1403 target_ulong y;
1404 target_ulong u_regs[16]; /* globals and ins */
1405 } si_regs;
1406 int si_mask;
1407} __siginfo_t;
1408
1409typedef struct {
1410 unsigned long si_float_regs [32];
1411 unsigned long si_fsr;
1412 unsigned long si_fpqdepth;
1413 struct {
1414 unsigned long *insn_addr;
1415 unsigned long insn;
1416 } si_fpqueue [16];
bellard74ccb342006-07-18 21:23:34 +00001417} qemu_siginfo_fpu_t;
bellard6d5e2162004-09-30 22:04:13 +00001418
1419
1420struct target_signal_frame {
1421 struct sparc_stackf ss;
1422 __siginfo_t info;
bellard74ccb342006-07-18 21:23:34 +00001423 qemu_siginfo_fpu_t *fpu_save;
bellard6d5e2162004-09-30 22:04:13 +00001424 target_ulong insns[2] __attribute__ ((aligned (8)));
1425 target_ulong extramask[TARGET_NSIG_WORDS - 1];
1426 target_ulong extra_size; /* Should be 0 */
bellard74ccb342006-07-18 21:23:34 +00001427 qemu_siginfo_fpu_t fpu_state;
bellard6d5e2162004-09-30 22:04:13 +00001428};
1429struct target_rt_signal_frame {
1430 struct sparc_stackf ss;
1431 siginfo_t info;
1432 target_ulong regs[20];
1433 sigset_t mask;
bellard74ccb342006-07-18 21:23:34 +00001434 qemu_siginfo_fpu_t *fpu_save;
bellard6d5e2162004-09-30 22:04:13 +00001435 unsigned int insns[2];
1436 stack_t stack;
1437 unsigned int extra_size; /* Should be 0 */
bellard74ccb342006-07-18 21:23:34 +00001438 qemu_siginfo_fpu_t fpu_state;
bellard6d5e2162004-09-30 22:04:13 +00001439};
1440
bellarde80cfcf2004-12-19 23:18:01 +00001441#define UREG_O0 16
1442#define UREG_O6 22
1443#define UREG_I0 0
1444#define UREG_I1 1
1445#define UREG_I2 2
1446#define UREG_I6 6
1447#define UREG_I7 7
1448#define UREG_L0 8
bellard6d5e2162004-09-30 22:04:13 +00001449#define UREG_FP UREG_I6
1450#define UREG_SP UREG_O6
1451
1452static inline void *get_sigframe(struct emulated_sigaction *sa, CPUState *env, unsigned long framesize)
1453{
1454 unsigned long sp;
1455
1456 sp = env->regwptr[UREG_FP];
bellard6d5e2162004-09-30 22:04:13 +00001457
1458 /* This is the X/Open sanctioned signal stack switching. */
thsa04e1342007-09-27 13:57:58 +00001459 if (sa->sa.sa_flags & TARGET_SA_ONSTACK) {
1460 if (!on_sig_stack(sp)
1461 && !((target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size) & 7))
1462 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size;
bellard6d5e2162004-09-30 22:04:13 +00001463 }
pbrook53a59602006-03-25 19:31:22 +00001464 return g2h(sp - framesize);
bellard6d5e2162004-09-30 22:04:13 +00001465}
1466
1467static int
1468setup___siginfo(__siginfo_t *si, CPUState *env, target_ulong mask)
1469{
1470 int err = 0, i;
1471
bellard6d5e2162004-09-30 22:04:13 +00001472 err |= __put_user(env->psr, &si->si_regs.psr);
bellard6d5e2162004-09-30 22:04:13 +00001473 err |= __put_user(env->pc, &si->si_regs.pc);
1474 err |= __put_user(env->npc, &si->si_regs.npc);
1475 err |= __put_user(env->y, &si->si_regs.y);
bellarda315a142005-01-30 22:59:18 +00001476 for (i=0; i < 8; i++) {
bellard6d5e2162004-09-30 22:04:13 +00001477 err |= __put_user(env->gregs[i], &si->si_regs.u_regs[i]);
1478 }
bellarda315a142005-01-30 22:59:18 +00001479 for (i=0; i < 8; i++) {
bellarde80cfcf2004-12-19 23:18:01 +00001480 err |= __put_user(env->regwptr[UREG_I0 + i], &si->si_regs.u_regs[i+8]);
bellard6d5e2162004-09-30 22:04:13 +00001481 }
bellard6d5e2162004-09-30 22:04:13 +00001482 err |= __put_user(mask, &si->si_mask);
1483 return err;
1484}
bellarde80cfcf2004-12-19 23:18:01 +00001485
bellard80a9d032005-01-03 23:31:27 +00001486#if 0
bellard6d5e2162004-09-30 22:04:13 +00001487static int
1488setup_sigcontext(struct target_sigcontext *sc, /*struct _fpstate *fpstate,*/
1489 CPUState *env, unsigned long mask)
1490{
1491 int err = 0;
1492
1493 err |= __put_user(mask, &sc->sigc_mask);
1494 err |= __put_user(env->regwptr[UREG_SP], &sc->sigc_sp);
1495 err |= __put_user(env->pc, &sc->sigc_pc);
1496 err |= __put_user(env->npc, &sc->sigc_npc);
1497 err |= __put_user(env->psr, &sc->sigc_psr);
1498 err |= __put_user(env->gregs[1], &sc->sigc_g1);
1499 err |= __put_user(env->regwptr[UREG_O0], &sc->sigc_o0);
1500
1501 return err;
1502}
bellard80a9d032005-01-03 23:31:27 +00001503#endif
bellard6d5e2162004-09-30 22:04:13 +00001504#define NF_ALIGNEDSZ (((sizeof(struct target_signal_frame) + 7) & (~7)))
1505
1506static void setup_frame(int sig, struct emulated_sigaction *ka,
1507 target_sigset_t *set, CPUState *env)
1508{
1509 struct target_signal_frame *sf;
1510 int sigframe_size, err, i;
1511
1512 /* 1. Make sure everything is clean */
1513 //synchronize_user_stack();
1514
1515 sigframe_size = NF_ALIGNEDSZ;
1516
1517 sf = (struct target_signal_frame *)
1518 get_sigframe(ka, env, sigframe_size);
1519
bellarde80cfcf2004-12-19 23:18:01 +00001520 //fprintf(stderr, "sf: %x pc %x fp %x sp %x\n", sf, env->pc, env->regwptr[UREG_FP], env->regwptr[UREG_SP]);
bellard6d5e2162004-09-30 22:04:13 +00001521#if 0
1522 if (invalid_frame_pointer(sf, sigframe_size))
1523 goto sigill_and_return;
1524#endif
1525 /* 2. Save the current process state */
1526 err = setup___siginfo(&sf->info, env, set->sig[0]);
1527 err |= __put_user(0, &sf->extra_size);
1528
1529 //err |= save_fpu_state(regs, &sf->fpu_state);
1530 //err |= __put_user(&sf->fpu_state, &sf->fpu_save);
1531
1532 err |= __put_user(set->sig[0], &sf->info.si_mask);
1533 for (i = 0; i < TARGET_NSIG_WORDS - 1; i++) {
1534 err |= __put_user(set->sig[i + 1], &sf->extramask[i]);
1535 }
1536
bellarda315a142005-01-30 22:59:18 +00001537 for (i = 0; i < 8; i++) {
bellarde80cfcf2004-12-19 23:18:01 +00001538 err |= __put_user(env->regwptr[i + UREG_L0], &sf->ss.locals[i]);
bellard6d5e2162004-09-30 22:04:13 +00001539 }
bellarda315a142005-01-30 22:59:18 +00001540 for (i = 0; i < 8; i++) {
bellarde80cfcf2004-12-19 23:18:01 +00001541 err |= __put_user(env->regwptr[i + UREG_I0], &sf->ss.ins[i]);
bellard6d5e2162004-09-30 22:04:13 +00001542 }
bellard6d5e2162004-09-30 22:04:13 +00001543 if (err)
1544 goto sigsegv;
1545
1546 /* 3. signal handler back-trampoline and parameters */
pbrook53a59602006-03-25 19:31:22 +00001547 env->regwptr[UREG_FP] = h2g(sf);
bellard6d5e2162004-09-30 22:04:13 +00001548 env->regwptr[UREG_I0] = sig;
pbrook53a59602006-03-25 19:31:22 +00001549 env->regwptr[UREG_I1] = h2g(&sf->info);
1550 env->regwptr[UREG_I2] = h2g(&sf->info);
bellard6d5e2162004-09-30 22:04:13 +00001551
1552 /* 4. signal handler */
1553 env->pc = (unsigned long) ka->sa._sa_handler;
1554 env->npc = (env->pc + 4);
1555 /* 5. return to kernel instructions */
1556 if (ka->sa.sa_restorer)
1557 env->regwptr[UREG_I7] = (unsigned long)ka->sa.sa_restorer;
1558 else {
pbrook53a59602006-03-25 19:31:22 +00001559 env->regwptr[UREG_I7] = h2g(&(sf->insns[0]) - 2);
bellard6d5e2162004-09-30 22:04:13 +00001560
1561 /* mov __NR_sigreturn, %g1 */
1562 err |= __put_user(0x821020d8, &sf->insns[0]);
1563
1564 /* t 0x10 */
1565 err |= __put_user(0x91d02010, &sf->insns[1]);
1566 if (err)
1567 goto sigsegv;
1568
1569 /* Flush instruction space. */
1570 //flush_sig_insns(current->mm, (unsigned long) &(sf->insns[0]));
bellard80a9d032005-01-03 23:31:27 +00001571 // tb_flush(env);
bellard6d5e2162004-09-30 22:04:13 +00001572 }
1573 return;
1574
bellard80a9d032005-01-03 23:31:27 +00001575 //sigill_and_return:
bellard6d5e2162004-09-30 22:04:13 +00001576 force_sig(TARGET_SIGILL);
1577sigsegv:
bellarde80cfcf2004-12-19 23:18:01 +00001578 //fprintf(stderr, "force_sig\n");
bellard6d5e2162004-09-30 22:04:13 +00001579 force_sig(TARGET_SIGSEGV);
1580}
1581static inline int
bellard74ccb342006-07-18 21:23:34 +00001582restore_fpu_state(CPUState *env, qemu_siginfo_fpu_t *fpu)
bellard6d5e2162004-09-30 22:04:13 +00001583{
1584 int err;
1585#if 0
1586#ifdef CONFIG_SMP
1587 if (current->flags & PF_USEDFPU)
1588 regs->psr &= ~PSR_EF;
1589#else
1590 if (current == last_task_used_math) {
1591 last_task_used_math = 0;
1592 regs->psr &= ~PSR_EF;
1593 }
1594#endif
1595 current->used_math = 1;
1596 current->flags &= ~PF_USEDFPU;
1597#endif
1598#if 0
1599 if (verify_area (VERIFY_READ, fpu, sizeof(*fpu)))
1600 return -EFAULT;
1601#endif
1602
bellardfafffae2006-10-28 12:09:16 +00001603#if 0
1604 /* XXX: incorrect */
bellard6d5e2162004-09-30 22:04:13 +00001605 err = __copy_from_user(&env->fpr[0], &fpu->si_float_regs[0],
1606 (sizeof(unsigned long) * 32));
bellardfafffae2006-10-28 12:09:16 +00001607#endif
bellard6d5e2162004-09-30 22:04:13 +00001608 err |= __get_user(env->fsr, &fpu->si_fsr);
1609#if 0
1610 err |= __get_user(current->thread.fpqdepth, &fpu->si_fpqdepth);
1611 if (current->thread.fpqdepth != 0)
1612 err |= __copy_from_user(&current->thread.fpqueue[0],
1613 &fpu->si_fpqueue[0],
1614 ((sizeof(unsigned long) +
1615 (sizeof(unsigned long *)))*16));
1616#endif
1617 return err;
1618}
1619
1620
ths5fafdf22007-09-16 21:08:06 +00001621static void setup_rt_frame(int sig, struct emulated_sigaction *ka,
bellard6d5e2162004-09-30 22:04:13 +00001622 target_siginfo_t *info,
1623 target_sigset_t *set, CPUState *env)
1624{
1625 fprintf(stderr, "setup_rt_frame: not implemented\n");
1626}
1627
1628long do_sigreturn(CPUState *env)
1629{
1630 struct target_signal_frame *sf;
bellarde80cfcf2004-12-19 23:18:01 +00001631 uint32_t up_psr, pc, npc;
bellard6d5e2162004-09-30 22:04:13 +00001632 target_sigset_t set;
bellarde80cfcf2004-12-19 23:18:01 +00001633 sigset_t host_set;
bellard80a9d032005-01-03 23:31:27 +00001634 target_ulong fpu_save;
bellarde80cfcf2004-12-19 23:18:01 +00001635 int err, i;
bellard6d5e2162004-09-30 22:04:13 +00001636
pbrook53a59602006-03-25 19:31:22 +00001637 sf = (struct target_signal_frame *)g2h(env->regwptr[UREG_FP]);
bellard80a9d032005-01-03 23:31:27 +00001638#if 0
bellarde80cfcf2004-12-19 23:18:01 +00001639 fprintf(stderr, "sigreturn\n");
1640 fprintf(stderr, "sf: %x pc %x fp %x sp %x\n", sf, env->pc, env->regwptr[UREG_FP], env->regwptr[UREG_SP]);
bellard80a9d032005-01-03 23:31:27 +00001641#endif
bellarde80cfcf2004-12-19 23:18:01 +00001642 //cpu_dump_state(env, stderr, fprintf, 0);
bellard6d5e2162004-09-30 22:04:13 +00001643
1644 /* 1. Make sure we are not getting garbage from the user */
1645#if 0
1646 if (verify_area (VERIFY_READ, sf, sizeof (*sf)))
1647 goto segv_and_exit;
1648#endif
1649
1650 if (((uint) sf) & 3)
1651 goto segv_and_exit;
1652
1653 err = __get_user(pc, &sf->info.si_regs.pc);
1654 err |= __get_user(npc, &sf->info.si_regs.npc);
1655
bellard6d5e2162004-09-30 22:04:13 +00001656 if ((pc | npc) & 3)
1657 goto segv_and_exit;
1658
1659 /* 2. Restore the state */
bellarde80cfcf2004-12-19 23:18:01 +00001660 err |= __get_user(up_psr, &sf->info.si_regs.psr);
1661
bellard6d5e2162004-09-30 22:04:13 +00001662 /* User can only change condition codes and FPU enabling in %psr. */
bellarda315a142005-01-30 22:59:18 +00001663 env->psr = (up_psr & (PSR_ICC /* | PSR_EF */))
1664 | (env->psr & ~(PSR_ICC /* | PSR_EF */));
1665
1666 env->pc = pc;
1667 env->npc = npc;
bellarde80cfcf2004-12-19 23:18:01 +00001668 err |= __get_user(env->y, &sf->info.si_regs.y);
bellarda315a142005-01-30 22:59:18 +00001669 for (i=0; i < 8; i++) {
bellarde80cfcf2004-12-19 23:18:01 +00001670 err |= __get_user(env->gregs[i], &sf->info.si_regs.u_regs[i]);
1671 }
bellarda315a142005-01-30 22:59:18 +00001672 for (i=0; i < 8; i++) {
bellarde80cfcf2004-12-19 23:18:01 +00001673 err |= __get_user(env->regwptr[i + UREG_I0], &sf->info.si_regs.u_regs[i+8]);
1674 }
bellard6d5e2162004-09-30 22:04:13 +00001675
bellard80a9d032005-01-03 23:31:27 +00001676 err |= __get_user(fpu_save, (target_ulong *)&sf->fpu_save);
bellard6d5e2162004-09-30 22:04:13 +00001677
bellarde80cfcf2004-12-19 23:18:01 +00001678 //if (fpu_save)
1679 // err |= restore_fpu_state(env, fpu_save);
bellard6d5e2162004-09-30 22:04:13 +00001680
1681 /* This is pretty much atomic, no amount locking would prevent
1682 * the races which exist anyways.
1683 */
1684 err |= __get_user(set.sig[0], &sf->info.si_mask);
bellarde80cfcf2004-12-19 23:18:01 +00001685 for(i = 1; i < TARGET_NSIG_WORDS; i++) {
1686 err |= (__get_user(set.sig[i], &sf->extramask[i - 1]));
1687 }
1688
1689 target_to_host_sigset_internal(&host_set, &set);
1690 sigprocmask(SIG_SETMASK, &host_set, NULL);
bellard6d5e2162004-09-30 22:04:13 +00001691
1692 if (err)
1693 goto segv_and_exit;
1694
bellard6d5e2162004-09-30 22:04:13 +00001695 return env->regwptr[0];
1696
1697segv_and_exit:
1698 force_sig(TARGET_SIGSEGV);
1699}
1700
1701long do_rt_sigreturn(CPUState *env)
1702{
1703 fprintf(stderr, "do_rt_sigreturn: not implemented\n");
1704 return -ENOSYS;
1705}
1706
bellard106ec872006-06-27 21:08:10 +00001707#elif defined(TARGET_MIPS)
1708
1709struct target_sigcontext {
1710 uint32_t sc_regmask; /* Unused */
1711 uint32_t sc_status;
1712 uint64_t sc_pc;
1713 uint64_t sc_regs[32];
1714 uint64_t sc_fpregs[32];
1715 uint32_t sc_ownedfp; /* Unused */
1716 uint32_t sc_fpc_csr;
1717 uint32_t sc_fpc_eir; /* Unused */
1718 uint32_t sc_used_math;
1719 uint32_t sc_dsp; /* dsp status, was sc_ssflags */
1720 uint64_t sc_mdhi;
1721 uint64_t sc_mdlo;
1722 target_ulong sc_hi1; /* Was sc_cause */
1723 target_ulong sc_lo1; /* Was sc_badvaddr */
1724 target_ulong sc_hi2; /* Was sc_sigset[4] */
1725 target_ulong sc_lo2;
1726 target_ulong sc_hi3;
1727 target_ulong sc_lo3;
1728};
1729
1730struct sigframe {
1731 uint32_t sf_ass[4]; /* argument save space for o32 */
1732 uint32_t sf_code[2]; /* signal trampoline */
1733 struct target_sigcontext sf_sc;
1734 target_sigset_t sf_mask;
1735};
1736
1737/* Install trampoline to jump back from signal handler */
1738static inline int install_sigtramp(unsigned int *tramp, unsigned int syscall)
1739{
1740 int err;
1741
1742 /*
1743 * Set up the return code ...
1744 *
1745 * li v0, __NR__foo_sigreturn
1746 * syscall
1747 */
1748
1749 err = __put_user(0x24020000 + syscall, tramp + 0);
1750 err |= __put_user(0x0000000c , tramp + 1);
1751 /* flush_cache_sigtramp((unsigned long) tramp); */
1752 return err;
1753}
1754
1755static inline int
1756setup_sigcontext(CPUState *regs, struct target_sigcontext *sc)
1757{
1758 int err = 0;
1759
thsead93602007-09-06 00:18:15 +00001760 err |= __put_user(regs->PC[regs->current_tc], &sc->sc_pc);
bellard106ec872006-06-27 21:08:10 +00001761
thsead93602007-09-06 00:18:15 +00001762#define save_gp_reg(i) do { \
1763 err |= __put_user(regs->gpr[i][regs->current_tc], &sc->sc_regs[i]); \
bellard106ec872006-06-27 21:08:10 +00001764 } while(0)
1765 __put_user(0, &sc->sc_regs[0]); save_gp_reg(1); save_gp_reg(2);
1766 save_gp_reg(3); save_gp_reg(4); save_gp_reg(5); save_gp_reg(6);
1767 save_gp_reg(7); save_gp_reg(8); save_gp_reg(9); save_gp_reg(10);
1768 save_gp_reg(11); save_gp_reg(12); save_gp_reg(13); save_gp_reg(14);
1769 save_gp_reg(15); save_gp_reg(16); save_gp_reg(17); save_gp_reg(18);
1770 save_gp_reg(19); save_gp_reg(20); save_gp_reg(21); save_gp_reg(22);
1771 save_gp_reg(23); save_gp_reg(24); save_gp_reg(25); save_gp_reg(26);
1772 save_gp_reg(27); save_gp_reg(28); save_gp_reg(29); save_gp_reg(30);
1773 save_gp_reg(31);
ths388bb212007-05-13 13:58:00 +00001774#undef save_gp_reg
bellard106ec872006-06-27 21:08:10 +00001775
thsead93602007-09-06 00:18:15 +00001776 err |= __put_user(regs->HI[0][regs->current_tc], &sc->sc_mdhi);
1777 err |= __put_user(regs->LO[0][regs->current_tc], &sc->sc_mdlo);
bellard106ec872006-06-27 21:08:10 +00001778
1779 /* Not used yet, but might be useful if we ever have DSP suppport */
1780#if 0
1781 if (cpu_has_dsp) {
1782 err |= __put_user(mfhi1(), &sc->sc_hi1);
1783 err |= __put_user(mflo1(), &sc->sc_lo1);
1784 err |= __put_user(mfhi2(), &sc->sc_hi2);
1785 err |= __put_user(mflo2(), &sc->sc_lo2);
1786 err |= __put_user(mfhi3(), &sc->sc_hi3);
1787 err |= __put_user(mflo3(), &sc->sc_lo3);
1788 err |= __put_user(rddsp(DSP_MASK), &sc->sc_dsp);
1789 }
1790 /* same with 64 bit */
ths388bb212007-05-13 13:58:00 +00001791#ifdef CONFIG_64BIT
bellard106ec872006-06-27 21:08:10 +00001792 err |= __put_user(regs->hi, &sc->sc_hi[0]);
1793 err |= __put_user(regs->lo, &sc->sc_lo[0]);
1794 if (cpu_has_dsp) {
1795 err |= __put_user(mfhi1(), &sc->sc_hi[1]);
1796 err |= __put_user(mflo1(), &sc->sc_lo[1]);
1797 err |= __put_user(mfhi2(), &sc->sc_hi[2]);
1798 err |= __put_user(mflo2(), &sc->sc_lo[2]);
1799 err |= __put_user(mfhi3(), &sc->sc_hi[3]);
1800 err |= __put_user(mflo3(), &sc->sc_lo[3]);
1801 err |= __put_user(rddsp(DSP_MASK), &sc->sc_dsp);
1802 }
ths388bb212007-05-13 13:58:00 +00001803#endif
1804#endif
bellard106ec872006-06-27 21:08:10 +00001805
ths388bb212007-05-13 13:58:00 +00001806#if 0
bellard106ec872006-06-27 21:08:10 +00001807 err |= __put_user(!!used_math(), &sc->sc_used_math);
1808
1809 if (!used_math())
1810 goto out;
1811
1812 /*
1813 * Save FPU state to signal context. Signal handler will "inherit"
1814 * current FPU state.
1815 */
1816 preempt_disable();
1817
1818 if (!is_fpu_owner()) {
1819 own_fpu();
1820 restore_fp(current);
1821 }
1822 err |= save_fp_context(sc);
1823
1824 preempt_enable();
1825 out:
1826#endif
1827 return err;
1828}
1829
1830static inline int
1831restore_sigcontext(CPUState *regs, struct target_sigcontext *sc)
1832{
1833 int err = 0;
1834
1835 err |= __get_user(regs->CP0_EPC, &sc->sc_pc);
1836
thsead93602007-09-06 00:18:15 +00001837 err |= __get_user(regs->HI[0][regs->current_tc], &sc->sc_mdhi);
1838 err |= __get_user(regs->LO[0][regs->current_tc], &sc->sc_mdlo);
bellard106ec872006-06-27 21:08:10 +00001839
thsead93602007-09-06 00:18:15 +00001840#define restore_gp_reg(i) do { \
1841 err |= __get_user(regs->gpr[i][regs->current_tc], &sc->sc_regs[i]); \
bellard106ec872006-06-27 21:08:10 +00001842 } while(0)
1843 restore_gp_reg( 1); restore_gp_reg( 2); restore_gp_reg( 3);
1844 restore_gp_reg( 4); restore_gp_reg( 5); restore_gp_reg( 6);
1845 restore_gp_reg( 7); restore_gp_reg( 8); restore_gp_reg( 9);
1846 restore_gp_reg(10); restore_gp_reg(11); restore_gp_reg(12);
1847 restore_gp_reg(13); restore_gp_reg(14); restore_gp_reg(15);
1848 restore_gp_reg(16); restore_gp_reg(17); restore_gp_reg(18);
1849 restore_gp_reg(19); restore_gp_reg(20); restore_gp_reg(21);
1850 restore_gp_reg(22); restore_gp_reg(23); restore_gp_reg(24);
1851 restore_gp_reg(25); restore_gp_reg(26); restore_gp_reg(27);
1852 restore_gp_reg(28); restore_gp_reg(29); restore_gp_reg(30);
1853 restore_gp_reg(31);
ths388bb212007-05-13 13:58:00 +00001854#undef restore_gp_reg
bellard106ec872006-06-27 21:08:10 +00001855
1856#if 0
1857 if (cpu_has_dsp) {
1858 err |= __get_user(treg, &sc->sc_hi1); mthi1(treg);
1859 err |= __get_user(treg, &sc->sc_lo1); mtlo1(treg);
1860 err |= __get_user(treg, &sc->sc_hi2); mthi2(treg);
1861 err |= __get_user(treg, &sc->sc_lo2); mtlo2(treg);
1862 err |= __get_user(treg, &sc->sc_hi3); mthi3(treg);
1863 err |= __get_user(treg, &sc->sc_lo3); mtlo3(treg);
1864 err |= __get_user(treg, &sc->sc_dsp); wrdsp(treg, DSP_MASK);
1865 }
ths388bb212007-05-13 13:58:00 +00001866#ifdef CONFIG_64BIT
bellard106ec872006-06-27 21:08:10 +00001867 err |= __get_user(regs->hi, &sc->sc_hi[0]);
1868 err |= __get_user(regs->lo, &sc->sc_lo[0]);
1869 if (cpu_has_dsp) {
1870 err |= __get_user(treg, &sc->sc_hi[1]); mthi1(treg);
1871 err |= __get_user(treg, &sc->sc_lo[1]); mthi1(treg);
1872 err |= __get_user(treg, &sc->sc_hi[2]); mthi2(treg);
1873 err |= __get_user(treg, &sc->sc_lo[2]); mthi2(treg);
1874 err |= __get_user(treg, &sc->sc_hi[3]); mthi3(treg);
1875 err |= __get_user(treg, &sc->sc_lo[3]); mthi3(treg);
1876 err |= __get_user(treg, &sc->sc_dsp); wrdsp(treg, DSP_MASK);
1877 }
ths388bb212007-05-13 13:58:00 +00001878#endif
bellard106ec872006-06-27 21:08:10 +00001879
1880 err |= __get_user(used_math, &sc->sc_used_math);
1881 conditional_used_math(used_math);
1882
1883 preempt_disable();
1884
1885 if (used_math()) {
1886 /* restore fpu context if we have used it before */
1887 own_fpu();
1888 err |= restore_fp_context(sc);
1889 } else {
1890 /* signal handler may have used FPU. Give it up. */
1891 lose_fpu();
1892 }
1893
1894 preempt_enable();
1895#endif
1896 return err;
1897}
1898/*
1899 * Determine which stack to use..
1900 */
1901static inline void *
1902get_sigframe(struct emulated_sigaction *ka, CPUState *regs, size_t frame_size)
1903{
1904 unsigned long sp;
1905
1906 /* Default to using normal stack */
thsead93602007-09-06 00:18:15 +00001907 sp = regs->gpr[29][regs->current_tc];
bellard106ec872006-06-27 21:08:10 +00001908
1909 /*
1910 * FPU emulator may have it's own trampoline active just
1911 * above the user stack, 16-bytes before the next lowest
1912 * 16 byte boundary. Try to avoid trashing it.
1913 */
1914 sp -= 32;
1915
bellard106ec872006-06-27 21:08:10 +00001916 /* This is the X/Open sanctioned signal stack switching. */
thsa04e1342007-09-27 13:57:58 +00001917 if ((ka->sa.sa_flags & TARGET_SA_ONSTACK) && (sas_ss_flags (sp) == 0)) {
1918 sp = target_sigaltstack_used.ss_sp + target_sigaltstack_used.ss_size;
1919 }
bellard106ec872006-06-27 21:08:10 +00001920
1921 return g2h((sp - frame_size) & ~7);
1922}
1923
ths5fafdf22007-09-16 21:08:06 +00001924static void setup_frame(int sig, struct emulated_sigaction * ka,
bellard106ec872006-06-27 21:08:10 +00001925 target_sigset_t *set, CPUState *regs)
1926{
1927 struct sigframe *frame;
1928 int i;
1929
1930 frame = get_sigframe(ka, regs, sizeof(*frame));
1931 if (!access_ok(VERIFY_WRITE, frame, sizeof (*frame)))
1932 goto give_sigsegv;
1933
1934 install_sigtramp(frame->sf_code, TARGET_NR_sigreturn);
1935
1936 if(setup_sigcontext(regs, &frame->sf_sc))
1937 goto give_sigsegv;
1938
1939 for(i = 0; i < TARGET_NSIG_WORDS; i++) {
1940 if(__put_user(set->sig[i], &frame->sf_mask.sig[i]))
1941 goto give_sigsegv;
1942 }
1943
1944 /*
1945 * Arguments to signal handler:
1946 *
1947 * a0 = signal number
1948 * a1 = 0 (should be cause)
1949 * a2 = pointer to struct sigcontext
1950 *
1951 * $25 and PC point to the signal handler, $29 points to the
1952 * struct sigframe.
1953 */
thsead93602007-09-06 00:18:15 +00001954 regs->gpr[ 4][regs->current_tc] = sig;
1955 regs->gpr[ 5][regs->current_tc] = 0;
1956 regs->gpr[ 6][regs->current_tc] = h2g(&frame->sf_sc);
1957 regs->gpr[29][regs->current_tc] = h2g(frame);
1958 regs->gpr[31][regs->current_tc] = h2g(frame->sf_code);
bellard106ec872006-06-27 21:08:10 +00001959 /* The original kernel code sets CP0_EPC to the handler
1960 * since it returns to userland using eret
1961 * we cannot do this here, and we must set PC directly */
thsead93602007-09-06 00:18:15 +00001962 regs->PC[regs->current_tc] = regs->gpr[25][regs->current_tc] = ka->sa._sa_handler;
bellard106ec872006-06-27 21:08:10 +00001963 return;
1964
1965give_sigsegv:
1966 force_sig(TARGET_SIGSEGV/*, current*/);
ths5fafdf22007-09-16 21:08:06 +00001967 return;
bellard106ec872006-06-27 21:08:10 +00001968}
1969
1970long do_sigreturn(CPUState *regs)
1971{
ths388bb212007-05-13 13:58:00 +00001972 struct sigframe *frame;
1973 sigset_t blocked;
1974 target_sigset_t target_set;
1975 int i;
bellard106ec872006-06-27 21:08:10 +00001976
1977#if defined(DEBUG_SIGNAL)
ths388bb212007-05-13 13:58:00 +00001978 fprintf(stderr, "do_sigreturn\n");
bellard106ec872006-06-27 21:08:10 +00001979#endif
thsead93602007-09-06 00:18:15 +00001980 frame = (struct sigframe *) regs->gpr[29][regs->current_tc];
ths388bb212007-05-13 13:58:00 +00001981 if (!access_ok(VERIFY_READ, frame, sizeof(*frame)))
bellard106ec872006-06-27 21:08:10 +00001982 goto badframe;
1983
ths388bb212007-05-13 13:58:00 +00001984 for(i = 0; i < TARGET_NSIG_WORDS; i++) {
bellard106ec872006-06-27 21:08:10 +00001985 if(__get_user(target_set.sig[i], &frame->sf_mask.sig[i]))
1986 goto badframe;
ths388bb212007-05-13 13:58:00 +00001987 }
bellard106ec872006-06-27 21:08:10 +00001988
ths388bb212007-05-13 13:58:00 +00001989 target_to_host_sigset_internal(&blocked, &target_set);
1990 sigprocmask(SIG_SETMASK, &blocked, NULL);
bellard106ec872006-06-27 21:08:10 +00001991
ths388bb212007-05-13 13:58:00 +00001992 if (restore_sigcontext(regs, &frame->sf_sc))
bellard106ec872006-06-27 21:08:10 +00001993 goto badframe;
1994
1995#if 0
ths388bb212007-05-13 13:58:00 +00001996 /*
1997 * Don't let your children do this ...
1998 */
1999 __asm__ __volatile__(
bellard106ec872006-06-27 21:08:10 +00002000 "move\t$29, %0\n\t"
2001 "j\tsyscall_exit"
2002 :/* no outputs */
2003 :"r" (&regs));
ths388bb212007-05-13 13:58:00 +00002004 /* Unreached */
bellard106ec872006-06-27 21:08:10 +00002005#endif
ths3b46e622007-09-17 08:09:54 +00002006
thsead93602007-09-06 00:18:15 +00002007 regs->PC[regs->current_tc] = regs->CP0_EPC;
ths388bb212007-05-13 13:58:00 +00002008 /* I am not sure this is right, but it seems to work
bellard106ec872006-06-27 21:08:10 +00002009 * maybe a problem with nested signals ? */
2010 regs->CP0_EPC = 0;
2011 return 0;
2012
2013badframe:
ths388bb212007-05-13 13:58:00 +00002014 force_sig(TARGET_SIGSEGV/*, current*/);
2015 return 0;
bellard106ec872006-06-27 21:08:10 +00002016}
2017
ths5fafdf22007-09-16 21:08:06 +00002018static void setup_rt_frame(int sig, struct emulated_sigaction *ka,
bellard106ec872006-06-27 21:08:10 +00002019 target_siginfo_t *info,
2020 target_sigset_t *set, CPUState *env)
2021{
2022 fprintf(stderr, "setup_rt_frame: not implemented\n");
2023}
2024
2025long do_rt_sigreturn(CPUState *env)
2026{
2027 fprintf(stderr, "do_rt_sigreturn: not implemented\n");
2028 return -ENOSYS;
2029}
bellard6d5e2162004-09-30 22:04:13 +00002030
bellardb346ff42003-06-15 20:05:50 +00002031#else
2032
2033static void setup_frame(int sig, struct emulated_sigaction *ka,
2034 target_sigset_t *set, CPUState *env)
2035{
2036 fprintf(stderr, "setup_frame: not implemented\n");
2037}
2038
ths5fafdf22007-09-16 21:08:06 +00002039static void setup_rt_frame(int sig, struct emulated_sigaction *ka,
bellardb346ff42003-06-15 20:05:50 +00002040 target_siginfo_t *info,
2041 target_sigset_t *set, CPUState *env)
2042{
2043 fprintf(stderr, "setup_rt_frame: not implemented\n");
2044}
2045
2046long do_sigreturn(CPUState *env)
2047{
2048 fprintf(stderr, "do_sigreturn: not implemented\n");
2049 return -ENOSYS;
2050}
2051
2052long do_rt_sigreturn(CPUState *env)
2053{
2054 fprintf(stderr, "do_rt_sigreturn: not implemented\n");
2055 return -ENOSYS;
2056}
2057
bellard66fb9762003-03-23 01:06:05 +00002058#endif
2059
2060void process_pending_signals(void *cpu_env)
2061{
2062 int sig;
2063 target_ulong handler;
bellard9de5e442003-03-23 16:49:39 +00002064 sigset_t set, old_set;
2065 target_sigset_t target_old_set;
bellard66fb9762003-03-23 01:06:05 +00002066 struct emulated_sigaction *k;
2067 struct sigqueue *q;
ths3b46e622007-09-17 08:09:54 +00002068
bellard31e31b82003-02-18 22:55:36 +00002069 if (!signal_pending)
2070 return;
2071
bellard66fb9762003-03-23 01:06:05 +00002072 k = sigact_table;
2073 for(sig = 1; sig <= TARGET_NSIG; sig++) {
2074 if (k->pending)
bellard31e31b82003-02-18 22:55:36 +00002075 goto handle_signal;
bellard66fb9762003-03-23 01:06:05 +00002076 k++;
bellard31e31b82003-02-18 22:55:36 +00002077 }
2078 /* if no signal is pending, just return */
2079 signal_pending = 0;
2080 return;
bellard66fb9762003-03-23 01:06:05 +00002081
bellard31e31b82003-02-18 22:55:36 +00002082 handle_signal:
bellard66fb9762003-03-23 01:06:05 +00002083#ifdef DEBUG_SIGNAL
bellardbc8a22c2003-03-30 21:02:40 +00002084 fprintf(stderr, "qemu: process signal %d\n", sig);
bellard66fb9762003-03-23 01:06:05 +00002085#endif
2086 /* dequeue signal */
2087 q = k->first;
2088 k->first = q->next;
2089 if (!k->first)
2090 k->pending = 0;
ths3b46e622007-09-17 08:09:54 +00002091
bellard1fddef42005-04-17 19:16:13 +00002092 sig = gdb_handlesig (cpu_env, sig);
2093 if (!sig) {
2094 fprintf (stderr, "Lost signal\n");
2095 abort();
2096 }
bellard66fb9762003-03-23 01:06:05 +00002097
2098 handler = k->sa._sa_handler;
2099 if (handler == TARGET_SIG_DFL) {
2100 /* default handler : ignore some signal. The other are fatal */
ths5fafdf22007-09-16 21:08:06 +00002101 if (sig != TARGET_SIGCHLD &&
2102 sig != TARGET_SIGURG &&
bellard66fb9762003-03-23 01:06:05 +00002103 sig != TARGET_SIGWINCH) {
2104 force_sig(sig);
2105 }
2106 } else if (handler == TARGET_SIG_IGN) {
2107 /* ignore sig */
2108 } else if (handler == TARGET_SIG_ERR) {
2109 force_sig(sig);
2110 } else {
bellard9de5e442003-03-23 16:49:39 +00002111 /* compute the blocked signals during the handler execution */
2112 target_to_host_sigset(&set, &k->sa.sa_mask);
2113 /* SA_NODEFER indicates that the current signal should not be
2114 blocked during the handler */
2115 if (!(k->sa.sa_flags & TARGET_SA_NODEFER))
2116 sigaddset(&set, target_to_host_signal(sig));
ths3b46e622007-09-17 08:09:54 +00002117
bellard9de5e442003-03-23 16:49:39 +00002118 /* block signals in the handler using Linux */
2119 sigprocmask(SIG_BLOCK, &set, &old_set);
2120 /* save the previous blocked signal state to restore it at the
2121 end of the signal execution (see do_sigreturn) */
bellard92319442004-06-19 16:58:13 +00002122 host_to_target_sigset_internal(&target_old_set, &old_set);
bellard9de5e442003-03-23 16:49:39 +00002123
bellardbc8a22c2003-03-30 21:02:40 +00002124 /* if the CPU is in VM86 mode, we restore the 32 bit values */
j_mayer84409dd2007-04-06 08:56:50 +00002125#if defined(TARGET_I386) && !defined(TARGET_X86_64)
bellardbc8a22c2003-03-30 21:02:40 +00002126 {
2127 CPUX86State *env = cpu_env;
2128 if (env->eflags & VM_MASK)
2129 save_v86_state(env);
2130 }
2131#endif
bellard9de5e442003-03-23 16:49:39 +00002132 /* prepare the stack frame of the virtual CPU */
bellard66fb9762003-03-23 01:06:05 +00002133 if (k->sa.sa_flags & TARGET_SA_SIGINFO)
bellard9de5e442003-03-23 16:49:39 +00002134 setup_rt_frame(sig, k, &q->info, &target_old_set, cpu_env);
bellard66fb9762003-03-23 01:06:05 +00002135 else
bellard9de5e442003-03-23 16:49:39 +00002136 setup_frame(sig, k, &target_old_set, cpu_env);
bellard66fb9762003-03-23 01:06:05 +00002137 if (k->sa.sa_flags & TARGET_SA_RESETHAND)
2138 k->sa._sa_handler = TARGET_SIG_DFL;
bellard31e31b82003-02-18 22:55:36 +00002139 }
bellard66fb9762003-03-23 01:06:05 +00002140 if (q != &k->info)
2141 free_sigqueue(q);
bellard31e31b82003-02-18 22:55:36 +00002142}