Home | History | Annotate | Line # | Download | only in pci
trm.c revision 1.6.2.2
      1 /*	$NetBSD: trm.c,v 1.6.2.2 2002/01/10 19:57:07 thorpej Exp $	*/
      2 /*
      3  * Device Driver for Tekram DC395U/UW/F, DC315/U
      4  * PCI SCSI Bus Master Host Adapter
      5  * (SCSI chip set used Tekram ASIC TRM-S1040)
      6  *
      7  * Copyright (c) 2001 Rui-Xiang Guo
      8  * All rights reserved.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  * 3. The name of the author may not be used to endorse or promote products
     19  *    derived from this software without specific prior written permission.
     20  *
     21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     22  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     26  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     27  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     28  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     29  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     30  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     31  */
     32 /*
     33  * Ported from
     34  *   dc395x_trm.c
     35  *
     36  * Written for NetBSD 1.4.x by
     37  *   Erich Chen     (erich (at) tekram.com.tw)
     38  *
     39  * Provided by
     40  *   (C)Copyright 1995-1999 Tekram Technology Co., Ltd. All rights reserved.
     41  */
     42 
     43 #include <sys/cdefs.h>
     44 __KERNEL_RCSID(0, "$NetBSD: trm.c,v 1.6.2.2 2002/01/10 19:57:07 thorpej 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|M_ZERO);
   2628 	if (sc->sc_srb == NULL) {
   2629 		printf("%s: can not allocate SRB\n", sc->sc_dev.dv_xname);
   2630 		return;
   2631 	}
   2632 
   2633 	for (i = 0, srb = sc->sc_srb; i < TRM_MAX_SRB; i++, srb++) {
   2634 		srb->sgentry = sc->sc_sglist + TRM_MAX_SG_ENTRIES * i;
   2635 		srb->sgoffset = TRM_SG_SIZE * i;
   2636 		srb->sgaddr = sc->sc_dmamap->dm_segs[0].ds_addr + srb->sgoffset;
   2637 		/*
   2638 		 * map all SRB space to SRB_array
   2639 		 */
   2640 		if (bus_dmamap_create(sc->sc_dmat,
   2641 		    MAXPHYS, TRM_MAX_SG_ENTRIES, MAXPHYS, 0,
   2642 		    BUS_DMA_NOWAIT | BUS_DMA_ALLOCNOW, &srb->dmap)) {
   2643 			printf("%s: unable to create DMA transfer map...\n",
   2644 			    sc->sc_dev.dv_xname);
   2645 			free(sc->sc_srb, M_DEVBUF);
   2646 			return;
   2647 		}
   2648 		if (i != TRM_MAX_SRB - 1) {
   2649 			/*
   2650 			 * link all SRB
   2651 			 */
   2652 			srb->next = srb + 1;
   2653 #ifdef TRM_DEBUG
   2654 			printf("srb->next = %8x ", (int) (srb + 1));
   2655 #endif
   2656 		} else {
   2657 			/*
   2658 			 * load NULL to NextSRB of the last SRB
   2659 			 */
   2660 			srb->next = NULL;
   2661 		}
   2662 #ifdef TRM_DEBUG
   2663 		printf("srb = %8x\n", (int) srb);
   2664 #endif
   2665 	}
   2666 	return;
   2667 }
   2668 
   2669 /*
   2670  * initialize the internal structures for a given SCSI host
   2671  */
   2672 static void
   2673 trm_init_sc(sc)
   2674 	struct trm_softc *sc;
   2675 {
   2676 	bus_space_tag_t iot = sc->sc_iot;
   2677 	bus_space_handle_t ioh = sc->sc_ioh;
   2678 	struct trm_nvram *eeprom;
   2679 	int i, j;
   2680 
   2681 	eeprom = &sc->sc_eeprom;
   2682 	sc->maxid = 7;
   2683 	sc->sc_config = HCC_AUTOTERM | HCC_PARITY;
   2684 	if (bus_space_read_1(iot, ioh, TRM_GEN_STATUS) & WIDESCSI) {
   2685 		sc->sc_config |= HCC_WIDE_CARD;
   2686 		sc->maxid = 15;
   2687 	}
   2688 	if (eeprom->channel_cfg & NAC_POWERON_SCSI_RESET)
   2689 		sc->sc_config |= HCC_SCSI_RESET;
   2690 
   2691 	sc->sc_linkdcb = NULL;
   2692 	sc->sc_roundcb = NULL;
   2693 	sc->sc_actdcb = NULL;
   2694 	sc->sc_id = eeprom->scsi_id;
   2695 	sc->devcnt = 0;
   2696 	sc->maxtag = 2 << eeprom->max_tag;
   2697 	sc->sc_flag = 0;
   2698 	sc->devscan_end = 0;
   2699 	/*
   2700 	 * link all device's SRB Q of this adapter
   2701 	 */
   2702 	trm_link_srb(sc);
   2703 	sc->sc_freesrb = sc->sc_srb;
   2704 	/* allocate DCB array for scan device */
   2705 	for (i = 0; i <= sc->maxid; i++)
   2706 		if (sc->sc_id != i)
   2707 			for (j = 0; j < 8; j++) {
   2708 				sc->devscan[i][j] = 1;
   2709 				sc->devflag[i][j] = 0;
   2710 				sc->sc_dcb[i][j] =
   2711 				    malloc(sizeof(struct trm_dcb),
   2712 				    M_DEVBUF, M_WAITOK);
   2713 			}
   2714 
   2715 #ifdef TRM_DEBUG
   2716 	printf("sizeof(struct trm_dcb)= %8x\n", sizeof(struct trm_dcb));
   2717 	printf("sizeof(struct trm_softc)= %8x\n", sizeof(struct trm_softc));
   2718 	printf("sizeof(struct trm_srb)= %8x\n", sizeof(struct trm_srb));
   2719 #endif
   2720 	sc->sc_adapter.adapt_dev = &sc->sc_dev;
   2721 	sc->sc_adapter.adapt_nchannels = 1;
   2722 	sc->sc_adapter.adapt_openings = TRM_MAX_SRB;
   2723 	sc->sc_adapter.adapt_max_periph = TRM_MAX_SRB;
   2724 	sc->sc_adapter.adapt_request = trm_scsipi_request;
   2725 	sc->sc_adapter.adapt_minphys = minphys;
   2726 
   2727 	sc->sc_channel.chan_adapter = &sc->sc_adapter;
   2728 	sc->sc_channel.chan_bustype = &scsi_bustype;
   2729 	sc->sc_channel.chan_channel = 0;
   2730 	sc->sc_channel.chan_ntargets = sc->maxid + 1;
   2731 	sc->sc_channel.chan_nluns = 8;
   2732 	sc->sc_channel.chan_id = sc->sc_id;
   2733 }
   2734 
   2735 /*
   2736  * write sc_eeprom 128 bytes to seeprom
   2737  */
   2738 static void
   2739 trm_eeprom_write_all(sc, eeprom)
   2740 	struct trm_softc *sc;
   2741 	struct trm_nvram *eeprom;
   2742 {
   2743 	bus_space_tag_t iot = sc->sc_iot;
   2744 	bus_space_handle_t ioh = sc->sc_ioh;
   2745 	u_int8_t *buf = (u_int8_t *)eeprom;
   2746 	u_int8_t addr;
   2747 
   2748 	/* Enable SEEPROM */
   2749 	bus_space_write_1(iot, ioh, TRM_GEN_CONTROL,
   2750 	    bus_space_read_1(iot, ioh, TRM_GEN_CONTROL) | EN_EEPROM);
   2751 
   2752 	/*
   2753 	 * Write enable
   2754 	 */
   2755 	trm_eeprom_write_cmd(sc, 0x04, 0xFF);
   2756 	bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
   2757 	trm_wait_30us();
   2758 
   2759 	for (addr = 0; addr < 128; addr++, buf++)
   2760 		trm_eeprom_set_data(sc, addr, *buf);
   2761 
   2762 	/*
   2763 	 * Write disable
   2764 	 */
   2765 	trm_eeprom_write_cmd(sc, 0x04, 0x00);
   2766 	bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
   2767 	trm_wait_30us();
   2768 
   2769 	/* Disable SEEPROM */
   2770 	bus_space_write_1(iot, ioh, TRM_GEN_CONTROL,
   2771 	    bus_space_read_1(iot, ioh, TRM_GEN_CONTROL) & ~EN_EEPROM);
   2772 }
   2773 
   2774 /*
   2775  * write one byte to seeprom
   2776  */
   2777 static void
   2778 trm_eeprom_set_data(sc, addr, data)
   2779 	struct trm_softc *sc;
   2780 	u_int8_t addr;
   2781 	u_int8_t data;
   2782 {
   2783 	bus_space_tag_t iot = sc->sc_iot;
   2784 	bus_space_handle_t ioh = sc->sc_ioh;
   2785 	int i;
   2786 	u_int8_t send;
   2787 
   2788 	/*
   2789 	 * Send write command & address
   2790 	 */
   2791 	trm_eeprom_write_cmd(sc, 0x05, addr);
   2792 	/*
   2793 	 * Write data
   2794 	 */
   2795 	for (i = 0; i < 8; i++, data <<= 1) {
   2796 		send = NVR_SELECT;
   2797 		if (data & 0x80)	/* Start from bit 7 */
   2798 			send |= NVR_BITOUT;
   2799 
   2800 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send);
   2801 		trm_wait_30us();
   2802 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send | NVR_CLOCK);
   2803 		trm_wait_30us();
   2804 	}
   2805 	bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
   2806 	trm_wait_30us();
   2807 	/*
   2808 	 * Disable chip select
   2809 	 */
   2810 	bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
   2811 	trm_wait_30us();
   2812 	bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
   2813 	trm_wait_30us();
   2814 	/*
   2815 	 * Wait for write ready
   2816 	 */
   2817 	for (;;) {
   2818 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM,
   2819 		    NVR_SELECT | NVR_CLOCK);
   2820 		trm_wait_30us();
   2821 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
   2822 		trm_wait_30us();
   2823 		if (bus_space_read_1(iot, ioh, TRM_GEN_NVRAM) & NVR_BITIN)
   2824 			break;
   2825 	}
   2826 	/*
   2827 	 * Disable chip select
   2828 	 */
   2829 	bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
   2830 }
   2831 
   2832 /*
   2833  * read seeprom 128 bytes to sc_eeprom
   2834  */
   2835 static void
   2836 trm_eeprom_read_all(sc, eeprom)
   2837 	struct trm_softc *sc;
   2838 	struct trm_nvram *eeprom;
   2839 {
   2840 	bus_space_tag_t iot = sc->sc_iot;
   2841 	bus_space_handle_t ioh = sc->sc_ioh;
   2842 	u_int8_t *buf = (u_int8_t *)eeprom;
   2843 	u_int8_t addr;
   2844 
   2845 	/*
   2846 	 * Enable SEEPROM
   2847 	 */
   2848 	bus_space_write_1(iot, ioh, TRM_GEN_CONTROL,
   2849 	    bus_space_read_1(iot, ioh, TRM_GEN_CONTROL) | EN_EEPROM);
   2850 
   2851 	for (addr = 0; addr < 128; addr++, buf++)
   2852 		*buf = trm_eeprom_get_data(sc, addr);
   2853 
   2854 	/*
   2855 	 * Disable SEEPROM
   2856 	 */
   2857 	bus_space_write_1(iot, ioh, TRM_GEN_CONTROL,
   2858 	    bus_space_read_1(iot, ioh, TRM_GEN_CONTROL) & ~EN_EEPROM);
   2859 }
   2860 
   2861 /*
   2862  * read one byte from seeprom
   2863  */
   2864 static u_int8_t
   2865 trm_eeprom_get_data(sc, addr)
   2866 	struct trm_softc *sc;
   2867 	u_int8_t addr;
   2868 {
   2869 	bus_space_tag_t iot = sc->sc_iot;
   2870 	bus_space_handle_t ioh = sc->sc_ioh;
   2871 	int i;
   2872 	u_int8_t read, data = 0;
   2873 
   2874 	/*
   2875 	 * Send read command & address
   2876 	 */
   2877 	trm_eeprom_write_cmd(sc, 0x06, addr);
   2878 
   2879 	for (i = 0; i < 8; i++) { /* Read data */
   2880 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM,
   2881 		    NVR_SELECT | NVR_CLOCK);
   2882 		trm_wait_30us();
   2883 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
   2884 		/*
   2885 		 * Get data bit while falling edge
   2886 		 */
   2887 		read = bus_space_read_1(iot, ioh, TRM_GEN_NVRAM);
   2888 		data <<= 1;
   2889 		if (read & NVR_BITIN)
   2890 			data |= 1;
   2891 
   2892 		trm_wait_30us();
   2893 	}
   2894 	/*
   2895 	 * Disable chip select
   2896 	 */
   2897 	bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, 0);
   2898 	return (data);
   2899 }
   2900 
   2901 /*
   2902  * write SB and Op Code into seeprom
   2903  */
   2904 static void
   2905 trm_eeprom_write_cmd(sc, cmd, addr)
   2906 	struct trm_softc *sc;
   2907 	u_int8_t cmd;
   2908 	u_int8_t addr;
   2909 {
   2910 	bus_space_tag_t iot = sc->sc_iot;
   2911 	bus_space_handle_t ioh = sc->sc_ioh;
   2912 	int i;
   2913 	u_int8_t send;
   2914 
   2915 	/* Program SB+OP code */
   2916 	for (i = 0; i < 3; i++, cmd <<= 1) {
   2917 		send = NVR_SELECT;
   2918 		if (cmd & 0x04)	/* Start from bit 2 */
   2919 			send |= NVR_BITOUT;
   2920 
   2921 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send);
   2922 		trm_wait_30us();
   2923 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send | NVR_CLOCK);
   2924 		trm_wait_30us();
   2925 	}
   2926 
   2927 	/* Program address */
   2928 	for (i = 0; i < 7; i++, addr <<= 1) {
   2929 		send = NVR_SELECT;
   2930 		if (addr & 0x40)	/* Start from bit 6 */
   2931 			send |= NVR_BITOUT;
   2932 
   2933 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send);
   2934 		trm_wait_30us();
   2935 		bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, send | NVR_CLOCK);
   2936 		trm_wait_30us();
   2937 	}
   2938 	bus_space_write_1(iot, ioh, TRM_GEN_NVRAM, NVR_SELECT);
   2939 	trm_wait_30us();
   2940 }
   2941 
   2942 /*
   2943  * read seeprom 128 bytes to sc_eeprom and check checksum.
   2944  * If it is wrong, updated with default value.
   2945  */
   2946 static void
   2947 trm_check_eeprom(sc, eeprom)
   2948 	struct trm_softc *sc;
   2949 	struct trm_nvram *eeprom;
   2950 {
   2951 	struct nvram_target *target;
   2952 	u_int16_t *ep;
   2953 	u_int16_t chksum;
   2954 	int i;
   2955 
   2956 #ifdef TRM_DEBUG
   2957 	printf("\n trm_check_eeprom......\n");
   2958 #endif
   2959 	trm_eeprom_read_all(sc, eeprom);
   2960 	ep = (u_int16_t *)eeprom;
   2961 	chksum = 0;
   2962 	for (i = 0; i < 64; i++)
   2963 		chksum += le16toh(*ep++);
   2964 
   2965 	if (chksum != TRM_NVRAM_CKSUM) {
   2966 #ifdef TRM_DEBUG
   2967 		printf("TRM_S1040 EEPROM Check Sum ERROR (load default).\n");
   2968 #endif
   2969 		/*
   2970 		 * Checksum error, load default
   2971 		 */
   2972 		eeprom->subvendor_id[0] = PCI_VENDOR_TEKRAM2 & 0xFF;
   2973 		eeprom->subvendor_id[1] = PCI_VENDOR_TEKRAM2 >> 8;
   2974 		eeprom->subsys_id[0] = PCI_PRODUCT_TEKRAM2_DC315 & 0xFF;
   2975 		eeprom->subsys_id[1] = PCI_PRODUCT_TEKRAM2_DC315 >> 8;
   2976 		eeprom->subclass = 0x00;
   2977 		eeprom->vendor_id[0] = PCI_VENDOR_TEKRAM2 & 0xFF;
   2978 		eeprom->vendor_id[1] = PCI_VENDOR_TEKRAM2 >> 8;
   2979 		eeprom->device_id[0] = PCI_PRODUCT_TEKRAM2_DC315 & 0xFF;
   2980 		eeprom->device_id[1] = PCI_PRODUCT_TEKRAM2_DC315 >> 8;
   2981 		eeprom->reserved0 = 0x00;
   2982 
   2983 		for (i = 0, target = eeprom->target;
   2984 		     i < TRM_MAX_TARGETS;
   2985 		     i++, target++) {
   2986 			target->config0 = 0x77;
   2987 			target->period = 0x00;
   2988 			target->config2 = 0x00;
   2989 			target->config3 = 0x00;
   2990 		}
   2991 
   2992 		eeprom->scsi_id = 7;
   2993 		eeprom->channel_cfg = 0x0F;
   2994 		eeprom->delay_time = 0;
   2995 		eeprom->max_tag = 4;
   2996 		eeprom->reserved1 = 0x15;
   2997 		eeprom->boot_target = 0;
   2998 		eeprom->boot_lun = 0;
   2999 		eeprom->reserved2 = 0;
   3000 		memset(eeprom->reserved3, 0, sizeof(eeprom->reserved3));
   3001 
   3002 		chksum = 0;
   3003 		ep = (u_int16_t *)eeprom;
   3004 		for (i = 0; i < 63; i++)
   3005 			chksum += le16toh(*ep++);
   3006 
   3007 		chksum = TRM_NVRAM_CKSUM - chksum;
   3008 		eeprom->checksum0 = chksum & 0xFF;
   3009 		eeprom->checksum1 = chksum >> 8;
   3010 
   3011 		trm_eeprom_write_all(sc, eeprom);
   3012 	}
   3013 }
   3014 
   3015 /*
   3016  * initialize the SCSI chip ctrl registers
   3017  */
   3018 static void
   3019 trm_init_adapter(sc)
   3020 	struct trm_softc *sc;
   3021 {
   3022 	bus_space_tag_t iot = sc->sc_iot;
   3023 	bus_space_handle_t ioh = sc->sc_ioh;
   3024 	u_int8_t bval;
   3025 
   3026 	/* program configuration 0 */
   3027 	bval = PHASELATCH | INITIATOR | BLOCKRST;
   3028 	if (sc->sc_config & HCC_PARITY)
   3029 		bval |= PARITYCHECK;
   3030 	bus_space_write_1(iot, ioh, TRM_SCSI_CONFIG0, bval);
   3031 
   3032 	/* program configuration 1 */
   3033 	bus_space_write_1(iot, ioh, TRM_SCSI_CONFIG1,
   3034 	    ACTIVE_NEG | ACTIVE_NEGPLUS);
   3035 
   3036 	/* 250ms selection timeout */
   3037 	bus_space_write_1(iot, ioh, TRM_SCSI_TIMEOUT, SEL_TIMEOUT);
   3038 
   3039 	/* Mask all the interrupt */
   3040 	bus_space_write_1(iot, ioh, TRM_DMA_INTEN, 0);
   3041 	bus_space_write_1(iot, ioh, TRM_SCSI_INTEN, 0);
   3042 
   3043 	/* Reset SCSI module */
   3044 	bus_space_write_2(iot, ioh, TRM_SCSI_CONTROL, DO_RSTMODULE);
   3045 
   3046 	/* program Host ID */
   3047 	bus_space_write_1(iot, ioh, TRM_SCSI_HOSTID, sc->sc_id);
   3048 
   3049 	/* set ansynchronous transfer */
   3050 	bus_space_write_1(iot, ioh, TRM_SCSI_OFFSET, 0);
   3051 
   3052 	/* Trun LED control off */
   3053 	bus_space_write_2(iot, ioh, TRM_GEN_CONTROL,
   3054 	    bus_space_read_2(iot, ioh, TRM_GEN_CONTROL) & ~EN_LED);
   3055 
   3056 	/* DMA config */
   3057 	bus_space_write_2(iot, ioh, TRM_DMA_CONFIG,
   3058 	    bus_space_read_2(iot, ioh, TRM_DMA_CONFIG) | DMA_ENHANCE);
   3059 
   3060 	/* Clear pending interrupt status */
   3061 	bus_space_read_1(iot, ioh, TRM_SCSI_INTSTATUS);
   3062 
   3063 	/* Enable SCSI interrupt */
   3064 	bus_space_write_1(iot, ioh, TRM_SCSI_INTEN,
   3065 	    EN_SELECT | EN_SELTIMEOUT | EN_DISCONNECT | EN_RESELECTED |
   3066 	    EN_SCSIRESET | EN_BUSSERVICE | EN_CMDDONE);
   3067 	bus_space_write_1(iot, ioh, TRM_DMA_INTEN, EN_SCSIINTR);
   3068 }
   3069 
   3070 /*
   3071  * initialize the internal structures for a given SCSI host
   3072  */
   3073 static int
   3074 trm_init(sc)
   3075 	struct trm_softc *sc;
   3076 {
   3077 	bus_dma_segment_t seg;
   3078 	int error, rseg, all_sgsize;
   3079 
   3080 	/*
   3081 	 * EEPROM CHECKSUM
   3082 	 */
   3083 	trm_check_eeprom(sc, &sc->sc_eeprom);
   3084 	/*
   3085 	 * MEMORY ALLOCATE FOR ADAPTER CONTROL BLOCK
   3086 	 * allocate the space for all SCSI control blocks (SRB) for DMA memory
   3087 	 */
   3088 	all_sgsize = TRM_MAX_SRB * TRM_SG_SIZE;
   3089 	if ((error = bus_dmamem_alloc(sc->sc_dmat, all_sgsize, PAGE_SIZE,
   3090 	    0, &seg, 1, &rseg, BUS_DMA_NOWAIT)) != 0) {
   3091 		printf("%s: unable to allocate SCSI REQUEST BLOCKS, "
   3092 		    "error = %d\n", sc->sc_dev.dv_xname, error);
   3093 		return (-1);
   3094 	}
   3095 	if ((error = bus_dmamem_map(sc->sc_dmat, &seg, rseg,
   3096 	    all_sgsize, (caddr_t *) &sc->sc_sglist,
   3097 	    BUS_DMA_NOWAIT | BUS_DMA_COHERENT)) != 0) {
   3098 		printf("%s: unable to map SCSI REQUEST BLOCKS, "
   3099 		    "error = %d\n", sc->sc_dev.dv_xname, error);
   3100 		return (-1);
   3101 	}
   3102 	if ((error = bus_dmamap_create(sc->sc_dmat, all_sgsize, 1,
   3103 	    all_sgsize, 0, BUS_DMA_NOWAIT, &sc->sc_dmamap)) != 0) {
   3104 		printf("%s: unable to create SRB DMA maps, "
   3105 		    "error = %d\n", sc->sc_dev.dv_xname, error);
   3106 		return (-1);
   3107 	}
   3108 	if ((error = bus_dmamap_load(sc->sc_dmat, sc->sc_dmamap,
   3109 	    sc->sc_sglist, all_sgsize, NULL, BUS_DMA_NOWAIT)) != 0) {
   3110 		printf("%s: unable to load SRB DMA maps, "
   3111 		    "error = %d\n", sc->sc_dev.dv_xname, error);
   3112 		return (-1);
   3113 	}
   3114 #ifdef	TRM_DEBUG
   3115 	printf("\n\n%s: all_sgsize=%x\n", sc->sc_dev.dv_xname, all_sgsize);
   3116 #endif
   3117 	memset(sc->sc_sglist, 0, all_sgsize);
   3118 	trm_init_sc(sc);
   3119 	trm_init_adapter(sc);
   3120 	trm_reset(sc);
   3121 	return (0);
   3122 }
   3123 
   3124 /*
   3125  * attach and init a host adapter
   3126  */
   3127 static void
   3128 trm_attach(parent, self, aux)
   3129 	struct device *parent;
   3130 	struct device *self;
   3131 	void *aux;
   3132 {
   3133 	struct pci_attach_args *const pa = aux;
   3134 	struct trm_softc *sc = (void *) self;
   3135 	bus_space_tag_t iot;	/* bus space tag */
   3136 	bus_space_handle_t ioh; /* bus space handle */
   3137 	pci_intr_handle_t ih;
   3138 	pcireg_t command;
   3139 	const char *intrstr;
   3140 
   3141 	/*
   3142 	 * These cards do not allow memory mapped accesses
   3143 	 * pa_pc:  chipset tag
   3144 	 * pa_tag: pci tag
   3145 	 */
   3146 	command = pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG);
   3147 	if ((command & (PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE)) !=
   3148 	    (PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE)) {
   3149 		command |= PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE;
   3150 		pci_conf_write(pa->pa_pc, pa->pa_tag,
   3151 		    PCI_COMMAND_STATUS_REG, command);
   3152 	}
   3153 	/*
   3154 	 * mask for get correct base address of pci IO port
   3155 	 */
   3156 	if (pci_mapreg_map(pa, PCI_MAPREG_START, PCI_MAPREG_TYPE_IO, 0,
   3157 	    &iot, &ioh, NULL, NULL)) {
   3158 		printf("%s: unable to map registers\n", sc->sc_dev.dv_xname);
   3159 		return;
   3160 	}
   3161 	/*
   3162 	 * test checksum of eeprom..& initial "ACB" adapter control block...
   3163 	 */
   3164 	sc->sc_iot = iot;
   3165 	sc->sc_ioh = ioh;
   3166 	sc->sc_dmat = pa->pa_dmat;
   3167 	if (trm_init(sc)) {
   3168 		/*
   3169 		 * Error during initialization!
   3170 		 */
   3171 		printf(": Error during initialization\n");
   3172 		return;
   3173 	}
   3174 	/*
   3175 	 * Now try to attach all the sub-devices
   3176 	 */
   3177 	if (sc->sc_config & HCC_WIDE_CARD)
   3178 		printf(": Tekram DC395UW/F (TRM-S1040) Fast40 "
   3179 		    "Ultra Wide SCSI Adapter\n");
   3180 	else
   3181 		printf(": Tekram DC395U, DC315/U (TRM-S1040) Fast20 "
   3182 		    "Ultra SCSI Adapter\n");
   3183 
   3184 	printf("%s: Adapter ID=%d, Max tag number=%d, %d SCBs\n",
   3185 	    sc->sc_dev.dv_xname, sc->sc_id, sc->maxtag, TRM_MAX_SRB);
   3186 	/*
   3187 	 * Now tell the generic SCSI layer about our bus.
   3188 	 * map and establish interrupt
   3189 	 */
   3190 	if (pci_intr_map(pa, &ih)) {
   3191 		printf("%s: couldn't map interrupt\n", sc->sc_dev.dv_xname);
   3192 		return;
   3193 	}
   3194 	intrstr = pci_intr_string(pa->pa_pc, ih);
   3195 
   3196 	if (pci_intr_establish(pa->pa_pc, ih, IPL_BIO, trm_intr, sc) == NULL) {
   3197 		printf("%s: couldn't establish interrupt", sc->sc_dev.dv_xname);
   3198 		if (intrstr != NULL)
   3199 			printf(" at %s", intrstr);
   3200 		printf("\n");
   3201 		return;
   3202 	}
   3203 	if (intrstr != NULL)
   3204 		printf("%s: interrupting at %s\n",
   3205 		    sc->sc_dev.dv_xname, intrstr);
   3206 	config_found(&sc->sc_dev, &sc->sc_channel, scsiprint);
   3207 }
   3208 
   3209 /*
   3210  * match pci device
   3211  */
   3212 static int
   3213 trm_probe(parent, match, aux)
   3214 	struct device *parent;
   3215 	struct cfdata *match;
   3216 	void *aux;
   3217 {
   3218 	struct pci_attach_args *pa = aux;
   3219 
   3220 	if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_TEKRAM2)
   3221 		switch (PCI_PRODUCT(pa->pa_id)) {
   3222 		case PCI_PRODUCT_TEKRAM2_DC315:
   3223 			return (1);
   3224 		}
   3225 	return (0);
   3226 }
   3227