[f]truncate64 support
[qemu] / linux-user / signal.c
index bde4922..a7c06c9 100644 (file)
 #include <errno.h>
 #include <sys/ucontext.h>
 
-#ifdef __ia64__
-#undef uc_mcontext
-#undef uc_sigmask
-#undef uc_stack
-#undef uc_link
-#endif 
-
 #include "qemu.h"
 
 //#define DEBUG_SIGNAL
@@ -131,7 +124,7 @@ static void host_to_target_sigset_internal(target_sigset_t *d,
     d->sig[0] = target_sigmask;
     d->sig[1] = sigmask >> 32;
 #else
-#error host_to_target_sigset
+#warning host_to_target_sigset
 #endif
 }
 
@@ -165,7 +158,7 @@ void target_to_host_sigset_internal(sigset_t *d, const target_sigset_t *s)
 #elif TARGET_LONG_BITS == 32 && HOST_LONG_BITS == 64 && TARGET_NSIG_WORDS == 2
     ((unsigned long *)d)[0] = sigmask | ((unsigned long)(s->sig[1]) << 32);
 #else
-#error target_to_host_sigset
+#warning target_to_host_sigset
 #endif /* TARGET_LONG_BITS */
 }
 
@@ -557,11 +550,11 @@ typedef struct target_sigaltstack {
 } target_stack_t;
 
 struct target_ucontext {
-        target_ulong     uc_flags;
-       target_ulong      uc_link;
-       target_stack_t    uc_stack;
-       struct target_sigcontext uc_mcontext;
-       target_sigset_t   uc_sigmask;   /* mask last for extensibility */
+        target_ulong     tuc_flags;
+       target_ulong      tuc_link;
+       target_stack_t    tuc_stack;
+       struct target_sigcontext tuc_mcontext;
+       target_sigset_t   tuc_sigmask;  /* mask last for extensibility */
 };
 
 struct sigframe
@@ -743,16 +736,18 @@ static void setup_rt_frame(int sig, struct emulated_sigaction *ka,
                goto give_sigsegv;
 
        /* Create the ucontext.  */
-       err |= __put_user(0, &frame->uc.uc_flags);
-       err |= __put_user(0, &frame->uc.uc_link);
-       err |= __put_user(/*current->sas_ss_sp*/ 0, &frame->uc.uc_stack.ss_sp);
+       err |= __put_user(0, &frame->uc.tuc_flags);
+       err |= __put_user(0, &frame->uc.tuc_link);
+       err |= __put_user(/*current->sas_ss_sp*/ 0,
+                         &frame->uc.tuc_stack.ss_sp);
        err |= __put_user(/* sas_ss_flags(regs->esp) */ 0,
-                         &frame->uc.uc_stack.ss_flags);
-       err |= __put_user(/* current->sas_ss_size */ 0, &frame->uc.uc_stack.ss_size);
-       err |= setup_sigcontext(&frame->uc.uc_mcontext, &frame->fpstate,
+                         &frame->uc.tuc_stack.ss_flags);
+       err |= __put_user(/* current->sas_ss_size */ 0,
+                         &frame->uc.tuc_stack.ss_size);
+       err |= setup_sigcontext(&frame->uc.tuc_mcontext, &frame->fpstate,
                                env, set->sig[0]);
         for(i = 0; i < TARGET_NSIG_WORDS; i++) {
-            if (__put_user(set->sig[i], &frame->uc.uc_sigmask.sig[i]))
+            if (__put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]))
                 goto give_sigsegv;
         }
 
@@ -880,14 +875,14 @@ long do_rt_sigreturn(CPUX86State *env)
        if (verify_area(VERIFY_READ, frame, sizeof(*frame)))
                goto badframe;
 #endif
-        target_to_host_sigset(&set, &frame->uc.uc_sigmask);
+        target_to_host_sigset(&set, &frame->uc.tuc_sigmask);
         sigprocmask(SIG_SETMASK, &set, NULL);
        
-       if (restore_sigcontext(env, &frame->uc.uc_mcontext, &eax))
+       if (restore_sigcontext(env, &frame->uc.tuc_mcontext, &eax))
                goto badframe;
 
 #if 0
-       if (__copy_from_user(&st, &frame->uc.uc_stack, sizeof(st)))
+       if (__copy_from_user(&st, &frame->uc.tuc_stack, sizeof(st)))
                goto badframe;
        /* It is more difficult to avoid calling this function than to
           call it and ignore errors.  */
@@ -933,11 +928,11 @@ typedef struct target_sigaltstack {
 } target_stack_t;
 
 struct target_ucontext {
-    target_ulong uc_flags;
-    target_ulong uc_link;
-    target_stack_t uc_stack;
-    struct target_sigcontext uc_mcontext;
-    target_sigset_t  uc_sigmask;       /* mask last for extensibility */
+    target_ulong tuc_flags;
+    target_ulong tuc_link;
+    target_stack_t tuc_stack;
+    struct target_sigcontext tuc_mcontext;
+    target_sigset_t  tuc_sigmask;      /* mask last for extensibility */
 };
 
 struct sigframe
@@ -1135,10 +1130,10 @@ static void setup_rt_frame(int usig, struct emulated_sigaction *ka,
        /* Clear all the bits of the ucontext we don't use.  */
        err |= __clear_user(&frame->uc, offsetof(struct ucontext, uc_mcontext));
 
-       err |= setup_sigcontext(&frame->uc.uc_mcontext, /*&frame->fpstate,*/
+       err |= setup_sigcontext(&frame->uc.tuc_mcontext, /*&frame->fpstate,*/
                                env, set->sig[0]);
         for(i = 0; i < TARGET_NSIG_WORDS; i++) {
-            if (__put_user(set->sig[i], &frame->uc.uc_sigmask.sig[i]))
+            if (__put_user(set->sig[i], &frame->uc.tuc_sigmask.sig[i]))
                 return;
         }
 
@@ -1253,10 +1248,10 @@ long do_rt_sigreturn(CPUState *env)
        if (verify_area(VERIFY_READ, frame, sizeof (*frame)))
                goto badframe;
 #endif
-        target_to_host_sigset(&host_set, &frame->uc.uc_sigmask);
+        target_to_host_sigset(&host_set, &frame->uc.tuc_sigmask);
         sigprocmask(SIG_SETMASK, &host_set, NULL);
 
-       if (restore_sigcontext(env, &frame->uc.uc_mcontext))
+       if (restore_sigcontext(env, &frame->uc.tuc_mcontext))
                goto badframe;
 
 #if 0
@@ -1271,6 +1266,355 @@ badframe:
        return 0;
 }
 
+#elif defined(TARGET_SPARC)
+
+#define __SUNOS_MAXWIN   31
+
+/* This is what SunOS does, so shall I. */
+struct target_sigcontext {
+        target_ulong sigc_onstack;      /* state to restore */
+
+        target_ulong sigc_mask;         /* sigmask to restore */
+        target_ulong sigc_sp;           /* stack pointer */
+        target_ulong sigc_pc;           /* program counter */
+        target_ulong sigc_npc;          /* next program counter */
+        target_ulong sigc_psr;          /* for condition codes etc */
+        target_ulong sigc_g1;           /* User uses these two registers */
+        target_ulong sigc_o0;           /* within the trampoline code. */
+
+        /* Now comes information regarding the users window set
+         * at the time of the signal.
+         */
+        target_ulong sigc_oswins;       /* outstanding windows */
+
+        /* stack ptrs for each regwin buf */
+        char *sigc_spbuf[__SUNOS_MAXWIN];
+
+        /* Windows to restore after signal */
+        struct {
+                target_ulong locals[8];
+                target_ulong ins[8];
+        } sigc_wbuf[__SUNOS_MAXWIN];
+};
+/* A Sparc stack frame */
+struct sparc_stackf {
+        target_ulong locals[8];
+        target_ulong ins[6];
+        struct sparc_stackf *fp;
+        target_ulong callers_pc;
+        char *structptr;
+        target_ulong xargs[6];
+        target_ulong xxargs[1];
+};
+
+typedef struct {
+        struct {
+                target_ulong psr;
+                target_ulong pc;
+                target_ulong npc;
+                target_ulong y;
+                target_ulong u_regs[16]; /* globals and ins */
+        }               si_regs;
+        int             si_mask;
+} __siginfo_t;
+
+typedef struct {
+        unsigned   long si_float_regs [32];
+        unsigned   long si_fsr;
+        unsigned   long si_fpqdepth;
+        struct {
+                unsigned long *insn_addr;
+                unsigned long insn;
+        } si_fpqueue [16];
+} __siginfo_fpu_t;
+
+
+struct target_signal_frame {
+       struct sparc_stackf     ss;
+       __siginfo_t             info;
+       __siginfo_fpu_t         *fpu_save;
+       target_ulong            insns[2] __attribute__ ((aligned (8)));
+       target_ulong            extramask[TARGET_NSIG_WORDS - 1];
+       target_ulong            extra_size; /* Should be 0 */
+       __siginfo_fpu_t         fpu_state;
+};
+struct target_rt_signal_frame {
+       struct sparc_stackf     ss;
+       siginfo_t               info;
+       target_ulong            regs[20];
+       sigset_t                mask;
+       __siginfo_fpu_t         *fpu_save;
+       unsigned int            insns[2];
+       stack_t                 stack;
+       unsigned int            extra_size; /* Should be 0 */
+       __siginfo_fpu_t         fpu_state;
+};
+
+#define UREG_O0        16
+#define UREG_O6        22
+#define UREG_I0        0
+#define UREG_I1        1
+#define UREG_I2        2
+#define UREG_I6        6
+#define UREG_I7        7
+#define UREG_L0               8
+#define UREG_FP        UREG_I6
+#define UREG_SP        UREG_O6
+
+static inline void *get_sigframe(struct emulated_sigaction *sa, CPUState *env, unsigned long framesize)
+{
+       unsigned long sp;
+
+       sp = env->regwptr[UREG_FP];
+#if 0
+
+       /* This is the X/Open sanctioned signal stack switching.  */
+       if (sa->sa_flags & TARGET_SA_ONSTACK) {
+               if (!on_sig_stack(sp) && !((current->sas_ss_sp + current->sas_ss_size) & 7))
+                       sp = current->sas_ss_sp + current->sas_ss_size;
+       }
+#endif
+       return (void *)(sp - framesize);
+}
+
+static int
+setup___siginfo(__siginfo_t *si, CPUState *env, target_ulong mask)
+{
+       int err = 0, i;
+
+       err |= __put_user(env->psr, &si->si_regs.psr);
+       err |= __put_user(env->pc, &si->si_regs.pc);
+       err |= __put_user(env->npc, &si->si_regs.npc);
+       err |= __put_user(env->y, &si->si_regs.y);
+       for (i=0; i < 8; i++) {
+               err |= __put_user(env->gregs[i], &si->si_regs.u_regs[i]);
+       }
+       for (i=0; i < 8; i++) {
+               err |= __put_user(env->regwptr[UREG_I0 + i], &si->si_regs.u_regs[i+8]);
+       }
+       err |= __put_user(mask, &si->si_mask);
+       return err;
+}
+
+#if 0
+static int
+setup_sigcontext(struct target_sigcontext *sc, /*struct _fpstate *fpstate,*/
+                CPUState *env, unsigned long mask)
+{
+       int err = 0;
+
+       err |= __put_user(mask, &sc->sigc_mask);
+       err |= __put_user(env->regwptr[UREG_SP], &sc->sigc_sp);
+       err |= __put_user(env->pc, &sc->sigc_pc);
+       err |= __put_user(env->npc, &sc->sigc_npc);
+       err |= __put_user(env->psr, &sc->sigc_psr);
+       err |= __put_user(env->gregs[1], &sc->sigc_g1);
+       err |= __put_user(env->regwptr[UREG_O0], &sc->sigc_o0);
+
+       return err;
+}
+#endif
+#define NF_ALIGNEDSZ  (((sizeof(struct target_signal_frame) + 7) & (~7)))
+
+static void setup_frame(int sig, struct emulated_sigaction *ka,
+                       target_sigset_t *set, CPUState *env)
+{
+       struct target_signal_frame *sf;
+       int sigframe_size, err, i;
+
+       /* 1. Make sure everything is clean */
+       //synchronize_user_stack();
+
+        sigframe_size = NF_ALIGNEDSZ;
+
+       sf = (struct target_signal_frame *)
+               get_sigframe(ka, env, sigframe_size);
+
+       //fprintf(stderr, "sf: %x pc %x fp %x sp %x\n", sf, env->pc, env->regwptr[UREG_FP], env->regwptr[UREG_SP]);
+#if 0
+       if (invalid_frame_pointer(sf, sigframe_size))
+               goto sigill_and_return;
+#endif
+       /* 2. Save the current process state */
+       err = setup___siginfo(&sf->info, env, set->sig[0]);
+       err |= __put_user(0, &sf->extra_size);
+
+       //err |= save_fpu_state(regs, &sf->fpu_state);
+       //err |= __put_user(&sf->fpu_state, &sf->fpu_save);
+
+       err |= __put_user(set->sig[0], &sf->info.si_mask);
+       for (i = 0; i < TARGET_NSIG_WORDS - 1; i++) {
+               err |= __put_user(set->sig[i + 1], &sf->extramask[i]);
+       }
+
+       for (i = 0; i < 8; i++) {
+               err |= __put_user(env->regwptr[i + UREG_L0], &sf->ss.locals[i]);
+       }
+       for (i = 0; i < 8; i++) {
+               err |= __put_user(env->regwptr[i + UREG_I0], &sf->ss.ins[i]);
+       }
+       if (err)
+               goto sigsegv;
+
+       /* 3. signal handler back-trampoline and parameters */
+       env->regwptr[UREG_FP] = (target_ulong) sf;
+       env->regwptr[UREG_I0] = sig;
+       env->regwptr[UREG_I1] = (target_ulong) &sf->info;
+       env->regwptr[UREG_I2] = (target_ulong) &sf->info;
+
+       /* 4. signal handler */
+       env->pc = (unsigned long) ka->sa._sa_handler;
+       env->npc = (env->pc + 4);
+       /* 5. return to kernel instructions */
+       if (ka->sa.sa_restorer)
+               env->regwptr[UREG_I7] = (unsigned long)ka->sa.sa_restorer;
+       else {
+               env->regwptr[UREG_I7] = (unsigned long)(&(sf->insns[0]) - 2);
+
+               /* mov __NR_sigreturn, %g1 */
+               err |= __put_user(0x821020d8, &sf->insns[0]);
+
+               /* t 0x10 */
+               err |= __put_user(0x91d02010, &sf->insns[1]);
+               if (err)
+                       goto sigsegv;
+
+               /* Flush instruction space. */
+               //flush_sig_insns(current->mm, (unsigned long) &(sf->insns[0]));
+                //             tb_flush(env);
+       }
+       return;
+
+        //sigill_and_return:
+       force_sig(TARGET_SIGILL);
+sigsegv:
+       //fprintf(stderr, "force_sig\n");
+       force_sig(TARGET_SIGSEGV);
+}
+static inline int
+restore_fpu_state(CPUState *env, __siginfo_fpu_t *fpu)
+{
+        int err;
+#if 0
+#ifdef CONFIG_SMP
+        if (current->flags & PF_USEDFPU)
+                regs->psr &= ~PSR_EF;
+#else
+        if (current == last_task_used_math) {
+                last_task_used_math = 0;
+                regs->psr &= ~PSR_EF;
+        }
+#endif
+        current->used_math = 1;
+        current->flags &= ~PF_USEDFPU;
+#endif
+#if 0
+        if (verify_area (VERIFY_READ, fpu, sizeof(*fpu)))
+                return -EFAULT;
+#endif
+
+        err = __copy_from_user(&env->fpr[0], &fpu->si_float_regs[0],
+                                    (sizeof(unsigned long) * 32));
+        err |= __get_user(env->fsr, &fpu->si_fsr);
+#if 0
+        err |= __get_user(current->thread.fpqdepth, &fpu->si_fpqdepth);
+        if (current->thread.fpqdepth != 0)
+                err |= __copy_from_user(&current->thread.fpqueue[0],
+                                        &fpu->si_fpqueue[0],
+                                        ((sizeof(unsigned long) +
+                                        (sizeof(unsigned long *)))*16));
+#endif
+        return err;
+}
+
+
+static void setup_rt_frame(int sig, struct emulated_sigaction *ka, 
+                           target_siginfo_t *info,
+                          target_sigset_t *set, CPUState *env)
+{
+    fprintf(stderr, "setup_rt_frame: not implemented\n");
+}
+
+long do_sigreturn(CPUState *env)
+{
+        struct target_signal_frame *sf;
+        uint32_t up_psr, pc, npc;
+        target_sigset_t set;
+        sigset_t host_set;
+        target_ulong fpu_save;
+        int err, i;
+
+        sf = (struct target_signal_frame *) env->regwptr[UREG_FP];
+#if 0
+       fprintf(stderr, "sigreturn\n");
+       fprintf(stderr, "sf: %x pc %x fp %x sp %x\n", sf, env->pc, env->regwptr[UREG_FP], env->regwptr[UREG_SP]);
+#endif
+       //cpu_dump_state(env, stderr, fprintf, 0);
+
+        /* 1. Make sure we are not getting garbage from the user */
+#if 0
+        if (verify_area (VERIFY_READ, sf, sizeof (*sf)))
+                goto segv_and_exit;
+#endif
+
+        if (((uint) sf) & 3)
+                goto segv_and_exit;
+
+        err = __get_user(pc,  &sf->info.si_regs.pc);
+        err |= __get_user(npc, &sf->info.si_regs.npc);
+
+        if ((pc | npc) & 3)
+                goto segv_and_exit;
+
+        /* 2. Restore the state */
+        err |= __get_user(up_psr, &sf->info.si_regs.psr);
+
+        /* User can only change condition codes and FPU enabling in %psr. */
+        env->psr = (up_psr & (PSR_ICC /* | PSR_EF */))
+                  | (env->psr & ~(PSR_ICC /* | PSR_EF */));
+
+       env->pc = pc;
+       env->npc = npc;
+        err |= __get_user(env->y, &sf->info.si_regs.y);
+       for (i=0; i < 8; i++) {
+               err |= __get_user(env->gregs[i], &sf->info.si_regs.u_regs[i]);
+       }
+       for (i=0; i < 8; i++) {
+               err |= __get_user(env->regwptr[i + UREG_I0], &sf->info.si_regs.u_regs[i+8]);
+       }
+
+        err |= __get_user(fpu_save, (target_ulong *)&sf->fpu_save);
+
+        //if (fpu_save)
+        //        err |= restore_fpu_state(env, fpu_save);
+
+        /* This is pretty much atomic, no amount locking would prevent
+         * the races which exist anyways.
+         */
+        err |= __get_user(set.sig[0], &sf->info.si_mask);
+        for(i = 1; i < TARGET_NSIG_WORDS; i++) {
+            err |= (__get_user(set.sig[i], &sf->extramask[i - 1]));
+        }
+
+        target_to_host_sigset_internal(&host_set, &set);
+        sigprocmask(SIG_SETMASK, &host_set, NULL);
+
+        if (err)
+                goto segv_and_exit;
+
+        return env->regwptr[0];
+
+segv_and_exit:
+       force_sig(TARGET_SIGSEGV);
+}
+
+long do_rt_sigreturn(CPUState *env)
+{
+    fprintf(stderr, "do_rt_sigreturn: not implemented\n");
+    return -ENOSYS;
+}
+
+
 #else
 
 static void setup_frame(int sig, struct emulated_sigaction *ka,
@@ -1331,6 +1675,12 @@ void process_pending_signals(void *cpu_env)
     k->first = q->next;
     if (!k->first)
         k->pending = 0;
+      
+    sig = gdb_handlesig (cpu_env, sig);
+    if (!sig) {
+        fprintf (stderr, "Lost signal\n");
+        abort();
+    }
 
     handler = k->sa._sa_handler;
     if (handler == TARGET_SIG_DFL) {