369 lines
9.1 KiB
C
369 lines
9.1 KiB
C
/*
|
|
* Copyright 2003-2011 NetLogic Microsystems, Inc. (NetLogic). All rights
|
|
* reserved.
|
|
*
|
|
* This software is available to you under a choice of one of two
|
|
* licenses. You may choose to be licensed under the terms of the GNU
|
|
* General Public License (GPL) Version 2, available from the file
|
|
* COPYING in the main directory of this source tree, or the NetLogic
|
|
* license below:
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
*
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in
|
|
* the documentation and/or other materials provided with the
|
|
* distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY NETLOGIC ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
|
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL NETLOGIC OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
|
|
* BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
|
|
* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
|
|
* OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
|
|
* IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <linux/types.h>
|
|
#include <linux/pci.h>
|
|
#include <linux/kernel.h>
|
|
#include <linux/init.h>
|
|
#include <linux/msi.h>
|
|
#include <linux/mm.h>
|
|
#include <linux/irq.h>
|
|
#include <linux/irqdesc.h>
|
|
#include <linux/console.h>
|
|
#include <linux/pci_regs.h>
|
|
|
|
#include <asm/io.h>
|
|
|
|
#include <asm/netlogic/interrupt.h>
|
|
#include <asm/netlogic/haldefs.h>
|
|
#include <asm/netlogic/common.h>
|
|
|
|
#include <asm/netlogic/xlr/msidef.h>
|
|
#include <asm/netlogic/xlr/iomap.h>
|
|
#include <asm/netlogic/xlr/pic.h>
|
|
#include <asm/netlogic/xlr/xlr.h>
|
|
|
|
static void *pci_config_base;
|
|
|
|
#define pci_cfg_addr(bus, devfn, off) (((bus) << 16) | ((devfn) << 8) | (off))
|
|
|
|
/* PCI ops */
|
|
static inline u32 pci_cfg_read_32bit(struct pci_bus *bus, unsigned int devfn,
|
|
int where)
|
|
{
|
|
u32 data;
|
|
u32 *cfgaddr;
|
|
|
|
cfgaddr = (u32 *)(pci_config_base +
|
|
pci_cfg_addr(bus->number, devfn, where & ~3));
|
|
data = *cfgaddr;
|
|
return cpu_to_le32(data);
|
|
}
|
|
|
|
static inline void pci_cfg_write_32bit(struct pci_bus *bus, unsigned int devfn,
|
|
int where, u32 data)
|
|
{
|
|
u32 *cfgaddr;
|
|
|
|
cfgaddr = (u32 *)(pci_config_base +
|
|
pci_cfg_addr(bus->number, devfn, where & ~3));
|
|
*cfgaddr = cpu_to_le32(data);
|
|
}
|
|
|
|
static int nlm_pcibios_read(struct pci_bus *bus, unsigned int devfn,
|
|
int where, int size, u32 *val)
|
|
{
|
|
u32 data;
|
|
|
|
if ((size == 2) && (where & 1))
|
|
return PCIBIOS_BAD_REGISTER_NUMBER;
|
|
else if ((size == 4) && (where & 3))
|
|
return PCIBIOS_BAD_REGISTER_NUMBER;
|
|
|
|
data = pci_cfg_read_32bit(bus, devfn, where);
|
|
|
|
if (size == 1)
|
|
*val = (data >> ((where & 3) << 3)) & 0xff;
|
|
else if (size == 2)
|
|
*val = (data >> ((where & 3) << 3)) & 0xffff;
|
|
else
|
|
*val = data;
|
|
|
|
return PCIBIOS_SUCCESSFUL;
|
|
}
|
|
|
|
|
|
static int nlm_pcibios_write(struct pci_bus *bus, unsigned int devfn,
|
|
int where, int size, u32 val)
|
|
{
|
|
u32 data;
|
|
|
|
if ((size == 2) && (where & 1))
|
|
return PCIBIOS_BAD_REGISTER_NUMBER;
|
|
else if ((size == 4) && (where & 3))
|
|
return PCIBIOS_BAD_REGISTER_NUMBER;
|
|
|
|
data = pci_cfg_read_32bit(bus, devfn, where);
|
|
|
|
if (size == 1)
|
|
data = (data & ~(0xff << ((where & 3) << 3))) |
|
|
(val << ((where & 3) << 3));
|
|
else if (size == 2)
|
|
data = (data & ~(0xffff << ((where & 3) << 3))) |
|
|
(val << ((where & 3) << 3));
|
|
else
|
|
data = val;
|
|
|
|
pci_cfg_write_32bit(bus, devfn, where, data);
|
|
|
|
return PCIBIOS_SUCCESSFUL;
|
|
}
|
|
|
|
struct pci_ops nlm_pci_ops = {
|
|
.read = nlm_pcibios_read,
|
|
.write = nlm_pcibios_write
|
|
};
|
|
|
|
static struct resource nlm_pci_mem_resource = {
|
|
.name = "XLR PCI MEM",
|
|
.start = 0xd0000000UL, /* 256MB PCI mem @ 0xd000_0000 */
|
|
.end = 0xdfffffffUL,
|
|
.flags = IORESOURCE_MEM,
|
|
};
|
|
|
|
static struct resource nlm_pci_io_resource = {
|
|
.name = "XLR IO MEM",
|
|
.start = 0x10000000UL, /* 16MB PCI IO @ 0x1000_0000 */
|
|
.end = 0x100fffffUL,
|
|
.flags = IORESOURCE_IO,
|
|
};
|
|
|
|
struct pci_controller nlm_pci_controller = {
|
|
.index = 0,
|
|
.pci_ops = &nlm_pci_ops,
|
|
.mem_resource = &nlm_pci_mem_resource,
|
|
.mem_offset = 0x00000000UL,
|
|
.io_resource = &nlm_pci_io_resource,
|
|
.io_offset = 0x00000000UL,
|
|
};
|
|
|
|
/*
|
|
* The top level PCIe links on the XLS PCIe controller appear as
|
|
* bridges. Given a device, this function finds which link it is
|
|
* on.
|
|
*/
|
|
static struct pci_dev *xls_get_pcie_link(const struct pci_dev *dev)
|
|
{
|
|
struct pci_bus *bus, *p;
|
|
|
|
/* Find the bridge on bus 0 */
|
|
bus = dev->bus;
|
|
for (p = bus->parent; p && p->number != 0; p = p->parent)
|
|
bus = p;
|
|
|
|
return p ? bus->self : NULL;
|
|
}
|
|
|
|
static int nlm_pci_link_to_irq(int link)
|
|
{
|
|
switch (link) {
|
|
case 0:
|
|
return PIC_PCIE_LINK0_IRQ;
|
|
case 1:
|
|
return PIC_PCIE_LINK1_IRQ;
|
|
case 2:
|
|
if (nlm_chip_is_xls_b())
|
|
return PIC_PCIE_XLSB0_LINK2_IRQ;
|
|
else
|
|
return PIC_PCIE_LINK2_IRQ;
|
|
case 3:
|
|
if (nlm_chip_is_xls_b())
|
|
return PIC_PCIE_XLSB0_LINK3_IRQ;
|
|
else
|
|
return PIC_PCIE_LINK3_IRQ;
|
|
}
|
|
WARN(1, "Unexpected link %d\n", link);
|
|
return 0;
|
|
}
|
|
|
|
static int get_irq_vector(const struct pci_dev *dev)
|
|
{
|
|
struct pci_dev *lnk;
|
|
int link;
|
|
|
|
if (!nlm_chip_is_xls())
|
|
return PIC_PCIX_IRQ; /* for XLR just one IRQ */
|
|
|
|
lnk = xls_get_pcie_link(dev);
|
|
if (lnk == NULL)
|
|
return 0;
|
|
|
|
link = PCI_SLOT(lnk->devfn);
|
|
return nlm_pci_link_to_irq(link);
|
|
}
|
|
|
|
#ifdef CONFIG_PCI_MSI
|
|
void arch_teardown_msi_irq(unsigned int irq)
|
|
{
|
|
}
|
|
|
|
int arch_setup_msi_irq(struct pci_dev *dev, struct msi_desc *desc)
|
|
{
|
|
struct msi_msg msg;
|
|
struct pci_dev *lnk;
|
|
int irq, ret;
|
|
u16 val;
|
|
|
|
/* MSI not supported on XLR */
|
|
if (!nlm_chip_is_xls())
|
|
return 1;
|
|
|
|
/*
|
|
* Enable MSI on the XLS PCIe controller bridge which was disabled
|
|
* at enumeration, the bridge MSI capability is at 0x50
|
|
*/
|
|
lnk = xls_get_pcie_link(dev);
|
|
if (lnk == NULL)
|
|
return 1;
|
|
|
|
pci_read_config_word(lnk, 0x50 + PCI_MSI_FLAGS, &val);
|
|
if ((val & PCI_MSI_FLAGS_ENABLE) == 0) {
|
|
val |= PCI_MSI_FLAGS_ENABLE;
|
|
pci_write_config_word(lnk, 0x50 + PCI_MSI_FLAGS, val);
|
|
}
|
|
|
|
irq = get_irq_vector(dev);
|
|
if (irq <= 0)
|
|
return 1;
|
|
|
|
msg.address_hi = MSI_ADDR_BASE_HI;
|
|
msg.address_lo = MSI_ADDR_BASE_LO |
|
|
MSI_ADDR_DEST_MODE_PHYSICAL |
|
|
MSI_ADDR_REDIRECTION_CPU;
|
|
|
|
msg.data = MSI_DATA_TRIGGER_EDGE |
|
|
MSI_DATA_LEVEL_ASSERT |
|
|
MSI_DATA_DELIVERY_FIXED;
|
|
|
|
ret = irq_set_msi_desc(irq, desc);
|
|
if (ret < 0)
|
|
return ret;
|
|
|
|
pci_write_msi_msg(irq, &msg);
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
/* Extra ACK needed for XLR on chip PCI controller */
|
|
static void xlr_pci_ack(struct irq_data *d)
|
|
{
|
|
uint64_t pcibase = nlm_mmio_base(NETLOGIC_IO_PCIX_OFFSET);
|
|
|
|
nlm_read_reg(pcibase, (0x140 >> 2));
|
|
}
|
|
|
|
/* Extra ACK needed for XLS on chip PCIe controller */
|
|
static void xls_pcie_ack(struct irq_data *d)
|
|
{
|
|
uint64_t pciebase_le = nlm_mmio_base(NETLOGIC_IO_PCIE_1_OFFSET);
|
|
|
|
switch (d->irq) {
|
|
case PIC_PCIE_LINK0_IRQ:
|
|
nlm_write_reg(pciebase_le, (0x90 >> 2), 0xffffffff);
|
|
break;
|
|
case PIC_PCIE_LINK1_IRQ:
|
|
nlm_write_reg(pciebase_le, (0x94 >> 2), 0xffffffff);
|
|
break;
|
|
case PIC_PCIE_LINK2_IRQ:
|
|
nlm_write_reg(pciebase_le, (0x190 >> 2), 0xffffffff);
|
|
break;
|
|
case PIC_PCIE_LINK3_IRQ:
|
|
nlm_write_reg(pciebase_le, (0x194 >> 2), 0xffffffff);
|
|
break;
|
|
}
|
|
}
|
|
|
|
/* For XLS B silicon, the 3,4 PCI interrupts are different */
|
|
static void xls_pcie_ack_b(struct irq_data *d)
|
|
{
|
|
uint64_t pciebase_le = nlm_mmio_base(NETLOGIC_IO_PCIE_1_OFFSET);
|
|
|
|
switch (d->irq) {
|
|
case PIC_PCIE_LINK0_IRQ:
|
|
nlm_write_reg(pciebase_le, (0x90 >> 2), 0xffffffff);
|
|
break;
|
|
case PIC_PCIE_LINK1_IRQ:
|
|
nlm_write_reg(pciebase_le, (0x94 >> 2), 0xffffffff);
|
|
break;
|
|
case PIC_PCIE_XLSB0_LINK2_IRQ:
|
|
nlm_write_reg(pciebase_le, (0x190 >> 2), 0xffffffff);
|
|
break;
|
|
case PIC_PCIE_XLSB0_LINK3_IRQ:
|
|
nlm_write_reg(pciebase_le, (0x194 >> 2), 0xffffffff);
|
|
break;
|
|
}
|
|
}
|
|
|
|
int pcibios_map_irq(const struct pci_dev *dev, u8 slot, u8 pin)
|
|
{
|
|
return get_irq_vector(dev);
|
|
}
|
|
|
|
/* Do platform specific device initialization at pci_enable_device() time */
|
|
int pcibios_plat_dev_init(struct pci_dev *dev)
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
static int __init pcibios_init(void)
|
|
{
|
|
void (*extra_ack)(struct irq_data *);
|
|
int link, irq;
|
|
|
|
/* PSB assigns PCI resources */
|
|
pci_set_flags(PCI_PROBE_ONLY);
|
|
pci_config_base = ioremap(DEFAULT_PCI_CONFIG_BASE, 16 << 20);
|
|
|
|
/* Extend IO port for memory mapped io */
|
|
ioport_resource.start = 0;
|
|
ioport_resource.end = ~0;
|
|
|
|
set_io_port_base(CKSEG1);
|
|
nlm_pci_controller.io_map_base = CKSEG1;
|
|
|
|
pr_info("Registering XLR/XLS PCIX/PCIE Controller.\n");
|
|
register_pci_controller(&nlm_pci_controller);
|
|
|
|
/*
|
|
* For PCI interrupts, we need to ack the PCI controller too, overload
|
|
* irq handler data to do this
|
|
*/
|
|
if (!nlm_chip_is_xls()) {
|
|
/* XLR PCI controller ACK */
|
|
nlm_set_pic_extra_ack(0, PIC_PCIX_IRQ, xlr_pci_ack);
|
|
} else {
|
|
if (nlm_chip_is_xls_b())
|
|
extra_ack = xls_pcie_ack_b;
|
|
else
|
|
extra_ack = xls_pcie_ack;
|
|
for (link = 0; link < 4; link++) {
|
|
irq = nlm_pci_link_to_irq(link);
|
|
nlm_set_pic_extra_ack(0, irq, extra_ack);
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
arch_initcall(pcibios_init);
|