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