Home | History | Annotate | Line # | Download | only in sparc
iommu.c revision 1.40
      1  1.40        pk /*	$NetBSD: iommu.c,v 1.40 2000/05/10 11:17:50 pk Exp $ */
      2   1.1        pk 
      3   1.1        pk /*
      4   1.1        pk  * Copyright (c) 1996
      5   1.3    abrown  * 	The President and Fellows of Harvard College. All rights reserved.
      6   1.1        pk  * Copyright (c) 1995 	Paul Kranenburg
      7   1.1        pk  *
      8   1.1        pk  * Redistribution and use in source and binary forms, with or without
      9   1.1        pk  * modification, are permitted provided that the following conditions
     10   1.1        pk  * are met:
     11   1.1        pk  * 1. Redistributions of source code must retain the above copyright
     12   1.1        pk  *    notice, this list of conditions and the following disclaimer.
     13   1.1        pk  * 2. Redistributions in binary form must reproduce the above copyright
     14   1.1        pk  *    notice, this list of conditions and the following disclaimer in the
     15   1.1        pk  *    documentation and/or other materials provided with the distribution.
     16   1.1        pk  * 3. All advertising materials mentioning features or use of this software
     17   1.1        pk  *    must display the following acknowledgement:
     18   1.1        pk  *	This product includes software developed by Aaron Brown and
     19   1.1        pk  *	Harvard University.
     20   1.1        pk  *	This product includes software developed by Paul Kranenburg.
     21   1.1        pk  * 4. Neither the name of the University nor the names of its contributors
     22   1.1        pk  *    may be used to endorse or promote products derived from this software
     23   1.1        pk  *    without specific prior written permission.
     24   1.1        pk  *
     25   1.1        pk  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     26   1.1        pk  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     27   1.1        pk  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     28   1.1        pk  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     29   1.1        pk  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     30   1.1        pk  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     31   1.1        pk  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     32   1.1        pk  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     33   1.1        pk  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     34   1.1        pk  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     35   1.1        pk  * SUCH DAMAGE.
     36   1.1        pk  *
     37   1.1        pk  */
     38   1.1        pk 
     39   1.1        pk #include <sys/param.h>
     40  1.18        pk #include <sys/extent.h>
     41  1.18        pk #include <sys/malloc.h>
     42  1.18        pk #include <sys/queue.h>
     43   1.1        pk #include <sys/systm.h>
     44   1.1        pk #include <sys/device.h>
     45   1.1        pk #include <vm/vm.h>
     46  1.18        pk #include <vm/vm_kern.h>
     47  1.25        pk 
     48  1.30       mrg #include <uvm/uvm_extern.h>
     49  1.31        pk #include <uvm/uvm.h>
     50   1.1        pk 
     51  1.18        pk #define _SPARC_BUS_DMA_PRIVATE
     52  1.18        pk #include <machine/bus.h>
     53   1.1        pk #include <machine/autoconf.h>
     54   1.1        pk #include <machine/ctlreg.h>
     55   1.1        pk #include <sparc/sparc/asm.h>
     56   1.1        pk #include <sparc/sparc/vaddrs.h>
     57   1.9        pk #include <sparc/sparc/cpuvar.h>
     58   1.1        pk #include <sparc/sparc/iommureg.h>
     59  1.16        pk #include <sparc/sparc/iommuvar.h>
     60   1.1        pk 
     61   1.1        pk struct iommu_softc {
     62   1.1        pk 	struct device	sc_dev;		/* base device */
     63   1.1        pk 	struct iommureg	*sc_reg;
     64   1.1        pk 	u_int		sc_pagesize;
     65   1.1        pk 	u_int		sc_range;
     66  1.21        pk 	bus_addr_t	sc_dvmabase;
     67   1.1        pk 	iopte_t		*sc_ptes;
     68   1.1        pk 	int		sc_hasiocache;
     69   1.1        pk };
     70   1.1        pk struct	iommu_softc *iommu_sc;/*XXX*/
     71   1.1        pk int	has_iocache;
     72  1.19        pk u_long	dvma_cachealign;
     73   1.1        pk 
     74  1.33        pk /*
     75  1.33        pk  * Note: operations on the extent map are being protected with
     76  1.33        pk  * splhigh(), since we cannot predict at which interrupt priority
     77  1.33        pk  * our clients will run.
     78  1.33        pk  */
     79  1.18        pk struct extent *iommu_dvmamap;
     80  1.18        pk 
     81   1.1        pk 
     82   1.1        pk /* autoconfiguration driver */
     83   1.5       cgd int	iommu_print __P((void *, const char *));
     84   1.1        pk void	iommu_attach __P((struct device *, struct device *, void *));
     85   1.8        pk int	iommu_match __P((struct device *, struct cfdata *, void *));
     86   1.1        pk 
     87   1.1        pk struct cfattach iommu_ca = {
     88   1.1        pk 	sizeof(struct iommu_softc), iommu_match, iommu_attach
     89   1.1        pk };
     90   1.1        pk 
     91  1.18        pk /* IOMMU DMA map functions */
     92  1.18        pk int	iommu_dmamap_load __P((bus_dma_tag_t, bus_dmamap_t, void *,
     93  1.39        pk 			bus_size_t, struct proc *, int));
     94  1.18        pk int	iommu_dmamap_load_mbuf __P((bus_dma_tag_t, bus_dmamap_t,
     95  1.39        pk 			struct mbuf *, int));
     96  1.18        pk int	iommu_dmamap_load_uio __P((bus_dma_tag_t, bus_dmamap_t,
     97  1.39        pk 			struct uio *, int));
     98  1.18        pk int	iommu_dmamap_load_raw __P((bus_dma_tag_t, bus_dmamap_t,
     99  1.39        pk 			bus_dma_segment_t *, int, bus_size_t, int));
    100  1.18        pk void	iommu_dmamap_unload __P((bus_dma_tag_t, bus_dmamap_t));
    101  1.18        pk void	iommu_dmamap_sync __P((bus_dma_tag_t, bus_dmamap_t, bus_addr_t,
    102  1.39        pk 			bus_size_t, int));
    103  1.18        pk 
    104  1.18        pk int	iommu_dmamem_map __P((bus_dma_tag_t tag, bus_dma_segment_t *segs,
    105  1.39        pk 			int nsegs, size_t size, caddr_t *kvap, int flags));
    106  1.18        pk int	iommu_dmamem_mmap __P((bus_dma_tag_t tag, bus_dma_segment_t *segs,
    107  1.39        pk 			int nsegs, int off, int prot, int flags));
    108  1.39        pk int	iommu_dvma_alloc(bus_dmamap_t, vaddr_t, bus_size_t, bus_size_t, int,
    109  1.39        pk 			bus_addr_t *, bus_size_t *);
    110  1.18        pk 
    111  1.18        pk 
    112  1.18        pk struct sparc_bus_dma_tag iommu_dma_tag = {
    113  1.18        pk 	NULL,
    114  1.18        pk 	_bus_dmamap_create,
    115  1.18        pk 	_bus_dmamap_destroy,
    116  1.18        pk 	iommu_dmamap_load,
    117  1.18        pk 	iommu_dmamap_load_mbuf,
    118  1.18        pk 	iommu_dmamap_load_uio,
    119  1.18        pk 	iommu_dmamap_load_raw,
    120  1.18        pk 	iommu_dmamap_unload,
    121  1.18        pk 	iommu_dmamap_sync,
    122  1.18        pk 
    123  1.39        pk 	_bus_dmamem_alloc,
    124  1.39        pk 	_bus_dmamem_free,
    125  1.18        pk 	iommu_dmamem_map,
    126  1.18        pk 	_bus_dmamem_unmap,
    127  1.18        pk 	iommu_dmamem_mmap
    128  1.18        pk };
    129   1.1        pk /*
    130   1.1        pk  * Print the location of some iommu-attached device (called just
    131   1.1        pk  * before attaching that device).  If `iommu' is not NULL, the
    132   1.1        pk  * device was found but not configured; print the iommu as well.
    133   1.1        pk  * Return UNCONF (config_find ignores this if the device was configured).
    134   1.1        pk  */
    135   1.1        pk int
    136   1.1        pk iommu_print(args, iommu)
    137   1.1        pk 	void *args;
    138   1.5       cgd 	const char *iommu;
    139   1.1        pk {
    140  1.16        pk 	struct iommu_attach_args *ia = args;
    141   1.1        pk 
    142   1.1        pk 	if (iommu)
    143  1.16        pk 		printf("%s at %s", ia->iom_name, iommu);
    144   1.1        pk 	return (UNCONF);
    145   1.1        pk }
    146   1.1        pk 
    147   1.1        pk int
    148   1.8        pk iommu_match(parent, cf, aux)
    149   1.1        pk 	struct device *parent;
    150   1.8        pk 	struct cfdata *cf;
    151   1.8        pk 	void *aux;
    152   1.1        pk {
    153  1.16        pk 	struct mainbus_attach_args *ma = aux;
    154   1.1        pk 
    155   1.1        pk 	if (CPU_ISSUN4OR4C)
    156   1.1        pk 		return (0);
    157  1.16        pk 	return (strcmp(cf->cf_driver->cd_name, ma->ma_name) == 0);
    158   1.1        pk }
    159   1.1        pk 
    160   1.1        pk /*
    161   1.1        pk  * Attach the iommu.
    162   1.1        pk  */
    163   1.1        pk void
    164   1.1        pk iommu_attach(parent, self, aux)
    165   1.1        pk 	struct device *parent;
    166   1.1        pk 	struct device *self;
    167   1.1        pk 	void *aux;
    168   1.1        pk {
    169   1.4        pk #if defined(SUN4M)
    170  1.21        pk 	struct iommu_softc *sc = (struct iommu_softc *)self;
    171  1.16        pk 	struct mainbus_attach_args *ma = aux;
    172  1.21        pk 	int node;
    173  1.16        pk 	bus_space_handle_t bh;
    174  1.21        pk 	u_int pbase, pa;
    175  1.21        pk 	int i, mmupcrsave, s;
    176  1.21        pk 	iopte_t *tpte_p;
    177   1.1        pk 	extern u_int *kernel_iopte_table;
    178   1.1        pk 	extern u_int kernel_iopte_table_pa;
    179   1.1        pk 
    180  1.10        pk /*XXX-GCC!*/mmupcrsave=0;
    181   1.1        pk 	iommu_sc = sc;
    182   1.1        pk 	/*
    183   1.1        pk 	 * XXX there is only one iommu, for now -- do not know how to
    184   1.1        pk 	 * address children on others
    185   1.1        pk 	 */
    186   1.1        pk 	if (sc->sc_dev.dv_unit > 0) {
    187   1.7  christos 		printf(" unsupported\n");
    188   1.1        pk 		return;
    189   1.1        pk 	}
    190  1.16        pk 	node = ma->ma_node;
    191   1.1        pk 
    192   1.1        pk #if 0
    193   1.1        pk 	if (ra->ra_vaddr)
    194   1.1        pk 		sc->sc_reg = (struct iommureg *)ca->ca_ra.ra_vaddr;
    195   1.1        pk #else
    196   1.1        pk 	/*
    197   1.1        pk 	 * Map registers into our space. The PROM may have done this
    198   1.1        pk 	 * already, but I feel better if we have our own copy. Plus, the
    199   1.1        pk 	 * prom doesn't map the entire register set
    200   1.1        pk 	 *
    201   1.1        pk 	 * XXX struct iommureg is bigger than ra->ra_len; what are the
    202   1.1        pk 	 *     other fields for?
    203   1.1        pk 	 */
    204  1.17        pk 	if (bus_space_map2(
    205  1.16        pk 			ma->ma_bustag,
    206  1.16        pk 			ma->ma_iospace,
    207  1.17        pk 			ma->ma_paddr,
    208  1.16        pk 			sizeof(struct iommureg),
    209  1.16        pk 			0,
    210  1.16        pk 			0,
    211  1.16        pk 			&bh) != 0) {
    212  1.16        pk 		printf("iommu_attach: cannot map registers\n");
    213  1.16        pk 		return;
    214  1.16        pk 	}
    215  1.16        pk 	sc->sc_reg = (struct iommureg *)bh;
    216   1.1        pk #endif
    217   1.1        pk 
    218   1.1        pk 	sc->sc_hasiocache = node_has_property(node, "cache-coherence?");
    219   1.9        pk 	if (CACHEINFO.c_enabled == 0) /* XXX - is this correct? */
    220   1.9        pk 		sc->sc_hasiocache = 0;
    221   1.1        pk 	has_iocache = sc->sc_hasiocache; /* Set global flag */
    222   1.1        pk 
    223   1.1        pk 	sc->sc_pagesize = getpropint(node, "page-size", NBPG),
    224   1.1        pk 	sc->sc_range = (1 << 24) <<
    225   1.1        pk 	    ((sc->sc_reg->io_cr & IOMMU_CTL_RANGE) >> IOMMU_CTL_RANGESHFT);
    226   1.1        pk #if 0
    227   1.1        pk 	sc->sc_dvmabase = (0 - sc->sc_range);
    228   1.1        pk #endif
    229   1.1        pk 	pbase = (sc->sc_reg->io_bar & IOMMU_BAR_IBA) <<
    230   1.1        pk 			(14 - IOMMU_BAR_IBASHFT);
    231   1.1        pk 
    232   1.1        pk 	/*
    233   1.1        pk 	 * Now we build our own copy of the IOMMU page tables. We need to
    234   1.1        pk 	 * do this since we're going to change the range to give us 64M of
    235   1.1        pk 	 * mappings, and thus we can move DVMA space down to 0xfd000000 to
    236   1.1        pk 	 * give us lots of space and to avoid bumping into the PROM, etc.
    237   1.1        pk 	 *
    238   1.1        pk 	 * XXX Note that this is rather messy.
    239   1.1        pk 	 */
    240   1.1        pk 	sc->sc_ptes = (iopte_t *) kernel_iopte_table;
    241   1.1        pk 
    242   1.1        pk 	/*
    243   1.1        pk 	 * Now discache the page tables so that the IOMMU sees our
    244   1.1        pk 	 * changes.
    245   1.1        pk 	 */
    246   1.1        pk 	kvm_uncache((caddr_t)sc->sc_ptes,
    247  1.22        pk 	    (((0 - IOMMU_DVMA_BASE)/sc->sc_pagesize) * sizeof(iopte_t)) / NBPG);
    248   1.1        pk 
    249   1.1        pk 	/*
    250   1.1        pk 	 * Ok. We've got to read in the original table using MMU bypass,
    251   1.1        pk 	 * and copy all of its entries to the appropriate place in our
    252   1.1        pk 	 * new table, even if the sizes are different.
    253   1.1        pk 	 * This is pretty easy since we know DVMA ends at 0xffffffff.
    254   1.1        pk 	 *
    255   1.1        pk 	 * XXX: PGOFSET, NBPG assume same page size as SRMMU
    256   1.1        pk 	 */
    257  1.14        pk 	if (cpuinfo.cpu_impl == 4 && cpuinfo.mxcc) {
    258  1.10        pk 		/* set MMU AC bit */
    259  1.10        pk 		sta(SRMMU_PCR, ASI_SRMMU,
    260  1.10        pk 		    ((mmupcrsave = lda(SRMMU_PCR, ASI_SRMMU)) | VIKING_PCR_AC));
    261   1.1        pk 	}
    262   1.1        pk 
    263  1.22        pk 	for (tpte_p = &sc->sc_ptes[((0 - IOMMU_DVMA_BASE)/NBPG) - 1],
    264   1.1        pk 	     pa = (u_int)pbase - sizeof(iopte_t) +
    265   1.1        pk 		   ((u_int)sc->sc_range/NBPG)*sizeof(iopte_t);
    266   1.1        pk 	     tpte_p >= &sc->sc_ptes[0] && pa >= (u_int)pbase;
    267   1.1        pk 	     tpte_p--, pa -= sizeof(iopte_t)) {
    268   1.1        pk 
    269   1.1        pk 		IOMMU_FLUSHPAGE(sc,
    270  1.22        pk 			     (tpte_p - &sc->sc_ptes[0])*NBPG + IOMMU_DVMA_BASE);
    271   1.1        pk 		*tpte_p = lda(pa, ASI_BYPASS);
    272   1.1        pk 	}
    273  1.14        pk 	if (cpuinfo.cpu_impl == 4 && cpuinfo.mxcc) {
    274  1.10        pk 		/* restore mmu after bug-avoidance */
    275  1.10        pk 		sta(SRMMU_PCR, ASI_SRMMU, mmupcrsave);
    276   1.1        pk 	}
    277   1.1        pk 
    278   1.1        pk 	/*
    279   1.1        pk 	 * Now we can install our new pagetable into the IOMMU
    280   1.1        pk 	 */
    281  1.22        pk 	sc->sc_range = 0 - IOMMU_DVMA_BASE;
    282  1.22        pk 	sc->sc_dvmabase = IOMMU_DVMA_BASE;
    283   1.1        pk 
    284   1.1        pk 	/* calculate log2(sc->sc_range/16MB) */
    285   1.1        pk 	i = ffs(sc->sc_range/(1 << 24)) - 1;
    286   1.1        pk 	if ((1 << i) != (sc->sc_range/(1 << 24)))
    287   1.1        pk 		panic("bad iommu range: %d\n",i);
    288   1.1        pk 
    289   1.1        pk 	s = splhigh();
    290   1.1        pk 	IOMMU_FLUSHALL(sc);
    291   1.1        pk 
    292   1.1        pk 	sc->sc_reg->io_cr = (sc->sc_reg->io_cr & ~IOMMU_CTL_RANGE) |
    293   1.1        pk 			  (i << IOMMU_CTL_RANGESHFT) | IOMMU_CTL_ME;
    294   1.1        pk 	sc->sc_reg->io_bar = (kernel_iopte_table_pa >> 4) & IOMMU_BAR_IBA;
    295   1.1        pk 
    296   1.1        pk 	IOMMU_FLUSHALL(sc);
    297   1.1        pk 	splx(s);
    298   1.1        pk 
    299  1.13      fair 	printf(": version 0x%x/0x%x, page-size %d, range %dMB\n",
    300   1.1        pk 		(sc->sc_reg->io_cr & IOMMU_CTL_VER) >> 24,
    301   1.1        pk 		(sc->sc_reg->io_cr & IOMMU_CTL_IMPL) >> 28,
    302   1.1        pk 		sc->sc_pagesize,
    303   1.1        pk 		sc->sc_range >> 20);
    304   1.1        pk 
    305  1.22        pk 	iommu_dvmamap = extent_create("iommudvma",
    306  1.22        pk 					IOMMU_DVMA_BASE, IOMMU_DVMA_END,
    307  1.18        pk 					M_DEVBUF, 0, 0, EX_NOWAIT);
    308  1.22        pk 	if (iommu_dvmamap == NULL)
    309  1.22        pk 		panic("iommu: unable to allocate DVMA map");
    310   1.1        pk 
    311   1.1        pk 	/*
    312   1.1        pk 	 * Loop through ROM children (expect Sbus among them).
    313   1.1        pk 	 */
    314   1.1        pk 	for (node = firstchild(node); node; node = nextsibling(node)) {
    315  1.16        pk 		struct iommu_attach_args ia;
    316  1.16        pk 
    317  1.16        pk 		bzero(&ia, sizeof ia);
    318  1.16        pk 		ia.iom_name = getpropstring(node, "name");
    319  1.16        pk 
    320  1.16        pk 		/* Propagate BUS & DMA tags */
    321  1.16        pk 		ia.iom_bustag = ma->ma_bustag;
    322  1.18        pk 		ia.iom_dmatag = &iommu_dma_tag;
    323  1.27        pk 
    324  1.16        pk 		ia.iom_node = node;
    325  1.27        pk 
    326  1.27        pk 		ia.iom_reg = NULL;
    327  1.27        pk 		getprop(node, "reg", sizeof(struct sbus_reg),
    328  1.27        pk 			&ia.iom_nreg, (void **)&ia.iom_reg);
    329  1.27        pk 
    330  1.16        pk 		(void) config_found(&sc->sc_dev, (void *)&ia, iommu_print);
    331  1.27        pk 		if (ia.iom_reg != NULL)
    332  1.27        pk 			free(ia.iom_reg, M_DEVBUF);
    333   1.1        pk 	}
    334   1.4        pk #endif
    335   1.1        pk }
    336   1.1        pk 
    337   1.1        pk void
    338  1.39        pk iommu_enter(dva, pa)
    339  1.39        pk 	bus_addr_t dva;
    340  1.21        pk 	paddr_t pa;
    341   1.1        pk {
    342   1.1        pk 	struct iommu_softc *sc = iommu_sc;
    343   1.1        pk 	int pte;
    344   1.1        pk 
    345  1.39        pk 	/* This routine relies on the fact that sc->sc_pagesize == PAGE_SIZE */
    346  1.39        pk 
    347  1.39        pk #ifdef DIAGNOSTIC
    348  1.39        pk 	if (dva < sc->sc_dvmabase)
    349  1.39        pk 		panic("iommu_enter: dva 0x%lx not in DVMA space", (long)dva);
    350   1.1        pk #endif
    351   1.1        pk 
    352   1.1        pk 	pte = atop(pa) << IOPTE_PPNSHFT;
    353   1.1        pk 	pte &= IOPTE_PPN;
    354   1.2    abrown 	pte |= IOPTE_V | IOPTE_W | (has_iocache ? IOPTE_C : 0);
    355  1.39        pk 	sc->sc_ptes[atop(dva - sc->sc_dvmabase)] = pte;
    356  1.39        pk 	IOMMU_FLUSHPAGE(sc, dva);
    357   1.1        pk }
    358   1.1        pk 
    359   1.1        pk /*
    360   1.1        pk  * iommu_clear: clears mappings created by iommu_enter
    361   1.1        pk  */
    362   1.1        pk void
    363   1.1        pk iommu_remove(va, len)
    364  1.21        pk 	bus_addr_t va;
    365  1.21        pk 	bus_size_t len;
    366   1.1        pk {
    367  1.21        pk 	struct iommu_softc *sc = iommu_sc;
    368  1.21        pk 	u_int pagesz = sc->sc_pagesize;
    369  1.21        pk 	bus_addr_t base = sc->sc_dvmabase;
    370   1.1        pk 
    371   1.1        pk #ifdef DEBUG
    372  1.21        pk 	if (va < base)
    373  1.21        pk 		panic("iommu_enter: va 0x%lx not in DVMA space", (long)va);
    374   1.1        pk #endif
    375   1.1        pk 
    376  1.21        pk 	while ((long)len > 0) {
    377   1.1        pk #ifdef notyet
    378   1.1        pk #ifdef DEBUG
    379  1.21        pk 		if ((sc->sc_ptes[atop(va - base)] & IOPTE_V) == 0)
    380  1.21        pk 			panic("iommu_clear: clearing invalid pte at va 0x%lx",
    381  1.21        pk 			      (long)va);
    382   1.1        pk #endif
    383   1.1        pk #endif
    384  1.21        pk 		sc->sc_ptes[atop(va - base)] = 0;
    385   1.1        pk 		IOMMU_FLUSHPAGE(sc, va);
    386  1.21        pk 		len -= pagesz;
    387  1.21        pk 		va += pagesz;
    388   1.1        pk 	}
    389   1.1        pk }
    390   1.1        pk 
    391   1.1        pk #if 0	/* These registers aren't there??? */
    392   1.1        pk void
    393   1.1        pk iommu_error()
    394   1.1        pk {
    395   1.1        pk 	struct iommu_softc *sc = X;
    396   1.1        pk 	struct iommureg *iop = sc->sc_reg;
    397   1.1        pk 
    398  1.13      fair 	printf("iommu: afsr 0x%x, afar 0x%x\n", iop->io_afsr, iop->io_afar);
    399  1.13      fair 	printf("iommu: mfsr 0x%x, mfar 0x%x\n", iop->io_mfsr, iop->io_mfar);
    400   1.1        pk }
    401   1.1        pk int
    402   1.1        pk iommu_alloc(va, len)
    403   1.1        pk 	u_int va, len;
    404   1.1        pk {
    405   1.1        pk 	struct iommu_softc *sc = X;
    406  1.35   thorpej 	int off, tva, iovaddr, pte;
    407  1.35   thorpej 	paddr_t pa;
    408   1.1        pk 
    409   1.1        pk 	off = (int)va & PGOFSET;
    410   1.1        pk 	len = round_page(len + off);
    411   1.1        pk 	va -= off;
    412   1.1        pk 
    413   1.1        pk if ((int)sc->sc_dvmacur + len > 0)
    414   1.1        pk 	sc->sc_dvmacur = sc->sc_dvmabase;
    415   1.1        pk 
    416   1.1        pk 	iovaddr = tva = sc->sc_dvmacur;
    417   1.1        pk 	sc->sc_dvmacur += len;
    418   1.1        pk 	while (len) {
    419  1.35   thorpej 		(void) pmap_extract(pmap_kernel(), va, &pa);
    420   1.1        pk 
    421   1.1        pk #define IOMMU_PPNSHIFT	8
    422   1.1        pk #define IOMMU_V		0x00000002
    423   1.1        pk #define IOMMU_W		0x00000004
    424   1.1        pk 
    425   1.1        pk 		pte = atop(pa) << IOMMU_PPNSHIFT;
    426   1.1        pk 		pte |= IOMMU_V | IOMMU_W;
    427   1.1        pk 		sta(sc->sc_ptes + atop(tva - sc->sc_dvmabase), ASI_BYPASS, pte);
    428   1.1        pk 		sc->sc_reg->io_flushpage = tva;
    429   1.1        pk 		len -= NBPG;
    430   1.1        pk 		va += NBPG;
    431   1.1        pk 		tva += NBPG;
    432   1.1        pk 	}
    433   1.1        pk 	return iovaddr + off;
    434   1.1        pk }
    435   1.1        pk #endif
    436  1.18        pk 
    437  1.18        pk 
    438  1.18        pk /*
    439  1.39        pk  * Common routine to allocate space in the IOMMU map.
    440  1.18        pk  */
    441  1.18        pk int
    442  1.39        pk iommu_dvma_alloc(map, va, len, boundary, flags, dvap, sgsizep)
    443  1.18        pk 	bus_dmamap_t map;
    444  1.39        pk 	vaddr_t va;
    445  1.39        pk 	bus_size_t len;
    446  1.39        pk 	bus_size_t boundary;
    447  1.18        pk 	int flags;
    448  1.39        pk 	bus_addr_t *dvap;
    449  1.39        pk 	bus_size_t *sgsizep;
    450  1.18        pk {
    451  1.26        pk 	bus_size_t sgsize;
    452  1.24        pk 	u_long align, voff;
    453  1.37        pk 	u_long ex_start, ex_end;
    454  1.33        pk 	int s, error;
    455  1.18        pk 
    456  1.18        pk 	/*
    457  1.24        pk 	 * Remember page offset, then truncate the buffer address to
    458  1.24        pk 	 * a page boundary.
    459  1.24        pk 	 */
    460  1.24        pk 	voff = va & PGOFSET;
    461  1.24        pk 	va &= ~PGOFSET;
    462  1.24        pk 
    463  1.39        pk 	if (len > map->_dm_size)
    464  1.18        pk 		return (EINVAL);
    465  1.18        pk 
    466  1.39        pk 	sgsize = (len + voff + PGOFSET) & ~PGOFSET;
    467  1.24        pk 	align = dvma_cachealign ? dvma_cachealign : NBPG;
    468  1.39        pk 	if (boundary == 0)
    469  1.39        pk 		boundary = map->_dm_boundary;
    470  1.18        pk 
    471  1.33        pk 	s = splhigh();
    472  1.37        pk 
    473  1.37        pk 	/* Check `24 address bits' in the map's attributes */
    474  1.37        pk 	if ((map->_dm_flags & BUS_DMA_24BIT) != 0) {
    475  1.37        pk 		ex_start = D24_DVMA_BASE;
    476  1.37        pk 		ex_end = D24_DVMA_END;
    477  1.37        pk 	} else {
    478  1.37        pk 		ex_start = iommu_dvmamap->ex_start;
    479  1.37        pk 		ex_end = iommu_dvmamap->ex_end;
    480  1.37        pk 	}
    481  1.37        pk 	error = extent_alloc_subregion1(iommu_dvmamap,
    482  1.37        pk 					ex_start, ex_end,
    483  1.37        pk 					sgsize, align, va & (align-1), boundary,
    484  1.37        pk 					(flags & BUS_DMA_NOWAIT) == 0
    485  1.37        pk 						? EX_WAITOK : EX_NOWAIT,
    486  1.39        pk 					(u_long *)dvap);
    487  1.33        pk 	splx(s);
    488  1.33        pk 
    489  1.39        pk 	*sgsizep = sgsize;
    490  1.39        pk 	return (error);
    491  1.39        pk }
    492  1.39        pk 
    493  1.39        pk /*
    494  1.39        pk  * IOMMU DMA map functions.
    495  1.39        pk  */
    496  1.39        pk int
    497  1.39        pk iommu_dmamap_load(t, map, buf, buflen, p, flags)
    498  1.39        pk 	bus_dma_tag_t t;
    499  1.39        pk 	bus_dmamap_t map;
    500  1.39        pk 	void *buf;
    501  1.39        pk 	bus_size_t buflen;
    502  1.39        pk 	struct proc *p;
    503  1.39        pk 	int flags;
    504  1.39        pk {
    505  1.39        pk 	bus_size_t sgsize;
    506  1.39        pk 	bus_addr_t dva;
    507  1.39        pk 	vaddr_t va = (vaddr_t)buf;
    508  1.39        pk 	pmap_t pmap;
    509  1.39        pk 	int error;
    510  1.39        pk 
    511  1.39        pk 	/*
    512  1.39        pk 	 * Make sure that on error condition we return "no valid mappings".
    513  1.39        pk 	 */
    514  1.39        pk 	map->dm_nsegs = 0;
    515  1.39        pk 
    516  1.39        pk 	/* Allocate IOMMU resources */
    517  1.39        pk 	if ((error = iommu_dvma_alloc(map, va, buflen, 0, flags,
    518  1.39        pk 					&dva, &sgsize)) != 0)
    519  1.33        pk 		return (error);
    520  1.18        pk 
    521  1.39        pk 	cpuinfo.cache_flush(buf, buflen); /* XXX - move to bus_dma_sync? */
    522  1.18        pk 
    523  1.18        pk 	/*
    524  1.18        pk 	 * We always use just one segment.
    525  1.18        pk 	 */
    526  1.18        pk 	map->dm_mapsize = buflen;
    527  1.18        pk 	map->dm_nsegs = 1;
    528  1.39        pk 	map->dm_segs[0].ds_addr = dva + (va & PGOFSET);
    529  1.26        pk 	map->dm_segs[0].ds_len = buflen;
    530  1.18        pk 
    531  1.18        pk 	if (p != NULL)
    532  1.18        pk 		pmap = p->p_vmspace->vm_map.pmap;
    533  1.18        pk 	else
    534  1.18        pk 		pmap = pmap_kernel();
    535  1.18        pk 
    536  1.24        pk 	for (; sgsize != 0; ) {
    537  1.35   thorpej 		paddr_t pa;
    538  1.18        pk 		/*
    539  1.18        pk 		 * Get the physical address for this page.
    540  1.18        pk 		 */
    541  1.35   thorpej 		(void) pmap_extract(pmap, va, &pa);
    542  1.18        pk 
    543  1.24        pk 		iommu_enter(dva, pa);
    544  1.24        pk 
    545  1.39        pk 		dva += PAGE_SIZE;
    546  1.39        pk 		va += PAGE_SIZE;
    547  1.39        pk 		sgsize -= PAGE_SIZE;
    548  1.18        pk 	}
    549  1.24        pk 
    550  1.18        pk 	return (0);
    551  1.18        pk }
    552  1.18        pk 
    553  1.18        pk /*
    554  1.18        pk  * Like _bus_dmamap_load(), but for mbufs.
    555  1.18        pk  */
    556  1.18        pk int
    557  1.18        pk iommu_dmamap_load_mbuf(t, map, m, flags)
    558  1.18        pk 	bus_dma_tag_t t;
    559  1.18        pk 	bus_dmamap_t map;
    560  1.18        pk 	struct mbuf *m;
    561  1.18        pk 	int flags;
    562  1.18        pk {
    563  1.18        pk 
    564  1.18        pk 	panic("_bus_dmamap_load: not implemented");
    565  1.18        pk }
    566  1.18        pk 
    567  1.18        pk /*
    568  1.18        pk  * Like _bus_dmamap_load(), but for uios.
    569  1.18        pk  */
    570  1.18        pk int
    571  1.18        pk iommu_dmamap_load_uio(t, map, uio, flags)
    572  1.18        pk 	bus_dma_tag_t t;
    573  1.18        pk 	bus_dmamap_t map;
    574  1.18        pk 	struct uio *uio;
    575  1.18        pk 	int flags;
    576  1.18        pk {
    577  1.18        pk 
    578  1.18        pk 	panic("_bus_dmamap_load_uio: not implemented");
    579  1.18        pk }
    580  1.18        pk 
    581  1.18        pk /*
    582  1.18        pk  * Like _bus_dmamap_load(), but for raw memory allocated with
    583  1.18        pk  * bus_dmamem_alloc().
    584  1.18        pk  */
    585  1.18        pk int
    586  1.18        pk iommu_dmamap_load_raw(t, map, segs, nsegs, size, flags)
    587  1.18        pk 	bus_dma_tag_t t;
    588  1.18        pk 	bus_dmamap_t map;
    589  1.18        pk 	bus_dma_segment_t *segs;
    590  1.18        pk 	int nsegs;
    591  1.18        pk 	bus_size_t size;
    592  1.18        pk 	int flags;
    593  1.18        pk {
    594  1.39        pk 	vm_page_t m;
    595  1.21        pk 	paddr_t pa;
    596  1.24        pk 	bus_addr_t dva;
    597  1.39        pk 	bus_size_t sgsize;
    598  1.18        pk 	struct pglist *mlist;
    599  1.40        pk 	int pagesz = PAGE_SIZE;
    600  1.39        pk 	int error;
    601  1.18        pk 
    602  1.39        pk 	map->dm_nsegs = 0;
    603  1.18        pk 
    604  1.39        pk #ifdef DIAGNOSTIC
    605  1.39        pk 	/* XXX - unhelpful since we can't reset these in map_unload() */
    606  1.39        pk 	if (segs[0].ds_addr != 0 || segs[0].ds_len != 0)
    607  1.39        pk 		panic("iommu_dmamap_load_raw: segment already loaded: "
    608  1.39        pk 			"addr 0x%lx, size 0x%lx",
    609  1.39        pk 			segs[0].ds_addr, segs[0].ds_len);
    610  1.39        pk #endif
    611  1.37        pk 
    612  1.39        pk 	/* Allocate IOMMU resources */
    613  1.39        pk 	if ((error = iommu_dvma_alloc(map, segs[0]._ds_va, size,
    614  1.39        pk 				      segs[0]._ds_boundary,
    615  1.39        pk 				      flags, &dva, &sgsize)) != 0)
    616  1.33        pk 		return (error);
    617  1.18        pk 
    618  1.18        pk 	/*
    619  1.39        pk 	 * Note DVMA address in case bus_dmamem_map() is called later.
    620  1.39        pk 	 * It can then insure cache coherency by choosing a KVA that
    621  1.39        pk 	 * is aligned to `ds_addr'.
    622  1.18        pk 	 */
    623  1.24        pk 	segs[0].ds_addr = dva;
    624  1.18        pk 	segs[0].ds_len = size;
    625  1.18        pk 
    626  1.39        pk 	map->dm_segs[0].ds_addr = dva;
    627  1.39        pk 	map->dm_segs[0].ds_len = size;
    628  1.39        pk 
    629  1.39        pk 	/* Map physical pages into IOMMU */
    630  1.18        pk 	mlist = segs[0]._ds_mlist;
    631  1.18        pk 	for (m = TAILQ_FIRST(mlist); m != NULL; m = TAILQ_NEXT(m,pageq)) {
    632  1.39        pk 		if (sgsize == 0)
    633  1.39        pk 			panic("iommu_dmamap_load_raw: size botch");
    634  1.21        pk 		pa = VM_PAGE_TO_PHYS(m);
    635  1.24        pk 		iommu_enter(dva, pa);
    636  1.40        pk 		dva += pagesz;
    637  1.40        pk 		sgsize -= pagesz;
    638  1.18        pk 	}
    639  1.18        pk 
    640  1.39        pk 	map->dm_nsegs = 1;
    641  1.39        pk 	map->dm_mapsize = size;
    642  1.39        pk 
    643  1.18        pk 	return (0);
    644  1.18        pk }
    645  1.18        pk 
    646  1.18        pk /*
    647  1.39        pk  * Unload an IOMMU DMA map.
    648  1.18        pk  */
    649  1.18        pk void
    650  1.39        pk iommu_dmamap_unload(t, map)
    651  1.18        pk 	bus_dma_tag_t t;
    652  1.39        pk 	bus_dmamap_t map;
    653  1.18        pk {
    654  1.39        pk 	bus_dma_segment_t *segs = map->dm_segs;
    655  1.39        pk 	int nsegs = map->dm_nsegs;
    656  1.39        pk 	bus_addr_t dva;
    657  1.18        pk 	bus_size_t len;
    658  1.39        pk 	int i, s, error;
    659  1.39        pk 
    660  1.39        pk 	for (i = 0; i < nsegs; i++) {
    661  1.39        pk 		dva = segs[i].ds_addr;
    662  1.39        pk 		len = segs[i].ds_len;
    663  1.39        pk 		len = ((dva & PGOFSET) + len + PGOFSET) & ~PGOFSET;
    664  1.39        pk 		dva &= ~PGOFSET;
    665  1.39        pk 
    666  1.39        pk 		iommu_remove(dva, len);
    667  1.39        pk 		s = splhigh();
    668  1.39        pk 		error = extent_free(iommu_dvmamap, dva, len, EX_NOWAIT);
    669  1.39        pk 		splx(s);
    670  1.39        pk 		if (error != 0)
    671  1.39        pk 			printf("warning: %ld of DVMA space lost\n", (long)len);
    672  1.39        pk 	}
    673  1.18        pk 
    674  1.39        pk 	/* Mark the mappings as invalid. */
    675  1.39        pk 	map->dm_mapsize = 0;
    676  1.39        pk 	map->dm_nsegs = 0;
    677  1.39        pk }
    678  1.18        pk 
    679  1.39        pk /*
    680  1.39        pk  * DMA map synchronization.
    681  1.39        pk  */
    682  1.39        pk void
    683  1.39        pk iommu_dmamap_sync(t, map, offset, len, ops)
    684  1.39        pk 	bus_dma_tag_t t;
    685  1.39        pk 	bus_dmamap_t map;
    686  1.39        pk 	bus_addr_t offset;
    687  1.39        pk 	bus_size_t len;
    688  1.39        pk 	int ops;
    689  1.39        pk {
    690  1.18        pk 
    691  1.18        pk 	/*
    692  1.39        pk 	 * XXX Should flush CPU write buffers.
    693  1.18        pk 	 */
    694  1.18        pk }
    695  1.18        pk 
    696  1.18        pk /*
    697  1.39        pk  * Map DMA-safe memory.
    698  1.18        pk  */
    699  1.18        pk int
    700  1.18        pk iommu_dmamem_map(t, segs, nsegs, size, kvap, flags)
    701  1.18        pk 	bus_dma_tag_t t;
    702  1.18        pk 	bus_dma_segment_t *segs;
    703  1.18        pk 	int nsegs;
    704  1.18        pk 	size_t size;
    705  1.18        pk 	caddr_t *kvap;
    706  1.18        pk 	int flags;
    707  1.18        pk {
    708  1.18        pk 	vm_page_t m;
    709  1.39        pk 	vaddr_t va;
    710  1.18        pk 	bus_addr_t addr;
    711  1.18        pk 	struct pglist *mlist;
    712  1.18        pk 	int cbit;
    713  1.18        pk 	u_long align;
    714  1.40        pk 	int pagesz = PAGE_SIZE;
    715  1.18        pk 
    716  1.18        pk 	if (nsegs != 1)
    717  1.18        pk 		panic("iommu_dmamem_map: nsegs = %d", nsegs);
    718  1.18        pk 
    719  1.18        pk 	cbit = has_iocache ? 0 : PMAP_NC;
    720  1.40        pk 	align = dvma_cachealign ? dvma_cachealign : pagesz;
    721  1.18        pk 
    722  1.18        pk 	size = round_page(size);
    723  1.18        pk 
    724  1.18        pk 	/*
    725  1.39        pk 	 * In case the segment has already been loaded by
    726  1.39        pk 	 * iommu_dmamap_load_raw(), find a region of kernel virtual
    727  1.39        pk 	 * addresses that can accomodate our aligment requirements.
    728  1.18        pk 	 */
    729  1.40        pk 	va = _bus_dma_valloc_skewed(size, 0, align,
    730  1.40        pk 				    segs[0].ds_addr & (align - 1));
    731  1.39        pk 	if (va == 0)
    732  1.18        pk 		return (ENOMEM);
    733  1.18        pk 
    734  1.39        pk 	segs[0]._ds_va = va;
    735  1.39        pk 	*kvap = (caddr_t)va;
    736  1.18        pk 
    737  1.39        pk 	/*
    738  1.39        pk 	 * Map the pages allocated in _bus_dmamem_alloc() to the
    739  1.39        pk 	 * kernel virtual address space.
    740  1.39        pk 	 */
    741  1.18        pk 	mlist = segs[0]._ds_mlist;
    742  1.18        pk 	for (m = TAILQ_FIRST(mlist); m != NULL; m = TAILQ_NEXT(m,pageq)) {
    743  1.18        pk 
    744  1.18        pk 		if (size == 0)
    745  1.18        pk 			panic("iommu_dmamem_map: size botch");
    746  1.18        pk 
    747  1.18        pk 		addr = VM_PAGE_TO_PHYS(m);
    748  1.18        pk 		pmap_enter(pmap_kernel(), va, addr | cbit,
    749  1.36   thorpej 		    VM_PROT_READ | VM_PROT_WRITE,
    750  1.36   thorpej 		    VM_PROT_READ | VM_PROT_WRITE | PMAP_WIRED);
    751  1.18        pk #if 0
    752  1.18        pk 			if (flags & BUS_DMA_COHERENT)
    753  1.18        pk 				/* XXX */;
    754  1.18        pk #endif
    755  1.40        pk 		va += pagesz;
    756  1.40        pk 		size -= pagesz;
    757  1.18        pk 	}
    758  1.18        pk 
    759  1.18        pk 	return (0);
    760  1.18        pk }
    761  1.18        pk 
    762  1.18        pk /*
    763  1.39        pk  * mmap(2)'ing DMA-safe memory.
    764  1.18        pk  */
    765  1.18        pk int
    766  1.18        pk iommu_dmamem_mmap(t, segs, nsegs, off, prot, flags)
    767  1.18        pk 	bus_dma_tag_t t;
    768  1.18        pk 	bus_dma_segment_t *segs;
    769  1.18        pk 	int nsegs, off, prot, flags;
    770  1.18        pk {
    771  1.18        pk 
    772  1.18        pk 	panic("_bus_dmamem_mmap: not implemented");
    773  1.18        pk }
    774