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