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