]> git.karo-electronics.de Git - karo-tx-linux.git/blob - fs/namei.c
namei: unlazy_walk() doesn't need to mess with current->fs anymore
[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 __always_inline void set_root(struct nameidata *nd)
781 {
782         get_fs_root(current->fs, &nd->root);
783 }
784
785 static __always_inline 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 static int follow_up_rcu(struct path *path)
1022 {
1023         struct mount *mnt = real_mount(path->mnt);
1024         struct mount *parent;
1025         struct dentry *mountpoint;
1026
1027         parent = mnt->mnt_parent;
1028         if (&parent->mnt == path->mnt)
1029                 return 0;
1030         mountpoint = mnt->mnt_mountpoint;
1031         path->dentry = mountpoint;
1032         path->mnt = &parent->mnt;
1033         return 1;
1034 }
1035
1036 /*
1037  * follow_up - Find the mountpoint of path's vfsmount
1038  *
1039  * Given a path, find the mountpoint of its source file system.
1040  * Replace @path with the path of the mountpoint in the parent mount.
1041  * Up is towards /.
1042  *
1043  * Return 1 if we went up a level and 0 if we were already at the
1044  * root.
1045  */
1046 int follow_up(struct path *path)
1047 {
1048         struct mount *mnt = real_mount(path->mnt);
1049         struct mount *parent;
1050         struct dentry *mountpoint;
1051
1052         read_seqlock_excl(&mount_lock);
1053         parent = mnt->mnt_parent;
1054         if (parent == mnt) {
1055                 read_sequnlock_excl(&mount_lock);
1056                 return 0;
1057         }
1058         mntget(&parent->mnt);
1059         mountpoint = dget(mnt->mnt_mountpoint);
1060         read_sequnlock_excl(&mount_lock);
1061         dput(path->dentry);
1062         path->dentry = mountpoint;
1063         mntput(path->mnt);
1064         path->mnt = &parent->mnt;
1065         return 1;
1066 }
1067 EXPORT_SYMBOL(follow_up);
1068
1069 /*
1070  * Perform an automount
1071  * - return -EISDIR to tell follow_managed() to stop and return the path we
1072  *   were called with.
1073  */
1074 static int follow_automount(struct path *path, struct nameidata *nd,
1075                             bool *need_mntput)
1076 {
1077         struct vfsmount *mnt;
1078         int err;
1079
1080         if (!path->dentry->d_op || !path->dentry->d_op->d_automount)
1081                 return -EREMOTE;
1082
1083         /* We don't want to mount if someone's just doing a stat -
1084          * unless they're stat'ing a directory and appended a '/' to
1085          * the name.
1086          *
1087          * We do, however, want to mount if someone wants to open or
1088          * create a file of any type under the mountpoint, wants to
1089          * traverse through the mountpoint or wants to open the
1090          * mounted directory.  Also, autofs may mark negative dentries
1091          * as being automount points.  These will need the attentions
1092          * of the daemon to instantiate them before they can be used.
1093          */
1094         if (!(nd->flags & (LOOKUP_PARENT | LOOKUP_DIRECTORY |
1095                            LOOKUP_OPEN | LOOKUP_CREATE | LOOKUP_AUTOMOUNT)) &&
1096             path->dentry->d_inode)
1097                 return -EISDIR;
1098
1099         nd->total_link_count++;
1100         if (nd->total_link_count >= 40)
1101                 return -ELOOP;
1102
1103         mnt = path->dentry->d_op->d_automount(path);
1104         if (IS_ERR(mnt)) {
1105                 /*
1106                  * The filesystem is allowed to return -EISDIR here to indicate
1107                  * it doesn't want to automount.  For instance, autofs would do
1108                  * this so that its userspace daemon can mount on this dentry.
1109                  *
1110                  * However, we can only permit this if it's a terminal point in
1111                  * the path being looked up; if it wasn't then the remainder of
1112                  * the path is inaccessible and we should say so.
1113                  */
1114                 if (PTR_ERR(mnt) == -EISDIR && (nd->flags & LOOKUP_PARENT))
1115                         return -EREMOTE;
1116                 return PTR_ERR(mnt);
1117         }
1118
1119         if (!mnt) /* mount collision */
1120                 return 0;
1121
1122         if (!*need_mntput) {
1123                 /* lock_mount() may release path->mnt on error */
1124                 mntget(path->mnt);
1125                 *need_mntput = true;
1126         }
1127         err = finish_automount(mnt, path);
1128
1129         switch (err) {
1130         case -EBUSY:
1131                 /* Someone else made a mount here whilst we were busy */
1132                 return 0;
1133         case 0:
1134                 path_put(path);
1135                 path->mnt = mnt;
1136                 path->dentry = dget(mnt->mnt_root);
1137                 return 0;
1138         default:
1139                 return err;
1140         }
1141
1142 }
1143
1144 /*
1145  * Handle a dentry that is managed in some way.
1146  * - Flagged for transit management (autofs)
1147  * - Flagged as mountpoint
1148  * - Flagged as automount point
1149  *
1150  * This may only be called in refwalk mode.
1151  *
1152  * Serialization is taken care of in namespace.c
1153  */
1154 static int follow_managed(struct path *path, struct nameidata *nd)
1155 {
1156         struct vfsmount *mnt = path->mnt; /* held by caller, must be left alone */
1157         unsigned managed;
1158         bool need_mntput = false;
1159         int ret = 0;
1160
1161         /* Given that we're not holding a lock here, we retain the value in a
1162          * local variable for each dentry as we look at it so that we don't see
1163          * the components of that value change under us */
1164         while (managed = ACCESS_ONCE(path->dentry->d_flags),
1165                managed &= DCACHE_MANAGED_DENTRY,
1166                unlikely(managed != 0)) {
1167                 /* Allow the filesystem to manage the transit without i_mutex
1168                  * being held. */
1169                 if (managed & DCACHE_MANAGE_TRANSIT) {
1170                         BUG_ON(!path->dentry->d_op);
1171                         BUG_ON(!path->dentry->d_op->d_manage);
1172                         ret = path->dentry->d_op->d_manage(path->dentry, false);
1173                         if (ret < 0)
1174                                 break;
1175                 }
1176
1177                 /* Transit to a mounted filesystem. */
1178                 if (managed & DCACHE_MOUNTED) {
1179                         struct vfsmount *mounted = lookup_mnt(path);
1180                         if (mounted) {
1181                                 dput(path->dentry);
1182                                 if (need_mntput)
1183                                         mntput(path->mnt);
1184                                 path->mnt = mounted;
1185                                 path->dentry = dget(mounted->mnt_root);
1186                                 need_mntput = true;
1187                                 continue;
1188                         }
1189
1190                         /* Something is mounted on this dentry in another
1191                          * namespace and/or whatever was mounted there in this
1192                          * namespace got unmounted before lookup_mnt() could
1193                          * get it */
1194                 }
1195
1196                 /* Handle an automount point */
1197                 if (managed & DCACHE_NEED_AUTOMOUNT) {
1198                         ret = follow_automount(path, nd, &need_mntput);
1199                         if (ret < 0)
1200                                 break;
1201                         continue;
1202                 }
1203
1204                 /* We didn't change the current path point */
1205                 break;
1206         }
1207
1208         if (need_mntput && path->mnt == mnt)
1209                 mntput(path->mnt);
1210         if (ret == -EISDIR)
1211                 ret = 0;
1212         if (need_mntput)
1213                 nd->flags |= LOOKUP_JUMPED;
1214         if (unlikely(ret < 0))
1215                 path_put_conditional(path, nd);
1216         return ret;
1217 }
1218
1219 int follow_down_one(struct path *path)
1220 {
1221         struct vfsmount *mounted;
1222
1223         mounted = lookup_mnt(path);
1224         if (mounted) {
1225                 dput(path->dentry);
1226                 mntput(path->mnt);
1227                 path->mnt = mounted;
1228                 path->dentry = dget(mounted->mnt_root);
1229                 return 1;
1230         }
1231         return 0;
1232 }
1233 EXPORT_SYMBOL(follow_down_one);
1234
1235 static inline int managed_dentry_rcu(struct dentry *dentry)
1236 {
1237         return (dentry->d_flags & DCACHE_MANAGE_TRANSIT) ?
1238                 dentry->d_op->d_manage(dentry, true) : 0;
1239 }
1240
1241 /*
1242  * Try to skip to top of mountpoint pile in rcuwalk mode.  Fail if
1243  * we meet a managed dentry that would need blocking.
1244  */
1245 static bool __follow_mount_rcu(struct nameidata *nd, struct path *path,
1246                                struct inode **inode, unsigned *seqp)
1247 {
1248         for (;;) {
1249                 struct mount *mounted;
1250                 /*
1251                  * Don't forget we might have a non-mountpoint managed dentry
1252                  * that wants to block transit.
1253                  */
1254                 switch (managed_dentry_rcu(path->dentry)) {
1255                 case -ECHILD:
1256                 default:
1257                         return false;
1258                 case -EISDIR:
1259                         return true;
1260                 case 0:
1261                         break;
1262                 }
1263
1264                 if (!d_mountpoint(path->dentry))
1265                         return !(path->dentry->d_flags & DCACHE_NEED_AUTOMOUNT);
1266
1267                 mounted = __lookup_mnt(path->mnt, path->dentry);
1268                 if (!mounted)
1269                         break;
1270                 path->mnt = &mounted->mnt;
1271                 path->dentry = mounted->mnt.mnt_root;
1272                 nd->flags |= LOOKUP_JUMPED;
1273                 *seqp = read_seqcount_begin(&path->dentry->d_seq);
1274                 /*
1275                  * Update the inode too. We don't need to re-check the
1276                  * dentry sequence number here after this d_inode read,
1277                  * because a mount-point is always pinned.
1278                  */
1279                 *inode = path->dentry->d_inode;
1280         }
1281         return !read_seqretry(&mount_lock, nd->m_seq) &&
1282                 !(path->dentry->d_flags & DCACHE_NEED_AUTOMOUNT);
1283 }
1284
1285 static int follow_dotdot_rcu(struct nameidata *nd)
1286 {
1287         struct inode *inode = nd->inode;
1288         if (!nd->root.mnt)
1289                 set_root_rcu(nd);
1290
1291         while (1) {
1292                 if (nd->path.dentry == nd->root.dentry &&
1293                     nd->path.mnt == nd->root.mnt) {
1294                         break;
1295                 }
1296                 if (nd->path.dentry != nd->path.mnt->mnt_root) {
1297                         struct dentry *old = nd->path.dentry;
1298                         struct dentry *parent = old->d_parent;
1299                         unsigned seq;
1300
1301                         inode = parent->d_inode;
1302                         seq = read_seqcount_begin(&parent->d_seq);
1303                         if (read_seqcount_retry(&old->d_seq, nd->seq))
1304                                 goto failed;
1305                         nd->path.dentry = parent;
1306                         nd->seq = seq;
1307                         break;
1308                 }
1309                 if (!follow_up_rcu(&nd->path))
1310                         break;
1311                 inode = nd->path.dentry->d_inode;
1312                 nd->seq = read_seqcount_begin(&nd->path.dentry->d_seq);
1313         }
1314         while (d_mountpoint(nd->path.dentry)) {
1315                 struct mount *mounted;
1316                 mounted = __lookup_mnt(nd->path.mnt, nd->path.dentry);
1317                 if (!mounted)
1318                         break;
1319                 nd->path.mnt = &mounted->mnt;
1320                 nd->path.dentry = mounted->mnt.mnt_root;
1321                 inode = nd->path.dentry->d_inode;
1322                 nd->seq = read_seqcount_begin(&nd->path.dentry->d_seq);
1323                 if (read_seqretry(&mount_lock, nd->m_seq))
1324                         goto failed;
1325         }
1326         nd->inode = inode;
1327         return 0;
1328
1329 failed:
1330         return -ECHILD;
1331 }
1332
1333 /*
1334  * Follow down to the covering mount currently visible to userspace.  At each
1335  * point, the filesystem owning that dentry may be queried as to whether the
1336  * caller is permitted to proceed or not.
1337  */
1338 int follow_down(struct path *path)
1339 {
1340         unsigned managed;
1341         int ret;
1342
1343         while (managed = ACCESS_ONCE(path->dentry->d_flags),
1344                unlikely(managed & DCACHE_MANAGED_DENTRY)) {
1345                 /* Allow the filesystem to manage the transit without i_mutex
1346                  * being held.
1347                  *
1348                  * We indicate to the filesystem if someone is trying to mount
1349                  * something here.  This gives autofs the chance to deny anyone
1350                  * other than its daemon the right to mount on its
1351                  * superstructure.
1352                  *
1353                  * The filesystem may sleep at this point.
1354                  */
1355                 if (managed & DCACHE_MANAGE_TRANSIT) {
1356                         BUG_ON(!path->dentry->d_op);
1357                         BUG_ON(!path->dentry->d_op->d_manage);
1358                         ret = path->dentry->d_op->d_manage(
1359                                 path->dentry, false);
1360                         if (ret < 0)
1361                                 return ret == -EISDIR ? 0 : ret;
1362                 }
1363
1364                 /* Transit to a mounted filesystem. */
1365                 if (managed & DCACHE_MOUNTED) {
1366                         struct vfsmount *mounted = lookup_mnt(path);
1367                         if (!mounted)
1368                                 break;
1369                         dput(path->dentry);
1370                         mntput(path->mnt);
1371                         path->mnt = mounted;
1372                         path->dentry = dget(mounted->mnt_root);
1373                         continue;
1374                 }
1375
1376                 /* Don't handle automount points here */
1377                 break;
1378         }
1379         return 0;
1380 }
1381 EXPORT_SYMBOL(follow_down);
1382
1383 /*
1384  * Skip to top of mountpoint pile in refwalk mode for follow_dotdot()
1385  */
1386 static void follow_mount(struct path *path)
1387 {
1388         while (d_mountpoint(path->dentry)) {
1389                 struct vfsmount *mounted = lookup_mnt(path);
1390                 if (!mounted)
1391                         break;
1392                 dput(path->dentry);
1393                 mntput(path->mnt);
1394                 path->mnt = mounted;
1395                 path->dentry = dget(mounted->mnt_root);
1396         }
1397 }
1398
1399 static void follow_dotdot(struct nameidata *nd)
1400 {
1401         if (!nd->root.mnt)
1402                 set_root(nd);
1403
1404         while(1) {
1405                 struct dentry *old = nd->path.dentry;
1406
1407                 if (nd->path.dentry == nd->root.dentry &&
1408                     nd->path.mnt == nd->root.mnt) {
1409                         break;
1410                 }
1411                 if (nd->path.dentry != nd->path.mnt->mnt_root) {
1412                         /* rare case of legitimate dget_parent()... */
1413                         nd->path.dentry = dget_parent(nd->path.dentry);
1414                         dput(old);
1415                         break;
1416                 }
1417                 if (!follow_up(&nd->path))
1418                         break;
1419         }
1420         follow_mount(&nd->path);
1421         nd->inode = nd->path.dentry->d_inode;
1422 }
1423
1424 /*
1425  * This looks up the name in dcache, possibly revalidates the old dentry and
1426  * allocates a new one if not found or not valid.  In the need_lookup argument
1427  * returns whether i_op->lookup is necessary.
1428  *
1429  * dir->d_inode->i_mutex must be held
1430  */
1431 static struct dentry *lookup_dcache(struct qstr *name, struct dentry *dir,
1432                                     unsigned int flags, bool *need_lookup)
1433 {
1434         struct dentry *dentry;
1435         int error;
1436
1437         *need_lookup = false;
1438         dentry = d_lookup(dir, name);
1439         if (dentry) {
1440                 if (dentry->d_flags & DCACHE_OP_REVALIDATE) {
1441                         error = d_revalidate(dentry, flags);
1442                         if (unlikely(error <= 0)) {
1443                                 if (error < 0) {
1444                                         dput(dentry);
1445                                         return ERR_PTR(error);
1446                                 } else {
1447                                         d_invalidate(dentry);
1448                                         dput(dentry);
1449                                         dentry = NULL;
1450                                 }
1451                         }
1452                 }
1453         }
1454
1455         if (!dentry) {
1456                 dentry = d_alloc(dir, name);
1457                 if (unlikely(!dentry))
1458                         return ERR_PTR(-ENOMEM);
1459
1460                 *need_lookup = true;
1461         }
1462         return dentry;
1463 }
1464
1465 /*
1466  * Call i_op->lookup on the dentry.  The dentry must be negative and
1467  * unhashed.
1468  *
1469  * dir->d_inode->i_mutex must be held
1470  */
1471 static struct dentry *lookup_real(struct inode *dir, struct dentry *dentry,
1472                                   unsigned int flags)
1473 {
1474         struct dentry *old;
1475
1476         /* Don't create child dentry for a dead directory. */
1477         if (unlikely(IS_DEADDIR(dir))) {
1478                 dput(dentry);
1479                 return ERR_PTR(-ENOENT);
1480         }
1481
1482         old = dir->i_op->lookup(dir, dentry, flags);
1483         if (unlikely(old)) {
1484                 dput(dentry);
1485                 dentry = old;
1486         }
1487         return dentry;
1488 }
1489
1490 static struct dentry *__lookup_hash(struct qstr *name,
1491                 struct dentry *base, unsigned int flags)
1492 {
1493         bool need_lookup;
1494         struct dentry *dentry;
1495
1496         dentry = lookup_dcache(name, base, flags, &need_lookup);
1497         if (!need_lookup)
1498                 return dentry;
1499
1500         return lookup_real(base->d_inode, dentry, flags);
1501 }
1502
1503 /*
1504  *  It's more convoluted than I'd like it to be, but... it's still fairly
1505  *  small and for now I'd prefer to have fast path as straight as possible.
1506  *  It _is_ time-critical.
1507  */
1508 static int lookup_fast(struct nameidata *nd,
1509                        struct path *path, struct inode **inode,
1510                        unsigned *seqp)
1511 {
1512         struct vfsmount *mnt = nd->path.mnt;
1513         struct dentry *dentry, *parent = nd->path.dentry;
1514         int need_reval = 1;
1515         int status = 1;
1516         int err;
1517
1518         /*
1519          * Rename seqlock is not required here because in the off chance
1520          * of a false negative due to a concurrent rename, we're going to
1521          * do the non-racy lookup, below.
1522          */
1523         if (nd->flags & LOOKUP_RCU) {
1524                 unsigned seq;
1525                 bool negative;
1526                 dentry = __d_lookup_rcu(parent, &nd->last, &seq);
1527                 if (!dentry)
1528                         goto unlazy;
1529
1530                 /*
1531                  * This sequence count validates that the inode matches
1532                  * the dentry name information from lookup.
1533                  */
1534                 *inode = d_backing_inode(dentry);
1535                 negative = d_is_negative(dentry);
1536                 if (read_seqcount_retry(&dentry->d_seq, seq))
1537                         return -ECHILD;
1538                 if (negative)
1539                         return -ENOENT;
1540
1541                 /*
1542                  * This sequence count validates that the parent had no
1543                  * changes while we did the lookup of the dentry above.
1544                  *
1545                  * The memory barrier in read_seqcount_begin of child is
1546                  *  enough, we can use __read_seqcount_retry here.
1547                  */
1548                 if (__read_seqcount_retry(&parent->d_seq, nd->seq))
1549                         return -ECHILD;
1550
1551                 *seqp = seq;
1552                 if (unlikely(dentry->d_flags & DCACHE_OP_REVALIDATE)) {
1553                         status = d_revalidate(dentry, nd->flags);
1554                         if (unlikely(status <= 0)) {
1555                                 if (status != -ECHILD)
1556                                         need_reval = 0;
1557                                 goto unlazy;
1558                         }
1559                 }
1560                 path->mnt = mnt;
1561                 path->dentry = dentry;
1562                 if (likely(__follow_mount_rcu(nd, path, inode, seqp)))
1563                         return 0;
1564 unlazy:
1565                 if (unlazy_walk(nd, dentry, seq))
1566                         return -ECHILD;
1567         } else {
1568                 dentry = __d_lookup(parent, &nd->last);
1569         }
1570
1571         if (unlikely(!dentry))
1572                 goto need_lookup;
1573
1574         if (unlikely(dentry->d_flags & DCACHE_OP_REVALIDATE) && need_reval)
1575                 status = d_revalidate(dentry, nd->flags);
1576         if (unlikely(status <= 0)) {
1577                 if (status < 0) {
1578                         dput(dentry);
1579                         return status;
1580                 }
1581                 d_invalidate(dentry);
1582                 dput(dentry);
1583                 goto need_lookup;
1584         }
1585
1586         if (unlikely(d_is_negative(dentry))) {
1587                 dput(dentry);
1588                 return -ENOENT;
1589         }
1590         path->mnt = mnt;
1591         path->dentry = dentry;
1592         err = follow_managed(path, nd);
1593         if (likely(!err))
1594                 *inode = d_backing_inode(path->dentry);
1595         return err;
1596
1597 need_lookup:
1598         return 1;
1599 }
1600
1601 /* Fast lookup failed, do it the slow way */
1602 static int lookup_slow(struct nameidata *nd, struct path *path)
1603 {
1604         struct dentry *dentry, *parent;
1605
1606         parent = nd->path.dentry;
1607         BUG_ON(nd->inode != parent->d_inode);
1608
1609         mutex_lock(&parent->d_inode->i_mutex);
1610         dentry = __lookup_hash(&nd->last, parent, nd->flags);
1611         mutex_unlock(&parent->d_inode->i_mutex);
1612         if (IS_ERR(dentry))
1613                 return PTR_ERR(dentry);
1614         path->mnt = nd->path.mnt;
1615         path->dentry = dentry;
1616         return follow_managed(path, nd);
1617 }
1618
1619 static inline int may_lookup(struct nameidata *nd)
1620 {
1621         if (nd->flags & LOOKUP_RCU) {
1622                 int err = inode_permission(nd->inode, MAY_EXEC|MAY_NOT_BLOCK);
1623                 if (err != -ECHILD)
1624                         return err;
1625                 if (unlazy_walk(nd, NULL, 0))
1626                         return -ECHILD;
1627         }
1628         return inode_permission(nd->inode, MAY_EXEC);
1629 }
1630
1631 static inline int handle_dots(struct nameidata *nd, int type)
1632 {
1633         if (type == LAST_DOTDOT) {
1634                 if (nd->flags & LOOKUP_RCU) {
1635                         return follow_dotdot_rcu(nd);
1636                 } else
1637                         follow_dotdot(nd);
1638         }
1639         return 0;
1640 }
1641
1642 static int pick_link(struct nameidata *nd, struct path *link,
1643                      struct inode *inode, unsigned seq)
1644 {
1645         int error;
1646         struct saved *last;
1647         if (unlikely(nd->total_link_count++ >= MAXSYMLINKS)) {
1648                 path_to_nameidata(link, nd);
1649                 return -ELOOP;
1650         }
1651         if (!(nd->flags & LOOKUP_RCU)) {
1652                 if (link->mnt == nd->path.mnt)
1653                         mntget(link->mnt);
1654         }
1655         error = nd_alloc_stack(nd);
1656         if (unlikely(error)) {
1657                 if (error == -ECHILD) {
1658                         if (unlikely(unlazy_link(nd, link, seq)))
1659                                 return -ECHILD;
1660                         error = nd_alloc_stack(nd);
1661                 }
1662                 if (error) {
1663                         path_put(link);
1664                         return error;
1665                 }
1666         }
1667
1668         last = nd->stack + nd->depth++;
1669         last->link = *link;
1670         last->cookie = NULL;
1671         last->inode = inode;
1672         last->seq = seq;
1673         return 1;
1674 }
1675
1676 /*
1677  * Do we need to follow links? We _really_ want to be able
1678  * to do this check without having to look at inode->i_op,
1679  * so we keep a cache of "no, this doesn't need follow_link"
1680  * for the common case.
1681  */
1682 static inline int should_follow_link(struct nameidata *nd, struct path *link,
1683                                      int follow,
1684                                      struct inode *inode, unsigned seq)
1685 {
1686         if (likely(!d_is_symlink(link->dentry)))
1687                 return 0;
1688         if (!follow)
1689                 return 0;
1690         return pick_link(nd, link, inode, seq);
1691 }
1692
1693 enum {WALK_GET = 1, WALK_PUT = 2};
1694
1695 static int walk_component(struct nameidata *nd, int flags)
1696 {
1697         struct path path;
1698         struct inode *inode;
1699         unsigned seq;
1700         int err;
1701         /*
1702          * "." and ".." are special - ".." especially so because it has
1703          * to be able to know about the current root directory and
1704          * parent relationships.
1705          */
1706         if (unlikely(nd->last_type != LAST_NORM)) {
1707                 err = handle_dots(nd, nd->last_type);
1708                 if (flags & WALK_PUT)
1709                         put_link(nd);
1710                 return err;
1711         }
1712         err = lookup_fast(nd, &path, &inode, &seq);
1713         if (unlikely(err)) {
1714                 if (err < 0)
1715                         return err;
1716
1717                 err = lookup_slow(nd, &path);
1718                 if (err < 0)
1719                         return err;
1720
1721                 inode = d_backing_inode(path.dentry);
1722                 seq = 0;        /* we are already out of RCU mode */
1723                 err = -ENOENT;
1724                 if (d_is_negative(path.dentry))
1725                         goto out_path_put;
1726         }
1727
1728         if (flags & WALK_PUT)
1729                 put_link(nd);
1730         err = should_follow_link(nd, &path, flags & WALK_GET, inode, seq);
1731         if (unlikely(err))
1732                 return err;
1733         path_to_nameidata(&path, nd);
1734         nd->inode = inode;
1735         nd->seq = seq;
1736         return 0;
1737
1738 out_path_put:
1739         path_to_nameidata(&path, nd);
1740         return err;
1741 }
1742
1743 /*
1744  * We can do the critical dentry name comparison and hashing
1745  * operations one word at a time, but we are limited to:
1746  *
1747  * - Architectures with fast unaligned word accesses. We could
1748  *   do a "get_unaligned()" if this helps and is sufficiently
1749  *   fast.
1750  *
1751  * - non-CONFIG_DEBUG_PAGEALLOC configurations (so that we
1752  *   do not trap on the (extremely unlikely) case of a page
1753  *   crossing operation.
1754  *
1755  * - Furthermore, we need an efficient 64-bit compile for the
1756  *   64-bit case in order to generate the "number of bytes in
1757  *   the final mask". Again, that could be replaced with a
1758  *   efficient population count instruction or similar.
1759  */
1760 #ifdef CONFIG_DCACHE_WORD_ACCESS
1761
1762 #include <asm/word-at-a-time.h>
1763
1764 #ifdef CONFIG_64BIT
1765
1766 static inline unsigned int fold_hash(unsigned long hash)
1767 {
1768         return hash_64(hash, 32);
1769 }
1770
1771 #else   /* 32-bit case */
1772
1773 #define fold_hash(x) (x)
1774
1775 #endif
1776
1777 unsigned int full_name_hash(const unsigned char *name, unsigned int len)
1778 {
1779         unsigned long a, mask;
1780         unsigned long hash = 0;
1781
1782         for (;;) {
1783                 a = load_unaligned_zeropad(name);
1784                 if (len < sizeof(unsigned long))
1785                         break;
1786                 hash += a;
1787                 hash *= 9;
1788                 name += sizeof(unsigned long);
1789                 len -= sizeof(unsigned long);
1790                 if (!len)
1791                         goto done;
1792         }
1793         mask = bytemask_from_count(len);
1794         hash += mask & a;
1795 done:
1796         return fold_hash(hash);
1797 }
1798 EXPORT_SYMBOL(full_name_hash);
1799
1800 /*
1801  * Calculate the length and hash of the path component, and
1802  * return the "hash_len" as the result.
1803  */
1804 static inline u64 hash_name(const char *name)
1805 {
1806         unsigned long a, b, adata, bdata, mask, hash, len;
1807         const struct word_at_a_time constants = WORD_AT_A_TIME_CONSTANTS;
1808
1809         hash = a = 0;
1810         len = -sizeof(unsigned long);
1811         do {
1812                 hash = (hash + a) * 9;
1813                 len += sizeof(unsigned long);
1814                 a = load_unaligned_zeropad(name+len);
1815                 b = a ^ REPEAT_BYTE('/');
1816         } while (!(has_zero(a, &adata, &constants) | has_zero(b, &bdata, &constants)));
1817
1818         adata = prep_zero_mask(a, adata, &constants);
1819         bdata = prep_zero_mask(b, bdata, &constants);
1820
1821         mask = create_zero_mask(adata | bdata);
1822
1823         hash += a & zero_bytemask(mask);
1824         len += find_zero(mask);
1825         return hashlen_create(fold_hash(hash), len);
1826 }
1827
1828 #else
1829
1830 unsigned int full_name_hash(const unsigned char *name, unsigned int len)
1831 {
1832         unsigned long hash = init_name_hash();
1833         while (len--)
1834                 hash = partial_name_hash(*name++, hash);
1835         return end_name_hash(hash);
1836 }
1837 EXPORT_SYMBOL(full_name_hash);
1838
1839 /*
1840  * We know there's a real path component here of at least
1841  * one character.
1842  */
1843 static inline u64 hash_name(const char *name)
1844 {
1845         unsigned long hash = init_name_hash();
1846         unsigned long len = 0, c;
1847
1848         c = (unsigned char)*name;
1849         do {
1850                 len++;
1851                 hash = partial_name_hash(c, hash);
1852                 c = (unsigned char)name[len];
1853         } while (c && c != '/');
1854         return hashlen_create(end_name_hash(hash), len);
1855 }
1856
1857 #endif
1858
1859 /*
1860  * Name resolution.
1861  * This is the basic name resolution function, turning a pathname into
1862  * the final dentry. We expect 'base' to be positive and a directory.
1863  *
1864  * Returns 0 and nd will have valid dentry and mnt on success.
1865  * Returns error and drops reference to input namei data on failure.
1866  */
1867 static int link_path_walk(const char *name, struct nameidata *nd)
1868 {
1869         int err;
1870
1871         while (*name=='/')
1872                 name++;
1873         if (!*name)
1874                 return 0;
1875
1876         /* At this point we know we have a real path component. */
1877         for(;;) {
1878                 u64 hash_len;
1879                 int type;
1880
1881                 err = may_lookup(nd);
1882                 if (err)
1883                         return err;
1884
1885                 hash_len = hash_name(name);
1886
1887                 type = LAST_NORM;
1888                 if (name[0] == '.') switch (hashlen_len(hash_len)) {
1889                         case 2:
1890                                 if (name[1] == '.') {
1891                                         type = LAST_DOTDOT;
1892                                         nd->flags |= LOOKUP_JUMPED;
1893                                 }
1894                                 break;
1895                         case 1:
1896                                 type = LAST_DOT;
1897                 }
1898                 if (likely(type == LAST_NORM)) {
1899                         struct dentry *parent = nd->path.dentry;
1900                         nd->flags &= ~LOOKUP_JUMPED;
1901                         if (unlikely(parent->d_flags & DCACHE_OP_HASH)) {
1902                                 struct qstr this = { { .hash_len = hash_len }, .name = name };
1903                                 err = parent->d_op->d_hash(parent, &this);
1904                                 if (err < 0)
1905                                         return err;
1906                                 hash_len = this.hash_len;
1907                                 name = this.name;
1908                         }
1909                 }
1910
1911                 nd->last.hash_len = hash_len;
1912                 nd->last.name = name;
1913                 nd->last_type = type;
1914
1915                 name += hashlen_len(hash_len);
1916                 if (!*name)
1917                         goto OK;
1918                 /*
1919                  * If it wasn't NUL, we know it was '/'. Skip that
1920                  * slash, and continue until no more slashes.
1921                  */
1922                 do {
1923                         name++;
1924                 } while (unlikely(*name == '/'));
1925                 if (unlikely(!*name)) {
1926 OK:
1927                         /* pathname body, done */
1928                         if (!nd->depth)
1929                                 return 0;
1930                         name = nd->stack[nd->depth - 1].name;
1931                         /* trailing symlink, done */
1932                         if (!name)
1933                                 return 0;
1934                         /* last component of nested symlink */
1935                         err = walk_component(nd, WALK_GET | WALK_PUT);
1936                 } else {
1937                         err = walk_component(nd, WALK_GET);
1938                 }
1939                 if (err < 0)
1940                         return err;
1941
1942                 if (err) {
1943                         const char *s = get_link(nd);
1944
1945                         if (unlikely(IS_ERR(s)))
1946                                 return PTR_ERR(s);
1947                         err = 0;
1948                         if (unlikely(!s)) {
1949                                 /* jumped */
1950                                 put_link(nd);
1951                         } else {
1952                                 nd->stack[nd->depth - 1].name = name;
1953                                 name = s;
1954                                 continue;
1955                         }
1956                 }
1957                 if (unlikely(!d_can_lookup(nd->path.dentry)))
1958                         return -ENOTDIR;
1959         }
1960 }
1961
1962 static const char *path_init(int dfd, const struct filename *name,
1963                              unsigned int flags, struct nameidata *nd)
1964 {
1965         int retval = 0;
1966         const char *s = name->name;
1967
1968         nd->last_type = LAST_ROOT; /* if there are only slashes... */
1969         nd->flags = flags | LOOKUP_JUMPED | LOOKUP_PARENT;
1970         nd->depth = 0;
1971         nd->total_link_count = 0;
1972         if (flags & LOOKUP_ROOT) {
1973                 struct dentry *root = nd->root.dentry;
1974                 struct inode *inode = root->d_inode;
1975                 if (*s) {
1976                         if (!d_can_lookup(root))
1977                                 return ERR_PTR(-ENOTDIR);
1978                         retval = inode_permission(inode, MAY_EXEC);
1979                         if (retval)
1980                                 return ERR_PTR(retval);
1981                 }
1982                 nd->path = nd->root;
1983                 nd->inode = inode;
1984                 if (flags & LOOKUP_RCU) {
1985                         rcu_read_lock();
1986                         nd->seq = __read_seqcount_begin(&nd->path.dentry->d_seq);
1987                         nd->root_seq = nd->seq;
1988                         nd->m_seq = read_seqbegin(&mount_lock);
1989                 } else {
1990                         path_get(&nd->path);
1991                 }
1992                 return s;
1993         }
1994
1995         nd->root.mnt = NULL;
1996
1997         nd->m_seq = read_seqbegin(&mount_lock);
1998         if (*s == '/') {
1999                 if (flags & LOOKUP_RCU) {
2000                         rcu_read_lock();
2001                         nd->seq = set_root_rcu(nd);
2002                 } else {
2003                         set_root(nd);
2004                         path_get(&nd->root);
2005                 }
2006                 nd->path = nd->root;
2007         } else if (dfd == AT_FDCWD) {
2008                 if (flags & LOOKUP_RCU) {
2009                         struct fs_struct *fs = current->fs;
2010                         unsigned seq;
2011
2012                         rcu_read_lock();
2013
2014                         do {
2015                                 seq = read_seqcount_begin(&fs->seq);
2016                                 nd->path = fs->pwd;
2017                                 nd->seq = __read_seqcount_begin(&nd->path.dentry->d_seq);
2018                         } while (read_seqcount_retry(&fs->seq, seq));
2019                 } else {
2020                         get_fs_pwd(current->fs, &nd->path);
2021                 }
2022         } else {
2023                 /* Caller must check execute permissions on the starting path component */
2024                 struct fd f = fdget_raw(dfd);
2025                 struct dentry *dentry;
2026
2027                 if (!f.file)
2028                         return ERR_PTR(-EBADF);
2029
2030                 dentry = f.file->f_path.dentry;
2031
2032                 if (*s) {
2033                         if (!d_can_lookup(dentry)) {
2034                                 fdput(f);
2035                                 return ERR_PTR(-ENOTDIR);
2036                         }
2037                 }
2038
2039                 nd->path = f.file->f_path;
2040                 if (flags & LOOKUP_RCU) {
2041                         rcu_read_lock();
2042                         nd->inode = nd->path.dentry->d_inode;
2043                         nd->seq = read_seqcount_begin(&nd->path.dentry->d_seq);
2044                 } else {
2045                         path_get(&nd->path);
2046                         nd->inode = nd->path.dentry->d_inode;
2047                 }
2048                 fdput(f);
2049                 return s;
2050         }
2051
2052         nd->inode = nd->path.dentry->d_inode;
2053         if (!(flags & LOOKUP_RCU))
2054                 return s;
2055         if (likely(!read_seqcount_retry(&nd->path.dentry->d_seq, nd->seq)))
2056                 return s;
2057         if (!(nd->flags & LOOKUP_ROOT))
2058                 nd->root.mnt = NULL;
2059         rcu_read_unlock();
2060         return ERR_PTR(-ECHILD);
2061 }
2062
2063 static void path_cleanup(struct nameidata *nd)
2064 {
2065         if (nd->root.mnt && !(nd->flags & LOOKUP_ROOT)) {
2066                 path_put(&nd->root);
2067                 nd->root.mnt = NULL;
2068         }
2069 }
2070
2071 static const char *trailing_symlink(struct nameidata *nd)
2072 {
2073         const char *s;
2074         int error = may_follow_link(nd);
2075         if (unlikely(error))
2076                 return ERR_PTR(error);
2077         nd->flags |= LOOKUP_PARENT;
2078         nd->stack[0].name = NULL;
2079         s = get_link(nd);
2080         return s ? s : "";
2081 }
2082
2083 static inline int lookup_last(struct nameidata *nd)
2084 {
2085         if (nd->last_type == LAST_NORM && nd->last.name[nd->last.len])
2086                 nd->flags |= LOOKUP_FOLLOW | LOOKUP_DIRECTORY;
2087
2088         nd->flags &= ~LOOKUP_PARENT;
2089         return walk_component(nd,
2090                         nd->flags & LOOKUP_FOLLOW
2091                                 ? nd->depth
2092                                         ? WALK_PUT | WALK_GET
2093                                         : WALK_GET
2094                                 : 0);
2095 }
2096
2097 /* Returns 0 and nd will be valid on success; Retuns error, otherwise. */
2098 static int path_lookupat(int dfd, const struct filename *name,
2099                                 unsigned int flags, struct nameidata *nd)
2100 {
2101         const char *s = path_init(dfd, name, flags, nd);
2102         int err;
2103
2104         if (IS_ERR(s))
2105                 return PTR_ERR(s);
2106         while (!(err = link_path_walk(s, nd))
2107                 && ((err = lookup_last(nd)) > 0)) {
2108                 s = trailing_symlink(nd);
2109                 if (IS_ERR(s)) {
2110                         err = PTR_ERR(s);
2111                         break;
2112                 }
2113         }
2114         if (!err)
2115                 err = complete_walk(nd);
2116
2117         if (!err && nd->flags & LOOKUP_DIRECTORY)
2118                 if (!d_can_lookup(nd->path.dentry))
2119                         err = -ENOTDIR;
2120         if (err)
2121                 terminate_walk(nd);
2122
2123         path_cleanup(nd);
2124         return err;
2125 }
2126
2127 static int filename_lookup(int dfd, struct filename *name,
2128                                 unsigned int flags, struct nameidata *nd)
2129 {
2130         int retval;
2131         struct nameidata *saved_nd = set_nameidata(nd);
2132
2133         retval = path_lookupat(dfd, name, flags | LOOKUP_RCU, nd);
2134         if (unlikely(retval == -ECHILD))
2135                 retval = path_lookupat(dfd, name, flags, nd);
2136         if (unlikely(retval == -ESTALE))
2137                 retval = path_lookupat(dfd, name, flags | LOOKUP_REVAL, nd);
2138
2139         if (likely(!retval))
2140                 audit_inode(name, nd->path.dentry, flags & LOOKUP_PARENT);
2141         restore_nameidata(saved_nd);
2142         return retval;
2143 }
2144
2145 /* Returns 0 and nd will be valid on success; Retuns error, otherwise. */
2146 static int path_parentat(int dfd, const struct filename *name,
2147                                 unsigned int flags, struct nameidata *nd)
2148 {
2149         const char *s = path_init(dfd, name, flags, nd);
2150         int err;
2151         if (IS_ERR(s))
2152                 return PTR_ERR(s);
2153         err = link_path_walk(s, nd);
2154         if (!err)
2155                 err = complete_walk(nd);
2156         if (err)
2157                 terminate_walk(nd);
2158         path_cleanup(nd);
2159         return err;
2160 }
2161
2162 static int filename_parentat(int dfd, struct filename *name,
2163                                 unsigned int flags, struct nameidata *nd)
2164 {
2165         int retval;
2166         struct nameidata *saved_nd = set_nameidata(nd);
2167
2168         retval = path_parentat(dfd, name, flags | LOOKUP_RCU, nd);
2169         if (unlikely(retval == -ECHILD))
2170                 retval = path_parentat(dfd, name, flags, nd);
2171         if (unlikely(retval == -ESTALE))
2172                 retval = path_parentat(dfd, name, flags | LOOKUP_REVAL, nd);
2173
2174         if (likely(!retval))
2175                 audit_inode(name, nd->path.dentry, LOOKUP_PARENT);
2176         restore_nameidata(saved_nd);
2177         return retval;
2178 }
2179
2180 /* does lookup, returns the object with parent locked */
2181 struct dentry *kern_path_locked(const char *name, struct path *path)
2182 {
2183         struct filename *filename = getname_kernel(name);
2184         struct nameidata nd;
2185         struct dentry *d;
2186         int err;
2187
2188         if (IS_ERR(filename))
2189                 return ERR_CAST(filename);
2190
2191         err = filename_parentat(AT_FDCWD, filename, 0, &nd);
2192         if (err) {
2193                 d = ERR_PTR(err);
2194                 goto out;
2195         }
2196         if (nd.last_type != LAST_NORM) {
2197                 path_put(&nd.path);
2198                 d = ERR_PTR(-EINVAL);
2199                 goto out;
2200         }
2201         mutex_lock_nested(&nd.path.dentry->d_inode->i_mutex, I_MUTEX_PARENT);
2202         d = __lookup_hash(&nd.last, nd.path.dentry, 0);
2203         if (IS_ERR(d)) {
2204                 mutex_unlock(&nd.path.dentry->d_inode->i_mutex);
2205                 path_put(&nd.path);
2206                 goto out;
2207         }
2208         *path = nd.path;
2209 out:
2210         putname(filename);
2211         return d;
2212 }
2213
2214 int kern_path(const char *name, unsigned int flags, struct path *path)
2215 {
2216         struct nameidata nd;
2217         struct filename *filename = getname_kernel(name);
2218         int res = PTR_ERR(filename);
2219
2220         if (!IS_ERR(filename)) {
2221                 res = filename_lookup(AT_FDCWD, filename, flags, &nd);
2222                 putname(filename);
2223                 if (!res)
2224                         *path = nd.path;
2225         }
2226         return res;
2227 }
2228 EXPORT_SYMBOL(kern_path);
2229
2230 /**
2231  * vfs_path_lookup - lookup a file path relative to a dentry-vfsmount pair
2232  * @dentry:  pointer to dentry of the base directory
2233  * @mnt: pointer to vfs mount of the base directory
2234  * @name: pointer to file name
2235  * @flags: lookup flags
2236  * @path: pointer to struct path to fill
2237  */
2238 int vfs_path_lookup(struct dentry *dentry, struct vfsmount *mnt,
2239                     const char *name, unsigned int flags,
2240                     struct path *path)
2241 {
2242         struct filename *filename = getname_kernel(name);
2243         int err = PTR_ERR(filename);
2244
2245         BUG_ON(flags & LOOKUP_PARENT);
2246
2247         /* the first argument of filename_lookup() is ignored with LOOKUP_ROOT */
2248         if (!IS_ERR(filename)) {
2249                 struct nameidata nd;
2250                 nd.root.dentry = dentry;
2251                 nd.root.mnt = mnt;
2252                 err = filename_lookup(AT_FDCWD, filename,
2253                                       flags | LOOKUP_ROOT, &nd);
2254                 if (!err)
2255                         *path = nd.path;
2256                 putname(filename);
2257         }
2258         return err;
2259 }
2260 EXPORT_SYMBOL(vfs_path_lookup);
2261
2262 /**
2263  * lookup_one_len - filesystem helper to lookup single pathname component
2264  * @name:       pathname component to lookup
2265  * @base:       base directory to lookup from
2266  * @len:        maximum length @len should be interpreted to
2267  *
2268  * Note that this routine is purely a helper for filesystem usage and should
2269  * not be called by generic code.
2270  */
2271 struct dentry *lookup_one_len(const char *name, struct dentry *base, int len)
2272 {
2273         struct qstr this;
2274         unsigned int c;
2275         int err;
2276
2277         WARN_ON_ONCE(!mutex_is_locked(&base->d_inode->i_mutex));
2278
2279         this.name = name;
2280         this.len = len;
2281         this.hash = full_name_hash(name, len);
2282         if (!len)
2283                 return ERR_PTR(-EACCES);
2284
2285         if (unlikely(name[0] == '.')) {
2286                 if (len < 2 || (len == 2 && name[1] == '.'))
2287                         return ERR_PTR(-EACCES);
2288         }
2289
2290         while (len--) {
2291                 c = *(const unsigned char *)name++;
2292                 if (c == '/' || c == '\0')
2293                         return ERR_PTR(-EACCES);
2294         }
2295         /*
2296          * See if the low-level filesystem might want
2297          * to use its own hash..
2298          */
2299         if (base->d_flags & DCACHE_OP_HASH) {
2300                 int err = base->d_op->d_hash(base, &this);
2301                 if (err < 0)
2302                         return ERR_PTR(err);
2303         }
2304
2305         err = inode_permission(base->d_inode, MAY_EXEC);
2306         if (err)
2307                 return ERR_PTR(err);
2308
2309         return __lookup_hash(&this, base, 0);
2310 }
2311 EXPORT_SYMBOL(lookup_one_len);
2312
2313 int user_path_at_empty(int dfd, const char __user *name, unsigned flags,
2314                  struct path *path, int *empty)
2315 {
2316         struct nameidata nd;
2317         struct filename *tmp = getname_flags(name, flags, empty);
2318         int err = PTR_ERR(tmp);
2319         if (!IS_ERR(tmp)) {
2320
2321                 BUG_ON(flags & LOOKUP_PARENT);
2322
2323                 err = filename_lookup(dfd, tmp, flags, &nd);
2324                 putname(tmp);
2325                 if (!err)
2326                         *path = nd.path;
2327         }
2328         return err;
2329 }
2330
2331 int user_path_at(int dfd, const char __user *name, unsigned flags,
2332                  struct path *path)
2333 {
2334         return user_path_at_empty(dfd, name, flags, path, NULL);
2335 }
2336 EXPORT_SYMBOL(user_path_at);
2337
2338 /*
2339  * NB: most callers don't do anything directly with the reference to the
2340  *     to struct filename, but the nd->last pointer points into the name string
2341  *     allocated by getname. So we must hold the reference to it until all
2342  *     path-walking is complete.
2343  */
2344 static struct filename *
2345 user_path_parent(int dfd, const char __user *path,
2346                  struct path *parent,
2347                  struct qstr *last,
2348                  int *type,
2349                  unsigned int flags)
2350 {
2351         struct nameidata nd;
2352         struct filename *s = getname(path);
2353         int error;
2354
2355         /* only LOOKUP_REVAL is allowed in extra flags */
2356         flags &= LOOKUP_REVAL;
2357
2358         if (IS_ERR(s))
2359                 return s;
2360
2361         error = filename_parentat(dfd, s, flags, &nd);
2362         if (error) {
2363                 putname(s);
2364                 return ERR_PTR(error);
2365         }
2366         *parent = nd.path;
2367         *last = nd.last;
2368         *type = nd.last_type;
2369
2370         return s;
2371 }
2372
2373 /**
2374  * mountpoint_last - look up last component for umount
2375  * @nd:   pathwalk nameidata - currently pointing at parent directory of "last"
2376  * @path: pointer to container for result
2377  *
2378  * This is a special lookup_last function just for umount. In this case, we
2379  * need to resolve the path without doing any revalidation.
2380  *
2381  * The nameidata should be the result of doing a LOOKUP_PARENT pathwalk. Since
2382  * mountpoints are always pinned in the dcache, their ancestors are too. Thus,
2383  * in almost all cases, this lookup will be served out of the dcache. The only
2384  * cases where it won't are if nd->last refers to a symlink or the path is
2385  * bogus and it doesn't exist.
2386  *
2387  * Returns:
2388  * -error: if there was an error during lookup. This includes -ENOENT if the
2389  *         lookup found a negative dentry. The nd->path reference will also be
2390  *         put in this case.
2391  *
2392  * 0:      if we successfully resolved nd->path and found it to not to be a
2393  *         symlink that needs to be followed. "path" will also be populated.
2394  *         The nd->path reference will also be put.
2395  *
2396  * 1:      if we successfully resolved nd->last and found it to be a symlink
2397  *         that needs to be followed. "path" will be populated with the path
2398  *         to the link, and nd->path will *not* be put.
2399  */
2400 static int
2401 mountpoint_last(struct nameidata *nd, struct path *path)
2402 {
2403         int error = 0;
2404         struct dentry *dentry;
2405         struct dentry *dir = nd->path.dentry;
2406
2407         /* If we're in rcuwalk, drop out of it to handle last component */
2408         if (nd->flags & LOOKUP_RCU) {
2409                 if (unlazy_walk(nd, NULL, 0))
2410                         return -ECHILD;
2411         }
2412
2413         nd->flags &= ~LOOKUP_PARENT;
2414
2415         if (unlikely(nd->last_type != LAST_NORM)) {
2416                 error = handle_dots(nd, nd->last_type);
2417                 if (error)
2418                         return error;
2419                 dentry = dget(nd->path.dentry);
2420                 goto done;
2421         }
2422
2423         mutex_lock(&dir->d_inode->i_mutex);
2424         dentry = d_lookup(dir, &nd->last);
2425         if (!dentry) {
2426                 /*
2427                  * No cached dentry. Mounted dentries are pinned in the cache,
2428                  * so that means that this dentry is probably a symlink or the
2429                  * path doesn't actually point to a mounted dentry.
2430                  */
2431                 dentry = d_alloc(dir, &nd->last);
2432                 if (!dentry) {
2433                         mutex_unlock(&dir->d_inode->i_mutex);
2434                         return -ENOMEM;
2435                 }
2436                 dentry = lookup_real(dir->d_inode, dentry, nd->flags);
2437                 if (IS_ERR(dentry)) {
2438                         mutex_unlock(&dir->d_inode->i_mutex);
2439                         return PTR_ERR(dentry);
2440                 }
2441         }
2442         mutex_unlock(&dir->d_inode->i_mutex);
2443
2444 done:
2445         if (d_is_negative(dentry)) {
2446                 dput(dentry);
2447                 return -ENOENT;
2448         }
2449         if (nd->depth)
2450                 put_link(nd);
2451         path->dentry = dentry;
2452         path->mnt = nd->path.mnt;
2453         error = should_follow_link(nd, path, nd->flags & LOOKUP_FOLLOW,
2454                                    d_backing_inode(dentry), 0);
2455         if (unlikely(error))
2456                 return error;
2457         mntget(path->mnt);
2458         follow_mount(path);
2459         return 0;
2460 }
2461
2462 /**
2463  * path_mountpoint - look up a path to be umounted
2464  * @dfd:        directory file descriptor to start walk from
2465  * @name:       full pathname to walk
2466  * @path:       pointer to container for result
2467  * @flags:      lookup flags
2468  *
2469  * Look up the given name, but don't attempt to revalidate the last component.
2470  * Returns 0 and "path" will be valid on success; Returns error otherwise.
2471  */
2472 static int
2473 path_mountpoint(int dfd, const struct filename *name, struct path *path,
2474                 struct nameidata *nd, unsigned int flags)
2475 {
2476         const char *s = path_init(dfd, name, flags, nd);
2477         int err;
2478         if (IS_ERR(s))
2479                 return PTR_ERR(s);
2480         while (!(err = link_path_walk(s, nd)) &&
2481                 (err = mountpoint_last(nd, path)) > 0) {
2482                 s = trailing_symlink(nd);
2483                 if (IS_ERR(s)) {
2484                         err = PTR_ERR(s);
2485                         break;
2486                 }
2487         }
2488         terminate_walk(nd);
2489         path_cleanup(nd);
2490         return err;
2491 }
2492
2493 static int
2494 filename_mountpoint(int dfd, struct filename *name, struct path *path,
2495                         unsigned int flags)
2496 {
2497         struct nameidata nd, *saved;
2498         int error;
2499         if (IS_ERR(name))
2500                 return PTR_ERR(name);
2501         saved = set_nameidata(&nd);
2502         error = path_mountpoint(dfd, name, path, &nd, flags | LOOKUP_RCU);
2503         if (unlikely(error == -ECHILD))
2504                 error = path_mountpoint(dfd, name, path, &nd, flags);
2505         if (unlikely(error == -ESTALE))
2506                 error = path_mountpoint(dfd, name, path, &nd, flags | LOOKUP_REVAL);
2507         if (likely(!error))
2508                 audit_inode(name, path->dentry, 0);
2509         restore_nameidata(saved);
2510         putname(name);
2511         return error;
2512 }
2513
2514 /**
2515  * user_path_mountpoint_at - lookup a path from userland in order to umount it
2516  * @dfd:        directory file descriptor
2517  * @name:       pathname from userland
2518  * @flags:      lookup flags
2519  * @path:       pointer to container to hold result
2520  *
2521  * A umount is a special case for path walking. We're not actually interested
2522  * in the inode in this situation, and ESTALE errors can be a problem. We
2523  * simply want track down the dentry and vfsmount attached at the mountpoint
2524  * and avoid revalidating the last component.
2525  *
2526  * Returns 0 and populates "path" on success.
2527  */
2528 int
2529 user_path_mountpoint_at(int dfd, const char __user *name, unsigned int flags,
2530                         struct path *path)
2531 {
2532         return filename_mountpoint(dfd, getname(name), path, flags);
2533 }
2534
2535 int
2536 kern_path_mountpoint(int dfd, const char *name, struct path *path,
2537                         unsigned int flags)
2538 {
2539         return filename_mountpoint(dfd, getname_kernel(name), path, flags);
2540 }
2541 EXPORT_SYMBOL(kern_path_mountpoint);
2542
2543 int __check_sticky(struct inode *dir, struct inode *inode)
2544 {
2545         kuid_t fsuid = current_fsuid();
2546
2547         if (uid_eq(inode->i_uid, fsuid))
2548                 return 0;
2549         if (uid_eq(dir->i_uid, fsuid))
2550                 return 0;
2551         return !capable_wrt_inode_uidgid(inode, CAP_FOWNER);
2552 }
2553 EXPORT_SYMBOL(__check_sticky);
2554
2555 /*
2556  *      Check whether we can remove a link victim from directory dir, check
2557  *  whether the type of victim is right.
2558  *  1. We can't do it if dir is read-only (done in permission())
2559  *  2. We should have write and exec permissions on dir
2560  *  3. We can't remove anything from append-only dir
2561  *  4. We can't do anything with immutable dir (done in permission())
2562  *  5. If the sticky bit on dir is set we should either
2563  *      a. be owner of dir, or
2564  *      b. be owner of victim, or
2565  *      c. have CAP_FOWNER capability
2566  *  6. If the victim is append-only or immutable we can't do antyhing with
2567  *     links pointing to it.
2568  *  7. If we were asked to remove a directory and victim isn't one - ENOTDIR.
2569  *  8. If we were asked to remove a non-directory and victim isn't one - EISDIR.
2570  *  9. We can't remove a root or mountpoint.
2571  * 10. We don't allow removal of NFS sillyrenamed files; it's handled by
2572  *     nfs_async_unlink().
2573  */
2574 static int may_delete(struct inode *dir, struct dentry *victim, bool isdir)
2575 {
2576         struct inode *inode = d_backing_inode(victim);
2577         int error;
2578
2579         if (d_is_negative(victim))
2580                 return -ENOENT;
2581         BUG_ON(!inode);
2582
2583         BUG_ON(victim->d_parent->d_inode != dir);
2584         audit_inode_child(dir, victim, AUDIT_TYPE_CHILD_DELETE);
2585
2586         error = inode_permission(dir, MAY_WRITE | MAY_EXEC);
2587         if (error)
2588                 return error;
2589         if (IS_APPEND(dir))
2590                 return -EPERM;
2591
2592         if (check_sticky(dir, inode) || IS_APPEND(inode) ||
2593             IS_IMMUTABLE(inode) || IS_SWAPFILE(inode))
2594                 return -EPERM;
2595         if (isdir) {
2596                 if (!d_is_dir(victim))
2597                         return -ENOTDIR;
2598                 if (IS_ROOT(victim))
2599                         return -EBUSY;
2600         } else if (d_is_dir(victim))
2601                 return -EISDIR;
2602         if (IS_DEADDIR(dir))
2603                 return -ENOENT;
2604         if (victim->d_flags & DCACHE_NFSFS_RENAMED)
2605                 return -EBUSY;
2606         return 0;
2607 }
2608
2609 /*      Check whether we can create an object with dentry child in directory
2610  *  dir.
2611  *  1. We can't do it if child already exists (open has special treatment for
2612  *     this case, but since we are inlined it's OK)
2613  *  2. We can't do it if dir is read-only (done in permission())
2614  *  3. We should have write and exec permissions on dir
2615  *  4. We can't do it if dir is immutable (done in permission())
2616  */
2617 static inline int may_create(struct inode *dir, struct dentry *child)
2618 {
2619         audit_inode_child(dir, child, AUDIT_TYPE_CHILD_CREATE);
2620         if (child->d_inode)
2621                 return -EEXIST;
2622         if (IS_DEADDIR(dir))
2623                 return -ENOENT;
2624         return inode_permission(dir, MAY_WRITE | MAY_EXEC);
2625 }
2626
2627 /*
2628  * p1 and p2 should be directories on the same fs.
2629  */
2630 struct dentry *lock_rename(struct dentry *p1, struct dentry *p2)
2631 {
2632         struct dentry *p;
2633
2634         if (p1 == p2) {
2635                 mutex_lock_nested(&p1->d_inode->i_mutex, I_MUTEX_PARENT);
2636                 return NULL;
2637         }
2638
2639         mutex_lock(&p1->d_inode->i_sb->s_vfs_rename_mutex);
2640
2641         p = d_ancestor(p2, p1);
2642         if (p) {
2643                 mutex_lock_nested(&p2->d_inode->i_mutex, I_MUTEX_PARENT);
2644                 mutex_lock_nested(&p1->d_inode->i_mutex, I_MUTEX_CHILD);
2645                 return p;
2646         }
2647
2648         p = d_ancestor(p1, p2);
2649         if (p) {
2650                 mutex_lock_nested(&p1->d_inode->i_mutex, I_MUTEX_PARENT);
2651                 mutex_lock_nested(&p2->d_inode->i_mutex, I_MUTEX_CHILD);
2652                 return p;
2653         }
2654
2655         mutex_lock_nested(&p1->d_inode->i_mutex, I_MUTEX_PARENT);
2656         mutex_lock_nested(&p2->d_inode->i_mutex, I_MUTEX_PARENT2);
2657         return NULL;
2658 }
2659 EXPORT_SYMBOL(lock_rename);
2660
2661 void unlock_rename(struct dentry *p1, struct dentry *p2)
2662 {
2663         mutex_unlock(&p1->d_inode->i_mutex);
2664         if (p1 != p2) {
2665                 mutex_unlock(&p2->d_inode->i_mutex);
2666                 mutex_unlock(&p1->d_inode->i_sb->s_vfs_rename_mutex);
2667         }
2668 }
2669 EXPORT_SYMBOL(unlock_rename);
2670
2671 int vfs_create(struct inode *dir, struct dentry *dentry, umode_t mode,
2672                 bool want_excl)
2673 {
2674         int error = may_create(dir, dentry);
2675         if (error)
2676                 return error;
2677
2678         if (!dir->i_op->create)
2679                 return -EACCES; /* shouldn't it be ENOSYS? */
2680         mode &= S_IALLUGO;
2681         mode |= S_IFREG;
2682         error = security_inode_create(dir, dentry, mode);
2683         if (error)
2684                 return error;
2685         error = dir->i_op->create(dir, dentry, mode, want_excl);
2686         if (!error)
2687                 fsnotify_create(dir, dentry);
2688         return error;
2689 }
2690 EXPORT_SYMBOL(vfs_create);
2691
2692 static int may_open(struct path *path, int acc_mode, int flag)
2693 {
2694         struct dentry *dentry = path->dentry;
2695         struct inode *inode = dentry->d_inode;
2696         int error;
2697
2698         /* O_PATH? */
2699         if (!acc_mode)
2700                 return 0;
2701
2702         if (!inode)
2703                 return -ENOENT;
2704
2705         switch (inode->i_mode & S_IFMT) {
2706         case S_IFLNK:
2707                 return -ELOOP;
2708         case S_IFDIR:
2709                 if (acc_mode & MAY_WRITE)
2710                         return -EISDIR;
2711                 break;
2712         case S_IFBLK:
2713         case S_IFCHR:
2714                 if (path->mnt->mnt_flags & MNT_NODEV)
2715                         return -EACCES;
2716                 /*FALLTHRU*/
2717         case S_IFIFO:
2718         case S_IFSOCK:
2719                 flag &= ~O_TRUNC;
2720                 break;
2721         }
2722
2723         error = inode_permission(inode, acc_mode);
2724         if (error)
2725                 return error;
2726
2727         /*
2728          * An append-only file must be opened in append mode for writing.
2729          */
2730         if (IS_APPEND(inode)) {
2731                 if  ((flag & O_ACCMODE) != O_RDONLY && !(flag & O_APPEND))
2732                         return -EPERM;
2733                 if (flag & O_TRUNC)
2734                         return -EPERM;
2735         }
2736
2737         /* O_NOATIME can only be set by the owner or superuser */
2738         if (flag & O_NOATIME && !inode_owner_or_capable(inode))
2739                 return -EPERM;
2740
2741         return 0;
2742 }
2743
2744 static int handle_truncate(struct file *filp)
2745 {
2746         struct path *path = &filp->f_path;
2747         struct inode *inode = path->dentry->d_inode;
2748         int error = get_write_access(inode);
2749         if (error)
2750                 return error;
2751         /*
2752          * Refuse to truncate files with mandatory locks held on them.
2753          */
2754         error = locks_verify_locked(filp);
2755         if (!error)
2756                 error = security_path_truncate(path);
2757         if (!error) {
2758                 error = do_truncate(path->dentry, 0,
2759                                     ATTR_MTIME|ATTR_CTIME|ATTR_OPEN,
2760                                     filp);
2761         }
2762         put_write_access(inode);
2763         return error;
2764 }
2765
2766 static inline int open_to_namei_flags(int flag)
2767 {
2768         if ((flag & O_ACCMODE) == 3)
2769                 flag--;
2770         return flag;
2771 }
2772
2773 static int may_o_create(struct path *dir, struct dentry *dentry, umode_t mode)
2774 {
2775         int error = security_path_mknod(dir, dentry, mode, 0);
2776         if (error)
2777                 return error;
2778
2779         error = inode_permission(dir->dentry->d_inode, MAY_WRITE | MAY_EXEC);
2780         if (error)
2781                 return error;
2782
2783         return security_inode_create(dir->dentry->d_inode, dentry, mode);
2784 }
2785
2786 /*
2787  * Attempt to atomically look up, create and open a file from a negative
2788  * dentry.
2789  *
2790  * Returns 0 if successful.  The file will have been created and attached to
2791  * @file by the filesystem calling finish_open().
2792  *
2793  * Returns 1 if the file was looked up only or didn't need creating.  The
2794  * caller will need to perform the open themselves.  @path will have been
2795  * updated to point to the new dentry.  This may be negative.
2796  *
2797  * Returns an error code otherwise.
2798  */
2799 static int atomic_open(struct nameidata *nd, struct dentry *dentry,
2800                         struct path *path, struct file *file,
2801                         const struct open_flags *op,
2802                         bool got_write, bool need_lookup,
2803                         int *opened)
2804 {
2805         struct inode *dir =  nd->path.dentry->d_inode;
2806         unsigned open_flag = open_to_namei_flags(op->open_flag);
2807         umode_t mode;
2808         int error;
2809         int acc_mode;
2810         int create_error = 0;
2811         struct dentry *const DENTRY_NOT_SET = (void *) -1UL;
2812         bool excl;
2813
2814         BUG_ON(dentry->d_inode);
2815
2816         /* Don't create child dentry for a dead directory. */
2817         if (unlikely(IS_DEADDIR(dir))) {
2818                 error = -ENOENT;
2819                 goto out;
2820         }
2821
2822         mode = op->mode;
2823         if ((open_flag & O_CREAT) && !IS_POSIXACL(dir))
2824                 mode &= ~current_umask();
2825
2826         excl = (open_flag & (O_EXCL | O_CREAT)) == (O_EXCL | O_CREAT);
2827         if (excl)
2828                 open_flag &= ~O_TRUNC;
2829
2830         /*
2831          * Checking write permission is tricky, bacuse we don't know if we are
2832          * going to actually need it: O_CREAT opens should work as long as the
2833          * file exists.  But checking existence breaks atomicity.  The trick is
2834          * to check access and if not granted clear O_CREAT from the flags.
2835          *
2836          * Another problem is returing the "right" error value (e.g. for an
2837          * O_EXCL open we want to return EEXIST not EROFS).
2838          */
2839         if (((open_flag & (O_CREAT | O_TRUNC)) ||
2840             (open_flag & O_ACCMODE) != O_RDONLY) && unlikely(!got_write)) {
2841                 if (!(open_flag & O_CREAT)) {
2842                         /*
2843                          * No O_CREATE -> atomicity not a requirement -> fall
2844                          * back to lookup + open
2845                          */
2846                         goto no_open;
2847                 } else if (open_flag & (O_EXCL | O_TRUNC)) {
2848                         /* Fall back and fail with the right error */
2849                         create_error = -EROFS;
2850                         goto no_open;
2851                 } else {
2852                         /* No side effects, safe to clear O_CREAT */
2853                         create_error = -EROFS;
2854                         open_flag &= ~O_CREAT;
2855                 }
2856         }
2857
2858         if (open_flag & O_CREAT) {
2859                 error = may_o_create(&nd->path, dentry, mode);
2860                 if (error) {
2861                         create_error = error;
2862                         if (open_flag & O_EXCL)
2863                                 goto no_open;
2864                         open_flag &= ~O_CREAT;
2865                 }
2866         }
2867
2868         if (nd->flags & LOOKUP_DIRECTORY)
2869                 open_flag |= O_DIRECTORY;
2870
2871         file->f_path.dentry = DENTRY_NOT_SET;
2872         file->f_path.mnt = nd->path.mnt;
2873         error = dir->i_op->atomic_open(dir, dentry, file, open_flag, mode,
2874                                       opened);
2875         if (error < 0) {
2876                 if (create_error && error == -ENOENT)
2877                         error = create_error;
2878                 goto out;
2879         }
2880
2881         if (error) {    /* returned 1, that is */
2882                 if (WARN_ON(file->f_path.dentry == DENTRY_NOT_SET)) {
2883                         error = -EIO;
2884                         goto out;
2885                 }
2886                 if (file->f_path.dentry) {
2887                         dput(dentry);
2888                         dentry = file->f_path.dentry;
2889                 }
2890                 if (*opened & FILE_CREATED)
2891                         fsnotify_create(dir, dentry);
2892                 if (!dentry->d_inode) {
2893                         WARN_ON(*opened & FILE_CREATED);
2894                         if (create_error) {
2895                                 error = create_error;
2896                                 goto out;
2897                         }
2898                 } else {
2899                         if (excl && !(*opened & FILE_CREATED)) {
2900                                 error = -EEXIST;
2901                                 goto out;
2902                         }
2903                 }
2904                 goto looked_up;
2905         }
2906
2907         /*
2908          * We didn't have the inode before the open, so check open permission
2909          * here.
2910          */
2911         acc_mode = op->acc_mode;
2912         if (*opened & FILE_CREATED) {
2913                 WARN_ON(!(open_flag & O_CREAT));
2914                 fsnotify_create(dir, dentry);
2915                 acc_mode = MAY_OPEN;
2916         }
2917         error = may_open(&file->f_path, acc_mode, open_flag);
2918         if (error)
2919                 fput(file);
2920
2921 out:
2922         dput(dentry);
2923         return error;
2924
2925 no_open:
2926         if (need_lookup) {
2927                 dentry = lookup_real(dir, dentry, nd->flags);
2928                 if (IS_ERR(dentry))
2929                         return PTR_ERR(dentry);
2930
2931                 if (create_error) {
2932                         int open_flag = op->open_flag;
2933
2934                         error = create_error;
2935                         if ((open_flag & O_EXCL)) {
2936                                 if (!dentry->d_inode)
2937                                         goto out;
2938                         } else if (!dentry->d_inode) {
2939                                 goto out;
2940                         } else if ((open_flag & O_TRUNC) &&
2941                                    d_is_reg(dentry)) {
2942                                 goto out;
2943                         }
2944                         /* will fail later, go on to get the right error */
2945                 }
2946         }
2947 looked_up:
2948         path->dentry = dentry;
2949         path->mnt = nd->path.mnt;
2950         return 1;
2951 }
2952
2953 /*
2954  * Look up and maybe create and open the last component.
2955  *
2956  * Must be called with i_mutex held on parent.
2957  *
2958  * Returns 0 if the file was successfully atomically created (if necessary) and
2959  * opened.  In this case the file will be returned attached to @file.
2960  *
2961  * Returns 1 if the file was not completely opened at this time, though lookups
2962  * and creations will have been performed and the dentry returned in @path will
2963  * be positive upon return if O_CREAT was specified.  If O_CREAT wasn't
2964  * specified then a negative dentry may be returned.
2965  *
2966  * An error code is returned otherwise.
2967  *
2968  * FILE_CREATE will be set in @*opened if the dentry was created and will be
2969  * cleared otherwise prior to returning.
2970  */
2971 static int lookup_open(struct nameidata *nd, struct path *path,
2972                         struct file *file,
2973                         const struct open_flags *op,
2974                         bool got_write, int *opened)
2975 {
2976         struct dentry *dir = nd->path.dentry;
2977         struct inode *dir_inode = dir->d_inode;
2978         struct dentry *dentry;
2979         int error;
2980         bool need_lookup;
2981
2982         *opened &= ~FILE_CREATED;
2983         dentry = lookup_dcache(&nd->last, dir, nd->flags, &need_lookup);
2984         if (IS_ERR(dentry))
2985                 return PTR_ERR(dentry);
2986
2987         /* Cached positive dentry: will open in f_op->open */
2988         if (!need_lookup && dentry->d_inode)
2989                 goto out_no_open;
2990
2991         if ((nd->flags & LOOKUP_OPEN) && dir_inode->i_op->atomic_open) {
2992                 return atomic_open(nd, dentry, path, file, op, got_write,
2993                                    need_lookup, opened);
2994         }
2995
2996         if (need_lookup) {
2997                 BUG_ON(dentry->d_inode);
2998
2999                 dentry = lookup_real(dir_inode, dentry, nd->flags);
3000                 if (IS_ERR(dentry))
3001                         return PTR_ERR(dentry);
3002         }
3003
3004         /* Negative dentry, just create the file */
3005         if (!dentry->d_inode && (op->open_flag & O_CREAT)) {
3006                 umode_t mode = op->mode;
3007                 if (!IS_POSIXACL(dir->d_inode))
3008                         mode &= ~current_umask();
3009                 /*
3010                  * This write is needed to ensure that a
3011                  * rw->ro transition does not occur between
3012                  * the time when the file is created and when
3013                  * a permanent write count is taken through
3014                  * the 'struct file' in finish_open().
3015                  */
3016                 if (!got_write) {
3017                         error = -EROFS;
3018                         goto out_dput;
3019                 }
3020                 *opened |= FILE_CREATED;
3021                 error = security_path_mknod(&nd->path, dentry, mode, 0);
3022                 if (error)
3023                         goto out_dput;
3024                 error = vfs_create(dir->d_inode, dentry, mode,
3025                                    nd->flags & LOOKUP_EXCL);
3026                 if (error)
3027                         goto out_dput;
3028         }
3029 out_no_open:
3030         path->dentry = dentry;
3031         path->mnt = nd->path.mnt;
3032         return 1;
3033
3034 out_dput:
3035         dput(dentry);
3036         return error;
3037 }
3038
3039 /*
3040  * Handle the last step of open()
3041  */
3042 static int do_last(struct nameidata *nd,
3043                    struct file *file, const struct open_flags *op,
3044                    int *opened, struct filename *name)
3045 {
3046         struct dentry *dir = nd->path.dentry;
3047         int open_flag = op->open_flag;
3048         bool will_truncate = (open_flag & O_TRUNC) != 0;
3049         bool got_write = false;
3050         int acc_mode = op->acc_mode;
3051         unsigned seq;
3052         struct inode *inode;
3053         struct path save_parent = { .dentry = NULL, .mnt = NULL };
3054         struct path path;
3055         bool retried = false;
3056         int error;
3057
3058         nd->flags &= ~LOOKUP_PARENT;
3059         nd->flags |= op->intent;
3060
3061         if (nd->last_type != LAST_NORM) {
3062                 error = handle_dots(nd, nd->last_type);
3063                 if (unlikely(error))
3064                         return error;
3065                 goto finish_open;
3066         }
3067
3068         if (!(open_flag & O_CREAT)) {
3069                 if (nd->last.name[nd->last.len])
3070                         nd->flags |= LOOKUP_FOLLOW | LOOKUP_DIRECTORY;
3071                 /* we _can_ be in RCU mode here */
3072                 error = lookup_fast(nd, &path, &inode, &seq);
3073                 if (likely(!error))
3074                         goto finish_lookup;
3075
3076                 if (error < 0)
3077                         return error;
3078
3079                 BUG_ON(nd->inode != dir->d_inode);
3080         } else {
3081                 /* create side of things */
3082                 /*
3083                  * This will *only* deal with leaving RCU mode - LOOKUP_JUMPED
3084                  * has been cleared when we got to the last component we are
3085                  * about to look up
3086                  */
3087                 error = complete_walk(nd);
3088                 if (error)
3089                         return error;
3090
3091                 audit_inode(name, dir, LOOKUP_PARENT);
3092                 /* trailing slashes? */
3093                 if (unlikely(nd->last.name[nd->last.len]))
3094                         return -EISDIR;
3095         }
3096
3097 retry_lookup:
3098         if (op->open_flag & (O_CREAT | O_TRUNC | O_WRONLY | O_RDWR)) {
3099                 error = mnt_want_write(nd->path.mnt);
3100                 if (!error)
3101                         got_write = true;
3102                 /*
3103                  * do _not_ fail yet - we might not need that or fail with
3104                  * a different error; let lookup_open() decide; we'll be
3105                  * dropping this one anyway.
3106                  */
3107         }
3108         mutex_lock(&dir->d_inode->i_mutex);
3109         error = lookup_open(nd, &path, file, op, got_write, opened);
3110         mutex_unlock(&dir->d_inode->i_mutex);
3111
3112         if (error <= 0) {
3113                 if (error)
3114                         goto out;
3115
3116                 if ((*opened & FILE_CREATED) ||
3117                     !S_ISREG(file_inode(file)->i_mode))
3118                         will_truncate = false;
3119
3120                 audit_inode(name, file->f_path.dentry, 0);
3121                 goto opened;
3122         }
3123
3124         if (*opened & FILE_CREATED) {
3125                 /* Don't check for write permission, don't truncate */
3126                 open_flag &= ~O_TRUNC;
3127                 will_truncate = false;
3128                 acc_mode = MAY_OPEN;
3129                 path_to_nameidata(&path, nd);
3130                 goto finish_open_created;
3131         }
3132
3133         /*
3134          * create/update audit record if it already exists.
3135          */
3136         if (d_is_positive(path.dentry))
3137                 audit_inode(name, path.dentry, 0);
3138
3139         /*
3140          * If atomic_open() acquired write access it is dropped now due to
3141          * possible mount and symlink following (this might be optimized away if
3142          * necessary...)
3143          */
3144         if (got_write) {
3145                 mnt_drop_write(nd->path.mnt);
3146                 got_write = false;
3147         }
3148
3149         if (unlikely((open_flag & (O_EXCL | O_CREAT)) == (O_EXCL | O_CREAT))) {
3150                 path_to_nameidata(&path, nd);
3151                 return -EEXIST;
3152         }
3153
3154         error = follow_managed(&path, nd);
3155         if (unlikely(error < 0))
3156                 return error;
3157
3158         BUG_ON(nd->flags & LOOKUP_RCU);
3159         inode = d_backing_inode(path.dentry);
3160         seq = 0;        /* out of RCU mode, so the value doesn't matter */
3161         if (unlikely(d_is_negative(path.dentry))) {
3162                 path_to_nameidata(&path, nd);
3163                 return -ENOENT;
3164         }
3165 finish_lookup:
3166         if (nd->depth)
3167                 put_link(nd);
3168         error = should_follow_link(nd, &path, nd->flags & LOOKUP_FOLLOW,
3169                                    inode, seq);
3170         if (unlikely(error))
3171                 return error;
3172
3173         if (unlikely(d_is_symlink(path.dentry)) && !(open_flag & O_PATH)) {
3174                 path_to_nameidata(&path, nd);
3175                 return -ELOOP;
3176         }
3177
3178         if ((nd->flags & LOOKUP_RCU) || nd->path.mnt != path.mnt) {
3179                 path_to_nameidata(&path, nd);
3180         } else {
3181                 save_parent.dentry = nd->path.dentry;
3182                 save_parent.mnt = mntget(path.mnt);
3183                 nd->path.dentry = path.dentry;
3184
3185         }
3186         nd->inode = inode;
3187         nd->seq = seq;
3188         /* Why this, you ask?  _Now_ we might have grown LOOKUP_JUMPED... */
3189 finish_open:
3190         error = complete_walk(nd);
3191         if (error) {
3192                 path_put(&save_parent);
3193                 return error;
3194         }
3195         audit_inode(name, nd->path.dentry, 0);
3196         error = -EISDIR;
3197         if ((open_flag & O_CREAT) && d_is_dir(nd->path.dentry))
3198                 goto out;
3199         error = -ENOTDIR;
3200         if ((nd->flags & LOOKUP_DIRECTORY) && !d_can_lookup(nd->path.dentry))
3201                 goto out;
3202         if (!d_is_reg(nd->path.dentry))
3203                 will_truncate = false;
3204
3205         if (will_truncate) {
3206                 error = mnt_want_write(nd->path.mnt);
3207                 if (error)
3208                         goto out;
3209                 got_write = true;
3210         }
3211 finish_open_created:
3212         error = may_open(&nd->path, acc_mode, open_flag);
3213         if (error)
3214                 goto out;
3215
3216         BUG_ON(*opened & FILE_OPENED); /* once it's opened, it's opened */
3217         error = vfs_open(&nd->path, file, current_cred());
3218         if (!error) {
3219                 *opened |= FILE_OPENED;
3220         } else {
3221                 if (error == -EOPENSTALE)
3222                         goto stale_open;
3223                 goto out;
3224         }
3225 opened:
3226         error = open_check_o_direct(file);
3227         if (error)
3228                 goto exit_fput;
3229         error = ima_file_check(file, op->acc_mode, *opened);
3230         if (error)
3231                 goto exit_fput;
3232
3233         if (will_truncate) {
3234                 error = handle_truncate(file);
3235                 if (error)
3236                         goto exit_fput;
3237         }
3238 out:
3239         if (got_write)
3240                 mnt_drop_write(nd->path.mnt);
3241         path_put(&save_parent);
3242         return error;
3243
3244 exit_fput:
3245         fput(file);
3246         goto out;
3247
3248 stale_open:
3249         /* If no saved parent or already retried then can't retry */
3250         if (!save_parent.dentry || retried)
3251                 goto out;
3252
3253         BUG_ON(save_parent.dentry != dir);
3254         path_put(&nd->path);
3255         nd->path = save_parent;
3256         nd->inode = dir->d_inode;
3257         save_parent.mnt = NULL;
3258         save_parent.dentry = NULL;
3259         if (got_write) {
3260                 mnt_drop_write(nd->path.mnt);
3261                 got_write = false;
3262         }
3263         retried = true;
3264         goto retry_lookup;
3265 }
3266
3267 static int do_tmpfile(int dfd, struct filename *pathname,
3268                 struct nameidata *nd, int flags,
3269                 const struct open_flags *op,
3270                 struct file *file, int *opened)
3271 {
3272         static const struct qstr name = QSTR_INIT("/", 1);
3273         struct dentry *dentry, *child;
3274         struct inode *dir;
3275         int error = path_lookupat(dfd, pathname,
3276                                   flags | LOOKUP_DIRECTORY, nd);
3277         if (unlikely(error))
3278                 return error;
3279         error = mnt_want_write(nd->path.mnt);
3280         if (unlikely(error))
3281                 goto out;
3282         /* we want directory to be writable */
3283         error = inode_permission(nd->inode, MAY_WRITE | MAY_EXEC);
3284         if (error)
3285                 goto out2;
3286         dentry = nd->path.dentry;
3287         dir = dentry->d_inode;
3288         if (!dir->i_op->tmpfile) {
3289                 error = -EOPNOTSUPP;
3290                 goto out2;
3291         }
3292         child = d_alloc(dentry, &name);
3293         if (unlikely(!child)) {
3294                 error = -ENOMEM;
3295                 goto out2;
3296         }
3297         nd->flags &= ~LOOKUP_DIRECTORY;
3298         nd->flags |= op->intent;
3299         dput(nd->path.dentry);
3300         nd->path.dentry = child;
3301         error = dir->i_op->tmpfile(dir, nd->path.dentry, op->mode);
3302         if (error)
3303                 goto out2;
3304         audit_inode(pathname, nd->path.dentry, 0);
3305         /* Don't check for other permissions, the inode was just created */
3306         error = may_open(&nd->path, MAY_OPEN, op->open_flag);
3307         if (error)
3308                 goto out2;
3309         file->f_path.mnt = nd->path.mnt;
3310         error = finish_open(file, nd->path.dentry, NULL, opened);
3311         if (error)
3312                 goto out2;
3313         error = open_check_o_direct(file);
3314         if (error) {
3315                 fput(file);
3316         } else if (!(op->open_flag & O_EXCL)) {
3317                 struct inode *inode = file_inode(file);
3318                 spin_lock(&inode->i_lock);
3319                 inode->i_state |= I_LINKABLE;
3320                 spin_unlock(&inode->i_lock);
3321         }
3322 out2:
3323         mnt_drop_write(nd->path.mnt);
3324 out:
3325         path_put(&nd->path);
3326         return error;
3327 }
3328
3329 static struct file *path_openat(int dfd, struct filename *pathname,
3330                 struct nameidata *nd, const struct open_flags *op, int flags)
3331 {
3332         const char *s;
3333         struct file *file;
3334         int opened = 0;
3335         int error;
3336
3337         file = get_empty_filp();
3338         if (IS_ERR(file))
3339                 return file;
3340
3341         file->f_flags = op->open_flag;
3342
3343         if (unlikely(file->f_flags & __O_TMPFILE)) {
3344                 error = do_tmpfile(dfd, pathname, nd, flags, op, file, &opened);
3345                 goto out2;
3346         }
3347
3348         s = path_init(dfd, pathname, flags, nd);
3349         if (IS_ERR(s)) {
3350                 put_filp(file);
3351                 return ERR_CAST(s);
3352         }
3353         while (!(error = link_path_walk(s, nd)) &&
3354                 (error = do_last(nd, file, op, &opened, pathname)) > 0) {
3355                 nd->flags &= ~(LOOKUP_OPEN|LOOKUP_CREATE|LOOKUP_EXCL);
3356                 s = trailing_symlink(nd);
3357                 if (IS_ERR(s)) {
3358                         error = PTR_ERR(s);
3359                         break;
3360                 }
3361         }
3362         terminate_walk(nd);
3363         path_cleanup(nd);
3364 out2:
3365         if (!(opened & FILE_OPENED)) {
3366                 BUG_ON(!error);
3367                 put_filp(file);
3368         }
3369         if (unlikely(error)) {
3370                 if (error == -EOPENSTALE) {
3371                         if (flags & LOOKUP_RCU)
3372                                 error = -ECHILD;
3373                         else
3374                                 error = -ESTALE;
3375                 }
3376                 file = ERR_PTR(error);
3377         }
3378         return file;
3379 }
3380
3381 struct file *do_filp_open(int dfd, struct filename *pathname,
3382                 const struct open_flags *op)
3383 {
3384         struct nameidata nd, *saved_nd = set_nameidata(&nd);
3385         int flags = op->lookup_flags;
3386         struct file *filp;
3387
3388         filp = path_openat(dfd, pathname, &nd, op, flags | LOOKUP_RCU);
3389         if (unlikely(filp == ERR_PTR(-ECHILD)))
3390                 filp = path_openat(dfd, pathname, &nd, op, flags);
3391         if (unlikely(filp == ERR_PTR(-ESTALE)))
3392                 filp = path_openat(dfd, pathname, &nd, op, flags | LOOKUP_REVAL);
3393         restore_nameidata(saved_nd);
3394         return filp;
3395 }
3396
3397 struct file *do_file_open_root(struct dentry *dentry, struct vfsmount *mnt,
3398                 const char *name, const struct open_flags *op)
3399 {
3400         struct nameidata nd, *saved_nd;
3401         struct file *file;
3402         struct filename *filename;
3403         int flags = op->lookup_flags | LOOKUP_ROOT;
3404
3405         nd.root.mnt = mnt;
3406         nd.root.dentry = dentry;
3407
3408         if (d_is_symlink(dentry) && op->intent & LOOKUP_OPEN)
3409                 return ERR_PTR(-ELOOP);
3410
3411         filename = getname_kernel(name);
3412         if (unlikely(IS_ERR(filename)))
3413                 return ERR_CAST(filename);
3414
3415         saved_nd = set_nameidata(&nd);
3416         file = path_openat(-1, filename, &nd, op, flags | LOOKUP_RCU);
3417         if (unlikely(file == ERR_PTR(-ECHILD)))
3418                 file = path_openat(-1, filename, &nd, op, flags);
3419         if (unlikely(file == ERR_PTR(-ESTALE)))
3420                 file = path_openat(-1, filename, &nd, op, flags | LOOKUP_REVAL);
3421         restore_nameidata(saved_nd);
3422         putname(filename);
3423         return file;
3424 }
3425
3426 static struct dentry *filename_create(int dfd, struct filename *name,
3427                                 struct path *path, unsigned int lookup_flags)
3428 {
3429         struct dentry *dentry = ERR_PTR(-EEXIST);
3430         struct nameidata nd;
3431         int err2;
3432         int error;
3433         bool is_dir = (lookup_flags & LOOKUP_DIRECTORY);
3434
3435         /*
3436          * Note that only LOOKUP_REVAL and LOOKUP_DIRECTORY matter here. Any
3437          * other flags passed in are ignored!
3438          */
3439         lookup_flags &= LOOKUP_REVAL;
3440
3441         error = filename_parentat(dfd, name, lookup_flags, &nd);
3442         if (error)
3443                 return ERR_PTR(error);
3444
3445         /*
3446          * Yucky last component or no last component at all?
3447          * (foo/., foo/.., /////)
3448          */
3449         if (nd.last_type != LAST_NORM)
3450                 goto out;
3451         nd.flags &= ~LOOKUP_PARENT;
3452         nd.flags |= LOOKUP_CREATE | LOOKUP_EXCL;
3453
3454         /* don't fail immediately if it's r/o, at least try to report other errors */
3455         err2 = mnt_want_write(nd.path.mnt);
3456         /*
3457          * Do the final lookup.
3458          */
3459         mutex_lock_nested(&nd.path.dentry->d_inode->i_mutex, I_MUTEX_PARENT);
3460         dentry = __lookup_hash(&nd.last, nd.path.dentry, nd.flags);
3461         if (IS_ERR(dentry))
3462                 goto unlock;
3463
3464         error = -EEXIST;
3465         if (d_is_positive(dentry))
3466                 goto fail;
3467
3468         /*
3469          * Special case - lookup gave negative, but... we had foo/bar/
3470          * From the vfs_mknod() POV we just have a negative dentry -
3471          * all is fine. Let's be bastards - you had / on the end, you've
3472          * been asking for (non-existent) directory. -ENOENT for you.
3473          */
3474         if (unlikely(!is_dir && nd.last.name[nd.last.len])) {
3475                 error = -ENOENT;
3476                 goto fail;
3477         }
3478         if (unlikely(err2)) {
3479                 error = err2;
3480                 goto fail;
3481         }
3482         *path = nd.path;
3483         return dentry;
3484 fail:
3485         dput(dentry);
3486         dentry = ERR_PTR(error);
3487 unlock:
3488         mutex_unlock(&nd.path.dentry->d_inode->i_mutex);
3489         if (!err2)
3490                 mnt_drop_write(nd.path.mnt);
3491 out:
3492         path_put(&nd.path);
3493         return dentry;
3494 }
3495
3496 struct dentry *kern_path_create(int dfd, const char *pathname,
3497                                 struct path *path, unsigned int lookup_flags)
3498 {
3499         struct filename *filename = getname_kernel(pathname);
3500         struct dentry *res;
3501
3502         if (IS_ERR(filename))
3503                 return ERR_CAST(filename);
3504         res = filename_create(dfd, filename, path, lookup_flags);
3505         putname(filename);
3506         return res;
3507 }
3508 EXPORT_SYMBOL(kern_path_create);
3509
3510 void done_path_create(struct path *path, struct dentry *dentry)
3511 {
3512         dput(dentry);
3513         mutex_unlock(&path->dentry->d_inode->i_mutex);
3514         mnt_drop_write(path->mnt);
3515         path_put(path);
3516 }
3517 EXPORT_SYMBOL(done_path_create);
3518
3519 struct dentry *user_path_create(int dfd, const char __user *pathname,
3520                                 struct path *path, unsigned int lookup_flags)
3521 {
3522         struct filename *tmp = getname(pathname);
3523         struct dentry *res;
3524         if (IS_ERR(tmp))
3525                 return ERR_CAST(tmp);
3526         res = filename_create(dfd, tmp, path, lookup_flags);
3527         putname(tmp);
3528         return res;
3529 }
3530 EXPORT_SYMBOL(user_path_create);
3531
3532 int vfs_mknod(struct inode *dir, struct dentry *dentry, umode_t mode, dev_t dev)
3533 {
3534         int error = may_create(dir, dentry);
3535
3536         if (error)
3537                 return error;
3538
3539         if ((S_ISCHR(mode) || S_ISBLK(mode)) && !capable(CAP_MKNOD))
3540                 return -EPERM;
3541
3542         if (!dir->i_op->mknod)
3543                 return -EPERM;
3544
3545         error = devcgroup_inode_mknod(mode, dev);
3546         if (error)
3547                 return error;
3548
3549         error = security_inode_mknod(dir, dentry, mode, dev);
3550         if (error)
3551                 return error;
3552
3553         error = dir->i_op->mknod(dir, dentry, mode, dev);
3554         if (!error)
3555                 fsnotify_create(dir, dentry);
3556         return error;
3557 }
3558 EXPORT_SYMBOL(vfs_mknod);
3559
3560 static int may_mknod(umode_t mode)
3561 {
3562         switch (mode & S_IFMT) {
3563         case S_IFREG:
3564         case S_IFCHR:
3565         case S_IFBLK:
3566         case S_IFIFO:
3567         case S_IFSOCK:
3568         case 0: /* zero mode translates to S_IFREG */
3569                 return 0;
3570         case S_IFDIR:
3571                 return -EPERM;
3572         default:
3573                 return -EINVAL;
3574         }
3575 }
3576
3577 SYSCALL_DEFINE4(mknodat, int, dfd, const char __user *, filename, umode_t, mode,
3578                 unsigned, dev)
3579 {
3580         struct dentry *dentry;
3581         struct path path;
3582         int error;
3583         unsigned int lookup_flags = 0;
3584
3585         error = may_mknod(mode);
3586         if (error)
3587                 return error;
3588 retry:
3589         dentry = user_path_create(dfd, filename, &path, lookup_flags);
3590         if (IS_ERR(dentry))
3591                 return PTR_ERR(dentry);
3592
3593         if (!IS_POSIXACL(path.dentry->d_inode))
3594                 mode &= ~current_umask();
3595         error = security_path_mknod(&path, dentry, mode, dev);
3596         if (error)
3597                 goto out;
3598         switch (mode & S_IFMT) {
3599                 case 0: case S_IFREG:
3600                         error = vfs_create(path.dentry->d_inode,dentry,mode,true);
3601                         break;
3602                 case S_IFCHR: case S_IFBLK:
3603                         error = vfs_mknod(path.dentry->d_inode,dentry,mode,
3604                                         new_decode_dev(dev));
3605                         break;
3606                 case S_IFIFO: case S_IFSOCK:
3607                         error = vfs_mknod(path.dentry->d_inode,dentry,mode,0);
3608                         break;
3609         }
3610 out:
3611         done_path_create(&path, dentry);
3612         if (retry_estale(error, lookup_flags)) {
3613                 lookup_flags |= LOOKUP_REVAL;
3614                 goto retry;
3615         }
3616         return error;
3617 }
3618
3619 SYSCALL_DEFINE3(mknod, const char __user *, filename, umode_t, mode, unsigned, dev)
3620 {
3621         return sys_mknodat(AT_FDCWD, filename, mode, dev);
3622 }
3623
3624 int vfs_mkdir(struct inode *dir, struct dentry *dentry, umode_t mode)
3625 {
3626         int error = may_create(dir, dentry);
3627         unsigned max_links = dir->i_sb->s_max_links;
3628
3629         if (error)
3630                 return error;
3631
3632         if (!dir->i_op->mkdir)
3633                 return -EPERM;
3634
3635         mode &= (S_IRWXUGO|S_ISVTX);
3636         error = security_inode_mkdir(dir, dentry, mode);
3637         if (error)
3638                 return error;
3639
3640         if (max_links && dir->i_nlink >= max_links)
3641                 return -EMLINK;
3642
3643         error = dir->i_op->mkdir(dir, dentry, mode);
3644         if (!error)
3645                 fsnotify_mkdir(dir, dentry);
3646         return error;
3647 }
3648 EXPORT_SYMBOL(vfs_mkdir);
3649
3650 SYSCALL_DEFINE3(mkdirat, int, dfd, const char __user *, pathname, umode_t, mode)
3651 {
3652         struct dentry *dentry;
3653         struct path path;
3654         int error;
3655         unsigned int lookup_flags = LOOKUP_DIRECTORY;
3656
3657 retry:
3658         dentry = user_path_create(dfd, pathname, &path, lookup_flags);
3659         if (IS_ERR(dentry))
3660                 return PTR_ERR(dentry);
3661
3662         if (!IS_POSIXACL(path.dentry->d_inode))
3663                 mode &= ~current_umask();
3664         error = security_path_mkdir(&path, dentry, mode);
3665         if (!error)
3666                 error = vfs_mkdir(path.dentry->d_inode, dentry, mode);
3667         done_path_create(&path, dentry);
3668         if (retry_estale(error, lookup_flags)) {
3669                 lookup_flags |= LOOKUP_REVAL;
3670                 goto retry;
3671         }
3672         return error;
3673 }
3674
3675 SYSCALL_DEFINE2(mkdir, const char __user *, pathname, umode_t, mode)
3676 {
3677         return sys_mkdirat(AT_FDCWD, pathname, mode);
3678 }
3679
3680 /*
3681  * The dentry_unhash() helper will try to drop the dentry early: we
3682  * should have a usage count of 1 if we're the only user of this
3683  * dentry, and if that is true (possibly after pruning the dcache),
3684  * then we drop the dentry now.
3685  *
3686  * A low-level filesystem can, if it choses, legally
3687  * do a
3688  *
3689  *      if (!d_unhashed(dentry))
3690  *              return -EBUSY;
3691  *
3692  * if it cannot handle the case of removing a directory
3693  * that is still in use by something else..
3694  */
3695 void dentry_unhash(struct dentry *dentry)
3696 {
3697         shrink_dcache_parent(dentry);
3698         spin_lock(&dentry->d_lock);
3699         if (dentry->d_lockref.count == 1)
3700                 __d_drop(dentry);
3701         spin_unlock(&dentry->d_lock);
3702 }
3703 EXPORT_SYMBOL(dentry_unhash);
3704
3705 int vfs_rmdir(struct inode *dir, struct dentry *dentry)
3706 {
3707         int error = may_delete(dir, dentry, 1);
3708
3709         if (error)
3710                 return error;
3711
3712         if (!dir->i_op->rmdir)
3713                 return -EPERM;
3714
3715         dget(dentry);
3716         mutex_lock(&dentry->d_inode->i_mutex);
3717
3718         error = -EBUSY;
3719         if (is_local_mountpoint(dentry))
3720                 goto out;
3721
3722         error = security_inode_rmdir(dir, dentry);
3723         if (error)
3724                 goto out;
3725
3726         shrink_dcache_parent(dentry);
3727         error = dir->i_op->rmdir(dir, dentry);
3728         if (error)
3729                 goto out;
3730
3731         dentry->d_inode->i_flags |= S_DEAD;
3732         dont_mount(dentry);
3733         detach_mounts(dentry);
3734
3735 out:
3736         mutex_unlock(&dentry->d_inode->i_mutex);
3737         dput(dentry);
3738         if (!error)
3739                 d_delete(dentry);
3740         return error;
3741 }
3742 EXPORT_SYMBOL(vfs_rmdir);
3743
3744 static long do_rmdir(int dfd, const char __user *pathname)
3745 {
3746         int error = 0;
3747         struct filename *name;
3748         struct dentry *dentry;
3749         struct path path;
3750         struct qstr last;
3751         int type;
3752         unsigned int lookup_flags = 0;
3753 retry:
3754         name = user_path_parent(dfd, pathname,
3755                                 &path, &last, &type, lookup_flags);
3756         if (IS_ERR(name))
3757                 return PTR_ERR(name);
3758
3759         switch (type) {
3760         case LAST_DOTDOT:
3761                 error = -ENOTEMPTY;
3762                 goto exit1;
3763         case LAST_DOT:
3764                 error = -EINVAL;
3765                 goto exit1;
3766         case LAST_ROOT:
3767                 error = -EBUSY;
3768                 goto exit1;
3769         }
3770
3771         error = mnt_want_write(path.mnt);
3772         if (error)
3773                 goto exit1;
3774
3775         mutex_lock_nested(&path.dentry->d_inode->i_mutex, I_MUTEX_PARENT);
3776         dentry = __lookup_hash(&last, path.dentry, lookup_flags);
3777         error = PTR_ERR(dentry);
3778         if (IS_ERR(dentry))
3779                 goto exit2;
3780         if (!dentry->d_inode) {
3781                 error = -ENOENT;
3782                 goto exit3;
3783         }
3784         error = security_path_rmdir(&path, dentry);
3785         if (error)
3786                 goto exit3;
3787         error = vfs_rmdir(path.dentry->d_inode, dentry);
3788 exit3:
3789         dput(dentry);
3790 exit2:
3791         mutex_unlock(&path.dentry->d_inode->i_mutex);
3792         mnt_drop_write(path.mnt);
3793 exit1:
3794         path_put(&path);
3795         putname(name);
3796         if (retry_estale(error, lookup_flags)) {
3797                 lookup_flags |= LOOKUP_REVAL;
3798                 goto retry;
3799         }
3800         return error;
3801 }
3802
3803 SYSCALL_DEFINE1(rmdir, const char __user *, pathname)
3804 {
3805         return do_rmdir(AT_FDCWD, pathname);
3806 }
3807
3808 /**
3809  * vfs_unlink - unlink a filesystem object
3810  * @dir:        parent directory
3811  * @dentry:     victim
3812  * @delegated_inode: returns victim inode, if the inode is delegated.
3813  *
3814  * The caller must hold dir->i_mutex.
3815  *
3816  * If vfs_unlink discovers a delegation, it will return -EWOULDBLOCK and
3817  * return a reference to the inode in delegated_inode.  The caller
3818  * should then break the delegation on that inode and retry.  Because
3819  * breaking a delegation may take a long time, the caller should drop
3820  * dir->i_mutex before doing so.
3821  *
3822  * Alternatively, a caller may pass NULL for delegated_inode.  This may
3823  * be appropriate for callers that expect the underlying filesystem not
3824  * to be NFS exported.
3825  */
3826 int vfs_unlink(struct inode *dir, struct dentry *dentry, struct inode **delegated_inode)
3827 {
3828         struct inode *target = dentry->d_inode;
3829         int error = may_delete(dir, dentry, 0);
3830
3831         if (error)
3832                 return error;
3833
3834         if (!dir->i_op->unlink)
3835                 return -EPERM;
3836
3837         mutex_lock(&target->i_mutex);
3838         if (is_local_mountpoint(dentry))
3839                 error = -EBUSY;
3840         else {
3841                 error = security_inode_unlink(dir, dentry);
3842                 if (!error) {
3843                         error = try_break_deleg(target, delegated_inode);
3844                         if (error)
3845                                 goto out;
3846                         error = dir->i_op->unlink(dir, dentry);
3847                         if (!error) {
3848                                 dont_mount(dentry);
3849                                 detach_mounts(dentry);
3850                         }
3851                 }
3852         }
3853 out:
3854         mutex_unlock(&target->i_mutex);
3855
3856         /* We don't d_delete() NFS sillyrenamed files--they still exist. */
3857         if (!error && !(dentry->d_flags & DCACHE_NFSFS_RENAMED)) {
3858                 fsnotify_link_count(target);
3859                 d_delete(dentry);
3860         }
3861
3862         return error;
3863 }
3864 EXPORT_SYMBOL(vfs_unlink);
3865
3866 /*
3867  * Make sure that the actual truncation of the file will occur outside its
3868  * directory's i_mutex.  Truncate can take a long time if there is a lot of
3869  * writeout happening, and we don't want to prevent access to the directory
3870  * while waiting on the I/O.
3871  */
3872 static long do_unlinkat(int dfd, const char __user *pathname)
3873 {
3874         int error;
3875         struct filename *name;
3876         struct dentry *dentry;
3877         struct path path;
3878         struct qstr last;
3879         int type;
3880         struct inode *inode = NULL;
3881         struct inode *delegated_inode = NULL;
3882         unsigned int lookup_flags = 0;
3883 retry:
3884         name = user_path_parent(dfd, pathname,
3885                                 &path, &last, &type, lookup_flags);
3886         if (IS_ERR(name))
3887                 return PTR_ERR(name);
3888
3889         error = -EISDIR;
3890         if (type != LAST_NORM)
3891                 goto exit1;
3892
3893         error = mnt_want_write(path.mnt);
3894         if (error)
3895                 goto exit1;
3896 retry_deleg:
3897         mutex_lock_nested(&path.dentry->d_inode->i_mutex, I_MUTEX_PARENT);
3898         dentry = __lookup_hash(&last, path.dentry, lookup_flags);
3899         error = PTR_ERR(dentry);
3900         if (!IS_ERR(dentry)) {
3901                 /* Why not before? Because we want correct error value */
3902                 if (last.name[last.len])
3903                         goto slashes;
3904                 inode = dentry->d_inode;
3905                 if (d_is_negative(dentry))
3906                         goto slashes;
3907                 ihold(inode);
3908                 error = security_path_unlink(&path, dentry);
3909                 if (error)
3910                         goto exit2;
3911                 error = vfs_unlink(path.dentry->d_inode, dentry, &delegated_inode);
3912 exit2:
3913                 dput(dentry);
3914         }
3915         mutex_unlock(&path.dentry->d_inode->i_mutex);
3916         if (inode)
3917                 iput(inode);    /* truncate the inode here */
3918         inode = NULL;
3919         if (delegated_inode) {
3920                 error = break_deleg_wait(&delegated_inode);
3921                 if (!error)
3922                         goto retry_deleg;
3923         }
3924         mnt_drop_write(path.mnt);
3925 exit1:
3926         path_put(&path);
3927         putname(name);
3928         if (retry_estale(error, lookup_flags)) {
3929                 lookup_flags |= LOOKUP_REVAL;
3930                 inode = NULL;
3931                 goto retry;
3932         }
3933         return error;
3934
3935 slashes:
3936         if (d_is_negative(dentry))
3937                 error = -ENOENT;
3938         else if (d_is_dir(dentry))
3939                 error = -EISDIR;
3940         else
3941                 error = -ENOTDIR;
3942         goto exit2;
3943 }
3944
3945 SYSCALL_DEFINE3(unlinkat, int, dfd, const char __user *, pathname, int, flag)
3946 {
3947         if ((flag & ~AT_REMOVEDIR) != 0)
3948                 return -EINVAL;
3949
3950         if (flag & AT_REMOVEDIR)
3951                 return do_rmdir(dfd, pathname);
3952
3953         return do_unlinkat(dfd, pathname);
3954 }
3955
3956 SYSCALL_DEFINE1(unlink, const char __user *, pathname)
3957 {
3958         return do_unlinkat(AT_FDCWD, pathname);
3959 }
3960
3961 int vfs_symlink(struct inode *dir, struct dentry *dentry, const char *oldname)
3962 {
3963         int error = may_create(dir, dentry);
3964
3965         if (error)
3966                 return error;
3967
3968         if (!dir->i_op->symlink)
3969                 return -EPERM;
3970
3971         error = security_inode_symlink(dir, dentry, oldname);
3972         if (error)
3973                 return error;
3974
3975         error = dir->i_op->symlink(dir, dentry, oldname);
3976         if (!error)
3977                 fsnotify_create(dir, dentry);
3978         return error;
3979 }
3980 EXPORT_SYMBOL(vfs_symlink);
3981
3982 SYSCALL_DEFINE3(symlinkat, const char __user *, oldname,
3983                 int, newdfd, const char __user *, newname)
3984 {
3985         int error;
3986         struct filename *from;
3987         struct dentry *dentry;
3988         struct path path;
3989         unsigned int lookup_flags = 0;
3990
3991         from = getname(oldname);
3992         if (IS_ERR(from))
3993                 return PTR_ERR(from);
3994 retry:
3995         dentry = user_path_create(newdfd, newname, &path, lookup_flags);
3996         error = PTR_ERR(dentry);
3997         if (IS_ERR(dentry))
3998                 goto out_putname;
3999
4000         error = security_path_symlink(&path, dentry, from->name);
4001         if (!error)
4002                 error = vfs_symlink(path.dentry->d_inode, dentry, from->name);
4003         done_path_create(&path, dentry);
4004         if (retry_estale(error, lookup_flags)) {
4005                 lookup_flags |= LOOKUP_REVAL;
4006                 goto retry;
4007         }
4008 out_putname:
4009         putname(from);
4010         return error;
4011 }
4012
4013 SYSCALL_DEFINE2(symlink, const char __user *, oldname, const char __user *, newname)
4014 {
4015         return sys_symlinkat(oldname, AT_FDCWD, newname);
4016 }
4017
4018 /**
4019  * vfs_link - create a new link
4020  * @old_dentry: object to be linked
4021  * @dir:        new parent
4022  * @new_dentry: where to create the new link
4023  * @delegated_inode: returns inode needing a delegation break
4024  *
4025  * The caller must hold dir->i_mutex
4026  *
4027  * If vfs_link discovers a delegation on the to-be-linked file in need
4028  * of breaking, it will return -EWOULDBLOCK and return a reference to the
4029  * inode in delegated_inode.  The caller should then break the delegation
4030  * and retry.  Because breaking a delegation may take a long time, the
4031  * caller should drop the i_mutex before doing so.
4032  *
4033  * Alternatively, a caller may pass NULL for delegated_inode.  This may
4034  * be appropriate for callers that expect the underlying filesystem not
4035  * to be NFS exported.
4036  */
4037 int vfs_link(struct dentry *old_dentry, struct inode *dir, struct dentry *new_dentry, struct inode **delegated_inode)
4038 {
4039         struct inode *inode = old_dentry->d_inode;
4040         unsigned max_links = dir->i_sb->s_max_links;
4041         int error;
4042
4043         if (!inode)
4044                 return -ENOENT;
4045
4046         error = may_create(dir, new_dentry);
4047         if (error)
4048                 return error;
4049
4050         if (dir->i_sb != inode->i_sb)
4051                 return -EXDEV;
4052
4053         /*
4054          * A link to an append-only or immutable file cannot be created.
4055          */
4056         if (IS_APPEND(inode) || IS_IMMUTABLE(inode))
4057                 return -EPERM;
4058         if (!dir->i_op->link)
4059                 return -EPERM;
4060         if (S_ISDIR(inode->i_mode))
4061                 return -EPERM;
4062
4063         error = security_inode_link(old_dentry, dir, new_dentry);
4064         if (error)
4065                 return error;
4066
4067         mutex_lock(&inode->i_mutex);
4068         /* Make sure we don't allow creating hardlink to an unlinked file */
4069         if (inode->i_nlink == 0 && !(inode->i_state & I_LINKABLE))
4070                 error =  -ENOENT;
4071         else if (max_links && inode->i_nlink >= max_links)
4072                 error = -EMLINK;
4073         else {
4074                 error = try_break_deleg(inode, delegated_inode);
4075                 if (!error)
4076                         error = dir->i_op->link(old_dentry, dir, new_dentry);
4077         }
4078
4079         if (!error && (inode->i_state & I_LINKABLE)) {
4080                 spin_lock(&inode->i_lock);
4081                 inode->i_state &= ~I_LINKABLE;
4082                 spin_unlock(&inode->i_lock);
4083         }
4084         mutex_unlock(&inode->i_mutex);
4085         if (!error)
4086                 fsnotify_link(dir, inode, new_dentry);
4087         return error;
4088 }
4089 EXPORT_SYMBOL(vfs_link);
4090
4091 /*
4092  * Hardlinks are often used in delicate situations.  We avoid
4093  * security-related surprises by not following symlinks on the
4094  * newname.  --KAB
4095  *
4096  * We don't follow them on the oldname either to be compatible
4097  * with linux 2.0, and to avoid hard-linking to directories
4098  * and other special files.  --ADM
4099  */
4100 SYSCALL_DEFINE5(linkat, int, olddfd, const char __user *, oldname,
4101                 int, newdfd, const char __user *, newname, int, flags)
4102 {
4103         struct dentry *new_dentry;
4104         struct path old_path, new_path;
4105         struct inode *delegated_inode = NULL;
4106         int how = 0;
4107         int error;
4108
4109         if ((flags & ~(AT_SYMLINK_FOLLOW | AT_EMPTY_PATH)) != 0)
4110                 return -EINVAL;
4111         /*
4112          * To use null names we require CAP_DAC_READ_SEARCH
4113          * This ensures that not everyone will be able to create
4114          * handlink using the passed filedescriptor.
4115          */
4116         if (flags & AT_EMPTY_PATH) {
4117                 if (!capable(CAP_DAC_READ_SEARCH))
4118                         return -ENOENT;
4119                 how = LOOKUP_EMPTY;
4120         }
4121
4122         if (flags & AT_SYMLINK_FOLLOW)
4123                 how |= LOOKUP_FOLLOW;
4124 retry:
4125         error = user_path_at(olddfd, oldname, how, &old_path);
4126         if (error)
4127                 return error;
4128
4129         new_dentry = user_path_create(newdfd, newname, &new_path,
4130                                         (how & LOOKUP_REVAL));
4131         error = PTR_ERR(new_dentry);
4132         if (IS_ERR(new_dentry))
4133                 goto out;
4134
4135         error = -EXDEV;
4136         if (old_path.mnt != new_path.mnt)
4137                 goto out_dput;
4138         error = may_linkat(&old_path);
4139         if (unlikely(error))
4140                 goto out_dput;
4141         error = security_path_link(old_path.dentry, &new_path, new_dentry);
4142         if (error)
4143                 goto out_dput;
4144         error = vfs_link(old_path.dentry, new_path.dentry->d_inode, new_dentry, &delegated_inode);
4145 out_dput:
4146         done_path_create(&new_path, new_dentry);
4147         if (delegated_inode) {
4148                 error = break_deleg_wait(&delegated_inode);
4149                 if (!error) {
4150                         path_put(&old_path);
4151                         goto retry;
4152                 }
4153         }
4154         if (retry_estale(error, how)) {
4155                 path_put(&old_path);
4156                 how |= LOOKUP_REVAL;
4157                 goto retry;
4158         }
4159 out:
4160         path_put(&old_path);
4161
4162         return error;
4163 }
4164
4165 SYSCALL_DEFINE2(link, const char __user *, oldname, const char __user *, newname)
4166 {
4167         return sys_linkat(AT_FDCWD, oldname, AT_FDCWD, newname, 0);
4168 }
4169
4170 /**
4171  * vfs_rename - rename a filesystem object
4172  * @old_dir:    parent of source
4173  * @old_dentry: source
4174  * @new_dir:    parent of destination
4175  * @new_dentry: destination
4176  * @delegated_inode: returns an inode needing a delegation break
4177  * @flags:      rename flags
4178  *
4179  * The caller must hold multiple mutexes--see lock_rename()).
4180  *
4181  * If vfs_rename discovers a delegation in need of breaking at either
4182  * the source or destination, it will return -EWOULDBLOCK and return a
4183  * reference to the inode in delegated_inode.  The caller should then
4184  * break the delegation and retry.  Because breaking a delegation may
4185  * take a long time, the caller should drop all locks before doing
4186  * so.
4187  *
4188  * Alternatively, a caller may pass NULL for delegated_inode.  This may
4189  * be appropriate for callers that expect the underlying filesystem not
4190  * to be NFS exported.
4191  *
4192  * The worst of all namespace operations - renaming directory. "Perverted"
4193  * doesn't even start to describe it. Somebody in UCB had a heck of a trip...
4194  * Problems:
4195  *      a) we can get into loop creation.
4196  *      b) race potential - two innocent renames can create a loop together.
4197  *         That's where 4.4 screws up. Current fix: serialization on
4198  *         sb->s_vfs_rename_mutex. We might be more accurate, but that's another
4199  *         story.
4200  *      c) we have to lock _four_ objects - parents and victim (if it exists),
4201  *         and source (if it is not a directory).
4202  *         And that - after we got ->i_mutex on parents (until then we don't know
4203  *         whether the target exists).  Solution: try to be smart with locking
4204  *         order for inodes.  We rely on the fact that tree topology may change
4205  *         only under ->s_vfs_rename_mutex _and_ that parent of the object we
4206  *         move will be locked.  Thus we can rank directories by the tree
4207  *         (ancestors first) and rank all non-directories after them.
4208  *         That works since everybody except rename does "lock parent, lookup,
4209  *         lock child" and rename is under ->s_vfs_rename_mutex.
4210  *         HOWEVER, it relies on the assumption that any object with ->lookup()
4211  *         has no more than 1 dentry.  If "hybrid" objects will ever appear,
4212  *         we'd better make sure that there's no link(2) for them.
4213  *      d) conversion from fhandle to dentry may come in the wrong moment - when
4214  *         we are removing the target. Solution: we will have to grab ->i_mutex
4215  *         in the fhandle_to_dentry code. [FIXME - current nfsfh.c relies on
4216  *         ->i_mutex on parents, which works but leads to some truly excessive
4217  *         locking].
4218  */
4219 int vfs_rename(struct inode *old_dir, struct dentry *old_dentry,
4220                struct inode *new_dir, struct dentry *new_dentry,
4221                struct inode **delegated_inode, unsigned int flags)
4222 {
4223         int error;
4224         bool is_dir = d_is_dir(old_dentry);
4225         const unsigned char *old_name;
4226         struct inode *source = old_dentry->d_inode;
4227         struct inode *target = new_dentry->d_inode;
4228         bool new_is_dir = false;
4229         unsigned max_links = new_dir->i_sb->s_max_links;
4230
4231         if (source == target)
4232                 return 0;
4233
4234         error = may_delete(old_dir, old_dentry, is_dir);
4235         if (error)
4236                 return error;
4237
4238         if (!target) {
4239                 error = may_create(new_dir, new_dentry);
4240         } else {
4241                 new_is_dir = d_is_dir(new_dentry);
4242
4243                 if (!(flags & RENAME_EXCHANGE))
4244                         error = may_delete(new_dir, new_dentry, is_dir);
4245                 else
4246                         error = may_delete(new_dir, new_dentry, new_is_dir);
4247         }
4248         if (error)
4249                 return error;
4250
4251         if (!old_dir->i_op->rename && !old_dir->i_op->rename2)
4252                 return -EPERM;
4253
4254         if (flags && !old_dir->i_op->rename2)
4255                 return -EINVAL;
4256
4257         /*
4258          * If we are going to change the parent - check write permissions,
4259          * we'll need to flip '..'.
4260          */
4261         if (new_dir != old_dir) {
4262                 if (is_dir) {
4263                         error = inode_permission(source, MAY_WRITE);
4264                         if (error)
4265                                 return error;
4266                 }
4267                 if ((flags & RENAME_EXCHANGE) && new_is_dir) {
4268                         error = inode_permission(target, MAY_WRITE);
4269                         if (error)
4270                                 return error;
4271                 }
4272         }
4273
4274         error = security_inode_rename(old_dir, old_dentry, new_dir, new_dentry,
4275                                       flags);
4276         if (error)
4277                 return error;
4278
4279         old_name = fsnotify_oldname_init(old_dentry->d_name.name);
4280         dget(new_dentry);
4281         if (!is_dir || (flags & RENAME_EXCHANGE))
4282                 lock_two_nondirectories(source, target);
4283         else if (target)
4284                 mutex_lock(&target->i_mutex);
4285
4286         error = -EBUSY;
4287         if (is_local_mountpoint(old_dentry) || is_local_mountpoint(new_dentry))
4288                 goto out;
4289
4290         if (max_links && new_dir != old_dir) {
4291                 error = -EMLINK;
4292                 if (is_dir && !new_is_dir && new_dir->i_nlink >= max_links)
4293                         goto out;
4294                 if ((flags & RENAME_EXCHANGE) && !is_dir && new_is_dir &&
4295                     old_dir->i_nlink >= max_links)
4296                         goto out;
4297         }
4298         if (is_dir && !(flags & RENAME_EXCHANGE) && target)
4299                 shrink_dcache_parent(new_dentry);
4300         if (!is_dir) {
4301                 error = try_break_deleg(source, delegated_inode);
4302                 if (error)
4303                         goto out;
4304         }
4305         if (target && !new_is_dir) {
4306                 error = try_break_deleg(target, delegated_inode);
4307                 if (error)
4308                         goto out;
4309         }
4310         if (!old_dir->i_op->rename2) {
4311                 error = old_dir->i_op->rename(old_dir, old_dentry,
4312                                               new_dir, new_dentry);
4313         } else {
4314                 WARN_ON(old_dir->i_op->rename != NULL);
4315                 error = old_dir->i_op->rename2(old_dir, old_dentry,
4316                                                new_dir, new_dentry, flags);
4317         }
4318         if (error)
4319                 goto out;
4320
4321         if (!(flags & RENAME_EXCHANGE) && target) {
4322                 if (is_dir)
4323                         target->i_flags |= S_DEAD;
4324                 dont_mount(new_dentry);
4325                 detach_mounts(new_dentry);
4326         }
4327         if (!(old_dir->i_sb->s_type->fs_flags & FS_RENAME_DOES_D_MOVE)) {
4328                 if (!(flags & RENAME_EXCHANGE))
4329                         d_move(old_dentry, new_dentry);
4330                 else
4331                         d_exchange(old_dentry, new_dentry);
4332         }
4333 out:
4334         if (!is_dir || (flags & RENAME_EXCHANGE))
4335                 unlock_two_nondirectories(source, target);
4336         else if (target)
4337                 mutex_unlock(&target->i_mutex);
4338         dput(new_dentry);
4339         if (!error) {
4340                 fsnotify_move(old_dir, new_dir, old_name, is_dir,
4341                               !(flags & RENAME_EXCHANGE) ? target : NULL, old_dentry);
4342                 if (flags & RENAME_EXCHANGE) {
4343                         fsnotify_move(new_dir, old_dir, old_dentry->d_name.name,
4344                                       new_is_dir, NULL, new_dentry);
4345                 }
4346         }
4347         fsnotify_oldname_free(old_name);
4348
4349         return error;
4350 }
4351 EXPORT_SYMBOL(vfs_rename);
4352
4353 SYSCALL_DEFINE5(renameat2, int, olddfd, const char __user *, oldname,
4354                 int, newdfd, const char __user *, newname, unsigned int, flags)
4355 {
4356         struct dentry *old_dentry, *new_dentry;
4357         struct dentry *trap;
4358         struct path old_path, new_path;
4359         struct qstr old_last, new_last;
4360         int old_type, new_type;
4361         struct inode *delegated_inode = NULL;
4362         struct filename *from;
4363         struct filename *to;
4364         unsigned int lookup_flags = 0, target_flags = LOOKUP_RENAME_TARGET;
4365         bool should_retry = false;
4366         int error;
4367
4368         if (flags & ~(RENAME_NOREPLACE | RENAME_EXCHANGE | RENAME_WHITEOUT))
4369                 return -EINVAL;
4370
4371         if ((flags & (RENAME_NOREPLACE | RENAME_WHITEOUT)) &&
4372             (flags & RENAME_EXCHANGE))
4373                 return -EINVAL;
4374
4375         if ((flags & RENAME_WHITEOUT) && !capable(CAP_MKNOD))
4376                 return -EPERM;
4377
4378         if (flags & RENAME_EXCHANGE)
4379                 target_flags = 0;
4380
4381 retry:
4382         from = user_path_parent(olddfd, oldname,
4383                                 &old_path, &old_last, &old_type, lookup_flags);
4384         if (IS_ERR(from)) {
4385                 error = PTR_ERR(from);
4386                 goto exit;
4387         }
4388
4389         to = user_path_parent(newdfd, newname,
4390                                 &new_path, &new_last, &new_type, lookup_flags);
4391         if (IS_ERR(to)) {
4392                 error = PTR_ERR(to);
4393                 goto exit1;
4394         }
4395
4396         error = -EXDEV;
4397         if (old_path.mnt != new_path.mnt)
4398                 goto exit2;
4399
4400         error = -EBUSY;
4401         if (old_type != LAST_NORM)
4402                 goto exit2;
4403
4404         if (flags & RENAME_NOREPLACE)
4405                 error = -EEXIST;
4406         if (new_type != LAST_NORM)
4407                 goto exit2;
4408
4409         error = mnt_want_write(old_path.mnt);
4410         if (error)
4411                 goto exit2;
4412
4413 retry_deleg:
4414         trap = lock_rename(new_path.dentry, old_path.dentry);
4415
4416         old_dentry = __lookup_hash(&old_last, old_path.dentry, lookup_flags);
4417         error = PTR_ERR(old_dentry);
4418         if (IS_ERR(old_dentry))
4419                 goto exit3;
4420         /* source must exist */
4421         error = -ENOENT;
4422         if (d_is_negative(old_dentry))
4423                 goto exit4;
4424         new_dentry = __lookup_hash(&new_last, new_path.dentry, lookup_flags | target_flags);
4425         error = PTR_ERR(new_dentry);
4426         if (IS_ERR(new_dentry))
4427                 goto exit4;
4428         error = -EEXIST;
4429         if ((flags & RENAME_NOREPLACE) && d_is_positive(new_dentry))
4430                 goto exit5;
4431         if (flags & RENAME_EXCHANGE) {
4432                 error = -ENOENT;
4433                 if (d_is_negative(new_dentry))
4434                         goto exit5;
4435
4436                 if (!d_is_dir(new_dentry)) {
4437                         error = -ENOTDIR;
4438                         if (new_last.name[new_last.len])
4439                                 goto exit5;
4440                 }
4441         }
4442         /* unless the source is a directory trailing slashes give -ENOTDIR */
4443         if (!d_is_dir(old_dentry)) {
4444                 error = -ENOTDIR;
4445                 if (old_last.name[old_last.len])
4446                         goto exit5;
4447                 if (!(flags & RENAME_EXCHANGE) && new_last.name[new_last.len])
4448                         goto exit5;
4449         }
4450         /* source should not be ancestor of target */
4451         error = -EINVAL;
4452         if (old_dentry == trap)
4453                 goto exit5;
4454         /* target should not be an ancestor of source */
4455         if (!(flags & RENAME_EXCHANGE))
4456                 error = -ENOTEMPTY;
4457         if (new_dentry == trap)
4458                 goto exit5;
4459
4460         error = security_path_rename(&old_path, old_dentry,
4461                                      &new_path, new_dentry, flags);
4462         if (error)
4463                 goto exit5;
4464         error = vfs_rename(old_path.dentry->d_inode, old_dentry,
4465                            new_path.dentry->d_inode, new_dentry,
4466                            &delegated_inode, flags);
4467 exit5:
4468         dput(new_dentry);
4469 exit4:
4470         dput(old_dentry);
4471 exit3:
4472         unlock_rename(new_path.dentry, old_path.dentry);
4473         if (delegated_inode) {
4474                 error = break_deleg_wait(&delegated_inode);
4475                 if (!error)
4476                         goto retry_deleg;
4477         }
4478         mnt_drop_write(old_path.mnt);
4479 exit2:
4480         if (retry_estale(error, lookup_flags))
4481                 should_retry = true;
4482         path_put(&new_path);
4483         putname(to);
4484 exit1:
4485         path_put(&old_path);
4486         putname(from);
4487         if (should_retry) {
4488                 should_retry = false;
4489                 lookup_flags |= LOOKUP_REVAL;
4490                 goto retry;
4491         }
4492 exit:
4493         return error;
4494 }
4495
4496 SYSCALL_DEFINE4(renameat, int, olddfd, const char __user *, oldname,
4497                 int, newdfd, const char __user *, newname)
4498 {
4499         return sys_renameat2(olddfd, oldname, newdfd, newname, 0);
4500 }
4501
4502 SYSCALL_DEFINE2(rename, const char __user *, oldname, const char __user *, newname)
4503 {
4504         return sys_renameat2(AT_FDCWD, oldname, AT_FDCWD, newname, 0);
4505 }
4506
4507 int vfs_whiteout(struct inode *dir, struct dentry *dentry)
4508 {
4509         int error = may_create(dir, dentry);
4510         if (error)
4511                 return error;
4512
4513         if (!dir->i_op->mknod)
4514                 return -EPERM;
4515
4516         return dir->i_op->mknod(dir, dentry,
4517                                 S_IFCHR | WHITEOUT_MODE, WHITEOUT_DEV);
4518 }
4519 EXPORT_SYMBOL(vfs_whiteout);
4520
4521 int readlink_copy(char __user *buffer, int buflen, const char *link)
4522 {
4523         int len = PTR_ERR(link);
4524         if (IS_ERR(link))
4525                 goto out;
4526
4527         len = strlen(link);
4528         if (len > (unsigned) buflen)
4529                 len = buflen;
4530         if (copy_to_user(buffer, link, len))
4531                 len = -EFAULT;
4532 out:
4533         return len;
4534 }
4535 EXPORT_SYMBOL(readlink_copy);
4536
4537 /*
4538  * A helper for ->readlink().  This should be used *ONLY* for symlinks that
4539  * have ->follow_link() touching nd only in nd_set_link().  Using (or not
4540  * using) it for any given inode is up to filesystem.
4541  */
4542 int generic_readlink(struct dentry *dentry, char __user *buffer, int buflen)
4543 {
4544         void *cookie;
4545         struct inode *inode = d_inode(dentry);
4546         const char *link = inode->i_link;
4547         int res;
4548
4549         if (!link) {
4550                 link = inode->i_op->follow_link(dentry, &cookie);
4551                 if (IS_ERR(link))
4552                         return PTR_ERR(link);
4553         }
4554         res = readlink_copy(buffer, buflen, link);
4555         if (inode->i_op->put_link)
4556                 inode->i_op->put_link(inode, cookie);
4557         return res;
4558 }
4559 EXPORT_SYMBOL(generic_readlink);
4560
4561 /* get the link contents into pagecache */
4562 static char *page_getlink(struct dentry * dentry, struct page **ppage)
4563 {
4564         char *kaddr;
4565         struct page *page;
4566         struct address_space *mapping = dentry->d_inode->i_mapping;
4567         page = read_mapping_page(mapping, 0, NULL);
4568         if (IS_ERR(page))
4569                 return (char*)page;
4570         *ppage = page;
4571         kaddr = kmap(page);
4572         nd_terminate_link(kaddr, dentry->d_inode->i_size, PAGE_SIZE - 1);
4573         return kaddr;
4574 }
4575
4576 int page_readlink(struct dentry *dentry, char __user *buffer, int buflen)
4577 {
4578         struct page *page = NULL;
4579         int res = readlink_copy(buffer, buflen, page_getlink(dentry, &page));
4580         if (page) {
4581                 kunmap(page);
4582                 page_cache_release(page);
4583         }
4584         return res;
4585 }
4586 EXPORT_SYMBOL(page_readlink);
4587
4588 const char *page_follow_link_light(struct dentry *dentry, void **cookie)
4589 {
4590         struct page *page = NULL;
4591         char *res = page_getlink(dentry, &page);
4592         if (!IS_ERR(res))
4593                 *cookie = page;
4594         return res;
4595 }
4596 EXPORT_SYMBOL(page_follow_link_light);
4597
4598 void page_put_link(struct inode *unused, void *cookie)
4599 {
4600         struct page *page = cookie;
4601         kunmap(page);
4602         page_cache_release(page);
4603 }
4604 EXPORT_SYMBOL(page_put_link);
4605
4606 /*
4607  * The nofs argument instructs pagecache_write_begin to pass AOP_FLAG_NOFS
4608  */
4609 int __page_symlink(struct inode *inode, const char *symname, int len, int nofs)
4610 {
4611         struct address_space *mapping = inode->i_mapping;
4612         struct page *page;
4613         void *fsdata;
4614         int err;
4615         char *kaddr;
4616         unsigned int flags = AOP_FLAG_UNINTERRUPTIBLE;
4617         if (nofs)
4618                 flags |= AOP_FLAG_NOFS;
4619
4620 retry:
4621         err = pagecache_write_begin(NULL, mapping, 0, len-1,
4622                                 flags, &page, &fsdata);
4623         if (err)
4624                 goto fail;
4625
4626         kaddr = kmap_atomic(page);
4627         memcpy(kaddr, symname, len-1);
4628         kunmap_atomic(kaddr);
4629
4630         err = pagecache_write_end(NULL, mapping, 0, len-1, len-1,
4631                                                         page, fsdata);
4632         if (err < 0)
4633                 goto fail;
4634         if (err < len-1)
4635                 goto retry;
4636
4637         mark_inode_dirty(inode);
4638         return 0;
4639 fail:
4640         return err;
4641 }
4642 EXPORT_SYMBOL(__page_symlink);
4643
4644 int page_symlink(struct inode *inode, const char *symname, int len)
4645 {
4646         return __page_symlink(inode, symname, len,
4647                         !(mapping_gfp_mask(inode->i_mapping) & __GFP_FS));
4648 }
4649 EXPORT_SYMBOL(page_symlink);
4650
4651 const struct inode_operations page_symlink_inode_operations = {
4652         .readlink       = generic_readlink,
4653         .follow_link    = page_follow_link_light,
4654         .put_link       = page_put_link,
4655 };
4656 EXPORT_SYMBOL(page_symlink_inode_operations);