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