/* $OpenBSD: agp_amd.c,v 1.10 2009/04/20 01:28:45 oga Exp $ */ /* $NetBSD: agp_amd.c,v 1.6 2001/10/06 02:48:50 thorpej Exp $ */ /*- * Copyright (c) 2000 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: src/sys/pci/agp_amd.c,v 1.6 2001/07/05 21:28:46 jhb Exp $ */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #define READ2(off) bus_space_read_2(asc->iot, asc->ioh, off) #define READ4(off) bus_space_read_4(asc->iot, asc->ioh, off) #define WRITE2(off,v) bus_space_write_2(asc->iot, asc->ioh, off, v) #define WRITE4(off,v) bus_space_write_4(asc->iot, asc->ioh, off, v) struct agp_amd_gatt { bus_dmamap_t ag_dmamap; bus_dma_segment_t ag_dmaseg; int ag_nseg; u_int32_t ag_entries; u_int32_t *ag_vdir; /* virtual address of page dir */ bus_addr_t ag_pdir; /* bus address of page dir */ u_int32_t *ag_virtual; /* virtual address of gatt */ bus_addr_t ag_physical; /* bus address of gatt */ size_t ag_size; }; struct agp_amd_softc { struct device dev; struct agp_softc *agpdev; struct agp_amd_gatt *gatt; pci_chipset_tag_t asc_pc; pcitag_t asc_tag; bus_space_handle_t ioh; bus_space_tag_t iot; bus_size_t initial_aperture; }; void agp_amd_attach(struct device *, struct device *, void *); int agp_amd_probe(struct device *, void *, void *); bus_size_t agp_amd_get_aperture(void *); struct agp_amd_gatt *agp_amd_alloc_gatt(bus_dma_tag_t, bus_size_t); int agp_amd_set_aperture(void *, bus_size_t); int agp_amd_bind_page(void *, off_t, bus_addr_t); int agp_amd_unbind_page(void *, off_t); void agp_amd_flush_tlb(void *); struct cfattach amdagp_ca = { sizeof(struct agp_amd_softc), agp_amd_probe, agp_amd_attach }; struct cfdriver amdagp_cd = { NULL, "amdagp", DV_DULL }; const struct agp_methods agp_amd_methods = { agp_amd_get_aperture, agp_amd_bind_page, agp_amd_unbind_page, agp_amd_flush_tlb, }; struct agp_amd_gatt * agp_amd_alloc_gatt(bus_dma_tag_t dmat, bus_size_t apsize) { bus_size_t entries = apsize >> AGP_PAGE_SHIFT; struct agp_amd_gatt *gatt; int i, npages; caddr_t vdir; gatt = malloc(sizeof(struct agp_amd_gatt), M_AGP, M_NOWAIT); if (!gatt) return (0); gatt->ag_size = AGP_PAGE_SIZE + entries * sizeof(u_int32_t); if (agp_alloc_dmamem(dmat, gatt->ag_size, &gatt->ag_dmamap, &gatt->ag_pdir, &gatt->ag_dmaseg) != 0) { printf("failed to allocate GATT\n"); free(gatt, M_AGP); return (NULL); } if (bus_dmamem_map(dmat, &gatt->ag_dmaseg, 1, gatt->ag_size, &vdir, BUS_DMA_NOWAIT) != 0) { printf("failed to map GATT\n"); agp_free_dmamem(dmat, gatt->ag_size, gatt->ag_dmamap, &gatt->ag_dmaseg); free(gatt, M_AGP); return (NULL); } gatt->ag_vdir = (u_int32_t *)vdir; gatt->ag_entries = entries; gatt->ag_virtual = (u_int32_t *)(vdir + AGP_PAGE_SIZE); gatt->ag_physical = gatt->ag_pdir + AGP_PAGE_SIZE; gatt->ag_size = AGP_PAGE_SIZE + entries * sizeof(u_int32_t); /* * Map the pages of the GATT into the page directory. */ npages = ((entries * sizeof(u_int32_t) + AGP_PAGE_SIZE - 1) >> AGP_PAGE_SHIFT); for (i = 0; i < npages; i++) gatt->ag_vdir[i] = (gatt->ag_physical + i * AGP_PAGE_SIZE) | 1; /* * Make sure the chipset can see everything. */ agp_flush_cache(); return (gatt); } #if 0 void agp_amd_free_gatt(bus_dma_tag_t dmat, struct agp_amd_gatt *gatt) { bus_dmamem_unmap(dmat, gatt->ag_virtual, gatt->ag_size); agp_free_dmamem(dmat, gatt->ag_size, gatt->ag_dmamap, (caddr_t)gatt->ag_virtual, &gatt->ag_dmaseg, gatt->ag_nseg); free(gatt, M_AGP); } #endif int agp_amd_probe(struct device *parent, void *match, void *aux) { struct agp_attach_args *aa = aux; struct pci_attach_args *pa = aa->aa_pa; /* Must be a pchb */ if (agpbus_probe(aa) == 1 && PCI_VENDOR(pa->pa_id) == PCI_VENDOR_AMD && (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_AMD_SC751_SC || PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_AMD_761_PCHB || PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_AMD_762_PCHB)) return (1); return (0); } void agp_amd_attach(struct device *parent, struct device *self, void *aux) { struct agp_amd_softc *asc = (struct agp_amd_softc *)self; struct agp_attach_args *aa = aux; struct pci_attach_args *pa = aa->aa_pa; struct agp_amd_gatt *gatt; pcireg_t reg; int error; asc->asc_pc = pa->pa_pc; asc->asc_tag = pa->pa_tag; error = pci_mapreg_map(pa, AGP_AMD751_REGISTERS, PCI_MAPREG_TYPE_MEM, 0, &asc->iot, &asc->ioh, NULL, NULL, 0); if (error != 0) { printf("can't map AGP registers\n"); return; } asc->initial_aperture = agp_amd_get_aperture(asc); for (;;) { bus_size_t size = agp_amd_get_aperture(asc); gatt = agp_amd_alloc_gatt(pa->pa_dmat, size); if (gatt != NULL) break; /* * almost certainly error allocating contigious dma memory * so reduce aperture so that the gatt size reduces. */ if (agp_amd_set_aperture(asc, size / 2)) { printf(": failed to set aperture\n"); return; } } asc->gatt = gatt; /* Install the gatt. */ WRITE4(AGP_AMD751_ATTBASE, gatt->ag_physical); /* Enable synchronisation between host and agp. */ reg = pci_conf_read(asc->asc_pc, asc->asc_tag, AGP_AMD751_MODECTRL); reg &= ~0x00ff00ff; reg |= (AGP_AMD751_MODECTRL_SYNEN) | (AGP_AMD751_MODECTRL2_GPDCE << 16); pci_conf_write(asc->asc_pc, asc->asc_tag, AGP_AMD751_MODECTRL, reg); /* Enable the TLB and flush */ WRITE2(AGP_AMD751_STATUS, READ2(AGP_AMD751_STATUS) | AGP_AMD751_STATUS_GCE); agp_amd_flush_tlb(asc); asc->agpdev = (struct agp_softc *)agp_attach_bus(pa, &agp_amd_methods, AGP_APBASE, PCI_MAPREG_TYPE_MEM, &asc->dev); return; } #if 0 int agp_amd_detach(void *sc) { struct agp_amd_softc *asc = sc; pcireg_t reg; /* Disable the TLB.. */ WRITE2(AGP_AMD751_STATUS, READ2(AGP_AMD751_STATUS) & ~AGP_AMD751_STATUS_GCE); /* Disable host-agp sync */ reg = pci_conf_read(asc->asc_pc, asc->asc_tag, AGP_AMD751_MODECTRL); reg &= 0xffffff00; pci_conf_write(asc->asc_pc, asc->asc_pcitag, AGP_AMD751_MODECTRL, reg); /* Clear the GATT base */ WRITE4(AGP_AMD751_ATTBASE, 0); /* Put the aperture back the way it started. */ agp_amd_set_aperture(asc, asc->initial_aperture); agp_amd_free_gatt(asc, asc->gatt); /* XXXfvdl no pci_mapreg_unmap */ return (0); } #endif bus_size_t agp_amd_get_aperture(void *sc) { struct agp_amd_softc *asc = sc; int vas; vas = (pci_conf_read(asc->asc_pc, asc->asc_tag, AGP_AMD751_APCTRL) & 0x06); vas >>= 1; /* * The aperture size is equal to 32M< 2U*1024*1024*1024) return (EINVAL); vas = ffs(aperture / 32*1024*1024) - 1; reg = pci_conf_read(asc->asc_pc, asc->asc_tag, AGP_AMD751_APCTRL); reg = (reg & ~0x06) | (vas << 1); pci_conf_write(asc->asc_pc, asc->asc_tag, AGP_AMD751_APCTRL, reg); return (0); } int agp_amd_bind_page(void *sc, off_t offset, bus_addr_t physical) { struct agp_amd_softc *asc = sc; if (offset < 0 || offset >= (asc->gatt->ag_entries << AGP_PAGE_SHIFT)) return (EINVAL); asc->gatt->ag_virtual[offset >> AGP_PAGE_SHIFT] = physical | 1; return (0); } int agp_amd_unbind_page(void *sc, off_t offset) { struct agp_amd_softc *asc = sc; if (offset < 0 || offset >= (asc->gatt->ag_entries << AGP_PAGE_SHIFT)) return (EINVAL); asc->gatt->ag_virtual[offset >> AGP_PAGE_SHIFT] = 0; return (0); } void agp_amd_flush_tlb(void *sc) { struct agp_amd_softc *asc = sc; /* Set the cache invalidate bit and wait for the chipset to clear */ WRITE4(AGP_AMD751_TLBCTRL, 1); do { DELAY(1); } while (READ4(AGP_AMD751_TLBCTRL)); }