isadma.c revision 1.35 1 1.35 thorpej /* $NetBSD: isadma.c,v 1.35 1998/06/09 01:04:18 thorpej Exp $ */
2 1.26 thorpej
3 1.26 thorpej /*-
4 1.33 thorpej * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
5 1.26 thorpej * All rights reserved.
6 1.26 thorpej *
7 1.26 thorpej * This code is derived from software contributed to The NetBSD Foundation
8 1.26 thorpej * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
9 1.26 thorpej * NASA Ames Research Center.
10 1.26 thorpej *
11 1.26 thorpej * Redistribution and use in source and binary forms, with or without
12 1.26 thorpej * modification, are permitted provided that the following conditions
13 1.26 thorpej * are met:
14 1.26 thorpej * 1. Redistributions of source code must retain the above copyright
15 1.26 thorpej * notice, this list of conditions and the following disclaimer.
16 1.26 thorpej * 2. Redistributions in binary form must reproduce the above copyright
17 1.26 thorpej * notice, this list of conditions and the following disclaimer in the
18 1.26 thorpej * documentation and/or other materials provided with the distribution.
19 1.26 thorpej * 3. All advertising materials mentioning features or use of this software
20 1.26 thorpej * must display the following acknowledgement:
21 1.26 thorpej * This product includes software developed by the NetBSD
22 1.26 thorpej * Foundation, Inc. and its contributors.
23 1.26 thorpej * 4. Neither the name of The NetBSD Foundation nor the names of its
24 1.26 thorpej * contributors may be used to endorse or promote products derived
25 1.26 thorpej * from this software without specific prior written permission.
26 1.26 thorpej *
27 1.26 thorpej * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 1.26 thorpej * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 1.26 thorpej * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 1.26 thorpej * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 1.26 thorpej * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 1.26 thorpej * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 1.26 thorpej * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 1.26 thorpej * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 1.26 thorpej * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 1.26 thorpej * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 1.26 thorpej * POSSIBILITY OF SUCH DAMAGE.
38 1.26 thorpej */
39 1.26 thorpej
40 1.26 thorpej /*
41 1.26 thorpej * Device driver for the ISA on-board DMA controller.
42 1.26 thorpej */
43 1.8 cgd
44 1.3 mycroft #include <sys/param.h>
45 1.3 mycroft #include <sys/systm.h>
46 1.19 christos #include <sys/proc.h>
47 1.26 thorpej #include <sys/device.h>
48 1.34 thorpej #include <sys/malloc.h>
49 1.5 mycroft
50 1.3 mycroft #include <vm/vm.h>
51 1.3 mycroft
52 1.26 thorpej #include <machine/bus.h>
53 1.3 mycroft
54 1.12 cgd #include <dev/isa/isareg.h>
55 1.26 thorpej #include <dev/isa/isavar.h>
56 1.12 cgd #include <dev/isa/isadmavar.h>
57 1.12 cgd #include <dev/isa/isadmareg.h>
58 1.1 mycroft
59 1.34 thorpej struct isa_mem *isa_mem_head;
60 1.27 augustss
61 1.26 thorpej /*
62 1.26 thorpej * High byte of DMA address is stored in this DMAPG register for
63 1.26 thorpej * the Nth DMA channel.
64 1.26 thorpej */
65 1.18 mycroft static int dmapageport[2][4] = {
66 1.26 thorpej {0x7, 0x3, 0x1, 0x2},
67 1.26 thorpej {0xf, 0xb, 0x9, 0xa}
68 1.15 mycroft };
69 1.15 mycroft
70 1.15 mycroft static u_int8_t dmamode[4] = {
71 1.17 mycroft DMA37MD_READ | DMA37MD_SINGLE,
72 1.15 mycroft DMA37MD_WRITE | DMA37MD_SINGLE,
73 1.25 mycroft DMA37MD_READ | DMA37MD_SINGLE | DMA37MD_LOOP,
74 1.25 mycroft DMA37MD_WRITE | DMA37MD_SINGLE | DMA37MD_LOOP
75 1.15 mycroft };
76 1.1 mycroft
77 1.34 thorpej static inline void _isa_dmaunmask __P((struct isa_dma_state *, int));
78 1.34 thorpej static inline void _isa_dmamask __P((struct isa_dma_state *, int));
79 1.19 christos
80 1.26 thorpej static inline void
81 1.34 thorpej _isa_dmaunmask(ids, chan)
82 1.34 thorpej struct isa_dma_state *ids;
83 1.23 mycroft int chan;
84 1.23 mycroft {
85 1.23 mycroft int ochan = chan & 3;
86 1.23 mycroft
87 1.35 thorpej ISA_DMA_MASK_CLR(ids, chan);
88 1.35 thorpej
89 1.35 thorpej /*
90 1.35 thorpej * If DMA is frozen, don't unmask it now. It will be
91 1.35 thorpej * unmasked when DMA is thawed again.
92 1.35 thorpej */
93 1.35 thorpej if (ids->ids_frozen)
94 1.35 thorpej return;
95 1.35 thorpej
96 1.23 mycroft /* set dma channel mode, and set dma channel mode */
97 1.23 mycroft if ((chan & 4) == 0)
98 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
99 1.26 thorpej DMA1_SMSK, ochan | DMA37SM_CLEAR);
100 1.23 mycroft else
101 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
102 1.26 thorpej DMA2_SMSK, ochan | DMA37SM_CLEAR);
103 1.23 mycroft }
104 1.23 mycroft
105 1.26 thorpej static inline void
106 1.34 thorpej _isa_dmamask(ids, chan)
107 1.34 thorpej struct isa_dma_state *ids;
108 1.23 mycroft int chan;
109 1.23 mycroft {
110 1.23 mycroft int ochan = chan & 3;
111 1.23 mycroft
112 1.35 thorpej ISA_DMA_MASK_SET(ids, chan);
113 1.35 thorpej
114 1.35 thorpej /*
115 1.35 thorpej * XXX Should we avoid masking the channel if DMA is
116 1.35 thorpej * XXX frozen? It seems like what we're doing should
117 1.35 thorpej * XXX be safe, and we do need to reset FFC...
118 1.35 thorpej */
119 1.35 thorpej
120 1.23 mycroft /* set dma channel mode, and set dma channel mode */
121 1.23 mycroft if ((chan & 4) == 0) {
122 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
123 1.26 thorpej DMA1_SMSK, ochan | DMA37SM_SET);
124 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
125 1.26 thorpej DMA1_FFC, 0);
126 1.23 mycroft } else {
127 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
128 1.26 thorpej DMA2_SMSK, ochan | DMA37SM_SET);
129 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
130 1.26 thorpej DMA2_FFC, 0);
131 1.23 mycroft }
132 1.23 mycroft }
133 1.23 mycroft
134 1.1 mycroft /*
135 1.34 thorpej * _isa_dmainit(): Initialize the isa_dma_state for this chipset.
136 1.34 thorpej */
137 1.34 thorpej void
138 1.34 thorpej _isa_dmainit(ids, bst, dmat, dev)
139 1.34 thorpej struct isa_dma_state *ids;
140 1.34 thorpej bus_space_tag_t bst;
141 1.34 thorpej bus_dma_tag_t dmat;
142 1.34 thorpej struct device *dev;
143 1.34 thorpej {
144 1.34 thorpej
145 1.34 thorpej ids->ids_dev = dev;
146 1.34 thorpej
147 1.34 thorpej if (ids->ids_initialized) {
148 1.34 thorpej /*
149 1.34 thorpej * Some systems may have e.g. `ofisa' (OpenFirmware
150 1.34 thorpej * configuration of ISA bus) and a regular `isa'.
151 1.34 thorpej * We allow both to call the initialization function,
152 1.34 thorpej * and take the device name from the last caller
153 1.34 thorpej * (assuming it will be the indirect ISA bus). Since
154 1.34 thorpej * `ofisa' and `isa' are the same bus with different
155 1.34 thorpej * configuration mechanisms, the space and dma tags
156 1.34 thorpej * must be the same!
157 1.34 thorpej */
158 1.34 thorpej if (ids->ids_bst != bst || ids->ids_dmat != dmat)
159 1.34 thorpej panic("_isa_dmainit: inconsistent ISA tags");
160 1.34 thorpej } else {
161 1.34 thorpej ids->ids_bst = bst;
162 1.34 thorpej ids->ids_dmat = dmat;
163 1.34 thorpej
164 1.34 thorpej /*
165 1.34 thorpej * Map the registers used by the ISA DMA controller.
166 1.34 thorpej */
167 1.34 thorpej if (bus_space_map(ids->ids_bst, IO_DMA1, DMA1_IOSIZE, 0,
168 1.34 thorpej &ids->ids_dma1h))
169 1.34 thorpej panic("_isa_dmainit: unable to map DMA controller #1");
170 1.34 thorpej if (bus_space_map(ids->ids_bst, IO_DMA2, DMA2_IOSIZE, 0,
171 1.34 thorpej &ids->ids_dma2h))
172 1.34 thorpej panic("_isa_dmainit: unable to map DMA controller #2");
173 1.34 thorpej if (bus_space_map(ids->ids_bst, IO_DMAPG, 0xf, 0,
174 1.34 thorpej &ids->ids_dmapgh))
175 1.34 thorpej panic("_isa_dmainit: unable to map DMA page registers");
176 1.34 thorpej
177 1.35 thorpej /*
178 1.35 thorpej * All 8 DMA channels start out "masked".
179 1.35 thorpej */
180 1.35 thorpej ids->ids_masked = 0xff;
181 1.35 thorpej
182 1.34 thorpej ids->ids_initialized = 1;
183 1.34 thorpej }
184 1.34 thorpej }
185 1.34 thorpej
186 1.34 thorpej /*
187 1.34 thorpej * _isa_dmacascade(): program 8237 DMA controller channel to accept
188 1.1 mycroft * external dma control by a board.
189 1.1 mycroft */
190 1.1 mycroft void
191 1.34 thorpej _isa_dmacascade(ids, chan)
192 1.34 thorpej struct isa_dma_state *ids;
193 1.4 mycroft int chan;
194 1.1 mycroft {
195 1.23 mycroft int ochan = chan & 3;
196 1.4 mycroft
197 1.26 thorpej if (chan < 0 || chan > 7) {
198 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
199 1.26 thorpej goto lose;
200 1.26 thorpej }
201 1.26 thorpej
202 1.34 thorpej if (ISA_DMA_DRQ_ISFREE(ids, chan) == 0) {
203 1.34 thorpej printf("%s: DRQ %d is not free\n", ids->ids_dev->dv_xname,
204 1.34 thorpej chan);
205 1.26 thorpej goto lose;
206 1.26 thorpej }
207 1.26 thorpej
208 1.34 thorpej ISA_DMA_DRQ_ALLOC(ids, chan);
209 1.1 mycroft
210 1.1 mycroft /* set dma channel mode, and set dma channel mode */
211 1.23 mycroft if ((chan & 4) == 0)
212 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
213 1.26 thorpej DMA1_MODE, ochan | DMA37MD_CASCADE);
214 1.26 thorpej else
215 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
216 1.26 thorpej DMA2_MODE, ochan | DMA37MD_CASCADE);
217 1.26 thorpej
218 1.34 thorpej _isa_dmaunmask(ids, chan);
219 1.26 thorpej return;
220 1.26 thorpej
221 1.26 thorpej lose:
222 1.34 thorpej panic("_isa_dmacascade");
223 1.26 thorpej }
224 1.26 thorpej
225 1.26 thorpej int
226 1.34 thorpej _isa_dmamap_create(ids, chan, size, flags)
227 1.34 thorpej struct isa_dma_state *ids;
228 1.26 thorpej int chan;
229 1.26 thorpej bus_size_t size;
230 1.26 thorpej int flags;
231 1.26 thorpej {
232 1.26 thorpej bus_size_t maxsize;
233 1.26 thorpej
234 1.26 thorpej if (chan < 0 || chan > 7) {
235 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
236 1.26 thorpej goto lose;
237 1.26 thorpej }
238 1.26 thorpej
239 1.26 thorpej if (chan & 4)
240 1.26 thorpej maxsize = (1 << 17);
241 1.23 mycroft else
242 1.26 thorpej maxsize = (1 << 16);
243 1.26 thorpej
244 1.26 thorpej if (size > maxsize)
245 1.26 thorpej return (EINVAL);
246 1.26 thorpej
247 1.34 thorpej if (ISA_DMA_DRQ_ISFREE(ids, chan) == 0) {
248 1.34 thorpej printf("%s: drq %d is not free\n", ids->ids_dev->dv_xname,
249 1.34 thorpej chan);
250 1.30 augustss goto lose;
251 1.26 thorpej }
252 1.15 mycroft
253 1.34 thorpej ISA_DMA_DRQ_ALLOC(ids, chan);
254 1.26 thorpej
255 1.34 thorpej return (bus_dmamap_create(ids->ids_dmat, size, 1, size, maxsize,
256 1.34 thorpej flags, &ids->ids_dmamaps[chan]));
257 1.26 thorpej
258 1.26 thorpej lose:
259 1.34 thorpej panic("_isa_dmamap_create");
260 1.26 thorpej }
261 1.26 thorpej
262 1.26 thorpej void
263 1.34 thorpej _isa_dmamap_destroy(ids, chan)
264 1.34 thorpej struct isa_dma_state *ids;
265 1.26 thorpej int chan;
266 1.26 thorpej {
267 1.26 thorpej
268 1.26 thorpej if (chan < 0 || chan > 7) {
269 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
270 1.26 thorpej goto lose;
271 1.26 thorpej }
272 1.26 thorpej
273 1.34 thorpej if (ISA_DMA_DRQ_ISFREE(ids, chan)) {
274 1.26 thorpej printf("%s: drq %d is already free\n",
275 1.34 thorpej ids->ids_dev->dv_xname, chan);
276 1.26 thorpej goto lose;
277 1.26 thorpej }
278 1.26 thorpej
279 1.34 thorpej ISA_DMA_DRQ_FREE(ids, chan);
280 1.26 thorpej
281 1.34 thorpej bus_dmamap_destroy(ids->ids_dmat, ids->ids_dmamaps[chan]);
282 1.26 thorpej return;
283 1.26 thorpej
284 1.26 thorpej lose:
285 1.34 thorpej panic("_isa_dmamap_destroy");
286 1.1 mycroft }
287 1.1 mycroft
288 1.1 mycroft /*
289 1.34 thorpej * _isa_dmastart(): program 8237 DMA controller channel and set it
290 1.26 thorpej * in motion.
291 1.1 mycroft */
292 1.26 thorpej int
293 1.34 thorpej _isa_dmastart(ids, chan, addr, nbytes, p, flags, busdmaflags)
294 1.34 thorpej struct isa_dma_state *ids;
295 1.26 thorpej int chan;
296 1.26 thorpej void *addr;
297 1.26 thorpej bus_size_t nbytes;
298 1.26 thorpej struct proc *p;
299 1.5 mycroft int flags;
300 1.26 thorpej int busdmaflags;
301 1.1 mycroft {
302 1.26 thorpej bus_dmamap_t dmam;
303 1.26 thorpej bus_addr_t dmaaddr;
304 1.1 mycroft int waport;
305 1.23 mycroft int ochan = chan & 3;
306 1.26 thorpej int error;
307 1.26 thorpej
308 1.26 thorpej if (chan < 0 || chan > 7) {
309 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
310 1.26 thorpej goto lose;
311 1.26 thorpej }
312 1.26 thorpej
313 1.26 thorpej #ifdef ISADMA_DEBUG
314 1.34 thorpej printf("_isa_dmastart: drq %d, addr %p, nbytes 0x%lx, p %p, "
315 1.26 thorpej "flags 0x%x, dmaflags 0x%x\n",
316 1.26 thorpej chan, addr, nbytes, p, flags, busdmaflags);
317 1.26 thorpej #endif
318 1.26 thorpej
319 1.26 thorpej if (chan & 4) {
320 1.26 thorpej if (nbytes > (1 << 17) || nbytes & 1 || (u_long)addr & 1) {
321 1.26 thorpej printf("%s: drq %d, nbytes 0x%lx, addr %p\n",
322 1.34 thorpej ids->ids_dev->dv_xname, chan, nbytes, addr);
323 1.26 thorpej goto lose;
324 1.26 thorpej }
325 1.26 thorpej } else {
326 1.26 thorpej if (nbytes > (1 << 16)) {
327 1.26 thorpej printf("%s: drq %d, nbytes 0x%lx\n",
328 1.34 thorpej ids->ids_dev->dv_xname, chan, nbytes);
329 1.26 thorpej goto lose;
330 1.26 thorpej }
331 1.26 thorpej }
332 1.26 thorpej
333 1.34 thorpej dmam = ids->ids_dmamaps[chan];
334 1.31 augustss if (dmam == NULL)
335 1.34 thorpej panic("_isa_dmastart: no DMA map for chan %d\n", chan);
336 1.26 thorpej
337 1.34 thorpej error = bus_dmamap_load(ids->ids_dmat, dmam, addr, nbytes,
338 1.26 thorpej p, busdmaflags);
339 1.26 thorpej if (error)
340 1.26 thorpej return (error);
341 1.1 mycroft
342 1.13 mycroft #ifdef ISADMA_DEBUG
343 1.26 thorpej __asm(".globl isa_dmastart_afterload ; isa_dmastart_afterload:");
344 1.4 mycroft #endif
345 1.1 mycroft
346 1.26 thorpej if (flags & DMAMODE_READ) {
347 1.34 thorpej bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
348 1.33 thorpej BUS_DMASYNC_PREREAD);
349 1.34 thorpej ids->ids_dmareads |= (1 << chan);
350 1.26 thorpej } else {
351 1.34 thorpej bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
352 1.33 thorpej BUS_DMASYNC_PREWRITE);
353 1.34 thorpej ids->ids_dmareads &= ~(1 << chan);
354 1.1 mycroft }
355 1.1 mycroft
356 1.26 thorpej dmaaddr = dmam->dm_segs[0].ds_addr;
357 1.26 thorpej
358 1.26 thorpej #ifdef ISADMA_DEBUG
359 1.26 thorpej printf(" dmaaddr 0x%lx\n", dmaaddr);
360 1.26 thorpej
361 1.26 thorpej __asm(".globl isa_dmastart_aftersync ; isa_dmastart_aftersync:");
362 1.26 thorpej #endif
363 1.24 mycroft
364 1.34 thorpej ids->ids_dmalength[chan] = nbytes;
365 1.1 mycroft
366 1.34 thorpej _isa_dmamask(ids, chan);
367 1.34 thorpej ids->ids_dmafinished &= ~(1 << chan);
368 1.14 mycroft
369 1.1 mycroft if ((chan & 4) == 0) {
370 1.23 mycroft /* set dma channel mode */
371 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h, DMA1_MODE,
372 1.26 thorpej ochan | dmamode[flags]);
373 1.1 mycroft
374 1.1 mycroft /* send start address */
375 1.23 mycroft waport = DMA1_CHN(ochan);
376 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dmapgh,
377 1.26 thorpej dmapageport[0][ochan], (dmaaddr >> 16) & 0xff);
378 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport,
379 1.26 thorpej dmaaddr & 0xff);
380 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport,
381 1.26 thorpej (dmaaddr >> 8) & 0xff);
382 1.1 mycroft
383 1.1 mycroft /* send count */
384 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport + 1,
385 1.26 thorpej (--nbytes) & 0xff);
386 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h, waport + 1,
387 1.26 thorpej (nbytes >> 8) & 0xff);
388 1.1 mycroft } else {
389 1.23 mycroft /* set dma channel mode */
390 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h, DMA2_MODE,
391 1.26 thorpej ochan | dmamode[flags]);
392 1.1 mycroft
393 1.1 mycroft /* send start address */
394 1.23 mycroft waport = DMA2_CHN(ochan);
395 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dmapgh,
396 1.26 thorpej dmapageport[1][ochan], (dmaaddr >> 16) & 0xff);
397 1.26 thorpej dmaaddr >>= 1;
398 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport,
399 1.26 thorpej dmaaddr & 0xff);
400 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport,
401 1.26 thorpej (dmaaddr >> 8) & 0xff);
402 1.1 mycroft
403 1.1 mycroft /* send count */
404 1.1 mycroft nbytes >>= 1;
405 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport + 2,
406 1.26 thorpej (--nbytes) & 0xff);
407 1.34 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h, waport + 2,
408 1.26 thorpej (nbytes >> 8) & 0xff);
409 1.23 mycroft }
410 1.1 mycroft
411 1.34 thorpej _isa_dmaunmask(ids, chan);
412 1.26 thorpej return (0);
413 1.26 thorpej
414 1.26 thorpej lose:
415 1.34 thorpej panic("_isa_dmastart");
416 1.1 mycroft }
417 1.1 mycroft
418 1.1 mycroft void
419 1.34 thorpej _isa_dmaabort(ids, chan)
420 1.34 thorpej struct isa_dma_state *ids;
421 1.4 mycroft int chan;
422 1.1 mycroft {
423 1.1 mycroft
424 1.26 thorpej if (chan < 0 || chan > 7) {
425 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
426 1.34 thorpej panic("_isa_dmaabort");
427 1.26 thorpej }
428 1.1 mycroft
429 1.34 thorpej _isa_dmamask(ids, chan);
430 1.34 thorpej bus_dmamap_unload(ids->ids_dmat, ids->ids_dmamaps[chan]);
431 1.34 thorpej ids->ids_dmareads &= ~(1 << chan);
432 1.22 mycroft }
433 1.22 mycroft
434 1.26 thorpej bus_size_t
435 1.34 thorpej _isa_dmacount(ids, chan)
436 1.34 thorpej struct isa_dma_state *ids;
437 1.22 mycroft int chan;
438 1.22 mycroft {
439 1.22 mycroft int waport;
440 1.26 thorpej bus_size_t nbytes;
441 1.23 mycroft int ochan = chan & 3;
442 1.22 mycroft
443 1.26 thorpej if (chan < 0 || chan > 7) {
444 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
445 1.26 thorpej panic("isa_dmacount");
446 1.26 thorpej }
447 1.22 mycroft
448 1.34 thorpej _isa_dmamask(ids, chan);
449 1.23 mycroft
450 1.24 mycroft /*
451 1.24 mycroft * We have to shift the byte count by 1. If we're in auto-initialize
452 1.24 mycroft * mode, the count may have wrapped around to the initial value. We
453 1.24 mycroft * can't use the TC bit to check for this case, so instead we compare
454 1.24 mycroft * against the original byte count.
455 1.24 mycroft * If we're not in auto-initialize mode, then the count will wrap to
456 1.24 mycroft * -1, so we also handle that case.
457 1.24 mycroft */
458 1.24 mycroft if ((chan & 4) == 0) {
459 1.24 mycroft waport = DMA1_CHN(ochan);
460 1.34 thorpej nbytes = bus_space_read_1(ids->ids_bst, ids->ids_dma1h,
461 1.26 thorpej waport + 1) + 1;
462 1.34 thorpej nbytes += bus_space_read_1(ids->ids_bst, ids->ids_dma1h,
463 1.26 thorpej waport + 1) << 8;
464 1.24 mycroft nbytes &= 0xffff;
465 1.24 mycroft } else {
466 1.24 mycroft waport = DMA2_CHN(ochan);
467 1.34 thorpej nbytes = bus_space_read_1(ids->ids_bst, ids->ids_dma2h,
468 1.26 thorpej waport + 2) + 1;
469 1.34 thorpej nbytes += bus_space_read_1(ids->ids_bst, ids->ids_dma2h,
470 1.26 thorpej waport + 2) << 8;
471 1.24 mycroft nbytes <<= 1;
472 1.24 mycroft nbytes &= 0x1ffff;
473 1.24 mycroft }
474 1.24 mycroft
475 1.34 thorpej if (nbytes == ids->ids_dmalength[chan])
476 1.23 mycroft nbytes = 0;
477 1.22 mycroft
478 1.34 thorpej _isa_dmaunmask(ids, chan);
479 1.22 mycroft return (nbytes);
480 1.1 mycroft }
481 1.1 mycroft
482 1.13 mycroft int
483 1.34 thorpej _isa_dmafinished(ids, chan)
484 1.34 thorpej struct isa_dma_state *ids;
485 1.5 mycroft int chan;
486 1.1 mycroft {
487 1.1 mycroft
488 1.26 thorpej if (chan < 0 || chan > 7) {
489 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
490 1.34 thorpej panic("_isa_dmafinished");
491 1.26 thorpej }
492 1.1 mycroft
493 1.1 mycroft /* check that the terminal count was reached */
494 1.1 mycroft if ((chan & 4) == 0)
495 1.34 thorpej ids->ids_dmafinished |= bus_space_read_1(ids->ids_bst,
496 1.34 thorpej ids->ids_dma1h, DMA1_SR) & 0x0f;
497 1.1 mycroft else
498 1.34 thorpej ids->ids_dmafinished |= (bus_space_read_1(ids->ids_bst,
499 1.34 thorpej ids->ids_dma2h, DMA2_SR) & 0x0f) << 4;
500 1.14 mycroft
501 1.34 thorpej return ((ids->ids_dmafinished & (1 << chan)) != 0);
502 1.13 mycroft }
503 1.13 mycroft
504 1.13 mycroft void
505 1.34 thorpej _isa_dmadone(ids, chan)
506 1.34 thorpej struct isa_dma_state *ids;
507 1.13 mycroft int chan;
508 1.13 mycroft {
509 1.26 thorpej bus_dmamap_t dmam;
510 1.13 mycroft
511 1.26 thorpej if (chan < 0 || chan > 7) {
512 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
513 1.34 thorpej panic("_isa_dmadone");
514 1.26 thorpej }
515 1.26 thorpej
516 1.34 thorpej dmam = ids->ids_dmamaps[chan];
517 1.26 thorpej
518 1.34 thorpej _isa_dmamask(ids, chan);
519 1.14 mycroft
520 1.34 thorpej if (_isa_dmafinished(ids, chan) == 0)
521 1.34 thorpej printf("%s: _isa_dmadone: channel %d not finished\n",
522 1.34 thorpej ids->ids_dev->dv_xname, chan);
523 1.23 mycroft
524 1.34 thorpej bus_dmamap_sync(ids->ids_dmat, dmam, 0, dmam->dm_mapsize,
525 1.34 thorpej (ids->ids_dmareads & (1 << chan)) ? BUS_DMASYNC_POSTREAD :
526 1.26 thorpej BUS_DMASYNC_POSTWRITE);
527 1.9 mycroft
528 1.34 thorpej bus_dmamap_unload(ids->ids_dmat, dmam);
529 1.34 thorpej ids->ids_dmareads &= ~(1 << chan);
530 1.35 thorpej }
531 1.35 thorpej
532 1.35 thorpej void
533 1.35 thorpej _isa_dmafreeze(ids)
534 1.35 thorpej struct isa_dma_state *ids;
535 1.35 thorpej {
536 1.35 thorpej int s;
537 1.35 thorpej
538 1.35 thorpej s = splhigh();
539 1.35 thorpej
540 1.35 thorpej if (ids->ids_frozen == 0) {
541 1.35 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
542 1.35 thorpej DMA1_MASK, 0x0f);
543 1.35 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
544 1.35 thorpej DMA2_MASK, 0x0f);
545 1.35 thorpej }
546 1.35 thorpej
547 1.35 thorpej ids->ids_frozen++;
548 1.35 thorpej if (ids->ids_frozen < 1)
549 1.35 thorpej panic("_isa_dmafreeze: overflow");
550 1.35 thorpej
551 1.35 thorpej splx(s);
552 1.35 thorpej }
553 1.35 thorpej
554 1.35 thorpej void
555 1.35 thorpej _isa_dmathaw(ids)
556 1.35 thorpej struct isa_dma_state *ids;
557 1.35 thorpej {
558 1.35 thorpej int s;
559 1.35 thorpej
560 1.35 thorpej s = splhigh();
561 1.35 thorpej
562 1.35 thorpej ids->ids_frozen--;
563 1.35 thorpej if (ids->ids_frozen < 0)
564 1.35 thorpej panic("_isa_dmathaw: underflow");
565 1.35 thorpej
566 1.35 thorpej if (ids->ids_frozen == 0) {
567 1.35 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma1h,
568 1.35 thorpej DMA1_MASK, ids->ids_masked & 0x0f);
569 1.35 thorpej bus_space_write_1(ids->ids_bst, ids->ids_dma2h,
570 1.35 thorpej DMA2_MASK, (ids->ids_masked >> 4) & 0x0f);
571 1.35 thorpej }
572 1.35 thorpej
573 1.35 thorpej splx(s);
574 1.1 mycroft }
575 1.1 mycroft
576 1.1 mycroft int
577 1.34 thorpej _isa_dmamem_alloc(ids, chan, size, addrp, flags)
578 1.34 thorpej struct isa_dma_state *ids;
579 1.26 thorpej int chan;
580 1.26 thorpej bus_size_t size;
581 1.26 thorpej bus_addr_t *addrp;
582 1.26 thorpej int flags;
583 1.26 thorpej {
584 1.26 thorpej bus_dma_segment_t seg;
585 1.26 thorpej int error, boundary, rsegs;
586 1.26 thorpej
587 1.26 thorpej if (chan < 0 || chan > 7) {
588 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
589 1.34 thorpej panic("_isa_dmamem_alloc");
590 1.1 mycroft }
591 1.26 thorpej
592 1.26 thorpej boundary = (chan & 4) ? (1 << 17) : (1 << 16);
593 1.26 thorpej
594 1.26 thorpej size = round_page(size);
595 1.26 thorpej
596 1.34 thorpej error = bus_dmamem_alloc(ids->ids_dmat, size, NBPG, boundary,
597 1.26 thorpej &seg, 1, &rsegs, flags);
598 1.26 thorpej if (error)
599 1.26 thorpej return (error);
600 1.26 thorpej
601 1.26 thorpej *addrp = seg.ds_addr;
602 1.26 thorpej return (0);
603 1.5 mycroft }
604 1.5 mycroft
605 1.26 thorpej void
606 1.34 thorpej _isa_dmamem_free(ids, chan, addr, size)
607 1.34 thorpej struct isa_dma_state *ids;
608 1.26 thorpej int chan;
609 1.26 thorpej bus_addr_t addr;
610 1.26 thorpej bus_size_t size;
611 1.26 thorpej {
612 1.26 thorpej bus_dma_segment_t seg;
613 1.26 thorpej
614 1.26 thorpej if (chan < 0 || chan > 7) {
615 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
616 1.34 thorpej panic("_isa_dmamem_free");
617 1.26 thorpej }
618 1.26 thorpej
619 1.26 thorpej seg.ds_addr = addr;
620 1.26 thorpej seg.ds_len = size;
621 1.5 mycroft
622 1.34 thorpej bus_dmamem_free(ids->ids_dmat, &seg, 1);
623 1.26 thorpej }
624 1.5 mycroft
625 1.26 thorpej int
626 1.34 thorpej _isa_dmamem_map(ids, chan, addr, size, kvap, flags)
627 1.34 thorpej struct isa_dma_state *ids;
628 1.26 thorpej int chan;
629 1.26 thorpej bus_addr_t addr;
630 1.26 thorpej bus_size_t size;
631 1.26 thorpej caddr_t *kvap;
632 1.26 thorpej int flags;
633 1.26 thorpej {
634 1.26 thorpej bus_dma_segment_t seg;
635 1.26 thorpej
636 1.26 thorpej if (chan < 0 || chan > 7) {
637 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
638 1.34 thorpej panic("_isa_dmamem_map");
639 1.5 mycroft }
640 1.5 mycroft
641 1.26 thorpej seg.ds_addr = addr;
642 1.26 thorpej seg.ds_len = size;
643 1.26 thorpej
644 1.34 thorpej return (bus_dmamem_map(ids->ids_dmat, &seg, 1, size, kvap, flags));
645 1.5 mycroft }
646 1.5 mycroft
647 1.5 mycroft void
648 1.34 thorpej _isa_dmamem_unmap(ids, chan, kva, size)
649 1.34 thorpej struct isa_dma_state *ids;
650 1.26 thorpej int chan;
651 1.26 thorpej caddr_t kva;
652 1.26 thorpej size_t size;
653 1.19 christos {
654 1.5 mycroft
655 1.26 thorpej if (chan < 0 || chan > 7) {
656 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
657 1.34 thorpej panic("_isa_dmamem_unmap");
658 1.5 mycroft }
659 1.26 thorpej
660 1.34 thorpej bus_dmamem_unmap(ids->ids_dmat, kva, size);
661 1.26 thorpej }
662 1.26 thorpej
663 1.26 thorpej int
664 1.34 thorpej _isa_dmamem_mmap(ids, chan, addr, size, off, prot, flags)
665 1.34 thorpej struct isa_dma_state *ids;
666 1.26 thorpej int chan;
667 1.26 thorpej bus_addr_t addr;
668 1.26 thorpej bus_size_t size;
669 1.26 thorpej int off, prot, flags;
670 1.26 thorpej {
671 1.26 thorpej bus_dma_segment_t seg;
672 1.26 thorpej
673 1.26 thorpej if (chan < 0 || chan > 7) {
674 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
675 1.34 thorpej panic("_isa_dmamem_mmap");
676 1.26 thorpej }
677 1.26 thorpej
678 1.26 thorpej seg.ds_addr = addr;
679 1.26 thorpej seg.ds_len = size;
680 1.26 thorpej
681 1.34 thorpej return (bus_dmamem_mmap(ids->ids_dmat, &seg, 1, off, prot, flags));
682 1.30 augustss }
683 1.30 augustss
684 1.30 augustss int
685 1.34 thorpej _isa_drq_isfree(ids, chan)
686 1.34 thorpej struct isa_dma_state *ids;
687 1.30 augustss int chan;
688 1.30 augustss {
689 1.34 thorpej
690 1.30 augustss if (chan < 0 || chan > 7) {
691 1.34 thorpej printf("%s: bogus drq %d\n", ids->ids_dev->dv_xname, chan);
692 1.34 thorpej panic("_isa_drq_isfree");
693 1.30 augustss }
694 1.34 thorpej
695 1.34 thorpej return ISA_DMA_DRQ_ISFREE(ids, chan);
696 1.27 augustss }
697 1.27 augustss
698 1.27 augustss void *
699 1.34 thorpej _isa_malloc(ids, chan, size, pool, flags)
700 1.34 thorpej struct isa_dma_state *ids;
701 1.27 augustss int chan;
702 1.27 augustss size_t size;
703 1.27 augustss int pool;
704 1.27 augustss int flags;
705 1.27 augustss {
706 1.27 augustss bus_addr_t addr;
707 1.27 augustss caddr_t kva;
708 1.27 augustss int bflags;
709 1.27 augustss struct isa_mem *m;
710 1.27 augustss
711 1.27 augustss bflags = flags & M_WAITOK ? BUS_DMA_WAITOK : BUS_DMA_NOWAIT;
712 1.27 augustss
713 1.34 thorpej if (_isa_dmamem_alloc(ids, chan, size, &addr, bflags))
714 1.27 augustss return 0;
715 1.34 thorpej if (_isa_dmamem_map(ids, chan, addr, size, &kva, bflags)) {
716 1.34 thorpej _isa_dmamem_free(ids, chan, addr, size);
717 1.27 augustss return 0;
718 1.27 augustss }
719 1.27 augustss m = malloc(sizeof(*m), pool, flags);
720 1.27 augustss if (m == 0) {
721 1.34 thorpej _isa_dmamem_unmap(ids, chan, kva, size);
722 1.34 thorpej _isa_dmamem_free(ids, chan, addr, size);
723 1.27 augustss return 0;
724 1.27 augustss }
725 1.34 thorpej m->ids = ids;
726 1.27 augustss m->chan = chan;
727 1.27 augustss m->size = size;
728 1.27 augustss m->addr = addr;
729 1.27 augustss m->kva = kva;
730 1.27 augustss m->next = isa_mem_head;
731 1.27 augustss isa_mem_head = m;
732 1.27 augustss return (void *)kva;
733 1.27 augustss }
734 1.27 augustss
735 1.27 augustss void
736 1.34 thorpej _isa_free(addr, pool)
737 1.27 augustss void *addr;
738 1.27 augustss int pool;
739 1.27 augustss {
740 1.27 augustss struct isa_mem **mp, *m;
741 1.27 augustss caddr_t kva = (caddr_t)addr;
742 1.27 augustss
743 1.34 thorpej for(mp = &isa_mem_head; *mp && (*mp)->kva != kva;
744 1.34 thorpej mp = &(*mp)->next)
745 1.27 augustss ;
746 1.27 augustss m = *mp;
747 1.27 augustss if (!m) {
748 1.34 thorpej printf("_isa_free: freeing unallocted memory\n");
749 1.27 augustss return;
750 1.27 augustss }
751 1.27 augustss *mp = m->next;
752 1.34 thorpej _isa_dmamem_unmap(m->ids, m->chan, kva, m->size);
753 1.34 thorpej _isa_dmamem_free(m->ids, m->chan, m->addr, m->size);
754 1.27 augustss free(m, pool);
755 1.28 augustss }
756 1.28 augustss
757 1.28 augustss int
758 1.34 thorpej _isa_mappage(mem, off, prot)
759 1.28 augustss void *mem;
760 1.28 augustss int off;
761 1.28 augustss int prot;
762 1.28 augustss {
763 1.28 augustss struct isa_mem *m;
764 1.28 augustss
765 1.28 augustss for(m = isa_mem_head; m && m->kva != (caddr_t)mem; m = m->next)
766 1.28 augustss ;
767 1.28 augustss if (!m) {
768 1.34 thorpej printf("_isa_mappage: mapping unallocted memory\n");
769 1.28 augustss return -1;
770 1.28 augustss }
771 1.34 thorpej return _isa_dmamem_mmap(m->ids, m->chan, m->addr,
772 1.34 thorpej m->size, off, prot, BUS_DMA_WAITOK);
773 1.1 mycroft }
774