Linux-libre 4.14.68-gnu
[librecmc/linux-libre.git] / drivers / usb / host / ehci-dbg.c
1 /*
2  * Copyright (c) 2001-2002 by David Brownell
3  *
4  * This program is free software; you can redistribute it and/or modify it
5  * under the terms of the GNU General Public License as published by the
6  * Free Software Foundation; either version 2 of the License, or (at your
7  * option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful, but
10  * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
11  * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
12  * for more details.
13  *
14  */
15
16 /* this file is part of ehci-hcd.c */
17
18 #ifdef CONFIG_DYNAMIC_DEBUG
19
20 /*
21  * check the values in the HCSPARAMS register
22  * (host controller _Structural_ parameters)
23  * see EHCI spec, Table 2-4 for each value
24  */
25 static void dbg_hcs_params(struct ehci_hcd *ehci, char *label)
26 {
27         u32     params = ehci_readl(ehci, &ehci->caps->hcs_params);
28
29         ehci_dbg(ehci,
30                 "%s hcs_params 0x%x dbg=%d%s cc=%d pcc=%d%s%s ports=%d\n",
31                 label, params,
32                 HCS_DEBUG_PORT(params),
33                 HCS_INDICATOR(params) ? " ind" : "",
34                 HCS_N_CC(params),
35                 HCS_N_PCC(params),
36                 HCS_PORTROUTED(params) ? "" : " ordered",
37                 HCS_PPC(params) ? "" : " !ppc",
38                 HCS_N_PORTS(params));
39         /* Port routing, per EHCI 0.95 Spec, Section 2.2.5 */
40         if (HCS_PORTROUTED(params)) {
41                 int i;
42                 char buf[46], tmp[7], byte;
43
44                 buf[0] = 0;
45                 for (i = 0; i < HCS_N_PORTS(params); i++) {
46                         /* FIXME MIPS won't readb() ... */
47                         byte = readb(&ehci->caps->portroute[(i >> 1)]);
48                         sprintf(tmp, "%d ",
49                                 (i & 0x1) ? byte & 0xf : (byte >> 4) & 0xf);
50                         strcat(buf, tmp);
51                 }
52                 ehci_dbg(ehci, "%s portroute %s\n", label, buf);
53         }
54 }
55
56 /*
57  * check the values in the HCCPARAMS register
58  * (host controller _Capability_ parameters)
59  * see EHCI Spec, Table 2-5 for each value
60  */
61 static void dbg_hcc_params(struct ehci_hcd *ehci, char *label)
62 {
63         u32     params = ehci_readl(ehci, &ehci->caps->hcc_params);
64
65         if (HCC_ISOC_CACHE(params)) {
66                 ehci_dbg(ehci,
67                         "%s hcc_params %04x caching frame %s%s%s\n",
68                         label, params,
69                         HCC_PGM_FRAMELISTLEN(params) ? "256/512/1024" : "1024",
70                         HCC_CANPARK(params) ? " park" : "",
71                         HCC_64BIT_ADDR(params) ? " 64 bit addr" : "");
72         } else {
73                 ehci_dbg(ehci,
74                         "%s hcc_params %04x thresh %d uframes %s%s%s%s%s%s%s\n",
75                         label,
76                         params,
77                         HCC_ISOC_THRES(params),
78                         HCC_PGM_FRAMELISTLEN(params) ? "256/512/1024" : "1024",
79                         HCC_CANPARK(params) ? " park" : "",
80                         HCC_64BIT_ADDR(params) ? " 64 bit addr" : "",
81                         HCC_LPM(params) ? " LPM" : "",
82                         HCC_PER_PORT_CHANGE_EVENT(params) ? " ppce" : "",
83                         HCC_HW_PREFETCH(params) ? " hw prefetch" : "",
84                         HCC_32FRAME_PERIODIC_LIST(params) ?
85                                 " 32 periodic list" : "");
86         }
87 }
88
89 static void __maybe_unused
90 dbg_qtd(const char *label, struct ehci_hcd *ehci, struct ehci_qtd *qtd)
91 {
92         ehci_dbg(ehci, "%s td %p n%08x %08x t%08x p0=%08x\n", label, qtd,
93                 hc32_to_cpup(ehci, &qtd->hw_next),
94                 hc32_to_cpup(ehci, &qtd->hw_alt_next),
95                 hc32_to_cpup(ehci, &qtd->hw_token),
96                 hc32_to_cpup(ehci, &qtd->hw_buf[0]));
97         if (qtd->hw_buf[1])
98                 ehci_dbg(ehci, "  p1=%08x p2=%08x p3=%08x p4=%08x\n",
99                         hc32_to_cpup(ehci, &qtd->hw_buf[1]),
100                         hc32_to_cpup(ehci, &qtd->hw_buf[2]),
101                         hc32_to_cpup(ehci, &qtd->hw_buf[3]),
102                         hc32_to_cpup(ehci, &qtd->hw_buf[4]));
103 }
104
105 static void __maybe_unused
106 dbg_qh(const char *label, struct ehci_hcd *ehci, struct ehci_qh *qh)
107 {
108         struct ehci_qh_hw *hw = qh->hw;
109
110         ehci_dbg(ehci, "%s qh %p n%08x info %x %x qtd %x\n", label,
111                 qh, hw->hw_next, hw->hw_info1, hw->hw_info2, hw->hw_current);
112         dbg_qtd("overlay", ehci, (struct ehci_qtd *) &hw->hw_qtd_next);
113 }
114
115 static void __maybe_unused
116 dbg_itd(const char *label, struct ehci_hcd *ehci, struct ehci_itd *itd)
117 {
118         ehci_dbg(ehci, "%s [%d] itd %p, next %08x, urb %p\n",
119                 label, itd->frame, itd, hc32_to_cpu(ehci, itd->hw_next),
120                 itd->urb);
121         ehci_dbg(ehci,
122                 "  trans: %08x %08x %08x %08x %08x %08x %08x %08x\n",
123                 hc32_to_cpu(ehci, itd->hw_transaction[0]),
124                 hc32_to_cpu(ehci, itd->hw_transaction[1]),
125                 hc32_to_cpu(ehci, itd->hw_transaction[2]),
126                 hc32_to_cpu(ehci, itd->hw_transaction[3]),
127                 hc32_to_cpu(ehci, itd->hw_transaction[4]),
128                 hc32_to_cpu(ehci, itd->hw_transaction[5]),
129                 hc32_to_cpu(ehci, itd->hw_transaction[6]),
130                 hc32_to_cpu(ehci, itd->hw_transaction[7]));
131         ehci_dbg(ehci,
132                 "  buf:   %08x %08x %08x %08x %08x %08x %08x\n",
133                 hc32_to_cpu(ehci, itd->hw_bufp[0]),
134                 hc32_to_cpu(ehci, itd->hw_bufp[1]),
135                 hc32_to_cpu(ehci, itd->hw_bufp[2]),
136                 hc32_to_cpu(ehci, itd->hw_bufp[3]),
137                 hc32_to_cpu(ehci, itd->hw_bufp[4]),
138                 hc32_to_cpu(ehci, itd->hw_bufp[5]),
139                 hc32_to_cpu(ehci, itd->hw_bufp[6]));
140         ehci_dbg(ehci, "  index: %d %d %d %d %d %d %d %d\n",
141                 itd->index[0], itd->index[1], itd->index[2],
142                 itd->index[3], itd->index[4], itd->index[5],
143                 itd->index[6], itd->index[7]);
144 }
145
146 static void __maybe_unused
147 dbg_sitd(const char *label, struct ehci_hcd *ehci, struct ehci_sitd *sitd)
148 {
149         ehci_dbg(ehci, "%s [%d] sitd %p, next %08x, urb %p\n",
150                 label, sitd->frame, sitd, hc32_to_cpu(ehci, sitd->hw_next),
151                 sitd->urb);
152         ehci_dbg(ehci,
153                 "  addr %08x sched %04x result %08x buf %08x %08x\n",
154                 hc32_to_cpu(ehci, sitd->hw_fullspeed_ep),
155                 hc32_to_cpu(ehci, sitd->hw_uframe),
156                 hc32_to_cpu(ehci, sitd->hw_results),
157                 hc32_to_cpu(ehci, sitd->hw_buf[0]),
158                 hc32_to_cpu(ehci, sitd->hw_buf[1]));
159 }
160
161 static int __maybe_unused
162 dbg_status_buf(char *buf, unsigned len, const char *label, u32 status)
163 {
164         return scnprintf(buf, len,
165                 "%s%sstatus %04x%s%s%s%s%s%s%s%s%s%s%s",
166                 label, label[0] ? " " : "", status,
167                 (status & STS_PPCE_MASK) ? " PPCE" : "",
168                 (status & STS_ASS) ? " Async" : "",
169                 (status & STS_PSS) ? " Periodic" : "",
170                 (status & STS_RECL) ? " Recl" : "",
171                 (status & STS_HALT) ? " Halt" : "",
172                 (status & STS_IAA) ? " IAA" : "",
173                 (status & STS_FATAL) ? " FATAL" : "",
174                 (status & STS_FLR) ? " FLR" : "",
175                 (status & STS_PCD) ? " PCD" : "",
176                 (status & STS_ERR) ? " ERR" : "",
177                 (status & STS_INT) ? " INT" : "");
178 }
179
180 static int __maybe_unused
181 dbg_intr_buf(char *buf, unsigned len, const char *label, u32 enable)
182 {
183         return scnprintf(buf, len,
184                 "%s%sintrenable %02x%s%s%s%s%s%s%s",
185                 label, label[0] ? " " : "", enable,
186                 (enable & STS_PPCE_MASK) ? " PPCE" : "",
187                 (enable & STS_IAA) ? " IAA" : "",
188                 (enable & STS_FATAL) ? " FATAL" : "",
189                 (enable & STS_FLR) ? " FLR" : "",
190                 (enable & STS_PCD) ? " PCD" : "",
191                 (enable & STS_ERR) ? " ERR" : "",
192                 (enable & STS_INT) ? " INT" : "");
193 }
194
195 static const char *const fls_strings[] = { "1024", "512", "256", "??" };
196
197 static int
198 dbg_command_buf(char *buf, unsigned len, const char *label, u32 command)
199 {
200         return scnprintf(buf, len,
201                 "%s%scommand %07x %s%s%s%s%s%s=%d ithresh=%d%s%s%s%s "
202                 "period=%s%s %s",
203                 label, label[0] ? " " : "", command,
204                 (command & CMD_HIRD) ? " HIRD" : "",
205                 (command & CMD_PPCEE) ? " PPCEE" : "",
206                 (command & CMD_FSP) ? " FSP" : "",
207                 (command & CMD_ASPE) ? " ASPE" : "",
208                 (command & CMD_PSPE) ? " PSPE" : "",
209                 (command & CMD_PARK) ? " park" : "(park)",
210                 CMD_PARK_CNT(command),
211                 (command >> 16) & 0x3f,
212                 (command & CMD_LRESET) ? " LReset" : "",
213                 (command & CMD_IAAD) ? " IAAD" : "",
214                 (command & CMD_ASE) ? " Async" : "",
215                 (command & CMD_PSE) ? " Periodic" : "",
216                 fls_strings[(command >> 2) & 0x3],
217                 (command & CMD_RESET) ? " Reset" : "",
218                 (command & CMD_RUN) ? "RUN" : "HALT");
219 }
220
221 static int
222 dbg_port_buf(char *buf, unsigned len, const char *label, int port, u32 status)
223 {
224         char    *sig;
225
226         /* signaling state */
227         switch (status & (3 << 10)) {
228         case 0 << 10:
229                 sig = "se0";
230                 break;
231         case 1 << 10: /* low speed */
232                 sig = "k";
233                 break;
234         case 2 << 10:
235                 sig = "j";
236                 break;
237         default:
238                 sig = "?";
239                 break;
240         }
241
242         return scnprintf(buf, len,
243                 "%s%sport:%d status %06x %d %s%s%s%s%s%s "
244                 "sig=%s%s%s%s%s%s%s%s%s%s%s",
245                 label, label[0] ? " " : "", port, status,
246                 status >> 25, /*device address */
247                 (status & PORT_SSTS) >> 23 == PORTSC_SUSPEND_STS_ACK ?
248                                                 " ACK" : "",
249                 (status & PORT_SSTS) >> 23 == PORTSC_SUSPEND_STS_NYET ?
250                                                 " NYET" : "",
251                 (status & PORT_SSTS) >> 23 == PORTSC_SUSPEND_STS_STALL ?
252                                                 " STALL" : "",
253                 (status & PORT_SSTS) >> 23 == PORTSC_SUSPEND_STS_ERR ?
254                                                 " ERR" : "",
255                 (status & PORT_POWER) ? " POWER" : "",
256                 (status & PORT_OWNER) ? " OWNER" : "",
257                 sig,
258                 (status & PORT_LPM) ? " LPM" : "",
259                 (status & PORT_RESET) ? " RESET" : "",
260                 (status & PORT_SUSPEND) ? " SUSPEND" : "",
261                 (status & PORT_RESUME) ? " RESUME" : "",
262                 (status & PORT_OCC) ? " OCC" : "",
263                 (status & PORT_OC) ? " OC" : "",
264                 (status & PORT_PEC) ? " PEC" : "",
265                 (status & PORT_PE) ? " PE" : "",
266                 (status & PORT_CSC) ? " CSC" : "",
267                 (status & PORT_CONNECT) ? " CONNECT" : "");
268 }
269
270 static inline void
271 dbg_status(struct ehci_hcd *ehci, const char *label, u32 status)
272 {
273         char buf[80];
274
275         dbg_status_buf(buf, sizeof(buf), label, status);
276         ehci_dbg(ehci, "%s\n", buf);
277 }
278
279 static inline void
280 dbg_cmd(struct ehci_hcd *ehci, const char *label, u32 command)
281 {
282         char buf[80];
283
284         dbg_command_buf(buf, sizeof(buf), label, command);
285         ehci_dbg(ehci, "%s\n", buf);
286 }
287
288 static inline void
289 dbg_port(struct ehci_hcd *ehci, const char *label, int port, u32 status)
290 {
291         char buf[80];
292
293         dbg_port_buf(buf, sizeof(buf), label, port, status);
294         ehci_dbg(ehci, "%s\n", buf);
295 }
296
297 /*-------------------------------------------------------------------------*/
298
299 /* troubleshooting help: expose state in debugfs */
300
301 static int debug_async_open(struct inode *, struct file *);
302 static int debug_bandwidth_open(struct inode *, struct file *);
303 static int debug_periodic_open(struct inode *, struct file *);
304 static int debug_registers_open(struct inode *, struct file *);
305
306 static ssize_t debug_output(struct file*, char __user*, size_t, loff_t*);
307 static int debug_close(struct inode *, struct file *);
308
309 static const struct file_operations debug_async_fops = {
310         .owner          = THIS_MODULE,
311         .open           = debug_async_open,
312         .read           = debug_output,
313         .release        = debug_close,
314         .llseek         = default_llseek,
315 };
316
317 static const struct file_operations debug_bandwidth_fops = {
318         .owner          = THIS_MODULE,
319         .open           = debug_bandwidth_open,
320         .read           = debug_output,
321         .release        = debug_close,
322         .llseek         = default_llseek,
323 };
324
325 static const struct file_operations debug_periodic_fops = {
326         .owner          = THIS_MODULE,
327         .open           = debug_periodic_open,
328         .read           = debug_output,
329         .release        = debug_close,
330         .llseek         = default_llseek,
331 };
332
333 static const struct file_operations debug_registers_fops = {
334         .owner          = THIS_MODULE,
335         .open           = debug_registers_open,
336         .read           = debug_output,
337         .release        = debug_close,
338         .llseek         = default_llseek,
339 };
340
341 static struct dentry *ehci_debug_root;
342
343 struct debug_buffer {
344         ssize_t (*fill_func)(struct debug_buffer *);    /* fill method */
345         struct usb_bus *bus;
346         struct mutex mutex;     /* protect filling of buffer */
347         size_t count;           /* number of characters filled into buffer */
348         char *output_buf;
349         size_t alloc_size;
350 };
351
352 static inline char speed_char(u32 info1)
353 {
354         switch (info1 & (3 << 12)) {
355         case QH_FULL_SPEED:
356                 return 'f';
357         case QH_LOW_SPEED:
358                 return 'l';
359         case QH_HIGH_SPEED:
360                 return 'h';
361         default:
362                 return '?';
363         }
364 }
365
366 static inline char token_mark(struct ehci_hcd *ehci, __hc32 token)
367 {
368         __u32 v = hc32_to_cpu(ehci, token);
369
370         if (v & QTD_STS_ACTIVE)
371                 return '*';
372         if (v & QTD_STS_HALT)
373                 return '-';
374         if (!IS_SHORT_READ(v))
375                 return ' ';
376         /* tries to advance through hw_alt_next */
377         return '/';
378 }
379
380 static void qh_lines(struct ehci_hcd *ehci, struct ehci_qh *qh,
381                 char **nextp, unsigned *sizep)
382 {
383         u32                     scratch;
384         u32                     hw_curr;
385         struct list_head        *entry;
386         struct ehci_qtd         *td;
387         unsigned                temp;
388         unsigned                size = *sizep;
389         char                    *next = *nextp;
390         char                    mark;
391         __le32                  list_end = EHCI_LIST_END(ehci);
392         struct ehci_qh_hw       *hw = qh->hw;
393
394         if (hw->hw_qtd_next == list_end)        /* NEC does this */
395                 mark = '@';
396         else
397                 mark = token_mark(ehci, hw->hw_token);
398         if (mark == '/') {      /* qh_alt_next controls qh advance? */
399                 if ((hw->hw_alt_next & QTD_MASK(ehci))
400                                 == ehci->async->hw->hw_alt_next)
401                         mark = '#';     /* blocked */
402                 else if (hw->hw_alt_next == list_end)
403                         mark = '.';     /* use hw_qtd_next */
404                 /* else alt_next points to some other qtd */
405         }
406         scratch = hc32_to_cpup(ehci, &hw->hw_info1);
407         hw_curr = (mark == '*') ? hc32_to_cpup(ehci, &hw->hw_current) : 0;
408         temp = scnprintf(next, size,
409                         "qh/%p dev%d %cs ep%d %08x %08x (%08x%c %s nak%d)"
410                         " [cur %08x next %08x buf[0] %08x]",
411                         qh, scratch & 0x007f,
412                         speed_char (scratch),
413                         (scratch >> 8) & 0x000f,
414                         scratch, hc32_to_cpup(ehci, &hw->hw_info2),
415                         hc32_to_cpup(ehci, &hw->hw_token), mark,
416                         (cpu_to_hc32(ehci, QTD_TOGGLE) & hw->hw_token)
417                                 ? "data1" : "data0",
418                         (hc32_to_cpup(ehci, &hw->hw_alt_next) >> 1) & 0x0f,
419                         hc32_to_cpup(ehci, &hw->hw_current),
420                         hc32_to_cpup(ehci, &hw->hw_qtd_next),
421                         hc32_to_cpup(ehci, &hw->hw_buf[0]));
422         size -= temp;
423         next += temp;
424
425         /* hc may be modifying the list as we read it ... */
426         list_for_each(entry, &qh->qtd_list) {
427                 char *type;
428
429                 td = list_entry(entry, struct ehci_qtd, qtd_list);
430                 scratch = hc32_to_cpup(ehci, &td->hw_token);
431                 mark = ' ';
432                 if (hw_curr == td->qtd_dma) {
433                         mark = '*';
434                 } else if (hw->hw_qtd_next == cpu_to_hc32(ehci, td->qtd_dma)) {
435                         mark = '+';
436                 } else if (QTD_LENGTH(scratch)) {
437                         if (td->hw_alt_next == ehci->async->hw->hw_alt_next)
438                                 mark = '#';
439                         else if (td->hw_alt_next != list_end)
440                                 mark = '/';
441                 }
442                 switch ((scratch >> 8) & 0x03) {
443                 case 0:
444                         type = "out";
445                         break;
446                 case 1:
447                         type = "in";
448                         break;
449                 case 2:
450                         type = "setup";
451                         break;
452                 default:
453                         type = "?";
454                         break;
455                 }
456                 temp = scnprintf(next, size,
457                                 "\n\t%p%c%s len=%d %08x urb %p"
458                                 " [td %08x buf[0] %08x]",
459                                 td, mark, type,
460                                 (scratch >> 16) & 0x7fff,
461                                 scratch,
462                                 td->urb,
463                                 (u32) td->qtd_dma,
464                                 hc32_to_cpup(ehci, &td->hw_buf[0]));
465                 size -= temp;
466                 next += temp;
467                 if (temp == size)
468                         goto done;
469         }
470
471         temp = scnprintf(next, size, "\n");
472         size -= temp;
473         next += temp;
474
475 done:
476         *sizep = size;
477         *nextp = next;
478 }
479
480 static ssize_t fill_async_buffer(struct debug_buffer *buf)
481 {
482         struct usb_hcd          *hcd;
483         struct ehci_hcd         *ehci;
484         unsigned long           flags;
485         unsigned                temp, size;
486         char                    *next;
487         struct ehci_qh          *qh;
488
489         hcd = bus_to_hcd(buf->bus);
490         ehci = hcd_to_ehci(hcd);
491         next = buf->output_buf;
492         size = buf->alloc_size;
493
494         *next = 0;
495
496         /*
497          * dumps a snapshot of the async schedule.
498          * usually empty except for long-term bulk reads, or head.
499          * one QH per line, and TDs we know about
500          */
501         spin_lock_irqsave(&ehci->lock, flags);
502         for (qh = ehci->async->qh_next.qh; size > 0 && qh; qh = qh->qh_next.qh)
503                 qh_lines(ehci, qh, &next, &size);
504         if (!list_empty(&ehci->async_unlink) && size > 0) {
505                 temp = scnprintf(next, size, "\nunlink =\n");
506                 size -= temp;
507                 next += temp;
508
509                 list_for_each_entry(qh, &ehci->async_unlink, unlink_node) {
510                         if (size <= 0)
511                                 break;
512                         qh_lines(ehci, qh, &next, &size);
513                 }
514         }
515         spin_unlock_irqrestore(&ehci->lock, flags);
516
517         return strlen(buf->output_buf);
518 }
519
520 static ssize_t fill_bandwidth_buffer(struct debug_buffer *buf)
521 {
522         struct ehci_hcd         *ehci;
523         struct ehci_tt          *tt;
524         struct ehci_per_sched   *ps;
525         unsigned                temp, size;
526         char                    *next;
527         unsigned                i;
528         u8                      *bw;
529         u16                     *bf;
530         u8                      budget[EHCI_BANDWIDTH_SIZE];
531
532         ehci = hcd_to_ehci(bus_to_hcd(buf->bus));
533         next = buf->output_buf;
534         size = buf->alloc_size;
535
536         *next = 0;
537
538         spin_lock_irq(&ehci->lock);
539
540         /* Dump the HS bandwidth table */
541         temp = scnprintf(next, size,
542                         "HS bandwidth allocation (us per microframe)\n");
543         size -= temp;
544         next += temp;
545         for (i = 0; i < EHCI_BANDWIDTH_SIZE; i += 8) {
546                 bw = &ehci->bandwidth[i];
547                 temp = scnprintf(next, size,
548                                 "%2u: %4u%4u%4u%4u%4u%4u%4u%4u\n",
549                                 i, bw[0], bw[1], bw[2], bw[3],
550                                         bw[4], bw[5], bw[6], bw[7]);
551                 size -= temp;
552                 next += temp;
553         }
554
555         /* Dump all the FS/LS tables */
556         list_for_each_entry(tt, &ehci->tt_list, tt_list) {
557                 temp = scnprintf(next, size,
558                                 "\nTT %s port %d  FS/LS bandwidth allocation (us per frame)\n",
559                                 dev_name(&tt->usb_tt->hub->dev),
560                                 tt->tt_port + !!tt->usb_tt->multi);
561                 size -= temp;
562                 next += temp;
563
564                 bf = tt->bandwidth;
565                 temp = scnprintf(next, size,
566                                 "  %5u%5u%5u%5u%5u%5u%5u%5u\n",
567                                 bf[0], bf[1], bf[2], bf[3],
568                                         bf[4], bf[5], bf[6], bf[7]);
569                 size -= temp;
570                 next += temp;
571
572                 temp = scnprintf(next, size,
573                                 "FS/LS budget (us per microframe)\n");
574                 size -= temp;
575                 next += temp;
576                 compute_tt_budget(budget, tt);
577                 for (i = 0; i < EHCI_BANDWIDTH_SIZE; i += 8) {
578                         bw = &budget[i];
579                         temp = scnprintf(next, size,
580                                         "%2u: %4u%4u%4u%4u%4u%4u%4u%4u\n",
581                                         i, bw[0], bw[1], bw[2], bw[3],
582                                                 bw[4], bw[5], bw[6], bw[7]);
583                         size -= temp;
584                         next += temp;
585                 }
586                 list_for_each_entry(ps, &tt->ps_list, ps_list) {
587                         temp = scnprintf(next, size,
588                                         "%s ep %02x:  %4u @ %2u.%u+%u mask %04x\n",
589                                         dev_name(&ps->udev->dev),
590                                         ps->ep->desc.bEndpointAddress,
591                                         ps->tt_usecs,
592                                         ps->bw_phase, ps->phase_uf,
593                                         ps->bw_period, ps->cs_mask);
594                         size -= temp;
595                         next += temp;
596                 }
597         }
598         spin_unlock_irq(&ehci->lock);
599
600         return next - buf->output_buf;
601 }
602
603 static unsigned output_buf_tds_dir(char *buf, struct ehci_hcd *ehci,
604                 struct ehci_qh_hw *hw, struct ehci_qh *qh, unsigned size)
605 {
606         u32                     scratch = hc32_to_cpup(ehci, &hw->hw_info1);
607         struct ehci_qtd         *qtd;
608         char                    *type = "";
609         unsigned                temp = 0;
610
611         /* count tds, get ep direction */
612         list_for_each_entry(qtd, &qh->qtd_list, qtd_list) {
613                 temp++;
614                 switch ((hc32_to_cpu(ehci, qtd->hw_token) >> 8) & 0x03) {
615                 case 0:
616                         type = "out";
617                         continue;
618                 case 1:
619                         type = "in";
620                         continue;
621                 }
622         }
623
624         return scnprintf(buf, size, " (%c%d ep%d%s [%d/%d] q%d p%d)",
625                         speed_char(scratch), scratch & 0x007f,
626                         (scratch >> 8) & 0x000f, type, qh->ps.usecs,
627                         qh->ps.c_usecs, temp, 0x7ff & (scratch >> 16));
628 }
629
630 #define DBG_SCHED_LIMIT 64
631 static ssize_t fill_periodic_buffer(struct debug_buffer *buf)
632 {
633         struct usb_hcd          *hcd;
634         struct ehci_hcd         *ehci;
635         unsigned long           flags;
636         union ehci_shadow       p, *seen;
637         unsigned                temp, size, seen_count;
638         char                    *next;
639         unsigned                i;
640         __hc32                  tag;
641
642         seen = kmalloc_array(DBG_SCHED_LIMIT, sizeof(*seen), GFP_ATOMIC);
643         if (!seen)
644                 return 0;
645         seen_count = 0;
646
647         hcd = bus_to_hcd(buf->bus);
648         ehci = hcd_to_ehci(hcd);
649         next = buf->output_buf;
650         size = buf->alloc_size;
651
652         temp = scnprintf(next, size, "size = %d\n", ehci->periodic_size);
653         size -= temp;
654         next += temp;
655
656         /*
657          * dump a snapshot of the periodic schedule.
658          * iso changes, interrupt usually doesn't.
659          */
660         spin_lock_irqsave(&ehci->lock, flags);
661         for (i = 0; i < ehci->periodic_size; i++) {
662                 p = ehci->pshadow[i];
663                 if (likely(!p.ptr))
664                         continue;
665                 tag = Q_NEXT_TYPE(ehci, ehci->periodic[i]);
666
667                 temp = scnprintf(next, size, "%4d: ", i);
668                 size -= temp;
669                 next += temp;
670
671                 do {
672                         struct ehci_qh_hw *hw;
673
674                         switch (hc32_to_cpu(ehci, tag)) {
675                         case Q_TYPE_QH:
676                                 hw = p.qh->hw;
677                                 temp = scnprintf(next, size, " qh%d-%04x/%p",
678                                                 p.qh->ps.period,
679                                                 hc32_to_cpup(ehci,
680                                                         &hw->hw_info2)
681                                                         /* uframe masks */
682                                                         & (QH_CMASK | QH_SMASK),
683                                                 p.qh);
684                                 size -= temp;
685                                 next += temp;
686                                 /* don't repeat what follows this qh */
687                                 for (temp = 0; temp < seen_count; temp++) {
688                                         if (seen[temp].ptr != p.ptr)
689                                                 continue;
690                                         if (p.qh->qh_next.ptr) {
691                                                 temp = scnprintf(next, size,
692                                                         " ...");
693                                                 size -= temp;
694                                                 next += temp;
695                                         }
696                                         break;
697                                 }
698                                 /* show more info the first time around */
699                                 if (temp == seen_count) {
700                                         temp = output_buf_tds_dir(next, ehci,
701                                                 hw, p.qh, size);
702
703                                         if (seen_count < DBG_SCHED_LIMIT)
704                                                 seen[seen_count++].qh = p.qh;
705                                 } else {
706                                         temp = 0;
707                                 }
708                                 tag = Q_NEXT_TYPE(ehci, hw->hw_next);
709                                 p = p.qh->qh_next;
710                                 break;
711                         case Q_TYPE_FSTN:
712                                 temp = scnprintf(next, size,
713                                         " fstn-%8x/%p", p.fstn->hw_prev,
714                                         p.fstn);
715                                 tag = Q_NEXT_TYPE(ehci, p.fstn->hw_next);
716                                 p = p.fstn->fstn_next;
717                                 break;
718                         case Q_TYPE_ITD:
719                                 temp = scnprintf(next, size,
720                                         " itd/%p", p.itd);
721                                 tag = Q_NEXT_TYPE(ehci, p.itd->hw_next);
722                                 p = p.itd->itd_next;
723                                 break;
724                         case Q_TYPE_SITD:
725                                 temp = scnprintf(next, size,
726                                         " sitd%d-%04x/%p",
727                                         p.sitd->stream->ps.period,
728                                         hc32_to_cpup(ehci, &p.sitd->hw_uframe)
729                                                 & 0x0000ffff,
730                                         p.sitd);
731                                 tag = Q_NEXT_TYPE(ehci, p.sitd->hw_next);
732                                 p = p.sitd->sitd_next;
733                                 break;
734                         }
735                         size -= temp;
736                         next += temp;
737                 } while (p.ptr);
738
739                 temp = scnprintf(next, size, "\n");
740                 size -= temp;
741                 next += temp;
742         }
743         spin_unlock_irqrestore(&ehci->lock, flags);
744         kfree(seen);
745
746         return buf->alloc_size - size;
747 }
748 #undef DBG_SCHED_LIMIT
749
750 static const char *rh_state_string(struct ehci_hcd *ehci)
751 {
752         switch (ehci->rh_state) {
753         case EHCI_RH_HALTED:
754                 return "halted";
755         case EHCI_RH_SUSPENDED:
756                 return "suspended";
757         case EHCI_RH_RUNNING:
758                 return "running";
759         case EHCI_RH_STOPPING:
760                 return "stopping";
761         }
762         return "?";
763 }
764
765 static ssize_t fill_registers_buffer(struct debug_buffer *buf)
766 {
767         struct usb_hcd          *hcd;
768         struct ehci_hcd         *ehci;
769         unsigned long           flags;
770         unsigned                temp, size, i;
771         char                    *next, scratch[80];
772         static char             fmt[] = "%*s\n";
773         static char             label[] = "";
774
775         hcd = bus_to_hcd(buf->bus);
776         ehci = hcd_to_ehci(hcd);
777         next = buf->output_buf;
778         size = buf->alloc_size;
779
780         spin_lock_irqsave(&ehci->lock, flags);
781
782         if (!HCD_HW_ACCESSIBLE(hcd)) {
783                 size = scnprintf(next, size,
784                         "bus %s, device %s\n"
785                         "%s\n"
786                         "SUSPENDED (no register access)\n",
787                         hcd->self.controller->bus->name,
788                         dev_name(hcd->self.controller),
789                         hcd->product_desc);
790                 goto done;
791         }
792
793         /* Capability Registers */
794         i = HC_VERSION(ehci, ehci_readl(ehci, &ehci->caps->hc_capbase));
795         temp = scnprintf(next, size,
796                 "bus %s, device %s\n"
797                 "%s\n"
798                 "EHCI %x.%02x, rh state %s\n",
799                 hcd->self.controller->bus->name,
800                 dev_name(hcd->self.controller),
801                 hcd->product_desc,
802                 i >> 8, i & 0x0ff, rh_state_string(ehci));
803         size -= temp;
804         next += temp;
805
806 #ifdef  CONFIG_USB_PCI
807         /* EHCI 0.96 and later may have "extended capabilities" */
808         if (dev_is_pci(hcd->self.controller)) {
809                 struct pci_dev  *pdev;
810                 u32             offset, cap, cap2;
811                 unsigned        count = 256 / 4;
812
813                 pdev = to_pci_dev(ehci_to_hcd(ehci)->self.controller);
814                 offset = HCC_EXT_CAPS(ehci_readl(ehci,
815                                 &ehci->caps->hcc_params));
816                 while (offset && count--) {
817                         pci_read_config_dword(pdev, offset, &cap);
818                         switch (cap & 0xff) {
819                         case 1:
820                                 temp = scnprintf(next, size,
821                                         "ownership %08x%s%s\n", cap,
822                                         (cap & (1 << 24)) ? " linux" : "",
823                                         (cap & (1 << 16)) ? " firmware" : "");
824                                 size -= temp;
825                                 next += temp;
826
827                                 offset += 4;
828                                 pci_read_config_dword(pdev, offset, &cap2);
829                                 temp = scnprintf(next, size,
830                                         "SMI sts/enable 0x%08x\n", cap2);
831                                 size -= temp;
832                                 next += temp;
833                                 break;
834                         case 0:         /* illegal reserved capability */
835                                 cap = 0;
836                                 /* FALLTHROUGH */
837                         default:                /* unknown */
838                                 break;
839                         }
840                         offset = (cap >> 8) & 0xff;
841                 }
842         }
843 #endif
844
845         /* FIXME interpret both types of params */
846         i = ehci_readl(ehci, &ehci->caps->hcs_params);
847         temp = scnprintf(next, size, "structural params 0x%08x\n", i);
848         size -= temp;
849         next += temp;
850
851         i = ehci_readl(ehci, &ehci->caps->hcc_params);
852         temp = scnprintf(next, size, "capability params 0x%08x\n", i);
853         size -= temp;
854         next += temp;
855
856         /* Operational Registers */
857         temp = dbg_status_buf(scratch, sizeof(scratch), label,
858                         ehci_readl(ehci, &ehci->regs->status));
859         temp = scnprintf(next, size, fmt, temp, scratch);
860         size -= temp;
861         next += temp;
862
863         temp = dbg_command_buf(scratch, sizeof(scratch), label,
864                         ehci_readl(ehci, &ehci->regs->command));
865         temp = scnprintf(next, size, fmt, temp, scratch);
866         size -= temp;
867         next += temp;
868
869         temp = dbg_intr_buf(scratch, sizeof(scratch), label,
870                         ehci_readl(ehci, &ehci->regs->intr_enable));
871         temp = scnprintf(next, size, fmt, temp, scratch);
872         size -= temp;
873         next += temp;
874
875         temp = scnprintf(next, size, "uframe %04x\n",
876                         ehci_read_frame_index(ehci));
877         size -= temp;
878         next += temp;
879
880         for (i = 1; i <= HCS_N_PORTS(ehci->hcs_params); i++) {
881                 temp = dbg_port_buf(scratch, sizeof(scratch), label, i,
882                                 ehci_readl(ehci,
883                                         &ehci->regs->port_status[i - 1]));
884                 temp = scnprintf(next, size, fmt, temp, scratch);
885                 size -= temp;
886                 next += temp;
887                 if (i == HCS_DEBUG_PORT(ehci->hcs_params) && ehci->debug) {
888                         temp = scnprintf(next, size,
889                                         "    debug control %08x\n",
890                                         ehci_readl(ehci,
891                                                 &ehci->debug->control));
892                         size -= temp;
893                         next += temp;
894                 }
895         }
896
897         if (!list_empty(&ehci->async_unlink)) {
898                 temp = scnprintf(next, size, "async unlink qh %p\n",
899                                 list_first_entry(&ehci->async_unlink,
900                                                 struct ehci_qh, unlink_node));
901                 size -= temp;
902                 next += temp;
903         }
904
905 #ifdef EHCI_STATS
906         temp = scnprintf(next, size,
907                 "irq normal %ld err %ld iaa %ld (lost %ld)\n",
908                 ehci->stats.normal, ehci->stats.error, ehci->stats.iaa,
909                 ehci->stats.lost_iaa);
910         size -= temp;
911         next += temp;
912
913         temp = scnprintf(next, size, "complete %ld unlink %ld\n",
914                 ehci->stats.complete, ehci->stats.unlink);
915         size -= temp;
916         next += temp;
917 #endif
918
919 done:
920         spin_unlock_irqrestore(&ehci->lock, flags);
921
922         return buf->alloc_size - size;
923 }
924
925 static struct debug_buffer *alloc_buffer(struct usb_bus *bus,
926                 ssize_t (*fill_func)(struct debug_buffer *))
927 {
928         struct debug_buffer *buf;
929
930         buf = kzalloc(sizeof(*buf), GFP_KERNEL);
931
932         if (buf) {
933                 buf->bus = bus;
934                 buf->fill_func = fill_func;
935                 mutex_init(&buf->mutex);
936                 buf->alloc_size = PAGE_SIZE;
937         }
938
939         return buf;
940 }
941
942 static int fill_buffer(struct debug_buffer *buf)
943 {
944         int ret = 0;
945
946         if (!buf->output_buf)
947                 buf->output_buf = vmalloc(buf->alloc_size);
948
949         if (!buf->output_buf) {
950                 ret = -ENOMEM;
951                 goto out;
952         }
953
954         ret = buf->fill_func(buf);
955
956         if (ret >= 0) {
957                 buf->count = ret;
958                 ret = 0;
959         }
960
961 out:
962         return ret;
963 }
964
965 static ssize_t debug_output(struct file *file, char __user *user_buf,
966                 size_t len, loff_t *offset)
967 {
968         struct debug_buffer *buf = file->private_data;
969         int ret = 0;
970
971         mutex_lock(&buf->mutex);
972         if (buf->count == 0) {
973                 ret = fill_buffer(buf);
974                 if (ret != 0) {
975                         mutex_unlock(&buf->mutex);
976                         goto out;
977                 }
978         }
979         mutex_unlock(&buf->mutex);
980
981         ret = simple_read_from_buffer(user_buf, len, offset,
982                                       buf->output_buf, buf->count);
983
984 out:
985         return ret;
986 }
987
988 static int debug_close(struct inode *inode, struct file *file)
989 {
990         struct debug_buffer *buf = file->private_data;
991
992         if (buf) {
993                 vfree(buf->output_buf);
994                 kfree(buf);
995         }
996
997         return 0;
998 }
999
1000 static int debug_async_open(struct inode *inode, struct file *file)
1001 {
1002         file->private_data = alloc_buffer(inode->i_private, fill_async_buffer);
1003
1004         return file->private_data ? 0 : -ENOMEM;
1005 }
1006
1007 static int debug_bandwidth_open(struct inode *inode, struct file *file)
1008 {
1009         file->private_data = alloc_buffer(inode->i_private,
1010                         fill_bandwidth_buffer);
1011
1012         return file->private_data ? 0 : -ENOMEM;
1013 }
1014
1015 static int debug_periodic_open(struct inode *inode, struct file *file)
1016 {
1017         struct debug_buffer *buf;
1018
1019         buf = alloc_buffer(inode->i_private, fill_periodic_buffer);
1020         if (!buf)
1021                 return -ENOMEM;
1022
1023         buf->alloc_size = (sizeof(void *) == 4 ? 6 : 8) * PAGE_SIZE;
1024         file->private_data = buf;
1025         return 0;
1026 }
1027
1028 static int debug_registers_open(struct inode *inode, struct file *file)
1029 {
1030         file->private_data = alloc_buffer(inode->i_private,
1031                                           fill_registers_buffer);
1032
1033         return file->private_data ? 0 : -ENOMEM;
1034 }
1035
1036 static inline void create_debug_files(struct ehci_hcd *ehci)
1037 {
1038         struct usb_bus *bus = &ehci_to_hcd(ehci)->self;
1039
1040         ehci->debug_dir = debugfs_create_dir(bus->bus_name, ehci_debug_root);
1041         if (!ehci->debug_dir)
1042                 return;
1043
1044         if (!debugfs_create_file("async", S_IRUGO, ehci->debug_dir, bus,
1045                                                 &debug_async_fops))
1046                 goto file_error;
1047
1048         if (!debugfs_create_file("bandwidth", S_IRUGO, ehci->debug_dir, bus,
1049                                                 &debug_bandwidth_fops))
1050                 goto file_error;
1051
1052         if (!debugfs_create_file("periodic", S_IRUGO, ehci->debug_dir, bus,
1053                                                 &debug_periodic_fops))
1054                 goto file_error;
1055
1056         if (!debugfs_create_file("registers", S_IRUGO, ehci->debug_dir, bus,
1057                                                     &debug_registers_fops))
1058                 goto file_error;
1059
1060         return;
1061
1062 file_error:
1063         debugfs_remove_recursive(ehci->debug_dir);
1064 }
1065
1066 static inline void remove_debug_files(struct ehci_hcd *ehci)
1067 {
1068         debugfs_remove_recursive(ehci->debug_dir);
1069 }
1070
1071 #else /* CONFIG_DYNAMIC_DEBUG */
1072
1073 static inline void dbg_hcs_params(struct ehci_hcd *ehci, char *label) { }
1074 static inline void dbg_hcc_params(struct ehci_hcd *ehci, char *label) { }
1075
1076 static inline void __maybe_unused dbg_qh(const char *label,
1077                 struct ehci_hcd *ehci, struct ehci_qh *qh) { }
1078
1079 static inline int __maybe_unused dbg_status_buf(const char *buf,
1080                 unsigned int len, const char *label, u32 status)
1081 { return 0; }
1082
1083 static inline int __maybe_unused dbg_command_buf(const char *buf,
1084                 unsigned int len, const char *label, u32 command)
1085 { return 0; }
1086
1087 static inline int __maybe_unused dbg_intr_buf(const char *buf,
1088                 unsigned int len, const char *label, u32 enable)
1089 { return 0; }
1090
1091 static inline int __maybe_unused dbg_port_buf(char *buf,
1092                 unsigned int len, const char *label, int port, u32 status)
1093 { return 0; }
1094
1095 static inline void dbg_status(struct ehci_hcd *ehci, const char *label,
1096                 u32 status) { }
1097 static inline void dbg_cmd(struct ehci_hcd *ehci, const char *label,
1098                 u32 command) { }
1099 static inline void dbg_port(struct ehci_hcd *ehci, const char *label,
1100                 int port, u32 status) { }
1101
1102 static inline void create_debug_files(struct ehci_hcd *bus) { }
1103 static inline void remove_debug_files(struct ehci_hcd *bus) { }
1104
1105 #endif /* CONFIG_DYNAMIC_DEBUG */