Home | History | Annotate | Line # | Download | only in ic
siop_common.c revision 1.8
      1  1.8  bouyer /*	$NetBSD: siop_common.c,v 1.8 2000/10/06 16:39:04 bouyer Exp $	*/
      2  1.1  bouyer 
      3  1.1  bouyer /*
      4  1.1  bouyer  * Copyright (c) 2000 Manuel Bouyer.
      5  1.1  bouyer  *
      6  1.1  bouyer  * Redistribution and use in source and binary forms, with or without
      7  1.1  bouyer  * modification, are permitted provided that the following conditions
      8  1.1  bouyer  * are met:
      9  1.1  bouyer  * 1. Redistributions of source code must retain the above copyright
     10  1.1  bouyer  *    notice, this list of conditions and the following disclaimer.
     11  1.1  bouyer  * 2. Redistributions in binary form must reproduce the above copyright
     12  1.1  bouyer  *    notice, this list of conditions and the following disclaimer in the
     13  1.1  bouyer  *    documentation and/or other materials provided with the distribution.
     14  1.1  bouyer  * 3. All advertising materials mentioning features or use of this software
     15  1.1  bouyer  *    must display the following acknowledgement:
     16  1.1  bouyer  *	This product includes software developed by Manuel Bouyer
     17  1.1  bouyer  * 4. The name of the author may not be used to endorse or promote products
     18  1.1  bouyer  *    derived from this software without specific prior written permission.
     19  1.1  bouyer  *
     20  1.1  bouyer  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     21  1.1  bouyer  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     22  1.1  bouyer  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     23  1.1  bouyer  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     24  1.1  bouyer  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     25  1.1  bouyer  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     26  1.1  bouyer  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     27  1.1  bouyer  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     28  1.1  bouyer  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     29  1.1  bouyer  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     30  1.1  bouyer  *
     31  1.1  bouyer  */
     32  1.1  bouyer 
     33  1.1  bouyer /* SYM53c7/8xx PCI-SCSI I/O Processors driver */
     34  1.1  bouyer 
     35  1.1  bouyer #include <sys/param.h>
     36  1.1  bouyer #include <sys/systm.h>
     37  1.1  bouyer #include <sys/device.h>
     38  1.1  bouyer #include <sys/malloc.h>
     39  1.1  bouyer #include <sys/buf.h>
     40  1.1  bouyer #include <sys/kernel.h>
     41  1.1  bouyer #include <sys/scsiio.h>
     42  1.1  bouyer 
     43  1.1  bouyer #include <machine/endian.h>
     44  1.1  bouyer #include <machine/bus.h>
     45  1.1  bouyer 
     46  1.1  bouyer #include <dev/scsipi/scsi_all.h>
     47  1.1  bouyer #include <dev/scsipi/scsi_message.h>
     48  1.1  bouyer #include <dev/scsipi/scsipi_all.h>
     49  1.1  bouyer 
     50  1.1  bouyer #include <dev/scsipi/scsiconf.h>
     51  1.1  bouyer 
     52  1.1  bouyer #include <dev/ic/siopreg.h>
     53  1.1  bouyer #include <dev/ic/siopvar.h>
     54  1.1  bouyer #include <dev/ic/siopvar_common.h>
     55  1.1  bouyer 
     56  1.2  bouyer #undef DEBUG
     57  1.2  bouyer #undef DEBUG_DR
     58  1.1  bouyer 
     59  1.1  bouyer void
     60  1.1  bouyer siop_common_reset(sc)
     61  1.1  bouyer 	struct siop_softc *sc;
     62  1.1  bouyer {
     63  1.1  bouyer 	u_int32_t stest3;
     64  1.1  bouyer 
     65  1.1  bouyer 	/* reset the chip */
     66  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_ISTAT, ISTAT_SRST);
     67  1.1  bouyer 	delay(1000);
     68  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_ISTAT, 0);
     69  1.1  bouyer 
     70  1.1  bouyer 	/* init registers */
     71  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL0,
     72  1.1  bouyer 	    SCNTL0_ARB_MASK | SCNTL0_EPC | SCNTL0_AAP);
     73  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL1, 0);
     74  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL3, sc->clock_div);
     75  1.7  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SXFER, 0);
     76  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_DIEN, 0xff);
     77  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SIEN0,
     78  1.1  bouyer 	    0xff & ~(SIEN0_CMP | SIEN0_SEL | SIEN0_RSL));
     79  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SIEN1,
     80  1.1  bouyer 	    0xff & ~(SIEN1_HTH | SIEN1_GEN));
     81  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST2, 0);
     82  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST3, STEST3_TE);
     83  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STIME0,
     84  1.1  bouyer 	    (0xb << STIME0_SEL_SHIFT));
     85  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCID,
     86  1.1  bouyer 	    sc->sc_link.scsipi_scsi.adapter_target | SCID_RRE);
     87  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_RESPID0,
     88  1.1  bouyer 	    1 << sc->sc_link.scsipi_scsi.adapter_target);
     89  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_DCNTL,
     90  1.1  bouyer 	    (sc->features & SF_CHIP_PF) ? DCNTL_COM | DCNTL_PFEN : DCNTL_COM);
     91  1.1  bouyer 
     92  1.1  bouyer 	/* enable clock doubler or quadruler if appropriate */
     93  1.1  bouyer 	if (sc->features & (SF_CHIP_DBLR | SF_CHIP_QUAD)) {
     94  1.1  bouyer 		stest3 = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_STEST3);
     95  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST1,
     96  1.1  bouyer 		    STEST1_DBLEN);
     97  1.1  bouyer 		if (sc->features & SF_CHIP_QUAD) {
     98  1.1  bouyer 			/* wait for PPL to lock */
     99  1.1  bouyer 			while ((bus_space_read_1(sc->sc_rt, sc->sc_rh,
    100  1.1  bouyer 			    SIOP_STEST4) & STEST4_LOCK) == 0)
    101  1.1  bouyer 				delay(10);
    102  1.1  bouyer 		} else {
    103  1.1  bouyer 			/* data sheet says 20us - more won't hurt */
    104  1.1  bouyer 			delay(100);
    105  1.1  bouyer 		}
    106  1.1  bouyer 		/* halt scsi clock, select doubler/quad, restart clock */
    107  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST3,
    108  1.1  bouyer 		    stest3 | STEST3_HSC);
    109  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST1,
    110  1.1  bouyer 		    STEST1_DBLEN | STEST1_DBLSEL);
    111  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST3, stest3);
    112  1.1  bouyer 	} else {
    113  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST1, 0);
    114  1.1  bouyer 	}
    115  1.1  bouyer 	if (sc->features & SF_CHIP_FIFO)
    116  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_CTEST5,
    117  1.1  bouyer 		    bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_CTEST5) |
    118  1.1  bouyer 		    CTEST5_DFS);
    119  1.1  bouyer 
    120  1.1  bouyer 	sc->sc_reset(sc);
    121  1.1  bouyer }
    122  1.1  bouyer 
    123  1.1  bouyer int
    124  1.1  bouyer siop_wdtr_neg(siop_cmd)
    125  1.1  bouyer 	struct siop_cmd *siop_cmd;
    126  1.1  bouyer {
    127  1.1  bouyer 	struct siop_softc *sc = siop_cmd->siop_target->siop_sc;
    128  1.1  bouyer 	struct siop_target *siop_target = siop_cmd->siop_target;
    129  1.1  bouyer 	int target = siop_cmd->xs->sc_link->scsipi_scsi.target;
    130  1.1  bouyer 
    131  1.1  bouyer 	if (siop_target->status == TARST_WIDE_NEG) {
    132  1.1  bouyer 		/* we initiated wide negotiation */
    133  1.1  bouyer 		switch (siop_cmd->siop_table->msg_in[3]) {
    134  1.1  bouyer 		case MSG_EXT_WDTR_BUS_8_BIT:
    135  1.1  bouyer 			printf("%s: target %d using 8bit transfers\n",
    136  1.1  bouyer 			    sc->sc_dev.dv_xname, target);
    137  1.1  bouyer 			siop_target->flags &= ~SF_BUS_WIDE;
    138  1.1  bouyer 			sc->targets[target]->id &= ~(SCNTL3_EWS << 24);
    139  1.1  bouyer 			break;
    140  1.1  bouyer 		case MSG_EXT_WDTR_BUS_16_BIT:
    141  1.1  bouyer 			if (sc->features & SF_BUS_WIDE) {
    142  1.1  bouyer 				printf("%s: target %d using 16bit transfers\n",
    143  1.1  bouyer 				    sc->sc_dev.dv_xname, target);
    144  1.1  bouyer 				siop_target->flags |= TARF_WIDE;
    145  1.1  bouyer 				sc->targets[target]->id |= (SCNTL3_EWS << 24);
    146  1.1  bouyer 				break;
    147  1.1  bouyer 			}
    148  1.1  bouyer 		/* FALLTHROUH */
    149  1.1  bouyer 		default:
    150  1.1  bouyer 			/*
    151  1.1  bouyer  			 * hum, we got more than what we can handle, shoudn't
    152  1.1  bouyer 			 * happen. Reject, and stay async
    153  1.1  bouyer 			 */
    154  1.1  bouyer 			siop_target->flags &= ~TARF_WIDE;
    155  1.1  bouyer 			siop_target->status = TARST_OK;
    156  1.1  bouyer 			printf("%s: rejecting invalid wide negotiation from "
    157  1.1  bouyer 			    "target %d (%d)\n", sc->sc_dev.dv_xname, target,
    158  1.1  bouyer 			    siop_cmd->siop_table->msg_in[3]);
    159  1.1  bouyer 			siop_cmd->siop_table->t_msgout.count= htole32(1);
    160  1.1  bouyer 			siop_cmd->siop_table->t_msgout.addr =
    161  1.1  bouyer 			    htole32(siop_cmd->dsa);
    162  1.1  bouyer 			siop_cmd->siop_table->msg_out[0] = MSG_MESSAGE_REJECT;
    163  1.1  bouyer 			return SIOP_NEG_MSGOUT;
    164  1.1  bouyer 		}
    165  1.1  bouyer 		siop_cmd->siop_table->id =
    166  1.1  bouyer 		    htole32(sc->targets[target]->id);
    167  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh,
    168  1.1  bouyer 		    SIOP_SCNTL3,
    169  1.1  bouyer 		    (sc->targets[target]->id >> 24) & 0xff);
    170  1.1  bouyer 		/* we now need to do sync */
    171  1.6  bouyer 		if ((siop_cmd->xs->sc_link->quirks & SDEV_NOSYNC) == 0) {
    172  1.6  bouyer 			siop_target->status = TARST_SYNC_NEG;
    173  1.6  bouyer 			siop_cmd->siop_table->msg_out[0] = MSG_EXTENDED;
    174  1.6  bouyer 			siop_cmd->siop_table->msg_out[1] = MSG_EXT_SDTR_LEN;
    175  1.6  bouyer 			siop_cmd->siop_table->msg_out[2] = MSG_EXT_SDTR;
    176  1.6  bouyer 			siop_cmd->siop_table->msg_out[3] = sc->minsync;
    177  1.6  bouyer 			siop_cmd->siop_table->msg_out[4] = sc->maxoff;
    178  1.6  bouyer 			siop_cmd->siop_table->t_msgout.count =
    179  1.6  bouyer 			    htole32(MSG_EXT_SDTR_LEN + 2);
    180  1.6  bouyer 			siop_cmd->siop_table->t_msgout.addr =
    181  1.6  bouyer 			    htole32(siop_cmd->dsa);
    182  1.6  bouyer 			return SIOP_NEG_MSGOUT;
    183  1.6  bouyer 		} else {
    184  1.6  bouyer 			siop_target->status = TARST_OK;
    185  1.6  bouyer 			return SIOP_NEG_ACK;
    186  1.6  bouyer 		}
    187  1.1  bouyer 	} else {
    188  1.1  bouyer 		/* target initiated wide negotiation */
    189  1.1  bouyer 		if (siop_cmd->siop_table->msg_in[3] >= MSG_EXT_WDTR_BUS_16_BIT
    190  1.1  bouyer 		    && (sc->features & SF_BUS_WIDE)) {
    191  1.1  bouyer 			printf("%s: target %d using 16bit transfers\n",
    192  1.1  bouyer 			    sc->sc_dev.dv_xname, target);
    193  1.1  bouyer 			siop_target->flags |= TARF_WIDE;
    194  1.1  bouyer 			sc->targets[target]->id |= SCNTL3_EWS << 24;
    195  1.1  bouyer 			siop_cmd->siop_table->msg_out[3] =
    196  1.1  bouyer 			    MSG_EXT_WDTR_BUS_16_BIT;
    197  1.1  bouyer 		} else {
    198  1.1  bouyer 			printf("%s: target %d using 8bit transfers\n",
    199  1.1  bouyer 			    sc->sc_dev.dv_xname, target);
    200  1.1  bouyer 			siop_target->flags &= ~SF_BUS_WIDE;
    201  1.1  bouyer 			sc->targets[target]->id &= ~(SCNTL3_EWS << 24);
    202  1.1  bouyer 			siop_cmd->siop_table->msg_out[3] =
    203  1.1  bouyer 			    MSG_EXT_WDTR_BUS_8_BIT;
    204  1.1  bouyer 		}
    205  1.1  bouyer 		siop_cmd->siop_table->id =
    206  1.1  bouyer 		    htole32(sc->targets[target]->id);
    207  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL3,
    208  1.1  bouyer 		    (sc->targets[target]->id >> 24) & 0xff);
    209  1.1  bouyer 		/*
    210  1.1  bouyer 		 * we did reset wide parameters, so fall back to async,
    211  1.8  bouyer 		 * but don't schedule a sync neg, target should initiate it
    212  1.1  bouyer 		 */
    213  1.1  bouyer 		siop_target->status = TARST_OK;
    214  1.1  bouyer 		siop_cmd->siop_table->msg_out[0] = MSG_EXTENDED;
    215  1.1  bouyer 		siop_cmd->siop_table->msg_out[1] = MSG_EXT_WDTR_LEN;
    216  1.1  bouyer 		siop_cmd->siop_table->msg_out[2] = MSG_EXT_WDTR;
    217  1.1  bouyer 		siop_cmd->siop_table->t_msgout.count=
    218  1.1  bouyer 		    htole32(MSG_EXT_WDTR_LEN + 2);
    219  1.1  bouyer 		siop_cmd->siop_table->t_msgout.addr = htole32(siop_cmd->dsa);
    220  1.1  bouyer 		return SIOP_NEG_MSGOUT;
    221  1.1  bouyer 	}
    222  1.1  bouyer }
    223  1.1  bouyer 
    224  1.1  bouyer int
    225  1.1  bouyer siop_sdtr_neg(siop_cmd)
    226  1.1  bouyer 	struct siop_cmd *siop_cmd;
    227  1.1  bouyer {
    228  1.1  bouyer 	struct siop_softc *sc = siop_cmd->siop_target->siop_sc;
    229  1.1  bouyer 	struct siop_target *siop_target = siop_cmd->siop_target;
    230  1.1  bouyer 	int target = siop_cmd->xs->sc_link->scsipi_scsi.target;
    231  1.1  bouyer 	int sync, offset, i;
    232  1.1  bouyer 	int send_msgout = 0;
    233  1.1  bouyer 
    234  1.1  bouyer 	sync = siop_cmd->siop_table->msg_in[3];
    235  1.1  bouyer 	offset = siop_cmd->siop_table->msg_in[4];
    236  1.1  bouyer 
    237  1.1  bouyer 	if (siop_target->status == TARST_SYNC_NEG) {
    238  1.1  bouyer 		/* we initiated sync negotiation */
    239  1.1  bouyer 		siop_target->status = TARST_OK;
    240  1.1  bouyer #ifdef DEBUG
    241  1.1  bouyer 		printf("sdtr: sync %d offset %d\n", sync, offset);
    242  1.1  bouyer #endif
    243  1.1  bouyer 		if (offset > sc->maxoff || sync < sc->minsync ||
    244  1.1  bouyer 			sync > sc->maxsync)
    245  1.1  bouyer 			goto reject;
    246  1.1  bouyer 		for (i = 0; i < sizeof(scf_period) / sizeof(scf_period[0]);
    247  1.1  bouyer 		    i++) {
    248  1.1  bouyer 			if (sc->clock_period != scf_period[i].clock)
    249  1.1  bouyer 				continue;
    250  1.1  bouyer 			if (scf_period[i].period == sync) {
    251  1.1  bouyer 				/* ok, found it. we now are sync. */
    252  1.1  bouyer 				printf("%s: target %d now synchronous at "
    253  1.1  bouyer 				    "%sMhz, offset %d\n", sc->sc_dev.dv_xname,
    254  1.1  bouyer 				    target, scf_period[i].rate, offset);
    255  1.1  bouyer 				sc->targets[target]->id &=
    256  1.1  bouyer 				    ~(SCNTL3_SCF_MASK << 24);
    257  1.1  bouyer 				sc->targets[target]->id |= scf_period[i].scf
    258  1.1  bouyer 				    << (24 + SCNTL3_SCF_SHIFT);
    259  1.1  bouyer 				if (sync < 25) /* Ultra */
    260  1.1  bouyer 					sc->targets[target]->id |=
    261  1.1  bouyer 					    SCNTL3_ULTRA << 24;
    262  1.1  bouyer 				else
    263  1.1  bouyer 					sc->targets[target]->id &=
    264  1.1  bouyer 					    ~(SCNTL3_ULTRA << 24);
    265  1.1  bouyer 				sc->targets[target]->id &=
    266  1.7  bouyer 				    ~(SXFER_MO_MASK << 8);
    267  1.1  bouyer 				sc->targets[target]->id |=
    268  1.7  bouyer 				    (offset & SXFER_MO_MASK) << 8;
    269  1.1  bouyer 				goto end;
    270  1.1  bouyer 			}
    271  1.1  bouyer 		}
    272  1.1  bouyer 		/*
    273  1.1  bouyer 		 * we didn't find it in our table, do async and send reject
    274  1.1  bouyer 		 * msg
    275  1.1  bouyer 		 */
    276  1.1  bouyer reject:
    277  1.1  bouyer 		send_msgout = 1;
    278  1.1  bouyer 		siop_cmd->siop_table->t_msgout.count= htole32(1);
    279  1.1  bouyer 		siop_cmd->siop_table->msg_out[0] = MSG_MESSAGE_REJECT;
    280  1.1  bouyer 		printf("%s: target %d asynchronous\n", sc->sc_dev.dv_xname,
    281  1.1  bouyer 		    target);
    282  1.1  bouyer 		sc->targets[target]->id &= ~(SCNTL3_SCF_MASK << 24);
    283  1.1  bouyer 		sc->targets[target]->id &= ~(SCNTL3_ULTRA << 24);
    284  1.7  bouyer 		sc->targets[target]->id &= ~(SXFER_MO_MASK << 8);
    285  1.1  bouyer 	} else { /* target initiated sync neg */
    286  1.1  bouyer #ifdef DEBUG
    287  1.1  bouyer 		printf("sdtr (target): sync %d offset %d\n", sync, offset);
    288  1.1  bouyer #endif
    289  1.1  bouyer 		if (offset == 0 || sync > sc->maxsync) { /* async */
    290  1.1  bouyer 			goto async;
    291  1.1  bouyer 		}
    292  1.1  bouyer 		if (offset > sc->maxoff)
    293  1.1  bouyer 			offset = sc->maxoff;
    294  1.1  bouyer 		if (sync < sc->minsync)
    295  1.1  bouyer 			sync = sc->minsync;
    296  1.1  bouyer 		/* look for sync period */
    297  1.1  bouyer 		for (i = 0; i < sizeof(scf_period) / sizeof(scf_period[0]);
    298  1.1  bouyer 		    i++) {
    299  1.1  bouyer 			if (sc->clock_period != scf_period[i].clock)
    300  1.1  bouyer 				continue;
    301  1.1  bouyer 			if (scf_period[i].period == sync) {
    302  1.1  bouyer 				/* ok, found it. we now are sync. */
    303  1.1  bouyer 				printf("%s: target %d now synchronous at "
    304  1.1  bouyer 				    "%sMhz, offset %d\n", sc->sc_dev.dv_xname,
    305  1.1  bouyer 				    target, scf_period[i].rate, offset);
    306  1.1  bouyer 				sc->targets[target]->id &=
    307  1.1  bouyer 				    ~(SCNTL3_SCF_MASK << 24);
    308  1.1  bouyer 				sc->targets[target]->id |= scf_period[i].scf
    309  1.1  bouyer 				    << (24 + SCNTL3_SCF_SHIFT);
    310  1.1  bouyer 				if (sync < 25) /* Ultra */
    311  1.1  bouyer 					sc->targets[target]->id |=
    312  1.1  bouyer 					    SCNTL3_ULTRA << 24;
    313  1.1  bouyer 				else
    314  1.1  bouyer 					sc->targets[target]->id &=
    315  1.1  bouyer 					    ~(SCNTL3_ULTRA << 24);
    316  1.1  bouyer 				sc->targets[target]->id &=
    317  1.7  bouyer 				    ~(SXFER_MO_MASK << 8);
    318  1.1  bouyer 				sc->targets[target]->id |=
    319  1.7  bouyer 				    (offset & SXFER_MO_MASK) << 8;
    320  1.1  bouyer 				siop_cmd->siop_table->msg_out[0] = MSG_EXTENDED;
    321  1.1  bouyer 				siop_cmd->siop_table->msg_out[1] =
    322  1.1  bouyer 				    MSG_EXT_SDTR_LEN;
    323  1.1  bouyer 				siop_cmd->siop_table->msg_out[2] = MSG_EXT_SDTR;
    324  1.1  bouyer 				siop_cmd->siop_table->msg_out[3] = sync;
    325  1.1  bouyer 				siop_cmd->siop_table->msg_out[4] = offset;
    326  1.1  bouyer 				siop_cmd->siop_table->t_msgout.count=
    327  1.1  bouyer 				    htole32(MSG_EXT_SDTR_LEN + 2);
    328  1.1  bouyer 				send_msgout = 1;
    329  1.1  bouyer 				goto end;
    330  1.1  bouyer 			}
    331  1.1  bouyer 		}
    332  1.1  bouyer async:
    333  1.1  bouyer 		printf("%s: target %d asynchronous\n",
    334  1.1  bouyer 		    sc->sc_dev.dv_xname, target);
    335  1.1  bouyer 		sc->targets[target]->id &= ~(SCNTL3_SCF_MASK << 24);
    336  1.1  bouyer 		sc->targets[target]->id &= ~(SCNTL3_ULTRA << 24);
    337  1.7  bouyer 		sc->targets[target]->id &= ~(SXFER_MO_MASK << 8);
    338  1.1  bouyer 		siop_cmd->siop_table->msg_out[0] = MSG_EXTENDED;
    339  1.1  bouyer 		siop_cmd->siop_table->msg_out[1] = MSG_EXT_SDTR_LEN;
    340  1.1  bouyer 		siop_cmd->siop_table->msg_out[2] = MSG_EXT_SDTR;
    341  1.1  bouyer 		siop_cmd->siop_table->msg_out[3] = 0;
    342  1.1  bouyer 		siop_cmd->siop_table->msg_out[4] = 0;
    343  1.1  bouyer 		siop_cmd->siop_table->t_msgout.count=
    344  1.1  bouyer 		    htole32(MSG_EXT_SDTR_LEN + 2);
    345  1.1  bouyer 		send_msgout = 1;
    346  1.1  bouyer 	}
    347  1.1  bouyer end:
    348  1.1  bouyer #ifdef DEBUG
    349  1.1  bouyer 	printf("id now 0x%x\n", sc->targets[target]->id);
    350  1.1  bouyer #endif
    351  1.1  bouyer 	siop_cmd->siop_table->id = htole32(sc->targets[target]->id);
    352  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL3,
    353  1.1  bouyer 	    (sc->targets[target]->id >> 24) & 0xff);
    354  1.7  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SXFER,
    355  1.1  bouyer 	    (sc->targets[target]->id >> 8) & 0xff);
    356  1.1  bouyer 	if (send_msgout) {
    357  1.1  bouyer 		siop_cmd->siop_table->t_msgout.addr = htole32(siop_cmd->dsa);
    358  1.1  bouyer 		return SIOP_NEG_MSGOUT;
    359  1.1  bouyer 	} else {
    360  1.1  bouyer 		return SIOP_NEG_ACK;
    361  1.1  bouyer 	}
    362  1.1  bouyer }
    363  1.1  bouyer 
    364  1.1  bouyer void
    365  1.1  bouyer siop_minphys(bp)
    366  1.1  bouyer 	struct buf *bp;
    367  1.1  bouyer {
    368  1.1  bouyer 	minphys(bp);
    369  1.1  bouyer }
    370  1.1  bouyer 
    371  1.1  bouyer int
    372  1.1  bouyer siop_ioctl(link, cmd, arg, flag, p)
    373  1.1  bouyer 	struct scsipi_link *link;
    374  1.1  bouyer 	u_long cmd;
    375  1.1  bouyer 	caddr_t arg;
    376  1.1  bouyer 	int flag;
    377  1.1  bouyer 	struct proc *p;
    378  1.1  bouyer {
    379  1.1  bouyer 	struct siop_softc *sc = link->adapter_softc;
    380  1.1  bouyer 	u_int8_t scntl1;
    381  1.1  bouyer 	int s;
    382  1.1  bouyer 
    383  1.1  bouyer 	switch (cmd) {
    384  1.1  bouyer 	case SCBUSIORESET:
    385  1.1  bouyer 		s = splbio();
    386  1.1  bouyer 		scntl1 = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL1);
    387  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL1,
    388  1.1  bouyer 		    scntl1 | SCNTL1_RST);
    389  1.1  bouyer 		/* minimum 25 us, more time won't hurt */
    390  1.1  bouyer 		delay(100);
    391  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL1, scntl1);
    392  1.1  bouyer 		splx(s);
    393  1.1  bouyer 		return (0);
    394  1.1  bouyer 	default:
    395  1.1  bouyer 		return (ENOTTY);
    396  1.1  bouyer 	}
    397  1.1  bouyer }
    398  1.1  bouyer 
    399  1.1  bouyer void
    400  1.1  bouyer siop_sdp(siop_cmd)
    401  1.1  bouyer 	struct siop_cmd *siop_cmd;
    402  1.1  bouyer {
    403  1.1  bouyer 	/* save data pointer. Handle async only for now */
    404  1.1  bouyer 	int offset, dbc, sstat;
    405  1.1  bouyer 	struct siop_softc *sc = siop_cmd->siop_target->siop_sc;
    406  1.1  bouyer 	scr_table_t *table; /* table to patch */
    407  1.1  bouyer 
    408  1.1  bouyer 	if ((siop_cmd->xs->xs_control & (XS_CTL_DATA_OUT | XS_CTL_DATA_IN))
    409  1.1  bouyer 	    == 0)
    410  1.1  bouyer 	    return; /* no data pointers to save */
    411  1.1  bouyer 	offset = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_SCRATCHA + 1);
    412  1.1  bouyer 	if (offset >= SIOP_NSG) {
    413  1.1  bouyer 		printf("%s: bad offset in siop_sdp (%d)\n",
    414  1.1  bouyer 		    sc->sc_dev.dv_xname, offset);
    415  1.1  bouyer 		return;
    416  1.1  bouyer 	}
    417  1.1  bouyer 	table = &siop_cmd->siop_table->data[offset];
    418  1.1  bouyer #ifdef DEBUG_DR
    419  1.1  bouyer 	printf("sdp: offset %d count=%d addr=0x%x ", offset,
    420  1.1  bouyer 	    table->count, table->addr);
    421  1.1  bouyer #endif
    422  1.1  bouyer 	dbc = bus_space_read_4(sc->sc_rt, sc->sc_rh, SIOP_DBC) & 0x00ffffff;
    423  1.1  bouyer 	if (siop_cmd->xs->xs_control & XS_CTL_DATA_OUT) {
    424  1.1  bouyer 		/* need to account stale data in FIFO */
    425  1.1  bouyer 		int dfifo = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_DFIFO);
    426  1.1  bouyer 		if (sc->features & SF_CHIP_FIFO) {
    427  1.1  bouyer 			dfifo |= (bus_space_read_1(sc->sc_rt, sc->sc_rh,
    428  1.1  bouyer 			    SIOP_CTEST5) & CTEST5_BOMASK) << 8;
    429  1.1  bouyer 			dbc += (dfifo - (dbc & 0x3ff)) & 0x3ff;
    430  1.1  bouyer 		} else {
    431  1.1  bouyer 			dbc += (dfifo - (dbc & 0x7f)) & 0x7f;
    432  1.1  bouyer 		}
    433  1.1  bouyer 		sstat = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_SSTAT0);
    434  1.1  bouyer 		if (sstat & SSTAT0_OLF)
    435  1.1  bouyer 			dbc++;
    436  1.1  bouyer 		if (sstat & SSTAT0_ORF)
    437  1.1  bouyer 			dbc++;
    438  1.1  bouyer 		if (siop_cmd->siop_target->flags & TARF_WIDE) {
    439  1.1  bouyer 			sstat = bus_space_read_1(sc->sc_rt, sc->sc_rh,
    440  1.1  bouyer 			    SIOP_SSTAT2);
    441  1.1  bouyer 			if (sstat & SSTAT2_OLF1)
    442  1.1  bouyer 				dbc++;
    443  1.1  bouyer 			if (sstat & SSTAT2_ORF1)
    444  1.1  bouyer 				dbc++;
    445  1.1  bouyer 		}
    446  1.1  bouyer 		/* clear the FIFO */
    447  1.1  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_CTEST3,
    448  1.1  bouyer 		    bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_CTEST3) |
    449  1.1  bouyer 		    CTEST3_CLF);
    450  1.1  bouyer 	}
    451  1.1  bouyer 	table->addr =
    452  1.1  bouyer 	    htole32(le32toh(table->addr) + le32toh(table->count) - dbc);
    453  1.1  bouyer 	table->count = htole32(dbc);
    454  1.1  bouyer #ifdef DEBUG_DR
    455  1.1  bouyer 	printf("now count=%d addr=0x%x\n", table->count, table->addr);
    456  1.1  bouyer #endif
    457  1.1  bouyer }
    458  1.1  bouyer 
    459  1.1  bouyer void
    460  1.1  bouyer siop_clearfifo(sc)
    461  1.1  bouyer 	struct siop_softc *sc;
    462  1.1  bouyer {
    463  1.1  bouyer 	int timeout = 0;
    464  1.1  bouyer 	int ctest3 = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_CTEST3);
    465  1.1  bouyer 
    466  1.1  bouyer #ifdef DEBUG_INTR
    467  1.1  bouyer 	printf("DMA fifo not empty !\n");
    468  1.1  bouyer #endif
    469  1.1  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_CTEST3,
    470  1.1  bouyer 	    ctest3 | CTEST3_CLF);
    471  1.1  bouyer 	while ((bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_CTEST3) &
    472  1.1  bouyer 	    CTEST3_CLF) != 0) {
    473  1.1  bouyer 		delay(1);
    474  1.1  bouyer 		if (++timeout > 1000) {
    475  1.1  bouyer 			printf("clear fifo failed\n");
    476  1.1  bouyer 			bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_CTEST3,
    477  1.1  bouyer 			    bus_space_read_1(sc->sc_rt, sc->sc_rh,
    478  1.1  bouyer 			    SIOP_CTEST3) & ~CTEST3_CLF);
    479  1.1  bouyer 			return;
    480  1.1  bouyer 		}
    481  1.1  bouyer 	}
    482  1.3  bouyer }
    483  1.3  bouyer 
    484  1.3  bouyer int
    485  1.3  bouyer siop_modechange(sc)
    486  1.3  bouyer 	struct siop_softc *sc;
    487  1.3  bouyer {
    488  1.3  bouyer 	int retry;
    489  1.3  bouyer 	int sist0, sist1, stest2, stest4;
    490  1.3  bouyer 	for (retry = 0; retry < 5; retry++) {
    491  1.3  bouyer 		/*
    492  1.3  bouyer 		 * datasheet says to wait 100ms and re-read SIST1,
    493  1.3  bouyer 		 * to check that DIFFSENSE is srable.
    494  1.3  bouyer 		 * We may delay() 5 times for  100ms at interrupt time;
    495  1.3  bouyer 		 * hopefully this will not happen often.
    496  1.3  bouyer 		 */
    497  1.3  bouyer 		delay(100000);
    498  1.3  bouyer 		sist0 = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_SIST0);
    499  1.3  bouyer 		sist1 = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_SIST1);
    500  1.3  bouyer 		if (sist1 & SIEN1_SBMC)
    501  1.3  bouyer 			continue; /* we got an irq again */
    502  1.3  bouyer 		stest4 = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_STEST4) &
    503  1.3  bouyer 		    STEST4_MODE_MASK;
    504  1.3  bouyer 		stest2 = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_STEST2);
    505  1.3  bouyer 		switch(stest4) {
    506  1.3  bouyer 		case STEST4_MODE_DIF:
    507  1.3  bouyer 			printf("%s: switching to differential mode\n",
    508  1.3  bouyer 			    sc->sc_dev.dv_xname);
    509  1.3  bouyer 			bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST2,
    510  1.3  bouyer 			    stest2 | STEST2_DIF);
    511  1.3  bouyer 			break;
    512  1.3  bouyer 		case STEST4_MODE_SE:
    513  1.3  bouyer 			printf("%s: switching to single-ended mode\n",
    514  1.3  bouyer 			    sc->sc_dev.dv_xname);
    515  1.3  bouyer 			bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST2,
    516  1.3  bouyer 			    stest2 & ~STEST2_DIF);
    517  1.3  bouyer 			break;
    518  1.3  bouyer 		case STEST4_MODE_LVD:
    519  1.3  bouyer 			printf("%s: switching to LVD mode\n",
    520  1.3  bouyer 			    sc->sc_dev.dv_xname);
    521  1.3  bouyer 			bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST2,
    522  1.3  bouyer 			    stest2 & ~STEST2_DIF);
    523  1.3  bouyer 			break;
    524  1.3  bouyer 		default:
    525  1.3  bouyer 			printf("%s: invalid SCSI mode 0x%x\n",
    526  1.3  bouyer 			    sc->sc_dev.dv_xname, stest4);
    527  1.3  bouyer 			return 0;
    528  1.3  bouyer 		}
    529  1.3  bouyer 		bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_STEST0,
    530  1.3  bouyer 		    stest4 >> 2);
    531  1.3  bouyer 		return 1;
    532  1.3  bouyer 	}
    533  1.3  bouyer 	printf("%s: timeout waiting for DIFFSENSE to stabilise\n",
    534  1.3  bouyer 	    sc->sc_dev.dv_xname);
    535  1.3  bouyer 	return 0;
    536  1.6  bouyer }
    537  1.6  bouyer 
    538  1.6  bouyer void
    539  1.6  bouyer siop_resetbus(sc)
    540  1.6  bouyer 	struct siop_softc *sc;
    541  1.6  bouyer {
    542  1.6  bouyer 	int scntl1;
    543  1.6  bouyer 	scntl1 = bus_space_read_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL1);
    544  1.6  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL1,
    545  1.6  bouyer 	    scntl1 | SCNTL1_RST);
    546  1.6  bouyer 	/* minimum 25 us, more time won't hurt */
    547  1.6  bouyer 	delay(100);
    548  1.6  bouyer 	bus_space_write_1(sc->sc_rt, sc->sc_rh, SIOP_SCNTL1, scntl1);
    549  1.1  bouyer }
    550