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