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