2 * The USB Monitor, inspired by Dave Harding's USBMon.
4 * This is a text format reader.
7 #include <linux/kernel.h>
8 #include <linux/list.h>
10 #include <linux/time.h>
11 #include <linux/mutex.h>
12 #include <linux/debugfs.h>
13 #include <asm/uaccess.h>
18 * No, we do not want arbitrarily long data strings.
19 * Use the binary interface if you want to capture bulk data!
24 * Defined by USB 2.0 clause 9.3, table 9.2.
29 * This limit exists to prevent OOMs when the user process stops reading.
30 * If usbmon were available to unprivileged processes, it might be open
31 * to a local DoS. But we have to keep to root in order to prevent
32 * password sniffing from HID devices.
34 #define EVENT_MAX (4*PAGE_SIZE / sizeof(struct mon_event_text))
37 * Potentially unlimited number; we limit it for similar allocations.
38 * The usbfs limits this to 128, but we're not quite as generous.
42 #define PRINTF_DFL 250 /* with 5 ISOs segs */
47 unsigned int length
; /* Unsigned here, signed in URB. Historic. */
50 struct mon_event_text
{
51 struct list_head e_link
;
52 int type
; /* submit, complete, etc. */
53 unsigned long id
; /* From pointer, most of the time */
60 int length
; /* Depends on type: xfer length or act length */
67 int numdesc
; /* Full number */
68 struct mon_iso_desc isodesc
[ISODESC_MAX
];
69 unsigned char setup
[SETUP_MAX
];
70 unsigned char data
[DATA_MAX
];
73 #define SLAB_NAME_SZ 30
74 struct mon_reader_text
{
75 struct kmem_cache
*e_slab
;
77 struct list_head e_list
;
78 struct mon_reader r
; /* In C, parent class can be placed anywhere */
80 wait_queue_head_t wait
;
83 struct mutex printf_lock
;
85 char slab_name
[SLAB_NAME_SZ
];
88 static struct dentry
*mon_dir
; /* Usually /sys/kernel/debug/usbmon */
90 static void mon_text_ctor(void *);
97 static struct mon_event_text
*
98 mon_text_read_wait(struct mon_reader_text
*rp
, struct file
*file
);
99 static void mon_text_read_head_t(struct mon_reader_text
*rp
,
100 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
);
101 static void mon_text_read_head_u(struct mon_reader_text
*rp
,
102 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
);
103 static void mon_text_read_statset(struct mon_reader_text
*rp
,
104 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
);
105 static void mon_text_read_intstat(struct mon_reader_text
*rp
,
106 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
);
107 static void mon_text_read_isostat(struct mon_reader_text
*rp
,
108 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
);
109 static void mon_text_read_isodesc(struct mon_reader_text
*rp
,
110 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
);
111 static void mon_text_read_data(struct mon_reader_text
*rp
,
112 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
);
118 * May be called from an interrupt.
120 * This is called with the whole mon_bus locked, so no additional lock.
123 static inline char mon_text_get_setup(struct mon_event_text
*ep
,
124 struct urb
*urb
, char ev_type
, struct mon_bus
*mbus
)
127 if (ep
->xfertype
!= USB_ENDPOINT_XFER_CONTROL
|| ev_type
!= 'S')
130 if (urb
->setup_packet
== NULL
)
131 return 'Z'; /* '0' would be not as pretty. */
133 memcpy(ep
->setup
, urb
->setup_packet
, SETUP_MAX
);
137 static inline char mon_text_get_data(struct mon_event_text
*ep
, struct urb
*urb
,
138 int len
, char ev_type
, struct mon_bus
*mbus
)
154 * The check to see if it's safe to poke at data has an enormous
155 * number of corner cases, but it seems that the following is
158 * We do not even try to look at transfer_buffer, because it can
159 * contain non-NULL garbage in case the upper level promised to
160 * set DMA for the HCD.
162 if (urb
->dev
->bus
->uses_dma
&&
163 (urb
->transfer_flags
& URB_NO_TRANSFER_DMA_MAP
)) {
164 return mon_dmapeek(ep
->data
, urb
->transfer_dma
, len
);
167 if (urb
->transfer_buffer
== NULL
)
168 return 'Z'; /* '0' would be not as pretty. */
170 memcpy(ep
->data
, urb
->transfer_buffer
, len
);
174 static inline unsigned int mon_get_timestamp(void)
179 do_gettimeofday(&tval
);
180 stamp
= tval
.tv_sec
& 0xFFFF; /* 2^32 = 4294967296. Limit to 4096s. */
181 stamp
= stamp
* 1000000 + tval
.tv_usec
;
185 static void mon_text_event(struct mon_reader_text
*rp
, struct urb
*urb
,
186 char ev_type
, int status
)
188 struct mon_event_text
*ep
;
190 struct usb_iso_packet_descriptor
*fp
;
191 struct mon_iso_desc
*dp
;
194 stamp
= mon_get_timestamp();
196 if (rp
->nevents
>= EVENT_MAX
||
197 (ep
= kmem_cache_alloc(rp
->e_slab
, GFP_ATOMIC
)) == NULL
) {
198 rp
->r
.m_bus
->cnt_text_lost
++;
203 ep
->id
= (unsigned long) urb
;
204 ep
->busnum
= urb
->dev
->bus
->busnum
;
205 ep
->devnum
= urb
->dev
->devnum
;
206 ep
->epnum
= usb_endpoint_num(&urb
->ep
->desc
);
207 ep
->xfertype
= usb_endpoint_type(&urb
->ep
->desc
);
208 ep
->is_in
= usb_urb_dir_in(urb
);
210 ep
->length
= (ev_type
== 'S') ?
211 urb
->transfer_buffer_length
: urb
->actual_length
;
212 /* Collecting status makes debugging sense for submits, too */
215 if (ep
->xfertype
== USB_ENDPOINT_XFER_INT
) {
216 ep
->interval
= urb
->interval
;
217 } else if (ep
->xfertype
== USB_ENDPOINT_XFER_ISOC
) {
218 ep
->interval
= urb
->interval
;
219 ep
->start_frame
= urb
->start_frame
;
220 ep
->error_count
= urb
->error_count
;
222 ep
->numdesc
= urb
->number_of_packets
;
223 if (ep
->xfertype
== USB_ENDPOINT_XFER_ISOC
&&
224 urb
->number_of_packets
> 0) {
225 if ((ndesc
= urb
->number_of_packets
) > ISODESC_MAX
)
227 fp
= urb
->iso_frame_desc
;
229 for (i
= 0; i
< ndesc
; i
++) {
230 dp
->status
= fp
->status
;
231 dp
->offset
= fp
->offset
;
232 dp
->length
= (ev_type
== 'S') ?
233 fp
->length
: fp
->actual_length
;
239 ep
->setup_flag
= mon_text_get_setup(ep
, urb
, ev_type
, rp
->r
.m_bus
);
240 ep
->data_flag
= mon_text_get_data(ep
, urb
, ep
->length
, ev_type
,
244 list_add_tail(&ep
->e_link
, &rp
->e_list
);
248 static void mon_text_submit(void *data
, struct urb
*urb
)
250 struct mon_reader_text
*rp
= data
;
251 mon_text_event(rp
, urb
, 'S', -EINPROGRESS
);
254 static void mon_text_complete(void *data
, struct urb
*urb
, int status
)
256 struct mon_reader_text
*rp
= data
;
257 mon_text_event(rp
, urb
, 'C', status
);
260 static void mon_text_error(void *data
, struct urb
*urb
, int error
)
262 struct mon_reader_text
*rp
= data
;
263 struct mon_event_text
*ep
;
265 if (rp
->nevents
>= EVENT_MAX
||
266 (ep
= kmem_cache_alloc(rp
->e_slab
, GFP_ATOMIC
)) == NULL
) {
267 rp
->r
.m_bus
->cnt_text_lost
++;
272 ep
->id
= (unsigned long) urb
;
274 ep
->devnum
= urb
->dev
->devnum
;
275 ep
->epnum
= usb_endpoint_num(&urb
->ep
->desc
);
276 ep
->xfertype
= usb_endpoint_type(&urb
->ep
->desc
);
277 ep
->is_in
= usb_urb_dir_in(urb
);
282 ep
->setup_flag
= '-';
286 list_add_tail(&ep
->e_link
, &rp
->e_list
);
291 * Fetch next event from the circular buffer.
293 static struct mon_event_text
*mon_text_fetch(struct mon_reader_text
*rp
,
294 struct mon_bus
*mbus
)
299 spin_lock_irqsave(&mbus
->lock
, flags
);
300 if (list_empty(&rp
->e_list
)) {
301 spin_unlock_irqrestore(&mbus
->lock
, flags
);
307 spin_unlock_irqrestore(&mbus
->lock
, flags
);
308 return list_entry(p
, struct mon_event_text
, e_link
);
313 static int mon_text_open(struct inode
*inode
, struct file
*file
)
315 struct mon_bus
*mbus
;
316 struct mon_reader_text
*rp
;
319 mutex_lock(&mon_lock
);
320 mbus
= inode
->i_private
;
322 rp
= kzalloc(sizeof(struct mon_reader_text
), GFP_KERNEL
);
327 INIT_LIST_HEAD(&rp
->e_list
);
328 init_waitqueue_head(&rp
->wait
);
329 mutex_init(&rp
->printf_lock
);
331 rp
->printf_size
= PRINTF_DFL
;
332 rp
->printf_buf
= kmalloc(rp
->printf_size
, GFP_KERNEL
);
333 if (rp
->printf_buf
== NULL
) {
340 rp
->r
.rnf_submit
= mon_text_submit
;
341 rp
->r
.rnf_error
= mon_text_error
;
342 rp
->r
.rnf_complete
= mon_text_complete
;
344 snprintf(rp
->slab_name
, SLAB_NAME_SZ
, "mon_text_%p", rp
);
345 rp
->e_slab
= kmem_cache_create(rp
->slab_name
,
346 sizeof(struct mon_event_text
), sizeof(long), 0,
348 if (rp
->e_slab
== NULL
) {
353 mon_reader_add(mbus
, &rp
->r
);
355 file
->private_data
= rp
;
356 mutex_unlock(&mon_lock
);
360 // kmem_cache_destroy(rp->e_slab);
362 kfree(rp
->printf_buf
);
366 mutex_unlock(&mon_lock
);
371 * For simplicity, we read one record in one system call and throw out
372 * what does not fit. This means that the following does not work:
373 * dd if=/dbg/usbmon/0t bs=10
374 * Also, we do not allow seeks and do not bother advancing the offset.
376 static ssize_t
mon_text_read_t(struct file
*file
, char __user
*buf
,
377 size_t nbytes
, loff_t
*ppos
)
379 struct mon_reader_text
*rp
= file
->private_data
;
380 struct mon_event_text
*ep
;
381 struct mon_text_ptr ptr
;
383 if (IS_ERR(ep
= mon_text_read_wait(rp
, file
)))
385 mutex_lock(&rp
->printf_lock
);
387 ptr
.pbuf
= rp
->printf_buf
;
388 ptr
.limit
= rp
->printf_size
;
390 mon_text_read_head_t(rp
, &ptr
, ep
);
391 mon_text_read_statset(rp
, &ptr
, ep
);
392 ptr
.cnt
+= snprintf(ptr
.pbuf
+ ptr
.cnt
, ptr
.limit
- ptr
.cnt
,
394 mon_text_read_data(rp
, &ptr
, ep
);
396 if (copy_to_user(buf
, rp
->printf_buf
, ptr
.cnt
))
398 mutex_unlock(&rp
->printf_lock
);
399 kmem_cache_free(rp
->e_slab
, ep
);
403 static ssize_t
mon_text_read_u(struct file
*file
, char __user
*buf
,
404 size_t nbytes
, loff_t
*ppos
)
406 struct mon_reader_text
*rp
= file
->private_data
;
407 struct mon_event_text
*ep
;
408 struct mon_text_ptr ptr
;
410 if (IS_ERR(ep
= mon_text_read_wait(rp
, file
)))
412 mutex_lock(&rp
->printf_lock
);
414 ptr
.pbuf
= rp
->printf_buf
;
415 ptr
.limit
= rp
->printf_size
;
417 mon_text_read_head_u(rp
, &ptr
, ep
);
418 if (ep
->type
== 'E') {
419 mon_text_read_statset(rp
, &ptr
, ep
);
420 } else if (ep
->xfertype
== USB_ENDPOINT_XFER_ISOC
) {
421 mon_text_read_isostat(rp
, &ptr
, ep
);
422 mon_text_read_isodesc(rp
, &ptr
, ep
);
423 } else if (ep
->xfertype
== USB_ENDPOINT_XFER_INT
) {
424 mon_text_read_intstat(rp
, &ptr
, ep
);
426 mon_text_read_statset(rp
, &ptr
, ep
);
428 ptr
.cnt
+= snprintf(ptr
.pbuf
+ ptr
.cnt
, ptr
.limit
- ptr
.cnt
,
430 mon_text_read_data(rp
, &ptr
, ep
);
432 if (copy_to_user(buf
, rp
->printf_buf
, ptr
.cnt
))
434 mutex_unlock(&rp
->printf_lock
);
435 kmem_cache_free(rp
->e_slab
, ep
);
439 static struct mon_event_text
*mon_text_read_wait(struct mon_reader_text
*rp
,
442 struct mon_bus
*mbus
= rp
->r
.m_bus
;
443 DECLARE_WAITQUEUE(waita
, current
);
444 struct mon_event_text
*ep
;
446 add_wait_queue(&rp
->wait
, &waita
);
447 set_current_state(TASK_INTERRUPTIBLE
);
448 while ((ep
= mon_text_fetch(rp
, mbus
)) == NULL
) {
449 if (file
->f_flags
& O_NONBLOCK
) {
450 set_current_state(TASK_RUNNING
);
451 remove_wait_queue(&rp
->wait
, &waita
);
452 return ERR_PTR(-EWOULDBLOCK
);
455 * We do not count nwaiters, because ->release is supposed
456 * to be called when all openers are gone only.
459 if (signal_pending(current
)) {
460 remove_wait_queue(&rp
->wait
, &waita
);
461 return ERR_PTR(-EINTR
);
463 set_current_state(TASK_INTERRUPTIBLE
);
465 set_current_state(TASK_RUNNING
);
466 remove_wait_queue(&rp
->wait
, &waita
);
470 static void mon_text_read_head_t(struct mon_reader_text
*rp
,
471 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
)
475 udir
= (ep
->is_in
? 'i' : 'o');
476 switch (ep
->xfertype
) {
477 case USB_ENDPOINT_XFER_ISOC
: utype
= 'Z'; break;
478 case USB_ENDPOINT_XFER_INT
: utype
= 'I'; break;
479 case USB_ENDPOINT_XFER_CONTROL
: utype
= 'C'; break;
480 default: /* PIPE_BULK */ utype
= 'B';
482 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
483 "%lx %u %c %c%c:%03u:%02u",
484 ep
->id
, ep
->tstamp
, ep
->type
,
485 utype
, udir
, ep
->devnum
, ep
->epnum
);
488 static void mon_text_read_head_u(struct mon_reader_text
*rp
,
489 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
)
493 udir
= (ep
->is_in
? 'i' : 'o');
494 switch (ep
->xfertype
) {
495 case USB_ENDPOINT_XFER_ISOC
: utype
= 'Z'; break;
496 case USB_ENDPOINT_XFER_INT
: utype
= 'I'; break;
497 case USB_ENDPOINT_XFER_CONTROL
: utype
= 'C'; break;
498 default: /* PIPE_BULK */ utype
= 'B';
500 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
501 "%lx %u %c %c%c:%d:%03u:%u",
502 ep
->id
, ep
->tstamp
, ep
->type
,
503 utype
, udir
, ep
->busnum
, ep
->devnum
, ep
->epnum
);
506 static void mon_text_read_statset(struct mon_reader_text
*rp
,
507 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
)
510 if (ep
->setup_flag
== 0) { /* Setup packet is present and captured */
511 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
512 " s %02x %02x %04x %04x %04x",
515 (ep
->setup
[3] << 8) | ep
->setup
[2],
516 (ep
->setup
[5] << 8) | ep
->setup
[4],
517 (ep
->setup
[7] << 8) | ep
->setup
[6]);
518 } else if (ep
->setup_flag
!= '-') { /* Unable to capture setup packet */
519 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
520 " %c __ __ ____ ____ ____", ep
->setup_flag
);
521 } else { /* No setup for this kind of URB */
522 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
527 static void mon_text_read_intstat(struct mon_reader_text
*rp
,
528 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
)
530 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
531 " %d:%d", ep
->status
, ep
->interval
);
534 static void mon_text_read_isostat(struct mon_reader_text
*rp
,
535 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
)
537 if (ep
->type
== 'S') {
538 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
539 " %d:%d:%d", ep
->status
, ep
->interval
, ep
->start_frame
);
541 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
543 ep
->status
, ep
->interval
, ep
->start_frame
, ep
->error_count
);
547 static void mon_text_read_isodesc(struct mon_reader_text
*rp
,
548 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
)
550 int ndesc
; /* Display this many */
552 const struct mon_iso_desc
*dp
;
554 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
557 if (ndesc
> ISODESC_MAX
)
562 for (i
= 0; i
< ndesc
; i
++) {
563 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
564 " %d:%u:%u", dp
->status
, dp
->offset
, dp
->length
);
569 static void mon_text_read_data(struct mon_reader_text
*rp
,
570 struct mon_text_ptr
*p
, const struct mon_event_text
*ep
)
574 if ((data_len
= ep
->length
) > 0) {
575 if (ep
->data_flag
== 0) {
576 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
578 if (data_len
>= DATA_MAX
)
580 for (i
= 0; i
< data_len
; i
++) {
582 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
,
586 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
,
588 "%02x", ep
->data
[i
]);
590 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
593 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
,
594 " %c\n", ep
->data_flag
);
597 p
->cnt
+= snprintf(p
->pbuf
+ p
->cnt
, p
->limit
- p
->cnt
, "\n");
601 static int mon_text_release(struct inode
*inode
, struct file
*file
)
603 struct mon_reader_text
*rp
= file
->private_data
;
604 struct mon_bus
*mbus
;
605 /* unsigned long flags; */
607 struct mon_event_text
*ep
;
609 mutex_lock(&mon_lock
);
610 mbus
= inode
->i_private
;
612 if (mbus
->nreaders
<= 0) {
613 printk(KERN_ERR TAG
": consistency error on close\n");
614 mutex_unlock(&mon_lock
);
617 mon_reader_del(mbus
, &rp
->r
);
620 * In theory, e_list is protected by mbus->lock. However,
621 * after mon_reader_del has finished, the following is the case:
622 * - we are not on reader list anymore, so new events won't be added;
623 * - whole mbus may be dropped if it was orphaned.
624 * So, we better not touch mbus.
626 /* spin_lock_irqsave(&mbus->lock, flags); */
627 while (!list_empty(&rp
->e_list
)) {
629 ep
= list_entry(p
, struct mon_event_text
, e_link
);
632 kmem_cache_free(rp
->e_slab
, ep
);
634 /* spin_unlock_irqrestore(&mbus->lock, flags); */
636 kmem_cache_destroy(rp
->e_slab
);
637 kfree(rp
->printf_buf
);
640 mutex_unlock(&mon_lock
);
644 static const struct file_operations mon_fops_text_t
= {
645 .owner
= THIS_MODULE
,
646 .open
= mon_text_open
,
648 .read
= mon_text_read_t
,
649 .release
= mon_text_release
,
652 static const struct file_operations mon_fops_text_u
= {
653 .owner
= THIS_MODULE
,
654 .open
= mon_text_open
,
656 .read
= mon_text_read_u
,
657 .release
= mon_text_release
,
660 int mon_text_add(struct mon_bus
*mbus
, const struct usb_bus
*ubus
)
663 enum { NAMESZ
= 10 };
665 int busnum
= ubus
? ubus
->busnum
: 0;
669 rc
= snprintf(name
, NAMESZ
, "%dt", busnum
);
670 if (rc
<= 0 || rc
>= NAMESZ
)
672 d
= debugfs_create_file(name
, 0600, mon_dir
, mbus
,
679 rc
= snprintf(name
, NAMESZ
, "%du", busnum
);
680 if (rc
<= 0 || rc
>= NAMESZ
)
682 d
= debugfs_create_file(name
, 0600, mon_dir
, mbus
, &mon_fops_text_u
);
687 rc
= snprintf(name
, NAMESZ
, "%ds", busnum
);
688 if (rc
<= 0 || rc
>= NAMESZ
)
690 d
= debugfs_create_file(name
, 0600, mon_dir
, mbus
, &mon_fops_stat
);
699 debugfs_remove(mbus
->dent_u
);
704 debugfs_remove(mbus
->dent_t
);
712 void mon_text_del(struct mon_bus
*mbus
)
714 debugfs_remove(mbus
->dent_u
);
715 if (mbus
->dent_t
!= NULL
)
716 debugfs_remove(mbus
->dent_t
);
717 debugfs_remove(mbus
->dent_s
);
721 * Slab interface: constructor.
723 static void mon_text_ctor(void *mem
)
726 * Nothing to initialize. No, really!
727 * So, we fill it with garbage to emulate a reused object.
729 memset(mem
, 0xe5, sizeof(struct mon_event_text
));
732 int __init
mon_text_init(void)
734 struct dentry
*mondir
;
736 mondir
= debugfs_create_dir("usbmon", NULL
);
737 if (IS_ERR(mondir
)) {
738 printk(KERN_NOTICE TAG
": debugfs is not available\n");
741 if (mondir
== NULL
) {
742 printk(KERN_NOTICE TAG
": unable to create usbmon directory\n");
749 void mon_text_exit(void)
751 debugfs_remove(mon_dir
);