Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * sys_parisc32.c: Conversion between 32bit and 64bit native syscalls. | |
3 | * | |
4 | * Copyright (C) 2000-2001 Hewlett Packard Company | |
5 | * Copyright (C) 2000 John Marvin | |
6 | * Copyright (C) 2001 Matthew Wilcox | |
7 | * | |
8 | * These routines maintain argument size conversion between 32bit and 64bit | |
9 | * environment. Based heavily on sys_ia32.c and sys_sparc32.c. | |
10 | */ | |
11 | ||
1da177e4 LT |
12 | #include <linux/compat.h> |
13 | #include <linux/kernel.h> | |
14 | #include <linux/sched.h> | |
15 | #include <linux/fs.h> | |
16 | #include <linux/mm.h> | |
17 | #include <linux/file.h> | |
18 | #include <linux/signal.h> | |
19 | #include <linux/resource.h> | |
20 | #include <linux/times.h> | |
21 | #include <linux/utsname.h> | |
22 | #include <linux/time.h> | |
1da177e4 LT |
23 | #include <linux/smp.h> |
24 | #include <linux/smp_lock.h> | |
25 | #include <linux/sem.h> | |
26 | #include <linux/msg.h> | |
27 | #include <linux/shm.h> | |
28 | #include <linux/slab.h> | |
29 | #include <linux/uio.h> | |
30 | #include <linux/nfs_fs.h> | |
31 | #include <linux/ncp_fs.h> | |
32 | #include <linux/sunrpc/svc.h> | |
33 | #include <linux/nfsd/nfsd.h> | |
34 | #include <linux/nfsd/cache.h> | |
35 | #include <linux/nfsd/xdr.h> | |
36 | #include <linux/nfsd/syscall.h> | |
37 | #include <linux/poll.h> | |
38 | #include <linux/personality.h> | |
39 | #include <linux/stat.h> | |
40 | #include <linux/highmem.h> | |
41 | #include <linux/highuid.h> | |
42 | #include <linux/mman.h> | |
43 | #include <linux/binfmts.h> | |
44 | #include <linux/namei.h> | |
45 | #include <linux/vfs.h> | |
46 | #include <linux/ptrace.h> | |
47 | #include <linux/swap.h> | |
48 | #include <linux/syscalls.h> | |
49 | ||
50 | #include <asm/types.h> | |
51 | #include <asm/uaccess.h> | |
1da177e4 LT |
52 | #include <asm/mmu_context.h> |
53 | ||
54 | #include "sys32.h" | |
55 | ||
56 | #undef DEBUG | |
57 | ||
58 | #ifdef DEBUG | |
59 | #define DBG(x) printk x | |
60 | #else | |
61 | #define DBG(x) | |
62 | #endif | |
63 | ||
64 | /* | |
65 | * sys32_execve() executes a new program. | |
66 | */ | |
67 | ||
68 | asmlinkage int sys32_execve(struct pt_regs *regs) | |
69 | { | |
70 | int error; | |
71 | char *filename; | |
72 | ||
73 | DBG(("sys32_execve(%p) r26 = 0x%lx\n", regs, regs->gr[26])); | |
74 | filename = getname((const char __user *) regs->gr[26]); | |
75 | error = PTR_ERR(filename); | |
76 | if (IS_ERR(filename)) | |
77 | goto out; | |
78 | error = compat_do_execve(filename, compat_ptr(regs->gr[25]), | |
79 | compat_ptr(regs->gr[24]), regs); | |
80 | if (error == 0) { | |
81 | task_lock(current); | |
82 | current->ptrace &= ~PT_DTRACE; | |
83 | task_unlock(current); | |
84 | } | |
85 | putname(filename); | |
86 | out: | |
87 | ||
88 | return error; | |
89 | } | |
90 | ||
91 | asmlinkage long sys32_unimplemented(int r26, int r25, int r24, int r23, | |
92 | int r22, int r21, int r20) | |
93 | { | |
94 | printk(KERN_ERR "%s(%d): Unimplemented 32 on 64 syscall #%d!\n", | |
95 | current->comm, current->pid, r20); | |
96 | return -ENOSYS; | |
97 | } | |
98 | ||
99 | #ifdef CONFIG_SYSCTL | |
100 | ||
101 | struct __sysctl_args32 { | |
102 | u32 name; | |
103 | int nlen; | |
104 | u32 oldval; | |
105 | u32 oldlenp; | |
106 | u32 newval; | |
107 | u32 newlen; | |
108 | u32 __unused[4]; | |
109 | }; | |
110 | ||
111 | asmlinkage long sys32_sysctl(struct __sysctl_args32 __user *args) | |
112 | { | |
17cca072 MW |
113 | #ifndef CONFIG_SYSCTL_SYSCALL |
114 | return -ENOSYS; | |
115 | #else | |
1da177e4 LT |
116 | struct __sysctl_args32 tmp; |
117 | int error; | |
118 | unsigned int oldlen32; | |
17cca072 | 119 | size_t oldlen, __user *oldlenp = NULL; |
1da177e4 | 120 | unsigned long addr = (((long __force)&args->__unused[0]) + 7) & ~7; |
1da177e4 LT |
121 | |
122 | DBG(("sysctl32(%p)\n", args)); | |
123 | ||
124 | if (copy_from_user(&tmp, args, sizeof(tmp))) | |
125 | return -EFAULT; | |
126 | ||
127 | if (tmp.oldval && tmp.oldlenp) { | |
128 | /* Duh, this is ugly and might not work if sysctl_args | |
129 | is in read-only memory, but do_sysctl does indirectly | |
130 | a lot of uaccess in both directions and we'd have to | |
131 | basically copy the whole sysctl.c here, and | |
132 | glibc's __sysctl uses rw memory for the structure | |
133 | anyway. */ | |
134 | /* a possibly better hack than this, which will avoid the | |
135 | * problem if the struct is read only, is to push the | |
136 | * 'oldlen' value out to the user's stack instead. -PB | |
137 | */ | |
138 | if (get_user(oldlen32, (u32 *)(u64)tmp.oldlenp)) | |
139 | return -EFAULT; | |
140 | oldlen = oldlen32; | |
141 | if (put_user(oldlen, (size_t *)addr)) | |
142 | return -EFAULT; | |
143 | oldlenp = (size_t *)addr; | |
144 | } | |
145 | ||
146 | lock_kernel(); | |
17cca072 MW |
147 | error = do_sysctl((int __user *)(u64)tmp.name, tmp.nlen, |
148 | (void __user *)(u64)tmp.oldval, oldlenp, | |
149 | (void __user *)(u64)tmp.newval, tmp.newlen); | |
1da177e4 LT |
150 | unlock_kernel(); |
151 | if (oldlenp) { | |
152 | if (!error) { | |
153 | if (get_user(oldlen, (size_t *)addr)) { | |
154 | error = -EFAULT; | |
155 | } else { | |
156 | oldlen32 = oldlen; | |
157 | if (put_user(oldlen32, (u32 *)(u64)tmp.oldlenp)) | |
158 | error = -EFAULT; | |
159 | } | |
160 | } | |
17cca072 | 161 | if (copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused))) |
1da177e4 LT |
162 | error = -EFAULT; |
163 | } | |
164 | return error; | |
17cca072 | 165 | #endif |
1da177e4 LT |
166 | } |
167 | ||
168 | #endif /* CONFIG_SYSCTL */ | |
169 | ||
170 | asmlinkage long sys32_sched_rr_get_interval(pid_t pid, | |
171 | struct compat_timespec __user *interval) | |
172 | { | |
173 | struct timespec t; | |
174 | int ret; | |
175 | ||
176 | KERNEL_SYSCALL(ret, sys_sched_rr_get_interval, pid, (struct timespec __user *)&t); | |
177 | if (put_compat_timespec(&t, interval)) | |
178 | return -EFAULT; | |
179 | return ret; | |
180 | } | |
181 | ||
1da177e4 LT |
182 | /*** copied from mips64 ***/ |
183 | /* | |
184 | * Ooo, nasty. We need here to frob 32-bit unsigned longs to | |
185 | * 64-bit unsigned longs. | |
186 | */ | |
187 | ||
188 | static inline int | |
189 | get_fd_set32(unsigned long n, u32 *ufdset, unsigned long *fdset) | |
190 | { | |
191 | n = (n + 8*sizeof(u32) - 1) / (8*sizeof(u32)); | |
192 | if (ufdset) { | |
193 | unsigned long odd; | |
194 | ||
195 | if (!access_ok(VERIFY_WRITE, ufdset, n*sizeof(u32))) | |
196 | return -EFAULT; | |
197 | ||
198 | odd = n & 1UL; | |
199 | n &= ~1UL; | |
200 | while (n) { | |
201 | unsigned long h, l; | |
202 | __get_user(l, ufdset); | |
203 | __get_user(h, ufdset+1); | |
204 | ufdset += 2; | |
205 | *fdset++ = h << 32 | l; | |
206 | n -= 2; | |
207 | } | |
208 | if (odd) | |
209 | __get_user(*fdset, ufdset); | |
210 | } else { | |
211 | /* Tricky, must clear full unsigned long in the | |
212 | * kernel fdset at the end, this makes sure that | |
213 | * actually happens. | |
214 | */ | |
215 | memset(fdset, 0, ((n + 1) & ~1)*sizeof(u32)); | |
216 | } | |
217 | return 0; | |
218 | } | |
219 | ||
220 | static inline void | |
221 | set_fd_set32(unsigned long n, u32 *ufdset, unsigned long *fdset) | |
222 | { | |
223 | unsigned long odd; | |
224 | n = (n + 8*sizeof(u32) - 1) / (8*sizeof(u32)); | |
225 | ||
226 | if (!ufdset) | |
227 | return; | |
228 | ||
229 | odd = n & 1UL; | |
230 | n &= ~1UL; | |
231 | while (n) { | |
232 | unsigned long h, l; | |
233 | l = *fdset++; | |
234 | h = l >> 32; | |
235 | __put_user(l, ufdset); | |
236 | __put_user(h, ufdset+1); | |
237 | ufdset += 2; | |
238 | n -= 2; | |
239 | } | |
240 | if (odd) | |
241 | __put_user(*fdset, ufdset); | |
242 | } | |
243 | ||
244 | struct msgbuf32 { | |
245 | int mtype; | |
246 | char mtext[1]; | |
247 | }; | |
248 | ||
249 | asmlinkage long sys32_msgsnd(int msqid, | |
250 | struct msgbuf32 __user *umsgp32, | |
251 | size_t msgsz, int msgflg) | |
252 | { | |
253 | struct msgbuf *mb; | |
254 | struct msgbuf32 mb32; | |
255 | int err; | |
256 | ||
257 | if ((mb = kmalloc(msgsz + sizeof *mb + 4, GFP_KERNEL)) == NULL) | |
258 | return -ENOMEM; | |
259 | ||
260 | err = get_user(mb32.mtype, &umsgp32->mtype); | |
261 | mb->mtype = mb32.mtype; | |
262 | err |= copy_from_user(mb->mtext, &umsgp32->mtext, msgsz); | |
263 | ||
264 | if (err) | |
265 | err = -EFAULT; | |
266 | else | |
267 | KERNEL_SYSCALL(err, sys_msgsnd, msqid, (struct msgbuf __user *)mb, msgsz, msgflg); | |
268 | ||
269 | kfree(mb); | |
270 | return err; | |
271 | } | |
272 | ||
273 | asmlinkage long sys32_msgrcv(int msqid, | |
274 | struct msgbuf32 __user *umsgp32, | |
275 | size_t msgsz, long msgtyp, int msgflg) | |
276 | { | |
277 | struct msgbuf *mb; | |
278 | struct msgbuf32 mb32; | |
279 | int err, len; | |
280 | ||
281 | if ((mb = kmalloc(msgsz + sizeof *mb + 4, GFP_KERNEL)) == NULL) | |
282 | return -ENOMEM; | |
283 | ||
284 | KERNEL_SYSCALL(err, sys_msgrcv, msqid, (struct msgbuf __user *)mb, msgsz, msgtyp, msgflg); | |
285 | ||
286 | if (err >= 0) { | |
287 | len = err; | |
288 | mb32.mtype = mb->mtype; | |
289 | err = put_user(mb32.mtype, &umsgp32->mtype); | |
290 | err |= copy_to_user(&umsgp32->mtext, mb->mtext, len); | |
291 | if (err) | |
292 | err = -EFAULT; | |
293 | else | |
294 | err = len; | |
295 | } | |
296 | ||
297 | kfree(mb); | |
298 | return err; | |
299 | } | |
300 | ||
301 | asmlinkage int sys32_sendfile(int out_fd, int in_fd, compat_off_t __user *offset, s32 count) | |
302 | { | |
303 | mm_segment_t old_fs = get_fs(); | |
304 | int ret; | |
305 | off_t of; | |
306 | ||
307 | if (offset && get_user(of, offset)) | |
308 | return -EFAULT; | |
309 | ||
310 | set_fs(KERNEL_DS); | |
311 | ret = sys_sendfile(out_fd, in_fd, offset ? (off_t __user *)&of : NULL, count); | |
312 | set_fs(old_fs); | |
313 | ||
314 | if (offset && put_user(of, offset)) | |
315 | return -EFAULT; | |
316 | ||
317 | return ret; | |
318 | } | |
319 | ||
320 | asmlinkage int sys32_sendfile64(int out_fd, int in_fd, compat_loff_t __user *offset, s32 count) | |
321 | { | |
322 | mm_segment_t old_fs = get_fs(); | |
323 | int ret; | |
324 | loff_t lof; | |
325 | ||
326 | if (offset && get_user(lof, offset)) | |
327 | return -EFAULT; | |
328 | ||
329 | set_fs(KERNEL_DS); | |
330 | ret = sys_sendfile64(out_fd, in_fd, offset ? (loff_t __user *)&lof : NULL, count); | |
331 | set_fs(old_fs); | |
332 | ||
333 | if (offset && put_user(lof, offset)) | |
334 | return -EFAULT; | |
335 | ||
336 | return ret; | |
337 | } | |
338 | ||
339 | ||
1da177e4 LT |
340 | /* lseek() needs a wrapper because 'offset' can be negative, but the top |
341 | * half of the argument has been zeroed by syscall.S. | |
342 | */ | |
343 | ||
344 | asmlinkage int sys32_lseek(unsigned int fd, int offset, unsigned int origin) | |
345 | { | |
346 | return sys_lseek(fd, offset, origin); | |
347 | } | |
348 | ||
349 | asmlinkage long sys32_semctl(int semid, int semnum, int cmd, union semun arg) | |
350 | { | |
351 | union semun u; | |
352 | ||
353 | if (cmd == SETVAL) { | |
354 | /* Ugh. arg is a union of int,ptr,ptr,ptr, so is 8 bytes. | |
355 | * The int should be in the first 4, but our argument | |
356 | * frobbing has left it in the last 4. | |
357 | */ | |
358 | u.val = *((int *)&arg + 1); | |
359 | return sys_semctl (semid, semnum, cmd, u); | |
360 | } | |
361 | return sys_semctl (semid, semnum, cmd, arg); | |
362 | } | |
363 | ||
364 | long sys32_lookup_dcookie(u32 cookie_high, u32 cookie_low, char __user *buf, | |
365 | size_t len) | |
366 | { | |
367 | return sys_lookup_dcookie((u64)cookie_high << 32 | cookie_low, | |
368 | buf, len); | |
369 | } | |
2cfc5be7 KM |
370 | |
371 | asmlinkage long compat_sys_fallocate(int fd, int mode, u32 offhi, u32 offlo, | |
372 | u32 lenhi, u32 lenlo) | |
373 | { | |
374 | return sys_fallocate(fd, mode, ((loff_t)offhi << 32) | offlo, | |
375 | ((loff_t)lenhi << 32) | lenlo); | |
376 | } |