isp_sbus.c revision 1.51 1 1.51 eeh /* $NetBSD: isp_sbus.c,v 1.51 2002/03/21 00:16:15 eeh Exp $ */
2 1.30 mjacob /*
3 1.30 mjacob * This driver, which is contained in NetBSD in the files:
4 1.30 mjacob *
5 1.30 mjacob * sys/dev/ic/isp.c
6 1.34 wiz * sys/dev/ic/isp_inline.h
7 1.34 wiz * sys/dev/ic/isp_netbsd.c
8 1.34 wiz * sys/dev/ic/isp_netbsd.h
9 1.34 wiz * sys/dev/ic/isp_target.c
10 1.34 wiz * sys/dev/ic/isp_target.h
11 1.34 wiz * sys/dev/ic/isp_tpublic.h
12 1.34 wiz * sys/dev/ic/ispmbox.h
13 1.34 wiz * sys/dev/ic/ispreg.h
14 1.34 wiz * sys/dev/ic/ispvar.h
15 1.30 mjacob * sys/microcode/isp/asm_sbus.h
16 1.30 mjacob * sys/microcode/isp/asm_1040.h
17 1.30 mjacob * sys/microcode/isp/asm_1080.h
18 1.30 mjacob * sys/microcode/isp/asm_12160.h
19 1.30 mjacob * sys/microcode/isp/asm_2100.h
20 1.30 mjacob * sys/microcode/isp/asm_2200.h
21 1.30 mjacob * sys/pci/isp_pci.c
22 1.30 mjacob * sys/sbus/isp_sbus.c
23 1.30 mjacob *
24 1.30 mjacob * Is being actively maintained by Matthew Jacob (mjacob (at) netbsd.org).
25 1.30 mjacob * This driver also is shared source with FreeBSD, OpenBSD, Linux, Solaris,
26 1.30 mjacob * Linux versions. This tends to be an interesting maintenance problem.
27 1.30 mjacob *
28 1.30 mjacob * Please coordinate with Matthew Jacob on changes you wish to make here.
29 1.30 mjacob */
30 1.1 mrg /*
31 1.1 mrg * SBus specific probe and attach routines for Qlogic ISP SCSI adapters.
32 1.1 mrg *
33 1.35 mjacob * Copyright (c) 1997, 2001 by Matthew Jacob
34 1.1 mrg * NASA AMES Research Center
35 1.1 mrg * All rights reserved.
36 1.1 mrg *
37 1.1 mrg * Redistribution and use in source and binary forms, with or without
38 1.1 mrg * modification, are permitted provided that the following conditions
39 1.1 mrg * are met:
40 1.1 mrg * 1. Redistributions of source code must retain the above copyright
41 1.1 mrg * notice immediately at the beginning of the file, without modification,
42 1.1 mrg * this list of conditions, and the following disclaimer.
43 1.1 mrg * 2. Redistributions in binary form must reproduce the above copyright
44 1.1 mrg * notice, this list of conditions and the following disclaimer in the
45 1.1 mrg * documentation and/or other materials provided with the distribution.
46 1.1 mrg *
47 1.1 mrg * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
48 1.1 mrg * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
49 1.1 mrg * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
50 1.1 mrg * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
51 1.1 mrg * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
52 1.1 mrg * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
53 1.1 mrg * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
54 1.1 mrg * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
55 1.1 mrg * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
56 1.1 mrg * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
57 1.1 mrg * SUCH DAMAGE.
58 1.1 mrg *
59 1.1 mrg */
60 1.47 lukem
61 1.47 lukem #include <sys/cdefs.h>
62 1.51 eeh __KERNEL_RCSID(0, "$NetBSD: isp_sbus.c,v 1.51 2002/03/21 00:16:15 eeh Exp $");
63 1.1 mrg
64 1.1 mrg #include <sys/param.h>
65 1.1 mrg #include <sys/systm.h>
66 1.1 mrg #include <sys/device.h>
67 1.1 mrg #include <sys/kernel.h>
68 1.1 mrg #include <sys/malloc.h>
69 1.1 mrg #include <sys/queue.h>
70 1.48 mjacob #include <dev/ic/isp_netbsd.h>
71 1.28 pk #include <machine/intr.h>
72 1.1 mrg #include <machine/autoconf.h>
73 1.17 mjacob #include <dev/microcode/isp/asm_sbus.h>
74 1.1 mrg #include <dev/sbus/sbusvar.h>
75 1.35 mjacob #include <sys/reboot.h>
76 1.1 mrg
77 1.49 mjacob static void isp_sbus_reset1(struct ispsoftc *);
78 1.42 mjacob static int isp_sbus_intr(void *);
79 1.45 mjacob static int
80 1.45 mjacob isp_sbus_rd_isr(struct ispsoftc *, u_int16_t *, u_int16_t *, u_int16_t *);
81 1.42 mjacob static u_int16_t isp_sbus_rd_reg(struct ispsoftc *, int);
82 1.42 mjacob static void isp_sbus_wr_reg (struct ispsoftc *, int, u_int16_t);
83 1.42 mjacob static int isp_sbus_mbxdma(struct ispsoftc *);
84 1.42 mjacob static int isp_sbus_dmasetup(struct ispsoftc *, XS_T *, ispreq_t *, u_int16_t *,
85 1.42 mjacob u_int16_t);
86 1.42 mjacob static void isp_sbus_dmateardown(struct ispsoftc *, XS_T *, u_int16_t);
87 1.1 mrg
88 1.17 mjacob #ifndef ISP_1000_RISC_CODE
89 1.17 mjacob #define ISP_1000_RISC_CODE NULL
90 1.17 mjacob #endif
91 1.17 mjacob
92 1.1 mrg static struct ispmdvec mdvec = {
93 1.45 mjacob isp_sbus_rd_isr,
94 1.1 mrg isp_sbus_rd_reg,
95 1.1 mrg isp_sbus_wr_reg,
96 1.1 mrg isp_sbus_mbxdma,
97 1.1 mrg isp_sbus_dmasetup,
98 1.1 mrg isp_sbus_dmateardown,
99 1.1 mrg NULL,
100 1.49 mjacob isp_sbus_reset1,
101 1.1 mrg NULL,
102 1.33 mjacob ISP_1000_RISC_CODE
103 1.1 mrg };
104 1.1 mrg
105 1.1 mrg struct isp_sbussoftc {
106 1.1 mrg struct ispsoftc sbus_isp;
107 1.33 mjacob struct sbusdev sbus_sd;
108 1.1 mrg sdparam sbus_dev;
109 1.1 mrg bus_space_tag_t sbus_bustag;
110 1.6 mjacob bus_space_handle_t sbus_reg;
111 1.1 mrg int sbus_node;
112 1.1 mrg int sbus_pri;
113 1.1 mrg struct ispmdvec sbus_mdvec;
114 1.14 mjacob bus_dmamap_t *sbus_dmamap;
115 1.8 mjacob int16_t sbus_poff[_NREG_BLKS];
116 1.1 mrg };
117 1.1 mrg
118 1.1 mrg
119 1.42 mjacob static int isp_match(struct device *, struct cfdata *, void *);
120 1.42 mjacob static void isp_sbus_attach(struct device *, struct device *, void *);
121 1.1 mrg struct cfattach isp_sbus_ca = {
122 1.1 mrg sizeof (struct isp_sbussoftc), isp_match, isp_sbus_attach
123 1.1 mrg };
124 1.1 mrg
125 1.1 mrg static int
126 1.42 mjacob isp_match(struct device *parent, struct cfdata *cf, void *aux)
127 1.1 mrg {
128 1.1 mrg int rv;
129 1.1 mrg #ifdef DEBUG
130 1.1 mrg static int oneshot = 1;
131 1.1 mrg #endif
132 1.1 mrg struct sbus_attach_args *sa = aux;
133 1.1 mrg
134 1.1 mrg rv = (strcmp(cf->cf_driver->cd_name, sa->sa_name) == 0 ||
135 1.1 mrg strcmp("PTI,ptisp", sa->sa_name) == 0 ||
136 1.1 mrg strcmp("ptisp", sa->sa_name) == 0 ||
137 1.1 mrg strcmp("SUNW,isp", sa->sa_name) == 0 ||
138 1.1 mrg strcmp("QLGC,isp", sa->sa_name) == 0);
139 1.1 mrg #ifdef DEBUG
140 1.1 mrg if (rv && oneshot) {
141 1.1 mrg oneshot = 0;
142 1.1 mrg printf("Qlogic ISP Driver, NetBSD (sbus) Platform Version "
143 1.1 mrg "%d.%d Core Version %d.%d\n",
144 1.1 mrg ISP_PLATFORM_VERSION_MAJOR, ISP_PLATFORM_VERSION_MINOR,
145 1.1 mrg ISP_CORE_VERSION_MAJOR, ISP_CORE_VERSION_MINOR);
146 1.1 mrg }
147 1.1 mrg #endif
148 1.1 mrg return (rv);
149 1.1 mrg }
150 1.1 mrg
151 1.20 mjacob
152 1.1 mrg static void
153 1.42 mjacob isp_sbus_attach(struct device *parent, struct device *self, void *aux)
154 1.1 mrg {
155 1.33 mjacob int freq, ispburst, sbusburst;
156 1.1 mrg struct sbus_attach_args *sa = aux;
157 1.1 mrg struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) self;
158 1.1 mrg struct ispsoftc *isp = &sbc->sbus_isp;
159 1.1 mrg
160 1.1 mrg printf(" for %s\n", sa->sa_name);
161 1.1 mrg
162 1.1 mrg sbc->sbus_bustag = sa->sa_bustag;
163 1.16 pk if (sa->sa_nintr != 0)
164 1.16 pk sbc->sbus_pri = sa->sa_pri;
165 1.1 mrg sbc->sbus_mdvec = mdvec;
166 1.1 mrg
167 1.51 eeh if (sa->sa_npromvaddrs) {
168 1.51 eeh sbus_promaddr_to_handle(sa->sa_bustag,
169 1.51 eeh sa->sa_promvaddrs[0], &sbc->sbus_reg);
170 1.1 mrg } else {
171 1.51 eeh if (sbus_bus_map(sa->sa_bustag, sa->sa_slot, sa->sa_offset,
172 1.51 eeh sa->sa_size, 0, &sbc->sbus_reg) != 0) {
173 1.1 mrg printf("%s: cannot map registers\n", self->dv_xname);
174 1.1 mrg return;
175 1.1 mrg }
176 1.1 mrg }
177 1.1 mrg sbc->sbus_node = sa->sa_node;
178 1.1 mrg
179 1.46 eeh freq = PROM_getpropint(sa->sa_node, "clock-frequency", 0);
180 1.1 mrg if (freq) {
181 1.1 mrg /*
182 1.1 mrg * Convert from HZ to MHz, rounding up.
183 1.1 mrg */
184 1.1 mrg freq = (freq + 500000)/1000000;
185 1.1 mrg #if 0
186 1.1 mrg printf("%s: %d MHz\n", self->dv_xname, freq);
187 1.1 mrg #endif
188 1.1 mrg }
189 1.1 mrg sbc->sbus_mdvec.dv_clock = freq;
190 1.5 mjacob
191 1.5 mjacob /*
192 1.33 mjacob * Now figure out what the proper burst sizes, etc., to use.
193 1.33 mjacob * Unfortunately, there is no ddi_dma_burstsizes here which
194 1.33 mjacob * walks up the tree finding the limiting burst size node (if
195 1.33 mjacob * any).
196 1.5 mjacob */
197 1.33 mjacob sbusburst = ((struct sbus_softc *)parent)->sc_burst;
198 1.33 mjacob if (sbusburst == 0)
199 1.33 mjacob sbusburst = SBUS_BURST_32 - 1;
200 1.46 eeh ispburst = PROM_getpropint(sa->sa_node, "burst-sizes", -1);
201 1.33 mjacob if (ispburst == -1) {
202 1.33 mjacob ispburst = sbusburst;
203 1.33 mjacob }
204 1.33 mjacob ispburst &= sbusburst;
205 1.33 mjacob ispburst &= ~(1 << 7);
206 1.33 mjacob ispburst &= ~(1 << 6);
207 1.33 mjacob sbc->sbus_mdvec.dv_conf1 = 0;
208 1.33 mjacob if (ispburst & (1 << 5)) {
209 1.33 mjacob sbc->sbus_mdvec.dv_conf1 = BIU_SBUS_CONF1_FIFO_32;
210 1.33 mjacob } else if (ispburst & (1 << 4)) {
211 1.33 mjacob sbc->sbus_mdvec.dv_conf1 = BIU_SBUS_CONF1_FIFO_16;
212 1.33 mjacob } else if (ispburst & (1 << 3)) {
213 1.33 mjacob sbc->sbus_mdvec.dv_conf1 =
214 1.33 mjacob BIU_SBUS_CONF1_BURST8 | BIU_SBUS_CONF1_FIFO_8;
215 1.33 mjacob }
216 1.33 mjacob if (sbc->sbus_mdvec.dv_conf1) {
217 1.33 mjacob sbc->sbus_mdvec.dv_conf1 |= BIU_BURST_ENABLE;
218 1.33 mjacob }
219 1.1 mrg
220 1.1 mrg /*
221 1.1 mrg * Some early versions of the PTI SBus adapter
222 1.1 mrg * would fail in trying to download (via poking)
223 1.1 mrg * FW. We give up on them.
224 1.1 mrg */
225 1.1 mrg if (strcmp("PTI,ptisp", sa->sa_name) == 0 ||
226 1.1 mrg strcmp("ptisp", sa->sa_name) == 0) {
227 1.20 mjacob sbc->sbus_mdvec.dv_ispfw = NULL;
228 1.1 mrg }
229 1.1 mrg
230 1.1 mrg isp->isp_mdvec = &sbc->sbus_mdvec;
231 1.2 mjacob isp->isp_bustype = ISP_BT_SBUS;
232 1.1 mrg isp->isp_type = ISP_HA_SCSI_UNKNOWN;
233 1.1 mrg isp->isp_param = &sbc->sbus_dev;
234 1.48 mjacob isp->isp_dmatag = sa->sa_dmatag;
235 1.48 mjacob MEMZERO(isp->isp_param, sizeof (sdparam));
236 1.1 mrg
237 1.8 mjacob sbc->sbus_poff[BIU_BLOCK >> _BLK_REG_SHFT] = BIU_REGS_OFF;
238 1.8 mjacob sbc->sbus_poff[MBOX_BLOCK >> _BLK_REG_SHFT] = SBUS_MBOX_REGS_OFF;
239 1.8 mjacob sbc->sbus_poff[SXP_BLOCK >> _BLK_REG_SHFT] = SBUS_SXP_REGS_OFF;
240 1.8 mjacob sbc->sbus_poff[RISC_BLOCK >> _BLK_REG_SHFT] = SBUS_RISC_REGS_OFF;
241 1.8 mjacob sbc->sbus_poff[DMA_BLOCK >> _BLK_REG_SHFT] = DMA_REGS_OFF;
242 1.1 mrg
243 1.35 mjacob /* Establish interrupt channel */
244 1.35 mjacob bus_intr_establish(sbc->sbus_bustag, sbc->sbus_pri, IPL_BIO, 0,
245 1.35 mjacob isp_sbus_intr, sbc);
246 1.35 mjacob sbus_establish(&sbc->sbus_sd, &sbc->sbus_isp.isp_osinfo._dev);
247 1.35 mjacob
248 1.29 mjacob /*
249 1.29 mjacob * Set up logging levels.
250 1.29 mjacob */
251 1.29 mjacob #ifdef ISP_LOGDEFAULT
252 1.29 mjacob isp->isp_dblev = ISP_LOGDEFAULT;
253 1.29 mjacob #else
254 1.35 mjacob isp->isp_dblev = ISP_LOGWARN|ISP_LOGERR;
255 1.35 mjacob if (bootverbose)
256 1.35 mjacob isp->isp_dblev |= ISP_LOGCONFIG|ISP_LOGINFO;
257 1.29 mjacob #ifdef SCSIDEBUG
258 1.29 mjacob isp->isp_dblev |= ISP_LOGDEBUG1|ISP_LOGDEBUG2;
259 1.29 mjacob #endif
260 1.29 mjacob #ifdef DEBUG
261 1.35 mjacob isp->isp_dblev |= ISP_LOGDEBUG0;
262 1.29 mjacob #endif
263 1.29 mjacob #endif
264 1.35 mjacob
265 1.18 mjacob isp->isp_confopts = self->dv_cfdata->cf_flags;
266 1.35 mjacob isp->isp_role = ISP_DEFAULT_ROLES;
267 1.35 mjacob
268 1.21 mjacob /*
269 1.21 mjacob * There's no tool on sparc to set NVRAM for ISPs, so ignore it.
270 1.21 mjacob */
271 1.21 mjacob isp->isp_confopts |= ISP_CFG_NONVRAM;
272 1.1 mrg ISP_LOCK(isp);
273 1.29 mjacob isp->isp_osinfo.no_mbox_ints = 1;
274 1.1 mrg isp_reset(isp);
275 1.1 mrg if (isp->isp_state != ISP_RESETSTATE) {
276 1.1 mrg ISP_UNLOCK(isp);
277 1.1 mrg return;
278 1.1 mrg }
279 1.35 mjacob ENABLE_INTS(isp);
280 1.1 mrg isp_init(isp);
281 1.1 mrg if (isp->isp_state != ISP_INITSTATE) {
282 1.1 mrg isp_uninit(isp);
283 1.1 mrg ISP_UNLOCK(isp);
284 1.1 mrg return;
285 1.1 mrg }
286 1.1 mrg
287 1.1 mrg /*
288 1.1 mrg * do generic attach.
289 1.1 mrg */
290 1.35 mjacob ISP_UNLOCK(isp);
291 1.1 mrg isp_attach(isp);
292 1.1 mrg if (isp->isp_state != ISP_RUNSTATE) {
293 1.35 mjacob ISP_LOCK(isp);
294 1.1 mrg isp_uninit(isp);
295 1.35 mjacob ISP_UNLOCK(isp);
296 1.1 mrg }
297 1.49 mjacob }
298 1.49 mjacob
299 1.49 mjacob
300 1.49 mjacob static void
301 1.49 mjacob isp_sbus_reset1(struct ispsoftc *isp)
302 1.49 mjacob {
303 1.49 mjacob if (isp->isp_osinfo.no_mbox_ints == 0) {
304 1.49 mjacob ENABLE_INTS(isp);
305 1.49 mjacob }
306 1.49 mjacob
307 1.30 mjacob }
308 1.30 mjacob
309 1.30 mjacob static int
310 1.42 mjacob isp_sbus_intr(void *arg)
311 1.30 mjacob {
312 1.45 mjacob u_int16_t isr, sema, mbox;
313 1.45 mjacob struct ispsoftc *isp = arg;
314 1.45 mjacob
315 1.48 mjacob if (ISP_READ_ISR(isp, &isr, &sema, &mbox) == 0) {
316 1.48 mjacob isp->isp_intbogus++;
317 1.48 mjacob return (0);
318 1.48 mjacob } else {
319 1.48 mjacob struct isp_sbussoftc *sbc = arg;
320 1.45 mjacob sbc->sbus_isp.isp_osinfo.onintstack = 1;
321 1.45 mjacob isp_intr(isp, isr, sema, mbox);
322 1.45 mjacob sbc->sbus_isp.isp_osinfo.onintstack = 0;
323 1.45 mjacob return (1);
324 1.45 mjacob }
325 1.45 mjacob }
326 1.45 mjacob
327 1.45 mjacob #define IspVirt2Off(a, x) \
328 1.45 mjacob (((struct isp_sbussoftc *)a)->sbus_poff[((x) & _BLK_REG_MASK) >> \
329 1.45 mjacob _BLK_REG_SHFT] + ((x) & 0xff))
330 1.45 mjacob
331 1.45 mjacob #define BXR2(sbc, off) \
332 1.45 mjacob bus_space_read_2(sbc->sbus_bustag, sbc->sbus_reg, off)
333 1.45 mjacob
334 1.45 mjacob static int
335 1.45 mjacob isp_sbus_rd_isr(struct ispsoftc *isp, u_int16_t *isrp,
336 1.45 mjacob u_int16_t *semap, u_int16_t *mbp)
337 1.45 mjacob {
338 1.45 mjacob struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
339 1.45 mjacob u_int16_t isr, sema;
340 1.45 mjacob
341 1.45 mjacob isr = BXR2(sbc, IspVirt2Off(isp, BIU_ISR));
342 1.45 mjacob sema = BXR2(sbc, IspVirt2Off(isp, BIU_SEMA));
343 1.45 mjacob isp_prt(isp, ISP_LOGDEBUG3, "ISR 0x%x SEMA 0x%x", isr, sema);
344 1.45 mjacob isr &= INT_PENDING_MASK(isp);
345 1.45 mjacob sema &= BIU_SEMA_LOCK;
346 1.45 mjacob if (isr == 0 && sema == 0) {
347 1.45 mjacob return (0);
348 1.45 mjacob }
349 1.45 mjacob *isrp = isr;
350 1.45 mjacob if ((*semap = sema) != 0) {
351 1.45 mjacob *mbp = BXR2(sbc, IspVirt2Off(isp, OUTMAILBOX0));
352 1.45 mjacob }
353 1.45 mjacob return (1);
354 1.1 mrg }
355 1.1 mrg
356 1.1 mrg static u_int16_t
357 1.42 mjacob isp_sbus_rd_reg(struct ispsoftc *isp, int regoff)
358 1.1 mrg {
359 1.1 mrg struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
360 1.8 mjacob int offset = sbc->sbus_poff[(regoff & _BLK_REG_MASK) >> _BLK_REG_SHFT];
361 1.8 mjacob offset += (regoff & 0xff);
362 1.6 mjacob return (bus_space_read_2(sbc->sbus_bustag, sbc->sbus_reg, offset));
363 1.1 mrg }
364 1.1 mrg
365 1.1 mrg static void
366 1.42 mjacob isp_sbus_wr_reg(struct ispsoftc *isp, int regoff, u_int16_t val)
367 1.1 mrg {
368 1.1 mrg struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
369 1.8 mjacob int offset = sbc->sbus_poff[(regoff & _BLK_REG_MASK) >> _BLK_REG_SHFT];
370 1.8 mjacob offset += (regoff & 0xff);
371 1.6 mjacob bus_space_write_2(sbc->sbus_bustag, sbc->sbus_reg, offset, val);
372 1.1 mrg }
373 1.1 mrg
374 1.1 mrg static int
375 1.42 mjacob isp_sbus_mbxdma(struct ispsoftc *isp)
376 1.1 mrg {
377 1.1 mrg struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
378 1.40 mjacob bus_dma_segment_t reqseg, rspseg;
379 1.40 mjacob int reqrs, rsprs, i, progress;
380 1.14 mjacob size_t n;
381 1.12 pk bus_size_t len;
382 1.1 mrg
383 1.14 mjacob if (isp->isp_rquest_dma)
384 1.14 mjacob return (0);
385 1.1 mrg
386 1.44 mjacob n = isp->isp_maxcmds * sizeof (XS_T *);
387 1.29 mjacob isp->isp_xflist = (XS_T **) malloc(n, M_DEVBUF, M_WAITOK);
388 1.14 mjacob if (isp->isp_xflist == NULL) {
389 1.29 mjacob isp_prt(isp, ISP_LOGERR, "cannot alloc xflist array");
390 1.14 mjacob return (1);
391 1.14 mjacob }
392 1.48 mjacob MEMZERO(isp->isp_xflist, n);
393 1.14 mjacob n = sizeof (bus_dmamap_t) * isp->isp_maxcmds;
394 1.14 mjacob sbc->sbus_dmamap = (bus_dmamap_t *) malloc(n, M_DEVBUF, M_WAITOK);
395 1.14 mjacob if (sbc->sbus_dmamap == NULL) {
396 1.14 mjacob free(isp->isp_xflist, M_DEVBUF);
397 1.29 mjacob isp->isp_xflist = NULL;
398 1.29 mjacob isp_prt(isp, ISP_LOGERR, "cannot alloc dmamap array");
399 1.29 mjacob return (1);
400 1.29 mjacob }
401 1.29 mjacob for (i = 0; i < isp->isp_maxcmds; i++) {
402 1.29 mjacob /* Allocate a DMA handle */
403 1.48 mjacob if (bus_dmamap_create(isp->isp_dmatag, MAXPHYS, 1, MAXPHYS, 0,
404 1.29 mjacob BUS_DMA_NOWAIT, &sbc->sbus_dmamap[i]) != 0) {
405 1.29 mjacob isp_prt(isp, ISP_LOGERR, "cmd DMA maps create error");
406 1.29 mjacob break;
407 1.29 mjacob }
408 1.29 mjacob }
409 1.29 mjacob if (i < isp->isp_maxcmds) {
410 1.29 mjacob while (--i >= 0) {
411 1.48 mjacob bus_dmamap_destroy(isp->isp_dmatag,
412 1.48 mjacob sbc->sbus_dmamap[i]);
413 1.29 mjacob }
414 1.29 mjacob free(isp->isp_xflist, M_DEVBUF);
415 1.29 mjacob free(sbc->sbus_dmamap, M_DEVBUF);
416 1.29 mjacob isp->isp_xflist = NULL;
417 1.29 mjacob sbc->sbus_dmamap = NULL;
418 1.14 mjacob return (1);
419 1.14 mjacob }
420 1.29 mjacob
421 1.1 mrg /*
422 1.40 mjacob * Allocate and map the request and response queues
423 1.1 mrg */
424 1.40 mjacob progress = 0;
425 1.29 mjacob len = ISP_QUEUE_SIZE(RQUEST_QUEUE_LEN(isp));
426 1.48 mjacob if (bus_dmamem_alloc(isp->isp_dmatag, len, 0, 0, &reqseg, 1, &reqrs,
427 1.40 mjacob BUS_DMA_NOWAIT)) {
428 1.24 pk goto dmafail;
429 1.24 pk }
430 1.40 mjacob progress++;
431 1.48 mjacob if (bus_dmamem_map(isp->isp_dmatag, &reqseg, reqrs, len,
432 1.41 thorpej (caddr_t *)&isp->isp_rquest, BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) {
433 1.24 pk goto dmafail;
434 1.24 pk }
435 1.40 mjacob progress++;
436 1.48 mjacob if (bus_dmamap_create(isp->isp_dmatag, len, 1, len, 0, BUS_DMA_NOWAIT,
437 1.48 mjacob &isp->isp_rqdmap) != 0) {
438 1.43 mjacob goto dmafail;
439 1.43 mjacob }
440 1.43 mjacob progress++;
441 1.48 mjacob if (bus_dmamap_load(isp->isp_dmatag, isp->isp_rqdmap,
442 1.43 mjacob isp->isp_rquest, len, NULL, BUS_DMA_NOWAIT) != 0) {
443 1.24 pk goto dmafail;
444 1.14 mjacob }
445 1.40 mjacob progress++;
446 1.48 mjacob isp->isp_rquest_dma = isp->isp_rqdmap->dm_segs[0].ds_addr;
447 1.1 mrg
448 1.29 mjacob len = ISP_QUEUE_SIZE(RESULT_QUEUE_LEN(isp));
449 1.48 mjacob if (bus_dmamem_alloc(isp->isp_dmatag, len, 0, 0, &rspseg, 1, &rsprs,
450 1.40 mjacob BUS_DMA_NOWAIT)) {
451 1.24 pk goto dmafail;
452 1.24 pk }
453 1.40 mjacob progress++;
454 1.48 mjacob if (bus_dmamem_map(isp->isp_dmatag, &rspseg, rsprs, len,
455 1.41 thorpej (caddr_t *)&isp->isp_result, BUS_DMA_NOWAIT|BUS_DMA_COHERENT)) {
456 1.24 pk goto dmafail;
457 1.24 pk }
458 1.40 mjacob progress++;
459 1.48 mjacob if (bus_dmamap_create(isp->isp_dmatag, len, 1, len, 0, BUS_DMA_NOWAIT,
460 1.48 mjacob &isp->isp_rsdmap) != 0) {
461 1.43 mjacob goto dmafail;
462 1.43 mjacob }
463 1.43 mjacob progress++;
464 1.48 mjacob if (bus_dmamap_load(isp->isp_dmatag, isp->isp_rsdmap,
465 1.43 mjacob isp->isp_result, len, NULL, BUS_DMA_NOWAIT) != 0) {
466 1.24 pk goto dmafail;
467 1.14 mjacob }
468 1.48 mjacob isp->isp_result_dma = isp->isp_rsdmap->dm_segs[0].ds_addr;
469 1.43 mjacob
470 1.1 mrg return (0);
471 1.24 pk
472 1.24 pk dmafail:
473 1.40 mjacob isp_prt(isp, ISP_LOGERR, "Mailbox DMA Setup Failure");
474 1.40 mjacob
475 1.40 mjacob if (progress >= 8) {
476 1.48 mjacob bus_dmamap_unload(isp->isp_dmatag, isp->isp_rsdmap);
477 1.41 thorpej }
478 1.41 thorpej if (progress >= 7) {
479 1.48 mjacob bus_dmamap_destroy(isp->isp_dmatag, isp->isp_rsdmap);
480 1.43 mjacob }
481 1.43 mjacob if (progress >= 6) {
482 1.48 mjacob bus_dmamem_unmap(isp->isp_dmatag,
483 1.40 mjacob isp->isp_result, ISP_QUEUE_SIZE(RESULT_QUEUE_LEN(isp)));
484 1.40 mjacob }
485 1.43 mjacob if (progress >= 5) {
486 1.48 mjacob bus_dmamem_free(isp->isp_dmatag, &rspseg, rsprs);
487 1.40 mjacob }
488 1.40 mjacob
489 1.40 mjacob if (progress >= 4) {
490 1.48 mjacob bus_dmamap_unload(isp->isp_dmatag, isp->isp_rqdmap);
491 1.41 thorpej }
492 1.41 thorpej if (progress >= 3) {
493 1.48 mjacob bus_dmamap_destroy(isp->isp_dmatag, isp->isp_rqdmap);
494 1.43 mjacob }
495 1.43 mjacob if (progress >= 2) {
496 1.48 mjacob bus_dmamem_unmap(isp->isp_dmatag,
497 1.40 mjacob isp->isp_rquest, ISP_QUEUE_SIZE(RQUEST_QUEUE_LEN(isp)));
498 1.40 mjacob }
499 1.43 mjacob if (progress >= 1) {
500 1.48 mjacob bus_dmamem_free(isp->isp_dmatag, &reqseg, reqrs);
501 1.40 mjacob }
502 1.40 mjacob
503 1.29 mjacob for (i = 0; i < isp->isp_maxcmds; i++) {
504 1.48 mjacob bus_dmamap_destroy(isp->isp_dmatag, sbc->sbus_dmamap[i]);
505 1.29 mjacob }
506 1.24 pk free(sbc->sbus_dmamap, M_DEVBUF);
507 1.24 pk free(isp->isp_xflist, M_DEVBUF);
508 1.29 mjacob isp->isp_xflist = NULL;
509 1.29 mjacob sbc->sbus_dmamap = NULL;
510 1.24 pk return (1);
511 1.1 mrg }
512 1.1 mrg
513 1.1 mrg /*
514 1.14 mjacob * Map a DMA request.
515 1.14 mjacob * We're guaranteed that rq->req_handle is a value from 1 to isp->isp_maxcmds.
516 1.1 mrg */
517 1.1 mrg
518 1.1 mrg static int
519 1.42 mjacob isp_sbus_dmasetup(struct ispsoftc *isp, XS_T *xs, ispreq_t *rq,
520 1.48 mjacob u_int16_t *nxtip, u_int16_t optr)
521 1.1 mrg {
522 1.1 mrg struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
523 1.27 mjacob bus_dmamap_t dmap;
524 1.48 mjacob ispreq_t *qep;
525 1.19 mjacob int cansleep = (xs->xs_control & XS_CTL_NOSLEEP) == 0;
526 1.14 mjacob int in = (xs->xs_control & XS_CTL_DATA_IN) != 0;
527 1.1 mrg
528 1.48 mjacob qep = (ispreq_t *) ISP_QUEUE_ENTRY(isp->isp_rquest, isp->isp_reqidx);
529 1.1 mrg if (xs->datalen == 0) {
530 1.1 mrg rq->req_seg_count = 1;
531 1.14 mjacob goto mbxsync;
532 1.1 mrg }
533 1.27 mjacob
534 1.27 mjacob dmap = sbc->sbus_dmamap[isp_handle_index(rq->req_handle)];
535 1.27 mjacob if (dmap->dm_nsegs != 0) {
536 1.1 mrg panic("%s: dma map already allocated\n", isp->isp_name);
537 1.1 mrg /* NOTREACHED */
538 1.1 mrg }
539 1.48 mjacob if (bus_dmamap_load(isp->isp_dmatag, dmap, xs->data, xs->datalen,
540 1.41 thorpej NULL, (cansleep ? BUS_DMA_WAITOK : BUS_DMA_NOWAIT) |
541 1.41 thorpej BUS_DMA_STREAMING) != 0) {
542 1.1 mrg XS_SETERR(xs, HBA_BOTCH);
543 1.3 mjacob return (CMD_COMPLETE);
544 1.1 mrg }
545 1.27 mjacob
546 1.48 mjacob bus_dmamap_sync(isp->isp_dmatag, dmap, 0, xs->datalen,
547 1.37 mjacob in? BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE);
548 1.27 mjacob
549 1.14 mjacob if (in) {
550 1.1 mrg rq->req_flags |= REQFLAG_DATA_IN;
551 1.1 mrg } else {
552 1.1 mrg rq->req_flags |= REQFLAG_DATA_OUT;
553 1.1 mrg }
554 1.22 mjacob
555 1.27 mjacob if (XS_CDBLEN(xs) > 12) {
556 1.48 mjacob u_int16_t onxti;
557 1.48 mjacob ispcontreq_t local, *crq = &local, *cqe;
558 1.48 mjacob
559 1.48 mjacob onxti = *nxtip;
560 1.48 mjacob cqe = (ispcontreq_t *) ISP_QUEUE_ENTRY(isp->isp_rquest, onxti);
561 1.48 mjacob *nxtip = ISP_NXT_QENTRY(onxti, RQUEST_QUEUE_LEN(isp));
562 1.48 mjacob if (*nxtip == optr) {
563 1.29 mjacob isp_prt(isp, ISP_LOGDEBUG0, "Request Queue Overflow++");
564 1.48 mjacob bus_dmamap_unload(isp->isp_dmatag, dmap);
565 1.27 mjacob XS_SETERR(xs, HBA_BOTCH);
566 1.27 mjacob return (CMD_EAGAIN);
567 1.27 mjacob }
568 1.22 mjacob rq->req_seg_count = 2;
569 1.48 mjacob MEMZERO((void *)crq, sizeof (*crq));
570 1.22 mjacob crq->req_header.rqs_entry_count = 1;
571 1.22 mjacob crq->req_header.rqs_entry_type = RQSTYPE_DATASEG;
572 1.22 mjacob crq->req_dataseg[0].ds_count = xs->datalen;
573 1.48 mjacob crq->req_dataseg[0].ds_base = dmap->dm_segs[0].ds_addr;
574 1.48 mjacob isp_put_cont_req(isp, crq, cqe);
575 1.48 mjacob MEMORYBARRIER(isp, SYNC_REQUEST, onxti, QENTRY_LEN);
576 1.22 mjacob } else {
577 1.48 mjacob rq->req_seg_count = 1;
578 1.22 mjacob rq->req_dataseg[0].ds_count = xs->datalen;
579 1.27 mjacob rq->req_dataseg[0].ds_base = dmap->dm_segs[0].ds_addr;
580 1.22 mjacob }
581 1.22 mjacob
582 1.14 mjacob mbxsync:
583 1.48 mjacob if (XS_CDBLEN(xs) > 12) {
584 1.48 mjacob isp_put_extended_request(isp,
585 1.48 mjacob (ispextreq_t *)rq, (ispextreq_t *) qep);
586 1.48 mjacob } else {
587 1.48 mjacob isp_put_request(isp, rq, qep);
588 1.48 mjacob }
589 1.3 mjacob return (CMD_QUEUED);
590 1.1 mrg }
591 1.1 mrg
592 1.1 mrg static void
593 1.42 mjacob isp_sbus_dmateardown(struct ispsoftc *isp, XS_T *xs, u_int16_t handle)
594 1.1 mrg {
595 1.1 mrg struct isp_sbussoftc *sbc = (struct isp_sbussoftc *) isp;
596 1.27 mjacob bus_dmamap_t dmap;
597 1.27 mjacob
598 1.27 mjacob dmap = sbc->sbus_dmamap[isp_handle_index(handle)];
599 1.27 mjacob
600 1.27 mjacob if (dmap->dm_nsegs == 0) {
601 1.1 mrg panic("%s: dma map not already allocated\n", isp->isp_name);
602 1.1 mrg /* NOTREACHED */
603 1.1 mrg }
604 1.48 mjacob bus_dmamap_sync(isp->isp_dmatag, dmap, 0,
605 1.14 mjacob xs->datalen, (xs->xs_control & XS_CTL_DATA_IN)?
606 1.14 mjacob BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE);
607 1.48 mjacob bus_dmamap_unload(isp->isp_dmatag, dmap);
608 1.1 mrg }
609