unified (weak) sys_pipe implementation
[linux-3.10.git] / 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 asmlinkage long sys_mmap2(unsigned long addr, unsigned long len,
32                           unsigned long prot, unsigned long flags,
33                           unsigned long fd, unsigned long pgoff)
34 {
35         int error = -EBADF;
36         struct file * file = NULL;
37
38         flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
39         if (!(flags & MAP_ANONYMOUS)) {
40                 file = fget(fd);
41                 if (!file)
42                         goto out;
43         }
44
45         /* As with sparc32, make sure the shift for mmap2 is constant
46            (12), no matter what PAGE_SIZE we have.... */
47
48         /* But unlike sparc32, don't just silently break if we're
49            trying to map something we can't */
50         if (pgoff & ((1<<(PAGE_SHIFT-12))-1))
51                 return -EINVAL;
52
53         pgoff >>= (PAGE_SHIFT - 12);
54
55         down_write(&current->mm->mmap_sem);
56         error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
57         up_write(&current->mm->mmap_sem);
58
59         if (file)
60                 fput(file);
61 out:
62         return error;
63 }
64
65 #if 0 /* DAVIDM - do we want this */
66 struct mmap_arg_struct64 {
67         __u32 addr;
68         __u32 len;
69         __u32 prot;
70         __u32 flags;
71         __u64 offset; /* 64 bits */
72         __u32 fd;
73 };
74
75 asmlinkage long sys_mmap64(struct mmap_arg_struct64 *arg)
76 {
77         int error = -EFAULT;
78         struct file * file = NULL;
79         struct mmap_arg_struct64 a;
80         unsigned long pgoff;
81
82         if (copy_from_user(&a, arg, sizeof(a)))
83                 return -EFAULT;
84
85         if ((long)a.offset & ~PAGE_MASK)
86                 return -EINVAL;
87
88         pgoff = a.offset >> PAGE_SHIFT;
89         if ((a.offset >> PAGE_SHIFT) != pgoff)
90                 return -EINVAL;
91
92         if (!(a.flags & MAP_ANONYMOUS)) {
93                 error = -EBADF;
94                 file = fget(a.fd);
95                 if (!file)
96                         goto out;
97         }
98         a.flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
99
100         down_write(&current->mm->mmap_sem);
101         error = do_mmap_pgoff(file, a.addr, a.len, a.prot, a.flags, pgoff);
102         up_write(&current->mm->mmap_sem);
103         if (file)
104                 fput(file);
105 out:
106         return error;
107 }
108 #endif
109
110 /*
111  * sys_ipc() is the de-multiplexer for the SysV IPC calls..
112  *
113  * This is really horribly ugly.
114  */
115 asmlinkage long sys_ipc(unsigned long call,
116                         unsigned long first,
117                         unsigned long second,
118                         unsigned long third,
119                         void __user *ptr,
120                         unsigned long fifth)
121 {
122         int version, ret;
123
124         version = call >> 16; /* hack for backward compatibility */
125         call &= 0xffff;
126
127         switch (call) {
128         case SEMOP:
129                 return sys_semtimedop(first, (struct sembuf __user *)ptr, second, NULL);
130         case SEMTIMEDOP:
131                 return sys_semtimedop(first, (struct sembuf __user *)ptr, second,
132                                       (const struct timespec __user *)fifth);
133
134         case SEMGET:
135                 return sys_semget (first, second, third);
136         case SEMCTL: {
137                 union semun fourth;
138                 if (!ptr)
139                         return -EINVAL;
140                 if (get_user(fourth.__pad, (void * __user *) ptr))
141                         return -EFAULT;
142                 return sys_semctl (first, second, third, fourth);
143         }
144
145         case MSGSND:
146                 return sys_msgsnd (first, (struct msgbuf __user *) ptr,
147                                    second, third);
148         case MSGRCV:
149                 switch (version) {
150                 case 0: {
151                         struct ipc_kludge tmp;
152                         if (!ptr)
153                                 return -EINVAL;
154
155                         if (copy_from_user(&tmp,
156                                            (struct ipc_kludge __user *) ptr,
157                                            sizeof (tmp)))
158                                 return -EFAULT;
159                         return sys_msgrcv (first, tmp.msgp, second,
160                                            tmp.msgtyp, third);
161                 }
162                 default:
163                         return sys_msgrcv (first,
164                                            (struct msgbuf __user *) ptr,
165                                            second, fifth, third);
166                 }
167         case MSGGET:
168                 return sys_msgget ((key_t) first, second);
169         case MSGCTL:
170                 return sys_msgctl (first, second, (struct msqid_ds __user *) ptr);
171
172         case SHMAT:
173                 switch (version) {
174                 default: {
175                         ulong raddr;
176                         ret = do_shmat (first, (char __user *) ptr, second, &raddr);
177                         if (ret)
178                                 return ret;
179                         return put_user (raddr, (ulong __user *) third);
180                 }
181                 case 1: /* iBCS2 emulator entry point */
182                         if (!segment_eq(get_fs(), get_ds()))
183                                 return -EINVAL;
184                         /* The "(ulong *) third" is valid _only_ because of the kernel segment thing */
185                         return do_shmat (first, (char __user *) ptr, second, (ulong *) third);
186                 }
187         case SHMDT:
188                 return sys_shmdt ((char __user *)ptr);
189         case SHMGET:
190                 return sys_shmget (first, second, third);
191         case SHMCTL:
192                 return sys_shmctl (first, second,
193                                    (struct shmid_ds __user *) ptr);
194         default:
195                 return -ENOSYS;
196         }
197 }