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