4 * Copyright 2002 John Levon <levon@movementarian.org>
6 * Persistent cookie-path mappings. These are used by
7 * profilers to convert a per-task EIP value into something
8 * non-transitory that can be processed at a later date.
9 * This is done by locking the dentry/vfsmnt pair in the
10 * kernel until released by the tasks needing the persistent
11 * objects. The tag is simply an unsigned long that refers
12 * to the pair and can be looked up from userspace.
15 #include <linux/syscalls.h>
16 #include <linux/export.h>
17 #include <linux/slab.h>
18 #include <linux/list.h>
19 #include <linux/mount.h>
20 #include <linux/capability.h>
21 #include <linux/dcache.h>
23 #include <linux/err.h>
24 #include <linux/errno.h>
25 #include <linux/dcookies.h>
26 #include <linux/mutex.h>
27 #include <linux/path.h>
28 #include <linux/compat.h>
29 #include <linux/uaccess.h>
31 /* The dcookies are allocated from a kmem_cache and
32 * hashed onto a small number of lists. None of the
33 * code here is particularly performance critical
35 struct dcookie_struct {
37 struct list_head hash_list;
40 static LIST_HEAD(dcookie_users);
41 static DEFINE_MUTEX(dcookie_mutex);
42 static struct kmem_cache *dcookie_cache __read_mostly;
43 static struct list_head *dcookie_hashtable __read_mostly;
44 static size_t hash_size __read_mostly;
46 static inline int is_live(void)
48 return !(list_empty(&dcookie_users));
52 /* The dentry is locked, its address will do for the cookie */
53 static inline unsigned long dcookie_value(struct dcookie_struct * dcs)
55 return (unsigned long)dcs->path.dentry;
59 static size_t dcookie_hash(unsigned long dcookie)
61 return (dcookie >> L1_CACHE_SHIFT) & (hash_size - 1);
65 static struct dcookie_struct * find_dcookie(unsigned long dcookie)
67 struct dcookie_struct *found = NULL;
68 struct dcookie_struct * dcs;
69 struct list_head * pos;
70 struct list_head * list;
72 list = dcookie_hashtable + dcookie_hash(dcookie);
74 list_for_each(pos, list) {
75 dcs = list_entry(pos, struct dcookie_struct, hash_list);
76 if (dcookie_value(dcs) == dcookie) {
86 static void hash_dcookie(struct dcookie_struct * dcs)
88 struct list_head * list = dcookie_hashtable + dcookie_hash(dcookie_value(dcs));
89 list_add(&dcs->hash_list, list);
93 static struct dcookie_struct *alloc_dcookie(const struct path *path)
95 struct dcookie_struct *dcs = kmem_cache_alloc(dcookie_cache,
102 spin_lock(&d->d_lock);
103 d->d_flags |= DCACHE_COOKIE;
104 spin_unlock(&d->d_lock);
113 /* This is the main kernel-side routine that retrieves the cookie
114 * value for a dentry/vfsmnt pair.
116 int get_dcookie(const struct path *path, unsigned long *cookie)
119 struct dcookie_struct * dcs;
121 mutex_lock(&dcookie_mutex);
128 if (path->dentry->d_flags & DCACHE_COOKIE) {
129 dcs = find_dcookie((unsigned long)path->dentry);
131 dcs = alloc_dcookie(path);
138 *cookie = dcookie_value(dcs);
141 mutex_unlock(&dcookie_mutex);
146 /* And here is where the userspace process can look up the cookie value
147 * to retrieve the path.
149 SYSCALL_DEFINE3(lookup_dcookie, u64, cookie64, char __user *, buf, size_t, len)
151 unsigned long cookie = (unsigned long)cookie64;
156 struct dcookie_struct * dcs;
158 /* we could leak path information to users
159 * without dir read permission without this
161 if (!capable(CAP_SYS_ADMIN))
164 mutex_lock(&dcookie_mutex);
171 if (!(dcs = find_dcookie(cookie)))
175 kbuf = kmalloc(PAGE_SIZE, GFP_KERNEL);
179 /* FIXME: (deleted) ? */
180 path = d_path(&dcs->path, kbuf, PAGE_SIZE);
182 mutex_unlock(&dcookie_mutex);
191 pathlen = kbuf + PAGE_SIZE - path;
192 if (pathlen <= len) {
194 if (copy_to_user(buf, path, pathlen))
202 mutex_unlock(&dcookie_mutex);
207 COMPAT_SYSCALL_DEFINE4(lookup_dcookie, u32, w0, u32, w1, char __user *, buf, compat_size_t, len)
210 return sys_lookup_dcookie(((u64)w0 << 32) | w1, buf, len);
212 return sys_lookup_dcookie(((u64)w1 << 32) | w0, buf, len);
217 static int dcookie_init(void)
219 struct list_head * d;
220 unsigned int i, hash_bits;
223 dcookie_cache = kmem_cache_create("dcookie_cache",
224 sizeof(struct dcookie_struct),
230 dcookie_hashtable = kmalloc(PAGE_SIZE, GFP_KERNEL);
231 if (!dcookie_hashtable)
237 * Find the power-of-two list-heads that can fit into the allocation..
238 * We don't guarantee that "sizeof(struct list_head)" is necessarily
241 hash_size = PAGE_SIZE / sizeof(struct list_head);
245 } while ((hash_size >> hash_bits) != 0);
249 * Re-calculate the actual number of entries and the mask
250 * from the number of bits we can fit.
252 hash_size = 1UL << hash_bits;
254 /* And initialize the newly allocated array */
255 d = dcookie_hashtable;
266 kmem_cache_destroy(dcookie_cache);
271 static void free_dcookie(struct dcookie_struct * dcs)
273 struct dentry *d = dcs->path.dentry;
275 spin_lock(&d->d_lock);
276 d->d_flags &= ~DCACHE_COOKIE;
277 spin_unlock(&d->d_lock);
279 path_put(&dcs->path);
280 kmem_cache_free(dcookie_cache, dcs);
284 static void dcookie_exit(void)
286 struct list_head * list;
287 struct list_head * pos;
288 struct list_head * pos2;
289 struct dcookie_struct * dcs;
292 for (i = 0; i < hash_size; ++i) {
293 list = dcookie_hashtable + i;
294 list_for_each_safe(pos, pos2, list) {
295 dcs = list_entry(pos, struct dcookie_struct, hash_list);
296 list_del(&dcs->hash_list);
301 kfree(dcookie_hashtable);
302 kmem_cache_destroy(dcookie_cache);
306 struct dcookie_user {
307 struct list_head next;
310 struct dcookie_user * dcookie_register(void)
312 struct dcookie_user * user;
314 mutex_lock(&dcookie_mutex);
316 user = kmalloc(sizeof(struct dcookie_user), GFP_KERNEL);
320 if (!is_live() && dcookie_init())
323 list_add(&user->next, &dcookie_users);
326 mutex_unlock(&dcookie_mutex);
335 void dcookie_unregister(struct dcookie_user * user)
337 mutex_lock(&dcookie_mutex);
339 list_del(&user->next);
345 mutex_unlock(&dcookie_mutex);
348 EXPORT_SYMBOL_GPL(dcookie_register);
349 EXPORT_SYMBOL_GPL(dcookie_unregister);
350 EXPORT_SYMBOL_GPL(get_dcookie);