src/southbridge/intel/i82801jx/lpc.c

   1 /* SPDX-License-Identifier: GPL-2.0-only */
   2
   3 #include <console/console.h>
   4 #include <device/device.h>
   5 #include <device/pci.h>
   6 #include <device/pci_ids.h>
   7 #include <option.h>
   8 #include <pc80/mc146818rtc.h>
   9 #include <pc80/isa-dma.h>
  10 #include <pc80/i8259.h>
  11 #include <arch/io.h>
  12 #include <device/pci_ops.h>
  13 #include <arch/ioapic.h>
  14 #include <acpi/acpi.h>
  15 #include <cpu/x86/smm.h>
  16 #include <cpu/intel/speedstep.h>
  17 #include <acpi/acpigen.h>
  18 #include <arch/smp/mpspec.h>
  19 #include "chip.h"
  20 #include "i82801jx.h"
  21 #include <southbridge/intel/common/pciehp.h>
  22 #include <southbridge/intel/common/pmutil.h>
  23 #include <southbridge/intel/common/acpi_pirq_gen.h>
  24 #include <southbridge/intel/common/rcba_pirq.h>
  25
  26 #define NMI_OFF 0
  27
  28 typedef struct southbridge_intel_i82801jx_config config_t;
  29
  30 static void i82801jx_enable_apic(struct device *dev)
  31 {
  32         /* Enable IOAPIC. Keep APIC Range Select at zero. */
  33         RCBA8(0x31ff) = 0x03;
  34         /* We have to read 0x31ff back if bit0 changed. */
  35         RCBA8(0x31ff);
  36
  37         /* Lock maximum redirection entries (MRE), R/WO register. */
  38         ioapic_lock_max_vectors(VIO_APIC_VADDR);
  39
  40         register_new_ioapic_gsi0(VIO_APIC_VADDR);
  41 }
  42
  43 static void i82801jx_enable_serial_irqs(struct device *dev)
  44 {
  45         /* Set packet length and toggle silent mode bit for one frame. */
  46         pci_write_config8(dev, D31F0_SERIRQ_CNTL,
  47                           (1 << 7) | (1 << 6) | ((21 - 17) << 2) | (0 << 0));
  48 }
  49
  50 /* PIRQ[n]_ROUT[3:0] - PIRQ Routing Control
  51  * 0x00 - 0000 = Reserved
  52  * 0x01 - 0001 = Reserved
  53  * 0x02 - 0010 = Reserved
  54  * 0x03 - 0011 = IRQ3
  55  * 0x04 - 0100 = IRQ4
  56  * 0x05 - 0101 = IRQ5
  57  * 0x06 - 0110 = IRQ6
  58  * 0x07 - 0111 = IRQ7
  59  * 0x08 - 1000 = Reserved
  60  * 0x09 - 1001 = IRQ9
  61  * 0x0A - 1010 = IRQ10
  62  * 0x0B - 1011 = IRQ11
  63  * 0x0C - 1100 = IRQ12
  64  * 0x0D - 1101 = Reserved
  65  * 0x0E - 1110 = IRQ14
  66  * 0x0F - 1111 = IRQ15
  67  * PIRQ[n]_ROUT[7] - PIRQ Routing Control
  68  * 0x80 - The PIRQ is not routed.
  69  */
  70
  71 static void i82801jx_pirq_init(struct device *dev)
  72 {
  73         struct device *irq_dev;
  74
  75         /* Interrupt 11 is not used by legacy devices and so can always be used
  76          * for PCI interrupts. Full legacy IRQ routing is complicated and hard
  77          * to get right. Fortunately all modern OS use MSI and so it's not that
  78          * big of an issue anyway. Still we have to provide a reasonable
  79          * default. Using interrupt 11 for it everywhere is a working default.
  80          * ACPI-aware OS can move it to any interrupt and others will just leave
  81          * them at default.
  82          */
  83         const u8 pirq_routing = 11;
  84
  85         pci_write_config8(dev, D31F0_PIRQA_ROUT, pirq_routing);
  86         pci_write_config8(dev, D31F0_PIRQB_ROUT, pirq_routing);
  87         pci_write_config8(dev, D31F0_PIRQC_ROUT, pirq_routing);
  88         pci_write_config8(dev, D31F0_PIRQD_ROUT, pirq_routing);
  89
  90         pci_write_config8(dev, D31F0_PIRQE_ROUT, pirq_routing);
  91         pci_write_config8(dev, D31F0_PIRQF_ROUT, pirq_routing);
  92         pci_write_config8(dev, D31F0_PIRQG_ROUT, pirq_routing);
  93         pci_write_config8(dev, D31F0_PIRQH_ROUT, pirq_routing);
  94
  95         /* Eric Biederman once said we should let the OS do this.
  96          * I am not so sure anymore he was right.
  97          */
  98
  99         for (irq_dev = all_devices; irq_dev; irq_dev = irq_dev->next) {
 100                 u8 int_pin = 0;
 101
 102                 if (!is_enabled_pci(irq_dev))
 103                         continue;
 104
 105                 int_pin = pci_read_config8(irq_dev, PCI_INTERRUPT_PIN);
 106
 107                 if (int_pin == 0)
 108                         continue;
 109
 110                 pci_write_config8(irq_dev, PCI_INTERRUPT_LINE, pirq_routing);
 111         }
 112 }
 113
 114 static void i82801jx_gpi_routing(struct device *dev)
 115 {
 116         /* Get the chip configuration */
 117         config_t *config = dev->chip_info;
 118         u32 reg32 = 0;
 119
 120         /* An array would be much nicer here, or some
 121          * other method of doing this.
 122          */
 123         reg32 |= (config->gpi0_routing & 0x03) << 0;
 124         reg32 |= (config->gpi1_routing & 0x03) << 2;
 125         reg32 |= (config->gpi2_routing & 0x03) << 4;
 126         reg32 |= (config->gpi3_routing & 0x03) << 6;
 127         reg32 |= (config->gpi4_routing & 0x03) << 8;
 128         reg32 |= (config->gpi5_routing & 0x03) << 10;
 129         reg32 |= (config->gpi6_routing & 0x03) << 12;
 130         reg32 |= (config->gpi7_routing & 0x03) << 14;
 131         reg32 |= (config->gpi8_routing & 0x03) << 16;
 132         reg32 |= (config->gpi9_routing & 0x03) << 18;
 133         reg32 |= (config->gpi10_routing & 0x03) << 20;
 134         reg32 |= (config->gpi11_routing & 0x03) << 22;
 135         reg32 |= (config->gpi12_routing & 0x03) << 24;
 136         reg32 |= (config->gpi13_routing & 0x03) << 26;
 137         reg32 |= (config->gpi14_routing & 0x03) << 28;
 138         reg32 |= (config->gpi15_routing & 0x03) << 30;
 139
 140         pci_write_config32(dev, D31F0_GPIO_ROUT, reg32);
 141 }
 142
 143 bool southbridge_support_c5(void)
 144 {
 145         struct device *lpc_dev = __pci_0_1f_0;
 146         struct southbridge_intel_i82801jx_config *config = lpc_dev->chip_info;
 147         return config->c5_enable == 1;
 148 }
 149
 150 bool southbridge_support_c6(void)
 151 {
 152         struct device *lpc_dev = __pci_0_1f_0;
 153         struct southbridge_intel_i82801jx_config *config = lpc_dev->chip_info;
 154         return config->c6_enable == 1;
 155 }
 156
 157 static void i82801jx_power_options(struct device *dev)
 158 {
 159         u8 reg8;
 160         u16 reg16, pmbase;
 161         u32 reg32;
 162         const char *state;
 163         /* Get the chip configuration */
 164         config_t *config = dev->chip_info;
 165
 166         /* BIOS must program... */
 167         pci_or_config32(dev, 0xac, (1 << 30) | (3 << 8));
 168
 169         /* Which state do we want to goto after g3 (power restored)?
 170          * 0 == S0 Full On
 171          * 1 == S5 Soft Off
 172          *
 173          * If the option is not existent (Laptops), use MAINBOARD_POWER_ON.
 174          */
 175         const unsigned int pwr_on = get_uint_option("power_on_after_fail", MAINBOARD_POWER_ON);
 176
 177         reg8 = pci_read_config8(dev, D31F0_GEN_PMCON_3);
 178         reg8 &= 0xfe;
 179         switch (pwr_on) {
 180         case MAINBOARD_POWER_OFF:
 181                 reg8 |= 1;
 182                 state = "off";
 183                 break;
 184         case MAINBOARD_POWER_ON:
 185                 reg8 &= ~1;
 186                 state = "on";
 187                 break;
 188         case MAINBOARD_POWER_KEEP:
 189                 reg8 &= ~1;
 190                 state = "state keep";
 191                 break;
 192         default:
 193                 state = "undefined";
 194         }
 195
 196         reg8 |= (3 << 4);       /* avoid #S4 assertions */
 197         reg8 &= ~(1 << 3);      /* minimum assertion is 1 to 2 RTCCLK */
 198
 199         pci_write_config8(dev, D31F0_GEN_PMCON_3, reg8);
 200         printk(BIOS_INFO, "Set power %s after power failure.\n", state);
 201
 202         /* Set up NMI on errors. */
 203         reg8 = inb(0x61);
 204         reg8 &= 0x0f;           /* Higher Nibble must be 0 */
 205         reg8 &= ~(1 << 3);      /* IOCHK# NMI Enable */
 206         // reg8 &= ~(1 << 2);   /* PCI SERR# Enable */
 207         reg8 |= (1 << 2); /* PCI SERR# Disable for now */
 208         outb(reg8, 0x61);
 209
 210         reg8 = inb(0x74); /* Read from 0x74 as 0x70 is write only. */
 211         const unsigned int nmi_option = get_uint_option("nmi", NMI_OFF);
 212         if (nmi_option) {
 213                 printk(BIOS_INFO, "NMI sources enabled.\n");
 214                 reg8 &= ~(1 << 7);      /* Set NMI. */
 215         } else {
 216                 printk(BIOS_INFO, "NMI sources disabled.\n");
 217                 reg8 |= (1 << 7);       /* Can't mask NMI from PCI-E and NMI_NOW */
 218         }
 219         outb(reg8, 0x70);
 220
 221         /* Enable CPU_SLP# and Intel Speedstep, set SMI# rate down */
 222         reg16 = pci_read_config16(dev, D31F0_GEN_PMCON_1);
 223         reg16 &= ~(3 << 0);     // SMI# rate 1 minute
 224         reg16 |= (1 << 2);      // CLKRUN_EN - Mobile/Ultra only
 225         reg16 |= (1 << 3);      // Speedstep Enable - Mobile/Ultra only
 226         reg16 |= (1 << 5);      // CPUSLP_EN Desktop only
 227
 228         if (config->c4onc3_enable)
 229                 reg16 |= (1 << 7);
 230
 231         // another laptop wants this?
 232         // reg16 &= ~(1 << 10); // BIOS_PCI_EXP_EN - Desktop/Mobile only
 233         reg16 |= (1 << 10);     // BIOS_PCI_EXP_EN - Desktop/Mobile only
 234         if (CONFIG(DEBUG_PERIODIC_SMI))
 235                 reg16 |= (3 << 0); // Periodic SMI every 8s
 236         if (southbridge_support_c5())
 237                 reg16 |= (1 << 11); /* Enable C5, C6 and PMSYNC# */
 238         pci_write_config16(dev, D31F0_GEN_PMCON_1, reg16);
 239
 240         /* Set exit timings for C5/C6. */
 241         if (southbridge_support_c5()) {
 242                 reg8 = pci_read_config8(dev, D31F0_C5_EXIT_TIMING);
 243                 reg8 &= ~((7 << 3) | (7 << 0));
 244                 if (southbridge_support_c6())
 245                         reg8 |= (5 << 3) | (3 << 0); /* 38-44us PMSYNC# to STPCLK#,
 246                                                         95-102us DPRSTP# to STP_CPU# */
 247                 else
 248                         reg8 |= (0 << 3) | (1 << 0); /* 16-17us PMSYNC# to STPCLK#,
 249                                                         34-40us DPRSTP# to STP_CPU# */
 250                 pci_write_config8(dev, D31F0_C5_EXIT_TIMING, reg8);
 251         }
 252
 253         // Set the board's GPI routing.
 254         i82801jx_gpi_routing(dev);
 255
 256         pmbase = pci_read_config16(dev, 0x40) & 0xfffe;
 257
 258         outl(config->gpe0_en, pmbase + 0x28);
 259         outw(config->alt_gp_smi_en, pmbase + 0x38);
 260
 261         /* Set up power management block and determine sleep mode */
 262         reg16 = inw(pmbase + 0x00); /* PM1_STS */
 263         outw(reg16, pmbase + 0x00); /* Clear status bits. At least bit11 (power
 264                                        button override) must be cleared or SCI
 265                                        will be constantly fired and OSPM must
 266                                        not know about it (ACPI spec says to
 267                                        ignore the bit). */
 268         reg32 = inl(pmbase + 0x04); // PM1_CNT
 269         reg32 &= ~(7 << 10);    // SLP_TYP
 270         outl(reg32, pmbase + 0x04);
 271
 272         /* Set duty cycle for hardware throttling (defaults to 0x0: 50%). */
 273         reg32 = inl(pmbase + 0x10);
 274         reg32 &= ~(7 << 5);
 275         reg32 |= (config->throttle_duty & 7) << 5;
 276         outl(reg32, pmbase + 0x10);
 277 }
 278
 279 static void i82801jx_rtc_init(struct device *dev)
 280 {
 281         u8 reg8;
 282         int rtc_failed;
 283
 284         reg8 = pci_read_config8(dev, D31F0_GEN_PMCON_3);
 285         rtc_failed = reg8 & RTC_BATTERY_DEAD;
 286         if (rtc_failed) {
 287                 reg8 &= ~RTC_BATTERY_DEAD;
 288                 pci_write_config8(dev, D31F0_GEN_PMCON_3, reg8);
 289         }
 290         printk(BIOS_DEBUG, "rtc_failed = 0x%x\n", rtc_failed);
 291
 292         cmos_init(rtc_failed);
 293 }
 294
 295 static void enable_hpet(void)
 296 {
 297         u32 reg32;
 298
 299         /* Move HPET to default address 0xfed00000 and enable it */
 300         reg32 = RCBA32(RCBA_HPTC);
 301         reg32 |= (1 << 7); // HPET Address Enable
 302         reg32 &= ~(3 << 0);
 303         RCBA32(RCBA_HPTC) = reg32;
 304 }
 305
 306 static void enable_clock_gating(void)
 307 {
 308         u32 reg32;
 309
 310         /* Enable DMI dynamic clock gating. */
 311         RCBA32(RCBA_DMIC) |= 3;
 312
 313         /* Enable Clock Gating for most devices. */
 314         reg32 = RCBA32(RCBA_CG);
 315         reg32 |= (1 << 31);     /* LPC dynamic clock gating */
 316         /* USB UHCI dynamic clock gating: */
 317         reg32 |= (1 << 29) | (1 << 28);
 318         /* SATA dynamic clock gating [0-3]: */
 319         reg32 |= (1 << 27) | (1 << 26) | (1 << 25) | (1 << 24);
 320         reg32 |= (1 << 23);     /* LAN static clock gating (if LAN disabled) */
 321         reg32 |= (1 << 22);     /* HD audio dynamic clock gating */
 322         reg32 &= ~(1 << 21);    /* No HD audio static clock gating */
 323         reg32 &= ~(1 << 20);    /* No USB EHCI static clock gating */
 324         reg32 |= (1 << 19);     /* USB EHCI dynamic clock gating */
 325         /* More SATA dynamic clock gating [4-5]: */
 326         reg32 |= (1 << 18) | (1 << 17);
 327         reg32 |= (1 << 16);     /* PCI dynamic clock gating */
 328         /* PCIe, DMI dynamic clock gating: */
 329         reg32 |= (1 << 4) | (1 << 3) | (1 << 2) | (1 << 1);
 330         reg32 |= (1 << 0);      /* PCIe root port static clock gating */
 331         RCBA32(RCBA_CG) = reg32;
 332
 333         /* Enable SPI dynamic clock gating. */
 334         RCBA32(0x38c0) |= 7;
 335 }
 336
 337 static void i82801jx_set_acpi_mode(struct device *dev)
 338 {
 339         if (!acpi_is_wakeup_s3()) {
 340                 apm_control(APM_CNT_ACPI_DISABLE);
 341         } else {
 342                 apm_control(APM_CNT_ACPI_ENABLE);
 343         }
 344 }
 345
 346 static void lpc_init(struct device *dev)
 347 {
 348         printk(BIOS_DEBUG, "i82801jx: %s\n", __func__);
 349
 350         /* IO APIC initialization. */
 351         i82801jx_enable_apic(dev);
 352
 353         i82801jx_enable_serial_irqs(dev);
 354
 355         /* Setup the PIRQ. */
 356         i82801jx_pirq_init(dev);
 357
 358         /* Setup power options. */
 359         i82801jx_power_options(dev);
 360
 361         /* Initialize the real time clock. */
 362         i82801jx_rtc_init(dev);
 363
 364         /* Initialize ISA DMA. */
 365         isa_dma_init();
 366
 367         /* Initialize the High Precision Event Timers, if present. */
 368         enable_hpet();
 369
 370         /* Initialize Clock Gating */
 371         enable_clock_gating();
 372
 373         setup_i8259();
 374
 375         /* The OS should do this? */
 376         /* Interrupt 9 should be level triggered (SCI) */
 377         i8259_configure_irq_trigger(9, 1);
 378
 379         i82801jx_set_acpi_mode(dev);
 380 }
 381
 382 unsigned long acpi_fill_madt(unsigned long current)
 383 {
 384         /* Local APICs */
 385         current = acpi_create_madt_lapics_with_nmis(current);
 386
 387         /* IOAPIC */
 388         current += acpi_create_madt_ioapic_from_hw((acpi_madt_ioapic_t *)current, IO_APIC_ADDR);
 389
 390         /* INT_SRC_OVR */
 391         current += acpi_create_madt_irqoverride((acpi_madt_irqoverride_t *)
 392                  current, 0, 0, 2, MP_IRQ_POLARITY_HIGH | MP_IRQ_TRIGGER_EDGE);
 393         current += acpi_create_madt_irqoverride((acpi_madt_irqoverride_t *)
 394                  current, 0, 9, 9, MP_IRQ_POLARITY_HIGH | MP_IRQ_TRIGGER_LEVEL);
 395
 396         return current;
 397 }
 398
 399 static void i82801jx_lpc_read_resources(struct device *dev)
 400 {
 401         int i, io_index = 0;
 402         /*
 403          *             I/O Resources
 404          *
 405          * 0x0000 - 0x000f....ISA DMA
 406          * 0x0010 - 0x001f....ISA DMA aliases
 407          * 0x0020 ~ 0x003d....PIC
 408          * 0x002e - 0x002f....Maybe Super I/O
 409          * 0x0040 - 0x0043....Timer
 410          * 0x004e - 0x004f....Maybe Super I/O
 411          * 0x0050 - 0x0053....Timer aliases
 412          * 0x0061.............NMI_SC
 413          * 0x0070.............NMI_EN (readable in alternative access mode)
 414          * 0x0070 - 0x0077....RTC
 415          * 0x0080 - 0x008f....ISA DMA
 416          * 0x0090 ~ 0x009f....ISA DMA aliases
 417          * 0x0092.............Fast A20 and Init
 418          * 0x00a0 ~ 0x00bd....PIC
 419          * 0x00b2 - 0x00b3....APM
 420          * 0x00c0 ~ 0x00de....ISA DMA
 421          * 0x00c1 ~ 0x00df....ISA DMA aliases
 422          * 0x00f0.............Coprocessor Error
 423          * (0x0400-0x041f)....SMBus (CONFIG_FIXED_SMBUS_IO_BASE, during raminit)
 424          * 0x04d0 - 0x04d1....PIC
 425          * 0x0500 - 0x057f....PM (DEFAULT_PMBASE)
 426          * 0x0580 - 0x05bf....SB GPIO (DEFAULT_GPIOBASE)
 427          * 0x05c0 - 0x05ff....SB GPIO cont. (mobile only)
 428          * 0x0cf8 - 0x0cff....PCI
 429          * 0x0cf9.............Reset Control
 430          */
 431
 432         struct resource *res;
 433
 434         /* Get the normal PCI resources of this device. */
 435         pci_dev_read_resources(dev);
 436
 437         /* Add an extra subtractive resource for both memory and I/O. */
 438         res = new_resource(dev, IOINDEX_SUBTRACTIVE(io_index++, 0));
 439         res->base = 0;
 440         res->size = 0x1000;
 441         res->flags = IORESOURCE_IO | IORESOURCE_SUBTRACTIVE |
 442                      IORESOURCE_ASSIGNED | IORESOURCE_FIXED;
 443
 444         res = new_resource(dev, IOINDEX_SUBTRACTIVE(io_index++, 0));
 445         res->base = 0xff000000;
 446         res->size = 0x01000000; /* 16 MB for flash */
 447         res->flags = IORESOURCE_MEM | IORESOURCE_SUBTRACTIVE |
 448                      IORESOURCE_ASSIGNED | IORESOURCE_FIXED;
 449
 450         res = new_resource(dev, 3); /* IOAPIC */
 451         res->base = IO_APIC_ADDR;
 452         res->size = 0x00001000;
 453         res->flags = IORESOURCE_MEM | IORESOURCE_ASSIGNED | IORESOURCE_FIXED;
 454
 455         /* Set IO decode ranges if required.*/
 456         for (i = 0; i < 4; i++) {
 457                 u32 gen_dec;
 458                 gen_dec = pci_read_config32(dev, 0x84 + 4 * i);
 459
 460                 if ((gen_dec & 0xFFFC) > 0x1000) {
 461                         res = new_resource(dev, IOINDEX_SUBTRACTIVE(io_index++, 0));
 462                         res->base = gen_dec & 0xFFFC;
 463                         res->size = (gen_dec >> 16) & 0xFC;
 464                         res->flags = IORESOURCE_IO | IORESOURCE_SUBTRACTIVE |
 465                                 IORESOURCE_ASSIGNED | IORESOURCE_FIXED;
 466                 }
 467         }
 468 }
 469
 470 static const char *lpc_acpi_name(const struct device *dev)
 471 {
 472         return "LPCB";
 473 }
 474
 475 static void southbridge_fill_ssdt(const struct device *device)
 476 {
 477         struct device *dev = pcidev_on_root(0x1f, 0);
 478         config_t *chip = dev->chip_info;
 479
 480         intel_acpi_pcie_hotplug_generator(chip->pcie_hotplug_map, 8);
 481         intel_acpi_gen_def_acpi_pirq(device);
 482 }
 483
 484 static struct device_operations device_ops = {
 485         .read_resources         = i82801jx_lpc_read_resources,
 486         .set_resources          = pci_dev_set_resources,
 487         .enable_resources       = pci_dev_enable_resources,
 488         .write_acpi_tables      = acpi_write_hpet,
 489         .acpi_fill_ssdt         = southbridge_fill_ssdt,
 490         .acpi_name              = lpc_acpi_name,
 491         .init                   = lpc_init,
 492         .scan_bus               = scan_static_bus,
 493         .ops_pci                = &pci_dev_ops_pci,
 494 };
 495
 496 static const unsigned short pci_device_ids[] = {
 497         0x3a10, /* ICH10R Eng. Sample */
 498         0x3a14, /* ICH10DO */
 499         0x3a16, /* ICH10R */
 500         0x3a18, /* ICH10 */
 501         0x3a1a, /* ICH10D */
 502         0x3a1e, /* ICH10 Eng. Sample */
 503         0
 504 };
 505
 506 static const struct pci_driver ich10_lpc __pci_driver = {
 507         .ops            = &device_ops,
 508         .vendor         = PCI_VID_INTEL,
 509         .devices        = pci_device_ids,
 510 };