]> git.karo-electronics.de Git - karo-tx-linux.git/blob - fs/dcache.c
vfs: introduce d_instantiate_no_diralias()
[karo-tx-linux.git] / fs / dcache.c
1 /*
2  * fs/dcache.c
3  *
4  * Complete reimplementation
5  * (C) 1997 Thomas Schoebel-Theuer,
6  * with heavy changes by Linus Torvalds
7  */
8
9 /*
10  * Notes on the allocation strategy:
11  *
12  * The dcache is a master of the icache - whenever a dcache entry
13  * exists, the inode will always exist. "iput()" is done either when
14  * the dcache entry is deleted or garbage collected.
15  */
16
17 #include <linux/syscalls.h>
18 #include <linux/string.h>
19 #include <linux/mm.h>
20 #include <linux/fs.h>
21 #include <linux/fsnotify.h>
22 #include <linux/slab.h>
23 #include <linux/init.h>
24 #include <linux/hash.h>
25 #include <linux/cache.h>
26 #include <linux/export.h>
27 #include <linux/mount.h>
28 #include <linux/file.h>
29 #include <asm/uaccess.h>
30 #include <linux/security.h>
31 #include <linux/seqlock.h>
32 #include <linux/swap.h>
33 #include <linux/bootmem.h>
34 #include <linux/fs_struct.h>
35 #include <linux/hardirq.h>
36 #include <linux/bit_spinlock.h>
37 #include <linux/rculist_bl.h>
38 #include <linux/prefetch.h>
39 #include <linux/ratelimit.h>
40 #include <linux/list_lru.h>
41 #include "internal.h"
42 #include "mount.h"
43
44 /*
45  * Usage:
46  * dcache->d_inode->i_lock protects:
47  *   - i_dentry, d_alias, d_inode of aliases
48  * dcache_hash_bucket lock protects:
49  *   - the dcache hash table
50  * s_anon bl list spinlock protects:
51  *   - the s_anon list (see __d_drop)
52  * dentry->d_sb->s_dentry_lru_lock protects:
53  *   - the dcache lru lists and counters
54  * d_lock protects:
55  *   - d_flags
56  *   - d_name
57  *   - d_lru
58  *   - d_count
59  *   - d_unhashed()
60  *   - d_parent and d_subdirs
61  *   - childrens' d_child and d_parent
62  *   - d_alias, d_inode
63  *
64  * Ordering:
65  * dentry->d_inode->i_lock
66  *   dentry->d_lock
67  *     dentry->d_sb->s_dentry_lru_lock
68  *     dcache_hash_bucket lock
69  *     s_anon lock
70  *
71  * If there is an ancestor relationship:
72  * dentry->d_parent->...->d_parent->d_lock
73  *   ...
74  *     dentry->d_parent->d_lock
75  *       dentry->d_lock
76  *
77  * If no ancestor relationship:
78  * if (dentry1 < dentry2)
79  *   dentry1->d_lock
80  *     dentry2->d_lock
81  */
82 int sysctl_vfs_cache_pressure __read_mostly = 100;
83 EXPORT_SYMBOL_GPL(sysctl_vfs_cache_pressure);
84
85 __cacheline_aligned_in_smp DEFINE_SEQLOCK(rename_lock);
86
87 EXPORT_SYMBOL(rename_lock);
88
89 static struct kmem_cache *dentry_cache __read_mostly;
90
91 /**
92  * read_seqbegin_or_lock - begin a sequence number check or locking block
93  * @lock: sequence lock
94  * @seq : sequence number to be checked
95  *
96  * First try it once optimistically without taking the lock. If that fails,
97  * take the lock. The sequence number is also used as a marker for deciding
98  * whether to be a reader (even) or writer (odd).
99  * N.B. seq must be initialized to an even number to begin with.
100  */
101 static inline void read_seqbegin_or_lock(seqlock_t *lock, int *seq)
102 {
103         if (!(*seq & 1))        /* Even */
104                 *seq = read_seqbegin(lock);
105         else                    /* Odd */
106                 read_seqlock_excl(lock);
107 }
108
109 static inline int need_seqretry(seqlock_t *lock, int seq)
110 {
111         return !(seq & 1) && read_seqretry(lock, seq);
112 }
113
114 static inline void done_seqretry(seqlock_t *lock, int seq)
115 {
116         if (seq & 1)
117                 read_sequnlock_excl(lock);
118 }
119
120 /*
121  * This is the single most critical data structure when it comes
122  * to the dcache: the hashtable for lookups. Somebody should try
123  * to make this good - I've just made it work.
124  *
125  * This hash-function tries to avoid losing too many bits of hash
126  * information, yet avoid using a prime hash-size or similar.
127  */
128 #define D_HASHBITS     d_hash_shift
129 #define D_HASHMASK     d_hash_mask
130
131 static unsigned int d_hash_mask __read_mostly;
132 static unsigned int d_hash_shift __read_mostly;
133
134 static struct hlist_bl_head *dentry_hashtable __read_mostly;
135
136 static inline struct hlist_bl_head *d_hash(const struct dentry *parent,
137                                         unsigned int hash)
138 {
139         hash += (unsigned long) parent / L1_CACHE_BYTES;
140         hash = hash + (hash >> D_HASHBITS);
141         return dentry_hashtable + (hash & D_HASHMASK);
142 }
143
144 /* Statistics gathering. */
145 struct dentry_stat_t dentry_stat = {
146         .age_limit = 45,
147 };
148
149 static DEFINE_PER_CPU(long, nr_dentry);
150 static DEFINE_PER_CPU(long, nr_dentry_unused);
151
152 #if defined(CONFIG_SYSCTL) && defined(CONFIG_PROC_FS)
153
154 /*
155  * Here we resort to our own counters instead of using generic per-cpu counters
156  * for consistency with what the vfs inode code does. We are expected to harvest
157  * better code and performance by having our own specialized counters.
158  *
159  * Please note that the loop is done over all possible CPUs, not over all online
160  * CPUs. The reason for this is that we don't want to play games with CPUs going
161  * on and off. If one of them goes off, we will just keep their counters.
162  *
163  * glommer: See cffbc8a for details, and if you ever intend to change this,
164  * please update all vfs counters to match.
165  */
166 static long get_nr_dentry(void)
167 {
168         int i;
169         long sum = 0;
170         for_each_possible_cpu(i)
171                 sum += per_cpu(nr_dentry, i);
172         return sum < 0 ? 0 : sum;
173 }
174
175 static long get_nr_dentry_unused(void)
176 {
177         int i;
178         long sum = 0;
179         for_each_possible_cpu(i)
180                 sum += per_cpu(nr_dentry_unused, i);
181         return sum < 0 ? 0 : sum;
182 }
183
184 int proc_nr_dentry(ctl_table *table, int write, void __user *buffer,
185                    size_t *lenp, loff_t *ppos)
186 {
187         dentry_stat.nr_dentry = get_nr_dentry();
188         dentry_stat.nr_unused = get_nr_dentry_unused();
189         return proc_doulongvec_minmax(table, write, buffer, lenp, ppos);
190 }
191 #endif
192
193 /*
194  * Compare 2 name strings, return 0 if they match, otherwise non-zero.
195  * The strings are both count bytes long, and count is non-zero.
196  */
197 #ifdef CONFIG_DCACHE_WORD_ACCESS
198
199 #include <asm/word-at-a-time.h>
200 /*
201  * NOTE! 'cs' and 'scount' come from a dentry, so it has a
202  * aligned allocation for this particular component. We don't
203  * strictly need the load_unaligned_zeropad() safety, but it
204  * doesn't hurt either.
205  *
206  * In contrast, 'ct' and 'tcount' can be from a pathname, and do
207  * need the careful unaligned handling.
208  */
209 static inline int dentry_string_cmp(const unsigned char *cs, const unsigned char *ct, unsigned tcount)
210 {
211         unsigned long a,b,mask;
212
213         for (;;) {
214                 a = *(unsigned long *)cs;
215                 b = load_unaligned_zeropad(ct);
216                 if (tcount < sizeof(unsigned long))
217                         break;
218                 if (unlikely(a != b))
219                         return 1;
220                 cs += sizeof(unsigned long);
221                 ct += sizeof(unsigned long);
222                 tcount -= sizeof(unsigned long);
223                 if (!tcount)
224                         return 0;
225         }
226         mask = ~(~0ul << tcount*8);
227         return unlikely(!!((a ^ b) & mask));
228 }
229
230 #else
231
232 static inline int dentry_string_cmp(const unsigned char *cs, const unsigned char *ct, unsigned tcount)
233 {
234         do {
235                 if (*cs != *ct)
236                         return 1;
237                 cs++;
238                 ct++;
239                 tcount--;
240         } while (tcount);
241         return 0;
242 }
243
244 #endif
245
246 static inline int dentry_cmp(const struct dentry *dentry, const unsigned char *ct, unsigned tcount)
247 {
248         const unsigned char *cs;
249         /*
250          * Be careful about RCU walk racing with rename:
251          * use ACCESS_ONCE to fetch the name pointer.
252          *
253          * NOTE! Even if a rename will mean that the length
254          * was not loaded atomically, we don't care. The
255          * RCU walk will check the sequence count eventually,
256          * and catch it. And we won't overrun the buffer,
257          * because we're reading the name pointer atomically,
258          * and a dentry name is guaranteed to be properly
259          * terminated with a NUL byte.
260          *
261          * End result: even if 'len' is wrong, we'll exit
262          * early because the data cannot match (there can
263          * be no NUL in the ct/tcount data)
264          */
265         cs = ACCESS_ONCE(dentry->d_name.name);
266         smp_read_barrier_depends();
267         return dentry_string_cmp(cs, ct, tcount);
268 }
269
270 static void __d_free(struct rcu_head *head)
271 {
272         struct dentry *dentry = container_of(head, struct dentry, d_u.d_rcu);
273
274         WARN_ON(!hlist_unhashed(&dentry->d_alias));
275         if (dname_external(dentry))
276                 kfree(dentry->d_name.name);
277         kmem_cache_free(dentry_cache, dentry); 
278 }
279
280 /*
281  * no locks, please.
282  */
283 static void d_free(struct dentry *dentry)
284 {
285         BUG_ON((int)dentry->d_lockref.count > 0);
286         this_cpu_dec(nr_dentry);
287         if (dentry->d_op && dentry->d_op->d_release)
288                 dentry->d_op->d_release(dentry);
289
290         /* if dentry was never visible to RCU, immediate free is OK */
291         if (!(dentry->d_flags & DCACHE_RCUACCESS))
292                 __d_free(&dentry->d_u.d_rcu);
293         else
294                 call_rcu(&dentry->d_u.d_rcu, __d_free);
295 }
296
297 /**
298  * dentry_rcuwalk_barrier - invalidate in-progress rcu-walk lookups
299  * @dentry: the target dentry
300  * After this call, in-progress rcu-walk path lookup will fail. This
301  * should be called after unhashing, and after changing d_inode (if
302  * the dentry has not already been unhashed).
303  */
304 static inline void dentry_rcuwalk_barrier(struct dentry *dentry)
305 {
306         assert_spin_locked(&dentry->d_lock);
307         /* Go through a barrier */
308         write_seqcount_barrier(&dentry->d_seq);
309 }
310
311 /*
312  * Release the dentry's inode, using the filesystem
313  * d_iput() operation if defined. Dentry has no refcount
314  * and is unhashed.
315  */
316 static void dentry_iput(struct dentry * dentry)
317         __releases(dentry->d_lock)
318         __releases(dentry->d_inode->i_lock)
319 {
320         struct inode *inode = dentry->d_inode;
321         if (inode) {
322                 dentry->d_inode = NULL;
323                 hlist_del_init(&dentry->d_alias);
324                 spin_unlock(&dentry->d_lock);
325                 spin_unlock(&inode->i_lock);
326                 if (!inode->i_nlink)
327                         fsnotify_inoderemove(inode);
328                 if (dentry->d_op && dentry->d_op->d_iput)
329                         dentry->d_op->d_iput(dentry, inode);
330                 else
331                         iput(inode);
332         } else {
333                 spin_unlock(&dentry->d_lock);
334         }
335 }
336
337 /*
338  * Release the dentry's inode, using the filesystem
339  * d_iput() operation if defined. dentry remains in-use.
340  */
341 static void dentry_unlink_inode(struct dentry * dentry)
342         __releases(dentry->d_lock)
343         __releases(dentry->d_inode->i_lock)
344 {
345         struct inode *inode = dentry->d_inode;
346         dentry->d_inode = NULL;
347         hlist_del_init(&dentry->d_alias);
348         dentry_rcuwalk_barrier(dentry);
349         spin_unlock(&dentry->d_lock);
350         spin_unlock(&inode->i_lock);
351         if (!inode->i_nlink)
352                 fsnotify_inoderemove(inode);
353         if (dentry->d_op && dentry->d_op->d_iput)
354                 dentry->d_op->d_iput(dentry, inode);
355         else
356                 iput(inode);
357 }
358
359 /*
360  * The DCACHE_LRU_LIST bit is set whenever the 'd_lru' entry
361  * is in use - which includes both the "real" per-superblock
362  * LRU list _and_ the DCACHE_SHRINK_LIST use.
363  *
364  * The DCACHE_SHRINK_LIST bit is set whenever the dentry is
365  * on the shrink list (ie not on the superblock LRU list).
366  *
367  * The per-cpu "nr_dentry_unused" counters are updated with
368  * the DCACHE_LRU_LIST bit.
369  *
370  * These helper functions make sure we always follow the
371  * rules. d_lock must be held by the caller.
372  */
373 #define D_FLAG_VERIFY(dentry,x) WARN_ON_ONCE(((dentry)->d_flags & (DCACHE_LRU_LIST | DCACHE_SHRINK_LIST)) != (x))
374 static void d_lru_add(struct dentry *dentry)
375 {
376         D_FLAG_VERIFY(dentry, 0);
377         dentry->d_flags |= DCACHE_LRU_LIST;
378         this_cpu_inc(nr_dentry_unused);
379         WARN_ON_ONCE(!list_lru_add(&dentry->d_sb->s_dentry_lru, &dentry->d_lru));
380 }
381
382 static void d_lru_del(struct dentry *dentry)
383 {
384         D_FLAG_VERIFY(dentry, DCACHE_LRU_LIST);
385         dentry->d_flags &= ~DCACHE_LRU_LIST;
386         this_cpu_dec(nr_dentry_unused);
387         WARN_ON_ONCE(!list_lru_del(&dentry->d_sb->s_dentry_lru, &dentry->d_lru));
388 }
389
390 static void d_shrink_del(struct dentry *dentry)
391 {
392         D_FLAG_VERIFY(dentry, DCACHE_SHRINK_LIST | DCACHE_LRU_LIST);
393         list_del_init(&dentry->d_lru);
394         dentry->d_flags &= ~(DCACHE_SHRINK_LIST | DCACHE_LRU_LIST);
395         this_cpu_dec(nr_dentry_unused);
396 }
397
398 static void d_shrink_add(struct dentry *dentry, struct list_head *list)
399 {
400         D_FLAG_VERIFY(dentry, 0);
401         list_add(&dentry->d_lru, list);
402         dentry->d_flags |= DCACHE_SHRINK_LIST | DCACHE_LRU_LIST;
403         this_cpu_inc(nr_dentry_unused);
404 }
405
406 /*
407  * These can only be called under the global LRU lock, ie during the
408  * callback for freeing the LRU list. "isolate" removes it from the
409  * LRU lists entirely, while shrink_move moves it to the indicated
410  * private list.
411  */
412 static void d_lru_isolate(struct dentry *dentry)
413 {
414         D_FLAG_VERIFY(dentry, DCACHE_LRU_LIST);
415         dentry->d_flags &= ~DCACHE_LRU_LIST;
416         this_cpu_dec(nr_dentry_unused);
417         list_del_init(&dentry->d_lru);
418 }
419
420 static void d_lru_shrink_move(struct dentry *dentry, struct list_head *list)
421 {
422         D_FLAG_VERIFY(dentry, DCACHE_LRU_LIST);
423         dentry->d_flags |= DCACHE_SHRINK_LIST;
424         list_move_tail(&dentry->d_lru, list);
425 }
426
427 /*
428  * dentry_lru_(add|del)_list) must be called with d_lock held.
429  */
430 static void dentry_lru_add(struct dentry *dentry)
431 {
432         if (unlikely(!(dentry->d_flags & DCACHE_LRU_LIST)))
433                 d_lru_add(dentry);
434 }
435
436 /*
437  * Remove a dentry with references from the LRU.
438  *
439  * If we are on the shrink list, then we can get to try_prune_one_dentry() and
440  * lose our last reference through the parent walk. In this case, we need to
441  * remove ourselves from the shrink list, not the LRU.
442  */
443 static void dentry_lru_del(struct dentry *dentry)
444 {
445         if (dentry->d_flags & DCACHE_LRU_LIST) {
446                 if (dentry->d_flags & DCACHE_SHRINK_LIST)
447                         return d_shrink_del(dentry);
448                 d_lru_del(dentry);
449         }
450 }
451
452 /**
453  * d_kill - kill dentry and return parent
454  * @dentry: dentry to kill
455  * @parent: parent dentry
456  *
457  * The dentry must already be unhashed and removed from the LRU.
458  *
459  * If this is the root of the dentry tree, return NULL.
460  *
461  * dentry->d_lock and parent->d_lock must be held by caller, and are dropped by
462  * d_kill.
463  */
464 static struct dentry *d_kill(struct dentry *dentry, struct dentry *parent)
465         __releases(dentry->d_lock)
466         __releases(parent->d_lock)
467         __releases(dentry->d_inode->i_lock)
468 {
469         list_del(&dentry->d_u.d_child);
470         /*
471          * Inform try_to_ascend() that we are no longer attached to the
472          * dentry tree
473          */
474         dentry->d_flags |= DCACHE_DENTRY_KILLED;
475         if (parent)
476                 spin_unlock(&parent->d_lock);
477         dentry_iput(dentry);
478         /*
479          * dentry_iput drops the locks, at which point nobody (except
480          * transient RCU lookups) can reach this dentry.
481          */
482         d_free(dentry);
483         return parent;
484 }
485
486 /*
487  * Unhash a dentry without inserting an RCU walk barrier or checking that
488  * dentry->d_lock is locked.  The caller must take care of that, if
489  * appropriate.
490  */
491 static void __d_shrink(struct dentry *dentry)
492 {
493         if (!d_unhashed(dentry)) {
494                 struct hlist_bl_head *b;
495                 if (unlikely(dentry->d_flags & DCACHE_DISCONNECTED))
496                         b = &dentry->d_sb->s_anon;
497                 else
498                         b = d_hash(dentry->d_parent, dentry->d_name.hash);
499
500                 hlist_bl_lock(b);
501                 __hlist_bl_del(&dentry->d_hash);
502                 dentry->d_hash.pprev = NULL;
503                 hlist_bl_unlock(b);
504         }
505 }
506
507 /**
508  * d_drop - drop a dentry
509  * @dentry: dentry to drop
510  *
511  * d_drop() unhashes the entry from the parent dentry hashes, so that it won't
512  * be found through a VFS lookup any more. Note that this is different from
513  * deleting the dentry - d_delete will try to mark the dentry negative if
514  * possible, giving a successful _negative_ lookup, while d_drop will
515  * just make the cache lookup fail.
516  *
517  * d_drop() is used mainly for stuff that wants to invalidate a dentry for some
518  * reason (NFS timeouts or autofs deletes).
519  *
520  * __d_drop requires dentry->d_lock.
521  */
522 void __d_drop(struct dentry *dentry)
523 {
524         if (!d_unhashed(dentry)) {
525                 __d_shrink(dentry);
526                 dentry_rcuwalk_barrier(dentry);
527         }
528 }
529 EXPORT_SYMBOL(__d_drop);
530
531 void d_drop(struct dentry *dentry)
532 {
533         spin_lock(&dentry->d_lock);
534         __d_drop(dentry);
535         spin_unlock(&dentry->d_lock);
536 }
537 EXPORT_SYMBOL(d_drop);
538
539 /*
540  * Finish off a dentry we've decided to kill.
541  * dentry->d_lock must be held, returns with it unlocked.
542  * If ref is non-zero, then decrement the refcount too.
543  * Returns dentry requiring refcount drop, or NULL if we're done.
544  */
545 static inline struct dentry *
546 dentry_kill(struct dentry *dentry, int unlock_on_failure)
547         __releases(dentry->d_lock)
548 {
549         struct inode *inode;
550         struct dentry *parent;
551
552         inode = dentry->d_inode;
553         if (inode && !spin_trylock(&inode->i_lock)) {
554 relock:
555                 if (unlock_on_failure) {
556                         spin_unlock(&dentry->d_lock);
557                         cpu_relax();
558                 }
559                 return dentry; /* try again with same dentry */
560         }
561         if (IS_ROOT(dentry))
562                 parent = NULL;
563         else
564                 parent = dentry->d_parent;
565         if (parent && !spin_trylock(&parent->d_lock)) {
566                 if (inode)
567                         spin_unlock(&inode->i_lock);
568                 goto relock;
569         }
570
571         /*
572          * The dentry is now unrecoverably dead to the world.
573          */
574         lockref_mark_dead(&dentry->d_lockref);
575
576         /*
577          * inform the fs via d_prune that this dentry is about to be
578          * unhashed and destroyed.
579          */
580         if ((dentry->d_flags & DCACHE_OP_PRUNE) && !d_unhashed(dentry))
581                 dentry->d_op->d_prune(dentry);
582
583         dentry_lru_del(dentry);
584         /* if it was on the hash then remove it */
585         __d_drop(dentry);
586         return d_kill(dentry, parent);
587 }
588
589 /* 
590  * This is dput
591  *
592  * This is complicated by the fact that we do not want to put
593  * dentries that are no longer on any hash chain on the unused
594  * list: we'd much rather just get rid of them immediately.
595  *
596  * However, that implies that we have to traverse the dentry
597  * tree upwards to the parents which might _also_ now be
598  * scheduled for deletion (it may have been only waiting for
599  * its last child to go away).
600  *
601  * This tail recursion is done by hand as we don't want to depend
602  * on the compiler to always get this right (gcc generally doesn't).
603  * Real recursion would eat up our stack space.
604  */
605
606 /*
607  * dput - release a dentry
608  * @dentry: dentry to release 
609  *
610  * Release a dentry. This will drop the usage count and if appropriate
611  * call the dentry unlink method as well as removing it from the queues and
612  * releasing its resources. If the parent dentries were scheduled for release
613  * they too may now get deleted.
614  */
615 void dput(struct dentry *dentry)
616 {
617         if (unlikely(!dentry))
618                 return;
619
620 repeat:
621         if (lockref_put_or_lock(&dentry->d_lockref))
622                 return;
623
624         /* Unreachable? Get rid of it */
625         if (unlikely(d_unhashed(dentry)))
626                 goto kill_it;
627
628         if (unlikely(dentry->d_flags & DCACHE_OP_DELETE)) {
629                 if (dentry->d_op->d_delete(dentry))
630                         goto kill_it;
631         }
632
633         dentry->d_flags |= DCACHE_REFERENCED;
634         dentry_lru_add(dentry);
635
636         dentry->d_lockref.count--;
637         spin_unlock(&dentry->d_lock);
638         return;
639
640 kill_it:
641         dentry = dentry_kill(dentry, 1);
642         if (dentry)
643                 goto repeat;
644 }
645 EXPORT_SYMBOL(dput);
646
647 /**
648  * d_invalidate - invalidate a dentry
649  * @dentry: dentry to invalidate
650  *
651  * Try to invalidate the dentry if it turns out to be
652  * possible. If there are other dentries that can be
653  * reached through this one we can't delete it and we
654  * return -EBUSY. On success we return 0.
655  *
656  * no dcache lock.
657  */
658  
659 int d_invalidate(struct dentry * dentry)
660 {
661         /*
662          * If it's already been dropped, return OK.
663          */
664         spin_lock(&dentry->d_lock);
665         if (d_unhashed(dentry)) {
666                 spin_unlock(&dentry->d_lock);
667                 return 0;
668         }
669         /*
670          * Check whether to do a partial shrink_dcache
671          * to get rid of unused child entries.
672          */
673         if (!list_empty(&dentry->d_subdirs)) {
674                 spin_unlock(&dentry->d_lock);
675                 shrink_dcache_parent(dentry);
676                 spin_lock(&dentry->d_lock);
677         }
678
679         /*
680          * Somebody else still using it?
681          *
682          * If it's a directory, we can't drop it
683          * for fear of somebody re-populating it
684          * with children (even though dropping it
685          * would make it unreachable from the root,
686          * we might still populate it if it was a
687          * working directory or similar).
688          * We also need to leave mountpoints alone,
689          * directory or not.
690          */
691         if (dentry->d_lockref.count > 1 && dentry->d_inode) {
692                 if (S_ISDIR(dentry->d_inode->i_mode) || d_mountpoint(dentry)) {
693                         spin_unlock(&dentry->d_lock);
694                         return -EBUSY;
695                 }
696         }
697
698         __d_drop(dentry);
699         spin_unlock(&dentry->d_lock);
700         return 0;
701 }
702 EXPORT_SYMBOL(d_invalidate);
703
704 /* This must be called with d_lock held */
705 static inline void __dget_dlock(struct dentry *dentry)
706 {
707         dentry->d_lockref.count++;
708 }
709
710 static inline void __dget(struct dentry *dentry)
711 {
712         lockref_get(&dentry->d_lockref);
713 }
714
715 struct dentry *dget_parent(struct dentry *dentry)
716 {
717         int gotref;
718         struct dentry *ret;
719
720         /*
721          * Do optimistic parent lookup without any
722          * locking.
723          */
724         rcu_read_lock();
725         ret = ACCESS_ONCE(dentry->d_parent);
726         gotref = lockref_get_not_zero(&ret->d_lockref);
727         rcu_read_unlock();
728         if (likely(gotref)) {
729                 if (likely(ret == ACCESS_ONCE(dentry->d_parent)))
730                         return ret;
731                 dput(ret);
732         }
733
734 repeat:
735         /*
736          * Don't need rcu_dereference because we re-check it was correct under
737          * the lock.
738          */
739         rcu_read_lock();
740         ret = dentry->d_parent;
741         spin_lock(&ret->d_lock);
742         if (unlikely(ret != dentry->d_parent)) {
743                 spin_unlock(&ret->d_lock);
744                 rcu_read_unlock();
745                 goto repeat;
746         }
747         rcu_read_unlock();
748         BUG_ON(!ret->d_lockref.count);
749         ret->d_lockref.count++;
750         spin_unlock(&ret->d_lock);
751         return ret;
752 }
753 EXPORT_SYMBOL(dget_parent);
754
755 /**
756  * d_find_alias - grab a hashed alias of inode
757  * @inode: inode in question
758  * @want_discon:  flag, used by d_splice_alias, to request
759  *          that only a DISCONNECTED alias be returned.
760  *
761  * If inode has a hashed alias, or is a directory and has any alias,
762  * acquire the reference to alias and return it. Otherwise return NULL.
763  * Notice that if inode is a directory there can be only one alias and
764  * it can be unhashed only if it has no children, or if it is the root
765  * of a filesystem.
766  *
767  * If the inode has an IS_ROOT, DCACHE_DISCONNECTED alias, then prefer
768  * any other hashed alias over that one unless @want_discon is set,
769  * in which case only return an IS_ROOT, DCACHE_DISCONNECTED alias.
770  */
771 static struct dentry *__d_find_alias(struct inode *inode, int want_discon)
772 {
773         struct dentry *alias, *discon_alias;
774
775 again:
776         discon_alias = NULL;
777         hlist_for_each_entry(alias, &inode->i_dentry, d_alias) {
778                 spin_lock(&alias->d_lock);
779                 if (S_ISDIR(inode->i_mode) || !d_unhashed(alias)) {
780                         if (IS_ROOT(alias) &&
781                             (alias->d_flags & DCACHE_DISCONNECTED)) {
782                                 discon_alias = alias;
783                         } else if (!want_discon) {
784                                 __dget_dlock(alias);
785                                 spin_unlock(&alias->d_lock);
786                                 return alias;
787                         }
788                 }
789                 spin_unlock(&alias->d_lock);
790         }
791         if (discon_alias) {
792                 alias = discon_alias;
793                 spin_lock(&alias->d_lock);
794                 if (S_ISDIR(inode->i_mode) || !d_unhashed(alias)) {
795                         if (IS_ROOT(alias) &&
796                             (alias->d_flags & DCACHE_DISCONNECTED)) {
797                                 __dget_dlock(alias);
798                                 spin_unlock(&alias->d_lock);
799                                 return alias;
800                         }
801                 }
802                 spin_unlock(&alias->d_lock);
803                 goto again;
804         }
805         return NULL;
806 }
807
808 struct dentry *d_find_alias(struct inode *inode)
809 {
810         struct dentry *de = NULL;
811
812         if (!hlist_empty(&inode->i_dentry)) {
813                 spin_lock(&inode->i_lock);
814                 de = __d_find_alias(inode, 0);
815                 spin_unlock(&inode->i_lock);
816         }
817         return de;
818 }
819 EXPORT_SYMBOL(d_find_alias);
820
821 /*
822  *      Try to kill dentries associated with this inode.
823  * WARNING: you must own a reference to inode.
824  */
825 void d_prune_aliases(struct inode *inode)
826 {
827         struct dentry *dentry;
828 restart:
829         spin_lock(&inode->i_lock);
830         hlist_for_each_entry(dentry, &inode->i_dentry, d_alias) {
831                 spin_lock(&dentry->d_lock);
832                 if (!dentry->d_lockref.count) {
833                         /*
834                          * inform the fs via d_prune that this dentry
835                          * is about to be unhashed and destroyed.
836                          */
837                         if ((dentry->d_flags & DCACHE_OP_PRUNE) &&
838                             !d_unhashed(dentry))
839                                 dentry->d_op->d_prune(dentry);
840
841                         __dget_dlock(dentry);
842                         __d_drop(dentry);
843                         spin_unlock(&dentry->d_lock);
844                         spin_unlock(&inode->i_lock);
845                         dput(dentry);
846                         goto restart;
847                 }
848                 spin_unlock(&dentry->d_lock);
849         }
850         spin_unlock(&inode->i_lock);
851 }
852 EXPORT_SYMBOL(d_prune_aliases);
853
854 /*
855  * Try to throw away a dentry - free the inode, dput the parent.
856  * Requires dentry->d_lock is held, and dentry->d_count == 0.
857  * Releases dentry->d_lock.
858  *
859  * This may fail if locks cannot be acquired no problem, just try again.
860  */
861 static struct dentry * try_prune_one_dentry(struct dentry *dentry)
862         __releases(dentry->d_lock)
863 {
864         struct dentry *parent;
865
866         parent = dentry_kill(dentry, 0);
867         /*
868          * If dentry_kill returns NULL, we have nothing more to do.
869          * if it returns the same dentry, trylocks failed. In either
870          * case, just loop again.
871          *
872          * Otherwise, we need to prune ancestors too. This is necessary
873          * to prevent quadratic behavior of shrink_dcache_parent(), but
874          * is also expected to be beneficial in reducing dentry cache
875          * fragmentation.
876          */
877         if (!parent)
878                 return NULL;
879         if (parent == dentry)
880                 return dentry;
881
882         /* Prune ancestors. */
883         dentry = parent;
884         while (dentry) {
885                 if (lockref_put_or_lock(&dentry->d_lockref))
886                         return NULL;
887                 dentry = dentry_kill(dentry, 1);
888         }
889         return NULL;
890 }
891
892 static void shrink_dentry_list(struct list_head *list)
893 {
894         struct dentry *dentry;
895
896         rcu_read_lock();
897         for (;;) {
898                 dentry = list_entry_rcu(list->prev, struct dentry, d_lru);
899                 if (&dentry->d_lru == list)
900                         break; /* empty */
901
902                 /*
903                  * Get the dentry lock, and re-verify that the dentry is
904                  * this on the shrinking list. If it is, we know that
905                  * DCACHE_SHRINK_LIST and DCACHE_LRU_LIST are set.
906                  */
907                 spin_lock(&dentry->d_lock);
908                 if (dentry != list_entry(list->prev, struct dentry, d_lru)) {
909                         spin_unlock(&dentry->d_lock);
910                         continue;
911                 }
912
913                 /*
914                  * The dispose list is isolated and dentries are not accounted
915                  * to the LRU here, so we can simply remove it from the list
916                  * here regardless of whether it is referenced or not.
917                  */
918                 d_shrink_del(dentry);
919
920                 /*
921                  * We found an inuse dentry which was not removed from
922                  * the LRU because of laziness during lookup. Do not free it.
923                  */
924                 if (dentry->d_lockref.count) {
925                         spin_unlock(&dentry->d_lock);
926                         continue;
927                 }
928                 rcu_read_unlock();
929
930                 /*
931                  * If 'try_to_prune()' returns a dentry, it will
932                  * be the same one we passed in, and d_lock will
933                  * have been held the whole time, so it will not
934                  * have been added to any other lists. We failed
935                  * to get the inode lock.
936                  *
937                  * We just add it back to the shrink list.
938                  */
939                 dentry = try_prune_one_dentry(dentry);
940
941                 rcu_read_lock();
942                 if (dentry) {
943                         d_shrink_add(dentry, list);
944                         spin_unlock(&dentry->d_lock);
945                 }
946         }
947         rcu_read_unlock();
948 }
949
950 static enum lru_status
951 dentry_lru_isolate(struct list_head *item, spinlock_t *lru_lock, void *arg)
952 {
953         struct list_head *freeable = arg;
954         struct dentry   *dentry = container_of(item, struct dentry, d_lru);
955
956
957         /*
958          * we are inverting the lru lock/dentry->d_lock here,
959          * so use a trylock. If we fail to get the lock, just skip
960          * it
961          */
962         if (!spin_trylock(&dentry->d_lock))
963                 return LRU_SKIP;
964
965         /*
966          * Referenced dentries are still in use. If they have active
967          * counts, just remove them from the LRU. Otherwise give them
968          * another pass through the LRU.
969          */
970         if (dentry->d_lockref.count) {
971                 d_lru_isolate(dentry);
972                 spin_unlock(&dentry->d_lock);
973                 return LRU_REMOVED;
974         }
975
976         if (dentry->d_flags & DCACHE_REFERENCED) {
977                 dentry->d_flags &= ~DCACHE_REFERENCED;
978                 spin_unlock(&dentry->d_lock);
979
980                 /*
981                  * The list move itself will be made by the common LRU code. At
982                  * this point, we've dropped the dentry->d_lock but keep the
983                  * lru lock. This is safe to do, since every list movement is
984                  * protected by the lru lock even if both locks are held.
985                  *
986                  * This is guaranteed by the fact that all LRU management
987                  * functions are intermediated by the LRU API calls like
988                  * list_lru_add and list_lru_del. List movement in this file
989                  * only ever occur through this functions or through callbacks
990                  * like this one, that are called from the LRU API.
991                  *
992                  * The only exceptions to this are functions like
993                  * shrink_dentry_list, and code that first checks for the
994                  * DCACHE_SHRINK_LIST flag.  Those are guaranteed to be
995                  * operating only with stack provided lists after they are
996                  * properly isolated from the main list.  It is thus, always a
997                  * local access.
998                  */
999                 return LRU_ROTATE;
1000         }
1001
1002         d_lru_shrink_move(dentry, freeable);
1003         spin_unlock(&dentry->d_lock);
1004
1005         return LRU_REMOVED;
1006 }
1007
1008 /**
1009  * prune_dcache_sb - shrink the dcache
1010  * @sb: superblock
1011  * @nr_to_scan : number of entries to try to free
1012  * @nid: which node to scan for freeable entities
1013  *
1014  * Attempt to shrink the superblock dcache LRU by @nr_to_scan entries. This is
1015  * done when we need more memory an called from the superblock shrinker
1016  * function.
1017  *
1018  * This function may fail to free any resources if all the dentries are in
1019  * use.
1020  */
1021 long prune_dcache_sb(struct super_block *sb, unsigned long nr_to_scan,
1022                      int nid)
1023 {
1024         LIST_HEAD(dispose);
1025         long freed;
1026
1027         freed = list_lru_walk_node(&sb->s_dentry_lru, nid, dentry_lru_isolate,
1028                                        &dispose, &nr_to_scan);
1029         shrink_dentry_list(&dispose);
1030         return freed;
1031 }
1032
1033 static enum lru_status dentry_lru_isolate_shrink(struct list_head *item,
1034                                                 spinlock_t *lru_lock, void *arg)
1035 {
1036         struct list_head *freeable = arg;
1037         struct dentry   *dentry = container_of(item, struct dentry, d_lru);
1038
1039         /*
1040          * we are inverting the lru lock/dentry->d_lock here,
1041          * so use a trylock. If we fail to get the lock, just skip
1042          * it
1043          */
1044         if (!spin_trylock(&dentry->d_lock))
1045                 return LRU_SKIP;
1046
1047         d_lru_shrink_move(dentry, freeable);
1048         spin_unlock(&dentry->d_lock);
1049
1050         return LRU_REMOVED;
1051 }
1052
1053
1054 /**
1055  * shrink_dcache_sb - shrink dcache for a superblock
1056  * @sb: superblock
1057  *
1058  * Shrink the dcache for the specified super block. This is used to free
1059  * the dcache before unmounting a file system.
1060  */
1061 void shrink_dcache_sb(struct super_block *sb)
1062 {
1063         long freed;
1064
1065         do {
1066                 LIST_HEAD(dispose);
1067
1068                 freed = list_lru_walk(&sb->s_dentry_lru,
1069                         dentry_lru_isolate_shrink, &dispose, UINT_MAX);
1070
1071                 this_cpu_sub(nr_dentry_unused, freed);
1072                 shrink_dentry_list(&dispose);
1073         } while (freed > 0);
1074 }
1075 EXPORT_SYMBOL(shrink_dcache_sb);
1076
1077 /*
1078  * destroy a single subtree of dentries for unmount
1079  * - see the comments on shrink_dcache_for_umount() for a description of the
1080  *   locking
1081  */
1082 static void shrink_dcache_for_umount_subtree(struct dentry *dentry)
1083 {
1084         struct dentry *parent;
1085
1086         BUG_ON(!IS_ROOT(dentry));
1087
1088         for (;;) {
1089                 /* descend to the first leaf in the current subtree */
1090                 while (!list_empty(&dentry->d_subdirs))
1091                         dentry = list_entry(dentry->d_subdirs.next,
1092                                             struct dentry, d_u.d_child);
1093
1094                 /* consume the dentries from this leaf up through its parents
1095                  * until we find one with children or run out altogether */
1096                 do {
1097                         struct inode *inode;
1098
1099                         /*
1100                          * inform the fs that this dentry is about to be
1101                          * unhashed and destroyed.
1102                          */
1103                         if ((dentry->d_flags & DCACHE_OP_PRUNE) &&
1104                             !d_unhashed(dentry))
1105                                 dentry->d_op->d_prune(dentry);
1106
1107                         dentry_lru_del(dentry);
1108                         __d_shrink(dentry);
1109
1110                         if (dentry->d_lockref.count != 0) {
1111                                 printk(KERN_ERR
1112                                        "BUG: Dentry %p{i=%lx,n=%s}"
1113                                        " still in use (%d)"
1114                                        " [unmount of %s %s]\n",
1115                                        dentry,
1116                                        dentry->d_inode ?
1117                                        dentry->d_inode->i_ino : 0UL,
1118                                        dentry->d_name.name,
1119                                        dentry->d_lockref.count,
1120                                        dentry->d_sb->s_type->name,
1121                                        dentry->d_sb->s_id);
1122                                 BUG();
1123                         }
1124
1125                         if (IS_ROOT(dentry)) {
1126                                 parent = NULL;
1127                                 list_del(&dentry->d_u.d_child);
1128                         } else {
1129                                 parent = dentry->d_parent;
1130                                 parent->d_lockref.count--;
1131                                 list_del(&dentry->d_u.d_child);
1132                         }
1133
1134                         inode = dentry->d_inode;
1135                         if (inode) {
1136                                 dentry->d_inode = NULL;
1137                                 hlist_del_init(&dentry->d_alias);
1138                                 if (dentry->d_op && dentry->d_op->d_iput)
1139                                         dentry->d_op->d_iput(dentry, inode);
1140                                 else
1141                                         iput(inode);
1142                         }
1143
1144                         d_free(dentry);
1145
1146                         /* finished when we fall off the top of the tree,
1147                          * otherwise we ascend to the parent and move to the
1148                          * next sibling if there is one */
1149                         if (!parent)
1150                                 return;
1151                         dentry = parent;
1152                 } while (list_empty(&dentry->d_subdirs));
1153
1154                 dentry = list_entry(dentry->d_subdirs.next,
1155                                     struct dentry, d_u.d_child);
1156         }
1157 }
1158
1159 /*
1160  * destroy the dentries attached to a superblock on unmounting
1161  * - we don't need to use dentry->d_lock because:
1162  *   - the superblock is detached from all mountings and open files, so the
1163  *     dentry trees will not be rearranged by the VFS
1164  *   - s_umount is write-locked, so the memory pressure shrinker will ignore
1165  *     any dentries belonging to this superblock that it comes across
1166  *   - the filesystem itself is no longer permitted to rearrange the dentries
1167  *     in this superblock
1168  */
1169 void shrink_dcache_for_umount(struct super_block *sb)
1170 {
1171         struct dentry *dentry;
1172
1173         if (down_read_trylock(&sb->s_umount))
1174                 BUG();
1175
1176         dentry = sb->s_root;
1177         sb->s_root = NULL;
1178         dentry->d_lockref.count--;
1179         shrink_dcache_for_umount_subtree(dentry);
1180
1181         while (!hlist_bl_empty(&sb->s_anon)) {
1182                 dentry = hlist_bl_entry(hlist_bl_first(&sb->s_anon), struct dentry, d_hash);
1183                 shrink_dcache_for_umount_subtree(dentry);
1184         }
1185 }
1186
1187 /*
1188  * This tries to ascend one level of parenthood, but
1189  * we can race with renaming, so we need to re-check
1190  * the parenthood after dropping the lock and check
1191  * that the sequence number still matches.
1192  */
1193 static struct dentry *try_to_ascend(struct dentry *old, unsigned seq)
1194 {
1195         struct dentry *new = old->d_parent;
1196
1197         rcu_read_lock();
1198         spin_unlock(&old->d_lock);
1199         spin_lock(&new->d_lock);
1200
1201         /*
1202          * might go back up the wrong parent if we have had a rename
1203          * or deletion
1204          */
1205         if (new != old->d_parent ||
1206                  (old->d_flags & DCACHE_DENTRY_KILLED) ||
1207                  need_seqretry(&rename_lock, seq)) {
1208                 spin_unlock(&new->d_lock);
1209                 new = NULL;
1210         }
1211         rcu_read_unlock();
1212         return new;
1213 }
1214
1215 /**
1216  * enum d_walk_ret - action to talke during tree walk
1217  * @D_WALK_CONTINUE:    contrinue walk
1218  * @D_WALK_QUIT:        quit walk
1219  * @D_WALK_NORETRY:     quit when retry is needed
1220  * @D_WALK_SKIP:        skip this dentry and its children
1221  */
1222 enum d_walk_ret {
1223         D_WALK_CONTINUE,
1224         D_WALK_QUIT,
1225         D_WALK_NORETRY,
1226         D_WALK_SKIP,
1227 };
1228
1229 /**
1230  * d_walk - walk the dentry tree
1231  * @parent:     start of walk
1232  * @data:       data passed to @enter() and @finish()
1233  * @enter:      callback when first entering the dentry
1234  * @finish:     callback when successfully finished the walk
1235  *
1236  * The @enter() and @finish() callbacks are called with d_lock held.
1237  */
1238 static void d_walk(struct dentry *parent, void *data,
1239                    enum d_walk_ret (*enter)(void *, struct dentry *),
1240                    void (*finish)(void *))
1241 {
1242         struct dentry *this_parent;
1243         struct list_head *next;
1244         unsigned seq = 0;
1245         enum d_walk_ret ret;
1246         bool retry = true;
1247
1248 again:
1249         read_seqbegin_or_lock(&rename_lock, &seq);
1250         this_parent = parent;
1251         spin_lock(&this_parent->d_lock);
1252
1253         ret = enter(data, this_parent);
1254         switch (ret) {
1255         case D_WALK_CONTINUE:
1256                 break;
1257         case D_WALK_QUIT:
1258         case D_WALK_SKIP:
1259                 goto out_unlock;
1260         case D_WALK_NORETRY:
1261                 retry = false;
1262                 break;
1263         }
1264 repeat:
1265         next = this_parent->d_subdirs.next;
1266 resume:
1267         while (next != &this_parent->d_subdirs) {
1268                 struct list_head *tmp = next;
1269                 struct dentry *dentry = list_entry(tmp, struct dentry, d_u.d_child);
1270                 next = tmp->next;
1271
1272                 spin_lock_nested(&dentry->d_lock, DENTRY_D_LOCK_NESTED);
1273
1274                 ret = enter(data, dentry);
1275                 switch (ret) {
1276                 case D_WALK_CONTINUE:
1277                         break;
1278                 case D_WALK_QUIT:
1279                         spin_unlock(&dentry->d_lock);
1280                         goto out_unlock;
1281                 case D_WALK_NORETRY:
1282                         retry = false;
1283                         break;
1284                 case D_WALK_SKIP:
1285                         spin_unlock(&dentry->d_lock);
1286                         continue;
1287                 }
1288
1289                 if (!list_empty(&dentry->d_subdirs)) {
1290                         spin_unlock(&this_parent->d_lock);
1291                         spin_release(&dentry->d_lock.dep_map, 1, _RET_IP_);
1292                         this_parent = dentry;
1293                         spin_acquire(&this_parent->d_lock.dep_map, 0, 1, _RET_IP_);
1294                         goto repeat;
1295                 }
1296                 spin_unlock(&dentry->d_lock);
1297         }
1298         /*
1299          * All done at this level ... ascend and resume the search.
1300          */
1301         if (this_parent != parent) {
1302                 struct dentry *child = this_parent;
1303                 this_parent = try_to_ascend(this_parent, seq);
1304                 if (!this_parent)
1305                         goto rename_retry;
1306                 next = child->d_u.d_child.next;
1307                 goto resume;
1308         }
1309         if (need_seqretry(&rename_lock, seq)) {
1310                 spin_unlock(&this_parent->d_lock);
1311                 goto rename_retry;
1312         }
1313         if (finish)
1314                 finish(data);
1315
1316 out_unlock:
1317         spin_unlock(&this_parent->d_lock);
1318         done_seqretry(&rename_lock, seq);
1319         return;
1320
1321 rename_retry:
1322         if (!retry)
1323                 return;
1324         seq = 1;
1325         goto again;
1326 }
1327
1328 /*
1329  * Search for at least 1 mount point in the dentry's subdirs.
1330  * We descend to the next level whenever the d_subdirs
1331  * list is non-empty and continue searching.
1332  */
1333
1334 /**
1335  * have_submounts - check for mounts over a dentry
1336  * @parent: dentry to check.
1337  *
1338  * Return true if the parent or its subdirectories contain
1339  * a mount point
1340  */
1341
1342 static enum d_walk_ret check_mount(void *data, struct dentry *dentry)
1343 {
1344         int *ret = data;
1345         if (d_mountpoint(dentry)) {
1346                 *ret = 1;
1347                 return D_WALK_QUIT;
1348         }
1349         return D_WALK_CONTINUE;
1350 }
1351
1352 int have_submounts(struct dentry *parent)
1353 {
1354         int ret = 0;
1355
1356         d_walk(parent, &ret, check_mount, NULL);
1357
1358         return ret;
1359 }
1360 EXPORT_SYMBOL(have_submounts);
1361
1362 /*
1363  * Called by mount code to set a mountpoint and check if the mountpoint is
1364  * reachable (e.g. NFS can unhash a directory dentry and then the complete
1365  * subtree can become unreachable).
1366  *
1367  * Only one of check_submounts_and_drop() and d_set_mounted() must succeed.  For
1368  * this reason take rename_lock and d_lock on dentry and ancestors.
1369  */
1370 int d_set_mounted(struct dentry *dentry)
1371 {
1372         struct dentry *p;
1373         int ret = -ENOENT;
1374         write_seqlock(&rename_lock);
1375         for (p = dentry->d_parent; !IS_ROOT(p); p = p->d_parent) {
1376                 /* Need exclusion wrt. check_submounts_and_drop() */
1377                 spin_lock(&p->d_lock);
1378                 if (unlikely(d_unhashed(p))) {
1379                         spin_unlock(&p->d_lock);
1380                         goto out;
1381                 }
1382                 spin_unlock(&p->d_lock);
1383         }
1384         spin_lock(&dentry->d_lock);
1385         if (!d_unlinked(dentry)) {
1386                 dentry->d_flags |= DCACHE_MOUNTED;
1387                 ret = 0;
1388         }
1389         spin_unlock(&dentry->d_lock);
1390 out:
1391         write_sequnlock(&rename_lock);
1392         return ret;
1393 }
1394
1395 /*
1396  * Search the dentry child list of the specified parent,
1397  * and move any unused dentries to the end of the unused
1398  * list for prune_dcache(). We descend to the next level
1399  * whenever the d_subdirs list is non-empty and continue
1400  * searching.
1401  *
1402  * It returns zero iff there are no unused children,
1403  * otherwise  it returns the number of children moved to
1404  * the end of the unused list. This may not be the total
1405  * number of unused children, because select_parent can
1406  * drop the lock and return early due to latency
1407  * constraints.
1408  */
1409
1410 struct select_data {
1411         struct dentry *start;
1412         struct list_head dispose;
1413         int found;
1414 };
1415
1416 static enum d_walk_ret select_collect(void *_data, struct dentry *dentry)
1417 {
1418         struct select_data *data = _data;
1419         enum d_walk_ret ret = D_WALK_CONTINUE;
1420
1421         if (data->start == dentry)
1422                 goto out;
1423
1424         /*
1425          * move only zero ref count dentries to the dispose list.
1426          *
1427          * Those which are presently on the shrink list, being processed
1428          * by shrink_dentry_list(), shouldn't be moved.  Otherwise the
1429          * loop in shrink_dcache_parent() might not make any progress
1430          * and loop forever.
1431          */
1432         if (dentry->d_lockref.count) {
1433                 dentry_lru_del(dentry);
1434         } else if (!(dentry->d_flags & DCACHE_SHRINK_LIST)) {
1435                 /*
1436                  * We can't use d_lru_shrink_move() because we
1437                  * need to get the global LRU lock and do the
1438                  * LRU accounting.
1439                  */
1440                 d_lru_del(dentry);
1441                 d_shrink_add(dentry, &data->dispose);
1442                 data->found++;
1443                 ret = D_WALK_NORETRY;
1444         }
1445         /*
1446          * We can return to the caller if we have found some (this
1447          * ensures forward progress). We'll be coming back to find
1448          * the rest.
1449          */
1450         if (data->found && need_resched())
1451                 ret = D_WALK_QUIT;
1452 out:
1453         return ret;
1454 }
1455
1456 /**
1457  * shrink_dcache_parent - prune dcache
1458  * @parent: parent of entries to prune
1459  *
1460  * Prune the dcache to remove unused children of the parent dentry.
1461  */
1462 void shrink_dcache_parent(struct dentry *parent)
1463 {
1464         for (;;) {
1465                 struct select_data data;
1466
1467                 INIT_LIST_HEAD(&data.dispose);
1468                 data.start = parent;
1469                 data.found = 0;
1470
1471                 d_walk(parent, &data, select_collect, NULL);
1472                 if (!data.found)
1473                         break;
1474
1475                 shrink_dentry_list(&data.dispose);
1476                 cond_resched();
1477         }
1478 }
1479 EXPORT_SYMBOL(shrink_dcache_parent);
1480
1481 static enum d_walk_ret check_and_collect(void *_data, struct dentry *dentry)
1482 {
1483         struct select_data *data = _data;
1484
1485         if (d_mountpoint(dentry)) {
1486                 data->found = -EBUSY;
1487                 return D_WALK_QUIT;
1488         }
1489
1490         return select_collect(_data, dentry);
1491 }
1492
1493 static void check_and_drop(void *_data)
1494 {
1495         struct select_data *data = _data;
1496
1497         if (d_mountpoint(data->start))
1498                 data->found = -EBUSY;
1499         if (!data->found)
1500                 __d_drop(data->start);
1501 }
1502
1503 /**
1504  * check_submounts_and_drop - prune dcache, check for submounts and drop
1505  *
1506  * All done as a single atomic operation relative to has_unlinked_ancestor().
1507  * Returns 0 if successfully unhashed @parent.  If there were submounts then
1508  * return -EBUSY.
1509  *
1510  * @dentry: dentry to prune and drop
1511  */
1512 int check_submounts_and_drop(struct dentry *dentry)
1513 {
1514         int ret = 0;
1515
1516         /* Negative dentries can be dropped without further checks */
1517         if (!dentry->d_inode) {
1518                 d_drop(dentry);
1519                 goto out;
1520         }
1521
1522         for (;;) {
1523                 struct select_data data;
1524
1525                 INIT_LIST_HEAD(&data.dispose);
1526                 data.start = dentry;
1527                 data.found = 0;
1528
1529                 d_walk(dentry, &data, check_and_collect, check_and_drop);
1530                 ret = data.found;
1531
1532                 if (!list_empty(&data.dispose))
1533                         shrink_dentry_list(&data.dispose);
1534
1535                 if (ret <= 0)
1536                         break;
1537
1538                 cond_resched();
1539         }
1540
1541 out:
1542         return ret;
1543 }
1544 EXPORT_SYMBOL(check_submounts_and_drop);
1545
1546 /**
1547  * __d_alloc    -       allocate a dcache entry
1548  * @sb: filesystem it will belong to
1549  * @name: qstr of the name
1550  *
1551  * Allocates a dentry. It returns %NULL if there is insufficient memory
1552  * available. On a success the dentry is returned. The name passed in is
1553  * copied and the copy passed in may be reused after this call.
1554  */
1555  
1556 struct dentry *__d_alloc(struct super_block *sb, const struct qstr *name)
1557 {
1558         struct dentry *dentry;
1559         char *dname;
1560
1561         dentry = kmem_cache_alloc(dentry_cache, GFP_KERNEL);
1562         if (!dentry)
1563                 return NULL;
1564
1565         /*
1566          * We guarantee that the inline name is always NUL-terminated.
1567          * This way the memcpy() done by the name switching in rename
1568          * will still always have a NUL at the end, even if we might
1569          * be overwriting an internal NUL character
1570          */
1571         dentry->d_iname[DNAME_INLINE_LEN-1] = 0;
1572         if (name->len > DNAME_INLINE_LEN-1) {
1573                 dname = kmalloc(name->len + 1, GFP_KERNEL);
1574                 if (!dname) {
1575                         kmem_cache_free(dentry_cache, dentry); 
1576                         return NULL;
1577                 }
1578         } else  {
1579                 dname = dentry->d_iname;
1580         }       
1581
1582         dentry->d_name.len = name->len;
1583         dentry->d_name.hash = name->hash;
1584         memcpy(dname, name->name, name->len);
1585         dname[name->len] = 0;
1586
1587         /* Make sure we always see the terminating NUL character */
1588         smp_wmb();
1589         dentry->d_name.name = dname;
1590
1591         dentry->d_lockref.count = 1;
1592         dentry->d_flags = 0;
1593         spin_lock_init(&dentry->d_lock);
1594         seqcount_init(&dentry->d_seq);
1595         dentry->d_inode = NULL;
1596         dentry->d_parent = dentry;
1597         dentry->d_sb = sb;
1598         dentry->d_op = NULL;
1599         dentry->d_fsdata = NULL;
1600         INIT_HLIST_BL_NODE(&dentry->d_hash);
1601         INIT_LIST_HEAD(&dentry->d_lru);
1602         INIT_LIST_HEAD(&dentry->d_subdirs);
1603         INIT_HLIST_NODE(&dentry->d_alias);
1604         INIT_LIST_HEAD(&dentry->d_u.d_child);
1605         d_set_d_op(dentry, dentry->d_sb->s_d_op);
1606
1607         this_cpu_inc(nr_dentry);
1608
1609         return dentry;
1610 }
1611
1612 /**
1613  * d_alloc      -       allocate a dcache entry
1614  * @parent: parent of entry to allocate
1615  * @name: qstr of the name
1616  *
1617  * Allocates a dentry. It returns %NULL if there is insufficient memory
1618  * available. On a success the dentry is returned. The name passed in is
1619  * copied and the copy passed in may be reused after this call.
1620  */
1621 struct dentry *d_alloc(struct dentry * parent, const struct qstr *name)
1622 {
1623         struct dentry *dentry = __d_alloc(parent->d_sb, name);
1624         if (!dentry)
1625                 return NULL;
1626
1627         spin_lock(&parent->d_lock);
1628         /*
1629          * don't need child lock because it is not subject
1630          * to concurrency here
1631          */
1632         __dget_dlock(parent);
1633         dentry->d_parent = parent;
1634         list_add(&dentry->d_u.d_child, &parent->d_subdirs);
1635         spin_unlock(&parent->d_lock);
1636
1637         return dentry;
1638 }
1639 EXPORT_SYMBOL(d_alloc);
1640
1641 struct dentry *d_alloc_pseudo(struct super_block *sb, const struct qstr *name)
1642 {
1643         struct dentry *dentry = __d_alloc(sb, name);
1644         if (dentry)
1645                 dentry->d_flags |= DCACHE_DISCONNECTED;
1646         return dentry;
1647 }
1648 EXPORT_SYMBOL(d_alloc_pseudo);
1649
1650 struct dentry *d_alloc_name(struct dentry *parent, const char *name)
1651 {
1652         struct qstr q;
1653
1654         q.name = name;
1655         q.len = strlen(name);
1656         q.hash = full_name_hash(q.name, q.len);
1657         return d_alloc(parent, &q);
1658 }
1659 EXPORT_SYMBOL(d_alloc_name);
1660
1661 void d_set_d_op(struct dentry *dentry, const struct dentry_operations *op)
1662 {
1663         WARN_ON_ONCE(dentry->d_op);
1664         WARN_ON_ONCE(dentry->d_flags & (DCACHE_OP_HASH  |
1665                                 DCACHE_OP_COMPARE       |
1666                                 DCACHE_OP_REVALIDATE    |
1667                                 DCACHE_OP_WEAK_REVALIDATE       |
1668                                 DCACHE_OP_DELETE ));
1669         dentry->d_op = op;
1670         if (!op)
1671                 return;
1672         if (op->d_hash)
1673                 dentry->d_flags |= DCACHE_OP_HASH;
1674         if (op->d_compare)
1675                 dentry->d_flags |= DCACHE_OP_COMPARE;
1676         if (op->d_revalidate)
1677                 dentry->d_flags |= DCACHE_OP_REVALIDATE;
1678         if (op->d_weak_revalidate)
1679                 dentry->d_flags |= DCACHE_OP_WEAK_REVALIDATE;
1680         if (op->d_delete)
1681                 dentry->d_flags |= DCACHE_OP_DELETE;
1682         if (op->d_prune)
1683                 dentry->d_flags |= DCACHE_OP_PRUNE;
1684
1685 }
1686 EXPORT_SYMBOL(d_set_d_op);
1687
1688 static void __d_instantiate(struct dentry *dentry, struct inode *inode)
1689 {
1690         spin_lock(&dentry->d_lock);
1691         if (inode) {
1692                 if (unlikely(IS_AUTOMOUNT(inode)))
1693                         dentry->d_flags |= DCACHE_NEED_AUTOMOUNT;
1694                 hlist_add_head(&dentry->d_alias, &inode->i_dentry);
1695         }
1696         dentry->d_inode = inode;
1697         dentry_rcuwalk_barrier(dentry);
1698         spin_unlock(&dentry->d_lock);
1699         fsnotify_d_instantiate(dentry, inode);
1700 }
1701
1702 /**
1703  * d_instantiate - fill in inode information for a dentry
1704  * @entry: dentry to complete
1705  * @inode: inode to attach to this dentry
1706  *
1707  * Fill in inode information in the entry.
1708  *
1709  * This turns negative dentries into productive full members
1710  * of society.
1711  *
1712  * NOTE! This assumes that the inode count has been incremented
1713  * (or otherwise set) by the caller to indicate that it is now
1714  * in use by the dcache.
1715  */
1716  
1717 void d_instantiate(struct dentry *entry, struct inode * inode)
1718 {
1719         BUG_ON(!hlist_unhashed(&entry->d_alias));
1720         if (inode)
1721                 spin_lock(&inode->i_lock);
1722         __d_instantiate(entry, inode);
1723         if (inode)
1724                 spin_unlock(&inode->i_lock);
1725         security_d_instantiate(entry, inode);
1726 }
1727 EXPORT_SYMBOL(d_instantiate);
1728
1729 /**
1730  * d_instantiate_unique - instantiate a non-aliased dentry
1731  * @entry: dentry to instantiate
1732  * @inode: inode to attach to this dentry
1733  *
1734  * Fill in inode information in the entry. On success, it returns NULL.
1735  * If an unhashed alias of "entry" already exists, then we return the
1736  * aliased dentry instead and drop one reference to inode.
1737  *
1738  * Note that in order to avoid conflicts with rename() etc, the caller
1739  * had better be holding the parent directory semaphore.
1740  *
1741  * This also assumes that the inode count has been incremented
1742  * (or otherwise set) by the caller to indicate that it is now
1743  * in use by the dcache.
1744  */
1745 static struct dentry *__d_instantiate_unique(struct dentry *entry,
1746                                              struct inode *inode)
1747 {
1748         struct dentry *alias;
1749         int len = entry->d_name.len;
1750         const char *name = entry->d_name.name;
1751         unsigned int hash = entry->d_name.hash;
1752
1753         if (!inode) {
1754                 __d_instantiate(entry, NULL);
1755                 return NULL;
1756         }
1757
1758         hlist_for_each_entry(alias, &inode->i_dentry, d_alias) {
1759                 /*
1760                  * Don't need alias->d_lock here, because aliases with
1761                  * d_parent == entry->d_parent are not subject to name or
1762                  * parent changes, because the parent inode i_mutex is held.
1763                  */
1764                 if (alias->d_name.hash != hash)
1765                         continue;
1766                 if (alias->d_parent != entry->d_parent)
1767                         continue;
1768                 if (alias->d_name.len != len)
1769                         continue;
1770                 if (dentry_cmp(alias, name, len))
1771                         continue;
1772                 __dget(alias);
1773                 return alias;
1774         }
1775
1776         __d_instantiate(entry, inode);
1777         return NULL;
1778 }
1779
1780 struct dentry *d_instantiate_unique(struct dentry *entry, struct inode *inode)
1781 {
1782         struct dentry *result;
1783
1784         BUG_ON(!hlist_unhashed(&entry->d_alias));
1785
1786         if (inode)
1787                 spin_lock(&inode->i_lock);
1788         result = __d_instantiate_unique(entry, inode);
1789         if (inode)
1790                 spin_unlock(&inode->i_lock);
1791
1792         if (!result) {
1793                 security_d_instantiate(entry, inode);
1794                 return NULL;
1795         }
1796
1797         BUG_ON(!d_unhashed(result));
1798         iput(inode);
1799         return result;
1800 }
1801
1802 EXPORT_SYMBOL(d_instantiate_unique);
1803
1804 /**
1805  * d_instantiate_no_diralias - instantiate a non-aliased dentry
1806  * @entry: dentry to complete
1807  * @inode: inode to attach to this dentry
1808  *
1809  * Fill in inode information in the entry.  If a directory alias is found, then
1810  * return an error.  Together with d_materialise_unique() this guarantees that a
1811  * directory inode may never have more than one alias.
1812  */
1813 int d_instantiate_no_diralias(struct dentry *entry, struct inode *inode)
1814 {
1815         BUG_ON(!hlist_unhashed(&entry->d_alias));
1816
1817         spin_lock(&inode->i_lock);
1818         if (S_ISDIR(inode->i_mode) && !hlist_empty(&inode->i_dentry)) {
1819                 spin_unlock(&inode->i_lock);
1820                 return -EBUSY;
1821         }
1822         __d_instantiate(entry, inode);
1823         spin_unlock(&inode->i_lock);
1824         security_d_instantiate(entry, inode);
1825
1826         return 0;
1827 }
1828 EXPORT_SYMBOL(d_instantiate_no_diralias);
1829
1830 struct dentry *d_make_root(struct inode *root_inode)
1831 {
1832         struct dentry *res = NULL;
1833
1834         if (root_inode) {
1835                 static const struct qstr name = QSTR_INIT("/", 1);
1836
1837                 res = __d_alloc(root_inode->i_sb, &name);
1838                 if (res)
1839                         d_instantiate(res, root_inode);
1840                 else
1841                         iput(root_inode);
1842         }
1843         return res;
1844 }
1845 EXPORT_SYMBOL(d_make_root);
1846
1847 static struct dentry * __d_find_any_alias(struct inode *inode)
1848 {
1849         struct dentry *alias;
1850
1851         if (hlist_empty(&inode->i_dentry))
1852                 return NULL;
1853         alias = hlist_entry(inode->i_dentry.first, struct dentry, d_alias);
1854         __dget(alias);
1855         return alias;
1856 }
1857
1858 /**
1859  * d_find_any_alias - find any alias for a given inode
1860  * @inode: inode to find an alias for
1861  *
1862  * If any aliases exist for the given inode, take and return a
1863  * reference for one of them.  If no aliases exist, return %NULL.
1864  */
1865 struct dentry *d_find_any_alias(struct inode *inode)
1866 {
1867         struct dentry *de;
1868
1869         spin_lock(&inode->i_lock);
1870         de = __d_find_any_alias(inode);
1871         spin_unlock(&inode->i_lock);
1872         return de;
1873 }
1874 EXPORT_SYMBOL(d_find_any_alias);
1875
1876 /**
1877  * d_obtain_alias - find or allocate a dentry for a given inode
1878  * @inode: inode to allocate the dentry for
1879  *
1880  * Obtain a dentry for an inode resulting from NFS filehandle conversion or
1881  * similar open by handle operations.  The returned dentry may be anonymous,
1882  * or may have a full name (if the inode was already in the cache).
1883  *
1884  * When called on a directory inode, we must ensure that the inode only ever
1885  * has one dentry.  If a dentry is found, that is returned instead of
1886  * allocating a new one.
1887  *
1888  * On successful return, the reference to the inode has been transferred
1889  * to the dentry.  In case of an error the reference on the inode is released.
1890  * To make it easier to use in export operations a %NULL or IS_ERR inode may
1891  * be passed in and will be the error will be propagate to the return value,
1892  * with a %NULL @inode replaced by ERR_PTR(-ESTALE).
1893  */
1894 struct dentry *d_obtain_alias(struct inode *inode)
1895 {
1896         static const struct qstr anonstring = QSTR_INIT("/", 1);
1897         struct dentry *tmp;
1898         struct dentry *res;
1899
1900         if (!inode)
1901                 return ERR_PTR(-ESTALE);
1902         if (IS_ERR(inode))
1903                 return ERR_CAST(inode);
1904
1905         res = d_find_any_alias(inode);
1906         if (res)
1907                 goto out_iput;
1908
1909         tmp = __d_alloc(inode->i_sb, &anonstring);
1910         if (!tmp) {
1911                 res = ERR_PTR(-ENOMEM);
1912                 goto out_iput;
1913         }
1914
1915         spin_lock(&inode->i_lock);
1916         res = __d_find_any_alias(inode);
1917         if (res) {
1918                 spin_unlock(&inode->i_lock);
1919                 dput(tmp);
1920                 goto out_iput;
1921         }
1922
1923         /* attach a disconnected dentry */
1924         spin_lock(&tmp->d_lock);
1925         tmp->d_inode = inode;
1926         tmp->d_flags |= DCACHE_DISCONNECTED;
1927         hlist_add_head(&tmp->d_alias, &inode->i_dentry);
1928         hlist_bl_lock(&tmp->d_sb->s_anon);
1929         hlist_bl_add_head(&tmp->d_hash, &tmp->d_sb->s_anon);
1930         hlist_bl_unlock(&tmp->d_sb->s_anon);
1931         spin_unlock(&tmp->d_lock);
1932         spin_unlock(&inode->i_lock);
1933         security_d_instantiate(tmp, inode);
1934
1935         return tmp;
1936
1937  out_iput:
1938         if (res && !IS_ERR(res))
1939                 security_d_instantiate(res, inode);
1940         iput(inode);
1941         return res;
1942 }
1943 EXPORT_SYMBOL(d_obtain_alias);
1944
1945 /**
1946  * d_splice_alias - splice a disconnected dentry into the tree if one exists
1947  * @inode:  the inode which may have a disconnected dentry
1948  * @dentry: a negative dentry which we want to point to the inode.
1949  *
1950  * If inode is a directory and has a 'disconnected' dentry (i.e. IS_ROOT and
1951  * DCACHE_DISCONNECTED), then d_move that in place of the given dentry
1952  * and return it, else simply d_add the inode to the dentry and return NULL.
1953  *
1954  * This is needed in the lookup routine of any filesystem that is exportable
1955  * (via knfsd) so that we can build dcache paths to directories effectively.
1956  *
1957  * If a dentry was found and moved, then it is returned.  Otherwise NULL
1958  * is returned.  This matches the expected return value of ->lookup.
1959  *
1960  * Cluster filesystems may call this function with a negative, hashed dentry.
1961  * In that case, we know that the inode will be a regular file, and also this
1962  * will only occur during atomic_open. So we need to check for the dentry
1963  * being already hashed only in the final case.
1964  */
1965 struct dentry *d_splice_alias(struct inode *inode, struct dentry *dentry)
1966 {
1967         struct dentry *new = NULL;
1968
1969         if (IS_ERR(inode))
1970                 return ERR_CAST(inode);
1971
1972         if (inode && S_ISDIR(inode->i_mode)) {
1973                 spin_lock(&inode->i_lock);
1974                 new = __d_find_alias(inode, 1);
1975                 if (new) {
1976                         BUG_ON(!(new->d_flags & DCACHE_DISCONNECTED));
1977                         spin_unlock(&inode->i_lock);
1978                         security_d_instantiate(new, inode);
1979                         d_move(new, dentry);
1980                         iput(inode);
1981                 } else {
1982                         /* already taking inode->i_lock, so d_add() by hand */
1983                         __d_instantiate(dentry, inode);
1984                         spin_unlock(&inode->i_lock);
1985                         security_d_instantiate(dentry, inode);
1986                         d_rehash(dentry);
1987                 }
1988         } else {
1989                 d_instantiate(dentry, inode);
1990                 if (d_unhashed(dentry))
1991                         d_rehash(dentry);
1992         }
1993         return new;
1994 }
1995 EXPORT_SYMBOL(d_splice_alias);
1996
1997 /**
1998  * d_add_ci - lookup or allocate new dentry with case-exact name
1999  * @inode:  the inode case-insensitive lookup has found
2000  * @dentry: the negative dentry that was passed to the parent's lookup func
2001  * @name:   the case-exact name to be associated with the returned dentry
2002  *
2003  * This is to avoid filling the dcache with case-insensitive names to the
2004  * same inode, only the actual correct case is stored in the dcache for
2005  * case-insensitive filesystems.
2006  *
2007  * For a case-insensitive lookup match and if the the case-exact dentry
2008  * already exists in in the dcache, use it and return it.
2009  *
2010  * If no entry exists with the exact case name, allocate new dentry with
2011  * the exact case, and return the spliced entry.
2012  */
2013 struct dentry *d_add_ci(struct dentry *dentry, struct inode *inode,
2014                         struct qstr *name)
2015 {
2016         struct dentry *found;
2017         struct dentry *new;
2018
2019         /*
2020          * First check if a dentry matching the name already exists,
2021          * if not go ahead and create it now.
2022          */
2023         found = d_hash_and_lookup(dentry->d_parent, name);
2024         if (unlikely(IS_ERR(found)))
2025                 goto err_out;
2026         if (!found) {
2027                 new = d_alloc(dentry->d_parent, name);
2028                 if (!new) {
2029                         found = ERR_PTR(-ENOMEM);
2030                         goto err_out;
2031                 }
2032
2033                 found = d_splice_alias(inode, new);
2034                 if (found) {
2035                         dput(new);
2036                         return found;
2037                 }
2038                 return new;
2039         }
2040
2041         /*
2042          * If a matching dentry exists, and it's not negative use it.
2043          *
2044          * Decrement the reference count to balance the iget() done
2045          * earlier on.
2046          */
2047         if (found->d_inode) {
2048                 if (unlikely(found->d_inode != inode)) {
2049                         /* This can't happen because bad inodes are unhashed. */
2050                         BUG_ON(!is_bad_inode(inode));
2051                         BUG_ON(!is_bad_inode(found->d_inode));
2052                 }
2053                 iput(inode);
2054                 return found;
2055         }
2056
2057         /*
2058          * Negative dentry: instantiate it unless the inode is a directory and
2059          * already has a dentry.
2060          */
2061         new = d_splice_alias(inode, found);
2062         if (new) {
2063                 dput(found);
2064                 found = new;
2065         }
2066         return found;
2067
2068 err_out:
2069         iput(inode);
2070         return found;
2071 }
2072 EXPORT_SYMBOL(d_add_ci);
2073
2074 /*
2075  * Do the slow-case of the dentry name compare.
2076  *
2077  * Unlike the dentry_cmp() function, we need to atomically
2078  * load the name and length information, so that the
2079  * filesystem can rely on them, and can use the 'name' and
2080  * 'len' information without worrying about walking off the
2081  * end of memory etc.
2082  *
2083  * Thus the read_seqcount_retry() and the "duplicate" info
2084  * in arguments (the low-level filesystem should not look
2085  * at the dentry inode or name contents directly, since
2086  * rename can change them while we're in RCU mode).
2087  */
2088 enum slow_d_compare {
2089         D_COMP_OK,
2090         D_COMP_NOMATCH,
2091         D_COMP_SEQRETRY,
2092 };
2093
2094 static noinline enum slow_d_compare slow_dentry_cmp(
2095                 const struct dentry *parent,
2096                 struct dentry *dentry,
2097                 unsigned int seq,
2098                 const struct qstr *name)
2099 {
2100         int tlen = dentry->d_name.len;
2101         const char *tname = dentry->d_name.name;
2102
2103         if (read_seqcount_retry(&dentry->d_seq, seq)) {
2104                 cpu_relax();
2105                 return D_COMP_SEQRETRY;
2106         }
2107         if (parent->d_op->d_compare(parent, dentry, tlen, tname, name))
2108                 return D_COMP_NOMATCH;
2109         return D_COMP_OK;
2110 }
2111
2112 /**
2113  * __d_lookup_rcu - search for a dentry (racy, store-free)
2114  * @parent: parent dentry
2115  * @name: qstr of name we wish to find
2116  * @seqp: returns d_seq value at the point where the dentry was found
2117  * Returns: dentry, or NULL
2118  *
2119  * __d_lookup_rcu is the dcache lookup function for rcu-walk name
2120  * resolution (store-free path walking) design described in
2121  * Documentation/filesystems/path-lookup.txt.
2122  *
2123  * This is not to be used outside core vfs.
2124  *
2125  * __d_lookup_rcu must only be used in rcu-walk mode, ie. with vfsmount lock
2126  * held, and rcu_read_lock held. The returned dentry must not be stored into
2127  * without taking d_lock and checking d_seq sequence count against @seq
2128  * returned here.
2129  *
2130  * A refcount may be taken on the found dentry with the d_rcu_to_refcount
2131  * function.
2132  *
2133  * Alternatively, __d_lookup_rcu may be called again to look up the child of
2134  * the returned dentry, so long as its parent's seqlock is checked after the
2135  * child is looked up. Thus, an interlocking stepping of sequence lock checks
2136  * is formed, giving integrity down the path walk.
2137  *
2138  * NOTE! The caller *has* to check the resulting dentry against the sequence
2139  * number we've returned before using any of the resulting dentry state!
2140  */
2141 struct dentry *__d_lookup_rcu(const struct dentry *parent,
2142                                 const struct qstr *name,
2143                                 unsigned *seqp)
2144 {
2145         u64 hashlen = name->hash_len;
2146         const unsigned char *str = name->name;
2147         struct hlist_bl_head *b = d_hash(parent, hashlen_hash(hashlen));
2148         struct hlist_bl_node *node;
2149         struct dentry *dentry;
2150
2151         /*
2152          * Note: There is significant duplication with __d_lookup_rcu which is
2153          * required to prevent single threaded performance regressions
2154          * especially on architectures where smp_rmb (in seqcounts) are costly.
2155          * Keep the two functions in sync.
2156          */
2157
2158         /*
2159          * The hash list is protected using RCU.
2160          *
2161          * Carefully use d_seq when comparing a candidate dentry, to avoid
2162          * races with d_move().
2163          *
2164          * It is possible that concurrent renames can mess up our list
2165          * walk here and result in missing our dentry, resulting in the
2166          * false-negative result. d_lookup() protects against concurrent
2167          * renames using rename_lock seqlock.
2168          *
2169          * See Documentation/filesystems/path-lookup.txt for more details.
2170          */
2171         hlist_bl_for_each_entry_rcu(dentry, node, b, d_hash) {
2172                 unsigned seq;
2173
2174 seqretry:
2175                 /*
2176                  * The dentry sequence count protects us from concurrent
2177                  * renames, and thus protects parent and name fields.
2178                  *
2179                  * The caller must perform a seqcount check in order
2180                  * to do anything useful with the returned dentry.
2181                  *
2182                  * NOTE! We do a "raw" seqcount_begin here. That means that
2183                  * we don't wait for the sequence count to stabilize if it
2184                  * is in the middle of a sequence change. If we do the slow
2185                  * dentry compare, we will do seqretries until it is stable,
2186                  * and if we end up with a successful lookup, we actually
2187                  * want to exit RCU lookup anyway.
2188                  */
2189                 seq = raw_seqcount_begin(&dentry->d_seq);
2190                 if (dentry->d_parent != parent)
2191                         continue;
2192                 if (d_unhashed(dentry))
2193                         continue;
2194
2195                 if (unlikely(parent->d_flags & DCACHE_OP_COMPARE)) {
2196                         if (dentry->d_name.hash != hashlen_hash(hashlen))
2197                                 continue;
2198                         *seqp = seq;
2199                         switch (slow_dentry_cmp(parent, dentry, seq, name)) {
2200                         case D_COMP_OK:
2201                                 return dentry;
2202                         case D_COMP_NOMATCH:
2203                                 continue;
2204                         default:
2205                                 goto seqretry;
2206                         }
2207                 }
2208
2209                 if (dentry->d_name.hash_len != hashlen)
2210                         continue;
2211                 *seqp = seq;
2212                 if (!dentry_cmp(dentry, str, hashlen_len(hashlen)))
2213                         return dentry;
2214         }
2215         return NULL;
2216 }
2217
2218 /**
2219  * d_lookup - search for a dentry
2220  * @parent: parent dentry
2221  * @name: qstr of name we wish to find
2222  * Returns: dentry, or NULL
2223  *
2224  * d_lookup searches the children of the parent dentry for the name in
2225  * question. If the dentry is found its reference count is incremented and the
2226  * dentry is returned. The caller must use dput to free the entry when it has
2227  * finished using it. %NULL is returned if the dentry does not exist.
2228  */
2229 struct dentry *d_lookup(const struct dentry *parent, const struct qstr *name)
2230 {
2231         struct dentry *dentry;
2232         unsigned seq;
2233
2234         do {
2235                 seq = read_seqbegin(&rename_lock);
2236                 dentry = __d_lookup(parent, name);
2237                 if (dentry)
2238                         break;
2239         } while (read_seqretry(&rename_lock, seq));
2240         return dentry;
2241 }
2242 EXPORT_SYMBOL(d_lookup);
2243
2244 /**
2245  * __d_lookup - search for a dentry (racy)
2246  * @parent: parent dentry
2247  * @name: qstr of name we wish to find
2248  * Returns: dentry, or NULL
2249  *
2250  * __d_lookup is like d_lookup, however it may (rarely) return a
2251  * false-negative result due to unrelated rename activity.
2252  *
2253  * __d_lookup is slightly faster by avoiding rename_lock read seqlock,
2254  * however it must be used carefully, eg. with a following d_lookup in
2255  * the case of failure.
2256  *
2257  * __d_lookup callers must be commented.
2258  */
2259 struct dentry *__d_lookup(const struct dentry *parent, const struct qstr *name)
2260 {
2261         unsigned int len = name->len;
2262         unsigned int hash = name->hash;
2263         const unsigned char *str = name->name;
2264         struct hlist_bl_head *b = d_hash(parent, hash);
2265         struct hlist_bl_node *node;
2266         struct dentry *found = NULL;
2267         struct dentry *dentry;
2268
2269         /*
2270          * Note: There is significant duplication with __d_lookup_rcu which is
2271          * required to prevent single threaded performance regressions
2272          * especially on architectures where smp_rmb (in seqcounts) are costly.
2273          * Keep the two functions in sync.
2274          */
2275
2276         /*
2277          * The hash list is protected using RCU.
2278          *
2279          * Take d_lock when comparing a candidate dentry, to avoid races
2280          * with d_move().
2281          *
2282          * It is possible that concurrent renames can mess up our list
2283          * walk here and result in missing our dentry, resulting in the
2284          * false-negative result. d_lookup() protects against concurrent
2285          * renames using rename_lock seqlock.
2286          *
2287          * See Documentation/filesystems/path-lookup.txt for more details.
2288          */
2289         rcu_read_lock();
2290         
2291         hlist_bl_for_each_entry_rcu(dentry, node, b, d_hash) {
2292
2293                 if (dentry->d_name.hash != hash)
2294                         continue;
2295
2296                 spin_lock(&dentry->d_lock);
2297                 if (dentry->d_parent != parent)
2298                         goto next;
2299                 if (d_unhashed(dentry))
2300                         goto next;
2301
2302                 /*
2303                  * It is safe to compare names since d_move() cannot
2304                  * change the qstr (protected by d_lock).
2305                  */
2306                 if (parent->d_flags & DCACHE_OP_COMPARE) {
2307                         int tlen = dentry->d_name.len;
2308                         const char *tname = dentry->d_name.name;
2309                         if (parent->d_op->d_compare(parent, dentry, tlen, tname, name))
2310                                 goto next;
2311                 } else {
2312                         if (dentry->d_name.len != len)
2313                                 goto next;
2314                         if (dentry_cmp(dentry, str, len))
2315                                 goto next;
2316                 }
2317
2318                 dentry->d_lockref.count++;
2319                 found = dentry;
2320                 spin_unlock(&dentry->d_lock);
2321                 break;
2322 next:
2323                 spin_unlock(&dentry->d_lock);
2324         }
2325         rcu_read_unlock();
2326
2327         return found;
2328 }
2329
2330 /**
2331  * d_hash_and_lookup - hash the qstr then search for a dentry
2332  * @dir: Directory to search in
2333  * @name: qstr of name we wish to find
2334  *
2335  * On lookup failure NULL is returned; on bad name - ERR_PTR(-error)
2336  */
2337 struct dentry *d_hash_and_lookup(struct dentry *dir, struct qstr *name)
2338 {
2339         /*
2340          * Check for a fs-specific hash function. Note that we must
2341          * calculate the standard hash first, as the d_op->d_hash()
2342          * routine may choose to leave the hash value unchanged.
2343          */
2344         name->hash = full_name_hash(name->name, name->len);
2345         if (dir->d_flags & DCACHE_OP_HASH) {
2346                 int err = dir->d_op->d_hash(dir, name);
2347                 if (unlikely(err < 0))
2348                         return ERR_PTR(err);
2349         }
2350         return d_lookup(dir, name);
2351 }
2352 EXPORT_SYMBOL(d_hash_and_lookup);
2353
2354 /**
2355  * d_validate - verify dentry provided from insecure source (deprecated)
2356  * @dentry: The dentry alleged to be valid child of @dparent
2357  * @dparent: The parent dentry (known to be valid)
2358  *
2359  * An insecure source has sent us a dentry, here we verify it and dget() it.
2360  * This is used by ncpfs in its readdir implementation.
2361  * Zero is returned in the dentry is invalid.
2362  *
2363  * This function is slow for big directories, and deprecated, do not use it.
2364  */
2365 int d_validate(struct dentry *dentry, struct dentry *dparent)
2366 {
2367         struct dentry *child;
2368
2369         spin_lock(&dparent->d_lock);
2370         list_for_each_entry(child, &dparent->d_subdirs, d_u.d_child) {
2371                 if (dentry == child) {
2372                         spin_lock_nested(&dentry->d_lock, DENTRY_D_LOCK_NESTED);
2373                         __dget_dlock(dentry);
2374                         spin_unlock(&dentry->d_lock);
2375                         spin_unlock(&dparent->d_lock);
2376                         return 1;
2377                 }
2378         }
2379         spin_unlock(&dparent->d_lock);
2380
2381         return 0;
2382 }
2383 EXPORT_SYMBOL(d_validate);
2384
2385 /*
2386  * When a file is deleted, we have two options:
2387  * - turn this dentry into a negative dentry
2388  * - unhash this dentry and free it.
2389  *
2390  * Usually, we want to just turn this into
2391  * a negative dentry, but if anybody else is
2392  * currently using the dentry or the inode
2393  * we can't do that and we fall back on removing
2394  * it from the hash queues and waiting for
2395  * it to be deleted later when it has no users
2396  */
2397  
2398 /**
2399  * d_delete - delete a dentry
2400  * @dentry: The dentry to delete
2401  *
2402  * Turn the dentry into a negative dentry if possible, otherwise
2403  * remove it from the hash queues so it can be deleted later
2404  */
2405  
2406 void d_delete(struct dentry * dentry)
2407 {
2408         struct inode *inode;
2409         int isdir = 0;
2410         /*
2411          * Are we the only user?
2412          */
2413 again:
2414         spin_lock(&dentry->d_lock);
2415         inode = dentry->d_inode;
2416         isdir = S_ISDIR(inode->i_mode);
2417         if (dentry->d_lockref.count == 1) {
2418                 if (!spin_trylock(&inode->i_lock)) {
2419                         spin_unlock(&dentry->d_lock);
2420                         cpu_relax();
2421                         goto again;
2422                 }
2423                 dentry->d_flags &= ~DCACHE_CANT_MOUNT;
2424                 dentry_unlink_inode(dentry);
2425                 fsnotify_nameremove(dentry, isdir);
2426                 return;
2427         }
2428
2429         if (!d_unhashed(dentry))
2430                 __d_drop(dentry);
2431
2432         spin_unlock(&dentry->d_lock);
2433
2434         fsnotify_nameremove(dentry, isdir);
2435 }
2436 EXPORT_SYMBOL(d_delete);
2437
2438 static void __d_rehash(struct dentry * entry, struct hlist_bl_head *b)
2439 {
2440         BUG_ON(!d_unhashed(entry));
2441         hlist_bl_lock(b);
2442         entry->d_flags |= DCACHE_RCUACCESS;
2443         hlist_bl_add_head_rcu(&entry->d_hash, b);
2444         hlist_bl_unlock(b);
2445 }
2446
2447 static void _d_rehash(struct dentry * entry)
2448 {
2449         __d_rehash(entry, d_hash(entry->d_parent, entry->d_name.hash));
2450 }
2451
2452 /**
2453  * d_rehash     - add an entry back to the hash
2454  * @entry: dentry to add to the hash
2455  *
2456  * Adds a dentry to the hash according to its name.
2457  */
2458  
2459 void d_rehash(struct dentry * entry)
2460 {
2461         spin_lock(&entry->d_lock);
2462         _d_rehash(entry);
2463         spin_unlock(&entry->d_lock);
2464 }
2465 EXPORT_SYMBOL(d_rehash);
2466
2467 /**
2468  * dentry_update_name_case - update case insensitive dentry with a new name
2469  * @dentry: dentry to be updated
2470  * @name: new name
2471  *
2472  * Update a case insensitive dentry with new case of name.
2473  *
2474  * dentry must have been returned by d_lookup with name @name. Old and new
2475  * name lengths must match (ie. no d_compare which allows mismatched name
2476  * lengths).
2477  *
2478  * Parent inode i_mutex must be held over d_lookup and into this call (to
2479  * keep renames and concurrent inserts, and readdir(2) away).
2480  */
2481 void dentry_update_name_case(struct dentry *dentry, struct qstr *name)
2482 {
2483         BUG_ON(!mutex_is_locked(&dentry->d_parent->d_inode->i_mutex));
2484         BUG_ON(dentry->d_name.len != name->len); /* d_lookup gives this */
2485
2486         spin_lock(&dentry->d_lock);
2487         write_seqcount_begin(&dentry->d_seq);
2488         memcpy((unsigned char *)dentry->d_name.name, name->name, name->len);
2489         write_seqcount_end(&dentry->d_seq);
2490         spin_unlock(&dentry->d_lock);
2491 }
2492 EXPORT_SYMBOL(dentry_update_name_case);
2493
2494 static void switch_names(struct dentry *dentry, struct dentry *target)
2495 {
2496         if (dname_external(target)) {
2497                 if (dname_external(dentry)) {
2498                         /*
2499                          * Both external: swap the pointers
2500                          */
2501                         swap(target->d_name.name, dentry->d_name.name);
2502                 } else {
2503                         /*
2504                          * dentry:internal, target:external.  Steal target's
2505                          * storage and make target internal.
2506                          */
2507                         memcpy(target->d_iname, dentry->d_name.name,
2508                                         dentry->d_name.len + 1);
2509                         dentry->d_name.name = target->d_name.name;
2510                         target->d_name.name = target->d_iname;
2511                 }
2512         } else {
2513                 if (dname_external(dentry)) {
2514                         /*
2515                          * dentry:external, target:internal.  Give dentry's
2516                          * storage to target and make dentry internal
2517                          */
2518                         memcpy(dentry->d_iname, target->d_name.name,
2519                                         target->d_name.len + 1);
2520                         target->d_name.name = dentry->d_name.name;
2521                         dentry->d_name.name = dentry->d_iname;
2522                 } else {
2523                         /*
2524                          * Both are internal.  Just copy target to dentry
2525                          */
2526                         memcpy(dentry->d_iname, target->d_name.name,
2527                                         target->d_name.len + 1);
2528                         dentry->d_name.len = target->d_name.len;
2529                         return;
2530                 }
2531         }
2532         swap(dentry->d_name.len, target->d_name.len);
2533 }
2534
2535 static void dentry_lock_for_move(struct dentry *dentry, struct dentry *target)
2536 {
2537         /*
2538          * XXXX: do we really need to take target->d_lock?
2539          */
2540         if (IS_ROOT(dentry) || dentry->d_parent == target->d_parent)
2541                 spin_lock(&target->d_parent->d_lock);
2542         else {
2543                 if (d_ancestor(dentry->d_parent, target->d_parent)) {
2544                         spin_lock(&dentry->d_parent->d_lock);
2545                         spin_lock_nested(&target->d_parent->d_lock,
2546                                                 DENTRY_D_LOCK_NESTED);
2547                 } else {
2548                         spin_lock(&target->d_parent->d_lock);
2549                         spin_lock_nested(&dentry->d_parent->d_lock,
2550                                                 DENTRY_D_LOCK_NESTED);
2551                 }
2552         }
2553         if (target < dentry) {
2554                 spin_lock_nested(&target->d_lock, 2);
2555                 spin_lock_nested(&dentry->d_lock, 3);
2556         } else {
2557                 spin_lock_nested(&dentry->d_lock, 2);
2558                 spin_lock_nested(&target->d_lock, 3);
2559         }
2560 }
2561
2562 static void dentry_unlock_parents_for_move(struct dentry *dentry,
2563                                         struct dentry *target)
2564 {
2565         if (target->d_parent != dentry->d_parent)
2566                 spin_unlock(&dentry->d_parent->d_lock);
2567         if (target->d_parent != target)
2568                 spin_unlock(&target->d_parent->d_lock);
2569 }
2570
2571 /*
2572  * When switching names, the actual string doesn't strictly have to
2573  * be preserved in the target - because we're dropping the target
2574  * anyway. As such, we can just do a simple memcpy() to copy over
2575  * the new name before we switch.
2576  *
2577  * Note that we have to be a lot more careful about getting the hash
2578  * switched - we have to switch the hash value properly even if it
2579  * then no longer matches the actual (corrupted) string of the target.
2580  * The hash value has to match the hash queue that the dentry is on..
2581  */
2582 /*
2583  * __d_move - move a dentry
2584  * @dentry: entry to move
2585  * @target: new dentry
2586  *
2587  * Update the dcache to reflect the move of a file name. Negative
2588  * dcache entries should not be moved in this way. Caller must hold
2589  * rename_lock, the i_mutex of the source and target directories,
2590  * and the sb->s_vfs_rename_mutex if they differ. See lock_rename().
2591  */
2592 static void __d_move(struct dentry * dentry, struct dentry * target)
2593 {
2594         if (!dentry->d_inode)
2595                 printk(KERN_WARNING "VFS: moving negative dcache entry\n");
2596
2597         BUG_ON(d_ancestor(dentry, target));
2598         BUG_ON(d_ancestor(target, dentry));
2599
2600         dentry_lock_for_move(dentry, target);
2601
2602         write_seqcount_begin(&dentry->d_seq);
2603         write_seqcount_begin(&target->d_seq);
2604
2605         /* __d_drop does write_seqcount_barrier, but they're OK to nest. */
2606
2607         /*
2608          * Move the dentry to the target hash queue. Don't bother checking
2609          * for the same hash queue because of how unlikely it is.
2610          */
2611         __d_drop(dentry);
2612         __d_rehash(dentry, d_hash(target->d_parent, target->d_name.hash));
2613
2614         /* Unhash the target: dput() will then get rid of it */
2615         __d_drop(target);
2616
2617         list_del(&dentry->d_u.d_child);
2618         list_del(&target->d_u.d_child);
2619
2620         /* Switch the names.. */
2621         switch_names(dentry, target);
2622         swap(dentry->d_name.hash, target->d_name.hash);
2623
2624         /* ... and switch the parents */
2625         if (IS_ROOT(dentry)) {
2626                 dentry->d_parent = target->d_parent;
2627                 target->d_parent = target;
2628                 INIT_LIST_HEAD(&target->d_u.d_child);
2629         } else {
2630                 swap(dentry->d_parent, target->d_parent);
2631
2632                 /* And add them back to the (new) parent lists */
2633                 list_add(&target->d_u.d_child, &target->d_parent->d_subdirs);
2634         }
2635
2636         list_add(&dentry->d_u.d_child, &dentry->d_parent->d_subdirs);
2637
2638         write_seqcount_end(&target->d_seq);
2639         write_seqcount_end(&dentry->d_seq);
2640
2641         dentry_unlock_parents_for_move(dentry, target);
2642         spin_unlock(&target->d_lock);
2643         fsnotify_d_move(dentry);
2644         spin_unlock(&dentry->d_lock);
2645 }
2646
2647 /*
2648  * d_move - move a dentry
2649  * @dentry: entry to move
2650  * @target: new dentry
2651  *
2652  * Update the dcache to reflect the move of a file name. Negative
2653  * dcache entries should not be moved in this way. See the locking
2654  * requirements for __d_move.
2655  */
2656 void d_move(struct dentry *dentry, struct dentry *target)
2657 {
2658         write_seqlock(&rename_lock);
2659         __d_move(dentry, target);
2660         write_sequnlock(&rename_lock);
2661 }
2662 EXPORT_SYMBOL(d_move);
2663
2664 /**
2665  * d_ancestor - search for an ancestor
2666  * @p1: ancestor dentry
2667  * @p2: child dentry
2668  *
2669  * Returns the ancestor dentry of p2 which is a child of p1, if p1 is
2670  * an ancestor of p2, else NULL.
2671  */
2672 struct dentry *d_ancestor(struct dentry *p1, struct dentry *p2)
2673 {
2674         struct dentry *p;
2675
2676         for (p = p2; !IS_ROOT(p); p = p->d_parent) {
2677                 if (p->d_parent == p1)
2678                         return p;
2679         }
2680         return NULL;
2681 }
2682
2683 /*
2684  * This helper attempts to cope with remotely renamed directories
2685  *
2686  * It assumes that the caller is already holding
2687  * dentry->d_parent->d_inode->i_mutex, inode->i_lock and rename_lock
2688  *
2689  * Note: If ever the locking in lock_rename() changes, then please
2690  * remember to update this too...
2691  */
2692 static struct dentry *__d_unalias(struct inode *inode,
2693                 struct dentry *dentry, struct dentry *alias)
2694 {
2695         struct mutex *m1 = NULL, *m2 = NULL;
2696         struct dentry *ret = ERR_PTR(-EBUSY);
2697
2698         /* If alias and dentry share a parent, then no extra locks required */
2699         if (alias->d_parent == dentry->d_parent)
2700                 goto out_unalias;
2701
2702         /* See lock_rename() */
2703         if (!mutex_trylock(&dentry->d_sb->s_vfs_rename_mutex))
2704                 goto out_err;
2705         m1 = &dentry->d_sb->s_vfs_rename_mutex;
2706         if (!mutex_trylock(&alias->d_parent->d_inode->i_mutex))
2707                 goto out_err;
2708         m2 = &alias->d_parent->d_inode->i_mutex;
2709 out_unalias:
2710         if (likely(!d_mountpoint(alias))) {
2711                 __d_move(alias, dentry);
2712                 ret = alias;
2713         }
2714 out_err:
2715         spin_unlock(&inode->i_lock);
2716         if (m2)
2717                 mutex_unlock(m2);
2718         if (m1)
2719                 mutex_unlock(m1);
2720         return ret;
2721 }
2722
2723 /*
2724  * Prepare an anonymous dentry for life in the superblock's dentry tree as a
2725  * named dentry in place of the dentry to be replaced.
2726  * returns with anon->d_lock held!
2727  */
2728 static void __d_materialise_dentry(struct dentry *dentry, struct dentry *anon)
2729 {
2730         struct dentry *dparent;
2731
2732         dentry_lock_for_move(anon, dentry);
2733
2734         write_seqcount_begin(&dentry->d_seq);
2735         write_seqcount_begin(&anon->d_seq);
2736
2737         dparent = dentry->d_parent;
2738
2739         switch_names(dentry, anon);
2740         swap(dentry->d_name.hash, anon->d_name.hash);
2741
2742         dentry->d_parent = dentry;
2743         list_del_init(&dentry->d_u.d_child);
2744         anon->d_parent = dparent;
2745         list_move(&anon->d_u.d_child, &dparent->d_subdirs);
2746
2747         write_seqcount_end(&dentry->d_seq);
2748         write_seqcount_end(&anon->d_seq);
2749
2750         dentry_unlock_parents_for_move(anon, dentry);
2751         spin_unlock(&dentry->d_lock);
2752
2753         /* anon->d_lock still locked, returns locked */
2754         anon->d_flags &= ~DCACHE_DISCONNECTED;
2755 }
2756
2757 /**
2758  * d_materialise_unique - introduce an inode into the tree
2759  * @dentry: candidate dentry
2760  * @inode: inode to bind to the dentry, to which aliases may be attached
2761  *
2762  * Introduces an dentry into the tree, substituting an extant disconnected
2763  * root directory alias in its place if there is one. Caller must hold the
2764  * i_mutex of the parent directory.
2765  */
2766 struct dentry *d_materialise_unique(struct dentry *dentry, struct inode *inode)
2767 {
2768         struct dentry *actual;
2769
2770         BUG_ON(!d_unhashed(dentry));
2771
2772         if (!inode) {
2773                 actual = dentry;
2774                 __d_instantiate(dentry, NULL);
2775                 d_rehash(actual);
2776                 goto out_nolock;
2777         }
2778
2779         spin_lock(&inode->i_lock);
2780
2781         if (S_ISDIR(inode->i_mode)) {
2782                 struct dentry *alias;
2783
2784                 /* Does an aliased dentry already exist? */
2785                 alias = __d_find_alias(inode, 0);
2786                 if (alias) {
2787                         actual = alias;
2788                         write_seqlock(&rename_lock);
2789
2790                         if (d_ancestor(alias, dentry)) {
2791                                 /* Check for loops */
2792                                 actual = ERR_PTR(-ELOOP);
2793                                 spin_unlock(&inode->i_lock);
2794                         } else if (IS_ROOT(alias)) {
2795                                 /* Is this an anonymous mountpoint that we
2796                                  * could splice into our tree? */
2797                                 __d_materialise_dentry(dentry, alias);
2798                                 write_sequnlock(&rename_lock);
2799                                 __d_drop(alias);
2800                                 goto found;
2801                         } else {
2802                                 /* Nope, but we must(!) avoid directory
2803                                  * aliasing. This drops inode->i_lock */
2804                                 actual = __d_unalias(inode, dentry, alias);
2805                         }
2806                         write_sequnlock(&rename_lock);
2807                         if (IS_ERR(actual)) {
2808                                 if (PTR_ERR(actual) == -ELOOP)
2809                                         pr_warn_ratelimited(
2810                                                 "VFS: Lookup of '%s' in %s %s"
2811                                                 " would have caused loop\n",
2812                                                 dentry->d_name.name,
2813                                                 inode->i_sb->s_type->name,
2814                                                 inode->i_sb->s_id);
2815                                 dput(alias);
2816                         }
2817                         goto out_nolock;
2818                 }
2819         }
2820
2821         /* Add a unique reference */
2822         actual = __d_instantiate_unique(dentry, inode);
2823         if (!actual)
2824                 actual = dentry;
2825         else
2826                 BUG_ON(!d_unhashed(actual));
2827
2828         spin_lock(&actual->d_lock);
2829 found:
2830         _d_rehash(actual);
2831         spin_unlock(&actual->d_lock);
2832         spin_unlock(&inode->i_lock);
2833 out_nolock:
2834         if (actual == dentry) {
2835                 security_d_instantiate(dentry, inode);
2836                 return NULL;
2837         }
2838
2839         iput(inode);
2840         return actual;
2841 }
2842 EXPORT_SYMBOL_GPL(d_materialise_unique);
2843
2844 static int prepend(char **buffer, int *buflen, const char *str, int namelen)
2845 {
2846         *buflen -= namelen;
2847         if (*buflen < 0)
2848                 return -ENAMETOOLONG;
2849         *buffer -= namelen;
2850         memcpy(*buffer, str, namelen);
2851         return 0;
2852 }
2853
2854 /**
2855  * prepend_name - prepend a pathname in front of current buffer pointer
2856  * @buffer: buffer pointer
2857  * @buflen: allocated length of the buffer
2858  * @name:   name string and length qstr structure
2859  *
2860  * With RCU path tracing, it may race with d_move(). Use ACCESS_ONCE() to
2861  * make sure that either the old or the new name pointer and length are
2862  * fetched. However, there may be mismatch between length and pointer.
2863  * The length cannot be trusted, we need to copy it byte-by-byte until
2864  * the length is reached or a null byte is found. It also prepends "/" at
2865  * the beginning of the name. The sequence number check at the caller will
2866  * retry it again when a d_move() does happen. So any garbage in the buffer
2867  * due to mismatched pointer and length will be discarded.
2868  */
2869 static int prepend_name(char **buffer, int *buflen, struct qstr *name)
2870 {
2871         const char *dname = ACCESS_ONCE(name->name);
2872         u32 dlen = ACCESS_ONCE(name->len);
2873         char *p;
2874
2875         if (*buflen < dlen + 1)
2876                 return -ENAMETOOLONG;
2877         *buflen -= dlen + 1;
2878         p = *buffer -= dlen + 1;
2879         *p++ = '/';
2880         while (dlen--) {
2881                 char c = *dname++;
2882                 if (!c)
2883                         break;
2884                 *p++ = c;
2885         }
2886         return 0;
2887 }
2888
2889 /**
2890  * prepend_path - Prepend path string to a buffer
2891  * @path: the dentry/vfsmount to report
2892  * @root: root vfsmnt/dentry
2893  * @buffer: pointer to the end of the buffer
2894  * @buflen: pointer to buffer length
2895  *
2896  * The function will first try to write out the pathname without taking any
2897  * lock other than the RCU read lock to make sure that dentries won't go away.
2898  * It only checks the sequence number of the global rename_lock as any change
2899  * in the dentry's d_seq will be preceded by changes in the rename_lock
2900  * sequence number. If the sequence number had been changed, it will restart
2901  * the whole pathname back-tracing sequence again by taking the rename_lock.
2902  * In this case, there is no need to take the RCU read lock as the recursive
2903  * parent pointer references will keep the dentry chain alive as long as no
2904  * rename operation is performed.
2905  */
2906 static int prepend_path(const struct path *path,
2907                         const struct path *root,
2908                         char **buffer, int *buflen)
2909 {
2910         struct dentry *dentry = path->dentry;
2911         struct vfsmount *vfsmnt = path->mnt;
2912         struct mount *mnt = real_mount(vfsmnt);
2913         int error = 0;
2914         unsigned seq = 0;
2915         char *bptr;
2916         int blen;
2917
2918         rcu_read_lock();
2919 restart:
2920         bptr = *buffer;
2921         blen = *buflen;
2922         read_seqbegin_or_lock(&rename_lock, &seq);
2923         while (dentry != root->dentry || vfsmnt != root->mnt) {
2924                 struct dentry * parent;
2925
2926                 if (dentry == vfsmnt->mnt_root || IS_ROOT(dentry)) {
2927                         /* Global root? */
2928                         if (mnt_has_parent(mnt)) {
2929                                 dentry = mnt->mnt_mountpoint;
2930                                 mnt = mnt->mnt_parent;
2931                                 vfsmnt = &mnt->mnt;
2932                                 continue;
2933                         }
2934                         /*
2935                          * Filesystems needing to implement special "root names"
2936                          * should do so with ->d_dname()
2937                          */
2938                         if (IS_ROOT(dentry) &&
2939                            (dentry->d_name.len != 1 ||
2940                             dentry->d_name.name[0] != '/')) {
2941                                 WARN(1, "Root dentry has weird name <%.*s>\n",
2942                                      (int) dentry->d_name.len,
2943                                      dentry->d_name.name);
2944                         }
2945                         if (!error)
2946                                 error = is_mounted(vfsmnt) ? 1 : 2;
2947                         break;
2948                 }
2949                 parent = dentry->d_parent;
2950                 prefetch(parent);
2951                 error = prepend_name(&bptr, &blen, &dentry->d_name);
2952                 if (error)
2953                         break;
2954
2955                 dentry = parent;
2956         }
2957         if (!(seq & 1))
2958                 rcu_read_unlock();
2959         if (need_seqretry(&rename_lock, seq)) {
2960                 seq = 1;
2961                 goto restart;
2962         }
2963         done_seqretry(&rename_lock, seq);
2964
2965         if (error >= 0 && bptr == *buffer) {
2966                 if (--blen < 0)
2967                         error = -ENAMETOOLONG;
2968                 else
2969                         *--bptr = '/';
2970         }
2971         *buffer = bptr;
2972         *buflen = blen;
2973         return error;
2974 }
2975
2976 /**
2977  * __d_path - return the path of a dentry
2978  * @path: the dentry/vfsmount to report
2979  * @root: root vfsmnt/dentry
2980  * @buf: buffer to return value in
2981  * @buflen: buffer length
2982  *
2983  * Convert a dentry into an ASCII path name.
2984  *
2985  * Returns a pointer into the buffer or an error code if the
2986  * path was too long.
2987  *
2988  * "buflen" should be positive.
2989  *
2990  * If the path is not reachable from the supplied root, return %NULL.
2991  */
2992 char *__d_path(const struct path *path,
2993                const struct path *root,
2994                char *buf, int buflen)
2995 {
2996         char *res = buf + buflen;
2997         int error;
2998
2999         prepend(&res, &buflen, "\0", 1);
3000         br_read_lock(&vfsmount_lock);
3001         error = prepend_path(path, root, &res, &buflen);
3002         br_read_unlock(&vfsmount_lock);
3003
3004         if (error < 0)
3005                 return ERR_PTR(error);
3006         if (error > 0)
3007                 return NULL;
3008         return res;
3009 }
3010
3011 char *d_absolute_path(const struct path *path,
3012                char *buf, int buflen)
3013 {
3014         struct path root = {};
3015         char *res = buf + buflen;
3016         int error;
3017
3018         prepend(&res, &buflen, "\0", 1);
3019         br_read_lock(&vfsmount_lock);
3020         error = prepend_path(path, &root, &res, &buflen);
3021         br_read_unlock(&vfsmount_lock);
3022
3023         if (error > 1)
3024                 error = -EINVAL;
3025         if (error < 0)
3026                 return ERR_PTR(error);
3027         return res;
3028 }
3029
3030 /*
3031  * same as __d_path but appends "(deleted)" for unlinked files.
3032  */
3033 static int path_with_deleted(const struct path *path,
3034                              const struct path *root,
3035                              char **buf, int *buflen)
3036 {
3037         prepend(buf, buflen, "\0", 1);
3038         if (d_unlinked(path->dentry)) {
3039                 int error = prepend(buf, buflen, " (deleted)", 10);
3040                 if (error)
3041                         return error;
3042         }
3043
3044         return prepend_path(path, root, buf, buflen);
3045 }
3046
3047 static int prepend_unreachable(char **buffer, int *buflen)
3048 {
3049         return prepend(buffer, buflen, "(unreachable)", 13);
3050 }
3051
3052 static void get_fs_root_rcu(struct fs_struct *fs, struct path *root)
3053 {
3054         unsigned seq;
3055
3056         do {
3057                 seq = read_seqcount_begin(&fs->seq);
3058                 *root = fs->root;
3059         } while (read_seqcount_retry(&fs->seq, seq));
3060 }
3061
3062 /**
3063  * d_path - return the path of a dentry
3064  * @path: path to report
3065  * @buf: buffer to return value in
3066  * @buflen: buffer length
3067  *
3068  * Convert a dentry into an ASCII path name. If the entry has been deleted
3069  * the string " (deleted)" is appended. Note that this is ambiguous.
3070  *
3071  * Returns a pointer into the buffer or an error code if the path was
3072  * too long. Note: Callers should use the returned pointer, not the passed
3073  * in buffer, to use the name! The implementation often starts at an offset
3074  * into the buffer, and may leave 0 bytes at the start.
3075  *
3076  * "buflen" should be positive.
3077  */
3078 char *d_path(const struct path *path, char *buf, int buflen)
3079 {
3080         char *res = buf + buflen;
3081         struct path root;
3082         int error;
3083
3084         /*
3085          * We have various synthetic filesystems that never get mounted.  On
3086          * these filesystems dentries are never used for lookup purposes, and
3087          * thus don't need to be hashed.  They also don't need a name until a
3088          * user wants to identify the object in /proc/pid/fd/.  The little hack
3089          * below allows us to generate a name for these objects on demand:
3090          */
3091         if (path->dentry->d_op && path->dentry->d_op->d_dname)
3092                 return path->dentry->d_op->d_dname(path->dentry, buf, buflen);
3093
3094         rcu_read_lock();
3095         get_fs_root_rcu(current->fs, &root);
3096         br_read_lock(&vfsmount_lock);
3097         error = path_with_deleted(path, &root, &res, &buflen);
3098         br_read_unlock(&vfsmount_lock);
3099         rcu_read_unlock();
3100
3101         if (error < 0)
3102                 res = ERR_PTR(error);
3103         return res;
3104 }
3105 EXPORT_SYMBOL(d_path);
3106
3107 /*
3108  * Helper function for dentry_operations.d_dname() members
3109  */
3110 char *dynamic_dname(struct dentry *dentry, char *buffer, int buflen,
3111                         const char *fmt, ...)
3112 {
3113         va_list args;
3114         char temp[64];
3115         int sz;
3116
3117         va_start(args, fmt);
3118         sz = vsnprintf(temp, sizeof(temp), fmt, args) + 1;
3119         va_end(args);
3120
3121         if (sz > sizeof(temp) || sz > buflen)
3122                 return ERR_PTR(-ENAMETOOLONG);
3123
3124         buffer += buflen - sz;
3125         return memcpy(buffer, temp, sz);
3126 }
3127
3128 char *simple_dname(struct dentry *dentry, char *buffer, int buflen)
3129 {
3130         char *end = buffer + buflen;
3131         /* these dentries are never renamed, so d_lock is not needed */
3132         if (prepend(&end, &buflen, " (deleted)", 11) ||
3133             prepend(&end, &buflen, dentry->d_name.name, dentry->d_name.len) ||
3134             prepend(&end, &buflen, "/", 1))  
3135                 end = ERR_PTR(-ENAMETOOLONG);
3136         return end;
3137 }
3138
3139 /*
3140  * Write full pathname from the root of the filesystem into the buffer.
3141  */
3142 static char *__dentry_path(struct dentry *dentry, char *buf, int buflen)
3143 {
3144         char *end, *retval;
3145         int len, seq = 0;
3146         int error = 0;
3147
3148         rcu_read_lock();
3149 restart:
3150         end = buf + buflen;
3151         len = buflen;
3152         prepend(&end, &len, "\0", 1);
3153         if (buflen < 1)
3154                 goto Elong;
3155         /* Get '/' right */
3156         retval = end-1;
3157         *retval = '/';
3158         read_seqbegin_or_lock(&rename_lock, &seq);
3159         while (!IS_ROOT(dentry)) {
3160                 struct dentry *parent = dentry->d_parent;
3161                 int error;
3162
3163                 prefetch(parent);
3164                 error = prepend_name(&end, &len, &dentry->d_name);
3165                 if (error)
3166                         break;
3167
3168                 retval = end;
3169                 dentry = parent;
3170         }
3171         if (!(seq & 1))
3172                 rcu_read_unlock();
3173         if (need_seqretry(&rename_lock, seq)) {
3174                 seq = 1;
3175                 goto restart;
3176         }
3177         done_seqretry(&rename_lock, seq);
3178         if (error)
3179                 goto Elong;
3180         return retval;
3181 Elong:
3182         return ERR_PTR(-ENAMETOOLONG);
3183 }
3184
3185 char *dentry_path_raw(struct dentry *dentry, char *buf, int buflen)
3186 {
3187         return __dentry_path(dentry, buf, buflen);
3188 }
3189 EXPORT_SYMBOL(dentry_path_raw);
3190
3191 char *dentry_path(struct dentry *dentry, char *buf, int buflen)
3192 {
3193         char *p = NULL;
3194         char *retval;
3195
3196         if (d_unlinked(dentry)) {
3197                 p = buf + buflen;
3198                 if (prepend(&p, &buflen, "//deleted", 10) != 0)
3199                         goto Elong;
3200                 buflen++;
3201         }
3202         retval = __dentry_path(dentry, buf, buflen);
3203         if (!IS_ERR(retval) && p)
3204                 *p = '/';       /* restore '/' overriden with '\0' */
3205         return retval;
3206 Elong:
3207         return ERR_PTR(-ENAMETOOLONG);
3208 }
3209
3210 static void get_fs_root_and_pwd_rcu(struct fs_struct *fs, struct path *root,
3211                                     struct path *pwd)
3212 {
3213         unsigned seq;
3214
3215         do {
3216                 seq = read_seqcount_begin(&fs->seq);
3217                 *root = fs->root;
3218                 *pwd = fs->pwd;
3219         } while (read_seqcount_retry(&fs->seq, seq));
3220 }
3221
3222 /*
3223  * NOTE! The user-level library version returns a
3224  * character pointer. The kernel system call just
3225  * returns the length of the buffer filled (which
3226  * includes the ending '\0' character), or a negative
3227  * error value. So libc would do something like
3228  *
3229  *      char *getcwd(char * buf, size_t size)
3230  *      {
3231  *              int retval;
3232  *
3233  *              retval = sys_getcwd(buf, size);
3234  *              if (retval >= 0)
3235  *                      return buf;
3236  *              errno = -retval;
3237  *              return NULL;
3238  *      }
3239  */
3240 SYSCALL_DEFINE2(getcwd, char __user *, buf, unsigned long, size)
3241 {
3242         int error;
3243         struct path pwd, root;
3244         char *page = __getname();
3245
3246         if (!page)
3247                 return -ENOMEM;
3248
3249         rcu_read_lock();
3250         get_fs_root_and_pwd_rcu(current->fs, &root, &pwd);
3251
3252         error = -ENOENT;
3253         br_read_lock(&vfsmount_lock);
3254         if (!d_unlinked(pwd.dentry)) {
3255                 unsigned long len;
3256                 char *cwd = page + PATH_MAX;
3257                 int buflen = PATH_MAX;
3258
3259                 prepend(&cwd, &buflen, "\0", 1);
3260                 error = prepend_path(&pwd, &root, &cwd, &buflen);
3261                 br_read_unlock(&vfsmount_lock);
3262                 rcu_read_unlock();
3263
3264                 if (error < 0)
3265                         goto out;
3266
3267                 /* Unreachable from current root */
3268                 if (error > 0) {
3269                         error = prepend_unreachable(&cwd, &buflen);
3270                         if (error)
3271                                 goto out;
3272                 }
3273
3274                 error = -ERANGE;
3275                 len = PATH_MAX + page - cwd;
3276                 if (len <= size) {
3277                         error = len;
3278                         if (copy_to_user(buf, cwd, len))
3279                                 error = -EFAULT;
3280                 }
3281         } else {
3282                 br_read_unlock(&vfsmount_lock);
3283                 rcu_read_unlock();
3284         }
3285
3286 out:
3287         __putname(page);
3288         return error;
3289 }
3290
3291 /*
3292  * Test whether new_dentry is a subdirectory of old_dentry.
3293  *
3294  * Trivially implemented using the dcache structure
3295  */
3296
3297 /**
3298  * is_subdir - is new dentry a subdirectory of old_dentry
3299  * @new_dentry: new dentry
3300  * @old_dentry: old dentry
3301  *
3302  * Returns 1 if new_dentry is a subdirectory of the parent (at any depth).
3303  * Returns 0 otherwise.
3304  * Caller must ensure that "new_dentry" is pinned before calling is_subdir()
3305  */
3306   
3307 int is_subdir(struct dentry *new_dentry, struct dentry *old_dentry)
3308 {
3309         int result;
3310         unsigned seq;
3311
3312         if (new_dentry == old_dentry)
3313                 return 1;
3314
3315         do {
3316                 /* for restarting inner loop in case of seq retry */
3317                 seq = read_seqbegin(&rename_lock);
3318                 /*
3319                  * Need rcu_readlock to protect against the d_parent trashing
3320                  * due to d_move
3321                  */
3322                 rcu_read_lock();
3323                 if (d_ancestor(old_dentry, new_dentry))
3324                         result = 1;
3325                 else
3326                         result = 0;
3327                 rcu_read_unlock();
3328         } while (read_seqretry(&rename_lock, seq));
3329
3330         return result;
3331 }
3332
3333 static enum d_walk_ret d_genocide_kill(void *data, struct dentry *dentry)
3334 {
3335         struct dentry *root = data;
3336         if (dentry != root) {
3337                 if (d_unhashed(dentry) || !dentry->d_inode)
3338                         return D_WALK_SKIP;
3339
3340                 if (!(dentry->d_flags & DCACHE_GENOCIDE)) {
3341                         dentry->d_flags |= DCACHE_GENOCIDE;
3342                         dentry->d_lockref.count--;
3343                 }
3344         }
3345         return D_WALK_CONTINUE;
3346 }
3347
3348 void d_genocide(struct dentry *parent)
3349 {
3350         d_walk(parent, parent, d_genocide_kill, NULL);
3351 }
3352
3353 void d_tmpfile(struct dentry *dentry, struct inode *inode)
3354 {
3355         inode_dec_link_count(inode);
3356         BUG_ON(dentry->d_name.name != dentry->d_iname ||
3357                 !hlist_unhashed(&dentry->d_alias) ||
3358                 !d_unlinked(dentry));
3359         spin_lock(&dentry->d_parent->d_lock);
3360         spin_lock_nested(&dentry->d_lock, DENTRY_D_LOCK_NESTED);
3361         dentry->d_name.len = sprintf(dentry->d_iname, "#%llu",
3362                                 (unsigned long long)inode->i_ino);
3363         spin_unlock(&dentry->d_lock);
3364         spin_unlock(&dentry->d_parent->d_lock);
3365         d_instantiate(dentry, inode);
3366 }
3367 EXPORT_SYMBOL(d_tmpfile);
3368
3369 static __initdata unsigned long dhash_entries;
3370 static int __init set_dhash_entries(char *str)
3371 {
3372         if (!str)
3373                 return 0;
3374         dhash_entries = simple_strtoul(str, &str, 0);
3375         return 1;
3376 }
3377 __setup("dhash_entries=", set_dhash_entries);
3378
3379 static void __init dcache_init_early(void)
3380 {
3381         unsigned int loop;
3382
3383         /* If hashes are distributed across NUMA nodes, defer
3384          * hash allocation until vmalloc space is available.
3385          */
3386         if (hashdist)
3387                 return;
3388
3389         dentry_hashtable =
3390                 alloc_large_system_hash("Dentry cache",
3391                                         sizeof(struct hlist_bl_head),
3392                                         dhash_entries,
3393                                         13,
3394                                         HASH_EARLY,
3395                                         &d_hash_shift,
3396                                         &d_hash_mask,
3397                                         0,
3398                                         0);
3399
3400         for (loop = 0; loop < (1U << d_hash_shift); loop++)
3401                 INIT_HLIST_BL_HEAD(dentry_hashtable + loop);
3402 }
3403
3404 static void __init dcache_init(void)
3405 {
3406         unsigned int loop;
3407
3408         /* 
3409          * A constructor could be added for stable state like the lists,
3410          * but it is probably not worth it because of the cache nature
3411          * of the dcache. 
3412          */
3413         dentry_cache = KMEM_CACHE(dentry,
3414                 SLAB_RECLAIM_ACCOUNT|SLAB_PANIC|SLAB_MEM_SPREAD);
3415
3416         /* Hash may have been set up in dcache_init_early */
3417         if (!hashdist)
3418                 return;
3419
3420         dentry_hashtable =
3421                 alloc_large_system_hash("Dentry cache",
3422                                         sizeof(struct hlist_bl_head),
3423                                         dhash_entries,
3424                                         13,
3425                                         0,
3426                                         &d_hash_shift,
3427                                         &d_hash_mask,
3428                                         0,
3429                                         0);
3430
3431         for (loop = 0; loop < (1U << d_hash_shift); loop++)
3432                 INIT_HLIST_BL_HEAD(dentry_hashtable + loop);
3433 }
3434
3435 /* SLAB cache for __getname() consumers */
3436 struct kmem_cache *names_cachep __read_mostly;
3437 EXPORT_SYMBOL(names_cachep);
3438
3439 EXPORT_SYMBOL(d_genocide);
3440
3441 void __init vfs_caches_init_early(void)
3442 {
3443         dcache_init_early();
3444         inode_init_early();
3445 }
3446
3447 void __init vfs_caches_init(unsigned long mempages)
3448 {
3449         unsigned long reserve;
3450
3451         /* Base hash sizes on available memory, with a reserve equal to
3452            150% of current kernel size */
3453
3454         reserve = min((mempages - nr_free_pages()) * 3/2, mempages - 1);
3455         mempages -= reserve;
3456
3457         names_cachep = kmem_cache_create("names_cache", PATH_MAX, 0,
3458                         SLAB_HWCACHE_ALIGN|SLAB_PANIC, NULL);
3459
3460         dcache_init();
3461         inode_init();
3462         files_init(mempages);
3463         mnt_init();
3464         bdev_cache_init();
3465         chrdev_init();
3466 }