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