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@ucw.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/stddef.h>
  19 #include <linux/kernel.h>
  20 #include <linux/linkage.h>
  21 #include <linux/compat.h>
  22 #include <linux/errno.h>
  23 #include <linux/time.h>
  24 #include <linux/fs.h>
  25 #include <linux/fcntl.h>
  26 #include <linux/namei.h>
  27 #include <linux/file.h>
  28 #include <linux/fdtable.h>
  29 #include <linux/vfs.h>
  30 #include <linux/ioctl.h>
  31 #include <linux/init.h>
  32 #include <linux/ncp_mount.h>
  33 #include <linux/nfs4_mount.h>
  34 #include <linux/syscalls.h>
  35 #include <linux/ctype.h>
  36 #include <linux/dirent.h>
  37 #include <linux/fsnotify.h>
  38 #include <linux/highuid.h>
  39 #include <linux/personality.h>
  40 #include <linux/rwsem.h>
  41 #include <linux/tsacct_kern.h>
  42 #include <linux/security.h>
  43 #include <linux/highmem.h>
  44 #include <linux/signal.h>
  45 #include <linux/poll.h>
  46 #include <linux/mm.h>
  47 #include <linux/eventpoll.h>
  48 #include <linux/fs_struct.h>
  49 #include <linux/slab.h>
  50 #include <linux/pagemap.h>
  51
  52 #include <asm/uaccess.h>
  53 #include <asm/mmu_context.h>
  54 #include <asm/ioctls.h>
  55 #include "internal.h"
  56
  57 int compat_log = 1;
  58
  59 int compat_printk(const char *fmt, ...)
  60 {
  61         va_list ap;
  62         int ret;
  63         if (!compat_log)
  64                 return 0;
  65         va_start(ap, fmt);
  66         ret = vprintk(fmt, ap);
  67         va_end(ap);
  68         return ret;
  69 }
  70
  71 #include "read_write.h"
  72
  73 /*
  74  * Not all architectures have sys_utime, so implement this in terms
  75  * of sys_utimes.
  76  */
  77 asmlinkage long compat_sys_utime(const char __user *filename,
  78                                  struct compat_utimbuf __user *t)
  79 {
  80         struct timespec tv[2];
  81
  82         if (t) {
  83                 if (get_user(tv[0].tv_sec, &t->actime) ||
  84                     get_user(tv[1].tv_sec, &t->modtime))
  85                         return -EFAULT;
  86                 tv[0].tv_nsec = 0;
  87                 tv[1].tv_nsec = 0;
  88         }
  89         return do_utimes(AT_FDCWD, filename, t ? tv : NULL, 0);
  90 }
  91
  92 asmlinkage long compat_sys_utimensat(unsigned int dfd, const char __user *filename, struct compat_timespec __user *t, int flags)
  93 {
  94         struct timespec tv[2];
  95
  96         if  (t) {
  97                 if (get_compat_timespec(&tv[0], &t[0]) ||
  98                     get_compat_timespec(&tv[1], &t[1]))
  99                         return -EFAULT;
 100
 101                 if (tv[0].tv_nsec == UTIME_OMIT && tv[1].tv_nsec == UTIME_OMIT)
 102                         return 0;
 103         }
 104         return do_utimes(dfd, filename, t ? tv : NULL, flags);
 105 }
 106
 107 asmlinkage long compat_sys_futimesat(unsigned int dfd, const char __user *filename, struct compat_timeval __user *t)
 108 {
 109         struct timespec tv[2];
 110
 111         if (t) {
 112                 if (get_user(tv[0].tv_sec, &t[0].tv_sec) ||
 113                     get_user(tv[0].tv_nsec, &t[0].tv_usec) ||
 114                     get_user(tv[1].tv_sec, &t[1].tv_sec) ||
 115                     get_user(tv[1].tv_nsec, &t[1].tv_usec))
 116                         return -EFAULT;
 117                 if (tv[0].tv_nsec >= 1000000 || tv[0].tv_nsec < 0 ||
 118                     tv[1].tv_nsec >= 1000000 || tv[1].tv_nsec < 0)
 119                         return -EINVAL;
 120                 tv[0].tv_nsec *= 1000;
 121                 tv[1].tv_nsec *= 1000;
 122         }
 123         return do_utimes(dfd, filename, t ? tv : NULL, 0);
 124 }
 125
 126 asmlinkage long compat_sys_utimes(const char __user *filename, struct compat_timeval __user *t)
 127 {
 128         return compat_sys_futimesat(AT_FDCWD, filename, t);
 129 }
 130
 131 static int cp_compat_stat(struct kstat *stat, struct compat_stat __user *ubuf)
 132 {
 133         struct compat_stat tmp;
 134
 135         if (!old_valid_dev(stat->dev) || !old_valid_dev(stat->rdev))
 136                 return -EOVERFLOW;
 137
 138         memset(&tmp, 0, sizeof(tmp));
 139         tmp.st_dev = old_encode_dev(stat->dev);
 140         tmp.st_ino = stat->ino;
 141         if (sizeof(tmp.st_ino) < sizeof(stat->ino) && tmp.st_ino != stat->ino)
 142                 return -EOVERFLOW;
 143         tmp.st_mode = stat->mode;
 144         tmp.st_nlink = stat->nlink;
 145         if (tmp.st_nlink != stat->nlink)
 146                 return -EOVERFLOW;
 147         SET_UID(tmp.st_uid, from_kuid_munged(current_user_ns(), stat->uid));
 148         SET_GID(tmp.st_gid, from_kgid_munged(current_user_ns(), stat->gid));
 149         tmp.st_rdev = old_encode_dev(stat->rdev);
 150         if ((u64) stat->size > MAX_NON_LFS)
 151                 return -EOVERFLOW;
 152         tmp.st_size = stat->size;
 153         tmp.st_atime = stat->atime.tv_sec;
 154         tmp.st_atime_nsec = stat->atime.tv_nsec;
 155         tmp.st_mtime = stat->mtime.tv_sec;
 156         tmp.st_mtime_nsec = stat->mtime.tv_nsec;
 157         tmp.st_ctime = stat->ctime.tv_sec;
 158         tmp.st_ctime_nsec = stat->ctime.tv_nsec;
 159         tmp.st_blocks = stat->blocks;
 160         tmp.st_blksize = stat->blksize;
 161         return copy_to_user(ubuf, &tmp, sizeof(tmp)) ? -EFAULT : 0;
 162 }
 163
 164 asmlinkage long compat_sys_newstat(const char __user * filename,
 165                 struct compat_stat __user *statbuf)
 166 {
 167         struct kstat stat;
 168         int error;
 169
 170         error = vfs_stat(filename, &stat);
 171         if (error)
 172                 return error;
 173         return cp_compat_stat(&stat, statbuf);
 174 }
 175
 176 asmlinkage long compat_sys_newlstat(const char __user * filename,
 177                 struct compat_stat __user *statbuf)
 178 {
 179         struct kstat stat;
 180         int error;
 181
 182         error = vfs_lstat(filename, &stat);
 183         if (error)
 184                 return error;
 185         return cp_compat_stat(&stat, statbuf);
 186 }
 187
 188 #ifndef __ARCH_WANT_STAT64
 189 asmlinkage long compat_sys_newfstatat(unsigned int dfd,
 190                 const char __user *filename,
 191                 struct compat_stat __user *statbuf, int flag)
 192 {
 193         struct kstat stat;
 194         int error;
 195
 196         error = vfs_fstatat(dfd, filename, &stat, flag);
 197         if (error)
 198                 return error;
 199         return cp_compat_stat(&stat, statbuf);
 200 }
 201 #endif
 202
 203 asmlinkage long compat_sys_newfstat(unsigned int fd,
 204                 struct compat_stat __user * statbuf)
 205 {
 206         struct kstat stat;
 207         int error = vfs_fstat(fd, &stat);
 208
 209         if (!error)
 210                 error = cp_compat_stat(&stat, statbuf);
 211         return error;
 212 }
 213
 214 static int put_compat_statfs(struct compat_statfs __user *ubuf, struct kstatfs *kbuf)
 215 {
 216
 217         if (sizeof ubuf->f_blocks == 4) {
 218                 if ((kbuf->f_blocks | kbuf->f_bfree | kbuf->f_bavail |
 219                      kbuf->f_bsize | kbuf->f_frsize) & 0xffffffff00000000ULL)
 220                         return -EOVERFLOW;
 221                 /* f_files and f_ffree may be -1; it's okay
 222                  * to stuff that into 32 bits */
 223                 if (kbuf->f_files != 0xffffffffffffffffULL
 224                  && (kbuf->f_files & 0xffffffff00000000ULL))
 225                         return -EOVERFLOW;
 226                 if (kbuf->f_ffree != 0xffffffffffffffffULL
 227                  && (kbuf->f_ffree & 0xffffffff00000000ULL))
 228                         return -EOVERFLOW;
 229         }
 230         if (!access_ok(VERIFY_WRITE, ubuf, sizeof(*ubuf)) ||
 231             __put_user(kbuf->f_type, &ubuf->f_type) ||
 232             __put_user(kbuf->f_bsize, &ubuf->f_bsize) ||
 233             __put_user(kbuf->f_blocks, &ubuf->f_blocks) ||
 234             __put_user(kbuf->f_bfree, &ubuf->f_bfree) ||
 235             __put_user(kbuf->f_bavail, &ubuf->f_bavail) ||
 236             __put_user(kbuf->f_files, &ubuf->f_files) ||
 237             __put_user(kbuf->f_ffree, &ubuf->f_ffree) ||
 238             __put_user(kbuf->f_namelen, &ubuf->f_namelen) ||
 239             __put_user(kbuf->f_fsid.val[0], &ubuf->f_fsid.val[0]) ||
 240             __put_user(kbuf->f_fsid.val[1], &ubuf->f_fsid.val[1]) ||
 241             __put_user(kbuf->f_frsize, &ubuf->f_frsize) ||
 242             __put_user(kbuf->f_flags, &ubuf->f_flags) ||
 243             __clear_user(ubuf->f_spare, sizeof(ubuf->f_spare)))
 244                 return -EFAULT;
 245         return 0;
 246 }
 247
 248 /*
 249  * The following statfs calls are copies of code from fs/statfs.c and
 250  * should be checked against those from time to time
 251  */
 252 asmlinkage long compat_sys_statfs(const char __user *pathname, struct compat_statfs __user *buf)
 253 {
 254         struct kstatfs tmp;
 255         int error = user_statfs(pathname, &tmp);
 256         if (!error)
 257                 error = put_compat_statfs(buf, &tmp);
 258         return error;
 259 }
 260
 261 asmlinkage long compat_sys_fstatfs(unsigned int fd, struct compat_statfs __user *buf)
 262 {
 263         struct kstatfs tmp;
 264         int error = fd_statfs(fd, &tmp);
 265         if (!error)
 266                 error = put_compat_statfs(buf, &tmp);
 267         return error;
 268 }
 269
 270 static int put_compat_statfs64(struct compat_statfs64 __user *ubuf, struct kstatfs *kbuf)
 271 {
 272         if (sizeof ubuf->f_blocks == 4) {
 273                 if ((kbuf->f_blocks | kbuf->f_bfree | kbuf->f_bavail |
 274                      kbuf->f_bsize | kbuf->f_frsize) & 0xffffffff00000000ULL)
 275                         return -EOVERFLOW;
 276                 /* f_files and f_ffree may be -1; it's okay
 277                  * to stuff that into 32 bits */
 278                 if (kbuf->f_files != 0xffffffffffffffffULL
 279                  && (kbuf->f_files & 0xffffffff00000000ULL))
 280                         return -EOVERFLOW;
 281                 if (kbuf->f_ffree != 0xffffffffffffffffULL
 282                  && (kbuf->f_ffree & 0xffffffff00000000ULL))
 283                         return -EOVERFLOW;
 284         }
 285         if (!access_ok(VERIFY_WRITE, ubuf, sizeof(*ubuf)) ||
 286             __put_user(kbuf->f_type, &ubuf->f_type) ||
 287             __put_user(kbuf->f_bsize, &ubuf->f_bsize) ||
 288             __put_user(kbuf->f_blocks, &ubuf->f_blocks) ||
 289             __put_user(kbuf->f_bfree, &ubuf->f_bfree) ||
 290             __put_user(kbuf->f_bavail, &ubuf->f_bavail) ||
 291             __put_user(kbuf->f_files, &ubuf->f_files) ||
 292             __put_user(kbuf->f_ffree, &ubuf->f_ffree) ||
 293             __put_user(kbuf->f_namelen, &ubuf->f_namelen) ||
 294             __put_user(kbuf->f_fsid.val[0], &ubuf->f_fsid.val[0]) ||
 295             __put_user(kbuf->f_fsid.val[1], &ubuf->f_fsid.val[1]) ||
 296             __put_user(kbuf->f_frsize, &ubuf->f_frsize) ||
 297             __put_user(kbuf->f_flags, &ubuf->f_flags) ||
 298             __clear_user(ubuf->f_spare, sizeof(ubuf->f_spare)))
 299                 return -EFAULT;
 300         return 0;
 301 }
 302
 303 asmlinkage long compat_sys_statfs64(const char __user *pathname, compat_size_t sz, struct compat_statfs64 __user *buf)
 304 {
 305         struct kstatfs tmp;
 306         int error;
 307
 308         if (sz != sizeof(*buf))
 309                 return -EINVAL;
 310
 311         error = user_statfs(pathname, &tmp);
 312         if (!error)
 313                 error = put_compat_statfs64(buf, &tmp);
 314         return error;
 315 }
 316
 317 asmlinkage long compat_sys_fstatfs64(unsigned int fd, compat_size_t sz, struct compat_statfs64 __user *buf)
 318 {
 319         struct kstatfs tmp;
 320         int error;
 321
 322         if (sz != sizeof(*buf))
 323                 return -EINVAL;
 324
 325         error = fd_statfs(fd, &tmp);
 326         if (!error)
 327                 error = put_compat_statfs64(buf, &tmp);
 328         return error;
 329 }
 330
 331 /*
 332  * This is a copy of sys_ustat, just dealing with a structure layout.
 333  * Given how simple this syscall is that apporach is more maintainable
 334  * than the various conversion hacks.
 335  */
 336 asmlinkage long compat_sys_ustat(unsigned dev, struct compat_ustat __user *u)
 337 {
 338         struct compat_ustat tmp;
 339         struct kstatfs sbuf;
 340         int err = vfs_ustat(new_decode_dev(dev), &sbuf);
 341         if (err)
 342                 return err;
 343
 344         memset(&tmp, 0, sizeof(struct compat_ustat));
 345         tmp.f_tfree = sbuf.f_bfree;
 346         tmp.f_tinode = sbuf.f_ffree;
 347         if (copy_to_user(u, &tmp, sizeof(struct compat_ustat)))
 348                 return -EFAULT;
 349         return 0;
 350 }
 351
 352 static int get_compat_flock(struct flock *kfl, struct compat_flock __user *ufl)
 353 {
 354         if (!access_ok(VERIFY_READ, ufl, sizeof(*ufl)) ||
 355             __get_user(kfl->l_type, &ufl->l_type) ||
 356             __get_user(kfl->l_whence, &ufl->l_whence) ||
 357             __get_user(kfl->l_start, &ufl->l_start) ||
 358             __get_user(kfl->l_len, &ufl->l_len) ||
 359             __get_user(kfl->l_pid, &ufl->l_pid))
 360                 return -EFAULT;
 361         return 0;
 362 }
 363
 364 static int put_compat_flock(struct flock *kfl, struct compat_flock __user *ufl)
 365 {
 366         if (!access_ok(VERIFY_WRITE, ufl, sizeof(*ufl)) ||
 367             __put_user(kfl->l_type, &ufl->l_type) ||
 368             __put_user(kfl->l_whence, &ufl->l_whence) ||
 369             __put_user(kfl->l_start, &ufl->l_start) ||
 370             __put_user(kfl->l_len, &ufl->l_len) ||
 371             __put_user(kfl->l_pid, &ufl->l_pid))
 372                 return -EFAULT;
 373         return 0;
 374 }
 375
 376 #ifndef HAVE_ARCH_GET_COMPAT_FLOCK64
 377 static int get_compat_flock64(struct flock *kfl, struct compat_flock64 __user *ufl)
 378 {
 379         if (!access_ok(VERIFY_READ, ufl, sizeof(*ufl)) ||
 380             __get_user(kfl->l_type, &ufl->l_type) ||
 381             __get_user(kfl->l_whence, &ufl->l_whence) ||
 382             __get_user(kfl->l_start, &ufl->l_start) ||
 383             __get_user(kfl->l_len, &ufl->l_len) ||
 384             __get_user(kfl->l_pid, &ufl->l_pid))
 385                 return -EFAULT;
 386         return 0;
 387 }
 388 #endif
 389
 390 #ifndef HAVE_ARCH_PUT_COMPAT_FLOCK64
 391 static int put_compat_flock64(struct flock *kfl, struct compat_flock64 __user *ufl)
 392 {
 393         if (!access_ok(VERIFY_WRITE, ufl, sizeof(*ufl)) ||
 394             __put_user(kfl->l_type, &ufl->l_type) ||
 395             __put_user(kfl->l_whence, &ufl->l_whence) ||
 396             __put_user(kfl->l_start, &ufl->l_start) ||
 397             __put_user(kfl->l_len, &ufl->l_len) ||
 398             __put_user(kfl->l_pid, &ufl->l_pid))
 399                 return -EFAULT;
 400         return 0;
 401 }
 402 #endif
 403
 404 asmlinkage long compat_sys_fcntl64(unsigned int fd, unsigned int cmd,
 405                 unsigned long arg)
 406 {
 407         mm_segment_t old_fs;
 408         struct flock f;
 409         long ret;
 410
 411         switch (cmd) {
 412         case F_GETLK:
 413         case F_SETLK:
 414         case F_SETLKW:
 415                 ret = get_compat_flock(&f, compat_ptr(arg));
 416                 if (ret != 0)
 417                         break;
 418                 old_fs = get_fs();
 419                 set_fs(KERNEL_DS);
 420                 ret = sys_fcntl(fd, cmd, (unsigned long)&f);
 421                 set_fs(old_fs);
 422                 if (cmd == F_GETLK && ret == 0) {
 423                         /* GETLK was successful and we need to return the data...
 424                          * but it needs to fit in the compat structure.
 425                          * l_start shouldn't be too big, unless the original
 426                          * start + end is greater than COMPAT_OFF_T_MAX, in which
 427                          * case the app was asking for trouble, so we return
 428                          * -EOVERFLOW in that case.
 429                          * l_len could be too big, in which case we just truncate it,
 430                          * and only allow the app to see that part of the conflicting
 431                          * lock that might make sense to it anyway
 432                          */
 433
 434                         if (f.l_start > COMPAT_OFF_T_MAX)
 435                                 ret = -EOVERFLOW;
 436                         if (f.l_len > COMPAT_OFF_T_MAX)
 437                                 f.l_len = COMPAT_OFF_T_MAX;
 438                         if (ret == 0)
 439                                 ret = put_compat_flock(&f, compat_ptr(arg));
 440                 }
 441                 break;
 442
 443         case F_GETLK64:
 444         case F_SETLK64:
 445         case F_SETLKW64:
 446                 ret = get_compat_flock64(&f, compat_ptr(arg));
 447                 if (ret != 0)
 448                         break;
 449                 old_fs = get_fs();
 450                 set_fs(KERNEL_DS);
 451                 ret = sys_fcntl(fd, (cmd == F_GETLK64) ? F_GETLK :
 452                                 ((cmd == F_SETLK64) ? F_SETLK : F_SETLKW),
 453                                 (unsigned long)&f);
 454                 set_fs(old_fs);
 455                 if (cmd == F_GETLK64 && ret == 0) {
 456                         /* need to return lock information - see above for commentary */
 457                         if (f.l_start > COMPAT_LOFF_T_MAX)
 458                                 ret = -EOVERFLOW;
 459                         if (f.l_len > COMPAT_LOFF_T_MAX)
 460                                 f.l_len = COMPAT_LOFF_T_MAX;
 461                         if (ret == 0)
 462                                 ret = put_compat_flock64(&f, compat_ptr(arg));
 463                 }
 464                 break;
 465
 466         default:
 467                 ret = sys_fcntl(fd, cmd, arg);
 468                 break;
 469         }
 470         return ret;
 471 }
 472
 473 asmlinkage long compat_sys_fcntl(unsigned int fd, unsigned int cmd,
 474                 unsigned long arg)
 475 {
 476         if ((cmd == F_GETLK64) || (cmd == F_SETLK64) || (cmd == F_SETLKW64))
 477                 return -EINVAL;
 478         return compat_sys_fcntl64(fd, cmd, arg);
 479 }
 480
 481 asmlinkage long
 482 compat_sys_io_setup(unsigned nr_reqs, u32 __user *ctx32p)
 483 {
 484         long ret;
 485         aio_context_t ctx64;
 486
 487         mm_segment_t oldfs = get_fs();
 488         if (unlikely(get_user(ctx64, ctx32p)))
 489                 return -EFAULT;
 490
 491         set_fs(KERNEL_DS);
 492         /* The __user pointer cast is valid because of the set_fs() */
 493         ret = sys_io_setup(nr_reqs, (aio_context_t __user *) &ctx64);
 494         set_fs(oldfs);
 495         /* truncating is ok because it's a user address */
 496         if (!ret)
 497                 ret = put_user((u32) ctx64, ctx32p);
 498         return ret;
 499 }
 500
 501 asmlinkage long
 502 compat_sys_io_getevents(aio_context_t ctx_id,
 503                                  unsigned long min_nr,
 504                                  unsigned long nr,
 505                                  struct io_event __user *events,
 506                                  struct compat_timespec __user *timeout)
 507 {
 508         long ret;
 509         struct timespec t;
 510         struct timespec __user *ut = NULL;
 511
 512         ret = -EFAULT;
 513         if (unlikely(!access_ok(VERIFY_WRITE, events,
 514                                 nr * sizeof(struct io_event))))
 515                 goto out;
 516         if (timeout) {
 517                 if (get_compat_timespec(&t, timeout))
 518                         goto out;
 519
 520                 ut = compat_alloc_user_space(sizeof(*ut));
 521                 if (copy_to_user(ut, &t, sizeof(t)) )
 522                         goto out;
 523         }
 524         ret = sys_io_getevents(ctx_id, min_nr, nr, events, ut);
 525 out:
 526         return ret;
 527 }
 528
 529 /* A write operation does a read from user space and vice versa */
 530 #define vrfy_dir(type) ((type) == READ ? VERIFY_WRITE : VERIFY_READ)
 531
 532 ssize_t compat_rw_copy_check_uvector(int type,
 533                 const struct compat_iovec __user *uvector, unsigned long nr_segs,
 534                 unsigned long fast_segs, struct iovec *fast_pointer,
 535                 struct iovec **ret_pointer)
 536 {
 537         compat_ssize_t tot_len;
 538         struct iovec *iov = *ret_pointer = fast_pointer;
 539         ssize_t ret = 0;
 540         int seg;
 541
 542         /*
 543          * SuS says "The readv() function *may* fail if the iovcnt argument
 544          * was less than or equal to 0, or greater than {IOV_MAX}.  Linux has
 545          * traditionally returned zero for zero segments, so...
 546          */
 547         if (nr_segs == 0)
 548                 goto out;
 549
 550         ret = -EINVAL;
 551         if (nr_segs > UIO_MAXIOV || nr_segs < 0)
 552                 goto out;
 553         if (nr_segs > fast_segs) {
 554                 ret = -ENOMEM;
 555                 iov = kmalloc(nr_segs*sizeof(struct iovec), GFP_KERNEL);
 556                 if (iov == NULL)
 557                         goto out;
 558         }
 559         *ret_pointer = iov;
 560
 561         ret = -EFAULT;
 562         if (!access_ok(VERIFY_READ, uvector, nr_segs*sizeof(*uvector)))
 563                 goto out;
 564
 565         /*
 566          * Single unix specification:
 567          * We should -EINVAL if an element length is not >= 0 and fitting an
 568          * ssize_t.
 569          *
 570          * In Linux, the total length is limited to MAX_RW_COUNT, there is
 571          * no overflow possibility.
 572          */
 573         tot_len = 0;
 574         ret = -EINVAL;
 575         for (seg = 0; seg < nr_segs; seg++) {
 576                 compat_uptr_t buf;
 577                 compat_ssize_t len;
 578
 579                 if (__get_user(len, &uvector->iov_len) ||
 580                    __get_user(buf, &uvector->iov_base)) {
 581                         ret = -EFAULT;
 582                         goto out;
 583                 }
 584                 if (len < 0)    /* size_t not fitting in compat_ssize_t .. */
 585                         goto out;
 586                 if (type >= 0 &&
 587                     !access_ok(vrfy_dir(type), compat_ptr(buf), len)) {
 588                         ret = -EFAULT;
 589                         goto out;
 590                 }
 591                 if (len > MAX_RW_COUNT - tot_len)
 592                         len = MAX_RW_COUNT - tot_len;
 593                 tot_len += len;
 594                 iov->iov_base = compat_ptr(buf);
 595                 iov->iov_len = (compat_size_t) len;
 596                 uvector++;
 597                 iov++;
 598         }
 599         ret = tot_len;
 600
 601 out:
 602         return ret;
 603 }
 604
 605 static inline long
 606 copy_iocb(long nr, u32 __user *ptr32, struct iocb __user * __user *ptr64)
 607 {
 608         compat_uptr_t uptr;
 609         int i;
 610
 611         for (i = 0; i < nr; ++i) {
 612                 if (get_user(uptr, ptr32 + i))
 613                         return -EFAULT;
 614                 if (put_user(compat_ptr(uptr), ptr64 + i))
 615                         return -EFAULT;
 616         }
 617         return 0;
 618 }
 619
 620 #define MAX_AIO_SUBMITS         (PAGE_SIZE/sizeof(struct iocb *))
 621
 622 asmlinkage long
 623 compat_sys_io_submit(aio_context_t ctx_id, int nr, u32 __user *iocb)
 624 {
 625         struct iocb __user * __user *iocb64;
 626         long ret;
 627
 628         if (unlikely(nr < 0))
 629                 return -EINVAL;
 630
 631         if (nr > MAX_AIO_SUBMITS)
 632                 nr = MAX_AIO_SUBMITS;
 633
 634         iocb64 = compat_alloc_user_space(nr * sizeof(*iocb64));
 635         ret = copy_iocb(nr, iocb, iocb64);
 636         if (!ret)
 637                 ret = do_io_submit(ctx_id, nr, iocb64, 1);
 638         return ret;
 639 }
 640
 641 struct compat_ncp_mount_data {
 642         compat_int_t version;
 643         compat_uint_t ncp_fd;
 644         __compat_uid_t mounted_uid;
 645         compat_pid_t wdog_pid;
 646         unsigned char mounted_vol[NCP_VOLNAME_LEN + 1];
 647         compat_uint_t time_out;
 648         compat_uint_t retry_count;
 649         compat_uint_t flags;
 650         __compat_uid_t uid;
 651         __compat_gid_t gid;
 652         compat_mode_t file_mode;
 653         compat_mode_t dir_mode;
 654 };
 655
 656 struct compat_ncp_mount_data_v4 {
 657         compat_int_t version;
 658         compat_ulong_t flags;
 659         compat_ulong_t mounted_uid;
 660         compat_long_t wdog_pid;
 661         compat_uint_t ncp_fd;
 662         compat_uint_t time_out;
 663         compat_uint_t retry_count;
 664         compat_ulong_t uid;
 665         compat_ulong_t gid;
 666         compat_ulong_t file_mode;
 667         compat_ulong_t dir_mode;
 668 };
 669
 670 static void *do_ncp_super_data_conv(void *raw_data)
 671 {
 672         int version = *(unsigned int *)raw_data;
 673
 674         if (version == 3) {
 675                 struct compat_ncp_mount_data *c_n = raw_data;
 676                 struct ncp_mount_data *n = raw_data;
 677
 678                 n->dir_mode = c_n->dir_mode;
 679                 n->file_mode = c_n->file_mode;
 680                 n->gid = c_n->gid;
 681                 n->uid = c_n->uid;
 682                 memmove (n->mounted_vol, c_n->mounted_vol, (sizeof (c_n->mounted_vol) + 3 * sizeof (unsigned int)));
 683                 n->wdog_pid = c_n->wdog_pid;
 684                 n->mounted_uid = c_n->mounted_uid;
 685         } else if (version == 4) {
 686                 struct compat_ncp_mount_data_v4 *c_n = raw_data;
 687                 struct ncp_mount_data_v4 *n = raw_data;
 688
 689                 n->dir_mode = c_n->dir_mode;
 690                 n->file_mode = c_n->file_mode;
 691                 n->gid = c_n->gid;
 692                 n->uid = c_n->uid;
 693                 n->retry_count = c_n->retry_count;
 694                 n->time_out = c_n->time_out;
 695                 n->ncp_fd = c_n->ncp_fd;
 696                 n->wdog_pid = c_n->wdog_pid;
 697                 n->mounted_uid = c_n->mounted_uid;
 698                 n->flags = c_n->flags;
 699         } else if (version != 5) {
 700                 return NULL;
 701         }
 702
 703         return raw_data;
 704 }
 705
 706
 707 struct compat_nfs_string {
 708         compat_uint_t len;
 709         compat_uptr_t data;
 710 };
 711
 712 static inline void compat_nfs_string(struct nfs_string *dst,
 713                                      struct compat_nfs_string *src)
 714 {
 715         dst->data = compat_ptr(src->data);
 716         dst->len = src->len;
 717 }
 718
 719 struct compat_nfs4_mount_data_v1 {
 720         compat_int_t version;
 721         compat_int_t flags;
 722         compat_int_t rsize;
 723         compat_int_t wsize;
 724         compat_int_t timeo;
 725         compat_int_t retrans;
 726         compat_int_t acregmin;
 727         compat_int_t acregmax;
 728         compat_int_t acdirmin;
 729         compat_int_t acdirmax;
 730         struct compat_nfs_string client_addr;
 731         struct compat_nfs_string mnt_path;
 732         struct compat_nfs_string hostname;
 733         compat_uint_t host_addrlen;
 734         compat_uptr_t host_addr;
 735         compat_int_t proto;
 736         compat_int_t auth_flavourlen;
 737         compat_uptr_t auth_flavours;
 738 };
 739
 740 static int do_nfs4_super_data_conv(void *raw_data)
 741 {
 742         int version = *(compat_uint_t *) raw_data;
 743
 744         if (version == 1) {
 745                 struct compat_nfs4_mount_data_v1 *raw = raw_data;
 746                 struct nfs4_mount_data *real = raw_data;
 747
 748                 /* copy the fields backwards */
 749                 real->auth_flavours = compat_ptr(raw->auth_flavours);
 750                 real->auth_flavourlen = raw->auth_flavourlen;
 751                 real->proto = raw->proto;
 752                 real->host_addr = compat_ptr(raw->host_addr);
 753                 real->host_addrlen = raw->host_addrlen;
 754                 compat_nfs_string(&real->hostname, &raw->hostname);
 755                 compat_nfs_string(&real->mnt_path, &raw->mnt_path);
 756                 compat_nfs_string(&real->client_addr, &raw->client_addr);
 757                 real->acdirmax = raw->acdirmax;
 758                 real->acdirmin = raw->acdirmin;
 759                 real->acregmax = raw->acregmax;
 760                 real->acregmin = raw->acregmin;
 761                 real->retrans = raw->retrans;
 762                 real->timeo = raw->timeo;
 763                 real->wsize = raw->wsize;
 764                 real->rsize = raw->rsize;
 765                 real->flags = raw->flags;
 766                 real->version = raw->version;
 767         }
 768
 769         return 0;
 770 }
 771
 772 #define NCPFS_NAME      "ncpfs"
 773 #define NFS4_NAME       "nfs4"
 774
 775 asmlinkage long compat_sys_mount(const char __user * dev_name,
 776                                  const char __user * dir_name,
 777                                  const char __user * type, unsigned long flags,
 778                                  const void __user * data)
 779 {
 780         char *kernel_type;
 781         unsigned long data_page;
 782         char *kernel_dev;
 783         struct filename *dir;
 784         int retval;
 785
 786         retval = copy_mount_string(type, &kernel_type);
 787         if (retval < 0)
 788                 goto out;
 789
 790         dir = getname(dir_name);
 791         retval = PTR_ERR(dir);
 792         if (IS_ERR(dir))
 793                 goto out1;
 794
 795         retval = copy_mount_string(dev_name, &kernel_dev);
 796         if (retval < 0)
 797                 goto out2;
 798
 799         retval = copy_mount_options(data, &data_page);
 800         if (retval < 0)
 801                 goto out3;
 802
 803         retval = -EINVAL;
 804
 805         if (kernel_type && data_page) {
 806                 if (!strcmp(kernel_type, NCPFS_NAME)) {
 807                         do_ncp_super_data_conv((void *)data_page);
 808                 } else if (!strcmp(kernel_type, NFS4_NAME)) {
 809                         if (do_nfs4_super_data_conv((void *) data_page))
 810                                 goto out4;
 811                 }
 812         }
 813
 814         retval = do_mount(kernel_dev, dir->name, kernel_type,
 815                         flags, (void*)data_page);
 816
 817  out4:
 818         free_page(data_page);
 819  out3:
 820         kfree(kernel_dev);
 821  out2:
 822         putname(dir);
 823  out1:
 824         kfree(kernel_type);
 825  out:
 826         return retval;
 827 }
 828
 829 struct compat_old_linux_dirent {
 830         compat_ulong_t  d_ino;
 831         compat_ulong_t  d_offset;
 832         unsigned short  d_namlen;
 833         char            d_name[1];
 834 };
 835
 836 struct compat_readdir_callback {
 837         struct compat_old_linux_dirent __user *dirent;
 838         int result;
 839 };
 840
 841 static int compat_fillonedir(void *__buf, const char *name, int namlen,
 842                         loff_t offset, u64 ino, unsigned int d_type)
 843 {
 844         struct compat_readdir_callback *buf = __buf;
 845         struct compat_old_linux_dirent __user *dirent;
 846         compat_ulong_t d_ino;
 847
 848         if (buf->result)
 849                 return -EINVAL;
 850         d_ino = ino;
 851         if (sizeof(d_ino) < sizeof(ino) && d_ino != ino) {
 852                 buf->result = -EOVERFLOW;
 853                 return -EOVERFLOW;
 854         }
 855         buf->result++;
 856         dirent = buf->dirent;
 857         if (!access_ok(VERIFY_WRITE, dirent,
 858                         (unsigned long)(dirent->d_name + namlen + 1) -
 859                                 (unsigned long)dirent))
 860                 goto efault;
 861         if (    __put_user(d_ino, &dirent->d_ino) ||
 862                 __put_user(offset, &dirent->d_offset) ||
 863                 __put_user(namlen, &dirent->d_namlen) ||
 864                 __copy_to_user(dirent->d_name, name, namlen) ||
 865                 __put_user(0, dirent->d_name + namlen))
 866                 goto efault;
 867         return 0;
 868 efault:
 869         buf->result = -EFAULT;
 870         return -EFAULT;
 871 }
 872
 873 asmlinkage long compat_sys_old_readdir(unsigned int fd,
 874         struct compat_old_linux_dirent __user *dirent, unsigned int count)
 875 {
 876         int error;
 877         struct fd f = fdget(fd);
 878         struct compat_readdir_callback buf;
 879
 880         if (!f.file)
 881                 return -EBADF;
 882
 883         buf.result = 0;
 884         buf.dirent = dirent;
 885
 886         error = vfs_readdir(f.file, compat_fillonedir, &buf);
 887         if (buf.result)
 888                 error = buf.result;
 889
 890         fdput(f);
 891         return error;
 892 }
 893
 894 struct compat_linux_dirent {
 895         compat_ulong_t  d_ino;
 896         compat_ulong_t  d_off;
 897         unsigned short  d_reclen;
 898         char            d_name[1];
 899 };
 900
 901 struct compat_getdents_callback {
 902         struct compat_linux_dirent __user *current_dir;
 903         struct compat_linux_dirent __user *previous;
 904         int count;
 905         int error;
 906 };
 907
 908 static int compat_filldir(void *__buf, const char *name, int namlen,
 909                 loff_t offset, u64 ino, unsigned int d_type)
 910 {
 911         struct compat_linux_dirent __user * dirent;
 912         struct compat_getdents_callback *buf = __buf;
 913         compat_ulong_t d_ino;
 914         int reclen = ALIGN(offsetof(struct compat_linux_dirent, d_name) +
 915                 namlen + 2, sizeof(compat_long_t));
 916
 917         buf->error = -EINVAL;   /* only used if we fail.. */
 918         if (reclen > buf->count)
 919                 return -EINVAL;
 920         d_ino = ino;
 921         if (sizeof(d_ino) < sizeof(ino) && d_ino != ino) {
 922                 buf->error = -EOVERFLOW;
 923                 return -EOVERFLOW;
 924         }
 925         dirent = buf->previous;
 926         if (dirent) {
 927                 if (__put_user(offset, &dirent->d_off))
 928                         goto efault;
 929         }
 930         dirent = buf->current_dir;
 931         if (__put_user(d_ino, &dirent->d_ino))
 932                 goto efault;
 933         if (__put_user(reclen, &dirent->d_reclen))
 934                 goto efault;
 935         if (copy_to_user(dirent->d_name, name, namlen))
 936                 goto efault;
 937         if (__put_user(0, dirent->d_name + namlen))
 938                 goto efault;
 939         if (__put_user(d_type, (char  __user *) dirent + reclen - 1))
 940                 goto efault;
 941         buf->previous = dirent;
 942         dirent = (void __user *)dirent + reclen;
 943         buf->current_dir = dirent;
 944         buf->count -= reclen;
 945         return 0;
 946 efault:
 947         buf->error = -EFAULT;
 948         return -EFAULT;
 949 }
 950
 951 asmlinkage long compat_sys_getdents(unsigned int fd,
 952                 struct compat_linux_dirent __user *dirent, unsigned int count)
 953 {
 954         struct fd f;
 955         struct compat_linux_dirent __user * lastdirent;
 956         struct compat_getdents_callback buf;
 957         int error;
 958
 959         if (!access_ok(VERIFY_WRITE, dirent, count))
 960                 return -EFAULT;
 961
 962         f = fdget(fd);
 963         if (!f.file)
 964                 return -EBADF;
 965
 966         buf.current_dir = dirent;
 967         buf.previous = NULL;
 968         buf.count = count;
 969         buf.error = 0;
 970
 971         error = vfs_readdir(f.file, compat_filldir, &buf);
 972         if (error >= 0)
 973                 error = buf.error;
 974         lastdirent = buf.previous;
 975         if (lastdirent) {
 976                 if (put_user(f.file->f_pos, &lastdirent->d_off))
 977                         error = -EFAULT;
 978                 else
 979                         error = count - buf.count;
 980         }
 981         fdput(f);
 982         return error;
 983 }
 984
 985 #ifndef __ARCH_OMIT_COMPAT_SYS_GETDENTS64
 986
 987 struct compat_getdents_callback64 {
 988         struct linux_dirent64 __user *current_dir;
 989         struct linux_dirent64 __user *previous;
 990         int count;
 991         int error;
 992 };
 993
 994 static int compat_filldir64(void * __buf, const char * name, int namlen, loff_t offset,
 995                      u64 ino, unsigned int d_type)
 996 {
 997         struct linux_dirent64 __user *dirent;
 998         struct compat_getdents_callback64 *buf = __buf;
 999         int reclen = ALIGN(offsetof(struct linux_dirent64, d_name) + namlen + 1,
1000                 sizeof(u64));
1001         u64 off;
1002
1003         buf->error = -EINVAL;   /* only used if we fail.. */
1004         if (reclen > buf->count)
1005                 return -EINVAL;
1006         dirent = buf->previous;
1007
1008         if (dirent) {
1009                 if (__put_user_unaligned(offset, &dirent->d_off))
1010                         goto efault;
1011         }
1012         dirent = buf->current_dir;
1013         if (__put_user_unaligned(ino, &dirent->d_ino))
1014                 goto efault;
1015         off = 0;
1016         if (__put_user_unaligned(off, &dirent->d_off))
1017                 goto efault;
1018         if (__put_user(reclen, &dirent->d_reclen))
1019                 goto efault;
1020         if (__put_user(d_type, &dirent->d_type))
1021                 goto efault;
1022         if (copy_to_user(dirent->d_name, name, namlen))
1023                 goto efault;
1024         if (__put_user(0, dirent->d_name + namlen))
1025                 goto efault;
1026         buf->previous = dirent;
1027         dirent = (void __user *)dirent + reclen;
1028         buf->current_dir = dirent;
1029         buf->count -= reclen;
1030         return 0;
1031 efault:
1032         buf->error = -EFAULT;
1033         return -EFAULT;
1034 }
1035
1036 asmlinkage long compat_sys_getdents64(unsigned int fd,
1037                 struct linux_dirent64 __user * dirent, unsigned int count)
1038 {
1039         struct fd f;
1040         struct linux_dirent64 __user * lastdirent;
1041         struct compat_getdents_callback64 buf;
1042         int error;
1043
1044         if (!access_ok(VERIFY_WRITE, dirent, count))
1045                 return -EFAULT;
1046
1047         f = fdget(fd);
1048         if (!f.file)
1049                 return -EBADF;
1050
1051         buf.current_dir = dirent;
1052         buf.previous = NULL;
1053         buf.count = count;
1054         buf.error = 0;
1055
1056         error = vfs_readdir(f.file, compat_filldir64, &buf);
1057         if (error >= 0)
1058                 error = buf.error;
1059         lastdirent = buf.previous;
1060         if (lastdirent) {
1061                 typeof(lastdirent->d_off) d_off = f.file->f_pos;
1062                 if (__put_user_unaligned(d_off, &lastdirent->d_off))
1063                         error = -EFAULT;
1064                 else
1065                         error = count - buf.count;
1066         }
1067         fdput(f);
1068         return error;
1069 }
1070 #endif /* ! __ARCH_OMIT_COMPAT_SYS_GETDENTS64 */
1071
1072 static ssize_t compat_do_readv_writev(int type, struct file *file,
1073                                const struct compat_iovec __user *uvector,
1074                                unsigned long nr_segs, loff_t *pos)
1075 {
1076         compat_ssize_t tot_len;
1077         struct iovec iovstack[UIO_FASTIOV];
1078         struct iovec *iov = iovstack;
1079         ssize_t ret;
1080         io_fn_t fn;
1081         iov_fn_t fnv;
1082
1083         ret = -EINVAL;
1084         if (!file->f_op)
1085                 goto out;
1086
1087         ret = compat_rw_copy_check_uvector(type, uvector, nr_segs,
1088                                                UIO_FASTIOV, iovstack, &iov);
1089         if (ret <= 0)
1090                 goto out;
1091
1092         tot_len = ret;
1093         ret = rw_verify_area(type, file, pos, tot_len);
1094         if (ret < 0)
1095                 goto out;
1096
1097         fnv = NULL;
1098         if (type == READ) {
1099                 fn = file->f_op->read;
1100                 fnv = file->f_op->aio_read;
1101         } else {
1102                 fn = (io_fn_t)file->f_op->write;
1103                 fnv = file->f_op->aio_write;
1104         }
1105
1106         if (fnv)
1107                 ret = do_sync_readv_writev(file, iov, nr_segs, tot_len,
1108                                                 pos, fnv);
1109         else
1110                 ret = do_loop_readv_writev(file, iov, nr_segs, pos, fn);
1111
1112 out:
1113         if (iov != iovstack)
1114                 kfree(iov);
1115         if ((ret + (type == READ)) > 0) {
1116                 if (type == READ)
1117                         fsnotify_access(file);
1118                 else
1119                         fsnotify_modify(file);
1120         }
1121         return ret;
1122 }
1123
1124 static size_t compat_readv(struct file *file,
1125                            const struct compat_iovec __user *vec,
1126                            unsigned long vlen, loff_t *pos)
1127 {
1128         ssize_t ret = -EBADF;
1129
1130         if (!(file->f_mode & FMODE_READ))
1131                 goto out;
1132
1133         ret = -EINVAL;
1134         if (!file->f_op || (!file->f_op->aio_read && !file->f_op->read))
1135                 goto out;
1136
1137         ret = compat_do_readv_writev(READ, file, vec, vlen, pos);
1138
1139 out:
1140         if (ret > 0)
1141                 add_rchar(current, ret);
1142         inc_syscr(current);
1143         return ret;
1144 }
1145
1146 asmlinkage ssize_t
1147 compat_sys_readv(unsigned long fd, const struct compat_iovec __user *vec,
1148                  unsigned long vlen)
1149 {
1150         struct fd f = fdget(fd);
1151         ssize_t ret;
1152         loff_t pos;
1153
1154         if (!f.file)
1155                 return -EBADF;
1156         pos = f.file->f_pos;
1157         ret = compat_readv(f.file, vec, vlen, &pos);
1158         f.file->f_pos = pos;
1159         fdput(f);
1160         return ret;
1161 }
1162
1163 asmlinkage ssize_t
1164 compat_sys_preadv64(unsigned long fd, const struct compat_iovec __user *vec,
1165                     unsigned long vlen, loff_t pos)
1166 {
1167         struct fd f;
1168         ssize_t ret;
1169
1170         if (pos < 0)
1171                 return -EINVAL;
1172         f = fdget(fd);
1173         if (!f.file)
1174                 return -EBADF;
1175         ret = -ESPIPE;
1176         if (f.file->f_mode & FMODE_PREAD)
1177                 ret = compat_readv(f.file, vec, vlen, &pos);
1178         fdput(f);
1179         return ret;
1180 }
1181
1182 asmlinkage ssize_t
1183 compat_sys_preadv(unsigned long fd, const struct compat_iovec __user *vec,
1184                   unsigned long vlen, u32 pos_low, u32 pos_high)
1185 {
1186         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1187         return compat_sys_preadv64(fd, vec, vlen, pos);
1188 }
1189
1190 static size_t compat_writev(struct file *file,
1191                             const struct compat_iovec __user *vec,
1192                             unsigned long vlen, loff_t *pos)
1193 {
1194         ssize_t ret = -EBADF;
1195
1196         if (!(file->f_mode & FMODE_WRITE))
1197                 goto out;
1198
1199         ret = -EINVAL;
1200         if (!file->f_op || (!file->f_op->aio_write && !file->f_op->write))
1201                 goto out;
1202
1203         ret = compat_do_readv_writev(WRITE, file, vec, vlen, pos);
1204
1205 out:
1206         if (ret > 0)
1207                 add_wchar(current, ret);
1208         inc_syscw(current);
1209         return ret;
1210 }
1211
1212 asmlinkage ssize_t
1213 compat_sys_writev(unsigned long fd, const struct compat_iovec __user *vec,
1214                   unsigned long vlen)
1215 {
1216         struct fd f = fdget(fd);
1217         ssize_t ret;
1218         loff_t pos;
1219
1220         if (!f.file)
1221                 return -EBADF;
1222         pos = f.file->f_pos;
1223         ret = compat_writev(f.file, vec, vlen, &pos);
1224         f.file->f_pos = pos;
1225         fdput(f);
1226         return ret;
1227 }
1228
1229 asmlinkage ssize_t
1230 compat_sys_pwritev64(unsigned long fd, const struct compat_iovec __user *vec,
1231                      unsigned long vlen, loff_t pos)
1232 {
1233         struct fd f;
1234         ssize_t ret;
1235
1236         if (pos < 0)
1237                 return -EINVAL;
1238         f = fdget(fd);
1239         if (!f.file)
1240                 return -EBADF;
1241         ret = -ESPIPE;
1242         if (f.file->f_mode & FMODE_PWRITE)
1243                 ret = compat_writev(f.file, vec, vlen, &pos);
1244         fdput(f);
1245         return ret;
1246 }
1247
1248 asmlinkage ssize_t
1249 compat_sys_pwritev(unsigned long fd, const struct compat_iovec __user *vec,
1250                    unsigned long vlen, u32 pos_low, u32 pos_high)
1251 {
1252         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1253         return compat_sys_pwritev64(fd, vec, vlen, pos);
1254 }
1255
1256 asmlinkage long
1257 compat_sys_vmsplice(int fd, const struct compat_iovec __user *iov32,
1258                     unsigned int nr_segs, unsigned int flags)
1259 {
1260         unsigned i;
1261         struct iovec __user *iov;
1262         if (nr_segs > UIO_MAXIOV)
1263                 return -EINVAL;
1264         iov = compat_alloc_user_space(nr_segs * sizeof(struct iovec));
1265         for (i = 0; i < nr_segs; i++) {
1266                 struct compat_iovec v;
1267                 if (get_user(v.iov_base, &iov32[i].iov_base) ||
1268                     get_user(v.iov_len, &iov32[i].iov_len) ||
1269                     put_user(compat_ptr(v.iov_base), &iov[i].iov_base) ||
1270                     put_user(v.iov_len, &iov[i].iov_len))
1271                         return -EFAULT;
1272         }
1273         return sys_vmsplice(fd, iov, nr_segs, flags);
1274 }
1275
1276 /*
1277  * Exactly like fs/open.c:sys_open(), except that it doesn't set the
1278  * O_LARGEFILE flag.
1279  */
1280 asmlinkage long
1281 compat_sys_open(const char __user *filename, int flags, umode_t mode)
1282 {
1283         return do_sys_open(AT_FDCWD, filename, flags, mode);
1284 }
1285
1286 /*
1287  * Exactly like fs/open.c:sys_openat(), except that it doesn't set the
1288  * O_LARGEFILE flag.
1289  */
1290 asmlinkage long
1291 compat_sys_openat(unsigned int dfd, const char __user *filename, int flags, umode_t mode)
1292 {
1293         return do_sys_open(dfd, filename, flags, mode);
1294 }
1295
1296 #define __COMPAT_NFDBITS       (8 * sizeof(compat_ulong_t))
1297
1298 static int poll_select_copy_remaining(struct timespec *end_time, void __user *p,
1299                                       int timeval, int ret)
1300 {
1301         struct timespec ts;
1302
1303         if (!p)
1304                 return ret;
1305
1306         if (current->personality & STICKY_TIMEOUTS)
1307                 goto sticky;
1308
1309         /* No update for zero timeout */
1310         if (!end_time->tv_sec && !end_time->tv_nsec)
1311                 return ret;
1312
1313         ktime_get_ts(&ts);
1314         ts = timespec_sub(*end_time, ts);
1315         if (ts.tv_sec < 0)
1316                 ts.tv_sec = ts.tv_nsec = 0;
1317
1318         if (timeval) {
1319                 struct compat_timeval rtv;
1320
1321                 rtv.tv_sec = ts.tv_sec;
1322                 rtv.tv_usec = ts.tv_nsec / NSEC_PER_USEC;
1323
1324                 if (!copy_to_user(p, &rtv, sizeof(rtv)))
1325                         return ret;
1326         } else {
1327                 struct compat_timespec rts;
1328
1329                 rts.tv_sec = ts.tv_sec;
1330                 rts.tv_nsec = ts.tv_nsec;
1331
1332                 if (!copy_to_user(p, &rts, sizeof(rts)))
1333                         return ret;
1334         }
1335         /*
1336          * If an application puts its timeval in read-only memory, we
1337          * don't want the Linux-specific update to the timeval to
1338          * cause a fault after the select has completed
1339          * successfully. However, because we're not updating the
1340          * timeval, we can't restart the system call.
1341          */
1342
1343 sticky:
1344         if (ret == -ERESTARTNOHAND)
1345                 ret = -EINTR;
1346         return ret;
1347 }
1348
1349 /*
1350  * Ooo, nasty.  We need here to frob 32-bit unsigned longs to
1351  * 64-bit unsigned longs.
1352  */
1353 static
1354 int compat_get_fd_set(unsigned long nr, compat_ulong_t __user *ufdset,
1355                         unsigned long *fdset)
1356 {
1357         nr = DIV_ROUND_UP(nr, __COMPAT_NFDBITS);
1358         if (ufdset) {
1359                 unsigned long odd;
1360
1361                 if (!access_ok(VERIFY_WRITE, ufdset, nr*sizeof(compat_ulong_t)))
1362                         return -EFAULT;
1363
1364                 odd = nr & 1UL;
1365                 nr &= ~1UL;
1366                 while (nr) {
1367                         unsigned long h, l;
1368                         if (__get_user(l, ufdset) || __get_user(h, ufdset+1))
1369                                 return -EFAULT;
1370                         ufdset += 2;
1371                         *fdset++ = h << 32 | l;
1372                         nr -= 2;
1373                 }
1374                 if (odd && __get_user(*fdset, ufdset))
1375                         return -EFAULT;
1376         } else {
1377                 /* Tricky, must clear full unsigned long in the
1378                  * kernel fdset at the end, this makes sure that
1379                  * actually happens.
1380                  */
1381                 memset(fdset, 0, ((nr + 1) & ~1)*sizeof(compat_ulong_t));
1382         }
1383         return 0;
1384 }
1385
1386 static
1387 int compat_set_fd_set(unsigned long nr, compat_ulong_t __user *ufdset,
1388                       unsigned long *fdset)
1389 {
1390         unsigned long odd;
1391         nr = DIV_ROUND_UP(nr, __COMPAT_NFDBITS);
1392
1393         if (!ufdset)
1394                 return 0;
1395
1396         odd = nr & 1UL;
1397         nr &= ~1UL;
1398         while (nr) {
1399                 unsigned long h, l;
1400                 l = *fdset++;
1401                 h = l >> 32;
1402                 if (__put_user(l, ufdset) || __put_user(h, ufdset+1))
1403                         return -EFAULT;
1404                 ufdset += 2;
1405                 nr -= 2;
1406         }
1407         if (odd && __put_user(*fdset, ufdset))
1408                 return -EFAULT;
1409         return 0;
1410 }
1411
1412
1413 /*
1414  * This is a virtual copy of sys_select from fs/select.c and probably
1415  * should be compared to it from time to time
1416  */
1417
1418 /*
1419  * We can actually return ERESTARTSYS instead of EINTR, but I'd
1420  * like to be certain this leads to no problems. So I return
1421  * EINTR just for safety.
1422  *
1423  * Update: ERESTARTSYS breaks at least the xview clock binary, so
1424  * I'm trying ERESTARTNOHAND which restart only when you want to.
1425  */
1426 int compat_core_sys_select(int n, compat_ulong_t __user *inp,
1427         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1428         struct timespec *end_time)
1429 {
1430         fd_set_bits fds;
1431         void *bits;
1432         int size, max_fds, ret = -EINVAL;
1433         struct fdtable *fdt;
1434         long stack_fds[SELECT_STACK_ALLOC/sizeof(long)];
1435
1436         if (n < 0)
1437                 goto out_nofds;
1438
1439         /* max_fds can increase, so grab it once to avoid race */
1440         rcu_read_lock();
1441         fdt = files_fdtable(current->files);
1442         max_fds = fdt->max_fds;
1443         rcu_read_unlock();
1444         if (n > max_fds)
1445                 n = max_fds;
1446
1447         /*
1448          * We need 6 bitmaps (in/out/ex for both incoming and outgoing),
1449          * since we used fdset we need to allocate memory in units of
1450          * long-words.
1451          */
1452         size = FDS_BYTES(n);
1453         bits = stack_fds;
1454         if (size > sizeof(stack_fds) / 6) {
1455                 bits = kmalloc(6 * size, GFP_KERNEL);
1456                 ret = -ENOMEM;
1457                 if (!bits)
1458                         goto out_nofds;
1459         }
1460         fds.in      = (unsigned long *)  bits;
1461         fds.out     = (unsigned long *) (bits +   size);
1462         fds.ex      = (unsigned long *) (bits + 2*size);
1463         fds.res_in  = (unsigned long *) (bits + 3*size);
1464         fds.res_out = (unsigned long *) (bits + 4*size);
1465         fds.res_ex  = (unsigned long *) (bits + 5*size);
1466
1467         if ((ret = compat_get_fd_set(n, inp, fds.in)) ||
1468             (ret = compat_get_fd_set(n, outp, fds.out)) ||
1469             (ret = compat_get_fd_set(n, exp, fds.ex)))
1470                 goto out;
1471         zero_fd_set(n, fds.res_in);
1472         zero_fd_set(n, fds.res_out);
1473         zero_fd_set(n, fds.res_ex);
1474
1475         ret = do_select(n, &fds, end_time);
1476
1477         if (ret < 0)
1478                 goto out;
1479         if (!ret) {
1480                 ret = -ERESTARTNOHAND;
1481                 if (signal_pending(current))
1482                         goto out;
1483                 ret = 0;
1484         }
1485
1486         if (compat_set_fd_set(n, inp, fds.res_in) ||
1487             compat_set_fd_set(n, outp, fds.res_out) ||
1488             compat_set_fd_set(n, exp, fds.res_ex))
1489                 ret = -EFAULT;
1490 out:
1491         if (bits != stack_fds)
1492                 kfree(bits);
1493 out_nofds:
1494         return ret;
1495 }
1496
1497 asmlinkage long compat_sys_select(int n, compat_ulong_t __user *inp,
1498         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1499         struct compat_timeval __user *tvp)
1500 {
1501         struct timespec end_time, *to = NULL;
1502         struct compat_timeval tv;
1503         int ret;
1504
1505         if (tvp) {
1506                 if (copy_from_user(&tv, tvp, sizeof(tv)))
1507                         return -EFAULT;
1508
1509                 to = &end_time;
1510                 if (poll_select_set_timeout(to,
1511                                 tv.tv_sec + (tv.tv_usec / USEC_PER_SEC),
1512                                 (tv.tv_usec % USEC_PER_SEC) * NSEC_PER_USEC))
1513                         return -EINVAL;
1514         }
1515
1516         ret = compat_core_sys_select(n, inp, outp, exp, to);
1517         ret = poll_select_copy_remaining(&end_time, tvp, 1, ret);
1518
1519         return ret;
1520 }
1521
1522 struct compat_sel_arg_struct {
1523         compat_ulong_t n;
1524         compat_uptr_t inp;
1525         compat_uptr_t outp;
1526         compat_uptr_t exp;
1527         compat_uptr_t tvp;
1528 };
1529
1530 asmlinkage long compat_sys_old_select(struct compat_sel_arg_struct __user *arg)
1531 {
1532         struct compat_sel_arg_struct a;
1533
1534         if (copy_from_user(&a, arg, sizeof(a)))
1535                 return -EFAULT;
1536         return compat_sys_select(a.n, compat_ptr(a.inp), compat_ptr(a.outp),
1537                                  compat_ptr(a.exp), compat_ptr(a.tvp));
1538 }
1539
1540 static long do_compat_pselect(int n, compat_ulong_t __user *inp,
1541         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1542         struct compat_timespec __user *tsp, compat_sigset_t __user *sigmask,
1543         compat_size_t sigsetsize)
1544 {
1545         compat_sigset_t ss32;
1546         sigset_t ksigmask, sigsaved;
1547         struct compat_timespec ts;
1548         struct timespec end_time, *to = NULL;
1549         int ret;
1550
1551         if (tsp) {
1552                 if (copy_from_user(&ts, tsp, sizeof(ts)))
1553                         return -EFAULT;
1554
1555                 to = &end_time;
1556                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
1557                         return -EINVAL;
1558         }
1559
1560         if (sigmask) {
1561                 if (sigsetsize != sizeof(compat_sigset_t))
1562                         return -EINVAL;
1563                 if (copy_from_user(&ss32, sigmask, sizeof(ss32)))
1564                         return -EFAULT;
1565                 sigset_from_compat(&ksigmask, &ss32);
1566
1567                 sigdelsetmask(&ksigmask, sigmask(SIGKILL)|sigmask(SIGSTOP));
1568                 sigprocmask(SIG_SETMASK, &ksigmask, &sigsaved);
1569         }
1570
1571         ret = compat_core_sys_select(n, inp, outp, exp, to);
1572         ret = poll_select_copy_remaining(&end_time, tsp, 0, ret);
1573
1574         if (ret == -ERESTARTNOHAND) {
1575                 /*
1576                  * Don't restore the signal mask yet. Let do_signal() deliver
1577                  * the signal on the way back to userspace, before the signal
1578                  * mask is restored.
1579                  */
1580                 if (sigmask) {
1581                         memcpy(&current->saved_sigmask, &sigsaved,
1582                                         sizeof(sigsaved));
1583                         set_restore_sigmask();
1584                 }
1585         } else if (sigmask)
1586                 sigprocmask(SIG_SETMASK, &sigsaved, NULL);
1587
1588         return ret;
1589 }
1590
1591 asmlinkage long compat_sys_pselect6(int n, compat_ulong_t __user *inp,
1592         compat_ulong_t __user *outp, compat_ulong_t __user *exp,
1593         struct compat_timespec __user *tsp, void __user *sig)
1594 {
1595         compat_size_t sigsetsize = 0;
1596         compat_uptr_t up = 0;
1597
1598         if (sig) {
1599                 if (!access_ok(VERIFY_READ, sig,
1600                                 sizeof(compat_uptr_t)+sizeof(compat_size_t)) ||
1601                         __get_user(up, (compat_uptr_t __user *)sig) ||
1602                         __get_user(sigsetsize,
1603                                 (compat_size_t __user *)(sig+sizeof(up))))
1604                         return -EFAULT;
1605         }
1606         return do_compat_pselect(n, inp, outp, exp, tsp, compat_ptr(up),
1607                                  sigsetsize);
1608 }
1609
1610 asmlinkage long compat_sys_ppoll(struct pollfd __user *ufds,
1611         unsigned int nfds, struct compat_timespec __user *tsp,
1612         const compat_sigset_t __user *sigmask, compat_size_t sigsetsize)
1613 {
1614         compat_sigset_t ss32;
1615         sigset_t ksigmask, sigsaved;
1616         struct compat_timespec ts;
1617         struct timespec end_time, *to = NULL;
1618         int ret;
1619
1620         if (tsp) {
1621                 if (copy_from_user(&ts, tsp, sizeof(ts)))
1622                         return -EFAULT;
1623
1624                 to = &end_time;
1625                 if (poll_select_set_timeout(to, ts.tv_sec, ts.tv_nsec))
1626                         return -EINVAL;
1627         }
1628
1629         if (sigmask) {
1630                 if (sigsetsize != sizeof(compat_sigset_t))
1631                         return -EINVAL;
1632                 if (copy_from_user(&ss32, sigmask, sizeof(ss32)))
1633                         return -EFAULT;
1634                 sigset_from_compat(&ksigmask, &ss32);
1635
1636                 sigdelsetmask(&ksigmask, sigmask(SIGKILL)|sigmask(SIGSTOP));
1637                 sigprocmask(SIG_SETMASK, &ksigmask, &sigsaved);
1638         }
1639
1640         ret = do_sys_poll(ufds, nfds, to);
1641
1642         /* We can restart this syscall, usually */
1643         if (ret == -EINTR) {
1644                 /*
1645                  * Don't restore the signal mask yet. Let do_signal() deliver
1646                  * the signal on the way back to userspace, before the signal
1647                  * mask is restored.
1648                  */
1649                 if (sigmask) {
1650                         memcpy(&current->saved_sigmask, &sigsaved,
1651                                 sizeof(sigsaved));
1652                         set_restore_sigmask();
1653                 }
1654                 ret = -ERESTARTNOHAND;
1655         } else if (sigmask)
1656                 sigprocmask(SIG_SETMASK, &sigsaved, NULL);
1657
1658         ret = poll_select_copy_remaining(&end_time, tsp, 0, ret);
1659
1660         return ret;
1661 }
1662
1663 #ifdef CONFIG_EPOLL
1664
1665 asmlinkage long compat_sys_epoll_pwait(int epfd,
1666                         struct compat_epoll_event __user *events,
1667                         int maxevents, int timeout,
1668                         const compat_sigset_t __user *sigmask,
1669                         compat_size_t sigsetsize)
1670 {
1671         long err;
1672         compat_sigset_t csigmask;
1673         sigset_t ksigmask, sigsaved;
1674
1675         /*
1676          * If the caller wants a certain signal mask to be set during the wait,
1677          * we apply it here.
1678          */
1679         if (sigmask) {
1680                 if (sigsetsize != sizeof(compat_sigset_t))
1681                         return -EINVAL;
1682                 if (copy_from_user(&csigmask, sigmask, sizeof(csigmask)))
1683                         return -EFAULT;
1684                 sigset_from_compat(&ksigmask, &csigmask);
1685                 sigdelsetmask(&ksigmask, sigmask(SIGKILL) | sigmask(SIGSTOP));
1686                 sigprocmask(SIG_SETMASK, &ksigmask, &sigsaved);
1687         }
1688
1689         err = sys_epoll_wait(epfd, events, maxevents, timeout);
1690
1691         /*
1692          * If we changed the signal mask, we need to restore the original one.
1693          * In case we've got a signal while waiting, we do not restore the
1694          * signal mask yet, and we allow do_signal() to deliver the signal on
1695          * the way back to userspace, before the signal mask is restored.
1696          */
1697         if (sigmask) {
1698                 if (err == -EINTR) {
1699                         memcpy(&current->saved_sigmask, &sigsaved,
1700                                sizeof(sigsaved));
1701                         set_restore_sigmask();
1702                 } else
1703                         sigprocmask(SIG_SETMASK, &sigsaved, NULL);
1704         }
1705
1706         return err;
1707 }
1708
1709 #endif /* CONFIG_EPOLL */
1710
1711 #ifdef CONFIG_SIGNALFD
1712
1713 asmlinkage long compat_sys_signalfd4(int ufd,
1714                                      const compat_sigset_t __user *sigmask,
1715                                      compat_size_t sigsetsize, int flags)
1716 {
1717         compat_sigset_t ss32;
1718         sigset_t tmp;
1719         sigset_t __user *ksigmask;
1720
1721         if (sigsetsize != sizeof(compat_sigset_t))
1722                 return -EINVAL;
1723         if (copy_from_user(&ss32, sigmask, sizeof(ss32)))
1724                 return -EFAULT;
1725         sigset_from_compat(&tmp, &ss32);
1726         ksigmask = compat_alloc_user_space(sizeof(sigset_t));
1727         if (copy_to_user(ksigmask, &tmp, sizeof(sigset_t)))
1728                 return -EFAULT;
1729
1730         return sys_signalfd4(ufd, ksigmask, sizeof(sigset_t), flags);
1731 }
1732
1733 asmlinkage long compat_sys_signalfd(int ufd,
1734                                     const compat_sigset_t __user *sigmask,
1735                                     compat_size_t sigsetsize)
1736 {
1737         return compat_sys_signalfd4(ufd, sigmask, sigsetsize, 0);
1738 }
1739 #endif /* CONFIG_SIGNALFD */
1740
1741 #ifdef CONFIG_TIMERFD
1742
1743 asmlinkage long compat_sys_timerfd_settime(int ufd, int flags,
1744                                    const struct compat_itimerspec __user *utmr,
1745                                    struct compat_itimerspec __user *otmr)
1746 {
1747         int error;
1748         struct itimerspec t;
1749         struct itimerspec __user *ut;
1750
1751         if (get_compat_itimerspec(&t, utmr))
1752                 return -EFAULT;
1753         ut = compat_alloc_user_space(2 * sizeof(struct itimerspec));
1754         if (copy_to_user(&ut[0], &t, sizeof(t)))
1755                 return -EFAULT;
1756         error = sys_timerfd_settime(ufd, flags, &ut[0], &ut[1]);
1757         if (!error && otmr)
1758                 error = (copy_from_user(&t, &ut[1], sizeof(struct itimerspec)) ||
1759                          put_compat_itimerspec(otmr, &t)) ? -EFAULT: 0;
1760
1761         return error;
1762 }
1763
1764 asmlinkage long compat_sys_timerfd_gettime(int ufd,
1765                                    struct compat_itimerspec __user *otmr)
1766 {
1767         int error;
1768         struct itimerspec t;
1769         struct itimerspec __user *ut;
1770
1771         ut = compat_alloc_user_space(sizeof(struct itimerspec));
1772         error = sys_timerfd_gettime(ufd, ut);
1773         if (!error)
1774                 error = (copy_from_user(&t, ut, sizeof(struct itimerspec)) ||
1775                          put_compat_itimerspec(otmr, &t)) ? -EFAULT: 0;
1776
1777         return error;
1778 }
1779
1780 #endif /* CONFIG_TIMERFD */
1781
1782 #ifdef CONFIG_FHANDLE
1783 /*
1784  * Exactly like fs/open.c:sys_open_by_handle_at(), except that it
1785  * doesn't set the O_LARGEFILE flag.
1786  */
1787 asmlinkage long
1788 compat_sys_open_by_handle_at(int mountdirfd,
1789                              struct file_handle __user *handle, int flags)
1790 {
1791         return do_handle_open(mountdirfd, handle, flags);
1792 }
1793 #endif
1794
1795 #ifdef __ARCH_WANT_COMPAT_SYS_SENDFILE
1796 asmlinkage long compat_sys_sendfile(int out_fd, int in_fd,
1797                                     compat_off_t __user *offset, compat_size_t count)
1798 {
1799         loff_t pos;
1800         off_t off;
1801         ssize_t ret;
1802
1803         if (offset) {
1804                 if (unlikely(get_user(off, offset)))
1805                         return -EFAULT;
1806                 pos = off;
1807                 ret = do_sendfile(out_fd, in_fd, &pos, count, MAX_NON_LFS);
1808                 if (unlikely(put_user(pos, offset)))
1809                         return -EFAULT;
1810                 return ret;
1811         }
1812
1813         return do_sendfile(out_fd, in_fd, NULL, count, 0);
1814 }
1815 #endif /* __ARCH_WANT_COMPAT_SYS_SENDFILE */