1 /* $NetBSD: isadma.c,v 1.7 2003/07/15 00:04:47 lukem Exp $ */ 2 /* $OpenBSD: isadma.c,v 1.2 1996/11/23 21:45:34 kstailey Exp $ */ 3 /* NetBSD: isadma.c,v 1.19 1996/04/29 20:03:26 christos Exp */ 4 5 #include <sys/cdefs.h> 6 __KERNEL_RCSID(0, "$NetBSD: isadma.c,v 1.7 2003/07/15 00:04:47 lukem Exp $"); 7 8 #include <sys/param.h> 9 #include <sys/systm.h> 10 #include <sys/device.h> 11 #include <sys/file.h> 12 #include <sys/buf.h> 13 #include <sys/syslog.h> 14 #include <sys/malloc.h> 15 #include <sys/uio.h> 16 17 #include <uvm/uvm_extern.h> 18 19 #include <machine/pio.h> 20 21 #include <dev/isa/isareg.h> 22 #include <dev/isa/isavar.h> 23 #include <dev/isa/isadmavar.h> 24 #include <arch/arc/isa/isadmareg.h> /*XXX*/ 25 26 struct dma_info { 27 int flags; 28 int active; 29 caddr_t addr; 30 bus_size_t nbytes; 31 struct isadma_seg phys[1]; 32 }; 33 34 static struct isadma_softc *isadma_sc; /*XXX ugly */ 35 static struct dma_info dma_info[8]; 36 static u_int8_t dma_finished; 37 38 /* high byte of address is stored in this port for i-th dma channel */ 39 static int dmapageport[2][4] = { 40 {0x87, 0x83, 0x81, 0x82}, 41 {0x8f, 0x8b, 0x89, 0x8a} 42 }; 43 44 static u_int8_t dmamode[4] = { 45 DMA37MD_READ | DMA37MD_SINGLE, 46 DMA37MD_WRITE | DMA37MD_SINGLE, 47 DMA37MD_READ | DMA37MD_LOOP, 48 DMA37MD_WRITE | DMA37MD_LOOP 49 }; 50 51 int isadmamatch __P((struct device *, struct cfdata *, void *)); 52 void isadmaattach __P((struct device *, struct device *, void *)); 53 int isadmaprint __P((void *, const char *)); 54 55 struct isadma_softc { 56 struct device sc_dev; 57 bus_space_tag_t sc_iot; 58 bus_space_handle_t sc_ioh1; 59 bus_space_handle_t sc_ioh2; 60 } 61 62 CFATTACH_DECL(isadma, sizeof(struct isadma_softc), 63 isadmamatch, isadmaattach, NULL, NULL); 64 65 struct cfdriver isadma_cd = { 66 NULL, "isadma", DV_DULL, 1 67 }; 68 69 isadmamatch(parent, match, aux) 70 struct device *parent; 71 struct cfdata *match; 72 void *aux; 73 { 74 struct isa_attach_args *ia = aux; 75 76 /* Sure we exist */ 77 ia->ia_iosize = 0; 78 return (1); 79 } 80 81 void 82 isadmaattach(parent, self, aux) 83 struct device *parent, *self; 84 void *aux; 85 { 86 struct isadma_softc *sc = (void *)self; 87 struct isa_attach_args *ia = aux; 88 bus_space_tag_t iot; 89 bus_space_handle_t ioh; 90 91 printf("\n"); 92 93 iot = sc->sc_iot = ia->ia_iot; 94 if (bus_space_map(iot, IO_DMA1, DMA_NREGS, 0, &ioh)) 95 panic("isadmaattach: couldn't map I/O ports"); 96 sc->sc_ioh1 = ioh; 97 if (bus_space_map(iot, IO_DMA2, DMA_NREGS*2, 0, &ioh)) 98 panic("isadmaattach: couldn't map I/O ports"); 99 sc->sc_ioh2 = ioh; 100 isadma_sc = sc; 101 } 102 103 /* 104 * isadma_cascade(): program 8237 DMA controller channel to accept 105 * external dma control by a board. 106 */ 107 void 108 isadma_cascade(chan) 109 int chan; 110 { 111 struct isadma_softc *sc = isadma_sc; 112 bus_space_tag_t iot = sc->sc_iot; 113 114 #ifdef ISADMA_DEBUG 115 if (chan < 0 || chan > 7) 116 panic("isadma_cascade: impossible request"); 117 #endif 118 119 /* set dma channel mode, and set dma channel mode */ 120 if ((chan & 4) == 0) { 121 bus_space_write_1(iot, sc->sc_ioh1, DMA1_MODE, chan | DMA37MD_CASCADE); 122 bus_space_write_1(iot, sc->sc_ioh1, DMA1_SMSK, chan); 123 } else { 124 chan &= 3; 125 126 bus_space_write_1(iot, sc->sc_ioh2, DMA2_MODE, chan | DMA37MD_CASCADE); 127 bus_space_write_1(iot, sc->sc_ioh2, DMA2_SMSK, chan); 128 } 129 } 130 131 /* 132 * isadma_start(): program 8237 DMA controller channel, avoid page alignment 133 * problems by using a bounce buffer. 134 */ 135 void 136 isadma_start(addr, nbytes, chan, flags) 137 caddr_t addr; 138 bus_size_t nbytes; 139 int chan; 140 int flags; 141 { 142 struct dma_info *di; 143 int waport; 144 int mflags; 145 struct isadma_softc *sc = isadma_sc; 146 bus_space_tag_t iot = sc->sc_iot; 147 bus_space_handle_t ioh; 148 149 #ifdef ISADMA_DEBUG 150 if (chan < 0 || chan > 7 || 151 (((flags & DMAMODE_READ) != 0) + ((flags & DMAMODE_WRITE) != 0) + 152 ((flags & DMAMODE_LOOP) != 0) != 1) || 153 ((chan & 4) ? (nbytes >= (1<<17) || nbytes & 1 || (u_int)addr & 1) : 154 (nbytes >= (1<<16)))) 155 panic("isadma_start: impossible request"); 156 #endif 157 158 di = dma_info+chan; 159 if (di->active) { 160 log(LOG_ERR,"isadma_start: old request active on %d\n",chan); 161 isadma_abort(chan); 162 } 163 164 di->flags = flags; 165 di->active = 1; 166 di->addr = addr; 167 di->nbytes = nbytes; 168 169 mflags = ISADMA_MAP_WAITOK | ISADMA_MAP_BOUNCE | ISADMA_MAP_CONTIG; 170 mflags |= (chan & 4) ? ISADMA_MAP_16BIT : ISADMA_MAP_8BIT; 171 172 if (isadma_map(addr, nbytes, di->phys, mflags) != 1) 173 panic("isadma_start: cannot map"); 174 175 /* XXX Will this do what we want with DMAMODE_LOOP? */ 176 if ((flags & DMAMODE_READ) == 0) 177 isadma_copytobuf(addr, nbytes, 1, di->phys); 178 179 dma_finished &= ~(1 << chan); 180 181 if ((chan & 4) == 0) { 182 ioh = sc->sc_ioh1; 183 /* 184 * Program one of DMA channels 0..3. These are 185 * byte mode channels. 186 */ 187 /* set dma channel mode, and reset address ff */ 188 bus_space_write_1(iot, ioh, DMA1_MODE, chan | dmamode[flags]); 189 bus_space_write_1(iot, ioh, DMA1_FFC, 0); 190 191 /* send start address */ 192 waport = DMA1_CHN(chan); 193 outb(dmapageport[0][chan], di->phys[0].addr>>16); 194 outb(waport, di->phys[0].addr); 195 outb(waport, di->phys[0].addr>>8); 196 197 /* send count */ 198 outb(waport + 1, --nbytes); 199 outb(waport + 1, nbytes>>8); 200 201 /* unmask channel */ 202 bus_space_write_1(iot, ioh, DMA1_SMSK, chan | DMA37SM_CLEAR); 203 } else { 204 ioh = sc->sc_ioh2; 205 /* 206 * Program one of DMA channels 4..7. These are 207 * word mode channels. 208 */ 209 /* set dma channel mode, and reset address ff */ 210 bus_space_write_1(iot, ioh, DMA2_MODE, (chan & 3) | dmamode[flags]); 211 bus_space_write_1(iot, ioh, DMA2_FFC, 0); 212 213 /* send start address */ 214 waport = DMA2_CHN(chan & 3); 215 outb(dmapageport[1][chan], di->phys[0].addr>>16); 216 outb(waport, di->phys[0].addr>>1); 217 outb(waport, di->phys[0].addr>>9); 218 219 /* send count */ 220 nbytes >>= 1; 221 outb(waport + 2, --nbytes); 222 outb(waport + 2, nbytes>>8); 223 224 /* unmask channel */ 225 bus_space_write_1(iot, ioh, DMA2_SMSK, (chan & 3) | DMA37SM_CLEAR); 226 } 227 } 228 229 void 230 isadma_abort(chan) 231 int chan; 232 { 233 struct dma_info *di; 234 struct isadma_softc *sc = isadma_sc; 235 bus_space_tag_t iot = sc->sc_iot; 236 237 #ifdef ISADMA_DEBUG 238 if (chan < 0 || chan > 7) 239 panic("isadma_abort: impossible request"); 240 #endif 241 242 di = dma_info+chan; 243 if (! di->active) { 244 log(LOG_ERR,"isadma_abort: no request active on %d\n",chan); 245 return; 246 } 247 248 /* mask channel */ 249 if ((chan & 4) == 0) 250 bus_space_write_1(iot, sc->sc_ioh1, DMA1_SMSK, DMA37SM_SET | chan); 251 else 252 bus_space_write_1(iot, sc->sc_ioh2, DMA2_SMSK, DMA37SM_SET | (chan & 3)); 253 254 isadma_unmap(di->addr, di->nbytes, 1, di->phys); 255 di->active = 0; 256 } 257 258 int 259 isadma_finished(chan) 260 int chan; 261 { 262 struct isadma_softc *sc = isadma_sc; 263 bus_space_tag_t iot = sc->sc_iot; 264 265 #ifdef ISADMA_DEBUG 266 if (chan < 0 || chan > 7) 267 panic("isadma_finished: impossible request"); 268 #endif 269 270 /* check that the terminal count was reached */ 271 if ((chan & 4) == 0) 272 dma_finished |= bus_space_read_1(iot, sc->sc_ioh1, DMA1_SR) & 0x0f; 273 else 274 dma_finished |= (bus_space_read_1(iot, sc->sc_ioh2, DMA2_SR) & 0x0f) << 4; 275 276 return ((dma_finished & (1 << chan)) != 0); 277 } 278 279 void 280 isadma_done(chan) 281 int chan; 282 { 283 struct dma_info *di; 284 u_char tc; 285 struct isadma_softc *sc = isadma_sc; 286 bus_space_tag_t iot = sc->sc_iot; 287 288 #ifdef DIAGNOSTIC 289 if (chan < 0 || chan > 7) 290 panic("isadma_done: impossible request"); 291 #endif 292 293 di = dma_info+chan; 294 if (! di->active) { 295 log(LOG_ERR,"isadma_done: no request active on %d\n",chan); 296 return; 297 } 298 299 /* check that the terminal count was reached */ 300 if ((chan & 4) == 0) 301 tc = bus_space_read_1(iot, sc->sc_ioh1, DMA1_SR) & (1 << chan); 302 else 303 tc = bus_space_read_1(iot, sc->sc_ioh2, DMA2_SR) & (1 << (chan & 3)); 304 if (tc == 0) 305 /* XXX probably should panic or something */ 306 log(LOG_ERR, "dma channel %d not finished\n", chan); 307 308 /* mask channel */ 309 if ((chan & 4) == 0) 310 bus_space_write_1(iot, sc->sc_ioh1, DMA1_SMSK, DMA37SM_SET | chan); 311 else 312 bus_space_write_1(iot, sc->sc_ioh2, DMA2_SMSK, DMA37SM_SET | (chan & 3)); 313 314 /* XXX Will this do what we want with DMAMODE_LOOP? */ 315 if (di->flags & DMAMODE_READ) 316 isadma_copyfrombuf(di->addr, di->nbytes, 1, di->phys); 317 318 isadma_unmap(di->addr, di->nbytes, 1, di->phys); 319 di->active = 0; 320 } 321