/* * This file is part of the coreboot project. * * Copyright (C) 2015 Timothy Pearson <tpearson@raptorengineeringinc.com>, Raptor Engineering * Copyright (C) 2003 Linux Networx * Copyright (C) 2003 SuSE Linux AG * Copyright (C) 2004 Tyan Computer * Written by Yinghai Lu <yhlu@tyan.com> for Tyan Computer. * * 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; version 2 of the License. * * 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 <console/console.h> #include <device/device.h> #include <device/pci.h> #include <device/pnp.h> #include <device/pci_ids.h> #include <device/pci_ops.h> #include <pc80/mc146818rtc.h> #include <pc80/isa-dma.h> #include <arch/io.h> #include <arch/ioapic.h> #include <arch/acpi.h> #include <cpu/x86/lapic.h> #include <stdlib.h> #include <assert.h> #include <cpu/amd/powernow.h> #include "chip.h" #define NMI_OFF 0 // Power restoration control register is at 0x7a #define PREVIOUS_POWER_STATE 0x7A // Auxiliary power control register possibly located at 0xe3 #define PREVIOUS_POWER_STATE_AUX 0xe3 #define MAINBOARD_POWER_OFF 0 #define MAINBOARD_POWER_ON 1 #define SLOW_CPU_OFF 0 #define SLOW_CPU__ON 1 static void lpc_common_init(struct device *dev) { u32 dword; struct resource *res; /* I/O APIC initialization. */ res = find_resource(dev, PCI_BASE_ADDRESS_1); /* IOAPIC */ ASSERT(res != NULL); setup_ioapic(res2mmio(res, 0, 0), 0); /* Don't rename IOAPIC ID. */ #if 1 dword = pci_read_config32(dev, 0xe4); dword |= (1 << 23); pci_write_config32(dev, 0xe4, dword); #endif } static void lpc_slave_init(struct device *dev) { lpc_common_init(dev); } static void rom_dummy_write(struct device *dev) { u8 old, new; u8 *p; old = pci_read_config8(dev, 0x88); new = old | 0xc0; if (new != old) pci_write_config8(dev, 0x88, new); /* Enable write. */ old = pci_read_config8(dev, 0x6d); new = old | 0x01; if (new != old) pci_write_config8(dev, 0x6d, new); /* Dummy write. */ p = (u8 *) 0xffffffe0; old = 0; *p = old; old = *p; /* Disable write. */ old = pci_read_config8(dev, 0x6d); new = old & 0xfe; if (new != old) pci_write_config8(dev, 0x6d, new); } unsigned pm_base = 0; static void lpc_init(struct device *dev) { u8 byte, byte_old; int on, nmi_option; lpc_common_init(dev); pm_base = pci_read_config32(dev, 0x60) & 0xff00; printk(BIOS_INFO, "%s: pm_base = %x\n", __func__, pm_base); /* Power after power fail */ on = CONFIG_MAINBOARD_POWER_FAILURE_STATE; get_option(&on, "power_on_after_fail"); byte = pci_read_config8(dev, PREVIOUS_POWER_STATE); byte &= ~0x45; if (!on) byte |= 0x45; pci_write_config8(dev, PREVIOUS_POWER_STATE, byte); printk(BIOS_INFO, "set power %s after power fail\n", on ? "on" : "off"); /* Throttle the CPU speed down for testing. */ on = SLOW_CPU_OFF; get_option(&on, "slow_cpu"); if (on) { u16 pm10_bar; u32 dword; pm10_bar = (pci_read_config16(dev, 0x60) & 0xff00); outl(((on << 1) + 0x10), (pm10_bar + 0x10)); dword = inl(pm10_bar + 0x10); on = 8 - on; printk(BIOS_DEBUG, "Throttling CPU %2d.%1.1d percent.\n", (on * 12) + (on >> 1), (on & 1) * 5); } /* Set up NMI on errors. */ byte = inb(0x70); /* RTC70 */ byte_old = byte; nmi_option = NMI_OFF; get_option(&nmi_option, "nmi"); if (nmi_option) byte &= ~(1 << 7); /* Set NMI. */ else byte |= (1 << 7); /* Can't mask NMI from PCI-E and NMI_NOW. */ if (byte != byte_old) outb(byte, 0x70); /* Initialize the real time clock (RTC). */ cmos_init(0); /* Initialize ISA DMA. */ isa_dma_init(); rom_dummy_write(dev); } static void ck804_lpc_read_resources(struct device *dev) { struct resource *res; unsigned long index; /* Get the normal PCI resources of this device. */ /* We got one for APIC, or one more for TRAP. */ pci_dev_read_resources(dev); /* HPET */ pci_get_resource(dev, 0x44); /* Get resource for ACPI, SYSTEM_CONTROL, ANALOG_CONTROL. */ for (index = 0x60; index <= 0x68; index += 4) /* We got another 3. */ pci_get_resource(dev, index); compact_resources(dev); /* Add an extra subtractive resource for both memory and I/O. */ res = new_resource(dev, IOINDEX_SUBTRACTIVE(0, 0)); res->base = 0; res->size = 0x1000; res->flags = IORESOURCE_IO | IORESOURCE_SUBTRACTIVE | IORESOURCE_ASSIGNED | IORESOURCE_FIXED; res = new_resource(dev, IOINDEX_SUBTRACTIVE(1, 0)); res->base = 0xff800000; res->size = 0x00800000; /* 8 MB for flash */ res->flags = IORESOURCE_MEM | IORESOURCE_SUBTRACTIVE | IORESOURCE_ASSIGNED | IORESOURCE_FIXED; if (dev->device != PCI_DEVICE_ID_NVIDIA_CK804_SLAVE) { res = find_resource(dev, PCI_BASE_ADDRESS_1); /* IOAPIC */ if (res) { res->base = IO_APIC_ADDR; res->flags |= IORESOURCE_ASSIGNED | IORESOURCE_FIXED; } res = find_resource(dev, 0x44); /* HPET */ if (res) { res->base = CONFIG_HPET_ADDRESS; res->flags |= IORESOURCE_ASSIGNED | IORESOURCE_FIXED; } } } static void ck804_lpc_set_resources(struct device *dev) { u8 byte; struct resource *res; pci_dev_set_resources(dev); /* APIC */ res = find_resource(dev, PCI_BASE_ADDRESS_1); if (res) { byte = pci_read_config8(dev, 0x74); byte |= (1 << 1); /* enable access to PCI_BASE_ADDRESS_1 */ pci_write_config8(dev, 0x74, byte); pci_write_config32(dev, PCI_BASE_ADDRESS_1, res->base); res->flags |= IORESOURCE_STORED; report_resource_stored(dev, res, ""); byte |= (1 << 0); /* enable decode of IOAPIC space */ byte &= ~(1 << 1); /* hide PCI_BASE_ADDRESS_1 */ pci_write_config8(dev, 0x74, byte); } /* HPET */ res = find_resource(dev, 0x44); if (res) { pci_write_config32(dev, 0x44, res->base|1); res->flags |= IORESOURCE_STORED; report_resource_stored(dev, res, ""); } } /** * Enable resources for children devices. * * This function is called by the global enable_resources() indirectly via the * device_operation::enable_resources() method of devices. */ static void ck804_lpc_enable_childrens_resources(struct device *dev) { struct bus *link; u32 reg, reg_var[4]; int i, var_num = 0; reg = pci_read_config32(dev, 0xa0); for (link = dev->link_list; link; link = link->next) { struct device *child; for (child = link->children; child; child = child->sibling) { if (child->enabled && (child->path.type == DEVICE_PATH_PNP)) { struct resource *res; for (res = child->resource_list; res; res = res->next) { unsigned long base, end; /* Don't need long long. */ if (!(res->flags & IORESOURCE_IO)) continue; base = res->base; end = resource_end(res); printk(BIOS_DEBUG, "ck804 lpc decode:%s, base=0x%08lx, end=0x%08lx\n", dev_path(child), base, end); switch (base) { case 0x3f8: // COM1 reg |= (1 << 0); break; case 0x2f8: // COM2 reg |= (1 << 1); break; case 0x378: // Parallel 1 reg |= (1 << 24); break; case 0x3f0: // FD0 reg |= (1 << 20); break; case 0x220: // Audio 0 reg |= (1 << 8); break; case 0x300: // Midi 0 reg |= (1 << 12); break; } if (base == 0x290 || base >= 0x400) { /* Only 4 var; compact them? */ if (var_num >= 4) continue; reg |= (1 << (28 + var_num)); reg_var[var_num++] = (base & 0xffff) | ((end & 0xffff) << 16); } } } } } pci_write_config32(dev, 0xa0, reg); for (i = 0; i < var_num; i++) pci_write_config32(dev, 0xa8 + i * 4, reg_var[i]); } static void ck804_lpc_enable_resources(struct device *dev) { pci_dev_enable_resources(dev); ck804_lpc_enable_childrens_resources(dev); } #if IS_ENABLED(CONFIG_HAVE_ACPI_TABLES) static void southbridge_acpi_fill_ssdt_generator(struct device *device) { amd_generate_powernow(0, 0, 0); } #endif static struct device_operations lpc_ops = { .read_resources = ck804_lpc_read_resources, .set_resources = ck804_lpc_set_resources, .enable_resources = ck804_lpc_enable_resources, #if IS_ENABLED(CONFIG_HAVE_ACPI_TABLES) .acpi_fill_ssdt_generator = southbridge_acpi_fill_ssdt_generator, .write_acpi_tables = acpi_write_hpet, #endif .init = lpc_init, .scan_bus = scan_lpc_bus, .ops_pci = &ck804_pci_ops, }; static const struct pci_driver lpc_driver __pci_driver = { .ops = &lpc_ops, .vendor = PCI_VENDOR_ID_NVIDIA, .device = PCI_DEVICE_ID_NVIDIA_CK804_LPC, }; static const struct pci_driver lpc_driver_pro __pci_driver = { .ops = &lpc_ops, .vendor = PCI_VENDOR_ID_NVIDIA, .device = PCI_DEVICE_ID_NVIDIA_CK804_PRO, }; static struct device_operations lpc_slave_ops = { .read_resources = ck804_lpc_read_resources, .set_resources = pci_dev_set_resources, .enable_resources = pci_dev_enable_resources, #if IS_ENABLED(CONFIG_HAVE_ACPI_TABLES) .write_acpi_tables = acpi_write_hpet, #endif .init = lpc_slave_init, .ops_pci = &ck804_pci_ops, }; static const struct pci_driver lpc_driver_slave __pci_driver = { .ops = &lpc_slave_ops, .vendor = PCI_VENDOR_ID_NVIDIA, .device = PCI_DEVICE_ID_NVIDIA_CK804_SLAVE, };