Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/shaggy...
[linux-2.6] / arch / v850 / kernel / syscalls.c
1 /*
2  * arch/v850/kernel/syscalls.c -- Various system-call definitions not
3  *      defined in machine-independent code
4  *
5  *  Copyright (C) 2001,02  NEC Corporation
6  *  Copyright (C) 2001,02  Miles Bader <miles@gnu.org>
7  *
8  * This file is subject to the terms and conditions of the GNU General
9  * Public License.  See the file COPYING in the main directory of this
10  * archive for more details.
11  *
12  * This file was derived the ppc version, arch/ppc/kernel/syscalls.c
13  * ... which was derived from "arch/i386/kernel/sys_i386.c" by Gary Thomas;
14  *     modified by Cort Dougan (cort@cs.nmt.edu)
15  *     and Paul Mackerras (paulus@cs.anu.edu.au).
16  */
17
18 #include <linux/errno.h>
19 #include <linux/mm.h>
20 #include <linux/smp.h>
21 #include <linux/smp_lock.h>
22 #include <linux/syscalls.h>
23 #include <linux/sem.h>
24 #include <linux/msg.h>
25 #include <linux/shm.h>
26 #include <linux/stat.h>
27 #include <linux/mman.h>
28 #include <linux/sys.h>
29 #include <linux/ipc.h>
30 #include <linux/utsname.h>
31 #include <linux/file.h>
32
33 #include <asm/uaccess.h>
34 #include <asm/ipc.h>
35 #include <asm/semaphore.h>
36 #include <asm/unistd.h>
37
38 /*
39  * sys_ipc() is the de-multiplexer for the SysV IPC calls..
40  *
41  * This is really horribly ugly.
42  */
43 int
44 sys_ipc (uint call, int first, int second, int third, void *ptr, long fifth)
45 {
46         int version, ret;
47
48         version = call >> 16; /* hack for backward compatibility */
49         call &= 0xffff;
50
51         ret = -EINVAL;
52         switch (call) {
53         case SEMOP:
54                 ret = sys_semop (first, (struct sembuf *)ptr, second);
55                 break;
56         case SEMGET:
57                 ret = sys_semget (first, second, third);
58                 break;
59         case SEMCTL:
60         {
61                 union semun fourth;
62
63                 if (!ptr)
64                         break;
65                 if ((ret = access_ok(VERIFY_READ, ptr, sizeof(long)) ? 0 : -EFAULT)
66                     || (ret = get_user(fourth.__pad, (void **)ptr)))
67                         break;
68                 ret = sys_semctl (first, second, third, fourth);
69                 break;
70         }
71         case MSGSND:
72                 ret = sys_msgsnd (first, (struct msgbuf *) ptr, second, third);
73                 break;
74         case MSGRCV:
75                 switch (version) {
76                 case 0: {
77                         struct ipc_kludge tmp;
78
79                         if (!ptr)
80                                 break;
81                         if ((ret = access_ok(VERIFY_READ, ptr, sizeof(tmp)) ? 0 : -EFAULT)
82                             || (ret = copy_from_user(&tmp,
83                                                 (struct ipc_kludge *) ptr,
84                                                 sizeof (tmp))))
85                                 break;
86                         ret = sys_msgrcv (first, tmp.msgp, second, tmp.msgtyp,
87                                           third);
88                         break;
89                         }
90                 default:
91                         ret = sys_msgrcv (first, (struct msgbuf *) ptr,
92                                           second, fifth, third);
93                         break;
94                 }
95                 break;
96         case MSGGET:
97                 ret = sys_msgget ((key_t) first, second);
98                 break;
99         case MSGCTL:
100                 ret = sys_msgctl (first, second, (struct msqid_ds *) ptr);
101                 break;
102         case SHMAT:
103                 switch (version) {
104                 default: {
105                         ulong raddr;
106
107                         if ((ret = access_ok(VERIFY_WRITE, (ulong*) third,
108                                                sizeof(ulong)) ? 0 : -EFAULT))
109                                 break;
110                         ret = do_shmat (first, (char *) ptr, second, &raddr);
111                         if (ret)
112                                 break;
113                         ret = put_user (raddr, (ulong *) third);
114                         break;
115                         }
116                 case 1: /* iBCS2 emulator entry point */
117                         if (!segment_eq(get_fs(), get_ds()))
118                                 break;
119                         ret = do_shmat (first, (char *) ptr, second,
120                                          (ulong *) third);
121                         break;
122                 }
123                 break;
124         case SHMDT: 
125                 ret = sys_shmdt ((char *)ptr);
126                 break;
127         case SHMGET:
128                 ret = sys_shmget (first, second, third);
129                 break;
130         case SHMCTL:
131                 ret = sys_shmctl (first, second, (struct shmid_ds *) ptr);
132                 break;
133         }
134
135         return ret;
136 }
137
138 /*
139  * sys_pipe() is the normal C calling standard for creating
140  * a pipe. It's not the way unix traditionally does this, though.
141  */
142 int sys_pipe (int *fildes)
143 {
144         int fd[2];
145         int error;
146
147         error = do_pipe (fd);
148         if (!error) {
149                 if (copy_to_user (fildes, fd, 2*sizeof (int)))
150                         error = -EFAULT;
151         }
152         return error;
153 }
154
155 static inline unsigned long
156 do_mmap2 (unsigned long addr, size_t len,
157          unsigned long prot, unsigned long flags,
158          unsigned long fd, unsigned long pgoff)
159 {
160         struct file * file = NULL;
161         int ret = -EBADF;
162
163         flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
164         if (! (flags & MAP_ANONYMOUS)) {
165                 if (!(file = fget (fd)))
166                         goto out;
167         }
168         
169         down_write (&current->mm->mmap_sem);
170         ret = do_mmap_pgoff (file, addr, len, prot, flags, pgoff);
171         up_write (&current->mm->mmap_sem);
172         if (file)
173                 fput (file);
174 out:
175         return ret;
176 }
177
178 unsigned long sys_mmap2 (unsigned long addr, size_t len,
179                         unsigned long prot, unsigned long flags,
180                         unsigned long fd, unsigned long pgoff)
181 {
182         return do_mmap2 (addr, len, prot, flags, fd, pgoff);
183 }
184
185 unsigned long sys_mmap (unsigned long addr, size_t len,
186                        unsigned long prot, unsigned long flags,
187                        unsigned long fd, off_t offset)
188 {
189         int err = -EINVAL;
190
191         if (offset & ~PAGE_MASK)
192                 goto out;
193
194         err = do_mmap2 (addr, len, prot, flags, fd, offset >> PAGE_SHIFT);
195 out:
196         return err;
197 }
198
199 /*
200  * Do a system call from kernel instead of calling sys_execve so we
201  * end up with proper pt_regs.
202  */
203 int kernel_execve(const char *filename, char *const argv[], char *const envp[])
204 {
205         register char *__a __asm__ ("r6") = filename;
206         register void *__b __asm__ ("r7") = argv;
207         register void *__c __asm__ ("r8") = envp;
208         register unsigned long __syscall __asm__ ("r12") = __NR_execve;
209         register unsigned long __ret __asm__ ("r10");
210         __asm__ __volatile__ ("trap 0"
211                         : "=r" (__ret), "=r" (__syscall)
212                         : "1" (__syscall), "r" (__a), "r" (__b), "r" (__c)
213                         : "r1", "r5", "r11", "r13", "r14",
214                           "r15", "r16", "r17", "r18", "r19");
215         return __ret;
216 }