| /* |
| * bios32.c - PCI BIOS functions for m68k systems. |
| * |
| * Written by Wout Klaren. |
| * |
| * Based on the DEC Alpha bios32.c by Dave Rusling and David Mosberger. |
| */ |
| |
| #include <linux/init.h> |
| #include <linux/kernel.h> |
| |
| #if 0 |
| # define DBG_DEVS(args) printk args |
| #else |
| # define DBG_DEVS(args) |
| #endif |
| |
| #ifdef CONFIG_PCI |
| |
| /* |
| * PCI support for Linux/m68k. Currently only the Hades is supported. |
| * |
| * The support for PCI bridges in the DEC Alpha version has |
| * been removed in this version. |
| */ |
| |
| #include <linux/pci.h> |
| #include <linux/slab.h> |
| #include <linux/mm.h> |
| |
| #include <asm/io.h> |
| #include <asm/pci.h> |
| #include <asm/uaccess.h> |
| |
| #define KB 1024 |
| #define MB (1024*KB) |
| #define GB (1024*MB) |
| |
| #define MAJOR_REV 0 |
| #define MINOR_REV 5 |
| |
| /* |
| * Align VAL to ALIGN, which must be a power of two. |
| */ |
| |
| #define ALIGN(val,align) (((val) + ((align) - 1)) & ~((align) - 1)) |
| |
| /* |
| * Offsets relative to the I/O and memory base addresses from where resources |
| * are allocated. |
| */ |
| |
| #define IO_ALLOC_OFFSET 0x00004000 |
| #define MEM_ALLOC_OFFSET 0x04000000 |
| |
| /* |
| * Declarations of hardware specific initialisation functions. |
| */ |
| |
| extern struct pci_bus_info *init_hades_pci(void); |
| |
| /* |
| * Bus info structure of the PCI bus. A pointer to this structure is |
| * put in the sysdata member of the pci_bus structure. |
| */ |
| |
| static struct pci_bus_info *bus_info; |
| |
| static int pci_modify = 1; /* If set, layout the PCI bus ourself. */ |
| static int skip_vga; /* If set do not modify base addresses |
| of vga cards.*/ |
| static int disable_pci_burst; /* If set do not allow PCI bursts. */ |
| |
| static unsigned int io_base; |
| static unsigned int mem_base; |
| |
| /* |
| * static void disable_dev(struct pci_dev *dev) |
| * |
| * Disable PCI device DEV so that it does not respond to I/O or memory |
| * accesses. |
| * |
| * Parameters: |
| * |
| * dev - device to disable. |
| */ |
| |
| static void __init disable_dev(struct pci_dev *dev) |
| { |
| unsigned short cmd; |
| |
| if (((dev->class >> 8 == PCI_CLASS_NOT_DEFINED_VGA) || |
| (dev->class >> 8 == PCI_CLASS_DISPLAY_VGA) || |
| (dev->class >> 8 == PCI_CLASS_DISPLAY_XGA)) && skip_vga) |
| return; |
| |
| pci_read_config_word(dev, PCI_COMMAND, &cmd); |
| |
| cmd &= (~PCI_COMMAND_IO & ~PCI_COMMAND_MEMORY & ~PCI_COMMAND_MASTER); |
| pci_write_config_word(dev, PCI_COMMAND, cmd); |
| } |
| |
| /* |
| * static void layout_dev(struct pci_dev *dev) |
| * |
| * Layout memory and I/O for a device. |
| * |
| * Parameters: |
| * |
| * device - device to layout memory and I/O for. |
| */ |
| |
| static void __init layout_dev(struct pci_dev *dev) |
| { |
| unsigned short cmd; |
| unsigned int base, mask, size, reg; |
| unsigned int alignto; |
| int i; |
| |
| /* |
| * Skip video cards if requested. |
| */ |
| |
| if (((dev->class >> 8 == PCI_CLASS_NOT_DEFINED_VGA) || |
| (dev->class >> 8 == PCI_CLASS_DISPLAY_VGA) || |
| (dev->class >> 8 == PCI_CLASS_DISPLAY_XGA)) && skip_vga) |
| return; |
| |
| pci_read_config_word(dev, PCI_COMMAND, &cmd); |
| |
| for (reg = PCI_BASE_ADDRESS_0, i = 0; reg <= PCI_BASE_ADDRESS_5; reg += 4, i++) |
| { |
| /* |
| * Figure out how much space and of what type this |
| * device wants. |
| */ |
| |
| pci_write_config_dword(dev, reg, 0xffffffff); |
| pci_read_config_dword(dev, reg, &base); |
| |
| if (!base) |
| { |
| /* this base-address register is unused */ |
| dev->resource[i].start = 0; |
| dev->resource[i].end = 0; |
| dev->resource[i].flags = 0; |
| continue; |
| } |
| |
| /* |
| * We've read the base address register back after |
| * writing all ones and so now we must decode it. |
| */ |
| |
| if (base & PCI_BASE_ADDRESS_SPACE_IO) |
| { |
| /* |
| * I/O space base address register. |
| */ |
| |
| cmd |= PCI_COMMAND_IO; |
| |
| base &= PCI_BASE_ADDRESS_IO_MASK; |
| mask = (~base << 1) | 0x1; |
| size = (mask & base) & 0xffffffff; |
| |
| /* |
| * Align to multiple of size of minimum base. |
| */ |
| |
| alignto = max_t(unsigned int, 0x040, size); |
| base = ALIGN(io_base, alignto); |
| io_base = base + size; |
| pci_write_config_dword(dev, reg, base | PCI_BASE_ADDRESS_SPACE_IO); |
| |
| dev->resource[i].start = base; |
| dev->resource[i].end = dev->resource[i].start + size - 1; |
| dev->resource[i].flags = IORESOURCE_IO | PCI_BASE_ADDRESS_SPACE_IO; |
| |
| DBG_DEVS(("layout_dev: IO address: %lX\n", base)); |
| } |
| else |
| { |
| unsigned int type; |
| |
| /* |
| * Memory space base address register. |
| */ |
| |
| cmd |= PCI_COMMAND_MEMORY; |
| type = base & PCI_BASE_ADDRESS_MEM_TYPE_MASK; |
| base &= PCI_BASE_ADDRESS_MEM_MASK; |
| mask = (~base << 1) | 0x1; |
| size = (mask & base) & 0xffffffff; |
| switch (type) |
| { |
| case PCI_BASE_ADDRESS_MEM_TYPE_32: |
| case PCI_BASE_ADDRESS_MEM_TYPE_64: |
| break; |
| |
| case PCI_BASE_ADDRESS_MEM_TYPE_1M: |
| printk("bios32 WARNING: slot %d, function %d " |
| "requests memory below 1MB---don't " |
| "know how to do that.\n", |
| PCI_SLOT(dev->devfn), |
| PCI_FUNC(dev->devfn)); |
| continue; |
| } |
| |
| /* |
| * Align to multiple of size of minimum base. |
| */ |
| |
| alignto = max_t(unsigned int, 0x1000, size); |
| base = ALIGN(mem_base, alignto); |
| mem_base = base + size; |
| pci_write_config_dword(dev, reg, base); |
| |
| dev->resource[i].start = base; |
| dev->resource[i].end = dev->resource[i].start + size - 1; |
| dev->resource[i].flags = IORESOURCE_MEM; |
| |
| if (type == PCI_BASE_ADDRESS_MEM_TYPE_64) |
| { |
| /* |
| * 64-bit address, set the highest 32 bits |
| * to zero. |
| */ |
| |
| reg += 4; |
| pci_write_config_dword(dev, reg, 0); |
| |
| i++; |
| dev->resource[i].start = 0; |
| dev->resource[i].end = 0; |
| dev->resource[i].flags = 0; |
| } |
| } |
| } |
| |
| /* |
| * Enable device: |
| */ |
| |
| if (dev->class >> 8 == PCI_CLASS_NOT_DEFINED || |
| dev->class >> 8 == PCI_CLASS_NOT_DEFINED_VGA || |
| dev->class >> 8 == PCI_CLASS_DISPLAY_VGA || |
| dev->class >> 8 == PCI_CLASS_DISPLAY_XGA) |
| { |
| /* |
| * All of these (may) have I/O scattered all around |
| * and may not use i/o-base address registers at all. |
| * So we just have to always enable I/O to these |
| * devices. |
| */ |
| cmd |= PCI_COMMAND_IO; |
| } |
| |
| pci_write_config_word(dev, PCI_COMMAND, cmd | PCI_COMMAND_MASTER); |
| |
| pci_write_config_byte(dev, PCI_LATENCY_TIMER, (disable_pci_burst) ? 0 : 32); |
| |
| if (bus_info != NULL) |
| bus_info->conf_device(dev); /* Machine dependent configuration. */ |
| |
| DBG_DEVS(("layout_dev: bus %d slot 0x%x VID 0x%x DID 0x%x class 0x%x\n", |
| dev->bus->number, PCI_SLOT(dev->devfn), dev->vendor, dev->device, dev->class)); |
| } |
| |
| /* |
| * static void layout_bus(struct pci_bus *bus) |
| * |
| * Layout memory and I/O for all devices on the given bus. |
| * |
| * Parameters: |
| * |
| * bus - bus. |
| */ |
| |
| static void __init layout_bus(struct pci_bus *bus) |
| { |
| unsigned int bio, bmem; |
| struct pci_dev *dev; |
| |
| DBG_DEVS(("layout_bus: starting bus %d\n", bus->number)); |
| |
| if (!bus->devices && !bus->children) |
| return; |
| |
| /* |
| * Align the current bases on appropriate boundaries (4K for |
| * IO and 1MB for memory). |
| */ |
| |
| bio = io_base = ALIGN(io_base, 4*KB); |
| bmem = mem_base = ALIGN(mem_base, 1*MB); |
| |
| /* |
| * PCI devices might have been setup by a PCI BIOS emulation |
| * running under TOS. In these cases there is a |
| * window during which two devices may have an overlapping |
| * address range. To avoid this causing trouble, we first |
| * turn off the I/O and memory address decoders for all PCI |
| * devices. They'll be re-enabled only once all address |
| * decoders are programmed consistently. |
| */ |
| |
| DBG_DEVS(("layout_bus: disable_dev for bus %d\n", bus->number)); |
| |
| for (dev = bus->devices; dev; dev = dev->sibling) |
| { |
| if ((dev->class >> 16 != PCI_BASE_CLASS_BRIDGE) || |
| (dev->class >> 8 == PCI_CLASS_BRIDGE_PCMCIA)) |
| disable_dev(dev); |
| } |
| |
| /* |
| * Allocate space to each device: |
| */ |
| |
| DBG_DEVS(("layout_bus: starting bus %d devices\n", bus->number)); |
| |
| for (dev = bus->devices; dev; dev = dev->sibling) |
| { |
| if ((dev->class >> 16 != PCI_BASE_CLASS_BRIDGE) || |
| (dev->class >> 8 == PCI_CLASS_BRIDGE_PCMCIA)) |
| layout_dev(dev); |
| } |
| |
| DBG_DEVS(("layout_bus: bus %d finished\n", bus->number)); |
| } |
| |
| /* |
| * static void pcibios_fixup(void) |
| * |
| * Layout memory and I/O of all devices on the PCI bus if 'pci_modify' is |
| * true. This might be necessary because not every m68k machine with a PCI |
| * bus has a PCI BIOS. This function should be called right after |
| * pci_scan_bus() in pcibios_init(). |
| */ |
| |
| static void __init pcibios_fixup(void) |
| { |
| if (pci_modify) |
| { |
| /* |
| * Set base addresses for allocation of I/O and memory space. |
| */ |
| |
| io_base = bus_info->io_space.start + IO_ALLOC_OFFSET; |
| mem_base = bus_info->mem_space.start + MEM_ALLOC_OFFSET; |
| |
| /* |
| * Scan the tree, allocating PCI memory and I/O space. |
| */ |
| |
| layout_bus(pci_bus_b(pci_root.next)); |
| } |
| |
| /* |
| * Fix interrupt assignments, etc. |
| */ |
| |
| bus_info->fixup(pci_modify); |
| } |
| |
| /* |
| * static void pcibios_claim_resources(struct pci_bus *bus) |
| * |
| * Claim all resources that are assigned to devices on the given bus. |
| * |
| * Parameters: |
| * |
| * bus - bus. |
| */ |
| |
| static void __init pcibios_claim_resources(struct pci_bus *bus) |
| { |
| struct pci_dev *dev; |
| int i; |
| |
| while (bus) |
| { |
| for (dev = bus->devices; (dev != NULL); dev = dev->sibling) |
| { |
| for (i = 0; i < PCI_NUM_RESOURCES; i++) |
| { |
| struct resource *r = &dev->resource[i]; |
| struct resource *pr; |
| struct pci_bus_info *bus_info = (struct pci_bus_info *) dev->sysdata; |
| |
| if ((r->start == 0) || (r->parent != NULL)) |
| continue; |
| #if 1 |
| if (r->flags & IORESOURCE_IO) |
| pr = &bus_info->io_space; |
| else |
| pr = &bus_info->mem_space; |
| #else |
| if (r->flags & IORESOURCE_IO) |
| pr = &ioport_resource; |
| else |
| pr = &iomem_resource; |
| #endif |
| if (request_resource(pr, r) < 0) |
| { |
| printk(KERN_ERR "PCI: Address space collision on region %d of device %s\n", i, dev->name); |
| } |
| } |
| } |
| |
| if (bus->children) |
| pcibios_claim_resources(bus->children); |
| |
| bus = bus->next; |
| } |
| } |
| |
| /* |
| * int pcibios_assign_resource(struct pci_dev *dev, int i) |
| * |
| * Assign a new address to a PCI resource. |
| * |
| * Parameters: |
| * |
| * dev - device. |
| * i - resource. |
| * |
| * Result: 0 if successful. |
| */ |
| |
| int __init pcibios_assign_resource(struct pci_dev *dev, int i) |
| { |
| struct resource *r = &dev->resource[i]; |
| struct resource *pr = pci_find_parent_resource(dev, r); |
| unsigned long size = r->end + 1; |
| |
| if (!pr) |
| return -EINVAL; |
| |
| if (r->flags & IORESOURCE_IO) |
| { |
| if (size > 0x100) |
| return -EFBIG; |
| |
| if (allocate_resource(pr, r, size, bus_info->io_space.start + |
| IO_ALLOC_OFFSET, bus_info->io_space.end, 1024)) |
| return -EBUSY; |
| } |
| else |
| { |
| if (allocate_resource(pr, r, size, bus_info->mem_space.start + |
| MEM_ALLOC_OFFSET, bus_info->mem_space.end, size)) |
| return -EBUSY; |
| } |
| |
| if (i < 6) |
| pci_write_config_dword(dev, PCI_BASE_ADDRESS_0 + 4 * i, r->start); |
| |
| return 0; |
| } |
| |
| void __init pcibios_fixup_bus(struct pci_bus *bus) |
| { |
| struct pci_dev *dev; |
| void *sysdata; |
| |
| sysdata = (bus->parent) ? bus->parent->sysdata : bus->sysdata; |
| |
| for (dev = bus->devices; (dev != NULL); dev = dev->sibling) |
| dev->sysdata = sysdata; |
| } |
| |
| void __init pcibios_init(void) |
| { |
| printk("Linux/m68k PCI BIOS32 revision %x.%02x\n", MAJOR_REV, MINOR_REV); |
| |
| bus_info = NULL; |
| #ifdef CONFIG_HADES |
| if (MACH_IS_HADES) |
| bus_info = init_hades_pci(); |
| #endif |
| if (bus_info != NULL) |
| { |
| printk("PCI: Probing PCI hardware\n"); |
| pci_scan_bus(0, bus_info->m68k_pci_ops, bus_info); |
| pcibios_fixup(); |
| pcibios_claim_resources(pci_root); |
| } |
| else |
| printk("PCI: No PCI bus detected\n"); |
| } |
| |
| char * __init pcibios_setup(char *str) |
| { |
| if (!strcmp(str, "nomodify")) |
| { |
| pci_modify = 0; |
| return NULL; |
| } |
| else if (!strcmp(str, "skipvga")) |
| { |
| skip_vga = 1; |
| return NULL; |
| } |
| else if (!strcmp(str, "noburst")) |
| { |
| disable_pci_burst = 1; |
| return NULL; |
| } |
| |
| return str; |
| } |
| #endif /* CONFIG_PCI */ |