xref: /netbsd-src/sys/dev/pci/trm.c (revision 220b5c059a84c51ea44107ea8951a57ffaecdc8c)
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@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