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