Adding packet forward test cases involving multiple VMs
[kvmfornfv.git] / kernel / fs / namespace.c
1 /*
2  *  linux/fs/namespace.c
3  *
4  * (C) Copyright Al Viro 2000, 2001
5  *      Released under GPL v2.
6  *
7  * Based on code from fs/super.c, copyright Linus Torvalds and others.
8  * Heavily rewritten.
9  */
10
11 #include <linux/syscalls.h>
12 #include <linux/export.h>
13 #include <linux/capability.h>
14 #include <linux/mnt_namespace.h>
15 #include <linux/user_namespace.h>
16 #include <linux/namei.h>
17 #include <linux/delay.h>
18 #include <linux/security.h>
19 #include <linux/idr.h>
20 #include <linux/init.h>         /* init_rootfs */
21 #include <linux/fs_struct.h>    /* get_fs_root et.al. */
22 #include <linux/fsnotify.h>     /* fsnotify_vfsmount_delete */
23 #include <linux/uaccess.h>
24 #include <linux/proc_ns.h>
25 #include <linux/magic.h>
26 #include <linux/bootmem.h>
27 #include <linux/task_work.h>
28 #include "pnode.h"
29 #include "internal.h"
30
31 static unsigned int m_hash_mask __read_mostly;
32 static unsigned int m_hash_shift __read_mostly;
33 static unsigned int mp_hash_mask __read_mostly;
34 static unsigned int mp_hash_shift __read_mostly;
35
36 static __initdata unsigned long mhash_entries;
37 static int __init set_mhash_entries(char *str)
38 {
39         if (!str)
40                 return 0;
41         mhash_entries = simple_strtoul(str, &str, 0);
42         return 1;
43 }
44 __setup("mhash_entries=", set_mhash_entries);
45
46 static __initdata unsigned long mphash_entries;
47 static int __init set_mphash_entries(char *str)
48 {
49         if (!str)
50                 return 0;
51         mphash_entries = simple_strtoul(str, &str, 0);
52         return 1;
53 }
54 __setup("mphash_entries=", set_mphash_entries);
55
56 static u64 event;
57 static DEFINE_IDA(mnt_id_ida);
58 static DEFINE_IDA(mnt_group_ida);
59 static DEFINE_SPINLOCK(mnt_id_lock);
60 static int mnt_id_start = 0;
61 static int mnt_group_start = 1;
62
63 static struct hlist_head *mount_hashtable __read_mostly;
64 static struct hlist_head *mountpoint_hashtable __read_mostly;
65 static struct kmem_cache *mnt_cache __read_mostly;
66 static DECLARE_RWSEM(namespace_sem);
67
68 /* /sys/fs */
69 struct kobject *fs_kobj;
70 EXPORT_SYMBOL_GPL(fs_kobj);
71
72 /*
73  * vfsmount lock may be taken for read to prevent changes to the
74  * vfsmount hash, ie. during mountpoint lookups or walking back
75  * up the tree.
76  *
77  * It should be taken for write in all cases where the vfsmount
78  * tree or hash is modified or when a vfsmount structure is modified.
79  */
80 __cacheline_aligned_in_smp DEFINE_SEQLOCK(mount_lock);
81
82 static inline struct hlist_head *m_hash(struct vfsmount *mnt, struct dentry *dentry)
83 {
84         unsigned long tmp = ((unsigned long)mnt / L1_CACHE_BYTES);
85         tmp += ((unsigned long)dentry / L1_CACHE_BYTES);
86         tmp = tmp + (tmp >> m_hash_shift);
87         return &mount_hashtable[tmp & m_hash_mask];
88 }
89
90 static inline struct hlist_head *mp_hash(struct dentry *dentry)
91 {
92         unsigned long tmp = ((unsigned long)dentry / L1_CACHE_BYTES);
93         tmp = tmp + (tmp >> mp_hash_shift);
94         return &mountpoint_hashtable[tmp & mp_hash_mask];
95 }
96
97 /*
98  * allocation is serialized by namespace_sem, but we need the spinlock to
99  * serialize with freeing.
100  */
101 static int mnt_alloc_id(struct mount *mnt)
102 {
103         int res;
104
105 retry:
106         ida_pre_get(&mnt_id_ida, GFP_KERNEL);
107         spin_lock(&mnt_id_lock);
108         res = ida_get_new_above(&mnt_id_ida, mnt_id_start, &mnt->mnt_id);
109         if (!res)
110                 mnt_id_start = mnt->mnt_id + 1;
111         spin_unlock(&mnt_id_lock);
112         if (res == -EAGAIN)
113                 goto retry;
114
115         return res;
116 }
117
118 static void mnt_free_id(struct mount *mnt)
119 {
120         int id = mnt->mnt_id;
121         spin_lock(&mnt_id_lock);
122         ida_remove(&mnt_id_ida, id);
123         if (mnt_id_start > id)
124                 mnt_id_start = id;
125         spin_unlock(&mnt_id_lock);
126 }
127
128 /*
129  * Allocate a new peer group ID
130  *
131  * mnt_group_ida is protected by namespace_sem
132  */
133 static int mnt_alloc_group_id(struct mount *mnt)
134 {
135         int res;
136
137         if (!ida_pre_get(&mnt_group_ida, GFP_KERNEL))
138                 return -ENOMEM;
139
140         res = ida_get_new_above(&mnt_group_ida,
141                                 mnt_group_start,
142                                 &mnt->mnt_group_id);
143         if (!res)
144                 mnt_group_start = mnt->mnt_group_id + 1;
145
146         return res;
147 }
148
149 /*
150  * Release a peer group ID
151  */
152 void mnt_release_group_id(struct mount *mnt)
153 {
154         int id = mnt->mnt_group_id;
155         ida_remove(&mnt_group_ida, id);
156         if (mnt_group_start > id)
157                 mnt_group_start = id;
158         mnt->mnt_group_id = 0;
159 }
160
161 /*
162  * vfsmount lock must be held for read
163  */
164 static inline void mnt_add_count(struct mount *mnt, int n)
165 {
166 #ifdef CONFIG_SMP
167         this_cpu_add(mnt->mnt_pcp->mnt_count, n);
168 #else
169         preempt_disable();
170         mnt->mnt_count += n;
171         preempt_enable();
172 #endif
173 }
174
175 /*
176  * vfsmount lock must be held for write
177  */
178 unsigned int mnt_get_count(struct mount *mnt)
179 {
180 #ifdef CONFIG_SMP
181         unsigned int count = 0;
182         int cpu;
183
184         for_each_possible_cpu(cpu) {
185                 count += per_cpu_ptr(mnt->mnt_pcp, cpu)->mnt_count;
186         }
187
188         return count;
189 #else
190         return mnt->mnt_count;
191 #endif
192 }
193
194 static void drop_mountpoint(struct fs_pin *p)
195 {
196         struct mount *m = container_of(p, struct mount, mnt_umount);
197         dput(m->mnt_ex_mountpoint);
198         pin_remove(p);
199         mntput(&m->mnt);
200 }
201
202 static struct mount *alloc_vfsmnt(const char *name)
203 {
204         struct mount *mnt = kmem_cache_zalloc(mnt_cache, GFP_KERNEL);
205         if (mnt) {
206                 int err;
207
208                 err = mnt_alloc_id(mnt);
209                 if (err)
210                         goto out_free_cache;
211
212                 if (name) {
213                         mnt->mnt_devname = kstrdup_const(name, GFP_KERNEL);
214                         if (!mnt->mnt_devname)
215                                 goto out_free_id;
216                 }
217
218 #ifdef CONFIG_SMP
219                 mnt->mnt_pcp = alloc_percpu(struct mnt_pcp);
220                 if (!mnt->mnt_pcp)
221                         goto out_free_devname;
222
223                 this_cpu_add(mnt->mnt_pcp->mnt_count, 1);
224 #else
225                 mnt->mnt_count = 1;
226                 mnt->mnt_writers = 0;
227 #endif
228
229                 INIT_HLIST_NODE(&mnt->mnt_hash);
230                 INIT_LIST_HEAD(&mnt->mnt_child);
231                 INIT_LIST_HEAD(&mnt->mnt_mounts);
232                 INIT_LIST_HEAD(&mnt->mnt_list);
233                 INIT_LIST_HEAD(&mnt->mnt_expire);
234                 INIT_LIST_HEAD(&mnt->mnt_share);
235                 INIT_LIST_HEAD(&mnt->mnt_slave_list);
236                 INIT_LIST_HEAD(&mnt->mnt_slave);
237                 INIT_HLIST_NODE(&mnt->mnt_mp_list);
238 #ifdef CONFIG_FSNOTIFY
239                 INIT_HLIST_HEAD(&mnt->mnt_fsnotify_marks);
240 #endif
241                 init_fs_pin(&mnt->mnt_umount, drop_mountpoint);
242         }
243         return mnt;
244
245 #ifdef CONFIG_SMP
246 out_free_devname:
247         kfree_const(mnt->mnt_devname);
248 #endif
249 out_free_id:
250         mnt_free_id(mnt);
251 out_free_cache:
252         kmem_cache_free(mnt_cache, mnt);
253         return NULL;
254 }
255
256 /*
257  * Most r/o checks on a fs are for operations that take
258  * discrete amounts of time, like a write() or unlink().
259  * We must keep track of when those operations start
260  * (for permission checks) and when they end, so that
261  * we can determine when writes are able to occur to
262  * a filesystem.
263  */
264 /*
265  * __mnt_is_readonly: check whether a mount is read-only
266  * @mnt: the mount to check for its write status
267  *
268  * This shouldn't be used directly ouside of the VFS.
269  * It does not guarantee that the filesystem will stay
270  * r/w, just that it is right *now*.  This can not and
271  * should not be used in place of IS_RDONLY(inode).
272  * mnt_want/drop_write() will _keep_ the filesystem
273  * r/w.
274  */
275 int __mnt_is_readonly(struct vfsmount *mnt)
276 {
277         if (mnt->mnt_flags & MNT_READONLY)
278                 return 1;
279         if (mnt->mnt_sb->s_flags & MS_RDONLY)
280                 return 1;
281         return 0;
282 }
283 EXPORT_SYMBOL_GPL(__mnt_is_readonly);
284
285 static inline void mnt_inc_writers(struct mount *mnt)
286 {
287 #ifdef CONFIG_SMP
288         this_cpu_inc(mnt->mnt_pcp->mnt_writers);
289 #else
290         mnt->mnt_writers++;
291 #endif
292 }
293
294 static inline void mnt_dec_writers(struct mount *mnt)
295 {
296 #ifdef CONFIG_SMP
297         this_cpu_dec(mnt->mnt_pcp->mnt_writers);
298 #else
299         mnt->mnt_writers--;
300 #endif
301 }
302
303 static unsigned int mnt_get_writers(struct mount *mnt)
304 {
305 #ifdef CONFIG_SMP
306         unsigned int count = 0;
307         int cpu;
308
309         for_each_possible_cpu(cpu) {
310                 count += per_cpu_ptr(mnt->mnt_pcp, cpu)->mnt_writers;
311         }
312
313         return count;
314 #else
315         return mnt->mnt_writers;
316 #endif
317 }
318
319 static int mnt_is_readonly(struct vfsmount *mnt)
320 {
321         if (mnt->mnt_sb->s_readonly_remount)
322                 return 1;
323         /* Order wrt setting s_flags/s_readonly_remount in do_remount() */
324         smp_rmb();
325         return __mnt_is_readonly(mnt);
326 }
327
328 /*
329  * Most r/o & frozen checks on a fs are for operations that take discrete
330  * amounts of time, like a write() or unlink().  We must keep track of when
331  * those operations start (for permission checks) and when they end, so that we
332  * can determine when writes are able to occur to a filesystem.
333  */
334 /**
335  * __mnt_want_write - get write access to a mount without freeze protection
336  * @m: the mount on which to take a write
337  *
338  * This tells the low-level filesystem that a write is about to be performed to
339  * it, and makes sure that writes are allowed (mnt it read-write) before
340  * returning success. This operation does not protect against filesystem being
341  * frozen. When the write operation is finished, __mnt_drop_write() must be
342  * called. This is effectively a refcount.
343  */
344 int __mnt_want_write(struct vfsmount *m)
345 {
346         struct mount *mnt = real_mount(m);
347         int ret = 0;
348
349         preempt_disable();
350         mnt_inc_writers(mnt);
351         /*
352          * The store to mnt_inc_writers must be visible before we pass
353          * MNT_WRITE_HOLD loop below, so that the slowpath can see our
354          * incremented count after it has set MNT_WRITE_HOLD.
355          */
356         smp_mb();
357         while (ACCESS_ONCE(mnt->mnt.mnt_flags) & MNT_WRITE_HOLD) {
358                 preempt_enable();
359                 cpu_chill();
360                 preempt_disable();
361         }
362         /*
363          * After the slowpath clears MNT_WRITE_HOLD, mnt_is_readonly will
364          * be set to match its requirements. So we must not load that until
365          * MNT_WRITE_HOLD is cleared.
366          */
367         smp_rmb();
368         if (mnt_is_readonly(m)) {
369                 mnt_dec_writers(mnt);
370                 ret = -EROFS;
371         }
372         preempt_enable();
373
374         return ret;
375 }
376
377 /**
378  * mnt_want_write - get write access to a mount
379  * @m: the mount on which to take a write
380  *
381  * This tells the low-level filesystem that a write is about to be performed to
382  * it, and makes sure that writes are allowed (mount is read-write, filesystem
383  * is not frozen) before returning success.  When the write operation is
384  * finished, mnt_drop_write() must be called.  This is effectively a refcount.
385  */
386 int mnt_want_write(struct vfsmount *m)
387 {
388         int ret;
389
390         sb_start_write(m->mnt_sb);
391         ret = __mnt_want_write(m);
392         if (ret)
393                 sb_end_write(m->mnt_sb);
394         return ret;
395 }
396 EXPORT_SYMBOL_GPL(mnt_want_write);
397
398 /**
399  * mnt_clone_write - get write access to a mount
400  * @mnt: the mount on which to take a write
401  *
402  * This is effectively like mnt_want_write, except
403  * it must only be used to take an extra write reference
404  * on a mountpoint that we already know has a write reference
405  * on it. This allows some optimisation.
406  *
407  * After finished, mnt_drop_write must be called as usual to
408  * drop the reference.
409  */
410 int mnt_clone_write(struct vfsmount *mnt)
411 {
412         /* superblock may be r/o */
413         if (__mnt_is_readonly(mnt))
414                 return -EROFS;
415         preempt_disable();
416         mnt_inc_writers(real_mount(mnt));
417         preempt_enable();
418         return 0;
419 }
420 EXPORT_SYMBOL_GPL(mnt_clone_write);
421
422 /**
423  * __mnt_want_write_file - get write access to a file's mount
424  * @file: the file who's mount on which to take a write
425  *
426  * This is like __mnt_want_write, but it takes a file and can
427  * do some optimisations if the file is open for write already
428  */
429 int __mnt_want_write_file(struct file *file)
430 {
431         if (!(file->f_mode & FMODE_WRITER))
432                 return __mnt_want_write(file->f_path.mnt);
433         else
434                 return mnt_clone_write(file->f_path.mnt);
435 }
436
437 /**
438  * mnt_want_write_file - get write access to a file's mount
439  * @file: the file who's mount on which to take a write
440  *
441  * This is like mnt_want_write, but it takes a file and can
442  * do some optimisations if the file is open for write already
443  */
444 int mnt_want_write_file(struct file *file)
445 {
446         int ret;
447
448         sb_start_write(file->f_path.mnt->mnt_sb);
449         ret = __mnt_want_write_file(file);
450         if (ret)
451                 sb_end_write(file->f_path.mnt->mnt_sb);
452         return ret;
453 }
454 EXPORT_SYMBOL_GPL(mnt_want_write_file);
455
456 /**
457  * __mnt_drop_write - give up write access to a mount
458  * @mnt: the mount on which to give up write access
459  *
460  * Tells the low-level filesystem that we are done
461  * performing writes to it.  Must be matched with
462  * __mnt_want_write() call above.
463  */
464 void __mnt_drop_write(struct vfsmount *mnt)
465 {
466         preempt_disable();
467         mnt_dec_writers(real_mount(mnt));
468         preempt_enable();
469 }
470
471 /**
472  * mnt_drop_write - give up write access to a mount
473  * @mnt: the mount on which to give up write access
474  *
475  * Tells the low-level filesystem that we are done performing writes to it and
476  * also allows filesystem to be frozen again.  Must be matched with
477  * mnt_want_write() call above.
478  */
479 void mnt_drop_write(struct vfsmount *mnt)
480 {
481         __mnt_drop_write(mnt);
482         sb_end_write(mnt->mnt_sb);
483 }
484 EXPORT_SYMBOL_GPL(mnt_drop_write);
485
486 void __mnt_drop_write_file(struct file *file)
487 {
488         __mnt_drop_write(file->f_path.mnt);
489 }
490
491 void mnt_drop_write_file(struct file *file)
492 {
493         mnt_drop_write(file->f_path.mnt);
494 }
495 EXPORT_SYMBOL(mnt_drop_write_file);
496
497 static int mnt_make_readonly(struct mount *mnt)
498 {
499         int ret = 0;
500
501         lock_mount_hash();
502         mnt->mnt.mnt_flags |= MNT_WRITE_HOLD;
503         /*
504          * After storing MNT_WRITE_HOLD, we'll read the counters. This store
505          * should be visible before we do.
506          */
507         smp_mb();
508
509         /*
510          * With writers on hold, if this value is zero, then there are
511          * definitely no active writers (although held writers may subsequently
512          * increment the count, they'll have to wait, and decrement it after
513          * seeing MNT_READONLY).
514          *
515          * It is OK to have counter incremented on one CPU and decremented on
516          * another: the sum will add up correctly. The danger would be when we
517          * sum up each counter, if we read a counter before it is incremented,
518          * but then read another CPU's count which it has been subsequently
519          * decremented from -- we would see more decrements than we should.
520          * MNT_WRITE_HOLD protects against this scenario, because
521          * mnt_want_write first increments count, then smp_mb, then spins on
522          * MNT_WRITE_HOLD, so it can't be decremented by another CPU while
523          * we're counting up here.
524          */
525         if (mnt_get_writers(mnt) > 0)
526                 ret = -EBUSY;
527         else
528                 mnt->mnt.mnt_flags |= MNT_READONLY;
529         /*
530          * MNT_READONLY must become visible before ~MNT_WRITE_HOLD, so writers
531          * that become unheld will see MNT_READONLY.
532          */
533         smp_wmb();
534         mnt->mnt.mnt_flags &= ~MNT_WRITE_HOLD;
535         unlock_mount_hash();
536         return ret;
537 }
538
539 static void __mnt_unmake_readonly(struct mount *mnt)
540 {
541         lock_mount_hash();
542         mnt->mnt.mnt_flags &= ~MNT_READONLY;
543         unlock_mount_hash();
544 }
545
546 int sb_prepare_remount_readonly(struct super_block *sb)
547 {
548         struct mount *mnt;
549         int err = 0;
550
551         /* Racy optimization.  Recheck the counter under MNT_WRITE_HOLD */
552         if (atomic_long_read(&sb->s_remove_count))
553                 return -EBUSY;
554
555         lock_mount_hash();
556         list_for_each_entry(mnt, &sb->s_mounts, mnt_instance) {
557                 if (!(mnt->mnt.mnt_flags & MNT_READONLY)) {
558                         mnt->mnt.mnt_flags |= MNT_WRITE_HOLD;
559                         smp_mb();
560                         if (mnt_get_writers(mnt) > 0) {
561                                 err = -EBUSY;
562                                 break;
563                         }
564                 }
565         }
566         if (!err && atomic_long_read(&sb->s_remove_count))
567                 err = -EBUSY;
568
569         if (!err) {
570                 sb->s_readonly_remount = 1;
571                 smp_wmb();
572         }
573         list_for_each_entry(mnt, &sb->s_mounts, mnt_instance) {
574                 if (mnt->mnt.mnt_flags & MNT_WRITE_HOLD)
575                         mnt->mnt.mnt_flags &= ~MNT_WRITE_HOLD;
576         }
577         unlock_mount_hash();
578
579         return err;
580 }
581
582 static void free_vfsmnt(struct mount *mnt)
583 {
584         kfree_const(mnt->mnt_devname);
585 #ifdef CONFIG_SMP
586         free_percpu(mnt->mnt_pcp);
587 #endif
588         kmem_cache_free(mnt_cache, mnt);
589 }
590
591 static void delayed_free_vfsmnt(struct rcu_head *head)
592 {
593         free_vfsmnt(container_of(head, struct mount, mnt_rcu));
594 }
595
596 /* call under rcu_read_lock */
597 int __legitimize_mnt(struct vfsmount *bastard, unsigned seq)
598 {
599         struct mount *mnt;
600         if (read_seqretry(&mount_lock, seq))
601                 return 1;
602         if (bastard == NULL)
603                 return 0;
604         mnt = real_mount(bastard);
605         mnt_add_count(mnt, 1);
606         if (likely(!read_seqretry(&mount_lock, seq)))
607                 return 0;
608         if (bastard->mnt_flags & MNT_SYNC_UMOUNT) {
609                 mnt_add_count(mnt, -1);
610                 return 1;
611         }
612         return -1;
613 }
614
615 /* call under rcu_read_lock */
616 bool legitimize_mnt(struct vfsmount *bastard, unsigned seq)
617 {
618         int res = __legitimize_mnt(bastard, seq);
619         if (likely(!res))
620                 return true;
621         if (unlikely(res < 0)) {
622                 rcu_read_unlock();
623                 mntput(bastard);
624                 rcu_read_lock();
625         }
626         return false;
627 }
628
629 /*
630  * find the first mount at @dentry on vfsmount @mnt.
631  * call under rcu_read_lock()
632  */
633 struct mount *__lookup_mnt(struct vfsmount *mnt, struct dentry *dentry)
634 {
635         struct hlist_head *head = m_hash(mnt, dentry);
636         struct mount *p;
637
638         hlist_for_each_entry_rcu(p, head, mnt_hash)
639                 if (&p->mnt_parent->mnt == mnt && p->mnt_mountpoint == dentry)
640                         return p;
641         return NULL;
642 }
643
644 /*
645  * find the last mount at @dentry on vfsmount @mnt.
646  * mount_lock must be held.
647  */
648 struct mount *__lookup_mnt_last(struct vfsmount *mnt, struct dentry *dentry)
649 {
650         struct mount *p, *res = NULL;
651         p = __lookup_mnt(mnt, dentry);
652         if (!p)
653                 goto out;
654         if (!(p->mnt.mnt_flags & MNT_UMOUNT))
655                 res = p;
656         hlist_for_each_entry_continue(p, mnt_hash) {
657                 if (&p->mnt_parent->mnt != mnt || p->mnt_mountpoint != dentry)
658                         break;
659                 if (!(p->mnt.mnt_flags & MNT_UMOUNT))
660                         res = p;
661         }
662 out:
663         return res;
664 }
665
666 /*
667  * lookup_mnt - Return the first child mount mounted at path
668  *
669  * "First" means first mounted chronologically.  If you create the
670  * following mounts:
671  *
672  * mount /dev/sda1 /mnt
673  * mount /dev/sda2 /mnt
674  * mount /dev/sda3 /mnt
675  *
676  * Then lookup_mnt() on the base /mnt dentry in the root mount will
677  * return successively the root dentry and vfsmount of /dev/sda1, then
678  * /dev/sda2, then /dev/sda3, then NULL.
679  *
680  * lookup_mnt takes a reference to the found vfsmount.
681  */
682 struct vfsmount *lookup_mnt(struct path *path)
683 {
684         struct mount *child_mnt;
685         struct vfsmount *m;
686         unsigned seq;
687
688         rcu_read_lock();
689         do {
690                 seq = read_seqbegin(&mount_lock);
691                 child_mnt = __lookup_mnt(path->mnt, path->dentry);
692                 m = child_mnt ? &child_mnt->mnt : NULL;
693         } while (!legitimize_mnt(m, seq));
694         rcu_read_unlock();
695         return m;
696 }
697
698 /*
699  * __is_local_mountpoint - Test to see if dentry is a mountpoint in the
700  *                         current mount namespace.
701  *
702  * The common case is dentries are not mountpoints at all and that
703  * test is handled inline.  For the slow case when we are actually
704  * dealing with a mountpoint of some kind, walk through all of the
705  * mounts in the current mount namespace and test to see if the dentry
706  * is a mountpoint.
707  *
708  * The mount_hashtable is not usable in the context because we
709  * need to identify all mounts that may be in the current mount
710  * namespace not just a mount that happens to have some specified
711  * parent mount.
712  */
713 bool __is_local_mountpoint(struct dentry *dentry)
714 {
715         struct mnt_namespace *ns = current->nsproxy->mnt_ns;
716         struct mount *mnt;
717         bool is_covered = false;
718
719         if (!d_mountpoint(dentry))
720                 goto out;
721
722         down_read(&namespace_sem);
723         list_for_each_entry(mnt, &ns->list, mnt_list) {
724                 is_covered = (mnt->mnt_mountpoint == dentry);
725                 if (is_covered)
726                         break;
727         }
728         up_read(&namespace_sem);
729 out:
730         return is_covered;
731 }
732
733 static struct mountpoint *lookup_mountpoint(struct dentry *dentry)
734 {
735         struct hlist_head *chain = mp_hash(dentry);
736         struct mountpoint *mp;
737
738         hlist_for_each_entry(mp, chain, m_hash) {
739                 if (mp->m_dentry == dentry) {
740                         /* might be worth a WARN_ON() */
741                         if (d_unlinked(dentry))
742                                 return ERR_PTR(-ENOENT);
743                         mp->m_count++;
744                         return mp;
745                 }
746         }
747         return NULL;
748 }
749
750 static struct mountpoint *get_mountpoint(struct dentry *dentry)
751 {
752         struct mountpoint *mp, *new = NULL;
753         int ret;
754
755         if (d_mountpoint(dentry)) {
756 mountpoint:
757                 read_seqlock_excl(&mount_lock);
758                 mp = lookup_mountpoint(dentry);
759                 read_sequnlock_excl(&mount_lock);
760                 if (mp)
761                         goto done;
762         }
763
764         if (!new)
765                 new = kmalloc(sizeof(struct mountpoint), GFP_KERNEL);
766         if (!new)
767                 return ERR_PTR(-ENOMEM);
768
769
770         /* Exactly one processes may set d_mounted */
771         ret = d_set_mounted(dentry);
772
773         /* Someone else set d_mounted? */
774         if (ret == -EBUSY)
775                 goto mountpoint;
776
777         /* The dentry is not available as a mountpoint? */
778         mp = ERR_PTR(ret);
779         if (ret)
780                 goto done;
781
782         /* Add the new mountpoint to the hash table */
783         read_seqlock_excl(&mount_lock);
784         new->m_dentry = dentry;
785         new->m_count = 1;
786         hlist_add_head(&new->m_hash, mp_hash(dentry));
787         INIT_HLIST_HEAD(&new->m_list);
788         read_sequnlock_excl(&mount_lock);
789
790         mp = new;
791         new = NULL;
792 done:
793         kfree(new);
794         return mp;
795 }
796
797 static void put_mountpoint(struct mountpoint *mp)
798 {
799         if (!--mp->m_count) {
800                 struct dentry *dentry = mp->m_dentry;
801                 BUG_ON(!hlist_empty(&mp->m_list));
802                 spin_lock(&dentry->d_lock);
803                 dentry->d_flags &= ~DCACHE_MOUNTED;
804                 spin_unlock(&dentry->d_lock);
805                 hlist_del(&mp->m_hash);
806                 kfree(mp);
807         }
808 }
809
810 static inline int check_mnt(struct mount *mnt)
811 {
812         return mnt->mnt_ns == current->nsproxy->mnt_ns;
813 }
814
815 /*
816  * vfsmount lock must be held for write
817  */
818 static void touch_mnt_namespace(struct mnt_namespace *ns)
819 {
820         if (ns) {
821                 ns->event = ++event;
822                 wake_up_interruptible(&ns->poll);
823         }
824 }
825
826 /*
827  * vfsmount lock must be held for write
828  */
829 static void __touch_mnt_namespace(struct mnt_namespace *ns)
830 {
831         if (ns && ns->event != event) {
832                 ns->event = event;
833                 wake_up_interruptible(&ns->poll);
834         }
835 }
836
837 /*
838  * vfsmount lock must be held for write
839  */
840 static void unhash_mnt(struct mount *mnt)
841 {
842         mnt->mnt_parent = mnt;
843         mnt->mnt_mountpoint = mnt->mnt.mnt_root;
844         list_del_init(&mnt->mnt_child);
845         hlist_del_init_rcu(&mnt->mnt_hash);
846         hlist_del_init(&mnt->mnt_mp_list);
847         put_mountpoint(mnt->mnt_mp);
848         mnt->mnt_mp = NULL;
849 }
850
851 /*
852  * vfsmount lock must be held for write
853  */
854 static void detach_mnt(struct mount *mnt, struct path *old_path)
855 {
856         old_path->dentry = mnt->mnt_mountpoint;
857         old_path->mnt = &mnt->mnt_parent->mnt;
858         unhash_mnt(mnt);
859 }
860
861 /*
862  * vfsmount lock must be held for write
863  */
864 static void umount_mnt(struct mount *mnt)
865 {
866         /* old mountpoint will be dropped when we can do that */
867         mnt->mnt_ex_mountpoint = mnt->mnt_mountpoint;
868         unhash_mnt(mnt);
869 }
870
871 /*
872  * vfsmount lock must be held for write
873  */
874 void mnt_set_mountpoint(struct mount *mnt,
875                         struct mountpoint *mp,
876                         struct mount *child_mnt)
877 {
878         mp->m_count++;
879         mnt_add_count(mnt, 1);  /* essentially, that's mntget */
880         child_mnt->mnt_mountpoint = dget(mp->m_dentry);
881         child_mnt->mnt_parent = mnt;
882         child_mnt->mnt_mp = mp;
883         hlist_add_head(&child_mnt->mnt_mp_list, &mp->m_list);
884 }
885
886 /*
887  * vfsmount lock must be held for write
888  */
889 static void attach_mnt(struct mount *mnt,
890                         struct mount *parent,
891                         struct mountpoint *mp)
892 {
893         mnt_set_mountpoint(parent, mp, mnt);
894         hlist_add_head_rcu(&mnt->mnt_hash, m_hash(&parent->mnt, mp->m_dentry));
895         list_add_tail(&mnt->mnt_child, &parent->mnt_mounts);
896 }
897
898 static void attach_shadowed(struct mount *mnt,
899                         struct mount *parent,
900                         struct mount *shadows)
901 {
902         if (shadows) {
903                 hlist_add_behind_rcu(&mnt->mnt_hash, &shadows->mnt_hash);
904                 list_add(&mnt->mnt_child, &shadows->mnt_child);
905         } else {
906                 hlist_add_head_rcu(&mnt->mnt_hash,
907                                 m_hash(&parent->mnt, mnt->mnt_mountpoint));
908                 list_add_tail(&mnt->mnt_child, &parent->mnt_mounts);
909         }
910 }
911
912 /*
913  * vfsmount lock must be held for write
914  */
915 static void commit_tree(struct mount *mnt, struct mount *shadows)
916 {
917         struct mount *parent = mnt->mnt_parent;
918         struct mount *m;
919         LIST_HEAD(head);
920         struct mnt_namespace *n = parent->mnt_ns;
921
922         BUG_ON(parent == mnt);
923
924         list_add_tail(&head, &mnt->mnt_list);
925         list_for_each_entry(m, &head, mnt_list)
926                 m->mnt_ns = n;
927
928         list_splice(&head, n->list.prev);
929
930         attach_shadowed(mnt, parent, shadows);
931         touch_mnt_namespace(n);
932 }
933
934 static struct mount *next_mnt(struct mount *p, struct mount *root)
935 {
936         struct list_head *next = p->mnt_mounts.next;
937         if (next == &p->mnt_mounts) {
938                 while (1) {
939                         if (p == root)
940                                 return NULL;
941                         next = p->mnt_child.next;
942                         if (next != &p->mnt_parent->mnt_mounts)
943                                 break;
944                         p = p->mnt_parent;
945                 }
946         }
947         return list_entry(next, struct mount, mnt_child);
948 }
949
950 static struct mount *skip_mnt_tree(struct mount *p)
951 {
952         struct list_head *prev = p->mnt_mounts.prev;
953         while (prev != &p->mnt_mounts) {
954                 p = list_entry(prev, struct mount, mnt_child);
955                 prev = p->mnt_mounts.prev;
956         }
957         return p;
958 }
959
960 struct vfsmount *
961 vfs_kern_mount(struct file_system_type *type, int flags, const char *name, void *data)
962 {
963         struct mount *mnt;
964         struct dentry *root;
965
966         if (!type)
967                 return ERR_PTR(-ENODEV);
968
969         mnt = alloc_vfsmnt(name);
970         if (!mnt)
971                 return ERR_PTR(-ENOMEM);
972
973         if (flags & MS_KERNMOUNT)
974                 mnt->mnt.mnt_flags = MNT_INTERNAL;
975
976         root = mount_fs(type, flags, name, data);
977         if (IS_ERR(root)) {
978                 mnt_free_id(mnt);
979                 free_vfsmnt(mnt);
980                 return ERR_CAST(root);
981         }
982
983         mnt->mnt.mnt_root = root;
984         mnt->mnt.mnt_sb = root->d_sb;
985         mnt->mnt_mountpoint = mnt->mnt.mnt_root;
986         mnt->mnt_parent = mnt;
987         lock_mount_hash();
988         list_add_tail(&mnt->mnt_instance, &root->d_sb->s_mounts);
989         unlock_mount_hash();
990         return &mnt->mnt;
991 }
992 EXPORT_SYMBOL_GPL(vfs_kern_mount);
993
994 static struct mount *clone_mnt(struct mount *old, struct dentry *root,
995                                         int flag)
996 {
997         struct super_block *sb = old->mnt.mnt_sb;
998         struct mount *mnt;
999         int err;
1000
1001         mnt = alloc_vfsmnt(old->mnt_devname);
1002         if (!mnt)
1003                 return ERR_PTR(-ENOMEM);
1004
1005         if (flag & (CL_SLAVE | CL_PRIVATE | CL_SHARED_TO_SLAVE))
1006                 mnt->mnt_group_id = 0; /* not a peer of original */
1007         else
1008                 mnt->mnt_group_id = old->mnt_group_id;
1009
1010         if ((flag & CL_MAKE_SHARED) && !mnt->mnt_group_id) {
1011                 err = mnt_alloc_group_id(mnt);
1012                 if (err)
1013                         goto out_free;
1014         }
1015
1016         mnt->mnt.mnt_flags = old->mnt.mnt_flags & ~(MNT_WRITE_HOLD|MNT_MARKED);
1017         /* Don't allow unprivileged users to change mount flags */
1018         if (flag & CL_UNPRIVILEGED) {
1019                 mnt->mnt.mnt_flags |= MNT_LOCK_ATIME;
1020
1021                 if (mnt->mnt.mnt_flags & MNT_READONLY)
1022                         mnt->mnt.mnt_flags |= MNT_LOCK_READONLY;
1023
1024                 if (mnt->mnt.mnt_flags & MNT_NODEV)
1025                         mnt->mnt.mnt_flags |= MNT_LOCK_NODEV;
1026
1027                 if (mnt->mnt.mnt_flags & MNT_NOSUID)
1028                         mnt->mnt.mnt_flags |= MNT_LOCK_NOSUID;
1029
1030                 if (mnt->mnt.mnt_flags & MNT_NOEXEC)
1031                         mnt->mnt.mnt_flags |= MNT_LOCK_NOEXEC;
1032         }
1033
1034         /* Don't allow unprivileged users to reveal what is under a mount */
1035         if ((flag & CL_UNPRIVILEGED) &&
1036             (!(flag & CL_EXPIRE) || list_empty(&old->mnt_expire)))
1037                 mnt->mnt.mnt_flags |= MNT_LOCKED;
1038
1039         atomic_inc(&sb->s_active);
1040         mnt->mnt.mnt_sb = sb;
1041         mnt->mnt.mnt_root = dget(root);
1042         mnt->mnt_mountpoint = mnt->mnt.mnt_root;
1043         mnt->mnt_parent = mnt;
1044         lock_mount_hash();
1045         list_add_tail(&mnt->mnt_instance, &sb->s_mounts);
1046         unlock_mount_hash();
1047
1048         if ((flag & CL_SLAVE) ||
1049             ((flag & CL_SHARED_TO_SLAVE) && IS_MNT_SHARED(old))) {
1050                 list_add(&mnt->mnt_slave, &old->mnt_slave_list);
1051                 mnt->mnt_master = old;
1052                 CLEAR_MNT_SHARED(mnt);
1053         } else if (!(flag & CL_PRIVATE)) {
1054                 if ((flag & CL_MAKE_SHARED) || IS_MNT_SHARED(old))
1055                         list_add(&mnt->mnt_share, &old->mnt_share);
1056                 if (IS_MNT_SLAVE(old))
1057                         list_add(&mnt->mnt_slave, &old->mnt_slave);
1058                 mnt->mnt_master = old->mnt_master;
1059         }
1060         if (flag & CL_MAKE_SHARED)
1061                 set_mnt_shared(mnt);
1062
1063         /* stick the duplicate mount on the same expiry list
1064          * as the original if that was on one */
1065         if (flag & CL_EXPIRE) {
1066                 if (!list_empty(&old->mnt_expire))
1067                         list_add(&mnt->mnt_expire, &old->mnt_expire);
1068         }
1069
1070         return mnt;
1071
1072  out_free:
1073         mnt_free_id(mnt);
1074         free_vfsmnt(mnt);
1075         return ERR_PTR(err);
1076 }
1077
1078 static void cleanup_mnt(struct mount *mnt)
1079 {
1080         /*
1081          * This probably indicates that somebody messed
1082          * up a mnt_want/drop_write() pair.  If this
1083          * happens, the filesystem was probably unable
1084          * to make r/w->r/o transitions.
1085          */
1086         /*
1087          * The locking used to deal with mnt_count decrement provides barriers,
1088          * so mnt_get_writers() below is safe.
1089          */
1090         WARN_ON(mnt_get_writers(mnt));
1091         if (unlikely(mnt->mnt_pins.first))
1092                 mnt_pin_kill(mnt);
1093         fsnotify_vfsmount_delete(&mnt->mnt);
1094         dput(mnt->mnt.mnt_root);
1095         deactivate_super(mnt->mnt.mnt_sb);
1096         mnt_free_id(mnt);
1097         call_rcu(&mnt->mnt_rcu, delayed_free_vfsmnt);
1098 }
1099
1100 static void __cleanup_mnt(struct rcu_head *head)
1101 {
1102         cleanup_mnt(container_of(head, struct mount, mnt_rcu));
1103 }
1104
1105 static LLIST_HEAD(delayed_mntput_list);
1106 static void delayed_mntput(struct work_struct *unused)
1107 {
1108         struct llist_node *node = llist_del_all(&delayed_mntput_list);
1109         struct llist_node *next;
1110
1111         for (; node; node = next) {
1112                 next = llist_next(node);
1113                 cleanup_mnt(llist_entry(node, struct mount, mnt_llist));
1114         }
1115 }
1116 static DECLARE_DELAYED_WORK(delayed_mntput_work, delayed_mntput);
1117
1118 static void mntput_no_expire(struct mount *mnt)
1119 {
1120         rcu_read_lock();
1121         mnt_add_count(mnt, -1);
1122         if (likely(mnt->mnt_ns)) { /* shouldn't be the last one */
1123                 rcu_read_unlock();
1124                 return;
1125         }
1126         lock_mount_hash();
1127         if (mnt_get_count(mnt)) {
1128                 rcu_read_unlock();
1129                 unlock_mount_hash();
1130                 return;
1131         }
1132         if (unlikely(mnt->mnt.mnt_flags & MNT_DOOMED)) {
1133                 rcu_read_unlock();
1134                 unlock_mount_hash();
1135                 return;
1136         }
1137         mnt->mnt.mnt_flags |= MNT_DOOMED;
1138         rcu_read_unlock();
1139
1140         list_del(&mnt->mnt_instance);
1141
1142         if (unlikely(!list_empty(&mnt->mnt_mounts))) {
1143                 struct mount *p, *tmp;
1144                 list_for_each_entry_safe(p, tmp, &mnt->mnt_mounts,  mnt_child) {
1145                         umount_mnt(p);
1146                 }
1147         }
1148         unlock_mount_hash();
1149
1150         if (likely(!(mnt->mnt.mnt_flags & MNT_INTERNAL))) {
1151                 struct task_struct *task = current;
1152                 if (likely(!(task->flags & PF_KTHREAD))) {
1153                         init_task_work(&mnt->mnt_rcu, __cleanup_mnt);
1154                         if (!task_work_add(task, &mnt->mnt_rcu, true))
1155                                 return;
1156                 }
1157                 if (llist_add(&mnt->mnt_llist, &delayed_mntput_list))
1158                         schedule_delayed_work(&delayed_mntput_work, 1);
1159                 return;
1160         }
1161         cleanup_mnt(mnt);
1162 }
1163
1164 void mntput(struct vfsmount *mnt)
1165 {
1166         if (mnt) {
1167                 struct mount *m = real_mount(mnt);
1168                 /* avoid cacheline pingpong, hope gcc doesn't get "smart" */
1169                 if (unlikely(m->mnt_expiry_mark))
1170                         m->mnt_expiry_mark = 0;
1171                 mntput_no_expire(m);
1172         }
1173 }
1174 EXPORT_SYMBOL(mntput);
1175
1176 struct vfsmount *mntget(struct vfsmount *mnt)
1177 {
1178         if (mnt)
1179                 mnt_add_count(real_mount(mnt), 1);
1180         return mnt;
1181 }
1182 EXPORT_SYMBOL(mntget);
1183
1184 struct vfsmount *mnt_clone_internal(struct path *path)
1185 {
1186         struct mount *p;
1187         p = clone_mnt(real_mount(path->mnt), path->dentry, CL_PRIVATE);
1188         if (IS_ERR(p))
1189                 return ERR_CAST(p);
1190         p->mnt.mnt_flags |= MNT_INTERNAL;
1191         return &p->mnt;
1192 }
1193
1194 static inline void mangle(struct seq_file *m, const char *s)
1195 {
1196         seq_escape(m, s, " \t\n\\");
1197 }
1198
1199 /*
1200  * Simple .show_options callback for filesystems which don't want to
1201  * implement more complex mount option showing.
1202  *
1203  * See also save_mount_options().
1204  */
1205 int generic_show_options(struct seq_file *m, struct dentry *root)
1206 {
1207         const char *options;
1208
1209         rcu_read_lock();
1210         options = rcu_dereference(root->d_sb->s_options);
1211
1212         if (options != NULL && options[0]) {
1213                 seq_putc(m, ',');
1214                 mangle(m, options);
1215         }
1216         rcu_read_unlock();
1217
1218         return 0;
1219 }
1220 EXPORT_SYMBOL(generic_show_options);
1221
1222 /*
1223  * If filesystem uses generic_show_options(), this function should be
1224  * called from the fill_super() callback.
1225  *
1226  * The .remount_fs callback usually needs to be handled in a special
1227  * way, to make sure, that previous options are not overwritten if the
1228  * remount fails.
1229  *
1230  * Also note, that if the filesystem's .remount_fs function doesn't
1231  * reset all options to their default value, but changes only newly
1232  * given options, then the displayed options will not reflect reality
1233  * any more.
1234  */
1235 void save_mount_options(struct super_block *sb, char *options)
1236 {
1237         BUG_ON(sb->s_options);
1238         rcu_assign_pointer(sb->s_options, kstrdup(options, GFP_KERNEL));
1239 }
1240 EXPORT_SYMBOL(save_mount_options);
1241
1242 void replace_mount_options(struct super_block *sb, char *options)
1243 {
1244         char *old = sb->s_options;
1245         rcu_assign_pointer(sb->s_options, options);
1246         if (old) {
1247                 synchronize_rcu();
1248                 kfree(old);
1249         }
1250 }
1251 EXPORT_SYMBOL(replace_mount_options);
1252
1253 #ifdef CONFIG_PROC_FS
1254 /* iterator; we want it to have access to namespace_sem, thus here... */
1255 static void *m_start(struct seq_file *m, loff_t *pos)
1256 {
1257         struct proc_mounts *p = m->private;
1258
1259         down_read(&namespace_sem);
1260         if (p->cached_event == p->ns->event) {
1261                 void *v = p->cached_mount;
1262                 if (*pos == p->cached_index)
1263                         return v;
1264                 if (*pos == p->cached_index + 1) {
1265                         v = seq_list_next(v, &p->ns->list, &p->cached_index);
1266                         return p->cached_mount = v;
1267                 }
1268         }
1269
1270         p->cached_event = p->ns->event;
1271         p->cached_mount = seq_list_start(&p->ns->list, *pos);
1272         p->cached_index = *pos;
1273         return p->cached_mount;
1274 }
1275
1276 static void *m_next(struct seq_file *m, void *v, loff_t *pos)
1277 {
1278         struct proc_mounts *p = m->private;
1279
1280         p->cached_mount = seq_list_next(v, &p->ns->list, pos);
1281         p->cached_index = *pos;
1282         return p->cached_mount;
1283 }
1284
1285 static void m_stop(struct seq_file *m, void *v)
1286 {
1287         up_read(&namespace_sem);
1288 }
1289
1290 static int m_show(struct seq_file *m, void *v)
1291 {
1292         struct proc_mounts *p = m->private;
1293         struct mount *r = list_entry(v, struct mount, mnt_list);
1294         return p->show(m, &r->mnt);
1295 }
1296
1297 const struct seq_operations mounts_op = {
1298         .start  = m_start,
1299         .next   = m_next,
1300         .stop   = m_stop,
1301         .show   = m_show,
1302 };
1303 #endif  /* CONFIG_PROC_FS */
1304
1305 /**
1306  * may_umount_tree - check if a mount tree is busy
1307  * @mnt: root of mount tree
1308  *
1309  * This is called to check if a tree of mounts has any
1310  * open files, pwds, chroots or sub mounts that are
1311  * busy.
1312  */
1313 int may_umount_tree(struct vfsmount *m)
1314 {
1315         struct mount *mnt = real_mount(m);
1316         int actual_refs = 0;
1317         int minimum_refs = 0;
1318         struct mount *p;
1319         BUG_ON(!m);
1320
1321         /* write lock needed for mnt_get_count */
1322         lock_mount_hash();
1323         for (p = mnt; p; p = next_mnt(p, mnt)) {
1324                 actual_refs += mnt_get_count(p);
1325                 minimum_refs += 2;
1326         }
1327         unlock_mount_hash();
1328
1329         if (actual_refs > minimum_refs)
1330                 return 0;
1331
1332         return 1;
1333 }
1334
1335 EXPORT_SYMBOL(may_umount_tree);
1336
1337 /**
1338  * may_umount - check if a mount point is busy
1339  * @mnt: root of mount
1340  *
1341  * This is called to check if a mount point has any
1342  * open files, pwds, chroots or sub mounts. If the
1343  * mount has sub mounts this will return busy
1344  * regardless of whether the sub mounts are busy.
1345  *
1346  * Doesn't take quota and stuff into account. IOW, in some cases it will
1347  * give false negatives. The main reason why it's here is that we need
1348  * a non-destructive way to look for easily umountable filesystems.
1349  */
1350 int may_umount(struct vfsmount *mnt)
1351 {
1352         int ret = 1;
1353         down_read(&namespace_sem);
1354         lock_mount_hash();
1355         if (propagate_mount_busy(real_mount(mnt), 2))
1356                 ret = 0;
1357         unlock_mount_hash();
1358         up_read(&namespace_sem);
1359         return ret;
1360 }
1361
1362 EXPORT_SYMBOL(may_umount);
1363
1364 static HLIST_HEAD(unmounted);   /* protected by namespace_sem */
1365
1366 static void namespace_unlock(void)
1367 {
1368         struct hlist_head head;
1369
1370         hlist_move_list(&unmounted, &head);
1371
1372         up_write(&namespace_sem);
1373
1374         if (likely(hlist_empty(&head)))
1375                 return;
1376
1377         synchronize_rcu();
1378
1379         group_pin_kill(&head);
1380 }
1381
1382 static inline void namespace_lock(void)
1383 {
1384         down_write(&namespace_sem);
1385 }
1386
1387 enum umount_tree_flags {
1388         UMOUNT_SYNC = 1,
1389         UMOUNT_PROPAGATE = 2,
1390         UMOUNT_CONNECTED = 4,
1391 };
1392
1393 static bool disconnect_mount(struct mount *mnt, enum umount_tree_flags how)
1394 {
1395         /* Leaving mounts connected is only valid for lazy umounts */
1396         if (how & UMOUNT_SYNC)
1397                 return true;
1398
1399         /* A mount without a parent has nothing to be connected to */
1400         if (!mnt_has_parent(mnt))
1401                 return true;
1402
1403         /* Because the reference counting rules change when mounts are
1404          * unmounted and connected, umounted mounts may not be
1405          * connected to mounted mounts.
1406          */
1407         if (!(mnt->mnt_parent->mnt.mnt_flags & MNT_UMOUNT))
1408                 return true;
1409
1410         /* Has it been requested that the mount remain connected? */
1411         if (how & UMOUNT_CONNECTED)
1412                 return false;
1413
1414         /* Is the mount locked such that it needs to remain connected? */
1415         if (IS_MNT_LOCKED(mnt))
1416                 return false;
1417
1418         /* By default disconnect the mount */
1419         return true;
1420 }
1421
1422 /*
1423  * mount_lock must be held
1424  * namespace_sem must be held for write
1425  */
1426 static void umount_tree(struct mount *mnt, enum umount_tree_flags how)
1427 {
1428         LIST_HEAD(tmp_list);
1429         struct mount *p;
1430
1431         if (how & UMOUNT_PROPAGATE)
1432                 propagate_mount_unlock(mnt);
1433
1434         /* Gather the mounts to umount */
1435         for (p = mnt; p; p = next_mnt(p, mnt)) {
1436                 p->mnt.mnt_flags |= MNT_UMOUNT;
1437                 list_move(&p->mnt_list, &tmp_list);
1438         }
1439
1440         /* Hide the mounts from mnt_mounts */
1441         list_for_each_entry(p, &tmp_list, mnt_list) {
1442                 list_del_init(&p->mnt_child);
1443         }
1444
1445         /* Add propogated mounts to the tmp_list */
1446         if (how & UMOUNT_PROPAGATE)
1447                 propagate_umount(&tmp_list);
1448
1449         while (!list_empty(&tmp_list)) {
1450                 bool disconnect;
1451                 p = list_first_entry(&tmp_list, struct mount, mnt_list);
1452                 list_del_init(&p->mnt_expire);
1453                 list_del_init(&p->mnt_list);
1454                 __touch_mnt_namespace(p->mnt_ns);
1455                 p->mnt_ns = NULL;
1456                 if (how & UMOUNT_SYNC)
1457                         p->mnt.mnt_flags |= MNT_SYNC_UMOUNT;
1458
1459                 disconnect = disconnect_mount(p, how);
1460
1461                 pin_insert_group(&p->mnt_umount, &p->mnt_parent->mnt,
1462                                  disconnect ? &unmounted : NULL);
1463                 if (mnt_has_parent(p)) {
1464                         mnt_add_count(p->mnt_parent, -1);
1465                         if (!disconnect) {
1466                                 /* Don't forget about p */
1467                                 list_add_tail(&p->mnt_child, &p->mnt_parent->mnt_mounts);
1468                         } else {
1469                                 umount_mnt(p);
1470                         }
1471                 }
1472                 change_mnt_propagation(p, MS_PRIVATE);
1473         }
1474 }
1475
1476 static void shrink_submounts(struct mount *mnt);
1477
1478 static int do_umount(struct mount *mnt, int flags)
1479 {
1480         struct super_block *sb = mnt->mnt.mnt_sb;
1481         int retval;
1482
1483         retval = security_sb_umount(&mnt->mnt, flags);
1484         if (retval)
1485                 return retval;
1486
1487         /*
1488          * Allow userspace to request a mountpoint be expired rather than
1489          * unmounting unconditionally. Unmount only happens if:
1490          *  (1) the mark is already set (the mark is cleared by mntput())
1491          *  (2) the usage count == 1 [parent vfsmount] + 1 [sys_umount]
1492          */
1493         if (flags & MNT_EXPIRE) {
1494                 if (&mnt->mnt == current->fs->root.mnt ||
1495                     flags & (MNT_FORCE | MNT_DETACH))
1496                         return -EINVAL;
1497
1498                 /*
1499                  * probably don't strictly need the lock here if we examined
1500                  * all race cases, but it's a slowpath.
1501                  */
1502                 lock_mount_hash();
1503                 if (mnt_get_count(mnt) != 2) {
1504                         unlock_mount_hash();
1505                         return -EBUSY;
1506                 }
1507                 unlock_mount_hash();
1508
1509                 if (!xchg(&mnt->mnt_expiry_mark, 1))
1510                         return -EAGAIN;
1511         }
1512
1513         /*
1514          * If we may have to abort operations to get out of this
1515          * mount, and they will themselves hold resources we must
1516          * allow the fs to do things. In the Unix tradition of
1517          * 'Gee thats tricky lets do it in userspace' the umount_begin
1518          * might fail to complete on the first run through as other tasks
1519          * must return, and the like. Thats for the mount program to worry
1520          * about for the moment.
1521          */
1522
1523         if (flags & MNT_FORCE && sb->s_op->umount_begin) {
1524                 sb->s_op->umount_begin(sb);
1525         }
1526
1527         /*
1528          * No sense to grab the lock for this test, but test itself looks
1529          * somewhat bogus. Suggestions for better replacement?
1530          * Ho-hum... In principle, we might treat that as umount + switch
1531          * to rootfs. GC would eventually take care of the old vfsmount.
1532          * Actually it makes sense, especially if rootfs would contain a
1533          * /reboot - static binary that would close all descriptors and
1534          * call reboot(9). Then init(8) could umount root and exec /reboot.
1535          */
1536         if (&mnt->mnt == current->fs->root.mnt && !(flags & MNT_DETACH)) {
1537                 /*
1538                  * Special case for "unmounting" root ...
1539                  * we just try to remount it readonly.
1540                  */
1541                 if (!capable(CAP_SYS_ADMIN))
1542                         return -EPERM;
1543                 down_write(&sb->s_umount);
1544                 if (!(sb->s_flags & MS_RDONLY))
1545                         retval = do_remount_sb(sb, MS_RDONLY, NULL, 0);
1546                 up_write(&sb->s_umount);
1547                 return retval;
1548         }
1549
1550         namespace_lock();
1551         lock_mount_hash();
1552         event++;
1553
1554         if (flags & MNT_DETACH) {
1555                 if (!list_empty(&mnt->mnt_list))
1556                         umount_tree(mnt, UMOUNT_PROPAGATE);
1557                 retval = 0;
1558         } else {
1559                 shrink_submounts(mnt);
1560                 retval = -EBUSY;
1561                 if (!propagate_mount_busy(mnt, 2)) {
1562                         if (!list_empty(&mnt->mnt_list))
1563                                 umount_tree(mnt, UMOUNT_PROPAGATE|UMOUNT_SYNC);
1564                         retval = 0;
1565                 }
1566         }
1567         unlock_mount_hash();
1568         namespace_unlock();
1569         return retval;
1570 }
1571
1572 /*
1573  * __detach_mounts - lazily unmount all mounts on the specified dentry
1574  *
1575  * During unlink, rmdir, and d_drop it is possible to loose the path
1576  * to an existing mountpoint, and wind up leaking the mount.
1577  * detach_mounts allows lazily unmounting those mounts instead of
1578  * leaking them.
1579  *
1580  * The caller may hold dentry->d_inode->i_mutex.
1581  */
1582 void __detach_mounts(struct dentry *dentry)
1583 {
1584         struct mountpoint *mp;
1585         struct mount *mnt;
1586
1587         namespace_lock();
1588         lock_mount_hash();
1589         mp = lookup_mountpoint(dentry);
1590         if (IS_ERR_OR_NULL(mp))
1591                 goto out_unlock;
1592
1593         event++;
1594         while (!hlist_empty(&mp->m_list)) {
1595                 mnt = hlist_entry(mp->m_list.first, struct mount, mnt_mp_list);
1596                 if (mnt->mnt.mnt_flags & MNT_UMOUNT) {
1597                         hlist_add_head(&mnt->mnt_umount.s_list, &unmounted);
1598                         umount_mnt(mnt);
1599                 }
1600                 else umount_tree(mnt, UMOUNT_CONNECTED);
1601         }
1602         put_mountpoint(mp);
1603 out_unlock:
1604         unlock_mount_hash();
1605         namespace_unlock();
1606 }
1607
1608 /* 
1609  * Is the caller allowed to modify his namespace?
1610  */
1611 static inline bool may_mount(void)
1612 {
1613         return ns_capable(current->nsproxy->mnt_ns->user_ns, CAP_SYS_ADMIN);
1614 }
1615
1616 /*
1617  * Now umount can handle mount points as well as block devices.
1618  * This is important for filesystems which use unnamed block devices.
1619  *
1620  * We now support a flag for forced unmount like the other 'big iron'
1621  * unixes. Our API is identical to OSF/1 to avoid making a mess of AMD
1622  */
1623
1624 SYSCALL_DEFINE2(umount, char __user *, name, int, flags)
1625 {
1626         struct path path;
1627         struct mount *mnt;
1628         int retval;
1629         int lookup_flags = 0;
1630
1631         if (flags & ~(MNT_FORCE | MNT_DETACH | MNT_EXPIRE | UMOUNT_NOFOLLOW))
1632                 return -EINVAL;
1633
1634         if (!may_mount())
1635                 return -EPERM;
1636
1637         if (!(flags & UMOUNT_NOFOLLOW))
1638                 lookup_flags |= LOOKUP_FOLLOW;
1639
1640         retval = user_path_mountpoint_at(AT_FDCWD, name, lookup_flags, &path);
1641         if (retval)
1642                 goto out;
1643         mnt = real_mount(path.mnt);
1644         retval = -EINVAL;
1645         if (path.dentry != path.mnt->mnt_root)
1646                 goto dput_and_out;
1647         if (!check_mnt(mnt))
1648                 goto dput_and_out;
1649         if (mnt->mnt.mnt_flags & MNT_LOCKED)
1650                 goto dput_and_out;
1651         retval = -EPERM;
1652         if (flags & MNT_FORCE && !capable(CAP_SYS_ADMIN))
1653                 goto dput_and_out;
1654
1655         retval = do_umount(mnt, flags);
1656 dput_and_out:
1657         /* we mustn't call path_put() as that would clear mnt_expiry_mark */
1658         dput(path.dentry);
1659         mntput_no_expire(mnt);
1660 out:
1661         return retval;
1662 }
1663
1664 #ifdef __ARCH_WANT_SYS_OLDUMOUNT
1665
1666 /*
1667  *      The 2.0 compatible umount. No flags.
1668  */
1669 SYSCALL_DEFINE1(oldumount, char __user *, name)
1670 {
1671         return sys_umount(name, 0);
1672 }
1673
1674 #endif
1675
1676 static bool is_mnt_ns_file(struct dentry *dentry)
1677 {
1678         /* Is this a proxy for a mount namespace? */
1679         return dentry->d_op == &ns_dentry_operations &&
1680                dentry->d_fsdata == &mntns_operations;
1681 }
1682
1683 struct mnt_namespace *to_mnt_ns(struct ns_common *ns)
1684 {
1685         return container_of(ns, struct mnt_namespace, ns);
1686 }
1687
1688 static bool mnt_ns_loop(struct dentry *dentry)
1689 {
1690         /* Could bind mounting the mount namespace inode cause a
1691          * mount namespace loop?
1692          */
1693         struct mnt_namespace *mnt_ns;
1694         if (!is_mnt_ns_file(dentry))
1695                 return false;
1696
1697         mnt_ns = to_mnt_ns(get_proc_ns(dentry->d_inode));
1698         return current->nsproxy->mnt_ns->seq >= mnt_ns->seq;
1699 }
1700
1701 struct mount *copy_tree(struct mount *mnt, struct dentry *dentry,
1702                                         int flag)
1703 {
1704         struct mount *res, *p, *q, *r, *parent;
1705
1706         if (!(flag & CL_COPY_UNBINDABLE) && IS_MNT_UNBINDABLE(mnt))
1707                 return ERR_PTR(-EINVAL);
1708
1709         if (!(flag & CL_COPY_MNT_NS_FILE) && is_mnt_ns_file(dentry))
1710                 return ERR_PTR(-EINVAL);
1711
1712         res = q = clone_mnt(mnt, dentry, flag);
1713         if (IS_ERR(q))
1714                 return q;
1715
1716         q->mnt_mountpoint = mnt->mnt_mountpoint;
1717
1718         p = mnt;
1719         list_for_each_entry(r, &mnt->mnt_mounts, mnt_child) {
1720                 struct mount *s;
1721                 if (!is_subdir(r->mnt_mountpoint, dentry))
1722                         continue;
1723
1724                 for (s = r; s; s = next_mnt(s, r)) {
1725                         struct mount *t = NULL;
1726                         if (!(flag & CL_COPY_UNBINDABLE) &&
1727                             IS_MNT_UNBINDABLE(s)) {
1728                                 s = skip_mnt_tree(s);
1729                                 continue;
1730                         }
1731                         if (!(flag & CL_COPY_MNT_NS_FILE) &&
1732                             is_mnt_ns_file(s->mnt.mnt_root)) {
1733                                 s = skip_mnt_tree(s);
1734                                 continue;
1735                         }
1736                         while (p != s->mnt_parent) {
1737                                 p = p->mnt_parent;
1738                                 q = q->mnt_parent;
1739                         }
1740                         p = s;
1741                         parent = q;
1742                         q = clone_mnt(p, p->mnt.mnt_root, flag);
1743                         if (IS_ERR(q))
1744                                 goto out;
1745                         lock_mount_hash();
1746                         list_add_tail(&q->mnt_list, &res->mnt_list);
1747                         mnt_set_mountpoint(parent, p->mnt_mp, q);
1748                         if (!list_empty(&parent->mnt_mounts)) {
1749                                 t = list_last_entry(&parent->mnt_mounts,
1750                                         struct mount, mnt_child);
1751                                 if (t->mnt_mp != p->mnt_mp)
1752                                         t = NULL;
1753                         }
1754                         attach_shadowed(q, parent, t);
1755                         unlock_mount_hash();
1756                 }
1757         }
1758         return res;
1759 out:
1760         if (res) {
1761                 lock_mount_hash();
1762                 umount_tree(res, UMOUNT_SYNC);
1763                 unlock_mount_hash();
1764         }
1765         return q;
1766 }
1767
1768 /* Caller should check returned pointer for errors */
1769
1770 struct vfsmount *collect_mounts(struct path *path)
1771 {
1772         struct mount *tree;
1773         namespace_lock();
1774         if (!check_mnt(real_mount(path->mnt)))
1775                 tree = ERR_PTR(-EINVAL);
1776         else
1777                 tree = copy_tree(real_mount(path->mnt), path->dentry,
1778                                  CL_COPY_ALL | CL_PRIVATE);
1779         namespace_unlock();
1780         if (IS_ERR(tree))
1781                 return ERR_CAST(tree);
1782         return &tree->mnt;
1783 }
1784
1785 void drop_collected_mounts(struct vfsmount *mnt)
1786 {
1787         namespace_lock();
1788         lock_mount_hash();
1789         umount_tree(real_mount(mnt), UMOUNT_SYNC);
1790         unlock_mount_hash();
1791         namespace_unlock();
1792 }
1793
1794 /**
1795  * clone_private_mount - create a private clone of a path
1796  *
1797  * This creates a new vfsmount, which will be the clone of @path.  The new will
1798  * not be attached anywhere in the namespace and will be private (i.e. changes
1799  * to the originating mount won't be propagated into this).
1800  *
1801  * Release with mntput().
1802  */
1803 struct vfsmount *clone_private_mount(struct path *path)
1804 {
1805         struct mount *old_mnt = real_mount(path->mnt);
1806         struct mount *new_mnt;
1807
1808         if (IS_MNT_UNBINDABLE(old_mnt))
1809                 return ERR_PTR(-EINVAL);
1810
1811         down_read(&namespace_sem);
1812         new_mnt = clone_mnt(old_mnt, path->dentry, CL_PRIVATE);
1813         up_read(&namespace_sem);
1814         if (IS_ERR(new_mnt))
1815                 return ERR_CAST(new_mnt);
1816
1817         return &new_mnt->mnt;
1818 }
1819 EXPORT_SYMBOL_GPL(clone_private_mount);
1820
1821 int iterate_mounts(int (*f)(struct vfsmount *, void *), void *arg,
1822                    struct vfsmount *root)
1823 {
1824         struct mount *mnt;
1825         int res = f(root, arg);
1826         if (res)
1827                 return res;
1828         list_for_each_entry(mnt, &real_mount(root)->mnt_list, mnt_list) {
1829                 res = f(&mnt->mnt, arg);
1830                 if (res)
1831                         return res;
1832         }
1833         return 0;
1834 }
1835
1836 static void cleanup_group_ids(struct mount *mnt, struct mount *end)
1837 {
1838         struct mount *p;
1839
1840         for (p = mnt; p != end; p = next_mnt(p, mnt)) {
1841                 if (p->mnt_group_id && !IS_MNT_SHARED(p))
1842                         mnt_release_group_id(p);
1843         }
1844 }
1845
1846 static int invent_group_ids(struct mount *mnt, bool recurse)
1847 {
1848         struct mount *p;
1849
1850         for (p = mnt; p; p = recurse ? next_mnt(p, mnt) : NULL) {
1851                 if (!p->mnt_group_id && !IS_MNT_SHARED(p)) {
1852                         int err = mnt_alloc_group_id(p);
1853                         if (err) {
1854                                 cleanup_group_ids(mnt, p);
1855                                 return err;
1856                         }
1857                 }
1858         }
1859
1860         return 0;
1861 }
1862
1863 /*
1864  *  @source_mnt : mount tree to be attached
1865  *  @nd         : place the mount tree @source_mnt is attached
1866  *  @parent_nd  : if non-null, detach the source_mnt from its parent and
1867  *                 store the parent mount and mountpoint dentry.
1868  *                 (done when source_mnt is moved)
1869  *
1870  *  NOTE: in the table below explains the semantics when a source mount
1871  *  of a given type is attached to a destination mount of a given type.
1872  * ---------------------------------------------------------------------------
1873  * |         BIND MOUNT OPERATION                                            |
1874  * |**************************************************************************
1875  * | source-->| shared        |       private  |       slave    | unbindable |
1876  * | dest     |               |                |                |            |
1877  * |   |      |               |                |                |            |
1878  * |   v      |               |                |                |            |
1879  * |**************************************************************************
1880  * |  shared  | shared (++)   |     shared (+) |     shared(+++)|  invalid   |
1881  * |          |               |                |                |            |
1882  * |non-shared| shared (+)    |      private   |      slave (*) |  invalid   |
1883  * ***************************************************************************
1884  * A bind operation clones the source mount and mounts the clone on the
1885  * destination mount.
1886  *
1887  * (++)  the cloned mount is propagated to all the mounts in the propagation
1888  *       tree of the destination mount and the cloned mount is added to
1889  *       the peer group of the source mount.
1890  * (+)   the cloned mount is created under the destination mount and is marked
1891  *       as shared. The cloned mount is added to the peer group of the source
1892  *       mount.
1893  * (+++) the mount is propagated to all the mounts in the propagation tree
1894  *       of the destination mount and the cloned mount is made slave
1895  *       of the same master as that of the source mount. The cloned mount
1896  *       is marked as 'shared and slave'.
1897  * (*)   the cloned mount is made a slave of the same master as that of the
1898  *       source mount.
1899  *
1900  * ---------------------------------------------------------------------------
1901  * |                    MOVE MOUNT OPERATION                                 |
1902  * |**************************************************************************
1903  * | source-->| shared        |       private  |       slave    | unbindable |
1904  * | dest     |               |                |                |            |
1905  * |   |      |               |                |                |            |
1906  * |   v      |               |                |                |            |
1907  * |**************************************************************************
1908  * |  shared  | shared (+)    |     shared (+) |    shared(+++) |  invalid   |
1909  * |          |               |                |                |            |
1910  * |non-shared| shared (+*)   |      private   |    slave (*)   | unbindable |
1911  * ***************************************************************************
1912  *
1913  * (+)  the mount is moved to the destination. And is then propagated to
1914  *      all the mounts in the propagation tree of the destination mount.
1915  * (+*)  the mount is moved to the destination.
1916  * (+++)  the mount is moved to the destination and is then propagated to
1917  *      all the mounts belonging to the destination mount's propagation tree.
1918  *      the mount is marked as 'shared and slave'.
1919  * (*)  the mount continues to be a slave at the new location.
1920  *
1921  * if the source mount is a tree, the operations explained above is
1922  * applied to each mount in the tree.
1923  * Must be called without spinlocks held, since this function can sleep
1924  * in allocations.
1925  */
1926 static int attach_recursive_mnt(struct mount *source_mnt,
1927                         struct mount *dest_mnt,
1928                         struct mountpoint *dest_mp,
1929                         struct path *parent_path)
1930 {
1931         HLIST_HEAD(tree_list);
1932         struct mount *child, *p;
1933         struct hlist_node *n;
1934         int err;
1935
1936         if (IS_MNT_SHARED(dest_mnt)) {
1937                 err = invent_group_ids(source_mnt, true);
1938                 if (err)
1939                         goto out;
1940                 err = propagate_mnt(dest_mnt, dest_mp, source_mnt, &tree_list);
1941                 lock_mount_hash();
1942                 if (err)
1943                         goto out_cleanup_ids;
1944                 for (p = source_mnt; p; p = next_mnt(p, source_mnt))
1945                         set_mnt_shared(p);
1946         } else {
1947                 lock_mount_hash();
1948         }
1949         if (parent_path) {
1950                 detach_mnt(source_mnt, parent_path);
1951                 attach_mnt(source_mnt, dest_mnt, dest_mp);
1952                 touch_mnt_namespace(source_mnt->mnt_ns);
1953         } else {
1954                 mnt_set_mountpoint(dest_mnt, dest_mp, source_mnt);
1955                 commit_tree(source_mnt, NULL);
1956         }
1957
1958         hlist_for_each_entry_safe(child, n, &tree_list, mnt_hash) {
1959                 struct mount *q;
1960                 hlist_del_init(&child->mnt_hash);
1961                 q = __lookup_mnt_last(&child->mnt_parent->mnt,
1962                                       child->mnt_mountpoint);
1963                 commit_tree(child, q);
1964         }
1965         unlock_mount_hash();
1966
1967         return 0;
1968
1969  out_cleanup_ids:
1970         while (!hlist_empty(&tree_list)) {
1971                 child = hlist_entry(tree_list.first, struct mount, mnt_hash);
1972                 umount_tree(child, UMOUNT_SYNC);
1973         }
1974         unlock_mount_hash();
1975         cleanup_group_ids(source_mnt, NULL);
1976  out:
1977         return err;
1978 }
1979
1980 static struct mountpoint *lock_mount(struct path *path)
1981 {
1982         struct vfsmount *mnt;
1983         struct dentry *dentry = path->dentry;
1984 retry:
1985         mutex_lock(&dentry->d_inode->i_mutex);
1986         if (unlikely(cant_mount(dentry))) {
1987                 mutex_unlock(&dentry->d_inode->i_mutex);
1988                 return ERR_PTR(-ENOENT);
1989         }
1990         namespace_lock();
1991         mnt = lookup_mnt(path);
1992         if (likely(!mnt)) {
1993                 struct mountpoint *mp = get_mountpoint(dentry);
1994                 if (IS_ERR(mp)) {
1995                         namespace_unlock();
1996                         mutex_unlock(&dentry->d_inode->i_mutex);
1997                         return mp;
1998                 }
1999                 return mp;
2000         }
2001         namespace_unlock();
2002         mutex_unlock(&path->dentry->d_inode->i_mutex);
2003         path_put(path);
2004         path->mnt = mnt;
2005         dentry = path->dentry = dget(mnt->mnt_root);
2006         goto retry;
2007 }
2008
2009 static void unlock_mount(struct mountpoint *where)
2010 {
2011         struct dentry *dentry = where->m_dentry;
2012
2013         read_seqlock_excl(&mount_lock);
2014         put_mountpoint(where);
2015         read_sequnlock_excl(&mount_lock);
2016
2017         namespace_unlock();
2018         mutex_unlock(&dentry->d_inode->i_mutex);
2019 }
2020
2021 static int graft_tree(struct mount *mnt, struct mount *p, struct mountpoint *mp)
2022 {
2023         if (mnt->mnt.mnt_sb->s_flags & MS_NOUSER)
2024                 return -EINVAL;
2025
2026         if (d_is_dir(mp->m_dentry) !=
2027               d_is_dir(mnt->mnt.mnt_root))
2028                 return -ENOTDIR;
2029
2030         return attach_recursive_mnt(mnt, p, mp, NULL);
2031 }
2032
2033 /*
2034  * Sanity check the flags to change_mnt_propagation.
2035  */
2036
2037 static int flags_to_propagation_type(int flags)
2038 {
2039         int type = flags & ~(MS_REC | MS_SILENT);
2040
2041         /* Fail if any non-propagation flags are set */
2042         if (type & ~(MS_SHARED | MS_PRIVATE | MS_SLAVE | MS_UNBINDABLE))
2043                 return 0;
2044         /* Only one propagation flag should be set */
2045         if (!is_power_of_2(type))
2046                 return 0;
2047         return type;
2048 }
2049
2050 /*
2051  * recursively change the type of the mountpoint.
2052  */
2053 static int do_change_type(struct path *path, int flag)
2054 {
2055         struct mount *m;
2056         struct mount *mnt = real_mount(path->mnt);
2057         int recurse = flag & MS_REC;
2058         int type;
2059         int err = 0;
2060
2061         if (path->dentry != path->mnt->mnt_root)
2062                 return -EINVAL;
2063
2064         type = flags_to_propagation_type(flag);
2065         if (!type)
2066                 return -EINVAL;
2067
2068         namespace_lock();
2069         if (type == MS_SHARED) {
2070                 err = invent_group_ids(mnt, recurse);
2071                 if (err)
2072                         goto out_unlock;
2073         }
2074
2075         lock_mount_hash();
2076         for (m = mnt; m; m = (recurse ? next_mnt(m, mnt) : NULL))
2077                 change_mnt_propagation(m, type);
2078         unlock_mount_hash();
2079
2080  out_unlock:
2081         namespace_unlock();
2082         return err;
2083 }
2084
2085 static bool has_locked_children(struct mount *mnt, struct dentry *dentry)
2086 {
2087         struct mount *child;
2088         list_for_each_entry(child, &mnt->mnt_mounts, mnt_child) {
2089                 if (!is_subdir(child->mnt_mountpoint, dentry))
2090                         continue;
2091
2092                 if (child->mnt.mnt_flags & MNT_LOCKED)
2093                         return true;
2094         }
2095         return false;
2096 }
2097
2098 /*
2099  * do loopback mount.
2100  */
2101 static int do_loopback(struct path *path, const char *old_name,
2102                                 int recurse)
2103 {
2104         struct path old_path;
2105         struct mount *mnt = NULL, *old, *parent;
2106         struct mountpoint *mp;
2107         int err;
2108         if (!old_name || !*old_name)
2109                 return -EINVAL;
2110         err = kern_path(old_name, LOOKUP_FOLLOW|LOOKUP_AUTOMOUNT, &old_path);
2111         if (err)
2112                 return err;
2113
2114         err = -EINVAL;
2115         if (mnt_ns_loop(old_path.dentry))
2116                 goto out; 
2117
2118         mp = lock_mount(path);
2119         err = PTR_ERR(mp);
2120         if (IS_ERR(mp))
2121                 goto out;
2122
2123         old = real_mount(old_path.mnt);
2124         parent = real_mount(path->mnt);
2125
2126         err = -EINVAL;
2127         if (IS_MNT_UNBINDABLE(old))
2128                 goto out2;
2129
2130         if (!check_mnt(parent))
2131                 goto out2;
2132
2133         if (!check_mnt(old) && old_path.dentry->d_op != &ns_dentry_operations)
2134                 goto out2;
2135
2136         if (!recurse && has_locked_children(old, old_path.dentry))
2137                 goto out2;
2138
2139         if (recurse)
2140                 mnt = copy_tree(old, old_path.dentry, CL_COPY_MNT_NS_FILE);
2141         else
2142                 mnt = clone_mnt(old, old_path.dentry, 0);
2143
2144         if (IS_ERR(mnt)) {
2145                 err = PTR_ERR(mnt);
2146                 goto out2;
2147         }
2148
2149         mnt->mnt.mnt_flags &= ~MNT_LOCKED;
2150
2151         err = graft_tree(mnt, parent, mp);
2152         if (err) {
2153                 lock_mount_hash();
2154                 umount_tree(mnt, UMOUNT_SYNC);
2155                 unlock_mount_hash();
2156         }
2157 out2:
2158         unlock_mount(mp);
2159 out:
2160         path_put(&old_path);
2161         return err;
2162 }
2163
2164 static int change_mount_flags(struct vfsmount *mnt, int ms_flags)
2165 {
2166         int error = 0;
2167         int readonly_request = 0;
2168
2169         if (ms_flags & MS_RDONLY)
2170                 readonly_request = 1;
2171         if (readonly_request == __mnt_is_readonly(mnt))
2172                 return 0;
2173
2174         if (readonly_request)
2175                 error = mnt_make_readonly(real_mount(mnt));
2176         else
2177                 __mnt_unmake_readonly(real_mount(mnt));
2178         return error;
2179 }
2180
2181 /*
2182  * change filesystem flags. dir should be a physical root of filesystem.
2183  * If you've mounted a non-root directory somewhere and want to do remount
2184  * on it - tough luck.
2185  */
2186 static int do_remount(struct path *path, int flags, int mnt_flags,
2187                       void *data)
2188 {
2189         int err;
2190         struct super_block *sb = path->mnt->mnt_sb;
2191         struct mount *mnt = real_mount(path->mnt);
2192
2193         if (!check_mnt(mnt))
2194                 return -EINVAL;
2195
2196         if (path->dentry != path->mnt->mnt_root)
2197                 return -EINVAL;
2198
2199         /* Don't allow changing of locked mnt flags.
2200          *
2201          * No locks need to be held here while testing the various
2202          * MNT_LOCK flags because those flags can never be cleared
2203          * once they are set.
2204          */
2205         if ((mnt->mnt.mnt_flags & MNT_LOCK_READONLY) &&
2206             !(mnt_flags & MNT_READONLY)) {
2207                 return -EPERM;
2208         }
2209         if ((mnt->mnt.mnt_flags & MNT_LOCK_NODEV) &&
2210             !(mnt_flags & MNT_NODEV)) {
2211                 /* Was the nodev implicitly added in mount? */
2212                 if ((mnt->mnt_ns->user_ns != &init_user_ns) &&
2213                     !(sb->s_type->fs_flags & FS_USERNS_DEV_MOUNT)) {
2214                         mnt_flags |= MNT_NODEV;
2215                 } else {
2216                         return -EPERM;
2217                 }
2218         }
2219         if ((mnt->mnt.mnt_flags & MNT_LOCK_NOSUID) &&
2220             !(mnt_flags & MNT_NOSUID)) {
2221                 return -EPERM;
2222         }
2223         if ((mnt->mnt.mnt_flags & MNT_LOCK_NOEXEC) &&
2224             !(mnt_flags & MNT_NOEXEC)) {
2225                 return -EPERM;
2226         }
2227         if ((mnt->mnt.mnt_flags & MNT_LOCK_ATIME) &&
2228             ((mnt->mnt.mnt_flags & MNT_ATIME_MASK) != (mnt_flags & MNT_ATIME_MASK))) {
2229                 return -EPERM;
2230         }
2231
2232         err = security_sb_remount(sb, data);
2233         if (err)
2234                 return err;
2235
2236         down_write(&sb->s_umount);
2237         if (flags & MS_BIND)
2238                 err = change_mount_flags(path->mnt, flags);
2239         else if (!capable(CAP_SYS_ADMIN))
2240                 err = -EPERM;
2241         else
2242                 err = do_remount_sb(sb, flags, data, 0);
2243         if (!err) {
2244                 lock_mount_hash();
2245                 mnt_flags |= mnt->mnt.mnt_flags & ~MNT_USER_SETTABLE_MASK;
2246                 mnt->mnt.mnt_flags = mnt_flags;
2247                 touch_mnt_namespace(mnt->mnt_ns);
2248                 unlock_mount_hash();
2249         }
2250         up_write(&sb->s_umount);
2251         return err;
2252 }
2253
2254 static inline int tree_contains_unbindable(struct mount *mnt)
2255 {
2256         struct mount *p;
2257         for (p = mnt; p; p = next_mnt(p, mnt)) {
2258                 if (IS_MNT_UNBINDABLE(p))
2259                         return 1;
2260         }
2261         return 0;
2262 }
2263
2264 static int do_move_mount(struct path *path, const char *old_name)
2265 {
2266         struct path old_path, parent_path;
2267         struct mount *p;
2268         struct mount *old;
2269         struct mountpoint *mp;
2270         int err;
2271         if (!old_name || !*old_name)
2272                 return -EINVAL;
2273         err = kern_path(old_name, LOOKUP_FOLLOW, &old_path);
2274         if (err)
2275                 return err;
2276
2277         mp = lock_mount(path);
2278         err = PTR_ERR(mp);
2279         if (IS_ERR(mp))
2280                 goto out;
2281
2282         old = real_mount(old_path.mnt);
2283         p = real_mount(path->mnt);
2284
2285         err = -EINVAL;
2286         if (!check_mnt(p) || !check_mnt(old))
2287                 goto out1;
2288
2289         if (old->mnt.mnt_flags & MNT_LOCKED)
2290                 goto out1;
2291
2292         err = -EINVAL;
2293         if (old_path.dentry != old_path.mnt->mnt_root)
2294                 goto out1;
2295
2296         if (!mnt_has_parent(old))
2297                 goto out1;
2298
2299         if (d_is_dir(path->dentry) !=
2300               d_is_dir(old_path.dentry))
2301                 goto out1;
2302         /*
2303          * Don't move a mount residing in a shared parent.
2304          */
2305         if (IS_MNT_SHARED(old->mnt_parent))
2306                 goto out1;
2307         /*
2308          * Don't move a mount tree containing unbindable mounts to a destination
2309          * mount which is shared.
2310          */
2311         if (IS_MNT_SHARED(p) && tree_contains_unbindable(old))
2312                 goto out1;
2313         err = -ELOOP;
2314         for (; mnt_has_parent(p); p = p->mnt_parent)
2315                 if (p == old)
2316                         goto out1;
2317
2318         err = attach_recursive_mnt(old, real_mount(path->mnt), mp, &parent_path);
2319         if (err)
2320                 goto out1;
2321
2322         /* if the mount is moved, it should no longer be expire
2323          * automatically */
2324         list_del_init(&old->mnt_expire);
2325 out1:
2326         unlock_mount(mp);
2327 out:
2328         if (!err)
2329                 path_put(&parent_path);
2330         path_put(&old_path);
2331         return err;
2332 }
2333
2334 static struct vfsmount *fs_set_subtype(struct vfsmount *mnt, const char *fstype)
2335 {
2336         int err;
2337         const char *subtype = strchr(fstype, '.');
2338         if (subtype) {
2339                 subtype++;
2340                 err = -EINVAL;
2341                 if (!subtype[0])
2342                         goto err;
2343         } else
2344                 subtype = "";
2345
2346         mnt->mnt_sb->s_subtype = kstrdup(subtype, GFP_KERNEL);
2347         err = -ENOMEM;
2348         if (!mnt->mnt_sb->s_subtype)
2349                 goto err;
2350         return mnt;
2351
2352  err:
2353         mntput(mnt);
2354         return ERR_PTR(err);
2355 }
2356
2357 /*
2358  * add a mount into a namespace's mount tree
2359  */
2360 static int do_add_mount(struct mount *newmnt, struct path *path, int mnt_flags)
2361 {
2362         struct mountpoint *mp;
2363         struct mount *parent;
2364         int err;
2365
2366         mnt_flags &= ~MNT_INTERNAL_FLAGS;
2367
2368         mp = lock_mount(path);
2369         if (IS_ERR(mp))
2370                 return PTR_ERR(mp);
2371
2372         parent = real_mount(path->mnt);
2373         err = -EINVAL;
2374         if (unlikely(!check_mnt(parent))) {
2375                 /* that's acceptable only for automounts done in private ns */
2376                 if (!(mnt_flags & MNT_SHRINKABLE))
2377                         goto unlock;
2378                 /* ... and for those we'd better have mountpoint still alive */
2379                 if (!parent->mnt_ns)
2380                         goto unlock;
2381         }
2382
2383         /* Refuse the same filesystem on the same mount point */
2384         err = -EBUSY;
2385         if (path->mnt->mnt_sb == newmnt->mnt.mnt_sb &&
2386             path->mnt->mnt_root == path->dentry)
2387                 goto unlock;
2388
2389         err = -EINVAL;
2390         if (d_is_symlink(newmnt->mnt.mnt_root))
2391                 goto unlock;
2392
2393         newmnt->mnt.mnt_flags = mnt_flags;
2394         err = graft_tree(newmnt, parent, mp);
2395
2396 unlock:
2397         unlock_mount(mp);
2398         return err;
2399 }
2400
2401 static bool fs_fully_visible(struct file_system_type *fs_type, int *new_mnt_flags);
2402
2403 /*
2404  * create a new mount for userspace and request it to be added into the
2405  * namespace's tree
2406  */
2407 static int do_new_mount(struct path *path, const char *fstype, int flags,
2408                         int mnt_flags, const char *name, void *data)
2409 {
2410         struct file_system_type *type;
2411         struct user_namespace *user_ns = current->nsproxy->mnt_ns->user_ns;
2412         struct vfsmount *mnt;
2413         int err;
2414
2415         if (!fstype)
2416                 return -EINVAL;
2417
2418         type = get_fs_type(fstype);
2419         if (!type)
2420                 return -ENODEV;
2421
2422         if (user_ns != &init_user_ns) {
2423                 if (!(type->fs_flags & FS_USERNS_MOUNT)) {
2424                         put_filesystem(type);
2425                         return -EPERM;
2426                 }
2427                 /* Only in special cases allow devices from mounts
2428                  * created outside the initial user namespace.
2429                  */
2430                 if (!(type->fs_flags & FS_USERNS_DEV_MOUNT)) {
2431                         flags |= MS_NODEV;
2432                         mnt_flags |= MNT_NODEV | MNT_LOCK_NODEV;
2433                 }
2434                 if (type->fs_flags & FS_USERNS_VISIBLE) {
2435                         if (!fs_fully_visible(type, &mnt_flags)) {
2436                                 put_filesystem(type);
2437                                 return -EPERM;
2438                         }
2439                 }
2440         }
2441
2442         mnt = vfs_kern_mount(type, flags, name, data);
2443         if (!IS_ERR(mnt) && (type->fs_flags & FS_HAS_SUBTYPE) &&
2444             !mnt->mnt_sb->s_subtype)
2445                 mnt = fs_set_subtype(mnt, fstype);
2446
2447         put_filesystem(type);
2448         if (IS_ERR(mnt))
2449                 return PTR_ERR(mnt);
2450
2451         err = do_add_mount(real_mount(mnt), path, mnt_flags);
2452         if (err)
2453                 mntput(mnt);
2454         return err;
2455 }
2456
2457 int finish_automount(struct vfsmount *m, struct path *path)
2458 {
2459         struct mount *mnt = real_mount(m);
2460         int err;
2461         /* The new mount record should have at least 2 refs to prevent it being
2462          * expired before we get a chance to add it
2463          */
2464         BUG_ON(mnt_get_count(mnt) < 2);
2465
2466         if (m->mnt_sb == path->mnt->mnt_sb &&
2467             m->mnt_root == path->dentry) {
2468                 err = -ELOOP;
2469                 goto fail;
2470         }
2471
2472         err = do_add_mount(mnt, path, path->mnt->mnt_flags | MNT_SHRINKABLE);
2473         if (!err)
2474                 return 0;
2475 fail:
2476         /* remove m from any expiration list it may be on */
2477         if (!list_empty(&mnt->mnt_expire)) {
2478                 namespace_lock();
2479                 list_del_init(&mnt->mnt_expire);
2480                 namespace_unlock();
2481         }
2482         mntput(m);
2483         mntput(m);
2484         return err;
2485 }
2486
2487 /**
2488  * mnt_set_expiry - Put a mount on an expiration list
2489  * @mnt: The mount to list.
2490  * @expiry_list: The list to add the mount to.
2491  */
2492 void mnt_set_expiry(struct vfsmount *mnt, struct list_head *expiry_list)
2493 {
2494         namespace_lock();
2495
2496         list_add_tail(&real_mount(mnt)->mnt_expire, expiry_list);
2497
2498         namespace_unlock();
2499 }
2500 EXPORT_SYMBOL(mnt_set_expiry);
2501
2502 /*
2503  * process a list of expirable mountpoints with the intent of discarding any
2504  * mountpoints that aren't in use and haven't been touched since last we came
2505  * here
2506  */
2507 void mark_mounts_for_expiry(struct list_head *mounts)
2508 {
2509         struct mount *mnt, *next;
2510         LIST_HEAD(graveyard);
2511
2512         if (list_empty(mounts))
2513                 return;
2514
2515         namespace_lock();
2516         lock_mount_hash();
2517
2518         /* extract from the expiration list every vfsmount that matches the
2519          * following criteria:
2520          * - only referenced by its parent vfsmount
2521          * - still marked for expiry (marked on the last call here; marks are
2522          *   cleared by mntput())
2523          */
2524         list_for_each_entry_safe(mnt, next, mounts, mnt_expire) {
2525                 if (!xchg(&mnt->mnt_expiry_mark, 1) ||
2526                         propagate_mount_busy(mnt, 1))
2527                         continue;
2528                 list_move(&mnt->mnt_expire, &graveyard);
2529         }
2530         while (!list_empty(&graveyard)) {
2531                 mnt = list_first_entry(&graveyard, struct mount, mnt_expire);
2532                 touch_mnt_namespace(mnt->mnt_ns);
2533                 umount_tree(mnt, UMOUNT_PROPAGATE|UMOUNT_SYNC);
2534         }
2535         unlock_mount_hash();
2536         namespace_unlock();
2537 }
2538
2539 EXPORT_SYMBOL_GPL(mark_mounts_for_expiry);
2540
2541 /*
2542  * Ripoff of 'select_parent()'
2543  *
2544  * search the list of submounts for a given mountpoint, and move any
2545  * shrinkable submounts to the 'graveyard' list.
2546  */
2547 static int select_submounts(struct mount *parent, struct list_head *graveyard)
2548 {
2549         struct mount *this_parent = parent;
2550         struct list_head *next;
2551         int found = 0;
2552
2553 repeat:
2554         next = this_parent->mnt_mounts.next;
2555 resume:
2556         while (next != &this_parent->mnt_mounts) {
2557                 struct list_head *tmp = next;
2558                 struct mount *mnt = list_entry(tmp, struct mount, mnt_child);
2559
2560                 next = tmp->next;
2561                 if (!(mnt->mnt.mnt_flags & MNT_SHRINKABLE))
2562                         continue;
2563                 /*
2564                  * Descend a level if the d_mounts list is non-empty.
2565                  */
2566                 if (!list_empty(&mnt->mnt_mounts)) {
2567                         this_parent = mnt;
2568                         goto repeat;
2569                 }
2570
2571                 if (!propagate_mount_busy(mnt, 1)) {
2572                         list_move_tail(&mnt->mnt_expire, graveyard);
2573                         found++;
2574                 }
2575         }
2576         /*
2577          * All done at this level ... ascend and resume the search
2578          */
2579         if (this_parent != parent) {
2580                 next = this_parent->mnt_child.next;
2581                 this_parent = this_parent->mnt_parent;
2582                 goto resume;
2583         }
2584         return found;
2585 }
2586
2587 /*
2588  * process a list of expirable mountpoints with the intent of discarding any
2589  * submounts of a specific parent mountpoint
2590  *
2591  * mount_lock must be held for write
2592  */
2593 static void shrink_submounts(struct mount *mnt)
2594 {
2595         LIST_HEAD(graveyard);
2596         struct mount *m;
2597
2598         /* extract submounts of 'mountpoint' from the expiration list */
2599         while (select_submounts(mnt, &graveyard)) {
2600                 while (!list_empty(&graveyard)) {
2601                         m = list_first_entry(&graveyard, struct mount,
2602                                                 mnt_expire);
2603                         touch_mnt_namespace(m->mnt_ns);
2604                         umount_tree(m, UMOUNT_PROPAGATE|UMOUNT_SYNC);
2605                 }
2606         }
2607 }
2608
2609 /*
2610  * Some copy_from_user() implementations do not return the exact number of
2611  * bytes remaining to copy on a fault.  But copy_mount_options() requires that.
2612  * Note that this function differs from copy_from_user() in that it will oops
2613  * on bad values of `to', rather than returning a short copy.
2614  */
2615 static long exact_copy_from_user(void *to, const void __user * from,
2616                                  unsigned long n)
2617 {
2618         char *t = to;
2619         const char __user *f = from;
2620         char c;
2621
2622         if (!access_ok(VERIFY_READ, from, n))
2623                 return n;
2624
2625         while (n) {
2626                 if (__get_user(c, f)) {
2627                         memset(t, 0, n);
2628                         break;
2629                 }
2630                 *t++ = c;
2631                 f++;
2632                 n--;
2633         }
2634         return n;
2635 }
2636
2637 int copy_mount_options(const void __user * data, unsigned long *where)
2638 {
2639         int i;
2640         unsigned long page;
2641         unsigned long size;
2642
2643         *where = 0;
2644         if (!data)
2645                 return 0;
2646
2647         if (!(page = __get_free_page(GFP_KERNEL)))
2648                 return -ENOMEM;
2649
2650         /* We only care that *some* data at the address the user
2651          * gave us is valid.  Just in case, we'll zero
2652          * the remainder of the page.
2653          */
2654         /* copy_from_user cannot cross TASK_SIZE ! */
2655         size = TASK_SIZE - (unsigned long)data;
2656         if (size > PAGE_SIZE)
2657                 size = PAGE_SIZE;
2658
2659         i = size - exact_copy_from_user((void *)page, data, size);
2660         if (!i) {
2661                 free_page(page);
2662                 return -EFAULT;
2663         }
2664         if (i != PAGE_SIZE)
2665                 memset((char *)page + i, 0, PAGE_SIZE - i);
2666         *where = page;
2667         return 0;
2668 }
2669
2670 char *copy_mount_string(const void __user *data)
2671 {
2672         return data ? strndup_user(data, PAGE_SIZE) : NULL;
2673 }
2674
2675 /*
2676  * Flags is a 32-bit value that allows up to 31 non-fs dependent flags to
2677  * be given to the mount() call (ie: read-only, no-dev, no-suid etc).
2678  *
2679  * data is a (void *) that can point to any structure up to
2680  * PAGE_SIZE-1 bytes, which can contain arbitrary fs-dependent
2681  * information (or be NULL).
2682  *
2683  * Pre-0.97 versions of mount() didn't have a flags word.
2684  * When the flags word was introduced its top half was required
2685  * to have the magic value 0xC0ED, and this remained so until 2.4.0-test9.
2686  * Therefore, if this magic number is present, it carries no information
2687  * and must be discarded.
2688  */
2689 long do_mount(const char *dev_name, const char __user *dir_name,
2690                 const char *type_page, unsigned long flags, void *data_page)
2691 {
2692         struct path path;
2693         int retval = 0;
2694         int mnt_flags = 0;
2695
2696         /* Discard magic */
2697         if ((flags & MS_MGC_MSK) == MS_MGC_VAL)
2698                 flags &= ~MS_MGC_MSK;
2699
2700         /* Basic sanity checks */
2701         if (data_page)
2702                 ((char *)data_page)[PAGE_SIZE - 1] = 0;
2703
2704         /* ... and get the mountpoint */
2705         retval = user_path(dir_name, &path);
2706         if (retval)
2707                 return retval;
2708
2709         retval = security_sb_mount(dev_name, &path,
2710                                    type_page, flags, data_page);
2711         if (!retval && !may_mount())
2712                 retval = -EPERM;
2713         if (retval)
2714                 goto dput_out;
2715
2716         /* Default to relatime unless overriden */
2717         if (!(flags & MS_NOATIME))
2718                 mnt_flags |= MNT_RELATIME;
2719
2720         /* Separate the per-mountpoint flags */
2721         if (flags & MS_NOSUID)
2722                 mnt_flags |= MNT_NOSUID;
2723         if (flags & MS_NODEV)
2724                 mnt_flags |= MNT_NODEV;
2725         if (flags & MS_NOEXEC)
2726                 mnt_flags |= MNT_NOEXEC;
2727         if (flags & MS_NOATIME)
2728                 mnt_flags |= MNT_NOATIME;
2729         if (flags & MS_NODIRATIME)
2730                 mnt_flags |= MNT_NODIRATIME;
2731         if (flags & MS_STRICTATIME)
2732                 mnt_flags &= ~(MNT_RELATIME | MNT_NOATIME);
2733         if (flags & MS_RDONLY)
2734                 mnt_flags |= MNT_READONLY;
2735
2736         /* The default atime for remount is preservation */
2737         if ((flags & MS_REMOUNT) &&
2738             ((flags & (MS_NOATIME | MS_NODIRATIME | MS_RELATIME |
2739                        MS_STRICTATIME)) == 0)) {
2740                 mnt_flags &= ~MNT_ATIME_MASK;
2741                 mnt_flags |= path.mnt->mnt_flags & MNT_ATIME_MASK;
2742         }
2743
2744         flags &= ~(MS_NOSUID | MS_NOEXEC | MS_NODEV | MS_ACTIVE | MS_BORN |
2745                    MS_NOATIME | MS_NODIRATIME | MS_RELATIME| MS_KERNMOUNT |
2746                    MS_STRICTATIME);
2747
2748         if (flags & MS_REMOUNT)
2749                 retval = do_remount(&path, flags & ~MS_REMOUNT, mnt_flags,
2750                                     data_page);
2751         else if (flags & MS_BIND)
2752                 retval = do_loopback(&path, dev_name, flags & MS_REC);
2753         else if (flags & (MS_SHARED | MS_PRIVATE | MS_SLAVE | MS_UNBINDABLE))
2754                 retval = do_change_type(&path, flags);
2755         else if (flags & MS_MOVE)
2756                 retval = do_move_mount(&path, dev_name);
2757         else
2758                 retval = do_new_mount(&path, type_page, flags, mnt_flags,
2759                                       dev_name, data_page);
2760 dput_out:
2761         path_put(&path);
2762         return retval;
2763 }
2764
2765 static void free_mnt_ns(struct mnt_namespace *ns)
2766 {
2767         ns_free_inum(&ns->ns);
2768         put_user_ns(ns->user_ns);
2769         kfree(ns);
2770 }
2771
2772 /*
2773  * Assign a sequence number so we can detect when we attempt to bind
2774  * mount a reference to an older mount namespace into the current
2775  * mount namespace, preventing reference counting loops.  A 64bit
2776  * number incrementing at 10Ghz will take 12,427 years to wrap which
2777  * is effectively never, so we can ignore the possibility.
2778  */
2779 static atomic64_t mnt_ns_seq = ATOMIC64_INIT(1);
2780
2781 static struct mnt_namespace *alloc_mnt_ns(struct user_namespace *user_ns)
2782 {
2783         struct mnt_namespace *new_ns;
2784         int ret;
2785
2786         new_ns = kmalloc(sizeof(struct mnt_namespace), GFP_KERNEL);
2787         if (!new_ns)
2788                 return ERR_PTR(-ENOMEM);
2789         ret = ns_alloc_inum(&new_ns->ns);
2790         if (ret) {
2791                 kfree(new_ns);
2792                 return ERR_PTR(ret);
2793         }
2794         new_ns->ns.ops = &mntns_operations;
2795         new_ns->seq = atomic64_add_return(1, &mnt_ns_seq);
2796         atomic_set(&new_ns->count, 1);
2797         new_ns->root = NULL;
2798         INIT_LIST_HEAD(&new_ns->list);
2799         init_waitqueue_head(&new_ns->poll);
2800         new_ns->event = 0;
2801         new_ns->user_ns = get_user_ns(user_ns);
2802         return new_ns;
2803 }
2804
2805 struct mnt_namespace *copy_mnt_ns(unsigned long flags, struct mnt_namespace *ns,
2806                 struct user_namespace *user_ns, struct fs_struct *new_fs)
2807 {
2808         struct mnt_namespace *new_ns;
2809         struct vfsmount *rootmnt = NULL, *pwdmnt = NULL;
2810         struct mount *p, *q;
2811         struct mount *old;
2812         struct mount *new;
2813         int copy_flags;
2814
2815         BUG_ON(!ns);
2816
2817         if (likely(!(flags & CLONE_NEWNS))) {
2818                 get_mnt_ns(ns);
2819                 return ns;
2820         }
2821
2822         old = ns->root;
2823
2824         new_ns = alloc_mnt_ns(user_ns);
2825         if (IS_ERR(new_ns))
2826                 return new_ns;
2827
2828         namespace_lock();
2829         /* First pass: copy the tree topology */
2830         copy_flags = CL_COPY_UNBINDABLE | CL_EXPIRE;
2831         if (user_ns != ns->user_ns)
2832                 copy_flags |= CL_SHARED_TO_SLAVE | CL_UNPRIVILEGED;
2833         new = copy_tree(old, old->mnt.mnt_root, copy_flags);
2834         if (IS_ERR(new)) {
2835                 namespace_unlock();
2836                 free_mnt_ns(new_ns);
2837                 return ERR_CAST(new);
2838         }
2839         new_ns->root = new;
2840         list_add_tail(&new_ns->list, &new->mnt_list);
2841
2842         /*
2843          * Second pass: switch the tsk->fs->* elements and mark new vfsmounts
2844          * as belonging to new namespace.  We have already acquired a private
2845          * fs_struct, so tsk->fs->lock is not needed.
2846          */
2847         p = old;
2848         q = new;
2849         while (p) {
2850                 q->mnt_ns = new_ns;
2851                 if (new_fs) {
2852                         if (&p->mnt == new_fs->root.mnt) {
2853                                 new_fs->root.mnt = mntget(&q->mnt);
2854                                 rootmnt = &p->mnt;
2855                         }
2856                         if (&p->mnt == new_fs->pwd.mnt) {
2857                                 new_fs->pwd.mnt = mntget(&q->mnt);
2858                                 pwdmnt = &p->mnt;
2859                         }
2860                 }
2861                 p = next_mnt(p, old);
2862                 q = next_mnt(q, new);
2863                 if (!q)
2864                         break;
2865                 while (p->mnt.mnt_root != q->mnt.mnt_root)
2866                         p = next_mnt(p, old);
2867         }
2868         namespace_unlock();
2869
2870         if (rootmnt)
2871                 mntput(rootmnt);
2872         if (pwdmnt)
2873                 mntput(pwdmnt);
2874
2875         return new_ns;
2876 }
2877
2878 /**
2879  * create_mnt_ns - creates a private namespace and adds a root filesystem
2880  * @mnt: pointer to the new root filesystem mountpoint
2881  */
2882 static struct mnt_namespace *create_mnt_ns(struct vfsmount *m)
2883 {
2884         struct mnt_namespace *new_ns = alloc_mnt_ns(&init_user_ns);
2885         if (!IS_ERR(new_ns)) {
2886                 struct mount *mnt = real_mount(m);
2887                 mnt->mnt_ns = new_ns;
2888                 new_ns->root = mnt;
2889                 list_add(&mnt->mnt_list, &new_ns->list);
2890         } else {
2891                 mntput(m);
2892         }
2893         return new_ns;
2894 }
2895
2896 struct dentry *mount_subtree(struct vfsmount *mnt, const char *name)
2897 {
2898         struct mnt_namespace *ns;
2899         struct super_block *s;
2900         struct path path;
2901         int err;
2902
2903         ns = create_mnt_ns(mnt);
2904         if (IS_ERR(ns))
2905                 return ERR_CAST(ns);
2906
2907         err = vfs_path_lookup(mnt->mnt_root, mnt,
2908                         name, LOOKUP_FOLLOW|LOOKUP_AUTOMOUNT, &path);
2909
2910         put_mnt_ns(ns);
2911
2912         if (err)
2913                 return ERR_PTR(err);
2914
2915         /* trade a vfsmount reference for active sb one */
2916         s = path.mnt->mnt_sb;
2917         atomic_inc(&s->s_active);
2918         mntput(path.mnt);
2919         /* lock the sucker */
2920         down_write(&s->s_umount);
2921         /* ... and return the root of (sub)tree on it */
2922         return path.dentry;
2923 }
2924 EXPORT_SYMBOL(mount_subtree);
2925
2926 SYSCALL_DEFINE5(mount, char __user *, dev_name, char __user *, dir_name,
2927                 char __user *, type, unsigned long, flags, void __user *, data)
2928 {
2929         int ret;
2930         char *kernel_type;
2931         char *kernel_dev;
2932         unsigned long data_page;
2933
2934         kernel_type = copy_mount_string(type);
2935         ret = PTR_ERR(kernel_type);
2936         if (IS_ERR(kernel_type))
2937                 goto out_type;
2938
2939         kernel_dev = copy_mount_string(dev_name);
2940         ret = PTR_ERR(kernel_dev);
2941         if (IS_ERR(kernel_dev))
2942                 goto out_dev;
2943
2944         ret = copy_mount_options(data, &data_page);
2945         if (ret < 0)
2946                 goto out_data;
2947
2948         ret = do_mount(kernel_dev, dir_name, kernel_type, flags,
2949                 (void *) data_page);
2950
2951         free_page(data_page);
2952 out_data:
2953         kfree(kernel_dev);
2954 out_dev:
2955         kfree(kernel_type);
2956 out_type:
2957         return ret;
2958 }
2959
2960 /*
2961  * Return true if path is reachable from root
2962  *
2963  * namespace_sem or mount_lock is held
2964  */
2965 bool is_path_reachable(struct mount *mnt, struct dentry *dentry,
2966                          const struct path *root)
2967 {
2968         while (&mnt->mnt != root->mnt && mnt_has_parent(mnt)) {
2969                 dentry = mnt->mnt_mountpoint;
2970                 mnt = mnt->mnt_parent;
2971         }
2972         return &mnt->mnt == root->mnt && is_subdir(dentry, root->dentry);
2973 }
2974
2975 int path_is_under(struct path *path1, struct path *path2)
2976 {
2977         int res;
2978         read_seqlock_excl(&mount_lock);
2979         res = is_path_reachable(real_mount(path1->mnt), path1->dentry, path2);
2980         read_sequnlock_excl(&mount_lock);
2981         return res;
2982 }
2983 EXPORT_SYMBOL(path_is_under);
2984
2985 /*
2986  * pivot_root Semantics:
2987  * Moves the root file system of the current process to the directory put_old,
2988  * makes new_root as the new root file system of the current process, and sets
2989  * root/cwd of all processes which had them on the current root to new_root.
2990  *
2991  * Restrictions:
2992  * The new_root and put_old must be directories, and  must not be on the
2993  * same file  system as the current process root. The put_old  must  be
2994  * underneath new_root,  i.e. adding a non-zero number of /.. to the string
2995  * pointed to by put_old must yield the same directory as new_root. No other
2996  * file system may be mounted on put_old. After all, new_root is a mountpoint.
2997  *
2998  * Also, the current root cannot be on the 'rootfs' (initial ramfs) filesystem.
2999  * See Documentation/filesystems/ramfs-rootfs-initramfs.txt for alternatives
3000  * in this situation.
3001  *
3002  * Notes:
3003  *  - we don't move root/cwd if they are not at the root (reason: if something
3004  *    cared enough to change them, it's probably wrong to force them elsewhere)
3005  *  - it's okay to pick a root that isn't the root of a file system, e.g.
3006  *    /nfs/my_root where /nfs is the mount point. It must be a mountpoint,
3007  *    though, so you may need to say mount --bind /nfs/my_root /nfs/my_root
3008  *    first.
3009  */
3010 SYSCALL_DEFINE2(pivot_root, const char __user *, new_root,
3011                 const char __user *, put_old)
3012 {
3013         struct path new, old, parent_path, root_parent, root;
3014         struct mount *new_mnt, *root_mnt, *old_mnt;
3015         struct mountpoint *old_mp, *root_mp;
3016         int error;
3017
3018         if (!may_mount())
3019                 return -EPERM;
3020
3021         error = user_path_dir(new_root, &new);
3022         if (error)
3023                 goto out0;
3024
3025         error = user_path_dir(put_old, &old);
3026         if (error)
3027                 goto out1;
3028
3029         error = security_sb_pivotroot(&old, &new);
3030         if (error)
3031                 goto out2;
3032
3033         get_fs_root(current->fs, &root);
3034         old_mp = lock_mount(&old);
3035         error = PTR_ERR(old_mp);
3036         if (IS_ERR(old_mp))
3037                 goto out3;
3038
3039         error = -EINVAL;
3040         new_mnt = real_mount(new.mnt);
3041         root_mnt = real_mount(root.mnt);
3042         old_mnt = real_mount(old.mnt);
3043         if (IS_MNT_SHARED(old_mnt) ||
3044                 IS_MNT_SHARED(new_mnt->mnt_parent) ||
3045                 IS_MNT_SHARED(root_mnt->mnt_parent))
3046                 goto out4;
3047         if (!check_mnt(root_mnt) || !check_mnt(new_mnt))
3048                 goto out4;
3049         if (new_mnt->mnt.mnt_flags & MNT_LOCKED)
3050                 goto out4;
3051         error = -ENOENT;
3052         if (d_unlinked(new.dentry))
3053                 goto out4;
3054         error = -EBUSY;
3055         if (new_mnt == root_mnt || old_mnt == root_mnt)
3056                 goto out4; /* loop, on the same file system  */
3057         error = -EINVAL;
3058         if (root.mnt->mnt_root != root.dentry)
3059                 goto out4; /* not a mountpoint */
3060         if (!mnt_has_parent(root_mnt))
3061                 goto out4; /* not attached */
3062         root_mp = root_mnt->mnt_mp;
3063         if (new.mnt->mnt_root != new.dentry)
3064                 goto out4; /* not a mountpoint */
3065         if (!mnt_has_parent(new_mnt))
3066                 goto out4; /* not attached */
3067         /* make sure we can reach put_old from new_root */
3068         if (!is_path_reachable(old_mnt, old.dentry, &new))
3069                 goto out4;
3070         /* make certain new is below the root */
3071         if (!is_path_reachable(new_mnt, new.dentry, &root))
3072                 goto out4;
3073         root_mp->m_count++; /* pin it so it won't go away */
3074         lock_mount_hash();
3075         detach_mnt(new_mnt, &parent_path);
3076         detach_mnt(root_mnt, &root_parent);
3077         if (root_mnt->mnt.mnt_flags & MNT_LOCKED) {
3078                 new_mnt->mnt.mnt_flags |= MNT_LOCKED;
3079                 root_mnt->mnt.mnt_flags &= ~MNT_LOCKED;
3080         }
3081         /* mount old root on put_old */
3082         attach_mnt(root_mnt, old_mnt, old_mp);
3083         /* mount new_root on / */
3084         attach_mnt(new_mnt, real_mount(root_parent.mnt), root_mp);
3085         touch_mnt_namespace(current->nsproxy->mnt_ns);
3086         /* A moved mount should not expire automatically */
3087         list_del_init(&new_mnt->mnt_expire);
3088         put_mountpoint(root_mp);
3089         unlock_mount_hash();
3090         chroot_fs_refs(&root, &new);
3091         error = 0;
3092 out4:
3093         unlock_mount(old_mp);
3094         if (!error) {
3095                 path_put(&root_parent);
3096                 path_put(&parent_path);
3097         }
3098 out3:
3099         path_put(&root);
3100 out2:
3101         path_put(&old);
3102 out1:
3103         path_put(&new);
3104 out0:
3105         return error;
3106 }
3107
3108 static void __init init_mount_tree(void)
3109 {
3110         struct vfsmount *mnt;
3111         struct mnt_namespace *ns;
3112         struct path root;
3113         struct file_system_type *type;
3114
3115         type = get_fs_type("rootfs");
3116         if (!type)
3117                 panic("Can't find rootfs type");
3118         mnt = vfs_kern_mount(type, 0, "rootfs", NULL);
3119         put_filesystem(type);
3120         if (IS_ERR(mnt))
3121                 panic("Can't create rootfs");
3122
3123         ns = create_mnt_ns(mnt);
3124         if (IS_ERR(ns))
3125                 panic("Can't allocate initial namespace");
3126
3127         init_task.nsproxy->mnt_ns = ns;
3128         get_mnt_ns(ns);
3129
3130         root.mnt = mnt;
3131         root.dentry = mnt->mnt_root;
3132         mnt->mnt_flags |= MNT_LOCKED;
3133
3134         set_fs_pwd(current->fs, &root);
3135         set_fs_root(current->fs, &root);
3136 }
3137
3138 void __init mnt_init(void)
3139 {
3140         unsigned u;
3141         int err;
3142
3143         mnt_cache = kmem_cache_create("mnt_cache", sizeof(struct mount),
3144                         0, SLAB_HWCACHE_ALIGN | SLAB_PANIC, NULL);
3145
3146         mount_hashtable = alloc_large_system_hash("Mount-cache",
3147                                 sizeof(struct hlist_head),
3148                                 mhash_entries, 19,
3149                                 0,
3150                                 &m_hash_shift, &m_hash_mask, 0, 0);
3151         mountpoint_hashtable = alloc_large_system_hash("Mountpoint-cache",
3152                                 sizeof(struct hlist_head),
3153                                 mphash_entries, 19,
3154                                 0,
3155                                 &mp_hash_shift, &mp_hash_mask, 0, 0);
3156
3157         if (!mount_hashtable || !mountpoint_hashtable)
3158                 panic("Failed to allocate mount hash table\n");
3159
3160         for (u = 0; u <= m_hash_mask; u++)
3161                 INIT_HLIST_HEAD(&mount_hashtable[u]);
3162         for (u = 0; u <= mp_hash_mask; u++)
3163                 INIT_HLIST_HEAD(&mountpoint_hashtable[u]);
3164
3165         kernfs_init();
3166
3167         err = sysfs_init();
3168         if (err)
3169                 printk(KERN_WARNING "%s: sysfs_init error: %d\n",
3170                         __func__, err);
3171         fs_kobj = kobject_create_and_add("fs", NULL);
3172         if (!fs_kobj)
3173                 printk(KERN_WARNING "%s: kobj create error\n", __func__);
3174         init_rootfs();
3175         init_mount_tree();
3176 }
3177
3178 void put_mnt_ns(struct mnt_namespace *ns)
3179 {
3180         if (!atomic_dec_and_test(&ns->count))
3181                 return;
3182         drop_collected_mounts(&ns->root->mnt);
3183         free_mnt_ns(ns);
3184 }
3185
3186 struct vfsmount *kern_mount_data(struct file_system_type *type, void *data)
3187 {
3188         struct vfsmount *mnt;
3189         mnt = vfs_kern_mount(type, MS_KERNMOUNT, type->name, data);
3190         if (!IS_ERR(mnt)) {
3191                 /*
3192                  * it is a longterm mount, don't release mnt until
3193                  * we unmount before file sys is unregistered
3194                 */
3195                 real_mount(mnt)->mnt_ns = MNT_NS_INTERNAL;
3196         }
3197         return mnt;
3198 }
3199 EXPORT_SYMBOL_GPL(kern_mount_data);
3200
3201 void kern_unmount(struct vfsmount *mnt)
3202 {
3203         /* release long term mount so mount point can be released */
3204         if (!IS_ERR_OR_NULL(mnt)) {
3205                 real_mount(mnt)->mnt_ns = NULL;
3206                 synchronize_rcu();      /* yecchhh... */
3207                 mntput(mnt);
3208         }
3209 }
3210 EXPORT_SYMBOL(kern_unmount);
3211
3212 bool our_mnt(struct vfsmount *mnt)
3213 {
3214         return check_mnt(real_mount(mnt));
3215 }
3216
3217 bool current_chrooted(void)
3218 {
3219         /* Does the current process have a non-standard root */
3220         struct path ns_root;
3221         struct path fs_root;
3222         bool chrooted;
3223
3224         /* Find the namespace root */
3225         ns_root.mnt = &current->nsproxy->mnt_ns->root->mnt;
3226         ns_root.dentry = ns_root.mnt->mnt_root;
3227         path_get(&ns_root);
3228         while (d_mountpoint(ns_root.dentry) && follow_down_one(&ns_root))
3229                 ;
3230
3231         get_fs_root(current->fs, &fs_root);
3232
3233         chrooted = !path_equal(&fs_root, &ns_root);
3234
3235         path_put(&fs_root);
3236         path_put(&ns_root);
3237
3238         return chrooted;
3239 }
3240
3241 static bool fs_fully_visible(struct file_system_type *type, int *new_mnt_flags)
3242 {
3243         struct mnt_namespace *ns = current->nsproxy->mnt_ns;
3244         int new_flags = *new_mnt_flags;
3245         struct mount *mnt;
3246         bool visible = false;
3247
3248         if (unlikely(!ns))
3249                 return false;
3250
3251         down_read(&namespace_sem);
3252         list_for_each_entry(mnt, &ns->list, mnt_list) {
3253                 struct mount *child;
3254                 int mnt_flags;
3255
3256                 if (mnt->mnt.mnt_sb->s_type != type)
3257                         continue;
3258
3259                 /* This mount is not fully visible if it's root directory
3260                  * is not the root directory of the filesystem.
3261                  */
3262                 if (mnt->mnt.mnt_root != mnt->mnt.mnt_sb->s_root)
3263                         continue;
3264
3265                 /* Read the mount flags and filter out flags that
3266                  * may safely be ignored.
3267                  */
3268                 mnt_flags = mnt->mnt.mnt_flags;
3269                 if (mnt->mnt.mnt_sb->s_iflags & SB_I_NOEXEC)
3270                         mnt_flags &= ~(MNT_LOCK_NOSUID | MNT_LOCK_NOEXEC);
3271
3272                 /* Don't miss readonly hidden in the superblock flags */
3273                 if (mnt->mnt.mnt_sb->s_flags & MS_RDONLY)
3274                         mnt_flags |= MNT_LOCK_READONLY;
3275
3276                 /* Verify the mount flags are equal to or more permissive
3277                  * than the proposed new mount.
3278                  */
3279                 if ((mnt_flags & MNT_LOCK_READONLY) &&
3280                     !(new_flags & MNT_READONLY))
3281                         continue;
3282                 if ((mnt_flags & MNT_LOCK_NODEV) &&
3283                     !(new_flags & MNT_NODEV))
3284                         continue;
3285                 if ((mnt_flags & MNT_LOCK_NOSUID) &&
3286                     !(new_flags & MNT_NOSUID))
3287                         continue;
3288                 if ((mnt_flags & MNT_LOCK_NOEXEC) &&
3289                     !(new_flags & MNT_NOEXEC))
3290                         continue;
3291                 if ((mnt_flags & MNT_LOCK_ATIME) &&
3292                     ((mnt_flags & MNT_ATIME_MASK) != (new_flags & MNT_ATIME_MASK)))
3293                         continue;
3294
3295                 /* This mount is not fully visible if there are any
3296                  * locked child mounts that cover anything except for
3297                  * empty directories.
3298                  */
3299                 list_for_each_entry(child, &mnt->mnt_mounts, mnt_child) {
3300                         struct inode *inode = child->mnt_mountpoint->d_inode;
3301                         /* Only worry about locked mounts */
3302                         if (!(child->mnt.mnt_flags & MNT_LOCKED))
3303                                 continue;
3304                         /* Is the directory permanetly empty? */
3305                         if (!is_empty_dir_inode(inode))
3306                                 goto next;
3307                 }
3308                 /* Preserve the locked attributes */
3309                 *new_mnt_flags |= mnt_flags & (MNT_LOCK_READONLY | \
3310                                                MNT_LOCK_NODEV    | \
3311                                                MNT_LOCK_NOSUID   | \
3312                                                MNT_LOCK_NOEXEC   | \
3313                                                MNT_LOCK_ATIME);
3314                 visible = true;
3315                 goto found;
3316         next:   ;
3317         }
3318 found:
3319         up_read(&namespace_sem);
3320         return visible;
3321 }
3322
3323 static struct ns_common *mntns_get(struct task_struct *task)
3324 {
3325         struct ns_common *ns = NULL;
3326         struct nsproxy *nsproxy;
3327
3328         task_lock(task);
3329         nsproxy = task->nsproxy;
3330         if (nsproxy) {
3331                 ns = &nsproxy->mnt_ns->ns;
3332                 get_mnt_ns(to_mnt_ns(ns));
3333         }
3334         task_unlock(task);
3335
3336         return ns;
3337 }
3338
3339 static void mntns_put(struct ns_common *ns)
3340 {
3341         put_mnt_ns(to_mnt_ns(ns));
3342 }
3343
3344 static int mntns_install(struct nsproxy *nsproxy, struct ns_common *ns)
3345 {
3346         struct fs_struct *fs = current->fs;
3347         struct mnt_namespace *mnt_ns = to_mnt_ns(ns);
3348         struct path root;
3349
3350         if (!ns_capable(mnt_ns->user_ns, CAP_SYS_ADMIN) ||
3351             !ns_capable(current_user_ns(), CAP_SYS_CHROOT) ||
3352             !ns_capable(current_user_ns(), CAP_SYS_ADMIN))
3353                 return -EPERM;
3354
3355         if (fs->users != 1)
3356                 return -EINVAL;
3357
3358         get_mnt_ns(mnt_ns);
3359         put_mnt_ns(nsproxy->mnt_ns);
3360         nsproxy->mnt_ns = mnt_ns;
3361
3362         /* Find the root */
3363         root.mnt    = &mnt_ns->root->mnt;
3364         root.dentry = mnt_ns->root->mnt.mnt_root;
3365         path_get(&root);
3366         while(d_mountpoint(root.dentry) && follow_down_one(&root))
3367                 ;
3368
3369         /* Update the pwd and root */
3370         set_fs_pwd(fs, &root);
3371         set_fs_root(fs, &root);
3372
3373         path_put(&root);
3374         return 0;
3375 }
3376
3377 const struct proc_ns_operations mntns_operations = {
3378         .name           = "mnt",
3379         .type           = CLONE_NEWNS,
3380         .get            = mntns_get,
3381         .put            = mntns_put,
3382         .install        = mntns_install,
3383 };