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 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 #ifdef __ARCH_WANT_SYS_LLSEEK
 335 SYSCALL_DEFINE5(llseek, unsigned int, fd, unsigned long, offset_high,
 336                 unsigned long, offset_low, loff_t __user *, result,
 337                 unsigned int, whence)
 338 {
 339         int retval;
 340         struct fd f = fdget_pos(fd);
 341         loff_t offset;
 342
 343         if (!f.file)
 344                 return -EBADF;
 345
 346         retval = -EINVAL;
 347         if (whence > SEEK_MAX)
 348                 goto out_putf;
 349
 350         offset = vfs_llseek(f.file, ((loff_t) offset_high << 32) | offset_low,
 351                         whence);
 352
 353         retval = (int)offset;
 354         if (offset >= 0) {
 355                 retval = -EFAULT;
 356                 if (!copy_to_user(result, &offset, sizeof(offset)))
 357                         retval = 0;
 358         }
 359 out_putf:
 360         fdput_pos(f);
 361         return retval;
 362 }
 363 #endif
 364
 365 int rw_verify_area(int read_write, struct file *file, const loff_t *ppos, size_t count)
 366 {
 367         struct inode *inode;
 368         loff_t pos;
 369         int retval = -EINVAL;
 370
 371         inode = file_inode(file);
 372         if (unlikely((ssize_t) count < 0))
 373                 return retval;
 374         pos = *ppos;
 375         if (unlikely(pos < 0)) {
 376                 if (!unsigned_offsets(file))
 377                         return retval;
 378                 if (count >= -pos) /* both values are in 0..LLONG_MAX */
 379                         return -EOVERFLOW;
 380         } else if (unlikely((loff_t) (pos + count) < 0)) {
 381                 if (!unsigned_offsets(file))
 382                         return retval;
 383         }
 384
 385         if (unlikely(inode->i_flctx && mandatory_lock(inode))) {
 386                 retval = locks_mandatory_area(inode, file, pos, pos + count - 1,
 387                                 read_write == READ ? F_RDLCK : F_WRLCK);
 388                 if (retval < 0)
 389                         return retval;
 390         }
 391         return security_file_permission(file,
 392                                 read_write == READ ? MAY_READ : MAY_WRITE);
 393 }
 394
 395 static ssize_t new_sync_read(struct file *filp, char __user *buf, size_t len, loff_t *ppos)
 396 {
 397         struct iovec iov = { .iov_base = buf, .iov_len = len };
 398         struct kiocb kiocb;
 399         struct iov_iter iter;
 400         ssize_t ret;
 401
 402         init_sync_kiocb(&kiocb, filp);
 403         kiocb.ki_pos = *ppos;
 404         iov_iter_init(&iter, READ, &iov, 1, len);
 405
 406         ret = call_read_iter(filp, &kiocb, &iter);
 407         BUG_ON(ret == -EIOCBQUEUED);
 408         *ppos = kiocb.ki_pos;
 409         return ret;
 410 }
 411
 412 ssize_t __vfs_read(struct file *file, char __user *buf, size_t count,
 413                    loff_t *pos)
 414 {
 415         if (file->f_op->read)
 416                 return file->f_op->read(file, buf, count, pos);
 417         else if (file->f_op->read_iter)
 418                 return new_sync_read(file, buf, count, pos);
 419         else
 420                 return -EINVAL;
 421 }
 422
 423 ssize_t kernel_read(struct file *file, void *buf, size_t count, loff_t *pos)
 424 {
 425         mm_segment_t old_fs;
 426         ssize_t result;
 427
 428         old_fs = get_fs();
 429         set_fs(get_ds());
 430         /* The cast to a user pointer is valid due to the set_fs() */
 431         result = vfs_read(file, (void __user *)buf, count, pos);
 432         set_fs(old_fs);
 433         return result;
 434 }
 435 EXPORT_SYMBOL(kernel_read);
 436
 437 ssize_t vfs_read(struct file *file, char __user *buf, size_t count, loff_t *pos)
 438 {
 439         ssize_t ret;
 440
 441         if (!(file->f_mode & FMODE_READ))
 442                 return -EBADF;
 443         if (!(file->f_mode & FMODE_CAN_READ))
 444                 return -EINVAL;
 445         if (unlikely(!access_ok(VERIFY_WRITE, buf, count)))
 446                 return -EFAULT;
 447
 448         ret = rw_verify_area(READ, file, pos, count);
 449         if (!ret) {
 450                 if (count > MAX_RW_COUNT)
 451                         count =  MAX_RW_COUNT;
 452                 ret = __vfs_read(file, buf, count, pos);
 453                 if (ret > 0) {
 454                         fsnotify_access(file);
 455                         add_rchar(current, ret);
 456                 }
 457                 inc_syscr(current);
 458         }
 459
 460         return ret;
 461 }
 462
 463 static ssize_t new_sync_write(struct file *filp, const char __user *buf, size_t len, loff_t *ppos)
 464 {
 465         struct iovec iov = { .iov_base = (void __user *)buf, .iov_len = len };
 466         struct kiocb kiocb;
 467         struct iov_iter iter;
 468         ssize_t ret;
 469
 470         init_sync_kiocb(&kiocb, filp);
 471         kiocb.ki_pos = *ppos;
 472         iov_iter_init(&iter, WRITE, &iov, 1, len);
 473
 474         ret = call_write_iter(filp, &kiocb, &iter);
 475         BUG_ON(ret == -EIOCBQUEUED);
 476         if (ret > 0)
 477                 *ppos = kiocb.ki_pos;
 478         return ret;
 479 }
 480
 481 ssize_t __vfs_write(struct file *file, const char __user *p, size_t count,
 482                     loff_t *pos)
 483 {
 484         if (file->f_op->write)
 485                 return file->f_op->write(file, p, count, pos);
 486         else if (file->f_op->write_iter)
 487                 return new_sync_write(file, p, count, pos);
 488         else
 489                 return -EINVAL;
 490 }
 491
 492 ssize_t __kernel_write(struct file *file, const void *buf, size_t count, loff_t *pos)
 493 {
 494         mm_segment_t old_fs;
 495         const char __user *p;
 496         ssize_t ret;
 497
 498         if (!(file->f_mode & FMODE_CAN_WRITE))
 499                 return -EINVAL;
 500
 501         old_fs = get_fs();
 502         set_fs(get_ds());
 503         p = (__force const char __user *)buf;
 504         if (count > MAX_RW_COUNT)
 505                 count =  MAX_RW_COUNT;
 506         ret = __vfs_write(file, p, count, pos);
 507         set_fs(old_fs);
 508         if (ret > 0) {
 509                 fsnotify_modify(file);
 510                 add_wchar(current, ret);
 511         }
 512         inc_syscw(current);
 513         return ret;
 514 }
 515 EXPORT_SYMBOL(__kernel_write);
 516
 517 ssize_t kernel_write(struct file *file, const void *buf, size_t count,
 518                             loff_t *pos)
 519 {
 520         mm_segment_t old_fs;
 521         ssize_t res;
 522
 523         old_fs = get_fs();
 524         set_fs(get_ds());
 525         /* The cast to a user pointer is valid due to the set_fs() */
 526         res = vfs_write(file, (__force const char __user *)buf, count, pos);
 527         set_fs(old_fs);
 528
 529         return res;
 530 }
 531 EXPORT_SYMBOL(kernel_write);
 532
 533 ssize_t vfs_write(struct file *file, const char __user *buf, size_t count, loff_t *pos)
 534 {
 535         ssize_t ret;
 536
 537         if (!(file->f_mode & FMODE_WRITE))
 538                 return -EBADF;
 539         if (!(file->f_mode & FMODE_CAN_WRITE))
 540                 return -EINVAL;
 541         if (unlikely(!access_ok(VERIFY_READ, buf, count)))
 542                 return -EFAULT;
 543
 544         ret = rw_verify_area(WRITE, file, pos, count);
 545         if (!ret) {
 546                 if (count > MAX_RW_COUNT)
 547                         count =  MAX_RW_COUNT;
 548                 file_start_write(file);
 549                 ret = __vfs_write(file, buf, count, pos);
 550                 if (ret > 0) {
 551                         fsnotify_modify(file);
 552                         add_wchar(current, ret);
 553                 }
 554                 inc_syscw(current);
 555                 file_end_write(file);
 556         }
 557
 558         return ret;
 559 }
 560
 561 static inline loff_t file_pos_read(struct file *file)
 562 {
 563         return file->f_mode & FMODE_STREAM ? 0 : file->f_pos;
 564 }
 565
 566 static inline void file_pos_write(struct file *file, loff_t pos)
 567 {
 568         if ((file->f_mode & FMODE_STREAM) == 0)
 569                 file->f_pos = pos;
 570 }
 571
 572 ssize_t ksys_read(unsigned int fd, char __user *buf, size_t count)
 573 {
 574         struct fd f = fdget_pos(fd);
 575         ssize_t ret = -EBADF;
 576
 577         if (f.file) {
 578                 loff_t pos = file_pos_read(f.file);
 579                 ret = vfs_read(f.file, buf, count, &pos);
 580                 if (ret >= 0)
 581                         file_pos_write(f.file, pos);
 582                 fdput_pos(f);
 583         }
 584         return ret;
 585 }
 586
 587 SYSCALL_DEFINE3(read, unsigned int, fd, char __user *, buf, size_t, count)
 588 {
 589         return ksys_read(fd, buf, count);
 590 }
 591
 592 ssize_t ksys_write(unsigned int fd, const char __user *buf, size_t count)
 593 {
 594         struct fd f = fdget_pos(fd);
 595         ssize_t ret = -EBADF;
 596
 597         if (f.file) {
 598                 loff_t pos = file_pos_read(f.file);
 599                 ret = vfs_write(f.file, buf, count, &pos);
 600                 if (ret >= 0)
 601                         file_pos_write(f.file, pos);
 602                 fdput_pos(f);
 603         }
 604
 605         return ret;
 606 }
 607
 608 SYSCALL_DEFINE3(write, unsigned int, fd, const char __user *, buf,
 609                 size_t, count)
 610 {
 611         return ksys_write(fd, buf, count);
 612 }
 613
 614 ssize_t ksys_pread64(unsigned int fd, char __user *buf, size_t count,
 615                      loff_t pos)
 616 {
 617         struct fd f;
 618         ssize_t ret = -EBADF;
 619
 620         if (pos < 0)
 621                 return -EINVAL;
 622
 623         f = fdget(fd);
 624         if (f.file) {
 625                 ret = -ESPIPE;
 626                 if (f.file->f_mode & FMODE_PREAD)
 627                         ret = vfs_read(f.file, buf, count, &pos);
 628                 fdput(f);
 629         }
 630
 631         return ret;
 632 }
 633
 634 SYSCALL_DEFINE4(pread64, unsigned int, fd, char __user *, buf,
 635                         size_t, count, loff_t, pos)
 636 {
 637         return ksys_pread64(fd, buf, count, pos);
 638 }
 639
 640 ssize_t ksys_pwrite64(unsigned int fd, const char __user *buf,
 641                       size_t count, loff_t pos)
 642 {
 643         struct fd f;
 644         ssize_t ret = -EBADF;
 645
 646         if (pos < 0)
 647                 return -EINVAL;
 648
 649         f = fdget(fd);
 650         if (f.file) {
 651                 ret = -ESPIPE;
 652                 if (f.file->f_mode & FMODE_PWRITE)
 653                         ret = vfs_write(f.file, buf, count, &pos);
 654                 fdput(f);
 655         }
 656
 657         return ret;
 658 }
 659
 660 SYSCALL_DEFINE4(pwrite64, unsigned int, fd, const char __user *, buf,
 661                          size_t, count, loff_t, pos)
 662 {
 663         return ksys_pwrite64(fd, buf, count, pos);
 664 }
 665
 666 static ssize_t do_iter_readv_writev(struct file *filp, struct iov_iter *iter,
 667                 loff_t *ppos, int type, rwf_t flags)
 668 {
 669         struct kiocb kiocb;
 670         ssize_t ret;
 671
 672         init_sync_kiocb(&kiocb, filp);
 673         ret = kiocb_set_rw_flags(&kiocb, flags);
 674         if (ret)
 675                 return ret;
 676         kiocb.ki_pos = *ppos;
 677
 678         if (type == READ)
 679                 ret = call_read_iter(filp, &kiocb, iter);
 680         else
 681                 ret = call_write_iter(filp, &kiocb, iter);
 682         BUG_ON(ret == -EIOCBQUEUED);
 683         *ppos = kiocb.ki_pos;
 684         return ret;
 685 }
 686
 687 /* Do it by hand, with file-ops */
 688 static ssize_t do_loop_readv_writev(struct file *filp, struct iov_iter *iter,
 689                 loff_t *ppos, int type, rwf_t flags)
 690 {
 691         ssize_t ret = 0;
 692
 693         if (flags & ~RWF_HIPRI)
 694                 return -EOPNOTSUPP;
 695
 696         while (iov_iter_count(iter)) {
 697                 struct iovec iovec = iov_iter_iovec(iter);
 698                 ssize_t nr;
 699
 700                 if (type == READ) {
 701                         nr = filp->f_op->read(filp, iovec.iov_base,
 702                                               iovec.iov_len, ppos);
 703                 } else {
 704                         nr = filp->f_op->write(filp, iovec.iov_base,
 705                                                iovec.iov_len, ppos);
 706                 }
 707
 708                 if (nr < 0) {
 709                         if (!ret)
 710                                 ret = nr;
 711                         break;
 712                 }
 713                 ret += nr;
 714                 if (nr != iovec.iov_len)
 715                         break;
 716                 iov_iter_advance(iter, nr);
 717         }
 718
 719         return ret;
 720 }
 721
 722 /* A write operation does a read from user space and vice versa */
 723 #define vrfy_dir(type) ((type) == READ ? VERIFY_WRITE : VERIFY_READ)
 724
 725 /**
 726  * rw_copy_check_uvector() - Copy an array of &struct iovec from userspace
 727  *     into the kernel and check that it is valid.
 728  *
 729  * @type: One of %CHECK_IOVEC_ONLY, %READ, or %WRITE.
 730  * @uvector: Pointer to the userspace array.
 731  * @nr_segs: Number of elements in userspace array.
 732  * @fast_segs: Number of elements in @fast_pointer.
 733  * @fast_pointer: Pointer to (usually small on-stack) kernel array.
 734  * @ret_pointer: (output parameter) Pointer to a variable that will point to
 735  *     either @fast_pointer, a newly allocated kernel array, or NULL,
 736  *     depending on which array was used.
 737  *
 738  * This function copies an array of &struct iovec of @nr_segs from
 739  * userspace into the kernel and checks that each element is valid (e.g.
 740  * it does not point to a kernel address or cause overflow by being too
 741  * large, etc.).
 742  *
 743  * As an optimization, the caller may provide a pointer to a small
 744  * on-stack array in @fast_pointer, typically %UIO_FASTIOV elements long
 745  * (the size of this array, or 0 if unused, should be given in @fast_segs).
 746  *
 747  * @ret_pointer will always point to the array that was used, so the
 748  * caller must take care not to call kfree() on it e.g. in case the
 749  * @fast_pointer array was used and it was allocated on the stack.
 750  *
 751  * Return: The total number of bytes covered by the iovec array on success
 752  *   or a negative error code on error.
 753  */
 754 ssize_t rw_copy_check_uvector(int type, const struct iovec __user * uvector,
 755                               unsigned long nr_segs, unsigned long fast_segs,
 756                               struct iovec *fast_pointer,
 757                               struct iovec **ret_pointer)
 758 {
 759         unsigned long seg;
 760         ssize_t ret;
 761         struct iovec *iov = fast_pointer;
 762
 763         /*
 764          * SuS says "The readv() function *may* fail if the iovcnt argument
 765          * was less than or equal to 0, or greater than {IOV_MAX}.  Linux has
 766          * traditionally returned zero for zero segments, so...
 767          */
 768         if (nr_segs == 0) {
 769                 ret = 0;
 770                 goto out;
 771         }
 772
 773         /*
 774          * First get the "struct iovec" from user memory and
 775          * verify all the pointers
 776          */
 777         if (nr_segs > UIO_MAXIOV) {
 778                 ret = -EINVAL;
 779                 goto out;
 780         }
 781         if (nr_segs > fast_segs) {
 782                 iov = kmalloc_array(nr_segs, sizeof(struct iovec), GFP_KERNEL);
 783                 if (iov == NULL) {
 784                         ret = -ENOMEM;
 785                         goto out;
 786                 }
 787         }
 788         if (copy_from_user(iov, uvector, nr_segs*sizeof(*uvector))) {
 789                 ret = -EFAULT;
 790                 goto out;
 791         }
 792
 793         /*
 794          * According to the Single Unix Specification we should return EINVAL
 795          * if an element length is < 0 when cast to ssize_t or if the
 796          * total length would overflow the ssize_t return value of the
 797          * system call.
 798          *
 799          * Linux caps all read/write calls to MAX_RW_COUNT, and avoids the
 800          * overflow case.
 801          */
 802         ret = 0;
 803         for (seg = 0; seg < nr_segs; seg++) {
 804                 void __user *buf = iov[seg].iov_base;
 805                 ssize_t len = (ssize_t)iov[seg].iov_len;
 806
 807                 /* see if we we're about to use an invalid len or if
 808                  * it's about to overflow ssize_t */
 809                 if (len < 0) {
 810                         ret = -EINVAL;
 811                         goto out;
 812                 }
 813                 if (type >= 0
 814                     && unlikely(!access_ok(vrfy_dir(type), buf, len))) {
 815                         ret = -EFAULT;
 816                         goto out;
 817                 }
 818                 if (len > MAX_RW_COUNT - ret) {
 819                         len = MAX_RW_COUNT - ret;
 820                         iov[seg].iov_len = len;
 821                 }
 822                 ret += len;
 823         }
 824 out:
 825         *ret_pointer = iov;
 826         return ret;
 827 }
 828
 829 #ifdef CONFIG_COMPAT
 830 ssize_t compat_rw_copy_check_uvector(int type,
 831                 const struct compat_iovec __user *uvector, unsigned long nr_segs,
 832                 unsigned long fast_segs, struct iovec *fast_pointer,
 833                 struct iovec **ret_pointer)
 834 {
 835         compat_ssize_t tot_len;
 836         struct iovec *iov = *ret_pointer = fast_pointer;
 837         ssize_t ret = 0;
 838         int seg;
 839
 840         /*
 841          * SuS says "The readv() function *may* fail if the iovcnt argument
 842          * was less than or equal to 0, or greater than {IOV_MAX}.  Linux has
 843          * traditionally returned zero for zero segments, so...
 844          */
 845         if (nr_segs == 0)
 846                 goto out;
 847
 848         ret = -EINVAL;
 849         if (nr_segs > UIO_MAXIOV)
 850                 goto out;
 851         if (nr_segs > fast_segs) {
 852                 ret = -ENOMEM;
 853                 iov = kmalloc_array(nr_segs, sizeof(struct iovec), GFP_KERNEL);
 854                 if (iov == NULL)
 855                         goto out;
 856         }
 857         *ret_pointer = iov;
 858
 859         ret = -EFAULT;
 860         if (!access_ok(VERIFY_READ, uvector, nr_segs*sizeof(*uvector)))
 861                 goto out;
 862
 863         /*
 864          * Single unix specification:
 865          * We should -EINVAL if an element length is not >= 0 and fitting an
 866          * ssize_t.
 867          *
 868          * In Linux, the total length is limited to MAX_RW_COUNT, there is
 869          * no overflow possibility.
 870          */
 871         tot_len = 0;
 872         ret = -EINVAL;
 873         for (seg = 0; seg < nr_segs; seg++) {
 874                 compat_uptr_t buf;
 875                 compat_ssize_t len;
 876
 877                 if (__get_user(len, &uvector->iov_len) ||
 878                    __get_user(buf, &uvector->iov_base)) {
 879                         ret = -EFAULT;
 880                         goto out;
 881                 }
 882                 if (len < 0)    /* size_t not fitting in compat_ssize_t .. */
 883                         goto out;
 884                 if (type >= 0 &&
 885                     !access_ok(vrfy_dir(type), compat_ptr(buf), len)) {
 886                         ret = -EFAULT;
 887                         goto out;
 888                 }
 889                 if (len > MAX_RW_COUNT - tot_len)
 890                         len = MAX_RW_COUNT - tot_len;
 891                 tot_len += len;
 892                 iov->iov_base = compat_ptr(buf);
 893                 iov->iov_len = (compat_size_t) len;
 894                 uvector++;
 895                 iov++;
 896         }
 897         ret = tot_len;
 898
 899 out:
 900         return ret;
 901 }
 902 #endif
 903
 904 static ssize_t do_iter_read(struct file *file, struct iov_iter *iter,
 905                 loff_t *pos, rwf_t flags)
 906 {
 907         size_t tot_len;
 908         ssize_t ret = 0;
 909
 910         if (!(file->f_mode & FMODE_READ))
 911                 return -EBADF;
 912         if (!(file->f_mode & FMODE_CAN_READ))
 913                 return -EINVAL;
 914
 915         tot_len = iov_iter_count(iter);
 916         if (!tot_len)
 917                 goto out;
 918         ret = rw_verify_area(READ, file, pos, tot_len);
 919         if (ret < 0)
 920                 return ret;
 921
 922         if (file->f_op->read_iter)
 923                 ret = do_iter_readv_writev(file, iter, pos, READ, flags);
 924         else
 925                 ret = do_loop_readv_writev(file, iter, pos, READ, flags);
 926 out:
 927         if (ret >= 0)
 928                 fsnotify_access(file);
 929         return ret;
 930 }
 931
 932 ssize_t vfs_iter_read(struct file *file, struct iov_iter *iter, loff_t *ppos,
 933                 rwf_t flags)
 934 {
 935         if (!file->f_op->read_iter)
 936                 return -EINVAL;
 937         return do_iter_read(file, iter, ppos, flags);
 938 }
 939 EXPORT_SYMBOL(vfs_iter_read);
 940
 941 static ssize_t do_iter_write(struct file *file, struct iov_iter *iter,
 942                 loff_t *pos, rwf_t flags)
 943 {
 944         size_t tot_len;
 945         ssize_t ret = 0;
 946
 947         if (!(file->f_mode & FMODE_WRITE))
 948                 return -EBADF;
 949         if (!(file->f_mode & FMODE_CAN_WRITE))
 950                 return -EINVAL;
 951
 952         tot_len = iov_iter_count(iter);
 953         if (!tot_len)
 954                 return 0;
 955         ret = rw_verify_area(WRITE, file, pos, tot_len);
 956         if (ret < 0)
 957                 return ret;
 958
 959         if (file->f_op->write_iter)
 960                 ret = do_iter_readv_writev(file, iter, pos, WRITE, flags);
 961         else
 962                 ret = do_loop_readv_writev(file, iter, pos, WRITE, flags);
 963         if (ret > 0)
 964                 fsnotify_modify(file);
 965         return ret;
 966 }
 967
 968 ssize_t vfs_iter_write(struct file *file, struct iov_iter *iter, loff_t *ppos,
 969                 rwf_t flags)
 970 {
 971         if (!file->f_op->write_iter)
 972                 return -EINVAL;
 973         return do_iter_write(file, iter, ppos, flags);
 974 }
 975 EXPORT_SYMBOL(vfs_iter_write);
 976
 977 ssize_t vfs_readv(struct file *file, const struct iovec __user *vec,
 978                   unsigned long vlen, loff_t *pos, rwf_t flags)
 979 {
 980         struct iovec iovstack[UIO_FASTIOV];
 981         struct iovec *iov = iovstack;
 982         struct iov_iter iter;
 983         ssize_t ret;
 984
 985         ret = import_iovec(READ, vec, vlen, ARRAY_SIZE(iovstack), &iov, &iter);
 986         if (ret >= 0) {
 987                 ret = do_iter_read(file, &iter, pos, flags);
 988                 kfree(iov);
 989         }
 990
 991         return ret;
 992 }
 993
 994 static ssize_t vfs_writev(struct file *file, const struct iovec __user *vec,
 995                    unsigned long vlen, loff_t *pos, rwf_t flags)
 996 {
 997         struct iovec iovstack[UIO_FASTIOV];
 998         struct iovec *iov = iovstack;
 999         struct iov_iter iter;
1000         ssize_t ret;
1001
1002         ret = import_iovec(WRITE, vec, vlen, ARRAY_SIZE(iovstack), &iov, &iter);
1003         if (ret >= 0) {
1004                 file_start_write(file);
1005                 ret = do_iter_write(file, &iter, pos, flags);
1006                 file_end_write(file);
1007                 kfree(iov);
1008         }
1009         return ret;
1010 }
1011
1012 static ssize_t do_readv(unsigned long fd, const struct iovec __user *vec,
1013                         unsigned long vlen, rwf_t flags)
1014 {
1015         struct fd f = fdget_pos(fd);
1016         ssize_t ret = -EBADF;
1017
1018         if (f.file) {
1019                 loff_t pos = file_pos_read(f.file);
1020                 ret = vfs_readv(f.file, vec, vlen, &pos, flags);
1021                 if (ret >= 0)
1022                         file_pos_write(f.file, pos);
1023                 fdput_pos(f);
1024         }
1025
1026         if (ret > 0)
1027                 add_rchar(current, ret);
1028         inc_syscr(current);
1029         return ret;
1030 }
1031
1032 static ssize_t do_writev(unsigned long fd, const struct iovec __user *vec,
1033                          unsigned long vlen, rwf_t flags)
1034 {
1035         struct fd f = fdget_pos(fd);
1036         ssize_t ret = -EBADF;
1037
1038         if (f.file) {
1039                 loff_t pos = file_pos_read(f.file);
1040                 ret = vfs_writev(f.file, vec, vlen, &pos, flags);
1041                 if (ret >= 0)
1042                         file_pos_write(f.file, pos);
1043                 fdput_pos(f);
1044         }
1045
1046         if (ret > 0)
1047                 add_wchar(current, ret);
1048         inc_syscw(current);
1049         return ret;
1050 }
1051
1052 static inline loff_t pos_from_hilo(unsigned long high, unsigned long low)
1053 {
1054 #define HALF_LONG_BITS (BITS_PER_LONG / 2)
1055         return (((loff_t)high << HALF_LONG_BITS) << HALF_LONG_BITS) | low;
1056 }
1057
1058 static ssize_t do_preadv(unsigned long fd, const struct iovec __user *vec,
1059                          unsigned long vlen, loff_t pos, rwf_t flags)
1060 {
1061         struct fd f;
1062         ssize_t ret = -EBADF;
1063
1064         if (pos < 0)
1065                 return -EINVAL;
1066
1067         f = fdget(fd);
1068         if (f.file) {
1069                 ret = -ESPIPE;
1070                 if (f.file->f_mode & FMODE_PREAD)
1071                         ret = vfs_readv(f.file, vec, vlen, &pos, flags);
1072                 fdput(f);
1073         }
1074
1075         if (ret > 0)
1076                 add_rchar(current, ret);
1077         inc_syscr(current);
1078         return ret;
1079 }
1080
1081 static ssize_t do_pwritev(unsigned long fd, const struct iovec __user *vec,
1082                           unsigned long vlen, loff_t pos, rwf_t flags)
1083 {
1084         struct fd f;
1085         ssize_t ret = -EBADF;
1086
1087         if (pos < 0)
1088                 return -EINVAL;
1089
1090         f = fdget(fd);
1091         if (f.file) {
1092                 ret = -ESPIPE;
1093                 if (f.file->f_mode & FMODE_PWRITE)
1094                         ret = vfs_writev(f.file, vec, vlen, &pos, flags);
1095                 fdput(f);
1096         }
1097
1098         if (ret > 0)
1099                 add_wchar(current, ret);
1100         inc_syscw(current);
1101         return ret;
1102 }
1103
1104 SYSCALL_DEFINE3(readv, unsigned long, fd, const struct iovec __user *, vec,
1105                 unsigned long, vlen)
1106 {
1107         return do_readv(fd, vec, vlen, 0);
1108 }
1109
1110 SYSCALL_DEFINE3(writev, unsigned long, fd, const struct iovec __user *, vec,
1111                 unsigned long, vlen)
1112 {
1113         return do_writev(fd, vec, vlen, 0);
1114 }
1115
1116 SYSCALL_DEFINE5(preadv, unsigned long, fd, const struct iovec __user *, vec,
1117                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h)
1118 {
1119         loff_t pos = pos_from_hilo(pos_h, pos_l);
1120
1121         return do_preadv(fd, vec, vlen, pos, 0);
1122 }
1123
1124 SYSCALL_DEFINE6(preadv2, unsigned long, fd, const struct iovec __user *, vec,
1125                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h,
1126                 rwf_t, flags)
1127 {
1128         loff_t pos = pos_from_hilo(pos_h, pos_l);
1129
1130         if (pos == -1)
1131                 return do_readv(fd, vec, vlen, flags);
1132
1133         return do_preadv(fd, vec, vlen, pos, flags);
1134 }
1135
1136 SYSCALL_DEFINE5(pwritev, unsigned long, fd, const struct iovec __user *, vec,
1137                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h)
1138 {
1139         loff_t pos = pos_from_hilo(pos_h, pos_l);
1140
1141         return do_pwritev(fd, vec, vlen, pos, 0);
1142 }
1143
1144 SYSCALL_DEFINE6(pwritev2, unsigned long, fd, const struct iovec __user *, vec,
1145                 unsigned long, vlen, unsigned long, pos_l, unsigned long, pos_h,
1146                 rwf_t, flags)
1147 {
1148         loff_t pos = pos_from_hilo(pos_h, pos_l);
1149
1150         if (pos == -1)
1151                 return do_writev(fd, vec, vlen, flags);
1152
1153         return do_pwritev(fd, vec, vlen, pos, flags);
1154 }
1155
1156 #ifdef CONFIG_COMPAT
1157 static size_t compat_readv(struct file *file,
1158                            const struct compat_iovec __user *vec,
1159                            unsigned long vlen, loff_t *pos, rwf_t flags)
1160 {
1161         struct iovec iovstack[UIO_FASTIOV];
1162         struct iovec *iov = iovstack;
1163         struct iov_iter iter;
1164         ssize_t ret;
1165
1166         ret = compat_import_iovec(READ, vec, vlen, UIO_FASTIOV, &iov, &iter);
1167         if (ret >= 0) {
1168                 ret = do_iter_read(file, &iter, pos, flags);
1169                 kfree(iov);
1170         }
1171         if (ret > 0)
1172                 add_rchar(current, ret);
1173         inc_syscr(current);
1174         return ret;
1175 }
1176
1177 static size_t do_compat_readv(compat_ulong_t fd,
1178                                  const struct compat_iovec __user *vec,
1179                                  compat_ulong_t vlen, rwf_t flags)
1180 {
1181         struct fd f = fdget_pos(fd);
1182         ssize_t ret;
1183         loff_t pos;
1184
1185         if (!f.file)
1186                 return -EBADF;
1187         pos = f.file->f_pos;
1188         ret = compat_readv(f.file, vec, vlen, &pos, flags);
1189         if (ret >= 0)
1190                 f.file->f_pos = pos;
1191         fdput_pos(f);
1192         return ret;
1193
1194 }
1195
1196 COMPAT_SYSCALL_DEFINE3(readv, compat_ulong_t, fd,
1197                 const struct compat_iovec __user *,vec,
1198                 compat_ulong_t, vlen)
1199 {
1200         return do_compat_readv(fd, vec, vlen, 0);
1201 }
1202
1203 static long do_compat_preadv64(unsigned long fd,
1204                                   const struct compat_iovec __user *vec,
1205                                   unsigned long vlen, loff_t pos, rwf_t flags)
1206 {
1207         struct fd f;
1208         ssize_t ret;
1209
1210         if (pos < 0)
1211                 return -EINVAL;
1212         f = fdget(fd);
1213         if (!f.file)
1214                 return -EBADF;
1215         ret = -ESPIPE;
1216         if (f.file->f_mode & FMODE_PREAD)
1217                 ret = compat_readv(f.file, vec, vlen, &pos, flags);
1218         fdput(f);
1219         return ret;
1220 }
1221
1222 #ifdef __ARCH_WANT_COMPAT_SYS_PREADV64
1223 COMPAT_SYSCALL_DEFINE4(preadv64, unsigned long, fd,
1224                 const struct compat_iovec __user *,vec,
1225                 unsigned long, vlen, loff_t, pos)
1226 {
1227         return do_compat_preadv64(fd, vec, vlen, pos, 0);
1228 }
1229 #endif
1230
1231 COMPAT_SYSCALL_DEFINE5(preadv, compat_ulong_t, fd,
1232                 const struct compat_iovec __user *,vec,
1233                 compat_ulong_t, vlen, u32, pos_low, u32, pos_high)
1234 {
1235         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1236
1237         return do_compat_preadv64(fd, vec, vlen, pos, 0);
1238 }
1239
1240 #ifdef __ARCH_WANT_COMPAT_SYS_PREADV64V2
1241 COMPAT_SYSCALL_DEFINE5(preadv64v2, unsigned long, fd,
1242                 const struct compat_iovec __user *,vec,
1243                 unsigned long, vlen, loff_t, pos, rwf_t, flags)
1244 {
1245         if (pos == -1)
1246                 return do_compat_readv(fd, vec, vlen, flags);
1247
1248         return do_compat_preadv64(fd, vec, vlen, pos, flags);
1249 }
1250 #endif
1251
1252 COMPAT_SYSCALL_DEFINE6(preadv2, compat_ulong_t, fd,
1253                 const struct compat_iovec __user *,vec,
1254                 compat_ulong_t, vlen, u32, pos_low, u32, pos_high,
1255                 rwf_t, flags)
1256 {
1257         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1258
1259         if (pos == -1)
1260                 return do_compat_readv(fd, vec, vlen, flags);
1261
1262         return do_compat_preadv64(fd, vec, vlen, pos, flags);
1263 }
1264
1265 static size_t compat_writev(struct file *file,
1266                             const struct compat_iovec __user *vec,
1267                             unsigned long vlen, loff_t *pos, rwf_t flags)
1268 {
1269         struct iovec iovstack[UIO_FASTIOV];
1270         struct iovec *iov = iovstack;
1271         struct iov_iter iter;
1272         ssize_t ret;
1273
1274         ret = compat_import_iovec(WRITE, vec, vlen, UIO_FASTIOV, &iov, &iter);
1275         if (ret >= 0) {
1276                 file_start_write(file);
1277                 ret = do_iter_write(file, &iter, pos, flags);
1278                 file_end_write(file);
1279                 kfree(iov);
1280         }
1281         if (ret > 0)
1282                 add_wchar(current, ret);
1283         inc_syscw(current);
1284         return ret;
1285 }
1286
1287 static size_t do_compat_writev(compat_ulong_t fd,
1288                                   const struct compat_iovec __user* vec,
1289                                   compat_ulong_t vlen, rwf_t flags)
1290 {
1291         struct fd f = fdget_pos(fd);
1292         ssize_t ret;
1293         loff_t pos;
1294
1295         if (!f.file)
1296                 return -EBADF;
1297         pos = f.file->f_pos;
1298         ret = compat_writev(f.file, vec, vlen, &pos, flags);
1299         if (ret >= 0)
1300                 f.file->f_pos = pos;
1301         fdput_pos(f);
1302         return ret;
1303 }
1304
1305 COMPAT_SYSCALL_DEFINE3(writev, compat_ulong_t, fd,
1306                 const struct compat_iovec __user *, vec,
1307                 compat_ulong_t, vlen)
1308 {
1309         return do_compat_writev(fd, vec, vlen, 0);
1310 }
1311
1312 static long do_compat_pwritev64(unsigned long fd,
1313                                    const struct compat_iovec __user *vec,
1314                                    unsigned long vlen, loff_t pos, rwf_t flags)
1315 {
1316         struct fd f;
1317         ssize_t ret;
1318
1319         if (pos < 0)
1320                 return -EINVAL;
1321         f = fdget(fd);
1322         if (!f.file)
1323                 return -EBADF;
1324         ret = -ESPIPE;
1325         if (f.file->f_mode & FMODE_PWRITE)
1326                 ret = compat_writev(f.file, vec, vlen, &pos, flags);
1327         fdput(f);
1328         return ret;
1329 }
1330
1331 #ifdef __ARCH_WANT_COMPAT_SYS_PWRITEV64
1332 COMPAT_SYSCALL_DEFINE4(pwritev64, unsigned long, fd,
1333                 const struct compat_iovec __user *,vec,
1334                 unsigned long, vlen, loff_t, pos)
1335 {
1336         return do_compat_pwritev64(fd, vec, vlen, pos, 0);
1337 }
1338 #endif
1339
1340 COMPAT_SYSCALL_DEFINE5(pwritev, compat_ulong_t, fd,
1341                 const struct compat_iovec __user *,vec,
1342                 compat_ulong_t, vlen, u32, pos_low, u32, pos_high)
1343 {
1344         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1345
1346         return do_compat_pwritev64(fd, vec, vlen, pos, 0);
1347 }
1348
1349 #ifdef __ARCH_WANT_COMPAT_SYS_PWRITEV64V2
1350 COMPAT_SYSCALL_DEFINE5(pwritev64v2, unsigned long, fd,
1351                 const struct compat_iovec __user *,vec,
1352                 unsigned long, vlen, loff_t, pos, rwf_t, flags)
1353 {
1354         if (pos == -1)
1355                 return do_compat_writev(fd, vec, vlen, flags);
1356
1357         return do_compat_pwritev64(fd, vec, vlen, pos, flags);
1358 }
1359 #endif
1360
1361 COMPAT_SYSCALL_DEFINE6(pwritev2, compat_ulong_t, fd,
1362                 const struct compat_iovec __user *,vec,
1363                 compat_ulong_t, vlen, u32, pos_low, u32, pos_high, rwf_t, flags)
1364 {
1365         loff_t pos = ((loff_t)pos_high << 32) | pos_low;
1366
1367         if (pos == -1)
1368                 return do_compat_writev(fd, vec, vlen, flags);
1369
1370         return do_compat_pwritev64(fd, vec, vlen, pos, flags);
1371 }
1372
1373 #endif
1374
1375 static ssize_t do_sendfile(int out_fd, int in_fd, loff_t *ppos,
1376                            size_t count, loff_t max)
1377 {
1378         struct fd in, out;
1379         struct inode *in_inode, *out_inode;
1380         loff_t pos;
1381         loff_t out_pos;
1382         ssize_t retval;
1383         int fl;
1384
1385         /*
1386          * Get input file, and verify that it is ok..
1387          */
1388         retval = -EBADF;
1389         in = fdget(in_fd);
1390         if (!in.file)
1391                 goto out;
1392         if (!(in.file->f_mode & FMODE_READ))
1393                 goto fput_in;
1394         retval = -ESPIPE;
1395         if (!ppos) {
1396                 pos = in.file->f_pos;
1397         } else {
1398                 pos = *ppos;
1399                 if (!(in.file->f_mode & FMODE_PREAD))
1400                         goto fput_in;
1401         }
1402         retval = rw_verify_area(READ, in.file, &pos, count);
1403         if (retval < 0)
1404                 goto fput_in;
1405         if (count > MAX_RW_COUNT)
1406                 count =  MAX_RW_COUNT;
1407
1408         /*
1409          * Get output file, and verify that it is ok..
1410          */
1411         retval = -EBADF;
1412         out = fdget(out_fd);
1413         if (!out.file)
1414                 goto fput_in;
1415         if (!(out.file->f_mode & FMODE_WRITE))
1416                 goto fput_out;
1417         retval = -EINVAL;
1418         in_inode = file_inode(in.file);
1419         out_inode = file_inode(out.file);
1420         out_pos = out.file->f_pos;
1421         retval = rw_verify_area(WRITE, out.file, &out_pos, count);
1422         if (retval < 0)
1423                 goto fput_out;
1424
1425         if (!max)
1426                 max = min(in_inode->i_sb->s_maxbytes, out_inode->i_sb->s_maxbytes);
1427
1428         if (unlikely(pos + count > max)) {
1429                 retval = -EOVERFLOW;
1430                 if (pos >= max)
1431                         goto fput_out;
1432                 count = max - pos;
1433         }
1434
1435         fl = 0;
1436 #if 0
1437         /*
1438          * We need to debate whether we can enable this or not. The
1439          * man page documents EAGAIN return for the output at least,
1440          * and the application is arguably buggy if it doesn't expect
1441          * EAGAIN on a non-blocking file descriptor.
1442          */
1443         if (in.file->f_flags & O_NONBLOCK)
1444                 fl = SPLICE_F_NONBLOCK;
1445 #endif
1446         file_start_write(out.file);
1447         retval = do_splice_direct(in.file, &pos, out.file, &out_pos, count, fl);
1448         file_end_write(out.file);
1449
1450         if (retval > 0) {
1451                 add_rchar(current, retval);
1452                 add_wchar(current, retval);
1453                 fsnotify_access(in.file);
1454                 fsnotify_modify(out.file);
1455                 out.file->f_pos = out_pos;
1456                 if (ppos)
1457                         *ppos = pos;
1458                 else
1459                         in.file->f_pos = pos;
1460         }
1461
1462         inc_syscr(current);
1463         inc_syscw(current);
1464         if (pos > max)
1465                 retval = -EOVERFLOW;
1466
1467 fput_out:
1468         fdput(out);
1469 fput_in:
1470         fdput(in);
1471 out:
1472         return retval;
1473 }
1474
1475 SYSCALL_DEFINE4(sendfile, int, out_fd, int, in_fd, off_t __user *, offset, size_t, count)
1476 {
1477         loff_t pos;
1478         off_t off;
1479         ssize_t ret;
1480
1481         if (offset) {
1482                 if (unlikely(get_user(off, offset)))
1483                         return -EFAULT;
1484                 pos = off;
1485                 ret = do_sendfile(out_fd, in_fd, &pos, count, MAX_NON_LFS);
1486                 if (unlikely(put_user(pos, offset)))
1487                         return -EFAULT;
1488                 return ret;
1489         }
1490
1491         return do_sendfile(out_fd, in_fd, NULL, count, 0);
1492 }
1493
1494 SYSCALL_DEFINE4(sendfile64, int, out_fd, int, in_fd, loff_t __user *, offset, size_t, count)
1495 {
1496         loff_t pos;
1497         ssize_t ret;
1498
1499         if (offset) {
1500                 if (unlikely(copy_from_user(&pos, offset, sizeof(loff_t))))
1501                         return -EFAULT;
1502                 ret = do_sendfile(out_fd, in_fd, &pos, count, 0);
1503                 if (unlikely(put_user(pos, offset)))
1504                         return -EFAULT;
1505                 return ret;
1506         }
1507
1508         return do_sendfile(out_fd, in_fd, NULL, count, 0);
1509 }
1510
1511 #ifdef CONFIG_COMPAT
1512 COMPAT_SYSCALL_DEFINE4(sendfile, int, out_fd, int, in_fd,
1513                 compat_off_t __user *, offset, compat_size_t, count)
1514 {
1515         loff_t pos;
1516         off_t off;
1517         ssize_t ret;
1518
1519         if (offset) {
1520                 if (unlikely(get_user(off, offset)))
1521                         return -EFAULT;
1522                 pos = off;
1523                 ret = do_sendfile(out_fd, in_fd, &pos, count, MAX_NON_LFS);
1524                 if (unlikely(put_user(pos, offset)))
1525                         return -EFAULT;
1526                 return ret;
1527         }
1528
1529         return do_sendfile(out_fd, in_fd, NULL, count, 0);
1530 }
1531
1532 COMPAT_SYSCALL_DEFINE4(sendfile64, int, out_fd, int, in_fd,
1533                 compat_loff_t __user *, offset, compat_size_t, count)
1534 {
1535         loff_t pos;
1536         ssize_t ret;
1537
1538         if (offset) {
1539                 if (unlikely(copy_from_user(&pos, offset, sizeof(loff_t))))
1540                         return -EFAULT;
1541                 ret = do_sendfile(out_fd, in_fd, &pos, count, 0);
1542                 if (unlikely(put_user(pos, offset)))
1543                         return -EFAULT;
1544                 return ret;
1545         }
1546
1547         return do_sendfile(out_fd, in_fd, NULL, count, 0);
1548 }
1549 #endif
1550
1551 /*
1552  * copy_file_range() differs from regular file read and write in that it
1553  * specifically allows return partial success.  When it does so is up to
1554  * the copy_file_range method.
1555  */
1556 ssize_t vfs_copy_file_range(struct file *file_in, loff_t pos_in,
1557                             struct file *file_out, loff_t pos_out,
1558                             size_t len, unsigned int flags)
1559 {
1560         struct inode *inode_in = file_inode(file_in);
1561         struct inode *inode_out = file_inode(file_out);
1562         ssize_t ret;
1563
1564         if (flags != 0)
1565                 return -EINVAL;
1566
1567         if (S_ISDIR(inode_in->i_mode) || S_ISDIR(inode_out->i_mode))
1568                 return -EISDIR;
1569         if (!S_ISREG(inode_in->i_mode) || !S_ISREG(inode_out->i_mode))
1570                 return -EINVAL;
1571
1572         ret = rw_verify_area(READ, file_in, &pos_in, len);
1573         if (unlikely(ret))
1574                 return ret;
1575
1576         ret = rw_verify_area(WRITE, file_out, &pos_out, len);
1577         if (unlikely(ret))
1578                 return ret;
1579
1580         if (!(file_in->f_mode & FMODE_READ) ||
1581             !(file_out->f_mode & FMODE_WRITE) ||
1582             (file_out->f_flags & O_APPEND))
1583                 return -EBADF;
1584
1585         /* this could be relaxed once a method supports cross-fs copies */
1586         if (inode_in->i_sb != inode_out->i_sb)
1587                 return -EXDEV;
1588
1589         if (len == 0)
1590                 return 0;
1591
1592         file_start_write(file_out);
1593
1594         /*
1595          * Try cloning first, this is supported by more file systems, and
1596          * more efficient if both clone and copy are supported (e.g. NFS).
1597          */
1598         if (file_in->f_op->clone_file_range) {
1599                 ret = file_in->f_op->clone_file_range(file_in, pos_in,
1600                                 file_out, pos_out, len);
1601                 if (ret == 0) {
1602                         ret = len;
1603                         goto done;
1604                 }
1605         }
1606
1607         if (file_out->f_op->copy_file_range) {
1608                 ret = file_out->f_op->copy_file_range(file_in, pos_in, file_out,
1609                                                       pos_out, len, flags);
1610                 if (ret != -EOPNOTSUPP)
1611                         goto done;
1612         }
1613
1614         ret = do_splice_direct(file_in, &pos_in, file_out, &pos_out,
1615                         len > MAX_RW_COUNT ? MAX_RW_COUNT : len, 0);
1616
1617 done:
1618         if (ret > 0) {
1619                 fsnotify_access(file_in);
1620                 add_rchar(current, ret);
1621                 fsnotify_modify(file_out);
1622                 add_wchar(current, ret);
1623         }
1624
1625         inc_syscr(current);
1626         inc_syscw(current);
1627
1628         file_end_write(file_out);
1629
1630         return ret;
1631 }
1632 EXPORT_SYMBOL(vfs_copy_file_range);
1633
1634 SYSCALL_DEFINE6(copy_file_range, int, fd_in, loff_t __user *, off_in,
1635                 int, fd_out, loff_t __user *, off_out,
1636                 size_t, len, unsigned int, flags)
1637 {
1638         loff_t pos_in;
1639         loff_t pos_out;
1640         struct fd f_in;
1641         struct fd f_out;
1642         ssize_t ret = -EBADF;
1643
1644         f_in = fdget(fd_in);
1645         if (!f_in.file)
1646                 goto out2;
1647
1648         f_out = fdget(fd_out);
1649         if (!f_out.file)
1650                 goto out1;
1651
1652         ret = -EFAULT;
1653         if (off_in) {
1654                 if (copy_from_user(&pos_in, off_in, sizeof(loff_t)))
1655                         goto out;
1656         } else {
1657                 pos_in = f_in.file->f_pos;
1658         }
1659
1660         if (off_out) {
1661                 if (copy_from_user(&pos_out, off_out, sizeof(loff_t)))
1662                         goto out;
1663         } else {
1664                 pos_out = f_out.file->f_pos;
1665         }
1666
1667         ret = vfs_copy_file_range(f_in.file, pos_in, f_out.file, pos_out, len,
1668                                   flags);
1669         if (ret > 0) {
1670                 pos_in += ret;
1671                 pos_out += ret;
1672
1673                 if (off_in) {
1674                         if (copy_to_user(off_in, &pos_in, sizeof(loff_t)))
1675                                 ret = -EFAULT;
1676                 } else {
1677                         f_in.file->f_pos = pos_in;
1678                 }
1679
1680                 if (off_out) {
1681                         if (copy_to_user(off_out, &pos_out, sizeof(loff_t)))
1682                                 ret = -EFAULT;
1683                 } else {
1684                         f_out.file->f_pos = pos_out;
1685                 }
1686         }
1687
1688 out:
1689         fdput(f_out);
1690 out1:
1691         fdput(f_in);
1692 out2:
1693         return ret;
1694 }
1695
1696 static int clone_verify_area(struct file *file, loff_t pos, u64 len, bool write)
1697 {
1698         struct inode *inode = file_inode(file);
1699
1700         if (unlikely(pos < 0))
1701                 return -EINVAL;
1702
1703          if (unlikely((loff_t) (pos + len) < 0))
1704                 return -EINVAL;
1705
1706         if (unlikely(inode->i_flctx && mandatory_lock(inode))) {
1707                 loff_t end = len ? pos + len - 1 : OFFSET_MAX;
1708                 int retval;
1709
1710                 retval = locks_mandatory_area(inode, file, pos, end,
1711                                 write ? F_WRLCK : F_RDLCK);
1712                 if (retval < 0)
1713                         return retval;
1714         }
1715
1716         return security_file_permission(file, write ? MAY_WRITE : MAY_READ);
1717 }
1718 /*
1719  * Ensure that we don't remap a partial EOF block in the middle of something
1720  * else.  Assume that the offsets have already been checked for block
1721  * alignment.
1722  *
1723  * For deduplication we always scale down to the previous block because we
1724  * can't meaningfully compare post-EOF contents.
1725  *
1726  * For clone we only link a partial EOF block above the destination file's EOF.
1727  */
1728 static int generic_remap_check_len(struct inode *inode_in,
1729                                    struct inode *inode_out,
1730                                    loff_t pos_out,
1731                                    u64 *len,
1732                                    bool is_dedupe)
1733 {
1734         u64 blkmask = i_blocksize(inode_in) - 1;
1735
1736         if ((*len & blkmask) == 0)
1737                 return 0;
1738
1739         if (is_dedupe)
1740                 *len &= ~blkmask;
1741         else if (pos_out + *len < i_size_read(inode_out))
1742                 return -EINVAL;
1743
1744         return 0;
1745 }
1746
1747 /*
1748  * Check that the two inodes are eligible for cloning, the ranges make
1749  * sense, and then flush all dirty data.  Caller must ensure that the
1750  * inodes have been locked against any other modifications.
1751  *
1752  * Returns: 0 for "nothing to clone", 1 for "something to clone", or
1753  * the usual negative error code.
1754  */
1755 int vfs_clone_file_prep_inodes(struct inode *inode_in, loff_t pos_in,
1756                                struct inode *inode_out, loff_t pos_out,
1757                                u64 *len, bool is_dedupe)
1758 {
1759         loff_t bs = inode_out->i_sb->s_blocksize;
1760         loff_t blen;
1761         loff_t isize;
1762         bool same_inode = (inode_in == inode_out);
1763         int ret;
1764
1765         /* Don't touch certain kinds of inodes */
1766         if (IS_IMMUTABLE(inode_out))
1767                 return -EPERM;
1768
1769         if (IS_SWAPFILE(inode_in) || IS_SWAPFILE(inode_out))
1770                 return -ETXTBSY;
1771
1772         /* Don't reflink dirs, pipes, sockets... */
1773         if (S_ISDIR(inode_in->i_mode) || S_ISDIR(inode_out->i_mode))
1774                 return -EISDIR;
1775         if (!S_ISREG(inode_in->i_mode) || !S_ISREG(inode_out->i_mode))
1776                 return -EINVAL;
1777
1778         /* Are we going all the way to the end? */
1779         isize = i_size_read(inode_in);
1780         if (isize == 0)
1781                 return 0;
1782
1783         /* Zero length dedupe exits immediately; reflink goes to EOF. */
1784         if (*len == 0) {
1785                 if (is_dedupe || pos_in == isize)
1786                         return 0;
1787                 if (pos_in > isize)
1788                         return -EINVAL;
1789                 *len = isize - pos_in;
1790         }
1791
1792         /* Ensure offsets don't wrap and the input is inside i_size */
1793         if (pos_in + *len < pos_in || pos_out + *len < pos_out ||
1794             pos_in + *len > isize)
1795                 return -EINVAL;
1796
1797         /* Don't allow dedupe past EOF in the dest file */
1798         if (is_dedupe) {
1799                 loff_t  disize;
1800
1801                 disize = i_size_read(inode_out);
1802                 if (pos_out >= disize || pos_out + *len > disize)
1803                         return -EINVAL;
1804         }
1805
1806         /* If we're linking to EOF, continue to the block boundary. */
1807         if (pos_in + *len == isize)
1808                 blen = ALIGN(isize, bs) - pos_in;
1809         else
1810                 blen = *len;
1811
1812         /* Only reflink if we're aligned to block boundaries */
1813         if (!IS_ALIGNED(pos_in, bs) || !IS_ALIGNED(pos_in + blen, bs) ||
1814             !IS_ALIGNED(pos_out, bs) || !IS_ALIGNED(pos_out + blen, bs))
1815                 return -EINVAL;
1816
1817         /* Don't allow overlapped reflink within the same file */
1818         if (same_inode) {
1819                 if (pos_out + blen > pos_in && pos_out < pos_in + blen)
1820                         return -EINVAL;
1821         }
1822
1823         /* Wait for the completion of any pending IOs on both files */
1824         inode_dio_wait(inode_in);
1825         if (!same_inode)
1826                 inode_dio_wait(inode_out);
1827
1828         ret = filemap_write_and_wait_range(inode_in->i_mapping,
1829                         pos_in, pos_in + *len - 1);
1830         if (ret)
1831                 return ret;
1832
1833         ret = filemap_write_and_wait_range(inode_out->i_mapping,
1834                         pos_out, pos_out + *len - 1);
1835         if (ret)
1836                 return ret;
1837
1838         /*
1839          * Check that the extents are the same.
1840          */
1841         if (is_dedupe) {
1842                 bool            is_same = false;
1843
1844                 ret = vfs_dedupe_file_range_compare(inode_in, pos_in,
1845                                 inode_out, pos_out, *len, &is_same);
1846                 if (ret)
1847                         return ret;
1848                 if (!is_same)
1849                         return -EBADE;
1850         }
1851
1852         ret = generic_remap_check_len(inode_in, inode_out, pos_out, len,
1853                         is_dedupe);
1854         if (ret)
1855                 return ret;
1856
1857         return 1;
1858 }
1859 EXPORT_SYMBOL(vfs_clone_file_prep_inodes);
1860
1861 int do_clone_file_range(struct file *file_in, loff_t pos_in,
1862                         struct file *file_out, loff_t pos_out, u64 len)
1863 {
1864         struct inode *inode_in = file_inode(file_in);
1865         struct inode *inode_out = file_inode(file_out);
1866         int ret;
1867
1868         if (S_ISDIR(inode_in->i_mode) || S_ISDIR(inode_out->i_mode))
1869                 return -EISDIR;
1870         if (!S_ISREG(inode_in->i_mode) || !S_ISREG(inode_out->i_mode))
1871                 return -EINVAL;
1872
1873         /*
1874          * FICLONE/FICLONERANGE ioctls enforce that src and dest files are on
1875          * the same mount. Practically, they only need to be on the same file
1876          * system.
1877          */
1878         if (inode_in->i_sb != inode_out->i_sb)
1879                 return -EXDEV;
1880
1881         if (!(file_in->f_mode & FMODE_READ) ||
1882             !(file_out->f_mode & FMODE_WRITE) ||
1883             (file_out->f_flags & O_APPEND))
1884                 return -EBADF;
1885
1886         if (!file_in->f_op->clone_file_range)
1887                 return -EOPNOTSUPP;
1888
1889         ret = clone_verify_area(file_in, pos_in, len, false);
1890         if (ret)
1891                 return ret;
1892
1893         ret = clone_verify_area(file_out, pos_out, len, true);
1894         if (ret)
1895                 return ret;
1896
1897         if (pos_in + len > i_size_read(inode_in))
1898                 return -EINVAL;
1899
1900         ret = file_in->f_op->clone_file_range(file_in, pos_in,
1901                         file_out, pos_out, len);
1902         if (!ret) {
1903                 fsnotify_access(file_in);
1904                 fsnotify_modify(file_out);
1905         }
1906
1907         return ret;
1908 }
1909 EXPORT_SYMBOL(do_clone_file_range);
1910
1911 int vfs_clone_file_range(struct file *file_in, loff_t pos_in,
1912                          struct file *file_out, loff_t pos_out, u64 len)
1913 {
1914         int ret;
1915
1916         file_start_write(file_out);
1917         ret = do_clone_file_range(file_in, pos_in, file_out, pos_out, len);
1918         file_end_write(file_out);
1919
1920         return ret;
1921 }
1922 EXPORT_SYMBOL(vfs_clone_file_range);
1923
1924 /* Read a page's worth of file data into the page cache. */
1925 static struct page *vfs_dedupe_get_page(struct inode *inode, loff_t offset)
1926 {
1927         struct address_space *mapping;
1928         struct page *page;
1929         pgoff_t n;
1930
1931         n = offset >> PAGE_SHIFT;
1932         mapping = inode->i_mapping;
1933         page = read_mapping_page(mapping, n, NULL);
1934         if (IS_ERR(page))
1935                 return page;
1936         if (!PageUptodate(page)) {
1937                 put_page(page);
1938                 return ERR_PTR(-EIO);
1939         }
1940         return page;
1941 }
1942
1943 /*
1944  * Lock two pages, ensuring that we lock in offset order if the pages are from
1945  * the same file.
1946  */
1947 static void vfs_lock_two_pages(struct page *page1, struct page *page2)
1948 {
1949         /* Always lock in order of increasing index. */
1950         if (page1->index > page2->index)
1951                 swap(page1, page2);
1952
1953         lock_page(page1);
1954         if (page1 != page2)
1955                 lock_page(page2);
1956 }
1957
1958 /* Unlock two pages, being careful not to unlock the same page twice. */
1959 static void vfs_unlock_two_pages(struct page *page1, struct page *page2)
1960 {
1961         unlock_page(page1);
1962         if (page1 != page2)
1963                 unlock_page(page2);
1964 }
1965
1966 /*
1967  * Compare extents of two files to see if they are the same.
1968  * Caller must have locked both inodes to prevent write races.
1969  */
1970 int vfs_dedupe_file_range_compare(struct inode *src, loff_t srcoff,
1971                                   struct inode *dest, loff_t destoff,
1972                                   loff_t len, bool *is_same)
1973 {
1974         loff_t src_poff;
1975         loff_t dest_poff;
1976         void *src_addr;
1977         void *dest_addr;
1978         struct page *src_page;
1979         struct page *dest_page;
1980         loff_t cmp_len;
1981         bool same;
1982         int error;
1983
1984         error = -EINVAL;
1985         same = true;
1986         while (len) {
1987                 src_poff = srcoff & (PAGE_SIZE - 1);
1988                 dest_poff = destoff & (PAGE_SIZE - 1);
1989                 cmp_len = min(PAGE_SIZE - src_poff,
1990                               PAGE_SIZE - dest_poff);
1991                 cmp_len = min(cmp_len, len);
1992                 if (cmp_len <= 0)
1993                         goto out_error;
1994
1995                 src_page = vfs_dedupe_get_page(src, srcoff);
1996                 if (IS_ERR(src_page)) {
1997                         error = PTR_ERR(src_page);
1998                         goto out_error;
1999                 }
2000                 dest_page = vfs_dedupe_get_page(dest, destoff);
2001                 if (IS_ERR(dest_page)) {
2002                         error = PTR_ERR(dest_page);
2003                         put_page(src_page);
2004                         goto out_error;
2005                 }
2006
2007                 vfs_lock_two_pages(src_page, dest_page);
2008
2009                 /*
2010                  * Now that we've locked both pages, make sure they're still
2011                  * mapped to the file data we're interested in.  If not,
2012                  * someone is invalidating pages on us and we lose.
2013                  */
2014                 if (!PageUptodate(src_page) || !PageUptodate(dest_page) ||
2015                     src_page->mapping != src->i_mapping ||
2016                     dest_page->mapping != dest->i_mapping) {
2017                         same = false;
2018                         goto unlock;
2019                 }
2020
2021                 src_addr = kmap_atomic(src_page);
2022                 dest_addr = kmap_atomic(dest_page);
2023
2024                 flush_dcache_page(src_page);
2025                 flush_dcache_page(dest_page);
2026
2027                 if (memcmp(src_addr + src_poff, dest_addr + dest_poff, cmp_len))
2028                         same = false;
2029
2030                 kunmap_atomic(dest_addr);
2031                 kunmap_atomic(src_addr);
2032 unlock:
2033                 vfs_unlock_two_pages(src_page, dest_page);
2034                 put_page(dest_page);
2035                 put_page(src_page);
2036
2037                 if (!same)
2038                         break;
2039
2040                 srcoff += cmp_len;
2041                 destoff += cmp_len;
2042                 len -= cmp_len;
2043         }
2044
2045         *is_same = same;
2046         return 0;
2047
2048 out_error:
2049         return error;
2050 }
2051 EXPORT_SYMBOL(vfs_dedupe_file_range_compare);
2052
2053 int vfs_dedupe_file_range_one(struct file *src_file, loff_t src_pos,
2054                               struct file *dst_file, loff_t dst_pos, u64 len)
2055 {
2056         s64 ret;
2057
2058         ret = mnt_want_write_file(dst_file);
2059         if (ret)
2060                 return ret;
2061
2062         ret = clone_verify_area(dst_file, dst_pos, len, true);
2063         if (ret < 0)
2064                 goto out_drop_write;
2065
2066         ret = -EINVAL;
2067         if (!(capable(CAP_SYS_ADMIN) || (dst_file->f_mode & FMODE_WRITE)))
2068                 goto out_drop_write;
2069
2070         ret = -EXDEV;
2071         if (src_file->f_path.mnt != dst_file->f_path.mnt)
2072                 goto out_drop_write;
2073
2074         ret = -EISDIR;
2075         if (S_ISDIR(file_inode(dst_file)->i_mode))
2076                 goto out_drop_write;
2077
2078         ret = -EINVAL;
2079         if (!dst_file->f_op->dedupe_file_range)
2080                 goto out_drop_write;
2081
2082         ret = dst_file->f_op->dedupe_file_range(src_file, src_pos,
2083                                                 dst_file, dst_pos, len);
2084 out_drop_write:
2085         mnt_drop_write_file(dst_file);
2086
2087         return ret;
2088 }
2089 EXPORT_SYMBOL(vfs_dedupe_file_range_one);
2090
2091 int vfs_dedupe_file_range(struct file *file, struct file_dedupe_range *same)
2092 {
2093         struct file_dedupe_range_info *info;
2094         struct inode *src = file_inode(file);
2095         u64 off;
2096         u64 len;
2097         int i;
2098         int ret;
2099         u16 count = same->dest_count;
2100         int deduped;
2101
2102         if (!(file->f_mode & FMODE_READ))
2103                 return -EINVAL;
2104
2105         if (same->reserved1 || same->reserved2)
2106                 return -EINVAL;
2107
2108         off = same->src_offset;
2109         len = same->src_length;
2110
2111         ret = -EISDIR;
2112         if (S_ISDIR(src->i_mode))
2113                 goto out;
2114
2115         ret = -EINVAL;
2116         if (!S_ISREG(src->i_mode))
2117                 goto out;
2118
2119         ret = clone_verify_area(file, off, len, false);
2120         if (ret < 0)
2121                 goto out;
2122         ret = 0;
2123
2124         if (off + len > i_size_read(src))
2125                 return -EINVAL;
2126
2127         /* Arbitrary 1G limit on a single dedupe request, can be raised. */
2128         len = min_t(u64, len, 1 << 30);
2129
2130         /* pre-format output fields to sane values */
2131         for (i = 0; i < count; i++) {
2132                 same->info[i].bytes_deduped = 0ULL;
2133                 same->info[i].status = FILE_DEDUPE_RANGE_SAME;
2134         }
2135
2136         for (i = 0, info = same->info; i < count; i++, info++) {
2137                 struct fd dst_fd = fdget(info->dest_fd);
2138                 struct file *dst_file = dst_fd.file;
2139
2140                 if (!dst_file) {
2141                         info->status = -EBADF;
2142                         goto next_loop;
2143                 }
2144
2145                 if (info->reserved) {
2146                         info->status = -EINVAL;
2147                         goto next_fdput;
2148                 }
2149
2150                 deduped = vfs_dedupe_file_range_one(file, off, dst_file,
2151                                                     info->dest_offset, len);
2152                 if (deduped == -EBADE)
2153                         info->status = FILE_DEDUPE_RANGE_DIFFERS;
2154                 else if (deduped < 0)
2155                         info->status = deduped;
2156                 else
2157                         info->bytes_deduped = len;
2158
2159 next_fdput:
2160                 fdput(dst_fd);
2161 next_loop:
2162                 if (fatal_signal_pending(current))
2163                         goto out;
2164         }
2165
2166 out:
2167         return ret;
2168 }
2169 EXPORT_SYMBOL(vfs_dedupe_file_range);