Home | History | Annotate | Line # | Download | only in sparc
iommu.c revision 1.50
      1  1.50        pk /*	$NetBSD: iommu.c,v 1.50 2000/07/22 21:23:05 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.25        pk 
     46  1.31        pk #include <uvm/uvm.h>
     47   1.1        pk 
     48  1.18        pk #define _SPARC_BUS_DMA_PRIVATE
     49  1.18        pk #include <machine/bus.h>
     50   1.1        pk #include <machine/autoconf.h>
     51   1.1        pk #include <machine/ctlreg.h>
     52   1.1        pk #include <sparc/sparc/asm.h>
     53   1.1        pk #include <sparc/sparc/vaddrs.h>
     54   1.9        pk #include <sparc/sparc/cpuvar.h>
     55   1.1        pk #include <sparc/sparc/iommureg.h>
     56  1.16        pk #include <sparc/sparc/iommuvar.h>
     57   1.1        pk 
     58   1.1        pk struct iommu_softc {
     59   1.1        pk 	struct device	sc_dev;		/* base device */
     60   1.1        pk 	struct iommureg	*sc_reg;
     61   1.1        pk 	u_int		sc_pagesize;
     62   1.1        pk 	u_int		sc_range;
     63  1.21        pk 	bus_addr_t	sc_dvmabase;
     64   1.1        pk 	iopte_t		*sc_ptes;
     65   1.1        pk 	int		sc_hasiocache;
     66   1.1        pk };
     67   1.1        pk struct	iommu_softc *iommu_sc;/*XXX*/
     68   1.1        pk int	has_iocache;
     69  1.19        pk u_long	dvma_cachealign;
     70   1.1        pk 
     71  1.33        pk /*
     72  1.33        pk  * Note: operations on the extent map are being protected with
     73  1.33        pk  * splhigh(), since we cannot predict at which interrupt priority
     74  1.33        pk  * our clients will run.
     75  1.33        pk  */
     76  1.18        pk struct extent *iommu_dvmamap;
     77  1.18        pk 
     78   1.1        pk 
     79   1.1        pk /* autoconfiguration driver */
     80   1.5       cgd int	iommu_print __P((void *, const char *));
     81   1.1        pk void	iommu_attach __P((struct device *, struct device *, void *));
     82   1.8        pk int	iommu_match __P((struct device *, struct cfdata *, void *));
     83   1.1        pk 
     84  1.42        pk static void iommu_copy_prom_entries __P((struct iommu_softc *));
     85  1.42        pk 
     86   1.1        pk struct cfattach iommu_ca = {
     87   1.1        pk 	sizeof(struct iommu_softc), iommu_match, iommu_attach
     88   1.1        pk };
     89   1.1        pk 
     90  1.18        pk /* IOMMU DMA map functions */
     91  1.45        pk int	iommu_dmamap_create __P((bus_dma_tag_t, bus_size_t, int, bus_size_t,
     92  1.45        pk 			bus_size_t, int, bus_dmamap_t *));
     93  1.18        pk int	iommu_dmamap_load __P((bus_dma_tag_t, bus_dmamap_t, void *,
     94  1.39        pk 			bus_size_t, struct proc *, int));
     95  1.18        pk int	iommu_dmamap_load_mbuf __P((bus_dma_tag_t, bus_dmamap_t,
     96  1.39        pk 			struct mbuf *, int));
     97  1.18        pk int	iommu_dmamap_load_uio __P((bus_dma_tag_t, bus_dmamap_t,
     98  1.39        pk 			struct uio *, int));
     99  1.18        pk int	iommu_dmamap_load_raw __P((bus_dma_tag_t, bus_dmamap_t,
    100  1.39        pk 			bus_dma_segment_t *, int, bus_size_t, int));
    101  1.18        pk void	iommu_dmamap_unload __P((bus_dma_tag_t, bus_dmamap_t));
    102  1.18        pk void	iommu_dmamap_sync __P((bus_dma_tag_t, bus_dmamap_t, bus_addr_t,
    103  1.39        pk 			bus_size_t, int));
    104  1.18        pk 
    105  1.18        pk int	iommu_dmamem_map __P((bus_dma_tag_t tag, bus_dma_segment_t *segs,
    106  1.39        pk 			int nsegs, size_t size, caddr_t *kvap, int flags));
    107  1.46    simonb paddr_t	iommu_dmamem_mmap __P((bus_dma_tag_t tag, bus_dma_segment_t *segs,
    108  1.46    simonb 			int nsegs, off_t off, int prot, int flags));
    109  1.41        pk int	iommu_dvma_alloc(bus_dmamap_t, vaddr_t, bus_size_t, int,
    110  1.39        pk 			bus_addr_t *, bus_size_t *);
    111  1.18        pk 
    112  1.18        pk 
    113  1.18        pk struct sparc_bus_dma_tag iommu_dma_tag = {
    114  1.18        pk 	NULL,
    115  1.45        pk 	iommu_dmamap_create,
    116  1.18        pk 	_bus_dmamap_destroy,
    117  1.18        pk 	iommu_dmamap_load,
    118  1.18        pk 	iommu_dmamap_load_mbuf,
    119  1.18        pk 	iommu_dmamap_load_uio,
    120  1.18        pk 	iommu_dmamap_load_raw,
    121  1.18        pk 	iommu_dmamap_unload,
    122  1.18        pk 	iommu_dmamap_sync,
    123  1.18        pk 
    124  1.39        pk 	_bus_dmamem_alloc,
    125  1.39        pk 	_bus_dmamem_free,
    126  1.18        pk 	iommu_dmamem_map,
    127  1.18        pk 	_bus_dmamem_unmap,
    128  1.18        pk 	iommu_dmamem_mmap
    129  1.18        pk };
    130   1.1        pk /*
    131   1.1        pk  * Print the location of some iommu-attached device (called just
    132   1.1        pk  * before attaching that device).  If `iommu' is not NULL, the
    133   1.1        pk  * device was found but not configured; print the iommu as well.
    134   1.1        pk  * Return UNCONF (config_find ignores this if the device was configured).
    135   1.1        pk  */
    136   1.1        pk int
    137   1.1        pk iommu_print(args, iommu)
    138   1.1        pk 	void *args;
    139   1.5       cgd 	const char *iommu;
    140   1.1        pk {
    141  1.16        pk 	struct iommu_attach_args *ia = args;
    142   1.1        pk 
    143   1.1        pk 	if (iommu)
    144  1.16        pk 		printf("%s at %s", ia->iom_name, iommu);
    145   1.1        pk 	return (UNCONF);
    146   1.1        pk }
    147   1.1        pk 
    148   1.1        pk int
    149   1.8        pk iommu_match(parent, cf, aux)
    150   1.1        pk 	struct device *parent;
    151   1.8        pk 	struct cfdata *cf;
    152   1.8        pk 	void *aux;
    153   1.1        pk {
    154  1.16        pk 	struct mainbus_attach_args *ma = aux;
    155   1.1        pk 
    156   1.1        pk 	if (CPU_ISSUN4OR4C)
    157   1.1        pk 		return (0);
    158  1.16        pk 	return (strcmp(cf->cf_driver->cd_name, ma->ma_name) == 0);
    159   1.1        pk }
    160   1.1        pk 
    161   1.1        pk /*
    162   1.1        pk  * Attach the iommu.
    163   1.1        pk  */
    164   1.1        pk void
    165   1.1        pk iommu_attach(parent, self, aux)
    166   1.1        pk 	struct device *parent;
    167   1.1        pk 	struct device *self;
    168   1.1        pk 	void *aux;
    169   1.1        pk {
    170   1.4        pk #if defined(SUN4M)
    171  1.21        pk 	struct iommu_softc *sc = (struct iommu_softc *)self;
    172  1.16        pk 	struct mainbus_attach_args *ma = aux;
    173  1.43        pk 	bus_space_handle_t bh;
    174  1.21        pk 	int node;
    175  1.42        pk 	int i, s;
    176  1.43        pk 	u_int iopte_table_pa;
    177  1.43        pk 	struct pglist mlist;
    178  1.43        pk 	u_int size;
    179  1.43        pk 	vm_page_t m;
    180  1.43        pk 	vaddr_t va;
    181   1.1        pk 
    182   1.1        pk 	iommu_sc = sc;
    183   1.1        pk 	/*
    184   1.1        pk 	 * XXX there is only one iommu, for now -- do not know how to
    185   1.1        pk 	 * address children on others
    186   1.1        pk 	 */
    187   1.1        pk 	if (sc->sc_dev.dv_unit > 0) {
    188   1.7  christos 		printf(" unsupported\n");
    189   1.1        pk 		return;
    190   1.1        pk 	}
    191  1.16        pk 	node = ma->ma_node;
    192   1.1        pk 
    193   1.1        pk 	/*
    194   1.1        pk 	 * Map registers into our space. The PROM may have done this
    195   1.1        pk 	 * already, but I feel better if we have our own copy. Plus, the
    196  1.43        pk 	 * prom doesn't map the entire register set.
    197   1.1        pk 	 *
    198   1.1        pk 	 * XXX struct iommureg is bigger than ra->ra_len; what are the
    199   1.1        pk 	 *     other fields for?
    200   1.1        pk 	 */
    201  1.17        pk 	if (bus_space_map2(
    202  1.16        pk 			ma->ma_bustag,
    203  1.16        pk 			ma->ma_iospace,
    204  1.17        pk 			ma->ma_paddr,
    205  1.16        pk 			sizeof(struct iommureg),
    206  1.16        pk 			0,
    207  1.16        pk 			0,
    208  1.16        pk 			&bh) != 0) {
    209  1.16        pk 		printf("iommu_attach: cannot map registers\n");
    210  1.16        pk 		return;
    211  1.16        pk 	}
    212  1.16        pk 	sc->sc_reg = (struct iommureg *)bh;
    213   1.1        pk 
    214   1.1        pk 	sc->sc_hasiocache = node_has_property(node, "cache-coherence?");
    215   1.9        pk 	if (CACHEINFO.c_enabled == 0) /* XXX - is this correct? */
    216   1.9        pk 		sc->sc_hasiocache = 0;
    217   1.1        pk 	has_iocache = sc->sc_hasiocache; /* Set global flag */
    218   1.1        pk 
    219   1.1        pk 	sc->sc_pagesize = getpropint(node, "page-size", NBPG),
    220   1.1        pk 
    221   1.1        pk 	/*
    222  1.43        pk 	 * Allocate memory for I/O pagetables.
    223  1.43        pk 	 * This takes 64K of contiguous physical memory to map 64M of
    224  1.43        pk 	 * DVMA space (starting at IOMMU_DVMA_BASE).
    225  1.43        pk 	 * The table must be aligned on a (-IOMMU_DVMA_BASE/pagesize)
    226  1.43        pk 	 * boundary (i.e. 64K for 64M of DVMA space).
    227   1.1        pk 	 */
    228   1.1        pk 
    229  1.43        pk 	size = ((0 - IOMMU_DVMA_BASE) / sc->sc_pagesize) * sizeof(iopte_t);
    230  1.43        pk 	TAILQ_INIT(&mlist);
    231  1.43        pk 	if (uvm_pglistalloc(size, vm_first_phys, vm_first_phys+vm_num_phys,
    232  1.43        pk 			    size, 0, &mlist, 1, 0) != 0)
    233  1.43        pk 		panic("iommu_attach: no memory");
    234  1.43        pk 
    235  1.43        pk 	va = uvm_km_valloc(kernel_map, size);
    236  1.43        pk 	if (va == 0)
    237  1.43        pk 		panic("iommu_attach: no memory");
    238  1.43        pk 
    239  1.43        pk 	sc->sc_ptes = (iopte_t *)va;
    240  1.43        pk 
    241  1.43        pk 	m = TAILQ_FIRST(&mlist);
    242  1.43        pk 	iopte_table_pa = VM_PAGE_TO_PHYS(m);
    243  1.43        pk 
    244  1.43        pk 	/* Map the pages */
    245  1.43        pk 	for (; m != NULL; m = TAILQ_NEXT(m,pageq)) {
    246  1.43        pk 		paddr_t pa = VM_PAGE_TO_PHYS(m);
    247  1.43        pk 		pmap_enter(pmap_kernel(), va, pa | PMAP_NC,
    248  1.43        pk 		    VM_PROT_READ|VM_PROT_WRITE,
    249  1.43        pk 		    VM_PROT_READ|VM_PROT_WRITE|PMAP_WIRED);
    250  1.43        pk 		va += NBPG;
    251  1.43        pk 	}
    252   1.1        pk 
    253   1.1        pk 	/*
    254  1.42        pk 	 * Copy entries from current IOMMU table.
    255  1.42        pk 	 * XXX - Why do we need to do this?
    256   1.1        pk 	 */
    257  1.42        pk 	iommu_copy_prom_entries(sc);
    258   1.1        pk 
    259   1.1        pk 	/*
    260   1.1        pk 	 * Now we can install our new pagetable into the IOMMU
    261   1.1        pk 	 */
    262  1.22        pk 	sc->sc_range = 0 - IOMMU_DVMA_BASE;
    263  1.22        pk 	sc->sc_dvmabase = IOMMU_DVMA_BASE;
    264   1.1        pk 
    265   1.1        pk 	/* calculate log2(sc->sc_range/16MB) */
    266   1.1        pk 	i = ffs(sc->sc_range/(1 << 24)) - 1;
    267   1.1        pk 	if ((1 << i) != (sc->sc_range/(1 << 24)))
    268  1.42        pk 		panic("iommu: bad range: %d\n", i);
    269   1.1        pk 
    270   1.1        pk 	s = splhigh();
    271   1.1        pk 	IOMMU_FLUSHALL(sc);
    272   1.1        pk 
    273  1.43        pk 	/* Load range and physical address of PTEs */
    274   1.1        pk 	sc->sc_reg->io_cr = (sc->sc_reg->io_cr & ~IOMMU_CTL_RANGE) |
    275   1.1        pk 			  (i << IOMMU_CTL_RANGESHFT) | IOMMU_CTL_ME;
    276  1.43        pk 	sc->sc_reg->io_bar = (iopte_table_pa >> 4) & IOMMU_BAR_IBA;
    277   1.1        pk 
    278   1.1        pk 	IOMMU_FLUSHALL(sc);
    279   1.1        pk 	splx(s);
    280   1.1        pk 
    281  1.13      fair 	printf(": version 0x%x/0x%x, page-size %d, range %dMB\n",
    282   1.1        pk 		(sc->sc_reg->io_cr & IOMMU_CTL_VER) >> 24,
    283   1.1        pk 		(sc->sc_reg->io_cr & IOMMU_CTL_IMPL) >> 28,
    284   1.1        pk 		sc->sc_pagesize,
    285   1.1        pk 		sc->sc_range >> 20);
    286   1.1        pk 
    287  1.22        pk 	iommu_dvmamap = extent_create("iommudvma",
    288  1.22        pk 					IOMMU_DVMA_BASE, IOMMU_DVMA_END,
    289  1.18        pk 					M_DEVBUF, 0, 0, EX_NOWAIT);
    290  1.22        pk 	if (iommu_dvmamap == NULL)
    291  1.22        pk 		panic("iommu: unable to allocate DVMA map");
    292   1.1        pk 
    293   1.1        pk 	/*
    294   1.1        pk 	 * Loop through ROM children (expect Sbus among them).
    295   1.1        pk 	 */
    296   1.1        pk 	for (node = firstchild(node); node; node = nextsibling(node)) {
    297  1.16        pk 		struct iommu_attach_args ia;
    298  1.16        pk 
    299  1.16        pk 		bzero(&ia, sizeof ia);
    300  1.16        pk 		ia.iom_name = getpropstring(node, "name");
    301  1.16        pk 
    302  1.16        pk 		/* Propagate BUS & DMA tags */
    303  1.16        pk 		ia.iom_bustag = ma->ma_bustag;
    304  1.18        pk 		ia.iom_dmatag = &iommu_dma_tag;
    305  1.27        pk 
    306  1.16        pk 		ia.iom_node = node;
    307  1.27        pk 
    308  1.27        pk 		ia.iom_reg = NULL;
    309  1.27        pk 		getprop(node, "reg", sizeof(struct sbus_reg),
    310  1.27        pk 			&ia.iom_nreg, (void **)&ia.iom_reg);
    311  1.27        pk 
    312  1.16        pk 		(void) config_found(&sc->sc_dev, (void *)&ia, iommu_print);
    313  1.27        pk 		if (ia.iom_reg != NULL)
    314  1.27        pk 			free(ia.iom_reg, M_DEVBUF);
    315   1.1        pk 	}
    316   1.4        pk #endif
    317   1.1        pk }
    318   1.1        pk 
    319  1.42        pk static void
    320  1.42        pk iommu_copy_prom_entries(sc)
    321  1.42        pk 	struct iommu_softc *sc;
    322  1.42        pk {
    323  1.42        pk 	u_int pbase, pa;
    324  1.42        pk 	u_int range;
    325  1.42        pk 	iopte_t *tpte_p;
    326  1.42        pk 	u_int pagesz = sc->sc_pagesize;
    327  1.42        pk 	int use_ac = (cpuinfo.cpu_impl == 4 && cpuinfo.mxcc);
    328  1.42        pk 	u_int mmupcr_save;
    329  1.42        pk 
    330  1.42        pk 	/*
    331  1.42        pk 	 * We read in the original table using MMU bypass and copy all
    332  1.42        pk 	 * of its entries to the appropriate place in our new table,
    333  1.42        pk 	 * even if the sizes are different.
    334  1.42        pk 	 * This is pretty easy since we know DVMA ends at 0xffffffff.
    335  1.42        pk 	 */
    336  1.42        pk 
    337  1.42        pk 	range = (1 << 24) <<
    338  1.42        pk 	    ((sc->sc_reg->io_cr & IOMMU_CTL_RANGE) >> IOMMU_CTL_RANGESHFT);
    339  1.42        pk 
    340  1.42        pk 	pbase = (sc->sc_reg->io_bar & IOMMU_BAR_IBA) <<
    341  1.42        pk 			(14 - IOMMU_BAR_IBASHFT);
    342  1.42        pk 
    343  1.42        pk 	if (use_ac) {
    344  1.42        pk 		/*
    345  1.42        pk 		 * Set MMU AC bit so we'll still read from the cache
    346  1.42        pk 		 * in by-pass mode.
    347  1.42        pk 		 */
    348  1.42        pk 		mmupcr_save = lda(SRMMU_PCR, ASI_SRMMU);
    349  1.42        pk 		sta(SRMMU_PCR, ASI_SRMMU, mmupcr_save | VIKING_PCR_AC);
    350  1.42        pk 	} else
    351  1.42        pk 		mmupcr_save = 0; /* XXX - avoid GCC `unintialized' warning */
    352  1.42        pk 
    353  1.42        pk 	/* Flush entire IOMMU TLB before messing with the in-memory tables */
    354  1.42        pk 	IOMMU_FLUSHALL(sc);
    355  1.42        pk 
    356  1.42        pk 	/*
    357  1.42        pk 	 * tpte_p = top of our PTE table
    358  1.42        pk 	 * pa     = top of current PTE table
    359  1.42        pk 	 * Then work downwards and copy entries until we hit the bottom
    360  1.42        pk 	 * of either table.
    361  1.42        pk 	 */
    362  1.42        pk 	for (tpte_p = &sc->sc_ptes[((0 - IOMMU_DVMA_BASE)/pagesz) - 1],
    363  1.42        pk 	     pa = (u_int)pbase + (range/pagesz - 1)*sizeof(iopte_t);
    364  1.42        pk 	     tpte_p >= &sc->sc_ptes[0] && pa >= (u_int)pbase;
    365  1.42        pk 	     tpte_p--, pa -= sizeof(iopte_t)) {
    366  1.42        pk 
    367  1.42        pk 		*tpte_p = lda(pa, ASI_BYPASS);
    368  1.42        pk 	}
    369  1.42        pk 
    370  1.42        pk 	if (use_ac) {
    371  1.42        pk 		/* restore mmu after bug-avoidance */
    372  1.42        pk 		sta(SRMMU_PCR, ASI_SRMMU, mmupcr_save);
    373  1.42        pk 	}
    374  1.42        pk }
    375  1.42        pk 
    376   1.1        pk void
    377  1.39        pk iommu_enter(dva, pa)
    378  1.39        pk 	bus_addr_t dva;
    379  1.21        pk 	paddr_t pa;
    380   1.1        pk {
    381   1.1        pk 	struct iommu_softc *sc = iommu_sc;
    382   1.1        pk 	int pte;
    383   1.1        pk 
    384  1.39        pk 	/* This routine relies on the fact that sc->sc_pagesize == PAGE_SIZE */
    385  1.39        pk 
    386  1.39        pk #ifdef DIAGNOSTIC
    387  1.39        pk 	if (dva < sc->sc_dvmabase)
    388  1.39        pk 		panic("iommu_enter: dva 0x%lx not in DVMA space", (long)dva);
    389   1.1        pk #endif
    390   1.1        pk 
    391   1.1        pk 	pte = atop(pa) << IOPTE_PPNSHFT;
    392   1.1        pk 	pte &= IOPTE_PPN;
    393   1.2    abrown 	pte |= IOPTE_V | IOPTE_W | (has_iocache ? IOPTE_C : 0);
    394  1.39        pk 	sc->sc_ptes[atop(dva - sc->sc_dvmabase)] = pte;
    395  1.39        pk 	IOMMU_FLUSHPAGE(sc, dva);
    396   1.1        pk }
    397   1.1        pk 
    398   1.1        pk /*
    399   1.1        pk  * iommu_clear: clears mappings created by iommu_enter
    400   1.1        pk  */
    401   1.1        pk void
    402  1.42        pk iommu_remove(dva, len)
    403  1.42        pk 	bus_addr_t dva;
    404  1.21        pk 	bus_size_t len;
    405   1.1        pk {
    406  1.21        pk 	struct iommu_softc *sc = iommu_sc;
    407  1.21        pk 	u_int pagesz = sc->sc_pagesize;
    408  1.21        pk 	bus_addr_t base = sc->sc_dvmabase;
    409   1.1        pk 
    410   1.1        pk #ifdef DEBUG
    411  1.42        pk 	if (dva < base)
    412  1.44       cjs 		panic("iommu_remove: va 0x%lx not in DVMA space", (long)dva);
    413   1.1        pk #endif
    414   1.1        pk 
    415  1.21        pk 	while ((long)len > 0) {
    416   1.1        pk #ifdef notyet
    417   1.1        pk #ifdef DEBUG
    418  1.42        pk 		if ((sc->sc_ptes[atop(dva - base)] & IOPTE_V) == 0)
    419  1.42        pk 			panic("iommu_remove: clearing invalid pte at dva 0x%lx",
    420  1.42        pk 			      (long)dva);
    421   1.1        pk #endif
    422   1.1        pk #endif
    423  1.42        pk 		sc->sc_ptes[atop(dva - base)] = 0;
    424  1.42        pk 		IOMMU_FLUSHPAGE(sc, dva);
    425  1.21        pk 		len -= pagesz;
    426  1.42        pk 		dva += pagesz;
    427   1.1        pk 	}
    428   1.1        pk }
    429   1.1        pk 
    430   1.1        pk #if 0	/* These registers aren't there??? */
    431   1.1        pk void
    432   1.1        pk iommu_error()
    433   1.1        pk {
    434   1.1        pk 	struct iommu_softc *sc = X;
    435   1.1        pk 	struct iommureg *iop = sc->sc_reg;
    436   1.1        pk 
    437  1.13      fair 	printf("iommu: afsr 0x%x, afar 0x%x\n", iop->io_afsr, iop->io_afar);
    438  1.13      fair 	printf("iommu: mfsr 0x%x, mfar 0x%x\n", iop->io_mfsr, iop->io_mfar);
    439   1.1        pk }
    440   1.1        pk int
    441   1.1        pk iommu_alloc(va, len)
    442   1.1        pk 	u_int va, len;
    443   1.1        pk {
    444   1.1        pk 	struct iommu_softc *sc = X;
    445  1.35   thorpej 	int off, tva, iovaddr, pte;
    446  1.35   thorpej 	paddr_t pa;
    447   1.1        pk 
    448   1.1        pk 	off = (int)va & PGOFSET;
    449   1.1        pk 	len = round_page(len + off);
    450   1.1        pk 	va -= off;
    451   1.1        pk 
    452   1.1        pk if ((int)sc->sc_dvmacur + len > 0)
    453   1.1        pk 	sc->sc_dvmacur = sc->sc_dvmabase;
    454   1.1        pk 
    455   1.1        pk 	iovaddr = tva = sc->sc_dvmacur;
    456   1.1        pk 	sc->sc_dvmacur += len;
    457   1.1        pk 	while (len) {
    458  1.35   thorpej 		(void) pmap_extract(pmap_kernel(), va, &pa);
    459   1.1        pk 
    460   1.1        pk #define IOMMU_PPNSHIFT	8
    461   1.1        pk #define IOMMU_V		0x00000002
    462   1.1        pk #define IOMMU_W		0x00000004
    463   1.1        pk 
    464   1.1        pk 		pte = atop(pa) << IOMMU_PPNSHIFT;
    465   1.1        pk 		pte |= IOMMU_V | IOMMU_W;
    466   1.1        pk 		sta(sc->sc_ptes + atop(tva - sc->sc_dvmabase), ASI_BYPASS, pte);
    467   1.1        pk 		sc->sc_reg->io_flushpage = tva;
    468   1.1        pk 		len -= NBPG;
    469   1.1        pk 		va += NBPG;
    470   1.1        pk 		tva += NBPG;
    471   1.1        pk 	}
    472   1.1        pk 	return iovaddr + off;
    473   1.1        pk }
    474   1.1        pk #endif
    475  1.18        pk 
    476  1.18        pk 
    477  1.18        pk /*
    478  1.50        pk  * IOMMU DMA map functions.
    479  1.45        pk  */
    480  1.45        pk int
    481  1.45        pk iommu_dmamap_create(t, size, nsegments, maxsegsz, boundary, flags, dmamp)
    482  1.45        pk 	bus_dma_tag_t t;
    483  1.45        pk 	bus_size_t size;
    484  1.45        pk 	int nsegments;
    485  1.45        pk 	bus_size_t maxsegsz;
    486  1.45        pk 	bus_size_t boundary;
    487  1.45        pk 	int flags;
    488  1.45        pk 	bus_dmamap_t *dmamp;
    489  1.45        pk {
    490  1.45        pk 	bus_dmamap_t map;
    491  1.45        pk 	int error;
    492  1.45        pk 
    493  1.45        pk 	if ((error = _bus_dmamap_create(t, size, nsegments, maxsegsz,
    494  1.45        pk 					boundary, flags, &map)) != 0)
    495  1.45        pk 		return (error);
    496  1.45        pk 
    497  1.45        pk 	if ((flags & BUS_DMA_24BIT) != 0) {
    498  1.45        pk 		/* Limit this map to the range usable by `24-bit' devices */
    499  1.45        pk 		map->_dm_ex_start = D24_DVMA_BASE;
    500  1.45        pk 		map->_dm_ex_end = D24_DVMA_END;
    501  1.45        pk 	} else {
    502  1.45        pk 		/* Enable allocations from the entire map */
    503  1.45        pk 		map->_dm_ex_start = iommu_dvmamap->ex_start;
    504  1.45        pk 		map->_dm_ex_end = iommu_dvmamap->ex_end;
    505  1.45        pk 	}
    506  1.45        pk 
    507  1.45        pk 	*dmamp = map;
    508  1.45        pk 	return (0);
    509  1.45        pk }
    510  1.45        pk 
    511  1.45        pk /*
    512  1.41        pk  * Internal routine to allocate space in the IOMMU map.
    513  1.18        pk  */
    514  1.18        pk int
    515  1.41        pk iommu_dvma_alloc(map, va, len, flags, dvap, sgsizep)
    516  1.18        pk 	bus_dmamap_t map;
    517  1.39        pk 	vaddr_t va;
    518  1.39        pk 	bus_size_t len;
    519  1.18        pk 	int flags;
    520  1.39        pk 	bus_addr_t *dvap;
    521  1.39        pk 	bus_size_t *sgsizep;
    522  1.18        pk {
    523  1.26        pk 	bus_size_t sgsize;
    524  1.24        pk 	u_long align, voff;
    525  1.33        pk 	int s, error;
    526  1.41        pk 	int pagesz = PAGE_SIZE;
    527  1.18        pk 
    528  1.18        pk 	/*
    529  1.24        pk 	 * Remember page offset, then truncate the buffer address to
    530  1.24        pk 	 * a page boundary.
    531  1.24        pk 	 */
    532  1.41        pk 	voff = va & (pagesz - 1);
    533  1.41        pk 	va &= -pagesz;
    534  1.24        pk 
    535  1.39        pk 	if (len > map->_dm_size)
    536  1.18        pk 		return (EINVAL);
    537  1.18        pk 
    538  1.41        pk 	sgsize = (len + voff + pagesz - 1) & -pagesz;
    539  1.45        pk 	align = dvma_cachealign ? dvma_cachealign : map->_dm_align;
    540  1.18        pk 
    541  1.33        pk 	s = splhigh();
    542  1.37        pk 	error = extent_alloc_subregion1(iommu_dvmamap,
    543  1.45        pk 					map->_dm_ex_start, map->_dm_ex_end,
    544  1.41        pk 					sgsize, align, va & (align-1),
    545  1.41        pk 					map->_dm_boundary,
    546  1.37        pk 					(flags & BUS_DMA_NOWAIT) == 0
    547  1.37        pk 						? EX_WAITOK : EX_NOWAIT,
    548  1.39        pk 					(u_long *)dvap);
    549  1.33        pk 	splx(s);
    550  1.33        pk 
    551  1.39        pk 	*sgsizep = sgsize;
    552  1.39        pk 	return (error);
    553  1.39        pk }
    554  1.39        pk 
    555  1.39        pk /*
    556  1.50        pk  * Prepare buffer for DMA transfer.
    557  1.39        pk  */
    558  1.39        pk int
    559  1.39        pk iommu_dmamap_load(t, map, buf, buflen, p, flags)
    560  1.39        pk 	bus_dma_tag_t t;
    561  1.39        pk 	bus_dmamap_t map;
    562  1.39        pk 	void *buf;
    563  1.39        pk 	bus_size_t buflen;
    564  1.39        pk 	struct proc *p;
    565  1.39        pk 	int flags;
    566  1.39        pk {
    567  1.39        pk 	bus_size_t sgsize;
    568  1.39        pk 	bus_addr_t dva;
    569  1.39        pk 	vaddr_t va = (vaddr_t)buf;
    570  1.41        pk 	int pagesz = PAGE_SIZE;
    571  1.39        pk 	pmap_t pmap;
    572  1.39        pk 	int error;
    573  1.39        pk 
    574  1.39        pk 	/*
    575  1.39        pk 	 * Make sure that on error condition we return "no valid mappings".
    576  1.39        pk 	 */
    577  1.39        pk 	map->dm_nsegs = 0;
    578  1.39        pk 
    579  1.39        pk 	/* Allocate IOMMU resources */
    580  1.41        pk 	if ((error = iommu_dvma_alloc(map, va, buflen, flags,
    581  1.39        pk 					&dva, &sgsize)) != 0)
    582  1.33        pk 		return (error);
    583  1.18        pk 
    584  1.39        pk 	cpuinfo.cache_flush(buf, buflen); /* XXX - move to bus_dma_sync? */
    585  1.18        pk 
    586  1.18        pk 	/*
    587  1.18        pk 	 * We always use just one segment.
    588  1.18        pk 	 */
    589  1.18        pk 	map->dm_mapsize = buflen;
    590  1.18        pk 	map->dm_nsegs = 1;
    591  1.41        pk 	map->dm_segs[0].ds_addr = dva + (va & (pagesz - 1));
    592  1.26        pk 	map->dm_segs[0].ds_len = buflen;
    593  1.41        pk 	map->dm_segs[0]._ds_sgsize = sgsize;
    594  1.18        pk 
    595  1.18        pk 	if (p != NULL)
    596  1.18        pk 		pmap = p->p_vmspace->vm_map.pmap;
    597  1.18        pk 	else
    598  1.18        pk 		pmap = pmap_kernel();
    599  1.18        pk 
    600  1.24        pk 	for (; sgsize != 0; ) {
    601  1.35   thorpej 		paddr_t pa;
    602  1.18        pk 		/*
    603  1.18        pk 		 * Get the physical address for this page.
    604  1.18        pk 		 */
    605  1.35   thorpej 		(void) pmap_extract(pmap, va, &pa);
    606  1.18        pk 
    607  1.24        pk 		iommu_enter(dva, pa);
    608  1.24        pk 
    609  1.41        pk 		dva += pagesz;
    610  1.41        pk 		va += pagesz;
    611  1.41        pk 		sgsize -= pagesz;
    612  1.18        pk 	}
    613  1.24        pk 
    614  1.18        pk 	return (0);
    615  1.18        pk }
    616  1.18        pk 
    617  1.18        pk /*
    618  1.18        pk  * Like _bus_dmamap_load(), but for mbufs.
    619  1.18        pk  */
    620  1.18        pk int
    621  1.18        pk iommu_dmamap_load_mbuf(t, map, m, flags)
    622  1.18        pk 	bus_dma_tag_t t;
    623  1.18        pk 	bus_dmamap_t map;
    624  1.18        pk 	struct mbuf *m;
    625  1.18        pk 	int flags;
    626  1.18        pk {
    627  1.18        pk 
    628  1.41        pk 	panic("_bus_dmamap_load_mbuf: not implemented");
    629  1.18        pk }
    630  1.18        pk 
    631  1.18        pk /*
    632  1.18        pk  * Like _bus_dmamap_load(), but for uios.
    633  1.18        pk  */
    634  1.18        pk int
    635  1.18        pk iommu_dmamap_load_uio(t, map, uio, flags)
    636  1.18        pk 	bus_dma_tag_t t;
    637  1.18        pk 	bus_dmamap_t map;
    638  1.18        pk 	struct uio *uio;
    639  1.18        pk 	int flags;
    640  1.18        pk {
    641  1.18        pk 
    642  1.18        pk 	panic("_bus_dmamap_load_uio: not implemented");
    643  1.18        pk }
    644  1.18        pk 
    645  1.18        pk /*
    646  1.18        pk  * Like _bus_dmamap_load(), but for raw memory allocated with
    647  1.18        pk  * bus_dmamem_alloc().
    648  1.18        pk  */
    649  1.18        pk int
    650  1.18        pk iommu_dmamap_load_raw(t, map, segs, nsegs, size, flags)
    651  1.18        pk 	bus_dma_tag_t t;
    652  1.18        pk 	bus_dmamap_t map;
    653  1.18        pk 	bus_dma_segment_t *segs;
    654  1.18        pk 	int nsegs;
    655  1.18        pk 	bus_size_t size;
    656  1.18        pk 	int flags;
    657  1.18        pk {
    658  1.39        pk 	vm_page_t m;
    659  1.21        pk 	paddr_t pa;
    660  1.24        pk 	bus_addr_t dva;
    661  1.39        pk 	bus_size_t sgsize;
    662  1.18        pk 	struct pglist *mlist;
    663  1.40        pk 	int pagesz = PAGE_SIZE;
    664  1.39        pk 	int error;
    665  1.18        pk 
    666  1.39        pk 	map->dm_nsegs = 0;
    667  1.18        pk 
    668  1.39        pk 	/* Allocate IOMMU resources */
    669  1.39        pk 	if ((error = iommu_dvma_alloc(map, segs[0]._ds_va, size,
    670  1.39        pk 				      flags, &dva, &sgsize)) != 0)
    671  1.33        pk 		return (error);
    672  1.18        pk 
    673  1.18        pk 	/*
    674  1.39        pk 	 * Note DVMA address in case bus_dmamem_map() is called later.
    675  1.39        pk 	 * It can then insure cache coherency by choosing a KVA that
    676  1.39        pk 	 * is aligned to `ds_addr'.
    677  1.18        pk 	 */
    678  1.24        pk 	segs[0].ds_addr = dva;
    679  1.18        pk 	segs[0].ds_len = size;
    680  1.18        pk 
    681  1.39        pk 	map->dm_segs[0].ds_addr = dva;
    682  1.39        pk 	map->dm_segs[0].ds_len = size;
    683  1.41        pk 	map->dm_segs[0]._ds_sgsize = sgsize;
    684  1.39        pk 
    685  1.39        pk 	/* Map physical pages into IOMMU */
    686  1.18        pk 	mlist = segs[0]._ds_mlist;
    687  1.18        pk 	for (m = TAILQ_FIRST(mlist); m != NULL; m = TAILQ_NEXT(m,pageq)) {
    688  1.39        pk 		if (sgsize == 0)
    689  1.39        pk 			panic("iommu_dmamap_load_raw: size botch");
    690  1.21        pk 		pa = VM_PAGE_TO_PHYS(m);
    691  1.24        pk 		iommu_enter(dva, pa);
    692  1.40        pk 		dva += pagesz;
    693  1.40        pk 		sgsize -= pagesz;
    694  1.18        pk 	}
    695  1.18        pk 
    696  1.39        pk 	map->dm_nsegs = 1;
    697  1.39        pk 	map->dm_mapsize = size;
    698  1.39        pk 
    699  1.18        pk 	return (0);
    700  1.18        pk }
    701  1.18        pk 
    702  1.18        pk /*
    703  1.39        pk  * Unload an IOMMU DMA map.
    704  1.18        pk  */
    705  1.18        pk void
    706  1.39        pk iommu_dmamap_unload(t, map)
    707  1.18        pk 	bus_dma_tag_t t;
    708  1.39        pk 	bus_dmamap_t map;
    709  1.18        pk {
    710  1.39        pk 	bus_dma_segment_t *segs = map->dm_segs;
    711  1.39        pk 	int nsegs = map->dm_nsegs;
    712  1.39        pk 	bus_addr_t dva;
    713  1.18        pk 	bus_size_t len;
    714  1.39        pk 	int i, s, error;
    715  1.39        pk 
    716  1.39        pk 	for (i = 0; i < nsegs; i++) {
    717  1.41        pk 		dva = segs[i].ds_addr & -PAGE_SIZE;
    718  1.41        pk 		len = segs[i]._ds_sgsize;
    719  1.39        pk 
    720  1.39        pk 		iommu_remove(dva, len);
    721  1.39        pk 		s = splhigh();
    722  1.39        pk 		error = extent_free(iommu_dvmamap, dva, len, EX_NOWAIT);
    723  1.39        pk 		splx(s);
    724  1.39        pk 		if (error != 0)
    725  1.39        pk 			printf("warning: %ld of DVMA space lost\n", (long)len);
    726  1.39        pk 	}
    727  1.18        pk 
    728  1.39        pk 	/* Mark the mappings as invalid. */
    729  1.39        pk 	map->dm_mapsize = 0;
    730  1.39        pk 	map->dm_nsegs = 0;
    731  1.39        pk }
    732  1.18        pk 
    733  1.39        pk /*
    734  1.39        pk  * DMA map synchronization.
    735  1.39        pk  */
    736  1.39        pk void
    737  1.39        pk iommu_dmamap_sync(t, map, offset, len, ops)
    738  1.39        pk 	bus_dma_tag_t t;
    739  1.39        pk 	bus_dmamap_t map;
    740  1.39        pk 	bus_addr_t offset;
    741  1.39        pk 	bus_size_t len;
    742  1.39        pk 	int ops;
    743  1.39        pk {
    744  1.18        pk 
    745  1.18        pk 	/*
    746  1.39        pk 	 * XXX Should flush CPU write buffers.
    747  1.18        pk 	 */
    748  1.18        pk }
    749  1.18        pk 
    750  1.18        pk /*
    751  1.39        pk  * Map DMA-safe memory.
    752  1.18        pk  */
    753  1.18        pk int
    754  1.18        pk iommu_dmamem_map(t, segs, nsegs, size, kvap, flags)
    755  1.18        pk 	bus_dma_tag_t t;
    756  1.18        pk 	bus_dma_segment_t *segs;
    757  1.18        pk 	int nsegs;
    758  1.18        pk 	size_t size;
    759  1.18        pk 	caddr_t *kvap;
    760  1.18        pk 	int flags;
    761  1.18        pk {
    762  1.18        pk 	vm_page_t m;
    763  1.39        pk 	vaddr_t va;
    764  1.18        pk 	bus_addr_t addr;
    765  1.18        pk 	struct pglist *mlist;
    766  1.18        pk 	int cbit;
    767  1.18        pk 	u_long align;
    768  1.40        pk 	int pagesz = PAGE_SIZE;
    769  1.18        pk 
    770  1.18        pk 	if (nsegs != 1)
    771  1.18        pk 		panic("iommu_dmamem_map: nsegs = %d", nsegs);
    772  1.18        pk 
    773  1.18        pk 	cbit = has_iocache ? 0 : PMAP_NC;
    774  1.40        pk 	align = dvma_cachealign ? dvma_cachealign : pagesz;
    775  1.18        pk 
    776  1.18        pk 	size = round_page(size);
    777  1.18        pk 
    778  1.18        pk 	/*
    779  1.39        pk 	 * In case the segment has already been loaded by
    780  1.39        pk 	 * iommu_dmamap_load_raw(), find a region of kernel virtual
    781  1.39        pk 	 * addresses that can accomodate our aligment requirements.
    782  1.18        pk 	 */
    783  1.40        pk 	va = _bus_dma_valloc_skewed(size, 0, align,
    784  1.40        pk 				    segs[0].ds_addr & (align - 1));
    785  1.39        pk 	if (va == 0)
    786  1.18        pk 		return (ENOMEM);
    787  1.18        pk 
    788  1.39        pk 	segs[0]._ds_va = va;
    789  1.39        pk 	*kvap = (caddr_t)va;
    790  1.18        pk 
    791  1.39        pk 	/*
    792  1.39        pk 	 * Map the pages allocated in _bus_dmamem_alloc() to the
    793  1.39        pk 	 * kernel virtual address space.
    794  1.39        pk 	 */
    795  1.18        pk 	mlist = segs[0]._ds_mlist;
    796  1.18        pk 	for (m = TAILQ_FIRST(mlist); m != NULL; m = TAILQ_NEXT(m,pageq)) {
    797  1.18        pk 
    798  1.18        pk 		if (size == 0)
    799  1.18        pk 			panic("iommu_dmamem_map: size botch");
    800  1.18        pk 
    801  1.18        pk 		addr = VM_PAGE_TO_PHYS(m);
    802  1.18        pk 		pmap_enter(pmap_kernel(), va, addr | cbit,
    803  1.36   thorpej 		    VM_PROT_READ | VM_PROT_WRITE,
    804  1.36   thorpej 		    VM_PROT_READ | VM_PROT_WRITE | PMAP_WIRED);
    805  1.18        pk #if 0
    806  1.18        pk 			if (flags & BUS_DMA_COHERENT)
    807  1.18        pk 				/* XXX */;
    808  1.18        pk #endif
    809  1.40        pk 		va += pagesz;
    810  1.40        pk 		size -= pagesz;
    811  1.18        pk 	}
    812  1.18        pk 
    813  1.18        pk 	return (0);
    814  1.18        pk }
    815  1.18        pk 
    816  1.18        pk /*
    817  1.39        pk  * mmap(2)'ing DMA-safe memory.
    818  1.18        pk  */
    819  1.46    simonb paddr_t
    820  1.18        pk iommu_dmamem_mmap(t, segs, nsegs, off, prot, flags)
    821  1.18        pk 	bus_dma_tag_t t;
    822  1.18        pk 	bus_dma_segment_t *segs;
    823  1.46    simonb 	int nsegs;
    824  1.46    simonb 	off_t off;
    825  1.46    simonb 	int prot, flags;
    826  1.18        pk {
    827  1.18        pk 
    828  1.18        pk 	panic("_bus_dmamem_mmap: not implemented");
    829  1.18        pk }
    830