Home | History | Annotate | Line # | Download | only in ata
ata_wdc.c revision 1.13
      1 /*	$NetBSD: ata_wdc.c,v 1.13 1999/01/29 11:36:20 bouyer Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1998 Manuel Bouyer.
      5  *
      6  * Redistribution and use in source and binary forms, with or without
      7  * modification, are permitted provided that the following conditions
      8  * are met:
      9  * 1. Redistributions of source code must retain the above copyright
     10  *    notice, this list of conditions and the following disclaimer.
     11  * 2. Redistributions in binary form must reproduce the above copyright
     12  *    notice, this list of conditions and the following disclaimer in the
     13  *    documentation and/or other materials provided with the distribution.
     14  * 3. All advertising materials mentioning features or use of this software
     15  *    must display the following acknowledgement:
     16  *	This product includes software developed by the University of
     17  *	California, Berkeley and its contributors.
     18  * 4. Neither the name of the University nor the names of its contributors
     19  *    may be used to endorse or promote products derived from this software
     20  *    without specific prior written permission.
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     32  * SUCH DAMAGE.
     33  *
     34  */
     35 
     36 /*-
     37  * Copyright (c) 1998 The NetBSD Foundation, Inc.
     38  * All rights reserved.
     39  *
     40  * This code is derived from software contributed to The NetBSD Foundation
     41  * by Charles M. Hannum, by Onno van der Linden and by Manuel Bouyer.
     42  *
     43  * Redistribution and use in source and binary forms, with or without
     44  * modification, are permitted provided that the following conditions
     45  * are met:
     46  * 1. Redistributions of source code must retain the above copyright
     47  *    notice, this list of conditions and the following disclaimer.
     48  * 2. Redistributions in binary form must reproduce the above copyright
     49  *    notice, this list of conditions and the following disclaimer in the
     50  *    documentation and/or other materials provided with the distribution.
     51  * 3. All advertising materials mentioning features or use of this software
     52  *    must display the following acknowledgement:
     53  *        This product includes software developed by the NetBSD
     54  *        Foundation, Inc. and its contributors.
     55  * 4. Neither the name of The NetBSD Foundation nor the names of its
     56  *    contributors may be used to endorse or promote products derived
     57  *    from this software without specific prior written permission.
     58  *
     59  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     60  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     61  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     62  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     63  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     64  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     65  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     66  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     67  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     68  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     69  * POSSIBILITY OF SUCH DAMAGE.
     70  */
     71 
     72 #define WDCDEBUG
     73 
     74 #include <sys/param.h>
     75 #include <sys/systm.h>
     76 #include <sys/kernel.h>
     77 #include <sys/file.h>
     78 #include <sys/stat.h>
     79 #include <sys/buf.h>
     80 #include <sys/malloc.h>
     81 #include <sys/device.h>
     82 #include <sys/disklabel.h>
     83 #include <sys/syslog.h>
     84 #include <sys/proc.h>
     85 
     86 #include <machine/intr.h>
     87 #include <machine/bus.h>
     88 #ifndef __BUS_SPACE_HAS_STREAM_METHODS
     89 #define    bus_space_write_multi_stream_2    bus_space_write_multi_2
     90 #define    bus_space_write_multi_stream_4    bus_space_write_multi_4
     91 #define    bus_space_read_multi_stream_2    bus_space_read_multi_2
     92 #define    bus_space_read_multi_stream_4    bus_space_read_multi_4
     93 #endif /* __BUS_SPACE_HAS_STREAM_METHODS */
     94 
     95 #include <dev/ata/atareg.h>
     96 #include <dev/ata/atavar.h>
     97 #include <dev/ic/wdcreg.h>
     98 #include <dev/ic/wdcvar.h>
     99 #include <dev/ata/wdvar.h>
    100 
    101 #define DEBUG_INTR   0x01
    102 #define DEBUG_XFERS  0x02
    103 #define DEBUG_STATUS 0x04
    104 #define DEBUG_FUNCS  0x08
    105 #define DEBUG_PROBE  0x10
    106 #ifdef WDCDEBUG
    107 int wdcdebug_wd_mask = 0;
    108 #define WDCDEBUG_PRINT(args, level) \
    109 	if (wdcdebug_wd_mask & (level)) \
    110 		printf args
    111 #else
    112 #define WDCDEBUG_PRINT(args, level)
    113 #endif
    114 
    115 #define ATA_DELAY 10000 /* 10s for a drive I/O */
    116 
    117 void  wdc_ata_bio_start  __P((struct channel_softc *,struct wdc_xfer *));
    118 int   wdc_ata_bio_intr   __P((struct channel_softc *, struct wdc_xfer *));
    119 void  wdc_ata_bio_done   __P((struct channel_softc *, struct wdc_xfer *));
    120 int   wdc_ata_ctrl_intr __P((struct channel_softc *, struct wdc_xfer *));
    121 int   wdc_ata_err __P((struct channel_softc *, struct ata_bio *));
    122 #define WDC_ATA_NOERR 0x00 /* Drive doesn't report an error */
    123 #define WDC_ATA_RECOV 0x01 /* There was a recovered error */
    124 #define WDC_ATA_ERR   0x02 /* Drive reports an error */
    125 
    126 /*
    127  * Handle block I/O operation. Return WDC_COMPLETE, WDC_QUEUED, or
    128  * WDC_TRY_AGAIN. Must be called at splio().
    129  */
    130 int
    131 wdc_ata_bio(drvp, ata_bio)
    132 	struct ata_drive_datas *drvp;
    133 	struct ata_bio *ata_bio;
    134 {
    135 	struct wdc_xfer *xfer;
    136 	struct channel_softc *chp = drvp->chnl_softc;
    137 
    138 	xfer = wdc_get_xfer(WDC_NOSLEEP);
    139 	if (xfer == NULL)
    140 		return WDC_TRY_AGAIN;
    141 	if (ata_bio->flags & ATA_POLL)
    142 		xfer->c_flags |= C_POLL;
    143 	if ((drvp->drive_flags & (DRIVE_DMA | DRIVE_UDMA)) &&
    144 	    (ata_bio->flags & ATA_SINGLE) == 0)
    145 		xfer->c_flags |= C_DMA;
    146 	xfer->drive = drvp->drive;
    147 	xfer->cmd = ata_bio;
    148 	xfer->databuf = ata_bio->databuf;
    149 	xfer->c_bcount = ata_bio->bcount;
    150 	xfer->c_start = wdc_ata_bio_start;
    151 	xfer->c_intr = wdc_ata_bio_intr;
    152 	wdc_exec_xfer(chp, xfer);
    153 	return (ata_bio->flags & ATA_ITSDONE) ? WDC_COMPLETE : WDC_QUEUED;
    154 }
    155 
    156 void
    157 wdc_ata_bio_start(chp, xfer)
    158 	struct channel_softc *chp;
    159 	struct wdc_xfer *xfer;
    160 {
    161 	struct ata_bio *ata_bio = xfer->cmd;
    162 	struct ata_drive_datas *drvp = &chp->ch_drive[xfer->drive];
    163 	u_int16_t cyl;
    164 	u_int8_t head, sect, cmd = 0;
    165 	int nblks;
    166 	int dma_flags = 0;
    167 
    168 	WDCDEBUG_PRINT(("wdc_ata_bio_start %s:%d:%d\n",
    169 	    chp->wdc->sc_dev.dv_xname, chp->channel, xfer->drive),
    170 	    DEBUG_XFERS);
    171 
    172 	/* Do control operations specially. */
    173 	if (drvp->state < READY) {
    174 		/*
    175 		 * Actually, we want to be careful not to mess with the control
    176 		 * state if the device is currently busy, but we can assume
    177 		 * that we never get to this point if that's the case.
    178 		 */
    179 		/* at this point, we should only be in RECAL state */
    180 		if (drvp->state != RECAL) {
    181 			printf("%s:%d:%d: bad state %d in wdc_ata_bio_start\n",
    182 			    chp->wdc->sc_dev.dv_xname, chp->channel,
    183 			    xfer->drive, drvp->state);
    184 			panic("wdc_ata_bio_start: bad state");
    185 		}
    186 		xfer->c_intr = wdc_ata_ctrl_intr;
    187 		bus_space_write_1(chp->cmd_iot, chp->cmd_ioh, wd_sdh,
    188 		    WDSD_IBM | (xfer->drive << 4));
    189 		if (wdcwait(chp, WDCS_DRDY, WDCS_DRDY, ATA_DELAY) != 0)
    190 			goto timeout;
    191 		wdccommandshort(chp, xfer->drive, WDCC_RECAL);
    192 		drvp->state = RECAL_WAIT;
    193 		if ((ata_bio->flags & ATA_POLL) == 0) {
    194 			chp->ch_flags |= WDCF_IRQ_WAIT;
    195 			timeout(wdctimeout, chp, ATA_DELAY / 1000 * hz);
    196 		} else {
    197 			/* Wait for at last 400ns for status bit to be valid */
    198 			delay(1);
    199 			wdc_ata_ctrl_intr(chp, xfer);
    200 		}
    201 		return;
    202 	}
    203 
    204 	if (xfer->c_flags & C_DMA) {
    205 		dma_flags = (ata_bio->flags & ATA_READ) ?  WDC_DMA_READ : 0;
    206 		dma_flags |= (ata_bio->flags & ATA_POLL) ?  WDC_DMA_POLL : 0;
    207 	}
    208 again:
    209 	/*
    210 	 *
    211 	 * When starting a multi-sector transfer, or doing single-sector
    212 	 * transfers...
    213 	 */
    214 	if (xfer->c_skip == 0 || (ata_bio->flags & ATA_SINGLE) != 0) {
    215 		if (ata_bio->flags & ATA_SINGLE)
    216 			nblks = 1;
    217 		else
    218 			nblks = xfer->c_bcount / ata_bio->lp->d_secsize;
    219 		/* Check for bad sectors and adjust transfer, if necessary. */
    220 		if ((ata_bio->lp->d_flags & D_BADSECT) != 0) {
    221 			long blkdiff;
    222 			int i;
    223 			for (i = 0; (blkdiff = ata_bio->badsect[i]) != -1;
    224 			    i++) {
    225 				blkdiff -= ata_bio->blkno;
    226 				if (blkdiff < 0)
    227 					continue;
    228 				if (blkdiff == 0) {
    229 					/* Replace current block of transfer. */
    230 					ata_bio->blkno =
    231 					    ata_bio->lp->d_secperunit -
    232 					    ata_bio->lp->d_nsectors - i - 1;
    233 				}
    234 				if (blkdiff < nblks) {
    235 					/* Bad block inside transfer. */
    236 					ata_bio->flags |= ATA_SINGLE;
    237 					nblks = 1;
    238 				}
    239 				break;
    240 			}
    241 		/* Transfer is okay now. */
    242 		}
    243 		if (ata_bio->flags & ATA_LBA) {
    244 			sect = (ata_bio->blkno >> 0) & 0xff;
    245 			cyl = (ata_bio->blkno >> 8) & 0xffff;
    246 			head = (ata_bio->blkno >> 24) & 0x0f;
    247 			head |= WDSD_LBA;
    248 		} else {
    249 			int blkno = ata_bio->blkno;
    250 			sect = blkno % ata_bio->lp->d_nsectors;
    251 			sect++;    /* Sectors begin with 1, not 0. */
    252 			blkno /= ata_bio->lp->d_nsectors;
    253 			head = blkno % ata_bio->lp->d_ntracks;
    254 			blkno /= ata_bio->lp->d_ntracks;
    255 			cyl = blkno;
    256 			head |= WDSD_CHS;
    257 		}
    258 		if (xfer->c_flags & C_DMA) {
    259 			ata_bio->nblks = nblks;
    260 			ata_bio->nbytes = xfer->c_bcount;
    261 			cmd = (ata_bio->flags & ATA_READ) ?
    262 			    WDCC_READDMA : WDCC_WRITEDMA;
    263 			nblks = ata_bio->nblks;
    264 	    		/* Init the DMA channel. */
    265 			if ((*chp->wdc->dma_init)(chp->wdc->dma_arg,
    266 			    chp->channel, xfer->drive,
    267 			    (char *)xfer->databuf + xfer->c_skip,
    268 			    ata_bio->nbytes, dma_flags) != 0) {
    269 				ata_bio->error = ERR_DMA;
    270 				ata_bio->r_error = 0;
    271 				wdc_ata_bio_done(chp, xfer);
    272 				return;
    273 			}
    274 			/* Initiate command */
    275 			bus_space_write_1(chp->cmd_iot, chp->cmd_ioh, wd_sdh,
    276 			    WDSD_IBM | (xfer->drive << 4));
    277 			if (wait_for_ready(chp, ATA_DELAY) < 0)
    278 				goto timeout;
    279 			wdccommand(chp, xfer->drive, cmd, cyl,
    280 			    head, sect, nblks, 0);
    281 			/* start the DMA channel */
    282 			(*chp->wdc->dma_start)(chp->wdc->dma_arg,
    283 			    chp->channel, xfer->drive, dma_flags);
    284 			/* wait for irq */
    285 			goto intr;
    286 		} /* else not DMA */
    287 		ata_bio->nblks = min(nblks, ata_bio->multi);
    288 		ata_bio->nbytes = ata_bio->nblks * ata_bio->lp->d_secsize;
    289 		if (ata_bio->nblks > 1 && (ata_bio->flags & ATA_SINGLE) == 0) {
    290 			cmd = (ata_bio->flags & ATA_READ) ?
    291 			    WDCC_READMULTI : WDCC_WRITEMULTI;
    292 		} else {
    293 			cmd = (ata_bio->flags & ATA_READ) ?
    294 			    WDCC_READ : WDCC_WRITE;
    295 		}
    296 		/* Initiate command! */
    297 		bus_space_write_1(chp->cmd_iot, chp->cmd_ioh, wd_sdh,
    298 		    WDSD_IBM | (xfer->drive << 4));
    299 		if (wait_for_ready(chp, ATA_DELAY) < 0)
    300 			goto timeout;
    301 		wdccommand(chp, xfer->drive, cmd, cyl,
    302 		    head, sect, nblks,
    303 		    (ata_bio->lp->d_type == DTYPE_ST506) ?
    304 		    ata_bio->lp->d_precompcyl / 4 : 0);
    305 	} else if (ata_bio->nblks > 1) {
    306 		/* The number of blocks in the last stretch may be smaller. */
    307 		nblks = xfer->c_bcount / ata_bio->lp->d_secsize;
    308 		if (ata_bio->nblks > nblks) {
    309 		ata_bio->nblks = nblks;
    310 		ata_bio->nbytes = xfer->c_bcount;
    311 		}
    312 	}
    313 	/* If this was a write and not using DMA, push the data. */
    314 	if ((ata_bio->flags & ATA_READ) == 0) {
    315 		if (wait_for_drq(chp, ATA_DELAY) != 0) {
    316 			printf("%s:%d:%d: timeout waiting for DRQ, "
    317 			    "st=0x%02x, err=0x%02x\n",
    318 			    chp->wdc->sc_dev.dv_xname, chp->channel,
    319 			    xfer->drive, chp->ch_status, chp->ch_error);
    320 			if (wdc_ata_err(chp, ata_bio) != WDC_ATA_ERR)
    321 				ata_bio->error = TIMEOUT;
    322 			wdc_ata_bio_done(chp, xfer);
    323 			return;
    324 		}
    325 		if (wdc_ata_err(chp, ata_bio) == WDC_ATA_ERR) {
    326 			wdc_ata_bio_done(chp, xfer);
    327 			return;
    328 		}
    329 		if ((chp->wdc->cap & WDC_CAPABILITY_ATA_NOSTREAM)) {
    330 			if (drvp->drive_flags & DRIVE_CAP32) {
    331 				bus_space_write_multi_4(chp->data32iot,
    332 				    chp->data32ioh, 0,
    333 				    (u_int32_t *)((char *)xfer->databuf +
    334 				                  xfer->c_skip),
    335 				    ata_bio->nbytes >> 2);
    336 			} else {
    337 				bus_space_write_multi_2(chp->cmd_iot,
    338 				    chp->cmd_ioh, wd_data,
    339 				    (u_int16_t *)((char *)xfer->databuf +
    340 				                  xfer->c_skip),
    341 				    ata_bio->nbytes >> 1);
    342 			}
    343 		} else {
    344 			if (drvp->drive_flags & DRIVE_CAP32) {
    345 				bus_space_write_multi_stream_4(chp->data32iot,
    346 				    chp->data32ioh, 0,
    347 				    (u_int32_t *)((char *)xfer->databuf +
    348 				                  xfer->c_skip),
    349 				    ata_bio->nbytes >> 2);
    350 			} else {
    351 				bus_space_write_multi_stream_2(chp->cmd_iot,
    352 				    chp->cmd_ioh, wd_data,
    353 				    (u_int16_t *)((char *)xfer->databuf +
    354 				                  xfer->c_skip),
    355 				    ata_bio->nbytes >> 1);
    356 			}
    357 		}
    358 	}
    359 
    360 intr:	/* Wait for IRQ (either real or polled) */
    361 	if ((ata_bio->flags & ATA_POLL) == 0) {
    362 		chp->ch_flags |= WDCF_IRQ_WAIT;
    363 		timeout(wdctimeout, chp, ATA_DELAY / 1000 * hz);
    364 	} else {
    365 		/* Wait for at last 400ns for status bit to be valid */
    366 		delay(1);
    367 		wdc_ata_bio_intr(chp, xfer);
    368 		if ((ata_bio->flags & ATA_ITSDONE) == 0)
    369 			goto again;
    370 	}
    371 	return;
    372 timeout:
    373 	printf("%s:%d:%d: not ready, st=0x%02x, err=0x%02x\n",
    374 	    chp->wdc->sc_dev.dv_xname, chp->channel, xfer->drive,
    375 	    chp->ch_status, chp->ch_error);
    376 	if (wdc_ata_err(chp, ata_bio) != WDC_ATA_ERR)
    377 		ata_bio->error = TIMEOUT;
    378 	wdc_ata_bio_done(chp, xfer);
    379 	return;
    380 }
    381 
    382 int
    383 wdc_ata_bio_intr(chp, xfer)
    384 	struct channel_softc *chp;
    385 	struct wdc_xfer *xfer;
    386 {
    387 	struct ata_bio *ata_bio = xfer->cmd;
    388 	struct ata_drive_datas *drvp = &chp->ch_drive[xfer->drive];
    389 	int drv_err;
    390 	int dma_flags = 0;
    391 
    392 	WDCDEBUG_PRINT(("wdc_ata_bio_intr %s:%d:%d\n",
    393 	    chp->wdc->sc_dev.dv_xname, chp->channel, xfer->drive),
    394 	    DEBUG_INTR | DEBUG_XFERS);
    395 
    396 
    397 	/* Is it not a transfer, but a control operation? */
    398 	if (drvp->state < READY) {
    399 		printf("%s:%d:%d: bad state %d in wdc_ata_bio_intr\n",
    400 		    chp->wdc->sc_dev.dv_xname, chp->channel, xfer->drive,
    401 		    drvp->state);
    402 		panic("wdc_ata_bio_intr: bad state\n");
    403 	}
    404 
    405 	if (xfer->c_flags & C_DMA) {
    406 		dma_flags = (ata_bio->flags & ATA_READ) ?  WDC_DMA_READ : 0;
    407 		dma_flags |= (ata_bio->flags & ATA_POLL) ?  WDC_DMA_POLL : 0;
    408 	}
    409 
    410 	/* Ack interrupt done by wait_for_unbusy */
    411 	if (wait_for_unbusy(chp, ATA_DELAY) < 0) {
    412 		printf("%s:%d:%d: device timeout, c_bcount=%d, c_skip%d\n",
    413 		    chp->wdc->sc_dev.dv_xname, chp->channel, xfer->drive,
    414 		    xfer->c_bcount, xfer->c_skip);
    415 		/* if we were using DMA, turn off DMA channel */
    416 		if (xfer->c_flags & C_DMA) {
    417 			(*chp->wdc->dma_finish)(chp->wdc->dma_arg,
    418 			    chp->channel, xfer->drive, dma_flags);
    419 			drvp->n_dmaerrs++;
    420 		}
    421 		ata_bio->error = TIMEOUT;
    422 		wdc_ata_bio_done(chp, xfer);
    423 		return 1;
    424 	}
    425 
    426 	drv_err = wdc_ata_err(chp, ata_bio);
    427 
    428 	/* If we were using DMA, Turn off the DMA channel and check for error */
    429 	if (xfer->c_flags & C_DMA) {
    430 		if (ata_bio->flags & ATA_POLL) {
    431 			/*
    432 			 * IDE drives deassert WDCS_BSY before transfer is
    433 			 * complete when using DMA. Polling for DRQ to deassert
    434 			 * is not enouth DRQ is not required to be
    435 			 * asserted for DMA transfers, so poll for DRDY.
    436 			 */
    437 			if (wdcwait(chp, WDCS_DRDY | WDCS_DRQ, WDCS_DRDY,
    438 			    ATA_DELAY) < 0) {
    439 				printf("%s:%d:%d: polled transfer timed out "
    440 				    "(st=0x%x)\n", chp->wdc->sc_dev.dv_xname,
    441 				    chp->channel, xfer->drive, chp->ch_status);
    442 				ata_bio->error = TIMEOUT;
    443 				drv_err = WDC_ATA_ERR;
    444 			}
    445 		}
    446 		if ((*chp->wdc->dma_finish)(chp->wdc->dma_arg,
    447 		    chp->channel, xfer->drive, dma_flags) != 0) {
    448 			if (drv_err != WDC_ATA_ERR) {
    449 				ata_bio->error = ERR_DMA;
    450 				drv_err = WDC_ATA_ERR;
    451 			}
    452 		}
    453 		if (chp->ch_status & WDCS_DRQ) {
    454 			if (drv_err != WDC_ATA_ERR) {
    455 				printf("%s:%d:%d: intr with DRQ (st=0x%x)\n",
    456 				    chp->wdc->sc_dev.dv_xname, chp->channel,
    457 				    xfer->drive, chp->ch_status);
    458 				ata_bio->error = TIMEOUT;
    459 				drv_err = WDC_ATA_ERR;
    460 			}
    461 		}
    462 		if (drv_err != WDC_ATA_ERR)
    463 			goto end;
    464 		drvp->n_dmaerrs++;
    465 	}
    466 
    467 	/* if we had an error, end */
    468 	if (drv_err == WDC_ATA_ERR) {
    469 		wdc_ata_bio_done(chp, xfer);
    470 		return 1;
    471 	}
    472 
    473 	/* If this was a read and not using DMA, fetch the data. */
    474 	if ((ata_bio->flags & ATA_READ) != 0) {
    475 		if ((chp->ch_status & (WDCS_DRDY | WDCS_DSC | WDCS_DRQ)) !=
    476 		    (WDCS_DRDY | WDCS_DSC | WDCS_DRQ)) {
    477 			printf("%s:%d:%d: read intr before drq\n",
    478 			    chp->wdc->sc_dev.dv_xname, chp->channel,
    479 			    xfer->drive);
    480 			ata_bio->error = TIMEOUT;
    481 			wdc_ata_bio_done(chp, xfer);
    482 			return 1;
    483 		}
    484 		if ((chp->wdc->cap & WDC_CAPABILITY_ATA_NOSTREAM)) {
    485 			if (drvp->drive_flags & DRIVE_CAP32) {
    486 				bus_space_read_multi_4(chp->data32iot,
    487 				    chp->data32ioh, 0,
    488 				    (u_int32_t *)((char *)xfer->databuf +
    489 				                  xfer->c_skip),
    490 				    ata_bio->nbytes >> 2);
    491 			} else {
    492 				bus_space_read_multi_2(chp->cmd_iot,
    493 				    chp->cmd_ioh, wd_data,
    494 				    (u_int16_t *)((char *)xfer->databuf +
    495 				                  xfer->c_skip),
    496 				    ata_bio->nbytes >> 1);
    497 			}
    498 		} else {
    499 			if (drvp->drive_flags & DRIVE_CAP32) {
    500 				bus_space_read_multi_stream_4(chp->data32iot,
    501 				    chp->data32ioh, 0,
    502 				    (u_int32_t *)((char *)xfer->databuf +
    503 				                  xfer->c_skip),
    504 				    ata_bio->nbytes >> 2);
    505 			} else {
    506 				bus_space_read_multi_stream_2(chp->cmd_iot,
    507 				    chp->cmd_ioh, wd_data,
    508 				    (u_int16_t *)((char *)xfer->databuf +
    509 				                  xfer->c_skip),
    510 				    ata_bio->nbytes >> 1);
    511 			}
    512 		}
    513 	}
    514 
    515 end:
    516 	ata_bio->blkno += ata_bio->nblks;
    517 	ata_bio->blkdone += ata_bio->nblks;
    518 	xfer->c_skip += ata_bio->nbytes;
    519 	xfer->c_bcount -= ata_bio->nbytes;
    520 	/* See if this transfer is complete. */
    521 	if (xfer->c_bcount > 0) {
    522 		if ((ata_bio->flags & ATA_POLL) == 0) {
    523 			/* Start the next operation */
    524 			wdc_ata_bio_start(chp, xfer);
    525 		} else {
    526 			/* Let wdc_ata_bio_start do the loop */
    527 			return 1;
    528 		}
    529 	} else { /* Done with this transfer */
    530 		ata_bio->error = NOERROR;
    531 		wdc_ata_bio_done(chp, xfer);
    532 	}
    533 	return 1;
    534 }
    535 
    536 void
    537 wdc_ata_bio_done(chp, xfer)
    538 	struct channel_softc *chp;
    539 	struct wdc_xfer *xfer;
    540 {
    541 	struct ata_bio *ata_bio = xfer->cmd;
    542 	int need_done = xfer->c_flags & C_NEEDDONE;
    543 	int drive = xfer->drive;
    544 	struct ata_drive_datas *drvp = &chp->ch_drive[drive];
    545 
    546 	WDCDEBUG_PRINT(("wdc_ata_bio_done %s:%d:%d: flags 0x%x\n",
    547 	    chp->wdc->sc_dev.dv_xname, chp->channel, xfer->drive,
    548 	    (u_int)xfer->c_flags),
    549 	    DEBUG_XFERS);
    550 
    551 	if (ata_bio->error == NOERROR)
    552 		drvp->n_dmaerrs = 0;
    553 	else if (drvp->n_dmaerrs >= NERRS_MAX) {
    554 		wdc_downgrade_mode(drvp);
    555 	}
    556 
    557 	/* feed back residual bcount to our caller */
    558 	ata_bio->bcount = xfer->c_bcount;
    559 
    560 	/* remove this command from xfer queue */
    561 	wdc_free_xfer(chp, xfer);
    562 
    563 	ata_bio->flags |= ATA_ITSDONE;
    564 	if (need_done) {
    565 		WDCDEBUG_PRINT(("wdc_ata_done: wddone\n"), DEBUG_XFERS);
    566 		wddone(chp->ch_drive[drive].drv_softc);
    567 	}
    568 	WDCDEBUG_PRINT(("wdcstart from wdc_ata_done, flags 0x%x\n",
    569 	    chp->ch_flags), DEBUG_XFERS);
    570 	wdcstart(chp);
    571 }
    572 
    573 /*
    574  * Implement operations needed before read/write.
    575  */
    576 int
    577 wdc_ata_ctrl_intr(chp, xfer)
    578 	struct channel_softc *chp;
    579 	struct wdc_xfer *xfer;
    580 {
    581 	struct ata_bio *ata_bio = xfer->cmd;
    582 	struct ata_drive_datas *drvp = &chp->ch_drive[xfer->drive];
    583 	char *errstring = NULL;
    584 	WDCDEBUG_PRINT(("wdc_ata_ctrl_intr: state %d\n", drvp->state),
    585 	DEBUG_FUNCS);
    586 
    587 again:
    588 	switch (drvp->state) {
    589 	case RECAL:    /* Should not be in this state here */
    590 		panic("wdc_ata_ctrl_intr: state==RECAL");
    591 		break;
    592 
    593 	case RECAL_WAIT:
    594 		errstring = "recal";
    595 		if (wdcwait(chp, WDCS_DRDY, WDCS_DRDY, ATA_DELAY))
    596 			goto timeout;
    597 		if (chp->ch_status & (WDCS_ERR | WDCS_DWF))
    598 			goto error;
    599 	/* fall through */
    600 
    601 	case PIOMODE:
    602 		/* Don't try to set modes if controller can't be adjusted */
    603 		if ((chp->wdc->cap & WDC_CAPABILITY_MODE) == 0)
    604 			goto geometry;
    605 		/* Also don't try if the drive didn't report its mode */
    606 		if ((drvp->drive_flags & DRIVE_MODE) == 0)
    607 			goto geometry;
    608 		wdccommand(chp, drvp->drive, SET_FEATURES, 0, 0, 0,
    609 		    0x08 | drvp->PIO_mode, WDSF_SET_MODE);
    610 		drvp->state = PIOMODE_WAIT;
    611 		break;
    612 
    613 	case PIOMODE_WAIT:
    614 		errstring = "piomode";
    615 		if (wdcwait(chp, WDCS_DRDY, WDCS_DRDY, ATA_DELAY))
    616 			goto timeout;
    617 		if (chp->ch_status & (WDCS_ERR | WDCS_DWF))
    618 			goto error;
    619 	/* fall through */
    620 
    621 	case DMAMODE:
    622 		if (drvp->drive_flags & DRIVE_UDMA) {
    623 			wdccommand(chp, drvp->drive, SET_FEATURES, 0, 0, 0,
    624 			    0x40 | drvp->UDMA_mode, WDSF_SET_MODE);
    625 		} else if (drvp->drive_flags & DRIVE_DMA) {
    626 			wdccommand(chp, drvp->drive, SET_FEATURES, 0, 0, 0,
    627 			    0x20 | drvp->DMA_mode, WDSF_SET_MODE);
    628 		} else {
    629 			goto geometry;
    630 		}
    631 		drvp->state = DMAMODE_WAIT;
    632 		break;
    633 	case DMAMODE_WAIT:
    634 		errstring = "dmamode";
    635 		if (wdcwait(chp, WDCS_DRDY, WDCS_DRDY, ATA_DELAY))
    636 			goto timeout;
    637 		if (chp->ch_status & (WDCS_ERR | WDCS_DWF))
    638 			goto error;
    639 	/* fall through */
    640 
    641 	case GEOMETRY:
    642 	geometry:
    643 		if (ata_bio->flags & ATA_LBA)
    644 			goto multimode;
    645 		wdccommand(chp, xfer->drive, WDCC_IDP,
    646 		    ata_bio->lp->d_ncylinders,
    647 		    ata_bio->lp->d_ntracks - 1, 0, ata_bio->lp->d_nsectors,
    648 		    (ata_bio->lp->d_type == DTYPE_ST506) ?
    649 			ata_bio->lp->d_precompcyl / 4 : 0);
    650 		drvp->state = GEOMETRY_WAIT;
    651 		break;
    652 
    653 	case GEOMETRY_WAIT:
    654 		errstring = "geometry";
    655 		if (wdcwait(chp, WDCS_DRDY, WDCS_DRDY, ATA_DELAY))
    656 			goto timeout;
    657 		if (chp->ch_status & (WDCS_ERR | WDCS_DWF))
    658 			goto error;
    659 		/* fall through */
    660 
    661 	case MULTIMODE:
    662 	multimode:
    663 		if (ata_bio->multi == 1)
    664 			goto ready;
    665 		wdccommand(chp, xfer->drive, WDCC_SETMULTI, 0, 0, 0,
    666 		    ata_bio->multi, 0);
    667 		drvp->state = MULTIMODE_WAIT;
    668 		break;
    669 
    670 	case MULTIMODE_WAIT:
    671 		errstring = "setmulti";
    672 		if (wdcwait(chp, WDCS_DRDY, WDCS_DRDY, ATA_DELAY))
    673 			goto timeout;
    674 		if (chp->ch_status & (WDCS_ERR | WDCS_DWF))
    675 			goto error;
    676 		/* fall through */
    677 
    678 	case READY:
    679 	ready:
    680 		drvp->state = READY;
    681 		/*
    682 		 * The drive is usable now
    683 		 */
    684 		xfer->c_intr = wdc_ata_bio_intr;
    685 		wdc_ata_bio_start(chp, xfer);
    686 		return 1;
    687 	}
    688 
    689 	if ((ata_bio->flags & ATA_POLL) == 0) {
    690 		chp->ch_flags |= WDCF_IRQ_WAIT;
    691 		timeout(wdctimeout, chp, ATA_DELAY / 1000 * hz);
    692 	} else {
    693 		goto again;
    694 	}
    695 	return 1;
    696 
    697 timeout:
    698 	if ((xfer->c_flags & C_TIMEOU) == 0 ) {
    699 		return 0; /* IRQ was not for us */
    700 	}
    701 	printf("%s:%d:%d: %s timed out\n",
    702 	    chp->wdc->sc_dev.dv_xname, chp->channel, xfer->drive, errstring);
    703 	ata_bio->error = TIMEOUT;
    704 	drvp->state = 0;
    705 	wdc_ata_bio_done(chp, xfer);
    706 	return 0;
    707 error:
    708 	printf("%s:%d:%d: %s ",
    709 	    chp->wdc->sc_dev.dv_xname, chp->channel, xfer->drive,
    710 	    errstring);
    711 	if (chp->ch_status & WDCS_DWF) {
    712 		printf("drive fault\n");
    713 		ata_bio->error = ERR_DF;
    714 	} else {
    715 		printf("error (%x)\n", chp->ch_error);
    716 		ata_bio->r_error = chp->ch_error;
    717 		ata_bio->error = ERROR;
    718 	}
    719 	drvp->state = 0;
    720 	wdc_ata_bio_done(chp, xfer);
    721 	return 1;
    722 }
    723 
    724 int
    725 wdc_ata_err(chp, ata_bio)
    726 	struct channel_softc *chp;
    727 	struct ata_bio *ata_bio;
    728 {
    729 	ata_bio->error = 0;
    730 	if (chp->ch_status & WDCS_BSY) {
    731 		ata_bio->error = TIMEOUT;
    732 		return WDC_ATA_ERR;
    733 	}
    734 
    735 	if (chp->ch_status & WDCS_DWF) {
    736 		ata_bio->error = ERR_DF;
    737 		return WDC_ATA_ERR;
    738 	}
    739 
    740 	if (chp->ch_status & WDCS_ERR) {
    741 		ata_bio->error = ERROR;
    742 		ata_bio->r_error = chp->ch_error;
    743 		if (ata_bio->r_error & (WDCE_BBK | WDCE_UNC | WDCE_IDNF |
    744 		    WDCE_ABRT | WDCE_TK0NF | WDCE_AMNF))
    745 			return WDC_ATA_ERR;
    746 		return WDC_ATA_NOERR;
    747 	}
    748 
    749 	if (chp->ch_status & WDCS_CORR)
    750 		ata_bio->flags |= ATA_CORR;
    751 	return WDC_ATA_NOERR;
    752 }
    753 
    754 int
    755 wdc_ata_addref(drvp)
    756 	struct ata_drive_datas *drvp;
    757 {
    758 	struct channel_softc *chp = drvp->chnl_softc;
    759 
    760 	return (wdc_addref(chp));
    761 }
    762 
    763 void
    764 wdc_ata_delref(drvp)
    765 	struct ata_drive_datas *drvp;
    766 {
    767 	struct channel_softc *chp = drvp->chnl_softc;
    768 
    769 	wdc_delref(chp);
    770 }
    771