]> git.proxmox.com Git - mirror_ubuntu-zesty-kernel.git/blame - arch/s390/kernel/compat_linux.c
[PATCH] capable/capability.h (net/)
[mirror_ubuntu-zesty-kernel.git] / arch / s390 / kernel / compat_linux.c
CommitLineData
1da177e4
LT
1/*
2 * arch/s390x/kernel/linux32.c
3 *
4 * S390 version
5 * Copyright (C) 2000 IBM Deutschland Entwicklung GmbH, IBM Corporation
6 * Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
7 * Gerhard Tonn (ton@de.ibm.com)
8 * Thomas Spatzier (tspat@de.ibm.com)
9 *
10 * Conversion between 31bit and 64bit native syscalls.
11 *
12 * Heavily inspired by the 32-bit Sparc compat code which is
13 * Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
14 * Copyright (C) 1997 David S. Miller (davem@caip.rutgers.edu)
15 *
16 */
17
18
19#include <linux/config.h>
20#include <linux/kernel.h>
21#include <linux/sched.h>
22#include <linux/fs.h>
23#include <linux/mm.h>
24#include <linux/file.h>
25#include <linux/signal.h>
26#include <linux/resource.h>
27#include <linux/times.h>
28#include <linux/utsname.h>
29#include <linux/timex.h>
30#include <linux/smp.h>
31#include <linux/smp_lock.h>
32#include <linux/sem.h>
33#include <linux/msg.h>
34#include <linux/shm.h>
35#include <linux/slab.h>
36#include <linux/uio.h>
37#include <linux/nfs_fs.h>
38#include <linux/quota.h>
39#include <linux/module.h>
40#include <linux/sunrpc/svc.h>
41#include <linux/nfsd/nfsd.h>
42#include <linux/nfsd/cache.h>
43#include <linux/nfsd/xdr.h>
44#include <linux/nfsd/syscall.h>
45#include <linux/poll.h>
46#include <linux/personality.h>
47#include <linux/stat.h>
48#include <linux/filter.h>
49#include <linux/highmem.h>
50#include <linux/highuid.h>
51#include <linux/mman.h>
52#include <linux/ipv6.h>
53#include <linux/in.h>
54#include <linux/icmpv6.h>
55#include <linux/syscalls.h>
56#include <linux/sysctl.h>
57#include <linux/binfmts.h>
58#include <linux/compat.h>
59#include <linux/vfs.h>
60#include <linux/ptrace.h>
068e1b94 61#include <linux/fadvise.h>
1da177e4
LT
62
63#include <asm/types.h>
64#include <asm/ipc.h>
65#include <asm/uaccess.h>
66#include <asm/semaphore.h>
67
68#include <net/scm.h>
69#include <net/sock.h>
70
71#include "compat_linux.h"
72
73
74/* For this source file, we want overflow handling. */
75
76#undef high2lowuid
77#undef high2lowgid
78#undef low2highuid
79#undef low2highgid
80#undef SET_UID16
81#undef SET_GID16
82#undef NEW_TO_OLD_UID
83#undef NEW_TO_OLD_GID
84#undef SET_OLDSTAT_UID
85#undef SET_OLDSTAT_GID
86#undef SET_STAT_UID
87#undef SET_STAT_GID
88
89#define high2lowuid(uid) ((uid) > 65535) ? (u16)overflowuid : (u16)(uid)
90#define high2lowgid(gid) ((gid) > 65535) ? (u16)overflowgid : (u16)(gid)
91#define low2highuid(uid) ((uid) == (u16)-1) ? (uid_t)-1 : (uid_t)(uid)
92#define low2highgid(gid) ((gid) == (u16)-1) ? (gid_t)-1 : (gid_t)(gid)
93#define SET_UID16(var, uid) var = high2lowuid(uid)
94#define SET_GID16(var, gid) var = high2lowgid(gid)
95#define NEW_TO_OLD_UID(uid) high2lowuid(uid)
96#define NEW_TO_OLD_GID(gid) high2lowgid(gid)
97#define SET_OLDSTAT_UID(stat, uid) (stat).st_uid = high2lowuid(uid)
98#define SET_OLDSTAT_GID(stat, gid) (stat).st_gid = high2lowgid(gid)
99#define SET_STAT_UID(stat, uid) (stat).st_uid = high2lowuid(uid)
100#define SET_STAT_GID(stat, gid) (stat).st_gid = high2lowgid(gid)
101
102asmlinkage long sys32_chown16(const char * filename, u16 user, u16 group)
103{
104 return sys_chown(filename, low2highuid(user), low2highgid(group));
105}
106
107asmlinkage long sys32_lchown16(const char * filename, u16 user, u16 group)
108{
109 return sys_lchown(filename, low2highuid(user), low2highgid(group));
110}
111
112asmlinkage long sys32_fchown16(unsigned int fd, u16 user, u16 group)
113{
114 return sys_fchown(fd, low2highuid(user), low2highgid(group));
115}
116
117asmlinkage long sys32_setregid16(u16 rgid, u16 egid)
118{
119 return sys_setregid(low2highgid(rgid), low2highgid(egid));
120}
121
122asmlinkage long sys32_setgid16(u16 gid)
123{
124 return sys_setgid((gid_t)gid);
125}
126
127asmlinkage long sys32_setreuid16(u16 ruid, u16 euid)
128{
129 return sys_setreuid(low2highuid(ruid), low2highuid(euid));
130}
131
132asmlinkage long sys32_setuid16(u16 uid)
133{
134 return sys_setuid((uid_t)uid);
135}
136
137asmlinkage long sys32_setresuid16(u16 ruid, u16 euid, u16 suid)
138{
139 return sys_setresuid(low2highuid(ruid), low2highuid(euid),
140 low2highuid(suid));
141}
142
143asmlinkage long sys32_getresuid16(u16 *ruid, u16 *euid, u16 *suid)
144{
145 int retval;
146
147 if (!(retval = put_user(high2lowuid(current->uid), ruid)) &&
148 !(retval = put_user(high2lowuid(current->euid), euid)))
149 retval = put_user(high2lowuid(current->suid), suid);
150
151 return retval;
152}
153
154asmlinkage long sys32_setresgid16(u16 rgid, u16 egid, u16 sgid)
155{
156 return sys_setresgid(low2highgid(rgid), low2highgid(egid),
157 low2highgid(sgid));
158}
159
160asmlinkage long sys32_getresgid16(u16 *rgid, u16 *egid, u16 *sgid)
161{
162 int retval;
163
164 if (!(retval = put_user(high2lowgid(current->gid), rgid)) &&
165 !(retval = put_user(high2lowgid(current->egid), egid)))
166 retval = put_user(high2lowgid(current->sgid), sgid);
167
168 return retval;
169}
170
171asmlinkage long sys32_setfsuid16(u16 uid)
172{
173 return sys_setfsuid((uid_t)uid);
174}
175
176asmlinkage long sys32_setfsgid16(u16 gid)
177{
178 return sys_setfsgid((gid_t)gid);
179}
180
181static int groups16_to_user(u16 *grouplist, struct group_info *group_info)
182{
183 int i;
184 u16 group;
185
186 for (i = 0; i < group_info->ngroups; i++) {
187 group = (u16)GROUP_AT(group_info, i);
188 if (put_user(group, grouplist+i))
189 return -EFAULT;
190 }
191
192 return 0;
193}
194
195static int groups16_from_user(struct group_info *group_info, u16 *grouplist)
196{
197 int i;
198 u16 group;
199
200 for (i = 0; i < group_info->ngroups; i++) {
201 if (get_user(group, grouplist+i))
202 return -EFAULT;
203 GROUP_AT(group_info, i) = (gid_t)group;
204 }
205
206 return 0;
207}
208
209asmlinkage long sys32_getgroups16(int gidsetsize, u16 *grouplist)
210{
211 int i;
212
213 if (gidsetsize < 0)
214 return -EINVAL;
215
216 get_group_info(current->group_info);
217 i = current->group_info->ngroups;
218 if (gidsetsize) {
219 if (i > gidsetsize) {
220 i = -EINVAL;
221 goto out;
222 }
223 if (groups16_to_user(grouplist, current->group_info)) {
224 i = -EFAULT;
225 goto out;
226 }
227 }
228out:
229 put_group_info(current->group_info);
230 return i;
231}
232
233asmlinkage long sys32_setgroups16(int gidsetsize, u16 *grouplist)
234{
235 struct group_info *group_info;
236 int retval;
237
238 if (!capable(CAP_SETGID))
239 return -EPERM;
240 if ((unsigned)gidsetsize > NGROUPS_MAX)
241 return -EINVAL;
242
243 group_info = groups_alloc(gidsetsize);
244 if (!group_info)
245 return -ENOMEM;
246 retval = groups16_from_user(group_info, grouplist);
247 if (retval) {
248 put_group_info(group_info);
249 return retval;
250 }
251
252 retval = set_current_groups(group_info);
253 put_group_info(group_info);
254
255 return retval;
256}
257
258asmlinkage long sys32_getuid16(void)
259{
260 return high2lowuid(current->uid);
261}
262
263asmlinkage long sys32_geteuid16(void)
264{
265 return high2lowuid(current->euid);
266}
267
268asmlinkage long sys32_getgid16(void)
269{
270 return high2lowgid(current->gid);
271}
272
273asmlinkage long sys32_getegid16(void)
274{
275 return high2lowgid(current->egid);
276}
277
278/* 32-bit timeval and related flotsam. */
279
280static inline long get_tv32(struct timeval *o, struct compat_timeval *i)
281{
a63a4931 282 return (!access_ok(VERIFY_READ, o, sizeof(*o)) ||
1da177e4
LT
283 (__get_user(o->tv_sec, &i->tv_sec) ||
284 __get_user(o->tv_usec, &i->tv_usec)));
285}
286
287static inline long put_tv32(struct compat_timeval *o, struct timeval *i)
288{
289 return (!access_ok(VERIFY_WRITE, o, sizeof(*o)) ||
290 (__put_user(i->tv_sec, &o->tv_sec) ||
291 __put_user(i->tv_usec, &o->tv_usec)));
292}
293
294/*
295 * sys32_ipc() is the de-multiplexer for the SysV IPC calls in 32bit emulation.
296 *
297 * This is really horribly ugly.
298 */
299asmlinkage long sys32_ipc(u32 call, int first, int second, int third, u32 ptr)
300{
301 if (call >> 16) /* hack for backward compatibility */
302 return -EINVAL;
303
304 call &= 0xffff;
305
306 switch (call) {
307 case SEMTIMEDOP:
308 return compat_sys_semtimedop(first, compat_ptr(ptr),
309 second, compat_ptr(third));
310 case SEMOP:
311 /* struct sembuf is the same on 32 and 64bit :)) */
312 return sys_semtimedop(first, compat_ptr(ptr),
313 second, NULL);
314 case SEMGET:
315 return sys_semget(first, second, third);
316 case SEMCTL:
317 return compat_sys_semctl(first, second, third,
318 compat_ptr(ptr));
319 case MSGSND:
320 return compat_sys_msgsnd(first, second, third,
321 compat_ptr(ptr));
322 case MSGRCV:
323 return compat_sys_msgrcv(first, second, 0, third,
324 0, compat_ptr(ptr));
325 case MSGGET:
326 return sys_msgget((key_t) first, second);
327 case MSGCTL:
328 return compat_sys_msgctl(first, second, compat_ptr(ptr));
329 case SHMAT:
330 return compat_sys_shmat(first, second, third,
331 0, compat_ptr(ptr));
332 case SHMDT:
333 return sys_shmdt(compat_ptr(ptr));
334 case SHMGET:
335 return sys_shmget(first, (unsigned)second, third);
336 case SHMCTL:
337 return compat_sys_shmctl(first, second, compat_ptr(ptr));
338 }
339
340 return -ENOSYS;
341}
342
343asmlinkage long sys32_truncate64(const char * path, unsigned long high, unsigned long low)
344{
345 if ((int)high < 0)
346 return -EINVAL;
347 else
348 return sys_truncate(path, (high << 32) | low);
349}
350
351asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long high, unsigned long low)
352{
353 if ((int)high < 0)
354 return -EINVAL;
355 else
356 return sys_ftruncate(fd, (high << 32) | low);
357}
358
359int cp_compat_stat(struct kstat *stat, struct compat_stat *statbuf)
360{
361 int err;
362
363 if (!old_valid_dev(stat->dev) || !old_valid_dev(stat->rdev))
364 return -EOVERFLOW;
365
366 err = put_user(old_encode_dev(stat->dev), &statbuf->st_dev);
367 err |= put_user(stat->ino, &statbuf->st_ino);
368 err |= put_user(stat->mode, &statbuf->st_mode);
369 err |= put_user(stat->nlink, &statbuf->st_nlink);
370 err |= put_user(high2lowuid(stat->uid), &statbuf->st_uid);
371 err |= put_user(high2lowgid(stat->gid), &statbuf->st_gid);
372 err |= put_user(old_encode_dev(stat->rdev), &statbuf->st_rdev);
373 err |= put_user(stat->size, &statbuf->st_size);
374 err |= put_user(stat->atime.tv_sec, &statbuf->st_atime);
375 err |= put_user(stat->atime.tv_nsec, &statbuf->st_atime_nsec);
376 err |= put_user(stat->mtime.tv_sec, &statbuf->st_mtime);
377 err |= put_user(stat->mtime.tv_nsec, &statbuf->st_mtime_nsec);
378 err |= put_user(stat->ctime.tv_sec, &statbuf->st_ctime);
379 err |= put_user(stat->ctime.tv_nsec, &statbuf->st_ctime_nsec);
380 err |= put_user(stat->blksize, &statbuf->st_blksize);
381 err |= put_user(stat->blocks, &statbuf->st_blocks);
382/* fixme
383 err |= put_user(0, &statbuf->__unused4[0]);
384 err |= put_user(0, &statbuf->__unused4[1]);
385*/
386 return err;
387}
388
389struct sysinfo32 {
390 s32 uptime;
391 u32 loads[3];
392 u32 totalram;
393 u32 freeram;
394 u32 sharedram;
395 u32 bufferram;
396 u32 totalswap;
397 u32 freeswap;
398 unsigned short procs;
399 unsigned short pads;
400 u32 totalhigh;
401 u32 freehigh;
402 unsigned int mem_unit;
403 char _f[8];
404};
405
406asmlinkage long sys32_sysinfo(struct sysinfo32 __user *info)
407{
408 struct sysinfo s;
409 int ret, err;
410 mm_segment_t old_fs = get_fs ();
411
412 set_fs (KERNEL_DS);
413 ret = sys_sysinfo(&s);
414 set_fs (old_fs);
415 err = put_user (s.uptime, &info->uptime);
416 err |= __put_user (s.loads[0], &info->loads[0]);
417 err |= __put_user (s.loads[1], &info->loads[1]);
418 err |= __put_user (s.loads[2], &info->loads[2]);
419 err |= __put_user (s.totalram, &info->totalram);
420 err |= __put_user (s.freeram, &info->freeram);
421 err |= __put_user (s.sharedram, &info->sharedram);
422 err |= __put_user (s.bufferram, &info->bufferram);
423 err |= __put_user (s.totalswap, &info->totalswap);
424 err |= __put_user (s.freeswap, &info->freeswap);
425 err |= __put_user (s.procs, &info->procs);
426 err |= __put_user (s.totalhigh, &info->totalhigh);
427 err |= __put_user (s.freehigh, &info->freehigh);
428 err |= __put_user (s.mem_unit, &info->mem_unit);
429 if (err)
430 return -EFAULT;
431 return ret;
432}
433
434asmlinkage long sys32_sched_rr_get_interval(compat_pid_t pid,
435 struct compat_timespec __user *interval)
436{
437 struct timespec t;
438 int ret;
439 mm_segment_t old_fs = get_fs ();
440
441 set_fs (KERNEL_DS);
442 ret = sys_sched_rr_get_interval(pid, &t);
443 set_fs (old_fs);
444 if (put_compat_timespec(&t, interval))
445 return -EFAULT;
446 return ret;
447}
448
449asmlinkage long sys32_rt_sigprocmask(int how, compat_sigset_t __user *set,
450 compat_sigset_t __user *oset, size_t sigsetsize)
451{
452 sigset_t s;
453 compat_sigset_t s32;
454 int ret;
455 mm_segment_t old_fs = get_fs();
456
457 if (set) {
458 if (copy_from_user (&s32, set, sizeof(compat_sigset_t)))
459 return -EFAULT;
460 switch (_NSIG_WORDS) {
461 case 4: s.sig[3] = s32.sig[6] | (((long)s32.sig[7]) << 32);
462 case 3: s.sig[2] = s32.sig[4] | (((long)s32.sig[5]) << 32);
463 case 2: s.sig[1] = s32.sig[2] | (((long)s32.sig[3]) << 32);
464 case 1: s.sig[0] = s32.sig[0] | (((long)s32.sig[1]) << 32);
465 }
466 }
467 set_fs (KERNEL_DS);
468 ret = sys_rt_sigprocmask(how, set ? &s : NULL, oset ? &s : NULL, sigsetsize);
469 set_fs (old_fs);
470 if (ret) return ret;
471 if (oset) {
472 switch (_NSIG_WORDS) {
473 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
474 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
475 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
476 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
477 }
478 if (copy_to_user (oset, &s32, sizeof(compat_sigset_t)))
479 return -EFAULT;
480 }
481 return 0;
482}
483
484asmlinkage long sys32_rt_sigpending(compat_sigset_t __user *set,
485 size_t sigsetsize)
486{
487 sigset_t s;
488 compat_sigset_t s32;
489 int ret;
490 mm_segment_t old_fs = get_fs();
491
492 set_fs (KERNEL_DS);
493 ret = sys_rt_sigpending(&s, sigsetsize);
494 set_fs (old_fs);
495 if (!ret) {
496 switch (_NSIG_WORDS) {
497 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
498 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
499 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
500 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
501 }
502 if (copy_to_user (set, &s32, sizeof(compat_sigset_t)))
503 return -EFAULT;
504 }
505 return ret;
506}
507
508asmlinkage long
509sys32_rt_sigqueueinfo(int pid, int sig, compat_siginfo_t __user *uinfo)
510{
511 siginfo_t info;
512 int ret;
513 mm_segment_t old_fs = get_fs();
514
515 if (copy_siginfo_from_user32(&info, uinfo))
516 return -EFAULT;
517 set_fs (KERNEL_DS);
518 ret = sys_rt_sigqueueinfo(pid, sig, &info);
519 set_fs (old_fs);
520 return ret;
521}
522
523/*
524 * sys32_execve() executes a new program after the asm stub has set
525 * things up for us. This should basically do what I want it to.
526 */
527asmlinkage long
528sys32_execve(struct pt_regs regs)
529{
530 int error;
531 char * filename;
532
533 filename = getname(compat_ptr(regs.orig_gpr2));
534 error = PTR_ERR(filename);
535 if (IS_ERR(filename))
536 goto out;
537 error = compat_do_execve(filename, compat_ptr(regs.gprs[3]),
538 compat_ptr(regs.gprs[4]), &regs);
539 if (error == 0)
540 {
541 task_lock(current);
542 current->ptrace &= ~PT_DTRACE;
543 task_unlock(current);
544 current->thread.fp_regs.fpc=0;
545 __asm__ __volatile__
546 ("sr 0,0\n\t"
547 "sfpc 0,0\n\t"
548 : : :"0");
549 }
550 putname(filename);
551out:
552 return error;
553}
554
555
556#ifdef CONFIG_MODULES
557
558asmlinkage long
559sys32_init_module(void __user *umod, unsigned long len,
560 const char __user *uargs)
561{
562 return sys_init_module(umod, len, uargs);
563}
564
565asmlinkage long
566sys32_delete_module(const char __user *name_user, unsigned int flags)
567{
568 return sys_delete_module(name_user, flags);
569}
570
571#else /* CONFIG_MODULES */
572
573asmlinkage long
574sys32_init_module(void __user *umod, unsigned long len,
575 const char __user *uargs)
576{
577 return -ENOSYS;
578}
579
580asmlinkage long
581sys32_delete_module(const char __user *name_user, unsigned int flags)
582{
583 return -ENOSYS;
584}
585
586#endif /* CONFIG_MODULES */
587
588/* Translations due to time_t size differences. Which affects all
589 sorts of things, like timeval and itimerval. */
590
591extern struct timezone sys_tz;
592
593asmlinkage long sys32_gettimeofday(struct compat_timeval *tv, struct timezone *tz)
594{
595 if (tv) {
596 struct timeval ktv;
597 do_gettimeofday(&ktv);
598 if (put_tv32(tv, &ktv))
599 return -EFAULT;
600 }
601 if (tz) {
602 if (copy_to_user(tz, &sys_tz, sizeof(sys_tz)))
603 return -EFAULT;
604 }
605 return 0;
606}
607
608static inline long get_ts32(struct timespec *o, struct compat_timeval *i)
609{
610 long usec;
611
612 if (!access_ok(VERIFY_READ, i, sizeof(*i)))
613 return -EFAULT;
614 if (__get_user(o->tv_sec, &i->tv_sec))
615 return -EFAULT;
616 if (__get_user(usec, &i->tv_usec))
617 return -EFAULT;
618 o->tv_nsec = usec * 1000;
619 return 0;
620}
621
622asmlinkage long sys32_settimeofday(struct compat_timeval *tv, struct timezone *tz)
623{
624 struct timespec kts;
625 struct timezone ktz;
626
627 if (tv) {
628 if (get_ts32(&kts, tv))
629 return -EFAULT;
630 }
631 if (tz) {
632 if (copy_from_user(&ktz, tz, sizeof(ktz)))
633 return -EFAULT;
634 }
635
636 return do_sys_settimeofday(tv ? &kts : NULL, tz ? &ktz : NULL);
637}
638
639/* These are here just in case some old sparc32 binary calls it. */
640asmlinkage long sys32_pause(void)
641{
642 current->state = TASK_INTERRUPTIBLE;
643 schedule();
644 return -ERESTARTNOHAND;
645}
646
647asmlinkage long sys32_pread64(unsigned int fd, char *ubuf,
648 size_t count, u32 poshi, u32 poslo)
649{
650 if ((compat_ssize_t) count < 0)
651 return -EINVAL;
652 return sys_pread64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) | AA(poslo));
653}
654
655asmlinkage long sys32_pwrite64(unsigned int fd, const char *ubuf,
656 size_t count, u32 poshi, u32 poslo)
657{
658 if ((compat_ssize_t) count < 0)
659 return -EINVAL;
660 return sys_pwrite64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) | AA(poslo));
661}
662
663asmlinkage compat_ssize_t sys32_readahead(int fd, u32 offhi, u32 offlo, s32 count)
664{
665 return sys_readahead(fd, ((loff_t)AA(offhi) << 32) | AA(offlo), count);
666}
667
668asmlinkage long sys32_sendfile(int out_fd, int in_fd, compat_off_t *offset, size_t count)
669{
670 mm_segment_t old_fs = get_fs();
671 int ret;
672 off_t of;
673
674 if (offset && get_user(of, offset))
675 return -EFAULT;
676
677 set_fs(KERNEL_DS);
678 ret = sys_sendfile(out_fd, in_fd, offset ? &of : NULL, count);
679 set_fs(old_fs);
680
83b942bd 681 if (offset && put_user(of, offset))
1da177e4
LT
682 return -EFAULT;
683
684 return ret;
685}
686
687asmlinkage long sys32_sendfile64(int out_fd, int in_fd,
688 compat_loff_t *offset, s32 count)
689{
690 mm_segment_t old_fs = get_fs();
691 int ret;
692 loff_t lof;
693
694 if (offset && get_user(lof, offset))
695 return -EFAULT;
696
697 set_fs(KERNEL_DS);
698 ret = sys_sendfile64(out_fd, in_fd, offset ? &lof : NULL, count);
699 set_fs(old_fs);
700
701 if (offset && put_user(lof, offset))
702 return -EFAULT;
703
704 return ret;
705}
706
707/* Handle adjtimex compatibility. */
708
709struct timex32 {
710 u32 modes;
711 s32 offset, freq, maxerror, esterror;
712 s32 status, constant, precision, tolerance;
713 struct compat_timeval time;
714 s32 tick;
715 s32 ppsfreq, jitter, shift, stabil;
716 s32 jitcnt, calcnt, errcnt, stbcnt;
717 s32 :32; s32 :32; s32 :32; s32 :32;
718 s32 :32; s32 :32; s32 :32; s32 :32;
719 s32 :32; s32 :32; s32 :32; s32 :32;
720};
721
722extern int do_adjtimex(struct timex *);
723
724asmlinkage long sys32_adjtimex(struct timex32 *utp)
725{
726 struct timex txc;
727 int ret;
728
729 memset(&txc, 0, sizeof(struct timex));
730
731 if(get_user(txc.modes, &utp->modes) ||
732 __get_user(txc.offset, &utp->offset) ||
733 __get_user(txc.freq, &utp->freq) ||
734 __get_user(txc.maxerror, &utp->maxerror) ||
735 __get_user(txc.esterror, &utp->esterror) ||
736 __get_user(txc.status, &utp->status) ||
737 __get_user(txc.constant, &utp->constant) ||
738 __get_user(txc.precision, &utp->precision) ||
739 __get_user(txc.tolerance, &utp->tolerance) ||
740 __get_user(txc.time.tv_sec, &utp->time.tv_sec) ||
741 __get_user(txc.time.tv_usec, &utp->time.tv_usec) ||
742 __get_user(txc.tick, &utp->tick) ||
743 __get_user(txc.ppsfreq, &utp->ppsfreq) ||
744 __get_user(txc.jitter, &utp->jitter) ||
745 __get_user(txc.shift, &utp->shift) ||
746 __get_user(txc.stabil, &utp->stabil) ||
747 __get_user(txc.jitcnt, &utp->jitcnt) ||
748 __get_user(txc.calcnt, &utp->calcnt) ||
749 __get_user(txc.errcnt, &utp->errcnt) ||
750 __get_user(txc.stbcnt, &utp->stbcnt))
751 return -EFAULT;
752
753 ret = do_adjtimex(&txc);
754
755 if(put_user(txc.modes, &utp->modes) ||
756 __put_user(txc.offset, &utp->offset) ||
757 __put_user(txc.freq, &utp->freq) ||
758 __put_user(txc.maxerror, &utp->maxerror) ||
759 __put_user(txc.esterror, &utp->esterror) ||
760 __put_user(txc.status, &utp->status) ||
761 __put_user(txc.constant, &utp->constant) ||
762 __put_user(txc.precision, &utp->precision) ||
763 __put_user(txc.tolerance, &utp->tolerance) ||
764 __put_user(txc.time.tv_sec, &utp->time.tv_sec) ||
765 __put_user(txc.time.tv_usec, &utp->time.tv_usec) ||
766 __put_user(txc.tick, &utp->tick) ||
767 __put_user(txc.ppsfreq, &utp->ppsfreq) ||
768 __put_user(txc.jitter, &utp->jitter) ||
769 __put_user(txc.shift, &utp->shift) ||
770 __put_user(txc.stabil, &utp->stabil) ||
771 __put_user(txc.jitcnt, &utp->jitcnt) ||
772 __put_user(txc.calcnt, &utp->calcnt) ||
773 __put_user(txc.errcnt, &utp->errcnt) ||
774 __put_user(txc.stbcnt, &utp->stbcnt))
775 ret = -EFAULT;
776
777 return ret;
778}
779
780#ifdef CONFIG_SYSCTL
781struct __sysctl_args32 {
782 u32 name;
783 int nlen;
784 u32 oldval;
785 u32 oldlenp;
786 u32 newval;
787 u32 newlen;
788 u32 __unused[4];
789};
790
791asmlinkage long sys32_sysctl(struct __sysctl_args32 *args)
792{
793 struct __sysctl_args32 tmp;
794 int error;
795 size_t oldlen, *oldlenp = NULL;
796 unsigned long addr = (((long)&args->__unused[0]) + 7) & ~7;
797
798 if (copy_from_user(&tmp, args, sizeof(tmp)))
799 return -EFAULT;
800
801 if (tmp.oldval && tmp.oldlenp) {
802 /* Duh, this is ugly and might not work if sysctl_args
803 is in read-only memory, but do_sysctl does indirectly
804 a lot of uaccess in both directions and we'd have to
805 basically copy the whole sysctl.c here, and
806 glibc's __sysctl uses rw memory for the structure
807 anyway. */
808 if (get_user(oldlen, (u32 *)A(tmp.oldlenp)) ||
809 put_user(oldlen, (size_t *)addr))
810 return -EFAULT;
811 oldlenp = (size_t *)addr;
812 }
813
814 lock_kernel();
815 error = do_sysctl((int *)A(tmp.name), tmp.nlen, (void *)A(tmp.oldval),
816 oldlenp, (void *)A(tmp.newval), tmp.newlen);
817 unlock_kernel();
818 if (oldlenp) {
819 if (!error) {
820 if (get_user(oldlen, (size_t *)addr) ||
821 put_user(oldlen, (u32 *)A(tmp.oldlenp)))
822 error = -EFAULT;
823 }
824 copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused));
825 }
826 return error;
827}
828#endif
829
830struct stat64_emu31 {
831 unsigned long long st_dev;
832 unsigned int __pad1;
833#define STAT64_HAS_BROKEN_ST_INO 1
834 u32 __st_ino;
835 unsigned int st_mode;
836 unsigned int st_nlink;
837 u32 st_uid;
838 u32 st_gid;
839 unsigned long long st_rdev;
840 unsigned int __pad3;
841 long st_size;
842 u32 st_blksize;
843 unsigned char __pad4[4];
844 u32 __pad5; /* future possible st_blocks high bits */
845 u32 st_blocks; /* Number 512-byte blocks allocated. */
846 u32 st_atime;
847 u32 __pad6;
848 u32 st_mtime;
849 u32 __pad7;
850 u32 st_ctime;
851 u32 __pad8; /* will be high 32 bits of ctime someday */
852 unsigned long st_ino;
853};
854
855static int cp_stat64(struct stat64_emu31 *ubuf, struct kstat *stat)
856{
857 struct stat64_emu31 tmp;
858
859 memset(&tmp, 0, sizeof(tmp));
860
861 tmp.st_dev = huge_encode_dev(stat->dev);
862 tmp.st_ino = stat->ino;
863 tmp.__st_ino = (u32)stat->ino;
864 tmp.st_mode = stat->mode;
865 tmp.st_nlink = (unsigned int)stat->nlink;
866 tmp.st_uid = stat->uid;
867 tmp.st_gid = stat->gid;
868 tmp.st_rdev = huge_encode_dev(stat->rdev);
869 tmp.st_size = stat->size;
870 tmp.st_blksize = (u32)stat->blksize;
871 tmp.st_blocks = (u32)stat->blocks;
872 tmp.st_atime = (u32)stat->atime.tv_sec;
873 tmp.st_mtime = (u32)stat->mtime.tv_sec;
874 tmp.st_ctime = (u32)stat->ctime.tv_sec;
875
876 return copy_to_user(ubuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
877}
878
879asmlinkage long sys32_stat64(char * filename, struct stat64_emu31 * statbuf)
880{
881 struct kstat stat;
882 int ret = vfs_stat(filename, &stat);
883 if (!ret)
884 ret = cp_stat64(statbuf, &stat);
885 return ret;
886}
887
888asmlinkage long sys32_lstat64(char * filename, struct stat64_emu31 * statbuf)
889{
890 struct kstat stat;
891 int ret = vfs_lstat(filename, &stat);
892 if (!ret)
893 ret = cp_stat64(statbuf, &stat);
894 return ret;
895}
896
897asmlinkage long sys32_fstat64(unsigned long fd, struct stat64_emu31 * statbuf)
898{
899 struct kstat stat;
900 int ret = vfs_fstat(fd, &stat);
901 if (!ret)
902 ret = cp_stat64(statbuf, &stat);
903 return ret;
904}
905
906/*
907 * Linux/i386 didn't use to be able to handle more than
908 * 4 system call parameters, so these system calls used a memory
909 * block for parameter passing..
910 */
911
912struct mmap_arg_struct_emu31 {
913 u32 addr;
914 u32 len;
915 u32 prot;
916 u32 flags;
917 u32 fd;
918 u32 offset;
919};
920
921/* common code for old and new mmaps */
922static inline long do_mmap2(
923 unsigned long addr, unsigned long len,
924 unsigned long prot, unsigned long flags,
925 unsigned long fd, unsigned long pgoff)
926{
927 struct file * file = NULL;
928 unsigned long error = -EBADF;
929
930 flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
931 if (!(flags & MAP_ANONYMOUS)) {
932 file = fget(fd);
933 if (!file)
934 goto out;
935 }
936
937 down_write(&current->mm->mmap_sem);
938 error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
939 if (!IS_ERR((void *) error) && error + len >= 0x80000000ULL) {
940 /* Result is out of bounds. */
941 do_munmap(current->mm, addr, len);
942 error = -ENOMEM;
943 }
944 up_write(&current->mm->mmap_sem);
945
946 if (file)
947 fput(file);
948out:
949 return error;
950}
951
952
953asmlinkage unsigned long
954old32_mmap(struct mmap_arg_struct_emu31 *arg)
955{
956 struct mmap_arg_struct_emu31 a;
957 int error = -EFAULT;
958
959 if (copy_from_user(&a, arg, sizeof(a)))
960 goto out;
961
962 error = -EINVAL;
963 if (a.offset & ~PAGE_MASK)
964 goto out;
965
966 error = do_mmap2(a.addr, a.len, a.prot, a.flags, a.fd, a.offset >> PAGE_SHIFT);
967out:
968 return error;
969}
970
971asmlinkage long
972sys32_mmap2(struct mmap_arg_struct_emu31 *arg)
973{
974 struct mmap_arg_struct_emu31 a;
975 int error = -EFAULT;
976
977 if (copy_from_user(&a, arg, sizeof(a)))
978 goto out;
979 error = do_mmap2(a.addr, a.len, a.prot, a.flags, a.fd, a.offset);
980out:
981 return error;
982}
983
984asmlinkage long sys32_read(unsigned int fd, char * buf, size_t count)
985{
986 if ((compat_ssize_t) count < 0)
987 return -EINVAL;
988
989 return sys_read(fd, buf, count);
990}
991
992asmlinkage long sys32_write(unsigned int fd, char * buf, size_t count)
993{
994 if ((compat_ssize_t) count < 0)
995 return -EINVAL;
996
997 return sys_write(fd, buf, count);
998}
999
1000asmlinkage long sys32_clone(struct pt_regs regs)
1001{
1002 unsigned long clone_flags;
1003 unsigned long newsp;
1004 int *parent_tidptr, *child_tidptr;
1005
1006 clone_flags = regs.gprs[3] & 0xffffffffUL;
1007 newsp = regs.orig_gpr2 & 0x7fffffffUL;
1008 parent_tidptr = (int *) (regs.gprs[4] & 0x7fffffffUL);
1009 child_tidptr = (int *) (regs.gprs[5] & 0x7fffffffUL);
1010 if (!newsp)
1011 newsp = regs.gprs[15];
1012 return do_fork(clone_flags, newsp, &regs, 0,
1013 parent_tidptr, child_tidptr);
1014}
1015
068e1b94
MS
1016/*
1017 * 31 bit emulation wrapper functions for sys_fadvise64/fadvise64_64.
1018 * These need to rewrite the advise values for POSIX_FADV_{DONTNEED,NOREUSE}
1019 * because the 31 bit values differ from the 64 bit values.
1020 */
1021
1022asmlinkage long
1023sys32_fadvise64(int fd, loff_t offset, size_t len, int advise)
1024{
1025 if (advise == 4)
1026 advise = POSIX_FADV_DONTNEED;
1027 else if (advise == 5)
1028 advise = POSIX_FADV_NOREUSE;
1029 return sys_fadvise64(fd, offset, len, advise);
1030}
1031
1032struct fadvise64_64_args {
1033 int fd;
1034 long long offset;
1035 long long len;
1036 int advice;
1037};
1038
1039asmlinkage long
1040sys32_fadvise64_64(struct fadvise64_64_args __user *args)
1041{
1042 struct fadvise64_64_args a;
1043
1044 if ( copy_from_user(&a, args, sizeof(a)) )
1045 return -EFAULT;
1046 if (a.advice == 4)
1047 a.advice = POSIX_FADV_DONTNEED;
1048 else if (a.advice == 5)
1049 a.advice = POSIX_FADV_NOREUSE;
1050 return sys_fadvise64_64(a.fd, a.offset, a.len, a.advice);
1051}