fs/read_write.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  *  linux/fs/read_write.c
   4  *
   5  *  Copyright (C) 1991, 1992  Linus Torvalds
   6  */
   7
   8 #include <linux/slab.h>
   9 #include <linux/stat.h>
  10 #include <linux/sched/xacct.h>
  11 #include <linux/fcntl.h>
  12 #include <linux/file.h>
  13 #include <linux/uio.h>
  14 #include <linux/fsnotify.h>
  15 #include <linux/security.h>
  16 #include <linux/export.h>
  17 #include <linux/syscalls.h>
  18 #include <linux/pagemap.h>
  19 #include <linux/splice.h>
  20 #include <linux/compat.h>
  21 #include <linux/mount.h>
  22 #include <linux/fs.h>
  23 #include "internal.h"
  24
  25 #include <linux/uaccess.h>
  26 #include <asm/unistd.h>
  27
  28 const struct file_operations generic_ro_fops = {
  29         .llseek         = generic_file_llseek,
  30         .read_iter      = generic_file_read_iter,
  31         .mmap           = generic_file_readonly_mmap,
  32         .splice_read    = generic_file_splice_read,
  33 };
  34
  35 EXPORT_SYMBOL(generic_ro_fops);
  36
  37 static inline bool unsigned_offsets(struct file *file)
  38 {
  39         return file->f_mode & FMODE_UNSIGNED_OFFSET;
  40 }
  41
  42 /**
  43  * vfs_setpos - update the file offset for lseek
  44  * @file:       file structure in question
  45  * @offset:     file offset to seek to
  46  * @maxsize:    maximum file size
  47  *
  48  * This is a low-level filesystem helper for updating the file offset to
  49  * the value specified by @offset if the given offset is valid and it is
  50  * not equal to the current file offset.
  51  *
  52  * Return the specified offset on success and -EINVAL on invalid offset.
  53  */
  54 loff_t vfs_setpos(struct file *file, loff_t offset, loff_t maxsize)
  55 {
  56         if (offset < 0 && !unsigned_offsets(file))
  57                 return -EINVAL;
  58         if (offset > maxsize)
  59                 return -EINVAL;
  60
  61         if (offset != file->f_pos) {
  62                 file->f_pos = offset;
  63                 file->f_version = 0;
  64         }
  65         return offset;
  66 }
  67 EXPORT_SYMBOL(vfs_setpos);
  68
  69 /**
  70  * generic_file_llseek_size - generic llseek implementation for regular files
  71  * @file:       file structure to seek on
  72  * @offset:     file offset to seek to
  73  * @whence:     type of seek
  74  * @size:       max size of this file in file system
  75  * @eof:        offset used for SEEK_END position
  76  *
  77  * This is a variant of generic_file_llseek that allows passing in a custom
  78  * maximum file size and a custom EOF position, for e.g. hashed directories
  79  *
  80  * Synchronization:
  81  * SEEK_SET and SEEK_END are unsynchronized (but atomic on 64bit platforms)
  82  * SEEK_CUR is synchronized against other SEEK_CURs, but not read/writes.
  83  * read/writes behave like SEEK_SET against seeks.
  84  */
  85 loff_t
  86 generic_file_llseek_size(struct file *file, loff_t offset, int whence,
  87                 loff_t maxsize, loff_t eof)
  88 {
  89         switch (whence) {
  90         case SEEK_END:
  91                 offset += eof;
  92                 break;
  93         case SEEK_CUR:
  94                 /*
  95                  * Here we special-case the lseek(fd, 0, SEEK_CUR)
  96                  * position-querying operation.  Avoid rewriting the "same"
  97                  * f_pos value back to the file because a concurrent read(),
  98                  * write() or lseek() might have altered it
  99                  */
 100                 if (offset == 0)
 101                         return file->f_pos;
 102                 /*
 103                  * f_lock protects against read/modify/write race with other
 104                  * SEEK_CURs. Note that parallel writes and reads behave
 105                  * like SEEK_SET.
 106                  */
 107                 spin_lock(&file->f_lock);
 108                 offset = vfs_setpos(file, file->f_pos + offset, maxsize);
 109                 spin_unlock(&file->f_lock);
 110                 return offset;
 111         case SEEK_DATA:
 112                 /*
 113                  * In the generic case the entire file is data, so as long as
 114                  * offset isn't at the end of the file then the offset is data.
 115                  */
 116                 if ((unsigned long long)offset >= eof)
 117                         return -ENXIO;
 118                 break;
 119         case SEEK_HOLE:
 120                 /*
 121                  * There is a virtual hole at the end of the file, so as long as
 122                  * offset isn't i_size or larger, return i_size.
 123                  */
 124                 if ((unsigned long long)offset >= eof)
 125                         return -ENXIO;
 126                 offset = eof;
 127                 break;
 128         }
 129
 130         return vfs_setpos(file, offset, maxsize);
 131 }
 132 EXPORT_SYMBOL(generic_file_llseek_size);
 133
 134 /**
 135  * generic_file_llseek - generic llseek implementation for regular files
 136  * @file:       file structure to seek on
 137  * @offset:     file offset to seek to
 138  * @whence:     type of seek
 139  *
 140  * This is a generic implemenation of ->llseek useable for all normal local
 141  * filesystems.  It just updates the file offset to the value specified by
 142  * @offset and @whence.
 143  */
 144 loff_t generic_file_llseek(struct file *file, loff_t offset, int whence)
 145 {
 146         struct inode *inode = file->f_mapping->host;
 147
 148         return generic_file_llseek_size(file, offset, whence,
 149                                         inode->i_sb->s_maxbytes,
 150                                         i_size_read(inode));
 151 }
 152 EXPORT_SYMBOL(generic_file_llseek);
 153
 154 /**
 155  * fixed_size_llseek - llseek implementation for fixed-sized devices
 156  * @file:       file structure to seek on
 157  * @offset:     file offset to seek to
 158  * @whence:     type of seek
 159  * @size:       size of the file
 160  *
 161  */
 162 loff_t fixed_size_llseek(struct file *file, loff_t offset, int whence, loff_t size)
 163 {
 164         switch (whence) {
 165         case SEEK_SET: case SEEK_CUR: case SEEK_END:
 166                 return generic_file_llseek_size(file, offset, whence,
 167                                                 size, size);
 168         default:
 169                 return -EINVAL;
 170         }
 171 }
 172 EXPORT_SYMBOL(fixed_size_llseek);
 173
 174 /**
 175  * no_seek_end_llseek - llseek implementation for fixed-sized devices
 176  * @file:       file structure to seek on
 177  * @offset:     file offset to seek to
 178  * @whence:     type of seek
 179  *
 180  */
 181 loff_t no_seek_end_llseek(struct file *file, loff_t offset, int whence)
 182 {
 183         switch (whence) {
 184         case SEEK_SET: case SEEK_CUR:
 185                 return generic_file_llseek_size(file, offset, whence,
 186                                                 OFFSET_MAX, 0);
 187         default:
 188                 return -EINVAL;
 189         }
 190 }
 191 EXPORT_SYMBOL(no_seek_end_llseek);
 192
 193 /**
 194  * no_seek_end_llseek_size - llseek implementation for fixed-sized devices
 195  * @file:       file structure to seek on
 196  * @offset:     file offset to seek to
 197  * @whence:     type of seek
 198  * @size:       maximal offset allowed
 199  *
 200  */
 201 loff_t no_seek_end_llseek_size(struct file *file, loff_t offset, int whence, loff_t size)
 202 {
 203         switch (whence) {
 204         case SEEK_SET: case SEEK_CUR:
 205                 return generic_file_llseek_size(file, offset, whence,
 206                                                 size, 0);
 207         default:
 208                 return -EINVAL;
 209         }
 210 }
 211 EXPORT_SYMBOL(no_seek_end_llseek_size);
 212
 213 /**
 214  * noop_llseek - No Operation Performed llseek implementation
 215  * @file:       file structure to seek on
 216  * @offset:     file offset to seek to
 217  * @whence:     type of seek
 218  *
 219  * This is an implementation of ->llseek useable for the rare special case when
 220  * userspace expects the seek to succeed but the (device) file is actually not
 221  * able to perform the seek. In this case you use noop_llseek() instead of
 222  * falling back to the default implementation of ->llseek.
 223  */
 224 loff_t noop_llseek(struct file *file, loff_t offset, int whence)
 225 {
 226         return file->f_pos;
 227 }
 228 EXPORT_SYMBOL(noop_llseek);
 229
 230 loff_t no_llseek(struct file *file, loff_t offset, int whence)
 231 {
 232         return -ESPIPE;
 233 }
 234 EXPORT_SYMBOL(no_llseek);
 235
 236 loff_t default_llseek(struct file *file, loff_t offset, int whence)
 237 {
 238         struct inode *inode = file_inode(file);
 239         loff_t retval;
 240
 241         inode_lock(inode);
 242         switch (whence) {
 243                 case SEEK_END:
 244                         offset += i_size_read(inode);
 245                         break;
 246                 case SEEK_CUR:
 247                         if (offset == 0) {
 248                                 retval = file->f_pos;
 249                                 goto out;
 250                         }
 251                         offset += file->f_pos;
 252                         break;
 253                 case SEEK_DATA:
 254                         /*
 255                          * In the generic case the entire file is data, so as
 256                          * long as offset isn't at the end of the file then the
 257                          * offset is data.
 258                          */
 259                         if (offset >= inode->i_size) {
 260                                 retval = -ENXIO;
 261                                 goto out;
 262                         }
 263                         break;
 264                 case SEEK_HOLE:
 265                         /*
 266                          * There is a virtual hole at the end of the file, so
 267                          * as long as offset isn't i_size or larger, return
 268                          * i_size.
 269                          */
 270                         if (offset >= inode->i_size) {
 271                                 retval = -ENXIO;
 272                                 goto out;
 273                         }
 274                         offset = inode->i_size;
 275                         break;
 276         }
 277         retval = -EINVAL;
 278         if (offset >= 0 || unsigned_offsets(file)) {
 279                 if (offset != file->f_pos) {
 280                         file->f_pos = offset;
 281                         file->f_version = 0;
 282                 }
 283                 retval = offset;
 284         }
 285 out:
 286         inode_unlock(inode);
 287         return retval;
 288 }
 289 EXPORT_SYMBOL(default_llseek);
 290
 291 loff_t vfs_llseek(struct file *file, loff_t offset, int whence)
 292 {
 293         loff_t (*fn)(struct file *, loff_t, int);
 294
 295         fn = no_llseek;
 296         if (file->f_mode & FMODE_LSEEK) {
 297                 if (file->f_op->llseek)
 298                         fn = file->f_op->llseek;
 299         }
 300         return fn(file, offset, whence);
 301 }
 302 EXPORT_SYMBOL(vfs_llseek);
 303
 304 static off_t ksys_lseek(unsigned int fd, off_t offset, unsigned int whence)
 305 {
 306         off_t retval;
 307         struct fd f = fdget_pos(fd);
 308         if (!f.file)
 309                 return -EBADF;
 310
 311         retval = -EINVAL;
 312         if (whence <= SEEK_MAX) {
 313                 loff_t res = vfs_llseek(f.file, offset, whence);
 314                 retval = res;
 315                 if (res != (loff_t)retval)
 316                         retval = -EOVERFLOW;    /* LFS: should only happen on 32 bit platforms */
 317         }
 318         fdput_pos(f);
 319         return retval;
 320 }
 321
 322 SYSCALL_DEFINE3(lseek, unsigned int, fd, off_t, offset, unsigned int, whence)
 323 {
 324         return ksys_lseek(fd, offset, whence);
 325 }
 326
 327 #ifdef CONFIG_COMPAT
 328 COMPAT_SYSCALL_DEFINE3(lseek, unsigned int, fd, compat_off_t, offset, unsigned int, whence)
 329 {
 330         return ksys_lseek(fd, offset, whence);
 331 }
 332 #endif
 333
 334 #if !defined(CONFIG_64BIT) || defined(CONFIG_COMPAT) || \
 335         defined(__ARCH_WANT_SYS_LLSEEK)
 336 SYSCALL_DEFINE5(llseek, unsigned int, fd, unsigned long, offset_high,
 337                 unsigned long, offset_low, loff_t __user *, result,
 338                 unsigned int, whence)
 339 {
 340         int retval;
 341         struct fd f = fdget_pos(fd);
 342         loff_t offset;
 343
 344         if (!f.file)
 345                 return -EBADF;
 346
 347         retval = -EINVAL;
 348         if (whence > SEEK_MAX)
 349                 goto out_putf;
 350
 351         offset = vfs_llseek(f.file, ((loff_t) offset_high << 32) | offset_low,
 352                         whence);
 353
 354         retval = (int)offset;
 355         if (offset >= 0) {
 356                 retval = -EFAULT;
 357                 if (!copy_to_user(result, &offset, sizeof(offset)))
 358                         retval = 0;
 359         }
 360 out_putf:
 361         fdput_pos(f);
 362         return retval;
 363 }
 364 #endif
 365
 366 int rw_verify_area(int read_write, struct file *file, const loff_t *ppos, size_t count)
 367 {
 368         if (unlikely((ssize_t) count < 0))
 369                 return -EINVAL;
 370
 371         /*
 372          * ranged mandatory locking does not apply to streams - it makes sense
 373          * only for files where position has a meaning.
 374          */
 375         if (ppos) {
 376                 loff_t pos = *ppos;
 377
 378                 if (unlikely(pos < 0)) {
 379                         if (!unsigned_offsets(file))
 380                                 return -EINVAL;
 381                         if (count >= -pos) /* both values are in 0..LLONG_MAX */
 382                                 return -EOVERFLOW;
 383                 } else if (unlikely((loff_t) (pos + count) < 0)) {
 384                         if (!unsigned_offsets(file))
 385                                 return -EINVAL;
 386                 }
 387         }
 388
 389         return security_file_permission(file,
 390                                 read_write == READ ? MAY_READ : MAY_WRITE);
 391 }
 392
 393 static ssize_t new_sync_read(struct file *filp, char __user *buf, size_t len, loff_t *ppos)
 394 {
 395         struct iovec iov = { .iov_base = buf, .iov_len = len };
 396         struct kiocb kiocb;
 397         struct iov_iter iter;
 398         ssize_t ret;
 399
 400         init_sync_kiocb(&kiocb, filp);
 401         kiocb.ki_pos = (ppos ? *ppos : 0);
 402         iov_iter_init(&iter, READ, &iov, 1, len);
 403
 404         ret = call_read_iter(filp, &kiocb, &iter);
 405         BUG_ON(ret == -EIOCBQUEUED);
 406         if (ppos)
 407                 *ppos = kiocb.ki_pos;
 408         return ret;
 409 }
 410
 411 static int warn_unsupported(struct file *file, const char *op)
 412 {
 413         pr_warn_ratelimited(
 414                 "kernel %s not supported for file %pD4 (pid: %d comm: %.20s)\n",
 415                 op, file, current->pid, current->comm);
 416         return -EINVAL;
 417 }
 418
 419 ssize_t __kernel_read(struct file *file, void *buf, size_t count, loff_t *pos)
 420 {
 421         struct kvec iov = {
 422                 .iov_base       = buf,
 423                 .iov_len        = min_t(size_t, count, MAX_RW_COUNT),
 424         };
 425         struct kiocb kiocb;
 426         struct iov_iter iter;
 427         ssize_t ret;
 428
 429         if (WARN_ON_ONCE(!(file->f_mode & FMODE_READ)))
 430                 return -EINVAL;
 431         if (!(file->f_mode & FMODE_CAN_READ))
 432                 return -EINVAL;
 433         /*
 434          * Also fail if ->read_iter and ->read are both wired up as that
 435          * implies very convoluted semantics.
 436          */
 437         if (unlikely(!file->f_op->read_iter || file->f_op->read))
 438                 return warn_unsupported(file, "read");
 439
 440         init_sync_kiocb(&kiocb, file);
 441         kiocb.ki_pos = pos ? *pos : 0;
 442         iov_iter_kvec(&iter, READ, &iov, 1, iov.iov_len);
 443         ret = file->f_op->read_iter(&kiocb, &iter);
 444         if (ret > 0) {
 445                 if (pos)
 446                         *pos = kiocb.ki_pos;
 447                 fsnotify_access(file);
 448                 add_rchar(current, ret);
 449         }
 450         inc_syscr(current);
 451         return ret;
 452 }
 453
 454 ssize_t kernel_read(struct file *file, void *buf, size_t count, loff_t *pos)
 455 {
 456         ssize_t ret;
 457
 458         ret = rw_verify_area(READ, file, pos, count);
 459         if (ret)
 460                 return ret;
 461         return __kernel_read(file, buf, count, pos);
 462 }
 463 EXPORT_SYMBOL(kernel_read);
 464
 465 ssize_t vfs_read(struct file *file, char __user *buf, size_t count, loff_t *pos)
 466 {
 467         ssize_t ret;
 468
 469         if (!(file->f_mode & FMODE_READ))
 470                 return -EBADF;
 471         if (!(file->f_mode & FMODE_CAN_READ))
 472                 return -EINVAL;
 473         if (unlikely(!access_ok(buf, count)))
 474                 return -EFAULT;
 475
 476         ret = rw_verify_area(READ, file, pos, count);
 477         if (ret)
 478                 return ret;
 479         if (count > MAX_RW_COUNT)
 480                 count =  MAX_RW_COUNT;
 481
 482         if (file->f_op->read)
 483                 ret = file->f_op->read(file, buf, count, pos);
 484         else if (file->f_op->read_iter)
 485                 ret = new_sync_read(file, buf, count, pos);
 486         else
 487                 ret = -EINVAL;
 488         if (ret > 0) {
 489                 fsnotify_access(file);
 490                 add_rchar(current, ret);
 491         }
 492         inc_syscr(current);
 493         return ret;
 494 }
 495
 496 static ssize_t new_sync_write(struct file *filp, const char __user *buf, size_t len, loff_t *ppos)
 497 {
 498         struct iovec iov = { .iov_base = (void __user *)buf, .iov_len = len };
 499         struct kiocb kiocb;
 500         struct iov_iter iter;
 501         ssize_t ret;
 502
 503         init_sync_kiocb(&kiocb, filp);
 504         kiocb.ki_pos = (ppos ? *ppos : 0);
 505         iov_iter_init(&iter, WRITE, &iov, 1, len);
 506
 507         ret = call_write_iter(filp, &kiocb, &iter);
 508         BUG_ON(ret == -EIOCBQUEUED);
 509         if (ret > 0 && ppos)
 510                 *ppos = kiocb.ki_pos;
 511         return ret;
 512 }
 513
 514 /* caller is responsible for file_start_write/file_end_write */
 515 ssize_t __kernel_write(struct file *file, const void *buf, size_t count, loff_t *pos)
 516 {
 517         struct kvec iov = {
 518                 .iov_base       = (void *)buf,
 519                 .iov_len        = min_t(size_t, count, MAX_RW_COUNT),
 520         };
 521         struct kiocb kiocb;
 522         struct iov_iter iter;
 523         ssize_t ret;
 524
 525         if (WARN_ON_ONCE(!(file->f_mode & FMODE_WRITE)))
 526                 return -EBADF;
 527         if (!(file->f_mode & FMODE_CAN_WRITE))
 528                 return -EINVAL;
 529         /*
 530          * Also fail if ->write_iter and ->write are both wired up as that
 531          * implies very convoluted semantics.
 532          */
 533         if (unlikely(!file->f_op->write_iter || file->f_op->write))
 534                 return warn_unsupported(file, "write");
 535
 536         init_sync_kiocb(&kiocb, file);
 537         kiocb.ki_pos = pos ? *pos : 0;
 538         iov_iter_kvec(&iter, WRITE, &iov, 1, iov.iov_len);
 539         ret = file->f_op->write_iter(&kiocb, &iter);
 540         if (ret > 0) {
 541                 if (pos)
 542                         *pos = kiocb.ki_pos;
 543                 fsnotify_modify(file);
 544                 add_wchar(current, ret);
 545         }
 546         inc_syscw(current);
 547         return ret;
 548 }
 549 /*
 550  * This "EXPORT_SYMBOL_GPL()" is more of a "EXPORT_SYMBOL_DONTUSE()",
 551  * but autofs is one of the few internal kernel users that actually
 552  * wants this _and_ can be built as a module. So we need to export
 553  * this symbol for autofs, even though it really isn't appropriate
 554  * for any other kernel modules.
 555  */
 556 EXPORT_SYMBOL_GPL(__kernel_write);
 557
 558 ssize_t kernel_write(struct file *file, const void *buf, size_t count,
 559                             loff_t *pos)
 560 {
 561         ssize_t ret;
 562
 563         ret = rw_verify_area(WRITE, file, pos, count);
 564         if (ret)
 565                 return ret;
 566
 567         file_start_write(file);
 568         ret =  __kernel_write(file, buf, count, pos);
 569         file_end_write(file);
 570         return ret;
 571 }
 572 EXPORT_SYMBOL(kernel_write);
 573
 574 ssize_t vfs_write(struct file *file, const char __user *buf, size_t count, loff_t *pos)
 575 {
 576         ssize_t ret;
 577
 578         if (!(file->f_mode & FMODE_WRITE))
 579                 return -EBADF;
 580         if (!(file->f_mode & FMODE_CAN_WRITE))
 581                 return -EINVAL;
 582         if (unlikely(!access_ok(buf, count)))
 583                 return -EFAULT;
 584
 585         ret = rw_verify_area(WRITE, file, pos, count);
 586         if (ret)
 587                 return ret;
 588         if (count > MAX_RW_COUNT)
 589                 count =  MAX_RW_COUNT;
 590         file_start_write(file);
 591         if (file->f_op->write)
 592                 ret = file->f_op->write(file, buf, count, pos);
 593         else if (file->f_op->write_iter)
 594                 ret = new_sync_write(file, buf, count, pos);
 595         else
 596                 ret = -EINVAL;
 597         if (ret > 0) {
 598                 fsnotify_modify(file);
 599                 add_wchar(current, ret);
 600         }
 601         inc_syscw(current);
 602         file_end_write(file);
 603         return ret;
 604 }
 605
 606 /* file_ppos returns &file->f_pos or NULL if file is stream */
 607 static inline loff_t *file_ppos(struct file *file)
 608 {
 609         return file->f_mode & FMODE_STREAM ? NULL : &file->f_pos;
 610 }
 611
 612 ssize_t ksys_read(unsigned int fd, char __user *buf, size_t count)
 613 {
 614         struct fd f = fdget_pos(fd);
 615         ssize_t ret = -EBADF;
 616
 617         if (f.file) {
 618                 loff_t pos, *ppos = file_ppos(f.file);
 619                 if (ppos) {
 620                         pos = *ppos;
 621                         ppos = &pos;
 622                 }
 623                 ret = vfs_read(f.file, buf, count, ppos);
 624                 if (ret >= 0 && ppos)
 625                         f.file->f_pos = pos;
 626                 fdput_pos(f);
 627         }
 628         return ret;
 629 }
 630
 631 SYSCALL_DEFINE3(read, unsigned int, fd, char __user *, buf, size_t, count)
 632 {
 633         return ksys_read(fd, buf, count);
 634 }
 635
 636 ssize_t ksys_write(unsigned int fd, const char __user *buf, size_t count)
 637 {
 638         struct fd f = fdget_pos(fd);
 639         ssize_t ret = -EBADF;
 640
 641         if (f.file) {
 642                 loff_t pos, *ppos = file_ppos(f.file);
 643                 if (ppos) {
 644                         pos = *ppos;
 645                         ppos = &pos;
 646                 }
 647                 ret = vfs_write(f.file, buf, count, ppos);
 648                 if (ret >= 0 && ppos)
 649                         f.file->f_pos = pos;
 650                 fdput_pos(f);
 651         }
 652
 653         return ret;
 654 }
 655
 656 SYSCALL_DEFINE3(write, unsigned int, fd, const char __user *, buf,
 657                 size_t, count)
 658 {
 659         return ksys_write(fd, buf, count);
 660 }
 661
 662 ssize_t ksys_pread64(unsigned int fd, char __user *buf, size_t count,
 663                      loff_t pos)
 664 {
 665         struct fd f;
 666         ssize_t ret = -EBADF;
 667
 668         if (pos < 0)
 669                 return -EINVAL;
 670
 671         f = fdget(fd);
 672         if (f.file) {
 673                 ret = -ESPIPE;
 674                 if (f.file->f_mode & FMODE_PREAD)
 675                         ret = vfs_read(f.file, buf, count, &pos);
 676                 fdput(f);
 677         }
 678
 679         return ret;
 680 }
 681
 682 SYSCALL_DEFINE4(pread64, unsigned int, fd, char __user *, buf,
 683                         size_t, count, loff_t, pos)
 684 {
 685         return ksys_pread64(fd, buf, count, pos);
 686 }
 687
 688 ssize_t ksys_pwrite64(unsigned int fd, const char __user *buf,
 689                       size_t count, loff_t pos)
 690 {
 691         struct fd f;
 692         ssize_t ret = -EBADF;
 693
 694         if (pos < 0)
 695                 return -EINVAL;
 696
 697         f = fdget(fd);
 698         if (f.file) {
 699                 ret = -ESPIPE;
 700                 if (f.file->f_mode & FMODE_PWRITE)
 701                         ret = vfs_write(f.file, buf, count, &pos);
 702                 fdput(f);
 703         }
 704
 705         return ret;
 706 }
 707
 708 SYSCALL_DEFINE4(pwrite64, unsigned int, fd, const char __user *, buf,
 709                          size_t, count, loff_t, pos)
 710 {
 711         return ksys_pwrite64(fd, buf, count, pos);
 712 }
 713
 714 static ssize_t do_iter_readv_writev(struct file *filp, struct iov_iter *iter,
 715                 loff_t *ppos, int type, rwf_t flags)
 716 {
 717         struct kiocb kiocb;
 718         ssize_t ret;
 719
 720         init_sync_kiocb(&kiocb, filp);
 721         ret = kiocb_set_rw_flags(&kiocb, flags);
 722         if (ret)
 723                 return ret;
 724         kiocb.ki_pos = (ppos ? *ppos : 0);
 725
 726         if (type == READ)
 727                 ret = call_read_iter(filp, &kiocb, iter);
 728         else
 729                 ret = call_write_iter(filp, &kiocb, iter);
 730         BUG_ON(ret == -EIOCBQUEUED);
 731         if (ppos)
 732                 *ppos = kiocb.ki_pos;
 733         return ret;
 734 }
 735
 736 /* Do it by hand, with file-ops */
 737 static ssize_t do_loop_readv_writev(struct file *filp, struct iov_iter *iter,
 738                 loff_t *ppos, int type, rwf_t flags)
 739 {
 740         ssize_t ret = 0;
 741
 742         if (flags & ~RWF_HIPRI)
 743                 return -EOPNOTSUPP;
 744
 745         while (iov_iter_count(iter)) {
 746                 struct iovec iovec = iov_iter_iovec(iter);
 747                 ssize_t nr;
 748
 749                 if (type == READ) {
 750                         nr = filp->f_op->read(filp, iovec.iov_base,
 751                                               iovec.iov_len, ppos);
 752                 } else {
 753                         nr = filp->f_op->write(filp, iovec.iov_base,
 754                                                iovec.iov_len, ppos);
 755                 }
 756
 757                 if (nr < 0) {
 758                         if (!ret)
 759                                 ret = nr;
 760                         break;
 761                 }
 762                 ret += nr;
 763                 if (nr != iovec.iov_len)
 764                         break;
 765                 iov_iter_advance(iter, nr);
 766         }
 767
 768         return ret;
 769 }
 770
 771 static ssize_t do_iter_read(struct file *file, struct iov_iter *iter,
 772                 loff_t *pos, rwf_t flags)
 773 {
 774         size_t tot_len;
 775         ssize_t ret = 0;
 776
 777         if (!(file->f_mode & FMODE_READ))
 778                 return -EBADF;
 779         if (!(file->f_mode & FMODE_CAN_READ))
 780                 return -EINVAL;
 781
 782         tot_len = iov_iter_count(iter);
 783         if (!tot_len)
 784                 goto out;
 785         ret = rw_verify_area(READ, file, pos, tot_len);
 786         if (ret < 0)
 787                 return ret;
 788
 789         if (file->f_op->read_iter)
 790                 ret = do_iter_readv_writev(file, iter, pos, READ, flags);
 791         else
 792                 ret = do_loop_readv_writev(file, iter, pos, READ, flags);
 793 out:
 794         if (ret >= 0)
 795                 fsnotify_access(file);
 796         return ret;
 797 }
 798
 799 ssize_t vfs_iocb_iter_read(struct file *file, struct kiocb *iocb,
 800                            struct iov_iter *iter)
 801 {
 802         size_t tot_len;
 803         ssize_t ret = 0;
 804
 805         if (!file->f_op->read_iter)
 806                 return -EINVAL;
 807         if (!(file->f_mode & FMODE_READ))
 808                 return -EBADF;
 809         if (!(file->f_mode & FMODE_CAN_READ))
 810                 return -EINVAL;
 811
 812         tot_len = iov_iter_count(iter);
 813         if (!tot_len)
 814                 goto out;
 815         ret = rw_verify_area(READ, file, &iocb->ki_pos, tot_len);
 816         if (ret < 0)
 817                 return ret;
 818
 819         ret = call_read_iter(file, iocb, iter);
 820 out:
 821         if (ret >= 0)
 822                 fsnotify_access(file);
 823         return ret;
 824 }
 825 EXPORT_SYMBOL(vfs_iocb_iter_read);
 826
 827 ssize_t vfs_iter_read(struct file *file, struct iov_iter *iter, loff_t *ppos,
 828                 rwf_t flags)
 829 {
 830         if (!file->f_op->read_iter)
 831                 return -EINVAL;
 832         return do_iter_read(file, iter, ppos, flags);
 833 }
 834 EXPORT_SYMBOL(vfs_iter_read);
 835
 836 static ssize_t do_iter_write(struct file *file, struct iov_iter *iter,
 837                 loff_t *pos, rwf_t flags)
 838 {
 839         size_t tot_len;
 840         ssize_t ret = 0;
 841
 842         if (!(file->f_mode & FMODE_WRITE))
 843                 return -EBADF;
 844         if (!(file->f_mode & FMODE_CAN_WRITE))
 845                 return -EINVAL;
 846
 847         tot_len = iov_iter_count(iter);
 848         if (!tot_len)
 849                 return 0;
 850         ret = rw_verify_area(WRITE, file, pos, tot_len);
 851         if (ret < 0)
 852                 return ret;
 853
 854         if (file->f_op->write_iter)
 855                 ret = do_iter_readv_writev(file, iter, pos, WRITE, flags);
 856         else
 857                 ret = do_loop_readv_writev(file, iter, pos, WRITE, flags);
 858         if (ret > 0)
 859                 fsnotify_modify(file);
 860         return ret;
 861 }
 862
 863 ssize_t vfs_iocb_iter_write(struct file *file, struct kiocb *iocb,
 864                             struct iov_iter *iter)
 865 {
 866         size_t tot_len;
 867         ssize_t ret = 0;
 868
 869         if (!file->f_op->write_iter)
 870                 return -EINVAL;
 871         if (!(file->f_mode & FMODE_WRITE))
 872                 return -EBADF;
 873         if (!(file->f_mode & FMODE_CAN_WRITE))
 874                 return -EINVAL;
 875
 876         tot_len = iov_iter_count(iter);
 877         if (!tot_len)
 878                 return 0;
 879         ret = rw_verify_area(WRITE, file, &iocb->ki_pos, tot_len);
 880         if (ret < 0)
 881                 return ret;
 882
 883         ret = call_write_iter(file, iocb, iter);
 884         if (ret > 0)
 885                 fsnotify_modify(file);
 886
 887         return ret;
 888 }
 889 EXPORT_SYMBOL(vfs_iocb_iter_write);
 890
 891 ssize_t vfs_iter_write(struct file *file, struct iov_iter *iter, loff_t *ppos,
 892                 rwf_t flags)
 893 {
 894         if (!file->f_op->write_iter)
 895                 return -EINVAL;
 896         return do_iter_write(file, iter, ppos, flags);
 897 }
 898 EXPORT_SYMBOL(vfs_iter_write);
 899
 900 static ssize_t vfs_readv(struct file *file, const struct iovec __user *vec,
 901                   unsigned long vlen, loff_t *pos, rwf_t flags)
 902 {
 903         struct iovec iovstack[UIO_FASTIOV];
 904         struct iovec *iov = iovstack;
 905         struct iov_iter iter;
 906         ssize_t ret;
 907
 908         ret = import_iovec(READ, vec, vlen, ARRAY_SIZE(iovstack), &iov, &iter);
 909         if (ret >= 0) {
 910                 ret = do_iter_read(file, &iter, pos, flags);
 911                 kfree(iov);
 912         }
 913
 914         return ret;
 915 }
 916
 917 static ssize_t vfs_writev(struct file *file, const struct iovec __user *vec,
 918                    unsigned long vlen, loff_t *pos, rwf_t flags)
 919 {
 920         struct iovec iovstack[UIO_FASTIOV];
 921         struct iovec *iov = iovstack;
 922         struct iov_iter iter;
 923         ssize_t ret;
 924
 925         ret = import_iovec(WRITE, vec, vlen, ARRAY_SIZE(iovstack), &iov, &iter);
 926         if (ret >= 0) {
 927                 file_start_write(file);
 928                 ret = do_iter_write(file, &iter, pos, flags);
 929                 file_end_write(file);
 930                 kfree(iov);
 931         }
 932         return ret;
 933 }
 934
 935 static ssize_t do_readv(unsigned long fd, const struct iovec __user *vec,
 936                         unsigned long vlen, rwf_t flags)
 937 {
 938         struct fd f = fdget_pos(fd);
 939         ssize_t ret = -EBADF;
 940
 941         if (f.file) {
 942                 loff_t pos, *ppos = file_ppos(f.file);
 943                 if (ppos) {
 944                         pos = *ppos;
 945                         ppos = &pos;
 946                 }
 947                 ret = vfs_readv(f.file, vec, vlen, ppos, flags);
 948                 if (ret >= 0 && ppos)
 949                         f.file->f_pos = pos;
 950                 fdput_pos(f);
 951         }
 952
 953         if (ret > 0)
 954                 add_rchar(current, ret);
 955         inc_syscr(current);
 956         return ret;
 957 }
 958
 959 static ssize_t do_writev(unsigned long fd, const struct iovec __user *vec,
 960                          unsigned long vlen, rwf_t flags)
 961 {
 962         struct fd f = fdget_pos(fd);
 963         ssize_t ret = -EBADF;
 964
 965         if (f.file) {
 966                 loff_t pos, *ppos = file_ppos(f.file);
 967                 if (ppos) {
 968                         pos = *ppos;
 969                         ppos = &pos;
 970                 }
 971                 ret = vfs_writev(f.file, vec, vlen, ppos, flags);
 972                 if (ret >= 0 && ppos)
 973                         f.file->f_pos = pos;
 974                 fdput_pos(f);
 975         }
 976
 977         if (ret > 0)
 978                 add_wchar(current, ret);
 979         inc_syscw(current);
 980         return ret;
 981 }
 982
 983 static inline loff_t pos_from_hilo(unsigned long high, unsigned long low)
 984 {
 985 #define HALF_LONG_BITS (BITS_PER_LONG / 2)
 986         return (((loff_t)high << HALF_LONG_BITS) << HALF_LONG_BITS) | low;
 987 }
 988
 989 static ssize_t do_preadv(unsigned long fd, const struct iovec __user *vec,
 990                          unsigned long vlen, loff_t pos, rwf_t flags)
 991 {
 992         struct fd f;
 993         ssize_t ret = -EBADF;
 994
 995         if (pos < 0)
 996                 return -EINVAL;
 997
 998         f = fdget(fd);
 999         if (f.file) {
1000                 ret = -ESPIPE;
1001                 if (f.file->f_mode & FMODE_PREAD)
1002                         ret = vfs_readv(f.file, vec, vlen, &pos, flags);
1003                 fdput(f);
1004         }
1005
1006         if (ret > 0)
1007                 add_rchar(current, ret);
1008         inc_syscr(current);
1009         return ret;
1010 }
1011
1012 static ssize_t do_pwritev(unsigned long fd, const struct iovec __user *vec,
1013                           unsigned long vlen, loff_t pos, rwf_t flags)
1014 {
1015         struct fd f;
1016         ssize_t ret = -EBADF;
1017
1018         if (pos < 0)
1019                 return -EINVAL;
1020
1021         f = fdget(fd);
1022         if (f.file) {
1023                 ret = -ESPIPE;
1024                 if (f.file->f_mode & FMODE_PWRITE)
1025                         ret = vfs_writev(f.file, vec, vlen, &pos, flags);
1026                 fdput(f);
1027         }
1028
1029         if (ret > 0)
1030                 add_wchar(current, ret);
1031         inc_syscw(current);
1032         return ret;
1033 }
1034
1035 SYSCALL_DEFINE3(readv, unsigned long, fd, const struct iovec __user *, vec,
1036                 unsigned long, vlen)
1037 {
1038         return do_readv(fd, vec, vlen, 0);
1039 }
1040
1041 SYSCALL_DEFINE3(writev, unsigned long, fd, const struct iovec __user *, vec,
1042                 unsigned long, vlen)
1043 {
1044         return do_writev(fd, vec, vlen, 0);
1045 }
1046
1047 SYSCALL_DEFINE5(preadv, unsigned long, fd, const struct iovec __user *, vec,
1048                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h)
1049 {
1050         loff_t pos = pos_from_hilo(pos_h, pos_l);
1051
1052         return do_preadv(fd, vec, vlen, pos, 0);
1053 }
1054
1055 SYSCALL_DEFINE6(preadv2, unsigned long, fd, const struct iovec __user *, vec,
1056                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h,
1057                 rwf_t, flags)
1058 {
1059         loff_t pos = pos_from_hilo(pos_h, pos_l);
1060
1061         if (pos == -1)
1062                 return do_readv(fd, vec, vlen, flags);
1063
1064         return do_preadv(fd, vec, vlen, pos, flags);
1065 }
1066
1067 SYSCALL_DEFINE5(pwritev, unsigned long, fd, const struct iovec __user *, vec,
1068                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h)
1069 {
1070         loff_t pos = pos_from_hilo(pos_h, pos_l);
1071
1072         return do_pwritev(fd, vec, vlen, pos, 0);
1073 }
1074
1075 SYSCALL_DEFINE6(pwritev2, unsigned long, fd, const struct iovec __user *, vec,
1076                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h,
1077                 rwf_t, flags)
1078 {
1079         loff_t pos = pos_from_hilo(pos_h, pos_l);
1080
1081         if (pos == -1)
1082                 return do_writev(fd, vec, vlen, flags);
1083
1084         return do_pwritev(fd, vec, vlen, pos, flags);
1085 }
1086
1087 /*
1088  * Various compat syscalls.  Note that they all pretend to take a native
1089  * iovec - import_iovec will properly treat those as compat_iovecs based on
1090  * in_compat_syscall().
1091  */
1092 #ifdef CONFIG_COMPAT
1093 #ifdef __ARCH_WANT_COMPAT_SYS_PREADV64
1094 COMPAT_SYSCALL_DEFINE4(preadv64, unsigned long, fd,
1095                 const struct iovec __user *, vec,
1096                 unsigned long, vlen, loff_t, pos)
1097 {
1098         return do_preadv(fd, vec, vlen, pos, 0);
1099 }
1100 #endif
1101
1102 COMPAT_SYSCALL_DEFINE5(preadv, compat_ulong_t, fd,
1103                 const struct iovec __user *, vec,
1104                 compat_ulong_t, vlen, u32, pos_low, u32, pos_high)
1105 {
1106         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1107
1108         return do_preadv(fd, vec, vlen, pos, 0);
1109 }
1110
1111 #ifdef __ARCH_WANT_COMPAT_SYS_PREADV64V2
1112 COMPAT_SYSCALL_DEFINE5(preadv64v2, unsigned long, fd,
1113                 const struct iovec __user *, vec,
1114                 unsigned long, vlen, loff_t, pos, rwf_t, flags)
1115 {
1116         if (pos == -1)
1117                 return do_readv(fd, vec, vlen, flags);
1118         return do_preadv(fd, vec, vlen, pos, flags);
1119 }
1120 #endif
1121
1122 COMPAT_SYSCALL_DEFINE6(preadv2, compat_ulong_t, fd,
1123                 const struct iovec __user *, vec,
1124                 compat_ulong_t, vlen, u32, pos_low, u32, pos_high,
1125                 rwf_t, flags)
1126 {
1127         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1128
1129         if (pos == -1)
1130                 return do_readv(fd, vec, vlen, flags);
1131         return do_preadv(fd, vec, vlen, pos, flags);
1132 }
1133
1134 #ifdef __ARCH_WANT_COMPAT_SYS_PWRITEV64
1135 COMPAT_SYSCALL_DEFINE4(pwritev64, unsigned long, fd,
1136                 const struct iovec __user *, vec,
1137                 unsigned long, vlen, loff_t, pos)
1138 {
1139         return do_pwritev(fd, vec, vlen, pos, 0);
1140 }
1141 #endif
1142
1143 COMPAT_SYSCALL_DEFINE5(pwritev, compat_ulong_t, fd,
1144                 const struct iovec __user *,vec,
1145                 compat_ulong_t, vlen, u32, pos_low, u32, pos_high)
1146 {
1147         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1148
1149         return do_pwritev(fd, vec, vlen, pos, 0);
1150 }
1151
1152 #ifdef __ARCH_WANT_COMPAT_SYS_PWRITEV64V2
1153 COMPAT_SYSCALL_DEFINE5(pwritev64v2, unsigned long, fd,
1154                 const struct iovec __user *, vec,
1155                 unsigned long, vlen, loff_t, pos, rwf_t, flags)
1156 {
1157         if (pos == -1)
1158                 return do_writev(fd, vec, vlen, flags);
1159         return do_pwritev(fd, vec, vlen, pos, flags);
1160 }
1161 #endif
1162
1163 COMPAT_SYSCALL_DEFINE6(pwritev2, compat_ulong_t, fd,
1164                 const struct iovec __user *,vec,
1165                 compat_ulong_t, vlen, u32, pos_low, u32, pos_high, rwf_t, flags)
1166 {
1167         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1168
1169         if (pos == -1)
1170                 return do_writev(fd, vec, vlen, flags);
1171         return do_pwritev(fd, vec, vlen, pos, flags);
1172 }
1173 #endif /* CONFIG_COMPAT */
1174
1175 static ssize_t do_sendfile(int out_fd, int in_fd, loff_t *ppos,
1176                            size_t count, loff_t max)
1177 {
1178         struct fd in, out;
1179         struct inode *in_inode, *out_inode;
1180         struct pipe_inode_info *opipe;
1181         loff_t pos;
1182         loff_t out_pos;
1183         ssize_t retval;
1184         int fl;
1185
1186         /*
1187          * Get input file, and verify that it is ok..
1188          */
1189         retval = -EBADF;
1190         in = fdget(in_fd);
1191         if (!in.file)
1192                 goto out;
1193         if (!(in.file->f_mode & FMODE_READ))
1194                 goto fput_in;
1195         retval = -ESPIPE;
1196         if (!ppos) {
1197                 pos = in.file->f_pos;
1198         } else {
1199                 pos = *ppos;
1200                 if (!(in.file->f_mode & FMODE_PREAD))
1201                         goto fput_in;
1202         }
1203         retval = rw_verify_area(READ, in.file, &pos, count);
1204         if (retval < 0)
1205                 goto fput_in;
1206         if (count > MAX_RW_COUNT)
1207                 count =  MAX_RW_COUNT;
1208
1209         /*
1210          * Get output file, and verify that it is ok..
1211          */
1212         retval = -EBADF;
1213         out = fdget(out_fd);
1214         if (!out.file)
1215                 goto fput_in;
1216         if (!(out.file->f_mode & FMODE_WRITE))
1217                 goto fput_out;
1218         in_inode = file_inode(in.file);
1219         out_inode = file_inode(out.file);
1220         out_pos = out.file->f_pos;
1221
1222         if (!max)
1223                 max = min(in_inode->i_sb->s_maxbytes, out_inode->i_sb->s_maxbytes);
1224
1225         if (unlikely(pos + count > max)) {
1226                 retval = -EOVERFLOW;
1227                 if (pos >= max)
1228                         goto fput_out;
1229                 count = max - pos;
1230         }
1231
1232         fl = 0;
1233 #if 0
1234         /*
1235          * We need to debate whether we can enable this or not. The
1236          * man page documents EAGAIN return for the output at least,
1237          * and the application is arguably buggy if it doesn't expect
1238          * EAGAIN on a non-blocking file descriptor.
1239          */
1240         if (in.file->f_flags & O_NONBLOCK)
1241                 fl = SPLICE_F_NONBLOCK;
1242 #endif
1243         opipe = get_pipe_info(out.file, true);
1244         if (!opipe) {
1245                 retval = rw_verify_area(WRITE, out.file, &out_pos, count);
1246                 if (retval < 0)
1247                         goto fput_out;
1248                 file_start_write(out.file);
1249                 retval = do_splice_direct(in.file, &pos, out.file, &out_pos,
1250                                           count, fl);
1251                 file_end_write(out.file);
1252         } else {
1253                 if (out.file->f_flags & O_NONBLOCK)
1254                         fl |= SPLICE_F_NONBLOCK;
1255
1256                 retval = splice_file_to_pipe(in.file, opipe, &pos, count, fl);
1257         }
1258
1259         if (retval > 0) {
1260                 add_rchar(current, retval);
1261                 add_wchar(current, retval);
1262                 fsnotify_access(in.file);
1263                 fsnotify_modify(out.file);
1264                 out.file->f_pos = out_pos;
1265                 if (ppos)
1266                         *ppos = pos;
1267                 else
1268                         in.file->f_pos = pos;
1269         }
1270
1271         inc_syscr(current);
1272         inc_syscw(current);
1273         if (pos > max)
1274                 retval = -EOVERFLOW;
1275
1276 fput_out:
1277         fdput(out);
1278 fput_in:
1279         fdput(in);
1280 out:
1281         return retval;
1282 }
1283
1284 SYSCALL_DEFINE4(sendfile, int, out_fd, int, in_fd, off_t __user *, offset, size_t, count)
1285 {
1286         loff_t pos;
1287         off_t off;
1288         ssize_t ret;
1289
1290         if (offset) {
1291                 if (unlikely(get_user(off, offset)))
1292                         return -EFAULT;
1293                 pos = off;
1294                 ret = do_sendfile(out_fd, in_fd, &pos, count, MAX_NON_LFS);
1295                 if (unlikely(put_user(pos, offset)))
1296                         return -EFAULT;
1297                 return ret;
1298         }
1299
1300         return do_sendfile(out_fd, in_fd, NULL, count, 0);
1301 }
1302
1303 SYSCALL_DEFINE4(sendfile64, int, out_fd, int, in_fd, loff_t __user *, offset, size_t, count)
1304 {
1305         loff_t pos;
1306         ssize_t ret;
1307
1308         if (offset) {
1309                 if (unlikely(copy_from_user(&pos, offset, sizeof(loff_t))))
1310                         return -EFAULT;
1311                 ret = do_sendfile(out_fd, in_fd, &pos, count, 0);
1312                 if (unlikely(put_user(pos, offset)))
1313                         return -EFAULT;
1314                 return ret;
1315         }
1316
1317         return do_sendfile(out_fd, in_fd, NULL, count, 0);
1318 }
1319
1320 #ifdef CONFIG_COMPAT
1321 COMPAT_SYSCALL_DEFINE4(sendfile, int, out_fd, int, in_fd,
1322                 compat_off_t __user *, offset, compat_size_t, count)
1323 {
1324         loff_t pos;
1325         off_t off;
1326         ssize_t ret;
1327
1328         if (offset) {
1329                 if (unlikely(get_user(off, offset)))
1330                         return -EFAULT;
1331                 pos = off;
1332                 ret = do_sendfile(out_fd, in_fd, &pos, count, MAX_NON_LFS);
1333                 if (unlikely(put_user(pos, offset)))
1334                         return -EFAULT;
1335                 return ret;
1336         }
1337
1338         return do_sendfile(out_fd, in_fd, NULL, count, 0);
1339 }
1340
1341 COMPAT_SYSCALL_DEFINE4(sendfile64, int, out_fd, int, in_fd,
1342                 compat_loff_t __user *, offset, compat_size_t, count)
1343 {
1344         loff_t pos;
1345         ssize_t ret;
1346
1347         if (offset) {
1348                 if (unlikely(copy_from_user(&pos, offset, sizeof(loff_t))))
1349                         return -EFAULT;
1350                 ret = do_sendfile(out_fd, in_fd, &pos, count, 0);
1351                 if (unlikely(put_user(pos, offset)))
1352                         return -EFAULT;
1353                 return ret;
1354         }
1355
1356         return do_sendfile(out_fd, in_fd, NULL, count, 0);
1357 }
1358 #endif
1359
1360 /**
1361  * generic_copy_file_range - copy data between two files
1362  * @file_in:    file structure to read from
1363  * @pos_in:     file offset to read from
1364  * @file_out:   file structure to write data to
1365  * @pos_out:    file offset to write data to
1366  * @len:        amount of data to copy
1367  * @flags:      copy flags
1368  *
1369  * This is a generic filesystem helper to copy data from one file to another.
1370  * It has no constraints on the source or destination file owners - the files
1371  * can belong to different superblocks and different filesystem types. Short
1372  * copies are allowed.
1373  *
1374  * This should be called from the @file_out filesystem, as per the
1375  * ->copy_file_range() method.
1376  *
1377  * Returns the number of bytes copied or a negative error indicating the
1378  * failure.
1379  */
1380
1381 ssize_t generic_copy_file_range(struct file *file_in, loff_t pos_in,
1382                                 struct file *file_out, loff_t pos_out,
1383                                 size_t len, unsigned int flags)
1384 {
1385         return do_splice_direct(file_in, &pos_in, file_out, &pos_out,
1386                                 len > MAX_RW_COUNT ? MAX_RW_COUNT : len, 0);
1387 }
1388 EXPORT_SYMBOL(generic_copy_file_range);
1389
1390 /*
1391  * Performs necessary checks before doing a file copy
1392  *
1393  * Can adjust amount of bytes to copy via @req_count argument.
1394  * Returns appropriate error code that caller should return or
1395  * zero in case the copy should be allowed.
1396  */
1397 static int generic_copy_file_checks(struct file *file_in, loff_t pos_in,
1398                                     struct file *file_out, loff_t pos_out,
1399                                     size_t *req_count, unsigned int flags)
1400 {
1401         struct inode *inode_in = file_inode(file_in);
1402         struct inode *inode_out = file_inode(file_out);
1403         uint64_t count = *req_count;
1404         loff_t size_in;
1405         int ret;
1406
1407         ret = generic_file_rw_checks(file_in, file_out);
1408         if (ret)
1409                 return ret;
1410
1411         /*
1412          * We allow some filesystems to handle cross sb copy, but passing
1413          * a file of the wrong filesystem type to filesystem driver can result
1414          * in an attempt to dereference the wrong type of ->private_data, so
1415          * avoid doing that until we really have a good reason.
1416          *
1417          * nfs and cifs define several different file_system_type structures
1418          * and several different sets of file_operations, but they all end up
1419          * using the same ->copy_file_range() function pointer.
1420          */
1421         if (file_out->f_op->copy_file_range) {
1422                 if (file_in->f_op->copy_file_range !=
1423                     file_out->f_op->copy_file_range)
1424                         return -EXDEV;
1425         } else if (file_inode(file_in)->i_sb != file_inode(file_out)->i_sb) {
1426                 return -EXDEV;
1427         }
1428
1429         /* Don't touch certain kinds of inodes */
1430         if (IS_IMMUTABLE(inode_out))
1431                 return -EPERM;
1432
1433         if (IS_SWAPFILE(inode_in) || IS_SWAPFILE(inode_out))
1434                 return -ETXTBSY;
1435
1436         /* Ensure offsets don't wrap. */
1437         if (pos_in + count < pos_in || pos_out + count < pos_out)
1438                 return -EOVERFLOW;
1439
1440         /* Shorten the copy to EOF */
1441         size_in = i_size_read(inode_in);
1442         if (pos_in >= size_in)
1443                 count = 0;
1444         else
1445                 count = min(count, size_in - (uint64_t)pos_in);
1446
1447         ret = generic_write_check_limits(file_out, pos_out, &count);
1448         if (ret)
1449                 return ret;
1450
1451         /* Don't allow overlapped copying within the same file. */
1452         if (inode_in == inode_out &&
1453             pos_out + count > pos_in &&
1454             pos_out < pos_in + count)
1455                 return -EINVAL;
1456
1457         *req_count = count;
1458         return 0;
1459 }
1460
1461 /*
1462  * copy_file_range() differs from regular file read and write in that it
1463  * specifically allows return partial success.  When it does so is up to
1464  * the copy_file_range method.
1465  */
1466 ssize_t vfs_copy_file_range(struct file *file_in, loff_t pos_in,
1467                             struct file *file_out, loff_t pos_out,
1468                             size_t len, unsigned int flags)
1469 {
1470         ssize_t ret;
1471
1472         if (flags != 0)
1473                 return -EINVAL;
1474
1475         ret = generic_copy_file_checks(file_in, pos_in, file_out, pos_out, &len,
1476                                        flags);
1477         if (unlikely(ret))
1478                 return ret;
1479
1480         ret = rw_verify_area(READ, file_in, &pos_in, len);
1481         if (unlikely(ret))
1482                 return ret;
1483
1484         ret = rw_verify_area(WRITE, file_out, &pos_out, len);
1485         if (unlikely(ret))
1486                 return ret;
1487
1488         if (len == 0)
1489                 return 0;
1490
1491         file_start_write(file_out);
1492
1493         /*
1494          * Cloning is supported by more file systems, so we implement copy on
1495          * same sb using clone, but for filesystems where both clone and copy
1496          * are supported (e.g. nfs,cifs), we only call the copy method.
1497          */
1498         if (file_out->f_op->copy_file_range) {
1499                 ret = file_out->f_op->copy_file_range(file_in, pos_in,
1500                                                       file_out, pos_out,
1501                                                       len, flags);
1502                 goto done;
1503         }
1504
1505         if (file_in->f_op->remap_file_range &&
1506             file_inode(file_in)->i_sb == file_inode(file_out)->i_sb) {
1507                 ret = file_in->f_op->remap_file_range(file_in, pos_in,
1508                                 file_out, pos_out,
1509                                 min_t(loff_t, MAX_RW_COUNT, len),
1510                                 REMAP_FILE_CAN_SHORTEN);
1511                 if (ret > 0)
1512                         goto done;
1513         }
1514
1515         /*
1516          * We can get here for same sb copy of filesystems that do not implement
1517          * ->copy_file_range() in case filesystem does not support clone or in
1518          * case filesystem supports clone but rejected the clone request (e.g.
1519          * because it was not block aligned).
1520          *
1521          * In both cases, fall back to kernel copy so we are able to maintain a
1522          * consistent story about which filesystems support copy_file_range()
1523          * and which filesystems do not, that will allow userspace tools to
1524          * make consistent desicions w.r.t using copy_file_range().
1525          */
1526         ret = generic_copy_file_range(file_in, pos_in, file_out, pos_out, len,
1527                                       flags);
1528
1529 done:
1530         if (ret > 0) {
1531                 fsnotify_access(file_in);
1532                 add_rchar(current, ret);
1533                 fsnotify_modify(file_out);
1534                 add_wchar(current, ret);
1535         }
1536
1537         inc_syscr(current);
1538         inc_syscw(current);
1539
1540         file_end_write(file_out);
1541
1542         return ret;
1543 }
1544 EXPORT_SYMBOL(vfs_copy_file_range);
1545
1546 SYSCALL_DEFINE6(copy_file_range, int, fd_in, loff_t __user *, off_in,
1547                 int, fd_out, loff_t __user *, off_out,
1548                 size_t, len, unsigned int, flags)
1549 {
1550         loff_t pos_in;
1551         loff_t pos_out;
1552         struct fd f_in;
1553         struct fd f_out;
1554         ssize_t ret = -EBADF;
1555
1556         f_in = fdget(fd_in);
1557         if (!f_in.file)
1558                 goto out2;
1559
1560         f_out = fdget(fd_out);
1561         if (!f_out.file)
1562                 goto out1;
1563
1564         ret = -EFAULT;
1565         if (off_in) {
1566                 if (copy_from_user(&pos_in, off_in, sizeof(loff_t)))
1567                         goto out;
1568         } else {
1569                 pos_in = f_in.file->f_pos;
1570         }
1571
1572         if (off_out) {
1573                 if (copy_from_user(&pos_out, off_out, sizeof(loff_t)))
1574                         goto out;
1575         } else {
1576                 pos_out = f_out.file->f_pos;
1577         }
1578
1579         ret = vfs_copy_file_range(f_in.file, pos_in, f_out.file, pos_out, len,
1580                                   flags);
1581         if (ret > 0) {
1582                 pos_in += ret;
1583                 pos_out += ret;
1584
1585                 if (off_in) {
1586                         if (copy_to_user(off_in, &pos_in, sizeof(loff_t)))
1587                                 ret = -EFAULT;
1588                 } else {
1589                         f_in.file->f_pos = pos_in;
1590                 }
1591
1592                 if (off_out) {
1593                         if (copy_to_user(off_out, &pos_out, sizeof(loff_t)))
1594                                 ret = -EFAULT;
1595                 } else {
1596                         f_out.file->f_pos = pos_out;
1597                 }
1598         }
1599
1600 out:
1601         fdput(f_out);
1602 out1:
1603         fdput(f_in);
1604 out2:
1605         return ret;
1606 }
1607
1608 /*
1609  * Don't operate on ranges the page cache doesn't support, and don't exceed the
1610  * LFS limits.  If pos is under the limit it becomes a short access.  If it
1611  * exceeds the limit we return -EFBIG.
1612  */
1613 int generic_write_check_limits(struct file *file, loff_t pos, loff_t *count)
1614 {
1615         struct inode *inode = file->f_mapping->host;
1616         loff_t max_size = inode->i_sb->s_maxbytes;
1617         loff_t limit = rlimit(RLIMIT_FSIZE);
1618
1619         if (limit != RLIM_INFINITY) {
1620                 if (pos >= limit) {
1621                         send_sig(SIGXFSZ, current, 0);
1622                         return -EFBIG;
1623                 }
1624                 *count = min(*count, limit - pos);
1625         }
1626
1627         if (!(file->f_flags & O_LARGEFILE))
1628                 max_size = MAX_NON_LFS;
1629
1630         if (unlikely(pos >= max_size))
1631                 return -EFBIG;
1632
1633         *count = min(*count, max_size - pos);
1634
1635         return 0;
1636 }
1637
1638 /*
1639  * Performs necessary checks before doing a write
1640  *
1641  * Can adjust writing position or amount of bytes to write.
1642  * Returns appropriate error code that caller should return or
1643  * zero in case that write should be allowed.
1644  */
1645 ssize_t generic_write_checks(struct kiocb *iocb, struct iov_iter *from)
1646 {
1647         struct file *file = iocb->ki_filp;
1648         struct inode *inode = file->f_mapping->host;
1649         loff_t count;
1650         int ret;
1651
1652         if (IS_SWAPFILE(inode))
1653                 return -ETXTBSY;
1654
1655         if (!iov_iter_count(from))
1656                 return 0;
1657
1658         /* FIXME: this is for backwards compatibility with 2.4 */
1659         if (iocb->ki_flags & IOCB_APPEND)
1660                 iocb->ki_pos = i_size_read(inode);
1661
1662         if ((iocb->ki_flags & IOCB_NOWAIT) && !(iocb->ki_flags & IOCB_DIRECT))
1663                 return -EINVAL;
1664
1665         count = iov_iter_count(from);
1666         ret = generic_write_check_limits(file, iocb->ki_pos, &count);
1667         if (ret)
1668                 return ret;
1669
1670         iov_iter_truncate(from, count);
1671         return iov_iter_count(from);
1672 }
1673 EXPORT_SYMBOL(generic_write_checks);
1674
1675 /*
1676  * Performs common checks before doing a file copy/clone
1677  * from @file_in to @file_out.
1678  */
1679 int generic_file_rw_checks(struct file *file_in, struct file *file_out)
1680 {
1681         struct inode *inode_in = file_inode(file_in);
1682         struct inode *inode_out = file_inode(file_out);
1683
1684         /* Don't copy dirs, pipes, sockets... */
1685         if (S_ISDIR(inode_in->i_mode) || S_ISDIR(inode_out->i_mode))
1686                 return -EISDIR;
1687         if (!S_ISREG(inode_in->i_mode) || !S_ISREG(inode_out->i_mode))
1688                 return -EINVAL;
1689
1690         if (!(file_in->f_mode & FMODE_READ) ||
1691             !(file_out->f_mode & FMODE_WRITE) ||
1692             (file_out->f_flags & O_APPEND))
1693                 return -EBADF;
1694
1695         return 0;
1696 }