trm.c revision 1.5 1 /* $NetBSD: trm.c,v 1.5 2001/11/18 13:02:30 tsutsui Exp $ */
2 /*
3 * Device Driver for Tekram DC395U/UW/F, DC315/U
4 * PCI SCSI Bus Master Host Adapter
5 * (SCSI chip set used Tekram ASIC TRM-S1040)
6 *
7 * Copyright (c) 2001 Rui-Xiang Guo
8 * All rights reserved.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. The name of the author may not be used to endorse or promote products
19 * derived from this software without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 */
32 /*
33 * Ported from
34 * dc395x_trm.c
35 *
36 * Written for NetBSD 1.4.x by
37 * Erich Chen (erich (at) tekram.com.tw)
38 *
39 * Provided by
40 * (C)Copyright 1995-1999 Tekram Technology Co., Ltd. All rights reserved.
41 */
42
43 #include <sys/cdefs.h>
44 __KERNEL_RCSID(0, "$NetBSD: trm.c,v 1.5 2001/11/18 13:02:30 tsutsui Exp $");
45
46 /* #define TRM_DEBUG */
47
48 #include <sys/param.h>
49 #include <sys/systm.h>
50 #include <sys/malloc.h>
51 #include <sys/buf.h>
52 #include <sys/kernel.h>
53 #include <sys/device.h>
54
55 #include <machine/bus.h>
56 #include <machine/intr.h>
57
58 #include <uvm/uvm_extern.h>
59
60 #include <dev/scsipi/scsi_all.h>
61 #include <dev/scsipi/scsi_message.h>
62 #include <dev/scsipi/scsipi_all.h>
63 #include <dev/scsipi/scsiconf.h>
64
65 #include <dev/pci/pcidevs.h>
66 #include <dev/pci/pcireg.h>
67 #include <dev/pci/pcivar.h>
68 #include <dev/pci/trmreg.h>
69
70 /*
71 * feature of chip set MAX value
72 */
73 #define TRM_MAX_TARGETS 16
74 #define TRM_MAX_SG_ENTRIES (MAXPHYS / PAGE_SIZE + 1)
75 #define TRM_MAX_SRB 32
76
77 /*
78 * Segment Entry
79 */
80 struct trm_sg_entry {
81 u_int32_t address;
82 u_int32_t length;
83 };
84
85 #define TRM_SG_SIZE (sizeof(struct trm_sg_entry) * TRM_MAX_SG_ENTRIES)
86
87 /*
88 **********************************************************************
89 * The SEEPROM structure for TRM_S1040
90 **********************************************************************
91 */
92 struct nvram_target {
93 u_int8_t config0; /* Target configuration byte 0 */
94 #define NTC_DO_WIDE_NEGO 0x20 /* Wide negotiate */
95 #define NTC_DO_TAG_QUEUING 0x10 /* Enable SCSI tag queuing */
96 #define NTC_DO_SEND_START 0x08 /* Send start command SPINUP */
97 #define NTC_DO_DISCONNECT 0x04 /* Enable SCSI disconnect */
98 #define NTC_DO_SYNC_NEGO 0x02 /* Sync negotiation */
99 #define NTC_DO_PARITY_CHK 0x01 /* Parity check enable */
100 u_int8_t period; /* Target period */
101 u_int8_t config2; /* Target configuration byte 2 */
102 u_int8_t config3; /* Target configuration byte 3 */
103 };
104
105 struct trm_nvram {
106 u_int8_t subvendor_id[2]; /* 0,1 Sub Vendor ID */
107 u_int8_t subsys_id[2]; /* 2,3 Sub System ID */
108 u_int8_t subclass; /* 4 Sub Class */
109 u_int8_t vendor_id[2]; /* 5,6 Vendor ID */
110 u_int8_t device_id[2]; /* 7,8 Device ID */
111 u_int8_t reserved0; /* 9 Reserved */
112 struct nvram_target target[TRM_MAX_TARGETS];
113 /* 10,11,12,13
114 * 14,15,16,17
115 * ....
116 * 70,71,72,73 */
117 u_int8_t scsi_id; /* 74 Host Adapter SCSI ID */
118 u_int8_t channel_cfg; /* 75 Channel configuration */
119 #define NAC_SCANLUN 0x20 /* Include LUN as BIOS device */
120 #define NAC_DO_PARITY_CHK 0x08 /* Parity check enable */
121 #define NAC_POWERON_SCSI_RESET 0x04 /* Power on reset enable */
122 #define NAC_GREATER_1G 0x02 /* > 1G support enable */
123 #define NAC_GT2DRIVES 0x01 /* Support more than 2 drives */
124 u_int8_t delay_time; /* 76 Power on delay time */
125 u_int8_t max_tag; /* 77 Maximum tags */
126 u_int8_t reserved1; /* 78 */
127 u_int8_t boot_target; /* 79 */
128 u_int8_t boot_lun; /* 80 */
129 u_int8_t reserved2; /* 81 */
130 u_int8_t reserved3[44]; /* 82,..125 */
131 u_int8_t checksum0; /* 126 */
132 u_int8_t checksum1; /* 127 */
133 #define TRM_NVRAM_CKSUM 0x1234
134 };
135
136 /* Nvram Initiater bits definition */
137 #define MORE2_DRV 0x00000001
138 #define GREATER_1G 0x00000002
139 #define RST_SCSI_BUS 0x00000004
140 #define ACTIVE_NEGATION 0x00000008
141 #define NO_SEEK 0x00000010
142 #define LUN_CHECK 0x00000020
143
144 #define trm_wait_30us() DELAY(30)
145
146 /*
147 *-----------------------------------------------------------------------
148 * SCSI Request Block
149 *-----------------------------------------------------------------------
150 */
151 struct trm_srb {
152 struct trm_srb *next;
153 struct trm_dcb *dcb;
154
155 struct trm_sg_entry *sgentry;
156 struct scsipi_xfer *xs; /* scsipi_xfer for this cmd */
157 bus_dmamap_t dmap;
158 bus_size_t sgoffset; /* Xfer buf offset */
159
160 u_int32_t buflen; /* Total xfer length */
161 u_int32_t sgaddr; /* SGList physical starting address */
162
163 u_int state; /* SRB State */
164 #define SRB_FREE 0x0000
165 #define SRB_WAIT 0x0001
166 #define SRB_READY 0x0002
167 #define SRB_MSGOUT 0x0004 /* arbitration+msg_out 1st byte */
168 #define SRB_MSGIN 0x0008
169 #define SRB_EXTEND_MSGIN 0x0010
170 #define SRB_COMMAND 0x0020
171 #define SRB_START_ 0x0040 /* arbitration+msg_out+command_out */
172 #define SRB_DISCONNECT 0x0080
173 #define SRB_DATA_XFER 0x0100
174 #define SRB_XFERPAD 0x0200
175 #define SRB_STATUS 0x0400
176 #define SRB_COMPLETED 0x0800
177 #define SRB_ABORT_SENT 0x1000
178 #define SRB_DO_SYNC_NEGO 0x2000
179 #define SRB_DO_WIDE_NEGO 0x4000
180 #define SRB_UNEXPECT_RESEL 0x8000
181 u_int8_t *msg;
182
183 int sgcnt;
184 int sgindex;
185
186 int phase; /* SCSI phase */
187 int hastat; /* Host Adapter Status */
188 #define H_STATUS_GOOD 0x00
189 #define H_SEL_TIMEOUT 0x11
190 #define H_OVER_UNDER_RUN 0x12
191 #define H_UNEXP_BUS_FREE 0x13
192 #define H_TARGET_PHASE_F 0x14
193 #define H_INVALID_CCB_OP 0x16
194 #define H_LINK_CCB_BAD 0x17
195 #define H_BAD_TARGET_DIR 0x18
196 #define H_DUPLICATE_CCB 0x19
197 #define H_BAD_CCB_OR_SG 0x1A
198 #define H_ABORT 0xFF
199 int tastat; /* Target SCSI Status Byte */
200 int flag; /* SRBFlag */
201 #define DATAOUT 0x0080
202 #define DATAIN 0x0040
203 #define RESIDUAL_VALID 0x0020
204 #define ENABLE_TIMER 0x0010
205 #define RESET_DEV0 0x0004
206 #define ABORT_DEV 0x0002
207 #define AUTO_REQSENSE 0x0001
208 int srbstat; /* SRB Status */
209 #define SRB_OK 0x01
210 #define ABORTION 0x02
211 #define OVER_RUN 0x04
212 #define UNDER_RUN 0x08
213 #define PARITY_ERROR 0x10
214 #define SRB_ERROR 0x20
215 int tagnum; /* Tag number */
216 int msgcnt;
217
218 int cmdlen; /* SCSI command length */
219 u_int8_t cmd[12]; /* SCSI command */
220
221 u_int8_t msgin[6];
222 u_int8_t msgout[6];
223 };
224
225 /*
226 *-----------------------------------------------------------------------
227 * Device Control Block
228 *-----------------------------------------------------------------------
229 */
230 struct trm_dcb {
231 struct trm_dcb *next;
232
233 struct trm_srb *waitsrb;
234 struct trm_srb *last_waitsrb;
235
236 struct trm_srb *gosrb;
237 struct trm_srb *last_gosrb;
238
239 struct trm_srb *actsrb;
240
241 int gosrb_cnt;
242 u_int maxcmd; /* Max command */
243
244 int id; /* SCSI Target ID (SCSI Only) */
245 int lun; /* SCSI Log. Unit (SCSI Only) */
246
247 u_int8_t tagmask; /* Tag mask */
248
249 u_int8_t tacfg; /* Target Config */
250 u_int8_t idmsg; /* Identify Msg */
251 u_int8_t period; /* Max Period for nego. */
252
253 u_int8_t synctl; /* Sync control for reg. */
254 u_int8_t offset; /* Sync offset for reg. and nego.(low nibble) */
255 u_int8_t mode; /* Sync mode ? (1 sync):(0 async) */
256 #define SYNC_NEGO_ENABLE 0x01
257 #define SYNC_NEGO_DONE 0x02
258 #define WIDE_NEGO_ENABLE 0x04
259 #define WIDE_NEGO_DONE 0x08
260 #define EN_TAG_QUEUING 0x10
261 #define EN_ATN_STOP 0x20
262 #define SYNC_NEGO_OFFSET 15
263 u_int8_t flag;
264 #define ABORT_DEV_ 0x01
265 #define SHOW_MESSAGE_ 0x02
266 };
267
268 /*
269 *-----------------------------------------------------------------------
270 * Adapter Control Block
271 *-----------------------------------------------------------------------
272 */
273 struct trm_softc {
274 struct device sc_dev;
275
276 bus_space_tag_t sc_iot;
277 bus_space_handle_t sc_ioh;
278 bus_dma_tag_t sc_dmat;
279 bus_dmamap_t sc_dmamap; /* Map the control structures */
280
281 struct trm_dcb *sc_linkdcb;
282 struct trm_dcb *sc_roundcb;
283
284 struct trm_dcb *sc_actdcb;
285 struct trm_dcb *sc_dcb[TRM_MAX_TARGETS][8];
286
287 struct trm_srb *sc_freesrb;
288 struct trm_srb *sc_srb; /* SRB array */
289 struct trm_srb sc_tempsrb;
290
291 struct trm_sg_entry *sc_sglist;
292
293 int maxid;
294 int maxtag; /* Max Tag number */
295 /*
296 * Link to the generic SCSI driver
297 */
298 struct scsipi_channel sc_channel;
299 struct scsipi_adapter sc_adapter;
300
301 int sc_id; /* Adapter SCSI Target ID */
302
303 int devcnt; /* Device Count */
304
305 int devflag[TRM_MAX_TARGETS][8]; /* flag of initDCB for device */
306
307 int devscan[TRM_MAX_TARGETS][8];
308 int devscan_end;
309 int cur_offset; /* Current Sync offset */
310
311 struct trm_nvram sc_eeprom;
312 int sc_config;
313 #define HCC_WIDE_CARD 0x20
314 #define HCC_SCSI_RESET 0x10
315 #define HCC_PARITY 0x08
316 #define HCC_AUTOTERM 0x04
317 #define HCC_LOW8TERM 0x02
318 #define HCC_UP8TERM 0x01
319 int sc_flag;
320 #define RESET_DEV 0x01
321 #define RESET_DETECT 0x02
322 #define RESET_DONE 0x04
323 };
324
325 /*
326 * SCSI Status codes not defined in scsi_all.h
327 */
328 #define SCSI_COND_MET 0x04 /* Condition Met */
329 #define SCSI_INTERM_COND_MET 0x14 /* Intermediate condition met */
330 #define SCSI_UNEXP_BUS_FREE 0xFD /* Unexpect Bus Free */
331 #define SCSI_BUS_RST_DETECT 0xFE /* Scsi Bus Reset detected */
332 #define SCSI_SEL_TIMEOUT 0xFF /* Selection Time out */
333
334 static void trm_rewait_srb(struct trm_dcb *, struct trm_srb *);
335 static void trm_wait_srb(struct trm_softc *);
336 static void trm_reset_device(struct trm_softc *);
337 static void trm_recover_srb(struct trm_softc *);
338 static int trm_start_scsi(struct trm_softc *, struct trm_dcb *,
339 struct trm_srb *);
340 static int trm_intr(void *);
341
342 static void trm_dataout_phase0(struct trm_softc *, struct trm_srb *, int *);
343 static void trm_datain_phase0(struct trm_softc *, struct trm_srb *, int *);
344 static void trm_command_phase0(struct trm_softc *, struct trm_srb *, int *);
345 static void trm_status_phase0(struct trm_softc *, struct trm_srb *, int *);
346 static void trm_msgout_phase0(struct trm_softc *, struct trm_srb *, int *);
347 static void trm_msgin_phase0(struct trm_softc *, struct trm_srb *, int *);
348 static void trm_dataout_phase1(struct trm_softc *, struct trm_srb *, int *);
349 static void trm_datain_phase1(struct trm_softc *, struct trm_srb *, int *);
350 static void trm_command_phase1(struct trm_softc *, struct trm_srb *, int *);
351 static void trm_status_phase1(struct trm_softc *, struct trm_srb *, int *);
352 static void trm_msgout_phase1(struct trm_softc *, struct trm_srb *, int *);
353 static void trm_msgin_phase1(struct trm_softc *, struct trm_srb *, int *);
354 static void trm_nop0(struct trm_softc *, struct trm_srb *, int *);
355 static void trm_nop1(struct trm_softc *, struct trm_srb *, int *);
356
357 static void trm_set_xfer_rate(struct trm_softc *, struct trm_srb *,
358 struct trm_dcb *);
359 static void trm_dataio_xfer(struct trm_softc *, struct trm_srb *, int);
360 static void trm_disconnect(struct trm_softc *);
361 static void trm_reselect(struct trm_softc *);
362 static void trm_srb_done(struct trm_softc *, struct trm_dcb *,
363 struct trm_srb *);
364 static void trm_doing_srb_done(struct trm_softc *);
365 static void trm_scsi_reset_detect(struct trm_softc *);
366 static void trm_reset_scsi_bus(struct trm_softc *);
367 static int trm_request_sense(struct trm_softc *, struct trm_dcb *,
368 struct trm_srb *);
369 static void trm_msgout_abort(struct trm_softc *, struct trm_srb *);
370 static void trm_timeout(void *);
371 static void trm_reset(struct trm_softc *);
372 static void trm_send_srb(struct scsipi_xfer *, struct trm_softc *,
373 struct trm_srb *);
374 static int trm_init(struct trm_softc *);
375 static void trm_init_adapter(struct trm_softc *);
376 static void trm_init_dcb(struct trm_softc *, struct trm_dcb *,
377 struct scsipi_xfer *);
378 static void trm_link_srb(struct trm_softc *);
379 static void trm_init_sc(struct trm_softc *);
380 static void trm_check_eeprom(struct trm_softc *, struct trm_nvram *);
381 static void trm_release_srb(struct trm_softc *, struct trm_dcb *,
382 struct trm_srb *);
383 void trm_scsipi_request(struct scsipi_channel *, scsipi_adapter_req_t, void *);
384
385 static void trm_eeprom_read_all(struct trm_softc *, struct trm_nvram *);
386 static void trm_eeprom_write_all(struct trm_softc *, struct trm_nvram *);
387 static void trm_eeprom_set_data(struct trm_softc *, u_int8_t, u_int8_t);
388 static void trm_eeprom_write_cmd(struct trm_softc *, u_int8_t, u_int8_t);
389 static u_int8_t trm_eeprom_get_data(struct trm_softc *, u_int8_t);
390
391 static int trm_probe(struct device *, struct cfdata *, void *);
392 static void trm_attach(struct device *, struct device *, void *);
393
394 struct cfattach trm_ca = {
395 sizeof(struct trm_softc), trm_probe, trm_attach
396 };
397
398
399 /*
400 * state_v = (void *) trm_scsi_phase0[phase]
401 */
402 static void *trm_scsi_phase0[] = {
403 trm_dataout_phase0, /* phase:0 */
404 trm_datain_phase0, /* phase:1 */
405 trm_command_phase0, /* phase:2 */
406 trm_status_phase0, /* phase:3 */
407 trm_nop0, /* phase:4 */
408 trm_nop1, /* phase:5 */
409 trm_msgout_phase0, /* phase:6 */
410 trm_msgin_phase0, /* phase:7 */
411 };
412
413 /*
414 * state_v = (void *) trm_scsi_phase1[phase]
415 */
416 static void *trm_scsi_phase1[] = {
417 trm_dataout_phase1, /* phase:0 */
418 trm_datain_phase1, /* phase:1 */
419 trm_command_phase1, /* phase:2 */
420 trm_status_phase1, /* phase:3 */
421 trm_nop0, /* phase:4 */
422 trm_nop1, /* phase:5 */
423 trm_msgout_phase1, /* phase:6 */
424 trm_msgin_phase1, /* phase:7 */
425 };
426
427 /* real period: */
428 static const u_int8_t trm_clock_period[] = {
429 12, /* 48 ns 20.0 MB/sec */
430 18, /* 72 ns 13.3 MB/sec */
431 25, /* 100 ns 10.0 MB/sec */
432 31, /* 124 ns 8.0 MB/sec */
433 37, /* 148 ns 6.6 MB/sec */
434 43, /* 172 ns 5.7 MB/sec */
435 50, /* 200 ns 5.0 MB/sec */
436 62 /* 248 ns 4.0 MB/sec */
437 };
438
439 /*
440 * Q back to pending Q
441 */
442 static void
443 trm_rewait_srb(dcb, srb)
444 struct trm_dcb *dcb;
445 struct trm_srb *srb;
446 {
447 struct trm_srb *psrb1;
448 int s;
449
450 s = splbio();
451
452 dcb->gosrb_cnt--;
453 psrb1 = dcb->gosrb;
454 if (srb == psrb1)
455 dcb->gosrb = psrb1->next;
456 else {
457 while (srb != psrb1->next)
458 psrb1 = psrb1->next;
459
460 psrb1->next = srb->next;
461 if (srb == dcb->last_gosrb)
462 dcb->last_gosrb = psrb1;
463 }
464 if (dcb->waitsrb) {
465 srb->next = dcb->waitsrb;
466 dcb->waitsrb = srb;
467 } else {
468 srb->next = NULL;
469 dcb->waitsrb = srb;
470 dcb->last_waitsrb = srb;
471 }
472 dcb->tagmask &= ~(1 << srb->tagnum); /* Free TAG number */
473
474 splx(s);
475 }
476
477 static void
478 trm_wait_srb(sc)
479 struct trm_softc *sc;
480 {
481 struct trm_dcb *ptr, *ptr1;
482 struct trm_srb *srb;
483 int s;
484
485 s = splbio();
486
487 if (sc->sc_actdcb == NULL &&
488 (sc->sc_flag & (RESET_DETECT | RESET_DONE | RESET_DEV)) == 0) {
489 ptr = sc->sc_roundcb;
490 if (ptr == NULL) {
491 ptr = sc->sc_linkdcb;
492 sc->sc_roundcb = ptr;
493 }
494 for (ptr1 = ptr; ptr1 != NULL;) {
495 sc->sc_roundcb = ptr1->next;
496 if (ptr1->maxcmd <= ptr1->gosrb_cnt ||
497 (srb = ptr1->waitsrb) == NULL) {
498 if (sc->sc_roundcb == ptr)
499 break;
500 ptr1 = ptr1->next;
501 } else {
502 if (trm_start_scsi(sc, ptr1, srb) == 0) {
503 /*
504 * If trm_start_scsi return 0 :
505 * current interrupt status is
506 * interrupt enable. It's said that
507 * SCSI processor is unoccupied
508 */
509 ptr1->gosrb_cnt++;
510 if (ptr1->last_waitsrb == srb) {
511 ptr1->waitsrb = NULL;
512 ptr1->last_waitsrb = NULL;
513 } else
514 ptr1->waitsrb = srb->next;
515
516 srb->next = NULL;
517 if (ptr1->gosrb != NULL)
518 ptr1->last_gosrb->next = srb;
519 else
520 ptr1->gosrb = srb;
521
522 ptr1->last_gosrb = srb;
523 }
524 break;
525 }
526 }
527 }
528 splx(s);
529 }
530
531 static void
532 trm_send_srb(xs, sc, srb)
533 struct scsipi_xfer *xs;
534 struct trm_softc *sc;
535 struct trm_srb *srb;
536 {
537 struct trm_dcb *dcb;
538 int s;
539
540 #ifdef TRM_DEBUG
541 printf("trm_send_srb..........\n");
542 #endif
543 s = splbio();
544
545 /*
546 * now get the DCB from upper layer( OS )
547 */
548 dcb = srb->dcb;
549
550 if (dcb->maxcmd <= dcb->gosrb_cnt ||
551 sc->sc_actdcb != NULL ||
552 (sc->sc_flag & (RESET_DETECT | RESET_DONE | RESET_DEV))) {
553 if (dcb->waitsrb != NULL) {
554 dcb->last_waitsrb->next = srb;
555 dcb->last_waitsrb = srb;
556 srb->next = NULL;
557 } else {
558 dcb->waitsrb = srb;
559 dcb->last_waitsrb = srb;
560 }
561 splx(s);
562 return;
563 }
564 if (dcb->waitsrb != NULL) {
565 dcb->last_waitsrb->next = srb;
566 dcb->last_waitsrb = srb;
567 srb->next = NULL;
568 /* srb = GetWaitingSRB(dcb); */
569 srb = dcb->waitsrb;
570 dcb->waitsrb = srb->next;
571 srb->next = NULL;
572 }
573 if (trm_start_scsi(sc, dcb, srb) == 0) {
574 /*
575 * If trm_start_scsi return 0: current interrupt status
576 * is interrupt enable. It's said that SCSI processor is
577 * unoccupied.
578 */
579 dcb->gosrb_cnt++; /* stack waiting SRB */
580 if (dcb->gosrb != NULL) {
581 dcb->last_gosrb->next = srb;
582 dcb->last_gosrb = srb;
583 } else {
584 dcb->gosrb = srb;
585 dcb->last_gosrb = srb;
586 }
587 } else {
588 /*
589 * If trm_start_scsi return 1: current interrupt status
590 * is interrupt disreenable. It's said that SCSI processor
591 * has more one SRB need to do we need reQ back SRB.
592 */
593 if (dcb->waitsrb != NULL) {
594 srb->next = dcb->waitsrb;
595 dcb->waitsrb = srb;
596 } else {
597 srb->next = NULL;
598 dcb->waitsrb = srb;
599 dcb->last_waitsrb = srb;
600 }
601 }
602
603 splx(s);
604 }
605
606 /*
607 * Called by GENERIC SCSI driver
608 * enqueues a SCSI command
609 */
610 void
611 trm_scsipi_request(chan, req, arg)
612 struct scsipi_channel *chan;
613 scsipi_adapter_req_t req;
614 void *arg;
615 {
616 bus_space_tag_t iot;
617 bus_space_handle_t ioh;
618 struct trm_softc *sc;
619 struct trm_dcb *dcb = NULL;
620 struct trm_srb *srb;
621 struct scsipi_xfer *xs;
622 int error, i, id, lun, s;
623
624 sc = (struct trm_softc *)chan->chan_adapter->adapt_dev;
625 iot = sc->sc_iot;
626 ioh = sc->sc_ioh;
627
628 switch (req) {
629 case ADAPTER_REQ_RUN_XFER:
630 xs = arg;
631 id = xs->xs_periph->periph_target;
632 lun = xs->xs_periph->periph_lun;
633 #ifdef TRM_DEBUG
634 printf("trm_scsipi_request.....\n");
635 printf("%s: id= %d lun= %d\n", sc->sc_dev.dv_xname, id, lun);
636 printf("sc->devscan[id][lun]= %d\n", sc->devscan[id][lun]);
637 #endif
638 if ((id > sc->maxid) || (lun > 7)) {
639 xs->error = XS_DRIVER_STUFFUP;
640 return;
641 }
642 dcb = sc->sc_dcb[id][lun];
643 if (sc->devscan[id][lun] != 0 && sc->devflag[id][lun] == 0) {
644 /*
645 * Scan SCSI BUS => trm_init_dcb
646 */
647 if (sc->devcnt < TRM_MAX_TARGETS) {
648 #ifdef TRM_DEBUG
649 printf("trm_init_dcb: dcb=%8x, ", (int) dcb);
650 printf("ID=%2x, LUN=%2x\n", id, lun);
651 #endif
652 sc->devflag[id][lun] = 1;
653 trm_init_dcb(sc, dcb, xs);
654 } else {
655 printf("%s: ", sc->sc_dev.dv_xname);
656 printf("sc->devcnt >= TRM_MAX_TARGETS\n");
657 xs->error = XS_DRIVER_STUFFUP;
658 return;
659 }
660 }
661
662 if (xs->xs_control & XS_CTL_RESET) {
663 trm_reset(sc);
664 xs->error = XS_NOERROR | XS_RESET;
665 return;
666 }
667 if (xs->xs_status & XS_STS_DONE) {
668 printf("%s: Is it done?\n", sc->sc_dev.dv_xname);
669 xs->xs_status &= ~XS_STS_DONE;
670 }
671 xs->error = 0;
672 xs->status = 0;
673 xs->resid = 0;
674
675 s = splbio();
676
677 /* Get SRB */
678 srb = sc->sc_freesrb;
679 if (srb != NULL) {
680 sc->sc_freesrb = srb->next;
681 srb->next = NULL;
682 #ifdef TRM_DEBUG
683 printf("srb = %8p sc->sc_freesrb= %8p\n",
684 srb, sc->sc_freesrb);
685 #endif
686 } else {
687 xs->error = XS_RESOURCE_SHORTAGE;
688 scsipi_done(xs);
689 splx(s);
690 return;
691 }
692 /*
693 * XXX BuildSRB(srb ,dcb); XXX
694 */
695 srb->dcb = dcb;
696 srb->xs = xs;
697 srb->cmdlen = xs->cmdlen;
698 /*
699 * Move layer of CAM command block to layer of SCSI
700 * Request Block for SCSI processor command doing.
701 */
702 memcpy(srb->cmd, xs->cmd, xs->cmdlen);
703 if (xs->xs_control & (XS_CTL_DATA_IN | XS_CTL_DATA_OUT)) {
704 #ifdef TRM_DEBUG
705 printf("xs->datalen...\n");
706 printf("sc->sc_dmat=%x\n", (int) sc->sc_dmat);
707 printf("srb->dmap=%x\n", (int) srb->dmap);
708 printf("xs->data=%x\n", (int) xs->data);
709 printf("xs->datalen=%x\n", (int) xs->datalen);
710 #endif
711 if ((error = bus_dmamap_load(sc->sc_dmat, srb->dmap,
712 xs->data, xs->datalen, NULL,
713 ((xs->xs_control & XS_CTL_NOSLEEP) ?
714 BUS_DMA_NOWAIT : BUS_DMA_WAITOK) |
715 BUS_DMA_STREAMING |
716 ((xs->xs_control & XS_CTL_DATA_IN) ?
717 BUS_DMA_READ : BUS_DMA_WRITE))) != 0) {
718 printf("%s: DMA transfer map unable to load, "
719 "error = %d\n", sc->sc_dev.dv_xname, error);
720 xs->error = XS_DRIVER_STUFFUP;
721 /*
722 * free SRB
723 */
724 srb->next = sc->sc_freesrb;
725 sc->sc_freesrb = srb;
726 splx(s);
727 return;
728 }
729 bus_dmamap_sync(sc->sc_dmat, srb->dmap, 0,
730 srb->dmap->dm_mapsize,
731 (xs->xs_control & XS_CTL_DATA_IN) ?
732 BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE);
733
734 /* Set up the scatter gather list */
735 for (i = 0; i < srb->dmap->dm_nsegs; i++) {
736 srb->sgentry[i].address =
737 htole32(srb->dmap->dm_segs[i].ds_addr);
738 srb->sgentry[i].length =
739 htole32(srb->dmap->dm_segs[i].ds_len);
740 }
741 srb->buflen = xs->datalen;
742 srb->sgcnt = srb->dmap->dm_nsegs;
743 } else {
744 srb->sgentry[0].address = 0;
745 srb->sgentry[0].length = 0;
746 srb->buflen = 0;
747 srb->sgcnt = 0;
748 }
749 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap,
750 srb->sgoffset, TRM_SG_SIZE, BUS_DMASYNC_PREWRITE);
751
752 srb->sgindex = 0;
753 srb->hastat = 0;
754 srb->tastat = 0;
755 srb->msgcnt = 0;
756 srb->srbstat = 0;
757 srb->flag = 0;
758 srb->state = 0;
759 srb->phase = PH_BUS_FREE; /* SCSI bus free Phase */
760
761 trm_send_srb(xs, sc, srb);
762 splx(s);
763
764 if ((xs->xs_control & XS_CTL_POLL) == 0) {
765 int timeout = xs->timeout;
766 timeout = (timeout > 100000) ?
767 timeout / 1000 * hz : timeout * hz / 1000;
768 callout_reset(&xs->xs_callout, timeout,
769 trm_timeout, srb);
770 } else {
771 s = splbio();
772 do {
773 while (--xs->timeout) {
774 DELAY(1000);
775 if (bus_space_read_2(iot, ioh,
776 TRM_SCSI_STATUS) & SCSIINTERRUPT)
777 break;
778 }
779 if (xs->timeout == 0) {
780 trm_timeout(srb);
781 break;
782 } else
783 trm_intr(sc);
784 } while ((xs->xs_status & XS_STS_DONE) == 0);
785 splx(s);
786 }
787 return;
788
789 case ADAPTER_REQ_GROW_RESOURCES:
790 /* XXX Not supported. */
791 return;
792
793 case ADAPTER_REQ_SET_XFER_MODE:
794 /* XXX XXX XXX */
795 return;
796 }
797 }
798
799 static void
800 trm_reset_device(sc)
801 struct trm_softc *sc;
802 {
803 struct trm_dcb *dcb, *pdcb;
804 struct trm_nvram *eeprom;
805 int index;
806
807 dcb = sc->sc_linkdcb;
808 if (dcb == NULL)
809 return;
810
811 pdcb = dcb;
812 do {
813 dcb->mode &= ~(SYNC_NEGO_DONE | WIDE_NEGO_DONE);
814 dcb->synctl = 0;
815 dcb->offset = 0;
816 eeprom = &sc->sc_eeprom;
817 dcb->tacfg = eeprom->target[dcb->id].config0;
818 index = eeprom->target[dcb->id].period & 0x07;
819 dcb->period = trm_clock_period[index];
820 if ((dcb->tacfg & NTC_DO_WIDE_NEGO) &&
821 (sc->sc_config & HCC_WIDE_CARD))
822 dcb->mode |= WIDE_NEGO_ENABLE;
823
824 dcb = dcb->next;
825 }
826 while (pdcb != dcb);
827 }
828
829 static void
830 trm_recover_srb(sc)
831 struct trm_softc *sc;
832 {
833 struct trm_dcb *dcb, *pdcb;
834 struct trm_srb *psrb, *psrb2;
835 int i;
836
837 dcb = sc->sc_linkdcb;
838 if (dcb == NULL)
839 return;
840
841 pdcb = dcb;
842 do {
843 psrb = pdcb->gosrb;
844 for (i = 0; i < pdcb->gosrb_cnt; i++) {
845 psrb2 = psrb;
846 psrb = psrb->next;
847 if (pdcb->waitsrb) {
848 psrb2->next = pdcb->waitsrb;
849 pdcb->waitsrb = psrb2;
850 } else {
851 pdcb->waitsrb = psrb2;
852 pdcb->last_waitsrb = psrb2;
853 psrb2->next = NULL;
854 }
855 }
856 pdcb->gosrb_cnt = 0;
857 pdcb->gosrb = NULL;
858 pdcb->tagmask = 0;
859 pdcb = pdcb->next;
860 }
861 while (pdcb != dcb);
862 }
863
864 /*
865 * perform a hard reset on the SCSI bus (and TRM_S1040 chip).
866 */
867 static void
868 trm_reset(sc)
869 struct trm_softc *sc;
870 {
871 bus_space_tag_t iot = sc->sc_iot;
872 bus_space_handle_t ioh = sc->sc_ioh;
873 int s;
874
875 #ifdef TRM_DEBUG
876 printf("%s: SCSI RESET.........", sc->sc_dev.dv_xname);
877 #endif
878 s = splbio();
879
880 /* disable SCSI and DMA interrupt */
881 bus_space_write_1(iot, ioh, TRM_DMA_INTEN, 0);
882 bus_space_write_1(iot, ioh, TRM_SCSI_INTEN, 0);
883
884 trm_reset_scsi_bus(sc);
885 DELAY(500000);
886
887 /* Enable SCSI interrupt */
888 bus_space_write_1(iot, ioh, TRM_SCSI_INTEN,
889 EN_SELECT | EN_SELTIMEOUT | EN_DISCONNECT | EN_RESELECTED |
890 EN_SCSIRESET | EN_BUSSERVICE | EN_CMDDONE);
891
892 /* Enable DMA interrupt */
893 bus_space_write_1(iot, ioh, TRM_DMA_INTEN, EN_SCSIINTR);
894
895 /* Clear DMA FIFO */
896 bus_space_write_1(iot, ioh, TRM_DMA_CONTROL, CLRXFIFO);
897
898 /* Clear SCSI FIFO */
899 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_CLRFIFO);
900
901 trm_reset_device(sc);
902 trm_doing_srb_done(sc);
903 sc->sc_actdcb = NULL;
904 sc->sc_flag = 0; /* RESET_DETECT, RESET_DONE, RESET_DEV */
905 trm_wait_srb(sc);
906
907 splx(s);
908 }
909
910 static void
911 trm_timeout(arg)
912 void *arg;
913 {
914 struct trm_srb *srb = (struct trm_srb *)arg;
915 struct scsipi_xfer *xs = srb->xs;
916 struct scsipi_periph *periph = xs->xs_periph;
917 struct trm_softc *sc;
918 int s;
919
920 if (xs == NULL)
921 printf("trm_timeout called with xs == NULL\n");
922
923 else {
924 scsipi_printaddr(xs->xs_periph);
925 printf("SCSI OpCode 0x%02x timed out\n", xs->cmd->opcode);
926 }
927
928 sc = (void *)periph->periph_channel->chan_adapter->adapt_dev;
929
930 s = splbio();
931 trm_reset_scsi_bus(sc);
932 callout_stop(&xs->xs_callout);
933 splx(s);
934 }
935
936 static int
937 trm_start_scsi(sc, dcb, srb)
938 struct trm_softc *sc;
939 struct trm_dcb *dcb;
940 struct trm_srb *srb;
941 {
942 bus_space_tag_t iot = sc->sc_iot;
943 bus_space_handle_t ioh = sc->sc_ioh;
944 int tagnum;
945 u_int32_t tagmask;
946 u_int8_t scsicmd, idmsg;
947
948 srb->tagnum = 31;
949
950 bus_space_write_1(iot, ioh, TRM_SCSI_HOSTID, sc->sc_id);
951 bus_space_write_1(iot, ioh, TRM_SCSI_TARGETID, dcb->id);
952 bus_space_write_1(iot, ioh, TRM_SCSI_SYNC, dcb->synctl);
953 bus_space_write_1(iot, ioh, TRM_SCSI_OFFSET, dcb->offset);
954 srb->phase = PH_BUS_FREE; /* initial phase */
955 /* Flush FIFO */
956 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_CLRFIFO);
957
958 idmsg = dcb->idmsg;
959
960 if ((srb->cmd[0] == INQUIRY) ||
961 (srb->cmd[0] == REQUEST_SENSE)) {
962 if (((dcb->mode & WIDE_NEGO_ENABLE) &&
963 (dcb->mode & WIDE_NEGO_DONE) == 0) ||
964 ((dcb->mode & SYNC_NEGO_ENABLE) &&
965 (dcb->mode & SYNC_NEGO_DONE) == 0)) {
966 if ((dcb->idmsg & 7) == 0 || srb->cmd[0] != INQUIRY) {
967 scsicmd = SCMD_SEL_ATNSTOP;
968 srb->state = SRB_MSGOUT;
969 goto polling;
970 }
971 }
972 /* Send identify message */
973 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
974 idmsg & ~MSG_IDENTIFY_DISCFLAG);
975 scsicmd = SCMD_SEL_ATN;
976 srb->state = SRB_START_;
977 } else { /* not inquiry,request sense,auto request sense */
978 /* Send identify message */
979 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO, idmsg);
980 DELAY(30);
981 scsicmd = SCMD_SEL_ATN;
982 srb->state = SRB_START_;
983 if (dcb->mode & EN_TAG_QUEUING) {
984 /* Send Tag message, get tag id */
985 tagmask = 1;
986 tagnum = 0;
987 while (tagmask & dcb->tagmask) {
988 tagmask = tagmask << 1;
989 tagnum++;
990 }
991 /* Send Tag id */
992 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
993 MSG_SIMPLE_Q_TAG);
994 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO, tagnum);
995
996 dcb->tagmask |= tagmask;
997 srb->tagnum = tagnum;
998
999 scsicmd = SCMD_SEL_ATN3;
1000 srb->state = SRB_START_;
1001 }
1002 }
1003 polling:
1004 /*
1005 * Send CDB ..command block...
1006 */
1007 bus_space_write_multi_1(iot, ioh, TRM_SCSI_FIFO, srb->cmd, srb->cmdlen);
1008
1009 if (bus_space_read_2(iot, ioh, TRM_SCSI_STATUS) & SCSIINTERRUPT) {
1010 /*
1011 * If trm_start_scsi return 1: current interrupt status
1012 * is interrupt disreenable. It's said that SCSI processor
1013 * has more one SRB need to do, SCSI processor has been
1014 * occupied by one SRB.
1015 */
1016 srb->state = SRB_READY;
1017 dcb->tagmask &= ~(1 << srb->tagnum);
1018 return (1);
1019 } else {
1020 /*
1021 * If trm_start_scsi return 0: current interrupt status
1022 * is interrupt enable. It's said that SCSI processor is
1023 * unoccupied.
1024 */
1025 srb->phase = PH_BUS_FREE; /* SCSI bus free Phase */
1026 sc->sc_actdcb = dcb;
1027 dcb->actsrb = srb;
1028 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL,
1029 DO_DATALATCH | DO_HWRESELECT);
1030 /* it's important for atn stop */
1031 /*
1032 * SCSI command
1033 */
1034 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND, scsicmd);
1035 return (0);
1036 }
1037 }
1038
1039 /*
1040 * Catch an interrupt from the adapter
1041 * Process pending device interrupts.
1042 */
1043 static int
1044 trm_intr(vsc)
1045 void *vsc;
1046 {
1047 bus_space_tag_t iot;
1048 bus_space_handle_t ioh;
1049 struct trm_softc *sc;
1050 struct trm_dcb *dcb;
1051 struct trm_srb *srb;
1052 void (*state_v) (struct trm_softc *, struct trm_srb *, int *);
1053 int phase, intstat, stat = 0;
1054
1055 #ifdef TRM_DEBUG
1056 printf("trm_intr......\n");
1057 #endif
1058 sc = (struct trm_softc *)vsc;
1059 iot = sc->sc_iot;
1060 ioh = sc->sc_ioh;
1061
1062 if (sc == NULL)
1063 return (0);
1064
1065 stat = bus_space_read_2(iot, ioh, TRM_SCSI_STATUS);
1066 if ((stat & SCSIINTERRUPT) == 0)
1067 return (0);
1068
1069 #ifdef TRM_DEBUG
1070 printf("stat=%2x,", stat);
1071 #endif
1072 intstat = bus_space_read_1(iot, ioh, TRM_SCSI_INTSTATUS);
1073
1074 #ifdef TRM_DEBUG
1075 printf("intstat=%2x,", intstat);
1076 #endif
1077 if (intstat & (INT_SELTIMEOUT | INT_DISCONNECT)) {
1078 trm_disconnect(sc);
1079 return (1);
1080 }
1081 if (intstat & INT_RESELECTED) {
1082 trm_reselect(sc);
1083 return (1);
1084 }
1085 if (intstat & INT_SCSIRESET) {
1086 trm_scsi_reset_detect(sc);
1087 return (1);
1088 }
1089 if (intstat & (INT_BUSSERVICE | INT_CMDDONE)) {
1090 dcb = sc->sc_actdcb;
1091 srb = dcb->actsrb;
1092 if (dcb != NULL)
1093 if (dcb->flag & ABORT_DEV_) {
1094 srb->msgout[0] = MSG_ABORT;
1095 trm_msgout_abort(sc, srb);
1096 }
1097 /*
1098 * software sequential machine
1099 */
1100 phase = srb->phase; /* phase: */
1101
1102 /*
1103 * 62037 or 62137 call trm_scsi_phase0[]... "phase
1104 * entry" handle every phase before start transfer
1105 */
1106 state_v = (void *)trm_scsi_phase0[phase];
1107 state_v(sc, srb, &stat);
1108
1109 /*
1110 * if there were any exception occured
1111 * stat will be modify to bus free phase new
1112 * stat transfer out from ... prvious state_v
1113 *
1114 */
1115 /* phase:0,1,2,3,4,5,6,7 */
1116 srb->phase = stat & PHASEMASK;
1117 phase = stat & PHASEMASK;
1118
1119 /*
1120 * call trm_scsi_phase1[]... "phase entry" handle every
1121 * phase do transfer
1122 */
1123 state_v = (void *)trm_scsi_phase1[phase];
1124 state_v(sc, srb, &stat);
1125 return (1);
1126 }
1127 return (0);
1128 }
1129
1130 static void
1131 trm_msgout_phase0(sc, srb, pstat)
1132 struct trm_softc *sc;
1133 struct trm_srb *srb;
1134 int *pstat;
1135 {
1136
1137 if (srb->state & (SRB_UNEXPECT_RESEL | SRB_ABORT_SENT))
1138 *pstat = PH_BUS_FREE; /* .. initial phase */
1139 }
1140
1141 static void
1142 trm_msgout_phase1(sc, srb, pstat)
1143 struct trm_softc *sc;
1144 struct trm_srb *srb;
1145 int *pstat;
1146 {
1147 bus_space_tag_t iot = sc->sc_iot;
1148 bus_space_handle_t ioh = sc->sc_ioh;
1149 struct trm_dcb *dcb;
1150
1151 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_CLRFIFO);
1152 dcb = sc->sc_actdcb;
1153 if ((srb->state & SRB_MSGOUT) == 0) {
1154 if (srb->msgcnt > 0) {
1155 bus_space_write_multi_1(iot, ioh, TRM_SCSI_FIFO,
1156 srb->msgout, srb->msgcnt);
1157 srb->msgcnt = 0;
1158 if ((dcb->flag & ABORT_DEV_) &&
1159 (srb->msgout[0] == MSG_ABORT))
1160 srb->state = SRB_ABORT_SENT;
1161 } else {
1162 if ((srb->cmd[0] == INQUIRY) ||
1163 (srb->cmd[0] == REQUEST_SENSE))
1164 if (dcb->mode & SYNC_NEGO_ENABLE)
1165 goto mop1;
1166
1167 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO, MSG_ABORT);
1168 }
1169 } else {
1170 mop1: /* message out phase */
1171 if ((srb->state & SRB_DO_WIDE_NEGO) == 0 &&
1172 (dcb->mode & WIDE_NEGO_ENABLE)) {
1173 /*
1174 * WIDE DATA TRANSFER REQUEST code (03h)
1175 */
1176 dcb->mode &= ~(SYNC_NEGO_DONE | EN_ATN_STOP);
1177 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1178 dcb->idmsg & ~MSG_IDENTIFY_DISCFLAG);
1179 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1180 MSG_EXTENDED); /* (01h) */
1181
1182 /* Message length (02h) */
1183 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1184 MSG_EXT_WDTR_LEN);
1185
1186 /* wide data xfer (03h) */
1187 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1188 MSG_EXT_WDTR);
1189
1190 /* width: 0(8bit), 1(16bit) ,2(32bit) */
1191 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1192 MSG_EXT_WDTR_BUS_16_BIT);
1193
1194 srb->state |= SRB_DO_WIDE_NEGO;
1195 } else if ((srb->state & SRB_DO_SYNC_NEGO) == 0 &&
1196 (dcb->mode & SYNC_NEGO_ENABLE)) {
1197 /*
1198 * SYNCHRONOUS DATA TRANSFER REQUEST code (01h)
1199 */
1200 if ((dcb->mode & WIDE_NEGO_DONE) == 0)
1201 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1202 dcb->idmsg & ~MSG_IDENTIFY_DISCFLAG);
1203
1204 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1205 MSG_EXTENDED); /* (01h) */
1206
1207 /* Message length (03h) */
1208 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1209 MSG_EXT_SDTR_LEN);
1210
1211 /* SYNCHRONOUS DATA TRANSFER REQUEST code (01h) */
1212 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1213 MSG_EXT_SDTR);
1214
1215 /* Transfer peeriod factor */
1216 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO, dcb->period);
1217
1218 /* REQ/ACK offset */
1219 bus_space_write_1(iot, ioh, TRM_SCSI_FIFO,
1220 SYNC_NEGO_OFFSET);
1221 srb->state |= SRB_DO_SYNC_NEGO;
1222 }
1223 }
1224 /* it's important for atn stop */
1225 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_DATALATCH);
1226
1227 /*
1228 * SCSI cammand
1229 */
1230 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND, SCMD_FIFO_OUT);
1231 }
1232
1233 static void
1234 trm_command_phase0(sc, srb, pstat)
1235 struct trm_softc *sc;
1236 struct trm_srb *srb;
1237 int *pstat;
1238 {
1239
1240 }
1241
1242 static void
1243 trm_command_phase1(sc, srb, pstat)
1244 struct trm_softc *sc;
1245 struct trm_srb *srb;
1246 int *pstat;
1247 {
1248 bus_space_tag_t iot = sc->sc_iot;
1249 bus_space_handle_t ioh = sc->sc_ioh;
1250
1251 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_CLRATN | DO_CLRFIFO);
1252 bus_space_write_multi_1(iot, ioh, TRM_SCSI_FIFO, srb->cmd, srb->cmdlen);
1253
1254 srb->state = SRB_COMMAND;
1255 /* it's important for atn stop */
1256 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_DATALATCH);
1257
1258 /*
1259 * SCSI cammand
1260 */
1261 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND, SCMD_FIFO_OUT);
1262 }
1263
1264 static void
1265 trm_dataout_phase0(sc, srb, pstat)
1266 struct trm_softc *sc;
1267 struct trm_srb *srb;
1268 int *pstat;
1269 {
1270 bus_space_tag_t iot = sc->sc_iot;
1271 bus_space_handle_t ioh = sc->sc_ioh;
1272 struct trm_dcb *dcb;
1273 struct trm_sg_entry *sg;
1274 int sgindex;
1275 u_int32_t xferlen, leftcnt = 0;
1276
1277 dcb = srb->dcb;
1278
1279 if ((srb->state & SRB_XFERPAD) == 0) {
1280 if (*pstat & PARITYERROR)
1281 srb->srbstat |= PARITY_ERROR;
1282
1283 if ((*pstat & SCSIXFERDONE) == 0) {
1284 /*
1285 * when data transfer from DMA FIFO to SCSI FIFO
1286 * if there was some data left in SCSI FIFO
1287 */
1288 leftcnt = bus_space_read_1(iot, ioh, TRM_SCSI_FIFOCNT) &
1289 SCSI_FIFOCNT_MASK;
1290 if (dcb->synctl & WIDE_SYNC)
1291 /*
1292 * if WIDE scsi SCSI FIFOCNT unit is word
1293 * so need to * 2
1294 */
1295 leftcnt <<= 1;
1296 }
1297 /*
1298 * caculate all the residue data that not yet tranfered
1299 * SCSI transfer counter + left in SCSI FIFO data
1300 *
1301 * .....TRM_SCSI_XCNT (24bits)
1302 * The counter always decrement by one for every SCSI
1303 * byte transfer.
1304 * .....TRM_SCSI_FIFOCNT ( 5bits)
1305 * The counter is SCSI FIFO offset counter
1306 */
1307 leftcnt += bus_space_read_4(iot, ioh, TRM_SCSI_XCNT);
1308 if (leftcnt == 1) {
1309 leftcnt = 0;
1310 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL,
1311 DO_CLRFIFO);
1312 }
1313 if ((leftcnt == 0) || (*pstat & SCSIXFERCNT_2_ZERO)) {
1314 while ((bus_space_read_1(iot, ioh, TRM_DMA_STATUS) &
1315 DMAXFERCOMP) == 0)
1316 ;
1317
1318 srb->buflen = 0;
1319 } else { /* Update SG list */
1320 /*
1321 * if transfer not yet complete
1322 * there were some data residue in SCSI FIFO or
1323 * SCSI transfer counter not empty
1324 */
1325 if (srb->buflen != leftcnt) {
1326 /* data that had transferred length */
1327 xferlen = srb->buflen - leftcnt;
1328
1329 /* next time to be transferred length */
1330 srb->buflen = leftcnt;
1331
1332 /*
1333 * parsing from last time disconnect sgindex
1334 */
1335 sg = srb->sgentry + srb->sgindex;
1336 for (sgindex = srb->sgindex;
1337 sgindex < srb->sgcnt;
1338 sgindex++, sg++) {
1339 /*
1340 * find last time which SG transfer
1341 * be disconnect
1342 */
1343 if (xferlen >= le32toh(sg->length))
1344 xferlen -= le32toh(sg->length);
1345 else {
1346 /*
1347 * update last time
1348 * disconnected SG list
1349 */
1350 /* residue data length */
1351 sg->length = htole32(
1352 le32toh(sg->length)
1353 - xferlen);
1354 /* residue data pointer */
1355 sg->address = htole32(
1356 le32toh(sg->address)
1357 + xferlen);
1358 srb->sgindex = sgindex;
1359 break;
1360 }
1361 }
1362 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap,
1363 srb->sgoffset, TRM_SG_SIZE,
1364 BUS_DMASYNC_PREWRITE);
1365 }
1366 }
1367 }
1368 bus_space_write_1(iot, ioh, TRM_DMA_CONTROL, STOPDMAXFER);
1369 }
1370
1371 static void
1372 trm_dataout_phase1(sc, srb, pstat)
1373 struct trm_softc *sc;
1374 struct trm_srb *srb;
1375 int *pstat;
1376 {
1377
1378 /*
1379 * do prepare befor transfer when data out phase
1380 */
1381 trm_dataio_xfer(sc, srb, XFERDATAOUT);
1382 }
1383
1384 static void
1385 trm_datain_phase0(sc, srb, pstat)
1386 struct trm_softc *sc;
1387 struct trm_srb *srb;
1388 int *pstat;
1389 {
1390 bus_space_tag_t iot = sc->sc_iot;
1391 bus_space_handle_t ioh = sc->sc_ioh;
1392 struct trm_sg_entry *sg;
1393 int sgindex;
1394 u_int32_t xferlen, leftcnt = 0;
1395
1396 if ((srb->state & SRB_XFERPAD) == 0) {
1397 if (*pstat & PARITYERROR)
1398 srb->srbstat |= PARITY_ERROR;
1399
1400 leftcnt += bus_space_read_4(iot, ioh, TRM_SCSI_XCNT);
1401 if ((leftcnt == 0) || (*pstat & SCSIXFERCNT_2_ZERO)) {
1402 while ((bus_space_read_1(iot, ioh, TRM_DMA_STATUS) &
1403 DMAXFERCOMP) == 0)
1404 ;
1405
1406 srb->buflen = 0;
1407 } else { /* phase changed */
1408 /*
1409 * parsing the case:
1410 * when a transfer not yet complete
1411 * but be disconnected by uper layer
1412 * if transfer not yet complete
1413 * there were some data residue in SCSI FIFO or
1414 * SCSI transfer counter not empty
1415 */
1416 if (srb->buflen != leftcnt) {
1417 /*
1418 * data that had transferred length
1419 */
1420 xferlen = srb->buflen - leftcnt;
1421
1422 /*
1423 * next time to be transferred length
1424 */
1425 srb->buflen = leftcnt;
1426
1427 /*
1428 * parsing from last time disconnect sgindex
1429 */
1430 sg = srb->sgentry + srb->sgindex;
1431 for (sgindex = srb->sgindex;
1432 sgindex < srb->sgcnt;
1433 sgindex++, sg++) {
1434 /*
1435 * find last time which SG transfer
1436 * be disconnect
1437 */
1438 if (xferlen >= le32toh(sg->length))
1439 xferlen -= le32toh(sg->length);
1440 else {
1441 /*
1442 * update last time
1443 * disconnected SG list
1444 */
1445 /* residue data length */
1446 sg->length = htole32(
1447 le32toh(sg->length)
1448 - xferlen);
1449 /* residue data pointer */
1450 sg->address = htole32(
1451 le32toh(sg->address)
1452 + xferlen);
1453 srb->sgindex = sgindex;
1454 break;
1455 }
1456 }
1457 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap,
1458 srb->sgoffset, TRM_SG_SIZE,
1459 BUS_DMASYNC_PREWRITE);
1460 }
1461 }
1462 }
1463 }
1464
1465 static void
1466 trm_datain_phase1(sc, srb, pstat)
1467 struct trm_softc *sc;
1468 struct trm_srb *srb;
1469 int *pstat;
1470 {
1471
1472 /*
1473 * do prepare befor transfer when data in phase
1474 */
1475 trm_dataio_xfer(sc, srb, XFERDATAIN);
1476 }
1477
1478 static void
1479 trm_dataio_xfer(sc, srb, iodir)
1480 struct trm_softc *sc;
1481 struct trm_srb *srb;
1482 int iodir;
1483 {
1484 bus_space_tag_t iot = sc->sc_iot;
1485 bus_space_handle_t ioh = sc->sc_ioh;
1486 struct trm_dcb *dcb = srb->dcb;
1487
1488 if (srb->sgindex < srb->sgcnt) {
1489 if (srb->buflen > 0) {
1490 /*
1491 * load what physical address of Scatter/Gather
1492 * list table want to be transfer
1493 */
1494 srb->state = SRB_DATA_XFER;
1495 bus_space_write_4(iot, ioh, TRM_DMA_XHIGHADDR, 0);
1496 bus_space_write_4(iot, ioh, TRM_DMA_XLOWADDR,
1497 srb->sgaddr +
1498 srb->sgindex * sizeof(struct trm_sg_entry));
1499 /*
1500 * load how many bytes in the Scatter/Gather list table
1501 */
1502 bus_space_write_4(iot, ioh, TRM_DMA_XCNT,
1503 (srb->sgcnt - srb->sgindex)
1504 * sizeof(struct trm_sg_entry));
1505 /*
1506 * load total xfer length (24bits) max value 16Mbyte
1507 */
1508 bus_space_write_4(iot, ioh, TRM_SCSI_XCNT, srb->buflen);
1509 /* Start DMA transfer */
1510 bus_space_write_1(iot, ioh, TRM_DMA_COMMAND,
1511 iodir | SGXFER);
1512 bus_space_write_1(iot, ioh, TRM_DMA_CONTROL,
1513 STARTDMAXFER);
1514
1515 /* Start SCSI transfer */
1516 /* it's important for atn stop */
1517 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL,
1518 DO_DATALATCH);
1519
1520 /*
1521 * SCSI cammand
1522 */
1523 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND,
1524 (iodir == XFERDATAOUT) ?
1525 SCMD_DMA_OUT : SCMD_DMA_IN);
1526 } else { /* xfer pad */
1527 if (srb->sgcnt) {
1528 srb->hastat = H_OVER_UNDER_RUN;
1529 srb->srbstat |= OVER_RUN;
1530 }
1531 bus_space_write_4(iot, ioh, TRM_SCSI_XCNT,
1532 (dcb->synctl & WIDE_SYNC) ? 2 : 1);
1533
1534 if (iodir == XFERDATAOUT)
1535 bus_space_write_2(iot, ioh, TRM_SCSI_FIFO, 0);
1536 else
1537 bus_space_read_2(iot, ioh, TRM_SCSI_FIFO);
1538
1539 srb->state |= SRB_XFERPAD;
1540 /* it's important for atn stop */
1541 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL,
1542 DO_DATALATCH);
1543
1544 /*
1545 * SCSI cammand
1546 */
1547 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND,
1548 (iodir == XFERDATAOUT) ?
1549 SCMD_FIFO_OUT : SCMD_FIFO_IN);
1550 }
1551 }
1552 }
1553
1554 static void
1555 trm_status_phase0(sc, srb, pstat)
1556 struct trm_softc *sc;
1557 struct trm_srb *srb;
1558 int *pstat;
1559 {
1560 bus_space_tag_t iot = sc->sc_iot;
1561 bus_space_handle_t ioh = sc->sc_ioh;
1562
1563 srb->tastat = bus_space_read_1(iot, ioh, TRM_SCSI_FIFO);
1564 srb->state = SRB_COMPLETED;
1565 *pstat = PH_BUS_FREE; /* .. initial phase */
1566 /* it's important for atn stop */
1567 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_DATALATCH);
1568
1569 /*
1570 * SCSI cammand
1571 */
1572 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND, SCMD_MSGACCEPT);
1573 }
1574
1575 static void
1576 trm_status_phase1(sc, srb, pstat)
1577 struct trm_softc *sc;
1578 struct trm_srb *srb;
1579 int *pstat;
1580 {
1581 bus_space_tag_t iot = sc->sc_iot;
1582 bus_space_handle_t ioh = sc->sc_ioh;
1583
1584 if (bus_space_read_1(iot, ioh, TRM_DMA_COMMAND) & XFERDATAIN) {
1585 if ((bus_space_read_1(iot, ioh, TRM_SCSI_FIFOCNT)
1586 & SCSI_FIFO_EMPTY) == 0)
1587 bus_space_write_2(iot, ioh,
1588 TRM_SCSI_CONTROL, DO_CLRFIFO);
1589 if ((bus_space_read_1(iot, ioh, TRM_DMA_FIFOSTATUS)
1590 & DMA_FIFO_EMPTY) == 0)
1591 bus_space_write_1(iot, ioh, TRM_DMA_CONTROL, CLRXFIFO);
1592 } else {
1593 if ((bus_space_read_1(iot, ioh, TRM_DMA_FIFOSTATUS)
1594 & DMA_FIFO_EMPTY) == 0)
1595 bus_space_write_1(iot, ioh, TRM_DMA_CONTROL, CLRXFIFO);
1596 if ((bus_space_read_1(iot, ioh, TRM_SCSI_FIFOCNT)
1597 & SCSI_FIFO_EMPTY) == 0)
1598 bus_space_write_2(iot, ioh,
1599 TRM_SCSI_CONTROL, DO_CLRFIFO);
1600 }
1601 srb->state = SRB_STATUS;
1602 /* it's important for atn stop */
1603 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_DATALATCH);
1604
1605 /*
1606 * SCSI cammand
1607 */
1608 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND, SCMD_COMP);
1609 }
1610
1611 static void
1612 trm_msgin_phase0(sc, srb, pstat)
1613 struct trm_softc *sc;
1614 struct trm_srb *srb;
1615 int *pstat;
1616 {
1617 bus_space_tag_t iot = sc->sc_iot;
1618 bus_space_handle_t ioh = sc->sc_ioh;
1619 struct trm_dcb *dcb = sc->sc_actdcb;
1620 struct trm_srb *tempsrb;
1621 int syncxfer, tagid, index;
1622 u_int8_t msgin_code;
1623
1624 msgin_code = bus_space_read_1(iot, ioh, TRM_SCSI_FIFO);
1625 if ((srb->state & SRB_EXTEND_MSGIN) == 0) {
1626 if (msgin_code == MSG_DISCONNECT) {
1627 srb->state = SRB_DISCONNECT;
1628 goto min6;
1629 } else if (msgin_code == MSG_SAVEDATAPOINTER) {
1630 goto min6;
1631 } else if ((msgin_code == MSG_EXTENDED) ||
1632 ((msgin_code >= MSG_SIMPLE_Q_TAG) &&
1633 (msgin_code <= MSG_ORDERED_Q_TAG))) {
1634 srb->state |= SRB_EXTEND_MSGIN;
1635 /* extended message (01h) */
1636 srb->msgin[0] = msgin_code;
1637
1638 srb->msgcnt = 1;
1639 /* extended message length (n) */
1640 srb->msg = &srb->msgin[1];
1641
1642 goto min6;
1643 } else if (msgin_code == MSG_MESSAGE_REJECT) {
1644 /* Reject message */
1645 /* do wide nego reject */
1646 if (dcb->mode & WIDE_NEGO_ENABLE) {
1647 dcb = srb->dcb;
1648 dcb->mode |= WIDE_NEGO_DONE;
1649 dcb->mode &= ~(SYNC_NEGO_DONE | EN_ATN_STOP |
1650 WIDE_NEGO_ENABLE);
1651 srb->state &= ~(SRB_DO_WIDE_NEGO | SRB_MSGIN);
1652 if ((dcb->mode & SYNC_NEGO_ENABLE) &&
1653 (dcb->mode & SYNC_NEGO_DONE) == 0) {
1654 /* Set ATN, in case ATN was clear */
1655 srb->state |= SRB_MSGOUT;
1656 bus_space_write_2(iot, ioh,
1657 TRM_SCSI_CONTROL, DO_SETATN);
1658 } else
1659 /* Clear ATN */
1660 bus_space_write_2(iot, ioh,
1661 TRM_SCSI_CONTROL, DO_CLRATN);
1662 } else if (dcb->mode & SYNC_NEGO_ENABLE) {
1663 /* do sync nego reject */
1664 bus_space_write_2(iot, ioh,
1665 TRM_SCSI_CONTROL, DO_CLRATN);
1666 if (srb->state & SRB_DO_SYNC_NEGO) {
1667 dcb = srb->dcb;
1668 dcb->mode &= ~(SYNC_NEGO_ENABLE |
1669 SYNC_NEGO_DONE);
1670 dcb->synctl = 0;
1671 dcb->offset = 0;
1672 goto re_prog;
1673 }
1674 }
1675 goto min6;
1676 } else if (msgin_code == MSG_IGN_WIDE_RESIDUE) {
1677 bus_space_write_4(iot, ioh, TRM_SCSI_XCNT, 1);
1678 bus_space_read_1(iot, ioh, TRM_SCSI_FIFO);
1679 goto min6;
1680 } else {
1681 /*
1682 * Restore data pointer message
1683 * Save data pointer message
1684 * Completion message
1685 * NOP message
1686 */
1687 goto min6;
1688 }
1689 } else {
1690 /*
1691 * when extend message in:srb->state = SRB_EXTEND_MSGIN
1692 * Parsing incomming extented messages
1693 */
1694 *srb->msg = msgin_code;
1695 srb->msgcnt++;
1696 srb->msg++;
1697 #ifdef TRM_DEBUG
1698 printf("srb->msgin[0]=%2x\n", srb->msgin[0]);
1699 printf("srb->msgin[1]=%2x\n", srb->msgin[1]);
1700 printf("srb->msgin[2]=%2x\n", srb->msgin[2]);
1701 printf("srb->msgin[3]=%2x\n", srb->msgin[3]);
1702 printf("srb->msgin[4]=%2x\n", srb->msgin[4]);
1703 #endif
1704 if ((srb->msgin[0] >= MSG_SIMPLE_Q_TAG) &&
1705 (srb->msgin[0] <= MSG_ORDERED_Q_TAG)) {
1706 /*
1707 * is QUEUE tag message :
1708 *
1709 * byte 0:
1710 * HEAD QUEUE TAG (20h)
1711 * ORDERED QUEUE TAG (21h)
1712 * SIMPLE QUEUE TAG (22h)
1713 * byte 1:
1714 * Queue tag (00h - FFh)
1715 */
1716 if (srb->msgcnt == 2) {
1717 srb->state = 0;
1718 tagid = srb->msgin[1];
1719 srb = dcb->gosrb;
1720 tempsrb = dcb->last_gosrb;
1721 if (srb) {
1722 for (;;) {
1723 if (srb->tagnum != tagid) {
1724 if (srb == tempsrb)
1725 goto mingx0;
1726
1727 srb = srb->next;
1728 } else
1729 break;
1730 }
1731 if (dcb->flag & ABORT_DEV_) {
1732 srb->state = SRB_ABORT_SENT;
1733 srb->msgout[0] = MSG_ABORT;
1734 trm_msgout_abort(sc, srb);
1735 }
1736 if ((srb->state & SRB_DISCONNECT) == 0)
1737 goto mingx0;
1738
1739 dcb->actsrb = srb;
1740 srb->state = SRB_DATA_XFER;
1741 } else {
1742 mingx0:
1743 srb = &sc->sc_tempsrb;
1744 srb->state = SRB_UNEXPECT_RESEL;
1745 dcb->actsrb = srb;
1746 srb->msgout[0] = MSG_ABORT_TAG;
1747 trm_msgout_abort(sc, srb);
1748 }
1749 }
1750 } else if ((srb->msgin[0] == MSG_EXTENDED) &&
1751 (srb->msgin[2] == MSG_EXT_WDTR) &&
1752 (srb->msgcnt == 4)) {
1753 /*
1754 * is Wide data xfer Extended message :
1755 * ======================================
1756 * WIDE DATA TRANSFER REQUEST
1757 * ======================================
1758 * byte 0 : Extended message (01h)
1759 * byte 1 : Extended message length (02h)
1760 * byte 2 : WIDE DATA TRANSFER code (03h)
1761 * byte 3 : Transfer width exponent
1762 */
1763 dcb = srb->dcb;
1764 srb->state &= ~(SRB_EXTEND_MSGIN | SRB_DO_WIDE_NEGO);
1765 if ((srb->msgin[1] != MSG_EXT_WDTR_LEN)) {
1766 /* Length is wrong, reject it */
1767 dcb->mode &=
1768 ~(WIDE_NEGO_ENABLE | WIDE_NEGO_DONE);
1769 srb->msgcnt = 1;
1770 srb->msgin[0] = MSG_MESSAGE_REJECT;
1771 bus_space_write_2(iot, ioh,
1772 TRM_SCSI_CONTROL, DO_SETATN);
1773 goto min6;
1774 }
1775 if (dcb->mode & WIDE_NEGO_ENABLE) {
1776 /* Do wide negoniation */
1777 if (srb->msgin[3] > MSG_EXT_WDTR_BUS_32_BIT) {
1778 /* reject_msg: */
1779 dcb->mode &= ~(WIDE_NEGO_ENABLE |
1780 WIDE_NEGO_DONE);
1781 srb->msgcnt = 1;
1782 srb->msgin[0] = MSG_MESSAGE_REJECT;
1783 bus_space_write_2(iot, ioh,
1784 TRM_SCSI_CONTROL, DO_SETATN);
1785 goto min6;
1786 }
1787 if (srb->msgin[3] == MSG_EXT_WDTR_BUS_32_BIT)
1788 /* do 16 bits */
1789 srb->msgin[3] = MSG_EXT_WDTR_BUS_16_BIT;
1790 else {
1791 if ((dcb->mode & WIDE_NEGO_DONE) == 0) {
1792 srb->state &=
1793 ~(SRB_DO_WIDE_NEGO |
1794 SRB_MSGIN);
1795 dcb->mode |= WIDE_NEGO_DONE;
1796 dcb->mode &=
1797 ~(SYNC_NEGO_DONE |
1798 EN_ATN_STOP |
1799 WIDE_NEGO_ENABLE);
1800 if (srb->msgin[3] !=
1801 MSG_EXT_WDTR_BUS_8_BIT)
1802 /* is Wide data xfer */
1803 dcb->synctl |=
1804 WIDE_SYNC;
1805 }
1806 }
1807 } else
1808 srb->msgin[3] = MSG_EXT_WDTR_BUS_8_BIT;
1809
1810 srb->state |= SRB_MSGOUT;
1811 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL,
1812 DO_SETATN);
1813 goto min6;
1814 } else if ((srb->msgin[0] == MSG_EXTENDED) &&
1815 (srb->msgin[2] == MSG_EXT_SDTR) &&
1816 (srb->msgcnt == 5)) {
1817 /*
1818 * is 8bit transfer Extended message :
1819 * =================================
1820 * SYNCHRONOUS DATA TRANSFER REQUEST
1821 * =================================
1822 * byte 0 : Extended message (01h)
1823 * byte 1 : Extended message length (03)
1824 * byte 2 : SYNCHRONOUS DATA TRANSFER code (01h)
1825 * byte 3 : Transfer period factor
1826 * byte 4 : REQ/ACK offset
1827 */
1828 srb->state &= ~(SRB_EXTEND_MSGIN | SRB_DO_SYNC_NEGO);
1829 if (srb->msgin[1] != MSG_EXT_SDTR_LEN) {
1830 /* reject_msg: */
1831 srb->msgcnt = 1;
1832 srb->msgin[0] = MSG_MESSAGE_REJECT;
1833 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL,
1834 DO_SETATN);
1835 } else if (srb->msgin[3] == 0 || srb->msgin[4] == 0) {
1836 /* set async */
1837 dcb = srb->dcb;
1838 /* disable sync & sync nego */
1839 dcb->mode &=
1840 ~(SYNC_NEGO_ENABLE | SYNC_NEGO_DONE);
1841 dcb->synctl = 0;
1842 dcb->offset = 0;
1843 if (((dcb->flag & SHOW_MESSAGE_) == 0) &&
1844 (dcb->lun == 0)) {
1845 printf("%s: target %d, Sync period=0 "
1846 "or Sync offset=0 to be "
1847 "asynchronous transfer\n",
1848 sc->sc_dev.dv_xname, dcb->id);
1849 dcb->flag |= SHOW_MESSAGE_;
1850 }
1851 goto re_prog;
1852 } else { /* set sync */
1853 dcb = srb->dcb;
1854 dcb->mode |= SYNC_NEGO_ENABLE | SYNC_NEGO_DONE;
1855
1856 /* Transfer period factor */
1857 dcb->period = srb->msgin[3];
1858
1859 /* REQ/ACK offset */
1860 dcb->offset = srb->msgin[4];
1861 for (index = 0; index < 7; index++)
1862 if (srb->msgin[3] <=
1863 trm_clock_period[index])
1864 break;
1865
1866 dcb->synctl |= (index | ALT_SYNC);
1867 /*
1868 * show negotiation message
1869 */
1870 if (((dcb->flag & SHOW_MESSAGE_) == 0) &&
1871 (dcb->lun == 0)) {
1872 syncxfer = 100000 /
1873 (trm_clock_period[index] * 4);
1874 if (dcb->synctl & WIDE_SYNC) {
1875 printf("%s: target %d, "
1876 "16bits Wide transfer\n",
1877 sc->sc_dev.dv_xname,
1878 dcb->id);
1879 syncxfer = syncxfer * 2;
1880 } else
1881 printf("%s: target %d, "
1882 "8bits Narrow transfer\n",
1883 sc->sc_dev.dv_xname,
1884 dcb->id);
1885
1886 printf("%s: target %d, "
1887 "Sync transfer %d.%01d MB/sec, "
1888 "Offset %d\n", sc->sc_dev.dv_xname,
1889 dcb->id, syncxfer / 100,
1890 syncxfer % 100, dcb->offset);
1891 dcb->flag |= SHOW_MESSAGE_;
1892 }
1893 re_prog:
1894 /*
1895 * program SCSI control register
1896 */
1897 bus_space_write_1(iot, ioh, TRM_SCSI_SYNC,
1898 dcb->synctl);
1899 bus_space_write_1(iot, ioh, TRM_SCSI_OFFSET,
1900 dcb->offset);
1901 trm_set_xfer_rate(sc, srb, dcb);
1902 }
1903 }
1904 }
1905 min6:
1906 *pstat = PH_BUS_FREE; /* .. initial phase */
1907 /* it's important for atn stop */
1908 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_DATALATCH);
1909
1910 /*
1911 * SCSI cammand
1912 */
1913 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND, SCMD_MSGACCEPT);
1914 }
1915
1916 static void
1917 trm_msgin_phase1(sc, srb, pstat)
1918 struct trm_softc *sc;
1919 struct trm_srb *srb;
1920 int *pstat;
1921 {
1922 bus_space_tag_t iot = sc->sc_iot;
1923 bus_space_handle_t ioh = sc->sc_ioh;
1924
1925 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_CLRFIFO);
1926 bus_space_write_4(iot, ioh, TRM_SCSI_XCNT, 1);
1927 if ((srb->state & SRB_MSGIN) == 0) {
1928 srb->state &= SRB_DISCONNECT;
1929 srb->state |= SRB_MSGIN;
1930 }
1931 /* it's important for atn stop */
1932 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_DATALATCH);
1933
1934 /*
1935 * SCSI cammand
1936 */
1937 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND, SCMD_FIFO_IN);
1938 }
1939
1940 static void
1941 trm_nop0(sc, srb, pstat)
1942 struct trm_softc *sc;
1943 struct trm_srb *srb;
1944 int *pstat;
1945 {
1946
1947 }
1948
1949 static void
1950 trm_nop1(sc, srb, pstat)
1951 struct trm_softc *sc;
1952 struct trm_srb *srb;
1953 int *pstat;
1954 {
1955
1956 }
1957
1958 static void
1959 trm_set_xfer_rate(sc, srb, dcb)
1960 struct trm_softc *sc;
1961 struct trm_srb *srb;
1962 struct trm_dcb *dcb;
1963 {
1964 struct trm_dcb *tempdcb;
1965 int i;
1966
1967 /*
1968 * set all lun device's (period, offset)
1969 */
1970 #ifdef TRM_DEBUG
1971 printf("trm_set_xfer_rate............\n");
1972 #endif
1973 if ((dcb->idmsg & 0x07) == 0) {
1974 if (sc->devscan_end == 0)
1975 sc->cur_offset = dcb->offset;
1976 else {
1977 tempdcb = sc->sc_linkdcb;
1978 for (i = 0; i < sc->devcnt; i++) {
1979 /*
1980 * different LUN but had same target ID
1981 */
1982 if (tempdcb->id == dcb->id) {
1983 tempdcb->synctl = dcb->synctl;
1984 tempdcb->offset = dcb->offset;
1985 tempdcb->mode = dcb->mode;
1986 }
1987 tempdcb = tempdcb->next;
1988 }
1989 }
1990 }
1991 }
1992
1993 static void
1994 trm_disconnect(sc)
1995 struct trm_softc *sc;
1996 {
1997 bus_space_tag_t iot = sc->sc_iot;
1998 bus_space_handle_t ioh = sc->sc_ioh;
1999 struct trm_dcb *dcb;
2000 struct trm_srb *srb, *psrb;
2001 int i, s;
2002
2003 #ifdef TRM_DEBUG
2004 printf("trm_disconnect...............\n");
2005 #endif
2006 s = splbio();
2007
2008 dcb = sc->sc_actdcb;
2009 if (dcb == NULL) {
2010 DELAY(1000); /* 1 msec */
2011
2012 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL,
2013 DO_CLRFIFO | DO_HWRESELECT);
2014 return;
2015 }
2016 srb = dcb->actsrb;
2017 sc->sc_actdcb = 0;
2018 srb->phase = PH_BUS_FREE; /* SCSI bus free Phase */
2019 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL,
2020 DO_CLRFIFO | DO_HWRESELECT);
2021 DELAY(100);
2022 if (srb->state & SRB_UNEXPECT_RESEL) {
2023 srb->state = 0;
2024 trm_wait_srb(sc);
2025 } else if (srb->state & SRB_ABORT_SENT) {
2026 dcb->tagmask = 0;
2027 dcb->flag &= ~ABORT_DEV_;
2028 srb = dcb->gosrb;
2029 for (i = 0; i < dcb->gosrb_cnt; i++) {
2030 psrb = srb->next;
2031 srb->next = sc->sc_freesrb;
2032 sc->sc_freesrb = srb;
2033 srb = psrb;
2034 }
2035 dcb->gosrb_cnt = 0;
2036 dcb->gosrb = 0;
2037 trm_wait_srb(sc);
2038 } else {
2039 if ((srb->state & (SRB_START_ | SRB_MSGOUT)) ||
2040 (srb->state & (SRB_DISCONNECT | SRB_COMPLETED)) == 0) {
2041 /* Selection time out */
2042 if (sc->devscan_end) {
2043 srb->state = SRB_READY;
2044 trm_rewait_srb(dcb, srb);
2045 } else {
2046 srb->tastat = SCSI_SEL_TIMEOUT;
2047 goto disc1;
2048 }
2049 } else if (srb->state & SRB_DISCONNECT) {
2050 /*
2051 * SRB_DISCONNECT
2052 */
2053 trm_wait_srb(sc);
2054 } else if (srb->state & SRB_COMPLETED) {
2055 disc1:
2056 /*
2057 * SRB_COMPLETED
2058 */
2059 if (dcb->maxcmd > 1) {
2060 /* free tag mask */
2061 dcb->tagmask &= ~(1 << srb->tagnum);
2062 }
2063 dcb->actsrb = 0;
2064 srb->state = SRB_FREE;
2065 trm_srb_done(sc, dcb, srb);
2066 }
2067 }
2068 splx(s);
2069 }
2070
2071 static void
2072 trm_reselect(sc)
2073 struct trm_softc *sc;
2074 {
2075 bus_space_tag_t iot = sc->sc_iot;
2076 bus_space_handle_t ioh = sc->sc_ioh;
2077 struct trm_dcb *dcb;
2078 struct trm_srb *srb;
2079 int id, lun;
2080
2081 #ifdef TRM_DEBUG
2082 printf("trm_reselect.................\n");
2083 #endif
2084 dcb = sc->sc_actdcb;
2085 if (dcb != NULL) { /* Arbitration lost but Reselection win */
2086 srb = dcb->actsrb;
2087 srb->state = SRB_READY;
2088 trm_rewait_srb(dcb, srb);
2089 }
2090 /* Read Reselected Target Id and LUN */
2091 id = bus_space_read_1(iot, ioh, TRM_SCSI_TARGETID);
2092 lun = bus_space_read_1(iot, ioh, TRM_SCSI_IDMSG) & 0x07;
2093 dcb = sc->sc_linkdcb;
2094 while (id != dcb->id && lun != dcb->lun)
2095 /* get dcb of the reselect id */
2096 dcb = dcb->next;
2097
2098 sc->sc_actdcb = dcb;
2099 if (dcb->mode & EN_TAG_QUEUING) {
2100 srb = &sc->sc_tempsrb;
2101 dcb->actsrb = srb;
2102 } else {
2103 srb = dcb->actsrb;
2104 if (srb == NULL || (srb->state & SRB_DISCONNECT) == 0) {
2105 /*
2106 * abort command
2107 */
2108 srb = &sc->sc_tempsrb;
2109 srb->state = SRB_UNEXPECT_RESEL;
2110 dcb->actsrb = srb;
2111 srb->msgout[0] = MSG_ABORT;
2112 trm_msgout_abort(sc, srb);
2113 } else {
2114 if (dcb->flag & ABORT_DEV_) {
2115 srb->state = SRB_ABORT_SENT;
2116 srb->msgout[0] = MSG_ABORT;
2117 trm_msgout_abort(sc, srb);
2118 } else
2119 srb->state = SRB_DATA_XFER;
2120 }
2121 }
2122 srb->phase = PH_BUS_FREE; /* SCSI bus free Phase */
2123 /*
2124 * Program HA ID, target ID, period and offset
2125 */
2126 /* target ID */
2127 bus_space_write_1(iot, ioh, TRM_SCSI_TARGETID, id);
2128
2129 /* host ID */
2130 bus_space_write_1(iot, ioh, TRM_SCSI_HOSTID, sc->sc_id);
2131
2132 /* period */
2133 bus_space_write_1(iot, ioh, TRM_SCSI_SYNC, dcb->synctl);
2134
2135 /* offset */
2136 bus_space_write_1(iot, ioh, TRM_SCSI_OFFSET, dcb->offset);
2137
2138 /* it's important for atn stop */
2139 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_DATALATCH);
2140 DELAY(30);
2141 /*
2142 * SCSI cammand
2143 */
2144 /* to rls the /ACK signal */
2145 bus_space_write_1(iot, ioh, TRM_SCSI_COMMAND, SCMD_MSGACCEPT);
2146 }
2147
2148 /*
2149 * Complete execution of a SCSI command
2150 * Signal completion to the generic SCSI driver
2151 */
2152 static void
2153 trm_srb_done(sc, dcb, srb)
2154 struct trm_softc *sc;
2155 struct trm_dcb *dcb;
2156 struct trm_srb *srb;
2157 {
2158 struct scsipi_xfer *xs = srb->xs;
2159 struct scsipi_inquiry_data *ptr;
2160 struct trm_dcb *tempdcb;
2161 int i, j, id, lun, s;
2162 u_int8_t bval;
2163
2164 #ifdef TRM_DEBUG
2165 printf("trm_srb_done..................\n");
2166 #endif
2167
2168 if (xs == NULL)
2169 return;
2170
2171 if ((xs->xs_control & XS_CTL_POLL) == 0)
2172 callout_stop(&xs->xs_callout);
2173
2174 if (xs->xs_control & (XS_CTL_DATA_IN | XS_CTL_DATA_OUT) ||
2175 srb->flag & AUTO_REQSENSE) {
2176 bus_dmamap_sync(sc->sc_dmat, srb->dmap, 0,
2177 srb->dmap->dm_mapsize,
2178 ((xs->xs_control & XS_CTL_DATA_IN) ||
2179 (srb->flag & AUTO_REQSENSE)) ?
2180 BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE);
2181 bus_dmamap_unload(sc->sc_dmat, srb->dmap);
2182 }
2183
2184 /*
2185 * target status
2186 */
2187 xs->status = srb->tastat;
2188
2189 switch (xs->status) {
2190 case SCSI_OK:
2191 /*
2192 * process initiator status......
2193 * Adapter (initiator) status
2194 */
2195 if (srb->hastat & H_OVER_UNDER_RUN) {
2196 srb->tastat = 0;
2197 /* Illegal length (over/under run) */
2198 xs->error = XS_DRIVER_STUFFUP;
2199 } else if (srb->srbstat & PARITY_ERROR) {
2200 #ifdef TRM_DEBUG
2201 printf("%s: driver stuffup at %s %d\n",
2202 sc->sc_dev.dv_xname, __FILE__, __LINE__);
2203 #endif
2204 /* Driver failed to perform operation */
2205 xs->error = XS_DRIVER_STUFFUP;
2206 } else {
2207 /* No error */
2208 srb->hastat = 0;
2209 if (srb->flag & AUTO_REQSENSE) {
2210 /* there is no error, (sense is invalid) */
2211 xs->error = XS_SENSE;
2212 } else {
2213 srb->tastat = 0;
2214 xs->error = XS_NOERROR;
2215 }
2216 }
2217 break;
2218 case SCSI_CHECK:
2219 if ((srb->flag & AUTO_REQSENSE) != 0 ||
2220 trm_request_sense(sc, dcb, srb) != 0) {
2221 printf("%s: request sense failed\n",
2222 sc->sc_dev.dv_xname);
2223 xs->error = XS_DRIVER_STUFFUP;
2224 break;
2225 }
2226 xs->error = XS_SENSE;
2227 return;
2228 case SCSI_QUEUE_FULL:
2229 dcb->maxcmd = dcb->gosrb_cnt - 1;
2230 trm_rewait_srb(dcb, srb);
2231 srb->hastat = 0;
2232 srb->tastat = 0;
2233 break;
2234 case SCSI_SEL_TIMEOUT:
2235 srb->hastat = H_SEL_TIMEOUT;
2236 srb->tastat = 0;
2237 xs->error = XS_TIMEOUT;
2238 break;
2239 case SCSI_BUSY:
2240 xs->error = XS_BUSY;
2241 break;
2242 case SCSI_RESV_CONFLICT:
2243 #ifdef TRM_DEBUG
2244 printf("%s: target reserved at ", sc->sc_dev.dv_xname);
2245 printf("%s %d\n", __FILE__, __LINE__);
2246 #endif
2247 xs->error = XS_BUSY;
2248 break;
2249 default:
2250 srb->hastat = 0;
2251 #ifdef TRM_DEBUG
2252 printf("%s: driver stuffup at %s %d\n",
2253 sc->sc_dev.dv_xname, __FILE__, __LINE__);
2254 #endif
2255 xs->error = XS_DRIVER_STUFFUP;
2256 break;
2257 }
2258
2259 id = srb->xs->xs_periph->periph_target;
2260 lun = srb->xs->xs_periph->periph_lun;
2261 if (sc->devscan[id][lun]) {
2262 /*
2263 * if SCSI command in "scan devices" duty
2264 * XXX XXX XXX should not be done here! XXX XXX XXX
2265 */
2266 if (srb->cmd[0] == INQUIRY) {
2267 /*
2268 * SCSI command phase: inquiry scsi device data
2269 * (type,capacity,manufacture....
2270 */
2271 if (xs->error == XS_TIMEOUT)
2272 goto NO_DEV;
2273
2274 ptr = (struct scsipi_inquiry_data *)xs->data;
2275 bval = ptr->device & SID_TYPE;
2276
2277 if (bval == T_NODEVICE) {
2278 NO_DEV:
2279 #ifdef TRM_DEBUG
2280 printf("trm_srb_done NO Device: ");
2281 printf("id= %d ,lun= %d\n", id, lun);
2282 #endif
2283 s = splbio();
2284 /*
2285 * dcb Q link
2286 * move the head of DCB to temdcb
2287 */
2288 tempdcb = sc->sc_linkdcb;
2289
2290 /*
2291 * search current DCB for pass link
2292 */
2293 while (tempdcb->next != dcb)
2294 tempdcb = tempdcb->next;
2295
2296 /*
2297 * when the current DCB been found
2298 * than connect current DCB tail
2299 * to the DCB tail that before current DCB
2300 */
2301 tempdcb->next = dcb->next;
2302
2303 /*
2304 * if there was only one DCB ,connect his
2305 * tail to his head
2306 */
2307 if (sc->sc_linkdcb == dcb)
2308 sc->sc_linkdcb = tempdcb->next;
2309
2310 if (sc->sc_roundcb == dcb)
2311 sc->sc_roundcb = tempdcb->next;
2312
2313 /*
2314 * if no device than free this device DCB
2315 * free( dcb, M_DEVBUF);
2316 */
2317 sc->devcnt--;
2318 #ifdef TRM_DEBUG
2319 printf("sc->devcnt=%d\n", sc->devcnt);
2320 #endif
2321 if (sc->devcnt == 0) {
2322 sc->sc_linkdcb = NULL;
2323 sc->sc_roundcb = NULL;
2324 }
2325 /* no device set scan device flag=0 */
2326 sc->devscan[id][lun] = 0;
2327 i = 0;
2328 j = 0;
2329 while (i <= sc->maxid) {
2330 while (j < 8) {
2331 if (sc->devscan[i][j] == 1) {
2332 sc->devscan_end = 0;
2333 splx(s);
2334 goto exit;
2335 } else
2336 sc->devscan_end = 1;
2337
2338 j++;
2339 }
2340 j = 0;
2341 i++;
2342 }
2343 splx(s);
2344 } else {
2345 if (bval == T_DIRECT || bval == T_OPTICAL) {
2346 if ((((ptr->version & 0x07) >= 2) ||
2347 ((ptr->response_format & 0x0F)
2348 == 2)) &&
2349 (ptr->flags3 & SID_CmdQue) &&
2350 (dcb->tacfg & NTC_DO_TAG_QUEUING) &&
2351 (dcb->tacfg & NTC_DO_DISCONNECT)) {
2352 dcb->maxcmd = sc->maxtag;
2353 dcb->mode |= EN_TAG_QUEUING;
2354 dcb->tagmask = 0;
2355 } else
2356 dcb->mode |= EN_ATN_STOP;
2357 }
2358 }
2359 }
2360 }
2361 exit:
2362 trm_release_srb(sc, dcb, srb);
2363 trm_wait_srb(sc);
2364 xs->xs_status |= XS_STS_DONE;
2365 /* Notify cmd done */
2366 scsipi_done(xs);
2367 }
2368
2369 static void
2370 trm_release_srb(sc, dcb, srb)
2371 struct trm_softc *sc;
2372 struct trm_dcb *dcb;
2373 struct trm_srb *srb;
2374 {
2375 struct trm_srb *psrb;
2376 int s;
2377
2378 s = splbio();
2379 if (srb == dcb->gosrb)
2380 dcb->gosrb = srb->next;
2381 else {
2382 psrb = dcb->gosrb;
2383 while (psrb->next != srb)
2384 psrb = psrb->next;
2385
2386 psrb->next = srb->next;
2387 if (srb == dcb->last_gosrb)
2388 dcb->last_gosrb = psrb;
2389 }
2390 srb->next = sc->sc_freesrb;
2391 sc->sc_freesrb = srb;
2392 dcb->gosrb_cnt--;
2393 splx(s);
2394 return;
2395 }
2396
2397 static void
2398 trm_doing_srb_done(sc)
2399 struct trm_softc *sc;
2400 {
2401 struct trm_dcb *dcb, *pdcb;
2402 struct trm_srb *psrb, *psrb2;
2403 struct scsipi_xfer *xs;
2404 int i;
2405
2406 dcb = sc->sc_linkdcb;
2407 if (dcb == NULL)
2408 return;
2409
2410 pdcb = dcb;
2411 do {
2412 psrb = pdcb->gosrb;
2413 for (i = 0; i < pdcb->gosrb_cnt; i++) {
2414 psrb2 = psrb->next;
2415 xs = psrb->xs;
2416 xs->error = XS_TIMEOUT;
2417 /* ReleaseSRB( dcb, srb ); */
2418 psrb->next = sc->sc_freesrb;
2419 sc->sc_freesrb = psrb;
2420 scsipi_done(xs);
2421 psrb = psrb2;
2422 }
2423 pdcb->gosrb_cnt = 0;;
2424 pdcb->gosrb = NULL;
2425 pdcb->tagmask = 0;
2426 pdcb = pdcb->next;
2427 }
2428 while (pdcb != dcb);
2429 }
2430
2431 static void
2432 trm_reset_scsi_bus(sc)
2433 struct trm_softc *sc;
2434 {
2435 bus_space_tag_t iot = sc->sc_iot;
2436 bus_space_handle_t ioh = sc->sc_ioh;
2437 int s;
2438
2439 s = splbio();
2440
2441 sc->sc_flag |= RESET_DEV;
2442 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_RSTSCSI);
2443 while ((bus_space_read_2(iot, ioh, TRM_SCSI_INTSTATUS) &
2444 INT_SCSIRESET) == 0)
2445 ;
2446
2447 splx(s);
2448 }
2449
2450 static void
2451 trm_scsi_reset_detect(sc)
2452 struct trm_softc *sc;
2453 {
2454 bus_space_tag_t iot = sc->sc_iot;
2455 bus_space_handle_t ioh = sc->sc_ioh;
2456 int s;
2457
2458 #ifdef TRM_DEBUG
2459 printf("trm_scsi_reset_detect...............\n");
2460 #endif
2461 DELAY(1000000); /* delay 1 sec */
2462
2463 s = splbio();
2464
2465 bus_space_write_1(iot, ioh, TRM_DMA_CONTROL, STOPDMAXFER);
2466 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_CLRFIFO);
2467
2468 if (sc->sc_flag & RESET_DEV) {
2469 sc->sc_flag |= RESET_DONE;
2470 } else {
2471 sc->sc_flag |= RESET_DETECT;
2472 trm_reset_device(sc);
2473 /* trm_doing_srb_done( sc ); ???? */
2474 trm_recover_srb(sc);
2475 sc->sc_actdcb = NULL;
2476 sc->sc_flag = 0;
2477 trm_wait_srb(sc);
2478 }
2479 splx(s);
2480 }
2481
2482 static int
2483 trm_request_sense(sc, dcb, srb)
2484 struct trm_softc *sc;
2485 struct trm_dcb *dcb;
2486 struct trm_srb *srb;
2487 {
2488 struct scsipi_xfer *xs = srb->xs;
2489 struct scsipi_sense *ss;
2490 int error, lun = xs->xs_periph->periph_lun;
2491
2492 srb->flag |= AUTO_REQSENSE;
2493
2494 /* Status of initiator/target */
2495 srb->hastat = 0;
2496 srb->tastat = 0;
2497
2498 ss = (struct scsipi_sense *)srb->cmd;
2499 ss->opcode = REQUEST_SENSE;
2500 ss->byte2 = lun << SCSI_CMD_LUN_SHIFT;
2501 ss->unused[0] = ss->unused[1] = 0;
2502 ss->length = sizeof(struct scsipi_sense_data);
2503 ss->control = 0;
2504
2505 srb->buflen = sizeof(struct scsipi_sense_data);
2506 srb->sgcnt = 1;
2507 srb->sgindex = 0;
2508 srb->cmdlen = sizeof(struct scsipi_sense);
2509
2510 if ((error = bus_dmamap_load(sc->sc_dmat, srb->dmap,
2511 &xs->sense.scsi_sense, srb->buflen, NULL,
2512 BUS_DMA_READ|BUS_DMA_NOWAIT)) != 0) {
2513 return error;
2514 }
2515 bus_dmamap_sync(sc->sc_dmat, srb->dmap, 0,
2516 srb->buflen, BUS_DMASYNC_PREREAD);
2517
2518 srb->sgentry[0].address = htole32(srb->dmap->dm_segs[0].ds_addr);
2519 srb->sgentry[0].length = htole32(sizeof(struct scsipi_sense_data));
2520 bus_dmamap_sync(sc->sc_dmat, sc->sc_dmamap, srb->sgoffset,
2521 TRM_SG_SIZE, BUS_DMASYNC_PREWRITE);
2522
2523 if (trm_start_scsi(sc, dcb, srb))
2524 /*
2525 * If trm_start_scsi return 1: current interrupt status
2526 * is interrupt disreenable. It's said that SCSI processor
2527 * has more one SRB need to do.
2528 */
2529 trm_rewait_srb(dcb, srb);
2530 return 0;
2531 }
2532
2533 static void
2534 trm_msgout_abort(sc, srb)
2535 struct trm_softc *sc;
2536 struct trm_srb *srb;
2537 {
2538 bus_space_tag_t iot = sc->sc_iot;
2539 bus_space_handle_t ioh = sc->sc_ioh;
2540
2541 srb->msgcnt = 1;
2542 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_SETATN);
2543 srb->dcb->flag &= ~ABORT_DEV_;
2544 }
2545
2546 /*
2547 * initialize the internal structures for a given DCB
2548 */
2549 static void
2550 trm_init_dcb(sc, dcb, xs)
2551 struct trm_softc *sc;
2552 struct trm_dcb *dcb;
2553 struct scsipi_xfer *xs;
2554 {
2555 struct trm_nvram *eeprom;
2556 struct trm_dcb *tempdcb;
2557 int index, id, lun, s;
2558
2559 id = xs->xs_periph->periph_target;
2560 lun = xs->xs_periph->periph_lun;
2561
2562 s = splbio();
2563 if (sc->sc_linkdcb == 0) {
2564 sc->sc_linkdcb = dcb;
2565 /*
2566 * RunRobin impersonate the role that let each device had
2567 * good proportion about SCSI command proceeding.
2568 */
2569 sc->sc_roundcb = dcb;
2570 dcb->next = dcb;
2571 } else {
2572 tempdcb = sc->sc_linkdcb;
2573 /* search the last nod of DCB link */
2574 while (tempdcb->next != sc->sc_linkdcb)
2575 tempdcb = tempdcb->next;
2576
2577 /* connect current DCB with last DCB tail */
2578 tempdcb->next = dcb;
2579 /* connect current DCB tail to this DCB Q head */
2580 dcb->next = sc->sc_linkdcb;
2581 }
2582 splx(s);
2583
2584 sc->devcnt++;
2585 dcb->id = id;
2586 dcb->lun = lun;
2587 dcb->waitsrb = NULL;
2588 dcb->gosrb = NULL;
2589 dcb->gosrb_cnt = 0;
2590 dcb->actsrb = NULL;
2591 dcb->tagmask = 0;
2592 dcb->maxcmd = 1;
2593 dcb->flag = 0;
2594
2595 eeprom = &sc->sc_eeprom;
2596 dcb->tacfg = eeprom->target[id].config0;
2597 /*
2598 * disconnect enable?
2599 */
2600 dcb->idmsg = MSG_IDENTIFY(lun, dcb->tacfg & NTC_DO_DISCONNECT);
2601 /*
2602 * tag Qing enable?
2603 * wide nego, sync nego enable?
2604 */
2605 dcb->synctl = 0;
2606 dcb->offset = 0;
2607 index = eeprom->target[id].period & 0x07;
2608 dcb->period = trm_clock_period[index];
2609 dcb->mode = 0;
2610 if ((dcb->tacfg & NTC_DO_WIDE_NEGO) && (sc->sc_config & HCC_WIDE_CARD))
2611 /* enable wide nego */
2612 dcb->mode |= WIDE_NEGO_ENABLE;
2613
2614 if ((dcb->tacfg & NTC_DO_SYNC_NEGO) && (lun == 0 || sc->cur_offset > 0))
2615 /* enable sync nego */
2616 dcb->mode |= SYNC_NEGO_ENABLE;
2617 }
2618
2619 static void
2620 trm_link_srb(sc)
2621 struct trm_softc *sc;
2622 {
2623 struct trm_srb *srb;
2624 int i;
2625
2626 sc->sc_srb = malloc(sizeof(struct trm_srb) * TRM_MAX_SRB,
2627 M_DEVBUF, M_NOWAIT);
2628 if (sc->sc_srb == NULL) {
2629 printf("%s: can not allocate SRB\n", sc->sc_dev.dv_xname);
2630 return;
2631 }
2632 memset(sc->sc_srb, 0, sizeof(struct trm_srb) * TRM_MAX_SRB);
2633
2634 for (i = 0, srb = sc->sc_srb; i < TRM_MAX_SRB; i++, srb++) {
2635 srb->sgentry = sc->sc_sglist + TRM_MAX_SG_ENTRIES * i;
2636 srb->sgoffset = TRM_SG_SIZE * i;
2637 srb->sgaddr = sc->sc_dmamap->dm_segs[0].ds_addr + srb->sgoffset;
2638 /*
2639 * map all SRB space to SRB_array
2640 */
2641 if (bus_dmamap_create(sc->sc_dmat,
2642 MAXPHYS, TRM_MAX_SG_ENTRIES, MAXPHYS, 0,
2643 BUS_DMA_NOWAIT | BUS_DMA_ALLOCNOW, &srb->dmap)) {
2644 printf("%s: unable to create DMA transfer map...\n",
2645 sc->sc_dev.dv_xname);
2646 free(sc->sc_srb, M_DEVBUF);
2647 return;
2648 }
2649 if (i != TRM_MAX_SRB - 1) {
2650 /*
2651 * link all SRB
2652 */
2653 srb->next = srb + 1;
2654 #ifdef TRM_DEBUG
2655 printf("srb->next = %8x ", (int) (srb + 1));
2656 #endif
2657 } else {
2658 /*
2659 * load NULL to NextSRB of the last SRB
2660 */
2661 srb->next = NULL;
2662 }
2663 #ifdef TRM_DEBUG
2664 printf("srb = %8x\n", (int) srb);
2665 #endif
2666 }
2667 return;
2668 }
2669
2670 /*
2671 * initialize the internal structures for a given SCSI host
2672 */
2673 static void
2674 trm_init_sc(sc)
2675 struct trm_softc *sc;
2676 {
2677 bus_space_tag_t iot = sc->sc_iot;
2678 bus_space_handle_t ioh = sc->sc_ioh;
2679 struct trm_nvram *eeprom;
2680 int i, j;
2681
2682 eeprom = &sc->sc_eeprom;
2683 sc->maxid = 7;
2684 sc->sc_config = HCC_AUTOTERM | HCC_PARITY;
2685 if (bus_space_read_1(iot, ioh, TRM_GEN_STATUS) & WIDESCSI) {
2686 sc->sc_config |= HCC_WIDE_CARD;
2687 sc->maxid = 15;
2688 }
2689 if (eeprom->channel_cfg & NAC_POWERON_SCSI_RESET)
2690 sc->sc_config |= HCC_SCSI_RESET;
2691
2692 sc->sc_linkdcb = NULL;
2693 sc->sc_roundcb = NULL;
2694 sc->sc_actdcb = NULL;
2695 sc->sc_id = eeprom->scsi_id;
2696 sc->devcnt = 0;
2697 sc->maxtag = 2 << eeprom->max_tag;
2698 sc->sc_flag = 0;
2699 sc->devscan_end = 0;
2700 /*
2701 * link all device's SRB Q of this adapter
2702 */
2703 trm_link_srb(sc);
2704 sc->sc_freesrb = sc->sc_srb;
2705 /* allocate DCB array for scan device */
2706 for (i = 0; i <= sc->maxid; i++)
2707 if (sc->sc_id != i)
2708 for (j = 0; j < 8; j++) {
2709 sc->devscan[i][j] = 1;
2710 sc->devflag[i][j] = 0;
2711 sc->sc_dcb[i][j] =
2712 malloc(sizeof(struct trm_dcb),
2713 M_DEVBUF, M_WAITOK);
2714 }
2715
2716 #ifdef TRM_DEBUG
2717 printf("sizeof(struct trm_dcb)= %8x\n", sizeof(struct trm_dcb));
2718 printf("sizeof(struct trm_softc)= %8x\n", sizeof(struct trm_softc));
2719 printf("sizeof(struct trm_srb)= %8x\n", sizeof(struct trm_srb));
2720 #endif
2721 sc->sc_adapter.adapt_dev = &sc->sc_dev;
2722 sc->sc_adapter.adapt_nchannels = 1;
2723 sc->sc_adapter.adapt_openings = TRM_MAX_SRB;
2724 sc->sc_adapter.adapt_max_periph = TRM_MAX_SRB;
2725 sc->sc_adapter.adapt_request = trm_scsipi_request;
2726 sc->sc_adapter.adapt_minphys = minphys;
2727
2728 sc->sc_channel.chan_adapter = &sc->sc_adapter;
2729 sc->sc_channel.chan_bustype = &scsi_bustype;
2730 sc->sc_channel.chan_channel = 0;
2731 sc->sc_channel.chan_ntargets = sc->maxid + 1;
2732 sc->sc_channel.chan_nluns = 8;
2733 sc->sc_channel.chan_id = sc->sc_id;
2734 }
2735
2736 /*
2737 * write sc_eeprom 128 bytes to seeprom
2738 */
2739 static void
2740 trm_eeprom_write_all(sc, eeprom)
2741 struct trm_softc *sc;
2742 struct trm_nvram *eeprom;
2743 {
2744 bus_space_tag_t iot = sc->sc_iot;
2745 bus_space_handle_t ioh = sc->sc_ioh;
2746 u_int8_t *buf = (u_int8_t *)eeprom;
2747 u_int8_t addr;
2748
2749 /* Enable SEEPROM */
2750 bus_space_write_1(iot, ioh, TRM_GEN_CONTROL,
2751 bus_space_read_1(iot, ioh, TRM_GEN_CONTROL) | EN_EEPROM);
2752
2753 /*
2754 * Write enable
2755 */
2756 trm_eeprom_write_cmd(sc, 0x04, 0xFF);
2757 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
2758 trm_wait_30us();
2759
2760 for (addr = 0; addr < 128; addr++, buf++)
2761 trm_eeprom_set_data(sc, addr, *buf);
2762
2763 /*
2764 * Write disable
2765 */
2766 trm_eeprom_write_cmd(sc, 0x04, 0x00);
2767 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
2768 trm_wait_30us();
2769
2770 /* Disable SEEPROM */
2771 bus_space_write_1(iot, ioh, TRM_GEN_CONTROL,
2772 bus_space_read_1(iot, ioh, TRM_GEN_CONTROL) & ~EN_EEPROM);
2773 }
2774
2775 /*
2776 * write one byte to seeprom
2777 */
2778 static void
2779 trm_eeprom_set_data(sc, addr, data)
2780 struct trm_softc *sc;
2781 u_int8_t addr;
2782 u_int8_t data;
2783 {
2784 bus_space_tag_t iot = sc->sc_iot;
2785 bus_space_handle_t ioh = sc->sc_ioh;
2786 int i;
2787 u_int8_t send;
2788
2789 /*
2790 * Send write command & address
2791 */
2792 trm_eeprom_write_cmd(sc, 0x05, addr);
2793 /*
2794 * Write data
2795 */
2796 for (i = 0; i < 8; i++, data <<= 1) {
2797 send = NVR_SELECT;
2798 if (data & 0x80) /* Start from bit 7 */
2799 send |= NVR_BITOUT;
2800
2801 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send);
2802 trm_wait_30us();
2803 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send | NVR_CLOCK);
2804 trm_wait_30us();
2805 }
2806 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
2807 trm_wait_30us();
2808 /*
2809 * Disable chip select
2810 */
2811 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
2812 trm_wait_30us();
2813 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
2814 trm_wait_30us();
2815 /*
2816 * Wait for write ready
2817 */
2818 for (;;) {
2819 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM,
2820 NVR_SELECT | NVR_CLOCK);
2821 trm_wait_30us();
2822 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
2823 trm_wait_30us();
2824 if (bus_space_read_1(iot, ioh, TRM_GEN_NVRAM) & NVR_BITIN)
2825 break;
2826 }
2827 /*
2828 * Disable chip select
2829 */
2830 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
2831 }
2832
2833 /*
2834 * read seeprom 128 bytes to sc_eeprom
2835 */
2836 static void
2837 trm_eeprom_read_all(sc, eeprom)
2838 struct trm_softc *sc;
2839 struct trm_nvram *eeprom;
2840 {
2841 bus_space_tag_t iot = sc->sc_iot;
2842 bus_space_handle_t ioh = sc->sc_ioh;
2843 u_int8_t *buf = (u_int8_t *)eeprom;
2844 u_int8_t addr;
2845
2846 /*
2847 * Enable SEEPROM
2848 */
2849 bus_space_write_1(iot, ioh, TRM_GEN_CONTROL,
2850 bus_space_read_1(iot, ioh, TRM_GEN_CONTROL) | EN_EEPROM);
2851
2852 for (addr = 0; addr < 128; addr++, buf++)
2853 *buf = trm_eeprom_get_data(sc, addr);
2854
2855 /*
2856 * Disable SEEPROM
2857 */
2858 bus_space_write_1(iot, ioh, TRM_GEN_CONTROL,
2859 bus_space_read_1(iot, ioh, TRM_GEN_CONTROL) & ~EN_EEPROM);
2860 }
2861
2862 /*
2863 * read one byte from seeprom
2864 */
2865 static u_int8_t
2866 trm_eeprom_get_data(sc, addr)
2867 struct trm_softc *sc;
2868 u_int8_t addr;
2869 {
2870 bus_space_tag_t iot = sc->sc_iot;
2871 bus_space_handle_t ioh = sc->sc_ioh;
2872 int i;
2873 u_int8_t read, data = 0;
2874
2875 /*
2876 * Send read command & address
2877 */
2878 trm_eeprom_write_cmd(sc, 0x06, addr);
2879
2880 for (i = 0; i < 8; i++) { /* Read data */
2881 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM,
2882 NVR_SELECT | NVR_CLOCK);
2883 trm_wait_30us();
2884 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
2885 /*
2886 * Get data bit while falling edge
2887 */
2888 read = bus_space_read_1(iot, ioh, TRM_GEN_NVRAM);
2889 data <<= 1;
2890 if (read & NVR_BITIN)
2891 data |= 1;
2892
2893 trm_wait_30us();
2894 }
2895 /*
2896 * Disable chip select
2897 */
2898 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
2899 return (data);
2900 }
2901
2902 /*
2903 * write SB and Op Code into seeprom
2904 */
2905 static void
2906 trm_eeprom_write_cmd(sc, cmd, addr)
2907 struct trm_softc *sc;
2908 u_int8_t cmd;
2909 u_int8_t addr;
2910 {
2911 bus_space_tag_t iot = sc->sc_iot;
2912 bus_space_handle_t ioh = sc->sc_ioh;
2913 int i;
2914 u_int8_t send;
2915
2916 /* Program SB+OP code */
2917 for (i = 0; i < 3; i++, cmd <<= 1) {
2918 send = NVR_SELECT;
2919 if (cmd & 0x04) /* Start from bit 2 */
2920 send |= NVR_BITOUT;
2921
2922 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send);
2923 trm_wait_30us();
2924 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send | NVR_CLOCK);
2925 trm_wait_30us();
2926 }
2927
2928 /* Program address */
2929 for (i = 0; i < 7; i++, addr <<= 1) {
2930 send = NVR_SELECT;
2931 if (addr & 0x40) /* Start from bit 6 */
2932 send |= NVR_BITOUT;
2933
2934 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send);
2935 trm_wait_30us();
2936 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send | NVR_CLOCK);
2937 trm_wait_30us();
2938 }
2939 bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
2940 trm_wait_30us();
2941 }
2942
2943 /*
2944 * read seeprom 128 bytes to sc_eeprom and check checksum.
2945 * If it is wrong, updated with default value.
2946 */
2947 static void
2948 trm_check_eeprom(sc, eeprom)
2949 struct trm_softc *sc;
2950 struct trm_nvram *eeprom;
2951 {
2952 struct nvram_target *target;
2953 u_int16_t *ep;
2954 u_int16_t chksum;
2955 int i;
2956
2957 #ifdef TRM_DEBUG
2958 printf("\n trm_check_eeprom......\n");
2959 #endif
2960 trm_eeprom_read_all(sc, eeprom);
2961 ep = (u_int16_t *)eeprom;
2962 chksum = 0;
2963 for (i = 0; i < 64; i++)
2964 chksum += le16toh(*ep++);
2965
2966 if (chksum != TRM_NVRAM_CKSUM) {
2967 #ifdef TRM_DEBUG
2968 printf("TRM_S1040 EEPROM Check Sum ERROR (load default).\n");
2969 #endif
2970 /*
2971 * Checksum error, load default
2972 */
2973 eeprom->subvendor_id[0] = PCI_VENDOR_TEKRAM2 & 0xFF;
2974 eeprom->subvendor_id[1] = PCI_VENDOR_TEKRAM2 >> 8;
2975 eeprom->subsys_id[0] = PCI_PRODUCT_TEKRAM2_DC315 & 0xFF;
2976 eeprom->subsys_id[1] = PCI_PRODUCT_TEKRAM2_DC315 >> 8;
2977 eeprom->subclass = 0x00;
2978 eeprom->vendor_id[0] = PCI_VENDOR_TEKRAM2 & 0xFF;
2979 eeprom->vendor_id[1] = PCI_VENDOR_TEKRAM2 >> 8;
2980 eeprom->device_id[0] = PCI_PRODUCT_TEKRAM2_DC315 & 0xFF;
2981 eeprom->device_id[1] = PCI_PRODUCT_TEKRAM2_DC315 >> 8;
2982 eeprom->reserved0 = 0x00;
2983
2984 for (i = 0, target = eeprom->target;
2985 i < TRM_MAX_TARGETS;
2986 i++, target++) {
2987 target->config0 = 0x77;
2988 target->period = 0x00;
2989 target->config2 = 0x00;
2990 target->config3 = 0x00;
2991 }
2992
2993 eeprom->scsi_id = 7;
2994 eeprom->channel_cfg = 0x0F;
2995 eeprom->delay_time = 0;
2996 eeprom->max_tag = 4;
2997 eeprom->reserved1 = 0x15;
2998 eeprom->boot_target = 0;
2999 eeprom->boot_lun = 0;
3000 eeprom->reserved2 = 0;
3001 memset(eeprom->reserved3, 0, sizeof(eeprom->reserved3));
3002
3003 chksum = 0;
3004 ep = (u_int16_t *)eeprom;
3005 for (i = 0; i < 63; i++)
3006 chksum += le16toh(*ep++);
3007
3008 chksum = TRM_NVRAM_CKSUM - chksum;
3009 eeprom->checksum0 = chksum & 0xFF;
3010 eeprom->checksum1 = chksum >> 8;
3011
3012 trm_eeprom_write_all(sc, eeprom);
3013 }
3014 }
3015
3016 /*
3017 * initialize the SCSI chip ctrl registers
3018 */
3019 static void
3020 trm_init_adapter(sc)
3021 struct trm_softc *sc;
3022 {
3023 bus_space_tag_t iot = sc->sc_iot;
3024 bus_space_handle_t ioh = sc->sc_ioh;
3025 u_int8_t bval;
3026
3027 /* program configuration 0 */
3028 bval = PHASELATCH | INITIATOR | BLOCKRST;
3029 if (sc->sc_config & HCC_PARITY)
3030 bval |= PARITYCHECK;
3031 bus_space_write_1(iot, ioh, TRM_SCSI_CONFIG0, bval);
3032
3033 /* program configuration 1 */
3034 bus_space_write_1(iot, ioh, TRM_SCSI_CONFIG1,
3035 ACTIVE_NEG | ACTIVE_NEGPLUS);
3036
3037 /* 250ms selection timeout */
3038 bus_space_write_1(iot, ioh, TRM_SCSI_TIMEOUT, SEL_TIMEOUT);
3039
3040 /* Mask all the interrupt */
3041 bus_space_write_1(iot, ioh, TRM_DMA_INTEN, 0);
3042 bus_space_write_1(iot, ioh, TRM_SCSI_INTEN, 0);
3043
3044 /* Reset SCSI module */
3045 bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_RSTMODULE);
3046
3047 /* program Host ID */
3048 bus_space_write_1(iot, ioh, TRM_SCSI_HOSTID, sc->sc_id);
3049
3050 /* set ansynchronous transfer */
3051 bus_space_write_1(iot, ioh, TRM_SCSI_OFFSET, 0);
3052
3053 /* Trun LED control off */
3054 bus_space_write_2(iot, ioh, TRM_GEN_CONTROL,
3055 bus_space_read_2(iot, ioh, TRM_GEN_CONTROL) & ~EN_LED);
3056
3057 /* DMA config */
3058 bus_space_write_2(iot, ioh, TRM_DMA_CONFIG,
3059 bus_space_read_2(iot, ioh, TRM_DMA_CONFIG) | DMA_ENHANCE);
3060
3061 /* Clear pending interrupt status */
3062 bus_space_read_1(iot, ioh, TRM_SCSI_INTSTATUS);
3063
3064 /* Enable SCSI interrupt */
3065 bus_space_write_1(iot, ioh, TRM_SCSI_INTEN,
3066 EN_SELECT | EN_SELTIMEOUT | EN_DISCONNECT | EN_RESELECTED |
3067 EN_SCSIRESET | EN_BUSSERVICE | EN_CMDDONE);
3068 bus_space_write_1(iot, ioh, TRM_DMA_INTEN, EN_SCSIINTR);
3069 }
3070
3071 /*
3072 * initialize the internal structures for a given SCSI host
3073 */
3074 static int
3075 trm_init(sc)
3076 struct trm_softc *sc;
3077 {
3078 bus_dma_segment_t seg;
3079 int error, rseg, all_sgsize;
3080
3081 /*
3082 * EEPROM CHECKSUM
3083 */
3084 trm_check_eeprom(sc, &sc->sc_eeprom);
3085 /*
3086 * MEMORY ALLOCATE FOR ADAPTER CONTROL BLOCK
3087 * allocate the space for all SCSI control blocks (SRB) for DMA memory
3088 */
3089 all_sgsize = TRM_MAX_SRB * TRM_SG_SIZE;
3090 if ((error = bus_dmamem_alloc(sc->sc_dmat, all_sgsize, PAGE_SIZE,
3091 0, &seg, 1, &rseg, BUS_DMA_NOWAIT)) != 0) {
3092 printf("%s: unable to allocate SCSI REQUEST BLOCKS, "
3093 "error = %d\n", sc->sc_dev.dv_xname, error);
3094 return (-1);
3095 }
3096 if ((error = bus_dmamem_map(sc->sc_dmat, &seg, rseg,
3097 all_sgsize, (caddr_t *) &sc->sc_sglist,
3098 BUS_DMA_NOWAIT | BUS_DMA_COHERENT)) != 0) {
3099 printf("%s: unable to map SCSI REQUEST BLOCKS, "
3100 "error = %d\n", sc->sc_dev.dv_xname, error);
3101 return (-1);
3102 }
3103 if ((error = bus_dmamap_create(sc->sc_dmat, all_sgsize, 1,
3104 all_sgsize, 0, BUS_DMA_NOWAIT, &sc->sc_dmamap)) != 0) {
3105 printf("%s: unable to create SRB DMA maps, "
3106 "error = %d\n", sc->sc_dev.dv_xname, error);
3107 return (-1);
3108 }
3109 if ((error = bus_dmamap_load(sc->sc_dmat, sc->sc_dmamap,
3110 sc->sc_sglist, all_sgsize, NULL, BUS_DMA_NOWAIT)) != 0) {
3111 printf("%s: unable to load SRB DMA maps, "
3112 "error = %d\n", sc->sc_dev.dv_xname, error);
3113 return (-1);
3114 }
3115 #ifdef TRM_DEBUG
3116 printf("\n\n%s: all_sgsize=%x\n", sc->sc_dev.dv_xname, all_sgsize);
3117 #endif
3118 memset(sc->sc_sglist, 0, all_sgsize);
3119 trm_init_sc(sc);
3120 trm_init_adapter(sc);
3121 trm_reset(sc);
3122 return (0);
3123 }
3124
3125 /*
3126 * attach and init a host adapter
3127 */
3128 static void
3129 trm_attach(parent, self, aux)
3130 struct device *parent;
3131 struct device *self;
3132 void *aux;
3133 {
3134 struct pci_attach_args *const pa = aux;
3135 struct trm_softc *sc = (void *) self;
3136 bus_space_tag_t iot; /* bus space tag */
3137 bus_space_handle_t ioh; /* bus space handle */
3138 pci_intr_handle_t ih;
3139 pcireg_t command;
3140 const char *intrstr;
3141
3142 /*
3143 * These cards do not allow memory mapped accesses
3144 * pa_pc: chipset tag
3145 * pa_tag: pci tag
3146 */
3147 command = pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG);
3148 if ((command & (PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE)) !=
3149 (PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE)) {
3150 command |= PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE;
3151 pci_conf_write(pa->pa_pc, pa->pa_tag,
3152 PCI_COMMAND_STATUS_REG, command);
3153 }
3154 /*
3155 * mask for get correct base address of pci IO port
3156 */
3157 if (pci_mapreg_map(pa, PCI_MAPREG_START, PCI_MAPREG_TYPE_IO, 0,
3158 &iot, &ioh, NULL, NULL)) {
3159 printf("%s: unable to map registers\n", sc->sc_dev.dv_xname);
3160 return;
3161 }
3162 /*
3163 * test checksum of eeprom..& initial "ACB" adapter control block...
3164 */
3165 sc->sc_iot = iot;
3166 sc->sc_ioh = ioh;
3167 sc->sc_dmat = pa->pa_dmat;
3168 if (trm_init(sc)) {
3169 /*
3170 * Error during initialization!
3171 */
3172 printf(": Error during initialization\n");
3173 return;
3174 }
3175 /*
3176 * Now try to attach all the sub-devices
3177 */
3178 if (sc->sc_config & HCC_WIDE_CARD)
3179 printf(": Tekram DC395UW/F (TRM-S1040) Fast40 "
3180 "Ultra Wide SCSI Adapter\n");
3181 else
3182 printf(": Tekram DC395U, DC315/U (TRM-S1040) Fast20 "
3183 "Ultra SCSI Adapter\n");
3184
3185 printf("%s: Adapter ID=%d, Max tag number=%d, %d SCBs\n",
3186 sc->sc_dev.dv_xname, sc->sc_id, sc->maxtag, TRM_MAX_SRB);
3187 /*
3188 * Now tell the generic SCSI layer about our bus.
3189 * map and establish interrupt
3190 */
3191 if (pci_intr_map(pa, &ih)) {
3192 printf("%s: couldn't map interrupt\n", sc->sc_dev.dv_xname);
3193 return;
3194 }
3195 intrstr = pci_intr_string(pa->pa_pc, ih);
3196
3197 if (pci_intr_establish(pa->pa_pc, ih, IPL_BIO, trm_intr, sc) == NULL) {
3198 printf("%s: couldn't establish interrupt", sc->sc_dev.dv_xname);
3199 if (intrstr != NULL)
3200 printf(" at %s", intrstr);
3201 printf("\n");
3202 return;
3203 }
3204 if (intrstr != NULL)
3205 printf("%s: interrupting at %s\n",
3206 sc->sc_dev.dv_xname, intrstr);
3207 config_found(&sc->sc_dev, &sc->sc_channel, scsiprint);
3208 }
3209
3210 /*
3211 * match pci device
3212 */
3213 static int
3214 trm_probe(parent, match, aux)
3215 struct device *parent;
3216 struct cfdata *match;
3217 void *aux;
3218 {
3219 struct pci_attach_args *pa = aux;
3220
3221 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_TEKRAM2)
3222 switch (PCI_PRODUCT(pa->pa_id)) {
3223 case PCI_PRODUCT_TEKRAM2_DC315:
3224 return (1);
3225 }
3226 return (0);
3227 }
3228