2 * This file is part of the coreboot project.
4 * It was originally based on the Linux kernel (drivers/pci/pci.c).
7 * Copyright (C) 2003-2004 Linux Networx
8 * (Written by Eric Biederman <ebiederman@lnxi.com> for Linux Networx)
9 * Copyright (C) 2003-2006 Ronald G. Minnich <rminnich@gmail.com>
10 * Copyright (C) 2004-2005 Li-Ta Lo <ollie@lanl.gov>
11 * Copyright (C) 2005-2006 Tyan
12 * (Written by Yinghai Lu <yhlu@tyan.com> for Tyan)
13 * Copyright (C) 2005-2009 coresystems GmbH
14 * (Written by Stefan Reinauer <stepan@coresystems.de> for coresystems GmbH)
18 * PCI Bus Services, see include/linux/pci.h for further explanation.
20 * Copyright 1993 -- 1997 Drew Eckhardt, Frederic Potter,
21 * David Mosberger-Tang
23 * Copyright 1997 -- 1999 Martin Mares <mj@atrey.karlin.mff.cuni.cz>
26 #include <console/console.h>
32 #include <device/device.h>
33 #include <device/pci.h>
34 #include <device/pci_ids.h>
36 #if CONFIG_HYPERTRANSPORT_PLUGIN_SUPPORT == 1
37 #include <device/hypertransport.h>
39 #if CONFIG_PCIX_PLUGIN_SUPPORT == 1
40 #include <device/pcix.h>
42 #if CONFIG_PCIEXP_PLUGIN_SUPPORT == 1
43 #include <device/pciexp.h>
45 #if CONFIG_AGP_PLUGIN_SUPPORT == 1
46 #include <device/agp.h>
48 #if CONFIG_CARDBUS_PLUGIN_SUPPORT == 1
49 #include <device/cardbus.h>
51 #define CONFIG_PC80_SYSTEM 1
52 #if CONFIG_PC80_SYSTEM == 1
53 #include <pc80/i8259.h>
56 u8 pci_moving_config8(struct device *dev, unsigned int reg)
58 u8 value, ones, zeroes;
59 value = pci_read_config8(dev, reg);
61 pci_write_config8(dev, reg, 0xff);
62 ones = pci_read_config8(dev, reg);
64 pci_write_config8(dev, reg, 0x00);
65 zeroes = pci_read_config8(dev, reg);
67 pci_write_config8(dev, reg, value);
72 u16 pci_moving_config16(struct device * dev, unsigned int reg)
74 u16 value, ones, zeroes;
75 value = pci_read_config16(dev, reg);
77 pci_write_config16(dev, reg, 0xffff);
78 ones = pci_read_config16(dev, reg);
80 pci_write_config16(dev, reg, 0x0000);
81 zeroes = pci_read_config16(dev, reg);
83 pci_write_config16(dev, reg, value);
88 u32 pci_moving_config32(struct device * dev, unsigned int reg)
90 u32 value, ones, zeroes;
91 value = pci_read_config32(dev, reg);
93 pci_write_config32(dev, reg, 0xffffffff);
94 ones = pci_read_config32(dev, reg);
96 pci_write_config32(dev, reg, 0x00000000);
97 zeroes = pci_read_config32(dev, reg);
99 pci_write_config32(dev, reg, value);
101 return ones ^ zeroes;
105 * Given a device, a capability type, and a last position, return the next
106 * matching capability. Always start at the head of the list.
108 * @param dev Pointer to the device structure.
109 * @param cap PCI_CAP_LIST_ID of the PCI capability we're looking for.
110 * @param last Location of the PCI capability register to start from.
111 * @return The next matching capability.
113 unsigned pci_find_next_capability(struct device *dev, unsigned cap,
120 status = pci_read_config16(dev, PCI_STATUS);
121 if (!(status & PCI_STATUS_CAP_LIST)) {
124 switch (dev->hdr_type & 0x7f) {
125 case PCI_HEADER_TYPE_NORMAL:
126 case PCI_HEADER_TYPE_BRIDGE:
127 pos = PCI_CAPABILITY_LIST;
129 case PCI_HEADER_TYPE_CARDBUS:
130 pos = PCI_CB_CAPABILITY_LIST;
135 pos = pci_read_config8(dev, pos);
136 while (reps-- && (pos >= 0x40)) { /* Loop through the linked list. */
139 this_cap = pci_read_config8(dev, pos + PCI_CAP_LIST_ID);
140 printk(BIOS_SPEW, "Capability: type 0x%02x @ 0x%02x\n", this_cap,
142 if (this_cap == 0xff) {
145 if (!last && (this_cap == cap)) {
151 pos = pci_read_config8(dev, pos + PCI_CAP_LIST_NEXT);
157 * Given a device, and a capability type, return the next matching
158 * capability. Always start at the head of the list.
160 * @param dev Pointer to the device structure.
161 * @param cap PCI_CAP_LIST_ID of the PCI capability we're looking for.
162 * @return The next matching capability.
164 unsigned pci_find_capability(device_t dev, unsigned cap)
166 return pci_find_next_capability(dev, cap, 0);
170 * Given a device and register, read the size of the BAR for that register.
172 * @param dev Pointer to the device structure.
173 * @param index Address of the PCI configuration register.
176 struct resource *pci_get_resource(struct device *dev, unsigned long index)
178 struct resource *resource;
179 unsigned long value, attr;
180 resource_t moving, limit;
182 /* Initialize the resources to nothing. */
183 resource = new_resource(dev, index);
185 /* Get the initial value. */
186 value = pci_read_config32(dev, index);
188 /* See which bits move. */
189 moving = pci_moving_config32(dev, index);
191 /* Initialize attr to the bits that do not move. */
192 attr = value & ~moving;
194 /* If it is a 64bit resource look at the high half as well. */
195 if (((attr & PCI_BASE_ADDRESS_SPACE_IO) == 0) &&
196 ((attr & PCI_BASE_ADDRESS_MEM_LIMIT_MASK) ==
197 PCI_BASE_ADDRESS_MEM_LIMIT_64)) {
198 /* Find the high bits that move. */
200 ((resource_t) pci_moving_config32(dev, index + 4)) << 32;
202 /* Find the resource constraints.
203 * Start by finding the bits that move. From there:
204 * - Size is the least significant bit of the bits that move.
205 * - Limit is all of the bits that move plus all of the lower bits.
206 * See PCI Spec 6.2.5.1.
211 resource->align = resource->gran = 0;
212 while (!(moving & resource->size)) {
213 resource->size <<= 1;
214 resource->align += 1;
217 resource->limit = limit = moving | (resource->size - 1);
220 /* Some broken hardware has read-only registers that do not
221 * really size correctly.
222 * Example: the Acer M7229 has BARs 1-4 normally read-only.
223 * so BAR1 at offset 0x10 reads 0x1f1. If you size that register
224 * by writing 0xffffffff to it, it will read back as 0x1f1 -- a
225 * violation of the spec.
226 * We catch this case and ignore it by observing which bits move,
227 * This also catches the common case unimplemented registers
228 * that always read back as 0.
232 printk(BIOS_DEBUG, "%s register %02lx(%08lx), read-only ignoring it\n",
233 dev_path(dev), index, value);
236 } else if (attr & PCI_BASE_ADDRESS_SPACE_IO) {
237 /* An I/O mapped base address. */
238 attr &= PCI_BASE_ADDRESS_IO_ATTR_MASK;
239 resource->flags |= IORESOURCE_IO;
240 /* I don't want to deal with 32bit I/O resources. */
241 resource->limit = 0xffff;
243 /* A Memory mapped base address. */
244 attr &= PCI_BASE_ADDRESS_MEM_ATTR_MASK;
245 resource->flags |= IORESOURCE_MEM;
246 if (attr & PCI_BASE_ADDRESS_MEM_PREFETCH) {
247 resource->flags |= IORESOURCE_PREFETCH;
249 attr &= PCI_BASE_ADDRESS_MEM_LIMIT_MASK;
250 if (attr == PCI_BASE_ADDRESS_MEM_LIMIT_32) {
252 resource->limit = 0xffffffffUL;
253 } else if (attr == PCI_BASE_ADDRESS_MEM_LIMIT_1M) {
255 resource->limit = 0x000fffffUL;
256 } else if (attr == PCI_BASE_ADDRESS_MEM_LIMIT_64) {
258 resource->limit = 0xffffffffffffffffULL;
259 resource->flags |= IORESOURCE_PCI64;
262 printk(BIOS_ERR, "Broken BAR with value %lx\n", attr);
263 printk(BIOS_ERR, " on dev %s at index %02lx\n",
264 dev_path(dev), index);
268 /* Don't let the limit exceed which bits can move. */
269 if (resource->limit > limit) {
270 resource->limit = limit;
277 * Given a device and an index, read the size of the BAR for that register.
279 * @param dev Pointer to the device structure.
280 * @param index Address of the PCI configuration register.
282 static void pci_get_rom_resource(struct device *dev, unsigned long index)
284 struct resource *resource;
288 /* Initialize the resources to nothing. */
289 resource = new_resource(dev, index);
291 /* Get the initial value. */
292 value = pci_read_config32(dev, index);
294 /* See which bits move. */
295 moving = pci_moving_config32(dev, index);
297 /* Clear the Enable bit. */
298 moving = moving & ~PCI_ROM_ADDRESS_ENABLE;
300 /* Find the resource constraints.
301 * Start by finding the bits that move. From there:
302 * - Size is the least significant bit of the bits that move.
303 * - Limit is all of the bits that move plus all of the lower bits.
304 * See PCI Spec 6.2.5.1.
308 resource->align = resource->gran = 0;
309 while (!(moving & resource->size)) {
310 resource->size <<= 1;
311 resource->align += 1;
314 resource->limit = moving | (resource->size - 1);
315 resource->flags |= IORESOURCE_MEM | IORESOURCE_READONLY;
318 printk(BIOS_DEBUG, "%s register %02lx(%08lx), read-only ignoring it\n",
319 dev_path(dev), index, value);
323 compact_resources(dev);
327 * Read the base address registers for a given device.
329 * @param dev Pointer to the dev structure.
330 * @param howmany How many registers to read (6 for device, 2 for bridge).
332 static void pci_read_bases(struct device *dev, unsigned int howmany)
336 for (index = PCI_BASE_ADDRESS_0;
337 (index < PCI_BASE_ADDRESS_0 + (howmany << 2));) {
338 struct resource *resource;
339 resource = pci_get_resource(dev, index);
340 index += (resource->flags & IORESOURCE_PCI64) ? 8 : 4;
343 compact_resources(dev);
346 static void pci_record_bridge_resource(struct device *dev, resource_t moving,
347 unsigned index, unsigned long type)
349 /* Initialize the constraints on the current bus. */
350 struct resource *resource;
355 resource = new_resource(dev, index);
359 while ((moving & step) == 0) {
363 resource->gran = gran;
364 resource->align = gran;
365 resource->limit = moving | (step - 1);
366 resource->flags = type | IORESOURCE_PCI_BRIDGE |
372 static void pci_bridge_read_bases(struct device *dev)
374 resource_t moving_base, moving_limit, moving;
376 /* See if the bridge I/O resources are implemented. */
377 moving_base = ((u32) pci_moving_config8(dev, PCI_IO_BASE)) << 8;
379 ((u32) pci_moving_config16(dev, PCI_IO_BASE_UPPER16)) << 16;
381 moving_limit = ((u32) pci_moving_config8(dev, PCI_IO_LIMIT)) << 8;
383 ((u32) pci_moving_config16(dev, PCI_IO_LIMIT_UPPER16)) << 16;
385 moving = moving_base & moving_limit;
387 /* Initialize the I/O space constraints on the current bus. */
388 pci_record_bridge_resource(dev, moving, PCI_IO_BASE, IORESOURCE_IO);
390 /* See if the bridge prefmem resources are implemented. */
392 ((resource_t) pci_moving_config16(dev, PCI_PREF_MEMORY_BASE)) << 16;
394 ((resource_t) pci_moving_config32(dev, PCI_PREF_BASE_UPPER32)) << 32;
397 ((resource_t) pci_moving_config16(dev, PCI_PREF_MEMORY_LIMIT)) << 16;
399 ((resource_t) pci_moving_config32(dev, PCI_PREF_LIMIT_UPPER32)) << 32;
401 moving = moving_base & moving_limit;
402 /* Initialize the prefetchable memory constraints on the current bus. */
403 pci_record_bridge_resource(dev, moving, PCI_PREF_MEMORY_BASE,
404 IORESOURCE_MEM | IORESOURCE_PREFETCH);
406 /* See if the bridge mem resources are implemented. */
407 moving_base = ((u32) pci_moving_config16(dev, PCI_MEMORY_BASE)) << 16;
408 moving_limit = ((u32) pci_moving_config16(dev, PCI_MEMORY_LIMIT)) << 16;
410 moving = moving_base & moving_limit;
412 /* Initialize the memory resources on the current bus. */
413 pci_record_bridge_resource(dev, moving, PCI_MEMORY_BASE,
416 compact_resources(dev);
419 void pci_dev_read_resources(struct device *dev)
421 pci_read_bases(dev, 6);
422 pci_get_rom_resource(dev, PCI_ROM_ADDRESS);
425 void pci_bus_read_resources(struct device *dev)
427 pci_bridge_read_bases(dev);
428 pci_read_bases(dev, 2);
429 pci_get_rom_resource(dev, PCI_ROM_ADDRESS1);
432 void pci_domain_read_resources(struct device *dev)
434 struct resource *res;
436 /* Initialize the system-wide I/O space constraints. */
437 res = new_resource(dev, IOINDEX_SUBTRACTIVE(0, 0));
438 res->limit = 0xffffUL;
439 res->flags = IORESOURCE_IO | IORESOURCE_SUBTRACTIVE |
442 /* Initialize the system-wide memory resources constraints. */
443 res = new_resource(dev, IOINDEX_SUBTRACTIVE(1, 0));
444 res->limit = 0xffffffffULL;
445 res->flags = IORESOURCE_MEM | IORESOURCE_SUBTRACTIVE |
449 static void pci_set_resource(struct device *dev, struct resource *resource)
451 resource_t base, end;
453 /* Make certain the resource has actually been assigned a value. */
454 if (!(resource->flags & IORESOURCE_ASSIGNED)) {
455 printk(BIOS_ERR, "ERROR: %s %02lx %s size: 0x%010llx not assigned\n",
456 dev_path(dev), resource->index,
457 resource_type(resource), resource->size);
461 /* If this resource is fixed don't worry about it. */
462 if (resource->flags & IORESOURCE_FIXED) {
466 /* If I have already stored this resource don't worry about it. */
467 if (resource->flags & IORESOURCE_STORED) {
471 /* If the resource is subtractive don't worry about it. */
472 if (resource->flags & IORESOURCE_SUBTRACTIVE) {
476 /* Only handle PCI memory and I/O resources for now. */
477 if (!(resource->flags & (IORESOURCE_MEM | IORESOURCE_IO)))
480 /* Enable the resources in the command register. */
481 if (resource->size) {
482 if (resource->flags & IORESOURCE_MEM) {
483 dev->command |= PCI_COMMAND_MEMORY;
485 if (resource->flags & IORESOURCE_IO) {
486 dev->command |= PCI_COMMAND_IO;
488 if (resource->flags & IORESOURCE_PCI_BRIDGE) {
489 dev->command |= PCI_COMMAND_MASTER;
492 /* Get the base address. */
493 base = resource->base;
496 end = resource_end(resource);
498 /* Now store the resource. */
499 resource->flags |= IORESOURCE_STORED;
501 /* PCI Bridges have no enable bit. They are disabled if the base of
502 * the range is greater than the limit. If the size is zero, disable
503 * by setting the base = limit and end = limit - 2^gran.
505 if (resource->size == 0 && (resource->flags & IORESOURCE_PCI_BRIDGE)) {
506 base = resource->limit;
507 end = resource->limit - (1 << resource->gran);
508 resource->base = base;
511 if (!(resource->flags & IORESOURCE_PCI_BRIDGE)) {
512 unsigned long base_lo, base_hi;
513 /* Some chipsets allow us to set/clear the I/O bit
514 * (e.g. VIA 82c686a). So set it to be safe.
516 base_lo = base & 0xffffffff;
517 base_hi = (base >> 32) & 0xffffffff;
518 if (resource->flags & IORESOURCE_IO) {
519 base_lo |= PCI_BASE_ADDRESS_SPACE_IO;
521 pci_write_config32(dev, resource->index, base_lo);
522 if (resource->flags & IORESOURCE_PCI64) {
523 pci_write_config32(dev, resource->index + 4, base_hi);
525 } else if (resource->index == PCI_IO_BASE) {
526 /* Set the I/O ranges. */
527 pci_write_config8(dev, PCI_IO_BASE, base >> 8);
528 pci_write_config16(dev, PCI_IO_BASE_UPPER16, base >> 16);
529 pci_write_config8(dev, PCI_IO_LIMIT, end >> 8);
530 pci_write_config16(dev, PCI_IO_LIMIT_UPPER16, end >> 16);
531 } else if (resource->index == PCI_MEMORY_BASE) {
532 /* Set the memory range. */
533 pci_write_config16(dev, PCI_MEMORY_BASE, base >> 16);
534 pci_write_config16(dev, PCI_MEMORY_LIMIT, end >> 16);
535 } else if (resource->index == PCI_PREF_MEMORY_BASE) {
536 /* Set the prefetchable memory range. */
537 pci_write_config16(dev, PCI_PREF_MEMORY_BASE, base >> 16);
538 pci_write_config32(dev, PCI_PREF_BASE_UPPER32, base >> 32);
539 pci_write_config16(dev, PCI_PREF_MEMORY_LIMIT, end >> 16);
540 pci_write_config32(dev, PCI_PREF_LIMIT_UPPER32, end >> 32);
542 /* Don't let me think I stored the resource. */
543 resource->flags &= ~IORESOURCE_STORED;
544 printk(BIOS_ERR, "ERROR: invalid resource->index %lx\n",
547 report_resource_stored(dev, resource, "");
551 void pci_dev_set_resources(struct device *dev)
553 struct resource *res;
557 for (res = dev->resource_list; res; res = res->next) {
558 pci_set_resource(dev, res);
560 for (bus = dev->link_list; bus; bus = bus->next) {
562 assign_resources(bus);
566 /* Set a default latency timer. */
567 pci_write_config8(dev, PCI_LATENCY_TIMER, 0x40);
569 /* Set a default secondary latency timer. */
570 if ((dev->hdr_type & 0x7f) == PCI_HEADER_TYPE_BRIDGE) {
571 pci_write_config8(dev, PCI_SEC_LATENCY_TIMER, 0x40);
574 /* Zero the IRQ settings. */
575 line = pci_read_config8(dev, PCI_INTERRUPT_PIN);
577 pci_write_config8(dev, PCI_INTERRUPT_LINE, 0);
579 /* Set the cache line size, so far 64 bytes is good for everyone. */
580 pci_write_config8(dev, PCI_CACHE_LINE_SIZE, 64 >> 2);
583 void pci_dev_enable_resources(struct device *dev)
585 const struct pci_operations *ops;
588 /* Set the subsystem vendor and device id for mainboard devices. */
590 if (dev->on_mainboard && ops && ops->set_subsystem) {
591 printk(BIOS_DEBUG, "%s subsystem <- %02x/%02x\n",
593 CONFIG_MAINBOARD_PCI_SUBSYSTEM_VENDOR_ID,
594 CONFIG_MAINBOARD_PCI_SUBSYSTEM_DEVICE_ID);
595 ops->set_subsystem(dev,
596 CONFIG_MAINBOARD_PCI_SUBSYSTEM_VENDOR_ID,
597 CONFIG_MAINBOARD_PCI_SUBSYSTEM_DEVICE_ID);
599 command = pci_read_config16(dev, PCI_COMMAND);
600 command |= dev->command;
602 * command |= (PCI_COMMAND_PARITY + PCI_COMMAND_SERR); // Error check.
604 printk(BIOS_DEBUG, "%s cmd <- %02x\n", dev_path(dev), command);
605 pci_write_config16(dev, PCI_COMMAND, command);
608 void pci_bus_enable_resources(struct device *dev)
612 /* Enable I/O in command register if there is VGA card
613 * connected with (even it does not claim I/O resource).
615 if (dev->link_list->bridge_ctrl & PCI_BRIDGE_CTL_VGA)
616 dev->command |= PCI_COMMAND_IO;
617 ctrl = pci_read_config16(dev, PCI_BRIDGE_CONTROL);
618 ctrl |= dev->link_list->bridge_ctrl;
619 ctrl |= (PCI_BRIDGE_CTL_PARITY + PCI_BRIDGE_CTL_SERR); /* Error check. */
620 printk(BIOS_DEBUG, "%s bridge ctrl <- %04x\n", dev_path(dev), ctrl);
621 pci_write_config16(dev, PCI_BRIDGE_CONTROL, ctrl);
623 pci_dev_enable_resources(dev);
626 void pci_bus_reset(struct bus *bus)
629 ctl = pci_read_config16(bus->dev, PCI_BRIDGE_CONTROL);
630 ctl |= PCI_BRIDGE_CTL_BUS_RESET;
631 pci_write_config16(bus->dev, PCI_BRIDGE_CONTROL, ctl);
633 ctl &= ~PCI_BRIDGE_CTL_BUS_RESET;
634 pci_write_config16(bus->dev, PCI_BRIDGE_CONTROL, ctl);
638 void pci_dev_set_subsystem(struct device *dev, unsigned vendor, unsigned device)
640 pci_write_config32(dev, PCI_SUBSYSTEM_VENDOR_ID,
641 ((device & 0xffff) << 16) | (vendor & 0xffff));
644 /** default handler: only runs the relevant pci bios. */
645 void pci_dev_init(struct device *dev)
647 #if CONFIG_PCI_ROM_RUN == 1 || CONFIG_VGA_ROM_RUN == 1
648 struct rom_header *rom, *ram;
650 if (CONFIG_PCI_ROM_RUN != 1 && /* Only execute VGA ROMs. */
651 ((dev->class >> 8) != PCI_CLASS_DISPLAY_VGA))
654 if (CONFIG_VGA_ROM_RUN != 1 && /* Only execute non-VGA ROMs. */
655 ((dev->class >> 8) == PCI_CLASS_DISPLAY_VGA))
658 rom = pci_rom_probe(dev);
662 ram = pci_rom_load(dev, rom);
666 run_bios(dev, (unsigned long)ram);
668 #if CONFIG_CONSOLE_VGA == 1
669 if ((dev->class>>8) == PCI_CLASS_DISPLAY_VGA)
671 #endif /* CONFIG_CONSOLE_VGA */
672 #endif /* CONFIG_PCI_ROM_RUN || CONFIG_VGA_ROM_RUN */
675 /** Default device operation for PCI devices */
676 static struct pci_operations pci_dev_ops_pci = {
677 .set_subsystem = pci_dev_set_subsystem,
680 struct device_operations default_pci_ops_dev = {
681 .read_resources = pci_dev_read_resources,
682 .set_resources = pci_dev_set_resources,
683 .enable_resources = pci_dev_enable_resources,
684 .init = pci_dev_init,
687 .ops_pci = &pci_dev_ops_pci,
690 /** Default device operations for PCI bridges */
691 static struct pci_operations pci_bus_ops_pci = {
695 struct device_operations default_pci_ops_bus = {
696 .read_resources = pci_bus_read_resources,
697 .set_resources = pci_dev_set_resources,
698 .enable_resources = pci_bus_enable_resources,
700 .scan_bus = pci_scan_bridge,
702 .reset_bus = pci_bus_reset,
703 .ops_pci = &pci_bus_ops_pci,
707 * Detect the type of downstream bridge.
709 * This function is a heuristic to detect which type of bus is downstream
710 * of a PCI-to-PCI bridge. This functions by looking for various capability
711 * blocks to figure out the type of downstream bridge. PCI-X, PCI-E, and
712 * Hypertransport all seem to have appropriate capabilities.
714 * When only a PCI-Express capability is found the type
715 * is examined to see which type of bridge we have.
717 * @param dev Pointer to the device structure of the bridge.
718 * @return Appropriate bridge operations.
720 static struct device_operations *get_pci_bridge_ops(device_t dev)
724 #if CONFIG_PCIX_PLUGIN_SUPPORT == 1
725 pos = pci_find_capability(dev, PCI_CAP_ID_PCIX);
727 printk(BIOS_DEBUG, "%s subordinate bus PCI-X\n", dev_path(dev));
728 return &default_pcix_ops_bus;
731 #if CONFIG_AGP_PLUGIN_SUPPORT == 1
732 /* How do I detect an PCI to AGP bridge? */
734 #if CONFIG_HYPERTRANSPORT_PLUGIN_SUPPORT == 1
736 while ((pos = pci_find_next_capability(dev, PCI_CAP_ID_HT, pos))) {
738 flags = pci_read_config16(dev, pos + PCI_CAP_FLAGS);
739 if ((flags >> 13) == 1) {
740 /* Host or Secondary Interface */
741 printk(BIOS_DEBUG, "%s subordinate bus Hypertransport\n",
743 return &default_ht_ops_bus;
747 #if CONFIG_PCIEXP_PLUGIN_SUPPORT == 1
748 pos = pci_find_capability(dev, PCI_CAP_ID_PCIE);
751 flags = pci_read_config16(dev, pos + PCI_EXP_FLAGS);
752 switch ((flags & PCI_EXP_FLAGS_TYPE) >> 4) {
753 case PCI_EXP_TYPE_ROOT_PORT:
754 case PCI_EXP_TYPE_UPSTREAM:
755 case PCI_EXP_TYPE_DOWNSTREAM:
756 printk(BIOS_DEBUG, "%s subordinate bus PCI Express\n",
758 return &default_pciexp_ops_bus;
759 case PCI_EXP_TYPE_PCI_BRIDGE:
760 printk(BIOS_DEBUG, "%s subordinate PCI\n", dev_path(dev));
761 return &default_pci_ops_bus;
767 return &default_pci_ops_bus;
771 * Set up PCI device operation.
773 * Check if it already has a driver. If not, use find_device_operations(),
774 * or set to a default based on type.
776 * @param dev Pointer to the device whose pci_ops you want to set.
779 static void set_pci_ops(struct device *dev)
781 struct pci_driver *driver;
786 /* Look through the list of setup drivers and find one for
789 for (driver = &pci_drivers[0]; driver != &epci_drivers[0]; driver++) {
790 if ((driver->vendor == dev->vendor) &&
791 (driver->device == dev->device)) {
792 dev->ops = (struct device_operations *)driver->ops;
793 printk(BIOS_SPEW, "%s [%04x/%04x] %sops\n",
795 driver->vendor, driver->device,
796 (driver->ops->scan_bus ? "bus " : ""));
801 /* If I don't have a specific driver use the default operations */
802 switch (dev->hdr_type & 0x7f) { /* header type */
803 case PCI_HEADER_TYPE_NORMAL: /* standard header */
804 if ((dev->class >> 8) == PCI_CLASS_BRIDGE_PCI)
806 dev->ops = &default_pci_ops_dev;
808 case PCI_HEADER_TYPE_BRIDGE:
809 if ((dev->class >> 8) != PCI_CLASS_BRIDGE_PCI)
811 dev->ops = get_pci_bridge_ops(dev);
813 #if CONFIG_CARDBUS_PLUGIN_SUPPORT == 1
814 case PCI_HEADER_TYPE_CARDBUS:
815 dev->ops = &default_cardbus_ops_bus;
821 printk(BIOS_ERR, "%s [%04x/%04x/%06x] has unknown header "
822 "type %02x, ignoring.\n",
824 dev->vendor, dev->device,
825 dev->class >> 8, dev->hdr_type);
832 * See if we have already allocated a device structure for a given devfn.
834 * Given a linked list of PCI device structures and a devfn number, find the
835 * device structure correspond to the devfn, if present. This function also
836 * removes the device structure from the linked list.
838 * @param list The device structure list.
839 * @param devfn A device/function number.
840 * @return Pointer to the device structure found or NULL if we have not
841 * allocated a device for this devfn yet.
843 static struct device *pci_scan_get_dev(struct device **list, unsigned int devfn)
847 for (; *list; list = &(*list)->sibling) {
848 if ((*list)->path.type != DEVICE_PATH_PCI) {
849 printk(BIOS_ERR, "child %s not a pci device\n",
853 if ((*list)->path.pci.devfn == devfn) {
854 /* Unlink from the list. */
856 *list = (*list)->sibling;
862 /* Just like alloc_dev() add the device to the list of devices on the
863 * bus. When the list of devices was formed we removed all of the
864 * parents children, and now we are interleaving static and dynamic
865 * devices in order on the bus.
868 struct device *child;
869 /* Find the last child of our parent. */
870 for (child = dev->bus->children; child && child->sibling;) {
871 child = child->sibling;
873 /* Place the device on the list of children of its parent. */
875 child->sibling = dev;
877 dev->bus->children = dev;
887 * Determine the existence of a given PCI device. Allocate a new struct device
888 * if dev==NULL was passed in and the device exists in hardware.
890 * @param dev Pointer to the dev structure.
891 * @param bus Pointer to the bus structure.
892 * @param devfn A device/function number to look at.
893 * @return The device structure for the device (if found), NULL otherwise.
895 device_t pci_probe_dev(device_t dev, struct bus *bus, unsigned devfn)
900 /* Detect if a device is present. */
904 dummy.path.type = DEVICE_PATH_PCI;
905 dummy.path.pci.devfn = devfn;
906 id = pci_read_config32(&dummy, PCI_VENDOR_ID);
907 /* Have we found something?
908 * Some broken boards return 0 if a slot is empty, but
909 * the expected answer is 0xffffffff
911 if (id == 0xffffffff) {
914 if ((id == 0x00000000) || (id == 0x0000ffff) ||
915 (id == 0xffff0000)) {
916 printk(BIOS_SPEW, "%s, bad id 0x%x\n", dev_path(&dummy), id);
919 dev = alloc_dev(bus, &dummy.path);
921 /* Enable/disable the device. Once we have found the device-
922 * specific operations this operations we will disable the
923 * device with those as well.
925 * This is geared toward devices that have subfunctions
926 * that do not show up by default.
928 * If a device is a stuff option on the motherboard
929 * it may be absent and enable_dev() must cope.
931 /* Run the magic enable sequence for the device. */
932 if (dev->chip_ops && dev->chip_ops->enable_dev) {
933 dev->chip_ops->enable_dev(dev);
935 /* Now read the vendor and device ID. */
936 id = pci_read_config32(dev, PCI_VENDOR_ID);
938 /* If the device does not have a PCI ID disable it. Possibly
939 * this is because we have already disabled the device. But
940 * this also handles optional devices that may not always
943 /* If the chain is fully enumerated quit */
944 if ((id == 0xffffffff) || (id == 0x00000000) ||
945 (id == 0x0000ffff) || (id == 0xffff0000)) {
947 printk(BIOS_INFO, "PCI: Static device %s not found, disabling it.\n",
954 /* Read the rest of the PCI configuration information. */
955 hdr_type = pci_read_config8(dev, PCI_HEADER_TYPE);
956 class = pci_read_config32(dev, PCI_CLASS_REVISION);
958 /* Store the interesting information in the device structure. */
959 dev->vendor = id & 0xffff;
960 dev->device = (id >> 16) & 0xffff;
961 dev->hdr_type = hdr_type;
963 /* Class code, the upper 3 bytes of PCI_CLASS_REVISION. */
964 dev->class = class >> 8;
966 /* Architectural/System devices always need to be bus masters. */
967 if ((dev->class >> 16) == PCI_BASE_CLASS_SYSTEM) {
968 dev->command |= PCI_COMMAND_MASTER;
970 /* Look at the vendor and device ID, or at least the header type and
971 * class and figure out which set of configuration methods to use.
972 * Unless we already have some PCI ops.
976 /* Now run the magic enable/disable sequence for the device. */
977 if (dev->ops && dev->ops->enable) {
978 dev->ops->enable(dev);
981 /* Display the device. */
982 printk(BIOS_DEBUG, "%s [%04x/%04x] %s%s\n",
984 dev->vendor, dev->device,
985 dev->enabled ? "enabled" : "disabled",
986 dev->ops ? "" : " No operations");
994 * Determine the existence of devices and bridges on a PCI bus. If there are
995 * bridges on the bus, recursively scan the buses behind the bridges.
997 * This function is the default scan_bus() method for the root device
1000 * @param bus Pointer to the bus structure.
1001 * @param min_devfn Minimum devfn to look at in the scan, usually 0x00.
1002 * @param max_devfn Maximum devfn to look at in the scan, usually 0xff.
1003 * @param max Current bus number.
1004 * @return The maximum bus number found, after scanning all subordinate busses.
1006 unsigned int pci_scan_bus(struct bus *bus,
1007 unsigned min_devfn, unsigned max_devfn,
1011 struct device *old_devices;
1012 struct device *child;
1014 #if CONFIG_PCI_BUS_SEGN_BITS
1015 printk(BIOS_DEBUG, "PCI: pci_scan_bus for bus %04x:%02x\n",
1016 bus->secondary >> 8, bus->secondary & 0xff);
1018 printk(BIOS_DEBUG, "PCI: pci_scan_bus for bus %02x\n", bus->secondary);
1021 // Maximum sane devfn is 0xFF
1022 if (max_devfn > 0xff) {
1023 printk(BIOS_ERR, "PCI: pci_scan_bus limits devfn %x - devfn %x\n",
1024 min_devfn, max_devfn );
1025 printk(BIOS_ERR, "PCI: pci_scan_bus upper limit too big. Using 0xff.\n");
1029 old_devices = bus->children;
1030 bus->children = NULL;
1033 /* Probe all devices/functions on this bus with some optimization for
1034 * non-existence and single function devices.
1036 for (devfn = min_devfn; devfn <= max_devfn; devfn++) {
1039 /* First thing setup the device structure */
1040 dev = pci_scan_get_dev(&old_devices, devfn);
1042 /* See if a device is present and setup the device structure. */
1043 dev = pci_probe_dev(dev, bus, devfn);
1045 /* If this is not a multi function device, or the device is
1046 * not present don't waste time probing another function.
1047 * Skip to next device.
1049 if ((PCI_FUNC(devfn) == 0x00) &&
1051 || (dev->enabled && ((dev->hdr_type & 0x80) != 0x80)))) {
1057 /* Warn if any leftover static devices are are found.
1058 * There's probably a problem in the Config.lb.
1062 printk(BIOS_WARNING, "PCI: Left over static devices:\n");
1063 for (left = old_devices; left; left = left->sibling) {
1064 printk(BIOS_WARNING, "%s\n", dev_path(left));
1066 printk(BIOS_WARNING, "PCI: Check your mainboard Config.lb.\n");
1069 /* For all children that implement scan_bus() (i.e. bridges)
1070 * scan the bus behind that child.
1072 for (child = bus->children; child; child = child->sibling) {
1073 max = scan_bus(child, max);
1076 /* We've scanned the bus and so we know all about what's on the other
1077 * side of any bridges that may be on this bus plus any devices.
1078 * Return how far we've got finding sub-buses.
1080 printk(BIOS_DEBUG, "PCI: pci_scan_bus returning with max=%03x\n", max);
1086 * Scan a PCI bridge and the buses behind the bridge.
1088 * Determine the existence of buses behind the bridge. Set up the bridge
1089 * according to the result of the scan.
1091 * This function is the default scan_bus() method for PCI bridge devices.
1093 * @param dev Pointer to the bridge device.
1094 * @param max The highest bus number assigned up to now.
1095 * @param do_scan_bus TODO
1096 * @return The maximum bus number found, after scanning all subordinate buses.
1098 unsigned int do_pci_scan_bridge(struct device *dev, unsigned int max,
1099 unsigned int (*do_scan_bus) (struct bus * bus,
1108 printk(BIOS_SPEW, "%s for %s\n", __func__, dev_path(dev));
1110 if (dev->link_list == NULL) {
1112 link = malloc(sizeof(*link));
1114 die("Couldn't allocate a link!\n");
1115 memset(link, 0, sizeof(*link));
1117 dev->link_list = link;
1120 bus = dev->link_list;
1122 /* Set up the primary, secondary and subordinate bus numbers. We have
1123 * no idea how many buses are behind this bridge yet, so we set the
1124 * subordinate bus number to 0xff for the moment.
1126 bus->secondary = ++max;
1127 bus->subordinate = 0xff;
1129 /* Clear all status bits and turn off memory, I/O and master enables. */
1130 cr = pci_read_config16(dev, PCI_COMMAND);
1131 pci_write_config16(dev, PCI_COMMAND, 0x0000);
1132 pci_write_config16(dev, PCI_STATUS, 0xffff);
1134 /* Read the existing primary/secondary/subordinate bus
1135 * number configuration.
1137 buses = pci_read_config32(dev, PCI_PRIMARY_BUS);
1139 /* Configure the bus numbers for this bridge: the configuration
1140 * transactions will not be propagated by the bridge if it is not
1141 * correctly configured.
1143 buses &= 0xff000000;
1144 buses |= (((unsigned int)(dev->bus->secondary) << 0) |
1145 ((unsigned int)(bus->secondary) << 8) |
1146 ((unsigned int)(bus->subordinate) << 16));
1147 pci_write_config32(dev, PCI_PRIMARY_BUS, buses);
1149 /* Now we can scan all subordinate buses
1150 * i.e. the bus behind the bridge.
1152 max = do_scan_bus(bus, 0x00, 0xff, max);
1154 /* We know the number of buses behind this bridge. Set the subordinate
1155 * bus number to its real value.
1157 bus->subordinate = max;
1158 buses = (buses & 0xff00ffff) | ((unsigned int)(bus->subordinate) << 16);
1159 pci_write_config32(dev, PCI_PRIMARY_BUS, buses);
1160 pci_write_config16(dev, PCI_COMMAND, cr);
1162 printk(BIOS_SPEW, "%s returns max %d\n", __func__, max);
1167 * Scan a PCI bridge and the buses behind the bridge.
1169 * Determine the existence of buses behind the bridge. Set up the bridge
1170 * according to the result of the scan.
1172 * This function is the default scan_bus() method for PCI bridge devices.
1174 * @param dev Pointer to the bridge device.
1175 * @param max The highest bus number assigned up to now.
1176 * @return The maximum bus number found, after scanning all subordinate buses.
1178 unsigned int pci_scan_bridge(struct device *dev, unsigned int max)
1180 return do_pci_scan_bridge(dev, max, pci_scan_bus);
1184 * Scan a PCI domain.
1186 * This function is the default scan_bus() method for PCI domains.
1188 * @param dev Pointer to the domain.
1189 * @param max The highest bus number assigned up to now.
1190 * @return The maximum bus number found, after scanning all subordinate busses.
1192 unsigned int pci_domain_scan_bus(device_t dev, unsigned int max)
1194 max = pci_scan_bus(dev->link_list, PCI_DEVFN(0, 0), 0xff, max);
1198 #if CONFIG_PC80_SYSTEM == 1
1200 * Assign IRQ numbers.
1202 * This function assigns IRQs for all functions contained within the indicated
1203 * device address. If the device does not exist or does not require interrupts
1204 * then this function has no effect.
1206 * This function should be called for each PCI slot in your system.
1208 * @param bus Pointer to the bus structure.
1210 * @param pIntAtoD An array of IRQ #s that are assigned to PINTA through PINTD
1211 * of this slot. The particular IRQ #s that are passed in depend on the
1212 * routing inside your southbridge and on your board.
1214 void pci_assign_irqs(unsigned bus, unsigned slot,
1215 const unsigned char pIntAtoD[4])
1222 /* Each slot may contain up to eight functions */
1223 for (funct = 0; funct < 8; funct++) {
1224 pdev = dev_find_slot(bus, (slot << 3) + funct);
1229 line = pci_read_config8(pdev, PCI_INTERRUPT_PIN);
1231 // PCI spec says all values except 1..4 are reserved.
1232 if ((line < 1) || (line > 4))
1235 irq = pIntAtoD[line - 1];
1237 printk(BIOS_DEBUG, "Assigning IRQ %d to %d:%x.%d\n",
1238 irq, bus, slot, funct);
1240 pci_write_config8(pdev, PCI_INTERRUPT_LINE,
1241 pIntAtoD[line - 1]);
1243 #ifdef PARANOID_IRQ_ASSIGNMENTS
1244 irq = pci_read_config8(pdev, PCI_INTERRUPT_LINE);
1245 printk(BIOS_DEBUG, " Readback = %d\n", irq);
1248 // Change to level triggered
1249 i8259_configure_irq_trigger(pIntAtoD[line - 1], IRQ_LEVEL_TRIGGERED);