Merge branch 'master' of /pub/scm/linux/kernel/git/torvalds/linux-2.6
[linux-2.6] / arch / frv / kernel / sys_frv.c
1 /* sys_frv.c: FRV arch-specific syscall wrappers
2  *
3  * Copyright (C) 2003-5 Red Hat, Inc. All Rights Reserved.
4  * Written by David Howells (dhowells@redhat.com)
5  * - Derived from arch/m68k/kernel/sys_m68k.c
6  *
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License
9  * as published by the Free Software Foundation; either version
10  * 2 of the License, or (at your option) any later version.
11  */
12
13 #include <linux/errno.h>
14 #include <linux/sched.h>
15 #include <linux/mm.h>
16 #include <linux/fs.h>
17 #include <linux/smp.h>
18 #include <linux/sem.h>
19 #include <linux/msg.h>
20 #include <linux/shm.h>
21 #include <linux/stat.h>
22 #include <linux/mman.h>
23 #include <linux/file.h>
24 #include <linux/utsname.h>
25 #include <linux/syscalls.h>
26 #include <linux/ipc.h>
27
28 #include <asm/setup.h>
29 #include <asm/uaccess.h>
30
31 /*
32  * sys_pipe() is the normal C calling standard for creating
33  * a pipe. It's not the way unix traditionally does this, though.
34  */
35 asmlinkage long sys_pipe(unsigned long __user * fildes)
36 {
37         int fd[2];
38         int error;
39
40         error = do_pipe(fd);
41         if (!error) {
42                 if (copy_to_user(fildes, fd, 2*sizeof(int)))
43                         error = -EFAULT;
44         }
45         return error;
46 }
47
48 asmlinkage long sys_mmap2(unsigned long addr, unsigned long len,
49                           unsigned long prot, unsigned long flags,
50                           unsigned long fd, unsigned long pgoff)
51 {
52         int error = -EBADF;
53         struct file * file = NULL;
54
55         flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
56         if (!(flags & MAP_ANONYMOUS)) {
57                 file = fget(fd);
58                 if (!file)
59                         goto out;
60         }
61
62         /* As with sparc32, make sure the shift for mmap2 is constant
63            (12), no matter what PAGE_SIZE we have.... */
64
65         /* But unlike sparc32, don't just silently break if we're
66            trying to map something we can't */
67         if (pgoff & ((1<<(PAGE_SHIFT-12))-1))
68                 return -EINVAL;
69
70         pgoff >>= (PAGE_SHIFT - 12);
71
72         down_write(&current->mm->mmap_sem);
73         error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
74         up_write(&current->mm->mmap_sem);
75
76         if (file)
77                 fput(file);
78 out:
79         return error;
80 }
81
82 #if 0 /* DAVIDM - do we want this */
83 struct mmap_arg_struct64 {
84         __u32 addr;
85         __u32 len;
86         __u32 prot;
87         __u32 flags;
88         __u64 offset; /* 64 bits */
89         __u32 fd;
90 };
91
92 asmlinkage long sys_mmap64(struct mmap_arg_struct64 *arg)
93 {
94         int error = -EFAULT;
95         struct file * file = NULL;
96         struct mmap_arg_struct64 a;
97         unsigned long pgoff;
98
99         if (copy_from_user(&a, arg, sizeof(a)))
100                 return -EFAULT;
101
102         if ((long)a.offset & ~PAGE_MASK)
103                 return -EINVAL;
104
105         pgoff = a.offset >> PAGE_SHIFT;
106         if ((a.offset >> PAGE_SHIFT) != pgoff)
107                 return -EINVAL;
108
109         if (!(a.flags & MAP_ANONYMOUS)) {
110                 error = -EBADF;
111                 file = fget(a.fd);
112                 if (!file)
113                         goto out;
114         }
115         a.flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
116
117         down_write(&current->mm->mmap_sem);
118         error = do_mmap_pgoff(file, a.addr, a.len, a.prot, a.flags, pgoff);
119         up_write(&current->mm->mmap_sem);
120         if (file)
121                 fput(file);
122 out:
123         return error;
124 }
125 #endif
126
127 /*
128  * sys_ipc() is the de-multiplexer for the SysV IPC calls..
129  *
130  * This is really horribly ugly.
131  */
132 asmlinkage long sys_ipc(unsigned long call,
133                         unsigned long first,
134                         unsigned long second,
135                         unsigned long third,
136                         void __user *ptr,
137                         unsigned long fifth)
138 {
139         int version, ret;
140
141         version = call >> 16; /* hack for backward compatibility */
142         call &= 0xffff;
143
144         switch (call) {
145         case SEMOP:
146                 return sys_semtimedop(first, (struct sembuf __user *)ptr, second, NULL);
147         case SEMTIMEDOP:
148                 return sys_semtimedop(first, (struct sembuf __user *)ptr, second,
149                                       (const struct timespec __user *)fifth);
150
151         case SEMGET:
152                 return sys_semget (first, second, third);
153         case SEMCTL: {
154                 union semun fourth;
155                 if (!ptr)
156                         return -EINVAL;
157                 if (get_user(fourth.__pad, (void * __user *) ptr))
158                         return -EFAULT;
159                 return sys_semctl (first, second, third, fourth);
160         }
161
162         case MSGSND:
163                 return sys_msgsnd (first, (struct msgbuf __user *) ptr,
164                                    second, third);
165         case MSGRCV:
166                 switch (version) {
167                 case 0: {
168                         struct ipc_kludge tmp;
169                         if (!ptr)
170                                 return -EINVAL;
171
172                         if (copy_from_user(&tmp,
173                                            (struct ipc_kludge __user *) ptr,
174                                            sizeof (tmp)))
175                                 return -EFAULT;
176                         return sys_msgrcv (first, tmp.msgp, second,
177                                            tmp.msgtyp, third);
178                 }
179                 default:
180                         return sys_msgrcv (first,
181                                            (struct msgbuf __user *) ptr,
182                                            second, fifth, third);
183                 }
184         case MSGGET:
185                 return sys_msgget ((key_t) first, second);
186         case MSGCTL:
187                 return sys_msgctl (first, second, (struct msqid_ds __user *) ptr);
188
189         case SHMAT:
190                 switch (version) {
191                 default: {
192                         ulong raddr;
193                         ret = do_shmat (first, (char __user *) ptr, second, &raddr);
194                         if (ret)
195                                 return ret;
196                         return put_user (raddr, (ulong __user *) third);
197                 }
198                 case 1: /* iBCS2 emulator entry point */
199                         if (!segment_eq(get_fs(), get_ds()))
200                                 return -EINVAL;
201                         /* The "(ulong *) third" is valid _only_ because of the kernel segment thing */
202                         return do_shmat (first, (char __user *) ptr, second, (ulong *) third);
203                 }
204         case SHMDT:
205                 return sys_shmdt ((char __user *)ptr);
206         case SHMGET:
207                 return sys_shmget (first, second, third);
208         case SHMCTL:
209                 return sys_shmctl (first, second,
210                                    (struct shmid_ds __user *) ptr);
211         default:
212                 return -ENOSYS;
213         }
214 }