FreeBSD/Linux Kernel Cross Reference
sys/dev/buslogic/bt.c
1 /*
2 * Generic driver for the BusLogic MultiMaster SCSI host adapters
3 * Product specific probe and attach routines can be found in:
4 * sys/dev/buslogic/bt_isa.c BT-54X, BT-445 cards
5 * sys/dev/buslogic/bt_mca.c BT-64X, SDC3211B, SDC3211F
6 * sys/dev/buslogic/bt_eisa.c BT-74X, BT-75x cards, SDC3222F
7 * sys/dev/buslogic/bt_pci.c BT-946, BT-948, BT-956, BT-958 cards
8 *
9 * Copyright (c) 1998, 1999 Justin T. Gibbs.
10 * All rights reserved.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions, and the following disclaimer,
17 * without modification, immediately at the beginning of the file.
18 * 2. The name of the author may not be used to endorse or promote products
19 * derived from this software without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
25 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
32 *
33 * $FreeBSD$
34 */
35
36 /*
37 * Special thanks to Leonard N. Zubkoff for writing such a complete and
38 * well documented Mylex/BusLogic MultiMaster driver for Linux. Support
39 * in this driver for the wide range of MultiMaster controllers and
40 * firmware revisions, with their otherwise undocumented quirks, would not
41 * have been possible without his efforts.
42 */
43
44 #include <sys/param.h>
45 #include <sys/systm.h>
46 #include <sys/malloc.h>
47 #include <sys/buf.h>
48 #include <sys/kernel.h>
49 #include <sys/sysctl.h>
50 #include <sys/bus.h>
51
52 /*
53 * XXX It appears that BusLogic PCI adapters go out to lunch if you
54 * attempt to perform memory mapped I/O.
55 */
56 #if 0
57 #include "pci.h"
58 #if NPCI > 0
59 #include <machine/bus_memio.h>
60 #endif
61 #endif
62 #include <machine/bus_pio.h>
63 #include <machine/bus.h>
64 #include <machine/clock.h>
65 #include <sys/rman.h>
66
67 #include <cam/cam.h>
68 #include <cam/cam_ccb.h>
69 #include <cam/cam_sim.h>
70 #include <cam/cam_xpt_sim.h>
71 #include <cam/cam_debug.h>
72
73 #include <cam/scsi/scsi_message.h>
74
75 #include <vm/vm.h>
76 #include <vm/pmap.h>
77
78 #include <dev/buslogic/btreg.h>
79
80 #ifndef MAX
81 #define MAX(a, b) ((a) > (b) ? (a) : (b))
82 #endif
83
84 /* MailBox Management functions */
85 static __inline void btnextinbox(struct bt_softc *bt);
86 static __inline void btnextoutbox(struct bt_softc *bt);
87
88 static __inline void
89 btnextinbox(struct bt_softc *bt)
90 {
91 if (bt->cur_inbox == bt->last_inbox)
92 bt->cur_inbox = bt->in_boxes;
93 else
94 bt->cur_inbox++;
95 }
96
97 static __inline void
98 btnextoutbox(struct bt_softc *bt)
99 {
100 if (bt->cur_outbox == bt->last_outbox)
101 bt->cur_outbox = bt->out_boxes;
102 else
103 bt->cur_outbox++;
104 }
105
106 /* CCB Mangement functions */
107 static __inline u_int32_t btccbvtop(struct bt_softc *bt,
108 struct bt_ccb *bccb);
109 static __inline struct bt_ccb* btccbptov(struct bt_softc *bt,
110 u_int32_t ccb_addr);
111 static __inline u_int32_t btsensepaddr(struct bt_softc *bt,
112 struct bt_ccb *bccb);
113 static __inline struct scsi_sense_data* btsensevaddr(struct bt_softc *bt,
114 struct bt_ccb *bccb);
115
116 static __inline u_int32_t
117 btccbvtop(struct bt_softc *bt, struct bt_ccb *bccb)
118 {
119 return (bt->bt_ccb_physbase
120 + (u_int32_t)((caddr_t)bccb - (caddr_t)bt->bt_ccb_array));
121 }
122
123 static __inline struct bt_ccb *
124 btccbptov(struct bt_softc *bt, u_int32_t ccb_addr)
125 {
126 return (bt->bt_ccb_array +
127 ((struct bt_ccb*)ccb_addr-(struct bt_ccb*)bt->bt_ccb_physbase));
128 }
129
130 static __inline u_int32_t
131 btsensepaddr(struct bt_softc *bt, struct bt_ccb *bccb)
132 {
133 u_int index;
134
135 index = (u_int)(bccb - bt->bt_ccb_array);
136 return (bt->sense_buffers_physbase
137 + (index * sizeof(struct scsi_sense_data)));
138 }
139
140 static __inline struct scsi_sense_data *
141 btsensevaddr(struct bt_softc *bt, struct bt_ccb *bccb)
142 {
143 u_int index;
144
145 index = (u_int)(bccb - bt->bt_ccb_array);
146 return (bt->sense_buffers + index);
147 }
148
149 static __inline struct bt_ccb* btgetccb(struct bt_softc *bt);
150 static __inline void btfreeccb(struct bt_softc *bt,
151 struct bt_ccb *bccb);
152 static void btallocccbs(struct bt_softc *bt);
153 static bus_dmamap_callback_t btexecuteccb;
154 static void btdone(struct bt_softc *bt, struct bt_ccb *bccb,
155 bt_mbi_comp_code_t comp_code);
156
157 /* Host adapter command functions */
158 static int btreset(struct bt_softc* bt, int hard_reset);
159
160 /* Initialization functions */
161 static int btinitmboxes(struct bt_softc *bt);
162 static bus_dmamap_callback_t btmapmboxes;
163 static bus_dmamap_callback_t btmapccbs;
164 static bus_dmamap_callback_t btmapsgs;
165
166 /* Transfer Negotiation Functions */
167 static void btfetchtransinfo(struct bt_softc *bt,
168 struct ccb_trans_settings *cts);
169
170 /* CAM SIM entry points */
171 #define ccb_bccb_ptr spriv_ptr0
172 #define ccb_bt_ptr spriv_ptr1
173 static void btaction(struct cam_sim *sim, union ccb *ccb);
174 static void btpoll(struct cam_sim *sim);
175
176 /* Our timeout handler */
177 timeout_t bttimeout;
178
179 u_long bt_unit = 0;
180
181 /*
182 * XXX
183 * Do our own re-probe protection until a configuration
184 * manager can do it for us. This ensures that we don't
185 * reprobe a card already found by the EISA or PCI probes.
186 */
187 struct bt_isa_port bt_isa_ports[] =
188 {
189 { 0x130, 0, 4 },
190 { 0x134, 0, 5 },
191 { 0x230, 0, 2 },
192 { 0x234, 0, 3 },
193 { 0x330, 0, 0 },
194 { 0x334, 0, 1 }
195 };
196
197 /*
198 * I/O ports listed in the order enumerated by the
199 * card for certain op codes.
200 */
201 u_int16_t bt_board_ports[] =
202 {
203 0x330,
204 0x334,
205 0x230,
206 0x234,
207 0x130,
208 0x134
209 };
210
211 /* Exported functions */
212 void
213 bt_init_softc(device_t dev, struct resource *port,
214 struct resource *irq, struct resource *drq)
215 {
216 struct bt_softc *bt = device_get_softc(dev);
217
218 SLIST_INIT(&bt->free_bt_ccbs);
219 LIST_INIT(&bt->pending_ccbs);
220 SLIST_INIT(&bt->sg_maps);
221 bt->dev = dev;
222 bt->unit = device_get_unit(dev);
223 bt->port = port;
224 bt->irq = irq;
225 bt->drq = drq;
226 bt->tag = rman_get_bustag(port);
227 bt->bsh = rman_get_bushandle(port);
228 }
229
230 void
231 bt_free_softc(device_t dev)
232 {
233 struct bt_softc *bt = device_get_softc(dev);
234
235 switch (bt->init_level) {
236 default:
237 case 11:
238 bus_dmamap_unload(bt->sense_dmat, bt->sense_dmamap);
239 case 10:
240 bus_dmamem_free(bt->sense_dmat, bt->sense_buffers,
241 bt->sense_dmamap);
242 case 9:
243 bus_dma_tag_destroy(bt->sense_dmat);
244 case 8:
245 {
246 struct sg_map_node *sg_map;
247
248 while ((sg_map = SLIST_FIRST(&bt->sg_maps))!= NULL) {
249 SLIST_REMOVE_HEAD(&bt->sg_maps, links);
250 bus_dmamap_unload(bt->sg_dmat,
251 sg_map->sg_dmamap);
252 bus_dmamem_free(bt->sg_dmat, sg_map->sg_vaddr,
253 sg_map->sg_dmamap);
254 free(sg_map, M_DEVBUF);
255 }
256 bus_dma_tag_destroy(bt->sg_dmat);
257 }
258 case 7:
259 bus_dmamap_unload(bt->ccb_dmat, bt->ccb_dmamap);
260 case 6:
261 bus_dmamem_free(bt->ccb_dmat, bt->bt_ccb_array,
262 bt->ccb_dmamap);
263 bus_dmamap_destroy(bt->ccb_dmat, bt->ccb_dmamap);
264 case 5:
265 bus_dma_tag_destroy(bt->ccb_dmat);
266 case 4:
267 bus_dmamap_unload(bt->mailbox_dmat, bt->mailbox_dmamap);
268 case 3:
269 bus_dmamem_free(bt->mailbox_dmat, bt->in_boxes,
270 bt->mailbox_dmamap);
271 bus_dmamap_destroy(bt->mailbox_dmat, bt->mailbox_dmamap);
272 case 2:
273 bus_dma_tag_destroy(bt->buffer_dmat);
274 case 1:
275 bus_dma_tag_destroy(bt->mailbox_dmat);
276 case 0:
277 break;
278 }
279 }
280
281 int
282 bt_port_probe(device_t dev, struct bt_probe_info *info)
283 {
284 struct bt_softc *bt = device_get_softc(dev);
285 config_data_t config_data;
286 int error;
287
288 /* See if there is really a card present */
289 if (bt_probe(dev) || bt_fetch_adapter_info(dev))
290 return(1);
291
292 /*
293 * Determine our IRQ, and DMA settings and
294 * export them to the configuration system.
295 */
296 error = bt_cmd(bt, BOP_INQUIRE_CONFIG, NULL, /*parmlen*/0,
297 (u_int8_t*)&config_data, sizeof(config_data),
298 DEFAULT_CMD_TIMEOUT);
299 if (error != 0) {
300 printf("bt_port_probe: Could not determine IRQ or DMA "
301 "settings for adapter.\n");
302 return (1);
303 }
304
305 if (bt->model[0] == '5') {
306 /* DMA settings only make sense for ISA cards */
307 switch (config_data.dma_chan) {
308 case DMA_CHAN_5:
309 info->drq = 5;
310 break;
311 case DMA_CHAN_6:
312 info->drq = 6;
313 break;
314 case DMA_CHAN_7:
315 info->drq = 7;
316 break;
317 default:
318 printf("bt_port_probe: Invalid DMA setting "
319 "detected for adapter.\n");
320 return (1);
321 }
322 } else {
323 /* VL/EISA/PCI DMA */
324 info->drq = -1;
325 }
326 switch (config_data.irq) {
327 case IRQ_9:
328 case IRQ_10:
329 case IRQ_11:
330 case IRQ_12:
331 case IRQ_14:
332 case IRQ_15:
333 info->irq = ffs(config_data.irq) + 8;
334 break;
335 default:
336 printf("bt_port_probe: Invalid IRQ setting %x"
337 "detected for adapter.\n", config_data.irq);
338 return (1);
339 }
340 return (0);
341 }
342
343 /*
344 * Probe the adapter and verify that the card is a BusLogic.
345 */
346 int
347 bt_probe(device_t dev)
348 {
349 struct bt_softc *bt = device_get_softc(dev);
350 esetup_info_data_t esetup_info;
351 u_int status;
352 u_int intstat;
353 u_int geometry;
354 int error;
355 u_int8_t param;
356
357 /*
358 * See if the three I/O ports look reasonable.
359 * Touch the minimal number of registers in the
360 * failure case.
361 */
362 status = bt_inb(bt, STATUS_REG);
363 if ((status == 0)
364 || (status & (DIAG_ACTIVE|CMD_REG_BUSY|
365 STATUS_REG_RSVD|CMD_INVALID)) != 0) {
366 if (bootverbose)
367 device_printf(dev, "Failed Status Reg Test - %x\n",
368 status);
369 return (ENXIO);
370 }
371
372 intstat = bt_inb(bt, INTSTAT_REG);
373 if ((intstat & INTSTAT_REG_RSVD) != 0) {
374 device_printf(dev, "Failed Intstat Reg Test\n");
375 return (ENXIO);
376 }
377
378 geometry = bt_inb(bt, GEOMETRY_REG);
379 if (geometry == 0xFF) {
380 if (bootverbose)
381 device_printf(dev, "Failed Geometry Reg Test\n");
382 return (ENXIO);
383 }
384
385 /*
386 * Looking good so far. Final test is to reset the
387 * adapter and attempt to fetch the extended setup
388 * information. This should filter out all 1542 cards.
389 */
390 if ((error = btreset(bt, /*hard_reset*/TRUE)) != 0) {
391 if (bootverbose)
392 device_printf(dev, "Failed Reset\n");
393 return (ENXIO);
394 }
395
396 param = sizeof(esetup_info);
397 error = bt_cmd(bt, BOP_INQUIRE_ESETUP_INFO, ¶m, /*parmlen*/1,
398 (u_int8_t*)&esetup_info, sizeof(esetup_info),
399 DEFAULT_CMD_TIMEOUT);
400 if (error != 0) {
401 return (ENXIO);
402 }
403
404 return (0);
405 }
406
407 /*
408 * Pull the boards setup information and record it in our softc.
409 */
410 int
411 bt_fetch_adapter_info(device_t dev)
412 {
413 struct bt_softc *bt = device_get_softc(dev);
414 board_id_data_t board_id;
415 esetup_info_data_t esetup_info;
416 config_data_t config_data;
417 int error;
418 u_int8_t length_param;
419
420 /* First record the firmware version */
421 error = bt_cmd(bt, BOP_INQUIRE_BOARD_ID, NULL, /*parmlen*/0,
422 (u_int8_t*)&board_id, sizeof(board_id),
423 DEFAULT_CMD_TIMEOUT);
424 if (error != 0) {
425 device_printf(dev, "bt_fetch_adapter_info - Failed Get Board Info\n");
426 return (error);
427 }
428 bt->firmware_ver[0] = board_id.firmware_rev_major;
429 bt->firmware_ver[1] = '.';
430 bt->firmware_ver[2] = board_id.firmware_rev_minor;
431 bt->firmware_ver[3] = '\0';
432
433 /*
434 * Depending on the firmware major and minor version,
435 * we may be able to fetch additional minor version info.
436 */
437 if (bt->firmware_ver[0] > '') {
438
439 error = bt_cmd(bt, BOP_INQUIRE_FW_VER_3DIG, NULL, /*parmlen*/0,
440 (u_int8_t*)&bt->firmware_ver[3], 1,
441 DEFAULT_CMD_TIMEOUT);
442 if (error != 0) {
443 device_printf(dev,
444 "bt_fetch_adapter_info - Failed Get "
445 "Firmware 3rd Digit\n");
446 return (error);
447 }
448 if (bt->firmware_ver[3] == ' ')
449 bt->firmware_ver[3] = '\0';
450 bt->firmware_ver[4] = '\0';
451 }
452
453 if (strcmp(bt->firmware_ver, "3.3") >= 0) {
454
455 error = bt_cmd(bt, BOP_INQUIRE_FW_VER_4DIG, NULL, /*parmlen*/0,
456 (u_int8_t*)&bt->firmware_ver[4], 1,
457 DEFAULT_CMD_TIMEOUT);
458 if (error != 0) {
459 device_printf(dev,
460 "bt_fetch_adapter_info - Failed Get "
461 "Firmware 4th Digit\n");
462 return (error);
463 }
464 if (bt->firmware_ver[4] == ' ')
465 bt->firmware_ver[4] = '\0';
466 bt->firmware_ver[5] = '\0';
467 }
468
469 /*
470 * Some boards do not handle the "recently documented"
471 * Inquire Board Model Number command correctly or do not give
472 * exact information. Use the Firmware and Extended Setup
473 * information in these cases to come up with the right answer.
474 * The major firmware revision number indicates:
475 *
476 * 5.xx BusLogic "W" Series Host Adapters:
477 * BT-948/958/958D
478 * 4.xx BusLogic "C" Series Host Adapters:
479 * BT-946C/956C/956CD/747C/757C/757CD/445C/545C/540CF
480 * 3.xx BusLogic "S" Series Host Adapters:
481 * BT-747S/747D/757S/757D/445S/545S/542D
482 * BT-542B/742A (revision H)
483 * 2.xx BusLogic "A" Series Host Adapters:
484 * BT-542B/742A (revision G and below)
485 * 0.xx AMI FastDisk VLB/EISA BusLogic Clone Host Adapter
486 */
487 length_param = sizeof(esetup_info);
488 error = bt_cmd(bt, BOP_INQUIRE_ESETUP_INFO, &length_param, /*parmlen*/1,
489 (u_int8_t*)&esetup_info, sizeof(esetup_info),
490 DEFAULT_CMD_TIMEOUT);
491 if (error != 0) {
492 return (error);
493 }
494
495 bt->bios_addr = esetup_info.bios_addr << 12;
496
497 if (esetup_info.bus_type == 'A'
498 && bt->firmware_ver[0] == '2') {
499 snprintf(bt->model, sizeof(bt->model), "542B");
500 } else if (esetup_info.bus_type == 'E'
501 && (strncmp(bt->firmware_ver, "2.1", 3) == 0
502 || strncmp(bt->firmware_ver, "2.20", 4) == 0)) {
503 snprintf(bt->model, sizeof(bt->model), "742A");
504 } else if (esetup_info.bus_type == 'E'
505 && bt->firmware_ver[0] == '') {
506 /* AMI FastDisk EISA Series 441 0.x */
507 snprintf(bt->model, sizeof(bt->model), "747A");
508 } else {
509 ha_model_data_t model_data;
510 int i;
511
512 length_param = sizeof(model_data);
513 error = bt_cmd(bt, BOP_INQUIRE_MODEL, &length_param, 1,
514 (u_int8_t*)&model_data, sizeof(model_data),
515 DEFAULT_CMD_TIMEOUT);
516 if (error != 0) {
517 device_printf(dev,
518 "bt_fetch_adapter_info - Failed Inquire "
519 "Model Number\n");
520 return (error);
521 }
522 for (i = 0; i < sizeof(model_data.ascii_model); i++) {
523 bt->model[i] = model_data.ascii_model[i];
524 if (bt->model[i] == ' ')
525 break;
526 }
527 bt->model[i] = '\0';
528 }
529
530 bt->level_trigger_ints = esetup_info.level_trigger_ints ? 1 : 0;
531
532 /* SG element limits */
533 bt->max_sg = esetup_info.max_sg;
534
535 /* Set feature flags */
536 bt->wide_bus = esetup_info.wide_bus;
537 bt->diff_bus = esetup_info.diff_bus;
538 bt->ultra_scsi = esetup_info.ultra_scsi;
539
540 if ((bt->firmware_ver[0] == '5')
541 || (bt->firmware_ver[0] == '4' && bt->wide_bus))
542 bt->extended_lun = TRUE;
543
544 bt->strict_rr = (strcmp(bt->firmware_ver, "3.31") >= 0);
545
546 bt->extended_trans =
547 ((bt_inb(bt, GEOMETRY_REG) & EXTENDED_TRANSLATION) != 0);
548
549 /*
550 * Determine max CCB count and whether tagged queuing is
551 * available based on controller type. Tagged queuing
552 * only works on 'W' series adapters, 'C' series adapters
553 * with firmware of rev 4.42 and higher, and 'S' series
554 * adapters with firmware of rev 3.35 and higher. The
555 * maximum CCB counts are as follows:
556 *
557 * 192 BT-948/958/958D
558 * 100 BT-946C/956C/956CD/747C/757C/757CD/445C
559 * 50 BT-545C/540CF
560 * 30 BT-747S/747D/757S/757D/445S/545S/542D/542B/742A
561 */
562 if (bt->firmware_ver[0] == '5') {
563 bt->max_ccbs = 192;
564 bt->tag_capable = TRUE;
565 } else if (bt->firmware_ver[0] == '4') {
566 if (bt->model[0] == '5')
567 bt->max_ccbs = 50;
568 else
569 bt->max_ccbs = 100;
570 bt->tag_capable = (strcmp(bt->firmware_ver, "4.22") >= 0);
571 } else {
572 bt->max_ccbs = 30;
573 if (bt->firmware_ver[0] == '3'
574 && (strcmp(bt->firmware_ver, "3.35") >= 0))
575 bt->tag_capable = TRUE;
576 else
577 bt->tag_capable = FALSE;
578 }
579
580 if (bt->tag_capable != FALSE)
581 bt->tags_permitted = ALL_TARGETS;
582
583 /* Determine Sync/Wide/Disc settings */
584 if (bt->firmware_ver[0] >= '4') {
585 auto_scsi_data_t auto_scsi_data;
586 fetch_lram_params_t fetch_lram_params;
587 int error;
588
589 /*
590 * These settings are stored in the
591 * AutoSCSI data in LRAM of 'W' and 'C'
592 * adapters.
593 */
594 fetch_lram_params.offset = AUTO_SCSI_BYTE_OFFSET;
595 fetch_lram_params.response_len = sizeof(auto_scsi_data);
596 error = bt_cmd(bt, BOP_FETCH_LRAM,
597 (u_int8_t*)&fetch_lram_params,
598 sizeof(fetch_lram_params),
599 (u_int8_t*)&auto_scsi_data,
600 sizeof(auto_scsi_data), DEFAULT_CMD_TIMEOUT);
601
602 if (error != 0) {
603 device_printf(dev,
604 "bt_fetch_adapter_info - Failed "
605 "Get Auto SCSI Info\n");
606 return (error);
607 }
608
609 bt->disc_permitted = auto_scsi_data.low_disc_permitted
610 | (auto_scsi_data.high_disc_permitted << 8);
611 bt->sync_permitted = auto_scsi_data.low_sync_permitted
612 | (auto_scsi_data.high_sync_permitted << 8);
613 bt->fast_permitted = auto_scsi_data.low_fast_permitted
614 | (auto_scsi_data.high_fast_permitted << 8);
615 bt->ultra_permitted = auto_scsi_data.low_ultra_permitted
616 | (auto_scsi_data.high_ultra_permitted << 8);
617 bt->wide_permitted = auto_scsi_data.low_wide_permitted
618 | (auto_scsi_data.high_wide_permitted << 8);
619
620 if (bt->ultra_scsi == FALSE)
621 bt->ultra_permitted = 0;
622
623 if (bt->wide_bus == FALSE)
624 bt->wide_permitted = 0;
625 } else {
626 /*
627 * 'S' and 'A' series have this information in the setup
628 * information structure.
629 */
630 setup_data_t setup_info;
631
632 length_param = sizeof(setup_info);
633 error = bt_cmd(bt, BOP_INQUIRE_SETUP_INFO, &length_param,
634 /*paramlen*/1, (u_int8_t*)&setup_info,
635 sizeof(setup_info), DEFAULT_CMD_TIMEOUT);
636
637 if (error != 0) {
638 device_printf(dev,
639 "bt_fetch_adapter_info - Failed "
640 "Get Setup Info\n");
641 return (error);
642 }
643
644 if (setup_info.initiate_sync != 0) {
645 bt->sync_permitted = ALL_TARGETS;
646
647 if (bt->model[0] == '7') {
648 if (esetup_info.sync_neg10MB != 0)
649 bt->fast_permitted = ALL_TARGETS;
650 if (strcmp(bt->model, "757") == 0)
651 bt->wide_permitted = ALL_TARGETS;
652 }
653 }
654 bt->disc_permitted = ALL_TARGETS;
655 }
656
657 /* We need as many mailboxes as we can have ccbs */
658 bt->num_boxes = bt->max_ccbs;
659
660 /* Determine our SCSI ID */
661
662 error = bt_cmd(bt, BOP_INQUIRE_CONFIG, NULL, /*parmlen*/0,
663 (u_int8_t*)&config_data, sizeof(config_data),
664 DEFAULT_CMD_TIMEOUT);
665 if (error != 0) {
666 device_printf(dev,
667 "bt_fetch_adapter_info - Failed Get Config\n");
668 return (error);
669 }
670 bt->scsi_id = config_data.scsi_id;
671
672 return (0);
673 }
674
675 /*
676 * Start the board, ready for normal operation
677 */
678 int
679 bt_init(device_t dev)
680 {
681 struct bt_softc *bt = device_get_softc(dev);
682
683 /* Announce the Adapter */
684 device_printf(dev, "BT-%s FW Rev. %s ", bt->model, bt->firmware_ver);
685
686 if (bt->ultra_scsi != 0)
687 printf("Ultra ");
688
689 if (bt->wide_bus != 0)
690 printf("Wide ");
691 else
692 printf("Narrow ");
693
694 if (bt->diff_bus != 0)
695 printf("Diff ");
696
697 printf("SCSI Host Adapter, SCSI ID %d, %d CCBs\n", bt->scsi_id,
698 bt->max_ccbs);
699
700 /*
701 * Create our DMA tags. These tags define the kinds of device
702 * accessible memory allocations and memory mappings we will
703 * need to perform during normal operation.
704 *
705 * Unless we need to further restrict the allocation, we rely
706 * on the restrictions of the parent dmat, hence the common
707 * use of MAXADDR and MAXSIZE.
708 */
709
710 /* DMA tag for mapping buffers into device visible space. */
711 if (bus_dma_tag_create(bt->parent_dmat, /*alignment*/1, /*boundary*/0,
712 /*lowaddr*/BUS_SPACE_MAXADDR,
713 /*highaddr*/BUS_SPACE_MAXADDR,
714 /*filter*/NULL, /*filterarg*/NULL,
715 /*maxsize*/MAXBSIZE, /*nsegments*/BT_NSEG,
716 /*maxsegsz*/BUS_SPACE_MAXSIZE_32BIT,
717 /*flags*/BUS_DMA_ALLOCNOW,
718 &bt->buffer_dmat) != 0) {
719 goto error_exit;
720 }
721
722 bt->init_level++;
723 /* DMA tag for our mailboxes */
724 if (bus_dma_tag_create(bt->parent_dmat, /*alignment*/1, /*boundary*/0,
725 /*lowaddr*/BUS_SPACE_MAXADDR,
726 /*highaddr*/BUS_SPACE_MAXADDR,
727 /*filter*/NULL, /*filterarg*/NULL,
728 bt->num_boxes * (sizeof(bt_mbox_in_t)
729 + sizeof(bt_mbox_out_t)),
730 /*nsegments*/1,
731 /*maxsegsz*/BUS_SPACE_MAXSIZE_32BIT,
732 /*flags*/0, &bt->mailbox_dmat) != 0) {
733 goto error_exit;
734 }
735
736 bt->init_level++;
737
738 /* Allocation for our mailboxes */
739 if (bus_dmamem_alloc(bt->mailbox_dmat, (void **)&bt->out_boxes,
740 BUS_DMA_NOWAIT, &bt->mailbox_dmamap) != 0) {
741 goto error_exit;
742 }
743
744 bt->init_level++;
745
746 /* And permanently map them */
747 bus_dmamap_load(bt->mailbox_dmat, bt->mailbox_dmamap,
748 bt->out_boxes,
749 bt->num_boxes * (sizeof(bt_mbox_in_t)
750 + sizeof(bt_mbox_out_t)),
751 btmapmboxes, bt, /*flags*/0);
752
753 bt->init_level++;
754
755 bt->in_boxes = (bt_mbox_in_t *)&bt->out_boxes[bt->num_boxes];
756
757 btinitmboxes(bt);
758
759 /* DMA tag for our ccb structures */
760 if (bus_dma_tag_create(bt->parent_dmat, /*alignment*/1, /*boundary*/0,
761 /*lowaddr*/BUS_SPACE_MAXADDR,
762 /*highaddr*/BUS_SPACE_MAXADDR,
763 /*filter*/NULL, /*filterarg*/NULL,
764 bt->max_ccbs * sizeof(struct bt_ccb),
765 /*nsegments*/1,
766 /*maxsegsz*/BUS_SPACE_MAXSIZE_32BIT,
767 /*flags*/0, &bt->ccb_dmat) != 0) {
768 goto error_exit;
769 }
770
771 bt->init_level++;
772
773 /* Allocation for our ccbs */
774 if (bus_dmamem_alloc(bt->ccb_dmat, (void **)&bt->bt_ccb_array,
775 BUS_DMA_NOWAIT, &bt->ccb_dmamap) != 0) {
776 goto error_exit;
777 }
778
779 bt->init_level++;
780
781 /* And permanently map them */
782 bus_dmamap_load(bt->ccb_dmat, bt->ccb_dmamap,
783 bt->bt_ccb_array,
784 bt->max_ccbs * sizeof(struct bt_ccb),
785 btmapccbs, bt, /*flags*/0);
786
787 bt->init_level++;
788
789 /* DMA tag for our S/G structures. We allocate in page sized chunks */
790 if (bus_dma_tag_create(bt->parent_dmat, /*alignment*/1, /*boundary*/0,
791 /*lowaddr*/BUS_SPACE_MAXADDR,
792 /*highaddr*/BUS_SPACE_MAXADDR,
793 /*filter*/NULL, /*filterarg*/NULL,
794 PAGE_SIZE, /*nsegments*/1,
795 /*maxsegsz*/BUS_SPACE_MAXSIZE_32BIT,
796 /*flags*/0, &bt->sg_dmat) != 0) {
797 goto error_exit;
798 }
799
800 bt->init_level++;
801
802 /* Perform initial CCB allocation */
803 bzero(bt->bt_ccb_array, bt->max_ccbs * sizeof(struct bt_ccb));
804 btallocccbs(bt);
805
806 if (bt->num_ccbs == 0) {
807 device_printf(dev,
808 "bt_init - Unable to allocate initial ccbs\n");
809 goto error_exit;
810 }
811
812 /*
813 * Note that we are going and return (to probe)
814 */
815 return 0;
816
817 error_exit:
818
819 return (ENXIO);
820 }
821
822 int
823 bt_attach(device_t dev)
824 {
825 struct bt_softc *bt = device_get_softc(dev);
826 int tagged_dev_openings;
827 struct cam_devq *devq;
828 int error;
829
830 /*
831 * We reserve 1 ccb for error recovery, so don't
832 * tell the XPT about it.
833 */
834 if (bt->tag_capable != 0)
835 tagged_dev_openings = bt->max_ccbs - 1;
836 else
837 tagged_dev_openings = 0;
838
839 /*
840 * Create the device queue for our SIM.
841 */
842 devq = cam_simq_alloc(bt->max_ccbs - 1);
843 if (devq == NULL)
844 return (ENOMEM);
845
846 /*
847 * Construct our SIM entry
848 */
849 bt->sim = cam_sim_alloc(btaction, btpoll, "bt", bt, bt->unit,
850 2, tagged_dev_openings, devq);
851 if (bt->sim == NULL) {
852 cam_simq_free(devq);
853 return (ENOMEM);
854 }
855
856 if (xpt_bus_register(bt->sim, 0) != CAM_SUCCESS) {
857 cam_sim_free(bt->sim, /*free_devq*/TRUE);
858 return (ENXIO);
859 }
860
861 if (xpt_create_path(&bt->path, /*periph*/NULL,
862 cam_sim_path(bt->sim), CAM_TARGET_WILDCARD,
863 CAM_LUN_WILDCARD) != CAM_REQ_CMP) {
864 xpt_bus_deregister(cam_sim_path(bt->sim));
865 cam_sim_free(bt->sim, /*free_devq*/TRUE);
866 return (ENXIO);
867 }
868
869 /*
870 * Setup interrupt.
871 */
872 error = bus_setup_intr(dev, bt->irq, INTR_TYPE_CAM,
873 bt_intr, bt, &bt->ih);
874 if (error) {
875 device_printf(dev, "bus_setup_intr() failed: %d\n", error);
876 return (error);
877 }
878
879 return (0);
880 }
881
882 int
883 bt_check_probed_iop(u_int ioport)
884 {
885 u_int i;
886
887 for (i = 0; i < BT_NUM_ISAPORTS; i++) {
888 if (bt_isa_ports[i].addr == ioport) {
889 if (bt_isa_ports[i].probed != 0)
890 return (1);
891 else {
892 return (0);
893 }
894 }
895 }
896 return (1);
897 }
898
899 void
900 bt_mark_probed_bio(isa_compat_io_t port)
901 {
902 if (port < BIO_DISABLED)
903 bt_mark_probed_iop(bt_board_ports[port]);
904 }
905
906 void
907 bt_mark_probed_iop(u_int ioport)
908 {
909 u_int i;
910
911 for (i = 0; i < BT_NUM_ISAPORTS; i++) {
912 if (ioport == bt_isa_ports[i].addr) {
913 bt_isa_ports[i].probed = 1;
914 break;
915 }
916 }
917 }
918
919 void
920 bt_find_probe_range(int ioport, int *port_index, int *max_port_index)
921 {
922 if (ioport > 0) {
923 int i;
924
925 for (i = 0;i < BT_NUM_ISAPORTS; i++)
926 if (ioport <= bt_isa_ports[i].addr)
927 break;
928 if ((i >= BT_NUM_ISAPORTS)
929 || (ioport != bt_isa_ports[i].addr)) {
930 printf(
931 "bt_find_probe_range: Invalid baseport of 0x%x specified.\n"
932 "bt_find_probe_range: Nearest valid baseport is 0x%x.\n"
933 "bt_find_probe_range: Failing probe.\n",
934 ioport,
935 (i < BT_NUM_ISAPORTS)
936 ? bt_isa_ports[i].addr
937 : bt_isa_ports[BT_NUM_ISAPORTS - 1].addr);
938 *port_index = *max_port_index = -1;
939 return;
940 }
941 *port_index = *max_port_index = bt_isa_ports[i].bio;
942 } else {
943 *port_index = 0;
944 *max_port_index = BT_NUM_ISAPORTS - 1;
945 }
946 }
947
948 int
949 bt_iop_from_bio(isa_compat_io_t bio_index)
950 {
951 if (bio_index >= 0 && bio_index < BT_NUM_ISAPORTS)
952 return (bt_board_ports[bio_index]);
953 return (-1);
954 }
955
956
957 static void
958 btallocccbs(struct bt_softc *bt)
959 {
960 struct bt_ccb *next_ccb;
961 struct sg_map_node *sg_map;
962 bus_addr_t physaddr;
963 bt_sg_t *segs;
964 int newcount;
965 int i;
966
967 if (bt->num_ccbs >= bt->max_ccbs)
968 /* Can't allocate any more */
969 return;
970
971 next_ccb = &bt->bt_ccb_array[bt->num_ccbs];
972
973 sg_map = malloc(sizeof(*sg_map), M_DEVBUF, M_NOWAIT);
974
975 if (sg_map == NULL)
976 goto error_exit;
977
978 /* Allocate S/G space for the next batch of CCBS */
979 if (bus_dmamem_alloc(bt->sg_dmat, (void **)&sg_map->sg_vaddr,
980 BUS_DMA_NOWAIT, &sg_map->sg_dmamap) != 0) {
981 free(sg_map, M_DEVBUF);
982 goto error_exit;
983 }
984
985 SLIST_INSERT_HEAD(&bt->sg_maps, sg_map, links);
986
987 bus_dmamap_load(bt->sg_dmat, sg_map->sg_dmamap, sg_map->sg_vaddr,
988 PAGE_SIZE, btmapsgs, bt, /*flags*/0);
989
990 segs = sg_map->sg_vaddr;
991 physaddr = sg_map->sg_physaddr;
992
993 newcount = (PAGE_SIZE / (BT_NSEG * sizeof(bt_sg_t)));
994 for (i = 0; bt->num_ccbs < bt->max_ccbs && i < newcount; i++) {
995 int error;
996
997 next_ccb->sg_list = segs;
998 next_ccb->sg_list_phys = physaddr;
999 next_ccb->flags = BCCB_FREE;
1000 error = bus_dmamap_create(bt->buffer_dmat, /*flags*/0,
1001 &next_ccb->dmamap);
1002 if (error != 0)
1003 break;
1004 SLIST_INSERT_HEAD(&bt->free_bt_ccbs, next_ccb, links);
1005 segs += BT_NSEG;
1006 physaddr += (BT_NSEG * sizeof(bt_sg_t));
1007 next_ccb++;
1008 bt->num_ccbs++;
1009 }
1010
1011 /* Reserve a CCB for error recovery */
1012 if (bt->recovery_bccb == NULL) {
1013 bt->recovery_bccb = SLIST_FIRST(&bt->free_bt_ccbs);
1014 SLIST_REMOVE_HEAD(&bt->free_bt_ccbs, links);
1015 }
1016
1017 if (SLIST_FIRST(&bt->free_bt_ccbs) != NULL)
1018 return;
1019
1020 error_exit:
1021 device_printf(bt->dev, "Can't malloc BCCBs\n");
1022 }
1023
1024 static __inline void
1025 btfreeccb(struct bt_softc *bt, struct bt_ccb *bccb)
1026 {
1027 int s;
1028
1029 s = splcam();
1030 if ((bccb->flags & BCCB_ACTIVE) != 0)
1031 LIST_REMOVE(&bccb->ccb->ccb_h, sim_links.le);
1032 if (bt->resource_shortage != 0
1033 && (bccb->ccb->ccb_h.status & CAM_RELEASE_SIMQ) == 0) {
1034 bccb->ccb->ccb_h.status |= CAM_RELEASE_SIMQ;
1035 bt->resource_shortage = FALSE;
1036 }
1037 bccb->flags = BCCB_FREE;
1038 SLIST_INSERT_HEAD(&bt->free_bt_ccbs, bccb, links);
1039 bt->active_ccbs--;
1040 splx(s);
1041 }
1042
1043 static __inline struct bt_ccb*
1044 btgetccb(struct bt_softc *bt)
1045 {
1046 struct bt_ccb* bccb;
1047 int s;
1048
1049 s = splcam();
1050 if ((bccb = SLIST_FIRST(&bt->free_bt_ccbs)) != NULL) {
1051 SLIST_REMOVE_HEAD(&bt->free_bt_ccbs, links);
1052 bt->active_ccbs++;
1053 } else {
1054 btallocccbs(bt);
1055 bccb = SLIST_FIRST(&bt->free_bt_ccbs);
1056 if (bccb != NULL) {
1057 SLIST_REMOVE_HEAD(&bt->free_bt_ccbs, links);
1058 bt->active_ccbs++;
1059 }
1060 }
1061 splx(s);
1062
1063 return (bccb);
1064 }
1065
1066 static void
1067 btaction(struct cam_sim *sim, union ccb *ccb)
1068 {
1069 struct bt_softc *bt;
1070
1071 CAM_DEBUG(ccb->ccb_h.path, CAM_DEBUG_TRACE, ("btaction\n"));
1072
1073 bt = (struct bt_softc *)cam_sim_softc(sim);
1074
1075 switch (ccb->ccb_h.func_code) {
1076 /* Common cases first */
1077 case XPT_SCSI_IO: /* Execute the requested I/O operation */
1078 case XPT_RESET_DEV: /* Bus Device Reset the specified SCSI device */
1079 {
1080 struct bt_ccb *bccb;
1081 struct bt_hccb *hccb;
1082
1083 /*
1084 * get a bccb to use.
1085 */
1086 if ((bccb = btgetccb(bt)) == NULL) {
1087 int s;
1088
1089 s = splcam();
1090 bt->resource_shortage = TRUE;
1091 splx(s);
1092 xpt_freeze_simq(bt->sim, /*count*/1);
1093 ccb->ccb_h.status = CAM_REQUEUE_REQ;
1094 xpt_done(ccb);
1095 return;
1096 }
1097
1098 hccb = &bccb->hccb;
1099
1100 /*
1101 * So we can find the BCCB when an abort is requested
1102 */
1103 bccb->ccb = ccb;
1104 ccb->ccb_h.ccb_bccb_ptr = bccb;
1105 ccb->ccb_h.ccb_bt_ptr = bt;
1106
1107 /*
1108 * Put all the arguments for the xfer in the bccb
1109 */
1110 hccb->target_id = ccb->ccb_h.target_id;
1111 hccb->target_lun = ccb->ccb_h.target_lun;
1112 hccb->btstat = 0;
1113 hccb->sdstat = 0;
1114
1115 if (ccb->ccb_h.func_code == XPT_SCSI_IO) {
1116 struct ccb_scsiio *csio;
1117 struct ccb_hdr *ccbh;
1118
1119 csio = &ccb->csio;
1120 ccbh = &csio->ccb_h;
1121 hccb->opcode = INITIATOR_CCB_WRESID;
1122 hccb->datain = (ccb->ccb_h.flags & CAM_DIR_IN) ? 1 : 0;
1123 hccb->dataout =(ccb->ccb_h.flags & CAM_DIR_OUT) ? 1 : 0;
1124 hccb->cmd_len = csio->cdb_len;
1125 if (hccb->cmd_len > sizeof(hccb->scsi_cdb)) {
1126 ccb->ccb_h.status = CAM_REQ_INVALID;
1127 btfreeccb(bt, bccb);
1128 xpt_done(ccb);
1129 return;
1130 }
1131 hccb->sense_len = csio->sense_len;
1132 if ((ccbh->flags & CAM_TAG_ACTION_VALID) != 0
1133 && ccb->csio.tag_action != CAM_TAG_ACTION_NONE) {
1134 hccb->tag_enable = TRUE;
1135 hccb->tag_type = (ccb->csio.tag_action & 0x3);
1136 } else {
1137 hccb->tag_enable = FALSE;
1138 hccb->tag_type = 0;
1139 }
1140 if ((ccbh->flags & CAM_CDB_POINTER) != 0) {
1141 if ((ccbh->flags & CAM_CDB_PHYS) == 0) {
1142 bcopy(csio->cdb_io.cdb_ptr,
1143 hccb->scsi_cdb, hccb->cmd_len);
1144 } else {
1145 /* I guess I could map it in... */
1146 ccbh->status = CAM_REQ_INVALID;
1147 btfreeccb(bt, bccb);
1148 xpt_done(ccb);
1149 return;
1150 }
1151 } else {
1152 bcopy(csio->cdb_io.cdb_bytes,
1153 hccb->scsi_cdb, hccb->cmd_len);
1154 }
1155 /* If need be, bounce our sense buffer */
1156 if (bt->sense_buffers != NULL) {
1157 hccb->sense_addr = btsensepaddr(bt, bccb);
1158 } else {
1159 hccb->sense_addr = vtophys(&csio->sense_data);
1160 }
1161 /*
1162 * If we have any data to send with this command,
1163 * map it into bus space.
1164 */
1165 /* Only use S/G if there is a transfer */
1166 if ((ccbh->flags & CAM_DIR_MASK) != CAM_DIR_NONE) {
1167 if ((ccbh->flags & CAM_SCATTER_VALID) == 0) {
1168 /*
1169 * We've been given a pointer
1170 * to a single buffer.
1171 */
1172 if ((ccbh->flags & CAM_DATA_PHYS)==0) {
1173 int s;
1174 int error;
1175
1176 s = splsoftvm();
1177 error = bus_dmamap_load(
1178 bt->buffer_dmat,
1179 bccb->dmamap,
1180 csio->data_ptr,
1181 csio->dxfer_len,
1182 btexecuteccb,
1183 bccb,
1184 /*flags*/0);
1185 if (error == EINPROGRESS) {
1186 /*
1187 * So as to maintain
1188 * ordering, freeze the
1189 * controller queue
1190 * until our mapping is
1191 * returned.
1192 */
1193 xpt_freeze_simq(bt->sim,
1194 1);
1195 csio->ccb_h.status |=
1196 CAM_RELEASE_SIMQ;
1197 }
1198 splx(s);
1199 } else {
1200 struct bus_dma_segment seg;
1201
1202 /* Pointer to physical buffer */
1203 seg.ds_addr =
1204 (bus_addr_t)csio->data_ptr;
1205 seg.ds_len = csio->dxfer_len;
1206 btexecuteccb(bccb, &seg, 1, 0);
1207 }
1208 } else {
1209 struct bus_dma_segment *segs;
1210
1211 if ((ccbh->flags & CAM_DATA_PHYS) != 0)
1212 panic("btaction - Physical "
1213 "segment pointers "
1214 "unsupported");
1215
1216 if ((ccbh->flags&CAM_SG_LIST_PHYS)==0)
1217 panic("btaction - Virtual "
1218 "segment addresses "
1219 "unsupported");
1220
1221 /* Just use the segments provided */
1222 segs = (struct bus_dma_segment *)
1223 csio->data_ptr;
1224 btexecuteccb(bccb, segs,
1225 csio->sglist_cnt, 0);
1226 }
1227 } else {
1228 btexecuteccb(bccb, NULL, 0, 0);
1229 }
1230 } else {
1231 hccb->opcode = INITIATOR_BUS_DEV_RESET;
1232 /* No data transfer */
1233 hccb->datain = TRUE;
1234 hccb->dataout = TRUE;
1235 hccb->cmd_len = 0;
1236 hccb->sense_len = 0;
1237 hccb->tag_enable = FALSE;
1238 hccb->tag_type = 0;
1239 btexecuteccb(bccb, NULL, 0, 0);
1240 }
1241 break;
1242 }
1243 case XPT_EN_LUN: /* Enable LUN as a target */
1244 case XPT_TARGET_IO: /* Execute target I/O request */
1245 case XPT_ACCEPT_TARGET_IO: /* Accept Host Target Mode CDB */
1246 case XPT_CONT_TARGET_IO: /* Continue Host Target I/O Connection*/
1247 case XPT_ABORT: /* Abort the specified CCB */
1248 /* XXX Implement */
1249 ccb->ccb_h.status = CAM_REQ_INVALID;
1250 xpt_done(ccb);
1251 break;
1252 case XPT_SET_TRAN_SETTINGS:
1253 {
1254 /* XXX Implement */
1255 ccb->ccb_h.status = CAM_PROVIDE_FAIL;
1256 xpt_done(ccb);
1257 break;
1258 }
1259 case XPT_GET_TRAN_SETTINGS:
1260 /* Get default/user set transfer settings for the target */
1261 {
1262 struct ccb_trans_settings *cts;
1263 u_int target_mask;
1264
1265 cts = &ccb->cts;
1266 target_mask = 0x01 << ccb->ccb_h.target_id;
1267 if ((cts->flags & CCB_TRANS_USER_SETTINGS) != 0) {
1268 cts->flags = 0;
1269 if ((bt->disc_permitted & target_mask) != 0)
1270 cts->flags |= CCB_TRANS_DISC_ENB;
1271 if ((bt->tags_permitted & target_mask) != 0)
1272 cts->flags |= CCB_TRANS_TAG_ENB;
1273 if ((bt->wide_permitted & target_mask) != 0)
1274 cts->bus_width = MSG_EXT_WDTR_BUS_16_BIT;
1275 else
1276 cts->bus_width = MSG_EXT_WDTR_BUS_8_BIT;
1277 if ((bt->ultra_permitted & target_mask) != 0)
1278 cts->sync_period = 12;
1279 else if ((bt->fast_permitted & target_mask) != 0)
1280 cts->sync_period = 25;
1281 else if ((bt->sync_permitted & target_mask) != 0)
1282 cts->sync_period = 50;
1283 else
1284 cts->sync_period = 0;
1285
1286 if (cts->sync_period != 0)
1287 cts->sync_offset = 15;
1288
1289 cts->valid = CCB_TRANS_SYNC_RATE_VALID
1290 | CCB_TRANS_SYNC_OFFSET_VALID
1291 | CCB_TRANS_BUS_WIDTH_VALID
1292 | CCB_TRANS_DISC_VALID
1293 | CCB_TRANS_TQ_VALID;
1294 } else {
1295 btfetchtransinfo(bt, cts);
1296 }
1297
1298 ccb->ccb_h.status = CAM_REQ_CMP;
1299 xpt_done(ccb);
1300 break;
1301 }
1302 case XPT_CALC_GEOMETRY:
1303 {
1304 struct ccb_calc_geometry *ccg;
1305 u_int32_t size_mb;
1306 u_int32_t secs_per_cylinder;
1307
1308 ccg = &ccb->ccg;
1309 size_mb = ccg->volume_size
1310 / ((1024L * 1024L) / ccg->block_size);
1311
1312 if (size_mb >= 1024 && (bt->extended_trans != 0)) {
1313 if (size_mb >= 2048) {
1314 ccg->heads = 255;
1315 ccg->secs_per_track = 63;
1316 } else {
1317 ccg->heads = 128;
1318 ccg->secs_per_track = 32;
1319 }
1320 } else {
1321 ccg->heads = 64;
1322 ccg->secs_per_track = 32;
1323 }
1324 secs_per_cylinder = ccg->heads * ccg->secs_per_track;
1325 ccg->cylinders = ccg->volume_size / secs_per_cylinder;
1326 ccb->ccb_h.status = CAM_REQ_CMP;
1327 xpt_done(ccb);
1328 break;
1329 }
1330 case XPT_RESET_BUS: /* Reset the specified SCSI bus */
1331 {
1332 btreset(bt, /*hardreset*/TRUE);
1333 ccb->ccb_h.status = CAM_REQ_CMP;
1334 xpt_done(ccb);
1335 break;
1336 }
1337 case XPT_TERM_IO: /* Terminate the I/O process */
1338 /* XXX Implement */
1339 ccb->ccb_h.status = CAM_REQ_INVALID;
1340 xpt_done(ccb);
1341 break;
1342 case XPT_PATH_INQ: /* Path routing inquiry */
1343 {
1344 struct ccb_pathinq *cpi = &ccb->cpi;
1345
1346 cpi->version_num = 1; /* XXX??? */
1347 cpi->hba_inquiry = PI_SDTR_ABLE;
1348 if (bt->tag_capable != 0)
1349 cpi->hba_inquiry |= PI_TAG_ABLE;
1350 if (bt->wide_bus != 0)
1351 cpi->hba_inquiry |= PI_WIDE_16;
1352 cpi->target_sprt = 0;
1353 cpi->hba_misc = 0;
1354 cpi->hba_eng_cnt = 0;
1355 cpi->max_target = bt->wide_bus ? 15 : 7;
1356 cpi->max_lun = 7;
1357 cpi->initiator_id = bt->scsi_id;
1358 cpi->bus_id = cam_sim_bus(sim);
1359 cpi->base_transfer_speed = 3300;
1360 strncpy(cpi->sim_vid, "FreeBSD", SIM_IDLEN);
1361 strncpy(cpi->hba_vid, "BusLogic", HBA_IDLEN);
1362 strncpy(cpi->dev_name, cam_sim_name(sim), DEV_IDLEN);
1363 cpi->unit_number = cam_sim_unit(sim);
1364 cpi->ccb_h.status = CAM_REQ_CMP;
1365 xpt_done(ccb);
1366 break;
1367 }
1368 default:
1369 ccb->ccb_h.status = CAM_REQ_INVALID;
1370 xpt_done(ccb);
1371 break;
1372 }
1373 }
1374
1375 static void
1376 btexecuteccb(void *arg, bus_dma_segment_t *dm_segs, int nseg, int error)
1377 {
1378 struct bt_ccb *bccb;
1379 union ccb *ccb;
1380 struct bt_softc *bt;
1381 int s;
1382
1383 bccb = (struct bt_ccb *)arg;
1384 ccb = bccb->ccb;
1385 bt = (struct bt_softc *)ccb->ccb_h.ccb_bt_ptr;
1386
1387 if (error != 0) {
1388 if (error != EFBIG)
1389 device_printf(bt->dev,
1390 "Unexepected error 0x%x returned from "
1391 "bus_dmamap_load\n", error);
1392 if (ccb->ccb_h.status == CAM_REQ_INPROG) {
1393 xpt_freeze_devq(ccb->ccb_h.path, /*count*/1);
1394 ccb->ccb_h.status = CAM_REQ_TOO_BIG|CAM_DEV_QFRZN;
1395 }
1396 btfreeccb(bt, bccb);
1397 xpt_done(ccb);
1398 return;
1399 }
1400
1401 if (nseg != 0) {
1402 bt_sg_t *sg;
1403 bus_dma_segment_t *end_seg;
1404 bus_dmasync_op_t op;
1405
1406 end_seg = dm_segs + nseg;
1407
1408 /* Copy the segments into our SG list */
1409 sg = bccb->sg_list;
1410 while (dm_segs < end_seg) {
1411 sg->len = dm_segs->ds_len;
1412 sg->addr = dm_segs->ds_addr;
1413 sg++;
1414 dm_segs++;
1415 }
1416
1417 if (nseg > 1) {
1418 bccb->hccb.opcode = INITIATOR_SG_CCB_WRESID;
1419 bccb->hccb.data_len = sizeof(bt_sg_t) * nseg;
1420 bccb->hccb.data_addr = bccb->sg_list_phys;
1421 } else {
1422 bccb->hccb.data_len = bccb->sg_list->len;
1423 bccb->hccb.data_addr = bccb->sg_list->addr;
1424 }
1425
1426 if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN)
1427 op = BUS_DMASYNC_PREREAD;
1428 else
1429 op = BUS_DMASYNC_PREWRITE;
1430
1431 bus_dmamap_sync(bt->buffer_dmat, bccb->dmamap, op);
1432
1433 } else {
1434 bccb->hccb.opcode = INITIATOR_CCB;
1435 bccb->hccb.data_len = 0;
1436 bccb->hccb.data_addr = 0;
1437 }
1438
1439 s = splcam();
1440
1441 /*
1442 * Last time we need to check if this CCB needs to
1443 * be aborted.
1444 */
1445 if (ccb->ccb_h.status != CAM_REQ_INPROG) {
1446 if (nseg != 0)
1447 bus_dmamap_unload(bt->buffer_dmat, bccb->dmamap);
1448 btfreeccb(bt, bccb);
1449 xpt_done(ccb);
1450 splx(s);
1451 return;
1452 }
1453
1454 bccb->flags = BCCB_ACTIVE;
1455 ccb->ccb_h.status |= CAM_SIM_QUEUED;
1456 LIST_INSERT_HEAD(&bt->pending_ccbs, &ccb->ccb_h, sim_links.le);
1457
1458 ccb->ccb_h.timeout_ch =
1459 timeout(bttimeout, (caddr_t)bccb,
1460 (ccb->ccb_h.timeout * hz) / 1000);
1461
1462 /* Tell the adapter about this command */
1463 bt->cur_outbox->ccb_addr = btccbvtop(bt, bccb);
1464 if (bt->cur_outbox->action_code != BMBO_FREE) {
1465 /*
1466 * We should never encounter a busy mailbox.
1467 * If we do, warn the user, and treat it as
1468 * a resource shortage. If the controller is
1469 * hung, one of the pending transactions will
1470 * timeout causing us to start recovery operations.
1471 */
1472 device_printf(bt->dev,
1473 "Encountered busy mailbox with %d out of %d "
1474 "commands active!!!\n", bt->active_ccbs,
1475 bt->max_ccbs);
1476 untimeout(bttimeout, bccb, ccb->ccb_h.timeout_ch);
1477 if (nseg != 0)
1478 bus_dmamap_unload(bt->buffer_dmat, bccb->dmamap);
1479 btfreeccb(bt, bccb);
1480 bt->resource_shortage = TRUE;
1481 xpt_freeze_simq(bt->sim, /*count*/1);
1482 ccb->ccb_h.status = CAM_REQUEUE_REQ;
1483 xpt_done(ccb);
1484 return;
1485 }
1486 bt->cur_outbox->action_code = BMBO_START;
1487 bt_outb(bt, COMMAND_REG, BOP_START_MBOX);
1488 btnextoutbox(bt);
1489 splx(s);
1490 }
1491
1492 void
1493 bt_intr(void *arg)
1494 {
1495 struct bt_softc *bt;
1496 u_int intstat;
1497
1498 bt = (struct bt_softc *)arg;
1499 while (((intstat = bt_inb(bt, INTSTAT_REG)) & INTR_PENDING) != 0) {
1500
1501 if ((intstat & CMD_COMPLETE) != 0) {
1502 bt->latched_status = bt_inb(bt, STATUS_REG);
1503 bt->command_cmp = TRUE;
1504 }
1505
1506 bt_outb(bt, CONTROL_REG, RESET_INTR);
1507
1508 if ((intstat & IMB_LOADED) != 0) {
1509 while (bt->cur_inbox->comp_code != BMBI_FREE) {
1510 btdone(bt,
1511 btccbptov(bt, bt->cur_inbox->ccb_addr),
1512 bt->cur_inbox->comp_code);
1513 bt->cur_inbox->comp_code = BMBI_FREE;
1514 btnextinbox(bt);
1515 }
1516 }
1517
1518 if ((intstat & SCSI_BUS_RESET) != 0) {
1519 btreset(bt, /*hardreset*/FALSE);
1520 }
1521 }
1522 }
1523
1524 static void
1525 btdone(struct bt_softc *bt, struct bt_ccb *bccb, bt_mbi_comp_code_t comp_code)
1526 {
1527 union ccb *ccb;
1528 struct ccb_scsiio *csio;
1529
1530 ccb = bccb->ccb;
1531 csio = &bccb->ccb->csio;
1532
1533 if ((bccb->flags & BCCB_ACTIVE) == 0) {
1534 device_printf(bt->dev,
1535 "btdone - Attempt to free non-active BCCB %p\n",
1536 (void *)bccb);
1537 return;
1538 }
1539
1540 if ((ccb->ccb_h.flags & CAM_DIR_MASK) != CAM_DIR_NONE) {
1541 bus_dmasync_op_t op;
1542
1543 if ((ccb->ccb_h.flags & CAM_DIR_MASK) == CAM_DIR_IN)
1544 op = BUS_DMASYNC_POSTREAD;
1545 else
1546 op = BUS_DMASYNC_POSTWRITE;
1547 bus_dmamap_sync(bt->buffer_dmat, bccb->dmamap, op);
1548 bus_dmamap_unload(bt->buffer_dmat, bccb->dmamap);
1549 }
1550
1551 if (bccb == bt->recovery_bccb) {
1552 /*
1553 * The recovery BCCB does not have a CCB associated
1554 * with it, so short circuit the normal error handling.
1555 * We now traverse our list of pending CCBs and process
1556 * any that were terminated by the recovery CCBs action.
1557 * We also reinstate timeouts for all remaining, pending,
1558 * CCBs.
1559 */
1560 struct cam_path *path;
1561 struct ccb_hdr *ccb_h;
1562 cam_status error;
1563
1564 /* Notify all clients that a BDR occured */
1565 error = xpt_create_path(&path, /*periph*/NULL,
1566 cam_sim_path(bt->sim),
1567 bccb->hccb.target_id,
1568 CAM_LUN_WILDCARD);
1569
1570 if (error == CAM_REQ_CMP)
1571 xpt_async(AC_SENT_BDR, path, NULL);
1572
1573 ccb_h = LIST_FIRST(&bt->pending_ccbs);
1574 while (ccb_h != NULL) {
1575 struct bt_ccb *pending_bccb;
1576
1577 pending_bccb = (struct bt_ccb *)ccb_h->ccb_bccb_ptr;
1578 if (pending_bccb->hccb.target_id
1579 == bccb->hccb.target_id) {
1580 pending_bccb->hccb.btstat = BTSTAT_HA_BDR;
1581 ccb_h = LIST_NEXT(ccb_h, sim_links.le);
1582 btdone(bt, pending_bccb, BMBI_ERROR);
1583 } else {
1584 ccb_h->timeout_ch =
1585 timeout(bttimeout, (caddr_t)pending_bccb,
1586 (ccb_h->timeout * hz) / 1000);
1587 ccb_h = LIST_NEXT(ccb_h, sim_links.le);
1588 }
1589 }
1590 device_printf(bt->dev, "No longer in timeout\n");
1591 return;
1592 }
1593
1594 untimeout(bttimeout, bccb, ccb->ccb_h.timeout_ch);
1595
1596 switch (comp_code) {
1597 case BMBI_FREE:
1598 device_printf(bt->dev,
1599 "btdone - CCB completed with free status!\n");
1600 break;
1601 case BMBI_NOT_FOUND:
1602 device_printf(bt->dev,
1603 "btdone - CCB Abort failed to find CCB\n");
1604 break;
1605 case BMBI_ABORT:
1606 case BMBI_ERROR:
1607 if (bootverbose) {
1608 printf("bt: ccb %p - error %x occured. "
1609 "btstat = %x, sdstat = %x\n",
1610 (void *)bccb, comp_code, bccb->hccb.btstat,
1611 bccb->hccb.sdstat);
1612 }
1613 /* An error occured */
1614 switch(bccb->hccb.btstat) {
1615 case BTSTAT_DATARUN_ERROR:
1616 if (bccb->hccb.data_len == 0) {
1617 /*
1618 * At least firmware 4.22, does this
1619 * for a QUEUE FULL condition.
1620 */
1621 bccb->hccb.sdstat = SCSI_STATUS_QUEUE_FULL;
1622 } else if (bccb->hccb.data_len < 0) {
1623 csio->ccb_h.status = CAM_DATA_RUN_ERR;
1624 break;
1625 }
1626 /* FALLTHROUGH */
1627 case BTSTAT_NOERROR:
1628 case BTSTAT_LINKED_CMD_COMPLETE:
1629 case BTSTAT_LINKED_CMD_FLAG_COMPLETE:
1630 case BTSTAT_DATAUNDERUN_ERROR:
1631
1632 csio->scsi_status = bccb->hccb.sdstat;
1633 csio->ccb_h.status |= CAM_SCSI_STATUS_ERROR;
1634 switch(csio->scsi_status) {
1635 case SCSI_STATUS_CHECK_COND:
1636 case SCSI_STATUS_CMD_TERMINATED:
1637 csio->ccb_h.status |= CAM_AUTOSNS_VALID;
1638 /* Bounce sense back if necessary */
1639 if (bt->sense_buffers != NULL) {
1640 csio->sense_data =
1641 *btsensevaddr(bt, bccb);
1642 }
1643 break;
1644 default:
1645 break;
1646 case SCSI_STATUS_OK:
1647 csio->ccb_h.status = CAM_REQ_CMP;
1648 break;
1649 }
1650 csio->resid = bccb->hccb.data_len;
1651 break;
1652 case BTSTAT_SELTIMEOUT:
1653 csio->ccb_h.status = CAM_SEL_TIMEOUT;
1654 break;
1655 case BTSTAT_UNEXPECTED_BUSFREE:
1656 csio->ccb_h.status = CAM_UNEXP_BUSFREE;
1657 break;
1658 case BTSTAT_INVALID_PHASE:
1659 csio->ccb_h.status = CAM_SEQUENCE_FAIL;
1660 break;
1661 case BTSTAT_INVALID_ACTION_CODE:
1662 panic("%s: Inavlid Action code", bt_name(bt));
1663 break;
1664 case BTSTAT_INVALID_OPCODE:
1665 panic("%s: Inavlid CCB Opcode code", bt_name(bt));
1666 break;
1667 case BTSTAT_LINKED_CCB_LUN_MISMATCH:
1668 /* We don't even support linked commands... */
1669 panic("%s: Linked CCB Lun Mismatch", bt_name(bt));
1670 break;
1671 case BTSTAT_INVALID_CCB_OR_SG_PARAM:
1672 panic("%s: Invalid CCB or SG list", bt_name(bt));
1673 break;
1674 case BTSTAT_AUTOSENSE_FAILED:
1675 csio->ccb_h.status = CAM_AUTOSENSE_FAIL;
1676 break;
1677 case BTSTAT_TAGGED_MSG_REJECTED:
1678 {
1679 struct ccb_trans_settings neg;
1680
1681 xpt_print_path(csio->ccb_h.path);
1682 printf("refuses tagged commands. Performing "
1683 "non-tagged I/O\n");
1684 neg.flags = 0;
1685 neg.valid = CCB_TRANS_TQ_VALID;
1686 xpt_setup_ccb(&neg.ccb_h, csio->ccb_h.path,
1687 /*priority*/1);
1688 xpt_async(AC_TRANSFER_NEG, csio->ccb_h.path, &neg);
1689 bt->tags_permitted &= ~(0x01 << csio->ccb_h.target_id);
1690 csio->ccb_h.status = CAM_MSG_REJECT_REC;
1691 break;
1692 }
1693 case BTSTAT_UNSUPPORTED_MSG_RECEIVED:
1694 /*
1695 * XXX You would think that this is
1696 * a recoverable error... Hmmm.
1697 */
1698 csio->ccb_h.status = CAM_REQ_CMP_ERR;
1699 break;
1700 case BTSTAT_HA_SOFTWARE_ERROR:
1701 case BTSTAT_HA_WATCHDOG_ERROR:
1702 case BTSTAT_HARDWARE_FAILURE:
1703 /* Hardware reset ??? Can we recover ??? */
1704 csio->ccb_h.status = CAM_NO_HBA;
1705 break;
1706 case BTSTAT_TARGET_IGNORED_ATN:
1707 case BTSTAT_OTHER_SCSI_BUS_RESET:
1708 case BTSTAT_HA_SCSI_BUS_RESET:
1709 if ((csio->ccb_h.status & CAM_STATUS_MASK)
1710 != CAM_CMD_TIMEOUT)
1711 csio->ccb_h.status = CAM_SCSI_BUS_RESET;
1712 break;
1713 case BTSTAT_HA_BDR:
1714 if ((bccb->flags & BCCB_DEVICE_RESET) == 0)
1715 csio->ccb_h.status = CAM_BDR_SENT;
1716 else
1717 csio->ccb_h.status = CAM_CMD_TIMEOUT;
1718 break;
1719 case BTSTAT_INVALID_RECONNECT:
1720 case BTSTAT_ABORT_QUEUE_GENERATED:
1721 csio->ccb_h.status = CAM_REQ_TERMIO;
1722 break;
1723 case BTSTAT_SCSI_PERROR_DETECTED:
1724 csio->ccb_h.status = CAM_UNCOR_PARITY;
1725 break;
1726 }
1727 if (csio->ccb_h.status != CAM_REQ_CMP) {
1728 xpt_freeze_devq(csio->ccb_h.path, /*count*/1);
1729 csio->ccb_h.status |= CAM_DEV_QFRZN;
1730 }
1731 if ((bccb->flags & BCCB_RELEASE_SIMQ) != 0)
1732 ccb->ccb_h.status |= CAM_RELEASE_SIMQ;
1733 btfreeccb(bt, bccb);
1734 xpt_done(ccb);
1735 break;
1736 case BMBI_OK:
1737 /* All completed without incident */
1738 ccb->ccb_h.status |= CAM_REQ_CMP;
1739 if ((bccb->flags & BCCB_RELEASE_SIMQ) != 0)
1740 ccb->ccb_h.status |= CAM_RELEASE_SIMQ;
1741 btfreeccb(bt, bccb);
1742 xpt_done(ccb);
1743 break;
1744 }
1745 }
1746
1747 static int
1748 btreset(struct bt_softc* bt, int hard_reset)
1749 {
1750 struct ccb_hdr *ccb_h;
1751 u_int status;
1752 u_int timeout;
1753 u_int8_t reset_type;
1754
1755 if (hard_reset != 0)
1756 reset_type = HARD_RESET;
1757 else
1758 reset_type = SOFT_RESET;
1759 bt_outb(bt, CONTROL_REG, reset_type);
1760
1761 /* Wait 5sec. for Diagnostic start */
1762 timeout = 5 * 10000;
1763 while (--timeout) {
1764 status = bt_inb(bt, STATUS_REG);
1765 if ((status & DIAG_ACTIVE) != 0)
1766 break;
1767 DELAY(100);
1768 }
1769 if (timeout == 0) {
1770 if (bootverbose)
1771 printf("%s: btreset - Diagnostic Active failed to "
1772 "assert. status = 0x%x\n", bt_name(bt), status);
1773 return (ETIMEDOUT);
1774 }
1775
1776 /* Wait 10sec. for Diagnostic end */
1777 timeout = 10 * 10000;
1778 while (--timeout) {
1779 status = bt_inb(bt, STATUS_REG);
1780 if ((status & DIAG_ACTIVE) == 0)
1781 break;
1782 DELAY(100);
1783 }
1784 if (timeout == 0) {
1785 panic("%s: btreset - Diagnostic Active failed to drop. "
1786 "status = 0x%x\n", bt_name(bt), status);
1787 return (ETIMEDOUT);
1788 }
1789
1790 /* Wait for the host adapter to become ready or report a failure */
1791 timeout = 10000;
1792 while (--timeout) {
1793 status = bt_inb(bt, STATUS_REG);
1794 if ((status & (DIAG_FAIL|HA_READY|DATAIN_REG_READY)) != 0)
1795 break;
1796 DELAY(100);
1797 }
1798 if (timeout == 0) {
1799 printf("%s: btreset - Host adapter failed to come ready. "
1800 "status = 0x%x\n", bt_name(bt), status);
1801 return (ETIMEDOUT);
1802 }
1803
1804 /* If the diagnostics failed, tell the user */
1805 if ((status & DIAG_FAIL) != 0
1806 || (status & HA_READY) == 0) {
1807 printf("%s: btreset - Adapter failed diagnostics\n",
1808 bt_name(bt));
1809
1810 if ((status & DATAIN_REG_READY) != 0)
1811 printf("%s: btreset - Host Adapter Error code = 0x%x\n",
1812 bt_name(bt), bt_inb(bt, DATAIN_REG));
1813 return (ENXIO);
1814 }
1815
1816 /* If we've allocated mailboxes, initialize them */
1817 if (bt->init_level > 4)
1818 btinitmboxes(bt);
1819
1820 /* If we've attached to the XPT, tell it about the event */
1821 if (bt->path != NULL)
1822 xpt_async(AC_BUS_RESET, bt->path, NULL);
1823
1824 /*
1825 * Perform completion processing for all outstanding CCBs.
1826 */
1827 while ((ccb_h = LIST_FIRST(&bt->pending_ccbs)) != NULL) {
1828 struct bt_ccb *pending_bccb;
1829
1830 pending_bccb = (struct bt_ccb *)ccb_h->ccb_bccb_ptr;
1831 pending_bccb->hccb.btstat = BTSTAT_HA_SCSI_BUS_RESET;
1832 btdone(bt, pending_bccb, BMBI_ERROR);
1833 }
1834
1835 return (0);
1836 }
1837
1838 /*
1839 * Send a command to the adapter.
1840 */
1841 int
1842 bt_cmd(struct bt_softc *bt, bt_op_t opcode, u_int8_t *params, u_int param_len,
1843 u_int8_t *reply_data, u_int reply_len, u_int cmd_timeout)
1844 {
1845 u_int timeout;
1846 u_int status;
1847 u_int saved_status;
1848 u_int intstat;
1849 u_int reply_buf_size;
1850 int s;
1851 int cmd_complete;
1852 int error;
1853
1854 /* No data returned to start */
1855 reply_buf_size = reply_len;
1856 reply_len = 0;
1857 intstat = 0;
1858 cmd_complete = 0;
1859 saved_status = 0;
1860 error = 0;
1861
1862 bt->command_cmp = 0;
1863 /*
1864 * Wait up to 10 sec. for the adapter to become
1865 * ready to accept commands.
1866 */
1867 timeout = 100000;
1868 while (--timeout) {
1869 status = bt_inb(bt, STATUS_REG);
1870 if ((status & HA_READY) != 0
1871 && (status & CMD_REG_BUSY) == 0)
1872 break;
1873 /*
1874 * Throw away any pending data which may be
1875 * left over from earlier commands that we
1876 * timedout on.
1877 */
1878 if ((status & DATAIN_REG_READY) != 0)
1879 (void)bt_inb(bt, DATAIN_REG);
1880 DELAY(100);
1881 }
1882 if (timeout == 0) {
1883 printf("%s: bt_cmd: Timeout waiting for adapter ready, "
1884 "status = 0x%x\n", bt_name(bt), status);
1885 return (ETIMEDOUT);
1886 }
1887
1888 /*
1889 * Send the opcode followed by any necessary parameter bytes.
1890 */
1891 bt_outb(bt, COMMAND_REG, opcode);
1892
1893 /*
1894 * Wait for up to 1sec for each byte of the the
1895 * parameter list sent to be sent.
1896 */
1897 timeout = 10000;
1898 while (param_len && --timeout) {
1899 DELAY(100);
1900 s = splcam();
1901 status = bt_inb(bt, STATUS_REG);
1902 intstat = bt_inb(bt, INTSTAT_REG);
1903 splx(s);
1904
1905 if ((intstat & (INTR_PENDING|CMD_COMPLETE))
1906 == (INTR_PENDING|CMD_COMPLETE)) {
1907 saved_status = status;
1908 cmd_complete = 1;
1909 break;
1910 }
1911 if (bt->command_cmp != 0) {
1912 saved_status = bt->latched_status;
1913 cmd_complete = 1;
1914 break;
1915 }
1916 if ((status & DATAIN_REG_READY) != 0)
1917 break;
1918 if ((status & CMD_REG_BUSY) == 0) {
1919 bt_outb(bt, COMMAND_REG, *params++);
1920 param_len--;
1921 timeout = 10000;
1922 }
1923 }
1924 if (timeout == 0) {
1925 printf("%s: bt_cmd: Timeout sending parameters, "
1926 "status = 0x%x\n", bt_name(bt), status);
1927 cmd_complete = 1;
1928 saved_status = status;
1929 error = ETIMEDOUT;
1930 }
1931
1932 /*
1933 * Wait for the command to complete.
1934 */
1935 while (cmd_complete == 0 && --cmd_timeout) {
1936
1937 s = splcam();
1938 status = bt_inb(bt, STATUS_REG);
1939 intstat = bt_inb(bt, INTSTAT_REG);
1940 /*
1941 * It may be that this command was issued with
1942 * controller interrupts disabled. We'll never
1943 * get to our command if an incoming mailbox
1944 * interrupt is pending, so take care of completed
1945 * mailbox commands by calling our interrupt handler.
1946 */
1947 if ((intstat & (INTR_PENDING|IMB_LOADED))
1948 == (INTR_PENDING|IMB_LOADED))
1949 bt_intr(bt);
1950 splx(s);
1951
1952 if (bt->command_cmp != 0) {
1953 /*
1954 * Our interrupt handler saw CMD_COMPLETE
1955 * status before we did.
1956 */
1957 cmd_complete = 1;
1958 saved_status = bt->latched_status;
1959 } else if ((intstat & (INTR_PENDING|CMD_COMPLETE))
1960 == (INTR_PENDING|CMD_COMPLETE)) {
1961 /*
1962 * Our poll (in case interrupts are blocked)
1963 * saw the CMD_COMPLETE interrupt.
1964 */
1965 cmd_complete = 1;
1966 saved_status = status;
1967 } else if (opcode == BOP_MODIFY_IO_ADDR
1968 && (status & CMD_REG_BUSY) == 0) {
1969 /*
1970 * The BOP_MODIFY_IO_ADDR does not issue a CMD_COMPLETE,
1971 * but it should update the status register. So, we
1972 * consider this command complete when the CMD_REG_BUSY
1973 * status clears.
1974 */
1975 saved_status = status;
1976 cmd_complete = 1;
1977 } else if ((status & DATAIN_REG_READY) != 0) {
1978 u_int8_t data;
1979
1980 data = bt_inb(bt, DATAIN_REG);
1981 if (reply_len < reply_buf_size) {
1982 *reply_data++ = data;
1983 } else {
1984 printf("%s: bt_cmd - Discarded reply data byte "
1985 "for opcode 0x%x\n", bt_name(bt),
1986 opcode);
1987 }
1988 /*
1989 * Reset timeout to ensure at least a second
1990 * between response bytes.
1991 */
1992 cmd_timeout = MAX(cmd_timeout, 10000);
1993 reply_len++;
1994
1995 } else if ((opcode == BOP_FETCH_LRAM)
1996 && (status & HA_READY) != 0) {
1997 saved_status = status;
1998 cmd_complete = 1;
1999 }
2000 DELAY(100);
2001 }
2002 if (cmd_timeout == 0) {
2003 printf("%s: bt_cmd: Timeout waiting for command (%x) "
2004 "to complete.\n%s: status = 0x%x, intstat = 0x%x, "
2005 "rlen %d\n", bt_name(bt), opcode,
2006 bt_name(bt), status, intstat, reply_len);
2007 error = (ETIMEDOUT);
2008 }
2009
2010 /*
2011 * Clear any pending interrupts. Block interrupts so our
2012 * interrupt handler is not re-entered.
2013 */
2014 s = splcam();
2015 bt_intr(bt);
2016 splx(s);
2017
2018 if (error != 0)
2019 return (error);
2020
2021 /*
2022 * If the command was rejected by the controller, tell the caller.
2023 */
2024 if ((saved_status & CMD_INVALID) != 0) {
2025 /*
2026 * Some early adapters may not recover properly from
2027 * an invalid command. If it appears that the controller
2028 * has wedged (i.e. status was not cleared by our interrupt
2029 * reset above), perform a soft reset.
2030 */
2031 if (bootverbose)
2032 printf("%s: Invalid Command 0x%x\n", bt_name(bt),
2033 opcode);
2034 DELAY(1000);
2035 status = bt_inb(bt, STATUS_REG);
2036 if ((status & (CMD_INVALID|STATUS_REG_RSVD|DATAIN_REG_READY|
2037 CMD_REG_BUSY|DIAG_FAIL|DIAG_ACTIVE)) != 0
2038 || (status & (HA_READY|INIT_REQUIRED))
2039 != (HA_READY|INIT_REQUIRED)) {
2040 btreset(bt, /*hard_reset*/FALSE);
2041 }
2042 return (EINVAL);
2043 }
2044
2045 if (param_len > 0) {
2046 /* The controller did not accept the full argument list */
2047 return (E2BIG);
2048 }
2049
2050 if (reply_len != reply_buf_size) {
2051 /* Too much or too little data received */
2052 return (EMSGSIZE);
2053 }
2054
2055 /* We were successful */
2056 return (0);
2057 }
2058
2059 static int
2060 btinitmboxes(struct bt_softc *bt) {
2061 init_32b_mbox_params_t init_mbox;
2062 int error;
2063
2064 bzero(bt->in_boxes, sizeof(bt_mbox_in_t) * bt->num_boxes);
2065 bzero(bt->out_boxes, sizeof(bt_mbox_out_t) * bt->num_boxes);
2066 bt->cur_inbox = bt->in_boxes;
2067 bt->last_inbox = bt->in_boxes + bt->num_boxes - 1;
2068 bt->cur_outbox = bt->out_boxes;
2069 bt->last_outbox = bt->out_boxes + bt->num_boxes - 1;
2070
2071 /* Tell the adapter about them */
2072 init_mbox.num_boxes = bt->num_boxes;
2073 init_mbox.base_addr[0] = bt->mailbox_physbase & 0xFF;
2074 init_mbox.base_addr[1] = (bt->mailbox_physbase >> 8) & 0xFF;
2075 init_mbox.base_addr[2] = (bt->mailbox_physbase >> 16) & 0xFF;
2076 init_mbox.base_addr[3] = (bt->mailbox_physbase >> 24) & 0xFF;
2077 error = bt_cmd(bt, BOP_INITIALIZE_32BMBOX, (u_int8_t *)&init_mbox,
2078 /*parmlen*/sizeof(init_mbox), /*reply_buf*/NULL,
2079 /*reply_len*/0, DEFAULT_CMD_TIMEOUT);
2080
2081 if (error != 0)
2082 printf("btinitmboxes: Initialization command failed\n");
2083 else if (bt->strict_rr != 0) {
2084 /*
2085 * If the controller supports
2086 * strict round robin mode,
2087 * enable it
2088 */
2089 u_int8_t param;
2090
2091 param = 0;
2092 error = bt_cmd(bt, BOP_ENABLE_STRICT_RR, ¶m, 1,
2093 /*reply_buf*/NULL, /*reply_len*/0,
2094 DEFAULT_CMD_TIMEOUT);
2095
2096 if (error != 0) {
2097 printf("btinitmboxes: Unable to enable strict RR\n");
2098 error = 0;
2099 } else if (bootverbose) {
2100 printf("%s: Using Strict Round Robin Mailbox Mode\n",
2101 bt_name(bt));
2102 }
2103 }
2104
2105 return (error);
2106 }
2107
2108 /*
2109 * Update the XPT's idea of the negotiated transfer
2110 * parameters for a particular target.
2111 */
2112 static void
2113 btfetchtransinfo(struct bt_softc *bt, struct ccb_trans_settings* cts)
2114 {
2115 setup_data_t setup_info;
2116 u_int target;
2117 u_int targ_offset;
2118 u_int targ_mask;
2119 u_int sync_period;
2120 int error;
2121 u_int8_t param;
2122 targ_syncinfo_t sync_info;
2123
2124 target = cts->ccb_h.target_id;
2125 targ_offset = (target & 0x7);
2126 targ_mask = (0x01 << targ_offset);
2127
2128 /*
2129 * Inquire Setup Information. This command retreives the
2130 * Wide negotiation status for recent adapters as well as
2131 * the sync info for older models.
2132 */
2133 param = sizeof(setup_info);
2134 error = bt_cmd(bt, BOP_INQUIRE_SETUP_INFO, ¶m, /*paramlen*/1,
2135 (u_int8_t*)&setup_info, sizeof(setup_info),
2136 DEFAULT_CMD_TIMEOUT);
2137
2138 if (error != 0) {
2139 printf("%s: btfetchtransinfo - Inquire Setup Info Failed %x\n",
2140 bt_name(bt), error);
2141 cts->valid = 0;
2142 return;
2143 }
2144
2145 sync_info = (target < 8) ? setup_info.low_syncinfo[targ_offset]
2146 : setup_info.high_syncinfo[targ_offset];
2147
2148 if (sync_info.sync == 0)
2149 cts->sync_offset = 0;
2150 else
2151 cts->sync_offset = sync_info.offset;
2152
2153 cts->bus_width = MSG_EXT_WDTR_BUS_8_BIT;
2154 if (strcmp(bt->firmware_ver, "5.06L") >= 0) {
2155 u_int wide_active;
2156
2157 wide_active =
2158 (target < 8) ? (setup_info.low_wide_active & targ_mask)
2159 : (setup_info.high_wide_active & targ_mask);
2160
2161 if (wide_active)
2162 cts->bus_width = MSG_EXT_WDTR_BUS_16_BIT;
2163 } else if ((bt->wide_permitted & targ_mask) != 0) {
2164 struct ccb_getdev cgd;
2165
2166 /*
2167 * Prior to rev 5.06L, wide status isn't provided,
2168 * so we "guess" that wide transfers are in effect
2169 * if the user settings allow for wide and the inquiry
2170 * data for the device indicates that it can handle
2171 * wide transfers.
2172 */
2173 xpt_setup_ccb(&cgd.ccb_h, cts->ccb_h.path, /*priority*/1);
2174 cgd.ccb_h.func_code = XPT_GDEV_TYPE;
2175 xpt_action((union ccb *)&cgd);
2176 if ((cgd.ccb_h.status & CAM_STATUS_MASK) == CAM_REQ_CMP
2177 && (cgd.inq_data.flags & SID_WBus16) != 0)
2178 cts->bus_width = MSG_EXT_WDTR_BUS_16_BIT;
2179 }
2180
2181 if (bt->firmware_ver[0] >= '3') {
2182 /*
2183 * For adapters that can do fast or ultra speeds,
2184 * use the more exact Target Sync Information command.
2185 */
2186 target_sync_info_data_t sync_info;
2187
2188 param = sizeof(sync_info);
2189 error = bt_cmd(bt, BOP_TARG_SYNC_INFO, ¶m, /*paramlen*/1,
2190 (u_int8_t*)&sync_info, sizeof(sync_info),
2191 DEFAULT_CMD_TIMEOUT);
2192
2193 if (error != 0) {
2194 printf("%s: btfetchtransinfo - Inquire Sync "
2195 "Info Failed 0x%x\n", bt_name(bt), error);
2196 cts->valid = 0;
2197 return;
2198 }
2199 sync_period = sync_info.sync_rate[target] * 100;
2200 } else {
2201 sync_period = 2000 + (500 * sync_info.period);
2202 }
2203
2204 /* Convert ns value to standard SCSI sync rate */
2205 if (cts->sync_offset != 0)
2206 cts->sync_period = scsi_calc_syncparam(sync_period);
2207 else
2208 cts->sync_period = 0;
2209
2210 cts->valid = CCB_TRANS_SYNC_RATE_VALID
2211 | CCB_TRANS_SYNC_OFFSET_VALID
2212 | CCB_TRANS_BUS_WIDTH_VALID;
2213 xpt_async(AC_TRANSFER_NEG, cts->ccb_h.path, cts);
2214 }
2215
2216 static void
2217 btmapmboxes(void *arg, bus_dma_segment_t *segs, int nseg, int error)
2218 {
2219 struct bt_softc* bt;
2220
2221 bt = (struct bt_softc*)arg;
2222 bt->mailbox_physbase = segs->ds_addr;
2223 }
2224
2225 static void
2226 btmapccbs(void *arg, bus_dma_segment_t *segs, int nseg, int error)
2227 {
2228 struct bt_softc* bt;
2229
2230 bt = (struct bt_softc*)arg;
2231 bt->bt_ccb_physbase = segs->ds_addr;
2232 }
2233
2234 static void
2235 btmapsgs(void *arg, bus_dma_segment_t *segs, int nseg, int error)
2236 {
2237
2238 struct bt_softc* bt;
2239
2240 bt = (struct bt_softc*)arg;
2241 SLIST_FIRST(&bt->sg_maps)->sg_physaddr = segs->ds_addr;
2242 }
2243
2244 static void
2245 btpoll(struct cam_sim *sim)
2246 {
2247 bt_intr(cam_sim_softc(sim));
2248 }
2249
2250 void
2251 bttimeout(void *arg)
2252 {
2253 struct bt_ccb *bccb;
2254 union ccb *ccb;
2255 struct bt_softc *bt;
2256 int s;
2257
2258 bccb = (struct bt_ccb *)arg;
2259 ccb = bccb->ccb;
2260 bt = (struct bt_softc *)ccb->ccb_h.ccb_bt_ptr;
2261 xpt_print_path(ccb->ccb_h.path);
2262 printf("CCB %p - timed out\n", (void *)bccb);
2263
2264 s = splcam();
2265
2266 if ((bccb->flags & BCCB_ACTIVE) == 0) {
2267 xpt_print_path(ccb->ccb_h.path);
2268 printf("CCB %p - timed out CCB already completed\n",
2269 (void *)bccb);
2270 splx(s);
2271 return;
2272 }
2273
2274 /*
2275 * In order to simplify the recovery process, we ask the XPT
2276 * layer to halt the queue of new transactions and we traverse
2277 * the list of pending CCBs and remove their timeouts. This
2278 * means that the driver attempts to clear only one error
2279 * condition at a time. In general, timeouts that occur
2280 * close together are related anyway, so there is no benefit
2281 * in attempting to handle errors in parrallel. Timeouts will
2282 * be reinstated when the recovery process ends.
2283 */
2284 if ((bccb->flags & BCCB_DEVICE_RESET) == 0) {
2285 struct ccb_hdr *ccb_h;
2286
2287 if ((bccb->flags & BCCB_RELEASE_SIMQ) == 0) {
2288 xpt_freeze_simq(bt->sim, /*count*/1);
2289 bccb->flags |= BCCB_RELEASE_SIMQ;
2290 }
2291
2292 ccb_h = LIST_FIRST(&bt->pending_ccbs);
2293 while (ccb_h != NULL) {
2294 struct bt_ccb *pending_bccb;
2295
2296 pending_bccb = (struct bt_ccb *)ccb_h->ccb_bccb_ptr;
2297 untimeout(bttimeout, pending_bccb, ccb_h->timeout_ch);
2298 ccb_h = LIST_NEXT(ccb_h, sim_links.le);
2299 }
2300 }
2301
2302 if ((bccb->flags & BCCB_DEVICE_RESET) != 0
2303 || bt->cur_outbox->action_code != BMBO_FREE
2304 || ((bccb->hccb.tag_enable == TRUE)
2305 && (bt->firmware_ver[0] < '5'))) {
2306 /*
2307 * Try a full host adapter/SCSI bus reset.
2308 * We do this only if we have already attempted
2309 * to clear the condition with a BDR, or we cannot
2310 * attempt a BDR for lack of mailbox resources
2311 * or because of faulty firmware. It turns out
2312 * that firmware versions prior to 5.xx treat BDRs
2313 * as untagged commands that cannot be sent until
2314 * all outstanding tagged commands have been processed.
2315 * This makes it somewhat difficult to use a BDR to
2316 * clear up a problem with an uncompleted tagged command.
2317 */
2318 ccb->ccb_h.status = CAM_CMD_TIMEOUT;
2319 btreset(bt, /*hardreset*/TRUE);
2320 printf("%s: No longer in timeout\n", bt_name(bt));
2321 } else {
2322 /*
2323 * Send a Bus Device Reset message:
2324 * The target that is holding up the bus may not
2325 * be the same as the one that triggered this timeout
2326 * (different commands have different timeout lengths),
2327 * but we have no way of determining this from our
2328 * timeout handler. Our strategy here is to queue a
2329 * BDR message to the target of the timed out command.
2330 * If this fails, we'll get another timeout 2 seconds
2331 * later which will attempt a bus reset.
2332 */
2333 bccb->flags |= BCCB_DEVICE_RESET;
2334 ccb->ccb_h.timeout_ch =
2335 timeout(bttimeout, (caddr_t)bccb, 2 * hz);
2336
2337 bt->recovery_bccb->hccb.opcode = INITIATOR_BUS_DEV_RESET;
2338
2339 /* No Data Transfer */
2340 bt->recovery_bccb->hccb.datain = TRUE;
2341 bt->recovery_bccb->hccb.dataout = TRUE;
2342 bt->recovery_bccb->hccb.btstat = 0;
2343 bt->recovery_bccb->hccb.sdstat = 0;
2344 bt->recovery_bccb->hccb.target_id = ccb->ccb_h.target_id;
2345
2346 /* Tell the adapter about this command */
2347 bt->cur_outbox->ccb_addr = btccbvtop(bt, bt->recovery_bccb);
2348 bt->cur_outbox->action_code = BMBO_START;
2349 bt_outb(bt, COMMAND_REG, BOP_START_MBOX);
2350 btnextoutbox(bt);
2351 }
2352
2353 splx(s);
2354 }
2355
Cache object: ce31c95ea2016a78ac4b188962a9d46f
|