xref: /freebsd-12.1/sys/dev/isp/isp_sbus.c (revision dfd1ff19)
1 /*-
2  * PCI specific probe and attach routines for Qlogic ISP SCSI adapters.
3  * FreeBSD Version.
4  *
5  * Copyright (c) 1997-2006 by Matthew Jacob
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice immediately at the beginning of the file, without modification,
13  *    this list of conditions, and the following disclaimer.
14  * 2. 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 AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
21  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  */
29 
30 #include <sys/cdefs.h>
31 __FBSDID("$FreeBSD$");
32 
33 #include <sys/param.h>
34 #include <sys/systm.h>
35 #include <sys/bus.h>
36 #include <sys/kernel.h>
37 #include <sys/module.h>
38 #include <sys/resource.h>
39 
40 #include <dev/ofw/ofw_bus.h>
41 
42 #include <machine/bus.h>
43 #include <machine/resource.h>
44 #include <sys/rman.h>
45 #include <sparc64/sbus/sbusvar.h>
46 
47 #include <dev/isp/isp_freebsd.h>
48 
49 static u_int16_t isp_sbus_rd_reg(struct ispsoftc *, int);
50 static void isp_sbus_wr_reg(struct ispsoftc *, int, u_int16_t);
51 static int
52 isp_sbus_rd_isr(struct ispsoftc *, u_int16_t *, u_int16_t *, u_int16_t *);
53 static int isp_sbus_mbxdma(struct ispsoftc *);
54 static int
55 isp_sbus_dmasetup(struct ispsoftc *, XS_T *, ispreq_t *, u_int16_t *, u_int16_t);
56 static void
57 isp_sbus_dmateardown(struct ispsoftc *, XS_T *, u_int16_t);
58 
59 static void isp_sbus_reset1(struct ispsoftc *);
60 static void isp_sbus_dumpregs(struct ispsoftc *, const char *);
61 
62 static struct ispmdvec mdvec = {
63 	isp_sbus_rd_isr,
64 	isp_sbus_rd_reg,
65 	isp_sbus_wr_reg,
66 	isp_sbus_mbxdma,
67 	isp_sbus_dmasetup,
68 	isp_sbus_dmateardown,
69 	NULL,
70 	isp_sbus_reset1,
71 	isp_sbus_dumpregs,
72 	NULL,
73 	BIU_BURST_ENABLE|BIU_PCI_CONF1_FIFO_64
74 };
75 
76 static int isp_sbus_probe (device_t);
77 static int isp_sbus_attach (device_t);
78 
79 
80 struct isp_sbussoftc {
81 	struct ispsoftc			sbus_isp;
82 	device_t			sbus_dev;
83 	struct resource *		sbus_reg;
84 	bus_space_tag_t			sbus_st;
85 	bus_space_handle_t		sbus_sh;
86 	void *				ih;
87 	int16_t				sbus_poff[_NREG_BLKS];
88 	bus_dma_tag_t			dmat;
89 	bus_dmamap_t			*dmaps;
90 	sdparam				sbus_param;
91 	struct ispmdvec			sbus_mdvec;
92 	struct resource *		sbus_ires;
93 };
94 
95 extern ispfwfunc *isp_get_firmware_p;
96 
97 static device_method_t isp_sbus_methods[] = {
98 	/* Device interface */
99 	DEVMETHOD(device_probe,		isp_sbus_probe),
100 	DEVMETHOD(device_attach,	isp_sbus_attach),
101 	{ 0, 0 }
102 };
103 static void isp_sbus_intr(void *);
104 
105 static driver_t isp_sbus_driver = {
106 	"isp", isp_sbus_methods, sizeof (struct isp_sbussoftc)
107 };
108 static devclass_t isp_devclass;
109 DRIVER_MODULE(isp, sbus, isp_sbus_driver, isp_devclass, 0, 0);
110 
111 static int
112 isp_sbus_probe(device_t dev)
113 {
114 	int found = 0;
115 	const char *name = ofw_bus_get_name(dev);
116 	if (strcmp(name, "SUNW,isp") == 0 ||
117 	    strcmp(name, "QLGC,isp") == 0 ||
118 	    strcmp(name, "ptisp") == 0 ||
119 	    strcmp(name, "PTI,ptisp") == 0) {
120 		found++;
121 	}
122 	if (!found)
123 		return (ENXIO);
124 
125 	if (isp_announced == 0 && bootverbose) {
126 		printf("Qlogic ISP Driver, FreeBSD Version %d.%d, "
127 		    "Core Version %d.%d\n",
128 		    ISP_PLATFORM_VERSION_MAJOR, ISP_PLATFORM_VERSION_MINOR,
129 		    ISP_CORE_VERSION_MAJOR, ISP_CORE_VERSION_MINOR);
130 		isp_announced++;
131 	}
132 	return (0);
133 }
134 
135 static int
136 isp_sbus_attach(device_t dev)
137 {
138 	struct resource *regs;
139 	int tval, iqd, isp_debug, role, rid, ispburst, freq;
140 	struct isp_sbussoftc *sbs;
141 	struct ispsoftc *isp = NULL;
142 	int locksetup = 0;
143 
144 	/*
145 	 * Figure out if we're supposed to skip this one.
146 	 * If we are, we actually go to ISP_ROLE_NONE.
147 	 */
148 
149 	tval = 0;
150 	if (resource_int_value(device_get_name(dev), device_get_unit(dev),
151 	    "disable", &tval) == 0 && tval) {
152 		device_printf(dev, "device is disabled\n");
153 		/* but return 0 so the !$)$)*!$*) unit isn't reused */
154 		return (0);
155 	}
156 
157 	role = 0;
158 	if (resource_int_value(device_get_name(dev), device_get_unit(dev),
159 	    "role", &role) == 0 &&
160 	    ((role & ~(ISP_ROLE_INITIATOR|ISP_ROLE_TARGET)) == 0)) {
161 		device_printf(dev, "setting role to 0x%x\n", role);
162 	} else {
163 #ifdef	ISP_TARGET_MODE
164 		role = ISP_ROLE_INITIATOR|ISP_ROLE_TARGET;
165 #else
166 		role = ISP_DEFAULT_ROLES;
167 #endif
168 	}
169 
170 	sbs = malloc(sizeof (*sbs), M_DEVBUF, M_NOWAIT | M_ZERO);
171 	if (sbs == NULL) {
172 		device_printf(dev, "cannot allocate softc\n");
173 		return (ENOMEM);
174 	}
175 
176 	regs = NULL;
177 	iqd = 0;
178 
179 	rid = 0;
180 	regs =
181 	    bus_alloc_resource_any(dev, SYS_RES_MEMORY, &rid, RF_ACTIVE);
182 	if (regs == 0) {
183 		device_printf(dev, "unable to map registers\n");
184 		goto bad;
185 	}
186 	sbs->sbus_dev = dev;
187 	sbs->sbus_reg = regs;
188 	sbs->sbus_st = rman_get_bustag(regs);
189 	sbs->sbus_sh = rman_get_bushandle(regs);
190 	sbs->sbus_mdvec = mdvec;
191 
192 	sbs->sbus_poff[BIU_BLOCK >> _BLK_REG_SHFT] = BIU_REGS_OFF;
193 	sbs->sbus_poff[MBOX_BLOCK >> _BLK_REG_SHFT] = SBUS_MBOX_REGS_OFF;
194 	sbs->sbus_poff[SXP_BLOCK >> _BLK_REG_SHFT] = SBUS_SXP_REGS_OFF;
195 	sbs->sbus_poff[RISC_BLOCK >> _BLK_REG_SHFT] = SBUS_RISC_REGS_OFF;
196 	sbs->sbus_poff[DMA_BLOCK >> _BLK_REG_SHFT] = DMA_REGS_OFF;
197 	isp = &sbs->sbus_isp;
198 	isp->isp_mdvec = &sbs->sbus_mdvec;
199 	isp->isp_bustype = ISP_BT_SBUS;
200 	isp->isp_type = ISP_HA_SCSI_UNKNOWN;
201 	isp->isp_param = &sbs->sbus_param;
202 	isp->isp_revision = 0;	/* XXX */
203 	isp->isp_role = role;
204 	isp->isp_dev = dev;
205 
206 	freq = sbus_get_clockfreq(dev);
207 	if (freq) {
208 		/*
209 		 * Convert from HZ to MHz, rounding up.
210 		 */
211 		freq = (freq + 500000)/1000000;
212 	} else {
213 		freq = 25;
214 	}
215 	sbs->sbus_mdvec.dv_clock = freq << 8;
216 
217 	/*
218 	 * Now figure out what the proper burst sizes, etc., to use.
219 	 * Unfortunately, there is no ddi_dma_burstsizes here which
220 	 * walks up the tree finding the limiting burst size node (if
221 	 * any). We just use what's here for isp.
222 	 */
223 	ispburst = sbus_get_burstsz(dev);
224 	if (ispburst == 0) {
225 		ispburst = SBUS_BURST_32 - 1;
226 	}
227 	sbs->sbus_mdvec.dv_conf1 =  0;
228 	if (ispburst & (1 << 5)) {
229 		sbs->sbus_mdvec.dv_conf1 = BIU_SBUS_CONF1_FIFO_32;
230 	} else if (ispburst & (1 << 4)) {
231 		sbs->sbus_mdvec.dv_conf1 = BIU_SBUS_CONF1_FIFO_16;
232 	} else if (ispburst & (1 << 3)) {
233 		sbs->sbus_mdvec.dv_conf1 =
234 		    BIU_SBUS_CONF1_BURST8 | BIU_SBUS_CONF1_FIFO_8;
235 	}
236 	if (sbs->sbus_mdvec.dv_conf1) {
237 		sbs->sbus_mdvec.dv_conf1 |= BIU_BURST_ENABLE;
238 	}
239 
240 	/*
241 	 * Some early versions of the PTI SBus adapter
242 	 * would fail in trying to download (via poking)
243 	 * FW. We give up on them.
244 	 */
245 	if (strcmp("PTI,ptisp", ofw_bus_get_name(dev)) == 0 ||
246 	    strcmp("ptisp", ofw_bus_get_name(dev)) == 0) {
247 		isp->isp_confopts |= ISP_CFG_NORELOAD;
248 	}
249 
250 	/*
251 	 * We don't trust NVRAM on SBus cards
252 	 */
253 	isp->isp_confopts |= ISP_CFG_NONVRAM;
254 
255 
256 	/*
257 	 * Try and find firmware for this device.
258 	 */
259 
260 	if (isp_get_firmware_p) {
261 		(*isp_get_firmware_p)(0, 0, 0x1000, &sbs->sbus_mdvec.dv_ispfw);
262 	}
263 
264 	iqd = 0;
265 	sbs->sbus_ires = bus_alloc_resource_any(dev, SYS_RES_IRQ, &iqd,
266 	    RF_ACTIVE | RF_SHAREABLE);
267 	if (sbs->sbus_ires == NULL) {
268 		device_printf(dev, "could not allocate interrupt\n");
269 		goto bad;
270 	}
271 
272 	tval = 0;
273         if (resource_int_value(device_get_name(dev), device_get_unit(dev),
274             "fwload_disable", &tval) == 0 && tval != 0) {
275 		isp->isp_confopts |= ISP_CFG_NORELOAD;
276 	}
277 
278 	isp->isp_osinfo.default_id = -1;
279 	if (resource_int_value(device_get_name(dev), device_get_unit(dev),
280             "iid", &tval) == 0) {
281 		isp->isp_osinfo.default_id = tval;
282 		isp->isp_confopts |= ISP_CFG_OWNLOOPID;
283 	}
284 	if (isp->isp_osinfo.default_id == -1) {
285 		/*
286 		 * XXX: should be a way to get properties w/o having
287 		 * XXX: to call OF_xxx functions
288 		 */
289 		isp->isp_osinfo.default_id = 7;
290 	}
291 
292 	isp_debug = 0;
293         (void) resource_int_value(device_get_name(dev), device_get_unit(dev),
294             "debug", &isp_debug);
295 
296 	/* Make sure the lock is set up. */
297 	mtx_init(&isp->isp_osinfo.lock, "isp", NULL, MTX_DEF);
298 	locksetup++;
299 
300 	if (bus_setup_intr(dev, sbs->sbus_ires, ISP_IFLAGS,
301 	    isp_sbus_intr, isp, &sbs->ih)) {
302 		device_printf(dev, "could not setup interrupt\n");
303 		goto bad;
304 	}
305 
306 	/*
307 	 * Set up logging levels.
308 	 */
309 	if (isp_debug) {
310 		isp->isp_dblev = isp_debug;
311 	} else {
312 		isp->isp_dblev = ISP_LOGWARN|ISP_LOGERR;
313 	}
314 	if (bootverbose)
315 		isp->isp_dblev |= ISP_LOGCONFIG|ISP_LOGINFO;
316 
317 	/*
318 	 * Make sure we're in reset state.
319 	 */
320 	ISP_LOCK(isp);
321 	isp_reset(isp);
322 	if (isp->isp_state != ISP_RESETSTATE) {
323 		ISP_UNLOCK(isp);
324 		goto bad;
325 	}
326 	isp_init(isp);
327 	if (isp->isp_role != ISP_ROLE_NONE && isp->isp_state != ISP_INITSTATE) {
328 		isp_uninit(isp);
329 		ISP_UNLOCK(isp);
330 		goto bad;
331 	}
332 	isp_attach(isp);
333 	if (isp->isp_role != ISP_ROLE_NONE && isp->isp_state != ISP_RUNSTATE) {
334 		isp_uninit(isp);
335 		ISP_UNLOCK(isp);
336 		goto bad;
337 	}
338 	/*
339 	 * XXXX: Here is where we might unload the f/w module
340 	 * XXXX: (or decrease the reference count to it).
341 	 */
342 	ISP_UNLOCK(isp);
343 	return (0);
344 
345 bad:
346 
347 	if (sbs && sbs->ih) {
348 		(void) bus_teardown_intr(dev, sbs->sbus_ires, sbs->ih);
349 	}
350 
351 	if (locksetup && isp) {
352 		mtx_destroy(&isp->isp_osinfo.lock);
353 	}
354 
355 	if (sbs && sbs->sbus_ires) {
356 		bus_release_resource(dev, SYS_RES_IRQ, iqd, sbs->sbus_ires);
357 	}
358 
359 
360 	if (regs) {
361 		(void) bus_release_resource(dev, 0, 0, regs);
362 	}
363 
364 	if (sbs) {
365 		if (sbs->sbus_isp.isp_param)
366 			free(sbs->sbus_isp.isp_param, M_DEVBUF);
367 		free(sbs, M_DEVBUF);
368 	}
369 
370 	/*
371 	 * XXXX: Here is where we might unload the f/w module
372 	 * XXXX: (or decrease the reference count to it).
373 	 */
374 	return (ENXIO);
375 }
376 
377 static void
378 isp_sbus_intr(void *arg)
379 {
380 	struct ispsoftc *isp = arg;
381 	u_int16_t isr, sema, mbox;
382 
383 	ISP_LOCK(isp);
384 	isp->isp_intcnt++;
385 	if (ISP_READ_ISR(isp, &isr, &sema, &mbox) == 0) {
386 		isp->isp_intbogus++;
387 	} else {
388 		int iok = isp->isp_osinfo.intsok;
389 		isp->isp_osinfo.intsok = 0;
390 		isp_intr(isp, isr, sema, mbox);
391 		isp->isp_osinfo.intsok = iok;
392 	}
393 	ISP_UNLOCK(isp);
394 }
395 
396 #define	IspVirt2Off(a, x)	\
397 	(((struct isp_sbussoftc *)a)->sbus_poff[((x) & _BLK_REG_MASK) >> \
398 	_BLK_REG_SHFT] + ((x) & 0xff))
399 
400 #define	BXR2(sbc, off)		\
401 	bus_space_read_2(sbc->sbus_st, sbc->sbus_sh, off)
402 
403 static int
404 isp_sbus_rd_isr(struct ispsoftc *isp, u_int16_t *isrp,
405     u_int16_t *semap, u_int16_t *mbp)
406 {
407 	struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
408 	u_int16_t isr, sema;
409 
410 	isr = BXR2(sbc, IspVirt2Off(isp, BIU_ISR));
411 	sema = BXR2(sbc, IspVirt2Off(isp, BIU_SEMA));
412 	isp_prt(isp, ISP_LOGDEBUG3, "ISR 0x%x SEMA 0x%x", isr, sema);
413 	isr &= INT_PENDING_MASK(isp);
414 	sema &= BIU_SEMA_LOCK;
415 	if (isr == 0 && sema == 0) {
416 		return (0);
417 	}
418 	*isrp = isr;
419 	if ((*semap = sema) != 0) {
420 		*mbp = BXR2(sbc, IspVirt2Off(isp, OUTMAILBOX0));
421 	}
422 	return (1);
423 }
424 
425 static u_int16_t
426 isp_sbus_rd_reg(struct ispsoftc *isp, int regoff)
427 {
428 	u_int16_t rval;
429 	struct isp_sbussoftc *sbs = (struct isp_sbussoftc *) isp;
430 	int offset = sbs->sbus_poff[(regoff & _BLK_REG_MASK) >> _BLK_REG_SHFT];
431 	offset += (regoff & 0xff);
432 	rval = bus_space_read_2(sbs->sbus_st, sbs->sbus_sh, offset);
433 	isp_prt(isp, ISP_LOGDEBUG3,
434 	    "isp_sbus_rd_reg(off %x) = %x", regoff, rval);
435 	return (rval);
436 }
437 
438 static void
439 isp_sbus_wr_reg(struct ispsoftc *isp, int regoff, u_int16_t val)
440 {
441 	struct isp_sbussoftc *sbs = (struct isp_sbussoftc *) isp;
442 	int offset = sbs->sbus_poff[(regoff & _BLK_REG_MASK) >> _BLK_REG_SHFT];
443 	offset += (regoff & 0xff);
444 	isp_prt(isp, ISP_LOGDEBUG3,
445 	    "isp_sbus_wr_reg(off %x) = %x", regoff, val);
446 	bus_space_write_2(sbs->sbus_st, sbs->sbus_sh, offset, val);
447 }
448 
449 struct imush {
450 	struct ispsoftc *isp;
451 	int error;
452 };
453 
454 static void imc(void *, bus_dma_segment_t *, int, int);
455 
456 static void
457 imc(void *arg, bus_dma_segment_t *segs, int nseg, int error)
458 {
459 	struct imush *imushp = (struct imush *) arg;
460 	if (error) {
461 		imushp->error = error;
462 	} else {
463 		struct ispsoftc *isp =imushp->isp;
464 		bus_addr_t addr = segs->ds_addr;
465 
466 		isp->isp_rquest_dma = addr;
467 		addr += ISP_QUEUE_SIZE(RQUEST_QUEUE_LEN(isp));
468 		isp->isp_result_dma = addr;
469 	}
470 }
471 
472 /*
473  * Should be BUS_SPACE_MAXSIZE, but MAXPHYS is larger than BUS_SPACE_MAXSIZE
474  */
475 #define ISP_NSEGS ((MAXPHYS / PAGE_SIZE) + 1)
476 
477 static int
478 isp_sbus_mbxdma(struct ispsoftc *isp)
479 {
480 	struct isp_sbussoftc *sbs = (struct isp_sbussoftc *)isp;
481 	caddr_t base;
482 	u_int32_t len;
483 	int i, error, ns;
484 	struct imush im;
485 
486 	/*
487 	 * Already been here? If so, leave...
488 	 */
489 	if (isp->isp_rquest) {
490 		return (0);
491 	}
492 
493 	ISP_UNLOCK(isp);
494 
495 	if (bus_dma_tag_create(NULL, 1, BUS_SPACE_MAXADDR_24BIT+1,
496 	    BUS_SPACE_MAXADDR_32BIT, BUS_SPACE_MAXADDR_32BIT,
497 	    NULL, NULL, BUS_SPACE_MAXSIZE_32BIT, ISP_NSEGS,
498 	    BUS_SPACE_MAXADDR_24BIT, 0, busdma_lock_mutex, &Giant,
499 	    &sbs->dmat)) {
500 		isp_prt(isp, ISP_LOGERR, "could not create master dma tag");
501 		ISP_LOCK(isp);
502 		return(1);
503 	}
504 
505 	len = sizeof (XS_T **) * isp->isp_maxcmds;
506 	isp->isp_xflist = (XS_T **) malloc(len, M_DEVBUF, M_WAITOK | M_ZERO);
507 	if (isp->isp_xflist == NULL) {
508 		isp_prt(isp, ISP_LOGERR, "cannot alloc xflist array");
509 		ISP_LOCK(isp);
510 		return (1);
511 	}
512 	len = sizeof (bus_dmamap_t) * isp->isp_maxcmds;
513 	sbs->dmaps = (bus_dmamap_t *) malloc(len, M_DEVBUF,  M_WAITOK);
514 	if (sbs->dmaps == NULL) {
515 		isp_prt(isp, ISP_LOGERR, "can't alloc dma map storage");
516 		free(isp->isp_xflist, M_DEVBUF);
517 		ISP_LOCK(isp);
518 		return (1);
519 	}
520 
521 	/*
522 	 * Allocate and map the request, result queues, plus FC scratch area.
523 	 */
524 	len = ISP_QUEUE_SIZE(RQUEST_QUEUE_LEN(isp));
525 	len += ISP_QUEUE_SIZE(RESULT_QUEUE_LEN(isp));
526 
527 	ns = (len / PAGE_SIZE) + 1;
528 	if (bus_dma_tag_create(sbs->dmat, QENTRY_LEN, BUS_SPACE_MAXADDR_24BIT+1,
529 	    BUS_SPACE_MAXADDR_32BIT, BUS_SPACE_MAXADDR_32BIT, NULL, NULL,
530 	    len, ns, BUS_SPACE_MAXADDR_24BIT, 0, busdma_lock_mutex, &Giant,
531 	    &isp->isp_cdmat)) {
532 		isp_prt(isp, ISP_LOGERR,
533 		    "cannot create a dma tag for control spaces");
534 		free(sbs->dmaps, M_DEVBUF);
535 		free(isp->isp_xflist, M_DEVBUF);
536 		ISP_LOCK(isp);
537 		return (1);
538 	}
539 
540 	if (bus_dmamem_alloc(isp->isp_cdmat, (void **)&base, BUS_DMA_NOWAIT,
541 	    &isp->isp_cdmap) != 0) {
542 		isp_prt(isp, ISP_LOGERR,
543 		    "cannot allocate %d bytes of CCB memory", len);
544 		bus_dma_tag_destroy(isp->isp_cdmat);
545 		free(isp->isp_xflist, M_DEVBUF);
546 		free(sbs->dmaps, M_DEVBUF);
547 		ISP_LOCK(isp);
548 		return (1);
549 	}
550 
551 	for (i = 0; i < isp->isp_maxcmds; i++) {
552 		error = bus_dmamap_create(sbs->dmat, 0, &sbs->dmaps[i]);
553 		if (error) {
554 			isp_prt(isp, ISP_LOGERR,
555 			    "error %d creating per-cmd DMA maps", error);
556 			while (--i >= 0) {
557 				bus_dmamap_destroy(sbs->dmat, sbs->dmaps[i]);
558 			}
559 			goto bad;
560 		}
561 	}
562 
563 	im.isp = isp;
564 	im.error = 0;
565 	bus_dmamap_load(isp->isp_cdmat, isp->isp_cdmap, base, len, imc, &im, 0);
566 	if (im.error) {
567 		isp_prt(isp, ISP_LOGERR,
568 		    "error %d loading dma map for control areas", im.error);
569 		goto bad;
570 	}
571 
572 	isp->isp_rquest = base;
573 	base += ISP_QUEUE_SIZE(RQUEST_QUEUE_LEN(isp));
574 	ISP_LOCK(isp);
575 	isp->isp_result = base;
576 	return (0);
577 
578 bad:
579 	bus_dmamem_free(isp->isp_cdmat, base, isp->isp_cdmap);
580 	bus_dma_tag_destroy(isp->isp_cdmat);
581 	free(isp->isp_xflist, M_DEVBUF);
582 	free(sbs->dmaps, M_DEVBUF);
583 	ISP_LOCK(isp);
584 	isp->isp_rquest = NULL;
585 	return (1);
586 }
587 
588 typedef struct {
589 	struct ispsoftc *isp;
590 	void *cmd_token;
591 	void *rq;
592 	u_int16_t *nxtip;
593 	u_int16_t optr;
594 	u_int error;
595 } mush_t;
596 
597 #define	MUSHERR_NOQENTRIES	-2
598 
599 
600 static void dma2(void *, bus_dma_segment_t *, int, int);
601 
602 static void
603 dma2(void *arg, bus_dma_segment_t *dm_segs, int nseg, int error)
604 {
605 	mush_t *mp;
606 	struct ispsoftc *isp;
607 	struct ccb_scsiio *csio;
608 	struct isp_sbussoftc *sbs;
609 	bus_dmamap_t *dp;
610 	bus_dma_segment_t *eseg;
611 	ispreq_t *rq;
612 	int seglim, datalen;
613 	u_int16_t nxti;
614 
615 	mp = (mush_t *) arg;
616 	if (error) {
617 		mp->error = error;
618 		return;
619 	}
620 
621 	if (nseg < 1) {
622 		isp_prt(mp->isp, ISP_LOGERR, "bad segment count (%d)", nseg);
623 		mp->error = EFAULT;
624 		return;
625 	}
626 	csio = mp->cmd_token;
627 	isp = mp->isp;
628 	rq = mp->rq;
629 	sbs = (struct isp_sbussoftc *)mp->isp;
630 	dp = &sbs->dmaps[isp_handle_index(rq->req_handle)];
631 	nxti = *mp->nxtip;
632 
633 	if ((csio->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
634 		bus_dmamap_sync(sbs->dmat, *dp, BUS_DMASYNC_PREREAD);
635 	} else {
636 		bus_dmamap_sync(sbs->dmat, *dp, BUS_DMASYNC_PREWRITE);
637 	}
638 
639 	datalen = XS_XFRLEN(csio);
640 
641 	/*
642 	 * We're passed an initial partially filled in entry that
643 	 * has most fields filled in except for data transfer
644 	 * related values.
645 	 *
646 	 * Our job is to fill in the initial request queue entry and
647 	 * then to start allocating and filling in continuation entries
648 	 * until we've covered the entire transfer.
649 	 */
650 
651 	if (csio->cdb_len > 12) {
652 		seglim = 0;
653 	} else {
654 		seglim = ISP_RQDSEG;
655 	}
656 	if ((csio->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
657 		rq->req_flags |= REQFLAG_DATA_IN;
658 	} else {
659 		rq->req_flags |= REQFLAG_DATA_OUT;
660 	}
661 
662 	eseg = dm_segs + nseg;
663 
664 	while (datalen != 0 && rq->req_seg_count < seglim && dm_segs != eseg) {
665 		rq->req_dataseg[rq->req_seg_count].ds_base = dm_segs->ds_addr;
666 		rq->req_dataseg[rq->req_seg_count].ds_count = dm_segs->ds_len;
667 		datalen -= dm_segs->ds_len;
668 		rq->req_seg_count++;
669 		dm_segs++;
670 	}
671 
672 	while (datalen > 0 && dm_segs != eseg) {
673 		u_int16_t onxti;
674 		ispcontreq_t local, *crq = &local, *cqe;
675 
676 		cqe = (ispcontreq_t *) ISP_QUEUE_ENTRY(isp->isp_rquest, nxti);
677 		onxti = nxti;
678 		nxti = ISP_NXT_QENTRY(onxti, RQUEST_QUEUE_LEN(isp));
679 		if (nxti == mp->optr) {
680 			isp_prt(isp, ISP_LOGDEBUG0, "Request Queue Overflow++");
681 			mp->error = MUSHERR_NOQENTRIES;
682 			return;
683 		}
684 		rq->req_header.rqs_entry_count++;
685 		MEMZERO((void *)crq, sizeof (*crq));
686 		crq->req_header.rqs_entry_count = 1;
687 		crq->req_header.rqs_entry_type = RQSTYPE_DATASEG;
688 
689 		seglim = 0;
690 		while (datalen > 0 && seglim < ISP_CDSEG && dm_segs != eseg) {
691 			crq->req_dataseg[seglim].ds_base =
692 			    dm_segs->ds_addr;
693 			crq->req_dataseg[seglim].ds_count =
694 			    dm_segs->ds_len;
695 			rq->req_seg_count++;
696 			dm_segs++;
697 			seglim++;
698 			datalen -= dm_segs->ds_len;
699 		}
700 		isp_put_cont_req(isp, crq, cqe);
701 		MEMORYBARRIER(isp, SYNC_REQUEST, onxti, QENTRY_LEN);
702 	}
703 	*mp->nxtip = nxti;
704 }
705 
706 static int
707 isp_sbus_dmasetup(struct ispsoftc *isp, struct ccb_scsiio *csio, ispreq_t *rq,
708 	u_int16_t *nxtip, u_int16_t optr)
709 {
710 	struct isp_sbussoftc *sbs = (struct isp_sbussoftc *)isp;
711 	ispreq_t *qep;
712 	bus_dmamap_t *dp = NULL;
713 	mush_t mush, *mp;
714 	void (*eptr)(void *, bus_dma_segment_t *, int, int);
715 
716 	qep = (ispreq_t *) ISP_QUEUE_ENTRY(isp->isp_rquest, isp->isp_reqidx);
717 	eptr = dma2;
718 
719 
720 	if ((csio->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_NONE ||
721 	    (csio->dxfer_len == 0)) {
722 		rq->req_seg_count = 1;
723 		goto mbxsync;
724 	}
725 
726 	/*
727 	 * Do a virtual grapevine step to collect info for
728 	 * the callback dma allocation that we have to use...
729 	 */
730 	mp = &mush;
731 	mp->isp = isp;
732 	mp->cmd_token = csio;
733 	mp->rq = rq;
734 	mp->nxtip = nxtip;
735 	mp->optr = optr;
736 	mp->error = 0;
737 
738 	if ((csio->ccb_h.flags & CAM_SCATTER_VALID) == 0) {
739 		if ((csio->ccb_h.flags & CAM_DATA_PHYS) == 0) {
740 			int error, s;
741 			dp = &sbs->dmaps[isp_handle_index(rq->req_handle)];
742 			s = splsoftvm();
743 			error = bus_dmamap_load(sbs->dmat, *dp,
744 			    csio->data_ptr, csio->dxfer_len, eptr, mp, 0);
745 			if (error == EINPROGRESS) {
746 				bus_dmamap_unload(sbs->dmat, *dp);
747 				mp->error = EINVAL;
748 				isp_prt(isp, ISP_LOGERR,
749 				    "deferred dma allocation not supported");
750 			} else if (error && mp->error == 0) {
751 #ifdef	DIAGNOSTIC
752 				isp_prt(isp, ISP_LOGERR,
753 				    "error %d in dma mapping code", error);
754 #endif
755 				mp->error = error;
756 			}
757 			splx(s);
758 		} else {
759 			/* Pointer to physical buffer */
760 			struct bus_dma_segment seg;
761 			seg.ds_addr = (bus_addr_t)csio->data_ptr;
762 			seg.ds_len = csio->dxfer_len;
763 			(*eptr)(mp, &seg, 1, 0);
764 		}
765 	} else {
766 		struct bus_dma_segment *segs;
767 
768 		if ((csio->ccb_h.flags & CAM_DATA_PHYS) != 0) {
769 			isp_prt(isp, ISP_LOGERR,
770 			    "Physical segment pointers unsupported");
771 			mp->error = EINVAL;
772 		} else if ((csio->ccb_h.flags & CAM_SG_LIST_PHYS) == 0) {
773 			isp_prt(isp, ISP_LOGERR,
774 			    "Virtual segment addresses unsupported");
775 			mp->error = EINVAL;
776 		} else {
777 			/* Just use the segments provided */
778 			segs = (struct bus_dma_segment *) csio->data_ptr;
779 			(*eptr)(mp, segs, csio->sglist_cnt, 0);
780 		}
781 	}
782 	if (mp->error) {
783 		int retval = CMD_COMPLETE;
784 		if (mp->error == MUSHERR_NOQENTRIES) {
785 			retval = CMD_EAGAIN;
786 		} else if (mp->error == EFBIG) {
787 			XS_SETERR(csio, CAM_REQ_TOO_BIG);
788 		} else if (mp->error == EINVAL) {
789 			XS_SETERR(csio, CAM_REQ_INVALID);
790 		} else {
791 			XS_SETERR(csio, CAM_UNREC_HBA_ERROR);
792 		}
793 		return (retval);
794 	}
795 mbxsync:
796 	switch (rq->req_header.rqs_entry_type) {
797 	case RQSTYPE_REQUEST:
798 		isp_put_request(isp, rq, qep);
799 		break;
800 	case RQSTYPE_CMDONLY:
801 		isp_put_extended_request(isp, (ispextreq_t *)rq,
802 		    (ispextreq_t *)qep);
803 		break;
804 	}
805 	return (CMD_QUEUED);
806 }
807 
808 static void
809 isp_sbus_dmateardown(struct ispsoftc *isp, XS_T *xs, u_int16_t handle)
810 {
811 	struct isp_sbussoftc *sbs = (struct isp_sbussoftc *)isp;
812 	bus_dmamap_t *dp = &sbs->dmaps[isp_handle_index(handle)];
813 	if ((xs->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN) {
814 		bus_dmamap_sync(sbs->dmat, *dp, BUS_DMASYNC_POSTREAD);
815 	} else {
816 		bus_dmamap_sync(sbs->dmat, *dp, BUS_DMASYNC_POSTWRITE);
817 	}
818 	bus_dmamap_unload(sbs->dmat, *dp);
819 }
820 
821 
822 static void
823 isp_sbus_reset1(struct ispsoftc *isp)
824 {
825 	/* enable interrupts */
826 	ENABLE_INTS(isp);
827 }
828 
829 static void
830 isp_sbus_dumpregs(struct ispsoftc *isp, const char *msg)
831 {
832 	if (msg)
833 		printf("%s: %s\n", device_get_nameunit(isp->isp_dev), msg);
834 	else
835 		printf("%s:\n", device_get_nameunit(isp->isp_dev));
836 	printf("    biu_conf1=%x", ISP_READ(isp, BIU_CONF1));
837 	printf(" biu_icr=%x biu_isr=%x biu_sema=%x ", ISP_READ(isp, BIU_ICR),
838 	    ISP_READ(isp, BIU_ISR), ISP_READ(isp, BIU_SEMA));
839 	printf("risc_hccr=%x\n", ISP_READ(isp, HCCR));
840 
841 
842 	ISP_WRITE(isp, HCCR, HCCR_CMD_PAUSE);
843 	printf("    cdma_conf=%x cdma_sts=%x cdma_fifostat=%x\n",
844 		ISP_READ(isp, CDMA_CONF), ISP_READ(isp, CDMA_STATUS),
845 		ISP_READ(isp, CDMA_FIFO_STS));
846 	printf("    ddma_conf=%x ddma_sts=%x ddma_fifostat=%x\n",
847 		ISP_READ(isp, DDMA_CONF), ISP_READ(isp, DDMA_STATUS),
848 		ISP_READ(isp, DDMA_FIFO_STS));
849 	printf("    sxp_int=%x sxp_gross=%x sxp(scsi_ctrl)=%x\n",
850 		ISP_READ(isp, SXP_INTERRUPT),
851 		ISP_READ(isp, SXP_GROSS_ERR),
852 		ISP_READ(isp, SXP_PINS_CTRL));
853 	ISP_WRITE(isp, HCCR, HCCR_CMD_RELEASE);
854 	printf("    mbox regs: %x %x %x %x %x\n",
855 	    ISP_READ(isp, OUTMAILBOX0), ISP_READ(isp, OUTMAILBOX1),
856 	    ISP_READ(isp, OUTMAILBOX2), ISP_READ(isp, OUTMAILBOX3),
857 	    ISP_READ(isp, OUTMAILBOX4));
858 }
859