| /* |
| * MPC83xx/85xx/86xx PCI/PCIE support routing. |
| * |
| * Copyright 2007,2008 Freescale Semiconductor, Inc |
| * |
| * Initial author: Xianghua Xiao <x.xiao@freescale.com> |
| * Recode: ZHANG WEI <wei.zhang@freescale.com> |
| * Rewrite the routing for Frescale PCI and PCI Express |
| * Roy Zang <tie-fei.zang@freescale.com> |
| * |
| * This program is free software; you can redistribute it and/or modify it |
| * under the terms of the GNU General Public License as published by the |
| * Free Software Foundation; either version 2 of the License, or (at your |
| * option) any later version. |
| */ |
| #include <linux/kernel.h> |
| #include <linux/pci.h> |
| #include <linux/delay.h> |
| #include <linux/string.h> |
| #include <linux/init.h> |
| #include <linux/bootmem.h> |
| |
| #include <asm/io.h> |
| #include <asm/prom.h> |
| #include <asm/pci-bridge.h> |
| #include <asm/machdep.h> |
| #include <sysdev/fsl_soc.h> |
| #include <sysdev/fsl_pci.h> |
| |
| #if defined(CONFIG_PPC_85xx) || defined(CONFIG_PPC_86xx) |
| static int __init setup_one_atmu(struct ccsr_pci __iomem *pci, |
| unsigned int index, const struct resource *res, |
| resource_size_t offset) |
| { |
| resource_size_t pci_addr = res->start - offset; |
| resource_size_t phys_addr = res->start; |
| resource_size_t size = res->end - res->start + 1; |
| u32 flags = 0x80044000; /* enable & mem R/W */ |
| unsigned int i; |
| |
| pr_debug("PCI MEM resource start 0x%016llx, size 0x%016llx.\n", |
| (u64)res->start, (u64)size); |
| |
| if (res->flags & IORESOURCE_PREFETCH) |
| flags |= 0x10000000; /* enable relaxed ordering */ |
| |
| for (i = 0; size > 0; i++) { |
| unsigned int bits = min(__ilog2(size), |
| __ffs(pci_addr | phys_addr)); |
| |
| if (index + i >= 5) |
| return -1; |
| |
| out_be32(&pci->pow[index + i].potar, pci_addr >> 12); |
| out_be32(&pci->pow[index + i].potear, (u64)pci_addr >> 44); |
| out_be32(&pci->pow[index + i].powbar, phys_addr >> 12); |
| out_be32(&pci->pow[index + i].powar, flags | (bits - 1)); |
| |
| pci_addr += (resource_size_t)1U << bits; |
| phys_addr += (resource_size_t)1U << bits; |
| size -= (resource_size_t)1U << bits; |
| } |
| |
| return i; |
| } |
| |
| /* atmu setup for fsl pci/pcie controller */ |
| static void __init setup_pci_atmu(struct pci_controller *hose, |
| struct resource *rsrc) |
| { |
| struct ccsr_pci __iomem *pci; |
| int i, j, n; |
| |
| pr_debug("PCI memory map start 0x%016llx, size 0x%016llx\n", |
| (u64)rsrc->start, (u64)rsrc->end - (u64)rsrc->start + 1); |
| pci = ioremap(rsrc->start, rsrc->end - rsrc->start + 1); |
| if (!pci) { |
| dev_err(hose->parent, "Unable to map ATMU registers\n"); |
| return; |
| } |
| |
| /* Disable all windows (except powar0 since it's ignored) */ |
| for(i = 1; i < 5; i++) |
| out_be32(&pci->pow[i].powar, 0); |
| for(i = 0; i < 3; i++) |
| out_be32(&pci->piw[i].piwar, 0); |
| |
| /* Setup outbound MEM window */ |
| for(i = 0, j = 1; i < 3; i++) { |
| if (!(hose->mem_resources[i].flags & IORESOURCE_MEM)) |
| continue; |
| |
| n = setup_one_atmu(pci, j, &hose->mem_resources[i], |
| hose->pci_mem_offset); |
| |
| if (n < 0 || j >= 5) { |
| pr_err("Ran out of outbound PCI ATMUs for resource %d!\n", i); |
| hose->mem_resources[i].flags |= IORESOURCE_DISABLED; |
| } else |
| j += n; |
| } |
| |
| /* Setup outbound IO window */ |
| if (hose->io_resource.flags & IORESOURCE_IO) { |
| if (j >= 5) { |
| pr_err("Ran out of outbound PCI ATMUs for IO resource\n"); |
| } else { |
| pr_debug("PCI IO resource start 0x%016llx, size 0x%016llx, " |
| "phy base 0x%016llx.\n", |
| (u64)hose->io_resource.start, |
| (u64)hose->io_resource.end - (u64)hose->io_resource.start + 1, |
| (u64)hose->io_base_phys); |
| out_be32(&pci->pow[j].potar, (hose->io_resource.start >> 12)); |
| out_be32(&pci->pow[j].potear, 0); |
| out_be32(&pci->pow[j].powbar, (hose->io_base_phys >> 12)); |
| /* Enable, IO R/W */ |
| out_be32(&pci->pow[j].powar, 0x80088000 |
| | (__ilog2(hose->io_resource.end |
| - hose->io_resource.start + 1) - 1)); |
| } |
| } |
| |
| /* Setup 2G inbound Memory Window @ 1 */ |
| out_be32(&pci->piw[2].pitar, 0x00000000); |
| out_be32(&pci->piw[2].piwbar,0x00000000); |
| out_be32(&pci->piw[2].piwar, PIWAR_2G); |
| |
| iounmap(pci); |
| } |
| |
| static void __init setup_pci_cmd(struct pci_controller *hose) |
| { |
| u16 cmd; |
| int cap_x; |
| |
| early_read_config_word(hose, 0, 0, PCI_COMMAND, &cmd); |
| cmd |= PCI_COMMAND_SERR | PCI_COMMAND_MASTER | PCI_COMMAND_MEMORY |
| | PCI_COMMAND_IO; |
| early_write_config_word(hose, 0, 0, PCI_COMMAND, cmd); |
| |
| cap_x = early_find_capability(hose, 0, 0, PCI_CAP_ID_PCIX); |
| if (cap_x) { |
| int pci_x_cmd = cap_x + PCI_X_CMD; |
| cmd = PCI_X_CMD_MAX_SPLIT | PCI_X_CMD_MAX_READ |
| | PCI_X_CMD_ERO | PCI_X_CMD_DPERR_E; |
| early_write_config_word(hose, 0, 0, pci_x_cmd, cmd); |
| } else { |
| early_write_config_byte(hose, 0, 0, PCI_LATENCY_TIMER, 0x80); |
| } |
| } |
| |
| static void __init setup_pci_pcsrbar(struct pci_controller *hose) |
| { |
| #ifdef CONFIG_PCI_MSI |
| phys_addr_t immr_base; |
| |
| immr_base = get_immrbase(); |
| early_write_config_dword(hose, 0, 0, PCI_BASE_ADDRESS_0, immr_base); |
| #endif |
| } |
| |
| static int fsl_pcie_bus_fixup; |
| |
| static void __init quirk_fsl_pcie_header(struct pci_dev *dev) |
| { |
| /* if we aren't a PCIe don't bother */ |
| if (!pci_find_capability(dev, PCI_CAP_ID_EXP)) |
| return ; |
| |
| dev->class = PCI_CLASS_BRIDGE_PCI << 8; |
| fsl_pcie_bus_fixup = 1; |
| return ; |
| } |
| |
| static int __init fsl_pcie_check_link(struct pci_controller *hose) |
| { |
| u32 val; |
| early_read_config_dword(hose, 0, 0, PCIE_LTSSM, &val); |
| if (val < PCIE_LTSSM_L0) |
| return 1; |
| return 0; |
| } |
| |
| void fsl_pcibios_fixup_bus(struct pci_bus *bus) |
| { |
| struct pci_controller *hose = (struct pci_controller *) bus->sysdata; |
| int i; |
| |
| if ((bus->parent == hose->bus) && |
| ((fsl_pcie_bus_fixup && |
| early_find_capability(hose, 0, 0, PCI_CAP_ID_EXP)) || |
| (hose->indirect_type & PPC_INDIRECT_TYPE_NO_PCIE_LINK))) |
| { |
| for (i = 0; i < 4; ++i) { |
| struct resource *res = bus->resource[i]; |
| struct resource *par = bus->parent->resource[i]; |
| if (res) { |
| res->start = 0; |
| res->end = 0; |
| res->flags = 0; |
| } |
| if (res && par) { |
| res->start = par->start; |
| res->end = par->end; |
| res->flags = par->flags; |
| } |
| } |
| } |
| } |
| |
| int __init fsl_add_bridge(struct device_node *dev, int is_primary) |
| { |
| int len; |
| struct pci_controller *hose; |
| struct resource rsrc; |
| const int *bus_range; |
| |
| pr_debug("Adding PCI host bridge %s\n", dev->full_name); |
| |
| /* Fetch host bridge registers address */ |
| if (of_address_to_resource(dev, 0, &rsrc)) { |
| printk(KERN_WARNING "Can't get pci register base!"); |
| return -ENOMEM; |
| } |
| |
| /* Get bus range if any */ |
| bus_range = of_get_property(dev, "bus-range", &len); |
| if (bus_range == NULL || len < 2 * sizeof(int)) |
| printk(KERN_WARNING "Can't get bus-range for %s, assume" |
| " bus 0\n", dev->full_name); |
| |
| ppc_pci_add_flags(PPC_PCI_REASSIGN_ALL_BUS); |
| hose = pcibios_alloc_controller(dev); |
| if (!hose) |
| return -ENOMEM; |
| |
| hose->first_busno = bus_range ? bus_range[0] : 0x0; |
| hose->last_busno = bus_range ? bus_range[1] : 0xff; |
| |
| setup_indirect_pci(hose, rsrc.start, rsrc.start + 0x4, |
| PPC_INDIRECT_TYPE_BIG_ENDIAN); |
| setup_pci_cmd(hose); |
| |
| /* check PCI express link status */ |
| if (early_find_capability(hose, 0, 0, PCI_CAP_ID_EXP)) { |
| hose->indirect_type |= PPC_INDIRECT_TYPE_EXT_REG | |
| PPC_INDIRECT_TYPE_SURPRESS_PRIMARY_BUS; |
| if (fsl_pcie_check_link(hose)) |
| hose->indirect_type |= PPC_INDIRECT_TYPE_NO_PCIE_LINK; |
| } |
| |
| printk(KERN_INFO "Found FSL PCI host bridge at 0x%016llx. " |
| "Firmware bus number: %d->%d\n", |
| (unsigned long long)rsrc.start, hose->first_busno, |
| hose->last_busno); |
| |
| pr_debug(" ->Hose at 0x%p, cfg_addr=0x%p,cfg_data=0x%p\n", |
| hose, hose->cfg_addr, hose->cfg_data); |
| |
| /* Interpret the "ranges" property */ |
| /* This also maps the I/O region and sets isa_io/mem_base */ |
| pci_process_bridge_OF_ranges(hose, dev, is_primary); |
| |
| /* Setup PEX window registers */ |
| setup_pci_atmu(hose, &rsrc); |
| |
| /* Setup PEXCSRBAR */ |
| setup_pci_pcsrbar(hose); |
| return 0; |
| } |
| |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8548E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8548, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8543E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8543, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8547E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8545E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8545, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8568E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8568, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8567E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8567, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8533E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8533, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8544E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8544, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8572E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8572, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8536E, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8536, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8641, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8641D, quirk_fsl_pcie_header); |
| DECLARE_PCI_FIXUP_HEADER(0x1957, PCI_DEVICE_ID_MPC8610, quirk_fsl_pcie_header); |
| #endif /* CONFIG_PPC_85xx || CONFIG_PPC_86xx */ |
| |
| #if defined(CONFIG_PPC_83xx) || defined(CONFIG_PPC_MPC512x) |
| int __init mpc83xx_add_bridge(struct device_node *dev) |
| { |
| int len; |
| struct pci_controller *hose; |
| struct resource rsrc_reg; |
| struct resource rsrc_cfg; |
| const int *bus_range; |
| int primary; |
| |
| pr_debug("Adding PCI host bridge %s\n", dev->full_name); |
| |
| /* Fetch host bridge registers address */ |
| if (of_address_to_resource(dev, 0, &rsrc_reg)) { |
| printk(KERN_WARNING "Can't get pci register base!\n"); |
| return -ENOMEM; |
| } |
| |
| memset(&rsrc_cfg, 0, sizeof(rsrc_cfg)); |
| |
| if (of_address_to_resource(dev, 1, &rsrc_cfg)) { |
| printk(KERN_WARNING |
| "No pci config register base in dev tree, " |
| "using default\n"); |
| /* |
| * MPC83xx supports up to two host controllers |
| * one at 0x8500 has config space registers at 0x8300 |
| * one at 0x8600 has config space registers at 0x8380 |
| */ |
| if ((rsrc_reg.start & 0xfffff) == 0x8500) |
| rsrc_cfg.start = (rsrc_reg.start & 0xfff00000) + 0x8300; |
| else if ((rsrc_reg.start & 0xfffff) == 0x8600) |
| rsrc_cfg.start = (rsrc_reg.start & 0xfff00000) + 0x8380; |
| } |
| /* |
| * Controller at offset 0x8500 is primary |
| */ |
| if ((rsrc_reg.start & 0xfffff) == 0x8500) |
| primary = 1; |
| else |
| primary = 0; |
| |
| /* Get bus range if any */ |
| bus_range = of_get_property(dev, "bus-range", &len); |
| if (bus_range == NULL || len < 2 * sizeof(int)) { |
| printk(KERN_WARNING "Can't get bus-range for %s, assume" |
| " bus 0\n", dev->full_name); |
| } |
| |
| ppc_pci_add_flags(PPC_PCI_REASSIGN_ALL_BUS); |
| hose = pcibios_alloc_controller(dev); |
| if (!hose) |
| return -ENOMEM; |
| |
| hose->first_busno = bus_range ? bus_range[0] : 0; |
| hose->last_busno = bus_range ? bus_range[1] : 0xff; |
| |
| setup_indirect_pci(hose, rsrc_cfg.start, rsrc_cfg.start + 4, 0); |
| |
| printk(KERN_INFO "Found FSL PCI host bridge at 0x%016llx. " |
| "Firmware bus number: %d->%d\n", |
| (unsigned long long)rsrc_reg.start, hose->first_busno, |
| hose->last_busno); |
| |
| pr_debug(" ->Hose at 0x%p, cfg_addr=0x%p,cfg_data=0x%p\n", |
| hose, hose->cfg_addr, hose->cfg_data); |
| |
| /* Interpret the "ranges" property */ |
| /* This also maps the I/O region and sets isa_io/mem_base */ |
| pci_process_bridge_OF_ranges(hose, dev, primary); |
| |
| return 0; |
| } |
| #endif /* CONFIG_PPC_83xx */ |