/* $NetBSD: pchb.c,v 1.37 2021/08/07 16:19:08 thorpej Exp $ */
/*-
* Copyright (c) 1996, 1998, 2000 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Jason R. Thorpe.
*
* 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 THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
* ``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 THE FOUNDATION 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 <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: pchb.c,v 1.37 2021/08/07 16:19:08 thorpej Exp $");
#include <sys/types.h>
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/device.h>
#include <sys/bus.h>
#include <dev/pci/pcivar.h>
#include <dev/pci/pcireg.h>
#include <dev/pci/pcidevs.h>
#include <dev/pci/agpreg.h>
#include <dev/pci/agpvar.h>
#include <arch/x86/pci/pchbvar.h>
#define PCISET_BRIDGETYPE_MASK 0x3
#define PCISET_TYPE_COMPAT 0x1
#define PCISET_TYPE_AUX 0x2
#define PCISET_BUSCONFIG_REG 0x48
#define PCISET_BRIDGE_NUMBER(reg) (((reg) >> 8) & 0xff)
#define PCISET_PCI_BUS_NUMBER(reg) (((reg) >> 16) & 0xff)
/* XXX should be in dev/ic/i82443reg.h */
#define I82443BX_SDRAMC_REG 0x74 /* upper 16 bits */
/* XXX should be in dev/ic/i82424{reg.var}.h */
#define I82424_CPU_BCTL_REG 0x50 /* upper 8 bits */
#define I82424_PCI_BCTL_REG 0x54
#define I82424_BCTL_CPUMEM_POSTEN 0x01000000
#define I82424_BCTL_CPUPCI_POSTEN 0x02000000
#define I82424_BCTL_PCIMEM_BURSTEN 0x01000000
#define I82424_BCTL_PCI_BURSTEN 0x02000000
static int pchbmatch(device_t, cfdata_t, void *);
static void pchbattach(device_t, device_t, void *);
static int pchbdetach(device_t, int);
static bool pchb_resume(device_t, const pmf_qual_t *);
static bool pchb_suspend(device_t, const pmf_qual_t *);
CFATTACH_DECL3_NEW(pchb, sizeof(struct pchb_softc),
pchbmatch, pchbattach, pchbdetach, NULL, NULL, NULL, DVF_DETACH_SHUTDOWN);
static int
pchbmatch(device_t parent, cfdata_t match, void *aux)
{
struct pci_attach_args *pa = aux;
if (PCI_CLASS(pa->pa_class) == PCI_CLASS_BRIDGE &&
PCI_SUBCLASS(pa->pa_class) == PCI_SUBCLASS_BRIDGE_HOST)
return 1;
return 0;
}
int
pchb_get_bus_number(pci_chipset_tag_t pc, pcitag_t tag)
{
pcireg_t dev_id;
int bus, dev, func;
int bcreg, pbnum;
pci_decompose_tag(pc, tag, &bus, &dev, &func);
dev_id = pci_conf_read(pc, tag, PCI_ID_REG);
switch (PCI_VENDOR(dev_id)) {
case PCI_VENDOR_SERVERWORKS:
return pci_conf_read(pc, tag, 0x44) & 0xff;
case PCI_VENDOR_INTEL:
switch (PCI_PRODUCT(dev_id)) {
case PCI_PRODUCT_INTEL_82452_PB:
bcreg = pci_conf_read(pc, tag, 0x40);
pbnum = PCISET_BRIDGE_NUMBER(bcreg);
if (pbnum != 0xff)
return pbnum + 1;
break;
case PCI_PRODUCT_INTEL_PCI450_PB:
bcreg = pci_conf_read(pc, tag, PCISET_BUSCONFIG_REG);
return PCISET_PCI_BUS_NUMBER(bcreg);
case PCI_PRODUCT_INTEL_82451NX_PXB:
pbnum = 0;
switch (dev) {
case 18: /* PXB 0 bus A - primary bus */
break;
case 19: /* PXB 0 bus B */
/* read SUBA0 from MIOC */
tag = pci_make_tag(pc, 0, 16, 0);
bcreg = pci_conf_read(pc, tag, 0xd0);
pbnum = ((bcreg & 0x0000ff00) >> 8) + 1;
break;
case 20: /* PXB 1 bus A */
/* read BUSNO1 from MIOC */
tag = pci_make_tag(pc, 0, 16, 0);
bcreg = pci_conf_read(pc, tag, 0xd0);
pbnum = (bcreg & 0xff000000) >> 24;
break;
case 21: /* PXB 1 bus B */
/* read SUBA1 from MIOC */
tag = pci_make_tag(pc, 0, 16, 0);
bcreg = pci_conf_read(pc, tag, 0xd4);
pbnum = (bcreg & 0x000000ff) + 1;
break;
}
return pbnum;
}
}
return -1;
}
static void
pchbattach(device_t parent, device_t self, void *aux)
{
struct pchb_softc *sc = device_private(self);
const struct pci_attach_args *pa = aux;
struct pcibus_attach_args pba;
struct agpbus_attach_args apa;
pcireg_t bcreg;
u_char bdnum, pbnum = 0; /* XXX: gcc */
pcitag_t tag;
int doattach, attachflags, has_agp;
doattach = 0;
has_agp = 0;
attachflags = pa->pa_flags;
sc->sc_dev = self;
sc->sc_pc = pa->pa_pc;
sc->sc_tag = pa->pa_tag;
/*
* Print out a description, and configure certain chipsets which
* have auxiliary PCI buses.
*/
pci_aprint_devinfo(pa, NULL);
switch (PCI_VENDOR(pa->pa_id)) {
/*
* i386 stuff.
*/
case PCI_VENDOR_SERVERWORKS:
pbnum = pci_conf_read(pa->pa_pc, pa->pa_tag, 0x44) & 0xff;
if (pbnum == 0)
break;
/*
* This host bridge has a second PCI bus.
* Configure it.
*/
switch (PCI_PRODUCT(pa->pa_id)) {
case PCI_PRODUCT_SERVERWORKS_CSB5:
case PCI_PRODUCT_SERVERWORKS_CSB6:
/* These devices show up as host bridges, but are
really southbridges. */
break;
case PCI_PRODUCT_SERVERWORKS_CMIC_HE:
case PCI_PRODUCT_SERVERWORKS_CMIC_LE:
case PCI_PRODUCT_SERVERWORKS_CMIC_SL:
/* CNBs and CIOBs are connected to these using a
private bus. The bus number register is that of
the first PCI bus hanging off the CIOB. We let
the CIOB attachment handle configuring the PCI
buses. */
break;
default:
aprint_error_dev(self,
"unknown ServerWorks chip ID 0x%04x; trying "
"to attach PCI buses behind it\n",
PCI_PRODUCT(pa->pa_id));
/* FALLTHROUGH */
case PCI_PRODUCT_SERVERWORKS_CNB20_LE_AGP:
case PCI_PRODUCT_SERVERWORKS_CNB30_LE_PCI:
case PCI_PRODUCT_SERVERWORKS_CNB20_LE_PCI:
case PCI_PRODUCT_SERVERWORKS_CNB20_HE_PCI:
case PCI_PRODUCT_SERVERWORKS_CNB20_HE_AGP:
case PCI_PRODUCT_SERVERWORKS_CIOB_X:
case PCI_PRODUCT_SERVERWORKS_CNB30_HE:
case PCI_PRODUCT_SERVERWORKS_CNB20_HE_PCI2:
case PCI_PRODUCT_SERVERWORKS_CIOB_X2:
case PCI_PRODUCT_SERVERWORKS_CIOB_E:
switch (attachflags &
(PCI_FLAGS_IO_OKAY | PCI_FLAGS_MEM_OKAY)) {
case 0:
/* Doesn't smell like there's anything there. */
break;
case PCI_FLAGS_MEM_OKAY:
attachflags |= PCI_FLAGS_IO_OKAY;
/* FALLTHROUGH */
default:
doattach = 1;
break;
}
break;
}
break;
case PCI_VENDOR_INTEL:
switch (PCI_PRODUCT(pa->pa_id)) {
case PCI_PRODUCT_INTEL_82452_PB:
bcreg = pci_conf_read(pa->pa_pc, pa->pa_tag, 0x40);
pbnum = PCISET_BRIDGE_NUMBER(bcreg);
if (pbnum != 0xff) {
pbnum++;
doattach = 1;
}
break;
case PCI_PRODUCT_INTEL_82443BX_AGP:
case PCI_PRODUCT_INTEL_82443BX_NOAGP:
/*
* http://www.intel.com/design/chipsets/specupdt/290639.htm
* says this bug is fixed in steppings >= C0 (erratum 11),
* so don't tweak the bits in that case.
*/
if (!(PCI_REVISION(pa->pa_class) >= 0x03)) {
/*
* BIOS BUG WORKAROUND! The 82443BX
* datasheet indicates that the only
* legal setting for the "Idle/Pipeline
* DRAM Leadoff Timing (IPLDT)" parameter
* (bits 9:8) is 01. Unfortunately, some
* BIOSs do not set these bits properly.
*/
bcreg = pci_conf_read(pa->pa_pc, pa->pa_tag,
I82443BX_SDRAMC_REG);
if ((bcreg & 0x03000000) != 0x01000000) {
aprint_verbose_dev(self, "fixing "
"Idle/Pipeline DRAM "
"Leadoff Timing\n");
bcreg &= ~0x03000000;
bcreg |= 0x01000000;
pci_conf_write(pa->pa_pc, pa->pa_tag,
I82443BX_SDRAMC_REG, bcreg);
}
}
break;
case PCI_PRODUCT_INTEL_PCI450_PB:
bcreg = pci_conf_read(pa->pa_pc, pa->pa_tag,
PCISET_BUSCONFIG_REG);
bdnum = PCISET_BRIDGE_NUMBER(bcreg);
pbnum = PCISET_PCI_BUS_NUMBER(bcreg);
switch (bdnum & PCISET_BRIDGETYPE_MASK) {
default:
aprint_error_dev(self, "bdnum=%x (reserved)\n",
bdnum);
break;
case PCISET_TYPE_COMPAT:
aprint_verbose_dev(self,
"Compatibility PB (bus %d)\n", pbnum);
break;
case PCISET_TYPE_AUX:
aprint_verbose_dev(self,
"Auxiliary PB (bus %d)\n",pbnum);
/*
* This host bridge has a second PCI bus.
* Configure it.
*/
doattach = 1;
break;
}
break;
case PCI_PRODUCT_INTEL_CDC:
bcreg = pci_conf_read(pa->pa_pc, pa->pa_tag,
I82424_CPU_BCTL_REG);
if (bcreg & I82424_BCTL_CPUPCI_POSTEN) {
bcreg &= ~I82424_BCTL_CPUPCI_POSTEN;
pci_conf_write(pa->pa_pc, pa->pa_tag,
I82424_CPU_BCTL_REG, bcreg);
aprint_verbose_dev(self,
"disabled CPU-PCI write posting\n");
}
break;
case PCI_PRODUCT_INTEL_82451NX_PXB:
/*
* The NX chipset supports up to 2 "PXB" chips
* which can drive 2 PCI buses each. Each bus
* shows up as logical PCI device, with fixed
* device numbers between 18 and 21.
* See the datasheet at
ftp://download.intel.com/design/chipsets/datashts/24377102.pdf
* for details.
* (It would be easier to attach all the buses
* at the MIOC, but less aesthetical imho.)
*/
if ((attachflags &
(PCI_FLAGS_IO_OKAY | PCI_FLAGS_MEM_OKAY)) ==
PCI_FLAGS_MEM_OKAY)
attachflags |= PCI_FLAGS_IO_OKAY;
pbnum = 0;
switch (pa->pa_device) {
case 18: /* PXB 0 bus A - primary bus */
break;
case 19: /* PXB 0 bus B */
/* read SUBA0 from MIOC */
tag = pci_make_tag(pa->pa_pc, 0, 16, 0);
bcreg = pci_conf_read(pa->pa_pc, tag, 0xd0);
pbnum = ((bcreg & 0x0000ff00) >> 8) + 1;
break;
case 20: /* PXB 1 bus A */
/* read BUSNO1 from MIOC */
tag = pci_make_tag(pa->pa_pc, 0, 16, 0);
bcreg = pci_conf_read(pa->pa_pc, tag, 0xd0);
pbnum = (bcreg & 0xff000000) >> 24;
break;
case 21: /* PXB 1 bus B */
/* read SUBA1 from MIOC */
tag = pci_make_tag(pa->pa_pc, 0, 16, 0);
bcreg = pci_conf_read(pa->pa_pc, tag, 0xd4);
pbnum = (bcreg & 0x000000ff) + 1;
break;
}
if (pbnum != 0)
doattach = 1;
break;
/*
* i386 and amd64 stuff.
*/
case PCI_PRODUCT_INTEL_82810_MCH:
case PCI_PRODUCT_INTEL_82810_DC100_MCH:
case PCI_PRODUCT_INTEL_82810E_MCH:
case PCI_PRODUCT_INTEL_82815_FULL_HUB:
case PCI_PRODUCT_INTEL_82830MP_IO_1:
case PCI_PRODUCT_INTEL_82845G_DRAM:
case PCI_PRODUCT_INTEL_82855GM_MCH:
case PCI_PRODUCT_INTEL_82865_HB:
case PCI_PRODUCT_INTEL_82915G_HB:
case PCI_PRODUCT_INTEL_82915GM_HB:
case PCI_PRODUCT_INTEL_82945P_MCH:
case PCI_PRODUCT_INTEL_82945GM_HB:
case PCI_PRODUCT_INTEL_82945GME_HB:
case PCI_PRODUCT_INTEL_82946GZ_HB:
case PCI_PRODUCT_INTEL_82965Q_HB:
case PCI_PRODUCT_INTEL_82965G_HB:
case PCI_PRODUCT_INTEL_82965PM_HB:
case PCI_PRODUCT_INTEL_82Q35_HB:
case PCI_PRODUCT_INTEL_82G33_HB:
case PCI_PRODUCT_INTEL_82Q33_HB:
case PCI_PRODUCT_INTEL_82G35_HB:
case PCI_PRODUCT_INTEL_82GM45_HB:
case PCI_PRODUCT_INTEL_82IGD_E_HB:
case PCI_PRODUCT_INTEL_82Q45_HB:
case PCI_PRODUCT_INTEL_82G45_HB:
case PCI_PRODUCT_INTEL_82G41_HB:
case PCI_PRODUCT_INTEL_E7221_HB:
case PCI_PRODUCT_INTEL_82965GME_HB:
case PCI_PRODUCT_INTEL_82B43_HB:
case PCI_PRODUCT_INTEL_IRONLAKE_D_HB:
case PCI_PRODUCT_INTEL_IRONLAKE_M_HB:
case PCI_PRODUCT_INTEL_IRONLAKE_MA_HB:
case PCI_PRODUCT_INTEL_IRONLAKE_MC2_HB:
case PCI_PRODUCT_INTEL_PINEVIEW_HB:
case PCI_PRODUCT_INTEL_PINEVIEW_M_HB:
/*
* The host bridge is either in GFX mode (internal
* graphics) or in AGP mode. In GFX mode, we pretend
* to have AGP because the graphics memory access
* is very similar and the AGP GATT code will
* deal with this. In the latter case, the
* pci_get_capability(PCI_CAP_AGP) test below will
* fire, so we do no harm by already setting the flag.
*/
has_agp = 1;
break;
}
break;
}
if (!pmf_device_register(self, pchb_suspend, pchb_resume))
aprint_error_dev(self, "couldn't establish power handler\n");
/*
* If we haven't detected AGP yet (via a product ID),
* then check for AGP capability on the device.
*/
if (has_agp ||
pci_get_capability(pa->pa_pc, pa->pa_tag, PCI_CAP_AGP,
NULL, NULL) != 0) {
apa.apa_pci_args = *pa;
config_found(self, &apa, agpbusprint,
CFARGS(.iattr = "agpbus"));
}
if (doattach) {
pba.pba_iot = pa->pa_iot;
pba.pba_memt = pa->pa_memt;
pba.pba_dmat = pa->pa_dmat;
pba.pba_dmat64 = pa->pa_dmat64;
pba.pba_pc = pa->pa_pc;
pba.pba_flags = attachflags;
pba.pba_bus = pbnum;
pba.pba_bridgetag = NULL;
pba.pba_pc = pa->pa_pc;
pba.pba_intrswiz = 0;
memset(&pba.pba_intrtag, 0, sizeof(pba.pba_intrtag));
config_found(self, &pba, pcibusprint,
CFARGS(.iattr = "pcibus"));
}
}
static int
pchbdetach(device_t self, int flags)
{
int rc;
if ((rc = config_detach_children(self, flags)) != 0)
return rc;
pmf_device_deregister(self);
return 0;
}
static bool
pchb_suspend(device_t dv, const pmf_qual_t *qual)
{
struct pchb_softc *sc = device_private(dv);
pci_chipset_tag_t pc;
pcitag_t tag;
int off;
pc = sc->sc_pc;
tag = sc->sc_tag;
for (off = 0x40; off <= 0xff; off += 4)
sc->sc_pciconfext[(off - 0x40) / 4] = pci_conf_read(pc, tag, off);
return true;
}
static bool
pchb_resume(device_t dv, const pmf_qual_t *qual)
{
struct pchb_softc *sc = device_private(dv);
pci_chipset_tag_t pc;
pcitag_t tag;
int off;
pc = sc->sc_pc;
tag = sc->sc_tag;
for (off = 0x40; off <= 0xff; off += 4)
pci_conf_write(pc, tag, off, sc->sc_pciconfext[(off - 0x40) / 4]);
return true;
}