bha.c revision 1.9 1 1.9 mycroft /* $NetBSD: bha.c,v 1.9 1997/01/17 22:09:09 mycroft Exp $ */
2 1.1 mycroft
3 1.1 mycroft #undef BHADIAG
4 1.1 mycroft #ifdef DDB
5 1.1 mycroft #define integrate
6 1.1 mycroft #else
7 1.1 mycroft #define integrate static inline
8 1.1 mycroft #endif
9 1.1 mycroft
10 1.1 mycroft /*
11 1.1 mycroft * Copyright (c) 1994, 1996 Charles M. Hannum. All rights reserved.
12 1.1 mycroft *
13 1.1 mycroft * Redistribution and use in source and binary forms, with or without
14 1.1 mycroft * modification, are permitted provided that the following conditions
15 1.1 mycroft * are met:
16 1.1 mycroft * 1. Redistributions of source code must retain the above copyright
17 1.1 mycroft * notice, this list of conditions and the following disclaimer.
18 1.1 mycroft * 2. Redistributions in binary form must reproduce the above copyright
19 1.1 mycroft * notice, this list of conditions and the following disclaimer in the
20 1.1 mycroft * documentation and/or other materials provided with the distribution.
21 1.1 mycroft * 3. All advertising materials mentioning features or use of this software
22 1.1 mycroft * must display the following acknowledgement:
23 1.1 mycroft * This product includes software developed by Charles M. Hannum.
24 1.1 mycroft * 4. The name of the author may not be used to endorse or promote products
25 1.1 mycroft * derived from this software without specific prior written permission.
26 1.1 mycroft *
27 1.1 mycroft * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
28 1.1 mycroft * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
29 1.1 mycroft * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
30 1.1 mycroft * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
31 1.1 mycroft * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
32 1.1 mycroft * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
33 1.1 mycroft * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
34 1.1 mycroft * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
35 1.1 mycroft * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
36 1.1 mycroft * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
37 1.1 mycroft */
38 1.1 mycroft
39 1.1 mycroft /*
40 1.1 mycroft * Originally written by Julian Elischer (julian (at) tfs.com)
41 1.1 mycroft * for TRW Financial Systems for use under the MACH(2.5) operating system.
42 1.1 mycroft *
43 1.1 mycroft * TRW Financial Systems, in accordance with their agreement with Carnegie
44 1.1 mycroft * Mellon University, makes this software available to CMU to distribute
45 1.1 mycroft * or use in any manner that they see fit as long as this message is kept with
46 1.1 mycroft * the software. For this reason TFS also grants any other persons or
47 1.1 mycroft * organisations permission to use or modify this software.
48 1.1 mycroft *
49 1.1 mycroft * TFS supplies this software to be publicly redistributed
50 1.1 mycroft * on the understanding that TFS is not responsible for the correct
51 1.1 mycroft * functioning of this software in any circumstances.
52 1.1 mycroft */
53 1.1 mycroft
54 1.1 mycroft #include <sys/types.h>
55 1.1 mycroft #include <sys/param.h>
56 1.1 mycroft #include <sys/systm.h>
57 1.1 mycroft #include <sys/kernel.h>
58 1.1 mycroft #include <sys/errno.h>
59 1.1 mycroft #include <sys/ioctl.h>
60 1.1 mycroft #include <sys/device.h>
61 1.1 mycroft #include <sys/malloc.h>
62 1.1 mycroft #include <sys/buf.h>
63 1.1 mycroft #include <sys/proc.h>
64 1.1 mycroft #include <sys/user.h>
65 1.1 mycroft
66 1.1 mycroft #include <machine/bus.h>
67 1.1 mycroft #include <machine/intr.h>
68 1.1 mycroft
69 1.1 mycroft #include <scsi/scsi_all.h>
70 1.1 mycroft #include <scsi/scsiconf.h>
71 1.1 mycroft
72 1.1 mycroft #include <dev/ic/bhareg.h>
73 1.1 mycroft #include <dev/ic/bhavar.h>
74 1.1 mycroft
75 1.1 mycroft #ifndef DDB
76 1.1 mycroft #define Debugger() panic("should call debugger here (bha.c)")
77 1.1 mycroft #endif /* ! DDB */
78 1.1 mycroft
79 1.1 mycroft #define KVTOPHYS(x) vtophys(x)
80 1.1 mycroft
81 1.1 mycroft #ifdef BHADEBUG
82 1.1 mycroft int bha_debug = 0;
83 1.1 mycroft #endif /* BHADEBUG */
84 1.1 mycroft
85 1.9 mycroft int bha_cmd __P((bus_space_tag_t, bus_space_handle_t, struct bha_softc *,
86 1.9 mycroft int, u_char *, int, u_char *));
87 1.1 mycroft integrate void bha_finish_ccbs __P((struct bha_softc *));
88 1.1 mycroft integrate void bha_reset_ccb __P((struct bha_softc *, struct bha_ccb *));
89 1.1 mycroft void bha_free_ccb __P((struct bha_softc *, struct bha_ccb *));
90 1.1 mycroft integrate void bha_init_ccb __P((struct bha_softc *, struct bha_ccb *));
91 1.1 mycroft struct bha_ccb *bha_get_ccb __P((struct bha_softc *, int));
92 1.1 mycroft struct bha_ccb *bha_ccb_phys_kv __P((struct bha_softc *, u_long));
93 1.1 mycroft void bha_queue_ccb __P((struct bha_softc *, struct bha_ccb *));
94 1.1 mycroft void bha_collect_mbo __P((struct bha_softc *));
95 1.1 mycroft void bha_start_ccbs __P((struct bha_softc *));
96 1.1 mycroft void bha_done __P((struct bha_softc *, struct bha_ccb *));
97 1.1 mycroft void bha_init __P((struct bha_softc *));
98 1.1 mycroft void bha_inquire_setup_information __P((struct bha_softc *));
99 1.1 mycroft void bhaminphys __P((struct buf *));
100 1.1 mycroft int bha_scsi_cmd __P((struct scsi_xfer *));
101 1.1 mycroft int bha_poll __P((struct bha_softc *, struct scsi_xfer *, int));
102 1.1 mycroft void bha_timeout __P((void *arg));
103 1.1 mycroft
104 1.1 mycroft struct scsi_adapter bha_switch = {
105 1.1 mycroft bha_scsi_cmd,
106 1.1 mycroft bhaminphys,
107 1.1 mycroft 0,
108 1.1 mycroft 0,
109 1.1 mycroft };
110 1.1 mycroft
111 1.1 mycroft /* the below structure is so we have a default dev struct for out link struct */
112 1.1 mycroft struct scsi_device bha_dev = {
113 1.1 mycroft NULL, /* Use default error handler */
114 1.1 mycroft NULL, /* have a queue, served by this */
115 1.1 mycroft NULL, /* have no async handler */
116 1.1 mycroft NULL, /* Use default 'done' routine */
117 1.1 mycroft };
118 1.1 mycroft
119 1.1 mycroft struct cfdriver bha_cd = {
120 1.1 mycroft NULL, "bha", DV_DULL
121 1.1 mycroft };
122 1.1 mycroft
123 1.1 mycroft #define BHA_RESET_TIMEOUT 2000 /* time to wait for reset (mSec) */
124 1.1 mycroft #define BHA_ABORT_TIMEOUT 2000 /* time to wait for abort (mSec) */
125 1.1 mycroft
126 1.1 mycroft /*
127 1.4 thorpej * bha_cmd(iot, ioh, sc, icnt, ibuf, ocnt, obuf)
128 1.1 mycroft *
129 1.1 mycroft * Activate Adapter command
130 1.1 mycroft * icnt: number of args (outbound bytes including opcode)
131 1.1 mycroft * ibuf: argument buffer
132 1.1 mycroft * ocnt: number of expected returned bytes
133 1.1 mycroft * obuf: result buffer
134 1.1 mycroft * wait: number of seconds to wait for response
135 1.1 mycroft *
136 1.1 mycroft * Performs an adapter command through the ports. Not to be confused with a
137 1.1 mycroft * scsi command, which is read in via the dma; one of the adapter commands
138 1.1 mycroft * tells it to read in a scsi command.
139 1.1 mycroft */
140 1.1 mycroft int
141 1.4 thorpej bha_cmd(iot, ioh, sc, icnt, ibuf, ocnt, obuf)
142 1.4 thorpej bus_space_tag_t iot;
143 1.4 thorpej bus_space_handle_t ioh;
144 1.1 mycroft struct bha_softc *sc;
145 1.1 mycroft int icnt, ocnt;
146 1.1 mycroft u_char *ibuf, *obuf;
147 1.1 mycroft {
148 1.1 mycroft const char *name;
149 1.1 mycroft register int i;
150 1.1 mycroft int wait;
151 1.1 mycroft u_char sts;
152 1.1 mycroft u_char opcode = ibuf[0];
153 1.1 mycroft
154 1.1 mycroft if (sc != NULL)
155 1.1 mycroft name = sc->sc_dev.dv_xname;
156 1.1 mycroft else
157 1.1 mycroft name = "(bha probe)";
158 1.1 mycroft
159 1.1 mycroft /*
160 1.1 mycroft * Calculate a reasonable timeout for the command.
161 1.1 mycroft */
162 1.1 mycroft switch (opcode) {
163 1.1 mycroft case BHA_INQUIRE_DEVICES:
164 1.8 thorpej case BHA_INQUIRE_DEVICES_2:
165 1.1 mycroft wait = 90 * 20000;
166 1.1 mycroft break;
167 1.1 mycroft default:
168 1.1 mycroft wait = 1 * 20000;
169 1.1 mycroft break;
170 1.1 mycroft }
171 1.1 mycroft
172 1.1 mycroft /*
173 1.1 mycroft * Wait for the adapter to go idle, unless it's one of
174 1.1 mycroft * the commands which don't need this
175 1.1 mycroft */
176 1.1 mycroft if (opcode != BHA_MBO_INTR_EN) {
177 1.1 mycroft for (i = 20000; i; i--) { /* 1 sec? */
178 1.4 thorpej sts = bus_space_read_1(iot, ioh, BHA_STAT_PORT);
179 1.1 mycroft if (sts & BHA_STAT_IDLE)
180 1.1 mycroft break;
181 1.1 mycroft delay(50);
182 1.1 mycroft }
183 1.1 mycroft if (!i) {
184 1.3 christos printf("%s: bha_cmd, host not idle(0x%x)\n",
185 1.1 mycroft name, sts);
186 1.9 mycroft return (1);
187 1.1 mycroft }
188 1.1 mycroft }
189 1.1 mycroft /*
190 1.1 mycroft * Now that it is idle, if we expect output, preflush the
191 1.1 mycroft * queue feeding to us.
192 1.1 mycroft */
193 1.1 mycroft if (ocnt) {
194 1.4 thorpej while ((bus_space_read_1(iot, ioh, BHA_STAT_PORT)) &
195 1.4 thorpej BHA_STAT_DF)
196 1.4 thorpej bus_space_read_1(iot, ioh, BHA_DATA_PORT);
197 1.1 mycroft }
198 1.1 mycroft /*
199 1.1 mycroft * Output the command and the number of arguments given
200 1.1 mycroft * for each byte, first check the port is empty.
201 1.1 mycroft */
202 1.1 mycroft while (icnt--) {
203 1.1 mycroft for (i = wait; i; i--) {
204 1.4 thorpej sts = bus_space_read_1(iot, ioh, BHA_STAT_PORT);
205 1.1 mycroft if (!(sts & BHA_STAT_CDF))
206 1.1 mycroft break;
207 1.1 mycroft delay(50);
208 1.1 mycroft }
209 1.1 mycroft if (!i) {
210 1.1 mycroft if (opcode != BHA_INQUIRE_REVISION)
211 1.4 thorpej printf("%s: bha_cmd, cmd/data port full\n",
212 1.4 thorpej name);
213 1.9 mycroft goto bad;
214 1.1 mycroft }
215 1.4 thorpej bus_space_write_1(iot, ioh, BHA_CMD_PORT, *ibuf++);
216 1.1 mycroft }
217 1.1 mycroft /*
218 1.1 mycroft * If we expect input, loop that many times, each time,
219 1.1 mycroft * looking for the data register to have valid data
220 1.1 mycroft */
221 1.9 mycroft while (ocnt--) {
222 1.1 mycroft for (i = wait; i; i--) {
223 1.4 thorpej sts = bus_space_read_1(iot, ioh, BHA_STAT_PORT);
224 1.1 mycroft if (sts & BHA_STAT_DF)
225 1.1 mycroft break;
226 1.1 mycroft delay(50);
227 1.1 mycroft }
228 1.1 mycroft if (!i) {
229 1.1 mycroft if (opcode != BHA_INQUIRE_REVISION)
230 1.3 christos printf("%s: bha_cmd, cmd/data port empty %d\n",
231 1.1 mycroft name, ocnt);
232 1.9 mycroft goto bad;
233 1.1 mycroft }
234 1.4 thorpej *obuf++ = bus_space_read_1(iot, ioh, BHA_DATA_PORT);
235 1.1 mycroft }
236 1.1 mycroft /*
237 1.1 mycroft * Wait for the board to report a finished instruction.
238 1.1 mycroft * We may get an extra interrupt for the HACC signal, but this is
239 1.1 mycroft * unimportant.
240 1.1 mycroft */
241 1.6 thorpej if (opcode != BHA_MBO_INTR_EN && opcode != BHA_MODIFY_IOPORT) {
242 1.1 mycroft for (i = 20000; i; i--) { /* 1 sec? */
243 1.4 thorpej sts = bus_space_read_1(iot, ioh, BHA_INTR_PORT);
244 1.1 mycroft /* XXX Need to save this in the interrupt handler? */
245 1.1 mycroft if (sts & BHA_INTR_HACC)
246 1.1 mycroft break;
247 1.1 mycroft delay(50);
248 1.1 mycroft }
249 1.1 mycroft if (!i) {
250 1.3 christos printf("%s: bha_cmd, host not finished(0x%x)\n",
251 1.1 mycroft name, sts);
252 1.9 mycroft return (1);
253 1.1 mycroft }
254 1.1 mycroft }
255 1.4 thorpej bus_space_write_1(iot, ioh, BHA_CTRL_PORT, BHA_CTRL_IRST);
256 1.9 mycroft return (0);
257 1.9 mycroft
258 1.9 mycroft bad:
259 1.9 mycroft bus_space_write_1(iot, ioh, BHA_CTRL_PORT, BHA_CTRL_SRST);
260 1.9 mycroft return (1);
261 1.1 mycroft }
262 1.1 mycroft
263 1.1 mycroft /*
264 1.1 mycroft * Attach all the sub-devices we can find
265 1.1 mycroft */
266 1.1 mycroft void
267 1.1 mycroft bha_attach(sc)
268 1.1 mycroft struct bha_softc *sc;
269 1.1 mycroft {
270 1.1 mycroft
271 1.1 mycroft bha_inquire_setup_information(sc);
272 1.1 mycroft bha_init(sc);
273 1.1 mycroft TAILQ_INIT(&sc->sc_free_ccb);
274 1.1 mycroft TAILQ_INIT(&sc->sc_waiting_ccb);
275 1.1 mycroft
276 1.1 mycroft /*
277 1.1 mycroft * fill in the prototype scsi_link.
278 1.1 mycroft */
279 1.1 mycroft sc->sc_link.channel = SCSI_CHANNEL_ONLY_ONE;
280 1.1 mycroft sc->sc_link.adapter_softc = sc;
281 1.1 mycroft sc->sc_link.adapter_target = sc->sc_scsi_dev;
282 1.1 mycroft sc->sc_link.adapter = &bha_switch;
283 1.1 mycroft sc->sc_link.device = &bha_dev;
284 1.1 mycroft sc->sc_link.openings = 4;
285 1.8 thorpej sc->sc_link.max_target = sc->sc_iswide ? 15 : 7;
286 1.1 mycroft
287 1.1 mycroft /*
288 1.1 mycroft * ask the adapter what subunits are present
289 1.1 mycroft */
290 1.1 mycroft config_found(&sc->sc_dev, &sc->sc_link, scsiprint);
291 1.1 mycroft }
292 1.1 mycroft
293 1.1 mycroft integrate void
294 1.1 mycroft bha_finish_ccbs(sc)
295 1.1 mycroft struct bha_softc *sc;
296 1.1 mycroft {
297 1.1 mycroft struct bha_mbx_in *wmbi;
298 1.1 mycroft struct bha_ccb *ccb;
299 1.1 mycroft int i;
300 1.1 mycroft
301 1.1 mycroft wmbi = wmbx->tmbi;
302 1.1 mycroft
303 1.1 mycroft if (wmbi->stat == BHA_MBI_FREE) {
304 1.1 mycroft for (i = 0; i < BHA_MBX_SIZE; i++) {
305 1.1 mycroft if (wmbi->stat != BHA_MBI_FREE) {
306 1.3 christos printf("%s: mbi not in round-robin order\n",
307 1.1 mycroft sc->sc_dev.dv_xname);
308 1.1 mycroft goto AGAIN;
309 1.1 mycroft }
310 1.1 mycroft bha_nextmbx(wmbi, wmbx, mbi);
311 1.1 mycroft }
312 1.1 mycroft #ifdef BHADIAGnot
313 1.3 christos printf("%s: mbi interrupt with no full mailboxes\n",
314 1.1 mycroft sc->sc_dev.dv_xname);
315 1.1 mycroft #endif
316 1.1 mycroft return;
317 1.1 mycroft }
318 1.1 mycroft
319 1.1 mycroft AGAIN:
320 1.1 mycroft do {
321 1.1 mycroft ccb = bha_ccb_phys_kv(sc, phystol(wmbi->ccb_addr));
322 1.1 mycroft if (!ccb) {
323 1.3 christos printf("%s: bad mbi ccb pointer; skipping\n",
324 1.1 mycroft sc->sc_dev.dv_xname);
325 1.1 mycroft goto next;
326 1.1 mycroft }
327 1.1 mycroft
328 1.1 mycroft #ifdef BHADEBUG
329 1.1 mycroft if (bha_debug) {
330 1.1 mycroft u_char *cp = &ccb->scsi_cmd;
331 1.3 christos printf("op=%x %x %x %x %x %x\n",
332 1.1 mycroft cp[0], cp[1], cp[2], cp[3], cp[4], cp[5]);
333 1.3 christos printf("stat %x for mbi addr = 0x%08x, ",
334 1.1 mycroft wmbi->stat, wmbi);
335 1.3 christos printf("ccb addr = 0x%x\n", ccb);
336 1.1 mycroft }
337 1.1 mycroft #endif /* BHADEBUG */
338 1.1 mycroft
339 1.1 mycroft switch (wmbi->stat) {
340 1.1 mycroft case BHA_MBI_OK:
341 1.1 mycroft case BHA_MBI_ERROR:
342 1.1 mycroft if ((ccb->flags & CCB_ABORT) != 0) {
343 1.1 mycroft /*
344 1.1 mycroft * If we already started an abort, wait for it
345 1.1 mycroft * to complete before clearing the CCB. We
346 1.1 mycroft * could instead just clear CCB_SENDING, but
347 1.1 mycroft * what if the mailbox was already received?
348 1.1 mycroft * The worst that happens here is that we clear
349 1.1 mycroft * the CCB a bit later than we need to. BFD.
350 1.1 mycroft */
351 1.1 mycroft goto next;
352 1.1 mycroft }
353 1.1 mycroft break;
354 1.1 mycroft
355 1.1 mycroft case BHA_MBI_ABORT:
356 1.1 mycroft case BHA_MBI_UNKNOWN:
357 1.1 mycroft /*
358 1.1 mycroft * Even if the CCB wasn't found, we clear it anyway.
359 1.1 mycroft * See preceeding comment.
360 1.1 mycroft */
361 1.1 mycroft break;
362 1.1 mycroft
363 1.1 mycroft default:
364 1.3 christos printf("%s: bad mbi status %02x; skipping\n",
365 1.1 mycroft sc->sc_dev.dv_xname, wmbi->stat);
366 1.1 mycroft goto next;
367 1.1 mycroft }
368 1.1 mycroft
369 1.1 mycroft untimeout(bha_timeout, ccb);
370 1.1 mycroft bha_done(sc, ccb);
371 1.1 mycroft
372 1.1 mycroft next:
373 1.1 mycroft wmbi->stat = BHA_MBI_FREE;
374 1.1 mycroft bha_nextmbx(wmbi, wmbx, mbi);
375 1.1 mycroft } while (wmbi->stat != BHA_MBI_FREE);
376 1.1 mycroft
377 1.1 mycroft wmbx->tmbi = wmbi;
378 1.1 mycroft }
379 1.1 mycroft
380 1.1 mycroft /*
381 1.1 mycroft * Catch an interrupt from the adaptor
382 1.1 mycroft */
383 1.1 mycroft int
384 1.1 mycroft bha_intr(arg)
385 1.1 mycroft void *arg;
386 1.1 mycroft {
387 1.1 mycroft struct bha_softc *sc = arg;
388 1.4 thorpej bus_space_tag_t iot = sc->sc_iot;
389 1.4 thorpej bus_space_handle_t ioh = sc->sc_ioh;
390 1.1 mycroft u_char sts;
391 1.1 mycroft
392 1.1 mycroft #ifdef BHADEBUG
393 1.3 christos printf("%s: bha_intr ", sc->sc_dev.dv_xname);
394 1.1 mycroft #endif /* BHADEBUG */
395 1.1 mycroft
396 1.1 mycroft /*
397 1.1 mycroft * First acknowlege the interrupt, Then if it's not telling about
398 1.1 mycroft * a completed operation just return.
399 1.1 mycroft */
400 1.4 thorpej sts = bus_space_read_1(iot, ioh, BHA_INTR_PORT);
401 1.1 mycroft if ((sts & BHA_INTR_ANYINTR) == 0)
402 1.1 mycroft return (0);
403 1.4 thorpej bus_space_write_1(iot, ioh, BHA_CTRL_PORT, BHA_CTRL_IRST);
404 1.1 mycroft
405 1.1 mycroft #ifdef BHADIAG
406 1.1 mycroft /* Make sure we clear CCB_SENDING before finishing a CCB. */
407 1.1 mycroft bha_collect_mbo(sc);
408 1.1 mycroft #endif
409 1.1 mycroft
410 1.1 mycroft /* Mail box out empty? */
411 1.1 mycroft if (sts & BHA_INTR_MBOA) {
412 1.1 mycroft struct bha_toggle toggle;
413 1.1 mycroft
414 1.1 mycroft toggle.cmd.opcode = BHA_MBO_INTR_EN;
415 1.1 mycroft toggle.cmd.enable = 0;
416 1.4 thorpej bha_cmd(iot, ioh, sc,
417 1.1 mycroft sizeof(toggle.cmd), (u_char *)&toggle.cmd,
418 1.1 mycroft 0, (u_char *)0);
419 1.1 mycroft bha_start_ccbs(sc);
420 1.1 mycroft }
421 1.1 mycroft
422 1.1 mycroft /* Mail box in full? */
423 1.1 mycroft if (sts & BHA_INTR_MBIF)
424 1.1 mycroft bha_finish_ccbs(sc);
425 1.1 mycroft
426 1.1 mycroft return (1);
427 1.1 mycroft }
428 1.1 mycroft
429 1.1 mycroft integrate void
430 1.1 mycroft bha_reset_ccb(sc, ccb)
431 1.1 mycroft struct bha_softc *sc;
432 1.1 mycroft struct bha_ccb *ccb;
433 1.1 mycroft {
434 1.1 mycroft
435 1.1 mycroft ccb->flags = 0;
436 1.1 mycroft }
437 1.1 mycroft
438 1.1 mycroft /*
439 1.1 mycroft * A ccb is put onto the free list.
440 1.1 mycroft */
441 1.1 mycroft void
442 1.1 mycroft bha_free_ccb(sc, ccb)
443 1.1 mycroft struct bha_softc *sc;
444 1.1 mycroft struct bha_ccb *ccb;
445 1.1 mycroft {
446 1.1 mycroft int s;
447 1.1 mycroft
448 1.1 mycroft s = splbio();
449 1.1 mycroft
450 1.1 mycroft bha_reset_ccb(sc, ccb);
451 1.1 mycroft TAILQ_INSERT_HEAD(&sc->sc_free_ccb, ccb, chain);
452 1.1 mycroft
453 1.1 mycroft /*
454 1.1 mycroft * If there were none, wake anybody waiting for one to come free,
455 1.1 mycroft * starting with queued entries.
456 1.1 mycroft */
457 1.1 mycroft if (ccb->chain.tqe_next == 0)
458 1.1 mycroft wakeup(&sc->sc_free_ccb);
459 1.1 mycroft
460 1.1 mycroft splx(s);
461 1.1 mycroft }
462 1.1 mycroft
463 1.1 mycroft integrate void
464 1.1 mycroft bha_init_ccb(sc, ccb)
465 1.1 mycroft struct bha_softc *sc;
466 1.1 mycroft struct bha_ccb *ccb;
467 1.1 mycroft {
468 1.1 mycroft int hashnum;
469 1.1 mycroft
470 1.1 mycroft bzero(ccb, sizeof(struct bha_ccb));
471 1.1 mycroft /*
472 1.1 mycroft * put in the phystokv hash table
473 1.1 mycroft * Never gets taken out.
474 1.1 mycroft */
475 1.1 mycroft ccb->hashkey = KVTOPHYS(ccb);
476 1.1 mycroft hashnum = CCB_HASH(ccb->hashkey);
477 1.1 mycroft ccb->nexthash = sc->sc_ccbhash[hashnum];
478 1.1 mycroft sc->sc_ccbhash[hashnum] = ccb;
479 1.1 mycroft bha_reset_ccb(sc, ccb);
480 1.1 mycroft }
481 1.1 mycroft
482 1.1 mycroft /*
483 1.1 mycroft * Get a free ccb
484 1.1 mycroft *
485 1.1 mycroft * If there are none, see if we can allocate a new one. If so, put it in
486 1.1 mycroft * the hash table too otherwise either return an error or sleep.
487 1.1 mycroft */
488 1.1 mycroft struct bha_ccb *
489 1.1 mycroft bha_get_ccb(sc, flags)
490 1.1 mycroft struct bha_softc *sc;
491 1.1 mycroft int flags;
492 1.1 mycroft {
493 1.1 mycroft struct bha_ccb *ccb;
494 1.1 mycroft int s;
495 1.1 mycroft
496 1.1 mycroft s = splbio();
497 1.1 mycroft
498 1.1 mycroft /*
499 1.1 mycroft * If we can and have to, sleep waiting for one to come free
500 1.1 mycroft * but only if we can't allocate a new one.
501 1.1 mycroft */
502 1.1 mycroft for (;;) {
503 1.1 mycroft ccb = sc->sc_free_ccb.tqh_first;
504 1.1 mycroft if (ccb) {
505 1.1 mycroft TAILQ_REMOVE(&sc->sc_free_ccb, ccb, chain);
506 1.1 mycroft break;
507 1.1 mycroft }
508 1.1 mycroft if (sc->sc_numccbs < BHA_CCB_MAX) {
509 1.1 mycroft ccb = (struct bha_ccb *) malloc(sizeof(struct bha_ccb),
510 1.1 mycroft M_TEMP, M_NOWAIT);
511 1.1 mycroft if (!ccb) {
512 1.3 christos printf("%s: can't malloc ccb\n",
513 1.1 mycroft sc->sc_dev.dv_xname);
514 1.1 mycroft goto out;
515 1.1 mycroft }
516 1.1 mycroft bha_init_ccb(sc, ccb);
517 1.1 mycroft sc->sc_numccbs++;
518 1.1 mycroft break;
519 1.1 mycroft }
520 1.1 mycroft if ((flags & SCSI_NOSLEEP) != 0)
521 1.1 mycroft goto out;
522 1.1 mycroft tsleep(&sc->sc_free_ccb, PRIBIO, "bhaccb", 0);
523 1.1 mycroft }
524 1.1 mycroft
525 1.1 mycroft ccb->flags |= CCB_ALLOC;
526 1.1 mycroft
527 1.1 mycroft out:
528 1.1 mycroft splx(s);
529 1.1 mycroft return (ccb);
530 1.1 mycroft }
531 1.1 mycroft
532 1.1 mycroft /*
533 1.1 mycroft * Given a physical address, find the ccb that it corresponds to.
534 1.1 mycroft */
535 1.1 mycroft struct bha_ccb *
536 1.1 mycroft bha_ccb_phys_kv(sc, ccb_phys)
537 1.1 mycroft struct bha_softc *sc;
538 1.1 mycroft u_long ccb_phys;
539 1.1 mycroft {
540 1.1 mycroft int hashnum = CCB_HASH(ccb_phys);
541 1.1 mycroft struct bha_ccb *ccb = sc->sc_ccbhash[hashnum];
542 1.1 mycroft
543 1.1 mycroft while (ccb) {
544 1.1 mycroft if (ccb->hashkey == ccb_phys)
545 1.1 mycroft break;
546 1.1 mycroft ccb = ccb->nexthash;
547 1.1 mycroft }
548 1.1 mycroft return (ccb);
549 1.1 mycroft }
550 1.1 mycroft
551 1.1 mycroft /*
552 1.1 mycroft * Queue a CCB to be sent to the controller, and send it if possible.
553 1.1 mycroft */
554 1.1 mycroft void
555 1.1 mycroft bha_queue_ccb(sc, ccb)
556 1.1 mycroft struct bha_softc *sc;
557 1.1 mycroft struct bha_ccb *ccb;
558 1.1 mycroft {
559 1.1 mycroft
560 1.1 mycroft TAILQ_INSERT_TAIL(&sc->sc_waiting_ccb, ccb, chain);
561 1.1 mycroft bha_start_ccbs(sc);
562 1.1 mycroft }
563 1.1 mycroft
564 1.1 mycroft /*
565 1.1 mycroft * Garbage collect mailboxes that are no longer in use.
566 1.1 mycroft */
567 1.1 mycroft void
568 1.1 mycroft bha_collect_mbo(sc)
569 1.1 mycroft struct bha_softc *sc;
570 1.1 mycroft {
571 1.1 mycroft struct bha_mbx_out *wmbo; /* Mail Box Out pointer */
572 1.2 christos #ifdef BHADIAG
573 1.1 mycroft struct bha_ccb *ccb;
574 1.2 christos #endif
575 1.1 mycroft
576 1.1 mycroft wmbo = wmbx->cmbo;
577 1.1 mycroft
578 1.1 mycroft while (sc->sc_mbofull > 0) {
579 1.1 mycroft if (wmbo->cmd != BHA_MBO_FREE)
580 1.1 mycroft break;
581 1.1 mycroft
582 1.1 mycroft #ifdef BHADIAG
583 1.1 mycroft ccb = bha_ccb_phys_kv(sc, phystol(wmbo->ccb_addr));
584 1.1 mycroft ccb->flags &= ~CCB_SENDING;
585 1.1 mycroft #endif
586 1.1 mycroft
587 1.1 mycroft --sc->sc_mbofull;
588 1.1 mycroft bha_nextmbx(wmbo, wmbx, mbo);
589 1.1 mycroft }
590 1.1 mycroft
591 1.1 mycroft wmbx->cmbo = wmbo;
592 1.1 mycroft }
593 1.1 mycroft
594 1.1 mycroft /*
595 1.1 mycroft * Send as many CCBs as we have empty mailboxes for.
596 1.1 mycroft */
597 1.1 mycroft void
598 1.1 mycroft bha_start_ccbs(sc)
599 1.1 mycroft struct bha_softc *sc;
600 1.1 mycroft {
601 1.4 thorpej bus_space_tag_t iot = sc->sc_iot;
602 1.4 thorpej bus_space_handle_t ioh = sc->sc_ioh;
603 1.1 mycroft struct bha_mbx_out *wmbo; /* Mail Box Out pointer */
604 1.1 mycroft struct bha_ccb *ccb;
605 1.1 mycroft
606 1.1 mycroft wmbo = wmbx->tmbo;
607 1.1 mycroft
608 1.1 mycroft while ((ccb = sc->sc_waiting_ccb.tqh_first) != NULL) {
609 1.1 mycroft if (sc->sc_mbofull >= BHA_MBX_SIZE) {
610 1.1 mycroft bha_collect_mbo(sc);
611 1.1 mycroft if (sc->sc_mbofull >= BHA_MBX_SIZE) {
612 1.1 mycroft struct bha_toggle toggle;
613 1.1 mycroft
614 1.1 mycroft toggle.cmd.opcode = BHA_MBO_INTR_EN;
615 1.1 mycroft toggle.cmd.enable = 1;
616 1.4 thorpej bha_cmd(iot, ioh, sc,
617 1.1 mycroft sizeof(toggle.cmd), (u_char *)&toggle.cmd,
618 1.1 mycroft 0, (u_char *)0);
619 1.1 mycroft break;
620 1.1 mycroft }
621 1.1 mycroft }
622 1.1 mycroft
623 1.1 mycroft TAILQ_REMOVE(&sc->sc_waiting_ccb, ccb, chain);
624 1.1 mycroft #ifdef BHADIAG
625 1.1 mycroft ccb->flags |= CCB_SENDING;
626 1.1 mycroft #endif
627 1.1 mycroft
628 1.1 mycroft /* Link ccb to mbo. */
629 1.1 mycroft ltophys(KVTOPHYS(ccb), wmbo->ccb_addr);
630 1.1 mycroft if (ccb->flags & CCB_ABORT)
631 1.1 mycroft wmbo->cmd = BHA_MBO_ABORT;
632 1.1 mycroft else
633 1.1 mycroft wmbo->cmd = BHA_MBO_START;
634 1.1 mycroft
635 1.1 mycroft /* Tell the card to poll immediately. */
636 1.4 thorpej bus_space_write_1(iot, ioh, BHA_CMD_PORT, BHA_START_SCSI);
637 1.1 mycroft
638 1.1 mycroft if ((ccb->xs->flags & SCSI_POLL) == 0)
639 1.1 mycroft timeout(bha_timeout, ccb, (ccb->timeout * hz) / 1000);
640 1.1 mycroft
641 1.1 mycroft ++sc->sc_mbofull;
642 1.1 mycroft bha_nextmbx(wmbo, wmbx, mbo);
643 1.1 mycroft }
644 1.1 mycroft
645 1.1 mycroft wmbx->tmbo = wmbo;
646 1.1 mycroft }
647 1.1 mycroft
648 1.1 mycroft /*
649 1.1 mycroft * We have a ccb which has been processed by the
650 1.1 mycroft * adaptor, now we look to see how the operation
651 1.1 mycroft * went. Wake up the owner if waiting
652 1.1 mycroft */
653 1.1 mycroft void
654 1.1 mycroft bha_done(sc, ccb)
655 1.1 mycroft struct bha_softc *sc;
656 1.1 mycroft struct bha_ccb *ccb;
657 1.1 mycroft {
658 1.1 mycroft struct scsi_sense_data *s1, *s2;
659 1.1 mycroft struct scsi_xfer *xs = ccb->xs;
660 1.1 mycroft
661 1.1 mycroft SC_DEBUG(xs->sc_link, SDEV_DB2, ("bha_done\n"));
662 1.1 mycroft /*
663 1.1 mycroft * Otherwise, put the results of the operation
664 1.1 mycroft * into the xfer and call whoever started it
665 1.1 mycroft */
666 1.1 mycroft #ifdef BHADIAG
667 1.1 mycroft if (ccb->flags & CCB_SENDING) {
668 1.4 thorpej printf("%s: exiting ccb still in transit!\n",
669 1.4 thorpej sc->sc_dev.dv_xname);
670 1.1 mycroft Debugger();
671 1.1 mycroft return;
672 1.1 mycroft }
673 1.1 mycroft #endif
674 1.1 mycroft if ((ccb->flags & CCB_ALLOC) == 0) {
675 1.4 thorpej printf("%s: exiting ccb not allocated!\n",
676 1.4 thorpej sc->sc_dev.dv_xname);
677 1.1 mycroft Debugger();
678 1.1 mycroft return;
679 1.1 mycroft }
680 1.1 mycroft if (xs->error == XS_NOERROR) {
681 1.1 mycroft if (ccb->host_stat != BHA_OK) {
682 1.1 mycroft switch (ccb->host_stat) {
683 1.1 mycroft case BHA_SEL_TIMEOUT: /* No response */
684 1.1 mycroft xs->error = XS_SELTIMEOUT;
685 1.1 mycroft break;
686 1.1 mycroft default: /* Other scsi protocol messes */
687 1.3 christos printf("%s: host_stat %x\n",
688 1.1 mycroft sc->sc_dev.dv_xname, ccb->host_stat);
689 1.1 mycroft xs->error = XS_DRIVER_STUFFUP;
690 1.1 mycroft break;
691 1.1 mycroft }
692 1.1 mycroft } else if (ccb->target_stat != SCSI_OK) {
693 1.1 mycroft switch (ccb->target_stat) {
694 1.1 mycroft case SCSI_CHECK:
695 1.1 mycroft s1 = &ccb->scsi_sense;
696 1.1 mycroft s2 = &xs->sense;
697 1.1 mycroft *s2 = *s1;
698 1.1 mycroft xs->error = XS_SENSE;
699 1.1 mycroft break;
700 1.1 mycroft case SCSI_BUSY:
701 1.1 mycroft xs->error = XS_BUSY;
702 1.1 mycroft break;
703 1.1 mycroft default:
704 1.3 christos printf("%s: target_stat %x\n",
705 1.1 mycroft sc->sc_dev.dv_xname, ccb->target_stat);
706 1.1 mycroft xs->error = XS_DRIVER_STUFFUP;
707 1.1 mycroft break;
708 1.1 mycroft }
709 1.1 mycroft } else
710 1.1 mycroft xs->resid = 0;
711 1.1 mycroft }
712 1.1 mycroft bha_free_ccb(sc, ccb);
713 1.1 mycroft xs->flags |= ITSDONE;
714 1.1 mycroft scsi_done(xs);
715 1.1 mycroft }
716 1.1 mycroft
717 1.1 mycroft /*
718 1.1 mycroft * Find the board and find it's irq/drq
719 1.1 mycroft */
720 1.1 mycroft int
721 1.4 thorpej bha_find(iot, ioh, sc)
722 1.4 thorpej bus_space_tag_t iot;
723 1.4 thorpej bus_space_handle_t ioh;
724 1.1 mycroft struct bha_softc *sc;
725 1.1 mycroft {
726 1.8 thorpej int i, iswide;
727 1.1 mycroft u_char sts;
728 1.1 mycroft struct bha_extended_inquire inquire;
729 1.1 mycroft struct bha_config config;
730 1.1 mycroft int irq, drq;
731 1.1 mycroft
732 1.5 jonathan /* Check something is at the ports we need to access */
733 1.5 jonathan sts = bus_space_read_1(iot, ioh, BHA_STAT_PORT);
734 1.5 jonathan if (sts == 0xFF)
735 1.5 jonathan return (0);
736 1.5 jonathan
737 1.1 mycroft /*
738 1.5 jonathan * Reset board, If it doesn't respond, assume
739 1.1 mycroft * that it's not there.. good for the probe
740 1.1 mycroft */
741 1.1 mycroft
742 1.4 thorpej bus_space_write_1(iot, ioh, BHA_CTRL_PORT,
743 1.4 thorpej BHA_CTRL_HRST | BHA_CTRL_SRST);
744 1.1 mycroft
745 1.1 mycroft delay(100);
746 1.1 mycroft for (i = BHA_RESET_TIMEOUT; i; i--) {
747 1.4 thorpej sts = bus_space_read_1(iot, ioh, BHA_STAT_PORT);
748 1.1 mycroft if (sts == (BHA_STAT_IDLE | BHA_STAT_INIT))
749 1.1 mycroft break;
750 1.1 mycroft delay(1000);
751 1.1 mycroft }
752 1.1 mycroft if (!i) {
753 1.1 mycroft #ifdef BHADEBUG
754 1.1 mycroft if (bha_debug)
755 1.3 christos printf("bha_find: No answer from buslogic board\n");
756 1.1 mycroft #endif /* BHADEBUG */
757 1.1 mycroft return (0);
758 1.1 mycroft }
759 1.1 mycroft
760 1.1 mycroft /*
761 1.5 jonathan * The BusLogic cards implement an Adaptec 1542 (aha)-compatible
762 1.5 jonathan * interface. The native bha interface is not compatible with
763 1.5 jonathan * an aha. 1542. We need to ensure that we never match an
764 1.5 jonathan * Adaptec 1542. We must also avoid sending Adaptec-compatible
765 1.5 jonathan * commands to a real bha, lest it go into 1542 emulation mode.
766 1.5 jonathan * (On an indirect bus like ISA, we should always probe for BusLogic
767 1.5 jonathan * interfaces before Adaptec interfaces).
768 1.5 jonathan */
769 1.5 jonathan
770 1.5 jonathan /*
771 1.5 jonathan * Make sure we don't match an AHA-1542A or AHA-1542B, by checking
772 1.5 jonathan * for an extended-geometry register. The 1542[AB] don't have one.
773 1.5 jonathan */
774 1.5 jonathan sts = bus_space_read_1(iot, ioh, BHA_EXTGEOM_PORT);
775 1.5 jonathan if (sts == 0xFF)
776 1.5 jonathan return (0);
777 1.5 jonathan
778 1.5 jonathan /*
779 1.1 mycroft * Check that we actually know how to use this board.
780 1.1 mycroft */
781 1.1 mycroft delay(1000);
782 1.1 mycroft inquire.cmd.opcode = BHA_INQUIRE_EXTENDED;
783 1.1 mycroft inquire.cmd.len = sizeof(inquire.reply);
784 1.5 jonathan i = bha_cmd(iot, ioh, sc,
785 1.9 mycroft sizeof(inquire.cmd), (u_char *)&inquire.cmd,
786 1.9 mycroft sizeof(inquire.reply), (u_char *)&inquire.reply);
787 1.5 jonathan
788 1.5 jonathan /*
789 1.5 jonathan * Some 1542Cs (CP, perhaps not CF, may depend on firmware rev)
790 1.5 jonathan * have the extended-geometry register and also respond to
791 1.5 jonathan * BHA_INQUIRE_EXTENDED. Make sure we never match such cards,
792 1.5 jonathan * by checking the size of the reply is what a BusLogic card returns.
793 1.5 jonathan */
794 1.9 mycroft if (i) {
795 1.5 jonathan #ifdef BHADEBUG
796 1.5 jonathan printf("bha_find: board returned %d instead of %d to %s\n",
797 1.5 jonathan i, sizeof(inquire.reply), "INQUIRE_EXTENDED");
798 1.5 jonathan #endif
799 1.5 jonathan return (0);
800 1.5 jonathan }
801 1.5 jonathan
802 1.5 jonathan /* OK, we know we've found a buslogic adaptor. */
803 1.5 jonathan
804 1.1 mycroft switch (inquire.reply.bus_type) {
805 1.1 mycroft case BHA_BUS_TYPE_24BIT:
806 1.1 mycroft case BHA_BUS_TYPE_32BIT:
807 1.1 mycroft break;
808 1.1 mycroft case BHA_BUS_TYPE_MCA:
809 1.1 mycroft /* We don't grok MicroChannel (yet). */
810 1.1 mycroft return (0);
811 1.1 mycroft default:
812 1.4 thorpej printf("bha_find: illegal bus type %c\n",
813 1.4 thorpej inquire.reply.bus_type);
814 1.1 mycroft return (0);
815 1.1 mycroft }
816 1.1 mycroft
817 1.8 thorpej /* Note if we have a wide bus. */
818 1.8 thorpej iswide = inquire.reply.scsi_flags & BHA_SCSI_WIDE;
819 1.8 thorpej
820 1.1 mycroft /*
821 1.1 mycroft * Assume we have a board at this stage setup dma channel from
822 1.1 mycroft * jumpers and save int level
823 1.1 mycroft */
824 1.1 mycroft delay(1000);
825 1.1 mycroft config.cmd.opcode = BHA_INQUIRE_CONFIG;
826 1.4 thorpej bha_cmd(iot, ioh, sc,
827 1.1 mycroft sizeof(config.cmd), (u_char *)&config.cmd,
828 1.1 mycroft sizeof(config.reply), (u_char *)&config.reply);
829 1.1 mycroft switch (config.reply.chan) {
830 1.1 mycroft case EISADMA:
831 1.1 mycroft drq = -1;
832 1.1 mycroft break;
833 1.1 mycroft case CHAN0:
834 1.1 mycroft drq = 0;
835 1.1 mycroft break;
836 1.1 mycroft case CHAN5:
837 1.1 mycroft drq = 5;
838 1.1 mycroft break;
839 1.1 mycroft case CHAN6:
840 1.1 mycroft drq = 6;
841 1.1 mycroft break;
842 1.1 mycroft case CHAN7:
843 1.1 mycroft drq = 7;
844 1.1 mycroft break;
845 1.1 mycroft default:
846 1.4 thorpej printf("bha_find: illegal drq setting %x\n",
847 1.4 thorpej config.reply.chan);
848 1.1 mycroft return (0);
849 1.1 mycroft }
850 1.1 mycroft
851 1.1 mycroft switch (config.reply.intr) {
852 1.1 mycroft case INT9:
853 1.1 mycroft irq = 9;
854 1.1 mycroft break;
855 1.1 mycroft case INT10:
856 1.1 mycroft irq = 10;
857 1.1 mycroft break;
858 1.1 mycroft case INT11:
859 1.1 mycroft irq = 11;
860 1.1 mycroft break;
861 1.1 mycroft case INT12:
862 1.1 mycroft irq = 12;
863 1.1 mycroft break;
864 1.1 mycroft case INT14:
865 1.1 mycroft irq = 14;
866 1.1 mycroft break;
867 1.1 mycroft case INT15:
868 1.1 mycroft irq = 15;
869 1.1 mycroft break;
870 1.1 mycroft default:
871 1.4 thorpej printf("bha_find: illegal irq setting %x\n",
872 1.4 thorpej config.reply.intr);
873 1.1 mycroft return (0);
874 1.1 mycroft }
875 1.1 mycroft
876 1.1 mycroft /* if we want to fill in softc, do so now */
877 1.1 mycroft if (sc != NULL) {
878 1.1 mycroft sc->sc_irq = irq;
879 1.1 mycroft sc->sc_drq = drq;
880 1.1 mycroft sc->sc_scsi_dev = config.reply.scsi_dev;
881 1.8 thorpej sc->sc_iswide = iswide;
882 1.1 mycroft }
883 1.1 mycroft
884 1.1 mycroft return (1);
885 1.1 mycroft }
886 1.5 jonathan
887 1.5 jonathan
888 1.5 jonathan /*
889 1.5 jonathan * Disable the ISA-compatiblity ioports on PCI bha devices,
890 1.5 jonathan * to ensure they're not autoconfigured a second time as an ISA bha.
891 1.5 jonathan */
892 1.5 jonathan int
893 1.5 jonathan bha_disable_isacompat(sc)
894 1.5 jonathan struct bha_softc *sc;
895 1.5 jonathan {
896 1.5 jonathan struct bha_isadisable isa_disable;
897 1.5 jonathan
898 1.5 jonathan isa_disable.cmd.opcode = BHA_MODIFY_IOPORT;
899 1.5 jonathan isa_disable.cmd.modifier = BHA_IOMODIFY_DISABLE1;
900 1.5 jonathan bha_cmd(sc->sc_iot, sc->sc_ioh, sc,
901 1.5 jonathan sizeof(isa_disable.cmd), (u_char*)&isa_disable.cmd,
902 1.6 thorpej 0, (u_char *)0);
903 1.5 jonathan return (0);
904 1.5 jonathan }
905 1.5 jonathan
906 1.1 mycroft
907 1.1 mycroft /*
908 1.1 mycroft * Start the board, ready for normal operation
909 1.1 mycroft */
910 1.1 mycroft void
911 1.1 mycroft bha_init(sc)
912 1.1 mycroft struct bha_softc *sc;
913 1.1 mycroft {
914 1.4 thorpej bus_space_tag_t iot = sc->sc_iot;
915 1.4 thorpej bus_space_handle_t ioh = sc->sc_ioh;
916 1.1 mycroft struct bha_devices devices;
917 1.1 mycroft struct bha_setup setup;
918 1.1 mycroft struct bha_mailbox mailbox;
919 1.1 mycroft struct bha_period period;
920 1.8 thorpej int i, rlen;
921 1.1 mycroft
922 1.1 mycroft /* Enable round-robin scheme - appeared at firmware rev. 3.31. */
923 1.1 mycroft if (strcmp(sc->sc_firmware, "3.31") >= 0) {
924 1.1 mycroft struct bha_toggle toggle;
925 1.1 mycroft
926 1.1 mycroft toggle.cmd.opcode = BHA_ROUND_ROBIN;
927 1.1 mycroft toggle.cmd.enable = 1;
928 1.4 thorpej bha_cmd(iot, ioh, sc,
929 1.1 mycroft sizeof(toggle.cmd), (u_char *)&toggle.cmd,
930 1.1 mycroft 0, (u_char *)0);
931 1.1 mycroft }
932 1.1 mycroft
933 1.8 thorpej /*
934 1.8 thorpej * Inquire installed devices (to force synchronous negotiation).
935 1.8 thorpej */
936 1.8 thorpej
937 1.8 thorpej /*
938 1.8 thorpej * Poll targets 0 - 7.
939 1.8 thorpej */
940 1.1 mycroft devices.cmd.opcode = BHA_INQUIRE_DEVICES;
941 1.4 thorpej bha_cmd(iot, ioh, sc,
942 1.1 mycroft sizeof(devices.cmd), (u_char *)&devices.cmd,
943 1.1 mycroft sizeof(devices.reply), (u_char *)&devices.reply);
944 1.1 mycroft
945 1.8 thorpej /*
946 1.8 thorpej * Poll targets 8 - 15 if we have a wide bus.
947 1.8 thorpej */
948 1.8 thorpej if (sc->sc_iswide) {
949 1.8 thorpej devices.cmd.opcode = BHA_INQUIRE_DEVICES_2;
950 1.8 thorpej bha_cmd(iot, ioh, sc,
951 1.8 thorpej sizeof(devices.cmd), (u_char *)&devices.cmd,
952 1.8 thorpej sizeof(devices.reply), (u_char *)&devices.reply);
953 1.8 thorpej }
954 1.8 thorpej
955 1.1 mycroft /* Obtain setup information from. */
956 1.8 thorpej rlen = sizeof(setup.reply) +
957 1.8 thorpej (sc->sc_iswide ? sizeof(setup.reply_w) : 0);
958 1.1 mycroft setup.cmd.opcode = BHA_INQUIRE_SETUP;
959 1.8 thorpej setup.cmd.len = rlen;
960 1.4 thorpej bha_cmd(iot, ioh, sc,
961 1.1 mycroft sizeof(setup.cmd), (u_char *)&setup.cmd,
962 1.8 thorpej rlen, (u_char *)&setup.reply);
963 1.1 mycroft
964 1.3 christos printf("%s: %s, %s\n",
965 1.1 mycroft sc->sc_dev.dv_xname,
966 1.1 mycroft setup.reply.sync_neg ? "sync" : "async",
967 1.1 mycroft setup.reply.parity ? "parity" : "no parity");
968 1.1 mycroft
969 1.1 mycroft for (i = 0; i < 8; i++)
970 1.1 mycroft period.reply.period[i] = setup.reply.sync[i].period * 5 + 20;
971 1.8 thorpej if (sc->sc_iswide) {
972 1.8 thorpej for (i = 0; i < 8; i++)
973 1.8 thorpej period.reply_w.period[i] =
974 1.8 thorpej setup.reply_w.sync[i].period * 5 + 20;
975 1.8 thorpej }
976 1.1 mycroft
977 1.1 mycroft if (sc->sc_firmware[0] >= '3') {
978 1.8 thorpej rlen = sizeof(period.reply) +
979 1.8 thorpej (sc->sc_iswide ? sizeof(period.reply_w) : 0);
980 1.1 mycroft period.cmd.opcode = BHA_INQUIRE_PERIOD;
981 1.8 thorpej period.cmd.len = rlen;
982 1.4 thorpej bha_cmd(iot, ioh, sc,
983 1.1 mycroft sizeof(period.cmd), (u_char *)&period.cmd,
984 1.8 thorpej rlen, (u_char *)&period.reply);
985 1.1 mycroft }
986 1.1 mycroft
987 1.1 mycroft for (i = 0; i < 8; i++) {
988 1.1 mycroft if (!setup.reply.sync[i].valid ||
989 1.4 thorpej (!setup.reply.sync[i].offset &&
990 1.4 thorpej !setup.reply.sync[i].period))
991 1.1 mycroft continue;
992 1.3 christos printf("%s targ %d: sync, offset %d, period %dnsec\n",
993 1.1 mycroft sc->sc_dev.dv_xname, i,
994 1.1 mycroft setup.reply.sync[i].offset, period.reply.period[i] * 10);
995 1.8 thorpej }
996 1.8 thorpej if (sc->sc_iswide) {
997 1.8 thorpej for (i = 0; i < 8; i++) {
998 1.8 thorpej if (!setup.reply_w.sync[i].valid ||
999 1.8 thorpej (!setup.reply_w.sync[i].offset &&
1000 1.8 thorpej !setup.reply_w.sync[i].period))
1001 1.8 thorpej continue;
1002 1.8 thorpej printf("%s targ %d: sync, offset %d, period %dnsec\n",
1003 1.8 thorpej sc->sc_dev.dv_xname, i + 8,
1004 1.8 thorpej setup.reply_w.sync[i].offset,
1005 1.8 thorpej period.reply_w.period[i] * 10);
1006 1.8 thorpej }
1007 1.1 mycroft }
1008 1.1 mycroft
1009 1.1 mycroft /*
1010 1.1 mycroft * Set up initial mail box for round-robin operation.
1011 1.1 mycroft */
1012 1.1 mycroft for (i = 0; i < BHA_MBX_SIZE; i++) {
1013 1.1 mycroft wmbx->mbo[i].cmd = BHA_MBO_FREE;
1014 1.1 mycroft wmbx->mbi[i].stat = BHA_MBI_FREE;
1015 1.1 mycroft }
1016 1.1 mycroft wmbx->cmbo = wmbx->tmbo = &wmbx->mbo[0];
1017 1.1 mycroft wmbx->tmbi = &wmbx->mbi[0];
1018 1.1 mycroft sc->sc_mbofull = 0;
1019 1.1 mycroft
1020 1.1 mycroft /* Initialize mail box. */
1021 1.1 mycroft mailbox.cmd.opcode = BHA_MBX_INIT_EXTENDED;
1022 1.1 mycroft mailbox.cmd.nmbx = BHA_MBX_SIZE;
1023 1.1 mycroft ltophys(KVTOPHYS(wmbx), mailbox.cmd.addr);
1024 1.4 thorpej bha_cmd(iot, ioh, sc,
1025 1.1 mycroft sizeof(mailbox.cmd), (u_char *)&mailbox.cmd,
1026 1.1 mycroft 0, (u_char *)0);
1027 1.1 mycroft }
1028 1.1 mycroft
1029 1.1 mycroft void
1030 1.1 mycroft bha_inquire_setup_information(sc)
1031 1.1 mycroft struct bha_softc *sc;
1032 1.1 mycroft {
1033 1.4 thorpej bus_space_tag_t iot = sc->sc_iot;
1034 1.4 thorpej bus_space_handle_t ioh = sc->sc_ioh;
1035 1.1 mycroft struct bha_model model;
1036 1.1 mycroft struct bha_revision revision;
1037 1.1 mycroft struct bha_digit digit;
1038 1.1 mycroft char *p;
1039 1.1 mycroft
1040 1.1 mycroft /*
1041 1.1 mycroft * Get the firmware revision.
1042 1.1 mycroft */
1043 1.1 mycroft p = sc->sc_firmware;
1044 1.1 mycroft revision.cmd.opcode = BHA_INQUIRE_REVISION;
1045 1.4 thorpej bha_cmd(iot, ioh, sc,
1046 1.1 mycroft sizeof(revision.cmd), (u_char *)&revision.cmd,
1047 1.1 mycroft sizeof(revision.reply), (u_char *)&revision.reply);
1048 1.1 mycroft *p++ = revision.reply.firm_revision;
1049 1.1 mycroft *p++ = '.';
1050 1.1 mycroft *p++ = revision.reply.firm_version;
1051 1.1 mycroft digit.cmd.opcode = BHA_INQUIRE_REVISION_3;
1052 1.4 thorpej bha_cmd(iot, ioh, sc,
1053 1.1 mycroft sizeof(digit.cmd), (u_char *)&digit.cmd,
1054 1.1 mycroft sizeof(digit.reply), (u_char *)&digit.reply);
1055 1.1 mycroft *p++ = digit.reply.digit;
1056 1.1 mycroft if (revision.reply.firm_revision >= '3' ||
1057 1.4 thorpej (revision.reply.firm_revision == '3' &&
1058 1.4 thorpej revision.reply.firm_version >= '3')) {
1059 1.1 mycroft digit.cmd.opcode = BHA_INQUIRE_REVISION_4;
1060 1.4 thorpej bha_cmd(iot, ioh, sc,
1061 1.1 mycroft sizeof(digit.cmd), (u_char *)&digit.cmd,
1062 1.1 mycroft sizeof(digit.reply), (u_char *)&digit.reply);
1063 1.1 mycroft *p++ = digit.reply.digit;
1064 1.1 mycroft }
1065 1.1 mycroft while (p > sc->sc_firmware && (p[-1] == ' ' || p[-1] == '\0'))
1066 1.1 mycroft p--;
1067 1.1 mycroft *p = '\0';
1068 1.1 mycroft
1069 1.1 mycroft /*
1070 1.1 mycroft * Get the model number.
1071 1.1 mycroft */
1072 1.1 mycroft if (revision.reply.firm_revision >= '3') {
1073 1.1 mycroft p = sc->sc_model;
1074 1.1 mycroft model.cmd.opcode = BHA_INQUIRE_MODEL;
1075 1.1 mycroft model.cmd.len = sizeof(model.reply);
1076 1.4 thorpej bha_cmd(iot, ioh, sc,
1077 1.1 mycroft sizeof(model.cmd), (u_char *)&model.cmd,
1078 1.1 mycroft sizeof(model.reply), (u_char *)&model.reply);
1079 1.1 mycroft *p++ = model.reply.id[0];
1080 1.1 mycroft *p++ = model.reply.id[1];
1081 1.1 mycroft *p++ = model.reply.id[2];
1082 1.1 mycroft *p++ = model.reply.id[3];
1083 1.1 mycroft while (p > sc->sc_model && (p[-1] == ' ' || p[-1] == '\0'))
1084 1.1 mycroft p--;
1085 1.1 mycroft *p++ = model.reply.version[0];
1086 1.1 mycroft *p++ = model.reply.version[1];
1087 1.1 mycroft while (p > sc->sc_model && (p[-1] == ' ' || p[-1] == '\0'))
1088 1.1 mycroft p--;
1089 1.1 mycroft *p = '\0';
1090 1.1 mycroft } else
1091 1.1 mycroft strcpy(sc->sc_model, "542B");
1092 1.1 mycroft
1093 1.3 christos printf("%s: model BT-%s, firmware %s\n", sc->sc_dev.dv_xname,
1094 1.1 mycroft sc->sc_model, sc->sc_firmware);
1095 1.1 mycroft }
1096 1.1 mycroft
1097 1.1 mycroft void
1098 1.1 mycroft bhaminphys(bp)
1099 1.1 mycroft struct buf *bp;
1100 1.1 mycroft {
1101 1.1 mycroft
1102 1.1 mycroft if (bp->b_bcount > ((BHA_NSEG - 1) << PGSHIFT))
1103 1.1 mycroft bp->b_bcount = ((BHA_NSEG - 1) << PGSHIFT);
1104 1.1 mycroft minphys(bp);
1105 1.1 mycroft }
1106 1.1 mycroft
1107 1.1 mycroft /*
1108 1.1 mycroft * start a scsi operation given the command and the data address. Also needs
1109 1.1 mycroft * the unit, target and lu.
1110 1.1 mycroft */
1111 1.1 mycroft int
1112 1.1 mycroft bha_scsi_cmd(xs)
1113 1.1 mycroft struct scsi_xfer *xs;
1114 1.1 mycroft {
1115 1.1 mycroft struct scsi_link *sc_link = xs->sc_link;
1116 1.1 mycroft struct bha_softc *sc = sc_link->adapter_softc;
1117 1.1 mycroft struct bha_ccb *ccb;
1118 1.1 mycroft struct bha_scat_gath *sg;
1119 1.1 mycroft int seg; /* scatter gather seg being worked on */
1120 1.1 mycroft u_long thiskv, thisphys, nextphys;
1121 1.1 mycroft int bytes_this_seg, bytes_this_page, datalen, flags;
1122 1.1 mycroft #ifdef TFS
1123 1.1 mycroft struct iovec *iovp;
1124 1.1 mycroft #endif
1125 1.1 mycroft int s;
1126 1.1 mycroft
1127 1.1 mycroft SC_DEBUG(sc_link, SDEV_DB2, ("bha_scsi_cmd\n"));
1128 1.1 mycroft /*
1129 1.1 mycroft * get a ccb to use. If the transfer
1130 1.1 mycroft * is from a buf (possibly from interrupt time)
1131 1.1 mycroft * then we can't allow it to sleep
1132 1.1 mycroft */
1133 1.1 mycroft flags = xs->flags;
1134 1.1 mycroft if ((ccb = bha_get_ccb(sc, flags)) == NULL) {
1135 1.1 mycroft xs->error = XS_DRIVER_STUFFUP;
1136 1.1 mycroft return (TRY_AGAIN_LATER);
1137 1.1 mycroft }
1138 1.1 mycroft ccb->xs = xs;
1139 1.1 mycroft ccb->timeout = xs->timeout;
1140 1.1 mycroft
1141 1.1 mycroft /*
1142 1.1 mycroft * Put all the arguments for the xfer in the ccb
1143 1.1 mycroft */
1144 1.1 mycroft if (flags & SCSI_RESET) {
1145 1.1 mycroft ccb->opcode = BHA_RESET_CCB;
1146 1.1 mycroft ccb->scsi_cmd_length = 0;
1147 1.1 mycroft } else {
1148 1.1 mycroft /* can't use S/G if zero length */
1149 1.1 mycroft ccb->opcode = (xs->datalen ? BHA_INIT_SCAT_GATH_CCB
1150 1.1 mycroft : BHA_INITIATOR_CCB);
1151 1.1 mycroft bcopy(xs->cmd, &ccb->scsi_cmd,
1152 1.1 mycroft ccb->scsi_cmd_length = xs->cmdlen);
1153 1.1 mycroft }
1154 1.1 mycroft
1155 1.1 mycroft if (xs->datalen) {
1156 1.1 mycroft sg = ccb->scat_gath;
1157 1.1 mycroft seg = 0;
1158 1.1 mycroft #ifdef TFS
1159 1.1 mycroft if (flags & SCSI_DATA_UIO) {
1160 1.1 mycroft iovp = ((struct uio *)xs->data)->uio_iov;
1161 1.1 mycroft datalen = ((struct uio *)xs->data)->uio_iovcnt;
1162 1.1 mycroft xs->datalen = 0;
1163 1.1 mycroft while (datalen && seg < BHA_NSEG) {
1164 1.1 mycroft ltophys(iovp->iov_base, sg->seg_addr);
1165 1.1 mycroft ltophys(iovp->iov_len, sg->seg_len);
1166 1.1 mycroft xs->datalen += iovp->iov_len;
1167 1.1 mycroft SC_DEBUGN(sc_link, SDEV_DB4, ("(0x%x@0x%x)",
1168 1.1 mycroft iovp->iov_len, iovp->iov_base));
1169 1.1 mycroft sg++;
1170 1.1 mycroft iovp++;
1171 1.1 mycroft seg++;
1172 1.1 mycroft datalen--;
1173 1.1 mycroft }
1174 1.1 mycroft } else
1175 1.1 mycroft #endif /* TFS */
1176 1.1 mycroft {
1177 1.1 mycroft /*
1178 1.1 mycroft * Set up the scatter-gather block.
1179 1.1 mycroft */
1180 1.1 mycroft SC_DEBUG(sc_link, SDEV_DB4,
1181 1.1 mycroft ("%d @0x%x:- ", xs->datalen, xs->data));
1182 1.1 mycroft
1183 1.1 mycroft datalen = xs->datalen;
1184 1.1 mycroft thiskv = (int)xs->data;
1185 1.1 mycroft thisphys = KVTOPHYS(thiskv);
1186 1.1 mycroft
1187 1.1 mycroft while (datalen && seg < BHA_NSEG) {
1188 1.1 mycroft bytes_this_seg = 0;
1189 1.1 mycroft
1190 1.1 mycroft /* put in the base address */
1191 1.1 mycroft ltophys(thisphys, sg->seg_addr);
1192 1.1 mycroft
1193 1.4 thorpej SC_DEBUGN(sc_link, SDEV_DB4,
1194 1.4 thorpej ("0x%x", thisphys));
1195 1.1 mycroft
1196 1.1 mycroft /* do it at least once */
1197 1.1 mycroft nextphys = thisphys;
1198 1.1 mycroft while (datalen && thisphys == nextphys) {
1199 1.1 mycroft /*
1200 1.1 mycroft * This page is contiguous (physically)
1201 1.1 mycroft * with the the last, just extend the
1202 1.1 mycroft * length
1203 1.1 mycroft */
1204 1.1 mycroft /* how far to the end of the page */
1205 1.4 thorpej nextphys =
1206 1.4 thorpej (thisphys & ~PGOFSET) + NBPG;
1207 1.1 mycroft bytes_this_page = nextphys - thisphys;
1208 1.1 mycroft /**** or the data ****/
1209 1.1 mycroft bytes_this_page = min(bytes_this_page,
1210 1.1 mycroft datalen);
1211 1.1 mycroft bytes_this_seg += bytes_this_page;
1212 1.1 mycroft datalen -= bytes_this_page;
1213 1.1 mycroft
1214 1.1 mycroft /* get more ready for the next page */
1215 1.1 mycroft thiskv = (thiskv & ~PGOFSET) + NBPG;
1216 1.1 mycroft if (datalen)
1217 1.1 mycroft thisphys = KVTOPHYS(thiskv);
1218 1.1 mycroft }
1219 1.1 mycroft /*
1220 1.1 mycroft * next page isn't contiguous, finish the seg
1221 1.1 mycroft */
1222 1.1 mycroft SC_DEBUGN(sc_link, SDEV_DB4,
1223 1.1 mycroft ("(0x%x)", bytes_this_seg));
1224 1.1 mycroft ltophys(bytes_this_seg, sg->seg_len);
1225 1.1 mycroft sg++;
1226 1.1 mycroft seg++;
1227 1.1 mycroft }
1228 1.1 mycroft }
1229 1.1 mycroft /* end of iov/kv decision */
1230 1.1 mycroft SC_DEBUGN(sc_link, SDEV_DB4, ("\n"));
1231 1.1 mycroft if (datalen) {
1232 1.1 mycroft /*
1233 1.1 mycroft * there's still data, must have run out of segs!
1234 1.1 mycroft */
1235 1.3 christos printf("%s: bha_scsi_cmd, more than %d dma segs\n",
1236 1.1 mycroft sc->sc_dev.dv_xname, BHA_NSEG);
1237 1.1 mycroft goto bad;
1238 1.1 mycroft }
1239 1.1 mycroft ltophys(KVTOPHYS(ccb->scat_gath), ccb->data_addr);
1240 1.1 mycroft ltophys(seg * sizeof(struct bha_scat_gath), ccb->data_length);
1241 1.1 mycroft } else { /* No data xfer, use non S/G values */
1242 1.1 mycroft ltophys(0, ccb->data_addr);
1243 1.1 mycroft ltophys(0, ccb->data_length);
1244 1.1 mycroft }
1245 1.1 mycroft
1246 1.1 mycroft ccb->data_out = 0;
1247 1.1 mycroft ccb->data_in = 0;
1248 1.1 mycroft ccb->target = sc_link->target;
1249 1.1 mycroft ccb->lun = sc_link->lun;
1250 1.1 mycroft ltophys(KVTOPHYS(&ccb->scsi_sense), ccb->sense_ptr);
1251 1.1 mycroft ccb->req_sense_length = sizeof(ccb->scsi_sense);
1252 1.1 mycroft ccb->host_stat = 0x00;
1253 1.1 mycroft ccb->target_stat = 0x00;
1254 1.1 mycroft ccb->link_id = 0;
1255 1.1 mycroft ltophys(0, ccb->link_addr);
1256 1.1 mycroft
1257 1.1 mycroft s = splbio();
1258 1.1 mycroft bha_queue_ccb(sc, ccb);
1259 1.1 mycroft splx(s);
1260 1.1 mycroft
1261 1.1 mycroft /*
1262 1.1 mycroft * Usually return SUCCESSFULLY QUEUED
1263 1.1 mycroft */
1264 1.1 mycroft SC_DEBUG(sc_link, SDEV_DB3, ("cmd_sent\n"));
1265 1.1 mycroft if ((flags & SCSI_POLL) == 0)
1266 1.1 mycroft return (SUCCESSFULLY_QUEUED);
1267 1.1 mycroft
1268 1.1 mycroft /*
1269 1.1 mycroft * If we can't use interrupts, poll on completion
1270 1.1 mycroft */
1271 1.1 mycroft if (bha_poll(sc, xs, ccb->timeout)) {
1272 1.1 mycroft bha_timeout(ccb);
1273 1.1 mycroft if (bha_poll(sc, xs, ccb->timeout))
1274 1.1 mycroft bha_timeout(ccb);
1275 1.1 mycroft }
1276 1.1 mycroft return (COMPLETE);
1277 1.1 mycroft
1278 1.1 mycroft bad:
1279 1.1 mycroft xs->error = XS_DRIVER_STUFFUP;
1280 1.1 mycroft bha_free_ccb(sc, ccb);
1281 1.1 mycroft return (COMPLETE);
1282 1.1 mycroft }
1283 1.1 mycroft
1284 1.1 mycroft /*
1285 1.1 mycroft * Poll a particular unit, looking for a particular xs
1286 1.1 mycroft */
1287 1.1 mycroft int
1288 1.1 mycroft bha_poll(sc, xs, count)
1289 1.1 mycroft struct bha_softc *sc;
1290 1.1 mycroft struct scsi_xfer *xs;
1291 1.1 mycroft int count;
1292 1.1 mycroft {
1293 1.4 thorpej bus_space_tag_t iot = sc->sc_iot;
1294 1.4 thorpej bus_space_handle_t ioh = sc->sc_ioh;
1295 1.1 mycroft
1296 1.1 mycroft /* timeouts are in msec, so we loop in 1000 usec cycles */
1297 1.1 mycroft while (count) {
1298 1.1 mycroft /*
1299 1.1 mycroft * If we had interrupts enabled, would we
1300 1.1 mycroft * have got an interrupt?
1301 1.1 mycroft */
1302 1.4 thorpej if (bus_space_read_1(iot, ioh, BHA_INTR_PORT) &
1303 1.4 thorpej BHA_INTR_ANYINTR)
1304 1.1 mycroft bha_intr(sc);
1305 1.1 mycroft if (xs->flags & ITSDONE)
1306 1.1 mycroft return (0);
1307 1.1 mycroft delay(1000); /* only happens in boot so ok */
1308 1.1 mycroft count--;
1309 1.1 mycroft }
1310 1.1 mycroft return (1);
1311 1.1 mycroft }
1312 1.1 mycroft
1313 1.1 mycroft void
1314 1.1 mycroft bha_timeout(arg)
1315 1.1 mycroft void *arg;
1316 1.1 mycroft {
1317 1.1 mycroft struct bha_ccb *ccb = arg;
1318 1.1 mycroft struct scsi_xfer *xs = ccb->xs;
1319 1.1 mycroft struct scsi_link *sc_link = xs->sc_link;
1320 1.1 mycroft struct bha_softc *sc = sc_link->adapter_softc;
1321 1.1 mycroft int s;
1322 1.1 mycroft
1323 1.1 mycroft sc_print_addr(sc_link);
1324 1.3 christos printf("timed out");
1325 1.1 mycroft
1326 1.1 mycroft s = splbio();
1327 1.1 mycroft
1328 1.1 mycroft #ifdef BHADIAG
1329 1.1 mycroft /*
1330 1.1 mycroft * If the ccb's mbx is not free, then the board has gone Far East?
1331 1.1 mycroft */
1332 1.1 mycroft bha_collect_mbo(sc);
1333 1.1 mycroft if (ccb->flags & CCB_SENDING) {
1334 1.3 christos printf("%s: not taking commands!\n", sc->sc_dev.dv_xname);
1335 1.1 mycroft Debugger();
1336 1.1 mycroft }
1337 1.1 mycroft #endif
1338 1.1 mycroft
1339 1.1 mycroft /*
1340 1.1 mycroft * If it has been through before, then
1341 1.1 mycroft * a previous abort has failed, don't
1342 1.1 mycroft * try abort again
1343 1.1 mycroft */
1344 1.1 mycroft if (ccb->flags & CCB_ABORT) {
1345 1.1 mycroft /* abort timed out */
1346 1.3 christos printf(" AGAIN\n");
1347 1.1 mycroft /* XXX Must reset! */
1348 1.1 mycroft } else {
1349 1.1 mycroft /* abort the operation that has timed out */
1350 1.3 christos printf("\n");
1351 1.1 mycroft ccb->xs->error = XS_TIMEOUT;
1352 1.1 mycroft ccb->timeout = BHA_ABORT_TIMEOUT;
1353 1.1 mycroft ccb->flags |= CCB_ABORT;
1354 1.1 mycroft bha_queue_ccb(sc, ccb);
1355 1.1 mycroft }
1356 1.1 mycroft
1357 1.1 mycroft splx(s);
1358 1.1 mycroft }
1359