1 /* $NetBSD: apecs_dma.c,v 1.18 2009/03/14 15:35:59 dsl Exp $ */ 2 3 /*- 4 * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility, 9 * NASA Ames Research Center. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 21 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 22 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 23 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 24 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 25 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 26 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 28 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 29 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 30 * POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 34 35 __KERNEL_RCSID(0, "$NetBSD: apecs_dma.c,v 1.18 2009/03/14 15:35:59 dsl Exp $"); 36 37 #include <sys/param.h> 38 #include <sys/systm.h> 39 #include <sys/kernel.h> 40 #include <sys/device.h> 41 #include <sys/malloc.h> 42 43 #include <uvm/uvm_extern.h> 44 45 #define _ALPHA_BUS_DMA_PRIVATE 46 #include <machine/bus.h> 47 48 #include <dev/pci/pcireg.h> 49 #include <dev/pci/pcivar.h> 50 #include <alpha/pci/apecsreg.h> 51 #include <alpha/pci/apecsvar.h> 52 53 bus_dma_tag_t apecs_dma_get_tag(bus_dma_tag_t, alpha_bus_t); 54 55 int apecs_bus_dmamap_load_sgmap(bus_dma_tag_t, bus_dmamap_t, void *, 56 bus_size_t, struct proc *, int); 57 58 int apecs_bus_dmamap_load_mbuf_sgmap(bus_dma_tag_t, bus_dmamap_t, 59 struct mbuf *, int); 60 61 int apecs_bus_dmamap_load_uio_sgmap(bus_dma_tag_t, bus_dmamap_t, 62 struct uio *, int); 63 64 int apecs_bus_dmamap_load_raw_sgmap(bus_dma_tag_t, bus_dmamap_t, 65 bus_dma_segment_t *, int, bus_size_t, int); 66 67 void apecs_bus_dmamap_unload_sgmap(bus_dma_tag_t, bus_dmamap_t); 68 69 /* 70 * Direct-mapped window: 1G at 1G 71 */ 72 #define APECS_DIRECT_MAPPED_BASE (1*1024*1024*1024) 73 #define APECS_DIRECT_MAPPED_SIZE (1*1024*1024*1024) 74 75 /* 76 * SGMAP window: 8M at 8M 77 */ 78 #define APECS_SGMAP_MAPPED_BASE (8*1024*1024) 79 #define APECS_SGMAP_MAPPED_SIZE (8*1024*1024) 80 81 /* APECS has a 256-byte out-bound DMA prefetch threshold. */ 82 #define APECS_SGMAP_PFTHRESH 256 83 84 /* 85 * Macro to flush APECS scatter/gather TLB. 86 */ 87 #define APECS_TLB_INVALIDATE() \ 88 do { \ 89 alpha_mb(); \ 90 REGVAL(EPIC_TBIA) = 0; \ 91 alpha_mb(); \ 92 } while (0) 93 94 void 95 apecs_dma_init(struct apecs_config *acp) 96 { 97 bus_addr_t tbase; 98 bus_dma_tag_t t; 99 100 /* 101 * Initialize the DMA tag used for direct-mapped DMA. 102 */ 103 t = &acp->ac_dmat_direct; 104 t->_cookie = acp; 105 t->_wbase = APECS_DIRECT_MAPPED_BASE; 106 t->_wsize = APECS_DIRECT_MAPPED_SIZE; 107 t->_next_window = NULL; 108 t->_boundary = 0; 109 t->_sgmap = NULL; 110 t->_get_tag = apecs_dma_get_tag; 111 t->_dmamap_create = _bus_dmamap_create; 112 t->_dmamap_destroy = _bus_dmamap_destroy; 113 t->_dmamap_load = _bus_dmamap_load_direct; 114 t->_dmamap_load_mbuf = _bus_dmamap_load_mbuf_direct; 115 t->_dmamap_load_uio = _bus_dmamap_load_uio_direct; 116 t->_dmamap_load_raw = _bus_dmamap_load_raw_direct; 117 t->_dmamap_unload = _bus_dmamap_unload; 118 t->_dmamap_sync = _bus_dmamap_sync; 119 120 t->_dmamem_alloc = _bus_dmamem_alloc; 121 t->_dmamem_free = _bus_dmamem_free; 122 t->_dmamem_map = _bus_dmamem_map; 123 t->_dmamem_unmap = _bus_dmamem_unmap; 124 t->_dmamem_mmap = _bus_dmamem_mmap; 125 126 /* 127 * Initialize the DMA tag used for sgmap-mapped DMA. 128 */ 129 t = &acp->ac_dmat_sgmap; 130 t->_cookie = acp; 131 t->_wbase = APECS_SGMAP_MAPPED_BASE; 132 t->_wsize = APECS_SGMAP_MAPPED_SIZE; 133 t->_next_window = NULL; 134 t->_boundary = 0; 135 t->_sgmap = &acp->ac_sgmap; 136 t->_pfthresh = APECS_SGMAP_PFTHRESH; 137 t->_get_tag = apecs_dma_get_tag; 138 t->_dmamap_create = alpha_sgmap_dmamap_create; 139 t->_dmamap_destroy = alpha_sgmap_dmamap_destroy; 140 t->_dmamap_load = apecs_bus_dmamap_load_sgmap; 141 t->_dmamap_load_mbuf = apecs_bus_dmamap_load_mbuf_sgmap; 142 t->_dmamap_load_uio = apecs_bus_dmamap_load_uio_sgmap; 143 t->_dmamap_load_raw = apecs_bus_dmamap_load_raw_sgmap; 144 t->_dmamap_unload = apecs_bus_dmamap_unload_sgmap; 145 t->_dmamap_sync = _bus_dmamap_sync; 146 147 t->_dmamem_alloc = _bus_dmamem_alloc; 148 t->_dmamem_free = _bus_dmamem_free; 149 t->_dmamem_map = _bus_dmamem_map; 150 t->_dmamem_unmap = _bus_dmamem_unmap; 151 t->_dmamem_mmap = _bus_dmamem_mmap; 152 153 /* 154 * The firmware has set up window 2 as a 1G direct-mapped DMA 155 * window beginning at 1G. We leave it alone. Disable 156 * window 1. 157 */ 158 REGVAL(EPIC_PCI_BASE_1) = 0; 159 alpha_mb(); 160 161 /* 162 * Initialize the SGMAP. 163 */ 164 alpha_sgmap_init(t, &acp->ac_sgmap, "apecs_sgmap", 165 APECS_SGMAP_MAPPED_BASE, 0, APECS_SGMAP_MAPPED_SIZE, 166 sizeof(u_int64_t), NULL, 0); 167 168 /* 169 * Set up window 1 as an 8MB SGMAP-mapped window 170 * starting at 8MB. 171 */ 172 REGVAL(EPIC_PCI_BASE_1) = APECS_SGMAP_MAPPED_BASE | 173 EPIC_PCI_BASE_SGEN | EPIC_PCI_BASE_WENB; 174 alpha_mb(); 175 176 REGVAL(EPIC_PCI_MASK_1) = EPIC_PCI_MASK_8M; 177 alpha_mb(); 178 179 tbase = acp->ac_sgmap.aps_ptpa >> EPIC_TBASE_SHIFT; 180 if ((tbase & EPIC_TBASE_T_BASE) != tbase) 181 panic("apecs_dma_init: bad page table address"); 182 REGVAL(EPIC_TBASE_1) = tbase; 183 alpha_mb(); 184 185 APECS_TLB_INVALIDATE(); 186 187 /* XXX XXX BEGIN XXX XXX */ 188 { /* XXX */ 189 extern paddr_t alpha_XXX_dmamap_or; /* XXX */ 190 alpha_XXX_dmamap_or = APECS_DIRECT_MAPPED_BASE; /* XXX */ 191 } /* XXX */ 192 /* XXX XXX END XXX XXX */ 193 } 194 195 /* 196 * Return the bus dma tag to be used for the specified bus type. 197 * INTERNAL USE ONLY! 198 */ 199 bus_dma_tag_t 200 apecs_dma_get_tag(bus_dma_tag_t t, alpha_bus_t bustype) 201 { 202 struct apecs_config *acp = t->_cookie; 203 204 switch (bustype) { 205 case ALPHA_BUS_PCI: 206 case ALPHA_BUS_EISA: 207 /* 208 * Systems with an APECS can only support 1G 209 * of memory, so we use the direct-mapped window 210 * on busses that have 32-bit DMA. 211 */ 212 return (&acp->ac_dmat_direct); 213 214 case ALPHA_BUS_ISA: 215 /* 216 * ISA doesn't have enough address bits to use 217 * the direct-mapped DMA window, so we must use 218 * SGMAPs. 219 */ 220 return (&acp->ac_dmat_sgmap); 221 222 default: 223 panic("apecs_dma_get_tag: shouldn't be here, really..."); 224 } 225 } 226 227 /* 228 * Load an APECS SGMAP-mapped DMA map with a linear buffer. 229 */ 230 int 231 apecs_bus_dmamap_load_sgmap(bus_dma_tag_t t, bus_dmamap_t map, void *buf, bus_size_t buflen, struct proc *p, int flags) 232 { 233 int error; 234 235 error = pci_sgmap_pte64_load(t, map, buf, buflen, p, flags, 236 t->_sgmap); 237 if (error == 0) 238 APECS_TLB_INVALIDATE(); 239 240 return (error); 241 } 242 243 /* 244 * Load an APECS SGMAP-mapped DMA map with an mbuf chain. 245 */ 246 int 247 apecs_bus_dmamap_load_mbuf_sgmap(bus_dma_tag_t t, bus_dmamap_t map, struct mbuf *m, int flags) 248 { 249 int error; 250 251 error = pci_sgmap_pte64_load_mbuf(t, map, m, flags, t->_sgmap); 252 if (error == 0) 253 APECS_TLB_INVALIDATE(); 254 255 return (error); 256 } 257 258 /* 259 * Load an APECS SGMAP-mapped DMA map with a uio. 260 */ 261 int 262 apecs_bus_dmamap_load_uio_sgmap(bus_dma_tag_t t, bus_dmamap_t map, struct uio *uio, int flags) 263 { 264 int error; 265 266 error = pci_sgmap_pte64_load_uio(t, map, uio, flags, t->_sgmap); 267 if (error == 0) 268 APECS_TLB_INVALIDATE(); 269 270 return (error); 271 } 272 273 /* 274 * Load an APECS SGMAP-mapped DMA map with raw memory. 275 */ 276 int 277 apecs_bus_dmamap_load_raw_sgmap(bus_dma_tag_t t, bus_dmamap_t map, bus_dma_segment_t *segs, int nsegs, bus_size_t size, int flags) 278 { 279 int error; 280 281 error = pci_sgmap_pte64_load_raw(t, map, segs, nsegs, size, flags, 282 t->_sgmap); 283 if (error == 0) 284 APECS_TLB_INVALIDATE(); 285 286 return (error); 287 } 288 289 /* 290 * Unload an APECS DMA map. 291 */ 292 void 293 apecs_bus_dmamap_unload_sgmap(bus_dma_tag_t t, bus_dmamap_t map) 294 { 295 296 /* 297 * Invalidate any SGMAP page table entries used by this 298 * mapping. 299 */ 300 pci_sgmap_pte64_unload(t, map, t->_sgmap); 301 APECS_TLB_INVALIDATE(); 302 303 /* 304 * Do the generic bits of the unload. 305 */ 306 _bus_dmamap_unload(t, map); 307 } 308