/* * allwinner PCIe host controller driver * * Copyright (c) 2007-2017 Allwinnertech Co., Ltd. * * Author: wangjx * yangshounan * * This software is licensed under the terms of the GNU General Public * License version 2, as published by the Free Software Foundation, and * may be copied, distributed, and modified under those terms. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * */ #include #include #include #include #include #include #include #include #include #include #include #include "pcie-sunxi.h" /* Synopsis specific PCIE configuration registers */ #define PCIE_PORT_LINK_CONTROL 0x710 #define PORT_LINK_MODE_MASK (0x3f << 16) #define PORT_LINK_MODE_1_LANES (0x1 << 16) #define PORT_LINK_MODE_2_LANES (0x3 << 16) #define PORT_LINK_MODE_4_LANES (0x7 << 16) #define PCIE_LINK_WIDTH_SPEED_CONTROL 0x80C #define PORT_LOGIC_SPEED_CHANGE (0x1 << 17) #define PORT_LOGIC_LINK_WIDTH_MASK (0x1ff << 8) #define PORT_LOGIC_LINK_WIDTH_1_LANES (0x1 << 8) #define PORT_LOGIC_LINK_WIDTH_2_LANES (0x2 << 8) #define PORT_LOGIC_LINK_WIDTH_4_LANES (0x4 << 8) #define PCIE_ATU_VIEWPORT 0x900 #define PCIE_ATU_REGION_INBOUND (0x1 << 31) #define PCIE_ATU_REGION_OUTBOUND (0x0 << 31) #define PCIE_ATU_REGION_INDEX1 (0x1 << 0) #define PCIE_ATU_REGION_INDEX0 (0x0 << 0) #define PCIE_ATU_CR1 0x904 #define PCIE_ATU_TYPE_MEM (0x0 << 0) #define PCIE_ATU_TYPE_IO (0x2 << 0) #define PCIE_ATU_TYPE_CFG0 (0x4 << 0) #define PCIE_ATU_TYPE_CFG1 (0x5 << 0) #define PCIE_ATU_CR2 0x908 #define PCIE_ATU_ENABLE (0x1 << 31) #define PCIE_ATU_BAR_MODE_ENABLE (0x1 << 30) #define PCIE_ATU_LOWER_BASE 0x90C #define PCIE_ATU_UPPER_BASE 0x910 #define PCIE_ATU_LIMIT 0x914 #define PCIE_ATU_LOWER_TARGET 0x918 #define PCIE_ATU_BUS(x) (((x) & 0xff) << 24) #define PCIE_ATU_DEV(x) (((x) & 0x1f) << 19) #define PCIE_ATU_FUNC(x) (((x) & 0x7) << 16) #define PCIE_ATU_UPPER_TARGET 0x91C #define PCIE_MISC_CONTROL_1_CFG 0x8bc #define PCIE_TYPE1_CLASS_CODE_REV_ID_REG 0x08 #define PCIE_ADDR_PAGE_CFG 0x1020 #define PCIE_AWMISC_CTRL 0x1030 #define PCIE_ARMISC_CTRL 0x1034 #define PCIE_PAGE 0x10000 #define PCIE_ADDRESS_ALIGNING (~0x3) #define PCIE_HIGH_16 16 #define PCIE_BAR_NUM 6 #define PCIE_MEM_FLAGS 0x4 #define PCIE_IO_FLAGS 0x1 #define PCIE_BAR_REG 0x4 #define PCIE_HIGH16_MASK 0xffff0000 #define PCIE_LOW16_MASK 0x0000ffff #define PCIE_INTERRUPT_LINE_MASK 0xffff00ff #define PCIE_INTERRUPT_LINE_ENABLE 0x00000100 #define PCIE_PRIMARY_BUS_MASK 0xff000000 #define PCIE_PRIMARY_BUS_ENABLE 0x00010100 #define PCIE_MEMORY_MASK 0xfff00000 static struct hw_pci sunxi_pci; static void __iomem *dbi_base; static void __iomem *mem_base_start; static unsigned long global_io_offset; static inline struct pcie_port *sys_to_pcie(struct pci_sys_data *sys) { return sys->private_data; } int sunxi_pcie_cfg_read(void __iomem *addr, int where, int size, u32 *val) { *val = readl(addr); if (size == 1) *val = (*val >> (8 * (where & 3))) & 0xff; else if (size == 2) *val = (*val >> (8 * (where & 3))) & 0xffff; else if (size != 4) return PCIBIOS_BAD_REGISTER_NUMBER; return PCIBIOS_SUCCESSFUL; } int sunxi_pcie_cfg_write(void __iomem *addr, int where, int size, u32 val) { if (size == 4) writel(val, addr); else if (size == 2) writew(val, addr + (where & 2)); else if (size == 1) writeb(val, addr + (where & 3)); else return PCIBIOS_BAD_REGISTER_NUMBER; return PCIBIOS_SUCCESSFUL; } static inline void sunxi_pcie_readl_rc(struct pcie_port *pp, u32 reg, u32 *val) { if (pp->ops->readl_rc) pp->ops->readl_rc(pp, pp->dbi_base + reg, val); else *val = readl(pp->dbi_base + reg); } static inline void sunxi_pcie_writel_rc(struct pcie_port *pp, u32 val, u32 reg) { if (pp->ops->writel_rc) pp->ops->writel_rc(pp, val, pp->dbi_base + reg); else writel(val, pp->dbi_base + reg); } int sunxi_pcie_rd_own_conf(struct pcie_port *pp, int where, int size, u32 *val) { int ret; if (pp->ops->rd_own_conf) ret = pp->ops->rd_own_conf(pp, where, size, val); else ret = sunxi_pcie_cfg_read(pp->dbi_base + (where & ~0x3), where, size, val); return ret; } int sunxi_pcie_wr_own_conf(struct pcie_port *pp, int where, int size, u32 val) { int ret; if (pp->ops->wr_own_conf) ret = pp->ops->wr_own_conf(pp, where, size, val); else ret = sunxi_pcie_cfg_write(pp->dbi_base + (where & ~0x3), where, size, val); return ret; } static struct irq_chip sunxi_msi_irq_chip = { .name = "PCI-MSI", .irq_enable = unmask_msi_irq, .irq_disable = mask_msi_irq, .irq_mask = mask_msi_irq, .irq_unmask = unmask_msi_irq, }; /* MSI int handler */ irqreturn_t sunxi_handle_msi_irq(struct pcie_port *pp) { unsigned long val; int i, pos, irq; irqreturn_t ret = IRQ_NONE; for (i = 0; i < MAX_MSI_CTRLS; i++) { sunxi_pcie_rd_own_conf(pp, PCIE_MSI_INTR0_STATUS + i * 12, 4, (u32 *)&val); if (val) { ret = IRQ_HANDLED; pos = 0; while ((pos = find_next_bit(&val, 32, pos)) != 32) { irq = irq_find_mapping(pp->irq_domain, i * 32 + pos); sunxi_pcie_wr_own_conf(pp, PCIE_MSI_INTR0_STATUS + i * 12, 4, 1 << pos); generic_handle_irq(irq); pos++; } } } return ret; } void sunxi_pcie_msi_init(struct pcie_port *pp) { u64 msi_target; pp->msi_data = __get_free_pages(GFP_KERNEL, 0); msi_target = virt_to_phys((void *)pp->msi_data); /* program the msi_data */ sunxi_pcie_wr_own_conf(pp, PCIE_MSI_ADDR_LO, 4, (u32)(msi_target & 0xffffffff)); sunxi_pcie_wr_own_conf(pp, PCIE_MSI_ADDR_HI, 4, (u32)(msi_target >> 32 & 0xffffffff)); } static int find_valid_pos0(struct pcie_port *pp, int msgvec, int pos, int *pos0) { int flag = 1; do { pos = find_next_zero_bit(pp->msi_irq_in_use, MAX_MSI_IRQS, pos); /*if you have reached to the end then get out from here.*/ if (pos == MAX_MSI_IRQS) return -ENOSPC; /* * Check if this position is at correct offset.nvec is always a * power of two. pos0 must be nvec bit aligned. */ if (pos % msgvec) pos += msgvec - (pos % msgvec); else flag = 0; } while (flag); *pos0 = pos; return 0; } static void clear_irq_range(struct pcie_port *pp, unsigned int irq_base, unsigned int nvec, unsigned int pos) { unsigned int i, res, bit, val; for (i = 0; i < nvec; i++) { irq_set_msi_desc_off(irq_base, i, NULL); clear_bit(pos + i, pp->msi_irq_in_use); /* Disable corresponding interrupt on MSI controller */ res = ((pos + i) / 32) * 12; bit = (pos + i) % 32; sunxi_pcie_rd_own_conf(pp, PCIE_MSI_INTR0_ENABLE + res, 4, &val); val &= ~(1 << bit); sunxi_pcie_wr_own_conf(pp, PCIE_MSI_INTR0_ENABLE + res, 4, val); } } static int assign_irq(int no_irqs, struct msi_desc *desc, int *pos) { int res, bit, irq, pos0, pos1, i; u32 val; struct pcie_port *pp = sys_to_pcie(desc->dev->bus->sysdata); if (!pp) { BUG(); return -EINVAL; } pos0 = find_first_zero_bit(pp->msi_irq_in_use, MAX_MSI_IRQS); if (pos0 % no_irqs) { if (find_valid_pos0(pp, no_irqs, pos0, &pos0)) goto no_valid_irq; } if (no_irqs > 1) { pos1 = find_next_bit(pp->msi_irq_in_use, MAX_MSI_IRQS, pos0); /* there must be nvec number of consecutive free bits */ while ((pos1 - pos0) < no_irqs) { if (find_valid_pos0(pp, no_irqs, pos1, &pos0)) goto no_valid_irq; pos1 = find_next_bit(pp->msi_irq_in_use, MAX_MSI_IRQS, pos0); } } irq = irq_find_mapping(pp->irq_domain, pos0); if (!irq) goto no_valid_irq; /* * irq_create_mapping (called from sunxi_pcie_host_init) pre-allocates * descs so there is no need to allocate descs here. We can therefore * assume that if irq_find_mapping above returns non-zero, then the * descs are also successfully allocated. */ for (i = 0; i < no_irqs; i++) { if (irq_set_msi_desc_off(irq, i, desc) != 0) { clear_irq_range(pp, irq, i, pos0); goto no_valid_irq; } set_bit(pos0 + i, pp->msi_irq_in_use); /*Enable corresponding interrupt in MSI interrupt controller */ res = ((pos0 + i) / 32) * 12; bit = (pos0 + i) % 32; sunxi_pcie_rd_own_conf(pp, PCIE_MSI_INTR0_ENABLE + res, 4, &val); val |= 1 << bit; sunxi_pcie_wr_own_conf(pp, PCIE_MSI_INTR0_ENABLE + res, 4, val); } *pos = pos0; return irq; no_valid_irq: *pos = pos0; return -ENOSPC; } static void clear_irq(unsigned int irq) { unsigned int pos, nvec; struct msi_desc *msi; struct pcie_port *pp; struct irq_data *data = irq_get_irq_data(irq); /* get the port structure */ msi = irq_data_get_msi(data); if (NULL == msi) return; pp = sys_to_pcie(msi->dev->bus->sysdata); if (!pp) { BUG(); return; } /* undo what was done in assign_irq */ pos = data->hwirq; nvec = 1 << msi->msi_attrib.multiple; clear_irq_range(pp, irq, nvec, pos); /* all irqs cleared; reset attributes */ msi->irq = 0; msi->msi_attrib.multiple = 0; } static int sunxi_msi_setup_irq(struct msi_chip *chip, struct pci_dev *pdev, struct msi_desc *desc) { int irq, pos, msgvec; u16 msg_ctr; struct msi_msg msg; u64 msi_target; struct pcie_port *pp = sys_to_pcie(pdev->bus->sysdata); if (!pp) { BUG(); return -EINVAL; } pci_read_config_word(pdev, desc->msi_attrib.pos+PCI_MSI_FLAGS, &msg_ctr); msgvec = (msg_ctr&PCI_MSI_FLAGS_QSIZE) >> 4; if (msgvec == 0) msgvec = (msg_ctr & PCI_MSI_FLAGS_QMASK) >> 1; if (msgvec > 5) msgvec = 0; irq = assign_irq((1 << msgvec), desc, &pos); if (irq < 0) return irq; /* * write_msi_msg() will update PCI_MSI_FLAGS so there is * no need to explicitly call pci_write_config_word(). */ desc->msi_attrib.multiple = msgvec; msi_target = virt_to_phys((void *)pp->msi_data); msg.address_lo = (u32)(msi_target & 0xffffffff); msg.address_hi = (u32)(msi_target >> 32 & 0xffffffff); msg.data = pos; write_msi_msg(irq, &msg); return 0; } static void sunxi_msi_teardown_irq(struct msi_chip *chip, unsigned int irq) { clear_irq(irq); } static struct msi_chip sunxi_pcie_msi_chip = { .setup_irq = sunxi_msi_setup_irq, .teardown_irq = sunxi_msi_teardown_irq, }; int sunxi_pcie_link_up(struct pcie_port *pp) { if (pp->ops->link_up) return pp->ops->link_up(pp); else return 0; } static int sunxi_pcie_msi_map(struct irq_domain *domain, unsigned int irq, irq_hw_number_t hwirq) { irq_set_chip_and_handler(irq, &sunxi_msi_irq_chip, handle_simple_irq); irq_set_chip_data(irq, domain->host_data); return 0; } static const struct irq_domain_ops msi_domain_ops = { .map = sunxi_pcie_msi_map, }; int __init sunxi_pcie_host_init(struct pcie_port *pp) { struct device_node *np = pp->dev->of_node; struct of_pci_range range; struct of_pci_range_parser parser; u32 val; int i; if (of_pci_range_parser_init(&parser, np)) { dev_err(pp->dev, "missing ranges property\n"); return -EINVAL; } /* Get the I/O and memory ranges from DT */ for_each_of_pci_range(&parser, &range) { unsigned long restype = range.flags & IORESOURCE_TYPE_BITS; if (restype == IORESOURCE_IO) { of_pci_range_to_resource(&range, np, &pp->io); pp->io.name = "I/O"; pp->io.start = max_t(resource_size_t, PCIBIOS_MIN_IO, range.pci_addr + global_io_offset); pp->io.end = min_t(resource_size_t, IO_SPACE_LIMIT, range.pci_addr + range.size + global_io_offset); pp->config.io_size = resource_size(&pp->io); pp->config.io_bus_addr = range.pci_addr; pp->io_base = range.cpu_addr; } if (restype == IORESOURCE_MEM) { of_pci_range_to_resource(&range, np, &pp->mem); pp->mem.name = "MEM"; pp->config.mem_size = resource_size(&pp->mem); pp->config.mem_bus_addr = range.pci_addr; } if (restype == 0) { of_pci_range_to_resource(&range, np, &pp->cfg); /* pp->config.cfg0_size = resource_size(&pp->cfg)/2; */ pp->config.cfg0_size = resource_size(&pp->cfg); /* pp->config.cfg1_size = resource_size(&pp->cfg)/2; */ } } if (!pp->dbi_base) { pp->dbi_base = devm_ioremap(pp->dev, pp->cfg.start, resource_size(&pp->cfg)); if (!pp->dbi_base) { dev_err(pp->dev, "error with ioremap\n"); return -ENOMEM; } } dbi_base = pp->dbi_base; pp->cfg0_base = pp->cfg.start; /* pp->cfg1_base = pp->cfg.start + pp->config.cfg0_size; */ pp->mem_base = pp->mem.start; pp->va_cfg0_base = devm_ioremap(pp->dev, pp->cfg0_base, pp->config.cfg0_size); mem_base_start = pp->va_cfg0_base; if (!pp->va_cfg0_base) { dev_err(pp->dev, "error with ioremap in function\n"); return -ENOMEM; } /* pp->va_cfg1_base = devm_ioremap(pp->dev, pp->cfg1_base, pp->config.cfg1_size); if (!pp->va_cfg1_base) { dev_err(pp->dev, "error with ioremap\n"); return -ENOMEM; } */ if (of_property_read_u32(np, "num-lanes", &pp->lanes)) { dev_err(pp->dev, "Failed to parse the number of lanes\n"); return -EINVAL; } if (IS_ENABLED(CONFIG_PCI_MSI)) { pp->irq_domain = irq_domain_add_linear(pp->dev->of_node, MAX_MSI_IRQS, &msi_domain_ops, &sunxi_pcie_msi_chip); if (!pp->irq_domain) { dev_err(pp->dev, "irq domain init failed\n"); return -ENXIO; } for (i = 0; i < MAX_MSI_IRQS; i++) irq_create_mapping(pp->irq_domain, i); } if (pp->ops->host_init) pp->ops->host_init(pp); sunxi_pcie_wr_own_conf(pp, PCI_BASE_ADDRESS_0, 4, 0); /* program correct class for RC */ sunxi_pcie_wr_own_conf(pp, PCI_CLASS_DEVICE, 2, PCI_CLASS_BRIDGE_PCI); sunxi_pcie_rd_own_conf(pp, PCIE_LINK_WIDTH_SPEED_CONTROL, 4, &val); val |= PORT_LOGIC_SPEED_CHANGE; sunxi_pcie_wr_own_conf(pp, PCIE_LINK_WIDTH_SPEED_CONTROL, 4, val); sunxi_pci.nr_controllers = 1; sunxi_pci.private_data = (void **)&pp; pci_common_init_dev(pp->dev, &sunxi_pci); pci_assign_unassigned_resources(); #ifdef CONFIG_PCI_DOMAINS sunxi_pci.domain++; #endif return 0; } static void sunxi_pcie_prog_viewport_cfg0(struct pcie_port *pp, u32 busdev) { /* Program viewport 0 : OUTBOUND : CFG0 */ sunxi_pcie_writel_rc(pp, PCIE_ATU_REGION_OUTBOUND | PCIE_ATU_REGION_INDEX0, PCIE_ATU_VIEWPORT); sunxi_pcie_writel_rc(pp, pp->cfg0_base, PCIE_ATU_LOWER_BASE); sunxi_pcie_writel_rc(pp, (pp->cfg0_base >> 32), PCIE_ATU_UPPER_BASE); sunxi_pcie_writel_rc(pp, pp->cfg0_base + pp->config.cfg0_size - 1, PCIE_ATU_LIMIT); sunxi_pcie_writel_rc(pp, busdev, PCIE_ATU_LOWER_TARGET); sunxi_pcie_writel_rc(pp, 0, PCIE_ATU_UPPER_TARGET); sunxi_pcie_writel_rc(pp, PCIE_ATU_TYPE_CFG0, PCIE_ATU_CR1); sunxi_pcie_writel_rc(pp, PCIE_ATU_ENABLE, PCIE_ATU_CR2); } static void sunxi_pcie_prog_viewport_cfg1(struct pcie_port *pp, u32 busdev) { /* Program viewport 1 : OUTBOUND : CFG1 */ sunxi_pcie_writel_rc(pp, PCIE_ATU_REGION_OUTBOUND | PCIE_ATU_REGION_INDEX1, PCIE_ATU_VIEWPORT); sunxi_pcie_writel_rc(pp, PCIE_ATU_TYPE_CFG1, PCIE_ATU_CR1); sunxi_pcie_writel_rc(pp, pp->cfg1_base, PCIE_ATU_LOWER_BASE); sunxi_pcie_writel_rc(pp, (pp->cfg1_base >> 32), PCIE_ATU_UPPER_BASE); sunxi_pcie_writel_rc(pp, pp->cfg1_base + pp->config.cfg1_size - 1, PCIE_ATU_LIMIT); sunxi_pcie_writel_rc(pp, busdev, PCIE_ATU_LOWER_TARGET); sunxi_pcie_writel_rc(pp, 0, PCIE_ATU_UPPER_TARGET); sunxi_pcie_writel_rc(pp, PCIE_ATU_ENABLE, PCIE_ATU_CR2); } static void sunxi_pcie_prog_viewport_mem_outbound(struct pcie_port *pp) { /* Program viewport 0 : OUTBOUND : MEM */ sunxi_pcie_writel_rc(pp, PCIE_ATU_REGION_OUTBOUND | PCIE_ATU_REGION_INDEX0, PCIE_ATU_VIEWPORT); sunxi_pcie_writel_rc(pp, PCIE_ATU_TYPE_MEM, PCIE_ATU_CR1); sunxi_pcie_writel_rc(pp, pp->mem_base, PCIE_ATU_LOWER_BASE); sunxi_pcie_writel_rc(pp, (pp->mem_base >> 32), PCIE_ATU_UPPER_BASE); sunxi_pcie_writel_rc(pp, pp->mem_base + pp->config.mem_size - 1, PCIE_ATU_LIMIT); sunxi_pcie_writel_rc(pp, pp->config.mem_bus_addr, PCIE_ATU_LOWER_TARGET); sunxi_pcie_writel_rc(pp, upper_32_bits(pp->config.mem_bus_addr), PCIE_ATU_UPPER_TARGET); sunxi_pcie_writel_rc(pp, PCIE_ATU_ENABLE, PCIE_ATU_CR2); } static void sunxi_pcie_prog_viewport_io_outbound(struct pcie_port *pp) { /* Program viewport 1 : OUTBOUND : IO */ sunxi_pcie_writel_rc(pp, PCIE_ATU_REGION_OUTBOUND | PCIE_ATU_REGION_INDEX1, PCIE_ATU_VIEWPORT); sunxi_pcie_writel_rc(pp, PCIE_ATU_TYPE_IO, PCIE_ATU_CR1); sunxi_pcie_writel_rc(pp, pp->io_base, PCIE_ATU_LOWER_BASE); sunxi_pcie_writel_rc(pp, (pp->io_base >> 32), PCIE_ATU_UPPER_BASE); sunxi_pcie_writel_rc(pp, pp->io_base + pp->config.io_size - 1, PCIE_ATU_LIMIT); sunxi_pcie_writel_rc(pp, pp->config.io_bus_addr, PCIE_ATU_LOWER_TARGET); sunxi_pcie_writel_rc(pp, upper_32_bits(pp->config.io_bus_addr), PCIE_ATU_UPPER_TARGET); sunxi_pcie_writel_rc(pp, PCIE_ATU_ENABLE, PCIE_ATU_CR2); } static int sunxi_pcie_rd_other_conf(struct pcie_port *pp, struct pci_bus *bus, u32 devfn, int where, int size, u32 *val) { int ret = PCIBIOS_SUCCESSFUL; u32 address, busdev; int i; u32 pcie_page; #ifdef CONFIG_ARCH_SUN50IW6 unsigned long flags = 0; #endif busdev = PCIE_ATU_BUS(bus->number) | PCIE_ATU_DEV(PCI_SLOT(devfn)) | PCIE_ATU_FUNC(PCI_FUNC(devfn)); address = where & PCIE_ADDRESS_ALIGNING; if (bus->parent->number == pp->root_bus_nr) { #ifdef CONFIG_ARCH_SUN50IW6 flags = sunxi_pcie_cutpage_spin_lock(); #endif sunxi_pcie_writel_rc(pp, (pp->cfg0_base >> PCIE_HIGH_16), PCIE_ADDR_PAGE_CFG); sunxi_pcie_prog_viewport_cfg0(pp, busdev); ret = sunxi_pcie_cfg_read(pp->va_cfg0_base + address, where, size, val); for (i = 0; i < PCIE_BAR_NUM; i++) { pcie_page = readl(pp->va_cfg0_base + PCI_BASE_ADDRESS_0 + i * PCIE_BAR_REG); if (pcie_page & PCIE_MEM_FLAGS) break; } sunxi_pcie_writel_rc(pp, (pcie_page >> PCIE_HIGH_16), PCIE_ADDR_PAGE_CFG); sunxi_pcie_prog_viewport_mem_outbound(pp); #ifdef CONFIG_ARCH_SUN50IW6 sunxi_pcie_cutpage_spin_unlock(flags); #endif } else { sunxi_pcie_writel_rc(pp, (pp->cfg0_base >> PCIE_HIGH_16), PCIE_ADDR_PAGE_CFG); sunxi_pcie_prog_viewport_cfg1(pp, busdev); ret = sunxi_pcie_cfg_read(pp->va_cfg1_base + address, where, size, val); for (i = 0; i < PCIE_BAR_NUM; i++) { pcie_page = readl(pp->va_cfg0_base + PCI_BASE_ADDRESS_0 + i * PCIE_BAR_REG); if (pcie_page & PCIE_IO_FLAGS) break; } sunxi_pcie_writel_rc(pp, (pcie_page >> PCIE_HIGH_16), PCIE_ADDR_PAGE_CFG); sunxi_pcie_prog_viewport_io_outbound(pp); } return ret; } static int sunxi_pcie_wr_other_conf(struct pcie_port *pp, struct pci_bus *bus, u32 devfn, int where, int size, u32 val) { int ret = PCIBIOS_SUCCESSFUL; u32 address, busdev; int i; u32 pcie_page; #ifdef CONFIG_ARCH_SUN50IW6 unsigned long flags = 0; #endif busdev = PCIE_ATU_BUS(bus->number) | PCIE_ATU_DEV(PCI_SLOT(devfn)) | PCIE_ATU_FUNC(PCI_FUNC(devfn)); address = where & PCIE_ADDRESS_ALIGNING; if (bus->parent->number == pp->root_bus_nr) { #ifdef CONFIG_ARCH_SUN50IW6 flags = sunxi_pcie_cutpage_spin_lock(); #endif sunxi_pcie_writel_rc(pp, (pp->cfg0_base >> PCIE_HIGH_16), PCIE_ADDR_PAGE_CFG); sunxi_pcie_prog_viewport_cfg0(pp, busdev); ret = sunxi_pcie_cfg_write(pp->va_cfg0_base + address, where, size, val); for (i = 0; i < PCIE_BAR_NUM; i++) { pcie_page = readl(pp->va_cfg0_base + PCI_BASE_ADDRESS_0 + i * PCIE_BAR_REG); if (pcie_page & PCIE_MEM_FLAGS) break; } sunxi_pcie_writel_rc(pp, (pcie_page >> PCIE_HIGH_16), PCIE_ADDR_PAGE_CFG); sunxi_pcie_prog_viewport_mem_outbound(pp); #ifdef CONFIG_ARCH_SUN50IW6 sunxi_pcie_cutpage_spin_unlock(flags); #endif } else { sunxi_pcie_writel_rc(pp, (pp->cfg0_base >> PCIE_HIGH_16), PCIE_ADDR_PAGE_CFG); sunxi_pcie_prog_viewport_cfg1(pp, busdev); ret = sunxi_pcie_cfg_write(pp->va_cfg1_base + address, where, size, val); for (i = 0; i < PCIE_BAR_NUM; i++) { pcie_page = readl(pp->va_cfg0_base + PCI_BASE_ADDRESS_0 + i * PCIE_BAR_REG); if (pcie_page & PCIE_IO_FLAGS) break; } sunxi_pcie_writel_rc(pp, (pcie_page >> PCIE_HIGH_16), PCIE_ADDR_PAGE_CFG); sunxi_pcie_prog_viewport_io_outbound(pp); } return ret; } static int sunxi_pcie_valid_config(struct pcie_port *pp, struct pci_bus *bus, int dev) { /* If there is no link, then there is no device */ if (bus->number != pp->root_bus_nr) { if (!sunxi_pcie_link_up(pp)) return 0; } /* access only one slot on each root port */ if (bus->number == pp->root_bus_nr && dev > 0) return 0; /* * do not read more than one device on the bus directly attached * to RC's (Virtual Bridge's) DS side. */ if (bus->primary == pp->root_bus_nr && dev > 0) return 0; return 1; } static int sunxi_pcie_rd_conf(struct pci_bus *bus, u32 devfn, int where, int size, u32 *val) { struct pcie_port *pp = sys_to_pcie(bus->sysdata); int ret; if (!pp) { BUG(); return -EINVAL; } if (sunxi_pcie_valid_config(pp, bus, PCI_SLOT(devfn)) == 0) { *val = 0xffffffff; return PCIBIOS_DEVICE_NOT_FOUND; } if (bus->number != pp->root_bus_nr) ret = sunxi_pcie_rd_other_conf(pp, bus, devfn, where, size, val); else ret = sunxi_pcie_rd_own_conf(pp, where, size, val); return ret; } static int sunxi_pcie_wr_conf(struct pci_bus *bus, u32 devfn, int where, int size, u32 val) { struct pcie_port *pp = sys_to_pcie(bus->sysdata); int ret; if (!pp) { BUG(); return -EINVAL; } if (sunxi_pcie_valid_config(pp, bus, PCI_SLOT(devfn)) == 0) return PCIBIOS_DEVICE_NOT_FOUND; if (bus->number != pp->root_bus_nr) ret = sunxi_pcie_wr_other_conf(pp, bus, devfn, where, size, val); else ret = sunxi_pcie_wr_own_conf(pp, where, size, val); return ret; } static struct pci_ops sunxi_pcie_ops = { .read = sunxi_pcie_rd_conf, .write = sunxi_pcie_wr_conf, }; #ifdef CONFIG_ARCH_SUN50IW6 spinlock_t cut_page_reg_spinlock = __SPIN_LOCK_UNLOCKED(cut_page_reg_spinlock); struct pci_page sunxi_pcie_bus_cutpage_config(struct pci_dev *dev, int barnum, u32 bar_base, unsigned long offset) { u32 cutpage; struct pci_page sunxi_page; unsigned long size; size = pci_resource_len(dev, barnum); sunxi_page.mem_base = mem_base_start; bar_base = bar_base & PCIE_HIGH16_MASK; sunxi_page.offset = offset & PCIE_LOW16_MASK; cutpage = bar_base + (((size - 1) & offset) & PCIE_HIGH16_MASK); writel(cutpage >> PCIE_HIGH_16, dbi_base + PCIE_ADDR_PAGE_CFG); return sunxi_page; } EXPORT_SYMBOL(sunxi_pcie_bus_cutpage_config); struct pci_page sunxi_pcie_device_cutpage_config(u32 bar_base, unsigned long offset) { u32 cutpage; struct pci_page sunxi_page; sunxi_page.mem_base = mem_base_start; bar_base = bar_base & PCIE_HIGH16_MASK; sunxi_page.offset = offset & PCIE_LOW16_MASK; cutpage = bar_base + (offset & PCIE_HIGH16_MASK); writel(cutpage >> PCIE_HIGH_16, dbi_base + PCIE_ADDR_PAGE_CFG); return sunxi_page; } EXPORT_SYMBOL(sunxi_pcie_device_cutpage_config); int sunxi_pcie_cutpage_base(u32 bar_base) { writel(bar_base >> PCIE_HIGH_16, dbi_base + PCIE_ADDR_PAGE_CFG); return 0; } EXPORT_SYMBOL(sunxi_pcie_cutpage_base); unsigned long sunxi_pcie_cutpage_spin_lock(void) { unsigned long flags = 0; spin_lock_irqsave(&cut_page_reg_spinlock, flags); return flags; } EXPORT_SYMBOL(sunxi_pcie_cutpage_spin_lock); void sunxi_pcie_cutpage_spin_unlock(unsigned long flags) { spin_unlock_irqrestore(&cut_page_reg_spinlock, flags); } EXPORT_SYMBOL(sunxi_pcie_cutpage_spin_unlock); #endif static int sunxi_pcie_setup(int nr, struct pci_sys_data *sys) { struct pcie_port *pp; pp = sys_to_pcie(sys); if (!pp) return 0; if (global_io_offset < SZ_1M && pp->config.io_size > 0) { sys->io_offset = global_io_offset - pp->config.io_bus_addr; global_io_offset += SZ_64K; pci_add_resource_offset(&sys->resources, &pp->io, sys->io_offset); } sys->mem_offset = pp->mem.start - pp->config.mem_bus_addr; pci_add_resource_offset(&sys->resources, &pp->mem, sys->mem_offset); return 1; } static struct pci_bus *sunxi_pcie_scan_bus(int nr, struct pci_sys_data *sys) { struct pci_bus *bus; struct pcie_port *pp = sys_to_pcie(sys); if (pp) { pp->root_bus_nr = sys->busnr; bus = pci_scan_root_bus(pp->dev, sys->busnr, &sunxi_pcie_ops, sys, &sys->resources); } else { bus = NULL; BUG(); } return bus; } static int sunxi_pcie_map_irq(const struct pci_dev *dev, u8 slot, u8 pin) { struct pcie_port *pp = sys_to_pcie(dev->bus->sysdata); return pp->irq; } static void sunxi_pcie_add_bus(struct pci_bus *bus) { if (IS_ENABLED(CONFIG_PCI_MSI)) { struct pcie_port *pp = sys_to_pcie(bus->sysdata); sunxi_pcie_msi_chip.dev = pp->dev; bus->msi = &sunxi_pcie_msi_chip; } } static struct hw_pci sunxi_pci = { .setup = sunxi_pcie_setup, .scan = sunxi_pcie_scan_bus, .map_irq = sunxi_pcie_map_irq, .add_bus = sunxi_pcie_add_bus, }; void sunxi_pcie_setup_rc(struct pcie_port *pp) { struct pcie_port_info *config = &pp->config; u32 val; u32 membase; u32 memlimit; /* set the number of lanes */ sunxi_pcie_readl_rc(pp, PCIE_PORT_LINK_CONTROL, &val); val &= ~PORT_LINK_MODE_MASK; switch (pp->lanes) { case 1: val |= PORT_LINK_MODE_1_LANES; break; case 2: val |= PORT_LINK_MODE_2_LANES; break; case 4: val |= PORT_LINK_MODE_4_LANES; break; } sunxi_pcie_writel_rc(pp, val, PCIE_PORT_LINK_CONTROL); /* set link width speed control register */ sunxi_pcie_readl_rc(pp, PCIE_LINK_WIDTH_SPEED_CONTROL, &val); val &= ~PORT_LOGIC_LINK_WIDTH_MASK; switch (pp->lanes) { case 1: val |= PORT_LOGIC_LINK_WIDTH_1_LANES; break; case 2: val |= PORT_LOGIC_LINK_WIDTH_2_LANES; break; case 4: val |= PORT_LOGIC_LINK_WIDTH_4_LANES; break; } sunxi_pcie_writel_rc(pp, val, PCIE_LINK_WIDTH_SPEED_CONTROL); sunxi_pcie_readl_rc(pp, PCIE_MISC_CONTROL_1_CFG, &val); val |= 0x1; sunxi_pcie_writel_rc(pp, val, PCIE_MISC_CONTROL_1_CFG); sunxi_pcie_readl_rc(pp, PCIE_TYPE1_CLASS_CODE_REV_ID_REG, &val); val |= PCI_CLASS_BRIDGE_PCI<<16; sunxi_pcie_writel_rc(pp, val, PCIE_TYPE1_CLASS_CODE_REV_ID_REG); sunxi_pcie_readl_rc(pp, PCIE_MISC_CONTROL_1_CFG, &val); val &= ~(0x1<<0); sunxi_pcie_writel_rc(pp, val, PCIE_MISC_CONTROL_1_CFG); /* setup RC BARs */ sunxi_pcie_writel_rc(pp, 0x00000004, PCI_BASE_ADDRESS_0); sunxi_pcie_writel_rc(pp, 0x00000000, PCI_BASE_ADDRESS_1); /* setup interrupt pins */ sunxi_pcie_readl_rc(pp, PCI_INTERRUPT_LINE, &val); val &= PCIE_INTERRUPT_LINE_MASK; val |= PCIE_INTERRUPT_LINE_ENABLE; sunxi_pcie_writel_rc(pp, val, PCI_INTERRUPT_LINE); /* setup bus numbers */ sunxi_pcie_readl_rc(pp, PCI_PRIMARY_BUS, &val); val &= PCIE_PRIMARY_BUS_MASK; val |= PCIE_PRIMARY_BUS_ENABLE; sunxi_pcie_writel_rc(pp, val, PCI_PRIMARY_BUS); /* setup memory base, memory limit */ membase = ((u32)pp->mem_base & PCIE_MEMORY_MASK) >> PCIE_HIGH_16; memlimit = (config->mem_size + (u32)pp->mem_base) & PCIE_MEMORY_MASK; val = memlimit | membase; sunxi_pcie_writel_rc(pp, val, PCI_MEMORY_BASE); sunxi_pcie_readl_rc(pp, PCI_MEMORY_BASE, &val); /* setup command register */ sunxi_pcie_readl_rc(pp, PCI_COMMAND, &val); val &= PCIE_HIGH16_MASK; val |= PCI_COMMAND_IO | PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER | PCI_COMMAND_SERR; sunxi_pcie_writel_rc(pp, val, PCI_COMMAND); } MODULE_AUTHOR("wangjx "); MODULE_DESCRIPTION("sunxi PCIe host controller driver"); MODULE_LICENSE("GPL");