si_sebuf.c revision 1.17 1 1.17 thorpej /* $NetBSD: si_sebuf.c,v 1.17 2002/10/01 05:32:43 thorpej Exp $ */
2 1.1 gwr
3 1.1 gwr /*-
4 1.1 gwr * Copyright (c) 1996 The NetBSD Foundation, Inc.
5 1.1 gwr * All rights reserved.
6 1.1 gwr *
7 1.1 gwr * This code is derived from software contributed to The NetBSD Foundation
8 1.1 gwr * by Gordon W. Ross.
9 1.1 gwr *
10 1.1 gwr * Redistribution and use in source and binary forms, with or without
11 1.1 gwr * modification, are permitted provided that the following conditions
12 1.1 gwr * are met:
13 1.1 gwr * 1. Redistributions of source code must retain the above copyright
14 1.1 gwr * notice, this list of conditions and the following disclaimer.
15 1.1 gwr * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 gwr * notice, this list of conditions and the following disclaimer in the
17 1.1 gwr * documentation and/or other materials provided with the distribution.
18 1.1 gwr * 3. All advertising materials mentioning features or use of this software
19 1.1 gwr * must display the following acknowledgement:
20 1.1 gwr * This product includes software developed by the NetBSD
21 1.1 gwr * Foundation, Inc. and its contributors.
22 1.1 gwr * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.1 gwr * contributors may be used to endorse or promote products derived
24 1.1 gwr * from this software without specific prior written permission.
25 1.1 gwr *
26 1.1 gwr * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.1 gwr * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.1 gwr * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.1 gwr * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.1 gwr * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.1 gwr * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.1 gwr * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.1 gwr * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.1 gwr * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.1 gwr * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.1 gwr * POSSIBILITY OF SUCH DAMAGE.
37 1.1 gwr */
38 1.1 gwr
39 1.1 gwr /*
40 1.1 gwr * Sun3/E SCSI driver (machine-dependent portion).
41 1.1 gwr * The machine-independent parts are in ncr5380sbc.c
42 1.1 gwr *
43 1.1 gwr * XXX - Mostly from the si driver. Merge?
44 1.1 gwr */
45 1.1 gwr
46 1.1 gwr #include <sys/param.h>
47 1.1 gwr #include <sys/systm.h>
48 1.1 gwr #include <sys/errno.h>
49 1.1 gwr #include <sys/kernel.h>
50 1.1 gwr #include <sys/malloc.h>
51 1.1 gwr #include <sys/device.h>
52 1.1 gwr #include <sys/buf.h>
53 1.1 gwr #include <sys/proc.h>
54 1.1 gwr #include <sys/user.h>
55 1.1 gwr
56 1.1 gwr #include <dev/scsipi/scsi_all.h>
57 1.1 gwr #include <dev/scsipi/scsipi_all.h>
58 1.1 gwr #include <dev/scsipi/scsipi_debug.h>
59 1.1 gwr #include <dev/scsipi/scsiconf.h>
60 1.1 gwr
61 1.1 gwr #include <machine/autoconf.h>
62 1.1 gwr
63 1.5 gwr /* #define DEBUG XXX */
64 1.1 gwr
65 1.1 gwr #include <dev/ic/ncr5380reg.h>
66 1.1 gwr #include <dev/ic/ncr5380var.h>
67 1.1 gwr
68 1.1 gwr #include "sereg.h"
69 1.1 gwr #include "sevar.h"
70 1.1 gwr
71 1.1 gwr /*
72 1.1 gwr * Transfers smaller than this are done using PIO
73 1.1 gwr * (on assumption they're not worth DMA overhead)
74 1.1 gwr */
75 1.1 gwr #define MIN_DMA_LEN 128
76 1.1 gwr
77 1.1 gwr /*
78 1.1 gwr * Transfers lager than 65535 bytes need to be split-up.
79 1.1 gwr * (Some of the FIFO logic has only 16 bits counters.)
80 1.1 gwr * Make the size an integer multiple of the page size
81 1.1 gwr * to avoid buf/cluster remap problems. (paranoid?)
82 1.1 gwr */
83 1.1 gwr #define MAX_DMA_LEN 0xE000
84 1.1 gwr
85 1.1 gwr /*
86 1.1 gwr * This structure is used to keep track of mapped DMA requests.
87 1.1 gwr */
88 1.1 gwr struct se_dma_handle {
89 1.1 gwr int dh_flags;
90 1.1 gwr #define SIDH_BUSY 1 /* This DH is in use */
91 1.1 gwr #define SIDH_OUT 2 /* DMA does data out (write) */
92 1.1 gwr u_char * dh_addr; /* KVA of start of buffer */
93 1.1 gwr int dh_maplen; /* Length of KVA mapping. */
94 1.1 gwr long dh_dma; /* Offset in DMA buffer. */
95 1.1 gwr };
96 1.1 gwr
97 1.1 gwr /*
98 1.1 gwr * The first structure member has to be the ncr5380_softc
99 1.1 gwr * so we can just cast to go back and fourth between them.
100 1.1 gwr */
101 1.1 gwr struct se_softc {
102 1.1 gwr struct ncr5380_softc ncr_sc;
103 1.1 gwr volatile struct se_regs *sc_regs;
104 1.1 gwr int sc_adapter_type;
105 1.1 gwr int sc_adapter_iv; /* int. vec */
106 1.1 gwr int sc_options; /* options for this instance */
107 1.1 gwr int sc_reqlen; /* requested transfer length */
108 1.1 gwr struct se_dma_handle *sc_dma;
109 1.1 gwr /* DMA command block for the OBIO controller. */
110 1.1 gwr void *sc_dmacmd;
111 1.1 gwr };
112 1.1 gwr
113 1.1 gwr /* Options for disconnect/reselect, DMA, and interrupts. */
114 1.1 gwr #define SE_NO_DISCONNECT 0xff
115 1.1 gwr #define SE_NO_PARITY_CHK 0xff00
116 1.1 gwr #define SE_FORCE_POLLING 0x10000
117 1.1 gwr #define SE_DISABLE_DMA 0x20000
118 1.1 gwr
119 1.1 gwr void se_dma_alloc __P((struct ncr5380_softc *));
120 1.1 gwr void se_dma_free __P((struct ncr5380_softc *));
121 1.1 gwr void se_dma_poll __P((struct ncr5380_softc *));
122 1.1 gwr
123 1.1 gwr void se_dma_setup __P((struct ncr5380_softc *));
124 1.1 gwr void se_dma_start __P((struct ncr5380_softc *));
125 1.1 gwr void se_dma_eop __P((struct ncr5380_softc *));
126 1.1 gwr void se_dma_stop __P((struct ncr5380_softc *));
127 1.1 gwr
128 1.1 gwr void se_intr_on __P((struct ncr5380_softc *));
129 1.1 gwr void se_intr_off __P((struct ncr5380_softc *));
130 1.1 gwr
131 1.1 gwr static int se_intr __P((void *));
132 1.1 gwr static void se_reset __P((struct ncr5380_softc *));
133 1.1 gwr
134 1.1 gwr /*
135 1.1 gwr * New-style autoconfig attachment
136 1.1 gwr */
137 1.1 gwr
138 1.1 gwr static int se_match __P((struct device *, struct cfdata *, void *));
139 1.1 gwr static void se_attach __P((struct device *, struct device *, void *));
140 1.1 gwr
141 1.17 thorpej CFATTACH_DECL(si_sebuf, sizeof(struct se_softc),
142 1.17 thorpej se_match, se_attach, NULL, NULL)
143 1.1 gwr
144 1.1 gwr static void se_minphys __P((struct buf *));
145 1.1 gwr
146 1.1 gwr /* Options for disconnect/reselect, DMA, and interrupts. */
147 1.4 gwr int se_options = SE_DISABLE_DMA | SE_FORCE_POLLING | 0xff;
148 1.1 gwr
149 1.1 gwr /* How long to wait for DMA before declaring an error. */
150 1.1 gwr int se_dma_intr_timo = 500; /* ticks (sec. X 100) */
151 1.1 gwr
152 1.1 gwr int se_debug = 0;
153 1.1 gwr
154 1.1 gwr static int
155 1.1 gwr se_match(parent, cf, args)
156 1.1 gwr struct device *parent;
157 1.1 gwr struct cfdata *cf;
158 1.1 gwr void *args;
159 1.1 gwr {
160 1.1 gwr struct sebuf_attach_args *aa = args;
161 1.1 gwr
162 1.1 gwr /* Match by name. */
163 1.1 gwr if (strcmp(aa->name, "se"))
164 1.1 gwr return (0);
165 1.1 gwr
166 1.2 gwr /* Anyting else to check? */
167 1.1 gwr
168 1.1 gwr return (1);
169 1.1 gwr }
170 1.1 gwr
171 1.1 gwr static void
172 1.1 gwr se_attach(parent, self, args)
173 1.1 gwr struct device *parent, *self;
174 1.1 gwr void *args;
175 1.1 gwr {
176 1.1 gwr struct se_softc *sc = (struct se_softc *) self;
177 1.1 gwr struct ncr5380_softc *ncr_sc = &sc->ncr_sc;
178 1.1 gwr struct cfdata *cf = self->dv_cfdata;
179 1.1 gwr struct sebuf_attach_args *aa = args;
180 1.1 gwr volatile struct se_regs *regs;
181 1.1 gwr int i;
182 1.1 gwr
183 1.1 gwr /* Get options from config flags if specified. */
184 1.1 gwr if (cf->cf_flags)
185 1.1 gwr sc->sc_options = cf->cf_flags;
186 1.1 gwr else
187 1.1 gwr sc->sc_options = se_options;
188 1.1 gwr
189 1.1 gwr printf(": options=0x%x\n", sc->sc_options);
190 1.1 gwr
191 1.1 gwr sc->sc_adapter_type = aa->ca.ca_bustype;
192 1.1 gwr sc->sc_adapter_iv = aa->ca.ca_intvec;
193 1.1 gwr sc->sc_regs = regs = aa->regs;
194 1.1 gwr
195 1.1 gwr /*
196 1.1 gwr * MD function pointers used by the MI code.
197 1.1 gwr */
198 1.1 gwr ncr_sc->sc_pio_out = ncr5380_pio_out;
199 1.1 gwr ncr_sc->sc_pio_in = ncr5380_pio_in;
200 1.1 gwr
201 1.1 gwr #if 0 /* XXX - not yet... */
202 1.1 gwr ncr_sc->sc_dma_alloc = se_dma_alloc;
203 1.1 gwr ncr_sc->sc_dma_free = se_dma_free;
204 1.1 gwr ncr_sc->sc_dma_setup = se_dma_setup;
205 1.1 gwr ncr_sc->sc_dma_start = se_dma_start;
206 1.1 gwr ncr_sc->sc_dma_poll = se_dma_poll;
207 1.1 gwr ncr_sc->sc_dma_eop = se_dma_eop;
208 1.1 gwr ncr_sc->sc_dma_stop = se_dma_stop;
209 1.1 gwr ncr_sc->sc_intr_on = se_intr_on;
210 1.1 gwr ncr_sc->sc_intr_off = se_intr_off;
211 1.1 gwr #endif /* XXX */
212 1.1 gwr
213 1.1 gwr /* Attach interrupt handler. */
214 1.1 gwr isr_add_vectored(se_intr, (void *)sc,
215 1.1 gwr aa->ca.ca_intpri, aa->ca.ca_intvec);
216 1.1 gwr
217 1.1 gwr /* Reset the hardware. */
218 1.1 gwr se_reset(ncr_sc);
219 1.1 gwr
220 1.1 gwr /* Do the common attach stuff. */
221 1.1 gwr
222 1.1 gwr /*
223 1.1 gwr * Support the "options" (config file flags).
224 1.1 gwr * Disconnect/reselect is a per-target mask.
225 1.1 gwr * Interrupts and DMA are per-controller.
226 1.1 gwr */
227 1.1 gwr ncr_sc->sc_no_disconnect =
228 1.1 gwr (sc->sc_options & SE_NO_DISCONNECT);
229 1.1 gwr ncr_sc->sc_parity_disable =
230 1.1 gwr (sc->sc_options & SE_NO_PARITY_CHK) >> 8;
231 1.1 gwr if (sc->sc_options & SE_FORCE_POLLING)
232 1.1 gwr ncr_sc->sc_flags |= NCR5380_FORCE_POLLING;
233 1.1 gwr
234 1.1 gwr #if 1 /* XXX - Temporary */
235 1.1 gwr /* XXX - In case we think DMA is completely broken... */
236 1.1 gwr if (sc->sc_options & SE_DISABLE_DMA) {
237 1.1 gwr /* Override this function pointer. */
238 1.1 gwr ncr_sc->sc_dma_alloc = NULL;
239 1.1 gwr }
240 1.1 gwr #endif
241 1.1 gwr ncr_sc->sc_min_dma_len = MIN_DMA_LEN;
242 1.1 gwr
243 1.1 gwr /*
244 1.1 gwr * Initialize fields used by the MI code
245 1.1 gwr */
246 1.1 gwr ncr_sc->sci_r0 = ®s->ncrregs[0];
247 1.1 gwr ncr_sc->sci_r1 = ®s->ncrregs[1];
248 1.1 gwr ncr_sc->sci_r2 = ®s->ncrregs[2];
249 1.1 gwr ncr_sc->sci_r3 = ®s->ncrregs[3];
250 1.1 gwr ncr_sc->sci_r4 = ®s->ncrregs[4];
251 1.1 gwr ncr_sc->sci_r5 = ®s->ncrregs[5];
252 1.1 gwr ncr_sc->sci_r6 = ®s->ncrregs[6];
253 1.1 gwr ncr_sc->sci_r7 = ®s->ncrregs[7];
254 1.11 tsutsui
255 1.11 tsutsui ncr_sc->sc_rev = NCR_VARIANT_NCR5380;
256 1.1 gwr
257 1.1 gwr /*
258 1.1 gwr * Allocate DMA handles.
259 1.1 gwr */
260 1.1 gwr i = SCI_OPENINGS * sizeof(struct se_dma_handle);
261 1.1 gwr sc->sc_dma = (struct se_dma_handle *)
262 1.1 gwr malloc(i, M_DEVBUF, M_WAITOK);
263 1.1 gwr if (sc->sc_dma == NULL)
264 1.15 provos panic("se: dma_malloc failed");
265 1.1 gwr for (i = 0; i < SCI_OPENINGS; i++)
266 1.1 gwr sc->sc_dma[i].dh_flags = 0;
267 1.1 gwr
268 1.13 bouyer ncr_sc->sc_channel.chan_id = 7;
269 1.13 bouyer ncr_sc->sc_adapter.adapt_minphys = se_minphys;
270 1.10 mycroft
271 1.1 gwr /*
272 1.1 gwr * Initialize se board itself.
273 1.1 gwr */
274 1.10 mycroft ncr5380_attach(ncr_sc);
275 1.1 gwr }
276 1.1 gwr
277 1.1 gwr static void
278 1.1 gwr se_reset(struct ncr5380_softc *ncr_sc)
279 1.1 gwr {
280 1.1 gwr struct se_softc *sc = (struct se_softc *)ncr_sc;
281 1.1 gwr volatile struct se_regs *se = sc->sc_regs;
282 1.1 gwr
283 1.1 gwr #ifdef DEBUG
284 1.1 gwr if (se_debug) {
285 1.1 gwr printf("se_reset\n");
286 1.1 gwr }
287 1.1 gwr #endif
288 1.1 gwr
289 1.1 gwr /* The reset bits in the CSR are active low. */
290 1.1 gwr se->se_csr = 0;
291 1.1 gwr delay(10);
292 1.1 gwr se->se_csr = SE_CSR_SCSI_RES /* | SE_CSR_INTR_EN */ ;
293 1.1 gwr delay(10);
294 1.1 gwr
295 1.1 gwr /* Make sure the DMA engine is stopped. */
296 1.1 gwr se->dma_addr = 0;
297 1.1 gwr se->dma_cntr = 0;
298 1.1 gwr se->se_ivec = sc->sc_adapter_iv;
299 1.1 gwr }
300 1.1 gwr
301 1.1 gwr /*
302 1.1 gwr * This is called when the bus is going idle,
303 1.1 gwr * so we want to enable the SBC interrupts.
304 1.1 gwr * That is controlled by the DMA enable!
305 1.1 gwr * Who would have guessed!
306 1.1 gwr * What a NASTY trick!
307 1.1 gwr */
308 1.1 gwr void
309 1.1 gwr se_intr_on(ncr_sc)
310 1.1 gwr struct ncr5380_softc *ncr_sc;
311 1.1 gwr {
312 1.1 gwr struct se_softc *sc = (struct se_softc *)ncr_sc;
313 1.1 gwr volatile struct se_regs *se = sc->sc_regs;
314 1.1 gwr
315 1.1 gwr /* receive mode should be safer */
316 1.1 gwr se->se_csr &= ~SE_CSR_SEND;
317 1.1 gwr
318 1.1 gwr /* Clear the count so nothing happens. */
319 1.1 gwr se->dma_cntr = 0;
320 1.1 gwr
321 1.1 gwr /* Clear the start address too. (paranoid?) */
322 1.1 gwr se->dma_addr = 0;
323 1.1 gwr
324 1.1 gwr /* Finally, enable the DMA engine. */
325 1.1 gwr se->se_csr |= SE_CSR_INTR_EN;
326 1.1 gwr }
327 1.1 gwr
328 1.1 gwr /*
329 1.1 gwr * This is called when the bus is idle and we are
330 1.1 gwr * about to start playing with the SBC chip.
331 1.1 gwr */
332 1.1 gwr void
333 1.1 gwr se_intr_off(ncr_sc)
334 1.1 gwr struct ncr5380_softc *ncr_sc;
335 1.1 gwr {
336 1.1 gwr struct se_softc *sc = (struct se_softc *)ncr_sc;
337 1.1 gwr volatile struct se_regs *se = sc->sc_regs;
338 1.1 gwr
339 1.1 gwr se->se_csr &= ~SE_CSR_INTR_EN;
340 1.1 gwr }
341 1.1 gwr
342 1.1 gwr /*
343 1.1 gwr * This function is called during the COMMAND or MSG_IN phase
344 1.14 wiz * that precedes a DATA_IN or DATA_OUT phase, in case we need
345 1.1 gwr * to setup the DMA engine before the bus enters a DATA phase.
346 1.1 gwr *
347 1.1 gwr * On the VME version, setup the start addres, but clear the
348 1.1 gwr * count (to make sure it stays idle) and set that later.
349 1.1 gwr * XXX: The VME adapter appears to suppress SBC interrupts
350 1.1 gwr * when the FIFO is not empty or the FIFO count is non-zero!
351 1.1 gwr * XXX: Need to copy data into the DMA buffer...
352 1.1 gwr */
353 1.1 gwr void
354 1.1 gwr se_dma_setup(ncr_sc)
355 1.1 gwr struct ncr5380_softc *ncr_sc;
356 1.1 gwr {
357 1.1 gwr struct se_softc *sc = (struct se_softc *)ncr_sc;
358 1.1 gwr struct sci_req *sr = ncr_sc->sc_current;
359 1.1 gwr struct se_dma_handle *dh = sr->sr_dma_hand;
360 1.1 gwr volatile struct se_regs *se = sc->sc_regs;
361 1.1 gwr long data_pa;
362 1.1 gwr int xlen;
363 1.1 gwr
364 1.1 gwr /*
365 1.1 gwr * Get the DMA mapping for this segment.
366 1.1 gwr * XXX - Should separate allocation and mapin.
367 1.1 gwr */
368 1.1 gwr data_pa = 0; /* XXX se_dma_kvtopa(dh->dh_dma); */
369 1.1 gwr data_pa += (ncr_sc->sc_dataptr - dh->dh_addr);
370 1.1 gwr if (data_pa & 1)
371 1.1 gwr panic("se_dma_start: bad pa=0x%lx", data_pa);
372 1.1 gwr xlen = ncr_sc->sc_datalen;
373 1.1 gwr xlen &= ~1; /* XXX: necessary? */
374 1.1 gwr sc->sc_reqlen = xlen; /* XXX: or less? */
375 1.1 gwr
376 1.1 gwr #ifdef DEBUG
377 1.1 gwr if (se_debug & 2) {
378 1.1 gwr printf("se_dma_setup: dh=%p, pa=0x%lx, xlen=0x%x\n",
379 1.1 gwr dh, data_pa, xlen);
380 1.1 gwr }
381 1.1 gwr #endif
382 1.1 gwr
383 1.1 gwr /* Set direction (send/recv) */
384 1.1 gwr if (dh->dh_flags & SIDH_OUT) {
385 1.1 gwr se->se_csr |= SE_CSR_SEND;
386 1.1 gwr } else {
387 1.1 gwr se->se_csr &= ~SE_CSR_SEND;
388 1.1 gwr }
389 1.1 gwr
390 1.1 gwr /* Load the start address. */
391 1.1 gwr se->dma_addr = (ushort)(data_pa & 0xFFFF);
392 1.1 gwr
393 1.1 gwr /*
394 1.1 gwr * Keep the count zero or it may start early!
395 1.1 gwr */
396 1.1 gwr se->dma_cntr = 0;
397 1.1 gwr }
398 1.1 gwr
399 1.1 gwr
400 1.1 gwr void
401 1.1 gwr se_dma_start(ncr_sc)
402 1.1 gwr struct ncr5380_softc *ncr_sc;
403 1.1 gwr {
404 1.1 gwr struct se_softc *sc = (struct se_softc *)ncr_sc;
405 1.1 gwr struct sci_req *sr = ncr_sc->sc_current;
406 1.1 gwr struct se_dma_handle *dh = sr->sr_dma_hand;
407 1.1 gwr volatile struct se_regs *se = sc->sc_regs;
408 1.1 gwr int s, xlen;
409 1.1 gwr
410 1.1 gwr xlen = sc->sc_reqlen;
411 1.1 gwr
412 1.1 gwr /* This MAY be time critical (not sure). */
413 1.1 gwr s = splhigh();
414 1.1 gwr
415 1.1 gwr se->dma_cntr = (ushort)(xlen & 0xFFFF);
416 1.1 gwr
417 1.1 gwr /*
418 1.1 gwr * Acknowledge the phase change. (After DMA setup!)
419 1.1 gwr * Put the SBIC into DMA mode, and start the transfer.
420 1.1 gwr */
421 1.1 gwr if (dh->dh_flags & SIDH_OUT) {
422 1.1 gwr *ncr_sc->sci_tcmd = PHASE_DATA_OUT;
423 1.1 gwr SCI_CLR_INTR(ncr_sc);
424 1.1 gwr *ncr_sc->sci_icmd = SCI_ICMD_DATA;
425 1.1 gwr *ncr_sc->sci_mode |= (SCI_MODE_DMA | SCI_MODE_DMA_IE);
426 1.1 gwr *ncr_sc->sci_dma_send = 0; /* start it */
427 1.1 gwr } else {
428 1.1 gwr *ncr_sc->sci_tcmd = PHASE_DATA_IN;
429 1.1 gwr SCI_CLR_INTR(ncr_sc);
430 1.1 gwr *ncr_sc->sci_icmd = 0;
431 1.1 gwr *ncr_sc->sci_mode |= (SCI_MODE_DMA | SCI_MODE_DMA_IE);
432 1.1 gwr *ncr_sc->sci_irecv = 0; /* start it */
433 1.1 gwr }
434 1.1 gwr
435 1.1 gwr /* Let'er rip! */
436 1.1 gwr se->se_csr |= SE_CSR_INTR_EN;
437 1.1 gwr
438 1.1 gwr splx(s);
439 1.1 gwr ncr_sc->sc_state |= NCR_DOINGDMA;
440 1.1 gwr
441 1.1 gwr #ifdef DEBUG
442 1.1 gwr if (se_debug & 2) {
443 1.1 gwr printf("se_dma_start: started, flags=0x%x\n",
444 1.1 gwr ncr_sc->sc_state);
445 1.1 gwr }
446 1.1 gwr #endif
447 1.1 gwr }
448 1.1 gwr
449 1.1 gwr
450 1.1 gwr void
451 1.1 gwr se_dma_eop(ncr_sc)
452 1.1 gwr struct ncr5380_softc *ncr_sc;
453 1.1 gwr {
454 1.1 gwr
455 1.1 gwr /* Not needed - DMA was stopped prior to examining sci_csr */
456 1.1 gwr }
457 1.1 gwr
458 1.1 gwr
459 1.1 gwr void
460 1.1 gwr se_dma_stop(ncr_sc)
461 1.1 gwr struct ncr5380_softc *ncr_sc;
462 1.1 gwr {
463 1.1 gwr struct se_softc *sc = (struct se_softc *)ncr_sc;
464 1.1 gwr struct sci_req *sr = ncr_sc->sc_current;
465 1.1 gwr struct se_dma_handle *dh = sr->sr_dma_hand;
466 1.1 gwr volatile struct se_regs *se = sc->sc_regs;
467 1.1 gwr int resid, ntrans;
468 1.1 gwr
469 1.1 gwr if ((ncr_sc->sc_state & NCR_DOINGDMA) == 0) {
470 1.1 gwr #ifdef DEBUG
471 1.1 gwr printf("se_dma_stop: dma not running\n");
472 1.1 gwr #endif
473 1.1 gwr return;
474 1.1 gwr }
475 1.1 gwr ncr_sc->sc_state &= ~NCR_DOINGDMA;
476 1.1 gwr
477 1.1 gwr /* First, halt the DMA engine. */
478 1.1 gwr se->se_csr &= ~SE_CSR_INTR_EN; /* VME only */
479 1.1 gwr
480 1.1 gwr /* Set an impossible phase to prevent data movement? */
481 1.1 gwr *ncr_sc->sci_tcmd = PHASE_INVALID;
482 1.1 gwr
483 1.1 gwr /* Note that timeout may have set the error flag. */
484 1.1 gwr if (ncr_sc->sc_state & NCR_ABORTING)
485 1.1 gwr goto out;
486 1.1 gwr
487 1.1 gwr /* XXX: Wait for DMA to actually finish? */
488 1.1 gwr
489 1.1 gwr /*
490 1.1 gwr * Now try to figure out how much actually transferred
491 1.1 gwr */
492 1.1 gwr resid = se->dma_cntr & 0xFFFF;
493 1.1 gwr if (dh->dh_flags & SIDH_OUT)
494 1.1 gwr if ((resid > 0) && (resid < sc->sc_reqlen))
495 1.1 gwr resid++;
496 1.1 gwr ntrans = sc->sc_reqlen - resid;
497 1.1 gwr
498 1.1 gwr #ifdef DEBUG
499 1.1 gwr if (se_debug & 2) {
500 1.1 gwr printf("se_dma_stop: resid=0x%x ntrans=0x%x\n",
501 1.1 gwr resid, ntrans);
502 1.1 gwr }
503 1.1 gwr #endif
504 1.1 gwr
505 1.1 gwr if (ntrans < MIN_DMA_LEN) {
506 1.1 gwr printf("se: fifo count: 0x%x\n", resid);
507 1.1 gwr ncr_sc->sc_state |= NCR_ABORTING;
508 1.1 gwr goto out;
509 1.1 gwr }
510 1.1 gwr if (ntrans > ncr_sc->sc_datalen)
511 1.1 gwr panic("se_dma_stop: excess transfer");
512 1.1 gwr
513 1.1 gwr /* Adjust data pointer */
514 1.1 gwr ncr_sc->sc_dataptr += ntrans;
515 1.1 gwr ncr_sc->sc_datalen -= ntrans;
516 1.1 gwr
517 1.1 gwr out:
518 1.1 gwr se->dma_addr = 0;
519 1.1 gwr se->dma_cntr = 0;
520 1.1 gwr
521 1.1 gwr /* Put SBIC back in PIO mode. */
522 1.1 gwr *ncr_sc->sci_mode &= ~(SCI_MODE_DMA | SCI_MODE_DMA_IE);
523 1.1 gwr *ncr_sc->sci_icmd = 0;
524 1.1 gwr }
525 1.1 gwr
526 1.1 gwr /*****************************************************************/
527 1.1 gwr
528 1.1 gwr static void
529 1.1 gwr se_minphys(struct buf *bp)
530 1.1 gwr {
531 1.8 gwr
532 1.8 gwr if (bp->b_bcount > MAX_DMA_LEN)
533 1.1 gwr bp->b_bcount = MAX_DMA_LEN;
534 1.8 gwr
535 1.1 gwr return (minphys(bp));
536 1.1 gwr }
537 1.1 gwr
538 1.1 gwr
539 1.1 gwr int
540 1.1 gwr se_intr(void *arg)
541 1.1 gwr {
542 1.1 gwr struct se_softc *sc = arg;
543 1.1 gwr volatile struct se_regs *se = sc->sc_regs;
544 1.1 gwr int dma_error, claimed;
545 1.1 gwr u_short csr;
546 1.1 gwr
547 1.1 gwr claimed = 0;
548 1.1 gwr dma_error = 0;
549 1.1 gwr
550 1.1 gwr /* SBC interrupt? DMA interrupt? */
551 1.1 gwr csr = se->se_csr;
552 1.1 gwr NCR_TRACE("se_intr: csr=0x%x\n", csr);
553 1.1 gwr
554 1.1 gwr if (csr & SE_CSR_SBC_IP) {
555 1.1 gwr claimed = ncr5380_intr(&sc->ncr_sc);
556 1.1 gwr #ifdef DEBUG
557 1.1 gwr if (!claimed) {
558 1.1 gwr printf("se_intr: spurious from SBC\n");
559 1.1 gwr }
560 1.1 gwr #endif
561 1.1 gwr /* Yes, we DID cause this interrupt. */
562 1.1 gwr claimed = 1;
563 1.1 gwr }
564 1.1 gwr
565 1.1 gwr return (claimed);
566 1.1 gwr }
567 1.1 gwr
568 1.1 gwr
569 1.1 gwr /*****************************************************************
570 1.1 gwr * Common functions for DMA
571 1.1 gwr ****************************************************************/
572 1.1 gwr
573 1.1 gwr /*
574 1.1 gwr * Allocate a DMA handle and put it in sc->sc_dma. Prepare
575 1.1 gwr * for DMA transfer. On the Sun3/E, this means we have to
576 1.1 gwr * allocate space in the DMA buffer for this transfer.
577 1.1 gwr */
578 1.1 gwr void
579 1.1 gwr se_dma_alloc(ncr_sc)
580 1.1 gwr struct ncr5380_softc *ncr_sc;
581 1.1 gwr {
582 1.1 gwr struct se_softc *sc = (struct se_softc *)ncr_sc;
583 1.1 gwr struct sci_req *sr = ncr_sc->sc_current;
584 1.1 gwr struct scsipi_xfer *xs = sr->sr_xs;
585 1.1 gwr struct se_dma_handle *dh;
586 1.1 gwr int i, xlen;
587 1.1 gwr u_long addr;
588 1.1 gwr
589 1.1 gwr #ifdef DIAGNOSTIC
590 1.1 gwr if (sr->sr_dma_hand != NULL)
591 1.1 gwr panic("se_dma_alloc: already have DMA handle");
592 1.1 gwr #endif
593 1.1 gwr
594 1.1 gwr addr = (u_long) ncr_sc->sc_dataptr;
595 1.1 gwr xlen = ncr_sc->sc_datalen;
596 1.1 gwr
597 1.1 gwr /* If the DMA start addr is misaligned then do PIO */
598 1.1 gwr if ((addr & 1) || (xlen & 1)) {
599 1.1 gwr printf("se_dma_alloc: misaligned.\n");
600 1.1 gwr return;
601 1.1 gwr }
602 1.1 gwr
603 1.1 gwr /* Make sure our caller checked sc_min_dma_len. */
604 1.1 gwr if (xlen < MIN_DMA_LEN)
605 1.15 provos panic("se_dma_alloc: xlen=0x%x", xlen);
606 1.1 gwr
607 1.1 gwr /*
608 1.1 gwr * Never attempt single transfers of more than 63k, because
609 1.1 gwr * our count register may be only 16 bits (an OBIO adapter).
610 1.1 gwr * This should never happen since already bounded by minphys().
611 1.1 gwr * XXX - Should just segment these...
612 1.1 gwr */
613 1.1 gwr if (xlen > MAX_DMA_LEN) {
614 1.1 gwr printf("se_dma_alloc: excessive xlen=0x%x\n", xlen);
615 1.1 gwr ncr_sc->sc_datalen = xlen = MAX_DMA_LEN;
616 1.1 gwr }
617 1.1 gwr
618 1.1 gwr /* Find free DMA handle. Guaranteed to find one since we have
619 1.1 gwr as many DMA handles as the driver has processes. */
620 1.1 gwr for (i = 0; i < SCI_OPENINGS; i++) {
621 1.1 gwr if ((sc->sc_dma[i].dh_flags & SIDH_BUSY) == 0)
622 1.1 gwr goto found;
623 1.1 gwr }
624 1.1 gwr panic("se: no free DMA handles.");
625 1.1 gwr found:
626 1.1 gwr
627 1.1 gwr dh = &sc->sc_dma[i];
628 1.1 gwr dh->dh_flags = SIDH_BUSY;
629 1.1 gwr
630 1.1 gwr /* Copy the "write" flag for convenience. */
631 1.9 jdolecek if (xs->xs_control & XS_CTL_DATA_OUT)
632 1.1 gwr dh->dh_flags |= SIDH_OUT;
633 1.1 gwr
634 1.1 gwr dh->dh_addr = (u_char*) addr;
635 1.1 gwr dh->dh_maplen = xlen;
636 1.1 gwr dh->dh_dma = 0; /* XXX - Allocate space in DMA buffer. */
637 1.1 gwr /* XXX: dh->dh_dma = alloc(xlen) */
638 1.1 gwr if (!dh->dh_dma) {
639 1.1 gwr /* Can't remap segment */
640 1.1 gwr printf("se_dma_alloc: can't remap %p/0x%x\n",
641 1.1 gwr dh->dh_addr, dh->dh_maplen);
642 1.1 gwr dh->dh_flags = 0;
643 1.1 gwr return;
644 1.1 gwr }
645 1.1 gwr
646 1.1 gwr /* success */
647 1.1 gwr sr->sr_dma_hand = dh;
648 1.1 gwr
649 1.1 gwr return;
650 1.1 gwr }
651 1.1 gwr
652 1.1 gwr
653 1.1 gwr void
654 1.1 gwr se_dma_free(ncr_sc)
655 1.1 gwr struct ncr5380_softc *ncr_sc;
656 1.1 gwr {
657 1.1 gwr struct sci_req *sr = ncr_sc->sc_current;
658 1.1 gwr struct se_dma_handle *dh = sr->sr_dma_hand;
659 1.1 gwr
660 1.1 gwr #ifdef DIAGNOSTIC
661 1.1 gwr if (dh == NULL)
662 1.1 gwr panic("se_dma_free: no DMA handle");
663 1.1 gwr #endif
664 1.1 gwr
665 1.1 gwr if (ncr_sc->sc_state & NCR_DOINGDMA)
666 1.1 gwr panic("se_dma_free: free while in progress");
667 1.1 gwr
668 1.1 gwr if (dh->dh_flags & SIDH_BUSY) {
669 1.1 gwr /* XXX: Should separate allocation and mapping. */
670 1.1 gwr /* XXX: Give back the DMA space. */
671 1.1 gwr /* XXX: free((caddr_t)dh->dh_dma, dh->dh_maplen); */
672 1.1 gwr dh->dh_dma = 0;
673 1.1 gwr dh->dh_flags = 0;
674 1.1 gwr }
675 1.1 gwr sr->sr_dma_hand = NULL;
676 1.1 gwr }
677 1.1 gwr
678 1.1 gwr
679 1.1 gwr #define CSR_MASK SE_CSR_SBC_IP
680 1.1 gwr #define POLL_TIMO 50000 /* X100 = 5 sec. */
681 1.1 gwr
682 1.1 gwr /*
683 1.1 gwr * Poll (spin-wait) for DMA completion.
684 1.1 gwr * Called right after xx_dma_start(), and
685 1.1 gwr * xx_dma_stop() will be called next.
686 1.1 gwr * Same for either VME or OBIO.
687 1.1 gwr */
688 1.1 gwr void
689 1.1 gwr se_dma_poll(ncr_sc)
690 1.1 gwr struct ncr5380_softc *ncr_sc;
691 1.1 gwr {
692 1.1 gwr struct se_softc *sc = (struct se_softc *)ncr_sc;
693 1.1 gwr struct sci_req *sr = ncr_sc->sc_current;
694 1.1 gwr volatile struct se_regs *se = sc->sc_regs;
695 1.1 gwr int tmo;
696 1.1 gwr
697 1.1 gwr /* Make sure DMA started successfully. */
698 1.1 gwr if (ncr_sc->sc_state & NCR_ABORTING)
699 1.1 gwr return;
700 1.1 gwr
701 1.1 gwr /*
702 1.1 gwr * XXX: The Sun driver waits for ~SE_CSR_DMA_ACTIVE here
703 1.1 gwr * XXX: (on obio) or even worse (on vme) a 10mS. delay!
704 1.1 gwr * XXX: I really doubt that is necessary...
705 1.1 gwr */
706 1.1 gwr
707 1.1 gwr /* Wait for any "dma complete" or error bits. */
708 1.1 gwr tmo = POLL_TIMO;
709 1.1 gwr for (;;) {
710 1.1 gwr if (se->se_csr & CSR_MASK)
711 1.1 gwr break;
712 1.1 gwr if (--tmo <= 0) {
713 1.1 gwr printf("se: DMA timeout (while polling)\n");
714 1.1 gwr /* Indicate timeout as MI code would. */
715 1.1 gwr sr->sr_flags |= SR_OVERDUE;
716 1.1 gwr break;
717 1.1 gwr }
718 1.1 gwr delay(100);
719 1.1 gwr }
720 1.1 gwr NCR_TRACE("se_dma_poll: waited %d\n",
721 1.1 gwr POLL_TIMO - tmo);
722 1.1 gwr
723 1.1 gwr #ifdef DEBUG
724 1.1 gwr if (se_debug & 2) {
725 1.1 gwr printf("se_dma_poll: done, csr=0x%x\n", se->se_csr);
726 1.1 gwr }
727 1.1 gwr #endif
728 1.1 gwr }
729 1.1 gwr
730