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