isp_netbsd.c revision 1.19 1 1.19 mjacob /* $NetBSD: isp_netbsd.c,v 1.19 1999/12/04 03:04:59 mjacob Exp $ */
2 1.1 mjacob /*
3 1.1 mjacob * Platform (NetBSD) dependent common attachment code for Qlogic adapters.
4 1.15 mjacob * Matthew Jacob <mjacob (at) nas.nasa.gov>
5 1.15 mjacob */
6 1.15 mjacob /*
7 1.15 mjacob * Copyright (C) 1997, 1998, 1999 National Aeronautics & Space Administration
8 1.1 mjacob * All rights reserved.
9 1.1 mjacob *
10 1.1 mjacob * Redistribution and use in source and binary forms, with or without
11 1.1 mjacob * modification, are permitted provided that the following conditions
12 1.1 mjacob * are met:
13 1.1 mjacob * 1. Redistributions of source code must retain the above copyright
14 1.15 mjacob * notice, this list of conditions and the following disclaimer.
15 1.1 mjacob * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 mjacob * notice, this list of conditions and the following disclaimer in the
17 1.1 mjacob * documentation and/or other materials provided with the distribution.
18 1.1 mjacob * 3. The name of the author may not be used to endorse or promote products
19 1.15 mjacob * derived from this software without specific prior written permission
20 1.1 mjacob *
21 1.15 mjacob * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 1.15 mjacob * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 1.15 mjacob * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 1.15 mjacob * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 1.15 mjacob * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 1.15 mjacob * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 1.15 mjacob * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 1.15 mjacob * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 1.15 mjacob * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 1.15 mjacob * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 1.1 mjacob */
32 1.1 mjacob
33 1.1 mjacob #include <dev/ic/isp_netbsd.h>
34 1.17 mjacob #include <sys/scsiio.h>
35 1.1 mjacob
36 1.1 mjacob static void ispminphys __P((struct buf *));
37 1.17 mjacob static int32_t ispcmd_slow __P((ISP_SCSI_XFER_T *));
38 1.1 mjacob static int32_t ispcmd __P((ISP_SCSI_XFER_T *));
39 1.17 mjacob static int
40 1.17 mjacob ispioctl __P((struct scsipi_link *, u_long, caddr_t, int, struct proc *));
41 1.1 mjacob
42 1.1 mjacob static struct scsipi_device isp_dev = { NULL, NULL, NULL, NULL };
43 1.1 mjacob static int isp_poll __P((struct ispsoftc *, ISP_SCSI_XFER_T *, int));
44 1.10 mjacob static void isp_watch __P((void *));
45 1.17 mjacob static void isp_command_requeue __P((void *));
46 1.10 mjacob static void isp_internal_restart __P((void *));
47 1.10 mjacob
48 1.1 mjacob /*
49 1.1 mjacob * Complete attachment of hardware, include subdevices.
50 1.1 mjacob */
51 1.1 mjacob void
52 1.1 mjacob isp_attach(isp)
53 1.1 mjacob struct ispsoftc *isp;
54 1.1 mjacob {
55 1.6 thorpej
56 1.6 thorpej isp->isp_osinfo._adapter.scsipi_minphys = ispminphys;
57 1.17 mjacob isp->isp_osinfo._adapter.scsipi_ioctl = ispioctl;
58 1.6 thorpej
59 1.1 mjacob isp->isp_state = ISP_RUNSTATE;
60 1.1 mjacob isp->isp_osinfo._link.scsipi_scsi.channel = SCSI_CHANNEL_ONLY_ONE;
61 1.1 mjacob isp->isp_osinfo._link.adapter_softc = isp;
62 1.1 mjacob isp->isp_osinfo._link.device = &isp_dev;
63 1.6 thorpej isp->isp_osinfo._link.adapter = &isp->isp_osinfo._adapter;
64 1.17 mjacob isp->isp_osinfo._link.openings = isp->isp_maxcmds;
65 1.18 mjacob TAILQ_INIT(&isp->isp_osinfo.waitq); /* XXX 2nd Bus? */
66 1.1 mjacob
67 1.15 mjacob if (IS_FC(isp)) {
68 1.11 mjacob /*
69 1.11 mjacob * Give it another chance here to come alive...
70 1.11 mjacob */
71 1.17 mjacob isp->isp_osinfo._adapter.scsipi_cmd = ispcmd;
72 1.1 mjacob isp->isp_osinfo._link.scsipi_scsi.max_target = MAX_FC_TARG-1;
73 1.11 mjacob #ifdef ISP2100_SCCLUN
74 1.7 mjacob /*
75 1.7 mjacob * 16 bits worth, but let's be reasonable..
76 1.7 mjacob */
77 1.7 mjacob isp->isp_osinfo._link.scsipi_scsi.max_lun = 255;
78 1.7 mjacob #else
79 1.7 mjacob isp->isp_osinfo._link.scsipi_scsi.max_lun = 15;
80 1.7 mjacob #endif
81 1.19 mjacob /* set below */
82 1.1 mjacob } else {
83 1.14 mjacob sdparam *sdp = isp->isp_param;
84 1.17 mjacob isp->isp_osinfo._adapter.scsipi_cmd = ispcmd_slow;
85 1.1 mjacob isp->isp_osinfo._link.scsipi_scsi.max_target = MAX_TARGETS-1;
86 1.7 mjacob if (isp->isp_bustype == ISP_BT_SBUS) {
87 1.7 mjacob isp->isp_osinfo._link.scsipi_scsi.max_lun = 7;
88 1.7 mjacob } else {
89 1.7 mjacob /*
90 1.7 mjacob * Too much target breakage at present.
91 1.7 mjacob */
92 1.7 mjacob #if 0
93 1.13 mjacob if (isp->isp_fwrev >= ISP_FW_REV(7,55,0))
94 1.7 mjacob isp->isp_osinfo._link.scsipi_scsi.max_lun = 31;
95 1.7 mjacob else
96 1.7 mjacob #endif
97 1.7 mjacob isp->isp_osinfo._link.scsipi_scsi.max_lun = 7;
98 1.7 mjacob }
99 1.1 mjacob isp->isp_osinfo._link.scsipi_scsi.adapter_target =
100 1.14 mjacob sdp->isp_initiator_id;
101 1.17 mjacob isp->isp_osinfo.discovered[0] = 1 << sdp->isp_initiator_id;
102 1.14 mjacob if (IS_12X0(isp)) {
103 1.14 mjacob isp->isp_osinfo._link_b = isp->isp_osinfo._link;
104 1.14 mjacob sdp++;
105 1.18 mjacob isp->isp_osinfo.discovered[1] =
106 1.18 mjacob 1 << sdp->isp_initiator_id;
107 1.14 mjacob isp->isp_osinfo._link_b.scsipi_scsi.adapter_target =
108 1.14 mjacob sdp->isp_initiator_id;
109 1.14 mjacob isp->isp_osinfo._link_b.scsipi_scsi.channel = 1;
110 1.14 mjacob }
111 1.1 mjacob }
112 1.1 mjacob isp->isp_osinfo._link.type = BUS_SCSI;
113 1.8 mjacob
114 1.8 mjacob /*
115 1.10 mjacob * Send a SCSI Bus Reset (used to be done as part of attach,
116 1.10 mjacob * but now left to the OS outer layers).
117 1.10 mjacob */
118 1.14 mjacob if (IS_SCSI(isp)) {
119 1.14 mjacob int bus = 0;
120 1.14 mjacob (void) isp_control(isp, ISPCTL_RESET_BUS, &bus);
121 1.14 mjacob if (IS_12X0(isp)) {
122 1.14 mjacob bus++;
123 1.14 mjacob (void) isp_control(isp, ISPCTL_RESET_BUS, &bus);
124 1.14 mjacob }
125 1.11 mjacob SYS_DELAY(2*1000000);
126 1.19 mjacob } else {
127 1.19 mjacob int i, j;
128 1.19 mjacob fcparam *fcp = isp->isp_param;
129 1.19 mjacob delay(2 * 1000000);
130 1.19 mjacob for (j = 0; j < 5; j++) {
131 1.19 mjacob for (i = 0; i < 5; i++) {
132 1.19 mjacob if (isp_control(isp, ISPCTL_FCLINK_TEST, NULL))
133 1.19 mjacob continue;
134 1.19 mjacob #ifdef ISP2100_FABRIC
135 1.19 mjacob /*
136 1.19 mjacob * Wait extra time to see if the f/w
137 1.19 mjacob * eventually completed an FLOGI that
138 1.19 mjacob * will allow us to know we're on a
139 1.19 mjacob * fabric.
140 1.19 mjacob */
141 1.19 mjacob if (fcp->isp_onfabric == 0) {
142 1.19 mjacob delay(1 * 1000000);
143 1.19 mjacob continue;
144 1.19 mjacob }
145 1.19 mjacob #endif
146 1.19 mjacob break;
147 1.19 mjacob }
148 1.19 mjacob if (fcp->isp_fwstate == FW_READY &&
149 1.19 mjacob fcp->isp_loopstate >= LOOP_PDB_RCVD) {
150 1.19 mjacob break;
151 1.19 mjacob }
152 1.19 mjacob }
153 1.19 mjacob isp->isp_osinfo._link.scsipi_scsi.adapter_target =
154 1.19 mjacob fcp->isp_loopid;
155 1.11 mjacob }
156 1.10 mjacob
157 1.10 mjacob /*
158 1.8 mjacob * Start the watchdog.
159 1.8 mjacob */
160 1.8 mjacob isp->isp_dogactive = 1;
161 1.17 mjacob timeout(isp_watch, isp, WATCH_INTERVAL * hz);
162 1.8 mjacob
163 1.8 mjacob /*
164 1.8 mjacob * And attach children (if any).
165 1.8 mjacob */
166 1.1 mjacob config_found((void *)isp, &isp->isp_osinfo._link, scsiprint);
167 1.14 mjacob if (IS_12X0(isp)) {
168 1.14 mjacob config_found((void *)isp, &isp->isp_osinfo._link_b, scsiprint);
169 1.14 mjacob }
170 1.1 mjacob }
171 1.1 mjacob
172 1.1 mjacob /*
173 1.1 mjacob * minphys our xfers
174 1.1 mjacob *
175 1.1 mjacob * Unfortunately, the buffer pointer describes the target device- not the
176 1.1 mjacob * adapter device, so we can't use the pointer to find out what kind of
177 1.1 mjacob * adapter we are and adjust accordingly.
178 1.1 mjacob */
179 1.1 mjacob
180 1.1 mjacob static void
181 1.1 mjacob ispminphys(bp)
182 1.1 mjacob struct buf *bp;
183 1.1 mjacob {
184 1.1 mjacob /*
185 1.1 mjacob * XX: Only the 1020 has a 24 bit limit.
186 1.1 mjacob */
187 1.1 mjacob if (bp->b_bcount >= (1 << 24)) {
188 1.1 mjacob bp->b_bcount = (1 << 24);
189 1.1 mjacob }
190 1.1 mjacob minphys(bp);
191 1.1 mjacob }
192 1.1 mjacob
193 1.17 mjacob static int32_t
194 1.17 mjacob ispcmd_slow(xs)
195 1.1 mjacob ISP_SCSI_XFER_T *xs;
196 1.1 mjacob {
197 1.19 mjacob sdparam *sdp;
198 1.19 mjacob int tgt, chan;
199 1.19 mjacob u_int16_t f;
200 1.19 mjacob struct ispsoftc *isp = XS_ISP(xs);
201 1.19 mjacob
202 1.19 mjacob /*
203 1.19 mjacob * Have we completed discovery for this target on this adapter?
204 1.19 mjacob */
205 1.19 mjacob sdp = isp->isp_param;
206 1.19 mjacob sdp += chan;
207 1.19 mjacob tgt = XS_TGT(xs);
208 1.19 mjacob chan = XS_CHANNEL(xs);
209 1.19 mjacob if ((xs->xs_control & XS_CTL_DISCOVERY) != 0 ||
210 1.19 mjacob (isp->isp_osinfo.discovered[chan] & (1 << tgt)) != 0) {
211 1.19 mjacob return (ispcmd(xs));
212 1.19 mjacob }
213 1.19 mjacob
214 1.19 mjacob f = DPARM_DEFAULT;
215 1.19 mjacob if (xs->sc_link->quirks & SDEV_NOSYNC) {
216 1.19 mjacob f ^= DPARM_SYNC;
217 1.19 mjacob #ifdef DEBUG
218 1.19 mjacob } else {
219 1.19 mjacob printf("%s: channel %d target %d can do SYNC xfers\n",
220 1.19 mjacob isp->isp_name, chan, tgt);
221 1.19 mjacob #endif
222 1.19 mjacob }
223 1.19 mjacob if (xs->sc_link->quirks & SDEV_NOWIDE) {
224 1.19 mjacob f ^= DPARM_WIDE;
225 1.19 mjacob #ifdef DEBUG
226 1.19 mjacob } else {
227 1.19 mjacob printf("%s: channel %d target %d can do WIDE xfers\n",
228 1.19 mjacob isp->isp_name, chan, tgt);
229 1.19 mjacob #endif
230 1.19 mjacob }
231 1.19 mjacob if (xs->sc_link->quirks & SDEV_NOTAG) {
232 1.19 mjacob f ^= DPARM_TQING;
233 1.19 mjacob #ifdef DEBUG
234 1.19 mjacob } else {
235 1.19 mjacob printf("%s: channel %d target %d can do TAGGED xfers\n",
236 1.19 mjacob isp->isp_name, chan, tgt);
237 1.19 mjacob #endif
238 1.19 mjacob }
239 1.19 mjacob /*
240 1.19 mjacob * Okay, we know about this device now,
241 1.19 mjacob * so mark parameters to be updated for it.
242 1.19 mjacob */
243 1.19 mjacob sdp->isp_devparam[tgt].dev_flags = f;
244 1.19 mjacob sdp->isp_devparam[tgt].dev_update = 1;
245 1.19 mjacob isp->isp_update |= (1 << chan);
246 1.19 mjacob
247 1.3 mjacob /*
248 1.19 mjacob * Now check to see whether we can get out of this checking mode now.
249 1.19 mjacob * XXX: WE CANNOT AS YET BECAUSE THERE IS NO MECHANISM TO TELL US
250 1.19 mjacob * XXX: WHEN WE'RE DONE DISCOVERY BECAUSE WE NEED ONE COMMAND AFTER
251 1.19 mjacob * XXX: DISCOVERY IS DONE FOR EACH TARGET TO TELL US THAT WE'RE DONE
252 1.19 mjacob * XXX: AND THAT DOESN'T HAPPEN HERE. AT BEST WE CAN MARK OURSELVES
253 1.19 mjacob * XXX: DONE WITH DISCOVERY FOR THIS TARGET AND SO SAVE MAYBE 20
254 1.19 mjacob * XXX: LINES OF C CODE.
255 1.3 mjacob */
256 1.19 mjacob isp->isp_osinfo.discovered[chan] |= (1 << tgt);
257 1.19 mjacob /* do not bother with these lines- they'll never execute correctly */
258 1.19 mjacob #if 0
259 1.19 mjacob sdp = isp->isp_param;
260 1.19 mjacob for (chan = 0; chan < (IS_12X0(isp)? 2 : 1); chan++, sdp++) {
261 1.19 mjacob f = 0xffff & ~(1 << sdp->isp_initiator_id);
262 1.19 mjacob if (isp->isp_osinfo.discovered[chan] != f) {
263 1.19 mjacob break;
264 1.3 mjacob }
265 1.17 mjacob }
266 1.19 mjacob if (chan == (IS_12X0(isp)? 2 : 1)) {
267 1.19 mjacob CFGPRINTF("%s: allowing sync/wide negotiation and "
268 1.19 mjacob "tag usage\n", isp->isp_name);
269 1.19 mjacob isp->isp_osinfo._adapter.scsipi_cmd = ispcmd;
270 1.19 mjacob if (IS_12X0(isp))
271 1.19 mjacob isp->isp_update |= 2;
272 1.19 mjacob }
273 1.19 mjacob #endif
274 1.17 mjacob return (ispcmd(xs));
275 1.17 mjacob }
276 1.17 mjacob
277 1.17 mjacob static int
278 1.17 mjacob ispioctl(sc_link, cmd, addr, flag, p)
279 1.17 mjacob struct scsipi_link *sc_link;
280 1.17 mjacob u_long cmd;
281 1.17 mjacob caddr_t addr;
282 1.17 mjacob int flag;
283 1.17 mjacob struct proc *p;
284 1.17 mjacob {
285 1.17 mjacob struct ispsoftc *isp = sc_link->adapter_softc;
286 1.17 mjacob int s, chan, retval = ENOTTY;
287 1.17 mjacob
288 1.17 mjacob switch (cmd) {
289 1.17 mjacob case SCBUSIORESET:
290 1.17 mjacob chan = sc_link->scsipi_scsi.channel;
291 1.17 mjacob s = splbio();
292 1.17 mjacob if (isp_control(isp, ISPCTL_RESET_BUS, &chan))
293 1.17 mjacob retval = EIO;
294 1.17 mjacob else
295 1.17 mjacob retval = 0;
296 1.17 mjacob (void) splx(s);
297 1.17 mjacob break;
298 1.17 mjacob default:
299 1.17 mjacob break;
300 1.3 mjacob }
301 1.17 mjacob return (retval);
302 1.17 mjacob }
303 1.17 mjacob
304 1.17 mjacob
305 1.17 mjacob static int32_t
306 1.17 mjacob ispcmd(xs)
307 1.17 mjacob ISP_SCSI_XFER_T *xs;
308 1.17 mjacob {
309 1.17 mjacob struct ispsoftc *isp;
310 1.17 mjacob int result, s;
311 1.11 mjacob
312 1.17 mjacob isp = XS_ISP(xs);
313 1.17 mjacob s = splbio();
314 1.11 mjacob if (isp->isp_state < ISP_RUNSTATE) {
315 1.11 mjacob DISABLE_INTS(isp);
316 1.11 mjacob isp_init(isp);
317 1.11 mjacob if (isp->isp_state != ISP_INITSTATE) {
318 1.11 mjacob ENABLE_INTS(isp);
319 1.11 mjacob (void) splx(s);
320 1.11 mjacob XS_SETERR(xs, HBA_BOTCH);
321 1.17 mjacob return (COMPLETE);
322 1.11 mjacob }
323 1.11 mjacob isp->isp_state = ISP_RUNSTATE;
324 1.11 mjacob ENABLE_INTS(isp);
325 1.11 mjacob }
326 1.11 mjacob
327 1.10 mjacob /*
328 1.10 mjacob * Check for queue blockage...
329 1.10 mjacob */
330 1.10 mjacob if (isp->isp_osinfo.blocked) {
331 1.16 thorpej if (xs->xs_control & XS_CTL_POLL) {
332 1.10 mjacob xs->error = XS_DRIVER_STUFFUP;
333 1.10 mjacob splx(s);
334 1.10 mjacob return (TRY_AGAIN_LATER);
335 1.10 mjacob }
336 1.10 mjacob TAILQ_INSERT_TAIL(&isp->isp_osinfo.waitq, xs, adapter_q);
337 1.10 mjacob splx(s);
338 1.17 mjacob return (SUCCESSFULLY_QUEUED);
339 1.10 mjacob }
340 1.11 mjacob DISABLE_INTS(isp);
341 1.3 mjacob result = ispscsicmd(xs);
342 1.11 mjacob ENABLE_INTS(isp);
343 1.17 mjacob
344 1.17 mjacob if ((xs->xs_control & XS_CTL_POLL) == 0) {
345 1.17 mjacob switch (result) {
346 1.17 mjacob case CMD_QUEUED:
347 1.17 mjacob result = SUCCESSFULLY_QUEUED;
348 1.17 mjacob break;
349 1.17 mjacob case CMD_EAGAIN:
350 1.17 mjacob result = TRY_AGAIN_LATER;
351 1.17 mjacob break;
352 1.17 mjacob case CMD_RQLATER:
353 1.17 mjacob result = SUCCESSFULLY_QUEUED;
354 1.17 mjacob timeout(isp_command_requeue, xs, hz);
355 1.17 mjacob break;
356 1.17 mjacob case CMD_COMPLETE:
357 1.17 mjacob result = COMPLETE;
358 1.17 mjacob break;
359 1.17 mjacob }
360 1.10 mjacob (void) splx(s);
361 1.3 mjacob return (result);
362 1.1 mjacob }
363 1.1 mjacob
364 1.17 mjacob switch (result) {
365 1.17 mjacob case CMD_QUEUED:
366 1.17 mjacob result = SUCCESSFULLY_QUEUED;
367 1.17 mjacob break;
368 1.17 mjacob case CMD_RQLATER:
369 1.17 mjacob case CMD_EAGAIN:
370 1.17 mjacob if (XS_NOERR(xs)) {
371 1.17 mjacob xs->error = XS_DRIVER_STUFFUP;
372 1.17 mjacob }
373 1.17 mjacob result = TRY_AGAIN_LATER;
374 1.17 mjacob break;
375 1.17 mjacob case CMD_COMPLETE:
376 1.17 mjacob result = COMPLETE;
377 1.17 mjacob break;
378 1.17 mjacob
379 1.17 mjacob }
380 1.1 mjacob /*
381 1.1 mjacob * If we can't use interrupts, poll on completion.
382 1.1 mjacob */
383 1.17 mjacob if (result == SUCCESSFULLY_QUEUED) {
384 1.17 mjacob if (isp_poll(isp, xs, XS_TIME(xs))) {
385 1.17 mjacob /*
386 1.17 mjacob * If no other error occurred but we didn't finish,
387 1.17 mjacob * something bad happened.
388 1.17 mjacob */
389 1.17 mjacob if (XS_IS_CMD_DONE(xs) == 0) {
390 1.17 mjacob if (isp_control(isp, ISPCTL_ABORT_CMD, xs)) {
391 1.17 mjacob isp_restart(isp);
392 1.17 mjacob }
393 1.17 mjacob if (XS_NOERR(xs)) {
394 1.17 mjacob XS_SETERR(xs, HBA_BOTCH);
395 1.17 mjacob }
396 1.1 mjacob }
397 1.1 mjacob }
398 1.17 mjacob result = COMPLETE;
399 1.1 mjacob }
400 1.10 mjacob (void) splx(s);
401 1.17 mjacob return (result);
402 1.1 mjacob }
403 1.1 mjacob
404 1.1 mjacob static int
405 1.1 mjacob isp_poll(isp, xs, mswait)
406 1.1 mjacob struct ispsoftc *isp;
407 1.1 mjacob ISP_SCSI_XFER_T *xs;
408 1.1 mjacob int mswait;
409 1.1 mjacob {
410 1.1 mjacob
411 1.1 mjacob while (mswait) {
412 1.1 mjacob /* Try the interrupt handling routine */
413 1.1 mjacob (void)isp_intr((void *)isp);
414 1.1 mjacob
415 1.1 mjacob /* See if the xs is now done */
416 1.1 mjacob if (XS_IS_CMD_DONE(xs)) {
417 1.1 mjacob return (0);
418 1.1 mjacob }
419 1.1 mjacob SYS_DELAY(1000); /* wait one millisecond */
420 1.1 mjacob mswait--;
421 1.1 mjacob }
422 1.1 mjacob return (1);
423 1.8 mjacob }
424 1.8 mjacob
425 1.8 mjacob static void
426 1.8 mjacob isp_watch(arg)
427 1.8 mjacob void *arg;
428 1.8 mjacob {
429 1.8 mjacob int i;
430 1.8 mjacob struct ispsoftc *isp = arg;
431 1.17 mjacob struct scsipi_xfer *xs;
432 1.17 mjacob int s;
433 1.8 mjacob
434 1.8 mjacob /*
435 1.8 mjacob * Look for completely dead commands (but not polled ones).
436 1.8 mjacob */
437 1.17 mjacob s = splbio();
438 1.17 mjacob for (i = 0; i < isp->isp_maxcmds; i++) {
439 1.17 mjacob xs = isp->isp_xflist[i];
440 1.17 mjacob if (xs == NULL) {
441 1.8 mjacob continue;
442 1.8 mjacob }
443 1.17 mjacob if (xs->timeout == 0 || (xs->xs_control & XS_CTL_POLL)) {
444 1.8 mjacob continue;
445 1.8 mjacob }
446 1.17 mjacob xs->timeout -= (WATCH_INTERVAL * 1000);
447 1.8 mjacob /*
448 1.8 mjacob * Avoid later thinking that this
449 1.8 mjacob * transaction is not being timed.
450 1.8 mjacob * Then give ourselves to watchdog
451 1.8 mjacob * periods of grace.
452 1.8 mjacob */
453 1.17 mjacob if (xs->timeout == 0) {
454 1.17 mjacob xs->timeout = 1;
455 1.17 mjacob } else if (xs->timeout > -(2 * WATCH_INTERVAL * 1000)) {
456 1.8 mjacob continue;
457 1.8 mjacob }
458 1.8 mjacob if (isp_control(isp, ISPCTL_ABORT_CMD, xs)) {
459 1.8 mjacob printf("%s: isp_watch failed to abort command\n",
460 1.8 mjacob isp->isp_name);
461 1.8 mjacob isp_restart(isp);
462 1.8 mjacob break;
463 1.8 mjacob }
464 1.8 mjacob }
465 1.8 mjacob timeout(isp_watch, isp, WATCH_INTERVAL * hz);
466 1.8 mjacob isp->isp_dogactive = 1;
467 1.17 mjacob (void) splx(s);
468 1.8 mjacob }
469 1.8 mjacob
470 1.8 mjacob /*
471 1.8 mjacob * Free any associated resources prior to decommissioning and
472 1.8 mjacob * set the card to a known state (so it doesn't wake up and kick
473 1.8 mjacob * us when we aren't expecting it to).
474 1.8 mjacob *
475 1.8 mjacob * Locks are held before coming here.
476 1.8 mjacob */
477 1.8 mjacob void
478 1.8 mjacob isp_uninit(isp)
479 1.8 mjacob struct ispsoftc *isp;
480 1.8 mjacob {
481 1.8 mjacob ISP_ILOCKVAL_DECL;
482 1.8 mjacob ISP_ILOCK(isp);
483 1.8 mjacob /*
484 1.8 mjacob * Leave with interrupts disabled.
485 1.8 mjacob */
486 1.8 mjacob DISABLE_INTS(isp);
487 1.8 mjacob
488 1.8 mjacob /*
489 1.8 mjacob * Turn off the watchdog (if active).
490 1.8 mjacob */
491 1.8 mjacob if (isp->isp_dogactive) {
492 1.8 mjacob untimeout(isp_watch, isp);
493 1.8 mjacob isp->isp_dogactive = 0;
494 1.8 mjacob }
495 1.8 mjacob
496 1.8 mjacob ISP_IUNLOCK(isp);
497 1.9 mjacob }
498 1.9 mjacob
499 1.10 mjacob /*
500 1.17 mjacob * Restart function for a command to be requeued later.
501 1.17 mjacob */
502 1.17 mjacob static void
503 1.17 mjacob isp_command_requeue(arg)
504 1.17 mjacob void *arg;
505 1.17 mjacob {
506 1.17 mjacob struct scsipi_xfer *xs = arg;
507 1.17 mjacob struct ispsoftc *isp = XS_ISP(xs);
508 1.17 mjacob int s = splbio();
509 1.17 mjacob switch (ispcmd_slow(xs)) {
510 1.17 mjacob case SUCCESSFULLY_QUEUED:
511 1.18 mjacob printf("%s: isp_command_requeue: requeued for %d.%d\n",
512 1.17 mjacob isp->isp_name, XS_TGT(xs), XS_LUN(xs));
513 1.17 mjacob break;
514 1.17 mjacob case TRY_AGAIN_LATER:
515 1.17 mjacob printf("%s: EAGAIN for %d.%d\n",
516 1.17 mjacob isp->isp_name, XS_TGT(xs), XS_LUN(xs));
517 1.17 mjacob /* FALLTHROUGH */
518 1.17 mjacob case COMPLETE:
519 1.18 mjacob /* can only be an error */
520 1.17 mjacob xs->xs_status |= XS_STS_DONE;
521 1.17 mjacob if (XS_NOERR(xs)) {
522 1.17 mjacob XS_SETERR(xs, HBA_BOTCH);
523 1.17 mjacob }
524 1.17 mjacob scsipi_done(xs);
525 1.17 mjacob break;
526 1.17 mjacob }
527 1.17 mjacob (void) splx(s);
528 1.17 mjacob }
529 1.18 mjacob
530 1.17 mjacob /*
531 1.10 mjacob * Restart function after a LOOP UP event (e.g.),
532 1.10 mjacob * done as a timeout for some hysteresis.
533 1.10 mjacob */
534 1.10 mjacob static void
535 1.10 mjacob isp_internal_restart(arg)
536 1.10 mjacob void *arg;
537 1.10 mjacob {
538 1.10 mjacob struct ispsoftc *isp = arg;
539 1.11 mjacob int result, nrestarted = 0, s;
540 1.10 mjacob
541 1.11 mjacob s = splbio();
542 1.10 mjacob if (isp->isp_osinfo.blocked == 0) {
543 1.10 mjacob struct scsipi_xfer *xs;
544 1.10 mjacob while ((xs = TAILQ_FIRST(&isp->isp_osinfo.waitq)) != NULL) {
545 1.10 mjacob TAILQ_REMOVE(&isp->isp_osinfo.waitq, xs, adapter_q);
546 1.11 mjacob DISABLE_INTS(isp);
547 1.11 mjacob result = ispscsicmd(xs);
548 1.11 mjacob ENABLE_INTS(isp);
549 1.11 mjacob if (result != CMD_QUEUED) {
550 1.10 mjacob printf("%s: botched command restart (0x%x)\n",
551 1.10 mjacob isp->isp_name, result);
552 1.16 thorpej xs->xs_status |= XS_STS_DONE;
553 1.10 mjacob if (xs->error == XS_NOERROR)
554 1.10 mjacob xs->error = XS_DRIVER_STUFFUP;
555 1.10 mjacob scsipi_done(xs);
556 1.10 mjacob }
557 1.10 mjacob nrestarted++;
558 1.10 mjacob }
559 1.10 mjacob printf("%s: requeued %d commands\n", isp->isp_name, nrestarted);
560 1.10 mjacob }
561 1.10 mjacob (void) splx(s);
562 1.10 mjacob }
563 1.18 mjacob
564 1.9 mjacob int
565 1.9 mjacob isp_async(isp, cmd, arg)
566 1.9 mjacob struct ispsoftc *isp;
567 1.9 mjacob ispasync_t cmd;
568 1.9 mjacob void *arg;
569 1.9 mjacob {
570 1.14 mjacob int bus, tgt;
571 1.10 mjacob int s = splbio();
572 1.9 mjacob switch (cmd) {
573 1.9 mjacob case ISPASYNC_NEW_TGT_PARAMS:
574 1.17 mjacob if (IS_SCSI(isp) && isp->isp_dblev) {
575 1.17 mjacob sdparam *sdp = isp->isp_param;
576 1.17 mjacob char *wt;
577 1.17 mjacob int mhz, flags, period;
578 1.17 mjacob
579 1.17 mjacob tgt = *((int *) arg);
580 1.17 mjacob bus = (tgt >> 16) & 0xffff;
581 1.17 mjacob tgt &= 0xffff;
582 1.17 mjacob
583 1.17 mjacob flags = sdp->isp_devparam[tgt].cur_dflags;
584 1.17 mjacob period = sdp->isp_devparam[tgt].cur_period;
585 1.17 mjacob if ((flags & DPARM_SYNC) && period &&
586 1.17 mjacob (sdp->isp_devparam[tgt].cur_offset) != 0) {
587 1.17 mjacob if (sdp->isp_lvdmode) {
588 1.17 mjacob switch (period) {
589 1.17 mjacob case 0xa:
590 1.17 mjacob mhz = 40;
591 1.17 mjacob break;
592 1.17 mjacob case 0xb:
593 1.17 mjacob mhz = 33;
594 1.17 mjacob break;
595 1.17 mjacob case 0xc:
596 1.17 mjacob mhz = 25;
597 1.17 mjacob break;
598 1.17 mjacob default:
599 1.12 mjacob mhz = 1000 / (period * 4);
600 1.17 mjacob break;
601 1.12 mjacob }
602 1.9 mjacob } else {
603 1.17 mjacob mhz = 1000 / (period * 4);
604 1.9 mjacob }
605 1.17 mjacob } else {
606 1.17 mjacob mhz = 0;
607 1.17 mjacob }
608 1.17 mjacob switch (flags & (DPARM_WIDE|DPARM_TQING)) {
609 1.17 mjacob case DPARM_WIDE:
610 1.17 mjacob wt = ", 16 bit wide\n";
611 1.17 mjacob break;
612 1.17 mjacob case DPARM_TQING:
613 1.17 mjacob wt = ", Tagged Queueing Enabled\n";
614 1.17 mjacob break;
615 1.17 mjacob case DPARM_WIDE|DPARM_TQING:
616 1.17 mjacob wt = ", 16 bit wide, Tagged Queueing Enabled\n";
617 1.17 mjacob break;
618 1.17 mjacob default:
619 1.17 mjacob wt = "\n";
620 1.17 mjacob break;
621 1.17 mjacob }
622 1.17 mjacob if (mhz) {
623 1.19 mjacob CFGPRINTF("%s: Bus %d Target %d at %dMHz Max "
624 1.17 mjacob "Offset %d%s", isp->isp_name, bus, tgt, mhz,
625 1.17 mjacob sdp->isp_devparam[tgt].cur_offset, wt);
626 1.17 mjacob } else {
627 1.19 mjacob CFGPRINTF("%s: Bus %d Target %d Async Mode%s",
628 1.17 mjacob isp->isp_name, bus, tgt, wt);
629 1.9 mjacob }
630 1.11 mjacob break;
631 1.17 mjacob }
632 1.11 mjacob case ISPASYNC_BUS_RESET:
633 1.14 mjacob if (arg)
634 1.14 mjacob bus = *((int *) arg);
635 1.14 mjacob else
636 1.14 mjacob bus = 0;
637 1.14 mjacob printf("%s: SCSI bus %d reset detected\n", isp->isp_name, bus);
638 1.11 mjacob break;
639 1.11 mjacob case ISPASYNC_LOOP_DOWN:
640 1.11 mjacob /*
641 1.11 mjacob * Hopefully we get here in time to minimize the number
642 1.11 mjacob * of commands we are firing off that are sure to die.
643 1.11 mjacob */
644 1.11 mjacob isp->isp_osinfo.blocked = 1;
645 1.11 mjacob printf("%s: Loop DOWN\n", isp->isp_name);
646 1.11 mjacob break;
647 1.11 mjacob case ISPASYNC_LOOP_UP:
648 1.11 mjacob isp->isp_osinfo.blocked = 0;
649 1.11 mjacob timeout(isp_internal_restart, isp, 1);
650 1.11 mjacob printf("%s: Loop UP\n", isp->isp_name);
651 1.11 mjacob break;
652 1.15 mjacob case ISPASYNC_PDB_CHANGED:
653 1.17 mjacob if (IS_FC(isp) && isp->isp_dblev) {
654 1.15 mjacob const char *fmt = "%s: Target %d (Loop 0x%x) Port ID 0x%x "
655 1.15 mjacob "role %s %s\n Port WWN 0x%08x%08x\n Node WWN 0x%08x%08x\n";
656 1.15 mjacob const static char *roles[4] = {
657 1.11 mjacob "No", "Target", "Initiator", "Target/Initiator"
658 1.11 mjacob };
659 1.15 mjacob char *ptr;
660 1.15 mjacob fcparam *fcp = isp->isp_param;
661 1.15 mjacob int tgt = *((int *) arg);
662 1.15 mjacob struct lportdb *lp = &fcp->portdb[tgt];
663 1.15 mjacob
664 1.15 mjacob if (lp->valid) {
665 1.15 mjacob ptr = "arrived";
666 1.15 mjacob } else {
667 1.15 mjacob ptr = "disappeared";
668 1.11 mjacob }
669 1.15 mjacob printf(fmt, isp->isp_name, tgt, lp->loopid, lp->portid,
670 1.15 mjacob roles[lp->roles & 0x3], ptr,
671 1.15 mjacob (u_int32_t) (lp->port_wwn >> 32),
672 1.15 mjacob (u_int32_t) (lp->port_wwn & 0xffffffffLL),
673 1.15 mjacob (u_int32_t) (lp->node_wwn >> 32),
674 1.15 mjacob (u_int32_t) (lp->node_wwn & 0xffffffffLL));
675 1.11 mjacob break;
676 1.11 mjacob }
677 1.15 mjacob #ifdef ISP2100_FABRIC
678 1.11 mjacob case ISPASYNC_CHANGE_NOTIFY:
679 1.11 mjacob printf("%s: Name Server Database Changed\n", isp->isp_name);
680 1.9 mjacob break;
681 1.15 mjacob case ISPASYNC_FABRIC_DEV:
682 1.15 mjacob {
683 1.15 mjacob int target;
684 1.15 mjacob struct lportdb *lp;
685 1.15 mjacob sns_scrsp_t *resp = (sns_scrsp_t *) arg;
686 1.15 mjacob u_int32_t portid;
687 1.15 mjacob u_int64_t wwn;
688 1.15 mjacob fcparam *fcp = isp->isp_param;
689 1.15 mjacob
690 1.15 mjacob portid =
691 1.15 mjacob (((u_int32_t) resp->snscb_port_id[0]) << 16) |
692 1.15 mjacob (((u_int32_t) resp->snscb_port_id[1]) << 8) |
693 1.15 mjacob (((u_int32_t) resp->snscb_port_id[2]));
694 1.15 mjacob wwn =
695 1.15 mjacob (((u_int64_t)resp->snscb_portname[0]) << 56) |
696 1.15 mjacob (((u_int64_t)resp->snscb_portname[1]) << 48) |
697 1.15 mjacob (((u_int64_t)resp->snscb_portname[2]) << 40) |
698 1.15 mjacob (((u_int64_t)resp->snscb_portname[3]) << 32) |
699 1.15 mjacob (((u_int64_t)resp->snscb_portname[4]) << 24) |
700 1.15 mjacob (((u_int64_t)resp->snscb_portname[5]) << 16) |
701 1.15 mjacob (((u_int64_t)resp->snscb_portname[6]) << 8) |
702 1.15 mjacob (((u_int64_t)resp->snscb_portname[7]));
703 1.15 mjacob printf("%s: Fabric Device (Type 0x%x)@PortID 0x%x WWN "
704 1.15 mjacob "0x%08x%08x\n", isp->isp_name, resp->snscb_port_type,
705 1.15 mjacob portid, ((u_int32_t)(wwn >> 32)),
706 1.15 mjacob ((u_int32_t)(wwn & 0xffffffff)));
707 1.15 mjacob if (resp->snscb_port_type != 2)
708 1.15 mjacob break;
709 1.15 mjacob for (target = FC_SNS_ID+1; target < MAX_FC_TARG; target++) {
710 1.15 mjacob lp = &fcp->portdb[target];
711 1.15 mjacob if (lp->port_wwn == wwn)
712 1.15 mjacob break;
713 1.15 mjacob }
714 1.15 mjacob if (target < MAX_FC_TARG) {
715 1.15 mjacob break;
716 1.15 mjacob }
717 1.15 mjacob for (target = FC_SNS_ID+1; target < MAX_FC_TARG; target++) {
718 1.15 mjacob lp = &fcp->portdb[target];
719 1.15 mjacob if (lp->port_wwn == 0)
720 1.15 mjacob break;
721 1.15 mjacob }
722 1.15 mjacob if (target == MAX_FC_TARG) {
723 1.15 mjacob printf("%s: no more space for fabric devices\n",
724 1.15 mjacob isp->isp_name);
725 1.15 mjacob return (-1);
726 1.15 mjacob }
727 1.15 mjacob lp->port_wwn = lp->node_wwn = wwn;
728 1.15 mjacob lp->portid = portid;
729 1.15 mjacob break;
730 1.15 mjacob }
731 1.15 mjacob #endif
732 1.9 mjacob default:
733 1.9 mjacob break;
734 1.9 mjacob }
735 1.10 mjacob (void) splx(s);
736 1.9 mjacob return (0);
737 1.1 mjacob }
738