/*- * Copyright (c) 1998 Doug Rabson * All rights reserved. * * 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 AUTHOR 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 AUTHOR 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. * * $FreeBSD$ */ /* * Based very closely on NetBSD version- * * Copyright (c) 1997 by Matthew Jacob * NASA AMES Research Center. * All rights reserved. * * 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 immediately at the beginning of the file, without modification, * 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. * 3. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 AUTHOR 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 "opt_simos.h" #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "alphapci_if.h" #include "pcib_if.h" static devclass_t dwlpx_devclass; static device_t dwlpxs[DWLPX_NIONODE][DWLPX_NHOSE]; #define KV(pa) ((void *)ALPHA_PHYS_TO_K0SEG(pa)) struct dwlpx_softc { struct dwlpx_softc *next; device_t dev; /* backpointer */ u_int64_t sysbase; /* shorthand */ vm_offset_t dmem_base; /* dense memory */ vm_offset_t smem_base; /* sparse memory */ vm_offset_t io_base; /* sparse i/o */ struct swiz_space io_space; /* accessor for ports */ struct swiz_space mem_space; /* accessor for memory */ struct rman io_rman; /* resource manager for ports */ struct rman mem_rman; /* resource manager for memory */ int bushose; /* our bus && hose */ u_int : 26, nhpc : 2, /* how many HPCs */ dwlpb : 1, /* this is a DWLPB */ sgmapsz : 3; /* Scatter Gather map size */ }; static driver_intr_t dwlpx_intr; static u_int32_t imaskcache[DWLPX_NIONODE][DWLPX_NHOSE][NHPC]; static void dwlpx_eintr(unsigned long); /* * Direct-mapped window: 2G at 2G */ #define DWLPx_DIRECT_MAPPED_BASE (2UL*1024UL*1024UL*1024UL) #define DWLPx_DIRECT_MAPPED_SIZE (2UL*1024UL*1024UL*1024UL) #define DWLPx_DIRECT_MAPPED_WMASK PCIA_WMASK_2G /* * SGMAP window A: 256M at 1.75G or 1G at 1G */ #define DWLPx_SG_MAPPED_SIZE(x) ((x) * PAGE_SIZE) static void dwlpx_dma_init(struct dwlpx_softc *); #define DWLPX_SOFTC(dev) (struct dwlpx_softc *) device_get_softc(dev) static struct dwlpx_softc *dwlpx_root; static int dwlpx_probe(device_t dev) { device_t child; u_int32_t ctl; struct dwlpx_softc *xc, *sc = DWLPX_SOFTC(dev); unsigned long ls; int io, hose; io = kft_get_node(dev) - 4; hose = kft_get_hosenum(dev); sc->bushose = (io << 2) | hose; if (dwlpxs[io][hose]) { device_printf(dev, "already attached\n"); return EEXIST; } if ((xc = dwlpx_root) == NULL) { dwlpx_root = sc; } else { while (xc->next) xc = xc->next; xc->next = sc; } sc->dev = dwlpxs[io][hose] = dev; ls = DWLPX_BASE(io + 4, hose); for (sc->nhpc = 1; sc->nhpc < NHPC; sc->nhpc++) { if (badaddr(KV(PCIA_CTL(sc->nhpc) + ls), sizeof (ctl))) { break; } } if (sc->nhpc != NHPC) { REGVAL(PCIA_ERR(0) + ls) = PCIA_ERR_ALLERR; } ctl = REGVAL(PCIA_PRESENT + ls); if ((ctl >> PCIA_PRESENT_REVSHIFT) & PCIA_PRESENT_REVMASK) { sc->dwlpb = 1; device_set_desc(dev, "DWLPB PCI adapter"); } else { device_set_desc(dev, "DWLPA PCI adapter"); } sc->sgmapsz = DWLPX_SG32K; if (device_get_unit(dev) == 0) { pci_init_resources(); } child = device_add_child(dev, "pci", -1); device_set_ivars(child, &sc->bushose); return (0); } static int dwlpx_attach(device_t dev) { struct dwlpx_softc *sc = DWLPX_SOFTC(dev); device_t parent = device_get_parent(dev); vm_offset_t regs; u_int32_t ctl; int i, io, hose; void *intr; io = kft_get_node(dev) - 4; hose = kft_get_hosenum(dev); sc->sysbase = DWLPX_BASE(io + 4, hose); regs = (vm_offset_t) KV(sc->sysbase); sc->dmem_base = regs + DWLPX_PCI_DENSE; sc->smem_base = regs + DWLPX_PCI_SPARSE; sc->io_base = regs + DWLPX_PCI_IOSPACE; /* * Maybe initialise busspace_isa_io and busspace_isa_mem * here. Does the 8200 actually have any ISA slots? */ swiz_init_space(&sc->io_space, sc->io_base); swiz_init_space(&sc->mem_space, sc->smem_base); sc->io_rman.rm_start = 0; sc->io_rman.rm_end = ~0u; sc->io_rman.rm_type = RMAN_ARRAY; sc->io_rman.rm_descr = "I/O ports"; if (rman_init(&sc->io_rman) || rman_manage_region(&sc->io_rman, 0x0, (1L << 32))) panic("dwlpx_attach: io_rman"); sc->mem_rman.rm_start = 0; sc->mem_rman.rm_end = ~0u; sc->mem_rman.rm_type = RMAN_ARRAY; sc->mem_rman.rm_descr = "I/O memory"; if (rman_init(&sc->mem_rman) || rman_manage_region(&sc->mem_rman, 0x0, (1L << 32))) panic("dwlpx_attach: mem_rman"); /* * Set up interrupt stuff for this DWLPX. * * Note that all PCI interrupt pins are disabled at this time. * * Do this even for all HPCs- even for the * nonexistent one on hose zero of a KFTIA. */ for (i = 0; i < NHPC; i++) { REGVAL(PCIA_IMASK(i) + sc->sysbase) = DWLPX_IMASK_DFLT; REGVAL(PCIA_ERRVEC(i) + sc->sysbase) = DWLPX_ERRVEC(io, hose); } for (i = 0; i < DWLPX_MAXDEV; i++) { u_int16_t vec; int ss, hpc; vec = DWLPX_MVEC(io, hose, i); ss = i; if (i < 4) { hpc = 0; } else if (i < 8) { ss -= 4; hpc = 1; } else { ss -= 8; hpc = 2; } REGVAL(PCIA_DEVVEC(hpc, ss, 1) + sc->sysbase) = vec; REGVAL(PCIA_DEVVEC(hpc, ss, 2) + sc->sysbase) = vec; REGVAL(PCIA_DEVVEC(hpc, ss, 3) + sc->sysbase) = vec; REGVAL(PCIA_DEVVEC(hpc, ss, 4) + sc->sysbase) = vec; } /* * Establish HAE values, as well as make sure of sanity elsewhere. */ for (i = 0; i < sc->nhpc; i++) { ctl = REGVAL(PCIA_CTL(i) + sc->sysbase); ctl &= 0x0fffffff; ctl &= ~(PCIA_CTL_MHAE(0x1f) | PCIA_CTL_IHAE(0x1f)); /* * I originally also had it or'ing in 3, which makes no sense. */ ctl |= PCIA_CTL_RMMENA | PCIA_CTL_RMMARB; /* * Only valid if we're attached to a KFTIA or a KTHA. */ ctl |= PCIA_CTL_3UP; ctl |= PCIA_CTL_CUTENA; /* * Fit in appropriate S/G Map Ram size. */ if (sc->sgmapsz == DWLPX_SG32K) ctl |= PCIA_CTL_SG32K; else if (sc->sgmapsz == DWLPX_SG128K) ctl |= PCIA_CTL_SG128K; else ctl |= PCIA_CTL_SG32K; REGVAL(PCIA_CTL(i) + sc->sysbase) = ctl; } /* * Enable TBIT if required */ if (sc->sgmapsz == DWLPX_SG128K) REGVAL(PCIA_TBIT + sc->sysbase) = 1; alpha_mb(); for (io = 0; io < DWLPX_NIONODE; io++) { for (hose = 0; hose < DWLPX_NHOSE; hose++) { for (i = 0; i < NHPC; i++) { imaskcache[io][hose][i] = DWLPX_IMASK_DFLT; } } } /* * Set up DMA stuff here. */ dwlpx_dma_init(sc); /* * Register our interrupt service requirements with our parent. */ i = BUS_SETUP_INTR(parent, dev, NULL, INTR_TYPE_MISC, dwlpx_intr, 0, &intr); if (i == 0) { bus_generic_attach(dev); } return (i); } static void dwlpx_enadis_intr(int, int, int); static void dwlpx_enadis_intr(int vector, int intpin, int onoff) { unsigned long paddr; u_int32_t val; int device, ionode, hose, hpc, s; ionode = DWLPX_MVEC_IONODE(vector); hose = DWLPX_MVEC_HOSE(vector); device = DWLPX_MVEC_PCISLOT(vector); paddr = (1LL << 39); paddr |= (unsigned long) ionode << 36; paddr |= (unsigned long) hose << 34; if (device < 4) { hpc = 0; } else if (device < 8) { hpc = 1; device -= 4; } else { hpc = 2; device -= 8; } intpin <<= (device << 2); val = imaskcache[ionode][hose][hpc]; if (onoff) val |= intpin; else val &= ~intpin; imaskcache[ionode][hose][hpc] = val; s = splhigh(); REGVAL(PCIA_IMASK(hpc) + paddr) = val; alpha_mb(); splx(s); } static int dwlpx_setup_intr(device_t dev, device_t child, struct resource *irq, int flags, driver_intr_t *intr, void *arg, void **cookiep) { struct dwlpx_softc *sc = DWLPX_SOFTC(dev); int slot, ionode, hose, error, vector, intpin; error = rman_activate_resource(irq); if (error) return error; intpin = pci_get_intpin(child); slot = pci_get_slot(child); ionode = sc->bushose >> 2; hose = sc->bushose & 0x3; vector = DWLPX_MVEC(ionode, hose, slot); error = alpha_setup_intr(device_get_nameunit(child ? child : dev), vector, intr, arg, flags, cookiep, &intrcnt[INTRCNT_KN8AE_IRQ], NULL, NULL); if (error) return error; dwlpx_enadis_intr(vector, intpin, 1); device_printf(child, "Node %d Hose %d Slot %d interrupting at TLSB " "vector 0x%x intpin %d\n", ionode+4, hose, slot, vector, intpin); return (0); } static int dwlpx_teardown_intr(device_t dev, device_t child, struct resource *irq, void *c) { struct dwlpx_softc *sc = DWLPX_SOFTC(dev); int slot, ionode, hose, vector, intpin; intpin = pci_get_intpin(child); slot = pci_get_slot(child); ionode = sc->bushose >> 2; hose = sc->bushose & 0x3; vector = DWLPX_MVEC(ionode, hose, slot); dwlpx_enadis_intr(vector, intpin, 0); alpha_teardown_intr(c); return rman_deactivate_resource(irq); } static int dwlpx_read_ivar(device_t dev, device_t child, int which, u_long *result) { switch (which) { case PCIB_IVAR_BUS: *result = 0; return 0; } return ENOENT; } static void * dwlpx_cvt_dense(device_t dev, vm_offset_t addr) { struct dwlpx_softc *sc = DWLPX_SOFTC(dev); addr &= 0xffffffffUL; return (void *) KV(addr | sc->dmem_base); } static kobj_t dwlpx_get_bustag(device_t dev, int type) { struct dwlpx_softc *sc = DWLPX_SOFTC(dev); switch (type) { case SYS_RES_IOPORT: return (kobj_t) &sc->io_space; case SYS_RES_MEMORY: return (kobj_t) &sc->mem_space; } return 0; } static struct rman * dwlpx_get_rman(device_t dev, int type) { struct dwlpx_softc *sc = DWLPX_SOFTC(dev); switch (type) { case SYS_RES_IOPORT: return &sc->io_rman; case SYS_RES_MEMORY: return &sc->mem_rman; } return 0; } static int dwlpx_maxslots(device_t dev) { return (DWLPX_MAXDEV); } static u_int32_t dwlpx_read_config(device_t dev, int bus, int slot, int func, int off, int sz) { struct dwlpx_softc *sc = DWLPX_SOFTC(dev); u_int32_t *dp, data, rvp, pci_idsel, hpcdev; unsigned long paddr; int hose, ionode; int secondary = 0, s = 0, i; rvp = data = ~0; ionode = ((sc->bushose >> 2) & 0x7); hose = (sc->bushose & 0x3); if (sc->nhpc < 1) return (data); else if (sc->nhpc < 2 && slot >= 4) return (data); else if (sc->nhpc < 3 && slot >= 8) return (data); else if (slot >= DWLPX_MAXDEV) return (data); hpcdev = slot >> 2; pci_idsel = (1 << ((slot & 0x3) + 2)); paddr = (hpcdev << 22) | (pci_idsel << 16) | (func << 13); if (secondary) { paddr &= 0x1fffff; paddr |= (secondary << 21); #if 0 printf("read secondary %d reg %x (paddr %lx)", secondary, offset, tag); #endif alpha_pal_draina(); s = splhigh(); /* * Set up HPCs for type 1 cycles. */ for (i = 0; i < sc->nhpc; i++) { rvp = REGVAL(PCIA_CTL(i)+sc->sysbase) | PCIA_CTL_T1CYC; alpha_mb(); REGVAL(PCIA_CTL(i) + sc->sysbase) = rvp; alpha_mb(); } } paddr |= ((unsigned long) ((off >> 2) << 7)); paddr |= ((sz - 1) << 3); paddr |= DWLPX_PCI_CONF; paddr |= ((unsigned long) hose) << 34; paddr |= ((unsigned long) ionode) << 36; paddr |= 1L << 39; dp = (u_int32_t *)KV(paddr); #if 0 printf("CFGREAD %d.%d.%d.%d.%d.%d.%d -> paddr 0x%lx", ionode+4, hose, bus, slot, func, off, sz, paddr); #endif if (badaddr(dp, sizeof (*dp)) == 0) { data = *dp; } if (secondary) { alpha_pal_draina(); for (i = 0; i < sc->nhpc; i++) { rvp = REGVAL(PCIA_CTL(i)+sc->sysbase) & ~PCIA_CTL_T1CYC; alpha_mb(); REGVAL(PCIA_CTL(i) + sc->sysbase) = rvp; alpha_mb(); } (void) splx(s); } if (data != ~0) { if (sz == 1) { rvp = SPARSE_BYTE_EXTRACT(off, data); } else if (sz == 2) { rvp = SPARSE_WORD_EXTRACT(off, data); } else { rvp = data; } } else { rvp = data; } #if 0 printf(" data 0x%x -> 0x%x\n", data, rvp); #endif return (rvp); } static void dwlpx_write_config(device_t dev, int bus, int slot, int func, int off, u_int32_t data, int sz) { struct dwlpx_softc *sc = DWLPX_SOFTC(dev); int hose, ionode; int secondary = 0, s = 0, i; u_int32_t *dp, rvp, pci_idsel, hpcdev; unsigned long paddr; ionode = ((sc->bushose >> 2) & 0x7); hose = (sc->bushose & 0x3); if (sc->nhpc < 1) return; else if (sc->nhpc < 2 && slot >= 4) return; else if (sc->nhpc < 3 && slot >= 8) return; else if (slot >= DWLPX_MAXDEV) return; hpcdev = slot >> 2; pci_idsel = (1 << ((slot & 0x3) + 2)); paddr = (hpcdev << 22) | (pci_idsel << 16) | (func << 13); if (secondary) { paddr &= 0x1fffff; paddr |= (secondary << 21); #if 0 printf("write secondary %d reg %x (paddr %lx)", secondary, offset, tag); #endif alpha_pal_draina(); s = splhigh(); /* * Set up HPCs for type 1 cycles. */ for (i = 0; i < sc->nhpc; i++) { rvp = REGVAL(PCIA_CTL(i)+sc->sysbase) | PCIA_CTL_T1CYC; alpha_mb(); REGVAL(PCIA_CTL(i) + sc->sysbase) = rvp; alpha_mb(); } } paddr |= ((unsigned long) ((off >> 2) << 7)); paddr |= ((sz - 1) << 3); paddr |= DWLPX_PCI_CONF; paddr |= ((unsigned long) hose) << 34; paddr |= ((unsigned long) ionode) << 36; paddr |= 1L << 39; dp = (u_int32_t *)KV(paddr); if (badaddr(dp, sizeof (*dp)) == 0) { u_int32_t new_data; if (sz == 1) { new_data = SPARSE_BYTE_INSERT(off, data); } else if (sz == 2) { new_data = SPARSE_WORD_INSERT(off, data); } else { new_data = data; } #if 0 printf("CFGWRITE %d.%d.%d.%d.%d.%d.%d paddr 0x%lx data 0x%x -> 0x%x\n", ionode+4, hose, bus, slot, func, off, sz, paddr, data, new_data); #endif *dp = new_data; } if (secondary) { alpha_pal_draina(); for (i = 0; i < sc->nhpc; i++) { rvp = REGVAL(PCIA_CTL(i)+sc->sysbase) & ~PCIA_CTL_T1CYC; alpha_mb(); REGVAL(PCIA_CTL(i) + sc->sysbase) = rvp; alpha_mb(); } (void) splx(s); } } static void dwlpx_dma_init(struct dwlpx_softc *sc) { u_int32_t *tbl, sgwmask, sgwbase, sgwend; int i, lim; /* * Determine size of Window C based on the amount of SGMAP * page table SRAM available. */ if (sc->sgmapsz == DWLPX_SG128K) { lim = 128 * 1024; sgwmask = PCIA_WMASK_1G; sgwbase = 1UL*1024UL*1024UL*1024UL; } else { lim = 32 * 1024; sgwmask = PCIA_WMASK_256M; sgwbase = 1UL*1024UL*1024UL*1024UL+3UL*256UL*1024UL*1024UL; } sgwend = sgwbase + (lim * 8192) - 1; /* * A few notes about SGMAP-mapped DMA on the DWLPx: * * The DWLPx has PCIA-resident SRAM that is used for * the SGMAP page table; there is no TLB. The DWLPA * has room for 32K entries, yielding a total of 256M * of sgva space. The DWLPB has 32K entries or 128K * entries, depending on TBIT, yielding either 256M or * 1G of sgva space. */ /* * Initialize the page table. */ tbl = (u_int32_t *) ALPHA_PHYS_TO_K0SEG(PCIA_SGMAP_PT + sc->sysbase); for (i = 0; i < lim; i++) tbl[i] = 0; #if 0 /* XXX NOT DONE YET XXX */ /* * Initialize the SGMAP for window C: * * Size: 256M or 1GB * Window base: 1GB * SGVA base: 0 */ chipset.sgmap = sgmap_map_create(sgwbase, sgwend, dwlpx_sgmap_map, tbl); #endif /* * Set up DMA windows for this DWLPx. */ for (i = 0; i < sc->nhpc; i++) { REGVAL(PCIA_WMASK_A(i) + sc->sysbase) = DWLPx_DIRECT_MAPPED_WMASK; REGVAL(PCIA_TBASE_A(i) + sc->sysbase) = 0; REGVAL(PCIA_WBASE_A(i) + sc->sysbase) = DWLPx_DIRECT_MAPPED_BASE | PCIA_WBASE_W_EN; REGVAL(PCIA_WMASK_B(i) + sc->sysbase) = 0; REGVAL(PCIA_TBASE_B(i) + sc->sysbase) = 0; REGVAL(PCIA_WBASE_B(i) + sc->sysbase) = 0; REGVAL(PCIA_WMASK_C(i) + sc->sysbase) = sgwmask; REGVAL(PCIA_TBASE_C(i) + sc->sysbase) = 0; REGVAL(PCIA_WBASE_C(i) + sc->sysbase) = sgwbase | PCIA_WBASE_W_EN | PCIA_WBASE_SG_EN; } alpha_mb(); /* XXX XXX BEGIN XXX XXX */ { /* XXX */ alpha_XXX_dmamap_or = DWLPx_DIRECT_MAPPED_BASE; /* XXX */ } /* XXX */ /* XXX XXX END XXX XXX */ } /* */ static void dwlpx_intr(void *arg) { #ifdef SIMOS extern void simos_intr(int); simos_intr(0); #else unsigned long vec = (unsigned long) arg; if ((vec & DWLPX_VEC_EMARK) != 0) { dwlpx_eintr(vec); return; } if ((vec & DWLPX_VEC_MARK) == 0) { panic("dwlpx_intr: bad vector %p", arg); /* NOTREACHED */ } alpha_dispatch_intr(NULL, vec); #endif } static void dwlpx_eintr(unsigned long vec) { device_t dev; struct dwlpx_softc *sc; int ionode, hosenum, i; struct { u_int32_t err; u_int32_t addr; } hpcs[NHPC]; ionode = (vec >> 8) & 0xf; hosenum = (vec >> 4) & 0x7; if (ionode >= DWLPX_NIONODE || hosenum >= DWLPX_NHOSE) { panic("dwlpx_iointr: mangled vector 0x%lx", vec); /* NOTREACHED */ } dev = dwlpxs[ionode][hosenum]; sc = DWLPX_SOFTC(dev); for (i = 0; i < sc->nhpc; i++) { hpcs[i].err = REGVAL(PCIA_ERR(i) + sc->sysbase); hpcs[i].addr = REGVAL(PCIA_FADR(i) + sc->sysbase); } printf("%s: node %d hose %d error interrupt\n", device_get_nameunit(dev), ionode + 4, hosenum); for (i = 0; i < sc->nhpc; i++) { if ((hpcs[i].err & PCIA_ERR_ERROR) == 0) continue; printf("\tHPC %d: ERR=0x%08x; DMA %s Memory, " "Failing Address 0x%x\n", i, hpcs[i].err, hpcs[i].addr & 0x1? "write to" : "read from", hpcs[i].addr & ~3); if (hpcs[i].err & PCIA_ERR_SERR_L) printf("\t PCI device asserted SERR_L\n"); if (hpcs[i].err & PCIA_ERR_ILAT) printf("\t Incremental Latency Exceeded\n"); if (hpcs[i].err & PCIA_ERR_SGPRTY) printf("\t CPU access of SG RAM Parity Error\n"); if (hpcs[i].err & PCIA_ERR_ILLCSR) printf("\t Illegal CSR Address Error\n"); if (hpcs[i].err & PCIA_ERR_PCINXM) printf("\t Nonexistent PCI Address Error\n"); if (hpcs[i].err & PCIA_ERR_DSCERR) printf("\t PCI Target Disconnect Error\n"); if (hpcs[i].err & PCIA_ERR_ABRT) printf("\t PCI Target Abort Error\n"); if (hpcs[i].err & PCIA_ERR_WPRTY) printf("\t PCI Write Parity Error\n"); if (hpcs[i].err & PCIA_ERR_DPERR) printf("\t PCI Data Parity Error\n"); if (hpcs[i].err & PCIA_ERR_APERR) printf("\t PCI Address Parity Error\n"); if (hpcs[i].err & PCIA_ERR_DFLT) printf("\t SG Map RAM Invalid Entry Error\n"); if (hpcs[i].err & PCIA_ERR_DPRTY) printf("\t DMA access of SG RAM Parity Error\n"); if (hpcs[i].err & PCIA_ERR_DRPERR) printf("\t DMA Read Return Parity Error\n"); if (hpcs[i].err & PCIA_ERR_MABRT) printf("\t PCI Master Abort Error\n"); if (hpcs[i].err & PCIA_ERR_CPRTY) printf("\t CSR Parity Error\n"); if (hpcs[i].err & PCIA_ERR_COVR) printf("\t CSR Overrun Error\n"); if (hpcs[i].err & PCIA_ERR_MBPERR) printf("\t Mailbox Parity Error\n"); if (hpcs[i].err & PCIA_ERR_MBILI) printf("\t Mailbox Illegal Length Error\n"); REGVAL(PCIA_ERR(i) + sc->sysbase) = hpcs[i].err; } } static device_method_t dwlpx_methods[] = { /* Device interface */ DEVMETHOD(device_probe, dwlpx_probe), DEVMETHOD(device_attach, dwlpx_attach), /* Bus interface */ DEVMETHOD(bus_print_child, bus_generic_print_child), DEVMETHOD(bus_read_ivar, dwlpx_read_ivar), DEVMETHOD(bus_setup_intr, dwlpx_setup_intr), DEVMETHOD(bus_teardown_intr, dwlpx_teardown_intr), DEVMETHOD(bus_alloc_resource, pci_alloc_resource), DEVMETHOD(bus_release_resource, pci_release_resource), DEVMETHOD(bus_activate_resource, pci_activate_resource), DEVMETHOD(bus_deactivate_resource, pci_deactivate_resource), /* alphapci interface */ DEVMETHOD(alphapci_cvt_dense, dwlpx_cvt_dense), DEVMETHOD(alphapci_get_bustag, dwlpx_get_bustag), DEVMETHOD(alphapci_get_rman, dwlpx_get_rman), /* pcib interface */ DEVMETHOD(pcib_maxslots, dwlpx_maxslots), DEVMETHOD(pcib_read_config, dwlpx_read_config), DEVMETHOD(pcib_write_config, dwlpx_write_config), DEVMETHOD(pcib_route_interrupt, alpha_pci_route_interrupt), { 0, 0 } }; static driver_t dwlpx_driver = { "pcib", dwlpx_methods, sizeof (struct dwlpx_softc) }; DRIVER_MODULE(pcib, kft, dwlpx_driver, dwlpx_devclass, 0, 0);