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