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