1 /* Global fscache object list maintainer and viewer
3 * Copyright (C) 2009 Red Hat, Inc. All Rights Reserved.
4 * Written by David Howells (dhowells@redhat.com)
6 * This program is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU General Public Licence
8 * as published by the Free Software Foundation; either version
9 * 2 of the Licence, or (at your option) any later version.
12 #define FSCACHE_DEBUG_LEVEL COOKIE
13 #include <linux/module.h>
14 #include <linux/seq_file.h>
15 #include <linux/slab.h>
16 #include <linux/key.h>
17 #include <keys/user-type.h>
20 static struct rb_root fscache_object_list
;
21 static DEFINE_RWLOCK(fscache_object_list_lock
);
23 struct fscache_objlist_data
{
24 unsigned long config
; /* display configuration */
25 #define FSCACHE_OBJLIST_CONFIG_KEY 0x00000001 /* show object keys */
26 #define FSCACHE_OBJLIST_CONFIG_AUX 0x00000002 /* show object auxdata */
27 #define FSCACHE_OBJLIST_CONFIG_COOKIE 0x00000004 /* show objects with cookies */
28 #define FSCACHE_OBJLIST_CONFIG_NOCOOKIE 0x00000008 /* show objects without cookies */
29 #define FSCACHE_OBJLIST_CONFIG_BUSY 0x00000010 /* show busy objects */
30 #define FSCACHE_OBJLIST_CONFIG_IDLE 0x00000020 /* show idle objects */
31 #define FSCACHE_OBJLIST_CONFIG_PENDWR 0x00000040 /* show objects with pending writes */
32 #define FSCACHE_OBJLIST_CONFIG_NOPENDWR 0x00000080 /* show objects without pending writes */
33 #define FSCACHE_OBJLIST_CONFIG_READS 0x00000100 /* show objects with active reads */
34 #define FSCACHE_OBJLIST_CONFIG_NOREADS 0x00000200 /* show objects without active reads */
35 #define FSCACHE_OBJLIST_CONFIG_EVENTS 0x00000400 /* show objects with events */
36 #define FSCACHE_OBJLIST_CONFIG_NOEVENTS 0x00000800 /* show objects without no events */
37 #define FSCACHE_OBJLIST_CONFIG_WORK 0x00001000 /* show objects with work */
38 #define FSCACHE_OBJLIST_CONFIG_NOWORK 0x00002000 /* show objects without work */
40 u8 buf
[512]; /* key and aux data buffer */
44 * Add an object to the object list
45 * - we use the address of the fscache_object structure as the key into the
48 void fscache_objlist_add(struct fscache_object
*obj
)
50 struct fscache_object
*xobj
;
51 struct rb_node
**p
= &fscache_object_list
.rb_node
, *parent
= NULL
;
53 ASSERT(RB_EMPTY_NODE(&obj
->objlist_link
));
55 write_lock(&fscache_object_list_lock
);
59 xobj
= rb_entry(parent
, struct fscache_object
, objlist_link
);
69 rb_link_node(&obj
->objlist_link
, parent
, p
);
70 rb_insert_color(&obj
->objlist_link
, &fscache_object_list
);
72 write_unlock(&fscache_object_list_lock
);
76 * Remove an object from the object list.
78 void fscache_objlist_remove(struct fscache_object
*obj
)
80 if (RB_EMPTY_NODE(&obj
->objlist_link
))
83 write_lock(&fscache_object_list_lock
);
85 BUG_ON(RB_EMPTY_ROOT(&fscache_object_list
));
86 rb_erase(&obj
->objlist_link
, &fscache_object_list
);
88 write_unlock(&fscache_object_list_lock
);
92 * find the object in the tree on or after the specified index
94 static struct fscache_object
*fscache_objlist_lookup(loff_t
*_pos
)
96 struct fscache_object
*pobj
, *obj
= NULL
, *minobj
= NULL
;
100 if (*_pos
>= (unsigned long) ERR_PTR(-ENOENT
))
104 /* banners (can't represent line 0 by pos 0 as that would involve
105 * returning a NULL pointer) */
107 return (struct fscache_object
*)(long)++(*_pos
);
109 return (struct fscache_object
*)pos
;
111 pobj
= (struct fscache_object
*)pos
;
112 p
= fscache_object_list
.rb_node
;
114 obj
= rb_entry(p
, struct fscache_object
, objlist_link
);
116 if (!minobj
|| minobj
> obj
)
119 } else if (pobj
> obj
) {
129 *_pos
= (unsigned long) ERR_PTR(-ENOENT
);
130 else if (minobj
!= obj
)
131 *_pos
= (unsigned long) minobj
;
136 * set up the iterator to start reading from the first line
138 static void *fscache_objlist_start(struct seq_file
*m
, loff_t
*_pos
)
139 __acquires(&fscache_object_list_lock
)
141 read_lock(&fscache_object_list_lock
);
142 return fscache_objlist_lookup(_pos
);
146 * move to the next line
148 static void *fscache_objlist_next(struct seq_file
*m
, void *v
, loff_t
*_pos
)
151 return fscache_objlist_lookup(_pos
);
155 * clean up after reading
157 static void fscache_objlist_stop(struct seq_file
*m
, void *v
)
158 __releases(&fscache_object_list_lock
)
160 read_unlock(&fscache_object_list_lock
);
166 static int fscache_objlist_show(struct seq_file
*m
, void *v
)
168 struct fscache_objlist_data
*data
= m
->private;
169 struct fscache_object
*obj
= v
;
170 struct fscache_cookie
*cookie
;
171 unsigned long config
= data
->config
;
172 char _type
[3], *type
;
173 u8
*buf
= data
->buf
, *p
;
175 if ((unsigned long) v
== 1) {
176 seq_puts(m
, "OBJECT PARENT STAT CHLDN OPS OOP IPR EX READS"
178 " | NETFS_COOKIE_DEF TY FL NETFS_DATA");
179 if (config
& (FSCACHE_OBJLIST_CONFIG_KEY
|
180 FSCACHE_OBJLIST_CONFIG_AUX
))
182 if (config
& FSCACHE_OBJLIST_CONFIG_KEY
)
183 seq_puts(m
, "OBJECT_KEY");
184 if ((config
& (FSCACHE_OBJLIST_CONFIG_KEY
|
185 FSCACHE_OBJLIST_CONFIG_AUX
)) ==
186 (FSCACHE_OBJLIST_CONFIG_KEY
| FSCACHE_OBJLIST_CONFIG_AUX
))
188 if (config
& FSCACHE_OBJLIST_CONFIG_AUX
)
189 seq_puts(m
, "AUX_DATA");
194 if ((unsigned long) v
== 2) {
195 seq_puts(m
, "======== ======== ==== ===== === === === == ====="
197 " | ================ == == ================");
198 if (config
& (FSCACHE_OBJLIST_CONFIG_KEY
|
199 FSCACHE_OBJLIST_CONFIG_AUX
))
200 seq_puts(m
, " ================");
205 /* filter out any unwanted objects */
206 #define FILTER(criterion, _yes, _no) \
208 unsigned long yes = FSCACHE_OBJLIST_CONFIG_##_yes; \
209 unsigned long no = FSCACHE_OBJLIST_CONFIG_##_no; \
211 if (!(config & yes)) \
214 if (!(config & no)) \
219 cookie
= obj
->cookie
;
223 FILTER(fscache_object_is_active(obj
) ||
225 obj
->n_obj_ops
!= 0 ||
227 !list_empty(&obj
->dependents
),
229 FILTER(test_bit(FSCACHE_OBJECT_PENDING_WRITE
, &obj
->flags
),
231 FILTER(atomic_read(&obj
->n_reads
),
233 FILTER(obj
->events
& obj
->event_mask
,
235 FILTER(work_busy(&obj
->work
), WORK
, NOWORK
);
239 "%8x %8x %s %5u %3u %3u %3u %2u %5u %2lx %2lx %2lx %1x | ",
241 obj
->parent
? obj
->parent
->debug_id
: -1,
242 obj
->state
->short_name
,
248 atomic_read(&obj
->n_reads
),
252 work_busy(&obj
->work
));
254 if (fscache_use_cookie(obj
)) {
255 uint16_t keylen
= 0, auxlen
= 0;
257 switch (cookie
->def
->type
) {
265 sprintf(_type
, "%02u", cookie
->def
->type
);
270 seq_printf(m
, "%-16s %s %2lx %16p",
276 if (cookie
->def
->get_key
&&
277 config
& FSCACHE_OBJLIST_CONFIG_KEY
)
278 keylen
= cookie
->def
->get_key(cookie
->netfs_data
,
281 if (cookie
->def
->get_aux
&&
282 config
& FSCACHE_OBJLIST_CONFIG_AUX
)
283 auxlen
= cookie
->def
->get_aux(cookie
->netfs_data
,
284 buf
+ keylen
, 512 - keylen
);
285 fscache_unuse_cookie(obj
);
287 if (keylen
> 0 || auxlen
> 0) {
289 for (p
= buf
; keylen
> 0; keylen
--)
290 seq_printf(m
, "%02x", *p
++);
292 if (config
& FSCACHE_OBJLIST_CONFIG_KEY
)
294 for (; auxlen
> 0; auxlen
--)
295 seq_printf(m
, "%02x", *p
++);
301 seq_puts(m
, "<no_netfs>\n");
306 static const struct seq_operations fscache_objlist_ops
= {
307 .start
= fscache_objlist_start
,
308 .stop
= fscache_objlist_stop
,
309 .next
= fscache_objlist_next
,
310 .show
= fscache_objlist_show
,
314 * get the configuration for filtering the list
316 static void fscache_objlist_config(struct fscache_objlist_data
*data
)
319 const struct user_key_payload
*confkey
;
320 unsigned long config
;
325 key
= request_key(&key_type_user
, "fscache:objlist", NULL
);
332 confkey
= user_key_payload(key
);
334 /* key was revoked */
342 for (len
= confkey
->datalen
- 1; len
>= 0; len
--) {
344 case 'K': config
|= FSCACHE_OBJLIST_CONFIG_KEY
; break;
345 case 'A': config
|= FSCACHE_OBJLIST_CONFIG_AUX
; break;
346 case 'C': config
|= FSCACHE_OBJLIST_CONFIG_COOKIE
; break;
347 case 'c': config
|= FSCACHE_OBJLIST_CONFIG_NOCOOKIE
; break;
348 case 'B': config
|= FSCACHE_OBJLIST_CONFIG_BUSY
; break;
349 case 'b': config
|= FSCACHE_OBJLIST_CONFIG_IDLE
; break;
350 case 'W': config
|= FSCACHE_OBJLIST_CONFIG_PENDWR
; break;
351 case 'w': config
|= FSCACHE_OBJLIST_CONFIG_NOPENDWR
; break;
352 case 'R': config
|= FSCACHE_OBJLIST_CONFIG_READS
; break;
353 case 'r': config
|= FSCACHE_OBJLIST_CONFIG_NOREADS
; break;
354 case 'S': config
|= FSCACHE_OBJLIST_CONFIG_WORK
; break;
355 case 's': config
|= FSCACHE_OBJLIST_CONFIG_NOWORK
; break;
362 if (!(config
& (FSCACHE_OBJLIST_CONFIG_COOKIE
| FSCACHE_OBJLIST_CONFIG_NOCOOKIE
)))
363 config
|= FSCACHE_OBJLIST_CONFIG_COOKIE
| FSCACHE_OBJLIST_CONFIG_NOCOOKIE
;
364 if (!(config
& (FSCACHE_OBJLIST_CONFIG_BUSY
| FSCACHE_OBJLIST_CONFIG_IDLE
)))
365 config
|= FSCACHE_OBJLIST_CONFIG_BUSY
| FSCACHE_OBJLIST_CONFIG_IDLE
;
366 if (!(config
& (FSCACHE_OBJLIST_CONFIG_PENDWR
| FSCACHE_OBJLIST_CONFIG_NOPENDWR
)))
367 config
|= FSCACHE_OBJLIST_CONFIG_PENDWR
| FSCACHE_OBJLIST_CONFIG_NOPENDWR
;
368 if (!(config
& (FSCACHE_OBJLIST_CONFIG_READS
| FSCACHE_OBJLIST_CONFIG_NOREADS
)))
369 config
|= FSCACHE_OBJLIST_CONFIG_READS
| FSCACHE_OBJLIST_CONFIG_NOREADS
;
370 if (!(config
& (FSCACHE_OBJLIST_CONFIG_EVENTS
| FSCACHE_OBJLIST_CONFIG_NOEVENTS
)))
371 config
|= FSCACHE_OBJLIST_CONFIG_EVENTS
| FSCACHE_OBJLIST_CONFIG_NOEVENTS
;
372 if (!(config
& (FSCACHE_OBJLIST_CONFIG_WORK
| FSCACHE_OBJLIST_CONFIG_NOWORK
)))
373 config
|= FSCACHE_OBJLIST_CONFIG_WORK
| FSCACHE_OBJLIST_CONFIG_NOWORK
;
375 data
->config
= config
;
380 data
->config
= ULONG_MAX
;
384 * open "/proc/fs/fscache/objects" to provide a list of active objects
385 * - can be configured by a user-defined key added to the caller's keyrings
387 static int fscache_objlist_open(struct inode
*inode
, struct file
*file
)
389 struct fscache_objlist_data
*data
;
391 data
= __seq_open_private(file
, &fscache_objlist_ops
, sizeof(*data
));
395 /* get the configuration key */
396 fscache_objlist_config(data
);
404 static int fscache_objlist_release(struct inode
*inode
, struct file
*file
)
406 struct seq_file
*m
= file
->private_data
;
410 return seq_release(inode
, file
);
413 const struct file_operations fscache_objlist_fops
= {
414 .owner
= THIS_MODULE
,
415 .open
= fscache_objlist_open
,
418 .release
= fscache_objlist_release
,