xref: /netbsd-src/sys/dev/ic/oosiop.c (revision 6a493d6bc668897c91594964a732d38505b70cbb)
1 /*	$NetBSD: oosiop.c,v 1.13 2010/11/13 13:52:02 uebayasi Exp $	*/
2 
3 /*
4  * Copyright (c) 2001 Shuichiro URATA.  All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. The name of the author may not be used to endorse or promote products
15  *    derived from this software without specific prior written permission.
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 /*
30  * NCR53C700 SCSI I/O processor (OOSIOP) driver
31  *
32  * TODO:
33  *   - More better error handling.
34  *   - Implement tagged queuing.
35  */
36 
37 #include <sys/cdefs.h>
38 __KERNEL_RCSID(0, "$NetBSD: oosiop.c,v 1.13 2010/11/13 13:52:02 uebayasi Exp $");
39 
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/callout.h>
43 #include <sys/kernel.h>
44 #include <sys/device.h>
45 #include <sys/buf.h>
46 #include <sys/malloc.h>
47 #include <sys/queue.h>
48 
49 #include <dev/scsipi/scsi_all.h>
50 #include <dev/scsipi/scsipi_all.h>
51 #include <dev/scsipi/scsiconf.h>
52 #include <dev/scsipi/scsi_message.h>
53 
54 #include <sys/cpu.h>
55 #include <sys/bus.h>
56 
57 #include <dev/ic/oosiopreg.h>
58 #include <dev/ic/oosiopvar.h>
59 #include <dev/microcode/siop/oosiop.out>
60 
61 static int	oosiop_alloc_cb(struct oosiop_softc *, int);
62 
63 static inline void oosiop_relocate_io(struct oosiop_softc *, bus_addr_t);
64 static inline void oosiop_relocate_tc(struct oosiop_softc *, bus_addr_t);
65 static inline void oosiop_fixup_select(struct oosiop_softc *, bus_addr_t,
66 		         int);
67 static inline void oosiop_fixup_jump(struct oosiop_softc *, bus_addr_t,
68 		         bus_addr_t);
69 static inline void oosiop_fixup_move(struct oosiop_softc *, bus_addr_t,
70 		         bus_size_t, bus_addr_t);
71 
72 static void	oosiop_load_script(struct oosiop_softc *);
73 static void	oosiop_setup_sgdma(struct oosiop_softc *, struct oosiop_cb *);
74 static void	oosiop_setup_dma(struct oosiop_softc *);
75 static void	oosiop_flush_fifo(struct oosiop_softc *);
76 static void	oosiop_clear_fifo(struct oosiop_softc *);
77 static void	oosiop_phasemismatch(struct oosiop_softc *);
78 static void	oosiop_setup_syncxfer(struct oosiop_softc *);
79 static void	oosiop_set_syncparam(struct oosiop_softc *, int, int, int);
80 static void	oosiop_minphys(struct buf *);
81 static void	oosiop_scsipi_request(struct scsipi_channel *,
82 		    scsipi_adapter_req_t, void *);
83 static void	oosiop_done(struct oosiop_softc *, struct oosiop_cb *);
84 static void	oosiop_timeout(void *);
85 static void	oosiop_reset(struct oosiop_softc *);
86 static void	oosiop_reset_bus(struct oosiop_softc *);
87 static void	oosiop_scriptintr(struct oosiop_softc *);
88 static void	oosiop_msgin(struct oosiop_softc *, struct oosiop_cb *);
89 
90 /* Trap interrupt code for unexpected data I/O */
91 #define	DATAIN_TRAP	0xdead0001
92 #define	DATAOUT_TRAP	0xdead0002
93 
94 /* Possible TP and SCF conbination */
95 static const struct {
96 	uint8_t		tp;
97 	uint8_t		scf;
98 } synctbl[] = {
99 	{0, 1},		/* SCLK /  4.0 */
100 	{1, 1},		/* SCLK /  5.0 */
101 	{2, 1},		/* SCLK /  6.0 */
102 	{3, 1},		/* SCLK /  7.0 */
103 	{1, 2},		/* SCLK /  7.5 */
104 	{4, 1},		/* SCLK /  8.0 */
105 	{5, 1},		/* SCLK /  9.0 */
106 	{6, 1},		/* SCLK / 10.0 */
107 	{3, 2},		/* SCLK / 10.5 */
108 	{7, 1},		/* SCLK / 11.0 */
109 	{4, 2},		/* SCLK / 12.0 */
110 	{5, 2},		/* SCLK / 13.5 */
111 	{3, 3},		/* SCLK / 14.0 */
112 	{6, 2},		/* SCLK / 15.0 */
113 	{4, 3},		/* SCLK / 16.0 */
114 	{7, 2},		/* SCLK / 16.5 */
115 	{5, 3},		/* SCLK / 18.0 */
116 	{6, 3},		/* SCLK / 20.0 */
117 	{7, 3}		/* SCLK / 22.0 */
118 };
119 #define	NSYNCTBL	(sizeof(synctbl) / sizeof(synctbl[0]))
120 
121 #define	oosiop_period(sc, tp, scf)					\
122 	    (((1000000000 / (sc)->sc_freq) * (tp) * (scf)) / 40)
123 
124 void
125 oosiop_attach(struct oosiop_softc *sc)
126 {
127 	bus_size_t scrsize;
128 	bus_dma_segment_t seg;
129 	struct oosiop_cb *cb;
130 	int err, i, nseg;
131 
132 	/*
133 	 * Allocate DMA-safe memory for the script and map it.
134 	 */
135 	scrsize = sizeof(oosiop_script);
136 	err = bus_dmamem_alloc(sc->sc_dmat, scrsize, PAGE_SIZE, 0, &seg, 1,
137 	    &nseg, BUS_DMA_NOWAIT);
138 	if (err) {
139 		aprint_error(": failed to allocate script memory, err=%d\n",
140 		    err);
141 		return;
142 	}
143 	err = bus_dmamem_map(sc->sc_dmat, &seg, nseg, scrsize,
144 	    (void **)&sc->sc_scr, BUS_DMA_NOWAIT | BUS_DMA_COHERENT);
145 	if (err) {
146 		aprint_error(": failed to map script memory, err=%d\n", err);
147 		return;
148 	}
149 	err = bus_dmamap_create(sc->sc_dmat, scrsize, 1, scrsize, 0,
150 	    BUS_DMA_NOWAIT, &sc->sc_scrdma);
151 	if (err) {
152 		aprint_error(": failed to create script map, err=%d\n", err);
153 		return;
154 	}
155 	err = bus_dmamap_load(sc->sc_dmat, sc->sc_scrdma, sc->sc_scr, scrsize,
156 	    NULL, BUS_DMA_NOWAIT | BUS_DMA_WRITE);
157 	if (err) {
158 		aprint_error(": failed to load script map, err=%d\n", err);
159 		return;
160 	}
161 	sc->sc_scrbase = sc->sc_scrdma->dm_segs[0].ds_addr;
162 
163 	/* Initialize command block array */
164 	TAILQ_INIT(&sc->sc_free_cb);
165 	TAILQ_INIT(&sc->sc_cbq);
166 	if (oosiop_alloc_cb(sc, OOSIOP_NCB) != 0)
167 		return;
168 
169 	/* Use first cb to reselection msgin buffer */
170 	cb = TAILQ_FIRST(&sc->sc_free_cb);
171 	sc->sc_reselbuf = cb->xferdma->dm_segs[0].ds_addr +
172 	    offsetof(struct oosiop_xfer, msgin[0]);
173 
174 	for (i = 0; i < OOSIOP_NTGT; i++) {
175 		sc->sc_tgt[i].nexus = NULL;
176 		sc->sc_tgt[i].flags = 0;
177 	}
178 
179 	/* Setup asynchronous clock divisor parameters */
180 	if (sc->sc_freq <= 25000000) {
181 		sc->sc_ccf = 10;
182 		sc->sc_dcntl = OOSIOP_DCNTL_CF_1;
183 	} else if (sc->sc_freq <= 37500000) {
184 		sc->sc_ccf = 15;
185 		sc->sc_dcntl = OOSIOP_DCNTL_CF_1_5;
186 	} else if (sc->sc_freq <= 50000000) {
187 		sc->sc_ccf = 20;
188 		sc->sc_dcntl = OOSIOP_DCNTL_CF_2;
189 	} else {
190 		sc->sc_ccf = 30;
191 		sc->sc_dcntl = OOSIOP_DCNTL_CF_3;
192 	}
193 
194 	if (sc->sc_chip == OOSIOP_700)
195 		sc->sc_minperiod = oosiop_period(sc, 4, sc->sc_ccf);
196 	else
197 		sc->sc_minperiod = oosiop_period(sc, 4, 10);
198 
199 	if (sc->sc_minperiod < 25)
200 		sc->sc_minperiod = 25;	/* limit to 10MB/s */
201 
202 	aprint_normal(": NCR53C700%s rev %d, %dMHz, SCSI ID %d\n",
203 	    sc->sc_chip == OOSIOP_700_66 ? "-66" : "",
204 	    oosiop_read_1(sc, OOSIOP_CTEST7) >> 4,
205 	    sc->sc_freq / 1000000, sc->sc_id);
206 	/*
207 	 * Reset all
208 	 */
209 	oosiop_reset(sc);
210 	oosiop_reset_bus(sc);
211 
212 	/*
213 	 * Start SCRIPTS processor
214 	 */
215 	oosiop_load_script(sc);
216 	sc->sc_active = 0;
217 	oosiop_write_4(sc, OOSIOP_DSP, sc->sc_scrbase + Ent_wait_reselect);
218 
219 	/*
220 	 * Fill in the scsipi_adapter.
221 	 */
222 	sc->sc_adapter.adapt_dev = sc->sc_dev;
223 	sc->sc_adapter.adapt_nchannels = 1;
224 	sc->sc_adapter.adapt_openings = OOSIOP_NCB;
225 	sc->sc_adapter.adapt_max_periph = 1;
226 	sc->sc_adapter.adapt_ioctl = NULL;
227 	sc->sc_adapter.adapt_minphys = oosiop_minphys;
228 	sc->sc_adapter.adapt_request = oosiop_scsipi_request;
229 
230 	/*
231 	 * Fill in the scsipi_channel.
232 	 */
233 	sc->sc_channel.chan_adapter = &sc->sc_adapter;
234 	sc->sc_channel.chan_bustype = &scsi_bustype;
235 	sc->sc_channel.chan_channel = 0;
236 	sc->sc_channel.chan_ntargets = OOSIOP_NTGT;
237 	sc->sc_channel.chan_nluns = 8;
238 	sc->sc_channel.chan_id = sc->sc_id;
239 
240 	/*
241 	 * Now try to attach all the sub devices.
242 	 */
243 	config_found(sc->sc_dev, &sc->sc_channel, scsiprint);
244 }
245 
246 static int
247 oosiop_alloc_cb(struct oosiop_softc *sc, int ncb)
248 {
249 	struct oosiop_cb *cb;
250 	struct oosiop_xfer *xfer;
251 	bus_size_t xfersize;
252 	bus_dma_segment_t seg;
253 	int i, s, err, nseg;
254 
255 	/*
256 	 * Allocate oosiop_cb.
257 	 */
258 	cb = malloc(sizeof(struct oosiop_cb) * ncb, M_DEVBUF, M_NOWAIT|M_ZERO);
259 	if (cb == NULL) {
260 		printf(": failed to allocate cb memory\n");
261 		return (ENOMEM);
262 	}
263 
264 	/*
265 	 * Allocate DMA-safe memory for the oosiop_xfer and map it.
266 	 */
267 	xfersize = sizeof(struct oosiop_xfer) * ncb;
268 	err = bus_dmamem_alloc(sc->sc_dmat, xfersize, PAGE_SIZE, 0, &seg, 1,
269 	    &nseg, BUS_DMA_NOWAIT);
270 	if (err) {
271 		printf(": failed to allocate xfer block memory, err=%d\n", err);
272 		return (err);
273 	}
274 	err = bus_dmamem_map(sc->sc_dmat, &seg, nseg, xfersize,
275 	    (void **)(void *)&xfer, BUS_DMA_NOWAIT | BUS_DMA_COHERENT);
276 	if (err) {
277 		printf(": failed to map xfer block memory, err=%d\n", err);
278 		return (err);
279 	}
280 
281 	/* Initialize each command block */
282 	for (i = 0; i < ncb; i++) {
283 		err = bus_dmamap_create(sc->sc_dmat, PAGE_SIZE, 1, PAGE_SIZE,
284 		    0, BUS_DMA_NOWAIT, &cb->cmddma);
285 		if (err) {
286 			printf(": failed to create cmddma map, err=%d\n", err);
287 			return (err);
288 		}
289 		err = bus_dmamap_create(sc->sc_dmat, OOSIOP_MAX_XFER,
290 		    OOSIOP_NSG, OOSIOP_DBC_MAX, 0, BUS_DMA_NOWAIT,
291 		    &cb->datadma);
292 		if (err) {
293 			printf(": failed to create datadma map, err=%d\n", err);
294 			return (err);
295 		}
296 
297 		err = bus_dmamap_create(sc->sc_dmat,
298 		    sizeof(struct oosiop_xfer), 1, sizeof(struct oosiop_xfer),
299 		    0, BUS_DMA_NOWAIT, &cb->xferdma);
300 		if (err) {
301 			printf(": failed to create xfer block map, err=%d\n",
302 			    err);
303 			return (err);
304 		}
305 		err = bus_dmamap_load(sc->sc_dmat, cb->xferdma, xfer,
306 		    sizeof(struct oosiop_xfer), NULL, BUS_DMA_NOWAIT);
307 		if (err) {
308 			printf(": failed to load xfer block, err=%d\n", err);
309 			return (err);
310 		}
311 
312 		cb->xfer = xfer;
313 
314 		s = splbio();
315 		TAILQ_INSERT_TAIL(&sc->sc_free_cb, cb, chain);
316 		splx(s);
317 
318 		cb++;
319 		xfer++;
320 	}
321 
322 	return (0);
323 }
324 
325 static inline void
326 oosiop_relocate_io(struct oosiop_softc *sc, bus_addr_t addr)
327 {
328 	uint32_t dcmd;
329 	int32_t dsps;
330 
331 	dcmd = le32toh(sc->sc_scr[addr / 4 + 0]);
332 	dsps = le32toh(sc->sc_scr[addr / 4 + 1]);
333 
334 	/* convert relative to absolute */
335 	if (dcmd & 0x04000000) {
336 		dcmd &= ~0x04000000;
337 #if 0
338 		/*
339 		 * sign extension isn't needed here because
340 		 * ncr53cxxx.c generates 32 bit dsps.
341 		 */
342 		dsps <<= 8;
343 		dsps >>= 8;
344 #endif
345 		sc->sc_scr[addr / 4 + 0] = htole32(dcmd);
346 		dsps += addr + 8;
347 	}
348 
349 	sc->sc_scr[addr / 4 + 1] = htole32(dsps + sc->sc_scrbase);
350 }
351 
352 static inline void
353 oosiop_relocate_tc(struct oosiop_softc *sc, bus_addr_t addr)
354 {
355 	uint32_t dcmd;
356 	int32_t dsps;
357 
358 	dcmd = le32toh(sc->sc_scr[addr / 4 + 0]);
359 	dsps = le32toh(sc->sc_scr[addr / 4 + 1]);
360 
361 	/* convert relative to absolute */
362 	if (dcmd & 0x00800000) {
363 		dcmd &= ~0x00800000;
364 		sc->sc_scr[addr / 4] = htole32(dcmd);
365 #if 0
366 		/*
367 		 * sign extension isn't needed here because
368 		 * ncr53cxxx.c generates 32 bit dsps.
369 		 */
370 		dsps <<= 8;
371 		dsps >>= 8;
372 #endif
373 		dsps += addr + 8;
374 	}
375 
376 	sc->sc_scr[addr / 4 + 1] = htole32(dsps + sc->sc_scrbase);
377 }
378 
379 static inline void
380 oosiop_fixup_select(struct oosiop_softc *sc, bus_addr_t addr, int id)
381 {
382 	uint32_t dcmd;
383 
384 	dcmd = le32toh(sc->sc_scr[addr / 4]);
385 	dcmd &= 0xff00ffff;
386 	dcmd |= 0x00010000 << id;
387 	sc->sc_scr[addr / 4] = htole32(dcmd);
388 }
389 
390 static inline void
391 oosiop_fixup_jump(struct oosiop_softc *sc, bus_addr_t addr, bus_addr_t dst)
392 {
393 
394 	sc->sc_scr[addr / 4 + 1] = htole32(dst);
395 }
396 
397 static inline void
398 oosiop_fixup_move(struct oosiop_softc *sc, bus_addr_t addr, bus_size_t dbc,
399     bus_addr_t dsps)
400 {
401 	uint32_t dcmd;
402 
403 	dcmd = le32toh(sc->sc_scr[addr / 4]);
404 	dcmd &= 0xff000000;
405 	dcmd |= dbc & 0x00ffffff;
406 	sc->sc_scr[addr / 4 + 0] = htole32(dcmd);
407 	sc->sc_scr[addr / 4 + 1] = htole32(dsps);
408 }
409 
410 static void
411 oosiop_load_script(struct oosiop_softc *sc)
412 {
413 	int i;
414 
415 	/* load script */
416 	for (i = 0; i < sizeof(oosiop_script) / sizeof(oosiop_script[0]); i++)
417 		sc->sc_scr[i] = htole32(oosiop_script[i]);
418 
419 	/* relocate script */
420 	for (i = 0; i < (sizeof(oosiop_script) / 8); i++) {
421 		switch (oosiop_script[i * 2] >> 27) {
422 		case 0x08:	/* select */
423 		case 0x0a:	/* wait reselect */
424 			oosiop_relocate_io(sc, i * 8);
425 			break;
426 		case 0x10:	/* jump */
427 		case 0x11:	/* call */
428 			oosiop_relocate_tc(sc, i * 8);
429 			break;
430 		}
431 	}
432 
433 	oosiop_fixup_move(sc, Ent_p_resel_msgin_move, 1, sc->sc_reselbuf);
434 	OOSIOP_SCRIPT_SYNC(sc, BUS_DMASYNC_PREWRITE);
435 }
436 
437 static void
438 oosiop_setup_sgdma(struct oosiop_softc *sc, struct oosiop_cb *cb)
439 {
440 	int i, n, off, control;
441 	struct oosiop_xfer *xfer;
442 
443 	OOSIOP_XFERSCR_SYNC(sc, cb,
444 	    BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
445 
446 	off = cb->curdp;
447 	xfer = cb->xfer;
448 	control = cb->xs->xs_control;
449 
450 	if (control & (XS_CTL_DATA_IN | XS_CTL_DATA_OUT)) {
451 		/* Find start segment */
452 		for (i = 0; i < cb->datadma->dm_nsegs; i++) {
453 			if (off < cb->datadma->dm_segs[i].ds_len)
454 				break;
455 			off -= cb->datadma->dm_segs[i].ds_len;
456 		}
457 
458 		/* build MOVE block */
459 		if (control & XS_CTL_DATA_IN) {
460 			n = 0;
461 			while (i < cb->datadma->dm_nsegs) {
462 				xfer->datain_scr[n * 2 + 0] =
463 				    htole32(0x09000000 |
464 				    (cb->datadma->dm_segs[i].ds_len - off));
465 				xfer->datain_scr[n * 2 + 1] =
466 				    htole32(cb->datadma->dm_segs[i].ds_addr +
467 				    off);
468 				n++;
469 				i++;
470 				off = 0;
471 			}
472 			xfer->datain_scr[n * 2 + 0] = htole32(0x80080000);
473 			xfer->datain_scr[n * 2 + 1] =
474 			    htole32(sc->sc_scrbase + Ent_phasedispatch);
475 		}
476 		if (control & XS_CTL_DATA_OUT) {
477 			n = 0;
478 			while (i < cb->datadma->dm_nsegs) {
479 				xfer->dataout_scr[n * 2 + 0] =
480 				    htole32(0x08000000 |
481 				    (cb->datadma->dm_segs[i].ds_len - off));
482 				xfer->dataout_scr[n * 2 + 1] =
483 				    htole32(cb->datadma->dm_segs[i].ds_addr +
484 				    off);
485 				n++;
486 				i++;
487 				off = 0;
488 			}
489 			xfer->dataout_scr[n * 2 + 0] = htole32(0x80080000);
490 			xfer->dataout_scr[n * 2 + 1] =
491 			    htole32(sc->sc_scrbase + Ent_phasedispatch);
492 		}
493 	}
494 	if ((control & XS_CTL_DATA_IN) == 0) {
495 		xfer->datain_scr[0] = htole32(0x98080000);
496 		xfer->datain_scr[1] = htole32(DATAIN_TRAP);
497 	}
498 	if ((control & XS_CTL_DATA_OUT) == 0) {
499 		xfer->dataout_scr[0] = htole32(0x98080000);
500 		xfer->dataout_scr[1] = htole32(DATAOUT_TRAP);
501 	}
502 	OOSIOP_XFERSCR_SYNC(sc, cb,
503 	    BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
504 }
505 
506 /*
507  * Setup DMA pointer into script.
508  */
509 static void
510 oosiop_setup_dma(struct oosiop_softc *sc)
511 {
512 	struct oosiop_cb *cb;
513 	bus_addr_t xferbase;
514 
515 	cb = sc->sc_curcb;
516 	xferbase = cb->xferdma->dm_segs[0].ds_addr;
517 
518 	OOSIOP_SCRIPT_SYNC(sc, BUS_DMASYNC_POSTWRITE);
519 
520 	oosiop_fixup_select(sc, Ent_p_select, cb->id);
521 	oosiop_fixup_jump(sc, Ent_p_datain_jump, xferbase +
522 	    offsetof(struct oosiop_xfer, datain_scr[0]));
523 	oosiop_fixup_jump(sc, Ent_p_dataout_jump, xferbase +
524 	    offsetof(struct oosiop_xfer, dataout_scr[0]));
525 	oosiop_fixup_move(sc, Ent_p_msgin_move, 1, xferbase +
526 	    offsetof(struct oosiop_xfer, msgin[0]));
527 	oosiop_fixup_move(sc, Ent_p_extmsglen_move, 1, xferbase +
528 	    offsetof(struct oosiop_xfer, msgin[1]));
529 	oosiop_fixup_move(sc, Ent_p_msgout_move, cb->msgoutlen, xferbase +
530 	    offsetof(struct oosiop_xfer, msgout[0]));
531 	oosiop_fixup_move(sc, Ent_p_status_move, 1, xferbase +
532 	    offsetof(struct oosiop_xfer, status));
533 	oosiop_fixup_move(sc, Ent_p_cmdout_move, cb->xs->cmdlen,
534 	    cb->cmddma->dm_segs[0].ds_addr);
535 
536 	OOSIOP_SCRIPT_SYNC(sc, BUS_DMASYNC_PREWRITE);
537 }
538 
539 static void
540 oosiop_flush_fifo(struct oosiop_softc *sc)
541 {
542 
543 	oosiop_write_1(sc, OOSIOP_DFIFO, oosiop_read_1(sc, OOSIOP_DFIFO) |
544 	    OOSIOP_DFIFO_FLF);
545 	while ((oosiop_read_1(sc, OOSIOP_CTEST1) & OOSIOP_CTEST1_FMT) !=
546 	    OOSIOP_CTEST1_FMT)
547 		;
548 	oosiop_write_1(sc, OOSIOP_DFIFO, oosiop_read_1(sc, OOSIOP_DFIFO) &
549 	    ~OOSIOP_DFIFO_FLF);
550 }
551 
552 static void
553 oosiop_clear_fifo(struct oosiop_softc *sc)
554 {
555 
556 	oosiop_write_1(sc, OOSIOP_DFIFO, oosiop_read_1(sc, OOSIOP_DFIFO) |
557 	    OOSIOP_DFIFO_CLF);
558 	while ((oosiop_read_1(sc, OOSIOP_CTEST1) & OOSIOP_CTEST1_FMT) !=
559 	    OOSIOP_CTEST1_FMT)
560 		;
561 	oosiop_write_1(sc, OOSIOP_DFIFO, oosiop_read_1(sc, OOSIOP_DFIFO) &
562 	    ~OOSIOP_DFIFO_CLF);
563 }
564 
565 static void
566 oosiop_phasemismatch(struct oosiop_softc *sc)
567 {
568 	struct oosiop_cb *cb;
569 	uint32_t dsp, dbc, n, i, len;
570 	uint8_t dfifo, sstat1;
571 
572 	cb = sc->sc_curcb;
573 	if (cb == NULL)
574 		return;
575 
576 	dsp = oosiop_read_4(sc, OOSIOP_DSP);
577 	dbc = oosiop_read_4(sc, OOSIOP_DBC) & OOSIOP_DBC_MAX;
578 	len = 0;
579 
580 	n = dsp - cb->xferdma->dm_segs[0].ds_addr - 8;
581 	if (n >= offsetof(struct oosiop_xfer, datain_scr[0]) &&
582 	    n < offsetof(struct oosiop_xfer, datain_scr[OOSIOP_NSG * 2])) {
583 		n -= offsetof(struct oosiop_xfer, datain_scr[0]);
584 		n >>= 3;
585 		OOSIOP_DINSCR_SYNC(sc, cb,
586 		    BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
587 		for (i = 0; i <= n; i++)
588 			len += le32toh(cb->xfer->datain_scr[i * 2]) &
589 			    0x00ffffff;
590 		OOSIOP_DINSCR_SYNC(sc, cb,
591 		    BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
592 		/* All data in the chip are already flushed */
593 	} else if (n >= offsetof(struct oosiop_xfer, dataout_scr[0]) &&
594 	    n < offsetof(struct oosiop_xfer, dataout_scr[OOSIOP_NSG * 2])) {
595 		n -= offsetof(struct oosiop_xfer, dataout_scr[0]);
596 		n >>= 3;
597 		OOSIOP_DOUTSCR_SYNC(sc, cb,
598 		    BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
599 		for (i = 0; i <= n; i++)
600 			len += le32toh(cb->xfer->dataout_scr[i * 2]) &
601 			    0x00ffffff;
602 		OOSIOP_DOUTSCR_SYNC(sc, cb,
603 		    BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
604 
605 		dfifo = oosiop_read_1(sc, OOSIOP_DFIFO);
606 		dbc += ((dfifo & OOSIOP_DFIFO_BO) - (dbc & OOSIOP_DFIFO_BO)) &
607 		    OOSIOP_DFIFO_BO;
608 
609 		sstat1 = oosiop_read_1(sc, OOSIOP_SSTAT1);
610 		if (sstat1 & OOSIOP_SSTAT1_OLF)
611 			dbc++;
612 		if ((sc->sc_tgt[cb->id].sxfer != 0) &&
613 		    (sstat1 & OOSIOP_SSTAT1_ORF) != 0)
614 			dbc++;
615 
616 		oosiop_clear_fifo(sc);
617 	} else {
618 		printf("%s: phase mismatch addr=%08x\n",
619 		    device_xname(sc->sc_dev),
620 		    oosiop_read_4(sc, OOSIOP_DSP) - 8);
621 		oosiop_clear_fifo(sc);
622 		return;
623 	}
624 
625 	len -= dbc;
626 	if (len) {
627 		cb->curdp += len;
628 		oosiop_setup_sgdma(sc, cb);
629 	}
630 }
631 
632 static void
633 oosiop_setup_syncxfer(struct oosiop_softc *sc)
634 {
635 	int id;
636 
637 	id = sc->sc_curcb->id;
638 	if (sc->sc_chip != OOSIOP_700)
639 		oosiop_write_1(sc, OOSIOP_SBCL, sc->sc_tgt[id].scf);
640 
641 	oosiop_write_1(sc, OOSIOP_SXFER, sc->sc_tgt[id].sxfer);
642 }
643 
644 static void
645 oosiop_set_syncparam(struct oosiop_softc *sc, int id, int period, int offset)
646 {
647 	int i, p;
648 	struct scsipi_xfer_mode xm;
649 
650 	xm.xm_target = id;
651 	xm.xm_mode = 0;
652 	xm.xm_period = 0;
653 	xm.xm_offset = 0;
654 
655 	if (offset == 0) {
656 		/* Asynchronous */
657 		sc->sc_tgt[id].scf = 0;
658 		sc->sc_tgt[id].sxfer = 0;
659 	} else {
660 		/* Synchronous */
661 		if (sc->sc_chip == OOSIOP_700) {
662 			for (i = 4; i < 12; i++) {
663 				p = oosiop_period(sc, i, sc->sc_ccf);
664 				if (p >= period)
665 					break;
666 			}
667 			if (i == 12) {
668 				printf("%s: target %d period too large\n",
669 				    device_xname(sc->sc_dev), id);
670 				i = 11;	/* XXX */
671 			}
672 			sc->sc_tgt[id].scf = 0;
673 			sc->sc_tgt[id].sxfer = ((i - 4) << 4) | offset;
674 		} else {
675 			for (i = 0; i < NSYNCTBL; i++) {
676 				p = oosiop_period(sc, synctbl[i].tp + 4,
677 				    (synctbl[i].scf + 1) * 5);
678 				if (p >= period)
679 					break;
680 			}
681 			if (i == NSYNCTBL) {
682 				printf("%s: target %d period too large\n",
683 				    device_xname(sc->sc_dev), id);
684 				i = NSYNCTBL - 1;	/* XXX */
685 			}
686 			sc->sc_tgt[id].scf = synctbl[i].scf;
687 			sc->sc_tgt[id].sxfer = (synctbl[i].tp << 4) | offset;
688 		}
689 
690 		xm.xm_mode |= PERIPH_CAP_SYNC;
691 		xm.xm_period = period;
692 		xm.xm_offset = offset;
693 	}
694 
695 	scsipi_async_event(&sc->sc_channel, ASYNC_EVENT_XFER_MODE, &xm);
696 }
697 
698 static void
699 oosiop_minphys(struct buf *bp)
700 {
701 
702 	if (bp->b_bcount > OOSIOP_MAX_XFER)
703 		bp->b_bcount = OOSIOP_MAX_XFER;
704 	minphys(bp);
705 }
706 
707 static void
708 oosiop_scsipi_request(struct scsipi_channel *chan, scsipi_adapter_req_t req,
709     void *arg)
710 {
711 	struct scsipi_xfer *xs;
712 	struct oosiop_softc *sc;
713 	struct oosiop_cb *cb;
714 	struct oosiop_xfer *xfer;
715 	struct scsipi_xfer_mode *xm;
716 	int s, err;
717 
718 	sc = device_private(chan->chan_adapter->adapt_dev);
719 
720 	switch (req) {
721 	case ADAPTER_REQ_RUN_XFER:
722 		xs = arg;
723 
724 		s = splbio();
725 		cb = TAILQ_FIRST(&sc->sc_free_cb);
726 		TAILQ_REMOVE(&sc->sc_free_cb, cb, chain);
727 		splx(s);
728 
729 		cb->xs = xs;
730 		cb->flags = 0;
731 		cb->id = xs->xs_periph->periph_target;
732 		cb->lun = xs->xs_periph->periph_lun;
733 		cb->curdp = 0;
734 		cb->savedp = 0;
735 		xfer = cb->xfer;
736 
737 		/* Setup SCSI command buffer DMA */
738 		err = bus_dmamap_load(sc->sc_dmat, cb->cmddma, xs->cmd,
739 		    xs->cmdlen, NULL, ((xs->xs_control & XS_CTL_NOSLEEP) ?
740 		    BUS_DMA_NOWAIT : BUS_DMA_WAITOK) | BUS_DMA_WRITE);
741 		if (err) {
742 			printf("%s: unable to load cmd DMA map: %d",
743 			    device_xname(sc->sc_dev), err);
744 			xs->error = XS_RESOURCE_SHORTAGE;
745 			TAILQ_INSERT_TAIL(&sc->sc_free_cb, cb, chain);
746 			scsipi_done(xs);
747 			return;
748 		}
749 		bus_dmamap_sync(sc->sc_dmat, cb->cmddma, 0, xs->cmdlen,
750 		    BUS_DMASYNC_PREWRITE);
751 
752 		/* Setup data buffer DMA */
753 		if (xs->xs_control & (XS_CTL_DATA_IN | XS_CTL_DATA_OUT)) {
754 			err = bus_dmamap_load(sc->sc_dmat, cb->datadma,
755 			    xs->data, xs->datalen, NULL,
756 			    ((xs->xs_control & XS_CTL_NOSLEEP) ?
757 			    BUS_DMA_NOWAIT : BUS_DMA_WAITOK) |
758 			    BUS_DMA_STREAMING |
759 			    ((xs->xs_control & XS_CTL_DATA_IN) ? BUS_DMA_READ :
760 			    BUS_DMA_WRITE));
761 			if (err) {
762 				printf("%s: unable to load data DMA map: %d",
763 				    device_xname(sc->sc_dev), err);
764 				xs->error = XS_RESOURCE_SHORTAGE;
765 				bus_dmamap_unload(sc->sc_dmat, cb->cmddma);
766 				TAILQ_INSERT_TAIL(&sc->sc_free_cb, cb, chain);
767 				scsipi_done(xs);
768 				return;
769 			}
770 			bus_dmamap_sync(sc->sc_dmat, cb->datadma,
771 			    0, xs->datalen,
772 			    BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
773 		}
774 
775 		oosiop_setup_sgdma(sc, cb);
776 
777 		/* Setup msgout buffer */
778 		OOSIOP_XFERMSG_SYNC(sc, cb,
779 		   BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
780 		xfer->msgout[0] = MSG_IDENTIFY(cb->lun,
781 		    (xs->xs_control & XS_CTL_REQSENSE) == 0);
782 		cb->msgoutlen = 1;
783 
784 		if (sc->sc_tgt[cb->id].flags & TGTF_SYNCNEG) {
785 			/* Send SDTR */
786 			xfer->msgout[1] = MSG_EXTENDED;
787 			xfer->msgout[2] = MSG_EXT_SDTR_LEN;
788 			xfer->msgout[3] = MSG_EXT_SDTR;
789 			xfer->msgout[4] = sc->sc_minperiod;
790 			xfer->msgout[5] = OOSIOP_MAX_OFFSET;
791 			cb->msgoutlen = 6;
792 			sc->sc_tgt[cb->id].flags &= ~TGTF_SYNCNEG;
793 			sc->sc_tgt[cb->id].flags |= TGTF_WAITSDTR;
794 		}
795 
796 		xfer->status = SCSI_OOSIOP_NOSTATUS;
797 
798 		OOSIOP_XFERMSG_SYNC(sc, cb,
799 		    BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
800 
801 		s = splbio();
802 
803 		TAILQ_INSERT_TAIL(&sc->sc_cbq, cb, chain);
804 
805 		if (!sc->sc_active) {
806 			/* Abort script to start selection */
807 			oosiop_write_1(sc, OOSIOP_ISTAT, OOSIOP_ISTAT_ABRT);
808 		}
809 		if (xs->xs_control & XS_CTL_POLL) {
810 			/* Poll for command completion */
811 			while ((xs->xs_status & XS_STS_DONE) == 0) {
812 				delay(1000);
813 				oosiop_intr(sc);
814 			}
815 		}
816 
817 		splx(s);
818 
819 		return;
820 
821 	case ADAPTER_REQ_GROW_RESOURCES:
822 		return;
823 
824 	case ADAPTER_REQ_SET_XFER_MODE:
825 		xm = arg;
826 		if (xm->xm_mode & PERIPH_CAP_SYNC)
827 			sc->sc_tgt[xm->xm_target].flags |= TGTF_SYNCNEG;
828 		else
829 			oosiop_set_syncparam(sc, xm->xm_target, 0, 0);
830 
831 		return;
832 	}
833 }
834 
835 static void
836 oosiop_done(struct oosiop_softc *sc, struct oosiop_cb *cb)
837 {
838 	struct scsipi_xfer *xs;
839 
840 	xs = cb->xs;
841 	if (cb == sc->sc_curcb)
842 		sc->sc_curcb = NULL;
843 	if (cb == sc->sc_lastcb)
844 		sc->sc_lastcb = NULL;
845 	sc->sc_tgt[cb->id].nexus = NULL;
846 
847 	callout_stop(&xs->xs_callout);
848 
849 	bus_dmamap_sync(sc->sc_dmat, cb->cmddma, 0, xs->cmdlen,
850 	    BUS_DMASYNC_POSTWRITE);
851 	bus_dmamap_unload(sc->sc_dmat, cb->cmddma);
852 
853 	if (xs->datalen > 0) {
854 		bus_dmamap_sync(sc->sc_dmat, cb->datadma, 0, xs->datalen,
855 		    BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
856 		bus_dmamap_unload(sc->sc_dmat, cb->datadma);
857 	}
858 
859 	xs->status = cb->xfer->status;
860 	xs->resid = 0;	/* XXX */
861 
862 	if (cb->flags & CBF_SELTOUT)
863 		xs->error = XS_SELTIMEOUT;
864 	else if (cb->flags & CBF_TIMEOUT)
865 		xs->error = XS_TIMEOUT;
866 	else switch (xs->status) {
867 	case SCSI_OK:
868 		xs->error = XS_NOERROR;
869 		break;
870 
871 	case SCSI_BUSY:
872 	case SCSI_CHECK:
873 		xs->error = XS_BUSY;
874 		break;
875 	case SCSI_OOSIOP_NOSTATUS:
876 		/* the status byte was not updated, cmd was aborted. */
877 		xs->error = XS_SELTIMEOUT;
878 		break;
879 
880 	default:
881 		xs->error = XS_RESET;
882 		break;
883 	}
884 
885 	scsipi_done(xs);
886 
887 	/* Put it on the free list. */
888 	TAILQ_INSERT_TAIL(&sc->sc_free_cb, cb, chain);
889 }
890 
891 static void
892 oosiop_timeout(void *arg)
893 {
894 	struct oosiop_cb *cb;
895 	struct scsipi_periph *periph;
896 	struct oosiop_softc *sc;
897 	int s;
898 
899 	cb = arg;
900 	periph = cb->xs->xs_periph;
901 	sc = device_private(periph->periph_channel->chan_adapter->adapt_dev);
902 	scsipi_printaddr(periph);
903 	printf("timed out\n");
904 
905 	s = splbio();
906 
907 	cb->flags |= CBF_TIMEOUT;
908 	oosiop_done(sc, cb);
909 
910 	splx(s);
911 }
912 
913 static void
914 oosiop_reset(struct oosiop_softc *sc)
915 {
916 	int i, s;
917 
918 	s = splbio();
919 
920 	/* Stop SCRIPTS processor */
921 	oosiop_write_1(sc, OOSIOP_ISTAT, OOSIOP_ISTAT_ABRT);
922 	delay(100);
923 	oosiop_write_1(sc, OOSIOP_ISTAT, 0);
924 
925 	/* Reset the chip */
926 	oosiop_write_1(sc, OOSIOP_DCNTL, sc->sc_dcntl | OOSIOP_DCNTL_RST);
927 	delay(100);
928 	oosiop_write_1(sc, OOSIOP_DCNTL, sc->sc_dcntl);
929 	delay(10000);
930 
931 	/* Set up various chip parameters */
932 	oosiop_write_1(sc, OOSIOP_SCNTL0, OOSIOP_ARB_FULL | OOSIOP_SCNTL0_EPG);
933 	oosiop_write_1(sc, OOSIOP_SCNTL1, OOSIOP_SCNTL1_ESR);
934 	oosiop_write_1(sc, OOSIOP_DCNTL, sc->sc_dcntl);
935 	oosiop_write_1(sc, OOSIOP_DMODE, OOSIOP_DMODE_BL_8);
936 	oosiop_write_1(sc, OOSIOP_SCID, OOSIOP_SCID_VALUE(sc->sc_id));
937 	oosiop_write_1(sc, OOSIOP_DWT, 0xff);	/* Enable DMA timeout */
938 	oosiop_write_1(sc, OOSIOP_CTEST7, 0);
939 	oosiop_write_1(sc, OOSIOP_SXFER, 0);
940 
941 	/* Clear all interrupts */
942 	(void)oosiop_read_1(sc, OOSIOP_SSTAT0);
943 	(void)oosiop_read_1(sc, OOSIOP_SSTAT1);
944 	(void)oosiop_read_1(sc, OOSIOP_DSTAT);
945 
946 	/* Enable interrupts */
947 	oosiop_write_1(sc, OOSIOP_SIEN,
948 	    OOSIOP_SIEN_M_A | OOSIOP_SIEN_STO | OOSIOP_SIEN_SGE |
949 	    OOSIOP_SIEN_UDC | OOSIOP_SIEN_RST | OOSIOP_SIEN_PAR);
950 	oosiop_write_1(sc, OOSIOP_DIEN,
951 	    OOSIOP_DIEN_ABRT | OOSIOP_DIEN_SSI | OOSIOP_DIEN_SIR |
952 	    OOSIOP_DIEN_WTD | OOSIOP_DIEN_IID);
953 
954 	/* Set target state to asynchronous */
955 	for (i = 0; i < OOSIOP_NTGT; i++) {
956 		sc->sc_tgt[i].flags = 0;
957 		sc->sc_tgt[i].scf = 0;
958 		sc->sc_tgt[i].sxfer = 0;
959 	}
960 
961 	splx(s);
962 }
963 
964 static void
965 oosiop_reset_bus(struct oosiop_softc *sc)
966 {
967 	int s, i;
968 
969 	s = splbio();
970 
971 	/* Assert SCSI RST */
972 	oosiop_write_1(sc, OOSIOP_SCNTL1, OOSIOP_SCNTL1_RST);
973 	delay(25);	/* Reset hold time (25us) */
974 	oosiop_write_1(sc, OOSIOP_SCNTL1, 0);
975 
976 	/* Remove all nexuses */
977 	for (i = 0; i < OOSIOP_NTGT; i++) {
978 		if (sc->sc_tgt[i].nexus) {
979 			sc->sc_tgt[i].nexus->xfer->status =
980 			    SCSI_OOSIOP_NOSTATUS; /* XXX */
981 			oosiop_done(sc, sc->sc_tgt[i].nexus);
982 		}
983 	}
984 
985 	sc->sc_curcb = NULL;
986 
987 	delay(250000);	/* Reset to selection (250ms) */
988 
989 	splx(s);
990 }
991 
992 /*
993  * interrupt handler
994  */
995 int
996 oosiop_intr(struct oosiop_softc *sc)
997 {
998 	struct oosiop_cb *cb;
999 	uint32_t dcmd;
1000 	int timeout;
1001 	uint8_t istat, dstat, sstat0;
1002 
1003 	istat = oosiop_read_1(sc, OOSIOP_ISTAT);
1004 
1005 	if ((istat & (OOSIOP_ISTAT_SIP | OOSIOP_ISTAT_DIP)) == 0)
1006 		return (0);
1007 
1008 	sc->sc_nextdsp = Ent_wait_reselect;
1009 
1010 	/* DMA interrupts */
1011 	if (istat & OOSIOP_ISTAT_DIP) {
1012 		oosiop_write_1(sc, OOSIOP_ISTAT, 0);
1013 
1014 		dstat = oosiop_read_1(sc, OOSIOP_DSTAT);
1015 
1016 		if (dstat & OOSIOP_DSTAT_ABRT) {
1017 			sc->sc_nextdsp = oosiop_read_4(sc, OOSIOP_DSP) -
1018 			    sc->sc_scrbase - 8;
1019 
1020 			if (sc->sc_nextdsp == Ent_p_resel_msgin_move &&
1021 			    (oosiop_read_1(sc, OOSIOP_SBCL) & OOSIOP_ACK)) {
1022 				if ((dstat & OOSIOP_DSTAT_DFE) == 0)
1023 					oosiop_flush_fifo(sc);
1024 				sc->sc_nextdsp += 8;
1025 			}
1026 		}
1027 
1028 		if (dstat & OOSIOP_DSTAT_SSI) {
1029 			sc->sc_nextdsp = oosiop_read_4(sc, OOSIOP_DSP) -
1030 			    sc->sc_scrbase;
1031 			printf("%s: single step %08x\n",
1032 			    device_xname(sc->sc_dev), sc->sc_nextdsp);
1033 		}
1034 
1035 		if (dstat & OOSIOP_DSTAT_SIR) {
1036 			if ((dstat & OOSIOP_DSTAT_DFE) == 0)
1037 				oosiop_flush_fifo(sc);
1038 			oosiop_scriptintr(sc);
1039 		}
1040 
1041 		if (dstat & OOSIOP_DSTAT_WTD) {
1042 			printf("%s: DMA time out\n", device_xname(sc->sc_dev));
1043 			oosiop_reset(sc);
1044 		}
1045 
1046 		if (dstat & OOSIOP_DSTAT_IID) {
1047 			dcmd = oosiop_read_4(sc, OOSIOP_DBC);
1048 			if ((dcmd & 0xf8000000) == 0x48000000) {
1049 				printf("%s: REQ asserted on WAIT DISCONNECT\n",
1050 				    device_xname(sc->sc_dev));
1051 				sc->sc_nextdsp = Ent_phasedispatch; /* XXX */
1052 			} else {
1053 				printf("%s: invalid SCRIPTS instruction "
1054 				    "addr=%08x dcmd=%08x dsps=%08x\n",
1055 				    device_xname(sc->sc_dev),
1056 				    oosiop_read_4(sc, OOSIOP_DSP) - 8, dcmd,
1057 				    oosiop_read_4(sc, OOSIOP_DSPS));
1058 				oosiop_reset(sc);
1059 				OOSIOP_SCRIPT_SYNC(sc, BUS_DMASYNC_POSTWRITE);
1060 				oosiop_load_script(sc);
1061 			}
1062 		}
1063 
1064 		if ((dstat & OOSIOP_DSTAT_DFE) == 0)
1065 			oosiop_clear_fifo(sc);
1066 	}
1067 
1068 	/* SCSI interrupts */
1069 	if (istat & OOSIOP_ISTAT_SIP) {
1070 		if (istat & OOSIOP_ISTAT_DIP)
1071 			delay(1);
1072 		sstat0 = oosiop_read_1(sc, OOSIOP_SSTAT0);
1073 
1074 		if (sstat0 & OOSIOP_SSTAT0_M_A) {
1075 			/* SCSI phase mismatch during MOVE operation */
1076 			oosiop_phasemismatch(sc);
1077 			sc->sc_nextdsp = Ent_phasedispatch;
1078 		}
1079 
1080 		if (sstat0 & OOSIOP_SSTAT0_STO) {
1081 			if (sc->sc_curcb) {
1082 				sc->sc_curcb->flags |= CBF_SELTOUT;
1083 				oosiop_done(sc, sc->sc_curcb);
1084 			}
1085 		}
1086 
1087 		if (sstat0 & OOSIOP_SSTAT0_SGE) {
1088 			printf("%s: SCSI gross error\n",
1089 			    device_xname(sc->sc_dev));
1090 			oosiop_reset(sc);
1091 		}
1092 
1093 		if (sstat0 & OOSIOP_SSTAT0_UDC) {
1094 			/* XXX */
1095 			if (sc->sc_curcb) {
1096 				printf("%s: unexpected disconnect\n",
1097 				    device_xname(sc->sc_dev));
1098 				oosiop_done(sc, sc->sc_curcb);
1099 			}
1100 		}
1101 
1102 		if (sstat0 & OOSIOP_SSTAT0_RST)
1103 			oosiop_reset(sc);
1104 
1105 		if (sstat0 & OOSIOP_SSTAT0_PAR)
1106 			printf("%s: parity error\n", device_xname(sc->sc_dev));
1107 	}
1108 
1109 	/* Start next command if available */
1110 	if (sc->sc_nextdsp == Ent_wait_reselect && TAILQ_FIRST(&sc->sc_cbq)) {
1111 		cb = sc->sc_curcb = TAILQ_FIRST(&sc->sc_cbq);
1112 		TAILQ_REMOVE(&sc->sc_cbq, cb, chain);
1113 		sc->sc_tgt[cb->id].nexus = cb;
1114 
1115 		oosiop_setup_dma(sc);
1116 		oosiop_setup_syncxfer(sc);
1117 		sc->sc_lastcb = cb;
1118 		sc->sc_nextdsp = Ent_start_select;
1119 
1120 		/* Schedule timeout */
1121 		if ((cb->xs->xs_control & XS_CTL_POLL) == 0) {
1122 			timeout = mstohz(cb->xs->timeout) + 1;
1123 			callout_reset(&cb->xs->xs_callout, timeout,
1124 			    oosiop_timeout, cb);
1125 		}
1126 	}
1127 
1128 	sc->sc_active = (sc->sc_nextdsp != Ent_wait_reselect);
1129 
1130 	/* Restart script */
1131 	oosiop_write_4(sc, OOSIOP_DSP, sc->sc_nextdsp + sc->sc_scrbase);
1132 
1133 	return (1);
1134 }
1135 
1136 static void
1137 oosiop_scriptintr(struct oosiop_softc *sc)
1138 {
1139 	struct oosiop_cb *cb;
1140 	uint32_t icode;
1141 	uint32_t dsp;
1142 	int i;
1143 	uint8_t sfbr, resid, resmsg;
1144 
1145 	cb = sc->sc_curcb;
1146 	icode = oosiop_read_4(sc, OOSIOP_DSPS);
1147 
1148 	switch (icode) {
1149 	case A_int_done:
1150 		if (cb)
1151 			oosiop_done(sc, cb);
1152 		break;
1153 
1154 	case A_int_msgin:
1155 		if (cb)
1156 			oosiop_msgin(sc, cb);
1157 		break;
1158 
1159 	case A_int_extmsg:
1160 		/* extended message in DMA setup request */
1161 		sfbr = oosiop_read_1(sc, OOSIOP_SFBR);
1162 		OOSIOP_SCRIPT_SYNC(sc, BUS_DMASYNC_POSTWRITE);
1163 		oosiop_fixup_move(sc, Ent_p_extmsgin_move, sfbr,
1164 		    cb->xferdma->dm_segs[0].ds_addr +
1165 		    offsetof(struct oosiop_xfer, msgin[2]));
1166 		OOSIOP_SCRIPT_SYNC(sc, BUS_DMASYNC_PREWRITE);
1167 		sc->sc_nextdsp = Ent_rcv_extmsg;
1168 		break;
1169 
1170 	case A_int_resel:
1171 		/* reselected */
1172 		resid = oosiop_read_1(sc, OOSIOP_SFBR);
1173 		for (i = 0; i < OOSIOP_NTGT; i++)
1174 			if (resid & (1 << i))
1175 				break;
1176 		if (i == OOSIOP_NTGT) {
1177 			printf("%s: missing reselection target id\n",
1178 			    device_xname(sc->sc_dev));
1179 			break;
1180 		}
1181 		sc->sc_resid = i;
1182 		sc->sc_nextdsp = Ent_wait_resel_identify;
1183 
1184 		if (cb) {
1185 			/* Current command was lost arbitration */
1186 			sc->sc_tgt[cb->id].nexus = NULL;
1187 			TAILQ_INSERT_HEAD(&sc->sc_cbq, cb, chain);
1188 			sc->sc_curcb = NULL;
1189 		}
1190 
1191 		break;
1192 
1193 	case A_int_res_id:
1194 		cb = sc->sc_tgt[sc->sc_resid].nexus;
1195 		resmsg = oosiop_read_1(sc, OOSIOP_SFBR);
1196 		if (MSG_ISIDENTIFY(resmsg) && cb &&
1197 		    (resmsg & MSG_IDENTIFY_LUNMASK) == cb->lun) {
1198 			sc->sc_curcb = cb;
1199 			if (cb != sc->sc_lastcb) {
1200 				oosiop_setup_dma(sc);
1201 				oosiop_setup_syncxfer(sc);
1202 				sc->sc_lastcb = cb;
1203 			}
1204 			if (cb->curdp != cb->savedp) {
1205 				cb->curdp = cb->savedp;
1206 				oosiop_setup_sgdma(sc, cb);
1207 			}
1208 			sc->sc_nextdsp = Ent_ack_msgin;
1209 		} else {
1210 			/* Reselection from invalid target */
1211 			oosiop_reset_bus(sc);
1212 		}
1213 		break;
1214 
1215 	case A_int_resfail:
1216 		/* reselect failed */
1217 		break;
1218 
1219 	case A_int_disc:
1220 		/* disconnected */
1221 		sc->sc_curcb = NULL;
1222 		break;
1223 
1224 	case A_int_err:
1225 		/* generic error */
1226 		dsp = oosiop_read_4(sc, OOSIOP_DSP);
1227 		printf("%s: script error at 0x%08x\n",
1228 		    device_xname(sc->sc_dev), dsp - 8);
1229 		sc->sc_curcb = NULL;
1230 		break;
1231 
1232 	case DATAIN_TRAP:
1233 		printf("%s: unexpected datain\n", device_xname(sc->sc_dev));
1234 		/* XXX: need to reset? */
1235 		break;
1236 
1237 	case DATAOUT_TRAP:
1238 		printf("%s: unexpected dataout\n", device_xname(sc->sc_dev));
1239 		/* XXX: need to reset? */
1240 		break;
1241 
1242 	default:
1243 		printf("%s: unknown intr code %08x\n",
1244 		    device_xname(sc->sc_dev), icode);
1245 		break;
1246 	}
1247 }
1248 
1249 static void
1250 oosiop_msgin(struct oosiop_softc *sc, struct oosiop_cb *cb)
1251 {
1252 	struct oosiop_xfer *xfer;
1253 	int msgout;
1254 
1255 	xfer = cb->xfer;
1256 	sc->sc_nextdsp = Ent_ack_msgin;
1257 	msgout = 0;
1258 
1259 	OOSIOP_XFERMSG_SYNC(sc, cb,
1260 	    BUS_DMASYNC_POSTREAD | BUS_DMASYNC_POSTWRITE);
1261 
1262 	switch (xfer->msgin[0]) {
1263 	case MSG_EXTENDED:
1264 		switch (xfer->msgin[2]) {
1265 		case MSG_EXT_SDTR:
1266 			if (sc->sc_tgt[cb->id].flags & TGTF_WAITSDTR) {
1267 				/* Host initiated SDTR */
1268 				sc->sc_tgt[cb->id].flags &= ~TGTF_WAITSDTR;
1269 			} else {
1270 				/* Target initiated SDTR */
1271 				if (xfer->msgin[3] < sc->sc_minperiod)
1272 					xfer->msgin[3] = sc->sc_minperiod;
1273 				if (xfer->msgin[4] > OOSIOP_MAX_OFFSET)
1274 					xfer->msgin[4] = OOSIOP_MAX_OFFSET;
1275 				xfer->msgout[0] = MSG_EXTENDED;
1276 				xfer->msgout[1] = MSG_EXT_SDTR_LEN;
1277 				xfer->msgout[2] = MSG_EXT_SDTR;
1278 				xfer->msgout[3] = xfer->msgin[3];
1279 				xfer->msgout[4] = xfer->msgin[4];
1280 				cb->msgoutlen = 5;
1281 				msgout = 1;
1282 			}
1283 			oosiop_set_syncparam(sc, cb->id, (int)xfer->msgin[3],
1284 			    (int)xfer->msgin[4]);
1285 			oosiop_setup_syncxfer(sc);
1286 			break;
1287 
1288 		default:
1289 			/* Reject message */
1290 			xfer->msgout[0] = MSG_MESSAGE_REJECT;
1291 			cb->msgoutlen = 1;
1292 			msgout = 1;
1293 			break;
1294 		}
1295 		break;
1296 
1297 	case MSG_SAVEDATAPOINTER:
1298 		cb->savedp = cb->curdp;
1299 		break;
1300 
1301 	case MSG_RESTOREPOINTERS:
1302 		if (cb->curdp != cb->savedp) {
1303 			cb->curdp = cb->savedp;
1304 			oosiop_setup_sgdma(sc, cb);
1305 		}
1306 		break;
1307 
1308 	case MSG_MESSAGE_REJECT:
1309 		if (sc->sc_tgt[cb->id].flags & TGTF_WAITSDTR) {
1310 			/* SDTR rejected */
1311 			sc->sc_tgt[cb->id].flags &= ~TGTF_WAITSDTR;
1312 			oosiop_set_syncparam(sc, cb->id, 0, 0);
1313 			oosiop_setup_syncxfer(sc);
1314 		}
1315 		break;
1316 
1317 	default:
1318 		/* Reject message */
1319 		xfer->msgout[0] = MSG_MESSAGE_REJECT;
1320 		cb->msgoutlen = 1;
1321 		msgout = 1;
1322 	}
1323 
1324 	OOSIOP_XFERMSG_SYNC(sc, cb,
1325 	    BUS_DMASYNC_PREREAD | BUS_DMASYNC_PREWRITE);
1326 
1327 	if (msgout) {
1328 		OOSIOP_SCRIPT_SYNC(sc, BUS_DMASYNC_POSTWRITE);
1329 		oosiop_fixup_move(sc, Ent_p_msgout_move, cb->msgoutlen,
1330 		    cb->xferdma->dm_segs[0].ds_addr +
1331 		    offsetof(struct oosiop_xfer, msgout[0]));
1332 		OOSIOP_SCRIPT_SYNC(sc, BUS_DMASYNC_PREWRITE);
1333 		sc->sc_nextdsp = Ent_sendmsg;
1334 	}
1335 }
1336