coreboot-kgpe-d16/src/soc/intel/denverton_ns/lpc.c
Kyösti Mälkki 8c9a89de99 arch/x86/ioapic: Drop irq_on_fsb as a configurable item
APIC Serial Bus pins were removed with ICH5 already, so a choice
'irq_on_fsb = 0' would not take effect. The related register BOOT_CONFIG
0x3 is also not documented since ICH5.

For emulation/qemu-q35 with ICH9 the choice INTERRUPT_ON_APIC_BUS was
wrong and ignored as BOOT_CONFIG register emulation was never implemented.

For ICH4 and earlier, the choice to use FSB can be made based on the
installed CPU model but this is now just hardwired to match P4 CPUs of
aopen/dxplplusu.

For sb/intel/i82371eb register BOOT_CONFIG 0x3 is also not defined
and the only possible operation mode there is APIC Serial Bus, which
requires no configuration.

Change-Id: Id433e0e67cb83b44a3041250481f307b2ed1ad18
Signed-off-by: Kyösti Mälkki <kyosti.malkki@gmail.com>
Reviewed-on: https://review.coreboot.org/c/coreboot/+/55257
Reviewed-by: Angel Pons <th3fanbus@gmail.com>
Tested-by: build bot (Jenkins) <no-reply@coreboot.org>
2021-06-16 19:54:49 +00:00

554 lines
16 KiB
C

/* SPDX-License-Identifier: GPL-2.0-only */
#include <console/console.h>
#include <device/device.h>
#include <device/pci.h>
#include <device/pci_ids.h>
#include <device/mmio.h>
#include <device/pci_ops.h>
#include <arch/ioapic.h>
#include <acpi/acpi.h>
#include <cpu/x86/smm.h>
#include <bootstate.h>
#include <soc/lpc.h>
#include <soc/pci_devs.h>
#include <soc/ramstage.h>
#include <soc/iomap.h>
#include <soc/pcr.h>
#include <soc/p2sb.h>
#include <soc/acpi.h>
#include "chip.h"
/* PCH-LP redirection entries */
#define PCH_LP_REDIR_ETR 120
/**
* Set miscellaneous static southbridge features.
*
* @param dev PCI device with I/O APIC control registers
*/
static void pch_enable_ioapic(struct device *dev)
{
u32 reg32;
set_ioapic_id((void *)IO_APIC_ADDR, IO_APIC0);
/* affirm full set of redirection table entries ("write once") */
reg32 = io_apic_read((void *)IO_APIC_ADDR, 0x01);
reg32 &= ~0x00ff0000;
reg32 |= (PCH_LP_REDIR_ETR - 1) << 16;
io_apic_write((void *)IO_APIC_ADDR, 0x01, reg32);
}
/* interrupt router lookup for internal devices */
struct dnv_ir_lut {
/* (dev << 3) | fn */
u8 devfn;
u8 ir;
};
#define DEVFN(dev, fn) ((dev << 3) | (fn))
static const struct dnv_ir_lut dnv_ir_lut[] = {
{.devfn = DEVFN(0x05, 0), .ir = 3}, /* RCEC */
{.devfn = DEVFN(0x06, 0), .ir = 4}, /* Virtual RP to QAT */
{.devfn = DEVFN(0x09, 0), .ir = 7}, /* PCIe RP0 */
{.devfn = DEVFN(0x0a, 0), .ir = 7}, /* PCIe RP1 */
{.devfn = DEVFN(0x0b, 0), .ir = 7}, /* PCIe RP2 */
{.devfn = DEVFN(0x0c, 0), .ir = 7}, /* PCIe RP3 */
{.devfn = DEVFN(0x0e, 0), .ir = 8}, /* PCIe RP4 */
{.devfn = DEVFN(0x0f, 0), .ir = 8}, /* PCIe RP5 */
{.devfn = DEVFN(0x10, 0), .ir = 8}, /* PCIe RP6 */
{.devfn = DEVFN(0x11, 0), .ir = 8}, /* PCIe RP7 */
{.devfn = DEVFN(0x12, 0), .ir = 10}, /* SMBus - Host */
{.devfn = DEVFN(0x13, 0), .ir = 6}, /* AHCI0 */
{.devfn = DEVFN(0x14, 0), .ir = 11}, /* AHCI1 */
{.devfn = DEVFN(0x15, 0), .ir = 9}, /* USB */
{.devfn = DEVFN(0x16, 0), .ir = 1}, /* Virtual RP to LAN0 */
{.devfn = DEVFN(0x17, 0), .ir = 2}, /* Virtual RP to LAN1 */
{.devfn = DEVFN(0x18, 0), .ir = 5}, /* ME HECI1 */
{.devfn = DEVFN(0x18, 1), .ir = 5}, /* ME HECI1 */
{.devfn = DEVFN(0x18, 2), .ir = 5}, /* ME PTIO-IDER */
{.devfn = DEVFN(0x18, 3), .ir = 5}, /* ME PTIO-KT */
{.devfn = DEVFN(0x18, 4), .ir = 5}, /* ME HECI3 */
{.devfn = DEVFN(0x1a, 0), .ir = 10}, /* HSUART0 */
{.devfn = DEVFN(0x1a, 1), .ir = 10}, /* HSUART1 */
{.devfn = DEVFN(0x1a, 2), .ir = 10}, /* HSUART2 */
{.devfn = DEVFN(0x1b, 0), .ir = 12}, /* IE HECI1 */
{.devfn = DEVFN(0x1b, 1), .ir = 12}, /* IE HECI1 */
{.devfn = DEVFN(0x1b, 2), .ir = 12}, /* IE PTIO-IDER */
{.devfn = DEVFN(0x1b, 3), .ir = 12}, /* IE PTIO-KT */
{.devfn = DEVFN(0x1b, 4), .ir = 12}, /* IE HECI3 */
{.devfn = DEVFN(0x1c, 0), .ir = 12}, /* SDHCI */
{.devfn = DEVFN(0x1f, 0), .ir = 0}, /* LPC */
{.devfn = DEVFN(0x1f, 1), .ir = 0}, /* PS2B */
{.devfn = DEVFN(0x1f, 4), .ir = 0}, /* SMBus - Legacy */
{.devfn = DEVFN(0x1f, 7), .ir = 0}, /* Trace Hub */
};
/*
* Only 6 of the 8 root ports have swizzling, return '1' if this bdf is one of
* them, '0' otherwise
*/
static int is_dnv_swizzled_rp(uint16_t bdf)
{
switch (bdf) {
case DEVFN(10, 0):
case DEVFN(11, 0):
case DEVFN(12, 0):
case DEVFN(15, 0):
case DEVFN(16, 0):
case DEVFN(17, 0):
return 1;
}
return 0;
}
/*
* Figure out which upstream interrupt pin a downstream device gets swizzled to
*
* config - pointer to chip_info containing routing info
* devfn - device/function of root port to check swizzling for
* pin - interrupt pin 1-4 = A-D
*
* Return new pin mapping, 0 if invalid pin
*/
static int dnv_get_swizzled_pin(config_t *config, u8 devfn, u8 pin)
{
if (pin < 1 || pin > 4)
return 0;
devfn >>= 3;
if (devfn < 13)
devfn -= 9;
else
devfn -= 14;
return ((pin - 1 + devfn) % 4) + 1;
}
/*
* Figure out which upstream interrupt pin a downstream device gets swizzled to
*
* config - pointer to chip_info containing routing info
* devfn - device/function of root port to check swizzling for
* pin - interrupt pin 1-4 = A-D
*
* Return new pin mapping, 0 if invalid pin
*/
static int dnv_get_ir(config_t *config, u8 devfn, u8 pin)
{
int i = 0;
int line = 0xff;
u16 ir = 0xffff;
/* The only valid pin values are 1-4 for A-D */
if (pin < 1 || pin > 4) {
printk(BIOS_WARNING, "%s: pin %d is invalid\n", __func__, pin);
goto dnv_get_ir_done;
}
for (i = 0; i < ARRAY_SIZE(dnv_ir_lut); i++) {
if (dnv_ir_lut[i].devfn == devfn)
break;
}
if (i == ARRAY_SIZE(dnv_ir_lut)) {
printk(BIOS_WARNING, "%s: no entry\n", __func__);
goto dnv_get_ir_done;
}
switch (dnv_ir_lut[i].ir) {
case 0:
ir = config->ir00_routing;
break;
case 1:
ir = config->ir01_routing;
break;
case 2:
ir = config->ir02_routing;
break;
case 3:
ir = config->ir03_routing;
break;
case 4:
ir = config->ir04_routing;
break;
case 5:
ir = config->ir05_routing;
break;
case 6:
ir = config->ir06_routing;
break;
case 7:
ir = config->ir07_routing;
break;
case 8:
ir = config->ir08_routing;
break;
case 9:
ir = config->ir09_routing;
break;
case 10:
ir = config->ir10_routing;
break;
case 11:
ir = config->ir11_routing;
break;
case 12:
ir = config->ir12_routing;
break;
default:
printk(BIOS_ERR, "%s: invalid ir %d for entry %d\n", __func__, dnv_ir_lut[i].ir,
i);
goto dnv_get_ir_done;
}
ir >>= (pin - 1) * 4;
ir &= 0xf;
switch (ir) {
case 0:
line = config->pirqa_routing;
break;
case 1:
line = config->pirqb_routing;
break;
case 2:
line = config->pirqc_routing;
break;
case 3:
line = config->pirqd_routing;
break;
case 4:
line = config->pirqe_routing;
break;
case 5:
line = config->pirqf_routing;
break;
case 6:
line = config->pirqg_routing;
break;
case 7:
line = config->pirqh_routing;
break;
default:
printk(BIOS_ERR, "%s: invalid ir pirq %d for entry %d\n", __func__, ir, i);
break;
}
dnv_get_ir_done:
return line;
}
/*
* PCI devices have the INT_LINE (0x3C) and INT_PIN (0x3D) registers which
* report interrupt routing information to operating systems and drivers. The
* INT_PIN register is generally read only and reports which interrupt pin
* A - D it uses. The INT_LINE register is configurable and reports which IRQ
* (generally the PIC IRQs 1 - 15) it will use. This needs to take interrupt
* pin swizzling on devices that are downstream on a PCI bridge into account.
*/
static u8 dnv_get_int_line(struct device *irq_dev)
{
config_t *config;
struct device *targ_dev = NULL;
uint16_t parent_bdf = 0;
int8_t original_int_pin = 0, new_int_pin = 0, swiz_int_pin = 0;
uint8_t int_line = 0xff;
if (irq_dev->path.type != DEVICE_PATH_PCI || !irq_dev->enabled) {
printk(BIOS_ERR, "%s for non pci device?\n", __func__);
goto dnv_get_int_line_done;
}
/*
* Get the INT_PIN swizzled up to the root port if necessary
* using the existing coreboot pci_device code
*/
original_int_pin = pci_read_config8(irq_dev, PCI_INTERRUPT_PIN);
new_int_pin = get_pci_irq_pins(irq_dev, &targ_dev);
if (targ_dev == NULL || new_int_pin < 1)
goto dnv_get_int_line_done;
printk(BIOS_DEBUG, "%s: irq_dev %s, targ_dev %s:\n", __func__, dev_path(irq_dev),
dev_path(targ_dev));
printk(BIOS_DEBUG, "%s: std swizzle %s from %c to %c\n", __func__, dev_path(targ_dev),
'@' + original_int_pin, '@' + new_int_pin);
/* Swizzle this device if needed */
config = targ_dev->chip_info;
parent_bdf = targ_dev->path.pci.devfn | targ_dev->bus->secondary << 8;
if (is_dnv_swizzled_rp(parent_bdf) && irq_dev != targ_dev) {
swiz_int_pin = dnv_get_swizzled_pin(config, parent_bdf, new_int_pin);
printk(BIOS_DEBUG, "%s: dnv swizzle %s from %c to %c\n", __func__,
dev_path(targ_dev), '@' + new_int_pin, '@' + swiz_int_pin);
} else {
swiz_int_pin = new_int_pin;
}
/* Look up the routing for the pin */
int_line = dnv_get_ir(config, parent_bdf, swiz_int_pin);
dnv_get_int_line_done:
printk(BIOS_DEBUG, "\tINT_LINE\t\t: %d\n", int_line);
return int_line;
}
/* PIRQ[n]_ROUT[3:0] - PIRQ Routing Control
* 0x00 - 0000 = Reserved
* 0x01 - 0001 = Reserved
* 0x02 - 0010 = Reserved
* 0x03 - 0011 = IRQ3
* 0x04 - 0100 = IRQ4
* 0x05 - 0101 = IRQ5
* 0x06 - 0110 = IRQ6
* 0x07 - 0111 = IRQ7
* 0x08 - 1000 = Reserved
* 0x09 - 1001 = IRQ9
* 0x0A - 1010 = IRQ10
* 0x0B - 1011 = IRQ11
* 0x0C - 1100 = IRQ12
* 0x0D - 1101 = Reserved
* 0x0E - 1110 = IRQ14
* 0x0F - 1111 = IRQ15
* PIRQ[n]_ROUT[7] - PIRQ Routing Control
* 0x80 - The PIRQ is not routed.
*/
static void pch_pirq_init(struct device *dev)
{
struct device *irq_dev;
/* Get the chip configuration */
config_t *config = config_of(dev);
/* Initialize PIRQ Routings */
write8((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIRQA_ROUT),
config->pirqa_routing);
write8((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIRQB_ROUT),
config->pirqb_routing);
write8((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIRQC_ROUT),
config->pirqc_routing);
write8((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIRQD_ROUT),
config->pirqd_routing);
write8((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIRQE_ROUT),
config->pirqe_routing);
write8((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIRQF_ROUT),
config->pirqf_routing);
write8((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIRQG_ROUT),
config->pirqg_routing);
write8((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIRQH_ROUT),
config->pirqh_routing);
/* Initialize device's Interrupt Routings */
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR00),
config->ir00_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR01),
config->ir01_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR02),
config->ir02_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR03),
config->ir03_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR04),
config->ir04_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR05),
config->ir05_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR06),
config->ir06_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR07),
config->ir07_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR08),
config->ir08_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR09),
config->ir09_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR10),
config->ir10_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR11),
config->ir11_routing);
write16((void *)PCH_PCR_ADDRESS(PID_ITSS, PCR_ITSS_PIR12),
config->ir12_routing);
/* Initialize device's Interrupt Polarity Control */
write32((void *)PCH_PCR_ADDRESS(PID_ITSS, PCH_PCR_ITSS_IPC0),
config->ipc0);
write32((void *)PCH_PCR_ADDRESS(PID_ITSS, PCH_PCR_ITSS_IPC1),
config->ipc1);
write32((void *)PCH_PCR_ADDRESS(PID_ITSS, PCH_PCR_ITSS_IPC2),
config->ipc2);
write32((void *)PCH_PCR_ADDRESS(PID_ITSS, PCH_PCR_ITSS_IPC3),
config->ipc3);
for (irq_dev = all_devices; irq_dev; irq_dev = irq_dev->next) {
int devfn = irq_dev->path.pci.devfn;
u8 int_pin = 0, int_line = 0;
if (!irq_dev->enabled || irq_dev->path.type != DEVICE_PATH_PCI)
continue;
int_pin = pci_read_config8(irq_dev, PCI_INTERRUPT_PIN);
int_line = dnv_get_int_line(irq_dev);
printk(BIOS_DEBUG, "%s: %02x:%02x.%d pin %d int line %d\n", __func__,
irq_dev->bus->secondary, devfn >> 3, devfn & 0x7, int_pin, int_line);
pci_write_config8(irq_dev, PCI_INTERRUPT_LINE, int_line);
}
}
static void pci_p2sb_read_resources(struct device *dev)
{
struct resource *res;
/* Add MMIO resource
* Use 0xda as an unused index for PCR BAR.
*/
res = new_resource(dev, 0xda);
res->base = DEFAULT_PCR_BASE;
res->size = 16 * 1024 * 1024; /* 16MB PCR config space */
res->flags = IORESOURCE_MEM | IORESOURCE_FIXED | IORESOURCE_STORED |
IORESOURCE_ASSIGNED;
printk(BIOS_DEBUG,
"Adding P2SB PCR config space BAR 0x%08lx-0x%08lx.\n",
(unsigned long)(res->base),
(unsigned long)(res->base + res->size));
/* Add MMIO resource
* Use 0xdb as an unused index for IOAPIC.
*/
res = new_resource(dev, 0xdb); /* IOAPIC */
res->base = IO_APIC_ADDR;
res->size = 0x00001000;
res->flags = IORESOURCE_MEM | IORESOURCE_ASSIGNED | IORESOURCE_FIXED;
}
static void pch_enable_serial_irqs(struct device *dev)
{
/* Set packet length and toggle silent mode bit for one frame. */
pci_write_config8(dev, SERIRQ_CNTL,
(1 << 7) | (1 << 6) | ((21 - 17) << 2) | (0 << 0));
#if !CONFIG(SERIRQ_CONTINUOUS_MODE)
pci_write_config8(dev, SERIRQ_CNTL,
(1 << 7) | (0 << 6) | ((21 - 17) << 2) | (0 << 0));
#endif
}
static void lpc_init(struct device *dev)
{
printk(BIOS_DEBUG, "pch: %s\n", __func__);
/* Get the base address */
/* Set the value for PCI command register. */
pci_write_config16(dev, PCI_COMMAND,
PCI_COMMAND_SPECIAL | PCI_COMMAND_MASTER |
PCI_COMMAND_MEMORY | PCI_COMMAND_IO);
/* Serial IRQ initialization. */
pch_enable_serial_irqs(dev);
/* IO APIC initialization. */
pch_enable_ioapic(dev);
/* Setup the PIRQ. */
pch_pirq_init(dev);
}
static void pch_lpc_add_mmio_resources(struct device *dev) { /* TODO */ }
static void pch_lpc_add_io_resources(struct device *dev)
{
struct resource *res;
u8 io_index = 0;
/* Add an extra subtractive resource for both memory and I/O. */
res = new_resource(dev, IOINDEX_SUBTRACTIVE(io_index++, 0));
res->base = 0;
res->size = 0x1000;
res->flags = IORESOURCE_IO | IORESOURCE_SUBTRACTIVE |
IORESOURCE_ASSIGNED | IORESOURCE_FIXED;
res = new_resource(dev, IOINDEX_SUBTRACTIVE(io_index++, 0));
res->base = 0xff000000;
res->size = 0x01000000; /* 16 MB for flash */
res->flags = IORESOURCE_MEM | IORESOURCE_SUBTRACTIVE |
IORESOURCE_ASSIGNED | IORESOURCE_FIXED;
}
static void lpc_read_resources(struct device *dev)
{
/* Get the normal PCI resources of this device. */
pci_dev_read_resources(dev);
/* Add non-standard MMIO resources. */
pch_lpc_add_mmio_resources(dev);
/* Add IO resources. */
pch_lpc_add_io_resources(dev);
/* Add MMIO resource for IOAPIC. */
pci_p2sb_read_resources(dev);
}
static void pch_decode_init(struct device *dev) { /* TODO */ }
static void lpc_enable_resources(struct device *dev)
{
pch_decode_init(dev);
pci_dev_enable_resources(dev);
}
/* Set bit in Function Disable register to hide this device */
static void pch_hide_devfn(uint32_t devfn) { /* TODO */ }
void southcluster_enable_dev(struct device *dev)
{
u16 reg16;
if (!dev->enabled) {
printk(BIOS_DEBUG, "%s: Disabling device\n", dev_path(dev));
/* Ensure memory, io, and bus master are all disabled */
reg16 = pci_read_config16(dev, PCI_COMMAND);
reg16 &= ~(PCI_COMMAND_MASTER | PCI_COMMAND_MEMORY |
PCI_COMMAND_IO);
pci_write_config16(dev, PCI_COMMAND, reg16);
/* Hide this device if possible */
pch_hide_devfn(dev->path.pci.devfn);
} else {
/* Enable SERR */
pci_or_config16(dev, PCI_COMMAND, PCI_COMMAND_SERR);
}
}
static struct device_operations device_ops = {
.read_resources = lpc_read_resources,
.set_resources = pci_dev_set_resources,
#if CONFIG(HAVE_ACPI_TABLES)
.write_acpi_tables = southcluster_write_acpi_tables,
#endif
.enable_resources = lpc_enable_resources,
.init = lpc_init,
.enable = southcluster_enable_dev,
.scan_bus = scan_static_bus,
.ops_pci = &soc_pci_ops,
};
static const struct pci_driver lpc_driver __pci_driver = {
.ops = &device_ops,
.vendor = PCI_VENDOR_ID_INTEL,
.device = PCI_DEVICE_ID_INTEL_DENVERTON_LPC,
};
static void finalize_chipset(void *unused)
{
apm_control(APM_CNT_FINALIZE);
}
BOOT_STATE_INIT_ENTRY(BS_OS_RESUME, BS_ON_ENTRY, finalize_chipset, NULL);
BOOT_STATE_INIT_ENTRY(BS_PAYLOAD_LOAD, BS_ON_EXIT, finalize_chipset, NULL);