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