Merge master.kernel.org:/pub/scm/linux/kernel/git/davej/agpgart
[linux-2.6] / drivers / usb / host / uhci-debug.c
1 /*
2  * UHCI-specific debugging code. Invaluable when something
3  * goes wrong, but don't get in my face.
4  *
5  * Kernel visible pointers are surrounded in []s and bus
6  * visible pointers are surrounded in ()s
7  *
8  * (C) Copyright 1999 Linus Torvalds
9  * (C) Copyright 1999-2001 Johannes Erdfelt
10  */
11
12 #include <linux/kernel.h>
13 #include <linux/debugfs.h>
14 #include <linux/smp_lock.h>
15 #include <asm/io.h>
16
17 #include "uhci-hcd.h"
18
19 #define uhci_debug_operations (* (const struct file_operations *) NULL)
20 static struct dentry *uhci_debugfs_root;
21
22 #ifdef DEBUG
23
24 /* Handle REALLY large printks so we don't overflow buffers */
25 static void lprintk(char *buf)
26 {
27         char *p;
28
29         /* Just write one line at a time */
30         while (buf) {
31                 p = strchr(buf, '\n');
32                 if (p)
33                         *p = 0;
34                 printk(KERN_DEBUG "%s\n", buf);
35                 buf = p;
36                 if (buf)
37                         buf++;
38         }
39 }
40
41 static int uhci_show_td(struct uhci_td *td, char *buf, int len, int space)
42 {
43         char *out = buf;
44         char *spid;
45         u32 status, token;
46
47         /* Try to make sure there's enough memory */
48         if (len < 160)
49                 return 0;
50
51         status = td_status(td);
52         out += sprintf(out, "%*s[%p] link (%08x) ", space, "", td, le32_to_cpu(td->link));
53         out += sprintf(out, "e%d %s%s%s%s%s%s%s%s%s%sLength=%x ",
54                 ((status >> 27) & 3),
55                 (status & TD_CTRL_SPD) ?      "SPD " : "",
56                 (status & TD_CTRL_LS) ?       "LS " : "",
57                 (status & TD_CTRL_IOC) ?      "IOC " : "",
58                 (status & TD_CTRL_ACTIVE) ?   "Active " : "",
59                 (status & TD_CTRL_STALLED) ?  "Stalled " : "",
60                 (status & TD_CTRL_DBUFERR) ?  "DataBufErr " : "",
61                 (status & TD_CTRL_BABBLE) ?   "Babble " : "",
62                 (status & TD_CTRL_NAK) ?      "NAK " : "",
63                 (status & TD_CTRL_CRCTIMEO) ? "CRC/Timeo " : "",
64                 (status & TD_CTRL_BITSTUFF) ? "BitStuff " : "",
65                 status & 0x7ff);
66
67         token = td_token(td);
68         switch (uhci_packetid(token)) {
69                 case USB_PID_SETUP:
70                         spid = "SETUP";
71                         break;
72                 case USB_PID_OUT:
73                         spid = "OUT";
74                         break;
75                 case USB_PID_IN:
76                         spid = "IN";
77                         break;
78                 default:
79                         spid = "?";
80                         break;
81         }
82
83         out += sprintf(out, "MaxLen=%x DT%d EndPt=%x Dev=%x, PID=%x(%s) ",
84                 token >> 21,
85                 ((token >> 19) & 1),
86                 (token >> 15) & 15,
87                 (token >> 8) & 127,
88                 (token & 0xff),
89                 spid);
90         out += sprintf(out, "(buf=%08x)\n", le32_to_cpu(td->buffer));
91
92         return out - buf;
93 }
94
95 static int uhci_show_urbp(struct urb_priv *urbp, char *buf, int len, int space)
96 {
97         char *out = buf;
98         struct uhci_td *td;
99         int i, nactive, ninactive;
100         char *ptype;
101
102         if (len < 200)
103                 return 0;
104
105         out += sprintf(out, "urb_priv [%p] ", urbp);
106         out += sprintf(out, "urb [%p] ", urbp->urb);
107         out += sprintf(out, "qh [%p] ", urbp->qh);
108         out += sprintf(out, "Dev=%d ", usb_pipedevice(urbp->urb->pipe));
109         out += sprintf(out, "EP=%x(%s) ", usb_pipeendpoint(urbp->urb->pipe),
110                         (usb_pipein(urbp->urb->pipe) ? "IN" : "OUT"));
111
112         switch (usb_pipetype(urbp->urb->pipe)) {
113         case PIPE_ISOCHRONOUS: ptype = "ISO"; break;
114         case PIPE_INTERRUPT: ptype = "INT"; break;
115         case PIPE_BULK: ptype = "BLK"; break;
116         default:
117         case PIPE_CONTROL: ptype = "CTL"; break;
118         }
119
120         out += sprintf(out, "%s%s", ptype, (urbp->fsbr ? " FSBR" : ""));
121         out += sprintf(out, " Actlen=%d", urbp->urb->actual_length);
122
123         if (urbp->urb->status != -EINPROGRESS)
124                 out += sprintf(out, " Status=%d", urbp->urb->status);
125         out += sprintf(out, "\n");
126
127         i = nactive = ninactive = 0;
128         list_for_each_entry(td, &urbp->td_list, list) {
129                 if (urbp->qh->type != USB_ENDPOINT_XFER_ISOC &&
130                                 (++i <= 10 || debug > 2)) {
131                         out += sprintf(out, "%*s%d: ", space + 2, "", i);
132                         out += uhci_show_td(td, out, len - (out - buf), 0);
133                 } else {
134                         if (td_status(td) & TD_CTRL_ACTIVE)
135                                 ++nactive;
136                         else
137                                 ++ninactive;
138                 }
139         }
140         if (nactive + ninactive > 0)
141                 out += sprintf(out, "%*s[skipped %d inactive and %d active "
142                                 "TDs]\n",
143                                 space, "", ninactive, nactive);
144
145         return out - buf;
146 }
147
148 static int uhci_show_qh(struct uhci_qh *qh, char *buf, int len, int space)
149 {
150         char *out = buf;
151         int i, nurbs;
152         __le32 element = qh_element(qh);
153         char *qtype;
154
155         /* Try to make sure there's enough memory */
156         if (len < 80 * 7)
157                 return 0;
158
159         switch (qh->type) {
160         case USB_ENDPOINT_XFER_ISOC: qtype = "ISO"; break;
161         case USB_ENDPOINT_XFER_INT: qtype = "INT"; break;
162         case USB_ENDPOINT_XFER_BULK: qtype = "BLK"; break;
163         case USB_ENDPOINT_XFER_CONTROL: qtype = "CTL"; break;
164         default: qtype = "Skel" ; break;
165         }
166
167         out += sprintf(out, "%*s[%p] %s QH link (%08x) element (%08x)\n",
168                         space, "", qh, qtype,
169                         le32_to_cpu(qh->link), le32_to_cpu(element));
170         if (qh->type == USB_ENDPOINT_XFER_ISOC)
171                 out += sprintf(out, "%*s    period %d phase %d load %d us, "
172                                 "frame %x desc [%p]\n",
173                                 space, "", qh->period, qh->phase, qh->load,
174                                 qh->iso_frame, qh->iso_packet_desc);
175         else if (qh->type == USB_ENDPOINT_XFER_INT)
176                 out += sprintf(out, "%*s    period %d phase %d load %d us\n",
177                                 space, "", qh->period, qh->phase, qh->load);
178
179         if (element & UHCI_PTR_QH)
180                 out += sprintf(out, "%*s  Element points to QH (bug?)\n", space, "");
181
182         if (element & UHCI_PTR_DEPTH)
183                 out += sprintf(out, "%*s  Depth traverse\n", space, "");
184
185         if (element & cpu_to_le32(8))
186                 out += sprintf(out, "%*s  Bit 3 set (bug?)\n", space, "");
187
188         if (!(element & ~(UHCI_PTR_QH | UHCI_PTR_DEPTH)))
189                 out += sprintf(out, "%*s  Element is NULL (bug?)\n", space, "");
190
191         if (list_empty(&qh->queue)) {
192                 out += sprintf(out, "%*s  queue is empty\n", space, "");
193         } else {
194                 struct urb_priv *urbp = list_entry(qh->queue.next,
195                                 struct urb_priv, node);
196                 struct uhci_td *td = list_entry(urbp->td_list.next,
197                                 struct uhci_td, list);
198
199                 if (cpu_to_le32(td->dma_handle) != (element & ~UHCI_PTR_BITS))
200                         out += sprintf(out, "%*s Element != First TD\n",
201                                         space, "");
202                 i = nurbs = 0;
203                 list_for_each_entry(urbp, &qh->queue, node) {
204                         if (++i <= 10)
205                                 out += uhci_show_urbp(urbp, out,
206                                                 len - (out - buf), space + 2);
207                         else
208                                 ++nurbs;
209                 }
210                 if (nurbs > 0)
211                         out += sprintf(out, "%*s Skipped %d URBs\n",
212                                         space, "", nurbs);
213         }
214
215         if (qh->dummy_td) {
216                 out += sprintf(out, "%*s  Dummy TD\n", space, "");
217                 out += uhci_show_td(qh->dummy_td, out, len - (out - buf), 0);
218         }
219
220         return out - buf;
221 }
222
223 static const char * const qh_names[] = {
224   "skel_unlink_qh", "skel_iso_qh",
225   "skel_int128_qh", "skel_int64_qh",
226   "skel_int32_qh", "skel_int16_qh",
227   "skel_int8_qh", "skel_int4_qh",
228   "skel_int2_qh", "skel_int1_qh",
229   "skel_ls_control_qh", "skel_fs_control_qh",
230   "skel_bulk_qh", "skel_term_qh"
231 };
232
233 static int uhci_show_sc(int port, unsigned short status, char *buf, int len)
234 {
235         char *out = buf;
236
237         /* Try to make sure there's enough memory */
238         if (len < 160)
239                 return 0;
240
241         out += sprintf(out, "  stat%d     =     %04x  %s%s%s%s%s%s%s%s%s%s\n",
242                 port,
243                 status,
244                 (status & USBPORTSC_SUSP) ?     " Suspend" : "",
245                 (status & USBPORTSC_OCC) ?      " OverCurrentChange" : "",
246                 (status & USBPORTSC_OC) ?       " OverCurrent" : "",
247                 (status & USBPORTSC_PR) ?       " Reset" : "",
248                 (status & USBPORTSC_LSDA) ?     " LowSpeed" : "",
249                 (status & USBPORTSC_RD) ?       " ResumeDetect" : "",
250                 (status & USBPORTSC_PEC) ?      " EnableChange" : "",
251                 (status & USBPORTSC_PE) ?       " Enabled" : "",
252                 (status & USBPORTSC_CSC) ?      " ConnectChange" : "",
253                 (status & USBPORTSC_CCS) ?      " Connected" : "");
254
255         return out - buf;
256 }
257
258 static int uhci_show_root_hub_state(struct uhci_hcd *uhci, char *buf, int len)
259 {
260         char *out = buf;
261         char *rh_state;
262
263         /* Try to make sure there's enough memory */
264         if (len < 60)
265                 return 0;
266
267         switch (uhci->rh_state) {
268             case UHCI_RH_RESET:
269                 rh_state = "reset";             break;
270             case UHCI_RH_SUSPENDED:
271                 rh_state = "suspended";         break;
272             case UHCI_RH_AUTO_STOPPED:
273                 rh_state = "auto-stopped";      break;
274             case UHCI_RH_RESUMING:
275                 rh_state = "resuming";          break;
276             case UHCI_RH_SUSPENDING:
277                 rh_state = "suspending";        break;
278             case UHCI_RH_RUNNING:
279                 rh_state = "running";           break;
280             case UHCI_RH_RUNNING_NODEVS:
281                 rh_state = "running, no devs";  break;
282             default:
283                 rh_state = "?";                 break;
284         }
285         out += sprintf(out, "Root-hub state: %s   FSBR: %d\n",
286                         rh_state, uhci->fsbr_is_on);
287         return out - buf;
288 }
289
290 static int uhci_show_status(struct uhci_hcd *uhci, char *buf, int len)
291 {
292         char *out = buf;
293         unsigned long io_addr = uhci->io_addr;
294         unsigned short usbcmd, usbstat, usbint, usbfrnum;
295         unsigned int flbaseadd;
296         unsigned char sof;
297         unsigned short portsc1, portsc2;
298
299         /* Try to make sure there's enough memory */
300         if (len < 80 * 9)
301                 return 0;
302
303         usbcmd    = inw(io_addr + 0);
304         usbstat   = inw(io_addr + 2);
305         usbint    = inw(io_addr + 4);
306         usbfrnum  = inw(io_addr + 6);
307         flbaseadd = inl(io_addr + 8);
308         sof       = inb(io_addr + 12);
309         portsc1   = inw(io_addr + 16);
310         portsc2   = inw(io_addr + 18);
311
312         out += sprintf(out, "  usbcmd    =     %04x   %s%s%s%s%s%s%s%s\n",
313                 usbcmd,
314                 (usbcmd & USBCMD_MAXP) ?    "Maxp64 " : "Maxp32 ",
315                 (usbcmd & USBCMD_CF) ?      "CF " : "",
316                 (usbcmd & USBCMD_SWDBG) ?   "SWDBG " : "",
317                 (usbcmd & USBCMD_FGR) ?     "FGR " : "",
318                 (usbcmd & USBCMD_EGSM) ?    "EGSM " : "",
319                 (usbcmd & USBCMD_GRESET) ?  "GRESET " : "",
320                 (usbcmd & USBCMD_HCRESET) ? "HCRESET " : "",
321                 (usbcmd & USBCMD_RS) ?      "RS " : "");
322
323         out += sprintf(out, "  usbstat   =     %04x   %s%s%s%s%s%s\n",
324                 usbstat,
325                 (usbstat & USBSTS_HCH) ?    "HCHalted " : "",
326                 (usbstat & USBSTS_HCPE) ?   "HostControllerProcessError " : "",
327                 (usbstat & USBSTS_HSE) ?    "HostSystemError " : "",
328                 (usbstat & USBSTS_RD) ?     "ResumeDetect " : "",
329                 (usbstat & USBSTS_ERROR) ?  "USBError " : "",
330                 (usbstat & USBSTS_USBINT) ? "USBINT " : "");
331
332         out += sprintf(out, "  usbint    =     %04x\n", usbint);
333         out += sprintf(out, "  usbfrnum  =   (%d)%03x\n", (usbfrnum >> 10) & 1,
334                 0xfff & (4*(unsigned int)usbfrnum));
335         out += sprintf(out, "  flbaseadd = %08x\n", flbaseadd);
336         out += sprintf(out, "  sof       =       %02x\n", sof);
337         out += uhci_show_sc(1, portsc1, out, len - (out - buf));
338         out += uhci_show_sc(2, portsc2, out, len - (out - buf));
339         out += sprintf(out, "Most recent frame: %x (%d)   "
340                         "Last ISO frame: %x (%d)\n",
341                         uhci->frame_number, uhci->frame_number & 1023,
342                         uhci->last_iso_frame, uhci->last_iso_frame & 1023);
343
344         return out - buf;
345 }
346
347 static int uhci_sprint_schedule(struct uhci_hcd *uhci, char *buf, int len)
348 {
349         char *out = buf;
350         int i, j;
351         struct uhci_qh *qh;
352         struct uhci_td *td;
353         struct list_head *tmp, *head;
354         int nframes, nerrs;
355
356         out += uhci_show_root_hub_state(uhci, out, len - (out - buf));
357         out += sprintf(out, "HC status\n");
358         out += uhci_show_status(uhci, out, len - (out - buf));
359
360         out += sprintf(out, "Periodic load table\n");
361         for (i = 0; i < MAX_PHASE; ++i) {
362                 out += sprintf(out, "\t%d", uhci->load[i]);
363                 if (i % 8 == 7)
364                         *out++ = '\n';
365         }
366         out += sprintf(out, "Total: %d, #INT: %d, #ISO: %d\n",
367                         uhci->total_load,
368                         uhci_to_hcd(uhci)->self.bandwidth_int_reqs,
369                         uhci_to_hcd(uhci)->self.bandwidth_isoc_reqs);
370         if (debug <= 1)
371                 return out - buf;
372
373         out += sprintf(out, "Frame List\n");
374         nframes = 10;
375         nerrs = 0;
376         for (i = 0; i < UHCI_NUMFRAMES; ++i) {
377                 __le32 link, qh_dma;
378
379                 j = 0;
380                 td = uhci->frame_cpu[i];
381                 link = uhci->frame[i];
382                 if (!td)
383                         goto check_link;
384
385                 if (nframes > 0) {
386                         out += sprintf(out, "- Frame %d -> (%08x)\n",
387                                         i, le32_to_cpu(link));
388                         j = 1;
389                 }
390
391                 head = &td->fl_list;
392                 tmp = head;
393                 do {
394                         td = list_entry(tmp, struct uhci_td, fl_list);
395                         tmp = tmp->next;
396                         if (cpu_to_le32(td->dma_handle) != link) {
397                                 if (nframes > 0)
398                                         out += sprintf(out, "    link does "
399                                                 "not match list entry!\n");
400                                 else
401                                         ++nerrs;
402                         }
403                         if (nframes > 0)
404                                 out += uhci_show_td(td, out,
405                                                 len - (out - buf), 4);
406                         link = td->link;
407                 } while (tmp != head);
408
409 check_link:
410                 qh_dma = uhci_frame_skel_link(uhci, i);
411                 if (link != qh_dma) {
412                         if (nframes > 0) {
413                                 if (!j) {
414                                         out += sprintf(out,
415                                                 "- Frame %d -> (%08x)\n",
416                                                 i, le32_to_cpu(link));
417                                         j = 1;
418                                 }
419                                 out += sprintf(out, "   link does not match "
420                                         "QH (%08x)!\n", le32_to_cpu(qh_dma));
421                         } else
422                                 ++nerrs;
423                 }
424                 nframes -= j;
425         }
426         if (nerrs > 0)
427                 out += sprintf(out, "Skipped %d bad links\n", nerrs);
428
429         out += sprintf(out, "Skeleton QHs\n");
430
431         for (i = 0; i < UHCI_NUM_SKELQH; ++i) {
432                 int cnt = 0;
433
434                 qh = uhci->skelqh[i];
435                 out += sprintf(out, "- %s\n", qh_names[i]); \
436                 out += uhci_show_qh(qh, out, len - (out - buf), 4);
437
438                 /* Last QH is the Terminating QH, it's different */
439                 if (i == UHCI_NUM_SKELQH - 1) {
440                         if (qh->link != UHCI_PTR_TERM)
441                                 out += sprintf(out, "    bandwidth reclamation on!\n");
442
443                         if (qh_element(qh) != cpu_to_le32(uhci->term_td->dma_handle))
444                                 out += sprintf(out, "    skel_term_qh element is not set to term_td!\n");
445
446                         continue;
447                 }
448
449                 j = (i < 9) ? 9 : i+1;          /* Next skeleton */
450                 head = &qh->node;
451                 tmp = head->next;
452
453                 while (tmp != head) {
454                         qh = list_entry(tmp, struct uhci_qh, node);
455                         tmp = tmp->next;
456                         if (++cnt <= 10)
457                                 out += uhci_show_qh(qh, out,
458                                                 len - (out - buf), 4);
459                 }
460                 if ((cnt -= 10) > 0)
461                         out += sprintf(out, "    Skipped %d QHs\n", cnt);
462
463                 if (i > 1 && i < UHCI_NUM_SKELQH - 1) {
464                         if (qh->link !=
465                             (cpu_to_le32(uhci->skelqh[j]->dma_handle) | UHCI_PTR_QH))
466                                 out += sprintf(out, "    last QH not linked to next skeleton!\n");
467                 }
468         }
469
470         return out - buf;
471 }
472
473 #ifdef CONFIG_DEBUG_FS
474
475 #define MAX_OUTPUT      (64 * 1024)
476
477 struct uhci_debug {
478         int size;
479         char *data;
480 };
481
482 static int uhci_debug_open(struct inode *inode, struct file *file)
483 {
484         struct uhci_hcd *uhci = inode->i_private;
485         struct uhci_debug *up;
486         int ret = -ENOMEM;
487         unsigned long flags;
488
489         lock_kernel();
490         up = kmalloc(sizeof(*up), GFP_KERNEL);
491         if (!up)
492                 goto out;
493
494         up->data = kmalloc(MAX_OUTPUT, GFP_KERNEL);
495         if (!up->data) {
496                 kfree(up);
497                 goto out;
498         }
499
500         up->size = 0;
501         spin_lock_irqsave(&uhci->lock, flags);
502         if (uhci->is_initialized)
503                 up->size = uhci_sprint_schedule(uhci, up->data, MAX_OUTPUT);
504         spin_unlock_irqrestore(&uhci->lock, flags);
505
506         file->private_data = up;
507
508         ret = 0;
509 out:
510         unlock_kernel();
511         return ret;
512 }
513
514 static loff_t uhci_debug_lseek(struct file *file, loff_t off, int whence)
515 {
516         struct uhci_debug *up;
517         loff_t new = -1;
518
519         lock_kernel();
520         up = file->private_data;
521
522         switch (whence) {
523         case 0:
524                 new = off;
525                 break;
526         case 1:
527                 new = file->f_pos + off;
528                 break;
529         }
530         if (new < 0 || new > up->size) {
531                 unlock_kernel();
532                 return -EINVAL;
533         }
534         unlock_kernel();
535         return (file->f_pos = new);
536 }
537
538 static ssize_t uhci_debug_read(struct file *file, char __user *buf,
539                                 size_t nbytes, loff_t *ppos)
540 {
541         struct uhci_debug *up = file->private_data;
542         return simple_read_from_buffer(buf, nbytes, ppos, up->data, up->size);
543 }
544
545 static int uhci_debug_release(struct inode *inode, struct file *file)
546 {
547         struct uhci_debug *up = file->private_data;
548
549         kfree(up->data);
550         kfree(up);
551
552         return 0;
553 }
554
555 #undef uhci_debug_operations
556 static const struct file_operations uhci_debug_operations = {
557         .owner =        THIS_MODULE,
558         .open =         uhci_debug_open,
559         .llseek =       uhci_debug_lseek,
560         .read =         uhci_debug_read,
561         .release =      uhci_debug_release,
562 };
563
564 #endif  /* CONFIG_DEBUG_FS */
565
566 #else   /* DEBUG */
567
568 static inline void lprintk(char *buf)
569 {}
570
571 static inline int uhci_show_qh(struct uhci_qh *qh, char *buf,
572                 int len, int space)
573 {
574         return 0;
575 }
576
577 static inline int uhci_sprint_schedule(struct uhci_hcd *uhci,
578                 char *buf, int len)
579 {
580         return 0;
581 }
582
583 #endif