kernel.org linux-2.6.10
[linux-2.6.git] / arch / i386 / pci / irq.c
1 /*
2  *      Low-Level PCI Support for PC -- Routing of Interrupts
3  *
4  *      (c) 1999--2000 Martin Mares <mj@ucw.cz>
5  */
6
7 #include <linux/config.h>
8 #include <linux/types.h>
9 #include <linux/kernel.h>
10 #include <linux/pci.h>
11 #include <linux/init.h>
12 #include <linux/slab.h>
13 #include <linux/interrupt.h>
14 #include <linux/irq.h>
15 #include <linux/dmi.h>
16 #include <asm/io.h>
17 #include <asm/smp.h>
18 #include <asm/io_apic.h>
19 #include <asm/hw_irq.h>
20 #include <linux/acpi.h>
21
22 #include "pci.h"
23
24 #define PIRQ_SIGNATURE  (('$' << 0) + ('P' << 8) + ('I' << 16) + ('R' << 24))
25 #define PIRQ_VERSION 0x0100
26
27 static int broken_hp_bios_irq9;
28 static int acer_tm360_irqrouting;
29
30 static struct irq_routing_table *pirq_table;
31
32 /*
33  * Never use: 0, 1, 2 (timer, keyboard, and cascade)
34  * Avoid using: 13, 14 and 15 (FP error and IDE).
35  * Penalize: 3, 4, 6, 7, 12 (known ISA uses: serial, floppy, parallel and mouse)
36  */
37 unsigned int pcibios_irq_mask = 0xfff8;
38
39 static int pirq_penalty[16] = {
40         1000000, 1000000, 1000000, 1000, 1000, 0, 1000, 1000,
41         0, 0, 0, 0, 1000, 100000, 100000, 100000
42 };
43
44 struct irq_router {
45         char *name;
46         u16 vendor, device;
47         int (*get)(struct pci_dev *router, struct pci_dev *dev, int pirq);
48         int (*set)(struct pci_dev *router, struct pci_dev *dev, int pirq, int new);
49 };
50
51 struct irq_router_handler {
52         u16 vendor;
53         int (*probe)(struct irq_router *r, struct pci_dev *router, u16 device);
54 };
55
56 int (*pcibios_enable_irq)(struct pci_dev *dev) = NULL;
57
58 /*
59  *  Search 0xf0000 -- 0xfffff for the PCI IRQ Routing Table.
60  */
61
62 static struct irq_routing_table * __init pirq_find_routing_table(void)
63 {
64         u8 *addr;
65         struct irq_routing_table *rt;
66         int i;
67         u8 sum;
68
69         for(addr = (u8 *) __va(0xf0000); addr < (u8 *) __va(0x100000); addr += 16) {
70                 rt = (struct irq_routing_table *) addr;
71                 if (rt->signature != PIRQ_SIGNATURE ||
72                     rt->version != PIRQ_VERSION ||
73                     rt->size % 16 ||
74                     rt->size < sizeof(struct irq_routing_table))
75                         continue;
76                 sum = 0;
77                 for(i=0; i<rt->size; i++)
78                         sum += addr[i];
79                 if (!sum) {
80                         DBG("PCI: Interrupt Routing Table found at 0x%p\n", rt);
81                         return rt;
82                 }
83         }
84         return NULL;
85 }
86
87 /*
88  *  If we have a IRQ routing table, use it to search for peer host
89  *  bridges.  It's a gross hack, but since there are no other known
90  *  ways how to get a list of buses, we have to go this way.
91  */
92
93 static void __init pirq_peer_trick(void)
94 {
95         struct irq_routing_table *rt = pirq_table;
96         u8 busmap[256];
97         int i;
98         struct irq_info *e;
99
100         memset(busmap, 0, sizeof(busmap));
101         for(i=0; i < (rt->size - sizeof(struct irq_routing_table)) / sizeof(struct irq_info); i++) {
102                 e = &rt->slots[i];
103 #ifdef DEBUG
104                 {
105                         int j;
106                         DBG("%02x:%02x slot=%02x", e->bus, e->devfn/8, e->slot);
107                         for(j=0; j<4; j++)
108                                 DBG(" %d:%02x/%04x", j, e->irq[j].link, e->irq[j].bitmap);
109                         DBG("\n");
110                 }
111 #endif
112                 busmap[e->bus] = 1;
113         }
114         for(i = 1; i < 256; i++) {
115                 if (!busmap[i] || pci_find_bus(0, i))
116                         continue;
117                 if (pci_scan_bus(i, &pci_root_ops, NULL))
118                         printk(KERN_INFO "PCI: Discovered primary peer bus %02x [IRQ]\n", i);
119         }
120         pcibios_last_bus = -1;
121 }
122
123 /*
124  *  Code for querying and setting of IRQ routes on various interrupt routers.
125  */
126
127 void eisa_set_level_irq(unsigned int irq)
128 {
129         unsigned char mask = 1 << (irq & 7);
130         unsigned int port = 0x4d0 + (irq >> 3);
131         unsigned char val;
132         static u16 eisa_irq_mask;
133
134         if (irq >= 16 || (1 << irq) & eisa_irq_mask)
135                 return;
136
137         eisa_irq_mask |= (1 << irq);
138         printk("PCI: setting IRQ %u as level-triggered\n", irq);
139         val = inb(port);
140         if (!(val & mask)) {
141                 DBG(" -> edge");
142                 outb(val | mask, port);
143         }
144 }
145
146 /*
147  * Common IRQ routing practice: nybbles in config space,
148  * offset by some magic constant.
149  */
150 static unsigned int read_config_nybble(struct pci_dev *router, unsigned offset, unsigned nr)
151 {
152         u8 x;
153         unsigned reg = offset + (nr >> 1);
154
155         pci_read_config_byte(router, reg, &x);
156         return (nr & 1) ? (x >> 4) : (x & 0xf);
157 }
158
159 static void write_config_nybble(struct pci_dev *router, unsigned offset, unsigned nr, unsigned int val)
160 {
161         u8 x;
162         unsigned reg = offset + (nr >> 1);
163
164         pci_read_config_byte(router, reg, &x);
165         x = (nr & 1) ? ((x & 0x0f) | (val << 4)) : ((x & 0xf0) | val);
166         pci_write_config_byte(router, reg, x);
167 }
168
169 /*
170  * ALI pirq entries are damn ugly, and completely undocumented.
171  * This has been figured out from pirq tables, and it's not a pretty
172  * picture.
173  */
174 static int pirq_ali_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
175 {
176         static unsigned char irqmap[16] = { 0, 9, 3, 10, 4, 5, 7, 6, 1, 11, 0, 12, 0, 14, 0, 15 };
177
178         return irqmap[read_config_nybble(router, 0x48, pirq-1)];
179 }
180
181 static int pirq_ali_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
182 {
183         static unsigned char irqmap[16] = { 0, 8, 0, 2, 4, 5, 7, 6, 0, 1, 3, 9, 11, 0, 13, 15 };
184         unsigned int val = irqmap[irq];
185                 
186         if (val) {
187                 write_config_nybble(router, 0x48, pirq-1, val);
188                 return 1;
189         }
190         return 0;
191 }
192
193 /*
194  * The Intel PIIX4 pirq rules are fairly simple: "pirq" is
195  * just a pointer to the config space.
196  */
197 static int pirq_piix_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
198 {
199         u8 x;
200
201         pci_read_config_byte(router, pirq, &x);
202         return (x < 16) ? x : 0;
203 }
204
205 static int pirq_piix_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
206 {
207         pci_write_config_byte(router, pirq, irq);
208         return 1;
209 }
210
211 /*
212  * The VIA pirq rules are nibble-based, like ALI,
213  * but without the ugly irq number munging.
214  * However, PIRQD is in the upper instead of lower 4 bits.
215  */
216 static int pirq_via_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
217 {
218         return read_config_nybble(router, 0x55, pirq == 4 ? 5 : pirq);
219 }
220
221 static int pirq_via_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
222 {
223         write_config_nybble(router, 0x55, pirq == 4 ? 5 : pirq, irq);
224         return 1;
225 }
226
227 /*
228  * ITE 8330G pirq rules are nibble-based
229  * FIXME: pirqmap may be { 1, 0, 3, 2 },
230  *        2+3 are both mapped to irq 9 on my system
231  */
232 static int pirq_ite_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
233 {
234         static unsigned char pirqmap[4] = { 1, 0, 2, 3 };
235         return read_config_nybble(router,0x43, pirqmap[pirq-1]);
236 }
237
238 static int pirq_ite_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
239 {
240         static unsigned char pirqmap[4] = { 1, 0, 2, 3 };
241         write_config_nybble(router, 0x43, pirqmap[pirq-1], irq);
242         return 1;
243 }
244
245 /*
246  * OPTI: high four bits are nibble pointer..
247  * I wonder what the low bits do?
248  */
249 static int pirq_opti_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
250 {
251         return read_config_nybble(router, 0xb8, pirq >> 4);
252 }
253
254 static int pirq_opti_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
255 {
256         write_config_nybble(router, 0xb8, pirq >> 4, irq);
257         return 1;
258 }
259
260 /*
261  * Cyrix: nibble offset 0x5C
262  * 0x5C bits 7:4 is INTB bits 3:0 is INTA 
263  * 0x5D bits 7:4 is INTD bits 3:0 is INTC
264  */
265 static int pirq_cyrix_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
266 {
267         return read_config_nybble(router, 0x5C, (pirq-1)^1);
268 }
269
270 static int pirq_cyrix_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
271 {
272         write_config_nybble(router, 0x5C, (pirq-1)^1, irq);
273         return 1;
274 }
275
276 /*
277  *      PIRQ routing for SiS 85C503 router used in several SiS chipsets.
278  *      We have to deal with the following issues here:
279  *      - vendors have different ideas about the meaning of link values
280  *      - some onboard devices (integrated in the chipset) have special
281  *        links and are thus routed differently (i.e. not via PCI INTA-INTD)
282  *      - different revision of the router have a different layout for
283  *        the routing registers, particularly for the onchip devices
284  *
285  *      For all routing registers the common thing is we have one byte
286  *      per routeable link which is defined as:
287  *               bit 7      IRQ mapping enabled (0) or disabled (1)
288  *               bits [6:4] reserved (sometimes used for onchip devices)
289  *               bits [3:0] IRQ to map to
290  *                   allowed: 3-7, 9-12, 14-15
291  *                   reserved: 0, 1, 2, 8, 13
292  *
293  *      The config-space registers located at 0x41/0x42/0x43/0x44 are
294  *      always used to route the normal PCI INT A/B/C/D respectively.
295  *      Apparently there are systems implementing PCI routing table using
296  *      link values 0x01-0x04 and others using 0x41-0x44 for PCI INTA..D.
297  *      We try our best to handle both link mappings.
298  *      
299  *      Currently (2003-05-21) it appears most SiS chipsets follow the
300  *      definition of routing registers from the SiS-5595 southbridge.
301  *      According to the SiS 5595 datasheets the revision id's of the
302  *      router (ISA-bridge) should be 0x01 or 0xb0.
303  *
304  *      Furthermore we've also seen lspci dumps with revision 0x00 and 0xb1.
305  *      Looks like these are used in a number of SiS 5xx/6xx/7xx chipsets.
306  *      They seem to work with the current routing code. However there is
307  *      some concern because of the two USB-OHCI HCs (original SiS 5595
308  *      had only one). YMMV.
309  *
310  *      Onchip routing for router rev-id 0x01/0xb0 and probably 0x00/0xb1:
311  *
312  *      0x61:   IDEIRQ:
313  *              bits [6:5] must be written 01
314  *              bit 4 channel-select primary (0), secondary (1)
315  *
316  *      0x62:   USBIRQ:
317  *              bit 6 OHCI function disabled (0), enabled (1)
318  *      
319  *      0x6a:   ACPI/SCI IRQ: bits 4-6 reserved
320  *
321  *      0x7e:   Data Acq. Module IRQ - bits 4-6 reserved
322  *
323  *      We support USBIRQ (in addition to INTA-INTD) and keep the
324  *      IDE, ACPI and DAQ routing untouched as set by the BIOS.
325  *
326  *      Currently the only reported exception is the new SiS 65x chipset
327  *      which includes the SiS 69x southbridge. Here we have the 85C503
328  *      router revision 0x04 and there are changes in the register layout
329  *      mostly related to the different USB HCs with USB 2.0 support.
330  *
331  *      Onchip routing for router rev-id 0x04 (try-and-error observation)
332  *
333  *      0x60/0x61/0x62/0x63:    1xEHCI and 3xOHCI (companion) USB-HCs
334  *                              bit 6-4 are probably unused, not like 5595
335  */
336
337 #define PIRQ_SIS_IRQ_MASK       0x0f
338 #define PIRQ_SIS_IRQ_DISABLE    0x80
339 #define PIRQ_SIS_USB_ENABLE     0x40
340
341 static int pirq_sis_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
342 {
343         u8 x;
344         int reg;
345
346         reg = pirq;
347         if (reg >= 0x01 && reg <= 0x04)
348                 reg += 0x40;
349         pci_read_config_byte(router, reg, &x);
350         return (x & PIRQ_SIS_IRQ_DISABLE) ? 0 : (x & PIRQ_SIS_IRQ_MASK);
351 }
352
353 static int pirq_sis_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
354 {
355         u8 x;
356         int reg;
357
358         reg = pirq;
359         if (reg >= 0x01 && reg <= 0x04)
360                 reg += 0x40;
361         pci_read_config_byte(router, reg, &x);
362         x &= ~(PIRQ_SIS_IRQ_MASK | PIRQ_SIS_IRQ_DISABLE);
363         x |= irq ? irq: PIRQ_SIS_IRQ_DISABLE;
364         pci_write_config_byte(router, reg, x);
365         return 1;
366 }
367
368
369 /*
370  * VLSI: nibble offset 0x74 - educated guess due to routing table and
371  *       config space of VLSI 82C534 PCI-bridge/router (1004:0102)
372  *       Tested on HP OmniBook 800 covering PIRQ 1, 2, 4, 8 for onboard
373  *       devices, PIRQ 3 for non-pci(!) soundchip and (untested) PIRQ 6
374  *       for the busbridge to the docking station.
375  */
376
377 static int pirq_vlsi_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
378 {
379         if (pirq > 8) {
380                 printk(KERN_INFO "VLSI router pirq escape (%d)\n", pirq);
381                 return 0;
382         }
383         return read_config_nybble(router, 0x74, pirq-1);
384 }
385
386 static int pirq_vlsi_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
387 {
388         if (pirq > 8) {
389                 printk(KERN_INFO "VLSI router pirq escape (%d)\n", pirq);
390                 return 0;
391         }
392         write_config_nybble(router, 0x74, pirq-1, irq);
393         return 1;
394 }
395
396 /*
397  * ServerWorks: PCI interrupts mapped to system IRQ lines through Index
398  * and Redirect I/O registers (0x0c00 and 0x0c01).  The Index register
399  * format is (PCIIRQ## | 0x10), e.g.: PCIIRQ10=0x1a.  The Redirect
400  * register is a straight binary coding of desired PIC IRQ (low nibble).
401  *
402  * The 'link' value in the PIRQ table is already in the correct format
403  * for the Index register.  There are some special index values:
404  * 0x00 for ACPI (SCI), 0x01 for USB, 0x02 for IDE0, 0x04 for IDE1,
405  * and 0x03 for SMBus.
406  */
407 static int pirq_serverworks_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
408 {
409         outb_p(pirq, 0xc00);
410         return inb(0xc01) & 0xf;
411 }
412
413 static int pirq_serverworks_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
414 {
415         outb_p(pirq, 0xc00);
416         outb_p(irq, 0xc01);
417         return 1;
418 }
419
420 /* Support for AMD756 PCI IRQ Routing
421  * Jhon H. Caicedo <jhcaiced@osso.org.co>
422  * Jun/21/2001 0.2.0 Release, fixed to use "nybble" functions... (jhcaiced)
423  * Jun/19/2001 Alpha Release 0.1.0 (jhcaiced)
424  * The AMD756 pirq rules are nibble-based
425  * offset 0x56 0-3 PIRQA  4-7  PIRQB
426  * offset 0x57 0-3 PIRQC  4-7  PIRQD
427  */
428 static int pirq_amd756_get(struct pci_dev *router, struct pci_dev *dev, int pirq)
429 {
430         u8 irq;
431         irq = 0;
432         if (pirq <= 4)
433         {
434                 irq = read_config_nybble(router, 0x56, pirq - 1);
435         }
436         printk(KERN_INFO "AMD756: dev %04x:%04x, router pirq : %d get irq : %2d\n",
437                 dev->vendor, dev->device, pirq, irq);
438         return irq;
439 }
440
441 static int pirq_amd756_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
442 {
443         printk(KERN_INFO "AMD756: dev %04x:%04x, router pirq : %d SET irq : %2d\n", 
444                 dev->vendor, dev->device, pirq, irq);
445         if (pirq <= 4)
446         {
447                 write_config_nybble(router, 0x56, pirq - 1, irq);
448         }
449         return 1;
450 }
451
452 #ifdef CONFIG_PCI_BIOS
453
454 static int pirq_bios_set(struct pci_dev *router, struct pci_dev *dev, int pirq, int irq)
455 {
456         struct pci_dev *bridge;
457         int pin = pci_get_interrupt_pin(dev, &bridge);
458         return pcibios_set_irq_routing(bridge, pin, irq);
459 }
460
461 #endif
462
463 static __init int intel_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
464 {
465         static struct pci_device_id pirq_440gx[] = {
466                 { PCI_DEVICE(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL_82443GX_0) },
467                 { PCI_DEVICE(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL_82443GX_2) },
468                 { },
469         };
470
471         /* 440GX has a proprietary PIRQ router -- don't use it */
472         if (pci_dev_present(pirq_440gx))
473                 return 0;
474
475         switch(device)
476         {
477                 case PCI_DEVICE_ID_INTEL_82371FB_0:
478                 case PCI_DEVICE_ID_INTEL_82371SB_0:
479                 case PCI_DEVICE_ID_INTEL_82371AB_0:
480                 case PCI_DEVICE_ID_INTEL_82371MX:
481                 case PCI_DEVICE_ID_INTEL_82443MX_0:
482                 case PCI_DEVICE_ID_INTEL_82801AA_0:
483                 case PCI_DEVICE_ID_INTEL_82801AB_0:
484                 case PCI_DEVICE_ID_INTEL_82801BA_0:
485                 case PCI_DEVICE_ID_INTEL_82801BA_10:
486                 case PCI_DEVICE_ID_INTEL_82801CA_0:
487                 case PCI_DEVICE_ID_INTEL_82801CA_12:
488                 case PCI_DEVICE_ID_INTEL_82801DB_0:
489                 case PCI_DEVICE_ID_INTEL_82801E_0:
490                 case PCI_DEVICE_ID_INTEL_82801EB_0:
491                 case PCI_DEVICE_ID_INTEL_ESB_1:
492                 case PCI_DEVICE_ID_INTEL_ICH6_0:
493                 case PCI_DEVICE_ID_INTEL_ICH6_1:
494                         r->name = "PIIX/ICH";
495                         r->get = pirq_piix_get;
496                         r->set = pirq_piix_set;
497                         return 1;
498         }
499         return 0;
500 }
501
502 static __init int via_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
503 {
504         /* FIXME: We should move some of the quirk fixup stuff here */
505         switch(device)
506         {
507                 case PCI_DEVICE_ID_VIA_82C586_0:
508                 case PCI_DEVICE_ID_VIA_82C596:
509                 case PCI_DEVICE_ID_VIA_82C686:
510                 case PCI_DEVICE_ID_VIA_8231:
511                 /* FIXME: add new ones for 8233/5 */
512                         r->name = "VIA";
513                         r->get = pirq_via_get;
514                         r->set = pirq_via_set;
515                         return 1;
516         }
517         return 0;
518 }
519
520 static __init int vlsi_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
521 {
522         switch(device)
523         {
524                 case PCI_DEVICE_ID_VLSI_82C534:
525                         r->name = "VLSI 82C534";
526                         r->get = pirq_vlsi_get;
527                         r->set = pirq_vlsi_set;
528                         return 1;
529         }
530         return 0;
531 }
532
533
534 static __init int serverworks_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
535 {
536         switch(device)
537         {
538                 case PCI_DEVICE_ID_SERVERWORKS_OSB4:
539                 case PCI_DEVICE_ID_SERVERWORKS_CSB5:
540                         r->name = "ServerWorks";
541                         r->get = pirq_serverworks_get;
542                         r->set = pirq_serverworks_set;
543                         return 1;
544         }
545         return 0;
546 }
547
548 static __init int sis_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
549 {
550         if (device != PCI_DEVICE_ID_SI_503)
551                 return 0;
552                 
553         r->name = "SIS";
554         r->get = pirq_sis_get;
555         r->set = pirq_sis_set;
556         return 1;
557 }
558
559 static __init int cyrix_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
560 {
561         switch(device)
562         {
563                 case PCI_DEVICE_ID_CYRIX_5520:
564                         r->name = "NatSemi";
565                         r->get = pirq_cyrix_get;
566                         r->set = pirq_cyrix_set;
567                         return 1;
568         }
569         return 0;
570 }
571
572 static __init int opti_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
573 {
574         switch(device)
575         {
576                 case PCI_DEVICE_ID_OPTI_82C700:
577                         r->name = "OPTI";
578                         r->get = pirq_opti_get;
579                         r->set = pirq_opti_set;
580                         return 1;
581         }
582         return 0;
583 }
584
585 static __init int ite_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
586 {
587         switch(device)
588         {
589                 case PCI_DEVICE_ID_ITE_IT8330G_0:
590                         r->name = "ITE";
591                         r->get = pirq_ite_get;
592                         r->set = pirq_ite_set;
593                         return 1;
594         }
595         return 0;
596 }
597
598 static __init int ali_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
599 {
600         switch(device)
601         {
602         case PCI_DEVICE_ID_AL_M1533:
603         case PCI_DEVICE_ID_AL_M1563:
604                 printk("PCI: Using ALI IRQ Router\n");
605                         r->name = "ALI";
606                         r->get = pirq_ali_get;
607                         r->set = pirq_ali_set;
608                         return 1;
609         }
610         return 0;
611 }
612
613 static __init int amd_router_probe(struct irq_router *r, struct pci_dev *router, u16 device)
614 {
615         switch(device)
616         {
617                 case PCI_DEVICE_ID_AMD_VIPER_740B:
618                         r->name = "AMD756";
619                         break;
620                 case PCI_DEVICE_ID_AMD_VIPER_7413:
621                         r->name = "AMD766";
622                         break;
623                 case PCI_DEVICE_ID_AMD_VIPER_7443:
624                         r->name = "AMD768";
625                         break;
626                 default:
627                         return 0;
628         }
629         r->get = pirq_amd756_get;
630         r->set = pirq_amd756_set;
631         return 1;
632 }
633                 
634 static __initdata struct irq_router_handler pirq_routers[] = {
635         { PCI_VENDOR_ID_INTEL, intel_router_probe },
636         { PCI_VENDOR_ID_AL, ali_router_probe },
637         { PCI_VENDOR_ID_ITE, ite_router_probe },
638         { PCI_VENDOR_ID_VIA, via_router_probe },
639         { PCI_VENDOR_ID_OPTI, opti_router_probe },
640         { PCI_VENDOR_ID_SI, sis_router_probe },
641         { PCI_VENDOR_ID_CYRIX, cyrix_router_probe },
642         { PCI_VENDOR_ID_VLSI, vlsi_router_probe },
643         { PCI_VENDOR_ID_SERVERWORKS, serverworks_router_probe },
644         { PCI_VENDOR_ID_AMD, amd_router_probe },
645         /* Someone with docs needs to add the ATI Radeon IGP */
646         { 0, NULL }
647 };
648 static struct irq_router pirq_router;
649 static struct pci_dev *pirq_router_dev;
650
651
652 /*
653  *      FIXME: should we have an option to say "generic for
654  *      chipset" ?
655  */
656  
657 static void __init pirq_find_router(struct irq_router *r)
658 {
659         struct irq_routing_table *rt = pirq_table;
660         struct irq_router_handler *h;
661
662 #ifdef CONFIG_PCI_BIOS
663         if (!rt->signature) {
664                 printk(KERN_INFO "PCI: Using BIOS for IRQ routing\n");
665                 r->set = pirq_bios_set;
666                 r->name = "BIOS";
667                 return;
668         }
669 #endif
670
671         /* Default unless a driver reloads it */
672         r->name = "default";
673         r->get = NULL;
674         r->set = NULL;
675         
676         DBG("PCI: Attempting to find IRQ router for %04x:%04x\n",
677             rt->rtr_vendor, rt->rtr_device);
678
679         pirq_router_dev = pci_find_slot(rt->rtr_bus, rt->rtr_devfn);
680         if (!pirq_router_dev) {
681                 DBG("PCI: Interrupt router not found at %02x:%02x\n", rt->rtr_bus, rt->rtr_devfn);
682                 return;
683         }
684
685         for( h = pirq_routers; h->vendor; h++) {
686                 /* First look for a router match */
687                 if (rt->rtr_vendor == h->vendor && h->probe(r, pirq_router_dev, rt->rtr_device))
688                         break;
689                 /* Fall back to a device match */
690                 if (pirq_router_dev->vendor == h->vendor && h->probe(r, pirq_router_dev, pirq_router_dev->device))
691                         break;
692         }
693         printk(KERN_INFO "PCI: Using IRQ router %s [%04x/%04x] at %s\n",
694                 pirq_router.name,
695                 pirq_router_dev->vendor,
696                 pirq_router_dev->device,
697                 pci_name(pirq_router_dev));
698 }
699
700 static struct irq_info *pirq_get_info(struct pci_dev *dev)
701 {
702         struct irq_routing_table *rt = pirq_table;
703         int entries = (rt->size - sizeof(struct irq_routing_table)) / sizeof(struct irq_info);
704         struct irq_info *info;
705
706         for (info = rt->slots; entries--; info++)
707                 if (info->bus == dev->bus->number && PCI_SLOT(info->devfn) == PCI_SLOT(dev->devfn))
708                         return info;
709         return NULL;
710 }
711
712 static int pcibios_lookup_irq(struct pci_dev *dev, int assign)
713 {
714         u8 pin;
715         struct irq_info *info;
716         int i, pirq, newirq;
717         int irq = 0;
718         u32 mask;
719         struct irq_router *r = &pirq_router;
720         struct pci_dev *dev2 = NULL;
721         char *msg = NULL;
722
723         /* Find IRQ pin */
724         pci_read_config_byte(dev, PCI_INTERRUPT_PIN, &pin);
725         if (!pin) {
726                 DBG(" -> no interrupt pin\n");
727                 return 0;
728         }
729         pin = pin - 1;
730
731         /* Find IRQ routing entry */
732
733         if (!pirq_table)
734                 return 0;
735         
736         DBG("IRQ for %s:%d", pci_name(dev), pin);
737         info = pirq_get_info(dev);
738         if (!info) {
739                 DBG(" -> not found in routing table\n");
740                 return 0;
741         }
742         pirq = info->irq[pin].link;
743         mask = info->irq[pin].bitmap;
744         if (!pirq) {
745                 DBG(" -> not routed\n");
746                 return 0;
747         }
748         DBG(" -> PIRQ %02x, mask %04x, excl %04x", pirq, mask, pirq_table->exclusive_irqs);
749         mask &= pcibios_irq_mask;
750
751         /* Work around broken HP Pavilion Notebooks which assign USB to
752            IRQ 9 even though it is actually wired to IRQ 11 */
753
754         if (broken_hp_bios_irq9 && pirq == 0x59 && dev->irq == 9) {
755                 dev->irq = 11;
756                 pci_write_config_byte(dev, PCI_INTERRUPT_LINE, 11);
757                 r->set(pirq_router_dev, dev, pirq, 11);
758         }
759
760         /* same for Acer Travelmate 360, but with CB and irq 11 -> 10 */
761         if (acer_tm360_irqrouting && dev->irq == 11 && dev->vendor == PCI_VENDOR_ID_O2) {
762                 pirq = 0x68;
763                 mask = 0x400;
764                 dev->irq = r->get(pirq_router_dev, dev, pirq);
765                 pci_write_config_byte(dev, PCI_INTERRUPT_LINE, dev->irq);
766         }
767
768         /*
769          * Find the best IRQ to assign: use the one
770          * reported by the device if possible.
771          */
772         newirq = dev->irq;
773         if (!((1 << newirq) & mask)) {
774                 if ( pci_probe & PCI_USE_PIRQ_MASK) newirq = 0;
775                 else printk(KERN_WARNING "PCI: IRQ %i for device %s doesn't match PIRQ mask - try pci=usepirqmask\n", newirq, pci_name(dev));
776         }
777         if (!newirq && assign) {
778                 for (i = 0; i < 16; i++) {
779                         if (!(mask & (1 << i)))
780                                 continue;
781                         if (pirq_penalty[i] < pirq_penalty[newirq] && can_request_irq(i, SA_SHIRQ))
782                                 newirq = i;
783                 }
784         }
785         DBG(" -> newirq=%d", newirq);
786
787         /* Check if it is hardcoded */
788         if ((pirq & 0xf0) == 0xf0) {
789                 irq = pirq & 0xf;
790                 DBG(" -> hardcoded IRQ %d\n", irq);
791                 msg = "Hardcoded";
792         } else if ( r->get && (irq = r->get(pirq_router_dev, dev, pirq)) && \
793         ((!(pci_probe & PCI_USE_PIRQ_MASK)) || ((1 << irq) & mask)) ) {
794                 DBG(" -> got IRQ %d\n", irq);
795                 msg = "Found";
796         } else if (newirq && r->set && (dev->class >> 8) != PCI_CLASS_DISPLAY_VGA) {
797                 DBG(" -> assigning IRQ %d", newirq);
798                 if (r->set(pirq_router_dev, dev, pirq, newirq)) {
799                         eisa_set_level_irq(newirq);
800                         DBG(" ... OK\n");
801                         msg = "Assigned";
802                         irq = newirq;
803                 }
804         }
805
806         if (!irq) {
807                 DBG(" ... failed\n");
808                 if (newirq && mask == (1 << newirq)) {
809                         msg = "Guessed";
810                         irq = newirq;
811                 } else
812                         return 0;
813         }
814         printk(KERN_INFO "PCI: %s IRQ %d for device %s\n", msg, irq, pci_name(dev));
815
816         /* Update IRQ for all devices with the same pirq value */
817         while ((dev2 = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev2)) != NULL) {
818                 pci_read_config_byte(dev2, PCI_INTERRUPT_PIN, &pin);
819                 if (!pin)
820                         continue;
821                 pin--;
822                 info = pirq_get_info(dev2);
823                 if (!info)
824                         continue;
825                 if (info->irq[pin].link == pirq) {
826                         /* We refuse to override the dev->irq information. Give a warning! */
827                         if ( dev2->irq && dev2->irq != irq && \
828                         (!(pci_probe & PCI_USE_PIRQ_MASK) || \
829                         ((1 << dev2->irq) & mask)) ) {
830 #ifndef CONFIG_PCI_MSI
831                                 printk(KERN_INFO "IRQ routing conflict for %s, have irq %d, want irq %d\n",
832                                        pci_name(dev2), dev2->irq, irq);
833 #endif
834                                 continue;
835                         }
836                         dev2->irq = irq;
837                         pirq_penalty[irq]++;
838                         if (dev != dev2)
839                                 printk(KERN_INFO "PCI: Sharing IRQ %d with %s\n", irq, pci_name(dev2));
840                 }
841         }
842         return 1;
843 }
844
845 static void __init pcibios_fixup_irqs(void)
846 {
847         struct pci_dev *dev = NULL;
848         u8 pin;
849
850         DBG("PCI: IRQ fixup\n");
851         while ((dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev)) != NULL) {
852                 /*
853                  * If the BIOS has set an out of range IRQ number, just ignore it.
854                  * Also keep track of which IRQ's are already in use.
855                  */
856                 if (dev->irq >= 16) {
857                         DBG("%s: ignoring bogus IRQ %d\n", pci_name(dev), dev->irq);
858                         dev->irq = 0;
859                 }
860                 /* If the IRQ is already assigned to a PCI device, ignore its ISA use penalty */
861                 if (pirq_penalty[dev->irq] >= 100 && pirq_penalty[dev->irq] < 100000)
862                         pirq_penalty[dev->irq] = 0;
863                 pirq_penalty[dev->irq]++;
864         }
865
866         dev = NULL;
867         while ((dev = pci_get_device(PCI_ANY_ID, PCI_ANY_ID, dev)) != NULL) {
868                 pci_read_config_byte(dev, PCI_INTERRUPT_PIN, &pin);
869 #ifdef CONFIG_X86_IO_APIC
870                 /*
871                  * Recalculate IRQ numbers if we use the I/O APIC.
872                  */
873                 if (io_apic_assign_pci_irqs)
874                 {
875                         int irq;
876
877                         if (pin) {
878                                 pin--;          /* interrupt pins are numbered starting from 1 */
879                                 irq = IO_APIC_get_PCI_irq_vector(dev->bus->number, PCI_SLOT(dev->devfn), pin);
880         /*
881          * Busses behind bridges are typically not listed in the MP-table.
882          * In this case we have to look up the IRQ based on the parent bus,
883          * parent slot, and pin number. The SMP code detects such bridged
884          * busses itself so we should get into this branch reliably.
885          */
886                                 if (irq < 0 && dev->bus->parent) { /* go back to the bridge */
887                                         struct pci_dev * bridge = dev->bus->self;
888
889                                         pin = (pin + PCI_SLOT(dev->devfn)) % 4;
890                                         irq = IO_APIC_get_PCI_irq_vector(bridge->bus->number, 
891                                                         PCI_SLOT(bridge->devfn), pin);
892                                         if (irq >= 0)
893                                                 printk(KERN_WARNING "PCI: using PPB(B%d,I%d,P%d) to get irq %d\n", 
894                                                         bridge->bus->number, PCI_SLOT(bridge->devfn), pin, irq);
895                                 }
896                                 if (irq >= 0) {
897                                         if (use_pci_vector() &&
898                                                 !platform_legacy_irq(irq))
899                                                 irq = IO_APIC_VECTOR(irq);
900
901                                         printk(KERN_INFO "PCI->APIC IRQ transform: (B%d,I%d,P%d) -> %d\n",
902                                                 dev->bus->number, PCI_SLOT(dev->devfn), pin, irq);
903                                         dev->irq = irq;
904                                 }
905                         }
906                 }
907 #endif
908                 /*
909                  * Still no IRQ? Try to lookup one...
910                  */
911                 if (pin && !dev->irq)
912                         pcibios_lookup_irq(dev, 0);
913         }
914 }
915
916 /*
917  * Work around broken HP Pavilion Notebooks which assign USB to
918  * IRQ 9 even though it is actually wired to IRQ 11
919  */
920 static int __init fix_broken_hp_bios_irq9(struct dmi_system_id *d)
921 {
922         if (!broken_hp_bios_irq9) {
923                 broken_hp_bios_irq9 = 1;
924                 printk(KERN_INFO "%s detected - fixing broken IRQ routing\n", d->ident);
925         }
926         return 0;
927 }
928
929 /*
930  * Work around broken Acer TravelMate 360 Notebooks which assign
931  * Cardbus to IRQ 11 even though it is actually wired to IRQ 10
932  */
933 static int __init fix_acer_tm360_irqrouting(struct dmi_system_id *d)
934 {
935         if (!acer_tm360_irqrouting) {
936                 acer_tm360_irqrouting = 1;
937                 printk(KERN_INFO "%s detected - fixing broken IRQ routing\n", d->ident);
938         }
939         return 0;
940 }
941
942 static struct dmi_system_id __initdata pciirq_dmi_table[] = {
943         {
944                 .callback = fix_broken_hp_bios_irq9,
945                 .ident = "HP Pavilion N5400 Series Laptop",
946                 .matches = {
947                         DMI_MATCH(DMI_SYS_VENDOR, "Hewlett-Packard"),
948                         DMI_MATCH(DMI_BIOS_VERSION, "GE.M1.03"),
949                         DMI_MATCH(DMI_PRODUCT_VERSION, "HP Pavilion Notebook Model GE"),
950                         DMI_MATCH(DMI_BOARD_VERSION, "OmniBook N32N-736"),
951                 },
952         },
953         {
954                 .callback = fix_acer_tm360_irqrouting,
955                 .ident = "Acer TravelMate 36x Laptop",
956                 .matches = {
957                         DMI_MATCH(DMI_SYS_VENDOR, "Acer"),
958                         DMI_MATCH(DMI_PRODUCT_NAME, "TravelMate 360"),
959                 },
960         },
961         { }
962 };
963
964 static int __init pcibios_irq_init(void)
965 {
966         DBG("PCI: IRQ init\n");
967
968         if (pcibios_enable_irq || raw_pci_ops == NULL)
969                 return 0;
970
971         dmi_check_system(pciirq_dmi_table);
972
973         pirq_table = pirq_find_routing_table();
974
975 #ifdef CONFIG_PCI_BIOS
976         if (!pirq_table && (pci_probe & PCI_BIOS_IRQ_SCAN))
977                 pirq_table = pcibios_get_irq_routing_table();
978 #endif
979         if (pirq_table) {
980                 pirq_peer_trick();
981                 pirq_find_router(&pirq_router);
982                 if (pirq_table->exclusive_irqs) {
983                         int i;
984                         for (i=0; i<16; i++)
985                                 if (!(pirq_table->exclusive_irqs & (1 << i)))
986                                         pirq_penalty[i] += 100;
987                 }
988                 /* If we're using the I/O APIC, avoid using the PCI IRQ routing table */
989                 if (io_apic_assign_pci_irqs)
990                         pirq_table = NULL;
991         }
992
993         pcibios_enable_irq = pirq_enable_irq;
994
995         pcibios_fixup_irqs();
996         return 0;
997 }
998
999 subsys_initcall(pcibios_irq_init);
1000
1001
1002 static void pirq_penalize_isa_irq(int irq)
1003 {
1004         /*
1005          *  If any ISAPnP device reports an IRQ in its list of possible
1006          *  IRQ's, we try to avoid assigning it to PCI devices.
1007          */
1008         if (irq < 16)
1009                 pirq_penalty[irq] += 100;
1010 }
1011
1012 void pcibios_penalize_isa_irq(int irq)
1013 {
1014 #ifdef CONFIG_ACPI_PCI
1015         if (!acpi_noirq)
1016                 acpi_penalize_isa_irq(irq);
1017         else
1018 #endif
1019                 pirq_penalize_isa_irq(irq);
1020 }
1021
1022 int pirq_enable_irq(struct pci_dev *dev)
1023 {
1024         u8 pin;
1025         extern int interrupt_line_quirk;
1026         struct pci_dev *temp_dev;
1027
1028         pci_read_config_byte(dev, PCI_INTERRUPT_PIN, &pin);
1029         if (pin && !pcibios_lookup_irq(dev, 1) && !dev->irq) {
1030                 char *msg;
1031                 msg = "";
1032                 if (io_apic_assign_pci_irqs) {
1033                         int irq;
1034
1035                         if (pin) {
1036                                 pin--;          /* interrupt pins are numbered starting from 1 */
1037                                 irq = IO_APIC_get_PCI_irq_vector(dev->bus->number, PCI_SLOT(dev->devfn), pin);
1038                                 /*
1039                                  * Busses behind bridges are typically not listed in the MP-table.
1040                                  * In this case we have to look up the IRQ based on the parent bus,
1041                                  * parent slot, and pin number. The SMP code detects such bridged
1042                                  * busses itself so we should get into this branch reliably.
1043                                  */
1044                                 temp_dev = dev;
1045                                 while (irq < 0 && dev->bus->parent) { /* go back to the bridge */
1046                                         struct pci_dev * bridge = dev->bus->self;
1047
1048                                         pin = (pin + PCI_SLOT(dev->devfn)) % 4;
1049                                         irq = IO_APIC_get_PCI_irq_vector(bridge->bus->number, 
1050                                                         PCI_SLOT(bridge->devfn), pin);
1051                                         if (irq >= 0)
1052                                                 printk(KERN_WARNING "PCI: using PPB(B%d,I%d,P%d) to get irq %d\n", 
1053                                                         bridge->bus->number, PCI_SLOT(bridge->devfn), pin, irq);
1054                                         dev = bridge;
1055                                 }
1056                                 dev = temp_dev;
1057                                 if (irq >= 0) {
1058 #ifdef CONFIG_PCI_MSI
1059                                         if (!platform_legacy_irq(irq))
1060                                                 irq = IO_APIC_VECTOR(irq);
1061 #endif
1062                                         printk(KERN_INFO "PCI->APIC IRQ transform: (B%d,I%d,P%d) -> %d\n",
1063                                                 dev->bus->number, PCI_SLOT(dev->devfn), pin, irq);
1064                                         dev->irq = irq;
1065                                         return 0;
1066                                 } else
1067                                         msg = " Probably buggy MP table.";
1068                         }
1069                 } else if (pci_probe & PCI_BIOS_IRQ_SCAN)
1070                         msg = "";
1071                 else
1072                         msg = " Please try using pci=biosirq.";
1073                         
1074                 /* With IDE legacy devices the IRQ lookup failure is not a problem.. */
1075                 if (dev->class >> 8 == PCI_CLASS_STORAGE_IDE && !(dev->class & 0x5))
1076                         return 0;
1077                         
1078                 printk(KERN_WARNING "PCI: No IRQ known for interrupt pin %c of device %s.%s\n",
1079                        'A' + pin - 1, pci_name(dev), msg);
1080         }
1081         /* VIA bridges use interrupt line for apic/pci steering across
1082            the V-Link */
1083         else if (interrupt_line_quirk)
1084                 pci_write_config_byte(dev, PCI_INTERRUPT_LINE, dev->irq & 15);
1085         return 0;
1086 }
1087
1088 int pci_vector_resources(int last, int nr_released)
1089 {
1090         int count = nr_released;
1091
1092         int next = last;
1093         int offset = (last % 8);
1094
1095         while (next < FIRST_SYSTEM_VECTOR) {
1096                 next += 8;
1097 #ifdef CONFIG_X86_64
1098                 if (next == IA32_SYSCALL_VECTOR)
1099                         continue;
1100 #else
1101                 if (next == SYSCALL_VECTOR)
1102                         continue;
1103 #endif
1104                 count++;
1105                 if (next >= FIRST_SYSTEM_VECTOR) {
1106                         if (offset%8) {
1107                                 next = FIRST_DEVICE_VECTOR + offset;
1108                                 offset++;
1109                                 continue;
1110                         }
1111                         count--;
1112                 }
1113         }
1114
1115         return count;
1116 }