Merge git://git.kernel.org/pub/scm/linux/kernel/git/mason/btrfs-unstable
[pandora-kernel.git] / fs / compat.c
1 /*
2  *  linux/fs/compat.c
3  *
4  *  Kernel compatibililty routines for e.g. 32 bit syscall support
5  *  on 64 bit kernels.
6  *
7  *  Copyright (C) 2002       Stephen Rothwell, IBM Corporation
8  *  Copyright (C) 1997-2000  Jakub Jelinek  (jakub@redhat.com)
9  *  Copyright (C) 1998       Eddie C. Dost  (ecd@skynet.be)
10  *  Copyright (C) 2001,2002  Andi Kleen, SuSE Labs 
11  *  Copyright (C) 2003       Pavel Machek (pavel@suse.cz)
12  *
13  *  This program is free software; you can redistribute it and/or modify
14  *  it under the terms of the GNU General Public License version 2 as
15  *  published by the Free Software Foundation.
16  */
17
18 #include <linux/kernel.h>
19 #include <linux/linkage.h>
20 #include <linux/compat.h>
21 #include <linux/errno.h>
22 #include <linux/time.h>
23 #include <linux/fs.h>
24 #include <linux/fcntl.h>
25 #include <linux/namei.h>
26 #include <linux/file.h>
27 #include <linux/fdtable.h>
28 #include <linux/vfs.h>
29 #include <linux/ioctl.h>
30 #include <linux/init.h>
31 #include <linux/smb.h>
32 #include <linux/smb_mount.h>
33 #include <linux/ncp_mount.h>
34 #include <linux/nfs4_mount.h>
35 #include <linux/syscalls.h>
36 #include <linux/ctype.h>
37 #include <linux/module.h>
38 #include <linux/dirent.h>
39 #include <linux/fsnotify.h>
40 #include <linux/highuid.h>
41 #include <linux/sunrpc/svc.h>
42 #include <linux/nfsd/nfsd.h>
43 #include <linux/nfsd/syscall.h>
44 #include <linux/personality.h>
45 #include <linux/rwsem.h>
46 #include <linux/tsacct_kern.h>
47 #include <linux/security.h>
48 #include <linux/highmem.h>
49 #include <linux/signal.h>
50 #include <linux/poll.h>
51 #include <linux/mm.h>
52 #include <linux/eventpoll.h>
53 #include <linux/fs_struct.h>
54
55 #include <asm/uaccess.h>
56 #include <asm/mmu_context.h>
57 #include <asm/ioctls.h>
58 #include "internal.h"
59
60 int compat_log = 1;
61
62 int compat_printk(const char *fmt, ...)
63 {
64         va_list ap;
65         int ret;
66         if (!compat_log)
67                 return 0;
68         va_start(ap, fmt);
69         ret = vprintk(fmt, ap);
70         va_end(ap);
71         return ret;
72 }
73
74 #include "read_write.h"
75
76 /*
77  * Not all architectures have sys_utime, so implement this in terms
78  * of sys_utimes.
79  */
80 asmlinkage long compat_sys_utime(char __user *filename, struct compat_utimbuf __user *t)
81 {
82         struct timespec tv[2];
83
84         if (t) {
85                 if (get_user(tv[0].tv_sec, &t->actime) ||
86                     get_user(tv[1].tv_sec, &t->modtime))
87                         return -EFAULT;
88                 tv[0].tv_nsec = 0;
89                 tv[1].tv_nsec = 0;
90         }
91         return do_utimes(AT_FDCWD, filename, t ? tv : NULL, 0);
92 }
93
94 asmlinkage long compat_sys_utimensat(unsigned int dfd, char __user *filename, struct compat_timespec __user *t, int flags)
95 {
96         struct timespec tv[2];
97
98         if  (t) {
99                 if (get_compat_timespec(&tv[0], &t[0]) ||
100                     get_compat_timespec(&tv[1], &t[1]))
101                         return -EFAULT;
102
103                 if ((tv[0].tv_nsec == UTIME_OMIT || tv[0].tv_nsec == UTIME_NOW)
104                     && tv[0].tv_sec != 0)
105                         return -EINVAL;
106                 if ((tv[1].tv_nsec == UTIME_OMIT || tv[1].tv_nsec == UTIME_NOW)
107                     && tv[1].tv_sec != 0)
108                         return -EINVAL;
109
110                 if (tv[0].tv_nsec == UTIME_OMIT && tv[1].tv_nsec == UTIME_OMIT)
111                         return 0;
112         }
113         return do_utimes(dfd, filename, t ? tv : NULL, flags);
114 }
115
116 asmlinkage long compat_sys_futimesat(unsigned int dfd, char __user *filename, struct compat_timeval __user *t)
117 {
118         struct timespec tv[2];
119
120         if (t) {
121                 if (get_user(tv[0].tv_sec, &t[0].tv_sec) ||
122                     get_user(tv[0].tv_nsec, &t[0].tv_usec) ||
123                     get_user(tv[1].tv_sec, &t[1].tv_sec) ||
124                     get_user(tv[1].tv_nsec, &t[1].tv_usec))
125                         return -EFAULT;
126                 if (tv[0].tv_nsec >= 1000000 || tv[0].tv_nsec < 0 ||
127                     tv[1].tv_nsec >= 1000000 || tv[1].tv_nsec < 0)
128                         return -EINVAL;
129                 tv[0].tv_nsec *= 1000;
130                 tv[1].tv_nsec *= 1000;
131         }
132         return do_utimes(dfd, filename, t ? tv : NULL, 0);
133 }
134
135 asmlinkage long compat_sys_utimes(char __user *filename, struct compat_timeval __user *t)
136 {
137         return compat_sys_futimesat(AT_FDCWD, filename, t);
138 }
139
140 static int cp_compat_stat(struct kstat *stat, struct compat_stat __user *ubuf)
141 {
142         compat_ino_t ino = stat->ino;
143         typeof(ubuf->st_uid) uid = 0;
144         typeof(ubuf->st_gid) gid = 0;
145         int err;
146
147         SET_UID(uid, stat->uid);
148         SET_GID(gid, stat->gid);
149
150         if ((u64) stat->size > MAX_NON_LFS ||
151             !old_valid_dev(stat->dev) ||
152             !old_valid_dev(stat->rdev))
153                 return -EOVERFLOW;
154         if (sizeof(ino) < sizeof(stat->ino) && ino != stat->ino)
155                 return -EOVERFLOW;
156
157         if (clear_user(ubuf, sizeof(*ubuf)))
158                 return -EFAULT;
159
160         err  = __put_user(old_encode_dev(stat->dev), &ubuf->st_dev);
161         err |= __put_user(ino, &ubuf->st_ino);
162         err |= __put_user(stat->mode, &ubuf->st_mode);
163         err |= __put_user(stat->nlink, &ubuf->st_nlink);
164         err |= __put_user(uid, &ubuf->st_uid);
165         err |= __put_user(gid, &ubuf->st_gid);
166         err |= __put_user(old_encode_dev(stat->rdev), &ubuf->st_rdev);
167         err |= __put_user(stat->size, &ubuf->st_size);
168         err |= __put_user(stat->atime.tv_sec, &ubuf->st_atime);
169         err |= __put_user(stat->atime.tv_nsec, &ubuf->st_atime_nsec);
170         err |= __put_user(stat->mtime.tv_sec, &ubuf->st_mtime);
171         err |= __put_user(stat->mtime.tv_nsec, &ubuf->st_mtime_nsec);
172         err |= __put_user(stat->ctime.tv_sec, &ubuf->st_ctime);
173         err |= __put_user(stat->ctime.tv_nsec, &ubuf->st_ctime_nsec);
174         err |= __put_user(stat->blksize, &ubuf->st_blksize);
175         err |= __put_user(stat->blocks, &ubuf->st_blocks);
176         return err;
177 }
178
179 asmlinkage long compat_sys_newstat(char __user * filename,
180                 struct compat_stat __user *statbuf)
181 {
182         struct kstat stat;
183         int error;
184
185         error = vfs_stat(filename, &stat);
186         if (error)
187                 return error;
188         return cp_compat_stat(&stat, statbuf);
189 }
190
191 asmlinkage long compat_sys_newlstat(char __user * filename,
192                 struct compat_stat __user *statbuf)
193 {
194         struct kstat stat;
195         int error;
196
197         error = vfs_lstat(filename, &stat);
198         if (error)
199                 return error;
200         return cp_compat_stat(&stat, statbuf);
201 }
202
203 #ifndef __ARCH_WANT_STAT64
204 asmlinkage long compat_sys_newfstatat(unsigned int dfd, char __user *filename,
205                 struct compat_stat __user *statbuf, int flag)
206 {
207         struct kstat stat;
208         int error;
209
210         error = vfs_fstatat(dfd, filename, &stat, flag);
211         if (error)
212                 return error;
213         return cp_compat_stat(&stat, statbuf);
214 }
215 #endif
216
217 asmlinkage long compat_sys_newfstat(unsigned int fd,
218                 struct compat_stat __user * statbuf)
219 {
220         struct kstat stat;
221         int error = vfs_fstat(fd, &stat);
222
223         if (!error)
224                 error = cp_compat_stat(&stat, statbuf);
225         return error;
226 }
227
228 static int put_compat_statfs(struct compat_statfs __user *ubuf, struct kstatfs *kbuf)
229 {
230         
231         if (sizeof ubuf->f_blocks == 4) {
232                 if ((kbuf->f_blocks | kbuf->f_bfree | kbuf->f_bavail |
233                      kbuf->f_bsize | kbuf->f_frsize) & 0xffffffff00000000ULL)
234                         return -EOVERFLOW;
235                 /* f_files and f_ffree may be -1; it's okay
236                  * to stuff that into 32 bits */
237                 if (kbuf->f_files != 0xffffffffffffffffULL
238                  && (kbuf->f_files & 0xffffffff00000000ULL))
239                         return -EOVERFLOW;
240                 if (kbuf->f_ffree != 0xffffffffffffffffULL
241                  && (kbuf->f_ffree & 0xffffffff00000000ULL))
242                         return -EOVERFLOW;
243         }
244         if (!access_ok(VERIFY_WRITE, ubuf, sizeof(*ubuf)) ||
245             __put_user(kbuf->f_type, &ubuf->f_type) ||
246             __put_user(kbuf->f_bsize, &ubuf->f_bsize) ||
247             __put_user(kbuf->f_blocks, &ubuf->f_blocks) ||
248             __put_user(kbuf->f_bfree, &ubuf->f_bfree) ||
249             __put_user(kbuf->f_bavail, &ubuf->f_bavail) ||
250             __put_user(kbuf->f_files, &ubuf->f_files) ||
251             __put_user(kbuf->f_ffree, &ubuf->f_ffree) ||
252             __put_user(kbuf->f_namelen, &ubuf->f_namelen) ||
253             __put_user(kbuf->f_fsid.val[0], &ubuf->f_fsid.val[0]) ||
254             __put_user(kbuf->f_fsid.val[1], &ubuf->f_fsid.val[1]) ||
255             __put_user(kbuf->f_frsize, &ubuf->f_frsize) ||
256             __put_user(0, &ubuf->f_spare[0]) || 
257             __put_user(0, &ubuf->f_spare[1]) || 
258             __put_user(0, &ubuf->f_spare[2]) || 
259             __put_user(0, &ubuf->f_spare[3]) || 
260             __put_user(0, &ubuf->f_spare[4]))
261                 return -EFAULT;
262         return 0;
263 }
264
265 /*
266  * The following statfs calls are copies of code from fs/open.c and
267  * should be checked against those from time to time
268  */
269 asmlinkage long compat_sys_statfs(const char __user *pathname, struct compat_statfs __user *buf)
270 {
271         struct path path;
272         int error;
273
274         error = user_path(pathname, &path);
275         if (!error) {
276                 struct kstatfs tmp;
277                 error = vfs_statfs(path.dentry, &tmp);
278                 if (!error)
279                         error = put_compat_statfs(buf, &tmp);
280                 path_put(&path);
281         }
282         return error;
283 }
284
285 asmlinkage long compat_sys_fstatfs(unsigned int fd, struct compat_statfs __user *buf)
286 {
287         struct file * file;
288         struct kstatfs tmp;
289         int error;
290
291         error = -EBADF;
292         file = fget(fd);
293         if (!file)
294                 goto out;
295         error = vfs_statfs(file->f_path.dentry, &tmp);
296         if (!error)
297                 error = put_compat_statfs(buf, &tmp);
298         fput(file);
299 out:
300         return error;
301 }
302
303 static int put_compat_statfs64(struct compat_statfs64 __user *ubuf, struct kstatfs *kbuf)
304 {
305         if (sizeof ubuf->f_blocks == 4) {
306                 if ((kbuf->f_blocks | kbuf->f_bfree | kbuf->f_bavail |
307                      kbuf->f_bsize | kbuf->f_frsize) & 0xffffffff00000000ULL)
308                         return -EOVERFLOW;
309                 /* f_files and f_ffree may be -1; it's okay
310                  * to stuff that into 32 bits */
311                 if (kbuf->f_files != 0xffffffffffffffffULL
312                  && (kbuf->f_files & 0xffffffff00000000ULL))
313                         return -EOVERFLOW;
314                 if (kbuf->f_ffree != 0xffffffffffffffffULL
315                  && (kbuf->f_ffree & 0xffffffff00000000ULL))
316                         return -EOVERFLOW;
317         }
318         if (!access_ok(VERIFY_WRITE, ubuf, sizeof(*ubuf)) ||
319             __put_user(kbuf->f_type, &ubuf->f_type) ||
320             __put_user(kbuf->f_bsize, &ubuf->f_bsize) ||
321             __put_user(kbuf->f_blocks, &ubuf->f_blocks) ||
322             __put_user(kbuf->f_bfree, &ubuf->f_bfree) ||
323             __put_user(kbuf->f_bavail, &ubuf->f_bavail) ||
324             __put_user(kbuf->f_files, &ubuf->f_files) ||
325             __put_user(kbuf->f_ffree, &ubuf->f_ffree) ||
326             __put_user(kbuf->f_namelen, &ubuf->f_namelen) ||
327             __put_user(kbuf->f_fsid.val[0], &ubuf->f_fsid.val[0]) ||
328             __put_user(kbuf->f_fsid.val[1], &ubuf->f_fsid.val[1]) ||
329             __put_user(kbuf->f_frsize, &ubuf->f_frsize))
330                 return -EFAULT;
331         return 0;
332 }
333
334 asmlinkage long compat_sys_statfs64(const char __user *pathname, compat_size_t sz, struct compat_statfs64 __user *buf)
335 {
336         struct path path;
337         int error;
338
339         if (sz != sizeof(*buf))
340                 return -EINVAL;
341
342         error = user_path(pathname, &path);
343         if (!error) {
344                 struct kstatfs tmp;
345                 error = vfs_statfs(path.dentry, &tmp);
346                 if (!error)
347                         error = put_compat_statfs64(buf, &tmp);
348                 path_put(&path);
349         }
350         return error;
351 }
352
353 asmlinkage long compat_sys_fstatfs64(unsigned int fd, compat_size_t sz, struct compat_statfs64 __user *buf)
354 {
355         struct file * file;
356         struct kstatfs tmp;
357         int error;
358
359         if (sz != sizeof(*buf))
360                 return -EINVAL;
361
362         error = -EBADF;
363         file = fget(fd);
364         if (!file)
365                 goto out;
366         error = vfs_statfs(file->f_path.dentry, &tmp);
367         if (!error)
368                 error = put_compat_statfs64(buf, &tmp);
369         fput(file);
370 out:
371         return error;
372 }
373
374 /*
375  * This is a copy of sys_ustat, just dealing with a structure layout.
376  * Given how simple this syscall is that apporach is more maintainable
377  * than the various conversion hacks.
378  */
379 asmlinkage long compat_sys_ustat(unsigned dev, struct compat_ustat __user *u)
380 {
381         struct super_block *sb;
382         struct compat_ustat tmp;
383         struct kstatfs sbuf;
384         int err;
385
386         sb = user_get_super(new_decode_dev(dev));
387         if (!sb)
388                 return -EINVAL;
389         err = vfs_statfs(sb->s_root, &sbuf);
390         drop_super(sb);
391         if (err)
392                 return err;
393
394         memset(&tmp, 0, sizeof(struct compat_ustat));
395         tmp.f_tfree = sbuf.f_bfree;
396         tmp.f_tinode = sbuf.f_ffree;
397         if (copy_to_user(u, &tmp, sizeof(struct compat_ustat)))
398                 return -EFAULT;
399         return 0;
400 }
401
402 static int get_compat_flock(struct flock *kfl, struct compat_flock __user *ufl)
403 {
404         if (!access_ok(VERIFY_READ, ufl, sizeof(*ufl)) ||
405             __get_user(kfl->l_type, &ufl->l_type) ||
406             __get_user(kfl->l_whence, &ufl->l_whence) ||
407             __get_user(kfl->l_start, &ufl->l_start) ||
408             __get_user(kfl->l_len, &ufl->l_len) ||
409             __get_user(kfl->l_pid, &ufl->l_pid))
410                 return -EFAULT;
411         return 0;
412 }
413
414 static int put_compat_flock(struct flock *kfl, struct compat_flock __user *ufl)
415 {
416         if (!access_ok(VERIFY_WRITE, ufl, sizeof(*ufl)) ||
417             __put_user(kfl->l_type, &ufl->l_type) ||
418             __put_user(kfl->l_whence, &ufl->l_whence) ||
419             __put_user(kfl->l_start, &ufl->l_start) ||
420             __put_user(kfl->l_len, &ufl->l_len) ||
421             __put_user(kfl->l_pid, &ufl->l_pid))
422                 return -EFAULT;
423         return 0;
424 }
425
426 #ifndef HAVE_ARCH_GET_COMPAT_FLOCK64
427 static int get_compat_flock64(struct flock *kfl, struct compat_flock64 __user *ufl)
428 {
429         if (!access_ok(VERIFY_READ, ufl, sizeof(*ufl)) ||
430             __get_user(kfl->l_type, &ufl->l_type) ||
431             __get_user(kfl->l_whence, &ufl->l_whence) ||
432             __get_user(kfl->l_start, &ufl->l_start) ||
433             __get_user(kfl->l_len, &ufl->l_len) ||
434             __get_user(kfl->l_pid, &ufl->l_pid))
435                 return -EFAULT;
436         return 0;
437 }
438 #endif
439
440 #ifndef HAVE_ARCH_PUT_COMPAT_FLOCK64
441 static int put_compat_flock64(struct flock *kfl, struct compat_flock64 __user *ufl)
442 {
443         if (!access_ok(VERIFY_WRITE, ufl, sizeof(*ufl)) ||
444             __put_user(kfl->l_type, &ufl->l_type) ||
445             __put_user(kfl->l_whence, &ufl->l_whence) ||
446             __put_user(kfl->l_start, &ufl->l_start) ||
447             __put_user(kfl->l_len, &ufl->l_len) ||
448             __put_user(kfl->l_pid, &ufl->l_pid))
449                 return -EFAULT;
450         return 0;
451 }
452 #endif
453
454 asmlinkage long compat_sys_fcntl64(unsigned int fd, unsigned int cmd,
455                 unsigned long arg)
456 {
457         mm_segment_t old_fs;
458         struct flock f;
459         long ret;
460
461         switch (cmd) {
462         case F_GETLK:
463         case F_SETLK:
464         case F_SETLKW:
465                 ret = get_compat_flock(&f, compat_ptr(arg));
466                 if (ret != 0)
467                         break;
468                 old_fs = get_fs();
469                 set_fs(KERNEL_DS);
470                 ret = sys_fcntl(fd, cmd, (unsigned long)&f);
471                 set_fs(old_fs);
472                 if (cmd == F_GETLK && ret == 0) {
473                         /* GETLK was successful and we need to return the data...
474                          * but it needs to fit in the compat structure.
475                          * l_start shouldn't be too big, unless the original
476                          * start + end is greater than COMPAT_OFF_T_MAX, in which
477                          * case the app was asking for trouble, so we return
478                          * -EOVERFLOW in that case.
479                          * l_len could be too big, in which case we just truncate it,
480                          * and only allow the app to see that part of the conflicting
481                          * lock that might make sense to it anyway
482                          */
483
484                         if (f.l_start > COMPAT_OFF_T_MAX)
485                                 ret = -EOVERFLOW;
486                         if (f.l_len > COMPAT_OFF_T_MAX)
487                                 f.l_len = COMPAT_OFF_T_MAX;
488                         if (ret == 0)
489                                 ret = put_compat_flock(&f, compat_ptr(arg));
490                 }
491                 break;
492
493         case F_GETLK64:
494         case F_SETLK64:
495         case F_SETLKW64:
496                 ret = get_compat_flock64(&f, compat_ptr(arg));
497                 if (ret != 0)
498                         break;
499                 old_fs = get_fs();
500                 set_fs(KERNEL_DS);
501                 ret = sys_fcntl(fd, (cmd == F_GETLK64) ? F_GETLK :
502                                 ((cmd == F_SETLK64) ? F_SETLK : F_SETLKW),
503                                 (unsigned long)&f);
504                 set_fs(old_fs);
505                 if (cmd == F_GETLK64 && ret == 0) {
506                         /* need to return lock information - see above for commentary */
507                         if (f.l_start > COMPAT_LOFF_T_MAX)
508                                 ret = -EOVERFLOW;
509                         if (f.l_len > COMPAT_LOFF_T_MAX)
510                                 f.l_len = COMPAT_LOFF_T_MAX;
511                         if (ret == 0)
512                                 ret = put_compat_flock64(&f, compat_ptr(arg));
513                 }
514                 break;
515
516         default:
517                 ret = sys_fcntl(fd, cmd, arg);
518                 break;
519         }
520         return ret;
521 }
522
523 asmlinkage long compat_sys_fcntl(unsigned int fd, unsigned int cmd,
524                 unsigned long arg)
525 {
526         if ((cmd == F_GETLK64) || (cmd == F_SETLK64) || (cmd == F_SETLKW64))
527                 return -EINVAL;
528         return compat_sys_fcntl64(fd, cmd, arg);
529 }
530
531 asmlinkage long
532 compat_sys_io_setup(unsigned nr_reqs, u32 __user *ctx32p)
533 {
534         long ret;
535         aio_context_t ctx64;
536
537         mm_segment_t oldfs = get_fs();
538         if (unlikely(get_user(ctx64, ctx32p)))
539                 return -EFAULT;
540
541         set_fs(KERNEL_DS);
542         /* The __user pointer cast is valid because of the set_fs() */
543         ret = sys_io_setup(nr_reqs, (aio_context_t __user *) &ctx64);
544         set_fs(oldfs);
545         /* truncating is ok because it's a user address */
546         if (!ret)
547                 ret = put_user((u32) ctx64, ctx32p);
548         return ret;
549 }
550
551 asmlinkage long
552 compat_sys_io_getevents(aio_context_t ctx_id,
553                                  unsigned long min_nr,
554                                  unsigned long nr,
555                                  struct io_event __user *events,
556                                  struct compat_timespec __user *timeout)
557 {
558         long ret;
559         struct timespec t;
560         struct timespec __user *ut = NULL;
561
562         ret = -EFAULT;
563         if (unlikely(!access_ok(VERIFY_WRITE, events, 
564                                 nr * sizeof(struct io_event))))
565                 goto out;
566         if (timeout) {
567                 if (get_compat_timespec(&t, timeout))
568                         goto out;
569
570                 ut = compat_alloc_user_space(sizeof(*ut));
571                 if (copy_to_user(ut, &t, sizeof(t)) )
572                         goto out;
573         } 
574         ret = sys_io_getevents(ctx_id, min_nr, nr, events, ut);
575 out:
576         return ret;
577 }
578
579 static inline long
580 copy_iocb(long nr, u32 __user *ptr32, struct iocb __user * __user *ptr64)
581 {
582         compat_uptr_t uptr;
583         int i;
584
585         for (i = 0; i < nr; ++i) {
586                 if (get_user(uptr, ptr32 + i))
587                         return -EFAULT;
588                 if (put_user(compat_ptr(uptr), ptr64 + i))
589                         return -EFAULT;
590         }
591         return 0;
592 }
593
594 #define MAX_AIO_SUBMITS         (PAGE_SIZE/sizeof(struct iocb *))
595
596 asmlinkage long
597 compat_sys_io_submit(aio_context_t ctx_id, int nr, u32 __user *iocb)
598 {
599         struct iocb __user * __user *iocb64; 
600         long ret;
601
602         if (unlikely(nr < 0))
603                 return -EINVAL;
604
605         if (nr > MAX_AIO_SUBMITS)
606                 nr = MAX_AIO_SUBMITS;
607         
608         iocb64 = compat_alloc_user_space(nr * sizeof(*iocb64));
609         ret = copy_iocb(nr, iocb, iocb64);
610         if (!ret)
611                 ret = sys_io_submit(ctx_id, nr, iocb64);
612         return ret;
613 }
614
615 struct compat_ncp_mount_data {
616         compat_int_t version;
617         compat_uint_t ncp_fd;
618         __compat_uid_t mounted_uid;
619         compat_pid_t wdog_pid;
620         unsigned char mounted_vol[NCP_VOLNAME_LEN + 1];
621         compat_uint_t time_out;
622         compat_uint_t retry_count;
623         compat_uint_t flags;
624         __compat_uid_t uid;
625         __compat_gid_t gid;
626         compat_mode_t file_mode;
627         compat_mode_t dir_mode;
628 };
629
630 struct compat_ncp_mount_data_v4 {
631         compat_int_t version;
632         compat_ulong_t flags;
633         compat_ulong_t mounted_uid;
634         compat_long_t wdog_pid;
635         compat_uint_t ncp_fd;
636         compat_uint_t time_out;
637         compat_uint_t retry_count;
638         compat_ulong_t uid;
639         compat_ulong_t gid;
640         compat_ulong_t file_mode;
641         compat_ulong_t dir_mode;
642 };
643
644 static void *do_ncp_super_data_conv(void *raw_data)
645 {
646         int version = *(unsigned int *)raw_data;
647
648         if (version == 3) {
649                 struct compat_ncp_mount_data *c_n = raw_data;
650                 struct ncp_mount_data *n = raw_data;
651
652                 n->dir_mode = c_n->dir_mode;
653                 n->file_mode = c_n->file_mode;
654                 n->gid = c_n->gid;
655                 n->uid = c_n->uid;
656                 memmove (n->mounted_vol, c_n->mounted_vol, (sizeof (c_n->mounted_vol) + 3 * sizeof (unsigned int)));
657                 n->wdog_pid = c_n->wdog_pid;
658                 n->mounted_uid = c_n->mounted_uid;
659         } else if (version == 4) {
660                 struct compat_ncp_mount_data_v4 *c_n = raw_data;
661                 struct ncp_mount_data_v4 *n = raw_data;
662
663                 n->dir_mode = c_n->dir_mode;
664                 n->file_mode = c_n->file_mode;
665                 n->gid = c_n->gid;
666                 n->uid = c_n->uid;
667                 n->retry_count = c_n->retry_count;
668                 n->time_out = c_n->time_out;
669                 n->ncp_fd = c_n->ncp_fd;
670                 n->wdog_pid = c_n->wdog_pid;
671                 n->mounted_uid = c_n->mounted_uid;
672                 n->flags = c_n->flags;
673         } else if (version != 5) {
674                 return NULL;
675         }
676
677         return raw_data;
678 }
679
680 struct compat_smb_mount_data {
681         compat_int_t version;
682         __compat_uid_t mounted_uid;
683         __compat_uid_t uid;
684         __compat_gid_t gid;
685         compat_mode_t file_mode;
686         compat_mode_t dir_mode;
687 };
688
689 static void *do_smb_super_data_conv(void *raw_data)
690 {
691         struct smb_mount_data *s = raw_data;
692         struct compat_smb_mount_data *c_s = raw_data;
693
694         if (c_s->version != SMB_MOUNT_OLDVERSION)
695                 goto out;
696         s->dir_mode = c_s->dir_mode;
697         s->file_mode = c_s->file_mode;
698         s->gid = c_s->gid;
699         s->uid = c_s->uid;
700         s->mounted_uid = c_s->mounted_uid;
701  out:
702         return raw_data;
703 }
704
705 struct compat_nfs_string {
706         compat_uint_t len;
707         compat_uptr_t data;
708 };
709
710 static inline void compat_nfs_string(struct nfs_string *dst,
711                                      struct compat_nfs_string *src)
712 {
713         dst->data = compat_ptr(src->data);
714         dst->len = src->len;
715 }
716
717 struct compat_nfs4_mount_data_v1 {
718         compat_int_t version;
719         compat_int_t flags;
720         compat_int_t rsize;
721         compat_int_t wsize;
722         compat_int_t timeo;
723         compat_int_t retrans;
724         compat_int_t acregmin;
725         compat_int_t acregmax;
726         compat_int_t acdirmin;
727         compat_int_t acdirmax;
728         struct compat_nfs_string client_addr;
729         struct compat_nfs_string mnt_path;
730         struct compat_nfs_string hostname;
731         compat_uint_t host_addrlen;
732         compat_uptr_t host_addr;
733         compat_int_t proto;
734         compat_int_t auth_flavourlen;
735         compat_uptr_t auth_flavours;
736 };
737
738 static int do_nfs4_super_data_conv(void *raw_data)
739 {
740         int version = *(compat_uint_t *) raw_data;
741
742         if (version == 1) {
743                 struct compat_nfs4_mount_data_v1 *raw = raw_data;
744                 struct nfs4_mount_data *real = raw_data;
745
746                 /* copy the fields backwards */
747                 real->auth_flavours = compat_ptr(raw->auth_flavours);
748                 real->auth_flavourlen = raw->auth_flavourlen;
749                 real->proto = raw->proto;
750                 real->host_addr = compat_ptr(raw->host_addr);
751                 real->host_addrlen = raw->host_addrlen;
752                 compat_nfs_string(&real->hostname, &raw->hostname);
753                 compat_nfs_string(&real->mnt_path, &raw->mnt_path);
754                 compat_nfs_string(&real->client_addr, &raw->client_addr);
755                 real->acdirmax = raw->acdirmax;
756                 real->acdirmin = raw->acdirmin;
757                 real->acregmax = raw->acregmax;
758                 real->acregmin = raw->acregmin;
759                 real->retrans = raw->retrans;
760                 real->timeo = raw->timeo;
761                 real->wsize = raw->wsize;
762                 real->rsize = raw->rsize;
763                 real->flags = raw->flags;
764                 real->version = raw->version;
765         }
766
767         return 0;
768 }
769
770 #define SMBFS_NAME      "smbfs"
771 #define NCPFS_NAME      "ncpfs"
772 #define NFS4_NAME       "nfs4"
773
774 asmlinkage long compat_sys_mount(char __user * dev_name, char __user * dir_name,
775                                  char __user * type, unsigned long flags,
776                                  void __user * data)
777 {
778         unsigned long type_page;
779         unsigned long data_page;
780         unsigned long dev_page;
781         char *dir_page;
782         int retval;
783
784         retval = copy_mount_options (type, &type_page);
785         if (retval < 0)
786                 goto out;
787
788         dir_page = getname(dir_name);
789         retval = PTR_ERR(dir_page);
790         if (IS_ERR(dir_page))
791                 goto out1;
792
793         retval = copy_mount_options (dev_name, &dev_page);
794         if (retval < 0)
795                 goto out2;
796
797         retval = copy_mount_options (data, &data_page);
798         if (retval < 0)
799                 goto out3;
800
801         retval = -EINVAL;
802
803         if (type_page && data_page) {
804                 if (!strcmp((char *)type_page, SMBFS_NAME)) {
805                         do_smb_super_data_conv((void *)data_page);
806                 } else if (!strcmp((char *)type_page, NCPFS_NAME)) {
807                         do_ncp_super_data_conv((void *)data_page);
808                 } else if (!strcmp((char *)type_page, NFS4_NAME)) {
809                         if (do_nfs4_super_data_conv((void *) data_page))
810                                 goto out4;
811                 }
812         }
813
814         retval = do_mount((char*)dev_page, dir_page, (char*)type_page,
815                         flags, (void*)data_page);
816
817  out4:
818         free_page(data_page);
819  out3:
820         free_page(dev_page);
821  out2:
822         putname(dir_page);
823  out1:
824         free_page(type_page);
825  out:
826         return retval;
827 }
828
829 #define NAME_OFFSET(de) ((int) ((de)->d_name - (char __user *) (de)))
830
831 struct compat_old_linux_dirent {
832         compat_ulong_t  d_ino;
833         compat_ulong_t  d_offset;
834         unsigned short  d_namlen;
835         char            d_name[1];
836 };
837
838 struct compat_readdir_callback {
839         struct compat_old_linux_dirent __user *dirent;
840         int result;
841 };
842
843 static int compat_fillonedir(void *__buf, const char *name, int namlen,
844                         loff_t offset, u64 ino, unsigned int d_type)
845 {
846         struct compat_readdir_callback *buf = __buf;
847         struct compat_old_linux_dirent __user *dirent;
848         compat_ulong_t d_ino;
849
850         if (buf->result)
851                 return -EINVAL;
852         d_ino = ino;
853         if (sizeof(d_ino) < sizeof(ino) && d_ino != ino) {
854                 buf->result = -EOVERFLOW;
855                 return -EOVERFLOW;
856         }
857         buf->result++;
858         dirent = buf->dirent;
859         if (!access_ok(VERIFY_WRITE, dirent,
860                         (unsigned long)(dirent->d_name + namlen + 1) -
861                                 (unsigned long)dirent))
862                 goto efault;
863         if (    __put_user(d_ino, &dirent->d_ino) ||
864                 __put_user(offset, &dirent->d_offset) ||
865                 __put_user(namlen, &dirent->d_namlen) ||
866                 __copy_to_user(dirent->d_name, name, namlen) ||
867                 __put_user(0, dirent->d_name + namlen))
868                 goto efault;
869         return 0;
870 efault:
871         buf->result = -EFAULT;
872         return -EFAULT;
873 }
874
875 asmlinkage long compat_sys_old_readdir(unsigned int fd,
876         struct compat_old_linux_dirent __user *dirent, unsigned int count)
877 {
878         int error;
879         struct file *file;
880         struct compat_readdir_callback buf;
881
882         error = -EBADF;
883         file = fget(fd);
884         if (!file)
885                 goto out;
886
887         buf.result = 0;
888         buf.dirent = dirent;
889
890         error = vfs_readdir(file, compat_fillonedir, &buf);
891         if (buf.result)
892                 error = buf.result;
893
894         fput(file);
895 out:
896         return error;
897 }
898
899 struct compat_linux_dirent {
900         compat_ulong_t  d_ino;
901         compat_ulong_t  d_off;
902         unsigned short  d_reclen;
903         char            d_name[1];
904 };
905
906 struct compat_getdents_callback {
907         struct compat_linux_dirent __user *current_dir;
908         struct compat_linux_dirent __user *previous;
909         int count;
910         int error;
911 };
912
913 static int compat_filldir(void *__buf, const char *name, int namlen,
914                 loff_t offset, u64 ino, unsigned int d_type)
915 {
916         struct compat_linux_dirent __user * dirent;
917         struct compat_getdents_callback *buf = __buf;
918         compat_ulong_t d_ino;
919         int reclen = ALIGN(NAME_OFFSET(dirent) + namlen + 2, sizeof(compat_long_t));
920
921         buf->error = -EINVAL;   /* only used if we fail.. */
922         if (reclen > buf->count)
923                 return -EINVAL;
924         d_ino = ino;
925         if (sizeof(d_ino) < sizeof(ino) && d_ino != ino) {
926                 buf->error = -EOVERFLOW;
927                 return -EOVERFLOW;
928         }
929         dirent = buf->previous;
930         if (dirent) {
931                 if (__put_user(offset, &dirent->d_off))
932                         goto efault;
933         }
934         dirent = buf->current_dir;
935         if (__put_user(d_ino, &dirent->d_ino))
936                 goto efault;
937         if (__put_user(reclen, &dirent->d_reclen))
938                 goto efault;
939         if (copy_to_user(dirent->d_name, name, namlen))
940                 goto efault;
941         if (__put_user(0, dirent->d_name + namlen))
942                 goto efault;
943         if (__put_user(d_type, (char  __user *) dirent + reclen - 1))
944                 goto efault;
945         buf->previous = dirent;
946         dirent = (void __user *)dirent + reclen;
947         buf->current_dir = dirent;
948         buf->count -= reclen;
949         return 0;
950 efault:
951         buf->error = -EFAULT;
952         return -EFAULT;
953 }
954
955 asmlinkage long compat_sys_getdents(unsigned int fd,
956                 struct compat_linux_dirent __user *dirent, unsigned int count)
957 {
958         struct file * file;
959         struct compat_linux_dirent __user * lastdirent;
960         struct compat_getdents_callback buf;
961         int error;
962
963         error = -EFAULT;
964         if (!access_ok(VERIFY_WRITE, dirent, count))
965                 goto out;
966
967         error = -EBADF;
968         file = fget(fd);
969         if (!file)
970                 goto out;
971
972         buf.current_dir = dirent;
973         buf.previous = NULL;
974         buf.count = count;
975         buf.error = 0;
976
977         error = vfs_readdir(file, compat_filldir, &buf);
978         if (error >= 0)
979                 error = buf.error;
980         lastdirent = buf.previous;
981         if (lastdirent) {
982                 if (put_user(file->f_pos, &lastdirent->d_off))
983                         error = -EFAULT;
984                 else
985                         error = count - buf.count;
986         }
987         fput(file);
988 out:
989         return error;
990 }
991
992 #ifndef __ARCH_OMIT_COMPAT_SYS_GETDENTS64
993
994 struct compat_getdents_callback64 {
995         struct linux_dirent64 __user *current_dir;
996         struct linux_dirent64 __user *previous;
997         int count;
998         int error;
999 };
1000
1001 static int compat_filldir64(void * __buf, const char * name, int namlen, loff_t offset,
1002                      u64 ino, unsigned int d_type)
1003 {
1004         struct linux_dirent64 __user *dirent;
1005         struct compat_getdents_callback64 *buf = __buf;
1006         int jj = NAME_OFFSET(dirent);
1007         int reclen = ALIGN(jj + namlen + 1, sizeof(u64));
1008         u64 off;
1009
1010         buf->error = -EINVAL;   /* only used if we fail.. */
1011         if (reclen > buf->count)
1012                 return -EINVAL;
1013         dirent = buf->previous;
1014
1015         if (dirent) {
1016                 if (__put_user_unaligned(offset, &dirent->d_off))
1017                         goto efault;
1018         }
1019         dirent = buf->current_dir;
1020         if (__put_user_unaligned(ino, &dirent->d_ino))
1021                 goto efault;
1022         off = 0;
1023         if (__put_user_unaligned(off, &dirent->d_off))
1024                 goto efault;
1025         if (__put_user(reclen, &dirent->d_reclen))
1026                 goto efault;
1027         if (__put_user(d_type, &dirent->d_type))
1028                 goto efault;
1029         if (copy_to_user(dirent->d_name, name, namlen))
1030                 goto efault;
1031         if (__put_user(0, dirent->d_name + namlen))
1032                 goto efault;
1033         buf->previous = dirent;
1034         dirent = (void __user *)dirent + reclen;
1035         buf->current_dir = dirent;
1036         buf->count -= reclen;
1037         return 0;
1038 efault:
1039         buf->error = -EFAULT;
1040         return -EFAULT;
1041 }
1042
1043 asmlinkage long compat_sys_getdents64(unsigned int fd,
1044                 struct linux_dirent64 __user * dirent, unsigned int count)
1045 {
1046         struct file * file;
1047         struct linux_dirent64 __user * lastdirent;
1048         struct compat_getdents_callback64 buf;
1049         int error;
1050
1051         error = -EFAULT;
1052         if (!access_ok(VERIFY_WRITE, dirent, count))
1053                 goto out;
1054
1055         error = -EBADF;
1056         file = fget(fd);
1057         if (!file)
1058                 goto out;
1059
1060         buf.current_dir = dirent;
1061         buf.previous = NULL;
1062         buf.count = count;
1063         buf.error = 0;
1064
1065         error = vfs_readdir(file, compat_filldir64, &buf);
1066         if (error >= 0)
1067                 error = buf.error;
1068         lastdirent = buf.previous;
1069         if (lastdirent) {
1070                 typeof(lastdirent->d_off) d_off = file->f_pos;
1071                 if (__put_user_unaligned(d_off, &lastdirent->d_off))
1072                         error = -EFAULT;
1073                 else
1074                         error = count - buf.count;
1075         }
1076         fput(file);
1077 out:
1078         return error;
1079 }
1080 #endif /* ! __ARCH_OMIT_COMPAT_SYS_GETDENTS64 */
1081
1082 static ssize_t compat_do_readv_writev(int type, struct file *file,
1083                                const struct compat_iovec __user *uvector,
1084                                unsigned long nr_segs, loff_t *pos)
1085 {
1086         compat_ssize_t tot_len;
1087         struct iovec iovstack[UIO_FASTIOV];
1088         struct iovec *iov=iovstack, *vector;
1089         ssize_t ret;
1090         int seg;
1091         io_fn_t fn;
1092         iov_fn_t fnv;
1093
1094         /*
1095          * SuS says "The readv() function *may* fail if the iovcnt argument
1096          * was less than or equal to 0, or greater than {IOV_MAX}.  Linux has
1097          * traditionally returned zero for zero segments, so...
1098          */
1099         ret = 0;
1100         if (nr_segs == 0)
1101                 goto out;
1102
1103         /*
1104          * First get the "struct iovec" from user memory and
1105          * verify all the pointers
1106          */
1107         ret = -EINVAL;
1108         if ((nr_segs > UIO_MAXIOV) || (nr_segs <= 0))
1109                 goto out;
1110         if (!file->f_op)
1111                 goto out;
1112         if (nr_segs > UIO_FASTIOV) {
1113                 ret = -ENOMEM;
1114                 iov = kmalloc(nr_segs*sizeof(struct iovec), GFP_KERNEL);
1115                 if (!iov)
1116                         goto out;
1117         }
1118         ret = -EFAULT;
1119         if (!access_ok(VERIFY_READ, uvector, nr_segs*sizeof(*uvector)))
1120                 goto out;
1121
1122         /*
1123          * Single unix specification:
1124          * We should -EINVAL if an element length is not >= 0 and fitting an
1125          * ssize_t.  The total length is fitting an ssize_t
1126          *
1127          * Be careful here because iov_len is a size_t not an ssize_t
1128          */
1129         tot_len = 0;
1130         vector = iov;
1131         ret = -EINVAL;
1132         for (seg = 0 ; seg < nr_segs; seg++) {
1133                 compat_ssize_t tmp = tot_len;
1134                 compat_ssize_t len;
1135                 compat_uptr_t buf;
1136
1137                 if (__get_user(len, &uvector->iov_len) ||
1138                     __get_user(buf, &uvector->iov_base)) {
1139                         ret = -EFAULT;
1140                         goto out;
1141                 }
1142                 if (len < 0)    /* size_t not fitting an compat_ssize_t .. */
1143                         goto out;
1144                 tot_len += len;
1145                 if (tot_len < tmp) /* maths overflow on the compat_ssize_t */
1146                         goto out;
1147                 vector->iov_base = compat_ptr(buf);
1148                 vector->iov_len = (compat_size_t) len;
1149                 uvector++;
1150                 vector++;
1151         }
1152         if (tot_len == 0) {
1153                 ret = 0;
1154                 goto out;
1155         }
1156
1157         ret = rw_verify_area(type, file, pos, tot_len);
1158         if (ret < 0)
1159                 goto out;
1160
1161         fnv = NULL;
1162         if (type == READ) {
1163                 fn = file->f_op->read;
1164                 fnv = file->f_op->aio_read;
1165         } else {
1166                 fn = (io_fn_t)file->f_op->write;
1167                 fnv = file->f_op->aio_write;
1168         }
1169
1170         if (fnv)
1171                 ret = do_sync_readv_writev(file, iov, nr_segs, tot_len,
1172                                                 pos, fnv);
1173         else
1174                 ret = do_loop_readv_writev(file, iov, nr_segs, pos, fn);
1175
1176 out:
1177         if (iov != iovstack)
1178                 kfree(iov);
1179         if ((ret + (type == READ)) > 0) {
1180                 struct dentry *dentry = file->f_path.dentry;
1181                 if (type == READ)
1182                         fsnotify_access(dentry);
1183                 else
1184                         fsnotify_modify(dentry);
1185         }
1186         return ret;
1187 }
1188
1189 static size_t compat_readv(struct file *file,
1190                            const struct compat_iovec __user *vec,
1191                            unsigned long vlen, loff_t *pos)
1192 {
1193         ssize_t ret = -EBADF;
1194
1195         if (!(file->f_mode & FMODE_READ))
1196                 goto out;
1197
1198         ret = -EINVAL;
1199         if (!file->f_op || (!file->f_op->aio_read && !file->f_op->read))
1200                 goto out;
1201
1202         ret = compat_do_readv_writev(READ, file, vec, vlen, pos);
1203
1204 out:
1205         if (ret > 0)
1206                 add_rchar(current, ret);
1207         inc_syscr(current);
1208         return ret;
1209 }
1210
1211 asmlinkage ssize_t
1212 compat_sys_readv(unsigned long fd, const struct compat_iovec __user *vec,
1213                  unsigned long vlen)
1214 {
1215         struct file *file;
1216         int fput_needed;
1217         ssize_t ret;
1218
1219         file = fget_light(fd, &fput_needed);
1220         if (!file)
1221                 return -EBADF;
1222         ret = compat_readv(file, vec, vlen, &file->f_pos);
1223         fput_light(file, fput_needed);
1224         return ret;
1225 }
1226
1227 asmlinkage ssize_t
1228 compat_sys_preadv(unsigned long fd, const struct compat_iovec __user *vec,
1229                   unsigned long vlen, u32 pos_low, u32 pos_high)
1230 {
1231         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1232         struct file *file;
1233         int fput_needed;
1234         ssize_t ret;
1235
1236         if (pos < 0)
1237                 return -EINVAL;
1238         file = fget_light(fd, &fput_needed);
1239         if (!file)
1240                 return -EBADF;
1241         ret = compat_readv(file, vec, vlen, &pos);
1242         fput_light(file, fput_needed);
1243         return ret;
1244 }
1245
1246 static size_t compat_writev(struct file *file,
1247                             const struct compat_iovec __user *vec,
1248                             unsigned long vlen, loff_t *pos)
1249 {
1250         ssize_t ret = -EBADF;
1251
1252         if (!(file->f_mode & FMODE_WRITE))
1253                 goto out;
1254
1255         ret = -EINVAL;
1256         if (!file->f_op || (!file->f_op->aio_write && !file->f_op->write))
1257                 goto out;
1258
1259         ret = compat_do_readv_writev(WRITE, file, vec, vlen, pos);
1260
1261 out:
1262         if (ret > 0)
1263                 add_wchar(current, ret);
1264         inc_syscw(current);
1265         return ret;
1266 }
1267
1268 asmlinkage ssize_t
1269 compat_sys_writev(unsigned long fd, const struct compat_iovec __user *vec,
1270                   unsigned long vlen)
1271 {
1272         struct file *file;
1273         int fput_needed;
1274         ssize_t ret;
1275
1276         file = fget_light(fd, &fput_needed);
1277         if (!file)
1278                 return -EBADF;
1279         ret = compat_writev(file, vec, vlen, &file->f_pos);
1280         fput_light(file, fput_needed);
1281         return ret;
1282 }
1283
1284 asmlinkage ssize_t
1285 compat_sys_pwritev(unsigned long fd, const struct compat_iovec __user *vec,
1286                    unsigned long vlen, u32 pos_low, u32 pos_high)
1287 {
1288         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1289         struct file *file;
1290         int fput_needed;
1291         ssize_t ret;
1292
1293         if (pos < 0)
1294                 return -EINVAL;
1295         file = fget_light(fd, &fput_needed);
1296         if (!file)
1297                 return -EBADF;
1298         ret = compat_writev(file, vec, vlen, &pos);
1299         fput_light(file, fput_needed);
1300         return ret;
1301 }
1302
1303 asmlinkage long
1304 compat_sys_vmsplice(int fd, const struct compat_iovec __user *iov32,
1305                     unsigned int nr_segs, unsigned int flags)
1306 {
1307         unsigned i;
1308         struct iovec __user *iov;
1309         if (nr_segs > UIO_MAXIOV)
1310                 return -EINVAL;
1311         iov = compat_alloc_user_space(nr_segs * sizeof(struct iovec));
1312         for (i = 0; i < nr_segs; i++) {
1313                 struct compat_iovec v;
1314                 if (get_user(v.iov_base, &iov32[i].iov_base) ||
1315                     get_user(v.iov_len, &iov32[i].iov_len) ||
1316                     put_user(compat_ptr(v.iov_base), &iov[i].iov_base) ||
1317                     put_user(v.iov_len, &iov[i].iov_len))
1318                         return -EFAULT;
1319         }
1320         return sys_vmsplice(fd, iov, nr_segs, flags);
1321 }
1322
1323 /*
1324  * Exactly like fs/open.c:sys_open(), except that it doesn't set the
1325  * O_LARGEFILE flag.
1326  */
1327 asmlinkage long
1328 compat_sys_open(const char __user *filename, int flags, int mode)
1329 {
1330         return do_sys_open(AT_FDCWD, filename, flags, mode);
1331 }
1332
1333 /*
1334  * Exactly like fs/open.c:sys_openat(), except that it doesn't set the
1335  * O_LARGEFILE flag.
1336  */
1337 asmlinkage long
1338 compat_sys_openat(unsigned int dfd, const char __user *filename, int flags, int mode)
1339 {
1340         return do_sys_open(dfd, filename, flags, mode);
1341 }
1342
1343 /*
1344  * compat_count() counts the number of arguments/envelopes. It is basically
1345  * a copy of count() from fs/exec.c, except that it works with 32 bit argv
1346  * and envp pointers.
1347  */
1348 static int compat_count(compat_uptr_t __user *argv, int max)
1349 {
1350         int i = 0;
1351
1352         if (argv != NULL) {
1353                 for (;;) {
1354                         compat_uptr_t p;
1355
1356                         if (get_user(p, argv))
1357                                 return -EFAULT;
1358                         if (!p)
1359                                 break;
1360                         argv++;
1361                         if (i++ >= max)
1362                                 return -E2BIG;
1363                 }
1364         }
1365         return i;
1366 }
1367
1368 /*
1369  * compat_copy_strings() is basically a copy of copy_strings() from fs/exec.c
1370  * except that it works with 32 bit argv and envp pointers.
1371  */
1372 static int compat_copy_strings(int argc, compat_uptr_t __user *argv,
1373                                 struct linux_binprm *bprm)
1374 {
1375         struct page *kmapped_page = NULL;
1376         char *kaddr = NULL;
1377         unsigned long kpos = 0;
1378         int ret;
1379
1380         while (argc-- > 0) {
1381                 compat_uptr_t str;
1382                 int len;
1383                 unsigned long pos;
1384
1385                 if (get_user(str, argv+argc) ||
1386                     !(len = strnlen_user(compat_ptr(str), MAX_ARG_STRLEN))) {
1387                         ret = -EFAULT;
1388                         goto out;
1389                 }
1390
1391                 if (len > MAX_ARG_STRLEN) {
1392                         ret = -E2BIG;
1393                         goto out;
1394                 }
1395
1396                 /* We're going to work our way backwords. */
1397                 pos = bprm->p;
1398                 str += len;
1399                 bprm->p -= len;
1400
1401                 while (len > 0) {
1402                         int offset, bytes_to_copy;
1403
1404                         offset = pos % PAGE_SIZE;
1405                         if (offset == 0)
1406                                 offset = PAGE_SIZE;
1407
1408                         bytes_to_copy = offset;
1409                         if (bytes_to_copy > len)
1410                                 bytes_to_copy = len;
1411
1412                         offset -= bytes_to_copy;
1413                         pos -= bytes_to_copy;
1414                         str -= bytes_to_copy;
1415                         len -= bytes_to_copy;
1416
1417                         if (!kmapped_page || kpos != (pos & PAGE_MASK)) {
1418                                 struct page *page;
1419
1420 #ifdef CONFIG_STACK_GROWSUP
1421                                 ret = expand_stack_downwards(bprm->vma, pos);
1422                                 if (ret < 0) {
1423                                         /* We've exceed the stack rlimit. */
1424                                         ret = -E2BIG;
1425                                         goto out;
1426                                 }
1427 #endif
1428                                 ret = get_user_pages(current, bprm->mm, pos,
1429                                                      1, 1, 1, &page, NULL);
1430                                 if (ret <= 0) {
1431                                         /* We've exceed the stack rlimit. */
1432                                         ret = -E2BIG;
1433                                         goto out;
1434                                 }
1435
1436                                 if (kmapped_page) {
1437                                         flush_kernel_dcache_page(kmapped_page);
1438                                         kunmap(kmapped_page);
1439                                         put_page(kmapped_page);
1440                                 }
1441                                 kmapped_page = page;
1442                                 kaddr = kmap(kmapped_page);
1443                                 kpos = pos & PAGE_MASK;
1444                                 flush_cache_page(bprm->vma, kpos,
1445                                                  page_to_pfn(kmapped_page));
1446                         }
1447                         if (copy_from_user(kaddr+offset, compat_ptr(str),
1448                                                 bytes_to_copy)) {
1449                                 ret = -EFAULT;
1450                                 goto out;
1451                         }
1452                 }
1453         }
1454         ret = 0;
1455 out:
1456         if (kmapped_page) {
1457                 flush_kernel_dcache_page(kmapped_page);
1458                 kunmap(kmapped_page);
1459                 put_page(kmapped_page);
1460         }
1461         return ret;
1462 }
1463
1464 /*
1465  * compat_do_execve() is mostly a copy of do_execve(), with the exception
1466  * that it processes 32 bit argv and envp pointers.
1467  */
1468 int compat_do_execve(char * filename,
1469         compat_uptr_t __user *argv,
1470         compat_uptr_t __user *envp,
1471         struct pt_regs * regs)
1472 {
1473         struct linux_binprm *bprm;
1474         struct file *file;
1475         struct files_struct *displaced;
1476         bool clear_in_exec;
1477         int retval;
1478
1479         retval = unshare_files(&displaced);
1480         if (retval)
1481                 goto out_ret;
1482
1483         retval = -ENOMEM;
1484         bprm = kzalloc(sizeof(*bprm), GFP_KERNEL);
1485         if (!bprm)
1486                 goto out_files;
1487
1488         retval = -ERESTARTNOINTR;
1489         if (mutex_lock_interruptible(&current->cred_guard_mutex))
1490                 goto out_free;
1491         current->in_execve = 1;
1492
1493         retval = -ENOMEM;
1494         bprm->cred = prepare_exec_creds();
1495         if (!bprm->cred)
1496                 goto out_unlock;
1497
1498         retval = check_unsafe_exec(bprm);
1499         if (retval < 0)
1500                 goto out_unlock;
1501         clear_in_exec = retval;
1502
1503         file = open_exec(filename);
1504         retval = PTR_ERR(file);
1505         if (IS_ERR(file))
1506                 goto out_unmark;
1507
1508         sched_exec();
1509
1510         bprm->file = file;
1511         bprm->filename = filename;
1512         bprm->interp = filename;
1513
1514         retval = bprm_mm_init(bprm);
1515         if (retval)
1516                 goto out_file;
1517
1518         bprm->argc = compat_count(argv, MAX_ARG_STRINGS);
1519         if ((retval = bprm->argc) < 0)
1520                 goto out;
1521
1522         bprm->envc = compat_count(envp, MAX_ARG_STRINGS);
1523         if ((retval = bprm->envc) < 0)
1524                 goto out;
1525
1526         retval = prepare_binprm(bprm);
1527         if (retval < 0)
1528                 goto out;
1529
1530         retval = copy_strings_kernel(1, &bprm->filename, bprm);
1531         if (retval < 0)
1532                 goto out;
1533
1534         bprm->exec = bprm->p;
1535         retval = compat_copy_strings(bprm->envc, envp, bprm);
1536         if (retval < 0)
1537                 goto out;
1538
1539         retval = compat_copy_strings(bprm->argc, argv, bprm);
1540         if (retval < 0)
1541                 goto out;
1542
1543         retval = search_binary_handler(bprm, regs);
1544         if (retval < 0)
1545                 goto out;
1546
1547         /* execve succeeded */
1548         current->fs->in_exec = 0;
1549         current->in_execve = 0;
1550         mutex_unlock(&current->cred_guard_mutex);
1551         acct_update_integrals(current);
1552         free_bprm(bprm);
1553         if (displaced)
1554                 put_files_struct(displaced);
1555         return retval;
1556
1557 out:
1558         if (bprm->mm)
1559                 mmput(bprm->mm);
1560
1561 out_file:
1562         if (bprm->file) {
1563                 allow_write_access(bprm->file);
1564                 fput(bprm->file);
1565         }
1566
1567 out_unmark:
1568         if (clear_in_exec)
1569                 current->fs->in_exec = 0;
1570
1571 out_unlock:
1572         current->in_execve = 0;
1573         mutex_unlock(&current->cred_guard_mutex);
1574
1575 out_free:
1576         free_bprm(bprm);
1577
1578 out_files:
1579         if (displaced)
1580                 reset_files_struct(displaced);
1581 out_ret:
1582         return retval;
1583 }
1584
1585 #define __COMPAT_NFDBITS       (8 * sizeof(compat_ulong_t))
1586
1587 static int poll_select_copy_remaining(struct timespec *end_time, void __user *p,
1588                                       int timeval, int ret)
1589 {
1590         struct timespec ts;
1591
1592         if (!p)
1593                 return ret;
1594
1595         if (current->personality & STICKY_TIMEOUTS)
1596                 goto sticky;
1597
1598         /* No update for zero timeout */
1599         if (!end_time->tv_sec && !end_time->tv_nsec)
1600                 return ret;
1601
1602         ktime_get_ts(&ts);
1603         ts = timespec_sub(*end_time, ts);
1604         if (ts.tv_sec < 0)
1605                 ts.tv_sec = ts.tv_nsec = 0;
1606
1607         if (timeval) {
1608                 struct compat_timeval rtv;
1609
1610                 rtv.tv_sec = ts.tv_sec;
1611                 rtv.tv_usec = ts.tv_nsec / NSEC_PER_USEC;
1612
1613                 if (!copy_to_user(p, &rtv, sizeof(rtv)))
1614                         return ret;
1615         } else {
1616                 struct compat_timespec rts;
1617
1618                 rts.tv_sec = ts.tv_sec;
1619                 rts.tv_nsec = ts.tv_nsec;
1620
1621                 if (!copy_to_user(p, &rts, sizeof(rts)))
1622                         return ret;
1623         }
1624         /*
1625          * If an application puts its timeval in read-only memory, we
1626          * don't want the Linux-specific update to the timeval to
1627          * cause a fault after the select has completed
1628          * successfully. However, because we're not updating the
1629          * timeval, we can't restart the system call.
1630          */
1631
1632 sticky:
1633         if (ret == -ERESTARTNOHAND)
1634                 ret = -EINTR;
1635         return ret;
1636 }
1637
1638 /*
1639  * Ooo, nasty.  We need here to frob 32-bit unsigned longs to
1640  * 64-bit unsigned longs.
1641  */
1642 static
1643 int compat_get_fd_set(unsigned long nr, compat_ulong_t __user *ufdset,
1644                         unsigned long *fdset)
1645 {
1646         nr = DIV_ROUND_UP(nr, __COMPAT_NFDBITS);
1647         if (ufdset) {
1648                 unsigned long odd;
1649
1650                 if (!access_ok(VERIFY_WRITE, ufdset, nr*sizeof(compat_ulong_t)))
1651                         return -EFAULT;
1652
1653                 odd = nr & 1UL;
1654                 nr &= ~1UL;
1655                 while (nr) {
1656                         unsigned long h, l;
1657                         if (__get_user(l, ufdset) || __get_user(h, ufdset+1))
1658                                 return -EFAULT;
1659                         ufdset += 2;
1660                         *fdset++ = h << 32 | l;
1661                         nr -= 2;
1662                 }
1663                 if (odd && __get_user(*fdset, ufdset))
1664                         return -EFAULT;
1665         } else {
1666                 /* Tricky, must clear full unsigned long in the
1667                  * kernel fdset at the end, this makes sure that
1668                  * actually happens.
1669                  */
1670                 memset(fdset, 0, ((nr + 1) & ~1)*sizeof(compat_ulong_t));
1671         }
1672         return 0;
1673 }
1674
1675 static
1676 int compat_set_fd_set(unsigned long nr, compat_ulong_t __user *ufdset,
1677                       unsigned long *fdset)
1678 {
1679         unsigned long odd;
1680         nr = DIV_ROUND_UP(nr, __COMPAT_NFDBITS);
1681
1682         if (!ufdset)
1683                 return 0;
1684
1685         odd = nr & 1UL;
1686         nr &= ~1UL;
1687         while (nr) {
1688                 unsigned long h, l;
1689                 l = *fdset++;
1690                 h = l >> 32;
1691                 if (__put_user(l, ufdset) || __put_user(h, ufdset+1))
1692                         return -EFAULT;
1693                 ufdset += 2;
1694                 nr -= 2;
1695         }
1696         if (odd && __put_user(*fdset, ufdset))
1697                 return -EFAULT;
1698         return 0;
1699 }
1700
1701
1702 /*
1703  * This is a virtual copy of sys_select from fs/select.c and probably
1704  * should be compared to it from time to time
1705  */
1706
1707 /*
1708  * We can actually return ERESTARTSYS instead of EINTR, but I'd
1709  * like to be certain this leads to no problems. So I return
1710  * EINTR just for safety.
1711  *
1712  * Update: ERESTARTSYS breaks at least the xview clock binary, so
1713  * I'm trying ERESTARTNOHAND which restart only when you want to.
1714  */
1715 #define MAX_SELECT_SECONDS \
1716         ((unsigned long) (MAX_SCHEDULE_TIMEOUT / HZ)-1)
1717
1718 int compat_core_sys_select(int n, compat_ulong_t __user *inp,
1719         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1720         struct timespec *end_time)
1721 {
1722         fd_set_bits fds;
1723         void *bits;
1724         int size, max_fds, ret = -EINVAL;
1725         struct fdtable *fdt;
1726         long stack_fds[SELECT_STACK_ALLOC/sizeof(long)];
1727
1728         if (n < 0)
1729                 goto out_nofds;
1730
1731         /* max_fds can increase, so grab it once to avoid race */
1732         rcu_read_lock();
1733         fdt = files_fdtable(current->files);
1734         max_fds = fdt->max_fds;
1735         rcu_read_unlock();
1736         if (n > max_fds)
1737                 n = max_fds;
1738
1739         /*
1740          * We need 6 bitmaps (in/out/ex for both incoming and outgoing),
1741          * since we used fdset we need to allocate memory in units of
1742          * long-words.
1743          */
1744         size = FDS_BYTES(n);
1745         bits = stack_fds;
1746         if (size > sizeof(stack_fds) / 6) {
1747                 bits = kmalloc(6 * size, GFP_KERNEL);
1748                 ret = -ENOMEM;
1749                 if (!bits)
1750                         goto out_nofds;
1751         }
1752         fds.in      = (unsigned long *)  bits;
1753         fds.out     = (unsigned long *) (bits +   size);
1754         fds.ex      = (unsigned long *) (bits + 2*size);
1755         fds.res_in  = (unsigned long *) (bits + 3*size);
1756         fds.res_out = (unsigned long *) (bits + 4*size);
1757         fds.res_ex  = (unsigned long *) (bits + 5*size);
1758
1759         if ((ret = compat_get_fd_set(n, inp, fds.in)) ||
1760             (ret = compat_get_fd_set(n, outp, fds.out)) ||
1761             (ret = compat_get_fd_set(n, exp, fds.ex)))
1762                 goto out;
1763         zero_fd_set(n, fds.res_in);
1764         zero_fd_set(n, fds.res_out);
1765         zero_fd_set(n, fds.res_ex);
1766
1767         ret = do_select(n, &fds, end_time);
1768
1769         if (ret < 0)
1770                 goto out;
1771         if (!ret) {
1772                 ret = -ERESTARTNOHAND;
1773                 if (signal_pending(current))
1774                         goto out;
1775                 ret = 0;
1776         }
1777
1778         if (compat_set_fd_set(n, inp, fds.res_in) ||
1779             compat_set_fd_set(n, outp, fds.res_out) ||
1780             compat_set_fd_set(n, exp, fds.res_ex))
1781                 ret = -EFAULT;
1782 out:
1783         if (bits != stack_fds)
1784                 kfree(bits);
1785 out_nofds:
1786         return ret;
1787 }
1788
1789 asmlinkage long compat_sys_select(int n, compat_ulong_t __user *inp,
1790         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1791         struct compat_timeval __user *tvp)
1792 {
1793         struct timespec end_time, *to = NULL;
1794         struct compat_timeval tv;
1795         int ret;
1796
1797         if (tvp) {
1798                 if (copy_from_user(&tv, tvp, sizeof(tv)))
1799                         return -EFAULT;
1800
1801                 to = &end_time;
1802                 if (poll_select_set_timeout(to,
1803                                 tv.tv_sec + (tv.tv_usec / USEC_PER_SEC),
1804                                 (tv.tv_usec % USEC_PER_SEC) * NSEC_PER_USEC))
1805                         return -EINVAL;
1806         }
1807
1808         ret = compat_core_sys_select(n, inp, outp, exp, to);
1809         ret = poll_select_copy_remaining(&end_time, tvp, 1, ret);
1810
1811         return ret;
1812 }
1813
1814 #ifdef HAVE_SET_RESTORE_SIGMASK
1815 static long do_compat_pselect(int n, compat_ulong_t __user *inp,
1816         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1817         struct compat_timespec __user *tsp, compat_sigset_t __user *sigmask,
1818         compat_size_t sigsetsize)
1819 {
1820         compat_sigset_t ss32;
1821         sigset_t ksigmask, sigsaved;
1822         struct compat_timespec ts;
1823         struct timespec end_time, *to = NULL;
1824         int ret;
1825
1826         if (tsp) {
1827                 if (copy_from_user(&ts, tsp, sizeof(ts)))
1828                         return -EFAULT;
1829
1830                 to = &end_time;
1831                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
1832                         return -EINVAL;
1833         }
1834
1835         if (sigmask) {
1836                 if (sigsetsize != sizeof(compat_sigset_t))
1837                         return -EINVAL;
1838                 if (copy_from_user(&ss32, sigmask, sizeof(ss32)))
1839                         return -EFAULT;
1840                 sigset_from_compat(&ksigmask, &ss32);
1841
1842                 sigdelsetmask(&ksigmask, sigmask(SIGKILL)|sigmask(SIGSTOP));
1843                 sigprocmask(SIG_SETMASK, &ksigmask, &sigsaved);
1844         }
1845
1846         ret = compat_core_sys_select(n, inp, outp, exp, to);
1847         ret = poll_select_copy_remaining(&end_time, tsp, 0, ret);
1848
1849         if (ret == -ERESTARTNOHAND) {
1850                 /*
1851                  * Don't restore the signal mask yet. Let do_signal() deliver
1852                  * the signal on the way back to userspace, before the signal
1853                  * mask is restored.
1854                  */
1855                 if (sigmask) {
1856                         memcpy(&current->saved_sigmask, &sigsaved,
1857                                         sizeof(sigsaved));
1858                         set_restore_sigmask();
1859                 }
1860         } else if (sigmask)
1861                 sigprocmask(SIG_SETMASK, &sigsaved, NULL);
1862
1863         return ret;
1864 }
1865
1866 asmlinkage long compat_sys_pselect6(int n, compat_ulong_t __user *inp,
1867         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1868         struct compat_timespec __user *tsp, void __user *sig)
1869 {
1870         compat_size_t sigsetsize = 0;
1871         compat_uptr_t up = 0;
1872
1873         if (sig) {
1874                 if (!access_ok(VERIFY_READ, sig,
1875                                 sizeof(compat_uptr_t)+sizeof(compat_size_t)) ||
1876                         __get_user(up, (compat_uptr_t __user *)sig) ||
1877                         __get_user(sigsetsize,
1878                                 (compat_size_t __user *)(sig+sizeof(up))))
1879                         return -EFAULT;
1880         }
1881         return do_compat_pselect(n, inp, outp, exp, tsp, compat_ptr(up),
1882                                  sigsetsize);
1883 }
1884
1885 asmlinkage long compat_sys_ppoll(struct pollfd __user *ufds,
1886         unsigned int nfds, struct compat_timespec __user *tsp,
1887         const compat_sigset_t __user *sigmask, compat_size_t sigsetsize)
1888 {
1889         compat_sigset_t ss32;
1890         sigset_t ksigmask, sigsaved;
1891         struct compat_timespec ts;
1892         struct timespec end_time, *to = NULL;
1893         int ret;
1894
1895         if (tsp) {
1896                 if (copy_from_user(&ts, tsp, sizeof(ts)))
1897                         return -EFAULT;
1898
1899                 to = &end_time;
1900                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
1901                         return -EINVAL;
1902         }
1903
1904         if (sigmask) {
1905                 if (sigsetsize != sizeof(compat_sigset_t))
1906                         return -EINVAL;
1907                 if (copy_from_user(&ss32, sigmask, sizeof(ss32)))
1908                         return -EFAULT;
1909                 sigset_from_compat(&ksigmask, &ss32);
1910
1911                 sigdelsetmask(&ksigmask, sigmask(SIGKILL)|sigmask(SIGSTOP));
1912                 sigprocmask(SIG_SETMASK, &ksigmask, &sigsaved);
1913         }
1914
1915         ret = do_sys_poll(ufds, nfds, to);
1916
1917         /* We can restart this syscall, usually */
1918         if (ret == -EINTR) {
1919                 /*
1920                  * Don't restore the signal mask yet. Let do_signal() deliver
1921                  * the signal on the way back to userspace, before the signal
1922                  * mask is restored.
1923                  */
1924                 if (sigmask) {
1925                         memcpy(&current->saved_sigmask, &sigsaved,
1926                                 sizeof(sigsaved));
1927                         set_restore_sigmask();
1928                 }
1929                 ret = -ERESTARTNOHAND;
1930         } else if (sigmask)
1931                 sigprocmask(SIG_SETMASK, &sigsaved, NULL);
1932
1933         ret = poll_select_copy_remaining(&end_time, tsp, 0, ret);
1934
1935         return ret;
1936 }
1937 #endif /* HAVE_SET_RESTORE_SIGMASK */
1938
1939 #if defined(CONFIG_NFSD) || defined(CONFIG_NFSD_MODULE)
1940 /* Stuff for NFS server syscalls... */
1941 struct compat_nfsctl_svc {
1942         u16                     svc32_port;
1943         s32                     svc32_nthreads;
1944 };
1945
1946 struct compat_nfsctl_client {
1947         s8                      cl32_ident[NFSCLNT_IDMAX+1];
1948         s32                     cl32_naddr;
1949         struct in_addr          cl32_addrlist[NFSCLNT_ADDRMAX];
1950         s32                     cl32_fhkeytype;
1951         s32                     cl32_fhkeylen;
1952         u8                      cl32_fhkey[NFSCLNT_KEYMAX];
1953 };
1954
1955 struct compat_nfsctl_export {
1956         char            ex32_client[NFSCLNT_IDMAX+1];
1957         char            ex32_path[NFS_MAXPATHLEN+1];
1958         compat_dev_t    ex32_dev;
1959         compat_ino_t    ex32_ino;
1960         compat_int_t    ex32_flags;
1961         __compat_uid_t  ex32_anon_uid;
1962         __compat_gid_t  ex32_anon_gid;
1963 };
1964
1965 struct compat_nfsctl_fdparm {
1966         struct sockaddr         gd32_addr;
1967         s8                      gd32_path[NFS_MAXPATHLEN+1];
1968         compat_int_t            gd32_version;
1969 };
1970
1971 struct compat_nfsctl_fsparm {
1972         struct sockaddr         gd32_addr;
1973         s8                      gd32_path[NFS_MAXPATHLEN+1];
1974         compat_int_t            gd32_maxlen;
1975 };
1976
1977 struct compat_nfsctl_arg {
1978         compat_int_t            ca32_version;   /* safeguard */
1979         union {
1980                 struct compat_nfsctl_svc        u32_svc;
1981                 struct compat_nfsctl_client     u32_client;
1982                 struct compat_nfsctl_export     u32_export;
1983                 struct compat_nfsctl_fdparm     u32_getfd;
1984                 struct compat_nfsctl_fsparm     u32_getfs;
1985         } u;
1986 #define ca32_svc        u.u32_svc
1987 #define ca32_client     u.u32_client
1988 #define ca32_export     u.u32_export
1989 #define ca32_getfd      u.u32_getfd
1990 #define ca32_getfs      u.u32_getfs
1991 };
1992
1993 union compat_nfsctl_res {
1994         __u8                    cr32_getfh[NFS_FHSIZE];
1995         struct knfsd_fh         cr32_getfs;
1996 };
1997
1998 static int compat_nfs_svc_trans(struct nfsctl_arg *karg,
1999                                 struct compat_nfsctl_arg __user *arg)
2000 {
2001         if (!access_ok(VERIFY_READ, &arg->ca32_svc, sizeof(arg->ca32_svc)) ||
2002                 get_user(karg->ca_version, &arg->ca32_version) ||
2003                 __get_user(karg->ca_svc.svc_port, &arg->ca32_svc.svc32_port) ||
2004                 __get_user(karg->ca_svc.svc_nthreads,
2005                                 &arg->ca32_svc.svc32_nthreads))
2006                 return -EFAULT;
2007         return 0;
2008 }
2009
2010 static int compat_nfs_clnt_trans(struct nfsctl_arg *karg,
2011                                 struct compat_nfsctl_arg __user *arg)
2012 {
2013         if (!access_ok(VERIFY_READ, &arg->ca32_client,
2014                         sizeof(arg->ca32_client)) ||
2015                 get_user(karg->ca_version, &arg->ca32_version) ||
2016                 __copy_from_user(&karg->ca_client.cl_ident[0],
2017                                 &arg->ca32_client.cl32_ident[0],
2018                                 NFSCLNT_IDMAX) ||
2019                 __get_user(karg->ca_client.cl_naddr,
2020                                 &arg->ca32_client.cl32_naddr) ||
2021                 __copy_from_user(&karg->ca_client.cl_addrlist[0],
2022                                 &arg->ca32_client.cl32_addrlist[0],
2023                                 (sizeof(struct in_addr) * NFSCLNT_ADDRMAX)) ||
2024                 __get_user(karg->ca_client.cl_fhkeytype,
2025                                 &arg->ca32_client.cl32_fhkeytype) ||
2026                 __get_user(karg->ca_client.cl_fhkeylen,
2027                                 &arg->ca32_client.cl32_fhkeylen) ||
2028                 __copy_from_user(&karg->ca_client.cl_fhkey[0],
2029                                 &arg->ca32_client.cl32_fhkey[0],
2030                                 NFSCLNT_KEYMAX))
2031                 return -EFAULT;
2032
2033         return 0;
2034 }
2035
2036 static int compat_nfs_exp_trans(struct nfsctl_arg *karg,
2037                                 struct compat_nfsctl_arg __user *arg)
2038 {
2039         if (!access_ok(VERIFY_READ, &arg->ca32_export,
2040                                 sizeof(arg->ca32_export)) ||
2041                 get_user(karg->ca_version, &arg->ca32_version) ||
2042                 __copy_from_user(&karg->ca_export.ex_client[0],
2043                                 &arg->ca32_export.ex32_client[0],
2044                                 NFSCLNT_IDMAX) ||
2045                 __copy_from_user(&karg->ca_export.ex_path[0],
2046                                 &arg->ca32_export.ex32_path[0],
2047                                 NFS_MAXPATHLEN) ||
2048                 __get_user(karg->ca_export.ex_dev,
2049                                 &arg->ca32_export.ex32_dev) ||
2050                 __get_user(karg->ca_export.ex_ino,
2051                                 &arg->ca32_export.ex32_ino) ||
2052                 __get_user(karg->ca_export.ex_flags,
2053                                 &arg->ca32_export.ex32_flags) ||
2054                 __get_user(karg->ca_export.ex_anon_uid,
2055                                 &arg->ca32_export.ex32_anon_uid) ||
2056                 __get_user(karg->ca_export.ex_anon_gid,
2057                                 &arg->ca32_export.ex32_anon_gid))
2058                 return -EFAULT;
2059         SET_UID(karg->ca_export.ex_anon_uid, karg->ca_export.ex_anon_uid);
2060         SET_GID(karg->ca_export.ex_anon_gid, karg->ca_export.ex_anon_gid);
2061
2062         return 0;
2063 }
2064
2065 static int compat_nfs_getfd_trans(struct nfsctl_arg *karg,
2066                                 struct compat_nfsctl_arg __user *arg)
2067 {
2068         if (!access_ok(VERIFY_READ, &arg->ca32_getfd,
2069                         sizeof(arg->ca32_getfd)) ||
2070                 get_user(karg->ca_version, &arg->ca32_version) ||
2071                 __copy_from_user(&karg->ca_getfd.gd_addr,
2072                                 &arg->ca32_getfd.gd32_addr,
2073                                 (sizeof(struct sockaddr))) ||
2074                 __copy_from_user(&karg->ca_getfd.gd_path,
2075                                 &arg->ca32_getfd.gd32_path,
2076                                 (NFS_MAXPATHLEN+1)) ||
2077                 __get_user(karg->ca_getfd.gd_version,
2078                                 &arg->ca32_getfd.gd32_version))
2079                 return -EFAULT;
2080
2081         return 0;
2082 }
2083
2084 static int compat_nfs_getfs_trans(struct nfsctl_arg *karg,
2085                                 struct compat_nfsctl_arg __user *arg)
2086 {
2087         if (!access_ok(VERIFY_READ,&arg->ca32_getfs,sizeof(arg->ca32_getfs)) ||
2088                 get_user(karg->ca_version, &arg->ca32_version) ||
2089                 __copy_from_user(&karg->ca_getfs.gd_addr,
2090                                 &arg->ca32_getfs.gd32_addr,
2091                                 (sizeof(struct sockaddr))) ||
2092                 __copy_from_user(&karg->ca_getfs.gd_path,
2093                                 &arg->ca32_getfs.gd32_path,
2094                                 (NFS_MAXPATHLEN+1)) ||
2095                 __get_user(karg->ca_getfs.gd_maxlen,
2096                                 &arg->ca32_getfs.gd32_maxlen))
2097                 return -EFAULT;
2098
2099         return 0;
2100 }
2101
2102 /* This really doesn't need translations, we are only passing
2103  * back a union which contains opaque nfs file handle data.
2104  */
2105 static int compat_nfs_getfh_res_trans(union nfsctl_res *kres,
2106                                 union compat_nfsctl_res __user *res)
2107 {
2108         int err;
2109
2110         err = copy_to_user(res, kres, sizeof(*res));
2111
2112         return (err) ? -EFAULT : 0;
2113 }
2114
2115 asmlinkage long compat_sys_nfsservctl(int cmd,
2116                                 struct compat_nfsctl_arg __user *arg,
2117                                 union compat_nfsctl_res __user *res)
2118 {
2119         struct nfsctl_arg *karg;
2120         union nfsctl_res *kres;
2121         mm_segment_t oldfs;
2122         int err;
2123
2124         karg = kmalloc(sizeof(*karg), GFP_USER);
2125         kres = kmalloc(sizeof(*kres), GFP_USER);
2126         if(!karg || !kres) {
2127                 err = -ENOMEM;
2128                 goto done;
2129         }
2130
2131         switch(cmd) {
2132         case NFSCTL_SVC:
2133                 err = compat_nfs_svc_trans(karg, arg);
2134                 break;
2135
2136         case NFSCTL_ADDCLIENT:
2137                 err = compat_nfs_clnt_trans(karg, arg);
2138                 break;
2139
2140         case NFSCTL_DELCLIENT:
2141                 err = compat_nfs_clnt_trans(karg, arg);
2142                 break;
2143
2144         case NFSCTL_EXPORT:
2145         case NFSCTL_UNEXPORT:
2146                 err = compat_nfs_exp_trans(karg, arg);
2147                 break;
2148
2149         case NFSCTL_GETFD:
2150                 err = compat_nfs_getfd_trans(karg, arg);
2151                 break;
2152
2153         case NFSCTL_GETFS:
2154                 err = compat_nfs_getfs_trans(karg, arg);
2155                 break;
2156
2157         default:
2158                 err = -EINVAL;
2159                 break;
2160         }
2161
2162         if (err)
2163                 goto done;
2164
2165         oldfs = get_fs();
2166         set_fs(KERNEL_DS);
2167         /* The __user pointer casts are valid because of the set_fs() */
2168         err = sys_nfsservctl(cmd, (void __user *) karg, (void __user *) kres);
2169         set_fs(oldfs);
2170
2171         if (err)
2172                 goto done;
2173
2174         if((cmd == NFSCTL_GETFD) ||
2175            (cmd == NFSCTL_GETFS))
2176                 err = compat_nfs_getfh_res_trans(kres, res);
2177
2178 done:
2179         kfree(karg);
2180         kfree(kres);
2181         return err;
2182 }
2183 #else /* !NFSD */
2184 long asmlinkage compat_sys_nfsservctl(int cmd, void *notused, void *notused2)
2185 {
2186         return sys_ni_syscall();
2187 }
2188 #endif
2189
2190 #ifdef CONFIG_EPOLL
2191
2192 #ifdef HAVE_SET_RESTORE_SIGMASK
2193 asmlinkage long compat_sys_epoll_pwait(int epfd,
2194                         struct compat_epoll_event __user *events,
2195                         int maxevents, int timeout,
2196                         const compat_sigset_t __user *sigmask,
2197                         compat_size_t sigsetsize)
2198 {
2199         long err;
2200         compat_sigset_t csigmask;
2201         sigset_t ksigmask, sigsaved;
2202
2203         /*
2204          * If the caller wants a certain signal mask to be set during the wait,
2205          * we apply it here.
2206          */
2207         if (sigmask) {
2208                 if (sigsetsize != sizeof(compat_sigset_t))
2209                         return -EINVAL;
2210                 if (copy_from_user(&csigmask, sigmask, sizeof(csigmask)))
2211                         return -EFAULT;
2212                 sigset_from_compat(&ksigmask, &csigmask);
2213                 sigdelsetmask(&ksigmask, sigmask(SIGKILL) | sigmask(SIGSTOP));
2214                 sigprocmask(SIG_SETMASK, &ksigmask, &sigsaved);
2215         }
2216
2217         err = sys_epoll_wait(epfd, events, maxevents, timeout);
2218
2219         /*
2220          * If we changed the signal mask, we need to restore the original one.
2221          * In case we've got a signal while waiting, we do not restore the
2222          * signal mask yet, and we allow do_signal() to deliver the signal on
2223          * the way back to userspace, before the signal mask is restored.
2224          */
2225         if (sigmask) {
2226                 if (err == -EINTR) {
2227                         memcpy(&current->saved_sigmask, &sigsaved,
2228                                sizeof(sigsaved));
2229                         set_restore_sigmask();
2230                 } else
2231                         sigprocmask(SIG_SETMASK, &sigsaved, NULL);
2232         }
2233
2234         return err;
2235 }
2236 #endif /* HAVE_SET_RESTORE_SIGMASK */
2237
2238 #endif /* CONFIG_EPOLL */
2239
2240 #ifdef CONFIG_SIGNALFD
2241
2242 asmlinkage long compat_sys_signalfd4(int ufd,
2243                                      const compat_sigset_t __user *sigmask,
2244                                      compat_size_t sigsetsize, int flags)
2245 {
2246         compat_sigset_t ss32;
2247         sigset_t tmp;
2248         sigset_t __user *ksigmask;
2249
2250         if (sigsetsize != sizeof(compat_sigset_t))
2251                 return -EINVAL;
2252         if (copy_from_user(&ss32, sigmask, sizeof(ss32)))
2253                 return -EFAULT;
2254         sigset_from_compat(&tmp, &ss32);
2255         ksigmask = compat_alloc_user_space(sizeof(sigset_t));
2256         if (copy_to_user(ksigmask, &tmp, sizeof(sigset_t)))
2257                 return -EFAULT;
2258
2259         return sys_signalfd4(ufd, ksigmask, sizeof(sigset_t), flags);
2260 }
2261
2262 asmlinkage long compat_sys_signalfd(int ufd,
2263                                     const compat_sigset_t __user *sigmask,
2264                                     compat_size_t sigsetsize)
2265 {
2266         return compat_sys_signalfd4(ufd, sigmask, sigsetsize, 0);
2267 }
2268 #endif /* CONFIG_SIGNALFD */
2269
2270 #ifdef CONFIG_TIMERFD
2271
2272 asmlinkage long compat_sys_timerfd_settime(int ufd, int flags,
2273                                    const struct compat_itimerspec __user *utmr,
2274                                    struct compat_itimerspec __user *otmr)
2275 {
2276         int error;
2277         struct itimerspec t;
2278         struct itimerspec __user *ut;
2279
2280         if (get_compat_itimerspec(&t, utmr))
2281                 return -EFAULT;
2282         ut = compat_alloc_user_space(2 * sizeof(struct itimerspec));
2283         if (copy_to_user(&ut[0], &t, sizeof(t)))
2284                 return -EFAULT;
2285         error = sys_timerfd_settime(ufd, flags, &ut[0], &ut[1]);
2286         if (!error && otmr)
2287                 error = (copy_from_user(&t, &ut[1], sizeof(struct itimerspec)) ||
2288                          put_compat_itimerspec(otmr, &t)) ? -EFAULT: 0;
2289
2290         return error;
2291 }
2292
2293 asmlinkage long compat_sys_timerfd_gettime(int ufd,
2294                                    struct compat_itimerspec __user *otmr)
2295 {
2296         int error;
2297         struct itimerspec t;
2298         struct itimerspec __user *ut;
2299
2300         ut = compat_alloc_user_space(sizeof(struct itimerspec));
2301         error = sys_timerfd_gettime(ufd, ut);
2302         if (!error)
2303                 error = (copy_from_user(&t, ut, sizeof(struct itimerspec)) ||
2304                          put_compat_itimerspec(otmr, &t)) ? -EFAULT: 0;
2305
2306         return error;
2307 }
2308
2309 #endif /* CONFIG_TIMERFD */