• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*
2  * This file contains code to reset and initialize USB host controllers.
3  * Some of it includes work-arounds for PCI hardware and BIOS quirks.
4  * It may need to run early during booting -- before USB would normally
5  * initialize -- to ensure that Linux doesn't use any legacy modes.
6  *
7  *  Copyright (c) 1999 Martin Mares <mj@ucw.cz>
8  *  (and others)
9  */
10 
11 #include <linux/types.h>
12 #include <linux/kconfig.h>
13 #include <linux/kernel.h>
14 #include <linux/pci.h>
15 #include <linux/delay.h>
16 #include <linux/export.h>
17 #include <linux/acpi.h>
18 #include <linux/dmi.h>
19 #include "pci-quirks.h"
20 #include "xhci-ext-caps.h"
21 
22 
23 #define UHCI_USBLEGSUP		0xc0		/* legacy support */
24 #define UHCI_USBCMD		0		/* command register */
25 #define UHCI_USBINTR		4		/* interrupt register */
26 #define UHCI_USBLEGSUP_RWC	0x8f00		/* the R/WC bits */
27 #define UHCI_USBLEGSUP_RO	0x5040		/* R/O and reserved bits */
28 #define UHCI_USBCMD_RUN		0x0001		/* RUN/STOP bit */
29 #define UHCI_USBCMD_HCRESET	0x0002		/* Host Controller reset */
30 #define UHCI_USBCMD_EGSM	0x0008		/* Global Suspend Mode */
31 #define UHCI_USBCMD_CONFIGURE	0x0040		/* Config Flag */
32 #define UHCI_USBINTR_RESUME	0x0002		/* Resume interrupt enable */
33 
34 #define OHCI_CONTROL		0x04
35 #define OHCI_CMDSTATUS		0x08
36 #define OHCI_INTRSTATUS		0x0c
37 #define OHCI_INTRENABLE		0x10
38 #define OHCI_INTRDISABLE	0x14
39 #define OHCI_FMINTERVAL		0x34
40 #define OHCI_HCFS		(3 << 6)	/* hc functional state */
41 #define OHCI_HCR		(1 << 0)	/* host controller reset */
42 #define OHCI_OCR		(1 << 3)	/* ownership change request */
43 #define OHCI_CTRL_RWC		(1 << 9)	/* remote wakeup connected */
44 #define OHCI_CTRL_IR		(1 << 8)	/* interrupt routing */
45 #define OHCI_INTR_OC		(1 << 30)	/* ownership change */
46 
47 #define EHCI_HCC_PARAMS		0x08		/* extended capabilities */
48 #define EHCI_USBCMD		0		/* command register */
49 #define EHCI_USBCMD_RUN		(1 << 0)	/* RUN/STOP bit */
50 #define EHCI_USBSTS		4		/* status register */
51 #define EHCI_USBSTS_HALTED	(1 << 12)	/* HCHalted bit */
52 #define EHCI_USBINTR		8		/* interrupt register */
53 #define EHCI_CONFIGFLAG		0x40		/* configured flag register */
54 #define EHCI_USBLEGSUP		0		/* legacy support register */
55 #define EHCI_USBLEGSUP_BIOS	(1 << 16)	/* BIOS semaphore */
56 #define EHCI_USBLEGSUP_OS	(1 << 24)	/* OS semaphore */
57 #define EHCI_USBLEGCTLSTS	4		/* legacy control/status */
58 #define EHCI_USBLEGCTLSTS_SOOE	(1 << 13)	/* SMI on ownership change */
59 
60 /* AMD quirk use */
61 #define	AB_REG_BAR_LOW		0xe0
62 #define	AB_REG_BAR_HIGH		0xe1
63 #define	AB_REG_BAR_SB700	0xf0
64 #define	AB_INDX(addr)		((addr) + 0x00)
65 #define	AB_DATA(addr)		((addr) + 0x04)
66 #define	AX_INDXC		0x30
67 #define	AX_DATAC		0x34
68 
69 #define	NB_PCIE_INDX_ADDR	0xe0
70 #define	NB_PCIE_INDX_DATA	0xe4
71 #define	PCIE_P_CNTL		0x10040
72 #define	BIF_NB			0x10002
73 #define	NB_PIF0_PWRDOWN_0	0x01100012
74 #define	NB_PIF0_PWRDOWN_1	0x01100013
75 
76 #define USB_INTEL_XUSB2PR      0xD0
77 #define USB_INTEL_USB2PRM      0xD4
78 #define USB_INTEL_USB3_PSSEN   0xD8
79 #define USB_INTEL_USB3PRM      0xDC
80 
81 /*
82  * amd_chipset_gen values represent AMD different chipset generations
83  */
84 enum amd_chipset_gen {
85 	NOT_AMD_CHIPSET = 0,
86 	AMD_CHIPSET_SB600,
87 	AMD_CHIPSET_SB700,
88 	AMD_CHIPSET_SB800,
89 	AMD_CHIPSET_HUDSON2,
90 	AMD_CHIPSET_BOLTON,
91 	AMD_CHIPSET_YANGTZE,
92 	AMD_CHIPSET_TAISHAN,
93 	AMD_CHIPSET_UNKNOWN,
94 };
95 
96 struct amd_chipset_type {
97 	enum amd_chipset_gen gen;
98 	u8 rev;
99 };
100 
101 static struct amd_chipset_info {
102 	struct pci_dev	*nb_dev;
103 	struct pci_dev	*smbus_dev;
104 	int nb_type;
105 	struct amd_chipset_type sb_type;
106 	int isoc_reqs;
107 	int probe_count;
108 	int probe_result;
109 } amd_chipset;
110 
111 static DEFINE_SPINLOCK(amd_lock);
112 
113 /*
114  * amd_chipset_sb_type_init - initialize amd chipset southbridge type
115  *
116  * AMD FCH/SB generation and revision is identified by SMBus controller
117  * vendor, device and revision IDs.
118  *
119  * Returns: 1 if it is an AMD chipset, 0 otherwise.
120  */
amd_chipset_sb_type_init(struct amd_chipset_info * pinfo)121 static int amd_chipset_sb_type_init(struct amd_chipset_info *pinfo)
122 {
123 	u8 rev = 0;
124 	pinfo->sb_type.gen = AMD_CHIPSET_UNKNOWN;
125 
126 	pinfo->smbus_dev = pci_get_device(PCI_VENDOR_ID_ATI,
127 			PCI_DEVICE_ID_ATI_SBX00_SMBUS, NULL);
128 	if (pinfo->smbus_dev) {
129 		rev = pinfo->smbus_dev->revision;
130 		if (rev >= 0x10 && rev <= 0x1f)
131 			pinfo->sb_type.gen = AMD_CHIPSET_SB600;
132 		else if (rev >= 0x30 && rev <= 0x3f)
133 			pinfo->sb_type.gen = AMD_CHIPSET_SB700;
134 		else if (rev >= 0x40 && rev <= 0x4f)
135 			pinfo->sb_type.gen = AMD_CHIPSET_SB800;
136 	} else {
137 		pinfo->smbus_dev = pci_get_device(PCI_VENDOR_ID_AMD,
138 				PCI_DEVICE_ID_AMD_HUDSON2_SMBUS, NULL);
139 
140 		if (pinfo->smbus_dev) {
141 			rev = pinfo->smbus_dev->revision;
142 			if (rev >= 0x11 && rev <= 0x14)
143 				pinfo->sb_type.gen = AMD_CHIPSET_HUDSON2;
144 			else if (rev >= 0x15 && rev <= 0x18)
145 				pinfo->sb_type.gen = AMD_CHIPSET_BOLTON;
146 			else if (rev >= 0x39 && rev <= 0x3a)
147 				pinfo->sb_type.gen = AMD_CHIPSET_YANGTZE;
148 		} else {
149 			pinfo->smbus_dev = pci_get_device(PCI_VENDOR_ID_AMD,
150 							  0x145c, NULL);
151 			if (pinfo->smbus_dev) {
152 				rev = pinfo->smbus_dev->revision;
153 				pinfo->sb_type.gen = AMD_CHIPSET_TAISHAN;
154 			} else {
155 				pinfo->sb_type.gen = NOT_AMD_CHIPSET;
156 				return 0;
157 			}
158 		}
159 	}
160 	pinfo->sb_type.rev = rev;
161 	return 1;
162 }
163 
sb800_prefetch(struct device * dev,int on)164 void sb800_prefetch(struct device *dev, int on)
165 {
166 	u16 misc;
167 	struct pci_dev *pdev = to_pci_dev(dev);
168 
169 	pci_read_config_word(pdev, 0x50, &misc);
170 	if (on == 0)
171 		pci_write_config_word(pdev, 0x50, misc & 0xfcff);
172 	else
173 		pci_write_config_word(pdev, 0x50, misc | 0x0300);
174 }
175 EXPORT_SYMBOL_GPL(sb800_prefetch);
176 
usb_amd_find_chipset_info(void)177 int usb_amd_find_chipset_info(void)
178 {
179 	unsigned long flags;
180 	struct amd_chipset_info info;
181 	int need_pll_quirk = 0;
182 
183 	spin_lock_irqsave(&amd_lock, flags);
184 
185 	/* probe only once */
186 	if (amd_chipset.probe_count > 0) {
187 		amd_chipset.probe_count++;
188 		spin_unlock_irqrestore(&amd_lock, flags);
189 		return amd_chipset.probe_result;
190 	}
191 	memset(&info, 0, sizeof(info));
192 	spin_unlock_irqrestore(&amd_lock, flags);
193 
194 	if (!amd_chipset_sb_type_init(&info)) {
195 		goto commit;
196 	}
197 
198 	switch (info.sb_type.gen) {
199 	case AMD_CHIPSET_SB700:
200 		need_pll_quirk = info.sb_type.rev <= 0x3B;
201 		break;
202 	case AMD_CHIPSET_SB800:
203 	case AMD_CHIPSET_HUDSON2:
204 	case AMD_CHIPSET_BOLTON:
205 		need_pll_quirk = 1;
206 		break;
207 	default:
208 		need_pll_quirk = 0;
209 		break;
210 	}
211 
212 	if (!need_pll_quirk) {
213 		if (info.smbus_dev) {
214 			pci_dev_put(info.smbus_dev);
215 			info.smbus_dev = NULL;
216 		}
217 		goto commit;
218 	}
219 
220 	info.nb_dev = pci_get_device(PCI_VENDOR_ID_AMD, 0x9601, NULL);
221 	if (info.nb_dev) {
222 		info.nb_type = 1;
223 	} else {
224 		info.nb_dev = pci_get_device(PCI_VENDOR_ID_AMD, 0x1510, NULL);
225 		if (info.nb_dev) {
226 			info.nb_type = 2;
227 		} else {
228 			info.nb_dev = pci_get_device(PCI_VENDOR_ID_AMD,
229 						     0x9600, NULL);
230 			if (info.nb_dev)
231 				info.nb_type = 3;
232 		}
233 	}
234 
235 	need_pll_quirk = info.probe_result = 1;
236 	printk(KERN_DEBUG "QUIRK: Enable AMD PLL fix\n");
237 
238 commit:
239 
240 	spin_lock_irqsave(&amd_lock, flags);
241 	if (amd_chipset.probe_count > 0) {
242 		/* race - someone else was faster - drop devices */
243 
244 		/* Mark that we where here */
245 		amd_chipset.probe_count++;
246 		need_pll_quirk = amd_chipset.probe_result;
247 
248 		spin_unlock_irqrestore(&amd_lock, flags);
249 
250 		pci_dev_put(info.nb_dev);
251 		pci_dev_put(info.smbus_dev);
252 
253 	} else {
254 		/* no race - commit the result */
255 		info.probe_count++;
256 		amd_chipset = info;
257 		spin_unlock_irqrestore(&amd_lock, flags);
258 	}
259 
260 	return need_pll_quirk;
261 }
262 EXPORT_SYMBOL_GPL(usb_amd_find_chipset_info);
263 
usb_hcd_amd_remote_wakeup_quirk(struct pci_dev * pdev)264 int usb_hcd_amd_remote_wakeup_quirk(struct pci_dev *pdev)
265 {
266 	/* Make sure amd chipset type has already been initialized */
267 	usb_amd_find_chipset_info();
268 	if (amd_chipset.sb_type.gen == AMD_CHIPSET_YANGTZE ||
269 	    amd_chipset.sb_type.gen == AMD_CHIPSET_TAISHAN) {
270 		dev_dbg(&pdev->dev, "QUIRK: Enable AMD remote wakeup fix\n");
271 		return 1;
272 	}
273 	return 0;
274 }
275 EXPORT_SYMBOL_GPL(usb_hcd_amd_remote_wakeup_quirk);
276 
usb_amd_hang_symptom_quirk(void)277 bool usb_amd_hang_symptom_quirk(void)
278 {
279 	u8 rev;
280 
281 	usb_amd_find_chipset_info();
282 	rev = amd_chipset.sb_type.rev;
283 	/* SB600 and old version of SB700 have hang symptom bug */
284 	return amd_chipset.sb_type.gen == AMD_CHIPSET_SB600 ||
285 			(amd_chipset.sb_type.gen == AMD_CHIPSET_SB700 &&
286 			 rev >= 0x3a && rev <= 0x3b);
287 }
288 EXPORT_SYMBOL_GPL(usb_amd_hang_symptom_quirk);
289 
usb_amd_prefetch_quirk(void)290 bool usb_amd_prefetch_quirk(void)
291 {
292 	usb_amd_find_chipset_info();
293 	/* SB800 needs pre-fetch fix */
294 	return amd_chipset.sb_type.gen == AMD_CHIPSET_SB800;
295 }
296 EXPORT_SYMBOL_GPL(usb_amd_prefetch_quirk);
297 
298 /*
299  * The hardware normally enables the A-link power management feature, which
300  * lets the system lower the power consumption in idle states.
301  *
302  * This USB quirk prevents the link going into that lower power state
303  * during isochronous transfers.
304  *
305  * Without this quirk, isochronous stream on OHCI/EHCI/xHCI controllers of
306  * some AMD platforms may stutter or have breaks occasionally.
307  */
usb_amd_quirk_pll(int disable)308 static void usb_amd_quirk_pll(int disable)
309 {
310 	u32 addr, addr_low, addr_high, val;
311 	u32 bit = disable ? 0 : 1;
312 	unsigned long flags;
313 
314 	spin_lock_irqsave(&amd_lock, flags);
315 
316 	if (disable) {
317 		amd_chipset.isoc_reqs++;
318 		if (amd_chipset.isoc_reqs > 1) {
319 			spin_unlock_irqrestore(&amd_lock, flags);
320 			return;
321 		}
322 	} else {
323 		amd_chipset.isoc_reqs--;
324 		if (amd_chipset.isoc_reqs > 0) {
325 			spin_unlock_irqrestore(&amd_lock, flags);
326 			return;
327 		}
328 	}
329 
330 	if (amd_chipset.sb_type.gen == AMD_CHIPSET_SB800 ||
331 			amd_chipset.sb_type.gen == AMD_CHIPSET_HUDSON2 ||
332 			amd_chipset.sb_type.gen == AMD_CHIPSET_BOLTON) {
333 		outb_p(AB_REG_BAR_LOW, 0xcd6);
334 		addr_low = inb_p(0xcd7);
335 		outb_p(AB_REG_BAR_HIGH, 0xcd6);
336 		addr_high = inb_p(0xcd7);
337 		addr = addr_high << 8 | addr_low;
338 
339 		outl_p(0x30, AB_INDX(addr));
340 		outl_p(0x40, AB_DATA(addr));
341 		outl_p(0x34, AB_INDX(addr));
342 		val = inl_p(AB_DATA(addr));
343 	} else if (amd_chipset.sb_type.gen == AMD_CHIPSET_SB700 &&
344 			amd_chipset.sb_type.rev <= 0x3b) {
345 		pci_read_config_dword(amd_chipset.smbus_dev,
346 					AB_REG_BAR_SB700, &addr);
347 		outl(AX_INDXC, AB_INDX(addr));
348 		outl(0x40, AB_DATA(addr));
349 		outl(AX_DATAC, AB_INDX(addr));
350 		val = inl(AB_DATA(addr));
351 	} else {
352 		spin_unlock_irqrestore(&amd_lock, flags);
353 		return;
354 	}
355 
356 	if (disable) {
357 		val &= ~0x08;
358 		val |= (1 << 4) | (1 << 9);
359 	} else {
360 		val |= 0x08;
361 		val &= ~((1 << 4) | (1 << 9));
362 	}
363 	outl_p(val, AB_DATA(addr));
364 
365 	if (!amd_chipset.nb_dev) {
366 		spin_unlock_irqrestore(&amd_lock, flags);
367 		return;
368 	}
369 
370 	if (amd_chipset.nb_type == 1 || amd_chipset.nb_type == 3) {
371 		addr = PCIE_P_CNTL;
372 		pci_write_config_dword(amd_chipset.nb_dev,
373 					NB_PCIE_INDX_ADDR, addr);
374 		pci_read_config_dword(amd_chipset.nb_dev,
375 					NB_PCIE_INDX_DATA, &val);
376 
377 		val &= ~(1 | (1 << 3) | (1 << 4) | (1 << 9) | (1 << 12));
378 		val |= bit | (bit << 3) | (bit << 12);
379 		val |= ((!bit) << 4) | ((!bit) << 9);
380 		pci_write_config_dword(amd_chipset.nb_dev,
381 					NB_PCIE_INDX_DATA, val);
382 
383 		addr = BIF_NB;
384 		pci_write_config_dword(amd_chipset.nb_dev,
385 					NB_PCIE_INDX_ADDR, addr);
386 		pci_read_config_dword(amd_chipset.nb_dev,
387 					NB_PCIE_INDX_DATA, &val);
388 		val &= ~(1 << 8);
389 		val |= bit << 8;
390 
391 		pci_write_config_dword(amd_chipset.nb_dev,
392 					NB_PCIE_INDX_DATA, val);
393 	} else if (amd_chipset.nb_type == 2) {
394 		addr = NB_PIF0_PWRDOWN_0;
395 		pci_write_config_dword(amd_chipset.nb_dev,
396 					NB_PCIE_INDX_ADDR, addr);
397 		pci_read_config_dword(amd_chipset.nb_dev,
398 					NB_PCIE_INDX_DATA, &val);
399 		if (disable)
400 			val &= ~(0x3f << 7);
401 		else
402 			val |= 0x3f << 7;
403 
404 		pci_write_config_dword(amd_chipset.nb_dev,
405 					NB_PCIE_INDX_DATA, val);
406 
407 		addr = NB_PIF0_PWRDOWN_1;
408 		pci_write_config_dword(amd_chipset.nb_dev,
409 					NB_PCIE_INDX_ADDR, addr);
410 		pci_read_config_dword(amd_chipset.nb_dev,
411 					NB_PCIE_INDX_DATA, &val);
412 		if (disable)
413 			val &= ~(0x3f << 7);
414 		else
415 			val |= 0x3f << 7;
416 
417 		pci_write_config_dword(amd_chipset.nb_dev,
418 					NB_PCIE_INDX_DATA, val);
419 	}
420 
421 	spin_unlock_irqrestore(&amd_lock, flags);
422 	return;
423 }
424 
usb_amd_quirk_pll_disable(void)425 void usb_amd_quirk_pll_disable(void)
426 {
427 	usb_amd_quirk_pll(1);
428 }
429 EXPORT_SYMBOL_GPL(usb_amd_quirk_pll_disable);
430 
usb_amd_quirk_pll_enable(void)431 void usb_amd_quirk_pll_enable(void)
432 {
433 	usb_amd_quirk_pll(0);
434 }
435 EXPORT_SYMBOL_GPL(usb_amd_quirk_pll_enable);
436 
usb_amd_dev_put(void)437 void usb_amd_dev_put(void)
438 {
439 	struct pci_dev *nb, *smbus;
440 	unsigned long flags;
441 
442 	spin_lock_irqsave(&amd_lock, flags);
443 
444 	amd_chipset.probe_count--;
445 	if (amd_chipset.probe_count > 0) {
446 		spin_unlock_irqrestore(&amd_lock, flags);
447 		return;
448 	}
449 
450 	/* save them to pci_dev_put outside of spinlock */
451 	nb    = amd_chipset.nb_dev;
452 	smbus = amd_chipset.smbus_dev;
453 
454 	amd_chipset.nb_dev = NULL;
455 	amd_chipset.smbus_dev = NULL;
456 	amd_chipset.nb_type = 0;
457 	memset(&amd_chipset.sb_type, 0, sizeof(amd_chipset.sb_type));
458 	amd_chipset.isoc_reqs = 0;
459 	amd_chipset.probe_result = 0;
460 
461 	spin_unlock_irqrestore(&amd_lock, flags);
462 
463 	pci_dev_put(nb);
464 	pci_dev_put(smbus);
465 }
466 EXPORT_SYMBOL_GPL(usb_amd_dev_put);
467 
468 /*
469  * Make sure the controller is completely inactive, unable to
470  * generate interrupts or do DMA.
471  */
uhci_reset_hc(struct pci_dev * pdev,unsigned long base)472 void uhci_reset_hc(struct pci_dev *pdev, unsigned long base)
473 {
474 	/* Turn off PIRQ enable and SMI enable.  (This also turns off the
475 	 * BIOS's USB Legacy Support.)  Turn off all the R/WC bits too.
476 	 */
477 	pci_write_config_word(pdev, UHCI_USBLEGSUP, UHCI_USBLEGSUP_RWC);
478 
479 	/* Reset the HC - this will force us to get a
480 	 * new notification of any already connected
481 	 * ports due to the virtual disconnect that it
482 	 * implies.
483 	 */
484 	outw(UHCI_USBCMD_HCRESET, base + UHCI_USBCMD);
485 	mb();
486 	udelay(5);
487 	if (inw(base + UHCI_USBCMD) & UHCI_USBCMD_HCRESET)
488 		dev_warn(&pdev->dev, "HCRESET not completed yet!\n");
489 
490 	/* Just to be safe, disable interrupt requests and
491 	 * make sure the controller is stopped.
492 	 */
493 	outw(0, base + UHCI_USBINTR);
494 	outw(0, base + UHCI_USBCMD);
495 }
496 EXPORT_SYMBOL_GPL(uhci_reset_hc);
497 
498 /*
499  * Initialize a controller that was newly discovered or has just been
500  * resumed.  In either case we can't be sure of its previous state.
501  *
502  * Returns: 1 if the controller was reset, 0 otherwise.
503  */
uhci_check_and_reset_hc(struct pci_dev * pdev,unsigned long base)504 int uhci_check_and_reset_hc(struct pci_dev *pdev, unsigned long base)
505 {
506 	u16 legsup;
507 	unsigned int cmd, intr;
508 
509 	/*
510 	 * When restarting a suspended controller, we expect all the
511 	 * settings to be the same as we left them:
512 	 *
513 	 *	PIRQ and SMI disabled, no R/W bits set in USBLEGSUP;
514 	 *	Controller is stopped and configured with EGSM set;
515 	 *	No interrupts enabled except possibly Resume Detect.
516 	 *
517 	 * If any of these conditions are violated we do a complete reset.
518 	 */
519 	pci_read_config_word(pdev, UHCI_USBLEGSUP, &legsup);
520 	if (legsup & ~(UHCI_USBLEGSUP_RO | UHCI_USBLEGSUP_RWC)) {
521 		dev_dbg(&pdev->dev, "%s: legsup = 0x%04x\n",
522 				__func__, legsup);
523 		goto reset_needed;
524 	}
525 
526 	cmd = inw(base + UHCI_USBCMD);
527 	if ((cmd & UHCI_USBCMD_RUN) || !(cmd & UHCI_USBCMD_CONFIGURE) ||
528 			!(cmd & UHCI_USBCMD_EGSM)) {
529 		dev_dbg(&pdev->dev, "%s: cmd = 0x%04x\n",
530 				__func__, cmd);
531 		goto reset_needed;
532 	}
533 
534 	intr = inw(base + UHCI_USBINTR);
535 	if (intr & (~UHCI_USBINTR_RESUME)) {
536 		dev_dbg(&pdev->dev, "%s: intr = 0x%04x\n",
537 				__func__, intr);
538 		goto reset_needed;
539 	}
540 	return 0;
541 
542 reset_needed:
543 	dev_dbg(&pdev->dev, "Performing full reset\n");
544 	uhci_reset_hc(pdev, base);
545 	return 1;
546 }
547 EXPORT_SYMBOL_GPL(uhci_check_and_reset_hc);
548 
io_type_enabled(struct pci_dev * pdev,unsigned int mask)549 static inline int io_type_enabled(struct pci_dev *pdev, unsigned int mask)
550 {
551 	u16 cmd;
552 	return !pci_read_config_word(pdev, PCI_COMMAND, &cmd) && (cmd & mask);
553 }
554 
555 #define pio_enabled(dev) io_type_enabled(dev, PCI_COMMAND_IO)
556 #define mmio_enabled(dev) io_type_enabled(dev, PCI_COMMAND_MEMORY)
557 
quirk_usb_handoff_uhci(struct pci_dev * pdev)558 static void quirk_usb_handoff_uhci(struct pci_dev *pdev)
559 {
560 	unsigned long base = 0;
561 	int i;
562 
563 	if (!pio_enabled(pdev))
564 		return;
565 
566 	for (i = 0; i < PCI_ROM_RESOURCE; i++)
567 		if ((pci_resource_flags(pdev, i) & IORESOURCE_IO)) {
568 			base = pci_resource_start(pdev, i);
569 			break;
570 		}
571 
572 	if (base)
573 		uhci_check_and_reset_hc(pdev, base);
574 }
575 
mmio_resource_enabled(struct pci_dev * pdev,int idx)576 static int mmio_resource_enabled(struct pci_dev *pdev, int idx)
577 {
578 	return pci_resource_start(pdev, idx) && mmio_enabled(pdev);
579 }
580 
quirk_usb_handoff_ohci(struct pci_dev * pdev)581 static void quirk_usb_handoff_ohci(struct pci_dev *pdev)
582 {
583 	void __iomem *base;
584 	u32 control;
585 	u32 fminterval = 0;
586 	bool no_fminterval = false;
587 	int cnt;
588 
589 	if (!mmio_resource_enabled(pdev, 0))
590 		return;
591 
592 	base = pci_ioremap_bar(pdev, 0);
593 	if (base == NULL)
594 		return;
595 
596 	/*
597 	 * ULi M5237 OHCI controller locks the whole system when accessing
598 	 * the OHCI_FMINTERVAL offset.
599 	 */
600 	if (pdev->vendor == PCI_VENDOR_ID_AL && pdev->device == 0x5237)
601 		no_fminterval = true;
602 
603 	control = readl(base + OHCI_CONTROL);
604 
605 /* On PA-RISC, PDC can leave IR set incorrectly; ignore it there. */
606 #ifdef __hppa__
607 #define	OHCI_CTRL_MASK		(OHCI_CTRL_RWC | OHCI_CTRL_IR)
608 #else
609 #define	OHCI_CTRL_MASK		OHCI_CTRL_RWC
610 
611 	if (control & OHCI_CTRL_IR) {
612 		int wait_time = 500; /* arbitrary; 5 seconds */
613 		writel(OHCI_INTR_OC, base + OHCI_INTRENABLE);
614 		writel(OHCI_OCR, base + OHCI_CMDSTATUS);
615 		while (wait_time > 0 &&
616 				readl(base + OHCI_CONTROL) & OHCI_CTRL_IR) {
617 			wait_time -= 10;
618 			msleep(10);
619 		}
620 		if (wait_time <= 0)
621 			dev_warn(&pdev->dev,
622 				 "OHCI: BIOS handoff failed (BIOS bug?) %08x\n",
623 				 readl(base + OHCI_CONTROL));
624 	}
625 #endif
626 
627 	/* disable interrupts */
628 	writel((u32) ~0, base + OHCI_INTRDISABLE);
629 
630 	/* Reset the USB bus, if the controller isn't already in RESET */
631 	if (control & OHCI_HCFS) {
632 		/* Go into RESET, preserving RWC (and possibly IR) */
633 		writel(control & OHCI_CTRL_MASK, base + OHCI_CONTROL);
634 		readl(base + OHCI_CONTROL);
635 
636 		/* drive bus reset for at least 50 ms (7.1.7.5) */
637 		msleep(50);
638 	}
639 
640 	/* software reset of the controller, preserving HcFmInterval */
641 	if (!no_fminterval)
642 		fminterval = readl(base + OHCI_FMINTERVAL);
643 
644 	writel(OHCI_HCR, base + OHCI_CMDSTATUS);
645 
646 	/* reset requires max 10 us delay */
647 	for (cnt = 30; cnt > 0; --cnt) {	/* ... allow extra time */
648 		if ((readl(base + OHCI_CMDSTATUS) & OHCI_HCR) == 0)
649 			break;
650 		udelay(1);
651 	}
652 
653 	if (!no_fminterval)
654 		writel(fminterval, base + OHCI_FMINTERVAL);
655 
656 	/* Now the controller is safely in SUSPEND and nothing can wake it up */
657 	iounmap(base);
658 }
659 
660 static const struct dmi_system_id ehci_dmi_nohandoff_table[] = {
661 	{
662 		/*  Pegatron Lucid (ExoPC) */
663 		.matches = {
664 			DMI_MATCH(DMI_BOARD_NAME, "EXOPG06411"),
665 			DMI_MATCH(DMI_BIOS_VERSION, "Lucid-CE-133"),
666 		},
667 	},
668 	{
669 		/*  Pegatron Lucid (Ordissimo AIRIS) */
670 		.matches = {
671 			DMI_MATCH(DMI_BOARD_NAME, "M11JB"),
672 			DMI_MATCH(DMI_BIOS_VERSION, "Lucid-"),
673 		},
674 	},
675 	{
676 		/*  Pegatron Lucid (Ordissimo) */
677 		.matches = {
678 			DMI_MATCH(DMI_BOARD_NAME, "Ordissimo"),
679 			DMI_MATCH(DMI_BIOS_VERSION, "Lucid-"),
680 		},
681 	},
682 	{
683 		/* HASEE E200 */
684 		.matches = {
685 			DMI_MATCH(DMI_BOARD_VENDOR, "HASEE"),
686 			DMI_MATCH(DMI_BOARD_NAME, "E210"),
687 			DMI_MATCH(DMI_BIOS_VERSION, "6.00"),
688 		},
689 	},
690 	{ }
691 };
692 
ehci_bios_handoff(struct pci_dev * pdev,void __iomem * op_reg_base,u32 cap,u8 offset)693 static void ehci_bios_handoff(struct pci_dev *pdev,
694 					void __iomem *op_reg_base,
695 					u32 cap, u8 offset)
696 {
697 	int try_handoff = 1, tried_handoff = 0;
698 
699 	/*
700 	 * The Pegatron Lucid tablet sporadically waits for 98 seconds trying
701 	 * the handoff on its unused controller.  Skip it.
702 	 *
703 	 * The HASEE E200 hangs when the semaphore is set (bugzilla #77021).
704 	 */
705 	if (pdev->vendor == 0x8086 && (pdev->device == 0x283a ||
706 			pdev->device == 0x27cc)) {
707 		if (dmi_check_system(ehci_dmi_nohandoff_table))
708 			try_handoff = 0;
709 	}
710 
711 	if (try_handoff && (cap & EHCI_USBLEGSUP_BIOS)) {
712 		dev_dbg(&pdev->dev, "EHCI: BIOS handoff\n");
713 
714 #if 0
715 /* aleksey_gorelov@phoenix.com reports that some systems need SMI forced on,
716  * but that seems dubious in general (the BIOS left it off intentionally)
717  * and is known to prevent some systems from booting.  so we won't do this
718  * unless maybe we can determine when we're on a system that needs SMI forced.
719  */
720 		/* BIOS workaround (?): be sure the pre-Linux code
721 		 * receives the SMI
722 		 */
723 		pci_read_config_dword(pdev, offset + EHCI_USBLEGCTLSTS, &val);
724 		pci_write_config_dword(pdev, offset + EHCI_USBLEGCTLSTS,
725 				       val | EHCI_USBLEGCTLSTS_SOOE);
726 #endif
727 
728 		/* some systems get upset if this semaphore is
729 		 * set for any other reason than forcing a BIOS
730 		 * handoff..
731 		 */
732 		pci_write_config_byte(pdev, offset + 3, 1);
733 	}
734 
735 	/* if boot firmware now owns EHCI, spin till it hands it over. */
736 	if (try_handoff) {
737 		int msec = 1000;
738 		while ((cap & EHCI_USBLEGSUP_BIOS) && (msec > 0)) {
739 			tried_handoff = 1;
740 			msleep(10);
741 			msec -= 10;
742 			pci_read_config_dword(pdev, offset, &cap);
743 		}
744 	}
745 
746 	if (cap & EHCI_USBLEGSUP_BIOS) {
747 		/* well, possibly buggy BIOS... try to shut it down,
748 		 * and hope nothing goes too wrong
749 		 */
750 		if (try_handoff)
751 			dev_warn(&pdev->dev,
752 				 "EHCI: BIOS handoff failed (BIOS bug?) %08x\n",
753 				 cap);
754 		pci_write_config_byte(pdev, offset + 2, 0);
755 	}
756 
757 	/* just in case, always disable EHCI SMIs */
758 	pci_write_config_dword(pdev, offset + EHCI_USBLEGCTLSTS, 0);
759 
760 	/* If the BIOS ever owned the controller then we can't expect
761 	 * any power sessions to remain intact.
762 	 */
763 	if (tried_handoff)
764 		writel(0, op_reg_base + EHCI_CONFIGFLAG);
765 }
766 
quirk_usb_disable_ehci(struct pci_dev * pdev)767 static void quirk_usb_disable_ehci(struct pci_dev *pdev)
768 {
769 	void __iomem *base, *op_reg_base;
770 	u32	hcc_params, cap, val;
771 	u8	offset, cap_length;
772 	int	wait_time, count = 256/4;
773 
774 	if (!mmio_resource_enabled(pdev, 0))
775 		return;
776 
777 	base = pci_ioremap_bar(pdev, 0);
778 	if (base == NULL)
779 		return;
780 
781 	cap_length = readb(base);
782 	op_reg_base = base + cap_length;
783 
784 	/* EHCI 0.96 and later may have "extended capabilities"
785 	 * spec section 5.1 explains the bios handoff, e.g. for
786 	 * booting from USB disk or using a usb keyboard
787 	 */
788 	hcc_params = readl(base + EHCI_HCC_PARAMS);
789 	offset = (hcc_params >> 8) & 0xff;
790 	while (offset && --count) {
791 		pci_read_config_dword(pdev, offset, &cap);
792 
793 		switch (cap & 0xff) {
794 		case 1:
795 			ehci_bios_handoff(pdev, op_reg_base, cap, offset);
796 			break;
797 		case 0: /* Illegal reserved cap, set cap=0 so we exit */
798 			cap = 0; /* then fallthrough... */
799 		default:
800 			dev_warn(&pdev->dev,
801 				 "EHCI: unrecognized capability %02x\n",
802 				 cap & 0xff);
803 		}
804 		offset = (cap >> 8) & 0xff;
805 	}
806 	if (!count)
807 		dev_printk(KERN_DEBUG, &pdev->dev, "EHCI: capability loop?\n");
808 
809 	/*
810 	 * halt EHCI & disable its interrupts in any case
811 	 */
812 	val = readl(op_reg_base + EHCI_USBSTS);
813 	if ((val & EHCI_USBSTS_HALTED) == 0) {
814 		val = readl(op_reg_base + EHCI_USBCMD);
815 		val &= ~EHCI_USBCMD_RUN;
816 		writel(val, op_reg_base + EHCI_USBCMD);
817 
818 		wait_time = 2000;
819 		do {
820 			writel(0x3f, op_reg_base + EHCI_USBSTS);
821 			udelay(100);
822 			wait_time -= 100;
823 			val = readl(op_reg_base + EHCI_USBSTS);
824 			if ((val == ~(u32)0) || (val & EHCI_USBSTS_HALTED)) {
825 				break;
826 			}
827 		} while (wait_time > 0);
828 	}
829 	writel(0, op_reg_base + EHCI_USBINTR);
830 	writel(0x3f, op_reg_base + EHCI_USBSTS);
831 
832 	iounmap(base);
833 }
834 
835 /*
836  * handshake - spin reading a register until handshake completes
837  * @ptr: address of hc register to be read
838  * @mask: bits to look at in result of read
839  * @done: value of those bits when handshake succeeds
840  * @wait_usec: timeout in microseconds
841  * @delay_usec: delay in microseconds to wait between polling
842  *
843  * Polls a register every delay_usec microseconds.
844  * Returns 0 when the mask bits have the value done.
845  * Returns -ETIMEDOUT if this condition is not true after
846  * wait_usec microseconds have passed.
847  */
handshake(void __iomem * ptr,u32 mask,u32 done,int wait_usec,int delay_usec)848 static int handshake(void __iomem *ptr, u32 mask, u32 done,
849 		int wait_usec, int delay_usec)
850 {
851 	u32	result;
852 
853 	do {
854 		result = readl(ptr);
855 		result &= mask;
856 		if (result == done)
857 			return 0;
858 		udelay(delay_usec);
859 		wait_usec -= delay_usec;
860 	} while (wait_usec > 0);
861 	return -ETIMEDOUT;
862 }
863 
864 /*
865  * Intel's Panther Point chipset has two host controllers (EHCI and xHCI) that
866  * share some number of ports.  These ports can be switched between either
867  * controller.  Not all of the ports under the EHCI host controller may be
868  * switchable.
869  *
870  * The ports should be switched over to xHCI before PCI probes for any device
871  * start.  This avoids active devices under EHCI being disconnected during the
872  * port switchover, which could cause loss of data on USB storage devices, or
873  * failed boot when the root file system is on a USB mass storage device and is
874  * enumerated under EHCI first.
875  *
876  * We write into the xHC's PCI configuration space in some Intel-specific
877  * registers to switch the ports over.  The USB 3.0 terminations and the USB
878  * 2.0 data wires are switched separately.  We want to enable the SuperSpeed
879  * terminations before switching the USB 2.0 wires over, so that USB 3.0
880  * devices connect at SuperSpeed, rather than at USB 2.0 speeds.
881  */
usb_enable_intel_xhci_ports(struct pci_dev * xhci_pdev)882 void usb_enable_intel_xhci_ports(struct pci_dev *xhci_pdev)
883 {
884 	u32		ports_available;
885 	bool		ehci_found = false;
886 	struct pci_dev	*companion = NULL;
887 
888 	/* Sony VAIO t-series with subsystem device ID 90a8 is not capable of
889 	 * switching ports from EHCI to xHCI
890 	 */
891 	if (xhci_pdev->subsystem_vendor == PCI_VENDOR_ID_SONY &&
892 	    xhci_pdev->subsystem_device == 0x90a8)
893 		return;
894 
895 	/* make sure an intel EHCI controller exists */
896 	for_each_pci_dev(companion) {
897 		if (companion->class == PCI_CLASS_SERIAL_USB_EHCI &&
898 		    companion->vendor == PCI_VENDOR_ID_INTEL) {
899 			ehci_found = true;
900 			break;
901 		}
902 	}
903 
904 	if (!ehci_found)
905 		return;
906 
907 	/* Don't switchover the ports if the user hasn't compiled the xHCI
908 	 * driver.  Otherwise they will see "dead" USB ports that don't power
909 	 * the devices.
910 	 */
911 	if (!IS_ENABLED(CONFIG_USB_XHCI_HCD)) {
912 		dev_warn(&xhci_pdev->dev,
913 			 "CONFIG_USB_XHCI_HCD is turned off, defaulting to EHCI.\n");
914 		dev_warn(&xhci_pdev->dev,
915 				"USB 3.0 devices will work at USB 2.0 speeds.\n");
916 		usb_disable_xhci_ports(xhci_pdev);
917 		return;
918 	}
919 
920 	/* Read USB3PRM, the USB 3.0 Port Routing Mask Register
921 	 * Indicate the ports that can be changed from OS.
922 	 */
923 	pci_read_config_dword(xhci_pdev, USB_INTEL_USB3PRM,
924 			&ports_available);
925 
926 	dev_dbg(&xhci_pdev->dev, "Configurable ports to enable SuperSpeed: 0x%x\n",
927 			ports_available);
928 
929 	/* Write USB3_PSSEN, the USB 3.0 Port SuperSpeed Enable
930 	 * Register, to turn on SuperSpeed terminations for the
931 	 * switchable ports.
932 	 */
933 	pci_write_config_dword(xhci_pdev, USB_INTEL_USB3_PSSEN,
934 			ports_available);
935 
936 	pci_read_config_dword(xhci_pdev, USB_INTEL_USB3_PSSEN,
937 			&ports_available);
938 	dev_dbg(&xhci_pdev->dev,
939 		"USB 3.0 ports that are now enabled under xHCI: 0x%x\n",
940 		ports_available);
941 
942 	/* Read XUSB2PRM, xHCI USB 2.0 Port Routing Mask Register
943 	 * Indicate the USB 2.0 ports to be controlled by the xHCI host.
944 	 */
945 
946 	pci_read_config_dword(xhci_pdev, USB_INTEL_USB2PRM,
947 			&ports_available);
948 
949 	dev_dbg(&xhci_pdev->dev, "Configurable USB 2.0 ports to hand over to xCHI: 0x%x\n",
950 			ports_available);
951 
952 	/* Write XUSB2PR, the xHC USB 2.0 Port Routing Register, to
953 	 * switch the USB 2.0 power and data lines over to the xHCI
954 	 * host.
955 	 */
956 	pci_write_config_dword(xhci_pdev, USB_INTEL_XUSB2PR,
957 			ports_available);
958 
959 	pci_read_config_dword(xhci_pdev, USB_INTEL_XUSB2PR,
960 			&ports_available);
961 	dev_dbg(&xhci_pdev->dev,
962 		"USB 2.0 ports that are now switched over to xHCI: 0x%x\n",
963 		ports_available);
964 }
965 EXPORT_SYMBOL_GPL(usb_enable_intel_xhci_ports);
966 
usb_disable_xhci_ports(struct pci_dev * xhci_pdev)967 void usb_disable_xhci_ports(struct pci_dev *xhci_pdev)
968 {
969 	pci_write_config_dword(xhci_pdev, USB_INTEL_USB3_PSSEN, 0x0);
970 	pci_write_config_dword(xhci_pdev, USB_INTEL_XUSB2PR, 0x0);
971 }
972 EXPORT_SYMBOL_GPL(usb_disable_xhci_ports);
973 
974 /**
975  * PCI Quirks for xHCI.
976  *
977  * Takes care of the handoff between the Pre-OS (i.e. BIOS) and the OS.
978  * It signals to the BIOS that the OS wants control of the host controller,
979  * and then waits 1 second for the BIOS to hand over control.
980  * If we timeout, assume the BIOS is broken and take control anyway.
981  */
quirk_usb_handoff_xhci(struct pci_dev * pdev)982 static void quirk_usb_handoff_xhci(struct pci_dev *pdev)
983 {
984 	void __iomem *base;
985 	int ext_cap_offset;
986 	void __iomem *op_reg_base;
987 	u32 val;
988 	int timeout;
989 	int len = pci_resource_len(pdev, 0);
990 
991 	if (!mmio_resource_enabled(pdev, 0))
992 		return;
993 
994 	base = ioremap_nocache(pci_resource_start(pdev, 0), len);
995 	if (base == NULL)
996 		return;
997 
998 	/*
999 	 * Find the Legacy Support Capability register -
1000 	 * this is optional for xHCI host controllers.
1001 	 */
1002 	ext_cap_offset = xhci_find_next_cap_offset(base, XHCI_HCC_PARAMS_OFFSET);
1003 	do {
1004 		if ((ext_cap_offset + sizeof(val)) > len) {
1005 			/* We're reading garbage from the controller */
1006 			dev_warn(&pdev->dev,
1007 				 "xHCI controller failing to respond");
1008 			return;
1009 		}
1010 
1011 		if (!ext_cap_offset)
1012 			/* We've reached the end of the extended capabilities */
1013 			goto hc_init;
1014 
1015 		val = readl(base + ext_cap_offset);
1016 		if (XHCI_EXT_CAPS_ID(val) == XHCI_EXT_CAPS_LEGACY)
1017 			break;
1018 		ext_cap_offset = xhci_find_next_cap_offset(base, ext_cap_offset);
1019 	} while (1);
1020 
1021 	/* If the BIOS owns the HC, signal that the OS wants it, and wait */
1022 	if (val & XHCI_HC_BIOS_OWNED) {
1023 		writel(val | XHCI_HC_OS_OWNED, base + ext_cap_offset);
1024 
1025 		/* Wait for 1 second with 10 microsecond polling interval */
1026 		timeout = handshake(base + ext_cap_offset, XHCI_HC_BIOS_OWNED,
1027 				0, 1000000, 10);
1028 
1029 		/* Assume a buggy BIOS and take HC ownership anyway */
1030 		if (timeout) {
1031 			dev_warn(&pdev->dev,
1032 				 "xHCI BIOS handoff failed (BIOS bug ?) %08x\n",
1033 				 val);
1034 			writel(val & ~XHCI_HC_BIOS_OWNED, base + ext_cap_offset);
1035 		}
1036 	}
1037 
1038 	val = readl(base + ext_cap_offset + XHCI_LEGACY_CONTROL_OFFSET);
1039 	/* Mask off (turn off) any enabled SMIs */
1040 	val &= XHCI_LEGACY_DISABLE_SMI;
1041 	/* Mask all SMI events bits, RW1C */
1042 	val |= XHCI_LEGACY_SMI_EVENTS;
1043 	/* Disable any BIOS SMIs and clear all SMI events*/
1044 	writel(val, base + ext_cap_offset + XHCI_LEGACY_CONTROL_OFFSET);
1045 
1046 hc_init:
1047 	if (pdev->vendor == PCI_VENDOR_ID_INTEL)
1048 		usb_enable_intel_xhci_ports(pdev);
1049 
1050 	op_reg_base = base + XHCI_HC_LENGTH(readl(base));
1051 
1052 	/* Wait for the host controller to be ready before writing any
1053 	 * operational or runtime registers.  Wait 5 seconds and no more.
1054 	 */
1055 	timeout = handshake(op_reg_base + XHCI_STS_OFFSET, XHCI_STS_CNR, 0,
1056 			5000000, 10);
1057 	/* Assume a buggy HC and start HC initialization anyway */
1058 	if (timeout) {
1059 		val = readl(op_reg_base + XHCI_STS_OFFSET);
1060 		dev_warn(&pdev->dev,
1061 			 "xHCI HW not ready after 5 sec (HC bug?) status = 0x%x\n",
1062 			 val);
1063 	}
1064 
1065 	/* Send the halt and disable interrupts command */
1066 	val = readl(op_reg_base + XHCI_CMD_OFFSET);
1067 	val &= ~(XHCI_CMD_RUN | XHCI_IRQS);
1068 	writel(val, op_reg_base + XHCI_CMD_OFFSET);
1069 
1070 	/* Wait for the HC to halt - poll every 125 usec (one microframe). */
1071 	timeout = handshake(op_reg_base + XHCI_STS_OFFSET, XHCI_STS_HALT, 1,
1072 			XHCI_MAX_HALT_USEC, 125);
1073 	if (timeout) {
1074 		val = readl(op_reg_base + XHCI_STS_OFFSET);
1075 		dev_warn(&pdev->dev,
1076 			 "xHCI HW did not halt within %d usec status = 0x%x\n",
1077 			 XHCI_MAX_HALT_USEC, val);
1078 	}
1079 
1080 	iounmap(base);
1081 }
1082 
quirk_usb_early_handoff(struct pci_dev * pdev)1083 static void quirk_usb_early_handoff(struct pci_dev *pdev)
1084 {
1085 	/* Skip Netlogic mips SoC's internal PCI USB controller.
1086 	 * This device does not need/support EHCI/OHCI handoff
1087 	 */
1088 	if (pdev->vendor == 0x184e)	/* vendor Netlogic */
1089 		return;
1090 	if (pdev->class != PCI_CLASS_SERIAL_USB_UHCI &&
1091 			pdev->class != PCI_CLASS_SERIAL_USB_OHCI &&
1092 			pdev->class != PCI_CLASS_SERIAL_USB_EHCI &&
1093 			pdev->class != PCI_CLASS_SERIAL_USB_XHCI)
1094 		return;
1095 
1096 	if (pci_enable_device(pdev) < 0) {
1097 		dev_warn(&pdev->dev,
1098 			 "Can't enable PCI device, BIOS handoff failed.\n");
1099 		return;
1100 	}
1101 	if (pdev->class == PCI_CLASS_SERIAL_USB_UHCI)
1102 		quirk_usb_handoff_uhci(pdev);
1103 	else if (pdev->class == PCI_CLASS_SERIAL_USB_OHCI)
1104 		quirk_usb_handoff_ohci(pdev);
1105 	else if (pdev->class == PCI_CLASS_SERIAL_USB_EHCI)
1106 		quirk_usb_disable_ehci(pdev);
1107 	else if (pdev->class == PCI_CLASS_SERIAL_USB_XHCI)
1108 		quirk_usb_handoff_xhci(pdev);
1109 	pci_disable_device(pdev);
1110 }
1111 DECLARE_PCI_FIXUP_CLASS_FINAL(PCI_ANY_ID, PCI_ANY_ID,
1112 			PCI_CLASS_SERIAL_USB, 8, quirk_usb_early_handoff);
1113