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