1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19#include "qemu/osdep.h"
20#include "qemu.h"
21#include "signal-common.h"
22#include "linux-user/trace.h"
23
24
25
26#if defined(TARGET_PPC64)
27#define SIGNAL_FRAMESIZE 128
28#else
29#define SIGNAL_FRAMESIZE 64
30#endif
31
32
33
34struct target_mcontext {
35 target_ulong mc_gregs[48];
36
37 uint64_t mc_fregs[33];
38#if defined(TARGET_PPC64)
39
40 target_ulong v_regs;
41#else
42 target_ulong mc_pad[2];
43#endif
44
45
46
47
48 union {
49
50 uint32_t spe[33];
51
52
53
54
55
56#if defined(TARGET_PPC64)
57#define QEMU_NVRREG (34 + 16)
58
59
60
61
62
63
64 target_ulong pad;
65#else
66
67#define QEMU_NVRREG 33
68#endif
69
70
71
72
73
74 uint64_t altivec[QEMU_NVRREG][2];
75#undef QEMU_NVRREG
76 } mc_vregs;
77};
78
79
80struct target_sigcontext {
81 target_ulong _unused[4];
82 int32_t signal;
83#if defined(TARGET_PPC64)
84 int32_t pad0;
85#endif
86 target_ulong handler;
87 target_ulong oldmask;
88 target_ulong regs;
89#if defined(TARGET_PPC64)
90 struct target_mcontext mcontext;
91#endif
92};
93
94
95
96enum {
97 TARGET_PT_R0 = 0,
98 TARGET_PT_R1 = 1,
99 TARGET_PT_R2 = 2,
100 TARGET_PT_R3 = 3,
101 TARGET_PT_R4 = 4,
102 TARGET_PT_R5 = 5,
103 TARGET_PT_R6 = 6,
104 TARGET_PT_R7 = 7,
105 TARGET_PT_R8 = 8,
106 TARGET_PT_R9 = 9,
107 TARGET_PT_R10 = 10,
108 TARGET_PT_R11 = 11,
109 TARGET_PT_R12 = 12,
110 TARGET_PT_R13 = 13,
111 TARGET_PT_R14 = 14,
112 TARGET_PT_R15 = 15,
113 TARGET_PT_R16 = 16,
114 TARGET_PT_R17 = 17,
115 TARGET_PT_R18 = 18,
116 TARGET_PT_R19 = 19,
117 TARGET_PT_R20 = 20,
118 TARGET_PT_R21 = 21,
119 TARGET_PT_R22 = 22,
120 TARGET_PT_R23 = 23,
121 TARGET_PT_R24 = 24,
122 TARGET_PT_R25 = 25,
123 TARGET_PT_R26 = 26,
124 TARGET_PT_R27 = 27,
125 TARGET_PT_R28 = 28,
126 TARGET_PT_R29 = 29,
127 TARGET_PT_R30 = 30,
128 TARGET_PT_R31 = 31,
129 TARGET_PT_NIP = 32,
130 TARGET_PT_MSR = 33,
131 TARGET_PT_ORIG_R3 = 34,
132 TARGET_PT_CTR = 35,
133 TARGET_PT_LNK = 36,
134 TARGET_PT_XER = 37,
135 TARGET_PT_CCR = 38,
136
137 TARGET_PT_MQ = 39,
138 TARGET_PT_SOFTE = 39,
139 TARGET_PT_TRAP = 40,
140 TARGET_PT_DAR = 41,
141 TARGET_PT_DSISR = 42,
142 TARGET_PT_RESULT = 43,
143 TARGET_PT_REGS_COUNT = 44
144};
145
146
147struct target_ucontext {
148 target_ulong tuc_flags;
149 target_ulong tuc_link;
150 struct target_sigaltstack tuc_stack;
151#if !defined(TARGET_PPC64)
152 int32_t tuc_pad[7];
153 target_ulong tuc_regs;
154
155#endif
156 target_sigset_t tuc_sigmask;
157#if defined(TARGET_PPC64)
158 target_sigset_t unused[15];
159 struct target_sigcontext tuc_sigcontext;
160#else
161 int32_t tuc_maskext[30];
162 int32_t tuc_pad2[3];
163 struct target_mcontext tuc_mcontext;
164#endif
165};
166
167
168struct target_sigframe {
169 struct target_sigcontext sctx;
170 struct target_mcontext mctx;
171 int32_t abigap[56];
172};
173
174#if defined(TARGET_PPC64)
175
176#define TARGET_TRAMP_SIZE 6
177
178struct target_rt_sigframe {
179
180 struct target_ucontext uc;
181 target_ulong _unused[2];
182 uint32_t trampoline[TARGET_TRAMP_SIZE];
183 target_ulong pinfo;
184 target_ulong puc;
185 struct target_siginfo info;
186
187 char abigap[288];
188} __attribute__((aligned(16)));
189
190#else
191
192struct target_rt_sigframe {
193 struct target_siginfo info;
194 struct target_ucontext uc;
195 int32_t abigap[56];
196};
197
198#endif
199
200#if defined(TARGET_PPC64)
201
202struct target_func_ptr {
203 target_ulong entry;
204 target_ulong toc;
205};
206
207#endif
208
209
210#define tramp mc_pad
211
212
213static target_ulong get_sigframe(struct target_sigaction *ka,
214 CPUPPCState *env,
215 int frame_size)
216{
217 target_ulong oldsp;
218
219 oldsp = target_sigsp(get_sp_from_cpustate(env), ka);
220
221 return (oldsp - frame_size) & ~0xFUL;
222}
223
224#if ((defined(TARGET_WORDS_BIGENDIAN) && defined(HOST_WORDS_BIGENDIAN)) || \
225 (!defined(HOST_WORDS_BIGENDIAN) && !defined(TARGET_WORDS_BIGENDIAN)))
226#define PPC_VEC_HI 0
227#define PPC_VEC_LO 1
228#else
229#define PPC_VEC_HI 1
230#define PPC_VEC_LO 0
231#endif
232
233
234static void save_user_regs(CPUPPCState *env, struct target_mcontext *frame)
235{
236 target_ulong msr = env->msr;
237 int i;
238 target_ulong ccr = 0;
239
240
241
242
243
244
245 for (i = 0; i < ARRAY_SIZE(env->gpr); i++) {
246 __put_user(env->gpr[i], &frame->mc_gregs[i]);
247 }
248 __put_user(env->nip, &frame->mc_gregs[TARGET_PT_NIP]);
249 __put_user(env->ctr, &frame->mc_gregs[TARGET_PT_CTR]);
250 __put_user(env->lr, &frame->mc_gregs[TARGET_PT_LNK]);
251 __put_user(env->xer, &frame->mc_gregs[TARGET_PT_XER]);
252
253 for (i = 0; i < ARRAY_SIZE(env->crf); i++) {
254 ccr |= env->crf[i] << (32 - ((i + 1) * 4));
255 }
256 __put_user(ccr, &frame->mc_gregs[TARGET_PT_CCR]);
257
258
259 if (env->insns_flags & PPC_ALTIVEC) {
260 uint32_t *vrsave;
261 for (i = 0; i < 32; i++) {
262 ppc_avr_t *avr = cpu_avr_ptr(env, i);
263 ppc_avr_t *vreg = (ppc_avr_t *)&frame->mc_vregs.altivec[i];
264
265 __put_user(avr->u64[PPC_VEC_HI], &vreg->u64[0]);
266 __put_user(avr->u64[PPC_VEC_LO], &vreg->u64[1]);
267 }
268
269
270 msr |= MSR_VR;
271#if defined(TARGET_PPC64)
272 vrsave = (uint32_t *)&frame->mc_vregs.altivec[33];
273
274 __put_user(h2g(frame->mc_vregs.altivec), &frame->v_regs);
275#else
276 vrsave = (uint32_t *)&frame->mc_vregs.altivec[32];
277#endif
278 __put_user((uint32_t)env->spr[SPR_VRSAVE], vrsave);
279 }
280
281
282 if (env->insns_flags2 & PPC2_VSX) {
283 uint64_t *vsregs = (uint64_t *)&frame->mc_vregs.altivec[34];
284 for (i = 0; i < 32; i++) {
285 uint64_t *vsrl = cpu_vsrl_ptr(env, i);
286 __put_user(*vsrl, &vsregs[i]);
287 }
288 }
289
290
291 if (env->insns_flags & PPC_FLOAT) {
292 for (i = 0; i < 32; i++) {
293 uint64_t *fpr = cpu_fpr_ptr(env, i);
294 __put_user(*fpr, &frame->mc_fregs[i]);
295 }
296 __put_user((uint64_t) env->fpscr, &frame->mc_fregs[32]);
297 }
298
299
300 if (env->insns_flags & PPC_SPE) {
301#if defined(TARGET_PPC64)
302 for (i = 0; i < ARRAY_SIZE(env->gpr); i++) {
303 __put_user(env->gpr[i] >> 32, &frame->mc_vregs.spe[i]);
304 }
305#else
306 for (i = 0; i < ARRAY_SIZE(env->gprh); i++) {
307 __put_user(env->gprh[i], &frame->mc_vregs.spe[i]);
308 }
309#endif
310
311
312 msr |= MSR_SPE;
313 __put_user(env->spe_fscr, &frame->mc_vregs.spe[32]);
314 }
315
316
317 __put_user(msr, &frame->mc_gregs[TARGET_PT_MSR]);
318}
319
320static void encode_trampoline(int sigret, uint32_t *tramp)
321{
322
323 if (sigret) {
324 __put_user(0x38000000 | sigret, &tramp[0]);
325 __put_user(0x44000002, &tramp[1]);
326 }
327}
328
329static void restore_user_regs(CPUPPCState *env,
330 struct target_mcontext *frame, int sig)
331{
332 target_ulong save_r2 = 0;
333 target_ulong msr;
334 target_ulong ccr;
335
336 int i;
337
338 if (!sig) {
339 save_r2 = env->gpr[2];
340 }
341
342
343 for (i = 0; i < ARRAY_SIZE(env->gpr); i++) {
344 __get_user(env->gpr[i], &frame->mc_gregs[i]);
345 }
346 __get_user(env->nip, &frame->mc_gregs[TARGET_PT_NIP]);
347 __get_user(env->ctr, &frame->mc_gregs[TARGET_PT_CTR]);
348 __get_user(env->lr, &frame->mc_gregs[TARGET_PT_LNK]);
349 __get_user(env->xer, &frame->mc_gregs[TARGET_PT_XER]);
350 __get_user(ccr, &frame->mc_gregs[TARGET_PT_CCR]);
351
352 for (i = 0; i < ARRAY_SIZE(env->crf); i++) {
353 env->crf[i] = (ccr >> (32 - ((i + 1) * 4))) & 0xf;
354 }
355
356 if (!sig) {
357 env->gpr[2] = save_r2;
358 }
359
360 __get_user(msr, &frame->mc_gregs[TARGET_PT_MSR]);
361
362
363 if (sig)
364 env->msr = (env->msr & ~(1ull << MSR_LE)) | (msr & (1ull << MSR_LE));
365
366
367 if (env->insns_flags & PPC_ALTIVEC) {
368 ppc_avr_t *v_regs;
369 uint32_t *vrsave;
370#if defined(TARGET_PPC64)
371 uint64_t v_addr;
372
373 __get_user(v_addr, &frame->v_regs);
374 v_regs = g2h(v_addr);
375#else
376 v_regs = (ppc_avr_t *)frame->mc_vregs.altivec;
377#endif
378 for (i = 0; i < 32; i++) {
379 ppc_avr_t *avr = cpu_avr_ptr(env, i);
380 ppc_avr_t *vreg = &v_regs[i];
381
382 __get_user(avr->u64[PPC_VEC_HI], &vreg->u64[0]);
383 __get_user(avr->u64[PPC_VEC_LO], &vreg->u64[1]);
384 }
385
386
387#if defined(TARGET_PPC64)
388 vrsave = (uint32_t *)&v_regs[33];
389#else
390 vrsave = (uint32_t *)&v_regs[32];
391#endif
392 __get_user(env->spr[SPR_VRSAVE], vrsave);
393 }
394
395
396 if (env->insns_flags2 & PPC2_VSX) {
397 uint64_t *vsregs = (uint64_t *)&frame->mc_vregs.altivec[34];
398 for (i = 0; i < 32; i++) {
399 uint64_t *vsrl = cpu_vsrl_ptr(env, i);
400 __get_user(*vsrl, &vsregs[i]);
401 }
402 }
403
404
405 if (env->insns_flags & PPC_FLOAT) {
406 uint64_t fpscr;
407 for (i = 0; i < 32; i++) {
408 uint64_t *fpr = cpu_fpr_ptr(env, i);
409 __get_user(*fpr, &frame->mc_fregs[i]);
410 }
411 __get_user(fpscr, &frame->mc_fregs[32]);
412 env->fpscr = (uint32_t) fpscr;
413 }
414
415
416 if (env->insns_flags & PPC_SPE) {
417#if defined(TARGET_PPC64)
418 for (i = 0; i < ARRAY_SIZE(env->gpr); i++) {
419 uint32_t hi;
420
421 __get_user(hi, &frame->mc_vregs.spe[i]);
422 env->gpr[i] = ((uint64_t)hi << 32) | ((uint32_t) env->gpr[i]);
423 }
424#else
425 for (i = 0; i < ARRAY_SIZE(env->gprh); i++) {
426 __get_user(env->gprh[i], &frame->mc_vregs.spe[i]);
427 }
428#endif
429 __get_user(env->spe_fscr, &frame->mc_vregs.spe[32]);
430 }
431}
432
433#if !defined(TARGET_PPC64)
434void setup_frame(int sig, struct target_sigaction *ka,
435 target_sigset_t *set, CPUPPCState *env)
436{
437 struct target_sigframe *frame;
438 struct target_sigcontext *sc;
439 target_ulong frame_addr, newsp;
440 int err = 0;
441
442 frame_addr = get_sigframe(ka, env, sizeof(*frame));
443 trace_user_setup_frame(env, frame_addr);
444 if (!lock_user_struct(VERIFY_WRITE, frame, frame_addr, 1))
445 goto sigsegv;
446 sc = &frame->sctx;
447
448 __put_user(ka->_sa_handler, &sc->handler);
449 __put_user(set->sig[0], &sc->oldmask);
450 __put_user(set->sig[1], &sc->_unused[3]);
451 __put_user(h2g(&frame->mctx), &sc->regs);
452 __put_user(sig, &sc->signal);
453
454
455 save_user_regs(env, &frame->mctx);
456
457
458 encode_trampoline(TARGET_NR_sigreturn, (uint32_t *)&frame->mctx.tramp);
459
460
461
462 env->lr = (target_ulong) h2g(frame->mctx.tramp);
463
464
465 env->fpscr = 0;
466
467
468 newsp = frame_addr - SIGNAL_FRAMESIZE;
469 err |= put_user(env->gpr[1], newsp, target_ulong);
470
471 if (err)
472 goto sigsegv;
473
474
475 env->gpr[1] = newsp;
476 env->gpr[3] = sig;
477 env->gpr[4] = frame_addr + offsetof(struct target_sigframe, sctx);
478
479 env->nip = (target_ulong) ka->_sa_handler;
480
481
482 env->msr &= ~(1ull << MSR_LE);
483
484 unlock_user_struct(frame, frame_addr, 1);
485 return;
486
487sigsegv:
488 unlock_user_struct(frame, frame_addr, 1);
489 force_sigsegv(sig);
490}
491#endif
492
493void setup_rt_frame(int sig, struct target_sigaction *ka,
494 target_siginfo_t *info,
495 target_sigset_t *set, CPUPPCState *env)
496{
497 struct target_rt_sigframe *rt_sf;
498 uint32_t *trampptr = 0;
499 struct target_mcontext *mctx = 0;
500 target_ulong rt_sf_addr, newsp = 0;
501 int i, err = 0;
502#if defined(TARGET_PPC64)
503 struct target_sigcontext *sc = 0;
504#if !defined(TARGET_ABI32)
505 struct image_info *image = ((TaskState *)thread_cpu->opaque)->info;
506#endif
507#endif
508
509 rt_sf_addr = get_sigframe(ka, env, sizeof(*rt_sf));
510 if (!lock_user_struct(VERIFY_WRITE, rt_sf, rt_sf_addr, 1))
511 goto sigsegv;
512
513 tswap_siginfo(&rt_sf->info, info);
514
515 __put_user(0, &rt_sf->uc.tuc_flags);
516 __put_user(0, &rt_sf->uc.tuc_link);
517 target_save_altstack(&rt_sf->uc.tuc_stack, env);
518#if !defined(TARGET_PPC64)
519 __put_user(h2g (&rt_sf->uc.tuc_mcontext),
520 &rt_sf->uc.tuc_regs);
521#endif
522 for(i = 0; i < TARGET_NSIG_WORDS; i++) {
523 __put_user(set->sig[i], &rt_sf->uc.tuc_sigmask.sig[i]);
524 }
525
526#if defined(TARGET_PPC64)
527 mctx = &rt_sf->uc.tuc_sigcontext.mcontext;
528 trampptr = &rt_sf->trampoline[0];
529
530 sc = &rt_sf->uc.tuc_sigcontext;
531 __put_user(h2g(mctx), &sc->regs);
532 __put_user(sig, &sc->signal);
533#else
534 mctx = &rt_sf->uc.tuc_mcontext;
535 trampptr = (uint32_t *)&rt_sf->uc.tuc_mcontext.tramp;
536#endif
537
538 save_user_regs(env, mctx);
539 encode_trampoline(TARGET_NR_rt_sigreturn, trampptr);
540
541
542
543 env->lr = (target_ulong) h2g(trampptr);
544
545
546 env->fpscr = 0;
547
548
549 newsp = rt_sf_addr - (SIGNAL_FRAMESIZE + 16);
550 err |= put_user(env->gpr[1], newsp, target_ulong);
551
552 if (err)
553 goto sigsegv;
554
555
556 env->gpr[1] = newsp;
557 env->gpr[3] = (target_ulong) sig;
558 env->gpr[4] = (target_ulong) h2g(&rt_sf->info);
559 env->gpr[5] = (target_ulong) h2g(&rt_sf->uc);
560 env->gpr[6] = (target_ulong) h2g(rt_sf);
561
562#if defined(TARGET_PPC64) && !defined(TARGET_ABI32)
563 if (get_ppc64_abi(image) < 2) {
564
565 struct target_func_ptr *handler =
566 (struct target_func_ptr *)g2h(ka->_sa_handler);
567 env->nip = tswapl(handler->entry);
568 env->gpr[2] = tswapl(handler->toc);
569 } else {
570
571
572 env->nip = tswapl((target_ulong) ka->_sa_handler);
573 env->gpr[12] = env->nip;
574 }
575#else
576 env->nip = (target_ulong) ka->_sa_handler;
577#endif
578
579
580 env->msr &= ~(1ull << MSR_LE);
581
582 unlock_user_struct(rt_sf, rt_sf_addr, 1);
583 return;
584
585sigsegv:
586 unlock_user_struct(rt_sf, rt_sf_addr, 1);
587 force_sigsegv(sig);
588
589}
590
591#if !defined(TARGET_PPC64)
592long do_sigreturn(CPUPPCState *env)
593{
594 struct target_sigcontext *sc = NULL;
595 struct target_mcontext *sr = NULL;
596 target_ulong sr_addr = 0, sc_addr;
597 sigset_t blocked;
598 target_sigset_t set;
599
600 sc_addr = env->gpr[1] + SIGNAL_FRAMESIZE;
601 if (!lock_user_struct(VERIFY_READ, sc, sc_addr, 1))
602 goto sigsegv;
603
604#if defined(TARGET_PPC64)
605 set.sig[0] = sc->oldmask + ((uint64_t)(sc->_unused[3]) << 32);
606#else
607 __get_user(set.sig[0], &sc->oldmask);
608 __get_user(set.sig[1], &sc->_unused[3]);
609#endif
610 target_to_host_sigset_internal(&blocked, &set);
611 set_sigmask(&blocked);
612
613 __get_user(sr_addr, &sc->regs);
614 if (!lock_user_struct(VERIFY_READ, sr, sr_addr, 1))
615 goto sigsegv;
616 restore_user_regs(env, sr, 1);
617
618 unlock_user_struct(sr, sr_addr, 1);
619 unlock_user_struct(sc, sc_addr, 1);
620 return -TARGET_QEMU_ESIGRETURN;
621
622sigsegv:
623 unlock_user_struct(sr, sr_addr, 1);
624 unlock_user_struct(sc, sc_addr, 1);
625 force_sig(TARGET_SIGSEGV);
626 return -TARGET_QEMU_ESIGRETURN;
627}
628#endif
629
630
631static int do_setcontext(struct target_ucontext *ucp, CPUPPCState *env, int sig)
632{
633 struct target_mcontext *mcp;
634 target_ulong mcp_addr;
635 sigset_t blocked;
636 target_sigset_t set;
637
638 if (copy_from_user(&set, h2g(ucp) + offsetof(struct target_ucontext, tuc_sigmask),
639 sizeof (set)))
640 return 1;
641
642#if defined(TARGET_PPC64)
643 mcp_addr = h2g(ucp) +
644 offsetof(struct target_ucontext, tuc_sigcontext.mcontext);
645#else
646 __get_user(mcp_addr, &ucp->tuc_regs);
647#endif
648
649 if (!lock_user_struct(VERIFY_READ, mcp, mcp_addr, 1))
650 return 1;
651
652 target_to_host_sigset_internal(&blocked, &set);
653 set_sigmask(&blocked);
654 restore_user_regs(env, mcp, sig);
655
656 unlock_user_struct(mcp, mcp_addr, 1);
657 return 0;
658}
659
660long do_rt_sigreturn(CPUPPCState *env)
661{
662 struct target_rt_sigframe *rt_sf = NULL;
663 target_ulong rt_sf_addr;
664
665 rt_sf_addr = env->gpr[1] + SIGNAL_FRAMESIZE + 16;
666 if (!lock_user_struct(VERIFY_READ, rt_sf, rt_sf_addr, 1))
667 goto sigsegv;
668
669 if (do_setcontext(&rt_sf->uc, env, 1))
670 goto sigsegv;
671
672 do_sigaltstack(rt_sf_addr
673 + offsetof(struct target_rt_sigframe, uc.tuc_stack),
674 0, env->gpr[1]);
675
676 unlock_user_struct(rt_sf, rt_sf_addr, 1);
677 return -TARGET_QEMU_ESIGRETURN;
678
679sigsegv:
680 unlock_user_struct(rt_sf, rt_sf_addr, 1);
681 force_sig(TARGET_SIGSEGV);
682 return -TARGET_QEMU_ESIGRETURN;
683}
684
685
686abi_long do_swapcontext(CPUArchState *env, abi_ulong uold_ctx,
687 abi_ulong unew_ctx, abi_long ctx_size)
688{
689 struct target_ucontext *uctx;
690 struct target_mcontext *mctx;
691
692
693
694
695 if (ctx_size < sizeof(struct target_ucontext)) {
696 return -TARGET_EINVAL;
697 }
698
699 if (uold_ctx) {
700 TaskState *ts = (TaskState *)thread_cpu->opaque;
701
702 if (!lock_user_struct(VERIFY_WRITE, uctx, uold_ctx, 1)) {
703 return -TARGET_EFAULT;
704 }
705
706#ifdef TARGET_PPC64
707 mctx = &uctx->tuc_sigcontext.mcontext;
708#else
709
710
711
712 mctx = &uctx->tuc_mcontext;
713 __put_user(h2g(mctx), &uctx->tuc_regs);
714#endif
715
716 save_user_regs(env, mctx);
717 host_to_target_sigset(&uctx->tuc_sigmask, &ts->signal_mask);
718
719 unlock_user_struct(uctx, uold_ctx, 1);
720 }
721
722 if (unew_ctx) {
723 int err;
724
725 if (!lock_user_struct(VERIFY_READ, uctx, unew_ctx, 1)) {
726 return -TARGET_EFAULT;
727 }
728 err = do_setcontext(uctx, env, 0);
729 unlock_user_struct(uctx, unew_ctx, 1);
730
731 if (err) {
732
733 force_sig(TARGET_SIGSEGV);
734 }
735 return -TARGET_QEMU_ESIGRETURN;
736 }
737
738 return 0;
739}
740