]> git.karo-electronics.de Git - karo-tx-linux.git/blob - fs/namei.c
namei: uninline set_root{,_rcu}()
[karo-tx-linux.git] / fs / namei.c
1 /*
2  *  linux/fs/namei.c
3  *
4  *  Copyright (C) 1991, 1992  Linus Torvalds
5  */
6
7 /*
8  * Some corrections by tytso.
9  */
10
11 /* [Feb 1997 T. Schoebel-Theuer] Complete rewrite of the pathname
12  * lookup logic.
13  */
14 /* [Feb-Apr 2000, AV] Rewrite to the new namespace architecture.
15  */
16
17 #include <linux/init.h>
18 #include <linux/export.h>
19 #include <linux/kernel.h>
20 #include <linux/slab.h>
21 #include <linux/fs.h>
22 #include <linux/namei.h>
23 #include <linux/pagemap.h>
24 #include <linux/fsnotify.h>
25 #include <linux/personality.h>
26 #include <linux/security.h>
27 #include <linux/ima.h>
28 #include <linux/syscalls.h>
29 #include <linux/mount.h>
30 #include <linux/audit.h>
31 #include <linux/capability.h>
32 #include <linux/file.h>
33 #include <linux/fcntl.h>
34 #include <linux/device_cgroup.h>
35 #include <linux/fs_struct.h>
36 #include <linux/posix_acl.h>
37 #include <linux/hash.h>
38 #include <asm/uaccess.h>
39
40 #include "internal.h"
41 #include "mount.h"
42
43 /* [Feb-1997 T. Schoebel-Theuer]
44  * Fundamental changes in the pathname lookup mechanisms (namei)
45  * were necessary because of omirr.  The reason is that omirr needs
46  * to know the _real_ pathname, not the user-supplied one, in case
47  * of symlinks (and also when transname replacements occur).
48  *
49  * The new code replaces the old recursive symlink resolution with
50  * an iterative one (in case of non-nested symlink chains).  It does
51  * this with calls to <fs>_follow_link().
52  * As a side effect, dir_namei(), _namei() and follow_link() are now 
53  * replaced with a single function lookup_dentry() that can handle all 
54  * the special cases of the former code.
55  *
56  * With the new dcache, the pathname is stored at each inode, at least as
57  * long as the refcount of the inode is positive.  As a side effect, the
58  * size of the dcache depends on the inode cache and thus is dynamic.
59  *
60  * [29-Apr-1998 C. Scott Ananian] Updated above description of symlink
61  * resolution to correspond with current state of the code.
62  *
63  * Note that the symlink resolution is not *completely* iterative.
64  * There is still a significant amount of tail- and mid- recursion in
65  * the algorithm.  Also, note that <fs>_readlink() is not used in
66  * lookup_dentry(): lookup_dentry() on the result of <fs>_readlink()
67  * may return different results than <fs>_follow_link().  Many virtual
68  * filesystems (including /proc) exhibit this behavior.
69  */
70
71 /* [24-Feb-97 T. Schoebel-Theuer] Side effects caused by new implementation:
72  * New symlink semantics: when open() is called with flags O_CREAT | O_EXCL
73  * and the name already exists in form of a symlink, try to create the new
74  * name indicated by the symlink. The old code always complained that the
75  * name already exists, due to not following the symlink even if its target
76  * is nonexistent.  The new semantics affects also mknod() and link() when
77  * the name is a symlink pointing to a non-existent name.
78  *
79  * I don't know which semantics is the right one, since I have no access
80  * to standards. But I found by trial that HP-UX 9.0 has the full "new"
81  * semantics implemented, while SunOS 4.1.1 and Solaris (SunOS 5.4) have the
82  * "old" one. Personally, I think the new semantics is much more logical.
83  * Note that "ln old new" where "new" is a symlink pointing to a non-existing
84  * file does succeed in both HP-UX and SunOs, but not in Solaris
85  * and in the old Linux semantics.
86  */
87
88 /* [16-Dec-97 Kevin Buhr] For security reasons, we change some symlink
89  * semantics.  See the comments in "open_namei" and "do_link" below.
90  *
91  * [10-Sep-98 Alan Modra] Another symlink change.
92  */
93
94 /* [Feb-Apr 2000 AV] Complete rewrite. Rules for symlinks:
95  *      inside the path - always follow.
96  *      in the last component in creation/removal/renaming - never follow.
97  *      if LOOKUP_FOLLOW passed - follow.
98  *      if the pathname has trailing slashes - follow.
99  *      otherwise - don't follow.
100  * (applied in that order).
101  *
102  * [Jun 2000 AV] Inconsistent behaviour of open() in case if flags==O_CREAT
103  * restored for 2.4. This is the last surviving part of old 4.2BSD bug.
104  * During the 2.4 we need to fix the userland stuff depending on it -
105  * hopefully we will be able to get rid of that wart in 2.5. So far only
106  * XEmacs seems to be relying on it...
107  */
108 /*
109  * [Sep 2001 AV] Single-semaphore locking scheme (kudos to David Holland)
110  * implemented.  Let's see if raised priority of ->s_vfs_rename_mutex gives
111  * any extra contention...
112  */
113
114 /* In order to reduce some races, while at the same time doing additional
115  * checking and hopefully speeding things up, we copy filenames to the
116  * kernel data space before using them..
117  *
118  * POSIX.1 2.4: an empty pathname is invalid (ENOENT).
119  * PATH_MAX includes the nul terminator --RR.
120  */
121
122 #define EMBEDDED_NAME_MAX       (PATH_MAX - offsetof(struct filename, iname))
123
124 struct filename *
125 getname_flags(const char __user *filename, int flags, int *empty)
126 {
127         struct filename *result;
128         char *kname;
129         int len;
130
131         result = audit_reusename(filename);
132         if (result)
133                 return result;
134
135         result = __getname();
136         if (unlikely(!result))
137                 return ERR_PTR(-ENOMEM);
138
139         /*
140          * First, try to embed the struct filename inside the names_cache
141          * allocation
142          */
143         kname = (char *)result->iname;
144         result->name = kname;
145
146         len = strncpy_from_user(kname, filename, EMBEDDED_NAME_MAX);
147         if (unlikely(len < 0)) {
148                 __putname(result);
149                 return ERR_PTR(len);
150         }
151
152         /*
153          * Uh-oh. We have a name that's approaching PATH_MAX. Allocate a
154          * separate struct filename so we can dedicate the entire
155          * names_cache allocation for the pathname, and re-do the copy from
156          * userland.
157          */
158         if (unlikely(len == EMBEDDED_NAME_MAX)) {
159                 const size_t size = offsetof(struct filename, iname[1]);
160                 kname = (char *)result;
161
162                 /*
163                  * size is chosen that way we to guarantee that
164                  * result->iname[0] is within the same object and that
165                  * kname can't be equal to result->iname, no matter what.
166                  */
167                 result = kzalloc(size, GFP_KERNEL);
168                 if (unlikely(!result)) {
169                         __putname(kname);
170                         return ERR_PTR(-ENOMEM);
171                 }
172                 result->name = kname;
173                 len = strncpy_from_user(kname, filename, PATH_MAX);
174                 if (unlikely(len < 0)) {
175                         __putname(kname);
176                         kfree(result);
177                         return ERR_PTR(len);
178                 }
179                 if (unlikely(len == PATH_MAX)) {
180                         __putname(kname);
181                         kfree(result);
182                         return ERR_PTR(-ENAMETOOLONG);
183                 }
184         }
185
186         result->refcnt = 1;
187         /* The empty path is special. */
188         if (unlikely(!len)) {
189                 if (empty)
190                         *empty = 1;
191                 if (!(flags & LOOKUP_EMPTY)) {
192                         putname(result);
193                         return ERR_PTR(-ENOENT);
194                 }
195         }
196
197         result->uptr = filename;
198         result->aname = NULL;
199         audit_getname(result);
200         return result;
201 }
202
203 struct filename *
204 getname(const char __user * filename)
205 {
206         return getname_flags(filename, 0, NULL);
207 }
208
209 struct filename *
210 getname_kernel(const char * filename)
211 {
212         struct filename *result;
213         int len = strlen(filename) + 1;
214
215         result = __getname();
216         if (unlikely(!result))
217                 return ERR_PTR(-ENOMEM);
218
219         if (len <= EMBEDDED_NAME_MAX) {
220                 result->name = (char *)result->iname;
221         } else if (len <= PATH_MAX) {
222                 struct filename *tmp;
223
224                 tmp = kmalloc(sizeof(*tmp), GFP_KERNEL);
225                 if (unlikely(!tmp)) {
226                         __putname(result);
227                         return ERR_PTR(-ENOMEM);
228                 }
229                 tmp->name = (char *)result;
230                 result = tmp;
231         } else {
232                 __putname(result);
233                 return ERR_PTR(-ENAMETOOLONG);
234         }
235         memcpy((char *)result->name, filename, len);
236         result->uptr = NULL;
237         result->aname = NULL;
238         result->refcnt = 1;
239         audit_getname(result);
240
241         return result;
242 }
243
244 void putname(struct filename *name)
245 {
246         BUG_ON(name->refcnt <= 0);
247
248         if (--name->refcnt > 0)
249                 return;
250
251         if (name->name != name->iname) {
252                 __putname(name->name);
253                 kfree(name);
254         } else
255                 __putname(name);
256 }
257
258 static int check_acl(struct inode *inode, int mask)
259 {
260 #ifdef CONFIG_FS_POSIX_ACL
261         struct posix_acl *acl;
262
263         if (mask & MAY_NOT_BLOCK) {
264                 acl = get_cached_acl_rcu(inode, ACL_TYPE_ACCESS);
265                 if (!acl)
266                         return -EAGAIN;
267                 /* no ->get_acl() calls in RCU mode... */
268                 if (acl == ACL_NOT_CACHED)
269                         return -ECHILD;
270                 return posix_acl_permission(inode, acl, mask & ~MAY_NOT_BLOCK);
271         }
272
273         acl = get_acl(inode, ACL_TYPE_ACCESS);
274         if (IS_ERR(acl))
275                 return PTR_ERR(acl);
276         if (acl) {
277                 int error = posix_acl_permission(inode, acl, mask);
278                 posix_acl_release(acl);
279                 return error;
280         }
281 #endif
282
283         return -EAGAIN;
284 }
285
286 /*
287  * This does the basic permission checking
288  */
289 static int acl_permission_check(struct inode *inode, int mask)
290 {
291         unsigned int mode = inode->i_mode;
292
293         if (likely(uid_eq(current_fsuid(), inode->i_uid)))
294                 mode >>= 6;
295         else {
296                 if (IS_POSIXACL(inode) && (mode & S_IRWXG)) {
297                         int error = check_acl(inode, mask);
298                         if (error != -EAGAIN)
299                                 return error;
300                 }
301
302                 if (in_group_p(inode->i_gid))
303                         mode >>= 3;
304         }
305
306         /*
307          * If the DACs are ok we don't need any capability check.
308          */
309         if ((mask & ~mode & (MAY_READ | MAY_WRITE | MAY_EXEC)) == 0)
310                 return 0;
311         return -EACCES;
312 }
313
314 /**
315  * generic_permission -  check for access rights on a Posix-like filesystem
316  * @inode:      inode to check access rights for
317  * @mask:       right to check for (%MAY_READ, %MAY_WRITE, %MAY_EXEC, ...)
318  *
319  * Used to check for read/write/execute permissions on a file.
320  * We use "fsuid" for this, letting us set arbitrary permissions
321  * for filesystem access without changing the "normal" uids which
322  * are used for other things.
323  *
324  * generic_permission is rcu-walk aware. It returns -ECHILD in case an rcu-walk
325  * request cannot be satisfied (eg. requires blocking or too much complexity).
326  * It would then be called again in ref-walk mode.
327  */
328 int generic_permission(struct inode *inode, int mask)
329 {
330         int ret;
331
332         /*
333          * Do the basic permission checks.
334          */
335         ret = acl_permission_check(inode, mask);
336         if (ret != -EACCES)
337                 return ret;
338
339         if (S_ISDIR(inode->i_mode)) {
340                 /* DACs are overridable for directories */
341                 if (capable_wrt_inode_uidgid(inode, CAP_DAC_OVERRIDE))
342                         return 0;
343                 if (!(mask & MAY_WRITE))
344                         if (capable_wrt_inode_uidgid(inode,
345                                                      CAP_DAC_READ_SEARCH))
346                                 return 0;
347                 return -EACCES;
348         }
349         /*
350          * Read/write DACs are always overridable.
351          * Executable DACs are overridable when there is
352          * at least one exec bit set.
353          */
354         if (!(mask & MAY_EXEC) || (inode->i_mode & S_IXUGO))
355                 if (capable_wrt_inode_uidgid(inode, CAP_DAC_OVERRIDE))
356                         return 0;
357
358         /*
359          * Searching includes executable on directories, else just read.
360          */
361         mask &= MAY_READ | MAY_WRITE | MAY_EXEC;
362         if (mask == MAY_READ)
363                 if (capable_wrt_inode_uidgid(inode, CAP_DAC_READ_SEARCH))
364                         return 0;
365
366         return -EACCES;
367 }
368 EXPORT_SYMBOL(generic_permission);
369
370 /*
371  * We _really_ want to just do "generic_permission()" without
372  * even looking at the inode->i_op values. So we keep a cache
373  * flag in inode->i_opflags, that says "this has not special
374  * permission function, use the fast case".
375  */
376 static inline int do_inode_permission(struct inode *inode, int mask)
377 {
378         if (unlikely(!(inode->i_opflags & IOP_FASTPERM))) {
379                 if (likely(inode->i_op->permission))
380                         return inode->i_op->permission(inode, mask);
381
382                 /* This gets set once for the inode lifetime */
383                 spin_lock(&inode->i_lock);
384                 inode->i_opflags |= IOP_FASTPERM;
385                 spin_unlock(&inode->i_lock);
386         }
387         return generic_permission(inode, mask);
388 }
389
390 /**
391  * __inode_permission - Check for access rights to a given inode
392  * @inode: Inode to check permission on
393  * @mask: Right to check for (%MAY_READ, %MAY_WRITE, %MAY_EXEC)
394  *
395  * Check for read/write/execute permissions on an inode.
396  *
397  * When checking for MAY_APPEND, MAY_WRITE must also be set in @mask.
398  *
399  * This does not check for a read-only file system.  You probably want
400  * inode_permission().
401  */
402 int __inode_permission(struct inode *inode, int mask)
403 {
404         int retval;
405
406         if (unlikely(mask & MAY_WRITE)) {
407                 /*
408                  * Nobody gets write access to an immutable file.
409                  */
410                 if (IS_IMMUTABLE(inode))
411                         return -EACCES;
412         }
413
414         retval = do_inode_permission(inode, mask);
415         if (retval)
416                 return retval;
417
418         retval = devcgroup_inode_permission(inode, mask);
419         if (retval)
420                 return retval;
421
422         return security_inode_permission(inode, mask);
423 }
424 EXPORT_SYMBOL(__inode_permission);
425
426 /**
427  * sb_permission - Check superblock-level permissions
428  * @sb: Superblock of inode to check permission on
429  * @inode: Inode to check permission on
430  * @mask: Right to check for (%MAY_READ, %MAY_WRITE, %MAY_EXEC)
431  *
432  * Separate out file-system wide checks from inode-specific permission checks.
433  */
434 static int sb_permission(struct super_block *sb, struct inode *inode, int mask)
435 {
436         if (unlikely(mask & MAY_WRITE)) {
437                 umode_t mode = inode->i_mode;
438
439                 /* Nobody gets write access to a read-only fs. */
440                 if ((sb->s_flags & MS_RDONLY) &&
441                     (S_ISREG(mode) || S_ISDIR(mode) || S_ISLNK(mode)))
442                         return -EROFS;
443         }
444         return 0;
445 }
446
447 /**
448  * inode_permission - Check for access rights to a given inode
449  * @inode: Inode to check permission on
450  * @mask: Right to check for (%MAY_READ, %MAY_WRITE, %MAY_EXEC)
451  *
452  * Check for read/write/execute permissions on an inode.  We use fs[ug]id for
453  * this, letting us set arbitrary permissions for filesystem access without
454  * changing the "normal" UIDs which are used for other things.
455  *
456  * When checking for MAY_APPEND, MAY_WRITE must also be set in @mask.
457  */
458 int inode_permission(struct inode *inode, int mask)
459 {
460         int retval;
461
462         retval = sb_permission(inode->i_sb, inode, mask);
463         if (retval)
464                 return retval;
465         return __inode_permission(inode, mask);
466 }
467 EXPORT_SYMBOL(inode_permission);
468
469 /**
470  * path_get - get a reference to a path
471  * @path: path to get the reference to
472  *
473  * Given a path increment the reference count to the dentry and the vfsmount.
474  */
475 void path_get(const struct path *path)
476 {
477         mntget(path->mnt);
478         dget(path->dentry);
479 }
480 EXPORT_SYMBOL(path_get);
481
482 /**
483  * path_put - put a reference to a path
484  * @path: path to put the reference to
485  *
486  * Given a path decrement the reference count to the dentry and the vfsmount.
487  */
488 void path_put(const struct path *path)
489 {
490         dput(path->dentry);
491         mntput(path->mnt);
492 }
493 EXPORT_SYMBOL(path_put);
494
495 #define EMBEDDED_LEVELS 2
496 struct nameidata {
497         struct path     path;
498         struct qstr     last;
499         struct path     root;
500         struct inode    *inode; /* path.dentry.d_inode */
501         unsigned int    flags;
502         unsigned        seq, m_seq, root_seq;
503         int             last_type;
504         unsigned        depth;
505         int             total_link_count;
506         struct saved {
507                 struct path link;
508                 void *cookie;
509                 const char *name;
510                 struct inode *inode;
511                 unsigned seq;
512         } *stack, internal[EMBEDDED_LEVELS];
513 };
514
515 static struct nameidata *set_nameidata(struct nameidata *p)
516 {
517         struct nameidata *old = current->nameidata;
518         p->stack = p->internal;
519         p->total_link_count = old ? old->total_link_count : 0;
520         current->nameidata = p;
521         return old;
522 }
523
524 static void restore_nameidata(struct nameidata *old)
525 {
526         struct nameidata *now = current->nameidata;
527
528         current->nameidata = old;
529         if (old)
530                 old->total_link_count = now->total_link_count;
531         if (now->stack != now->internal) {
532                 kfree(now->stack);
533                 now->stack = now->internal;
534         }
535 }
536
537 static int __nd_alloc_stack(struct nameidata *nd)
538 {
539         struct saved *p;
540
541         if (nd->flags & LOOKUP_RCU) {
542                 p= kmalloc(MAXSYMLINKS * sizeof(struct saved),
543                                   GFP_ATOMIC);
544                 if (unlikely(!p))
545                         return -ECHILD;
546         } else {
547                 p= kmalloc(MAXSYMLINKS * sizeof(struct saved),
548                                   GFP_KERNEL);
549                 if (unlikely(!p))
550                         return -ENOMEM;
551         }
552         memcpy(p, nd->internal, sizeof(nd->internal));
553         nd->stack = p;
554         return 0;
555 }
556
557 static inline int nd_alloc_stack(struct nameidata *nd)
558 {
559         if (likely(nd->depth != EMBEDDED_LEVELS))
560                 return 0;
561         if (likely(nd->stack != nd->internal))
562                 return 0;
563         return __nd_alloc_stack(nd);
564 }
565
566 static void drop_links(struct nameidata *nd)
567 {
568         int i = nd->depth;
569         while (i--) {
570                 struct saved *last = nd->stack + i;
571                 struct inode *inode = last->inode;
572                 if (last->cookie && inode->i_op->put_link) {
573                         inode->i_op->put_link(inode, last->cookie);
574                         last->cookie = NULL;
575                 }
576         }
577 }
578
579 static void terminate_walk(struct nameidata *nd)
580 {
581         drop_links(nd);
582         if (!(nd->flags & LOOKUP_RCU)) {
583                 int i;
584                 path_put(&nd->path);
585                 for (i = 0; i < nd->depth; i++)
586                         path_put(&nd->stack[i].link);
587         } else {
588                 nd->flags &= ~LOOKUP_RCU;
589                 if (!(nd->flags & LOOKUP_ROOT))
590                         nd->root.mnt = NULL;
591                 rcu_read_unlock();
592         }
593         nd->depth = 0;
594 }
595
596 /* path_put is needed afterwards regardless of success or failure */
597 static bool legitimize_path(struct nameidata *nd,
598                             struct path *path, unsigned seq)
599 {
600         int res = __legitimize_mnt(path->mnt, nd->m_seq);
601         if (unlikely(res)) {
602                 if (res > 0)
603                         path->mnt = NULL;
604                 path->dentry = NULL;
605                 return false;
606         }
607         if (unlikely(!lockref_get_not_dead(&path->dentry->d_lockref))) {
608                 path->dentry = NULL;
609                 return false;
610         }
611         return !read_seqcount_retry(&path->dentry->d_seq, seq);
612 }
613
614 static bool legitimize_links(struct nameidata *nd)
615 {
616         int i;
617         for (i = 0; i < nd->depth; i++) {
618                 struct saved *last = nd->stack + i;
619                 if (unlikely(!legitimize_path(nd, &last->link, last->seq))) {
620                         drop_links(nd);
621                         nd->depth = i + 1;
622                         return false;
623                 }
624         }
625         return true;
626 }
627
628 /*
629  * Path walking has 2 modes, rcu-walk and ref-walk (see
630  * Documentation/filesystems/path-lookup.txt).  In situations when we can't
631  * continue in RCU mode, we attempt to drop out of rcu-walk mode and grab
632  * normal reference counts on dentries and vfsmounts to transition to rcu-walk
633  * mode.  Refcounts are grabbed at the last known good point before rcu-walk
634  * got stuck, so ref-walk may continue from there. If this is not successful
635  * (eg. a seqcount has changed), then failure is returned and it's up to caller
636  * to restart the path walk from the beginning in ref-walk mode.
637  */
638
639 /**
640  * unlazy_walk - try to switch to ref-walk mode.
641  * @nd: nameidata pathwalk data
642  * @dentry: child of nd->path.dentry or NULL
643  * @seq: seq number to check dentry against
644  * Returns: 0 on success, -ECHILD on failure
645  *
646  * unlazy_walk attempts to legitimize the current nd->path, nd->root and dentry
647  * for ref-walk mode.  @dentry must be a path found by a do_lookup call on
648  * @nd or NULL.  Must be called from rcu-walk context.
649  * Nothing should touch nameidata between unlazy_walk() failure and
650  * terminate_walk().
651  */
652 static int unlazy_walk(struct nameidata *nd, struct dentry *dentry, unsigned seq)
653 {
654         struct dentry *parent = nd->path.dentry;
655
656         BUG_ON(!(nd->flags & LOOKUP_RCU));
657
658         nd->flags &= ~LOOKUP_RCU;
659         if (unlikely(!legitimize_links(nd)))
660                 goto out2;
661         if (unlikely(!legitimize_mnt(nd->path.mnt, nd->m_seq)))
662                 goto out2;
663         if (unlikely(!lockref_get_not_dead(&parent->d_lockref)))
664                 goto out1;
665
666         /*
667          * For a negative lookup, the lookup sequence point is the parents
668          * sequence point, and it only needs to revalidate the parent dentry.
669          *
670          * For a positive lookup, we need to move both the parent and the
671          * dentry from the RCU domain to be properly refcounted. And the
672          * sequence number in the dentry validates *both* dentry counters,
673          * since we checked the sequence number of the parent after we got
674          * the child sequence number. So we know the parent must still
675          * be valid if the child sequence number is still valid.
676          */
677         if (!dentry) {
678                 if (read_seqcount_retry(&parent->d_seq, nd->seq))
679                         goto out;
680                 BUG_ON(nd->inode != parent->d_inode);
681         } else {
682                 if (!lockref_get_not_dead(&dentry->d_lockref))
683                         goto out;
684                 if (read_seqcount_retry(&dentry->d_seq, seq))
685                         goto drop_dentry;
686         }
687
688         /*
689          * Sequence counts matched. Now make sure that the root is
690          * still valid and get it if required.
691          */
692         if (nd->root.mnt && !(nd->flags & LOOKUP_ROOT)) {
693                 if (unlikely(!legitimize_path(nd, &nd->root, nd->root_seq))) {
694                         rcu_read_unlock();
695                         dput(dentry);
696                         return -ECHILD;
697                 }
698         }
699
700         rcu_read_unlock();
701         return 0;
702
703 drop_dentry:
704         rcu_read_unlock();
705         dput(dentry);
706         goto drop_root_mnt;
707 out2:
708         nd->path.mnt = NULL;
709 out1:
710         nd->path.dentry = NULL;
711 out:
712         rcu_read_unlock();
713 drop_root_mnt:
714         if (!(nd->flags & LOOKUP_ROOT))
715                 nd->root.mnt = NULL;
716         return -ECHILD;
717 }
718
719 static int unlazy_link(struct nameidata *nd, struct path *link, unsigned seq)
720 {
721         if (unlikely(!legitimize_path(nd, link, seq))) {
722                 drop_links(nd);
723                 nd->depth = 0;
724                 nd->flags &= ~LOOKUP_RCU;
725                 nd->path.mnt = NULL;
726                 nd->path.dentry = NULL;
727                 if (!(nd->flags & LOOKUP_ROOT))
728                         nd->root.mnt = NULL;
729                 rcu_read_unlock();
730         } else if (likely(unlazy_walk(nd, NULL, 0)) == 0) {
731                 return 0;
732         }
733         path_put(link);
734         return -ECHILD;
735 }
736
737 static inline int d_revalidate(struct dentry *dentry, unsigned int flags)
738 {
739         return dentry->d_op->d_revalidate(dentry, flags);
740 }
741
742 /**
743  * complete_walk - successful completion of path walk
744  * @nd:  pointer nameidata
745  *
746  * If we had been in RCU mode, drop out of it and legitimize nd->path.
747  * Revalidate the final result, unless we'd already done that during
748  * the path walk or the filesystem doesn't ask for it.  Return 0 on
749  * success, -error on failure.  In case of failure caller does not
750  * need to drop nd->path.
751  */
752 static int complete_walk(struct nameidata *nd)
753 {
754         struct dentry *dentry = nd->path.dentry;
755         int status;
756
757         if (nd->flags & LOOKUP_RCU) {
758                 if (!(nd->flags & LOOKUP_ROOT))
759                         nd->root.mnt = NULL;
760                 if (unlikely(unlazy_walk(nd, NULL, 0)))
761                         return -ECHILD;
762         }
763
764         if (likely(!(nd->flags & LOOKUP_JUMPED)))
765                 return 0;
766
767         if (likely(!(dentry->d_flags & DCACHE_OP_WEAK_REVALIDATE)))
768                 return 0;
769
770         status = dentry->d_op->d_weak_revalidate(dentry, nd->flags);
771         if (status > 0)
772                 return 0;
773
774         if (!status)
775                 status = -ESTALE;
776
777         return status;
778 }
779
780 static void set_root(struct nameidata *nd)
781 {
782         get_fs_root(current->fs, &nd->root);
783 }
784
785 static unsigned set_root_rcu(struct nameidata *nd)
786 {
787         struct fs_struct *fs = current->fs;
788         unsigned seq;
789
790         do {
791                 seq = read_seqcount_begin(&fs->seq);
792                 nd->root = fs->root;
793                 nd->root_seq = __read_seqcount_begin(&nd->root.dentry->d_seq);
794         } while (read_seqcount_retry(&fs->seq, seq));
795         return nd->root_seq;
796 }
797
798 static void path_put_conditional(struct path *path, struct nameidata *nd)
799 {
800         dput(path->dentry);
801         if (path->mnt != nd->path.mnt)
802                 mntput(path->mnt);
803 }
804
805 static inline void path_to_nameidata(const struct path *path,
806                                         struct nameidata *nd)
807 {
808         if (!(nd->flags & LOOKUP_RCU)) {
809                 dput(nd->path.dentry);
810                 if (nd->path.mnt != path->mnt)
811                         mntput(nd->path.mnt);
812         }
813         nd->path.mnt = path->mnt;
814         nd->path.dentry = path->dentry;
815 }
816
817 /*
818  * Helper to directly jump to a known parsed path from ->follow_link,
819  * caller must have taken a reference to path beforehand.
820  */
821 void nd_jump_link(struct path *path)
822 {
823         struct nameidata *nd = current->nameidata;
824         path_put(&nd->path);
825
826         nd->path = *path;
827         nd->inode = nd->path.dentry->d_inode;
828         nd->flags |= LOOKUP_JUMPED;
829 }
830
831 static inline void put_link(struct nameidata *nd)
832 {
833         struct saved *last = nd->stack + --nd->depth;
834         struct inode *inode = last->inode;
835         if (last->cookie && inode->i_op->put_link)
836                 inode->i_op->put_link(inode, last->cookie);
837         if (!(nd->flags & LOOKUP_RCU))
838                 path_put(&last->link);
839 }
840
841 int sysctl_protected_symlinks __read_mostly = 0;
842 int sysctl_protected_hardlinks __read_mostly = 0;
843
844 /**
845  * may_follow_link - Check symlink following for unsafe situations
846  * @nd: nameidata pathwalk data
847  *
848  * In the case of the sysctl_protected_symlinks sysctl being enabled,
849  * CAP_DAC_OVERRIDE needs to be specifically ignored if the symlink is
850  * in a sticky world-writable directory. This is to protect privileged
851  * processes from failing races against path names that may change out
852  * from under them by way of other users creating malicious symlinks.
853  * It will permit symlinks to be followed only when outside a sticky
854  * world-writable directory, or when the uid of the symlink and follower
855  * match, or when the directory owner matches the symlink's owner.
856  *
857  * Returns 0 if following the symlink is allowed, -ve on error.
858  */
859 static inline int may_follow_link(struct nameidata *nd)
860 {
861         const struct inode *inode;
862         const struct inode *parent;
863
864         if (!sysctl_protected_symlinks)
865                 return 0;
866
867         /* Allowed if owner and follower match. */
868         inode = nd->stack[0].inode;
869         if (uid_eq(current_cred()->fsuid, inode->i_uid))
870                 return 0;
871
872         /* Allowed if parent directory not sticky and world-writable. */
873         parent = nd->path.dentry->d_inode;
874         if ((parent->i_mode & (S_ISVTX|S_IWOTH)) != (S_ISVTX|S_IWOTH))
875                 return 0;
876
877         /* Allowed if parent directory and link owner match. */
878         if (uid_eq(parent->i_uid, inode->i_uid))
879                 return 0;
880
881         if (nd->flags & LOOKUP_RCU)
882                 return -ECHILD;
883
884         audit_log_link_denied("follow_link", &nd->stack[0].link);
885         return -EACCES;
886 }
887
888 /**
889  * safe_hardlink_source - Check for safe hardlink conditions
890  * @inode: the source inode to hardlink from
891  *
892  * Return false if at least one of the following conditions:
893  *    - inode is not a regular file
894  *    - inode is setuid
895  *    - inode is setgid and group-exec
896  *    - access failure for read and write
897  *
898  * Otherwise returns true.
899  */
900 static bool safe_hardlink_source(struct inode *inode)
901 {
902         umode_t mode = inode->i_mode;
903
904         /* Special files should not get pinned to the filesystem. */
905         if (!S_ISREG(mode))
906                 return false;
907
908         /* Setuid files should not get pinned to the filesystem. */
909         if (mode & S_ISUID)
910                 return false;
911
912         /* Executable setgid files should not get pinned to the filesystem. */
913         if ((mode & (S_ISGID | S_IXGRP)) == (S_ISGID | S_IXGRP))
914                 return false;
915
916         /* Hardlinking to unreadable or unwritable sources is dangerous. */
917         if (inode_permission(inode, MAY_READ | MAY_WRITE))
918                 return false;
919
920         return true;
921 }
922
923 /**
924  * may_linkat - Check permissions for creating a hardlink
925  * @link: the source to hardlink from
926  *
927  * Block hardlink when all of:
928  *  - sysctl_protected_hardlinks enabled
929  *  - fsuid does not match inode
930  *  - hardlink source is unsafe (see safe_hardlink_source() above)
931  *  - not CAP_FOWNER
932  *
933  * Returns 0 if successful, -ve on error.
934  */
935 static int may_linkat(struct path *link)
936 {
937         const struct cred *cred;
938         struct inode *inode;
939
940         if (!sysctl_protected_hardlinks)
941                 return 0;
942
943         cred = current_cred();
944         inode = link->dentry->d_inode;
945
946         /* Source inode owner (or CAP_FOWNER) can hardlink all they like,
947          * otherwise, it must be a safe source.
948          */
949         if (uid_eq(cred->fsuid, inode->i_uid) || safe_hardlink_source(inode) ||
950             capable(CAP_FOWNER))
951                 return 0;
952
953         audit_log_link_denied("linkat", link);
954         return -EPERM;
955 }
956
957 static __always_inline
958 const char *get_link(struct nameidata *nd)
959 {
960         struct saved *last = nd->stack + nd->depth - 1;
961         struct dentry *dentry = last->link.dentry;
962         struct inode *inode = last->inode;
963         int error;
964         const char *res;
965
966         if (!(nd->flags & LOOKUP_RCU)) {
967                 touch_atime(&last->link);
968                 cond_resched();
969         } else if (atime_needs_update(&last->link, inode)) {
970                 if (unlikely(unlazy_walk(nd, NULL, 0)))
971                         return ERR_PTR(-ECHILD);
972                 touch_atime(&last->link);
973         }
974
975         error = security_inode_follow_link(dentry, inode,
976                                            nd->flags & LOOKUP_RCU);
977         if (unlikely(error))
978                 return ERR_PTR(error);
979
980         nd->last_type = LAST_BIND;
981         res = inode->i_link;
982         if (!res) {
983                 if (nd->flags & LOOKUP_RCU) {
984                         if (unlikely(unlazy_walk(nd, NULL, 0)))
985                                 return ERR_PTR(-ECHILD);
986                 }
987                 res = inode->i_op->follow_link(dentry, &last->cookie);
988                 if (IS_ERR_OR_NULL(res)) {
989                         last->cookie = NULL;
990                         return res;
991                 }
992         }
993         if (*res == '/') {
994                 if (nd->flags & LOOKUP_RCU) {
995                         struct dentry *d;
996                         if (!nd->root.mnt)
997                                 set_root_rcu(nd);
998                         nd->path = nd->root;
999                         d = nd->path.dentry;
1000                         nd->inode = d->d_inode;
1001                         nd->seq = nd->root_seq;
1002                         if (unlikely(read_seqcount_retry(&d->d_seq, nd->seq)))
1003                                 return ERR_PTR(-ECHILD);
1004                 } else {
1005                         if (!nd->root.mnt)
1006                                 set_root(nd);
1007                         path_put(&nd->path);
1008                         nd->path = nd->root;
1009                         path_get(&nd->root);
1010                         nd->inode = nd->path.dentry->d_inode;
1011                 }
1012                 nd->flags |= LOOKUP_JUMPED;
1013                 while (unlikely(*++res == '/'))
1014                         ;
1015         }
1016         if (!*res)
1017                 res = NULL;
1018         return res;
1019 }
1020
1021 /*
1022  * follow_up - Find the mountpoint of path's vfsmount
1023  *
1024  * Given a path, find the mountpoint of its source file system.
1025  * Replace @path with the path of the mountpoint in the parent mount.
1026  * Up is towards /.
1027  *
1028  * Return 1 if we went up a level and 0 if we were already at the
1029  * root.
1030  */
1031 int follow_up(struct path *path)
1032 {
1033         struct mount *mnt = real_mount(path->mnt);
1034         struct mount *parent;
1035         struct dentry *mountpoint;
1036
1037         read_seqlock_excl(&mount_lock);
1038         parent = mnt->mnt_parent;
1039         if (parent == mnt) {
1040                 read_sequnlock_excl(&mount_lock);
1041                 return 0;
1042         }
1043         mntget(&parent->mnt);
1044         mountpoint = dget(mnt->mnt_mountpoint);
1045         read_sequnlock_excl(&mount_lock);
1046         dput(path->dentry);
1047         path->dentry = mountpoint;
1048         mntput(path->mnt);
1049         path->mnt = &parent->mnt;
1050         return 1;
1051 }
1052 EXPORT_SYMBOL(follow_up);
1053
1054 /*
1055  * Perform an automount
1056  * - return -EISDIR to tell follow_managed() to stop and return the path we
1057  *   were called with.
1058  */
1059 static int follow_automount(struct path *path, struct nameidata *nd,
1060                             bool *need_mntput)
1061 {
1062         struct vfsmount *mnt;
1063         int err;
1064
1065         if (!path->dentry->d_op || !path->dentry->d_op->d_automount)
1066                 return -EREMOTE;
1067
1068         /* We don't want to mount if someone's just doing a stat -
1069          * unless they're stat'ing a directory and appended a '/' to
1070          * the name.
1071          *
1072          * We do, however, want to mount if someone wants to open or
1073          * create a file of any type under the mountpoint, wants to
1074          * traverse through the mountpoint or wants to open the
1075          * mounted directory.  Also, autofs may mark negative dentries
1076          * as being automount points.  These will need the attentions
1077          * of the daemon to instantiate them before they can be used.
1078          */
1079         if (!(nd->flags & (LOOKUP_PARENT | LOOKUP_DIRECTORY |
1080                            LOOKUP_OPEN | LOOKUP_CREATE | LOOKUP_AUTOMOUNT)) &&
1081             path->dentry->d_inode)
1082                 return -EISDIR;
1083
1084         nd->total_link_count++;
1085         if (nd->total_link_count >= 40)
1086                 return -ELOOP;
1087
1088         mnt = path->dentry->d_op->d_automount(path);
1089         if (IS_ERR(mnt)) {
1090                 /*
1091                  * The filesystem is allowed to return -EISDIR here to indicate
1092                  * it doesn't want to automount.  For instance, autofs would do
1093                  * this so that its userspace daemon can mount on this dentry.
1094                  *
1095                  * However, we can only permit this if it's a terminal point in
1096                  * the path being looked up; if it wasn't then the remainder of
1097                  * the path is inaccessible and we should say so.
1098                  */
1099                 if (PTR_ERR(mnt) == -EISDIR && (nd->flags & LOOKUP_PARENT))
1100                         return -EREMOTE;
1101                 return PTR_ERR(mnt);
1102         }
1103
1104         if (!mnt) /* mount collision */
1105                 return 0;
1106
1107         if (!*need_mntput) {
1108                 /* lock_mount() may release path->mnt on error */
1109                 mntget(path->mnt);
1110                 *need_mntput = true;
1111         }
1112         err = finish_automount(mnt, path);
1113
1114         switch (err) {
1115         case -EBUSY:
1116                 /* Someone else made a mount here whilst we were busy */
1117                 return 0;
1118         case 0:
1119                 path_put(path);
1120                 path->mnt = mnt;
1121                 path->dentry = dget(mnt->mnt_root);
1122                 return 0;
1123         default:
1124                 return err;
1125         }
1126
1127 }
1128
1129 /*
1130  * Handle a dentry that is managed in some way.
1131  * - Flagged for transit management (autofs)
1132  * - Flagged as mountpoint
1133  * - Flagged as automount point
1134  *
1135  * This may only be called in refwalk mode.
1136  *
1137  * Serialization is taken care of in namespace.c
1138  */
1139 static int follow_managed(struct path *path, struct nameidata *nd)
1140 {
1141         struct vfsmount *mnt = path->mnt; /* held by caller, must be left alone */
1142         unsigned managed;
1143         bool need_mntput = false;
1144         int ret = 0;
1145
1146         /* Given that we're not holding a lock here, we retain the value in a
1147          * local variable for each dentry as we look at it so that we don't see
1148          * the components of that value change under us */
1149         while (managed = ACCESS_ONCE(path->dentry->d_flags),
1150                managed &= DCACHE_MANAGED_DENTRY,
1151                unlikely(managed != 0)) {
1152                 /* Allow the filesystem to manage the transit without i_mutex
1153                  * being held. */
1154                 if (managed & DCACHE_MANAGE_TRANSIT) {
1155                         BUG_ON(!path->dentry->d_op);
1156                         BUG_ON(!path->dentry->d_op->d_manage);
1157                         ret = path->dentry->d_op->d_manage(path->dentry, false);
1158                         if (ret < 0)
1159                                 break;
1160                 }
1161
1162                 /* Transit to a mounted filesystem. */
1163                 if (managed & DCACHE_MOUNTED) {
1164                         struct vfsmount *mounted = lookup_mnt(path);
1165                         if (mounted) {
1166                                 dput(path->dentry);
1167                                 if (need_mntput)
1168                                         mntput(path->mnt);
1169                                 path->mnt = mounted;
1170                                 path->dentry = dget(mounted->mnt_root);
1171                                 need_mntput = true;
1172                                 continue;
1173                         }
1174
1175                         /* Something is mounted on this dentry in another
1176                          * namespace and/or whatever was mounted there in this
1177                          * namespace got unmounted before lookup_mnt() could
1178                          * get it */
1179                 }
1180
1181                 /* Handle an automount point */
1182                 if (managed & DCACHE_NEED_AUTOMOUNT) {
1183                         ret = follow_automount(path, nd, &need_mntput);
1184                         if (ret < 0)
1185                                 break;
1186                         continue;
1187                 }
1188
1189                 /* We didn't change the current path point */
1190                 break;
1191         }
1192
1193         if (need_mntput && path->mnt == mnt)
1194                 mntput(path->mnt);
1195         if (ret == -EISDIR)
1196                 ret = 0;
1197         if (need_mntput)
1198                 nd->flags |= LOOKUP_JUMPED;
1199         if (unlikely(ret < 0))
1200                 path_put_conditional(path, nd);
1201         return ret;
1202 }
1203
1204 int follow_down_one(struct path *path)
1205 {
1206         struct vfsmount *mounted;
1207
1208         mounted = lookup_mnt(path);
1209         if (mounted) {
1210                 dput(path->dentry);
1211                 mntput(path->mnt);
1212                 path->mnt = mounted;
1213                 path->dentry = dget(mounted->mnt_root);
1214                 return 1;
1215         }
1216         return 0;
1217 }
1218 EXPORT_SYMBOL(follow_down_one);
1219
1220 static inline int managed_dentry_rcu(struct dentry *dentry)
1221 {
1222         return (dentry->d_flags & DCACHE_MANAGE_TRANSIT) ?
1223                 dentry->d_op->d_manage(dentry, true) : 0;
1224 }
1225
1226 /*
1227  * Try to skip to top of mountpoint pile in rcuwalk mode.  Fail if
1228  * we meet a managed dentry that would need blocking.
1229  */
1230 static bool __follow_mount_rcu(struct nameidata *nd, struct path *path,
1231                                struct inode **inode, unsigned *seqp)
1232 {
1233         for (;;) {
1234                 struct mount *mounted;
1235                 /*
1236                  * Don't forget we might have a non-mountpoint managed dentry
1237                  * that wants to block transit.
1238                  */
1239                 switch (managed_dentry_rcu(path->dentry)) {
1240                 case -ECHILD:
1241                 default:
1242                         return false;
1243                 case -EISDIR:
1244                         return true;
1245                 case 0:
1246                         break;
1247                 }
1248
1249                 if (!d_mountpoint(path->dentry))
1250                         return !(path->dentry->d_flags & DCACHE_NEED_AUTOMOUNT);
1251
1252                 mounted = __lookup_mnt(path->mnt, path->dentry);
1253                 if (!mounted)
1254                         break;
1255                 path->mnt = &mounted->mnt;
1256                 path->dentry = mounted->mnt.mnt_root;
1257                 nd->flags |= LOOKUP_JUMPED;
1258                 *seqp = read_seqcount_begin(&path->dentry->d_seq);
1259                 /*
1260                  * Update the inode too. We don't need to re-check the
1261                  * dentry sequence number here after this d_inode read,
1262                  * because a mount-point is always pinned.
1263                  */
1264                 *inode = path->dentry->d_inode;
1265         }
1266         return !read_seqretry(&mount_lock, nd->m_seq) &&
1267                 !(path->dentry->d_flags & DCACHE_NEED_AUTOMOUNT);
1268 }
1269
1270 static int follow_dotdot_rcu(struct nameidata *nd)
1271 {
1272         struct inode *inode = nd->inode;
1273         if (!nd->root.mnt)
1274                 set_root_rcu(nd);
1275
1276         while (1) {
1277                 if (path_equal(&nd->path, &nd->root))
1278                         break;
1279                 if (nd->path.dentry != nd->path.mnt->mnt_root) {
1280                         struct dentry *old = nd->path.dentry;
1281                         struct dentry *parent = old->d_parent;
1282                         unsigned seq;
1283
1284                         inode = parent->d_inode;
1285                         seq = read_seqcount_begin(&parent->d_seq);
1286                         if (unlikely(read_seqcount_retry(&old->d_seq, nd->seq)))
1287                                 return -ECHILD;
1288                         nd->path.dentry = parent;
1289                         nd->seq = seq;
1290                         break;
1291                 } else {
1292                         struct mount *mnt = real_mount(nd->path.mnt);
1293                         struct mount *mparent = mnt->mnt_parent;
1294                         struct dentry *mountpoint = mnt->mnt_mountpoint;
1295                         struct inode *inode2 = mountpoint->d_inode;
1296                         unsigned seq = read_seqcount_begin(&mountpoint->d_seq);
1297                         if (unlikely(read_seqretry(&mount_lock, nd->m_seq)))
1298                                 return -ECHILD;
1299                         if (&mparent->mnt == nd->path.mnt)
1300                                 break;
1301                         /* we know that mountpoint was pinned */
1302                         nd->path.dentry = mountpoint;
1303                         nd->path.mnt = &mparent->mnt;
1304                         inode = inode2;
1305                         nd->seq = seq;
1306                 }
1307         }
1308         while (unlikely(d_mountpoint(nd->path.dentry))) {
1309                 struct mount *mounted;
1310                 mounted = __lookup_mnt(nd->path.mnt, nd->path.dentry);
1311                 if (unlikely(read_seqretry(&mount_lock, nd->m_seq)))
1312                         return -ECHILD;
1313                 if (!mounted)
1314                         break;
1315                 nd->path.mnt = &mounted->mnt;
1316                 nd->path.dentry = mounted->mnt.mnt_root;
1317                 inode = nd->path.dentry->d_inode;
1318                 nd->seq = read_seqcount_begin(&nd->path.dentry->d_seq);
1319         }
1320         nd->inode = inode;
1321         return 0;
1322 }
1323
1324 /*
1325  * Follow down to the covering mount currently visible to userspace.  At each
1326  * point, the filesystem owning that dentry may be queried as to whether the
1327  * caller is permitted to proceed or not.
1328  */
1329 int follow_down(struct path *path)
1330 {
1331         unsigned managed;
1332         int ret;
1333
1334         while (managed = ACCESS_ONCE(path->dentry->d_flags),
1335                unlikely(managed & DCACHE_MANAGED_DENTRY)) {
1336                 /* Allow the filesystem to manage the transit without i_mutex
1337                  * being held.
1338                  *
1339                  * We indicate to the filesystem if someone is trying to mount
1340                  * something here.  This gives autofs the chance to deny anyone
1341                  * other than its daemon the right to mount on its
1342                  * superstructure.
1343                  *
1344                  * The filesystem may sleep at this point.
1345                  */
1346                 if (managed & DCACHE_MANAGE_TRANSIT) {
1347                         BUG_ON(!path->dentry->d_op);
1348                         BUG_ON(!path->dentry->d_op->d_manage);
1349                         ret = path->dentry->d_op->d_manage(
1350                                 path->dentry, false);
1351                         if (ret < 0)
1352                                 return ret == -EISDIR ? 0 : ret;
1353                 }
1354
1355                 /* Transit to a mounted filesystem. */
1356                 if (managed & DCACHE_MOUNTED) {
1357                         struct vfsmount *mounted = lookup_mnt(path);
1358                         if (!mounted)
1359                                 break;
1360                         dput(path->dentry);
1361                         mntput(path->mnt);
1362                         path->mnt = mounted;
1363                         path->dentry = dget(mounted->mnt_root);
1364                         continue;
1365                 }
1366
1367                 /* Don't handle automount points here */
1368                 break;
1369         }
1370         return 0;
1371 }
1372 EXPORT_SYMBOL(follow_down);
1373
1374 /*
1375  * Skip to top of mountpoint pile in refwalk mode for follow_dotdot()
1376  */
1377 static void follow_mount(struct path *path)
1378 {
1379         while (d_mountpoint(path->dentry)) {
1380                 struct vfsmount *mounted = lookup_mnt(path);
1381                 if (!mounted)
1382                         break;
1383                 dput(path->dentry);
1384                 mntput(path->mnt);
1385                 path->mnt = mounted;
1386                 path->dentry = dget(mounted->mnt_root);
1387         }
1388 }
1389
1390 static void follow_dotdot(struct nameidata *nd)
1391 {
1392         if (!nd->root.mnt)
1393                 set_root(nd);
1394
1395         while(1) {
1396                 struct dentry *old = nd->path.dentry;
1397
1398                 if (nd->path.dentry == nd->root.dentry &&
1399                     nd->path.mnt == nd->root.mnt) {
1400                         break;
1401                 }
1402                 if (nd->path.dentry != nd->path.mnt->mnt_root) {
1403                         /* rare case of legitimate dget_parent()... */
1404                         nd->path.dentry = dget_parent(nd->path.dentry);
1405                         dput(old);
1406                         break;
1407                 }
1408                 if (!follow_up(&nd->path))
1409                         break;
1410         }
1411         follow_mount(&nd->path);
1412         nd->inode = nd->path.dentry->d_inode;
1413 }
1414
1415 /*
1416  * This looks up the name in dcache, possibly revalidates the old dentry and
1417  * allocates a new one if not found or not valid.  In the need_lookup argument
1418  * returns whether i_op->lookup is necessary.
1419  *
1420  * dir->d_inode->i_mutex must be held
1421  */
1422 static struct dentry *lookup_dcache(struct qstr *name, struct dentry *dir,
1423                                     unsigned int flags, bool *need_lookup)
1424 {
1425         struct dentry *dentry;
1426         int error;
1427
1428         *need_lookup = false;
1429         dentry = d_lookup(dir, name);
1430         if (dentry) {
1431                 if (dentry->d_flags & DCACHE_OP_REVALIDATE) {
1432                         error = d_revalidate(dentry, flags);
1433                         if (unlikely(error <= 0)) {
1434                                 if (error < 0) {
1435                                         dput(dentry);
1436                                         return ERR_PTR(error);
1437                                 } else {
1438                                         d_invalidate(dentry);
1439                                         dput(dentry);
1440                                         dentry = NULL;
1441                                 }
1442                         }
1443                 }
1444         }
1445
1446         if (!dentry) {
1447                 dentry = d_alloc(dir, name);
1448                 if (unlikely(!dentry))
1449                         return ERR_PTR(-ENOMEM);
1450
1451                 *need_lookup = true;
1452         }
1453         return dentry;
1454 }
1455
1456 /*
1457  * Call i_op->lookup on the dentry.  The dentry must be negative and
1458  * unhashed.
1459  *
1460  * dir->d_inode->i_mutex must be held
1461  */
1462 static struct dentry *lookup_real(struct inode *dir, struct dentry *dentry,
1463                                   unsigned int flags)
1464 {
1465         struct dentry *old;
1466
1467         /* Don't create child dentry for a dead directory. */
1468         if (unlikely(IS_DEADDIR(dir))) {
1469                 dput(dentry);
1470                 return ERR_PTR(-ENOENT);
1471         }
1472
1473         old = dir->i_op->lookup(dir, dentry, flags);
1474         if (unlikely(old)) {
1475                 dput(dentry);
1476                 dentry = old;
1477         }
1478         return dentry;
1479 }
1480
1481 static struct dentry *__lookup_hash(struct qstr *name,
1482                 struct dentry *base, unsigned int flags)
1483 {
1484         bool need_lookup;
1485         struct dentry *dentry;
1486
1487         dentry = lookup_dcache(name, base, flags, &need_lookup);
1488         if (!need_lookup)
1489                 return dentry;
1490
1491         return lookup_real(base->d_inode, dentry, flags);
1492 }
1493
1494 /*
1495  *  It's more convoluted than I'd like it to be, but... it's still fairly
1496  *  small and for now I'd prefer to have fast path as straight as possible.
1497  *  It _is_ time-critical.
1498  */
1499 static int lookup_fast(struct nameidata *nd,
1500                        struct path *path, struct inode **inode,
1501                        unsigned *seqp)
1502 {
1503         struct vfsmount *mnt = nd->path.mnt;
1504         struct dentry *dentry, *parent = nd->path.dentry;
1505         int need_reval = 1;
1506         int status = 1;
1507         int err;
1508
1509         /*
1510          * Rename seqlock is not required here because in the off chance
1511          * of a false negative due to a concurrent rename, we're going to
1512          * do the non-racy lookup, below.
1513          */
1514         if (nd->flags & LOOKUP_RCU) {
1515                 unsigned seq;
1516                 bool negative;
1517                 dentry = __d_lookup_rcu(parent, &nd->last, &seq);
1518                 if (!dentry)
1519                         goto unlazy;
1520
1521                 /*
1522                  * This sequence count validates that the inode matches
1523                  * the dentry name information from lookup.
1524                  */
1525                 *inode = d_backing_inode(dentry);
1526                 negative = d_is_negative(dentry);
1527                 if (read_seqcount_retry(&dentry->d_seq, seq))
1528                         return -ECHILD;
1529                 if (negative)
1530                         return -ENOENT;
1531
1532                 /*
1533                  * This sequence count validates that the parent had no
1534                  * changes while we did the lookup of the dentry above.
1535                  *
1536                  * The memory barrier in read_seqcount_begin of child is
1537                  *  enough, we can use __read_seqcount_retry here.
1538                  */
1539                 if (__read_seqcount_retry(&parent->d_seq, nd->seq))
1540                         return -ECHILD;
1541
1542                 *seqp = seq;
1543                 if (unlikely(dentry->d_flags & DCACHE_OP_REVALIDATE)) {
1544                         status = d_revalidate(dentry, nd->flags);
1545                         if (unlikely(status <= 0)) {
1546                                 if (status != -ECHILD)
1547                                         need_reval = 0;
1548                                 goto unlazy;
1549                         }
1550                 }
1551                 path->mnt = mnt;
1552                 path->dentry = dentry;
1553                 if (likely(__follow_mount_rcu(nd, path, inode, seqp)))
1554                         return 0;
1555 unlazy:
1556                 if (unlazy_walk(nd, dentry, seq))
1557                         return -ECHILD;
1558         } else {
1559                 dentry = __d_lookup(parent, &nd->last);
1560         }
1561
1562         if (unlikely(!dentry))
1563                 goto need_lookup;
1564
1565         if (unlikely(dentry->d_flags & DCACHE_OP_REVALIDATE) && need_reval)
1566                 status = d_revalidate(dentry, nd->flags);
1567         if (unlikely(status <= 0)) {
1568                 if (status < 0) {
1569                         dput(dentry);
1570                         return status;
1571                 }
1572                 d_invalidate(dentry);
1573                 dput(dentry);
1574                 goto need_lookup;
1575         }
1576
1577         if (unlikely(d_is_negative(dentry))) {
1578                 dput(dentry);
1579                 return -ENOENT;
1580         }
1581         path->mnt = mnt;
1582         path->dentry = dentry;
1583         err = follow_managed(path, nd);
1584         if (likely(!err))
1585                 *inode = d_backing_inode(path->dentry);
1586         return err;
1587
1588 need_lookup:
1589         return 1;
1590 }
1591
1592 /* Fast lookup failed, do it the slow way */
1593 static int lookup_slow(struct nameidata *nd, struct path *path)
1594 {
1595         struct dentry *dentry, *parent;
1596
1597         parent = nd->path.dentry;
1598         BUG_ON(nd->inode != parent->d_inode);
1599
1600         mutex_lock(&parent->d_inode->i_mutex);
1601         dentry = __lookup_hash(&nd->last, parent, nd->flags);
1602         mutex_unlock(&parent->d_inode->i_mutex);
1603         if (IS_ERR(dentry))
1604                 return PTR_ERR(dentry);
1605         path->mnt = nd->path.mnt;
1606         path->dentry = dentry;
1607         return follow_managed(path, nd);
1608 }
1609
1610 static inline int may_lookup(struct nameidata *nd)
1611 {
1612         if (nd->flags & LOOKUP_RCU) {
1613                 int err = inode_permission(nd->inode, MAY_EXEC|MAY_NOT_BLOCK);
1614                 if (err != -ECHILD)
1615                         return err;
1616                 if (unlazy_walk(nd, NULL, 0))
1617                         return -ECHILD;
1618         }
1619         return inode_permission(nd->inode, MAY_EXEC);
1620 }
1621
1622 static inline int handle_dots(struct nameidata *nd, int type)
1623 {
1624         if (type == LAST_DOTDOT) {
1625                 if (nd->flags & LOOKUP_RCU) {
1626                         return follow_dotdot_rcu(nd);
1627                 } else
1628                         follow_dotdot(nd);
1629         }
1630         return 0;
1631 }
1632
1633 static int pick_link(struct nameidata *nd, struct path *link,
1634                      struct inode *inode, unsigned seq)
1635 {
1636         int error;
1637         struct saved *last;
1638         if (unlikely(nd->total_link_count++ >= MAXSYMLINKS)) {
1639                 path_to_nameidata(link, nd);
1640                 return -ELOOP;
1641         }
1642         if (!(nd->flags & LOOKUP_RCU)) {
1643                 if (link->mnt == nd->path.mnt)
1644                         mntget(link->mnt);
1645         }
1646         error = nd_alloc_stack(nd);
1647         if (unlikely(error)) {
1648                 if (error == -ECHILD) {
1649                         if (unlikely(unlazy_link(nd, link, seq)))
1650                                 return -ECHILD;
1651                         error = nd_alloc_stack(nd);
1652                 }
1653                 if (error) {
1654                         path_put(link);
1655                         return error;
1656                 }
1657         }
1658
1659         last = nd->stack + nd->depth++;
1660         last->link = *link;
1661         last->cookie = NULL;
1662         last->inode = inode;
1663         last->seq = seq;
1664         return 1;
1665 }
1666
1667 /*
1668  * Do we need to follow links? We _really_ want to be able
1669  * to do this check without having to look at inode->i_op,
1670  * so we keep a cache of "no, this doesn't need follow_link"
1671  * for the common case.
1672  */
1673 static inline int should_follow_link(struct nameidata *nd, struct path *link,
1674                                      int follow,
1675                                      struct inode *inode, unsigned seq)
1676 {
1677         if (likely(!d_is_symlink(link->dentry)))
1678                 return 0;
1679         if (!follow)
1680                 return 0;
1681         return pick_link(nd, link, inode, seq);
1682 }
1683
1684 enum {WALK_GET = 1, WALK_PUT = 2};
1685
1686 static int walk_component(struct nameidata *nd, int flags)
1687 {
1688         struct path path;
1689         struct inode *inode;
1690         unsigned seq;
1691         int err;
1692         /*
1693          * "." and ".." are special - ".." especially so because it has
1694          * to be able to know about the current root directory and
1695          * parent relationships.
1696          */
1697         if (unlikely(nd->last_type != LAST_NORM)) {
1698                 err = handle_dots(nd, nd->last_type);
1699                 if (flags & WALK_PUT)
1700                         put_link(nd);
1701                 return err;
1702         }
1703         err = lookup_fast(nd, &path, &inode, &seq);
1704         if (unlikely(err)) {
1705                 if (err < 0)
1706                         return err;
1707
1708                 err = lookup_slow(nd, &path);
1709                 if (err < 0)
1710                         return err;
1711
1712                 inode = d_backing_inode(path.dentry);
1713                 seq = 0;        /* we are already out of RCU mode */
1714                 err = -ENOENT;
1715                 if (d_is_negative(path.dentry))
1716                         goto out_path_put;
1717         }
1718
1719         if (flags & WALK_PUT)
1720                 put_link(nd);
1721         err = should_follow_link(nd, &path, flags & WALK_GET, inode, seq);
1722         if (unlikely(err))
1723                 return err;
1724         path_to_nameidata(&path, nd);
1725         nd->inode = inode;
1726         nd->seq = seq;
1727         return 0;
1728
1729 out_path_put:
1730         path_to_nameidata(&path, nd);
1731         return err;
1732 }
1733
1734 /*
1735  * We can do the critical dentry name comparison and hashing
1736  * operations one word at a time, but we are limited to:
1737  *
1738  * - Architectures with fast unaligned word accesses. We could
1739  *   do a "get_unaligned()" if this helps and is sufficiently
1740  *   fast.
1741  *
1742  * - non-CONFIG_DEBUG_PAGEALLOC configurations (so that we
1743  *   do not trap on the (extremely unlikely) case of a page
1744  *   crossing operation.
1745  *
1746  * - Furthermore, we need an efficient 64-bit compile for the
1747  *   64-bit case in order to generate the "number of bytes in
1748  *   the final mask". Again, that could be replaced with a
1749  *   efficient population count instruction or similar.
1750  */
1751 #ifdef CONFIG_DCACHE_WORD_ACCESS
1752
1753 #include <asm/word-at-a-time.h>
1754
1755 #ifdef CONFIG_64BIT
1756
1757 static inline unsigned int fold_hash(unsigned long hash)
1758 {
1759         return hash_64(hash, 32);
1760 }
1761
1762 #else   /* 32-bit case */
1763
1764 #define fold_hash(x) (x)
1765
1766 #endif
1767
1768 unsigned int full_name_hash(const unsigned char *name, unsigned int len)
1769 {
1770         unsigned long a, mask;
1771         unsigned long hash = 0;
1772
1773         for (;;) {
1774                 a = load_unaligned_zeropad(name);
1775                 if (len < sizeof(unsigned long))
1776                         break;
1777                 hash += a;
1778                 hash *= 9;
1779                 name += sizeof(unsigned long);
1780                 len -= sizeof(unsigned long);
1781                 if (!len)
1782                         goto done;
1783         }
1784         mask = bytemask_from_count(len);
1785         hash += mask & a;
1786 done:
1787         return fold_hash(hash);
1788 }
1789 EXPORT_SYMBOL(full_name_hash);
1790
1791 /*
1792  * Calculate the length and hash of the path component, and
1793  * return the "hash_len" as the result.
1794  */
1795 static inline u64 hash_name(const char *name)
1796 {
1797         unsigned long a, b, adata, bdata, mask, hash, len;
1798         const struct word_at_a_time constants = WORD_AT_A_TIME_CONSTANTS;
1799
1800         hash = a = 0;
1801         len = -sizeof(unsigned long);
1802         do {
1803                 hash = (hash + a) * 9;
1804                 len += sizeof(unsigned long);
1805                 a = load_unaligned_zeropad(name+len);
1806                 b = a ^ REPEAT_BYTE('/');
1807         } while (!(has_zero(a, &adata, &constants) | has_zero(b, &bdata, &constants)));
1808
1809         adata = prep_zero_mask(a, adata, &constants);
1810         bdata = prep_zero_mask(b, bdata, &constants);
1811
1812         mask = create_zero_mask(adata | bdata);
1813
1814         hash += a & zero_bytemask(mask);
1815         len += find_zero(mask);
1816         return hashlen_create(fold_hash(hash), len);
1817 }
1818
1819 #else
1820
1821 unsigned int full_name_hash(const unsigned char *name, unsigned int len)
1822 {
1823         unsigned long hash = init_name_hash();
1824         while (len--)
1825                 hash = partial_name_hash(*name++, hash);
1826         return end_name_hash(hash);
1827 }
1828 EXPORT_SYMBOL(full_name_hash);
1829
1830 /*
1831  * We know there's a real path component here of at least
1832  * one character.
1833  */
1834 static inline u64 hash_name(const char *name)
1835 {
1836         unsigned long hash = init_name_hash();
1837         unsigned long len = 0, c;
1838
1839         c = (unsigned char)*name;
1840         do {
1841                 len++;
1842                 hash = partial_name_hash(c, hash);
1843                 c = (unsigned char)name[len];
1844         } while (c && c != '/');
1845         return hashlen_create(end_name_hash(hash), len);
1846 }
1847
1848 #endif
1849
1850 /*
1851  * Name resolution.
1852  * This is the basic name resolution function, turning a pathname into
1853  * the final dentry. We expect 'base' to be positive and a directory.
1854  *
1855  * Returns 0 and nd will have valid dentry and mnt on success.
1856  * Returns error and drops reference to input namei data on failure.
1857  */
1858 static int link_path_walk(const char *name, struct nameidata *nd)
1859 {
1860         int err;
1861
1862         while (*name=='/')
1863                 name++;
1864         if (!*name)
1865                 return 0;
1866
1867         /* At this point we know we have a real path component. */
1868         for(;;) {
1869                 u64 hash_len;
1870                 int type;
1871
1872                 err = may_lookup(nd);
1873                 if (err)
1874                         return err;
1875
1876                 hash_len = hash_name(name);
1877
1878                 type = LAST_NORM;
1879                 if (name[0] == '.') switch (hashlen_len(hash_len)) {
1880                         case 2:
1881                                 if (name[1] == '.') {
1882                                         type = LAST_DOTDOT;
1883                                         nd->flags |= LOOKUP_JUMPED;
1884                                 }
1885                                 break;
1886                         case 1:
1887                                 type = LAST_DOT;
1888                 }
1889                 if (likely(type == LAST_NORM)) {
1890                         struct dentry *parent = nd->path.dentry;
1891                         nd->flags &= ~LOOKUP_JUMPED;
1892                         if (unlikely(parent->d_flags & DCACHE_OP_HASH)) {
1893                                 struct qstr this = { { .hash_len = hash_len }, .name = name };
1894                                 err = parent->d_op->d_hash(parent, &this);
1895                                 if (err < 0)
1896                                         return err;
1897                                 hash_len = this.hash_len;
1898                                 name = this.name;
1899                         }
1900                 }
1901
1902                 nd->last.hash_len = hash_len;
1903                 nd->last.name = name;
1904                 nd->last_type = type;
1905
1906                 name += hashlen_len(hash_len);
1907                 if (!*name)
1908                         goto OK;
1909                 /*
1910                  * If it wasn't NUL, we know it was '/'. Skip that
1911                  * slash, and continue until no more slashes.
1912                  */
1913                 do {
1914                         name++;
1915                 } while (unlikely(*name == '/'));
1916                 if (unlikely(!*name)) {
1917 OK:
1918                         /* pathname body, done */
1919                         if (!nd->depth)
1920                                 return 0;
1921                         name = nd->stack[nd->depth - 1].name;
1922                         /* trailing symlink, done */
1923                         if (!name)
1924                                 return 0;
1925                         /* last component of nested symlink */
1926                         err = walk_component(nd, WALK_GET | WALK_PUT);
1927                 } else {
1928                         err = walk_component(nd, WALK_GET);
1929                 }
1930                 if (err < 0)
1931                         return err;
1932
1933                 if (err) {
1934                         const char *s = get_link(nd);
1935
1936                         if (unlikely(IS_ERR(s)))
1937                                 return PTR_ERR(s);
1938                         err = 0;
1939                         if (unlikely(!s)) {
1940                                 /* jumped */
1941                                 put_link(nd);
1942                         } else {
1943                                 nd->stack[nd->depth - 1].name = name;
1944                                 name = s;
1945                                 continue;
1946                         }
1947                 }
1948                 if (unlikely(!d_can_lookup(nd->path.dentry)))
1949                         return -ENOTDIR;
1950         }
1951 }
1952
1953 static const char *path_init(int dfd, const struct filename *name,
1954                              unsigned int flags, struct nameidata *nd)
1955 {
1956         int retval = 0;
1957         const char *s = name->name;
1958
1959         nd->last_type = LAST_ROOT; /* if there are only slashes... */
1960         nd->flags = flags | LOOKUP_JUMPED | LOOKUP_PARENT;
1961         nd->depth = 0;
1962         nd->total_link_count = 0;
1963         if (flags & LOOKUP_ROOT) {
1964                 struct dentry *root = nd->root.dentry;
1965                 struct inode *inode = root->d_inode;
1966                 if (*s) {
1967                         if (!d_can_lookup(root))
1968                                 return ERR_PTR(-ENOTDIR);
1969                         retval = inode_permission(inode, MAY_EXEC);
1970                         if (retval)
1971                                 return ERR_PTR(retval);
1972                 }
1973                 nd->path = nd->root;
1974                 nd->inode = inode;
1975                 if (flags & LOOKUP_RCU) {
1976                         rcu_read_lock();
1977                         nd->seq = __read_seqcount_begin(&nd->path.dentry->d_seq);
1978                         nd->root_seq = nd->seq;
1979                         nd->m_seq = read_seqbegin(&mount_lock);
1980                 } else {
1981                         path_get(&nd->path);
1982                 }
1983                 return s;
1984         }
1985
1986         nd->root.mnt = NULL;
1987
1988         nd->m_seq = read_seqbegin(&mount_lock);
1989         if (*s == '/') {
1990                 if (flags & LOOKUP_RCU) {
1991                         rcu_read_lock();
1992                         nd->seq = set_root_rcu(nd);
1993                 } else {
1994                         set_root(nd);
1995                         path_get(&nd->root);
1996                 }
1997                 nd->path = nd->root;
1998         } else if (dfd == AT_FDCWD) {
1999                 if (flags & LOOKUP_RCU) {
2000                         struct fs_struct *fs = current->fs;
2001                         unsigned seq;
2002
2003                         rcu_read_lock();
2004
2005                         do {
2006                                 seq = read_seqcount_begin(&fs->seq);
2007                                 nd->path = fs->pwd;
2008                                 nd->seq = __read_seqcount_begin(&nd->path.dentry->d_seq);
2009                         } while (read_seqcount_retry(&fs->seq, seq));
2010                 } else {
2011                         get_fs_pwd(current->fs, &nd->path);
2012                 }
2013         } else {
2014                 /* Caller must check execute permissions on the starting path component */
2015                 struct fd f = fdget_raw(dfd);
2016                 struct dentry *dentry;
2017
2018                 if (!f.file)
2019                         return ERR_PTR(-EBADF);
2020
2021                 dentry = f.file->f_path.dentry;
2022
2023                 if (*s) {
2024                         if (!d_can_lookup(dentry)) {
2025                                 fdput(f);
2026                                 return ERR_PTR(-ENOTDIR);
2027                         }
2028                 }
2029
2030                 nd->path = f.file->f_path;
2031                 if (flags & LOOKUP_RCU) {
2032                         rcu_read_lock();
2033                         nd->inode = nd->path.dentry->d_inode;
2034                         nd->seq = read_seqcount_begin(&nd->path.dentry->d_seq);
2035                 } else {
2036                         path_get(&nd->path);
2037                         nd->inode = nd->path.dentry->d_inode;
2038                 }
2039                 fdput(f);
2040                 return s;
2041         }
2042
2043         nd->inode = nd->path.dentry->d_inode;
2044         if (!(flags & LOOKUP_RCU))
2045                 return s;
2046         if (likely(!read_seqcount_retry(&nd->path.dentry->d_seq, nd->seq)))
2047                 return s;
2048         if (!(nd->flags & LOOKUP_ROOT))
2049                 nd->root.mnt = NULL;
2050         rcu_read_unlock();
2051         return ERR_PTR(-ECHILD);
2052 }
2053
2054 static void path_cleanup(struct nameidata *nd)
2055 {
2056         if (nd->root.mnt && !(nd->flags & LOOKUP_ROOT)) {
2057                 path_put(&nd->root);
2058                 nd->root.mnt = NULL;
2059         }
2060 }
2061
2062 static const char *trailing_symlink(struct nameidata *nd)
2063 {
2064         const char *s;
2065         int error = may_follow_link(nd);
2066         if (unlikely(error))
2067                 return ERR_PTR(error);
2068         nd->flags |= LOOKUP_PARENT;
2069         nd->stack[0].name = NULL;
2070         s = get_link(nd);
2071         return s ? s : "";
2072 }
2073
2074 static inline int lookup_last(struct nameidata *nd)
2075 {
2076         if (nd->last_type == LAST_NORM && nd->last.name[nd->last.len])
2077                 nd->flags |= LOOKUP_FOLLOW | LOOKUP_DIRECTORY;
2078
2079         nd->flags &= ~LOOKUP_PARENT;
2080         return walk_component(nd,
2081                         nd->flags & LOOKUP_FOLLOW
2082                                 ? nd->depth
2083                                         ? WALK_PUT | WALK_GET
2084                                         : WALK_GET
2085                                 : 0);
2086 }
2087
2088 /* Returns 0 and nd will be valid on success; Retuns error, otherwise. */
2089 static int path_lookupat(int dfd, const struct filename *name,
2090                                 unsigned int flags, struct nameidata *nd)
2091 {
2092         const char *s = path_init(dfd, name, flags, nd);
2093         int err;
2094
2095         if (IS_ERR(s))
2096                 return PTR_ERR(s);
2097         while (!(err = link_path_walk(s, nd))
2098                 && ((err = lookup_last(nd)) > 0)) {
2099                 s = trailing_symlink(nd);
2100                 if (IS_ERR(s)) {
2101                         err = PTR_ERR(s);
2102                         break;
2103                 }
2104         }
2105         if (!err)
2106                 err = complete_walk(nd);
2107
2108         if (!err && nd->flags & LOOKUP_DIRECTORY)
2109                 if (!d_can_lookup(nd->path.dentry))
2110                         err = -ENOTDIR;
2111         if (err)
2112                 terminate_walk(nd);
2113
2114         path_cleanup(nd);
2115         return err;
2116 }
2117
2118 static int filename_lookup(int dfd, struct filename *name,
2119                                 unsigned int flags, struct nameidata *nd)
2120 {
2121         int retval;
2122         struct nameidata *saved_nd = set_nameidata(nd);
2123
2124         retval = path_lookupat(dfd, name, flags | LOOKUP_RCU, nd);
2125         if (unlikely(retval == -ECHILD))
2126                 retval = path_lookupat(dfd, name, flags, nd);
2127         if (unlikely(retval == -ESTALE))
2128                 retval = path_lookupat(dfd, name, flags | LOOKUP_REVAL, nd);
2129
2130         if (likely(!retval))
2131                 audit_inode(name, nd->path.dentry, flags & LOOKUP_PARENT);
2132         restore_nameidata(saved_nd);
2133         return retval;
2134 }
2135
2136 /* Returns 0 and nd will be valid on success; Retuns error, otherwise. */
2137 static int path_parentat(int dfd, const struct filename *name,
2138                                 unsigned int flags, struct nameidata *nd)
2139 {
2140         const char *s = path_init(dfd, name, flags, nd);
2141         int err;
2142         if (IS_ERR(s))
2143                 return PTR_ERR(s);
2144         err = link_path_walk(s, nd);
2145         if (!err)
2146                 err = complete_walk(nd);
2147         if (err)
2148                 terminate_walk(nd);
2149         path_cleanup(nd);
2150         return err;
2151 }
2152
2153 static int filename_parentat(int dfd, struct filename *name,
2154                                 unsigned int flags, struct nameidata *nd)
2155 {
2156         int retval;
2157         struct nameidata *saved_nd = set_nameidata(nd);
2158
2159         retval = path_parentat(dfd, name, flags | LOOKUP_RCU, nd);
2160         if (unlikely(retval == -ECHILD))
2161                 retval = path_parentat(dfd, name, flags, nd);
2162         if (unlikely(retval == -ESTALE))
2163                 retval = path_parentat(dfd, name, flags | LOOKUP_REVAL, nd);
2164
2165         if (likely(!retval))
2166                 audit_inode(name, nd->path.dentry, LOOKUP_PARENT);
2167         restore_nameidata(saved_nd);
2168         return retval;
2169 }
2170
2171 /* does lookup, returns the object with parent locked */
2172 struct dentry *kern_path_locked(const char *name, struct path *path)
2173 {
2174         struct filename *filename = getname_kernel(name);
2175         struct nameidata nd;
2176         struct dentry *d;
2177         int err;
2178
2179         if (IS_ERR(filename))
2180                 return ERR_CAST(filename);
2181
2182         err = filename_parentat(AT_FDCWD, filename, 0, &nd);
2183         if (err) {
2184                 d = ERR_PTR(err);
2185                 goto out;
2186         }
2187         if (nd.last_type != LAST_NORM) {
2188                 path_put(&nd.path);
2189                 d = ERR_PTR(-EINVAL);
2190                 goto out;
2191         }
2192         mutex_lock_nested(&nd.path.dentry->d_inode->i_mutex, I_MUTEX_PARENT);
2193         d = __lookup_hash(&nd.last, nd.path.dentry, 0);
2194         if (IS_ERR(d)) {
2195                 mutex_unlock(&nd.path.dentry->d_inode->i_mutex);
2196                 path_put(&nd.path);
2197                 goto out;
2198         }
2199         *path = nd.path;
2200 out:
2201         putname(filename);
2202         return d;
2203 }
2204
2205 int kern_path(const char *name, unsigned int flags, struct path *path)
2206 {
2207         struct nameidata nd;
2208         struct filename *filename = getname_kernel(name);
2209         int res = PTR_ERR(filename);
2210
2211         if (!IS_ERR(filename)) {
2212                 res = filename_lookup(AT_FDCWD, filename, flags, &nd);
2213                 putname(filename);
2214                 if (!res)
2215                         *path = nd.path;
2216         }
2217         return res;
2218 }
2219 EXPORT_SYMBOL(kern_path);
2220
2221 /**
2222  * vfs_path_lookup - lookup a file path relative to a dentry-vfsmount pair
2223  * @dentry:  pointer to dentry of the base directory
2224  * @mnt: pointer to vfs mount of the base directory
2225  * @name: pointer to file name
2226  * @flags: lookup flags
2227  * @path: pointer to struct path to fill
2228  */
2229 int vfs_path_lookup(struct dentry *dentry, struct vfsmount *mnt,
2230                     const char *name, unsigned int flags,
2231                     struct path *path)
2232 {
2233         struct filename *filename = getname_kernel(name);
2234         int err = PTR_ERR(filename);
2235
2236         BUG_ON(flags & LOOKUP_PARENT);
2237
2238         /* the first argument of filename_lookup() is ignored with LOOKUP_ROOT */
2239         if (!IS_ERR(filename)) {
2240                 struct nameidata nd;
2241                 nd.root.dentry = dentry;
2242                 nd.root.mnt = mnt;
2243                 err = filename_lookup(AT_FDCWD, filename,
2244                                       flags | LOOKUP_ROOT, &nd);
2245                 if (!err)
2246                         *path = nd.path;
2247                 putname(filename);
2248         }
2249         return err;
2250 }
2251 EXPORT_SYMBOL(vfs_path_lookup);
2252
2253 /**
2254  * lookup_one_len - filesystem helper to lookup single pathname component
2255  * @name:       pathname component to lookup
2256  * @base:       base directory to lookup from
2257  * @len:        maximum length @len should be interpreted to
2258  *
2259  * Note that this routine is purely a helper for filesystem usage and should
2260  * not be called by generic code.
2261  */
2262 struct dentry *lookup_one_len(const char *name, struct dentry *base, int len)
2263 {
2264         struct qstr this;
2265         unsigned int c;
2266         int err;
2267
2268         WARN_ON_ONCE(!mutex_is_locked(&base->d_inode->i_mutex));
2269
2270         this.name = name;
2271         this.len = len;
2272         this.hash = full_name_hash(name, len);
2273         if (!len)
2274                 return ERR_PTR(-EACCES);
2275
2276         if (unlikely(name[0] == '.')) {
2277                 if (len < 2 || (len == 2 && name[1] == '.'))
2278                         return ERR_PTR(-EACCES);
2279         }
2280
2281         while (len--) {
2282                 c = *(const unsigned char *)name++;
2283                 if (c == '/' || c == '\0')
2284                         return ERR_PTR(-EACCES);
2285         }
2286         /*
2287          * See if the low-level filesystem might want
2288          * to use its own hash..
2289          */
2290         if (base->d_flags & DCACHE_OP_HASH) {
2291                 int err = base->d_op->d_hash(base, &this);
2292                 if (err < 0)
2293                         return ERR_PTR(err);
2294         }
2295
2296         err = inode_permission(base->d_inode, MAY_EXEC);
2297         if (err)
2298                 return ERR_PTR(err);
2299
2300         return __lookup_hash(&this, base, 0);
2301 }
2302 EXPORT_SYMBOL(lookup_one_len);
2303
2304 int user_path_at_empty(int dfd, const char __user *name, unsigned flags,
2305                  struct path *path, int *empty)
2306 {
2307         struct nameidata nd;
2308         struct filename *tmp = getname_flags(name, flags, empty);
2309         int err = PTR_ERR(tmp);
2310         if (!IS_ERR(tmp)) {
2311
2312                 BUG_ON(flags & LOOKUP_PARENT);
2313
2314                 err = filename_lookup(dfd, tmp, flags, &nd);
2315                 putname(tmp);
2316                 if (!err)
2317                         *path = nd.path;
2318         }
2319         return err;
2320 }
2321
2322 int user_path_at(int dfd, const char __user *name, unsigned flags,
2323                  struct path *path)
2324 {
2325         return user_path_at_empty(dfd, name, flags, path, NULL);
2326 }
2327 EXPORT_SYMBOL(user_path_at);
2328
2329 /*
2330  * NB: most callers don't do anything directly with the reference to the
2331  *     to struct filename, but the nd->last pointer points into the name string
2332  *     allocated by getname. So we must hold the reference to it until all
2333  *     path-walking is complete.
2334  */
2335 static struct filename *
2336 user_path_parent(int dfd, const char __user *path,
2337                  struct path *parent,
2338                  struct qstr *last,
2339                  int *type,
2340                  unsigned int flags)
2341 {
2342         struct nameidata nd;
2343         struct filename *s = getname(path);
2344         int error;
2345
2346         /* only LOOKUP_REVAL is allowed in extra flags */
2347         flags &= LOOKUP_REVAL;
2348
2349         if (IS_ERR(s))
2350                 return s;
2351
2352         error = filename_parentat(dfd, s, flags, &nd);
2353         if (error) {
2354                 putname(s);
2355                 return ERR_PTR(error);
2356         }
2357         *parent = nd.path;
2358         *last = nd.last;
2359         *type = nd.last_type;
2360
2361         return s;
2362 }
2363
2364 /**
2365  * mountpoint_last - look up last component for umount
2366  * @nd:   pathwalk nameidata - currently pointing at parent directory of "last"
2367  * @path: pointer to container for result
2368  *
2369  * This is a special lookup_last function just for umount. In this case, we
2370  * need to resolve the path without doing any revalidation.
2371  *
2372  * The nameidata should be the result of doing a LOOKUP_PARENT pathwalk. Since
2373  * mountpoints are always pinned in the dcache, their ancestors are too. Thus,
2374  * in almost all cases, this lookup will be served out of the dcache. The only
2375  * cases where it won't are if nd->last refers to a symlink or the path is
2376  * bogus and it doesn't exist.
2377  *
2378  * Returns:
2379  * -error: if there was an error during lookup. This includes -ENOENT if the
2380  *         lookup found a negative dentry. The nd->path reference will also be
2381  *         put in this case.
2382  *
2383  * 0:      if we successfully resolved nd->path and found it to not to be a
2384  *         symlink that needs to be followed. "path" will also be populated.
2385  *         The nd->path reference will also be put.
2386  *
2387  * 1:      if we successfully resolved nd->last and found it to be a symlink
2388  *         that needs to be followed. "path" will be populated with the path
2389  *         to the link, and nd->path will *not* be put.
2390  */
2391 static int
2392 mountpoint_last(struct nameidata *nd, struct path *path)
2393 {
2394         int error = 0;
2395         struct dentry *dentry;
2396         struct dentry *dir = nd->path.dentry;
2397
2398         /* If we're in rcuwalk, drop out of it to handle last component */
2399         if (nd->flags & LOOKUP_RCU) {
2400                 if (unlazy_walk(nd, NULL, 0))
2401                         return -ECHILD;
2402         }
2403
2404         nd->flags &= ~LOOKUP_PARENT;
2405
2406         if (unlikely(nd->last_type != LAST_NORM)) {
2407                 error = handle_dots(nd, nd->last_type);
2408                 if (error)
2409                         return error;
2410                 dentry = dget(nd->path.dentry);
2411                 goto done;
2412         }
2413
2414         mutex_lock(&dir->d_inode->i_mutex);
2415         dentry = d_lookup(dir, &nd->last);
2416         if (!dentry) {
2417                 /*
2418                  * No cached dentry. Mounted dentries are pinned in the cache,
2419                  * so that means that this dentry is probably a symlink or the
2420                  * path doesn't actually point to a mounted dentry.
2421                  */
2422                 dentry = d_alloc(dir, &nd->last);
2423                 if (!dentry) {
2424                         mutex_unlock(&dir->d_inode->i_mutex);
2425                         return -ENOMEM;
2426                 }
2427                 dentry = lookup_real(dir->d_inode, dentry, nd->flags);
2428                 if (IS_ERR(dentry)) {
2429                         mutex_unlock(&dir->d_inode->i_mutex);
2430                         return PTR_ERR(dentry);
2431                 }
2432         }
2433         mutex_unlock(&dir->d_inode->i_mutex);
2434
2435 done:
2436         if (d_is_negative(dentry)) {
2437                 dput(dentry);
2438                 return -ENOENT;
2439         }
2440         if (nd->depth)
2441                 put_link(nd);
2442         path->dentry = dentry;
2443         path->mnt = nd->path.mnt;
2444         error = should_follow_link(nd, path, nd->flags & LOOKUP_FOLLOW,
2445                                    d_backing_inode(dentry), 0);
2446         if (unlikely(error))
2447                 return error;
2448         mntget(path->mnt);
2449         follow_mount(path);
2450         return 0;
2451 }
2452
2453 /**
2454  * path_mountpoint - look up a path to be umounted
2455  * @dfd:        directory file descriptor to start walk from
2456  * @name:       full pathname to walk
2457  * @path:       pointer to container for result
2458  * @flags:      lookup flags
2459  *
2460  * Look up the given name, but don't attempt to revalidate the last component.
2461  * Returns 0 and "path" will be valid on success; Returns error otherwise.
2462  */
2463 static int
2464 path_mountpoint(int dfd, const struct filename *name, struct path *path,
2465                 struct nameidata *nd, unsigned int flags)
2466 {
2467         const char *s = path_init(dfd, name, flags, nd);
2468         int err;
2469         if (IS_ERR(s))
2470                 return PTR_ERR(s);
2471         while (!(err = link_path_walk(s, nd)) &&
2472                 (err = mountpoint_last(nd, path)) > 0) {
2473                 s = trailing_symlink(nd);
2474                 if (IS_ERR(s)) {
2475                         err = PTR_ERR(s);
2476                         break;
2477                 }
2478         }
2479         terminate_walk(nd);
2480         path_cleanup(nd);
2481         return err;
2482 }
2483
2484 static int
2485 filename_mountpoint(int dfd, struct filename *name, struct path *path,
2486                         unsigned int flags)
2487 {
2488         struct nameidata nd, *saved;
2489         int error;
2490         if (IS_ERR(name))
2491                 return PTR_ERR(name);
2492         saved = set_nameidata(&nd);
2493         error = path_mountpoint(dfd, name, path, &nd, flags | LOOKUP_RCU);
2494         if (unlikely(error == -ECHILD))
2495                 error = path_mountpoint(dfd, name, path, &nd, flags);
2496         if (unlikely(error == -ESTALE))
2497                 error = path_mountpoint(dfd, name, path, &nd, flags | LOOKUP_REVAL);
2498         if (likely(!error))
2499                 audit_inode(name, path->dentry, 0);
2500         restore_nameidata(saved);
2501         putname(name);
2502         return error;
2503 }
2504
2505 /**
2506  * user_path_mountpoint_at - lookup a path from userland in order to umount it
2507  * @dfd:        directory file descriptor
2508  * @name:       pathname from userland
2509  * @flags:      lookup flags
2510  * @path:       pointer to container to hold result
2511  *
2512  * A umount is a special case for path walking. We're not actually interested
2513  * in the inode in this situation, and ESTALE errors can be a problem. We
2514  * simply want track down the dentry and vfsmount attached at the mountpoint
2515  * and avoid revalidating the last component.
2516  *
2517  * Returns 0 and populates "path" on success.
2518  */
2519 int
2520 user_path_mountpoint_at(int dfd, const char __user *name, unsigned int flags,
2521                         struct path *path)
2522 {
2523         return filename_mountpoint(dfd, getname(name), path, flags);
2524 }
2525
2526 int
2527 kern_path_mountpoint(int dfd, const char *name, struct path *path,
2528                         unsigned int flags)
2529 {
2530         return filename_mountpoint(dfd, getname_kernel(name), path, flags);
2531 }
2532 EXPORT_SYMBOL(kern_path_mountpoint);
2533
2534 int __check_sticky(struct inode *dir, struct inode *inode)
2535 {
2536         kuid_t fsuid = current_fsuid();
2537
2538         if (uid_eq(inode->i_uid, fsuid))
2539                 return 0;
2540         if (uid_eq(dir->i_uid, fsuid))
2541                 return 0;
2542         return !capable_wrt_inode_uidgid(inode, CAP_FOWNER);
2543 }
2544 EXPORT_SYMBOL(__check_sticky);
2545
2546 /*
2547  *      Check whether we can remove a link victim from directory dir, check
2548  *  whether the type of victim is right.
2549  *  1. We can't do it if dir is read-only (done in permission())
2550  *  2. We should have write and exec permissions on dir
2551  *  3. We can't remove anything from append-only dir
2552  *  4. We can't do anything with immutable dir (done in permission())
2553  *  5. If the sticky bit on dir is set we should either
2554  *      a. be owner of dir, or
2555  *      b. be owner of victim, or
2556  *      c. have CAP_FOWNER capability
2557  *  6. If the victim is append-only or immutable we can't do antyhing with
2558  *     links pointing to it.
2559  *  7. If we were asked to remove a directory and victim isn't one - ENOTDIR.
2560  *  8. If we were asked to remove a non-directory and victim isn't one - EISDIR.
2561  *  9. We can't remove a root or mountpoint.
2562  * 10. We don't allow removal of NFS sillyrenamed files; it's handled by
2563  *     nfs_async_unlink().
2564  */
2565 static int may_delete(struct inode *dir, struct dentry *victim, bool isdir)
2566 {
2567         struct inode *inode = d_backing_inode(victim);
2568         int error;
2569
2570         if (d_is_negative(victim))
2571                 return -ENOENT;
2572         BUG_ON(!inode);
2573
2574         BUG_ON(victim->d_parent->d_inode != dir);
2575         audit_inode_child(dir, victim, AUDIT_TYPE_CHILD_DELETE);
2576
2577         error = inode_permission(dir, MAY_WRITE | MAY_EXEC);
2578         if (error)
2579                 return error;
2580         if (IS_APPEND(dir))
2581                 return -EPERM;
2582
2583         if (check_sticky(dir, inode) || IS_APPEND(inode) ||
2584             IS_IMMUTABLE(inode) || IS_SWAPFILE(inode))
2585                 return -EPERM;
2586         if (isdir) {
2587                 if (!d_is_dir(victim))
2588                         return -ENOTDIR;
2589                 if (IS_ROOT(victim))
2590                         return -EBUSY;
2591         } else if (d_is_dir(victim))
2592                 return -EISDIR;
2593         if (IS_DEADDIR(dir))
2594                 return -ENOENT;
2595         if (victim->d_flags & DCACHE_NFSFS_RENAMED)
2596                 return -EBUSY;
2597         return 0;
2598 }
2599
2600 /*      Check whether we can create an object with dentry child in directory
2601  *  dir.
2602  *  1. We can't do it if child already exists (open has special treatment for
2603  *     this case, but since we are inlined it's OK)
2604  *  2. We can't do it if dir is read-only (done in permission())
2605  *  3. We should have write and exec permissions on dir
2606  *  4. We can't do it if dir is immutable (done in permission())
2607  */
2608 static inline int may_create(struct inode *dir, struct dentry *child)
2609 {
2610         audit_inode_child(dir, child, AUDIT_TYPE_CHILD_CREATE);
2611         if (child->d_inode)
2612                 return -EEXIST;
2613         if (IS_DEADDIR(dir))
2614                 return -ENOENT;
2615         return inode_permission(dir, MAY_WRITE | MAY_EXEC);
2616 }
2617
2618 /*
2619  * p1 and p2 should be directories on the same fs.
2620  */
2621 struct dentry *lock_rename(struct dentry *p1, struct dentry *p2)
2622 {
2623         struct dentry *p;
2624
2625         if (p1 == p2) {
2626                 mutex_lock_nested(&p1->d_inode->i_mutex, I_MUTEX_PARENT);
2627                 return NULL;
2628         }
2629
2630         mutex_lock(&p1->d_inode->i_sb->s_vfs_rename_mutex);
2631
2632         p = d_ancestor(p2, p1);
2633         if (p) {
2634                 mutex_lock_nested(&p2->d_inode->i_mutex, I_MUTEX_PARENT);
2635                 mutex_lock_nested(&p1->d_inode->i_mutex, I_MUTEX_CHILD);
2636                 return p;
2637         }
2638
2639         p = d_ancestor(p1, p2);
2640         if (p) {
2641                 mutex_lock_nested(&p1->d_inode->i_mutex, I_MUTEX_PARENT);
2642                 mutex_lock_nested(&p2->d_inode->i_mutex, I_MUTEX_CHILD);
2643                 return p;
2644         }
2645
2646         mutex_lock_nested(&p1->d_inode->i_mutex, I_MUTEX_PARENT);
2647         mutex_lock_nested(&p2->d_inode->i_mutex, I_MUTEX_PARENT2);
2648         return NULL;
2649 }
2650 EXPORT_SYMBOL(lock_rename);
2651
2652 void unlock_rename(struct dentry *p1, struct dentry *p2)
2653 {
2654         mutex_unlock(&p1->d_inode->i_mutex);
2655         if (p1 != p2) {
2656                 mutex_unlock(&p2->d_inode->i_mutex);
2657                 mutex_unlock(&p1->d_inode->i_sb->s_vfs_rename_mutex);
2658         }
2659 }
2660 EXPORT_SYMBOL(unlock_rename);
2661
2662 int vfs_create(struct inode *dir, struct dentry *dentry, umode_t mode,
2663                 bool want_excl)
2664 {
2665         int error = may_create(dir, dentry);
2666         if (error)
2667                 return error;
2668
2669         if (!dir->i_op->create)
2670                 return -EACCES; /* shouldn't it be ENOSYS? */
2671         mode &= S_IALLUGO;
2672         mode |= S_IFREG;
2673         error = security_inode_create(dir, dentry, mode);
2674         if (error)
2675                 return error;
2676         error = dir->i_op->create(dir, dentry, mode, want_excl);
2677         if (!error)
2678                 fsnotify_create(dir, dentry);
2679         return error;
2680 }
2681 EXPORT_SYMBOL(vfs_create);
2682
2683 static int may_open(struct path *path, int acc_mode, int flag)
2684 {
2685         struct dentry *dentry = path->dentry;
2686         struct inode *inode = dentry->d_inode;
2687         int error;
2688
2689         /* O_PATH? */
2690         if (!acc_mode)
2691                 return 0;
2692
2693         if (!inode)
2694                 return -ENOENT;
2695
2696         switch (inode->i_mode & S_IFMT) {
2697         case S_IFLNK:
2698                 return -ELOOP;
2699         case S_IFDIR:
2700                 if (acc_mode & MAY_WRITE)
2701                         return -EISDIR;
2702                 break;
2703         case S_IFBLK:
2704         case S_IFCHR:
2705                 if (path->mnt->mnt_flags & MNT_NODEV)
2706                         return -EACCES;
2707                 /*FALLTHRU*/
2708         case S_IFIFO:
2709         case S_IFSOCK:
2710                 flag &= ~O_TRUNC;
2711                 break;
2712         }
2713
2714         error = inode_permission(inode, acc_mode);
2715         if (error)
2716                 return error;
2717
2718         /*
2719          * An append-only file must be opened in append mode for writing.
2720          */
2721         if (IS_APPEND(inode)) {
2722                 if  ((flag & O_ACCMODE) != O_RDONLY && !(flag & O_APPEND))
2723                         return -EPERM;
2724                 if (flag & O_TRUNC)
2725                         return -EPERM;
2726         }
2727
2728         /* O_NOATIME can only be set by the owner or superuser */
2729         if (flag & O_NOATIME && !inode_owner_or_capable(inode))
2730                 return -EPERM;
2731
2732         return 0;
2733 }
2734
2735 static int handle_truncate(struct file *filp)
2736 {
2737         struct path *path = &filp->f_path;
2738         struct inode *inode = path->dentry->d_inode;
2739         int error = get_write_access(inode);
2740         if (error)
2741                 return error;
2742         /*
2743          * Refuse to truncate files with mandatory locks held on them.
2744          */
2745         error = locks_verify_locked(filp);
2746         if (!error)
2747                 error = security_path_truncate(path);
2748         if (!error) {
2749                 error = do_truncate(path->dentry, 0,
2750                                     ATTR_MTIME|ATTR_CTIME|ATTR_OPEN,
2751                                     filp);
2752         }
2753         put_write_access(inode);
2754         return error;
2755 }
2756
2757 static inline int open_to_namei_flags(int flag)
2758 {
2759         if ((flag & O_ACCMODE) == 3)
2760                 flag--;
2761         return flag;
2762 }
2763
2764 static int may_o_create(struct path *dir, struct dentry *dentry, umode_t mode)
2765 {
2766         int error = security_path_mknod(dir, dentry, mode, 0);
2767         if (error)
2768                 return error;
2769
2770         error = inode_permission(dir->dentry->d_inode, MAY_WRITE | MAY_EXEC);
2771         if (error)
2772                 return error;
2773
2774         return security_inode_create(dir->dentry->d_inode, dentry, mode);
2775 }
2776
2777 /*
2778  * Attempt to atomically look up, create and open a file from a negative
2779  * dentry.
2780  *
2781  * Returns 0 if successful.  The file will have been created and attached to
2782  * @file by the filesystem calling finish_open().
2783  *
2784  * Returns 1 if the file was looked up only or didn't need creating.  The
2785  * caller will need to perform the open themselves.  @path will have been
2786  * updated to point to the new dentry.  This may be negative.
2787  *
2788  * Returns an error code otherwise.
2789  */
2790 static int atomic_open(struct nameidata *nd, struct dentry *dentry,
2791                         struct path *path, struct file *file,
2792                         const struct open_flags *op,
2793                         bool got_write, bool need_lookup,
2794                         int *opened)
2795 {
2796         struct inode *dir =  nd->path.dentry->d_inode;
2797         unsigned open_flag = open_to_namei_flags(op->open_flag);
2798         umode_t mode;
2799         int error;
2800         int acc_mode;
2801         int create_error = 0;
2802         struct dentry *const DENTRY_NOT_SET = (void *) -1UL;
2803         bool excl;
2804
2805         BUG_ON(dentry->d_inode);
2806
2807         /* Don't create child dentry for a dead directory. */
2808         if (unlikely(IS_DEADDIR(dir))) {
2809                 error = -ENOENT;
2810                 goto out;
2811         }
2812
2813         mode = op->mode;
2814         if ((open_flag & O_CREAT) && !IS_POSIXACL(dir))
2815                 mode &= ~current_umask();
2816
2817         excl = (open_flag & (O_EXCL | O_CREAT)) == (O_EXCL | O_CREAT);
2818         if (excl)
2819                 open_flag &= ~O_TRUNC;
2820
2821         /*
2822          * Checking write permission is tricky, bacuse we don't know if we are
2823          * going to actually need it: O_CREAT opens should work as long as the
2824          * file exists.  But checking existence breaks atomicity.  The trick is
2825          * to check access and if not granted clear O_CREAT from the flags.
2826          *
2827          * Another problem is returing the "right" error value (e.g. for an
2828          * O_EXCL open we want to return EEXIST not EROFS).
2829          */
2830         if (((open_flag & (O_CREAT | O_TRUNC)) ||
2831             (open_flag & O_ACCMODE) != O_RDONLY) && unlikely(!got_write)) {
2832                 if (!(open_flag & O_CREAT)) {
2833                         /*
2834                          * No O_CREATE -> atomicity not a requirement -> fall
2835                          * back to lookup + open
2836                          */
2837                         goto no_open;
2838                 } else if (open_flag & (O_EXCL | O_TRUNC)) {
2839                         /* Fall back and fail with the right error */
2840                         create_error = -EROFS;
2841                         goto no_open;
2842                 } else {
2843                         /* No side effects, safe to clear O_CREAT */
2844                         create_error = -EROFS;
2845                         open_flag &= ~O_CREAT;
2846                 }
2847         }
2848
2849         if (open_flag & O_CREAT) {
2850                 error = may_o_create(&nd->path, dentry, mode);
2851                 if (error) {
2852                         create_error = error;
2853                         if (open_flag & O_EXCL)
2854                                 goto no_open;
2855                         open_flag &= ~O_CREAT;
2856                 }
2857         }
2858
2859         if (nd->flags & LOOKUP_DIRECTORY)
2860                 open_flag |= O_DIRECTORY;
2861
2862         file->f_path.dentry = DENTRY_NOT_SET;
2863         file->f_path.mnt = nd->path.mnt;
2864         error = dir->i_op->atomic_open(dir, dentry, file, open_flag, mode,
2865                                       opened);
2866         if (error < 0) {
2867                 if (create_error && error == -ENOENT)
2868                         error = create_error;
2869                 goto out;
2870         }
2871
2872         if (error) {    /* returned 1, that is */
2873                 if (WARN_ON(file->f_path.dentry == DENTRY_NOT_SET)) {
2874                         error = -EIO;
2875                         goto out;
2876                 }
2877                 if (file->f_path.dentry) {
2878                         dput(dentry);
2879                         dentry = file->f_path.dentry;
2880                 }
2881                 if (*opened & FILE_CREATED)
2882                         fsnotify_create(dir, dentry);
2883                 if (!dentry->d_inode) {
2884                         WARN_ON(*opened & FILE_CREATED);
2885                         if (create_error) {
2886                                 error = create_error;
2887                                 goto out;
2888                         }
2889                 } else {
2890                         if (excl && !(*opened & FILE_CREATED)) {
2891                                 error = -EEXIST;
2892                                 goto out;
2893                         }
2894                 }
2895                 goto looked_up;
2896         }
2897
2898         /*
2899          * We didn't have the inode before the open, so check open permission
2900          * here.
2901          */
2902         acc_mode = op->acc_mode;
2903         if (*opened & FILE_CREATED) {
2904                 WARN_ON(!(open_flag & O_CREAT));
2905                 fsnotify_create(dir, dentry);
2906                 acc_mode = MAY_OPEN;
2907         }
2908         error = may_open(&file->f_path, acc_mode, open_flag);
2909         if (error)
2910                 fput(file);
2911
2912 out:
2913         dput(dentry);
2914         return error;
2915
2916 no_open:
2917         if (need_lookup) {
2918                 dentry = lookup_real(dir, dentry, nd->flags);
2919                 if (IS_ERR(dentry))
2920                         return PTR_ERR(dentry);
2921
2922                 if (create_error) {
2923                         int open_flag = op->open_flag;
2924
2925                         error = create_error;
2926                         if ((open_flag & O_EXCL)) {
2927                                 if (!dentry->d_inode)
2928                                         goto out;
2929                         } else if (!dentry->d_inode) {
2930                                 goto out;
2931                         } else if ((open_flag & O_TRUNC) &&
2932                                    d_is_reg(dentry)) {
2933                                 goto out;
2934                         }
2935                         /* will fail later, go on to get the right error */
2936                 }
2937         }
2938 looked_up:
2939         path->dentry = dentry;
2940         path->mnt = nd->path.mnt;
2941         return 1;
2942 }
2943
2944 /*
2945  * Look up and maybe create and open the last component.
2946  *
2947  * Must be called with i_mutex held on parent.
2948  *
2949  * Returns 0 if the file was successfully atomically created (if necessary) and
2950  * opened.  In this case the file will be returned attached to @file.
2951  *
2952  * Returns 1 if the file was not completely opened at this time, though lookups
2953  * and creations will have been performed and the dentry returned in @path will
2954  * be positive upon return if O_CREAT was specified.  If O_CREAT wasn't
2955  * specified then a negative dentry may be returned.
2956  *
2957  * An error code is returned otherwise.
2958  *
2959  * FILE_CREATE will be set in @*opened if the dentry was created and will be
2960  * cleared otherwise prior to returning.
2961  */
2962 static int lookup_open(struct nameidata *nd, struct path *path,
2963                         struct file *file,
2964                         const struct open_flags *op,
2965                         bool got_write, int *opened)
2966 {
2967         struct dentry *dir = nd->path.dentry;
2968         struct inode *dir_inode = dir->d_inode;
2969         struct dentry *dentry;
2970         int error;
2971         bool need_lookup;
2972
2973         *opened &= ~FILE_CREATED;
2974         dentry = lookup_dcache(&nd->last, dir, nd->flags, &need_lookup);
2975         if (IS_ERR(dentry))
2976                 return PTR_ERR(dentry);
2977
2978         /* Cached positive dentry: will open in f_op->open */
2979         if (!need_lookup && dentry->d_inode)
2980                 goto out_no_open;
2981
2982         if ((nd->flags & LOOKUP_OPEN) && dir_inode->i_op->atomic_open) {
2983                 return atomic_open(nd, dentry, path, file, op, got_write,
2984                                    need_lookup, opened);
2985         }
2986
2987         if (need_lookup) {
2988                 BUG_ON(dentry->d_inode);
2989
2990                 dentry = lookup_real(dir_inode, dentry, nd->flags);
2991                 if (IS_ERR(dentry))
2992                         return PTR_ERR(dentry);
2993         }
2994
2995         /* Negative dentry, just create the file */
2996         if (!dentry->d_inode && (op->open_flag & O_CREAT)) {
2997                 umode_t mode = op->mode;
2998                 if (!IS_POSIXACL(dir->d_inode))
2999                         mode &= ~current_umask();
3000                 /*
3001                  * This write is needed to ensure that a
3002                  * rw->ro transition does not occur between
3003                  * the time when the file is created and when
3004                  * a permanent write count is taken through
3005                  * the 'struct file' in finish_open().
3006                  */
3007                 if (!got_write) {
3008                         error = -EROFS;
3009                         goto out_dput;
3010                 }
3011                 *opened |= FILE_CREATED;
3012                 error = security_path_mknod(&nd->path, dentry, mode, 0);
3013                 if (error)
3014                         goto out_dput;
3015                 error = vfs_create(dir->d_inode, dentry, mode,
3016                                    nd->flags & LOOKUP_EXCL);
3017                 if (error)
3018                         goto out_dput;
3019         }
3020 out_no_open:
3021         path->dentry = dentry;
3022         path->mnt = nd->path.mnt;
3023         return 1;
3024
3025 out_dput:
3026         dput(dentry);
3027         return error;
3028 }
3029
3030 /*
3031  * Handle the last step of open()
3032  */
3033 static int do_last(struct nameidata *nd,
3034                    struct file *file, const struct open_flags *op,
3035                    int *opened, struct filename *name)
3036 {
3037         struct dentry *dir = nd->path.dentry;
3038         int open_flag = op->open_flag;
3039         bool will_truncate = (open_flag & O_TRUNC) != 0;
3040         bool got_write = false;
3041         int acc_mode = op->acc_mode;
3042         unsigned seq;
3043         struct inode *inode;
3044         struct path save_parent = { .dentry = NULL, .mnt = NULL };
3045         struct path path;
3046         bool retried = false;
3047         int error;
3048
3049         nd->flags &= ~LOOKUP_PARENT;
3050         nd->flags |= op->intent;
3051
3052         if (nd->last_type != LAST_NORM) {
3053                 error = handle_dots(nd, nd->last_type);
3054                 if (unlikely(error))
3055                         return error;
3056                 goto finish_open;
3057         }
3058
3059         if (!(open_flag & O_CREAT)) {
3060                 if (nd->last.name[nd->last.len])
3061                         nd->flags |= LOOKUP_FOLLOW | LOOKUP_DIRECTORY;
3062                 /* we _can_ be in RCU mode here */
3063                 error = lookup_fast(nd, &path, &inode, &seq);
3064                 if (likely(!error))
3065                         goto finish_lookup;
3066
3067                 if (error < 0)
3068                         return error;
3069
3070                 BUG_ON(nd->inode != dir->d_inode);
3071         } else {
3072                 /* create side of things */
3073                 /*
3074                  * This will *only* deal with leaving RCU mode - LOOKUP_JUMPED
3075                  * has been cleared when we got to the last component we are
3076                  * about to look up
3077                  */
3078                 error = complete_walk(nd);
3079                 if (error)
3080                         return error;
3081
3082                 audit_inode(name, dir, LOOKUP_PARENT);
3083                 /* trailing slashes? */
3084                 if (unlikely(nd->last.name[nd->last.len]))
3085                         return -EISDIR;
3086         }
3087
3088 retry_lookup:
3089         if (op->open_flag & (O_CREAT | O_TRUNC | O_WRONLY | O_RDWR)) {
3090                 error = mnt_want_write(nd->path.mnt);
3091                 if (!error)
3092                         got_write = true;
3093                 /*
3094                  * do _not_ fail yet - we might not need that or fail with
3095                  * a different error; let lookup_open() decide; we'll be
3096                  * dropping this one anyway.
3097                  */
3098         }
3099         mutex_lock(&dir->d_inode->i_mutex);
3100         error = lookup_open(nd, &path, file, op, got_write, opened);
3101         mutex_unlock(&dir->d_inode->i_mutex);
3102
3103         if (error <= 0) {
3104                 if (error)
3105                         goto out;
3106
3107                 if ((*opened & FILE_CREATED) ||
3108                     !S_ISREG(file_inode(file)->i_mode))
3109                         will_truncate = false;
3110
3111                 audit_inode(name, file->f_path.dentry, 0);
3112                 goto opened;
3113         }
3114
3115         if (*opened & FILE_CREATED) {
3116                 /* Don't check for write permission, don't truncate */
3117                 open_flag &= ~O_TRUNC;
3118                 will_truncate = false;
3119                 acc_mode = MAY_OPEN;
3120                 path_to_nameidata(&path, nd);
3121                 goto finish_open_created;
3122         }
3123
3124         /*
3125          * create/update audit record if it already exists.
3126          */
3127         if (d_is_positive(path.dentry))
3128                 audit_inode(name, path.dentry, 0);
3129
3130         /*
3131          * If atomic_open() acquired write access it is dropped now due to
3132          * possible mount and symlink following (this might be optimized away if
3133          * necessary...)
3134          */
3135         if (got_write) {
3136                 mnt_drop_write(nd->path.mnt);
3137                 got_write = false;
3138         }
3139
3140         if (unlikely((open_flag & (O_EXCL | O_CREAT)) == (O_EXCL | O_CREAT))) {
3141                 path_to_nameidata(&path, nd);
3142                 return -EEXIST;
3143         }
3144
3145         error = follow_managed(&path, nd);
3146         if (unlikely(error < 0))
3147                 return error;
3148
3149         BUG_ON(nd->flags & LOOKUP_RCU);
3150         inode = d_backing_inode(path.dentry);
3151         seq = 0;        /* out of RCU mode, so the value doesn't matter */
3152         if (unlikely(d_is_negative(path.dentry))) {
3153                 path_to_nameidata(&path, nd);
3154                 return -ENOENT;
3155         }
3156 finish_lookup:
3157         if (nd->depth)
3158                 put_link(nd);
3159         error = should_follow_link(nd, &path, nd->flags & LOOKUP_FOLLOW,
3160                                    inode, seq);
3161         if (unlikely(error))
3162                 return error;
3163
3164         if (unlikely(d_is_symlink(path.dentry)) && !(open_flag & O_PATH)) {
3165                 path_to_nameidata(&path, nd);
3166                 return -ELOOP;
3167         }
3168
3169         if ((nd->flags & LOOKUP_RCU) || nd->path.mnt != path.mnt) {
3170                 path_to_nameidata(&path, nd);
3171         } else {
3172                 save_parent.dentry = nd->path.dentry;
3173                 save_parent.mnt = mntget(path.mnt);
3174                 nd->path.dentry = path.dentry;
3175
3176         }
3177         nd->inode = inode;
3178         nd->seq = seq;
3179         /* Why this, you ask?  _Now_ we might have grown LOOKUP_JUMPED... */
3180 finish_open:
3181         error = complete_walk(nd);
3182         if (error) {
3183                 path_put(&save_parent);
3184                 return error;
3185         }
3186         audit_inode(name, nd->path.dentry, 0);
3187         error = -EISDIR;
3188         if ((open_flag & O_CREAT) && d_is_dir(nd->path.dentry))
3189                 goto out;
3190         error = -ENOTDIR;
3191         if ((nd->flags & LOOKUP_DIRECTORY) && !d_can_lookup(nd->path.dentry))
3192                 goto out;
3193         if (!d_is_reg(nd->path.dentry))
3194                 will_truncate = false;
3195
3196         if (will_truncate) {
3197                 error = mnt_want_write(nd->path.mnt);
3198                 if (error)
3199                         goto out;
3200                 got_write = true;
3201         }
3202 finish_open_created:
3203         error = may_open(&nd->path, acc_mode, open_flag);
3204         if (error)
3205                 goto out;
3206
3207         BUG_ON(*opened & FILE_OPENED); /* once it's opened, it's opened */
3208         error = vfs_open(&nd->path, file, current_cred());
3209         if (!error) {
3210                 *opened |= FILE_OPENED;
3211         } else {
3212                 if (error == -EOPENSTALE)
3213                         goto stale_open;
3214                 goto out;
3215         }
3216 opened:
3217         error = open_check_o_direct(file);
3218         if (error)
3219                 goto exit_fput;
3220         error = ima_file_check(file, op->acc_mode, *opened);
3221         if (error)
3222                 goto exit_fput;
3223
3224         if (will_truncate) {
3225                 error = handle_truncate(file);
3226                 if (error)
3227                         goto exit_fput;
3228         }
3229 out:
3230         if (got_write)
3231                 mnt_drop_write(nd->path.mnt);
3232         path_put(&save_parent);
3233         return error;
3234
3235 exit_fput:
3236         fput(file);
3237         goto out;
3238
3239 stale_open:
3240         /* If no saved parent or already retried then can't retry */
3241         if (!save_parent.dentry || retried)
3242                 goto out;
3243
3244         BUG_ON(save_parent.dentry != dir);
3245         path_put(&nd->path);
3246         nd->path = save_parent;
3247         nd->inode = dir->d_inode;
3248         save_parent.mnt = NULL;
3249         save_parent.dentry = NULL;
3250         if (got_write) {
3251                 mnt_drop_write(nd->path.mnt);
3252                 got_write = false;
3253         }
3254         retried = true;
3255         goto retry_lookup;
3256 }
3257
3258 static int do_tmpfile(int dfd, struct filename *pathname,
3259                 struct nameidata *nd, int flags,
3260                 const struct open_flags *op,
3261                 struct file *file, int *opened)
3262 {
3263         static const struct qstr name = QSTR_INIT("/", 1);
3264         struct dentry *dentry, *child;
3265         struct inode *dir;
3266         int error = path_lookupat(dfd, pathname,
3267                                   flags | LOOKUP_DIRECTORY, nd);
3268         if (unlikely(error))
3269                 return error;
3270         error = mnt_want_write(nd->path.mnt);
3271         if (unlikely(error))
3272                 goto out;
3273         /* we want directory to be writable */
3274         error = inode_permission(nd->inode, MAY_WRITE | MAY_EXEC);
3275         if (error)
3276                 goto out2;
3277         dentry = nd->path.dentry;
3278         dir = dentry->d_inode;
3279         if (!dir->i_op->tmpfile) {
3280                 error = -EOPNOTSUPP;
3281                 goto out2;
3282         }
3283         child = d_alloc(dentry, &name);
3284         if (unlikely(!child)) {
3285                 error = -ENOMEM;
3286                 goto out2;
3287         }
3288         nd->flags &= ~LOOKUP_DIRECTORY;
3289         nd->flags |= op->intent;
3290         dput(nd->path.dentry);
3291         nd->path.dentry = child;
3292         error = dir->i_op->tmpfile(dir, nd->path.dentry, op->mode);
3293         if (error)
3294                 goto out2;
3295         audit_inode(pathname, nd->path.dentry, 0);
3296         /* Don't check for other permissions, the inode was just created */
3297         error = may_open(&nd->path, MAY_OPEN, op->open_flag);
3298         if (error)
3299                 goto out2;
3300         file->f_path.mnt = nd->path.mnt;
3301         error = finish_open(file, nd->path.dentry, NULL, opened);
3302         if (error)
3303                 goto out2;
3304         error = open_check_o_direct(file);
3305         if (error) {
3306                 fput(file);
3307         } else if (!(op->open_flag & O_EXCL)) {
3308                 struct inode *inode = file_inode(file);
3309                 spin_lock(&inode->i_lock);
3310                 inode->i_state |= I_LINKABLE;
3311                 spin_unlock(&inode->i_lock);
3312         }
3313 out2:
3314         mnt_drop_write(nd->path.mnt);
3315 out:
3316         path_put(&nd->path);
3317         return error;
3318 }
3319
3320 static struct file *path_openat(int dfd, struct filename *pathname,
3321                 struct nameidata *nd, const struct open_flags *op, int flags)
3322 {
3323         const char *s;
3324         struct file *file;
3325         int opened = 0;
3326         int error;
3327
3328         file = get_empty_filp();
3329         if (IS_ERR(file))
3330                 return file;
3331
3332         file->f_flags = op->open_flag;
3333
3334         if (unlikely(file->f_flags & __O_TMPFILE)) {
3335                 error = do_tmpfile(dfd, pathname, nd, flags, op, file, &opened);
3336                 goto out2;
3337         }
3338
3339         s = path_init(dfd, pathname, flags, nd);
3340         if (IS_ERR(s)) {
3341                 put_filp(file);
3342                 return ERR_CAST(s);
3343         }
3344         while (!(error = link_path_walk(s, nd)) &&
3345                 (error = do_last(nd, file, op, &opened, pathname)) > 0) {
3346                 nd->flags &= ~(LOOKUP_OPEN|LOOKUP_CREATE|LOOKUP_EXCL);
3347                 s = trailing_symlink(nd);
3348                 if (IS_ERR(s)) {
3349                         error = PTR_ERR(s);
3350                         break;
3351                 }
3352         }
3353         terminate_walk(nd);
3354         path_cleanup(nd);
3355 out2:
3356         if (!(opened & FILE_OPENED)) {
3357                 BUG_ON(!error);
3358                 put_filp(file);
3359         }
3360         if (unlikely(error)) {
3361                 if (error == -EOPENSTALE) {
3362                         if (flags & LOOKUP_RCU)
3363                                 error = -ECHILD;
3364                         else
3365                                 error = -ESTALE;
3366                 }
3367                 file = ERR_PTR(error);
3368         }
3369         return file;
3370 }
3371
3372 struct file *do_filp_open(int dfd, struct filename *pathname,
3373                 const struct open_flags *op)
3374 {
3375         struct nameidata nd, *saved_nd = set_nameidata(&nd);
3376         int flags = op->lookup_flags;
3377         struct file *filp;
3378
3379         filp = path_openat(dfd, pathname, &nd, op, flags | LOOKUP_RCU);
3380         if (unlikely(filp == ERR_PTR(-ECHILD)))
3381                 filp = path_openat(dfd, pathname, &nd, op, flags);
3382         if (unlikely(filp == ERR_PTR(-ESTALE)))
3383                 filp = path_openat(dfd, pathname, &nd, op, flags | LOOKUP_REVAL);
3384         restore_nameidata(saved_nd);
3385         return filp;
3386 }
3387
3388 struct file *do_file_open_root(struct dentry *dentry, struct vfsmount *mnt,
3389                 const char *name, const struct open_flags *op)
3390 {
3391         struct nameidata nd, *saved_nd;
3392         struct file *file;
3393         struct filename *filename;
3394         int flags = op->lookup_flags | LOOKUP_ROOT;
3395
3396         nd.root.mnt = mnt;
3397         nd.root.dentry = dentry;
3398
3399         if (d_is_symlink(dentry) && op->intent & LOOKUP_OPEN)
3400                 return ERR_PTR(-ELOOP);
3401
3402         filename = getname_kernel(name);
3403         if (unlikely(IS_ERR(filename)))
3404                 return ERR_CAST(filename);
3405
3406         saved_nd = set_nameidata(&nd);
3407         file = path_openat(-1, filename, &nd, op, flags | LOOKUP_RCU);
3408         if (unlikely(file == ERR_PTR(-ECHILD)))
3409                 file = path_openat(-1, filename, &nd, op, flags);
3410         if (unlikely(file == ERR_PTR(-ESTALE)))
3411                 file = path_openat(-1, filename, &nd, op, flags | LOOKUP_REVAL);
3412         restore_nameidata(saved_nd);
3413         putname(filename);
3414         return file;
3415 }
3416
3417 static struct dentry *filename_create(int dfd, struct filename *name,
3418                                 struct path *path, unsigned int lookup_flags)
3419 {
3420         struct dentry *dentry = ERR_PTR(-EEXIST);
3421         struct nameidata nd;
3422         int err2;
3423         int error;
3424         bool is_dir = (lookup_flags & LOOKUP_DIRECTORY);
3425
3426         /*
3427          * Note that only LOOKUP_REVAL and LOOKUP_DIRECTORY matter here. Any
3428          * other flags passed in are ignored!
3429          */
3430         lookup_flags &= LOOKUP_REVAL;
3431
3432         error = filename_parentat(dfd, name, lookup_flags, &nd);
3433         if (error)
3434                 return ERR_PTR(error);
3435
3436         /*
3437          * Yucky last component or no last component at all?
3438          * (foo/., foo/.., /////)
3439          */
3440         if (nd.last_type != LAST_NORM)
3441                 goto out;
3442         nd.flags &= ~LOOKUP_PARENT;
3443         nd.flags |= LOOKUP_CREATE | LOOKUP_EXCL;
3444
3445         /* don't fail immediately if it's r/o, at least try to report other errors */
3446         err2 = mnt_want_write(nd.path.mnt);
3447         /*
3448          * Do the final lookup.
3449          */
3450         mutex_lock_nested(&nd.path.dentry->d_inode->i_mutex, I_MUTEX_PARENT);
3451         dentry = __lookup_hash(&nd.last, nd.path.dentry, nd.flags);
3452         if (IS_ERR(dentry))
3453                 goto unlock;
3454
3455         error = -EEXIST;
3456         if (d_is_positive(dentry))
3457                 goto fail;
3458
3459         /*
3460          * Special case - lookup gave negative, but... we had foo/bar/
3461          * From the vfs_mknod() POV we just have a negative dentry -
3462          * all is fine. Let's be bastards - you had / on the end, you've
3463          * been asking for (non-existent) directory. -ENOENT for you.
3464          */
3465         if (unlikely(!is_dir && nd.last.name[nd.last.len])) {
3466                 error = -ENOENT;
3467                 goto fail;
3468         }
3469         if (unlikely(err2)) {
3470                 error = err2;
3471                 goto fail;
3472         }
3473         *path = nd.path;
3474         return dentry;
3475 fail:
3476         dput(dentry);
3477         dentry = ERR_PTR(error);
3478 unlock:
3479         mutex_unlock(&nd.path.dentry->d_inode->i_mutex);
3480         if (!err2)
3481                 mnt_drop_write(nd.path.mnt);
3482 out:
3483         path_put(&nd.path);
3484         return dentry;
3485 }
3486
3487 struct dentry *kern_path_create(int dfd, const char *pathname,
3488                                 struct path *path, unsigned int lookup_flags)
3489 {
3490         struct filename *filename = getname_kernel(pathname);
3491         struct dentry *res;
3492
3493         if (IS_ERR(filename))
3494                 return ERR_CAST(filename);
3495         res = filename_create(dfd, filename, path, lookup_flags);
3496         putname(filename);
3497         return res;
3498 }
3499 EXPORT_SYMBOL(kern_path_create);
3500
3501 void done_path_create(struct path *path, struct dentry *dentry)
3502 {
3503         dput(dentry);
3504         mutex_unlock(&path->dentry->d_inode->i_mutex);
3505         mnt_drop_write(path->mnt);
3506         path_put(path);
3507 }
3508 EXPORT_SYMBOL(done_path_create);
3509
3510 struct dentry *user_path_create(int dfd, const char __user *pathname,
3511                                 struct path *path, unsigned int lookup_flags)
3512 {
3513         struct filename *tmp = getname(pathname);
3514         struct dentry *res;
3515         if (IS_ERR(tmp))
3516                 return ERR_CAST(tmp);
3517         res = filename_create(dfd, tmp, path, lookup_flags);
3518         putname(tmp);
3519         return res;
3520 }
3521 EXPORT_SYMBOL(user_path_create);
3522
3523 int vfs_mknod(struct inode *dir, struct dentry *dentry, umode_t mode, dev_t dev)
3524 {
3525         int error = may_create(dir, dentry);
3526
3527         if (error)
3528                 return error;
3529
3530         if ((S_ISCHR(mode) || S_ISBLK(mode)) && !capable(CAP_MKNOD))
3531                 return -EPERM;
3532
3533         if (!dir->i_op->mknod)
3534                 return -EPERM;
3535
3536         error = devcgroup_inode_mknod(mode, dev);
3537         if (error)
3538                 return error;
3539
3540         error = security_inode_mknod(dir, dentry, mode, dev);
3541         if (error)
3542                 return error;
3543
3544         error = dir->i_op->mknod(dir, dentry, mode, dev);
3545         if (!error)
3546                 fsnotify_create(dir, dentry);
3547         return error;
3548 }
3549 EXPORT_SYMBOL(vfs_mknod);
3550
3551 static int may_mknod(umode_t mode)
3552 {
3553         switch (mode & S_IFMT) {
3554         case S_IFREG:
3555         case S_IFCHR:
3556         case S_IFBLK:
3557         case S_IFIFO:
3558         case S_IFSOCK:
3559         case 0: /* zero mode translates to S_IFREG */
3560                 return 0;
3561         case S_IFDIR:
3562                 return -EPERM;
3563         default:
3564                 return -EINVAL;
3565         }
3566 }
3567
3568 SYSCALL_DEFINE4(mknodat, int, dfd, const char __user *, filename, umode_t, mode,
3569                 unsigned, dev)
3570 {
3571         struct dentry *dentry;
3572         struct path path;
3573         int error;
3574         unsigned int lookup_flags = 0;
3575
3576         error = may_mknod(mode);
3577         if (error)
3578                 return error;
3579 retry:
3580         dentry = user_path_create(dfd, filename, &path, lookup_flags);
3581         if (IS_ERR(dentry))
3582                 return PTR_ERR(dentry);
3583
3584         if (!IS_POSIXACL(path.dentry->d_inode))
3585                 mode &= ~current_umask();
3586         error = security_path_mknod(&path, dentry, mode, dev);
3587         if (error)
3588                 goto out;
3589         switch (mode & S_IFMT) {
3590                 case 0: case S_IFREG:
3591                         error = vfs_create(path.dentry->d_inode,dentry,mode,true);
3592                         break;
3593                 case S_IFCHR: case S_IFBLK:
3594                         error = vfs_mknod(path.dentry->d_inode,dentry,mode,
3595                                         new_decode_dev(dev));
3596                         break;
3597                 case S_IFIFO: case S_IFSOCK:
3598                         error = vfs_mknod(path.dentry->d_inode,dentry,mode,0);
3599                         break;
3600         }
3601 out:
3602         done_path_create(&path, dentry);
3603         if (retry_estale(error, lookup_flags)) {
3604                 lookup_flags |= LOOKUP_REVAL;
3605                 goto retry;
3606         }
3607         return error;
3608 }
3609
3610 SYSCALL_DEFINE3(mknod, const char __user *, filename, umode_t, mode, unsigned, dev)
3611 {
3612         return sys_mknodat(AT_FDCWD, filename, mode, dev);
3613 }
3614
3615 int vfs_mkdir(struct inode *dir, struct dentry *dentry, umode_t mode)
3616 {
3617         int error = may_create(dir, dentry);
3618         unsigned max_links = dir->i_sb->s_max_links;
3619
3620         if (error)
3621                 return error;
3622
3623         if (!dir->i_op->mkdir)
3624                 return -EPERM;
3625
3626         mode &= (S_IRWXUGO|S_ISVTX);
3627         error = security_inode_mkdir(dir, dentry, mode);
3628         if (error)
3629                 return error;
3630
3631         if (max_links && dir->i_nlink >= max_links)
3632                 return -EMLINK;
3633
3634         error = dir->i_op->mkdir(dir, dentry, mode);
3635         if (!error)
3636                 fsnotify_mkdir(dir, dentry);
3637         return error;
3638 }
3639 EXPORT_SYMBOL(vfs_mkdir);
3640
3641 SYSCALL_DEFINE3(mkdirat, int, dfd, const char __user *, pathname, umode_t, mode)
3642 {
3643         struct dentry *dentry;
3644         struct path path;
3645         int error;
3646         unsigned int lookup_flags = LOOKUP_DIRECTORY;
3647
3648 retry:
3649         dentry = user_path_create(dfd, pathname, &path, lookup_flags);
3650         if (IS_ERR(dentry))
3651                 return PTR_ERR(dentry);
3652
3653         if (!IS_POSIXACL(path.dentry->d_inode))
3654                 mode &= ~current_umask();
3655         error = security_path_mkdir(&path, dentry, mode);
3656         if (!error)
3657                 error = vfs_mkdir(path.dentry->d_inode, dentry, mode);
3658         done_path_create(&path, dentry);
3659         if (retry_estale(error, lookup_flags)) {
3660                 lookup_flags |= LOOKUP_REVAL;
3661                 goto retry;
3662         }
3663         return error;
3664 }
3665
3666 SYSCALL_DEFINE2(mkdir, const char __user *, pathname, umode_t, mode)
3667 {
3668         return sys_mkdirat(AT_FDCWD, pathname, mode);
3669 }
3670
3671 /*
3672  * The dentry_unhash() helper will try to drop the dentry early: we
3673  * should have a usage count of 1 if we're the only user of this
3674  * dentry, and if that is true (possibly after pruning the dcache),
3675  * then we drop the dentry now.
3676  *
3677  * A low-level filesystem can, if it choses, legally
3678  * do a
3679  *
3680  *      if (!d_unhashed(dentry))
3681  *              return -EBUSY;
3682  *
3683  * if it cannot handle the case of removing a directory
3684  * that is still in use by something else..
3685  */
3686 void dentry_unhash(struct dentry *dentry)
3687 {
3688         shrink_dcache_parent(dentry);
3689         spin_lock(&dentry->d_lock);
3690         if (dentry->d_lockref.count == 1)
3691                 __d_drop(dentry);
3692         spin_unlock(&dentry->d_lock);
3693 }
3694 EXPORT_SYMBOL(dentry_unhash);
3695
3696 int vfs_rmdir(struct inode *dir, struct dentry *dentry)
3697 {
3698         int error = may_delete(dir, dentry, 1);
3699
3700         if (error)
3701                 return error;
3702
3703         if (!dir->i_op->rmdir)
3704                 return -EPERM;
3705
3706         dget(dentry);
3707         mutex_lock(&dentry->d_inode->i_mutex);
3708
3709         error = -EBUSY;
3710         if (is_local_mountpoint(dentry))
3711                 goto out;
3712
3713         error = security_inode_rmdir(dir, dentry);
3714         if (error)
3715                 goto out;
3716
3717         shrink_dcache_parent(dentry);
3718         error = dir->i_op->rmdir(dir, dentry);
3719         if (error)
3720                 goto out;
3721
3722         dentry->d_inode->i_flags |= S_DEAD;
3723         dont_mount(dentry);
3724         detach_mounts(dentry);
3725
3726 out:
3727         mutex_unlock(&dentry->d_inode->i_mutex);
3728         dput(dentry);
3729         if (!error)
3730                 d_delete(dentry);
3731         return error;
3732 }
3733 EXPORT_SYMBOL(vfs_rmdir);
3734
3735 static long do_rmdir(int dfd, const char __user *pathname)
3736 {
3737         int error = 0;
3738         struct filename *name;
3739         struct dentry *dentry;
3740         struct path path;
3741         struct qstr last;
3742         int type;
3743         unsigned int lookup_flags = 0;
3744 retry:
3745         name = user_path_parent(dfd, pathname,
3746                                 &path, &last, &type, lookup_flags);
3747         if (IS_ERR(name))
3748                 return PTR_ERR(name);
3749
3750         switch (type) {
3751         case LAST_DOTDOT:
3752                 error = -ENOTEMPTY;
3753                 goto exit1;
3754         case LAST_DOT:
3755                 error = -EINVAL;
3756                 goto exit1;
3757         case LAST_ROOT:
3758                 error = -EBUSY;
3759                 goto exit1;
3760         }
3761
3762         error = mnt_want_write(path.mnt);
3763         if (error)
3764                 goto exit1;
3765
3766         mutex_lock_nested(&path.dentry->d_inode->i_mutex, I_MUTEX_PARENT);
3767         dentry = __lookup_hash(&last, path.dentry, lookup_flags);
3768         error = PTR_ERR(dentry);
3769         if (IS_ERR(dentry))
3770                 goto exit2;
3771         if (!dentry->d_inode) {
3772                 error = -ENOENT;
3773                 goto exit3;
3774         }
3775         error = security_path_rmdir(&path, dentry);
3776         if (error)
3777                 goto exit3;
3778         error = vfs_rmdir(path.dentry->d_inode, dentry);
3779 exit3:
3780         dput(dentry);
3781 exit2:
3782         mutex_unlock(&path.dentry->d_inode->i_mutex);
3783         mnt_drop_write(path.mnt);
3784 exit1:
3785         path_put(&path);
3786         putname(name);
3787         if (retry_estale(error, lookup_flags)) {
3788                 lookup_flags |= LOOKUP_REVAL;
3789                 goto retry;
3790         }
3791         return error;
3792 }
3793
3794 SYSCALL_DEFINE1(rmdir, const char __user *, pathname)
3795 {
3796         return do_rmdir(AT_FDCWD, pathname);
3797 }
3798
3799 /**
3800  * vfs_unlink - unlink a filesystem object
3801  * @dir:        parent directory
3802  * @dentry:     victim
3803  * @delegated_inode: returns victim inode, if the inode is delegated.
3804  *
3805  * The caller must hold dir->i_mutex.
3806  *
3807  * If vfs_unlink discovers a delegation, it will return -EWOULDBLOCK and
3808  * return a reference to the inode in delegated_inode.  The caller
3809  * should then break the delegation on that inode and retry.  Because
3810  * breaking a delegation may take a long time, the caller should drop
3811  * dir->i_mutex before doing so.
3812  *
3813  * Alternatively, a caller may pass NULL for delegated_inode.  This may
3814  * be appropriate for callers that expect the underlying filesystem not
3815  * to be NFS exported.
3816  */
3817 int vfs_unlink(struct inode *dir, struct dentry *dentry, struct inode **delegated_inode)
3818 {
3819         struct inode *target = dentry->d_inode;
3820         int error = may_delete(dir, dentry, 0);
3821
3822         if (error)
3823                 return error;
3824
3825         if (!dir->i_op->unlink)
3826                 return -EPERM;
3827
3828         mutex_lock(&target->i_mutex);
3829         if (is_local_mountpoint(dentry))
3830                 error = -EBUSY;
3831         else {
3832                 error = security_inode_unlink(dir, dentry);
3833                 if (!error) {
3834                         error = try_break_deleg(target, delegated_inode);
3835                         if (error)
3836                                 goto out;
3837                         error = dir->i_op->unlink(dir, dentry);
3838                         if (!error) {
3839                                 dont_mount(dentry);
3840                                 detach_mounts(dentry);
3841                         }
3842                 }
3843         }
3844 out:
3845         mutex_unlock(&target->i_mutex);
3846
3847         /* We don't d_delete() NFS sillyrenamed files--they still exist. */
3848         if (!error && !(dentry->d_flags & DCACHE_NFSFS_RENAMED)) {
3849                 fsnotify_link_count(target);
3850                 d_delete(dentry);
3851         }
3852
3853         return error;
3854 }
3855 EXPORT_SYMBOL(vfs_unlink);
3856
3857 /*
3858  * Make sure that the actual truncation of the file will occur outside its
3859  * directory's i_mutex.  Truncate can take a long time if there is a lot of
3860  * writeout happening, and we don't want to prevent access to the directory
3861  * while waiting on the I/O.
3862  */
3863 static long do_unlinkat(int dfd, const char __user *pathname)
3864 {
3865         int error;
3866         struct filename *name;
3867         struct dentry *dentry;
3868         struct path path;
3869         struct qstr last;
3870         int type;
3871         struct inode *inode = NULL;
3872         struct inode *delegated_inode = NULL;
3873         unsigned int lookup_flags = 0;
3874 retry:
3875         name = user_path_parent(dfd, pathname,
3876                                 &path, &last, &type, lookup_flags);
3877         if (IS_ERR(name))
3878                 return PTR_ERR(name);
3879
3880         error = -EISDIR;
3881         if (type != LAST_NORM)
3882                 goto exit1;
3883
3884         error = mnt_want_write(path.mnt);
3885         if (error)
3886                 goto exit1;
3887 retry_deleg:
3888         mutex_lock_nested(&path.dentry->d_inode->i_mutex, I_MUTEX_PARENT);
3889         dentry = __lookup_hash(&last, path.dentry, lookup_flags);
3890         error = PTR_ERR(dentry);
3891         if (!IS_ERR(dentry)) {
3892                 /* Why not before? Because we want correct error value */
3893                 if (last.name[last.len])
3894                         goto slashes;
3895                 inode = dentry->d_inode;
3896                 if (d_is_negative(dentry))
3897                         goto slashes;
3898                 ihold(inode);
3899                 error = security_path_unlink(&path, dentry);
3900                 if (error)
3901                         goto exit2;
3902                 error = vfs_unlink(path.dentry->d_inode, dentry, &delegated_inode);
3903 exit2:
3904                 dput(dentry);
3905         }
3906         mutex_unlock(&path.dentry->d_inode->i_mutex);
3907         if (inode)
3908                 iput(inode);    /* truncate the inode here */
3909         inode = NULL;
3910         if (delegated_inode) {
3911                 error = break_deleg_wait(&delegated_inode);
3912                 if (!error)
3913                         goto retry_deleg;
3914         }
3915         mnt_drop_write(path.mnt);
3916 exit1:
3917         path_put(&path);
3918         putname(name);
3919         if (retry_estale(error, lookup_flags)) {
3920                 lookup_flags |= LOOKUP_REVAL;
3921                 inode = NULL;
3922                 goto retry;
3923         }
3924         return error;
3925
3926 slashes:
3927         if (d_is_negative(dentry))
3928                 error = -ENOENT;
3929         else if (d_is_dir(dentry))
3930                 error = -EISDIR;
3931         else
3932                 error = -ENOTDIR;
3933         goto exit2;
3934 }
3935
3936 SYSCALL_DEFINE3(unlinkat, int, dfd, const char __user *, pathname, int, flag)
3937 {
3938         if ((flag & ~AT_REMOVEDIR) != 0)
3939                 return -EINVAL;
3940
3941         if (flag & AT_REMOVEDIR)
3942                 return do_rmdir(dfd, pathname);
3943
3944         return do_unlinkat(dfd, pathname);
3945 }
3946
3947 SYSCALL_DEFINE1(unlink, const char __user *, pathname)
3948 {
3949         return do_unlinkat(AT_FDCWD, pathname);
3950 }
3951
3952 int vfs_symlink(struct inode *dir, struct dentry *dentry, const char *oldname)
3953 {
3954         int error = may_create(dir, dentry);
3955
3956         if (error)
3957                 return error;
3958
3959         if (!dir->i_op->symlink)
3960                 return -EPERM;
3961
3962         error = security_inode_symlink(dir, dentry, oldname);
3963         if (error)
3964                 return error;
3965
3966         error = dir->i_op->symlink(dir, dentry, oldname);
3967         if (!error)
3968                 fsnotify_create(dir, dentry);
3969         return error;
3970 }
3971 EXPORT_SYMBOL(vfs_symlink);
3972
3973 SYSCALL_DEFINE3(symlinkat, const char __user *, oldname,
3974                 int, newdfd, const char __user *, newname)
3975 {
3976         int error;
3977         struct filename *from;
3978         struct dentry *dentry;
3979         struct path path;
3980         unsigned int lookup_flags = 0;
3981
3982         from = getname(oldname);
3983         if (IS_ERR(from))
3984                 return PTR_ERR(from);
3985 retry:
3986         dentry = user_path_create(newdfd, newname, &path, lookup_flags);
3987         error = PTR_ERR(dentry);
3988         if (IS_ERR(dentry))
3989                 goto out_putname;
3990
3991         error = security_path_symlink(&path, dentry, from->name);
3992         if (!error)
3993                 error = vfs_symlink(path.dentry->d_inode, dentry, from->name);
3994         done_path_create(&path, dentry);
3995         if (retry_estale(error, lookup_flags)) {
3996                 lookup_flags |= LOOKUP_REVAL;
3997                 goto retry;
3998         }
3999 out_putname:
4000         putname(from);
4001         return error;
4002 }
4003
4004 SYSCALL_DEFINE2(symlink, const char __user *, oldname, const char __user *, newname)
4005 {
4006         return sys_symlinkat(oldname, AT_FDCWD, newname);
4007 }
4008
4009 /**
4010  * vfs_link - create a new link
4011  * @old_dentry: object to be linked
4012  * @dir:        new parent
4013  * @new_dentry: where to create the new link
4014  * @delegated_inode: returns inode needing a delegation break
4015  *
4016  * The caller must hold dir->i_mutex
4017  *
4018  * If vfs_link discovers a delegation on the to-be-linked file in need
4019  * of breaking, it will return -EWOULDBLOCK and return a reference to the
4020  * inode in delegated_inode.  The caller should then break the delegation
4021  * and retry.  Because breaking a delegation may take a long time, the
4022  * caller should drop the i_mutex before doing so.
4023  *
4024  * Alternatively, a caller may pass NULL for delegated_inode.  This may
4025  * be appropriate for callers that expect the underlying filesystem not
4026  * to be NFS exported.
4027  */
4028 int vfs_link(struct dentry *old_dentry, struct inode *dir, struct dentry *new_dentry, struct inode **delegated_inode)
4029 {
4030         struct inode *inode = old_dentry->d_inode;
4031         unsigned max_links = dir->i_sb->s_max_links;
4032         int error;
4033
4034         if (!inode)
4035                 return -ENOENT;
4036
4037         error = may_create(dir, new_dentry);
4038         if (error)
4039                 return error;
4040
4041         if (dir->i_sb != inode->i_sb)
4042                 return -EXDEV;
4043
4044         /*
4045          * A link to an append-only or immutable file cannot be created.
4046          */
4047         if (IS_APPEND(inode) || IS_IMMUTABLE(inode))
4048                 return -EPERM;
4049         if (!dir->i_op->link)
4050                 return -EPERM;
4051         if (S_ISDIR(inode->i_mode))
4052                 return -EPERM;
4053
4054         error = security_inode_link(old_dentry, dir, new_dentry);
4055         if (error)
4056                 return error;
4057
4058         mutex_lock(&inode->i_mutex);
4059         /* Make sure we don't allow creating hardlink to an unlinked file */
4060         if (inode->i_nlink == 0 && !(inode->i_state & I_LINKABLE))
4061                 error =  -ENOENT;
4062         else if (max_links && inode->i_nlink >= max_links)
4063                 error = -EMLINK;
4064         else {
4065                 error = try_break_deleg(inode, delegated_inode);
4066                 if (!error)
4067                         error = dir->i_op->link(old_dentry, dir, new_dentry);
4068         }
4069
4070         if (!error && (inode->i_state & I_LINKABLE)) {
4071                 spin_lock(&inode->i_lock);
4072                 inode->i_state &= ~I_LINKABLE;
4073                 spin_unlock(&inode->i_lock);
4074         }
4075         mutex_unlock(&inode->i_mutex);
4076         if (!error)
4077                 fsnotify_link(dir, inode, new_dentry);
4078         return error;
4079 }
4080 EXPORT_SYMBOL(vfs_link);
4081
4082 /*
4083  * Hardlinks are often used in delicate situations.  We avoid
4084  * security-related surprises by not following symlinks on the
4085  * newname.  --KAB
4086  *
4087  * We don't follow them on the oldname either to be compatible
4088  * with linux 2.0, and to avoid hard-linking to directories
4089  * and other special files.  --ADM
4090  */
4091 SYSCALL_DEFINE5(linkat, int, olddfd, const char __user *, oldname,
4092                 int, newdfd, const char __user *, newname, int, flags)
4093 {
4094         struct dentry *new_dentry;
4095         struct path old_path, new_path;
4096         struct inode *delegated_inode = NULL;
4097         int how = 0;
4098         int error;
4099
4100         if ((flags & ~(AT_SYMLINK_FOLLOW | AT_EMPTY_PATH)) != 0)
4101                 return -EINVAL;
4102         /*
4103          * To use null names we require CAP_DAC_READ_SEARCH
4104          * This ensures that not everyone will be able to create
4105          * handlink using the passed filedescriptor.
4106          */
4107         if (flags & AT_EMPTY_PATH) {
4108                 if (!capable(CAP_DAC_READ_SEARCH))
4109                         return -ENOENT;
4110                 how = LOOKUP_EMPTY;
4111         }
4112
4113         if (flags & AT_SYMLINK_FOLLOW)
4114                 how |= LOOKUP_FOLLOW;
4115 retry:
4116         error = user_path_at(olddfd, oldname, how, &old_path);
4117         if (error)
4118                 return error;
4119
4120         new_dentry = user_path_create(newdfd, newname, &new_path,
4121                                         (how & LOOKUP_REVAL));
4122         error = PTR_ERR(new_dentry);
4123         if (IS_ERR(new_dentry))
4124                 goto out;
4125
4126         error = -EXDEV;
4127         if (old_path.mnt != new_path.mnt)
4128                 goto out_dput;
4129         error = may_linkat(&old_path);
4130         if (unlikely(error))
4131                 goto out_dput;
4132         error = security_path_link(old_path.dentry, &new_path, new_dentry);
4133         if (error)
4134                 goto out_dput;
4135         error = vfs_link(old_path.dentry, new_path.dentry->d_inode, new_dentry, &delegated_inode);
4136 out_dput:
4137         done_path_create(&new_path, new_dentry);
4138         if (delegated_inode) {
4139                 error = break_deleg_wait(&delegated_inode);
4140                 if (!error) {
4141                         path_put(&old_path);
4142                         goto retry;
4143                 }
4144         }
4145         if (retry_estale(error, how)) {
4146                 path_put(&old_path);
4147                 how |= LOOKUP_REVAL;
4148                 goto retry;
4149         }
4150 out:
4151         path_put(&old_path);
4152
4153         return error;
4154 }
4155
4156 SYSCALL_DEFINE2(link, const char __user *, oldname, const char __user *, newname)
4157 {
4158         return sys_linkat(AT_FDCWD, oldname, AT_FDCWD, newname, 0);
4159 }
4160
4161 /**
4162  * vfs_rename - rename a filesystem object
4163  * @old_dir:    parent of source
4164  * @old_dentry: source
4165  * @new_dir:    parent of destination
4166  * @new_dentry: destination
4167  * @delegated_inode: returns an inode needing a delegation break
4168  * @flags:      rename flags
4169  *
4170  * The caller must hold multiple mutexes--see lock_rename()).
4171  *
4172  * If vfs_rename discovers a delegation in need of breaking at either
4173  * the source or destination, it will return -EWOULDBLOCK and return a
4174  * reference to the inode in delegated_inode.  The caller should then
4175  * break the delegation and retry.  Because breaking a delegation may
4176  * take a long time, the caller should drop all locks before doing
4177  * so.
4178  *
4179  * Alternatively, a caller may pass NULL for delegated_inode.  This may
4180  * be appropriate for callers that expect the underlying filesystem not
4181  * to be NFS exported.
4182  *
4183  * The worst of all namespace operations - renaming directory. "Perverted"
4184  * doesn't even start to describe it. Somebody in UCB had a heck of a trip...
4185  * Problems:
4186  *      a) we can get into loop creation.
4187  *      b) race potential - two innocent renames can create a loop together.
4188  *         That's where 4.4 screws up. Current fix: serialization on
4189  *         sb->s_vfs_rename_mutex. We might be more accurate, but that's another
4190  *         story.
4191  *      c) we have to lock _four_ objects - parents and victim (if it exists),
4192  *         and source (if it is not a directory).
4193  *         And that - after we got ->i_mutex on parents (until then we don't know
4194  *         whether the target exists).  Solution: try to be smart with locking
4195  *         order for inodes.  We rely on the fact that tree topology may change
4196  *         only under ->s_vfs_rename_mutex _and_ that parent of the object we
4197  *         move will be locked.  Thus we can rank directories by the tree
4198  *         (ancestors first) and rank all non-directories after them.
4199  *         That works since everybody except rename does "lock parent, lookup,
4200  *         lock child" and rename is under ->s_vfs_rename_mutex.
4201  *         HOWEVER, it relies on the assumption that any object with ->lookup()
4202  *         has no more than 1 dentry.  If "hybrid" objects will ever appear,
4203  *         we'd better make sure that there's no link(2) for them.
4204  *      d) conversion from fhandle to dentry may come in the wrong moment - when
4205  *         we are removing the target. Solution: we will have to grab ->i_mutex
4206  *         in the fhandle_to_dentry code. [FIXME - current nfsfh.c relies on
4207  *         ->i_mutex on parents, which works but leads to some truly excessive
4208  *         locking].
4209  */
4210 int vfs_rename(struct inode *old_dir, struct dentry *old_dentry,
4211                struct inode *new_dir, struct dentry *new_dentry,
4212                struct inode **delegated_inode, unsigned int flags)
4213 {
4214         int error;
4215         bool is_dir = d_is_dir(old_dentry);
4216         const unsigned char *old_name;
4217         struct inode *source = old_dentry->d_inode;
4218         struct inode *target = new_dentry->d_inode;
4219         bool new_is_dir = false;
4220         unsigned max_links = new_dir->i_sb->s_max_links;
4221
4222         if (source == target)
4223                 return 0;
4224
4225         error = may_delete(old_dir, old_dentry, is_dir);
4226         if (error)
4227                 return error;
4228
4229         if (!target) {
4230                 error = may_create(new_dir, new_dentry);
4231         } else {
4232                 new_is_dir = d_is_dir(new_dentry);
4233
4234                 if (!(flags & RENAME_EXCHANGE))
4235                         error = may_delete(new_dir, new_dentry, is_dir);
4236                 else
4237                         error = may_delete(new_dir, new_dentry, new_is_dir);
4238         }
4239         if (error)
4240                 return error;
4241
4242         if (!old_dir->i_op->rename && !old_dir->i_op->rename2)
4243                 return -EPERM;
4244
4245         if (flags && !old_dir->i_op->rename2)
4246                 return -EINVAL;
4247
4248         /*
4249          * If we are going to change the parent - check write permissions,
4250          * we'll need to flip '..'.
4251          */
4252         if (new_dir != old_dir) {
4253                 if (is_dir) {
4254                         error = inode_permission(source, MAY_WRITE);
4255                         if (error)
4256                                 return error;
4257                 }
4258                 if ((flags & RENAME_EXCHANGE) && new_is_dir) {
4259                         error = inode_permission(target, MAY_WRITE);
4260                         if (error)
4261                                 return error;
4262                 }
4263         }
4264
4265         error = security_inode_rename(old_dir, old_dentry, new_dir, new_dentry,
4266                                       flags);
4267         if (error)
4268                 return error;
4269
4270         old_name = fsnotify_oldname_init(old_dentry->d_name.name);
4271         dget(new_dentry);
4272         if (!is_dir || (flags & RENAME_EXCHANGE))
4273                 lock_two_nondirectories(source, target);
4274         else if (target)
4275                 mutex_lock(&target->i_mutex);
4276
4277         error = -EBUSY;
4278         if (is_local_mountpoint(old_dentry) || is_local_mountpoint(new_dentry))
4279                 goto out;
4280
4281         if (max_links && new_dir != old_dir) {
4282                 error = -EMLINK;
4283                 if (is_dir && !new_is_dir && new_dir->i_nlink >= max_links)
4284                         goto out;
4285                 if ((flags & RENAME_EXCHANGE) && !is_dir && new_is_dir &&
4286                     old_dir->i_nlink >= max_links)
4287                         goto out;
4288         }
4289         if (is_dir && !(flags & RENAME_EXCHANGE) && target)
4290                 shrink_dcache_parent(new_dentry);
4291         if (!is_dir) {
4292                 error = try_break_deleg(source, delegated_inode);
4293                 if (error)
4294                         goto out;
4295         }
4296         if (target && !new_is_dir) {
4297                 error = try_break_deleg(target, delegated_inode);
4298                 if (error)
4299                         goto out;
4300         }
4301         if (!old_dir->i_op->rename2) {
4302                 error = old_dir->i_op->rename(old_dir, old_dentry,
4303                                               new_dir, new_dentry);
4304         } else {
4305                 WARN_ON(old_dir->i_op->rename != NULL);
4306                 error = old_dir->i_op->rename2(old_dir, old_dentry,
4307                                                new_dir, new_dentry, flags);
4308         }
4309         if (error)
4310                 goto out;
4311
4312         if (!(flags & RENAME_EXCHANGE) && target) {
4313                 if (is_dir)
4314                         target->i_flags |= S_DEAD;
4315                 dont_mount(new_dentry);
4316                 detach_mounts(new_dentry);
4317         }
4318         if (!(old_dir->i_sb->s_type->fs_flags & FS_RENAME_DOES_D_MOVE)) {
4319                 if (!(flags & RENAME_EXCHANGE))
4320                         d_move(old_dentry, new_dentry);
4321                 else
4322                         d_exchange(old_dentry, new_dentry);
4323         }
4324 out:
4325         if (!is_dir || (flags & RENAME_EXCHANGE))
4326                 unlock_two_nondirectories(source, target);
4327         else if (target)
4328                 mutex_unlock(&target->i_mutex);
4329         dput(new_dentry);
4330         if (!error) {
4331                 fsnotify_move(old_dir, new_dir, old_name, is_dir,
4332                               !(flags & RENAME_EXCHANGE) ? target : NULL, old_dentry);
4333                 if (flags & RENAME_EXCHANGE) {
4334                         fsnotify_move(new_dir, old_dir, old_dentry->d_name.name,
4335                                       new_is_dir, NULL, new_dentry);
4336                 }
4337         }
4338         fsnotify_oldname_free(old_name);
4339
4340         return error;
4341 }
4342 EXPORT_SYMBOL(vfs_rename);
4343
4344 SYSCALL_DEFINE5(renameat2, int, olddfd, const char __user *, oldname,
4345                 int, newdfd, const char __user *, newname, unsigned int, flags)
4346 {
4347         struct dentry *old_dentry, *new_dentry;
4348         struct dentry *trap;
4349         struct path old_path, new_path;
4350         struct qstr old_last, new_last;
4351         int old_type, new_type;
4352         struct inode *delegated_inode = NULL;
4353         struct filename *from;
4354         struct filename *to;
4355         unsigned int lookup_flags = 0, target_flags = LOOKUP_RENAME_TARGET;
4356         bool should_retry = false;
4357         int error;
4358
4359         if (flags & ~(RENAME_NOREPLACE | RENAME_EXCHANGE | RENAME_WHITEOUT))
4360                 return -EINVAL;
4361
4362         if ((flags & (RENAME_NOREPLACE | RENAME_WHITEOUT)) &&
4363             (flags & RENAME_EXCHANGE))
4364                 return -EINVAL;
4365
4366         if ((flags & RENAME_WHITEOUT) && !capable(CAP_MKNOD))
4367                 return -EPERM;
4368
4369         if (flags & RENAME_EXCHANGE)
4370                 target_flags = 0;
4371
4372 retry:
4373         from = user_path_parent(olddfd, oldname,
4374                                 &old_path, &old_last, &old_type, lookup_flags);
4375         if (IS_ERR(from)) {
4376                 error = PTR_ERR(from);
4377                 goto exit;
4378         }
4379
4380         to = user_path_parent(newdfd, newname,
4381                                 &new_path, &new_last, &new_type, lookup_flags);
4382         if (IS_ERR(to)) {
4383                 error = PTR_ERR(to);
4384                 goto exit1;
4385         }
4386
4387         error = -EXDEV;
4388         if (old_path.mnt != new_path.mnt)
4389                 goto exit2;
4390
4391         error = -EBUSY;
4392         if (old_type != LAST_NORM)
4393                 goto exit2;
4394
4395         if (flags & RENAME_NOREPLACE)
4396                 error = -EEXIST;
4397         if (new_type != LAST_NORM)
4398                 goto exit2;
4399
4400         error = mnt_want_write(old_path.mnt);
4401         if (error)
4402                 goto exit2;
4403
4404 retry_deleg:
4405         trap = lock_rename(new_path.dentry, old_path.dentry);
4406
4407         old_dentry = __lookup_hash(&old_last, old_path.dentry, lookup_flags);
4408         error = PTR_ERR(old_dentry);
4409         if (IS_ERR(old_dentry))
4410                 goto exit3;
4411         /* source must exist */
4412         error = -ENOENT;
4413         if (d_is_negative(old_dentry))
4414                 goto exit4;
4415         new_dentry = __lookup_hash(&new_last, new_path.dentry, lookup_flags | target_flags);
4416         error = PTR_ERR(new_dentry);
4417         if (IS_ERR(new_dentry))
4418                 goto exit4;
4419         error = -EEXIST;
4420         if ((flags & RENAME_NOREPLACE) && d_is_positive(new_dentry))
4421                 goto exit5;
4422         if (flags & RENAME_EXCHANGE) {
4423                 error = -ENOENT;
4424                 if (d_is_negative(new_dentry))
4425                         goto exit5;
4426
4427                 if (!d_is_dir(new_dentry)) {
4428                         error = -ENOTDIR;
4429                         if (new_last.name[new_last.len])
4430                                 goto exit5;
4431                 }
4432         }
4433         /* unless the source is a directory trailing slashes give -ENOTDIR */
4434         if (!d_is_dir(old_dentry)) {
4435                 error = -ENOTDIR;
4436                 if (old_last.name[old_last.len])
4437                         goto exit5;
4438                 if (!(flags & RENAME_EXCHANGE) && new_last.name[new_last.len])
4439                         goto exit5;
4440         }
4441         /* source should not be ancestor of target */
4442         error = -EINVAL;
4443         if (old_dentry == trap)
4444                 goto exit5;
4445         /* target should not be an ancestor of source */
4446         if (!(flags & RENAME_EXCHANGE))
4447                 error = -ENOTEMPTY;
4448         if (new_dentry == trap)
4449                 goto exit5;
4450
4451         error = security_path_rename(&old_path, old_dentry,
4452                                      &new_path, new_dentry, flags);
4453         if (error)
4454                 goto exit5;
4455         error = vfs_rename(old_path.dentry->d_inode, old_dentry,
4456                            new_path.dentry->d_inode, new_dentry,
4457                            &delegated_inode, flags);
4458 exit5:
4459         dput(new_dentry);
4460 exit4:
4461         dput(old_dentry);
4462 exit3:
4463         unlock_rename(new_path.dentry, old_path.dentry);
4464         if (delegated_inode) {
4465                 error = break_deleg_wait(&delegated_inode);
4466                 if (!error)
4467                         goto retry_deleg;
4468         }
4469         mnt_drop_write(old_path.mnt);
4470 exit2:
4471         if (retry_estale(error, lookup_flags))
4472                 should_retry = true;
4473         path_put(&new_path);
4474         putname(to);
4475 exit1:
4476         path_put(&old_path);
4477         putname(from);
4478         if (should_retry) {
4479                 should_retry = false;
4480                 lookup_flags |= LOOKUP_REVAL;
4481                 goto retry;
4482         }
4483 exit:
4484         return error;
4485 }
4486
4487 SYSCALL_DEFINE4(renameat, int, olddfd, const char __user *, oldname,
4488                 int, newdfd, const char __user *, newname)
4489 {
4490         return sys_renameat2(olddfd, oldname, newdfd, newname, 0);
4491 }
4492
4493 SYSCALL_DEFINE2(rename, const char __user *, oldname, const char __user *, newname)
4494 {
4495         return sys_renameat2(AT_FDCWD, oldname, AT_FDCWD, newname, 0);
4496 }
4497
4498 int vfs_whiteout(struct inode *dir, struct dentry *dentry)
4499 {
4500         int error = may_create(dir, dentry);
4501         if (error)
4502                 return error;
4503
4504         if (!dir->i_op->mknod)
4505                 return -EPERM;
4506
4507         return dir->i_op->mknod(dir, dentry,
4508                                 S_IFCHR | WHITEOUT_MODE, WHITEOUT_DEV);
4509 }
4510 EXPORT_SYMBOL(vfs_whiteout);
4511
4512 int readlink_copy(char __user *buffer, int buflen, const char *link)
4513 {
4514         int len = PTR_ERR(link);
4515         if (IS_ERR(link))
4516                 goto out;
4517
4518         len = strlen(link);
4519         if (len > (unsigned) buflen)
4520                 len = buflen;
4521         if (copy_to_user(buffer, link, len))
4522                 len = -EFAULT;
4523 out:
4524         return len;
4525 }
4526 EXPORT_SYMBOL(readlink_copy);
4527
4528 /*
4529  * A helper for ->readlink().  This should be used *ONLY* for symlinks that
4530  * have ->follow_link() touching nd only in nd_set_link().  Using (or not
4531  * using) it for any given inode is up to filesystem.
4532  */
4533 int generic_readlink(struct dentry *dentry, char __user *buffer, int buflen)
4534 {
4535         void *cookie;
4536         struct inode *inode = d_inode(dentry);
4537         const char *link = inode->i_link;
4538         int res;
4539
4540         if (!link) {
4541                 link = inode->i_op->follow_link(dentry, &cookie);
4542                 if (IS_ERR(link))
4543                         return PTR_ERR(link);
4544         }
4545         res = readlink_copy(buffer, buflen, link);
4546         if (inode->i_op->put_link)
4547                 inode->i_op->put_link(inode, cookie);
4548         return res;
4549 }
4550 EXPORT_SYMBOL(generic_readlink);
4551
4552 /* get the link contents into pagecache */
4553 static char *page_getlink(struct dentry * dentry, struct page **ppage)
4554 {
4555         char *kaddr;
4556         struct page *page;
4557         struct address_space *mapping = dentry->d_inode->i_mapping;
4558         page = read_mapping_page(mapping, 0, NULL);
4559         if (IS_ERR(page))
4560                 return (char*)page;
4561         *ppage = page;
4562         kaddr = kmap(page);
4563         nd_terminate_link(kaddr, dentry->d_inode->i_size, PAGE_SIZE - 1);
4564         return kaddr;
4565 }
4566
4567 int page_readlink(struct dentry *dentry, char __user *buffer, int buflen)
4568 {
4569         struct page *page = NULL;
4570         int res = readlink_copy(buffer, buflen, page_getlink(dentry, &page));
4571         if (page) {
4572                 kunmap(page);
4573                 page_cache_release(page);
4574         }
4575         return res;
4576 }
4577 EXPORT_SYMBOL(page_readlink);
4578
4579 const char *page_follow_link_light(struct dentry *dentry, void **cookie)
4580 {
4581         struct page *page = NULL;
4582         char *res = page_getlink(dentry, &page);
4583         if (!IS_ERR(res))
4584                 *cookie = page;
4585         return res;
4586 }
4587 EXPORT_SYMBOL(page_follow_link_light);
4588
4589 void page_put_link(struct inode *unused, void *cookie)
4590 {
4591         struct page *page = cookie;
4592         kunmap(page);
4593         page_cache_release(page);
4594 }
4595 EXPORT_SYMBOL(page_put_link);
4596
4597 /*
4598  * The nofs argument instructs pagecache_write_begin to pass AOP_FLAG_NOFS
4599  */
4600 int __page_symlink(struct inode *inode, const char *symname, int len, int nofs)
4601 {
4602         struct address_space *mapping = inode->i_mapping;
4603         struct page *page;
4604         void *fsdata;
4605         int err;
4606         char *kaddr;
4607         unsigned int flags = AOP_FLAG_UNINTERRUPTIBLE;
4608         if (nofs)
4609                 flags |= AOP_FLAG_NOFS;
4610
4611 retry:
4612         err = pagecache_write_begin(NULL, mapping, 0, len-1,
4613                                 flags, &page, &fsdata);
4614         if (err)
4615                 goto fail;
4616
4617         kaddr = kmap_atomic(page);
4618         memcpy(kaddr, symname, len-1);
4619         kunmap_atomic(kaddr);
4620
4621         err = pagecache_write_end(NULL, mapping, 0, len-1, len-1,
4622                                                         page, fsdata);
4623         if (err < 0)
4624                 goto fail;
4625         if (err < len-1)
4626                 goto retry;
4627
4628         mark_inode_dirty(inode);
4629         return 0;
4630 fail:
4631         return err;
4632 }
4633 EXPORT_SYMBOL(__page_symlink);
4634
4635 int page_symlink(struct inode *inode, const char *symname, int len)
4636 {
4637         return __page_symlink(inode, symname, len,
4638                         !(mapping_gfp_mask(inode->i_mapping) & __GFP_FS));
4639 }
4640 EXPORT_SYMBOL(page_symlink);
4641
4642 const struct inode_operations page_symlink_inode_operations = {
4643         .readlink       = generic_readlink,
4644         .follow_link    = page_follow_link_light,
4645         .put_link       = page_put_link,
4646 };
4647 EXPORT_SYMBOL(page_symlink_inode_operations);