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