arch/um/sys-i386/syscalls.c

   1 /*
   2  * Copyright (C) 2000 - 2003 Jeff Dike (jdike@addtoit.com)
   3  * Licensed under the GPL
   4  */
   5
   6 #include "linux/sched.h"
   7 #include "linux/shm.h"
   8 #include "asm/ipc.h"
   9 #include "asm/mman.h"
  10 #include "asm/uaccess.h"
  11 #include "asm/unistd.h"
  12
  13 /*
  14  * Perform the select(nd, in, out, ex, tv) and mmap() system
  15  * calls. Linux/i386 didn't use to be able to handle more than
  16  * 4 system call parameters, so these system calls used a memory
  17  * block for parameter passing..
  18  */
  19
  20 struct mmap_arg_struct {
  21         unsigned long addr;
  22         unsigned long len;
  23         unsigned long prot;
  24         unsigned long flags;
  25         unsigned long fd;
  26         unsigned long offset;
  27 };
  28
  29 extern int old_mmap(unsigned long addr, unsigned long len,
  30                     unsigned long prot, unsigned long flags,
  31                     unsigned long fd, unsigned long offset);
  32
  33 long old_mmap_i386(struct mmap_arg_struct __user *arg)
  34 {
  35         struct mmap_arg_struct a;
  36         int err = -EFAULT;
  37
  38         if (copy_from_user(&a, arg, sizeof(a)))
  39                 goto out;
  40
  41         err = old_mmap(a.addr, a.len, a.prot, a.flags, a.fd, a.offset);
  42  out:
  43         return err;
  44 }
  45
  46 struct sel_arg_struct {
  47         unsigned long n;
  48         fd_set __user *inp;
  49         fd_set __user *outp;
  50         fd_set __user *exp;
  51         struct timeval __user *tvp;
  52 };
  53
  54 long old_select(struct sel_arg_struct __user *arg)
  55 {
  56         struct sel_arg_struct a;
  57
  58         if (copy_from_user(&a, arg, sizeof(a)))
  59                 return -EFAULT;
  60         /* sys_select() does the appropriate kernel locking */
  61         return sys_select(a.n, a.inp, a.outp, a.exp, a.tvp);
  62 }
  63
  64 /* The i386 version skips reading from %esi, the fourth argument. So we must do
  65  * this, too.
  66  */
  67 long sys_clone(unsigned long clone_flags, unsigned long newsp,
  68                int __user *parent_tid, int unused, int __user *child_tid)
  69 {
  70         long ret;
  71
  72         /* XXX: normal arch do here this pass, and also pass the regs to
  73          * do_fork, instead of NULL. Currently the arch-independent code
  74          * ignores these values, while the UML code (actually it's
  75          * copy_thread) does the right thing. But this should change,
  76          probably. */
  77         /*if (!newsp)
  78                 newsp = UPT_SP(current->thread.regs);*/
  79         current->thread.forking = 1;
  80         ret = do_fork(clone_flags, newsp, NULL, 0, parent_tid, child_tid);
  81         current->thread.forking = 0;
  82         return(ret);
  83 }
  84
  85 /*
  86  * sys_ipc() is the de-multiplexer for the SysV IPC calls..
  87  *
  88  * This is really horribly ugly.
  89  */
  90 long sys_ipc (uint call, int first, int second,
  91              int third, void __user *ptr, long fifth)
  92 {
  93         int version, ret;
  94
  95         version = call >> 16; /* hack for backward compatibility */
  96         call &= 0xffff;
  97
  98         switch (call) {
  99         case SEMOP:
 100                 return sys_semtimedop(first, (struct sembuf *) ptr, second,
 101                                       NULL);
 102         case SEMTIMEDOP:
 103                 return sys_semtimedop(first, (struct sembuf *) ptr, second,
 104                                       (const struct timespec *) fifth);
 105         case SEMGET:
 106                 return sys_semget (first, second, third);
 107         case SEMCTL: {
 108                 union semun fourth;
 109                 if (!ptr)
 110                         return -EINVAL;
 111                 if (get_user(fourth.__pad, (void **) ptr))
 112                         return -EFAULT;
 113                 return sys_semctl (first, second, third, fourth);
 114         }
 115
 116         case MSGSND:
 117                 return sys_msgsnd (first, (struct msgbuf *) ptr,
 118                                    second, third);
 119         case MSGRCV:
 120                 switch (version) {
 121                 case 0: {
 122                         struct ipc_kludge tmp;
 123                         if (!ptr)
 124                                 return -EINVAL;
 125
 126                         if (copy_from_user(&tmp,
 127                                            (struct ipc_kludge *) ptr,
 128                                            sizeof (tmp)))
 129                                 return -EFAULT;
 130                         return sys_msgrcv (first, tmp.msgp, second,
 131                                            tmp.msgtyp, third);
 132                 }
 133                 default:
 134                         panic("msgrcv with version != 0");
 135                         return sys_msgrcv (first,
 136                                            (struct msgbuf *) ptr,
 137                                            second, fifth, third);
 138                 }
 139         case MSGGET:
 140                 return sys_msgget ((key_t) first, second);
 141         case MSGCTL:
 142                 return sys_msgctl (first, second, (struct msqid_ds *) ptr);
 143
 144         case SHMAT:
 145                 switch (version) {
 146                 default: {
 147                         ulong raddr;
 148                         ret = do_shmat (first, (char *) ptr, second, &raddr);
 149                         if (ret)
 150                                 return ret;
 151                         return put_user (raddr, (ulong *) third);
 152                 }
 153                 case 1: /* iBCS2 emulator entry point */
 154                         if (!segment_eq(get_fs(), get_ds()))
 155                                 return -EINVAL;
 156                         return do_shmat (first, (char *) ptr, second, (ulong *) third);
 157                 }
 158         case SHMDT:
 159                 return sys_shmdt ((char *)ptr);
 160         case SHMGET:
 161                 return sys_shmget (first, second, third);
 162         case SHMCTL:
 163                 return sys_shmctl (first, second,
 164                                    (struct shmid_ds *) ptr);
 165         default:
 166                 return -ENOSYS;
 167         }
 168 }
 169
 170 long sys_sigaction(int sig, const struct old_sigaction __user *act,
 171                          struct old_sigaction __user *oact)
 172 {
 173         struct k_sigaction new_ka, old_ka;
 174         int ret;
 175
 176         if (act) {
 177                 old_sigset_t mask;
 178                 if (!access_ok(VERIFY_READ, act, sizeof(*act)) ||
 179                     __get_user(new_ka.sa.sa_handler, &act->sa_handler) ||
 180                     __get_user(new_ka.sa.sa_restorer, &act->sa_restorer))
 181                         return -EFAULT;
 182                 __get_user(new_ka.sa.sa_flags, &act->sa_flags);
 183                 __get_user(mask, &act->sa_mask);
 184                 siginitset(&new_ka.sa.sa_mask, mask);
 185         }
 186
 187         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
 188
 189         if (!ret && oact) {
 190                 if (!access_ok(VERIFY_WRITE, oact, sizeof(*oact)) ||
 191                     __put_user(old_ka.sa.sa_handler, &oact->sa_handler) ||
 192                     __put_user(old_ka.sa.sa_restorer, &oact->sa_restorer))
 193                         return -EFAULT;
 194                 __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
 195                 __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask);
 196         }
 197
 198         return ret;
 199 }
 200
 201 /*
 202  * Overrides for Emacs so that we follow Linus's tabbing style.
 203  * Emacs will notice this stuff at the end of the file and automatically
 204  * adjust the settings for this buffer only.  This must remain at the end
 205  * of the file.
 206  * ---------------------------------------------------------------------------
 207  * Local variables:
 208  * c-file-style: "linux"
 209  * End:
 210  */