xref: /linux/fs/open.c (revision e6b5be2be4e30037eb551e0ed09dd97bd00d85d3)
1 /*
2  *  linux/fs/open.c
3  *
4  *  Copyright (C) 1991, 1992  Linus Torvalds
5  */
6 
7 #include <linux/string.h>
8 #include <linux/mm.h>
9 #include <linux/file.h>
10 #include <linux/fdtable.h>
11 #include <linux/fsnotify.h>
12 #include <linux/module.h>
13 #include <linux/tty.h>
14 #include <linux/namei.h>
15 #include <linux/backing-dev.h>
16 #include <linux/capability.h>
17 #include <linux/securebits.h>
18 #include <linux/security.h>
19 #include <linux/mount.h>
20 #include <linux/fcntl.h>
21 #include <linux/slab.h>
22 #include <asm/uaccess.h>
23 #include <linux/fs.h>
24 #include <linux/personality.h>
25 #include <linux/pagemap.h>
26 #include <linux/syscalls.h>
27 #include <linux/rcupdate.h>
28 #include <linux/audit.h>
29 #include <linux/falloc.h>
30 #include <linux/fs_struct.h>
31 #include <linux/ima.h>
32 #include <linux/dnotify.h>
33 #include <linux/compat.h>
34 
35 #include "internal.h"
36 
37 int do_truncate(struct dentry *dentry, loff_t length, unsigned int time_attrs,
38 	struct file *filp)
39 {
40 	int ret;
41 	struct iattr newattrs;
42 
43 	/* Not pretty: "inode->i_size" shouldn't really be signed. But it is. */
44 	if (length < 0)
45 		return -EINVAL;
46 
47 	newattrs.ia_size = length;
48 	newattrs.ia_valid = ATTR_SIZE | time_attrs;
49 	if (filp) {
50 		newattrs.ia_file = filp;
51 		newattrs.ia_valid |= ATTR_FILE;
52 	}
53 
54 	/* Remove suid/sgid on truncate too */
55 	ret = should_remove_suid(dentry);
56 	if (ret)
57 		newattrs.ia_valid |= ret | ATTR_FORCE;
58 
59 	mutex_lock(&dentry->d_inode->i_mutex);
60 	/* Note any delegations or leases have already been broken: */
61 	ret = notify_change(dentry, &newattrs, NULL);
62 	mutex_unlock(&dentry->d_inode->i_mutex);
63 	return ret;
64 }
65 
66 long vfs_truncate(struct path *path, loff_t length)
67 {
68 	struct inode *inode;
69 	long error;
70 
71 	inode = path->dentry->d_inode;
72 
73 	/* For directories it's -EISDIR, for other non-regulars - -EINVAL */
74 	if (S_ISDIR(inode->i_mode))
75 		return -EISDIR;
76 	if (!S_ISREG(inode->i_mode))
77 		return -EINVAL;
78 
79 	error = mnt_want_write(path->mnt);
80 	if (error)
81 		goto out;
82 
83 	error = inode_permission(inode, MAY_WRITE);
84 	if (error)
85 		goto mnt_drop_write_and_out;
86 
87 	error = -EPERM;
88 	if (IS_APPEND(inode))
89 		goto mnt_drop_write_and_out;
90 
91 	error = get_write_access(inode);
92 	if (error)
93 		goto mnt_drop_write_and_out;
94 
95 	/*
96 	 * Make sure that there are no leases.  get_write_access() protects
97 	 * against the truncate racing with a lease-granting setlease().
98 	 */
99 	error = break_lease(inode, O_WRONLY);
100 	if (error)
101 		goto put_write_and_out;
102 
103 	error = locks_verify_truncate(inode, NULL, length);
104 	if (!error)
105 		error = security_path_truncate(path);
106 	if (!error)
107 		error = do_truncate(path->dentry, length, 0, NULL);
108 
109 put_write_and_out:
110 	put_write_access(inode);
111 mnt_drop_write_and_out:
112 	mnt_drop_write(path->mnt);
113 out:
114 	return error;
115 }
116 EXPORT_SYMBOL_GPL(vfs_truncate);
117 
118 static long do_sys_truncate(const char __user *pathname, loff_t length)
119 {
120 	unsigned int lookup_flags = LOOKUP_FOLLOW;
121 	struct path path;
122 	int error;
123 
124 	if (length < 0)	/* sorry, but loff_t says... */
125 		return -EINVAL;
126 
127 retry:
128 	error = user_path_at(AT_FDCWD, pathname, lookup_flags, &path);
129 	if (!error) {
130 		error = vfs_truncate(&path, length);
131 		path_put(&path);
132 	}
133 	if (retry_estale(error, lookup_flags)) {
134 		lookup_flags |= LOOKUP_REVAL;
135 		goto retry;
136 	}
137 	return error;
138 }
139 
140 SYSCALL_DEFINE2(truncate, const char __user *, path, long, length)
141 {
142 	return do_sys_truncate(path, length);
143 }
144 
145 #ifdef CONFIG_COMPAT
146 COMPAT_SYSCALL_DEFINE2(truncate, const char __user *, path, compat_off_t, length)
147 {
148 	return do_sys_truncate(path, length);
149 }
150 #endif
151 
152 static long do_sys_ftruncate(unsigned int fd, loff_t length, int small)
153 {
154 	struct inode *inode;
155 	struct dentry *dentry;
156 	struct fd f;
157 	int error;
158 
159 	error = -EINVAL;
160 	if (length < 0)
161 		goto out;
162 	error = -EBADF;
163 	f = fdget(fd);
164 	if (!f.file)
165 		goto out;
166 
167 	/* explicitly opened as large or we are on 64-bit box */
168 	if (f.file->f_flags & O_LARGEFILE)
169 		small = 0;
170 
171 	dentry = f.file->f_path.dentry;
172 	inode = dentry->d_inode;
173 	error = -EINVAL;
174 	if (!S_ISREG(inode->i_mode) || !(f.file->f_mode & FMODE_WRITE))
175 		goto out_putf;
176 
177 	error = -EINVAL;
178 	/* Cannot ftruncate over 2^31 bytes without large file support */
179 	if (small && length > MAX_NON_LFS)
180 		goto out_putf;
181 
182 	error = -EPERM;
183 	if (IS_APPEND(inode))
184 		goto out_putf;
185 
186 	sb_start_write(inode->i_sb);
187 	error = locks_verify_truncate(inode, f.file, length);
188 	if (!error)
189 		error = security_path_truncate(&f.file->f_path);
190 	if (!error)
191 		error = do_truncate(dentry, length, ATTR_MTIME|ATTR_CTIME, f.file);
192 	sb_end_write(inode->i_sb);
193 out_putf:
194 	fdput(f);
195 out:
196 	return error;
197 }
198 
199 SYSCALL_DEFINE2(ftruncate, unsigned int, fd, unsigned long, length)
200 {
201 	return do_sys_ftruncate(fd, length, 1);
202 }
203 
204 #ifdef CONFIG_COMPAT
205 COMPAT_SYSCALL_DEFINE2(ftruncate, unsigned int, fd, compat_ulong_t, length)
206 {
207 	return do_sys_ftruncate(fd, length, 1);
208 }
209 #endif
210 
211 /* LFS versions of truncate are only needed on 32 bit machines */
212 #if BITS_PER_LONG == 32
213 SYSCALL_DEFINE2(truncate64, const char __user *, path, loff_t, length)
214 {
215 	return do_sys_truncate(path, length);
216 }
217 
218 SYSCALL_DEFINE2(ftruncate64, unsigned int, fd, loff_t, length)
219 {
220 	return do_sys_ftruncate(fd, length, 0);
221 }
222 #endif /* BITS_PER_LONG == 32 */
223 
224 
225 int do_fallocate(struct file *file, int mode, loff_t offset, loff_t len)
226 {
227 	struct inode *inode = file_inode(file);
228 	long ret;
229 
230 	if (offset < 0 || len <= 0)
231 		return -EINVAL;
232 
233 	/* Return error if mode is not supported */
234 	if (mode & ~(FALLOC_FL_KEEP_SIZE | FALLOC_FL_PUNCH_HOLE |
235 		     FALLOC_FL_COLLAPSE_RANGE | FALLOC_FL_ZERO_RANGE))
236 		return -EOPNOTSUPP;
237 
238 	/* Punch hole and zero range are mutually exclusive */
239 	if ((mode & (FALLOC_FL_PUNCH_HOLE | FALLOC_FL_ZERO_RANGE)) ==
240 	    (FALLOC_FL_PUNCH_HOLE | FALLOC_FL_ZERO_RANGE))
241 		return -EOPNOTSUPP;
242 
243 	/* Punch hole must have keep size set */
244 	if ((mode & FALLOC_FL_PUNCH_HOLE) &&
245 	    !(mode & FALLOC_FL_KEEP_SIZE))
246 		return -EOPNOTSUPP;
247 
248 	/* Collapse range should only be used exclusively. */
249 	if ((mode & FALLOC_FL_COLLAPSE_RANGE) &&
250 	    (mode & ~FALLOC_FL_COLLAPSE_RANGE))
251 		return -EINVAL;
252 
253 	if (!(file->f_mode & FMODE_WRITE))
254 		return -EBADF;
255 
256 	/*
257 	 * We can only allow pure fallocate on append only files
258 	 */
259 	if ((mode & ~FALLOC_FL_KEEP_SIZE) && IS_APPEND(inode))
260 		return -EPERM;
261 
262 	if (IS_IMMUTABLE(inode))
263 		return -EPERM;
264 
265 	/*
266 	 * We cannot allow any fallocate operation on an active swapfile
267 	 */
268 	if (IS_SWAPFILE(inode))
269 		return -ETXTBSY;
270 
271 	/*
272 	 * Revalidate the write permissions, in case security policy has
273 	 * changed since the files were opened.
274 	 */
275 	ret = security_file_permission(file, MAY_WRITE);
276 	if (ret)
277 		return ret;
278 
279 	if (S_ISFIFO(inode->i_mode))
280 		return -ESPIPE;
281 
282 	/*
283 	 * Let individual file system decide if it supports preallocation
284 	 * for directories or not.
285 	 */
286 	if (!S_ISREG(inode->i_mode) && !S_ISDIR(inode->i_mode))
287 		return -ENODEV;
288 
289 	/* Check for wrap through zero too */
290 	if (((offset + len) > inode->i_sb->s_maxbytes) || ((offset + len) < 0))
291 		return -EFBIG;
292 
293 	if (!file->f_op->fallocate)
294 		return -EOPNOTSUPP;
295 
296 	sb_start_write(inode->i_sb);
297 	ret = file->f_op->fallocate(file, mode, offset, len);
298 
299 	/*
300 	 * Create inotify and fanotify events.
301 	 *
302 	 * To keep the logic simple always create events if fallocate succeeds.
303 	 * This implies that events are even created if the file size remains
304 	 * unchanged, e.g. when using flag FALLOC_FL_KEEP_SIZE.
305 	 */
306 	if (ret == 0)
307 		fsnotify_modify(file);
308 
309 	sb_end_write(inode->i_sb);
310 	return ret;
311 }
312 
313 SYSCALL_DEFINE4(fallocate, int, fd, int, mode, loff_t, offset, loff_t, len)
314 {
315 	struct fd f = fdget(fd);
316 	int error = -EBADF;
317 
318 	if (f.file) {
319 		error = do_fallocate(f.file, mode, offset, len);
320 		fdput(f);
321 	}
322 	return error;
323 }
324 
325 /*
326  * access() needs to use the real uid/gid, not the effective uid/gid.
327  * We do this by temporarily clearing all FS-related capabilities and
328  * switching the fsuid/fsgid around to the real ones.
329  */
330 SYSCALL_DEFINE3(faccessat, int, dfd, const char __user *, filename, int, mode)
331 {
332 	const struct cred *old_cred;
333 	struct cred *override_cred;
334 	struct path path;
335 	struct inode *inode;
336 	int res;
337 	unsigned int lookup_flags = LOOKUP_FOLLOW;
338 
339 	if (mode & ~S_IRWXO)	/* where's F_OK, X_OK, W_OK, R_OK? */
340 		return -EINVAL;
341 
342 	override_cred = prepare_creds();
343 	if (!override_cred)
344 		return -ENOMEM;
345 
346 	override_cred->fsuid = override_cred->uid;
347 	override_cred->fsgid = override_cred->gid;
348 
349 	if (!issecure(SECURE_NO_SETUID_FIXUP)) {
350 		/* Clear the capabilities if we switch to a non-root user */
351 		kuid_t root_uid = make_kuid(override_cred->user_ns, 0);
352 		if (!uid_eq(override_cred->uid, root_uid))
353 			cap_clear(override_cred->cap_effective);
354 		else
355 			override_cred->cap_effective =
356 				override_cred->cap_permitted;
357 	}
358 
359 	old_cred = override_creds(override_cred);
360 retry:
361 	res = user_path_at(dfd, filename, lookup_flags, &path);
362 	if (res)
363 		goto out;
364 
365 	inode = path.dentry->d_inode;
366 
367 	if ((mode & MAY_EXEC) && S_ISREG(inode->i_mode)) {
368 		/*
369 		 * MAY_EXEC on regular files is denied if the fs is mounted
370 		 * with the "noexec" flag.
371 		 */
372 		res = -EACCES;
373 		if (path.mnt->mnt_flags & MNT_NOEXEC)
374 			goto out_path_release;
375 	}
376 
377 	res = inode_permission(inode, mode | MAY_ACCESS);
378 	/* SuS v2 requires we report a read only fs too */
379 	if (res || !(mode & S_IWOTH) || special_file(inode->i_mode))
380 		goto out_path_release;
381 	/*
382 	 * This is a rare case where using __mnt_is_readonly()
383 	 * is OK without a mnt_want/drop_write() pair.  Since
384 	 * no actual write to the fs is performed here, we do
385 	 * not need to telegraph to that to anyone.
386 	 *
387 	 * By doing this, we accept that this access is
388 	 * inherently racy and know that the fs may change
389 	 * state before we even see this result.
390 	 */
391 	if (__mnt_is_readonly(path.mnt))
392 		res = -EROFS;
393 
394 out_path_release:
395 	path_put(&path);
396 	if (retry_estale(res, lookup_flags)) {
397 		lookup_flags |= LOOKUP_REVAL;
398 		goto retry;
399 	}
400 out:
401 	revert_creds(old_cred);
402 	put_cred(override_cred);
403 	return res;
404 }
405 
406 SYSCALL_DEFINE2(access, const char __user *, filename, int, mode)
407 {
408 	return sys_faccessat(AT_FDCWD, filename, mode);
409 }
410 
411 SYSCALL_DEFINE1(chdir, const char __user *, filename)
412 {
413 	struct path path;
414 	int error;
415 	unsigned int lookup_flags = LOOKUP_FOLLOW | LOOKUP_DIRECTORY;
416 retry:
417 	error = user_path_at(AT_FDCWD, filename, lookup_flags, &path);
418 	if (error)
419 		goto out;
420 
421 	error = inode_permission(path.dentry->d_inode, MAY_EXEC | MAY_CHDIR);
422 	if (error)
423 		goto dput_and_out;
424 
425 	set_fs_pwd(current->fs, &path);
426 
427 dput_and_out:
428 	path_put(&path);
429 	if (retry_estale(error, lookup_flags)) {
430 		lookup_flags |= LOOKUP_REVAL;
431 		goto retry;
432 	}
433 out:
434 	return error;
435 }
436 
437 SYSCALL_DEFINE1(fchdir, unsigned int, fd)
438 {
439 	struct fd f = fdget_raw(fd);
440 	struct inode *inode;
441 	int error = -EBADF;
442 
443 	error = -EBADF;
444 	if (!f.file)
445 		goto out;
446 
447 	inode = file_inode(f.file);
448 
449 	error = -ENOTDIR;
450 	if (!S_ISDIR(inode->i_mode))
451 		goto out_putf;
452 
453 	error = inode_permission(inode, MAY_EXEC | MAY_CHDIR);
454 	if (!error)
455 		set_fs_pwd(current->fs, &f.file->f_path);
456 out_putf:
457 	fdput(f);
458 out:
459 	return error;
460 }
461 
462 SYSCALL_DEFINE1(chroot, const char __user *, filename)
463 {
464 	struct path path;
465 	int error;
466 	unsigned int lookup_flags = LOOKUP_FOLLOW | LOOKUP_DIRECTORY;
467 retry:
468 	error = user_path_at(AT_FDCWD, filename, lookup_flags, &path);
469 	if (error)
470 		goto out;
471 
472 	error = inode_permission(path.dentry->d_inode, MAY_EXEC | MAY_CHDIR);
473 	if (error)
474 		goto dput_and_out;
475 
476 	error = -EPERM;
477 	if (!ns_capable(current_user_ns(), CAP_SYS_CHROOT))
478 		goto dput_and_out;
479 	error = security_path_chroot(&path);
480 	if (error)
481 		goto dput_and_out;
482 
483 	set_fs_root(current->fs, &path);
484 	error = 0;
485 dput_and_out:
486 	path_put(&path);
487 	if (retry_estale(error, lookup_flags)) {
488 		lookup_flags |= LOOKUP_REVAL;
489 		goto retry;
490 	}
491 out:
492 	return error;
493 }
494 
495 static int chmod_common(struct path *path, umode_t mode)
496 {
497 	struct inode *inode = path->dentry->d_inode;
498 	struct inode *delegated_inode = NULL;
499 	struct iattr newattrs;
500 	int error;
501 
502 	error = mnt_want_write(path->mnt);
503 	if (error)
504 		return error;
505 retry_deleg:
506 	mutex_lock(&inode->i_mutex);
507 	error = security_path_chmod(path, mode);
508 	if (error)
509 		goto out_unlock;
510 	newattrs.ia_mode = (mode & S_IALLUGO) | (inode->i_mode & ~S_IALLUGO);
511 	newattrs.ia_valid = ATTR_MODE | ATTR_CTIME;
512 	error = notify_change(path->dentry, &newattrs, &delegated_inode);
513 out_unlock:
514 	mutex_unlock(&inode->i_mutex);
515 	if (delegated_inode) {
516 		error = break_deleg_wait(&delegated_inode);
517 		if (!error)
518 			goto retry_deleg;
519 	}
520 	mnt_drop_write(path->mnt);
521 	return error;
522 }
523 
524 SYSCALL_DEFINE2(fchmod, unsigned int, fd, umode_t, mode)
525 {
526 	struct fd f = fdget(fd);
527 	int err = -EBADF;
528 
529 	if (f.file) {
530 		audit_file(f.file);
531 		err = chmod_common(&f.file->f_path, mode);
532 		fdput(f);
533 	}
534 	return err;
535 }
536 
537 SYSCALL_DEFINE3(fchmodat, int, dfd, const char __user *, filename, umode_t, mode)
538 {
539 	struct path path;
540 	int error;
541 	unsigned int lookup_flags = LOOKUP_FOLLOW;
542 retry:
543 	error = user_path_at(dfd, filename, lookup_flags, &path);
544 	if (!error) {
545 		error = chmod_common(&path, mode);
546 		path_put(&path);
547 		if (retry_estale(error, lookup_flags)) {
548 			lookup_flags |= LOOKUP_REVAL;
549 			goto retry;
550 		}
551 	}
552 	return error;
553 }
554 
555 SYSCALL_DEFINE2(chmod, const char __user *, filename, umode_t, mode)
556 {
557 	return sys_fchmodat(AT_FDCWD, filename, mode);
558 }
559 
560 static int chown_common(struct path *path, uid_t user, gid_t group)
561 {
562 	struct inode *inode = path->dentry->d_inode;
563 	struct inode *delegated_inode = NULL;
564 	int error;
565 	struct iattr newattrs;
566 	kuid_t uid;
567 	kgid_t gid;
568 
569 	uid = make_kuid(current_user_ns(), user);
570 	gid = make_kgid(current_user_ns(), group);
571 
572 	newattrs.ia_valid =  ATTR_CTIME;
573 	if (user != (uid_t) -1) {
574 		if (!uid_valid(uid))
575 			return -EINVAL;
576 		newattrs.ia_valid |= ATTR_UID;
577 		newattrs.ia_uid = uid;
578 	}
579 	if (group != (gid_t) -1) {
580 		if (!gid_valid(gid))
581 			return -EINVAL;
582 		newattrs.ia_valid |= ATTR_GID;
583 		newattrs.ia_gid = gid;
584 	}
585 	if (!S_ISDIR(inode->i_mode))
586 		newattrs.ia_valid |=
587 			ATTR_KILL_SUID | ATTR_KILL_SGID | ATTR_KILL_PRIV;
588 retry_deleg:
589 	mutex_lock(&inode->i_mutex);
590 	error = security_path_chown(path, uid, gid);
591 	if (!error)
592 		error = notify_change(path->dentry, &newattrs, &delegated_inode);
593 	mutex_unlock(&inode->i_mutex);
594 	if (delegated_inode) {
595 		error = break_deleg_wait(&delegated_inode);
596 		if (!error)
597 			goto retry_deleg;
598 	}
599 	return error;
600 }
601 
602 SYSCALL_DEFINE5(fchownat, int, dfd, const char __user *, filename, uid_t, user,
603 		gid_t, group, int, flag)
604 {
605 	struct path path;
606 	int error = -EINVAL;
607 	int lookup_flags;
608 
609 	if ((flag & ~(AT_SYMLINK_NOFOLLOW | AT_EMPTY_PATH)) != 0)
610 		goto out;
611 
612 	lookup_flags = (flag & AT_SYMLINK_NOFOLLOW) ? 0 : LOOKUP_FOLLOW;
613 	if (flag & AT_EMPTY_PATH)
614 		lookup_flags |= LOOKUP_EMPTY;
615 retry:
616 	error = user_path_at(dfd, filename, lookup_flags, &path);
617 	if (error)
618 		goto out;
619 	error = mnt_want_write(path.mnt);
620 	if (error)
621 		goto out_release;
622 	error = chown_common(&path, user, group);
623 	mnt_drop_write(path.mnt);
624 out_release:
625 	path_put(&path);
626 	if (retry_estale(error, lookup_flags)) {
627 		lookup_flags |= LOOKUP_REVAL;
628 		goto retry;
629 	}
630 out:
631 	return error;
632 }
633 
634 SYSCALL_DEFINE3(chown, const char __user *, filename, uid_t, user, gid_t, group)
635 {
636 	return sys_fchownat(AT_FDCWD, filename, user, group, 0);
637 }
638 
639 SYSCALL_DEFINE3(lchown, const char __user *, filename, uid_t, user, gid_t, group)
640 {
641 	return sys_fchownat(AT_FDCWD, filename, user, group,
642 			    AT_SYMLINK_NOFOLLOW);
643 }
644 
645 SYSCALL_DEFINE3(fchown, unsigned int, fd, uid_t, user, gid_t, group)
646 {
647 	struct fd f = fdget(fd);
648 	int error = -EBADF;
649 
650 	if (!f.file)
651 		goto out;
652 
653 	error = mnt_want_write_file(f.file);
654 	if (error)
655 		goto out_fput;
656 	audit_file(f.file);
657 	error = chown_common(&f.file->f_path, user, group);
658 	mnt_drop_write_file(f.file);
659 out_fput:
660 	fdput(f);
661 out:
662 	return error;
663 }
664 
665 int open_check_o_direct(struct file *f)
666 {
667 	/* NB: we're sure to have correct a_ops only after f_op->open */
668 	if (f->f_flags & O_DIRECT) {
669 		if (!f->f_mapping->a_ops ||
670 		    ((!f->f_mapping->a_ops->direct_IO) &&
671 		    (!f->f_mapping->a_ops->get_xip_mem))) {
672 			return -EINVAL;
673 		}
674 	}
675 	return 0;
676 }
677 
678 static int do_dentry_open(struct file *f,
679 			  int (*open)(struct inode *, struct file *),
680 			  const struct cred *cred)
681 {
682 	static const struct file_operations empty_fops = {};
683 	struct inode *inode;
684 	int error;
685 
686 	f->f_mode = OPEN_FMODE(f->f_flags) | FMODE_LSEEK |
687 				FMODE_PREAD | FMODE_PWRITE;
688 
689 	path_get(&f->f_path);
690 	inode = f->f_inode = f->f_path.dentry->d_inode;
691 	f->f_mapping = inode->i_mapping;
692 
693 	if (unlikely(f->f_flags & O_PATH)) {
694 		f->f_mode = FMODE_PATH;
695 		f->f_op = &empty_fops;
696 		return 0;
697 	}
698 
699 	if (f->f_mode & FMODE_WRITE && !special_file(inode->i_mode)) {
700 		error = get_write_access(inode);
701 		if (unlikely(error))
702 			goto cleanup_file;
703 		error = __mnt_want_write(f->f_path.mnt);
704 		if (unlikely(error)) {
705 			put_write_access(inode);
706 			goto cleanup_file;
707 		}
708 		f->f_mode |= FMODE_WRITER;
709 	}
710 
711 	/* POSIX.1-2008/SUSv4 Section XSI 2.9.7 */
712 	if (S_ISREG(inode->i_mode))
713 		f->f_mode |= FMODE_ATOMIC_POS;
714 
715 	f->f_op = fops_get(inode->i_fop);
716 	if (unlikely(WARN_ON(!f->f_op))) {
717 		error = -ENODEV;
718 		goto cleanup_all;
719 	}
720 
721 	error = security_file_open(f, cred);
722 	if (error)
723 		goto cleanup_all;
724 
725 	error = break_lease(inode, f->f_flags);
726 	if (error)
727 		goto cleanup_all;
728 
729 	if (!open)
730 		open = f->f_op->open;
731 	if (open) {
732 		error = open(inode, f);
733 		if (error)
734 			goto cleanup_all;
735 	}
736 	if ((f->f_mode & (FMODE_READ | FMODE_WRITE)) == FMODE_READ)
737 		i_readcount_inc(inode);
738 	if ((f->f_mode & FMODE_READ) &&
739 	     likely(f->f_op->read || f->f_op->aio_read || f->f_op->read_iter))
740 		f->f_mode |= FMODE_CAN_READ;
741 	if ((f->f_mode & FMODE_WRITE) &&
742 	     likely(f->f_op->write || f->f_op->aio_write || f->f_op->write_iter))
743 		f->f_mode |= FMODE_CAN_WRITE;
744 
745 	f->f_flags &= ~(O_CREAT | O_EXCL | O_NOCTTY | O_TRUNC);
746 
747 	file_ra_state_init(&f->f_ra, f->f_mapping->host->i_mapping);
748 
749 	return 0;
750 
751 cleanup_all:
752 	fops_put(f->f_op);
753 	if (f->f_mode & FMODE_WRITER) {
754 		put_write_access(inode);
755 		__mnt_drop_write(f->f_path.mnt);
756 	}
757 cleanup_file:
758 	path_put(&f->f_path);
759 	f->f_path.mnt = NULL;
760 	f->f_path.dentry = NULL;
761 	f->f_inode = NULL;
762 	return error;
763 }
764 
765 /**
766  * finish_open - finish opening a file
767  * @file: file pointer
768  * @dentry: pointer to dentry
769  * @open: open callback
770  * @opened: state of open
771  *
772  * This can be used to finish opening a file passed to i_op->atomic_open().
773  *
774  * If the open callback is set to NULL, then the standard f_op->open()
775  * filesystem callback is substituted.
776  *
777  * NB: the dentry reference is _not_ consumed.  If, for example, the dentry is
778  * the return value of d_splice_alias(), then the caller needs to perform dput()
779  * on it after finish_open().
780  *
781  * On successful return @file is a fully instantiated open file.  After this, if
782  * an error occurs in ->atomic_open(), it needs to clean up with fput().
783  *
784  * Returns zero on success or -errno if the open failed.
785  */
786 int finish_open(struct file *file, struct dentry *dentry,
787 		int (*open)(struct inode *, struct file *),
788 		int *opened)
789 {
790 	int error;
791 	BUG_ON(*opened & FILE_OPENED); /* once it's opened, it's opened */
792 
793 	file->f_path.dentry = dentry;
794 	error = do_dentry_open(file, open, current_cred());
795 	if (!error)
796 		*opened |= FILE_OPENED;
797 
798 	return error;
799 }
800 EXPORT_SYMBOL(finish_open);
801 
802 /**
803  * finish_no_open - finish ->atomic_open() without opening the file
804  *
805  * @file: file pointer
806  * @dentry: dentry or NULL (as returned from ->lookup())
807  *
808  * This can be used to set the result of a successful lookup in ->atomic_open().
809  *
810  * NB: unlike finish_open() this function does consume the dentry reference and
811  * the caller need not dput() it.
812  *
813  * Returns "1" which must be the return value of ->atomic_open() after having
814  * called this function.
815  */
816 int finish_no_open(struct file *file, struct dentry *dentry)
817 {
818 	file->f_path.dentry = dentry;
819 	return 1;
820 }
821 EXPORT_SYMBOL(finish_no_open);
822 
823 struct file *dentry_open(const struct path *path, int flags,
824 			 const struct cred *cred)
825 {
826 	int error;
827 	struct file *f;
828 
829 	validate_creds(cred);
830 
831 	/* We must always pass in a valid mount pointer. */
832 	BUG_ON(!path->mnt);
833 
834 	f = get_empty_filp();
835 	if (!IS_ERR(f)) {
836 		f->f_flags = flags;
837 		error = vfs_open(path, f, cred);
838 		if (!error) {
839 			/* from now on we need fput() to dispose of f */
840 			error = open_check_o_direct(f);
841 			if (error) {
842 				fput(f);
843 				f = ERR_PTR(error);
844 			}
845 		} else {
846 			put_filp(f);
847 			f = ERR_PTR(error);
848 		}
849 	}
850 	return f;
851 }
852 EXPORT_SYMBOL(dentry_open);
853 
854 /**
855  * vfs_open - open the file at the given path
856  * @path: path to open
857  * @filp: newly allocated file with f_flag initialized
858  * @cred: credentials to use
859  */
860 int vfs_open(const struct path *path, struct file *filp,
861 	     const struct cred *cred)
862 {
863 	struct inode *inode = path->dentry->d_inode;
864 
865 	if (inode->i_op->dentry_open)
866 		return inode->i_op->dentry_open(path->dentry, filp, cred);
867 	else {
868 		filp->f_path = *path;
869 		return do_dentry_open(filp, NULL, cred);
870 	}
871 }
872 EXPORT_SYMBOL(vfs_open);
873 
874 static inline int build_open_flags(int flags, umode_t mode, struct open_flags *op)
875 {
876 	int lookup_flags = 0;
877 	int acc_mode;
878 
879 	if (flags & (O_CREAT | __O_TMPFILE))
880 		op->mode = (mode & S_IALLUGO) | S_IFREG;
881 	else
882 		op->mode = 0;
883 
884 	/* Must never be set by userspace */
885 	flags &= ~FMODE_NONOTIFY & ~O_CLOEXEC;
886 
887 	/*
888 	 * O_SYNC is implemented as __O_SYNC|O_DSYNC.  As many places only
889 	 * check for O_DSYNC if the need any syncing at all we enforce it's
890 	 * always set instead of having to deal with possibly weird behaviour
891 	 * for malicious applications setting only __O_SYNC.
892 	 */
893 	if (flags & __O_SYNC)
894 		flags |= O_DSYNC;
895 
896 	if (flags & __O_TMPFILE) {
897 		if ((flags & O_TMPFILE_MASK) != O_TMPFILE)
898 			return -EINVAL;
899 		acc_mode = MAY_OPEN | ACC_MODE(flags);
900 		if (!(acc_mode & MAY_WRITE))
901 			return -EINVAL;
902 	} else if (flags & O_PATH) {
903 		/*
904 		 * If we have O_PATH in the open flag. Then we
905 		 * cannot have anything other than the below set of flags
906 		 */
907 		flags &= O_DIRECTORY | O_NOFOLLOW | O_PATH;
908 		acc_mode = 0;
909 	} else {
910 		acc_mode = MAY_OPEN | ACC_MODE(flags);
911 	}
912 
913 	op->open_flag = flags;
914 
915 	/* O_TRUNC implies we need access checks for write permissions */
916 	if (flags & O_TRUNC)
917 		acc_mode |= MAY_WRITE;
918 
919 	/* Allow the LSM permission hook to distinguish append
920 	   access from general write access. */
921 	if (flags & O_APPEND)
922 		acc_mode |= MAY_APPEND;
923 
924 	op->acc_mode = acc_mode;
925 
926 	op->intent = flags & O_PATH ? 0 : LOOKUP_OPEN;
927 
928 	if (flags & O_CREAT) {
929 		op->intent |= LOOKUP_CREATE;
930 		if (flags & O_EXCL)
931 			op->intent |= LOOKUP_EXCL;
932 	}
933 
934 	if (flags & O_DIRECTORY)
935 		lookup_flags |= LOOKUP_DIRECTORY;
936 	if (!(flags & O_NOFOLLOW))
937 		lookup_flags |= LOOKUP_FOLLOW;
938 	op->lookup_flags = lookup_flags;
939 	return 0;
940 }
941 
942 /**
943  * file_open_name - open file and return file pointer
944  *
945  * @name:	struct filename containing path to open
946  * @flags:	open flags as per the open(2) second argument
947  * @mode:	mode for the new file if O_CREAT is set, else ignored
948  *
949  * This is the helper to open a file from kernelspace if you really
950  * have to.  But in generally you should not do this, so please move
951  * along, nothing to see here..
952  */
953 struct file *file_open_name(struct filename *name, int flags, umode_t mode)
954 {
955 	struct open_flags op;
956 	int err = build_open_flags(flags, mode, &op);
957 	return err ? ERR_PTR(err) : do_filp_open(AT_FDCWD, name, &op);
958 }
959 
960 /**
961  * filp_open - open file and return file pointer
962  *
963  * @filename:	path to open
964  * @flags:	open flags as per the open(2) second argument
965  * @mode:	mode for the new file if O_CREAT is set, else ignored
966  *
967  * This is the helper to open a file from kernelspace if you really
968  * have to.  But in generally you should not do this, so please move
969  * along, nothing to see here..
970  */
971 struct file *filp_open(const char *filename, int flags, umode_t mode)
972 {
973 	struct filename name = {.name = filename};
974 	return file_open_name(&name, flags, mode);
975 }
976 EXPORT_SYMBOL(filp_open);
977 
978 struct file *file_open_root(struct dentry *dentry, struct vfsmount *mnt,
979 			    const char *filename, int flags)
980 {
981 	struct open_flags op;
982 	int err = build_open_flags(flags, 0, &op);
983 	if (err)
984 		return ERR_PTR(err);
985 	if (flags & O_CREAT)
986 		return ERR_PTR(-EINVAL);
987 	if (!filename && (flags & O_DIRECTORY))
988 		if (!dentry->d_inode->i_op->lookup)
989 			return ERR_PTR(-ENOTDIR);
990 	return do_file_open_root(dentry, mnt, filename, &op);
991 }
992 EXPORT_SYMBOL(file_open_root);
993 
994 long do_sys_open(int dfd, const char __user *filename, int flags, umode_t mode)
995 {
996 	struct open_flags op;
997 	int fd = build_open_flags(flags, mode, &op);
998 	struct filename *tmp;
999 
1000 	if (fd)
1001 		return fd;
1002 
1003 	tmp = getname(filename);
1004 	if (IS_ERR(tmp))
1005 		return PTR_ERR(tmp);
1006 
1007 	fd = get_unused_fd_flags(flags);
1008 	if (fd >= 0) {
1009 		struct file *f = do_filp_open(dfd, tmp, &op);
1010 		if (IS_ERR(f)) {
1011 			put_unused_fd(fd);
1012 			fd = PTR_ERR(f);
1013 		} else {
1014 			fsnotify_open(f);
1015 			fd_install(fd, f);
1016 		}
1017 	}
1018 	putname(tmp);
1019 	return fd;
1020 }
1021 
1022 SYSCALL_DEFINE3(open, const char __user *, filename, int, flags, umode_t, mode)
1023 {
1024 	if (force_o_largefile())
1025 		flags |= O_LARGEFILE;
1026 
1027 	return do_sys_open(AT_FDCWD, filename, flags, mode);
1028 }
1029 
1030 SYSCALL_DEFINE4(openat, int, dfd, const char __user *, filename, int, flags,
1031 		umode_t, mode)
1032 {
1033 	if (force_o_largefile())
1034 		flags |= O_LARGEFILE;
1035 
1036 	return do_sys_open(dfd, filename, flags, mode);
1037 }
1038 
1039 #ifndef __alpha__
1040 
1041 /*
1042  * For backward compatibility?  Maybe this should be moved
1043  * into arch/i386 instead?
1044  */
1045 SYSCALL_DEFINE2(creat, const char __user *, pathname, umode_t, mode)
1046 {
1047 	return sys_open(pathname, O_CREAT | O_WRONLY | O_TRUNC, mode);
1048 }
1049 
1050 #endif
1051 
1052 /*
1053  * "id" is the POSIX thread ID. We use the
1054  * files pointer for this..
1055  */
1056 int filp_close(struct file *filp, fl_owner_t id)
1057 {
1058 	int retval = 0;
1059 
1060 	if (!file_count(filp)) {
1061 		printk(KERN_ERR "VFS: Close: file count is 0\n");
1062 		return 0;
1063 	}
1064 
1065 	if (filp->f_op->flush)
1066 		retval = filp->f_op->flush(filp, id);
1067 
1068 	if (likely(!(filp->f_mode & FMODE_PATH))) {
1069 		dnotify_flush(filp, id);
1070 		locks_remove_posix(filp, id);
1071 	}
1072 	fput(filp);
1073 	return retval;
1074 }
1075 
1076 EXPORT_SYMBOL(filp_close);
1077 
1078 /*
1079  * Careful here! We test whether the file pointer is NULL before
1080  * releasing the fd. This ensures that one clone task can't release
1081  * an fd while another clone is opening it.
1082  */
1083 SYSCALL_DEFINE1(close, unsigned int, fd)
1084 {
1085 	int retval = __close_fd(current->files, fd);
1086 
1087 	/* can't restart close syscall because file table entry was cleared */
1088 	if (unlikely(retval == -ERESTARTSYS ||
1089 		     retval == -ERESTARTNOINTR ||
1090 		     retval == -ERESTARTNOHAND ||
1091 		     retval == -ERESTART_RESTARTBLOCK))
1092 		retval = -EINTR;
1093 
1094 	return retval;
1095 }
1096 EXPORT_SYMBOL(sys_close);
1097 
1098 /*
1099  * This routine simulates a hangup on the tty, to arrange that users
1100  * are given clean terminals at login time.
1101  */
1102 SYSCALL_DEFINE0(vhangup)
1103 {
1104 	if (capable(CAP_SYS_TTY_CONFIG)) {
1105 		tty_vhangup_self();
1106 		return 0;
1107 	}
1108 	return -EPERM;
1109 }
1110 
1111 /*
1112  * Called when an inode is about to be open.
1113  * We use this to disallow opening large files on 32bit systems if
1114  * the caller didn't specify O_LARGEFILE.  On 64bit systems we force
1115  * on this flag in sys_open.
1116  */
1117 int generic_file_open(struct inode * inode, struct file * filp)
1118 {
1119 	if (!(filp->f_flags & O_LARGEFILE) && i_size_read(inode) > MAX_NON_LFS)
1120 		return -EOVERFLOW;
1121 	return 0;
1122 }
1123 
1124 EXPORT_SYMBOL(generic_file_open);
1125 
1126 /*
1127  * This is used by subsystems that don't want seekable
1128  * file descriptors. The function is not supposed to ever fail, the only
1129  * reason it returns an 'int' and not 'void' is so that it can be plugged
1130  * directly into file_operations structure.
1131  */
1132 int nonseekable_open(struct inode *inode, struct file *filp)
1133 {
1134 	filp->f_mode &= ~(FMODE_LSEEK | FMODE_PREAD | FMODE_PWRITE);
1135 	return 0;
1136 }
1137 
1138 EXPORT_SYMBOL(nonseekable_open);
1139