fs/read_write.c

   1 /*
   2  *  linux/fs/read_write.c
   3  *
   4  *  Copyright (C) 1991, 1992  Linus Torvalds
   5  */
   6
   7 #include <linux/slab.h>
   8 #include <linux/stat.h>
   9 #include <linux/fcntl.h>
  10 #include <linux/file.h>
  11 #include <linux/uio.h>
  12 #include <linux/fsnotify.h>
  13 #include <linux/security.h>
  14 #include <linux/module.h>
  15 #include <linux/syscalls.h>
  16 #include <linux/pagemap.h>
  17 #include <linux/splice.h>
  18 #include "read_write.h"
  19
  20 #include <asm/uaccess.h>
  21 #include <asm/unistd.h>
  22
  23 const struct file_operations generic_ro_fops = {
  24         .llseek         = generic_file_llseek,
  25         .read           = do_sync_read,
  26         .aio_read       = generic_file_aio_read,
  27         .mmap           = generic_file_readonly_mmap,
  28         .splice_read    = generic_file_splice_read,
  29 };
  30
  31 EXPORT_SYMBOL(generic_ro_fops);
  32
  33 static inline int unsigned_offsets(struct file *file)
  34 {
  35         return file->f_mode & FMODE_UNSIGNED_OFFSET;
  36 }
  37
  38 /**
  39  * generic_file_llseek_unlocked - lockless generic llseek implementation
  40  * @file:       file structure to seek on
  41  * @offset:     file offset to seek to
  42  * @origin:     type of seek
  43  *
  44  * Updates the file offset to the value specified by @offset and @origin.
  45  * Locking must be provided by the caller.
  46  */
  47 loff_t
  48 generic_file_llseek_unlocked(struct file *file, loff_t offset, int origin)
  49 {
  50         struct inode *inode = file->f_mapping->host;
  51
  52         switch (origin) {
  53         case SEEK_END:
  54                 offset += inode->i_size;
  55                 break;
  56         case SEEK_CUR:
  57                 /*
  58                  * Here we special-case the lseek(fd, 0, SEEK_CUR)
  59                  * position-querying operation.  Avoid rewriting the "same"
  60                  * f_pos value back to the file because a concurrent read(),
  61                  * write() or lseek() might have altered it
  62                  */
  63                 if (offset == 0)
  64                         return file->f_pos;
  65                 offset += file->f_pos;
  66                 break;
  67         case SEEK_DATA:
  68                 /*
  69                  * In the generic case the entire file is data, so as long as
  70                  * offset isn't at the end of the file then the offset is data.
  71                  */
  72                 if (offset >= inode->i_size)
  73                         return -ENXIO;
  74                 break;
  75         case SEEK_HOLE:
  76                 /*
  77                  * There is a virtual hole at the end of the file, so as long as
  78                  * offset isn't i_size or larger, return i_size.
  79                  */
  80                 if (offset >= inode->i_size)
  81                         return -ENXIO;
  82                 offset = inode->i_size;
  83                 break;
  84         }
  85
  86         if (offset < 0 && !unsigned_offsets(file))
  87                 return -EINVAL;
  88         if (offset > inode->i_sb->s_maxbytes)
  89                 return -EINVAL;
  90
  91         /* Special lock needed here? */
  92         if (offset != file->f_pos) {
  93                 file->f_pos = offset;
  94                 file->f_version = 0;
  95         }
  96
  97         return offset;
  98 }
  99 EXPORT_SYMBOL(generic_file_llseek_unlocked);
 100
 101 /**
 102  * generic_file_llseek - generic llseek implementation for regular files
 103  * @file:       file structure to seek on
 104  * @offset:     file offset to seek to
 105  * @origin:     type of seek
 106  *
 107  * This is a generic implemenation of ->llseek useable for all normal local
 108  * filesystems.  It just updates the file offset to the value specified by
 109  * @offset and @origin under i_mutex.
 110  */
 111 loff_t generic_file_llseek(struct file *file, loff_t offset, int origin)
 112 {
 113         loff_t rval;
 114
 115         mutex_lock(&file->f_dentry->d_inode->i_mutex);
 116         rval = generic_file_llseek_unlocked(file, offset, origin);
 117         mutex_unlock(&file->f_dentry->d_inode->i_mutex);
 118
 119         return rval;
 120 }
 121 EXPORT_SYMBOL(generic_file_llseek);
 122
 123 /**
 124  * noop_llseek - No Operation Performed llseek implementation
 125  * @file:       file structure to seek on
 126  * @offset:     file offset to seek to
 127  * @origin:     type of seek
 128  *
 129  * This is an implementation of ->llseek useable for the rare special case when
 130  * userspace expects the seek to succeed but the (device) file is actually not
 131  * able to perform the seek. In this case you use noop_llseek() instead of
 132  * falling back to the default implementation of ->llseek.
 133  */
 134 loff_t noop_llseek(struct file *file, loff_t offset, int origin)
 135 {
 136         return file->f_pos;
 137 }
 138 EXPORT_SYMBOL(noop_llseek);
 139
 140 loff_t no_llseek(struct file *file, loff_t offset, int origin)
 141 {
 142         return -ESPIPE;
 143 }
 144 EXPORT_SYMBOL(no_llseek);
 145
 146 loff_t default_llseek(struct file *file, loff_t offset, int origin)
 147 {
 148         struct inode *inode = file->f_path.dentry->d_inode;
 149         loff_t retval;
 150
 151         mutex_lock(&inode->i_mutex);
 152         switch (origin) {
 153                 case SEEK_END:
 154                         offset += i_size_read(inode);
 155                         break;
 156                 case SEEK_CUR:
 157                         if (offset == 0) {
 158                                 retval = file->f_pos;
 159                                 goto out;
 160                         }
 161                         offset += file->f_pos;
 162                         break;
 163                 case SEEK_DATA:
 164                         /*
 165                          * In the generic case the entire file is data, so as
 166                          * long as offset isn't at the end of the file then the
 167                          * offset is data.
 168                          */
 169                         if (offset >= inode->i_size) {
 170                                 retval = -ENXIO;
 171                                 goto out;
 172                         }
 173                         break;
 174                 case SEEK_HOLE:
 175                         /*
 176                          * There is a virtual hole at the end of the file, so
 177                          * as long as offset isn't i_size or larger, return
 178                          * i_size.
 179                          */
 180                         if (offset >= inode->i_size) {
 181                                 retval = -ENXIO;
 182                                 goto out;
 183                         }
 184                         offset = inode->i_size;
 185                         break;
 186         }
 187         retval = -EINVAL;
 188         if (offset >= 0 || unsigned_offsets(file)) {
 189                 if (offset != file->f_pos) {
 190                         file->f_pos = offset;
 191                         file->f_version = 0;
 192                 }
 193                 retval = offset;
 194         }
 195 out:
 196         mutex_unlock(&inode->i_mutex);
 197         return retval;
 198 }
 199 EXPORT_SYMBOL(default_llseek);
 200
 201 loff_t vfs_llseek(struct file *file, loff_t offset, int origin)
 202 {
 203         loff_t (*fn)(struct file *, loff_t, int);
 204
 205         fn = no_llseek;
 206         if (file->f_mode & FMODE_LSEEK) {
 207                 if (file->f_op && file->f_op->llseek)
 208                         fn = file->f_op->llseek;
 209         }
 210         return fn(file, offset, origin);
 211 }
 212 EXPORT_SYMBOL(vfs_llseek);
 213
 214 SYSCALL_DEFINE3(lseek, unsigned int, fd, off_t, offset, unsigned int, origin)
 215 {
 216         off_t retval;
 217         struct file * file;
 218         int fput_needed;
 219
 220         retval = -EBADF;
 221         file = fget_light(fd, &fput_needed);
 222         if (!file)
 223                 goto bad;
 224
 225         retval = -EINVAL;
 226         if (origin <= SEEK_MAX) {
 227                 loff_t res = vfs_llseek(file, offset, origin);
 228                 retval = res;
 229                 if (res != (loff_t)retval)
 230                         retval = -EOVERFLOW;    /* LFS: should only happen on 32 bit platforms */
 231         }
 232         fput_light(file, fput_needed);
 233 bad:
 234         return retval;
 235 }
 236
 237 #ifdef __ARCH_WANT_SYS_LLSEEK
 238 SYSCALL_DEFINE5(llseek, unsigned int, fd, unsigned long, offset_high,
 239                 unsigned long, offset_low, loff_t __user *, result,
 240                 unsigned int, origin)
 241 {
 242         int retval;
 243         struct file * file;
 244         loff_t offset;
 245         int fput_needed;
 246
 247         retval = -EBADF;
 248         file = fget_light(fd, &fput_needed);
 249         if (!file)
 250                 goto bad;
 251
 252         retval = -EINVAL;
 253         if (origin > SEEK_MAX)
 254                 goto out_putf;
 255
 256         offset = vfs_llseek(file, ((loff_t) offset_high << 32) | offset_low,
 257                         origin);
 258
 259         retval = (int)offset;
 260         if (offset >= 0) {
 261                 retval = -EFAULT;
 262                 if (!copy_to_user(result, &offset, sizeof(offset)))
 263                         retval = 0;
 264         }
 265 out_putf:
 266         fput_light(file, fput_needed);
 267 bad:
 268         return retval;
 269 }
 270 #endif
 271
 272
 273 /*
 274  * rw_verify_area doesn't like huge counts. We limit
 275  * them to something that fits in "int" so that others
 276  * won't have to do range checks all the time.
 277  */
 278 int rw_verify_area(int read_write, struct file *file, loff_t *ppos, size_t count)
 279 {
 280         struct inode *inode;
 281         loff_t pos;
 282         int retval = -EINVAL;
 283
 284         inode = file->f_path.dentry->d_inode;
 285         if (unlikely((ssize_t) count < 0))
 286                 return retval;
 287         pos = *ppos;
 288         if (unlikely(pos < 0)) {
 289                 if (!unsigned_offsets(file))
 290                         return retval;
 291                 if (count >= -pos) /* both values are in 0..LLONG_MAX */
 292                         return -EOVERFLOW;
 293         } else if (unlikely((loff_t) (pos + count) < 0)) {
 294                 if (!unsigned_offsets(file))
 295                         return retval;
 296         }
 297
 298         if (unlikely(inode->i_flock && mandatory_lock(inode))) {
 299                 retval = locks_mandatory_area(
 300                         read_write == READ ? FLOCK_VERIFY_READ : FLOCK_VERIFY_WRITE,
 301                         inode, file, pos, count);
 302                 if (retval < 0)
 303                         return retval;
 304         }
 305         retval = security_file_permission(file,
 306                                 read_write == READ ? MAY_READ : MAY_WRITE);
 307         if (retval)
 308                 return retval;
 309         return count > MAX_RW_COUNT ? MAX_RW_COUNT : count;
 310 }
 311
 312 static void wait_on_retry_sync_kiocb(struct kiocb *iocb)
 313 {
 314         set_current_state(TASK_UNINTERRUPTIBLE);
 315         if (!kiocbIsKicked(iocb))
 316                 schedule();
 317         else
 318                 kiocbClearKicked(iocb);
 319         __set_current_state(TASK_RUNNING);
 320 }
 321
 322 ssize_t do_sync_read(struct file *filp, char __user *buf, size_t len, loff_t *ppos)
 323 {
 324         struct iovec iov = { .iov_base = buf, .iov_len = len };
 325         struct kiocb kiocb;
 326         ssize_t ret;
 327
 328         init_sync_kiocb(&kiocb, filp);
 329         kiocb.ki_pos = *ppos;
 330         kiocb.ki_left = len;
 331         kiocb.ki_nbytes = len;
 332
 333         for (;;) {
 334                 ret = filp->f_op->aio_read(&kiocb, &iov, 1, kiocb.ki_pos);
 335                 if (ret != -EIOCBRETRY)
 336                         break;
 337                 wait_on_retry_sync_kiocb(&kiocb);
 338         }
 339
 340         if (-EIOCBQUEUED == ret)
 341                 ret = wait_on_sync_kiocb(&kiocb);
 342         *ppos = kiocb.ki_pos;
 343         return ret;
 344 }
 345
 346 EXPORT_SYMBOL(do_sync_read);
 347
 348 ssize_t vfs_read(struct file *file, char __user *buf, size_t count, loff_t *pos)
 349 {
 350         ssize_t ret;
 351
 352         if (!(file->f_mode & FMODE_READ))
 353                 return -EBADF;
 354         if (!file->f_op || (!file->f_op->read && !file->f_op->aio_read))
 355                 return -EINVAL;
 356         if (unlikely(!access_ok(VERIFY_WRITE, buf, count)))
 357                 return -EFAULT;
 358
 359         ret = rw_verify_area(READ, file, pos, count);
 360         if (ret >= 0) {
 361                 count = ret;
 362                 if (file->f_op->read)
 363                         ret = file->f_op->read(file, buf, count, pos);
 364                 else
 365                         ret = do_sync_read(file, buf, count, pos);
 366                 if (ret > 0) {
 367                         fsnotify_access(file);
 368                         add_rchar(current, ret);
 369                 }
 370                 inc_syscr(current);
 371         }
 372
 373         return ret;
 374 }
 375
 376 EXPORT_SYMBOL(vfs_read);
 377
 378 ssize_t do_sync_write(struct file *filp, const char __user *buf, size_t len, loff_t *ppos)
 379 {
 380         struct iovec iov = { .iov_base = (void __user *)buf, .iov_len = len };
 381         struct kiocb kiocb;
 382         ssize_t ret;
 383
 384         init_sync_kiocb(&kiocb, filp);
 385         kiocb.ki_pos = *ppos;
 386         kiocb.ki_left = len;
 387         kiocb.ki_nbytes = len;
 388
 389         for (;;) {
 390                 ret = filp->f_op->aio_write(&kiocb, &iov, 1, kiocb.ki_pos);
 391                 if (ret != -EIOCBRETRY)
 392                         break;
 393                 wait_on_retry_sync_kiocb(&kiocb);
 394         }
 395
 396         if (-EIOCBQUEUED == ret)
 397                 ret = wait_on_sync_kiocb(&kiocb);
 398         *ppos = kiocb.ki_pos;
 399         return ret;
 400 }
 401
 402 EXPORT_SYMBOL(do_sync_write);
 403
 404 ssize_t vfs_write(struct file *file, const char __user *buf, size_t count, loff_t *pos)
 405 {
 406         ssize_t ret;
 407
 408         if (!(file->f_mode & FMODE_WRITE))
 409                 return -EBADF;
 410         if (!file->f_op || (!file->f_op->write && !file->f_op->aio_write))
 411                 return -EINVAL;
 412         if (unlikely(!access_ok(VERIFY_READ, buf, count)))
 413                 return -EFAULT;
 414
 415         ret = rw_verify_area(WRITE, file, pos, count);
 416         if (ret >= 0) {
 417                 count = ret;
 418                 if (file->f_op->write)
 419                         ret = file->f_op->write(file, buf, count, pos);
 420                 else
 421                         ret = do_sync_write(file, buf, count, pos);
 422                 if (ret > 0) {
 423                         fsnotify_modify(file);
 424                         add_wchar(current, ret);
 425                 }
 426                 inc_syscw(current);
 427         }
 428
 429         return ret;
 430 }
 431
 432 EXPORT_SYMBOL(vfs_write);
 433
 434 static inline loff_t file_pos_read(struct file *file)
 435 {
 436         return file->f_pos;
 437 }
 438
 439 static inline void file_pos_write(struct file *file, loff_t pos)
 440 {
 441         file->f_pos = pos;
 442 }
 443
 444 SYSCALL_DEFINE3(read, unsigned int, fd, char __user *, buf, size_t, count)
 445 {
 446         struct file *file;
 447         ssize_t ret = -EBADF;
 448         int fput_needed;
 449
 450         file = fget_light(fd, &fput_needed);
 451         if (file) {
 452                 loff_t pos = file_pos_read(file);
 453                 ret = vfs_read(file, buf, count, &pos);
 454                 file_pos_write(file, pos);
 455                 fput_light(file, fput_needed);
 456         }
 457
 458         return ret;
 459 }
 460
 461 SYSCALL_DEFINE3(write, unsigned int, fd, const char __user *, buf,
 462                 size_t, count)
 463 {
 464         struct file *file;
 465         ssize_t ret = -EBADF;
 466         int fput_needed;
 467
 468         file = fget_light(fd, &fput_needed);
 469         if (file) {
 470                 loff_t pos = file_pos_read(file);
 471                 ret = vfs_write(file, buf, count, &pos);
 472                 file_pos_write(file, pos);
 473                 fput_light(file, fput_needed);
 474         }
 475
 476         return ret;
 477 }
 478
 479 SYSCALL_DEFINE(pread64)(unsigned int fd, char __user *buf,
 480                         size_t count, loff_t pos)
 481 {
 482         struct file *file;
 483         ssize_t ret = -EBADF;
 484         int fput_needed;
 485
 486         if (pos < 0)
 487                 return -EINVAL;
 488
 489         file = fget_light(fd, &fput_needed);
 490         if (file) {
 491                 ret = -ESPIPE;
 492                 if (file->f_mode & FMODE_PREAD)
 493                         ret = vfs_read(file, buf, count, &pos);
 494                 fput_light(file, fput_needed);
 495         }
 496
 497         return ret;
 498 }
 499 #ifdef CONFIG_HAVE_SYSCALL_WRAPPERS
 500 asmlinkage long SyS_pread64(long fd, long buf, long count, loff_t pos)
 501 {
 502         return SYSC_pread64((unsigned int) fd, (char __user *) buf,
 503                             (size_t) count, pos);
 504 }
 505 SYSCALL_ALIAS(sys_pread64, SyS_pread64);
 506 #endif
 507
 508 SYSCALL_DEFINE(pwrite64)(unsigned int fd, const char __user *buf,
 509                          size_t count, loff_t pos)
 510 {
 511         struct file *file;
 512         ssize_t ret = -EBADF;
 513         int fput_needed;
 514
 515         if (pos < 0)
 516                 return -EINVAL;
 517
 518         file = fget_light(fd, &fput_needed);
 519         if (file) {
 520                 ret = -ESPIPE;
 521                 if (file->f_mode & FMODE_PWRITE)
 522                         ret = vfs_write(file, buf, count, &pos);
 523                 fput_light(file, fput_needed);
 524         }
 525
 526         return ret;
 527 }
 528 #ifdef CONFIG_HAVE_SYSCALL_WRAPPERS
 529 asmlinkage long SyS_pwrite64(long fd, long buf, long count, loff_t pos)
 530 {
 531         return SYSC_pwrite64((unsigned int) fd, (const char __user *) buf,
 532                              (size_t) count, pos);
 533 }
 534 SYSCALL_ALIAS(sys_pwrite64, SyS_pwrite64);
 535 #endif
 536
 537 /*
 538  * Reduce an iovec's length in-place.  Return the resulting number of segments
 539  */
 540 unsigned long iov_shorten(struct iovec *iov, unsigned long nr_segs, size_t to)
 541 {
 542         unsigned long seg = 0;
 543         size_t len = 0;
 544
 545         while (seg < nr_segs) {
 546                 seg++;
 547                 if (len + iov->iov_len >= to) {
 548                         iov->iov_len = to - len;
 549                         break;
 550                 }
 551                 len += iov->iov_len;
 552                 iov++;
 553         }
 554         return seg;
 555 }
 556 EXPORT_SYMBOL(iov_shorten);
 557
 558 ssize_t do_sync_readv_writev(struct file *filp, const struct iovec *iov,
 559                 unsigned long nr_segs, size_t len, loff_t *ppos, iov_fn_t fn)
 560 {
 561         struct kiocb kiocb;
 562         ssize_t ret;
 563
 564         init_sync_kiocb(&kiocb, filp);
 565         kiocb.ki_pos = *ppos;
 566         kiocb.ki_left = len;
 567         kiocb.ki_nbytes = len;
 568
 569         for (;;) {
 570                 ret = fn(&kiocb, iov, nr_segs, kiocb.ki_pos);
 571                 if (ret != -EIOCBRETRY)
 572                         break;
 573                 wait_on_retry_sync_kiocb(&kiocb);
 574         }
 575
 576         if (ret == -EIOCBQUEUED)
 577                 ret = wait_on_sync_kiocb(&kiocb);
 578         *ppos = kiocb.ki_pos;
 579         return ret;
 580 }
 581
 582 /* Do it by hand, with file-ops */
 583 ssize_t do_loop_readv_writev(struct file *filp, struct iovec *iov,
 584                 unsigned long nr_segs, loff_t *ppos, io_fn_t fn)
 585 {
 586         struct iovec *vector = iov;
 587         ssize_t ret = 0;
 588
 589         while (nr_segs > 0) {
 590                 void __user *base;
 591                 size_t len;
 592                 ssize_t nr;
 593
 594                 base = vector->iov_base;
 595                 len = vector->iov_len;
 596                 vector++;
 597                 nr_segs--;
 598
 599                 nr = fn(filp, base, len, ppos);
 600
 601                 if (nr < 0) {
 602                         if (!ret)
 603                                 ret = nr;
 604                         break;
 605                 }
 606                 ret += nr;
 607                 if (nr != len)
 608                         break;
 609         }
 610
 611         return ret;
 612 }
 613
 614 /* A write operation does a read from user space and vice versa */
 615 #define vrfy_dir(type) ((type) == READ ? VERIFY_WRITE : VERIFY_READ)
 616
 617 ssize_t rw_copy_check_uvector(int type, const struct iovec __user * uvector,
 618                               unsigned long nr_segs, unsigned long fast_segs,
 619                               struct iovec *fast_pointer,
 620                               struct iovec **ret_pointer)
 621 {
 622         unsigned long seg;
 623         ssize_t ret;
 624         struct iovec *iov = fast_pointer;
 625
 626         /*
 627          * SuS says "The readv() function *may* fail if the iovcnt argument
 628          * was less than or equal to 0, or greater than {IOV_MAX}.  Linux has
 629          * traditionally returned zero for zero segments, so...
 630          */
 631         if (nr_segs == 0) {
 632                 ret = 0;
 633                 goto out;
 634         }
 635
 636         /*
 637          * First get the "struct iovec" from user memory and
 638          * verify all the pointers
 639          */
 640         if (nr_segs > UIO_MAXIOV) {
 641                 ret = -EINVAL;
 642                 goto out;
 643         }
 644         if (nr_segs > fast_segs) {
 645                 iov = kmalloc(nr_segs*sizeof(struct iovec), GFP_KERNEL);
 646                 if (iov == NULL) {
 647                         ret = -ENOMEM;
 648                         goto out;
 649                 }
 650         }
 651         if (copy_from_user(iov, uvector, nr_segs*sizeof(*uvector))) {
 652                 ret = -EFAULT;
 653                 goto out;
 654         }
 655
 656         /*
 657          * According to the Single Unix Specification we should return EINVAL
 658          * if an element length is < 0 when cast to ssize_t or if the
 659          * total length would overflow the ssize_t return value of the
 660          * system call.
 661          *
 662          * Linux caps all read/write calls to MAX_RW_COUNT, and avoids the
 663          * overflow case.
 664          */
 665         ret = 0;
 666         for (seg = 0; seg < nr_segs; seg++) {
 667                 void __user *buf = iov[seg].iov_base;
 668                 ssize_t len = (ssize_t)iov[seg].iov_len;
 669
 670                 /* see if we we're about to use an invalid len or if
 671                  * it's about to overflow ssize_t */
 672                 if (len < 0) {
 673                         ret = -EINVAL;
 674                         goto out;
 675                 }
 676                 if (unlikely(!access_ok(vrfy_dir(type), buf, len))) {
 677                         ret = -EFAULT;
 678                         goto out;
 679                 }
 680                 if (len > MAX_RW_COUNT - ret) {
 681                         len = MAX_RW_COUNT - ret;
 682                         iov[seg].iov_len = len;
 683                 }
 684                 ret += len;
 685         }
 686 out:
 687         *ret_pointer = iov;
 688         return ret;
 689 }
 690
 691 static ssize_t do_readv_writev(int type, struct file *file,
 692                                const struct iovec __user * uvector,
 693                                unsigned long nr_segs, loff_t *pos)
 694 {
 695         size_t tot_len;
 696         struct iovec iovstack[UIO_FASTIOV];
 697         struct iovec *iov = iovstack;
 698         ssize_t ret;
 699         io_fn_t fn;
 700         iov_fn_t fnv;
 701
 702         if (!file->f_op) {
 703                 ret = -EINVAL;
 704                 goto out;
 705         }
 706
 707         ret = rw_copy_check_uvector(type, uvector, nr_segs,
 708                         ARRAY_SIZE(iovstack), iovstack, &iov);
 709         if (ret <= 0)
 710                 goto out;
 711
 712         tot_len = ret;
 713         ret = rw_verify_area(type, file, pos, tot_len);
 714         if (ret < 0)
 715                 goto out;
 716
 717         fnv = NULL;
 718         if (type == READ) {
 719                 fn = file->f_op->read;
 720                 fnv = file->f_op->aio_read;
 721         } else {
 722                 fn = (io_fn_t)file->f_op->write;
 723                 fnv = file->f_op->aio_write;
 724         }
 725
 726         if (fnv)
 727                 ret = do_sync_readv_writev(file, iov, nr_segs, tot_len,
 728                                                 pos, fnv);
 729         else
 730                 ret = do_loop_readv_writev(file, iov, nr_segs, pos, fn);
 731
 732 out:
 733         if (iov != iovstack)
 734                 kfree(iov);
 735         if ((ret + (type == READ)) > 0) {
 736                 if (type == READ)
 737                         fsnotify_access(file);
 738                 else
 739                         fsnotify_modify(file);
 740         }
 741         return ret;
 742 }
 743
 744 ssize_t vfs_readv(struct file *file, const struct iovec __user *vec,
 745                   unsigned long vlen, loff_t *pos)
 746 {
 747         if (!(file->f_mode & FMODE_READ))
 748                 return -EBADF;
 749         if (!file->f_op || (!file->f_op->aio_read && !file->f_op->read))
 750                 return -EINVAL;
 751
 752         return do_readv_writev(READ, file, vec, vlen, pos);
 753 }
 754
 755 EXPORT_SYMBOL(vfs_readv);
 756
 757 ssize_t vfs_writev(struct file *file, const struct iovec __user *vec,
 758                    unsigned long vlen, loff_t *pos)
 759 {
 760         if (!(file->f_mode & FMODE_WRITE))
 761                 return -EBADF;
 762         if (!file->f_op || (!file->f_op->aio_write && !file->f_op->write))
 763                 return -EINVAL;
 764
 765         return do_readv_writev(WRITE, file, vec, vlen, pos);
 766 }
 767
 768 EXPORT_SYMBOL(vfs_writev);
 769
 770 SYSCALL_DEFINE3(readv, unsigned long, fd, const struct iovec __user *, vec,
 771                 unsigned long, vlen)
 772 {
 773         struct file *file;
 774         ssize_t ret = -EBADF;
 775         int fput_needed;
 776
 777         file = fget_light(fd, &fput_needed);
 778         if (file) {
 779                 loff_t pos = file_pos_read(file);
 780                 ret = vfs_readv(file, vec, vlen, &pos);
 781                 file_pos_write(file, pos);
 782                 fput_light(file, fput_needed);
 783         }
 784
 785         if (ret > 0)
 786                 add_rchar(current, ret);
 787         inc_syscr(current);
 788         return ret;
 789 }
 790
 791 SYSCALL_DEFINE3(writev, unsigned long, fd, const struct iovec __user *, vec,
 792                 unsigned long, vlen)
 793 {
 794         struct file *file;
 795         ssize_t ret = -EBADF;
 796         int fput_needed;
 797
 798         file = fget_light(fd, &fput_needed);
 799         if (file) {
 800                 loff_t pos = file_pos_read(file);
 801                 ret = vfs_writev(file, vec, vlen, &pos);
 802                 file_pos_write(file, pos);
 803                 fput_light(file, fput_needed);
 804         }
 805
 806         if (ret > 0)
 807                 add_wchar(current, ret);
 808         inc_syscw(current);
 809         return ret;
 810 }
 811
 812 static inline loff_t pos_from_hilo(unsigned long high, unsigned long low)
 813 {
 814 #define HALF_LONG_BITS (BITS_PER_LONG / 2)
 815         return (((loff_t)high << HALF_LONG_BITS) << HALF_LONG_BITS) | low;
 816 }
 817
 818 SYSCALL_DEFINE5(preadv, unsigned long, fd, const struct iovec __user *, vec,
 819                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h)
 820 {
 821         loff_t pos = pos_from_hilo(pos_h, pos_l);
 822         struct file *file;
 823         ssize_t ret = -EBADF;
 824         int fput_needed;
 825
 826         if (pos < 0)
 827                 return -EINVAL;
 828
 829         file = fget_light(fd, &fput_needed);
 830         if (file) {
 831                 ret = -ESPIPE;
 832                 if (file->f_mode & FMODE_PREAD)
 833                         ret = vfs_readv(file, vec, vlen, &pos);
 834                 fput_light(file, fput_needed);
 835         }
 836
 837         if (ret > 0)
 838                 add_rchar(current, ret);
 839         inc_syscr(current);
 840         return ret;
 841 }
 842
 843 SYSCALL_DEFINE5(pwritev, unsigned long, fd, const struct iovec __user *, vec,
 844                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h)
 845 {
 846         loff_t pos = pos_from_hilo(pos_h, pos_l);
 847         struct file *file;
 848         ssize_t ret = -EBADF;
 849         int fput_needed;
 850
 851         if (pos < 0)
 852                 return -EINVAL;
 853
 854         file = fget_light(fd, &fput_needed);
 855         if (file) {
 856                 ret = -ESPIPE;
 857                 if (file->f_mode & FMODE_PWRITE)
 858                         ret = vfs_writev(file, vec, vlen, &pos);
 859                 fput_light(file, fput_needed);
 860         }
 861
 862         if (ret > 0)
 863                 add_wchar(current, ret);
 864         inc_syscw(current);
 865         return ret;
 866 }
 867
 868 static ssize_t do_sendfile(int out_fd, int in_fd, loff_t *ppos,
 869                            size_t count, loff_t max)
 870 {
 871         struct file * in_file, * out_file;
 872         struct inode * in_inode, * out_inode;
 873         loff_t pos;
 874         ssize_t retval;
 875         int fput_needed_in, fput_needed_out, fl;
 876
 877         /*
 878          * Get input file, and verify that it is ok..
 879          */
 880         retval = -EBADF;
 881         in_file = fget_light(in_fd, &fput_needed_in);
 882         if (!in_file)
 883                 goto out;
 884         if (!(in_file->f_mode & FMODE_READ))
 885                 goto fput_in;
 886         retval = -ESPIPE;
 887         if (!ppos)
 888                 ppos = &in_file->f_pos;
 889         else
 890                 if (!(in_file->f_mode & FMODE_PREAD))
 891                         goto fput_in;
 892         retval = rw_verify_area(READ, in_file, ppos, count);
 893         if (retval < 0)
 894                 goto fput_in;
 895         count = retval;
 896
 897         /*
 898          * Get output file, and verify that it is ok..
 899          */
 900         retval = -EBADF;
 901         out_file = fget_light(out_fd, &fput_needed_out);
 902         if (!out_file)
 903                 goto fput_in;
 904         if (!(out_file->f_mode & FMODE_WRITE))
 905                 goto fput_out;
 906         retval = -EINVAL;
 907         in_inode = in_file->f_path.dentry->d_inode;
 908         out_inode = out_file->f_path.dentry->d_inode;
 909         retval = rw_verify_area(WRITE, out_file, &out_file->f_pos, count);
 910         if (retval < 0)
 911                 goto fput_out;
 912         count = retval;
 913
 914         if (!max)
 915                 max = min(in_inode->i_sb->s_maxbytes, out_inode->i_sb->s_maxbytes);
 916
 917         pos = *ppos;
 918         if (unlikely(pos + count > max)) {
 919                 retval = -EOVERFLOW;
 920                 if (pos >= max)
 921                         goto fput_out;
 922                 count = max - pos;
 923         }
 924
 925         fl = 0;
 926 #if 0
 927         /*
 928          * We need to debate whether we can enable this or not. The
 929          * man page documents EAGAIN return for the output at least,
 930          * and the application is arguably buggy if it doesn't expect
 931          * EAGAIN on a non-blocking file descriptor.
 932          */
 933         if (in_file->f_flags & O_NONBLOCK)
 934                 fl = SPLICE_F_NONBLOCK;
 935 #endif
 936         retval = do_splice_direct(in_file, ppos, out_file, count, fl);
 937
 938         if (retval > 0) {
 939                 add_rchar(current, retval);
 940                 add_wchar(current, retval);
 941         }
 942
 943         inc_syscr(current);
 944         inc_syscw(current);
 945         if (*ppos > max)
 946                 retval = -EOVERFLOW;
 947
 948 fput_out:
 949         fput_light(out_file, fput_needed_out);
 950 fput_in:
 951         fput_light(in_file, fput_needed_in);
 952 out:
 953         return retval;
 954 }
 955
 956 SYSCALL_DEFINE4(sendfile, int, out_fd, int, in_fd, off_t __user *, offset, size_t, count)
 957 {
 958         loff_t pos;
 959         off_t off;
 960         ssize_t ret;
 961
 962         if (offset) {
 963                 if (unlikely(get_user(off, offset)))
 964                         return -EFAULT;
 965                 pos = off;
 966                 ret = do_sendfile(out_fd, in_fd, &pos, count, MAX_NON_LFS);
 967                 if (unlikely(put_user(pos, offset)))
 968                         return -EFAULT;
 969                 return ret;
 970         }
 971
 972         return do_sendfile(out_fd, in_fd, NULL, count, 0);
 973 }
 974
 975 SYSCALL_DEFINE4(sendfile64, int, out_fd, int, in_fd, loff_t __user *, offset, size_t, count)
 976 {
 977         loff_t pos;
 978         ssize_t ret;
 979
 980         if (offset) {
 981                 if (unlikely(copy_from_user(&pos, offset, sizeof(loff_t))))
 982                         return -EFAULT;
 983                 ret = do_sendfile(out_fd, in_fd, &pos, count, 0);
 984                 if (unlikely(put_user(pos, offset)))
 985                         return -EFAULT;
 986                 return ret;
 987         }
 988
 989         return do_sendfile(out_fd, in_fd, NULL, count, 0);
 990 }