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