vsbus.c revision 1.65.14.1
1 /* $NetBSD: vsbus.c,v 1.65.14.1 2021/03/20 19:33:39 thorpej Exp $ */ 2 /* 3 * Copyright (c) 1996, 1999 Ludd, University of Lule}, Sweden. 4 * All rights reserved. 5 * 6 * This code is derived from software contributed to Ludd by Bertram Barth. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __KERNEL_RCSID(0, "$NetBSD: vsbus.c,v 1.65.14.1 2021/03/20 19:33:39 thorpej Exp $"); 31 32 #include "opt_cputype.h" 33 34 #define _VAX_BUS_DMA_PRIVATE 35 36 #include <sys/param.h> 37 #include <sys/systm.h> 38 #include <sys/bus.h> 39 #include <sys/device.h> 40 41 #include <uvm/uvm_extern.h> 42 43 #include <machine/sid.h> 44 #include <machine/scb.h> 45 #include <machine/nexus.h> 46 47 #include <machine/uvax.h> 48 #include <machine/ka410.h> 49 #include <machine/ka420.h> 50 #include <machine/ka43.h> 51 52 #include <machine/mainbus.h> 53 #include <machine/vsbus.h> 54 55 #include "ioconf.h" 56 #include "locators.h" 57 58 static int vsbus_match(device_t, cfdata_t, void *); 59 static void vsbus_attach(device_t, device_t, void *); 60 static int vsbus_print(void *, const char *); 61 static int vsbus_search(device_t, cfdata_t, const int *, void *); 62 63 static SIMPLEQ_HEAD(, vsbus_dma) vsbus_dma; 64 65 CFATTACH_DECL_NEW(vsbus, sizeof(struct vsbus_softc), 66 vsbus_match, vsbus_attach, NULL, NULL); 67 68 static struct vax_bus_dma_tag vsbus_bus_dma_tag = { 69 ._dmamap_create = _bus_dmamap_create, 70 ._dmamap_destroy = _bus_dmamap_destroy, 71 ._dmamap_load = _bus_dmamap_load, 72 ._dmamap_load_mbuf = _bus_dmamap_load_mbuf, 73 ._dmamap_load_uio = _bus_dmamap_load_uio, 74 ._dmamap_load_raw = _bus_dmamap_load_raw, 75 ._dmamap_unload = _bus_dmamap_unload, 76 ._dmamap_sync = _bus_dmamap_sync, 77 ._dmamem_alloc = _bus_dmamem_alloc, 78 ._dmamem_free = _bus_dmamem_free, 79 ._dmamem_map = _bus_dmamem_map, 80 ._dmamem_unmap = _bus_dmamem_unmap, 81 ._dmamem_mmap = _bus_dmamem_mmap, 82 }; 83 84 int 85 vsbus_print(void *aux, const char *name) 86 { 87 struct vsbus_attach_args * const va = aux; 88 89 aprint_normal(" csr 0x%lx vec %o ipl %x maskbit %d", va->va_paddr, 90 va->va_cvec & 511, va->va_br, va->va_maskno - 1); 91 return UNCONF; 92 } 93 94 int 95 vsbus_match(device_t parent, cfdata_t cf, void *aux) 96 { 97 struct mainbus_attach_args * const ma = aux; 98 99 return !strcmp("vsbus", ma->ma_type); 100 } 101 102 void 103 vsbus_attach(device_t parent, device_t self, void *aux) 104 { 105 struct mainbus_attach_args * const ma = aux; 106 struct vsbus_softc *sc = device_private(self); 107 int dbase, dsize; 108 109 aprint_normal("\n"); 110 111 sc->sc_dev = self; 112 sc->sc_iot = ma->ma_iot; 113 sc->sc_dmatag = vsbus_bus_dma_tag; 114 115 switch (vax_boardtype) { 116 #if VAX49 || VAX53 117 case VAX_BTYP_53: 118 case VAX_BTYP_49: 119 sc->sc_vsregs = vax_map_physmem(VS_REGS_KA49, 1); 120 sc->sc_intreq = (char *)sc->sc_vsregs + 12; 121 sc->sc_intclr = (char *)sc->sc_vsregs + 12; 122 sc->sc_intmsk = (char *)sc->sc_vsregs + 8; 123 vsbus_dma_init(sc, 8192); 124 break; 125 #endif 126 127 #if VAX46 || VAX48 128 case VAX_BTYP_48: 129 case VAX_BTYP_46: 130 sc->sc_vsregs = vax_map_physmem(VS_REGS, 1); 131 sc->sc_intreq = (char *)sc->sc_vsregs + 15; 132 sc->sc_intclr = (char *)sc->sc_vsregs + 15; 133 sc->sc_intmsk = (char *)sc->sc_vsregs + 12; 134 vsbus_dma_init(sc, 32768); 135 break; 136 #endif 137 138 default: 139 sc->sc_vsregs = vax_map_physmem(VS_REGS, 1); 140 sc->sc_intreq = (char *)sc->sc_vsregs + 15; 141 sc->sc_intclr = (char *)sc->sc_vsregs + 15; 142 sc->sc_intmsk = (char *)sc->sc_vsregs + 12; 143 if (vax_boardtype == VAX_BTYP_410) { 144 dbase = KA410_DMA_BASE; 145 dsize = KA410_DMA_SIZE; 146 } else { 147 dbase = KA420_DMA_BASE; 148 dsize = KA420_DMA_SIZE; 149 *(char *)(sc->sc_vsregs + 0xe0) = 1; /* Big DMA */ 150 } 151 sc->sc_dmasize = dsize; 152 sc->sc_dmaaddr = uvm_km_alloc(kernel_map, dsize, 0, 153 UVM_KMF_VAONLY); 154 ioaccess(sc->sc_dmaaddr, dbase, dsize/VAX_NBPG); 155 break; 156 } 157 158 SIMPLEQ_INIT(&vsbus_dma); 159 /* 160 * First: find which interrupts we won't care about. 161 * There are interrupts that interrupt on a periodic basic 162 * that we don't want to interfere with the rest of the 163 * interrupt probing. 164 */ 165 *sc->sc_intmsk = 0; 166 *sc->sc_intclr = 0xff; 167 DELAY(1000000); /* Wait a second */ 168 sc->sc_mask = *sc->sc_intreq; 169 aprint_normal_dev(self, "interrupt mask %x\n", sc->sc_mask); 170 /* 171 * now check for all possible devices on this "bus" 172 */ 173 config_search(self, NULL, 174 CFARG_SUBMATCH, vsbus_search, 175 CFARG_IATTR, "vsbus", 176 CFARG_EOL); 177 178 /* Autoconfig finished, enable interrupts */ 179 *sc->sc_intmsk = ~sc->sc_mask; 180 } 181 182 int 183 vsbus_search(device_t parent, cfdata_t cf, const int *ldesc, void *aux) 184 { 185 struct vsbus_softc *sc = device_private(parent); 186 struct vsbus_attach_args va; 187 int i, vec, br; 188 u_char c; 189 190 va.va_paddr = cf->cf_loc[VSBUSCF_CSR]; 191 va.va_addr = vax_map_physmem(va.va_paddr, 1); 192 va.va_dmat = &sc->sc_dmatag; 193 va.va_memt = sc->sc_iot; 194 195 *sc->sc_intmsk = 0; 196 *sc->sc_intclr = 0xff; 197 scb_vecref(0, 0); /* Clear vector ref */ 198 199 i = config_match(parent, cf, &va); 200 vax_unmap_physmem(va.va_addr, 1); 201 c = *sc->sc_intreq & ~sc->sc_mask; 202 if (i == 0) 203 goto forgetit; 204 if (i > 10) 205 c = sc->sc_mask; /* Fooling interrupt */ 206 else if (c == 0) 207 goto forgetit; 208 209 *sc->sc_intmsk = c; 210 DELAY(100); 211 *sc->sc_intmsk = 0; 212 va.va_maskno = ffs((u_int)c); 213 i = scb_vecref(&vec, &br); 214 if (i == 0) 215 goto fail; 216 if (vec == 0) 217 goto fail; 218 219 va.va_br = br; 220 va.va_cvec = vec; 221 va.va_dmaaddr = sc->sc_dmaaddr; 222 va.va_dmasize = sc->sc_dmasize; 223 *sc->sc_intmsk = c; /* Allow interrupts during attach */ 224 config_attach(parent, cf, &va, vsbus_print); 225 *sc->sc_intmsk = 0; 226 return 0; 227 228 fail: 229 printf("%s%d at %s csr 0x%x %s\n", 230 cf->cf_name, cf->cf_unit, device_xname(parent), 231 cf->cf_loc[VSBUSCF_CSR], (i ? "zero vector" : "didn't interrupt")); 232 forgetit: 233 return 0; 234 } 235 236 /* 237 * Sets a new interrupt mask. Returns the old one. 238 * Works like spl functions. 239 */ 240 unsigned char 241 vsbus_setmask(int mask) 242 { 243 struct vsbus_softc * const sc = device_lookup_private(&vsbus_cd, 0); 244 unsigned char ch; 245 246 if (sc == NULL) 247 return 0; 248 249 ch = *sc->sc_intmsk; 250 *sc->sc_intmsk = mask; 251 return ch; 252 } 253 254 /* 255 * Clears the interrupts in mask. 256 */ 257 void 258 vsbus_clrintr(int mask) 259 { 260 struct vsbus_softc * const sc = device_lookup_private(&vsbus_cd, 0); 261 if (sc == NULL) 262 return; 263 264 *sc->sc_intclr = mask; 265 } 266 267 #define puvtopte(va, pmap) \ 268 (((vaddr_t)va < 0x40000000) ? \ 269 &(((pmap)->pm_p0br)[PG_PFNUM(va)]) : \ 270 &(((pmap)->pm_p1br)[PG_PFNUM(va)])) 271 272 /* 273 * Copy data from/to a user process' space from the DMA area. 274 * Use the physical memory directly. 275 */ 276 void 277 vsbus_copytoproc(struct proc *p, void *fromv, void *tov, int len) 278 { 279 char *from = fromv, *to = tov; 280 struct pmap *pm; 281 struct pte *pte; 282 paddr_t pa; 283 284 if ((vaddr_t)to & KERNBASE) { /* In kernel space */ 285 memcpy(to, from, len); 286 return; 287 } 288 289 #ifdef DIAGNOSTIC 290 if (p == NULL) 291 panic("vsbus_copytoproc: no proc"); 292 #endif 293 294 pm = p->p_vmspace->vm_map.pmap; 295 pte = puvtopte(trunc_page((vaddr_t)to), pm); 296 if ((vaddr_t)to & PGOFSET) { 297 int cz = round_page((vaddr_t)to) - (vaddr_t)to; 298 299 pa = (pte->pg_pfn << VAX_PGSHIFT) | (PAGE_SIZE - cz) | KERNBASE; 300 memcpy((void *)pa, from, uimin(cz, len)); 301 from += cz; 302 to += cz; 303 len -= cz; 304 pte += 8; /* XXX */ 305 } 306 while (len > 0) { 307 pa = (pte->pg_pfn << VAX_PGSHIFT) | KERNBASE; 308 memcpy((void *)pa, from, uimin(PAGE_SIZE, len)); 309 from += PAGE_SIZE; 310 to += PAGE_SIZE; 311 len -= PAGE_SIZE; 312 pte += 8; /* XXX */ 313 } 314 } 315 316 void 317 vsbus_copyfromproc(struct proc *p, void *fromv, void *tov, int len) 318 { 319 char *from = fromv, *to = tov; 320 struct pmap *pm; 321 struct pte *pte; 322 paddr_t pa; 323 324 if ((vaddr_t)from & KERNBASE) { /* In kernel space */ 325 memcpy(to, from, len); 326 return; 327 } 328 329 #ifdef DIAGNOSTIC 330 if (p == NULL) 331 panic("vsbus_copyfromproc: no proc"); 332 #endif 333 334 pm = p->p_vmspace->vm_map.pmap; 335 pte = puvtopte(trunc_page((vaddr_t)from), pm); 336 if ((vaddr_t)from & PGOFSET) { 337 int cz = round_page((vaddr_t)from) - (vaddr_t)from; 338 339 pa = (pte->pg_pfn << VAX_PGSHIFT) | (PAGE_SIZE - cz) | KERNBASE; 340 memcpy(to, (void *)pa, uimin(cz, len)); 341 from += cz; 342 to += cz; 343 len -= cz; 344 pte += 8; /* XXX */ 345 } 346 while (len > 0) { 347 pa = (pte->pg_pfn << VAX_PGSHIFT) | KERNBASE; 348 memcpy(to, (void *)pa, uimin(PAGE_SIZE, len)); 349 from += PAGE_SIZE; 350 to += PAGE_SIZE; 351 len -= PAGE_SIZE; 352 pte += 8; /* XXX */ 353 } 354 } 355 356 /* 357 * There can only be one user of the DMA area on VS2k/VS3100 at one 358 * time, so keep track of it here. 359 */ 360 static int vsbus_active = 0; 361 362 void 363 vsbus_dma_start(struct vsbus_dma *vd) 364 { 365 366 SIMPLEQ_INSERT_TAIL(&vsbus_dma, vd, vd_q); 367 368 if (vsbus_active == 0) 369 vsbus_dma_intr(); 370 } 371 372 void 373 vsbus_dma_intr(void) 374 { 375 struct vsbus_dma *vd; 376 377 vd = SIMPLEQ_FIRST(&vsbus_dma); 378 if (vd == NULL) { 379 vsbus_active = 0; 380 return; 381 } 382 vsbus_active = 1; 383 SIMPLEQ_REMOVE_HEAD(&vsbus_dma, vd_q); 384 (*vd->vd_go)(vd->vd_arg); 385 } 386 387
Indexes created Sat Oct 25 16:10:12 GMT 2025