c4217f94eb
The atapi subsystem has gotten better error handeling and timeouts, it also tries a REQUEST SENSE command when devices returns errors, to give a little more info as to what went wrong. It might be a little verbose for now, but I'm interested in as much feedback on errors as possible, especially timeouts, as I'm a bit in doubt if I've chosen resonable default values everywhere. The disk driver has been changed a bit to prepare for tagged queing, which is next on my list. The disk driver has grown a dump routine, I got one implementation from Darrell Anderson <anderson@cs.duke.edu> which also did partial dumps (usefull on big memory machines) I left out the partial stuff for now, and changed the rest alot to fit into the new ad_request framework. Some minor cleanups and rearrangements as well. As usual USE AT YOUR OWN RISK!!, this is still pre alpha level code. Especially the DMA support can hose your disk real bad if anything goes wrong, again you have been warned :) Notebook owners should be carefull that their machines dont suspend as this might cause trouble... But please tell me how it works for you! Enjoy! -Søren
779 lines
23 KiB
C
779 lines
23 KiB
C
/*-
|
|
* Copyright (c) 1998,1999 Søren Schmidt
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer,
|
|
* without modification, immediately at the beginning of the file.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. The name of the author may not be used to endorse or promote products
|
|
* derived from this software without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
|
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
* $Id: ata-disk.c,v 1.13 1999/05/31 11:24:25 phk Exp $
|
|
*/
|
|
|
|
#include "ata.h"
|
|
#include "atadisk.h"
|
|
#include "opt_devfs.h"
|
|
|
|
#if NATA > 0 && NATADISK > 0
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/proc.h>
|
|
#include <sys/device.h>
|
|
#include <sys/malloc.h>
|
|
#include <sys/buf.h>
|
|
#include <sys/disklabel.h>
|
|
#include <sys/diskslice.h>
|
|
#include <sys/devicestat.h>
|
|
#include <sys/fcntl.h>
|
|
#include <sys/conf.h>
|
|
#include <sys/stat.h>
|
|
#ifdef DEVFS
|
|
#include <sys/devfsext.h>
|
|
#endif
|
|
#include <vm/vm.h>
|
|
#include <vm/vm_prot.h>
|
|
#include <vm/pmap.h>
|
|
#include <vm/vm_page.h>
|
|
#include <vm/vm_object.h>
|
|
#include <machine/clock.h>
|
|
#include <machine/md_var.h>
|
|
#include <dev/ata/ata-all.h>
|
|
#include <dev/ata/ata-disk.h>
|
|
|
|
static d_open_t adopen;
|
|
static d_close_t adclose;
|
|
static d_ioctl_t adioctl;
|
|
static d_strategy_t adstrategy;
|
|
static d_psize_t adpsize;
|
|
static d_dump_t addump;
|
|
|
|
#if 0 /* the boot code needs to be fixed to boot arbitrary devices */
|
|
#define DRIVER_NAME "ad"
|
|
#else
|
|
#define DRIVER_NAME "wd"
|
|
#endif
|
|
static struct cdevsw ad_cdevsw = {
|
|
/* open */ adopen,
|
|
/* close */ adclose,
|
|
/* read */ physread,
|
|
/* write */ physwrite,
|
|
/* ioctl */ adioctl,
|
|
/* stop */ nostop,
|
|
/* reset */ noreset,
|
|
/* devtotty */ nodevtotty,
|
|
/* poll */ nopoll,
|
|
/* mmap */ nommap,
|
|
/* strategy */ adstrategy,
|
|
/* name */ DRIVER_NAME,
|
|
/* parms */ noparms,
|
|
/* maj */ 116,
|
|
/* dump */ addump,
|
|
/* psize */ adpsize,
|
|
/* flags */ D_DISK,
|
|
/* maxio */ 0,
|
|
/* bmaj */ 30,
|
|
};
|
|
static struct cdevsw fakewd_cdevsw;
|
|
|
|
/* misc defines */
|
|
#define UNIT(dev) (minor(dev)>>3 & 0x1f) /* assume 8 minor # per unit */
|
|
#define NUNIT 16 /* max # of devices */
|
|
|
|
/* prototypes */
|
|
static void ad_attach(void *);
|
|
static int32_t ad_getparam(struct ad_softc *);
|
|
static void ad_strategy(struct buf *);
|
|
static void ad_start(struct ad_softc *);
|
|
static void ad_sleep(struct ad_softc *, int8_t *);
|
|
static int8_t ad_version(u_int16_t);
|
|
int32_t ad_timeout(char *data);
|
|
static void ad_drvinit(void);
|
|
|
|
/* internal vars */
|
|
static struct ad_softc *adtab[NUNIT];
|
|
static int32_t adnlun = 0; /* number of config'd drives */
|
|
static struct intr_config_hook *ad_attach_hook;
|
|
|
|
static __inline int
|
|
apiomode(struct ata_params *ap)
|
|
{
|
|
if ((ap->atavalid & 2) == 2) {
|
|
if ((ap->apiomodes & 2) == 2) return 4;
|
|
if ((ap->apiomodes & 1) == 1) return 3;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
static __inline int
|
|
wdmamode(struct ata_params *ap)
|
|
{
|
|
if ((ap->atavalid & 2) == 2) {
|
|
if ((ap->wdmamodes & 4) == 4) return 2;
|
|
if ((ap->wdmamodes & 2) == 2) return 1;
|
|
if ((ap->wdmamodes & 1) == 1) return 0;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
static __inline int
|
|
udmamode(struct ata_params *ap)
|
|
{
|
|
if ((ap->atavalid & 4) == 4) {
|
|
if ((ap->udmamodes & 4) == 4) return 2;
|
|
if ((ap->udmamodes & 2) == 2) return 1;
|
|
if ((ap->udmamodes & 1) == 1) return 0;
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
static void
|
|
ad_attach(void *notused)
|
|
{
|
|
struct ad_softc *adp;
|
|
int32_t ctlr, dev, secsperint;
|
|
int8_t model_buf[40+1];
|
|
int8_t revision_buf[8+1];
|
|
|
|
/* now, run through atadevices and look for ATA disks */
|
|
for (ctlr=0; ctlr<MAXATA; ctlr++) {
|
|
if (!atadevices[ctlr]) continue;
|
|
for (dev=0; dev<2; dev++) {
|
|
if (atadevices[ctlr]->devices &
|
|
(dev ? ATA_ATA_SLAVE : ATA_ATA_MASTER)) {
|
|
#ifdef ATA_STATIC_ID
|
|
adnlun = dev + ctlr * 2;
|
|
#endif
|
|
adp = adtab[adnlun];
|
|
if (adp)
|
|
printf("ad%d: unit already attached\n", adnlun);
|
|
if (!(adp = malloc(sizeof(struct ad_softc),
|
|
M_DEVBUF, M_NOWAIT))) {
|
|
printf("ad%d: failed to allocate driver storage\n", adnlun);
|
|
continue;
|
|
}
|
|
bzero(adp, sizeof(struct ad_softc));
|
|
adp->controller = atadevices[ctlr];
|
|
adp->unit = (dev == 0) ? ATA_MASTER : ATA_SLAVE;
|
|
adp->lun = adnlun;
|
|
if (ad_getparam(adp)) {
|
|
free(adp, M_DEVBUF);
|
|
continue;
|
|
}
|
|
adp->cylinders = adp->ata_parm->cylinders;
|
|
adp->heads = adp->ata_parm->heads;
|
|
adp->sectors = adp->ata_parm->sectors;
|
|
adp->total_secs = adp->cylinders * adp->heads * adp->sectors;
|
|
if (adp->cylinders == 16383 &&
|
|
adp->total_secs < adp->ata_parm->lbasize) {
|
|
adp->total_secs = adp->ata_parm->lbasize;
|
|
adp->cylinders = adp->total_secs/(adp->heads*adp->sectors);
|
|
}
|
|
if (adp->ata_parm->atavalid & ATA_FLAG_54_58 &&
|
|
adp->ata_parm->lbasize)
|
|
adp->flags |= AD_F_LBA_ENABLED;
|
|
|
|
/* use multiple sectors/interrupt if device supports it */
|
|
adp->transfersize = DEV_BSIZE;
|
|
secsperint = min(adp->ata_parm->nsecperint, 16);
|
|
|
|
if (!ata_command(adp->controller, adp->unit, ATA_C_SET_MULTI,
|
|
0, 0, 0, secsperint, 0, ATA_WAIT_INTR) &&
|
|
ata_wait(adp->controller, adp->unit, ATA_S_DRDY) >= 0)
|
|
adp->transfersize *= secsperint;
|
|
|
|
/* use DMA if drive & controller supports it */
|
|
if (!ata_dmainit(adp->controller, adp->unit,
|
|
apiomode(adp->ata_parm),
|
|
wdmamode(adp->ata_parm),
|
|
udmamode(adp->ata_parm)))
|
|
adp->flags |= AD_F_DMA_ENABLED;
|
|
|
|
/* use tagged queue if supported */
|
|
if ((adp->num_tags = adp->ata_parm->queuelen & 0x1f))
|
|
adp->flags |= AD_F_TAG_ENABLED;
|
|
|
|
bpack(adp->ata_parm->model, model_buf, sizeof(model_buf));
|
|
bpack(adp->ata_parm->revision, revision_buf,
|
|
sizeof(revision_buf));
|
|
printf("ad%d: <%s/%s> ATA-%c disk at ata%d as %s\n",
|
|
adnlun,
|
|
model_buf, revision_buf,
|
|
ad_version(adp->ata_parm->versmajor),
|
|
ctlr,
|
|
(adp->unit == ATA_MASTER) ? "master" : "slave ");
|
|
printf("ad%d: %luMB (%u sectors), "
|
|
"%u cyls, %u heads, %u S/T, %u B/S\n",
|
|
adnlun,
|
|
adp->total_secs / ((1024L * 1024L) / DEV_BSIZE),
|
|
adp->total_secs,
|
|
adp->cylinders,
|
|
adp->heads,
|
|
adp->sectors,
|
|
DEV_BSIZE);
|
|
printf("ad%d: piomode=%d, dmamode=%d, udmamode=%d\n",
|
|
adnlun,
|
|
apiomode(adp->ata_parm),
|
|
wdmamode(adp->ata_parm),
|
|
udmamode(adp->ata_parm));
|
|
printf("ad%d: %d secs/int, %d depth queue, %s mode\n",
|
|
adnlun, adp->transfersize / DEV_BSIZE, adp->num_tags,
|
|
(adp->flags & AD_F_DMA_ENABLED) ? "DMA" :"PIO");
|
|
devstat_add_entry(&adp->stats, "ad", adnlun, DEV_BSIZE,
|
|
DEVSTAT_NO_ORDERED_TAGS,
|
|
DEVSTAT_TYPE_DIRECT | DEVSTAT_TYPE_IF_IDE,
|
|
0x180);
|
|
#ifdef DEVFS
|
|
adp->cdevs_token = devfs_add_devswf(&ad_cdevsw,
|
|
dkmakeminor(adp->lun, 0, 0),
|
|
DV_CHR,
|
|
UID_ROOT, GID_OPERATOR,
|
|
0640, "rad%d", adp->lun);
|
|
adp->bdevs_token = devfs_add_devswf(&ad_cdevsw,
|
|
dkmakeminor(adp->lun, 0, 0),
|
|
DV_BLK,
|
|
UID_ROOT, GID_OPERATOR,
|
|
0640, "ad%d", adp->lun);
|
|
#endif
|
|
bufq_init(&adp->queue);
|
|
adtab[adnlun++] = adp;
|
|
}
|
|
}
|
|
}
|
|
config_intrhook_disestablish(ad_attach_hook);
|
|
}
|
|
|
|
static int32_t
|
|
ad_getparam(struct ad_softc *adp)
|
|
{
|
|
struct ata_params *ata_parm;
|
|
int8_t buffer[DEV_BSIZE];
|
|
|
|
/* select drive */
|
|
outb(adp->controller->ioaddr + ATA_DRIVE, ATA_D_IBM | adp->unit);
|
|
DELAY(1);
|
|
ata_command(adp->controller, adp->unit, ATA_C_ATA_IDENTIFY,
|
|
0, 0, 0, 0, 0, ATA_WAIT_INTR);
|
|
if (ata_wait(adp->controller, adp->unit,
|
|
ATA_S_DRDY | ATA_S_DSC | ATA_S_DRQ))
|
|
return -1;
|
|
insw(adp->controller->ioaddr + ATA_DATA, buffer,
|
|
sizeof(buffer)/sizeof(int16_t));
|
|
ata_parm = malloc(sizeof(struct ata_params), M_DEVBUF, M_NOWAIT);
|
|
if (!ata_parm)
|
|
return -1;
|
|
bcopy(buffer, ata_parm, sizeof(struct ata_params));
|
|
bswap(ata_parm->model, sizeof(ata_parm->model));
|
|
btrim(ata_parm->model, sizeof(ata_parm->model));
|
|
bswap(ata_parm->revision, sizeof(ata_parm->revision));
|
|
btrim(ata_parm->revision, sizeof(ata_parm->revision));
|
|
adp->ata_parm = ata_parm;
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
adopen(dev_t dev, int32_t flags, int32_t fmt, struct proc *p)
|
|
{
|
|
int32_t lun = UNIT(dev);
|
|
struct ad_softc *adp;
|
|
struct disklabel label;
|
|
int32_t error;
|
|
|
|
#ifdef AD_DEBUG
|
|
printf("adopen: lun=%d adnlun=%d\n", lun, adnlun);
|
|
#endif
|
|
if (lun >= adnlun || !(adp = adtab[lun]))
|
|
return ENXIO;
|
|
|
|
/* spinwait if anybody else is reading the disk label */
|
|
/* is this needed anymore ?? SOS XXX */
|
|
while (adp->flags & AD_F_LABELLING)
|
|
tsleep((caddr_t)&adp->flags, PZERO - 1, "adop1", 1);
|
|
|
|
/* protect agains label race */
|
|
adp->flags |= AD_F_LABELLING;
|
|
|
|
/* build disklabel and initilize slice tables */
|
|
bzero(&label, sizeof label);
|
|
label.d_secsize = DEV_BSIZE;
|
|
label.d_nsectors = adp->sectors;
|
|
label.d_ntracks = adp->heads;
|
|
label.d_ncylinders = adp->cylinders;
|
|
label.d_secpercyl = adp->sectors * adp->heads;
|
|
label.d_secperunit = adp->total_secs;
|
|
|
|
error = dsopen("ad", dev, fmt, 0, &adp->slices, &label, ad_strategy,
|
|
(ds_setgeom_t *)NULL, &ad_cdevsw);
|
|
|
|
adp->flags &= ~AD_F_LABELLING;
|
|
ad_sleep(adp, "adop2");
|
|
return error;
|
|
}
|
|
|
|
static int
|
|
adclose(dev_t dev, int32_t flags, int32_t fmt, struct proc *p)
|
|
{
|
|
int32_t lun = UNIT(dev);
|
|
struct ad_softc *adp;
|
|
|
|
#ifdef AD_DEBUG
|
|
printf("adclose: lun=%d adnlun=%d\n", lun, adnlun);
|
|
#endif
|
|
if (lun >= adnlun || !(adp = adtab[lun]))
|
|
return ENXIO;
|
|
|
|
dsclose(dev, fmt, adp->slices);
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
adioctl(dev_t dev, u_long cmd, caddr_t addr, int32_t flags, struct proc *p)
|
|
{
|
|
struct ad_softc *adp;
|
|
int32_t lun = UNIT(dev);
|
|
int32_t error = 0;
|
|
|
|
if (lun >= adnlun || !(adp = adtab[lun]))
|
|
return ENXIO;
|
|
|
|
ad_sleep(adp, "adioct");
|
|
error = dsioctl("sd", dev, cmd, addr, flags, &adp->slices,
|
|
ad_strategy, (ds_setgeom_t *)NULL);
|
|
|
|
if (error != ENOIOCTL)
|
|
return error;
|
|
return ENOTTY;
|
|
}
|
|
|
|
static void
|
|
adstrategy(struct buf *bp)
|
|
{
|
|
struct ad_softc *adp;
|
|
int32_t lun = UNIT(bp->b_dev);
|
|
int32_t s;
|
|
|
|
#ifdef AD_DEBUG
|
|
printf("adstrategy: entered count=%d\n", bp->b_bcount);
|
|
#endif
|
|
if (lun >= adnlun || bp->b_blkno < 0 || !(adp = adtab[lun])
|
|
|| bp->b_bcount % DEV_BSIZE != 0) {
|
|
bp->b_error = EINVAL;
|
|
bp->b_flags |= B_ERROR;
|
|
biodone(bp);
|
|
return;
|
|
}
|
|
|
|
if (dscheck(bp, adp->slices) <= 0) {
|
|
biodone(bp);
|
|
return;
|
|
}
|
|
|
|
/* hang around if somebody else is labelling */
|
|
if (adp->flags & AD_F_LABELLING)
|
|
ad_sleep(adp, "adlab");
|
|
|
|
s = splbio();
|
|
bufqdisksort(&adp->queue, bp);
|
|
ad_start(adp);
|
|
splx(s);
|
|
#ifdef AD_DEBUG
|
|
printf("adstrategy: leaving\n");
|
|
#endif
|
|
}
|
|
|
|
static int
|
|
adpsize(dev_t dev)
|
|
{
|
|
struct ad_softc *adp;
|
|
int32_t lun = UNIT(dev);
|
|
|
|
if (lun >= adnlun || !(adp = adtab[lun]))
|
|
return -1;
|
|
return dssize(dev, &adp->slices, adopen, adclose);
|
|
}
|
|
|
|
int
|
|
addump(dev_t dev)
|
|
{
|
|
struct ad_softc *adp;
|
|
struct disklabel *lp;
|
|
struct ad_request request;
|
|
int32_t lun = UNIT(dev), part = dkpart(dev);
|
|
u_int32_t count, blkno, blkoff;
|
|
vm_offset_t addr = 0;
|
|
static int addoingadump = 0;
|
|
|
|
if (addoingadump++ != 0)
|
|
return EFAULT;
|
|
|
|
if (lun >= adnlun || !(adp = adtab[lun]))
|
|
return ENXIO;
|
|
|
|
if ((adp->slices == NULL) || (lp = dsgetlabel(dev, adp->slices)) == NULL)
|
|
return ENXIO;
|
|
|
|
count = (u_long)Maxmem * PAGE_SIZE / lp->d_secsize;
|
|
|
|
if ((dumplo < 0) || (dumplo + count > lp->d_partitions[part].p_size))
|
|
return EINVAL;
|
|
|
|
blkoff = lp->d_partitions[part].p_offset +
|
|
adp->slices->dss_slices[dkslice(dev)].ds_offset;
|
|
blkno = blkoff + dumplo;
|
|
|
|
adp->flags &= ~AD_F_DMA_ENABLED;
|
|
|
|
while (count > 0) {
|
|
|
|
if (is_physical_memory(addr))
|
|
pmap_enter(kernel_pmap, (vm_offset_t)CADDR1,
|
|
trunc_page(addr), VM_PROT_READ, TRUE);
|
|
else
|
|
pmap_enter(kernel_pmap, (vm_offset_t)CADDR1,
|
|
trunc_page(0), VM_PROT_READ, TRUE);
|
|
|
|
bzero(&request, sizeof(struct ad_request));
|
|
request.device = adp;
|
|
request.blockaddr = blkno;
|
|
request.bytecount = PAGE_SIZE;
|
|
request.data = CADDR1;
|
|
|
|
while (request.bytecount > 0) {
|
|
ad_transfer(&request);
|
|
request.donecount += request.currentsize;
|
|
DELAY(20);
|
|
}
|
|
|
|
if (addr % (1024 * 1024) == 0) {
|
|
#ifdef HW_WDOG
|
|
if (wdog_tickler)
|
|
(*wdog_tickler)();
|
|
#endif
|
|
printf("%ld ", (long)(count * DEV_BSIZE) / (1024 * 1024));
|
|
}
|
|
|
|
blkno += howmany(PAGE_SIZE, lp->d_secsize);
|
|
count -= howmany(PAGE_SIZE, lp->d_secsize);
|
|
addr += PAGE_SIZE;
|
|
}
|
|
|
|
if (ata_wait(adp->controller, adp->unit, ATA_S_DRDY | ATA_S_DSC) < 0)
|
|
printf("ad_dump: timeout waiting for final ready\n");
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void
|
|
ad_strategy(struct buf *bp)
|
|
{
|
|
adstrategy(bp);
|
|
}
|
|
|
|
static void
|
|
ad_start(struct ad_softc *adp)
|
|
{
|
|
struct buf *bp = bufq_first(&adp->queue);
|
|
struct ad_request *request;
|
|
|
|
#ifdef AD_DEBUG
|
|
printf("ad_start:\n");
|
|
#endif
|
|
if (!bp)
|
|
return;
|
|
|
|
if (!(request = malloc(sizeof(struct ad_request), M_DEVBUF, M_NOWAIT))) {
|
|
printf("ad_start: out of memory\n");
|
|
return;
|
|
}
|
|
|
|
/* setup request */
|
|
bzero(request, sizeof(struct ad_request));
|
|
request->device = adp;
|
|
request->bp = bp;
|
|
request->blockaddr = bp->b_pblkno;
|
|
request->bytecount = bp->b_bcount;
|
|
request->data = bp->b_data;
|
|
request->flags = (bp->b_flags & B_READ) ? AR_F_READ : 0;
|
|
|
|
/* remove from drive queue */
|
|
bufq_remove(&adp->queue, bp);
|
|
|
|
/* link onto controller queue */
|
|
TAILQ_INSERT_TAIL(&adp->controller->ata_queue, request, chain);
|
|
|
|
/* try to start controller */
|
|
if (adp->controller->active == ATA_IDLE)
|
|
ata_start(adp->controller);
|
|
}
|
|
|
|
void
|
|
ad_transfer(struct ad_request *request)
|
|
{
|
|
struct ad_softc *adp;
|
|
u_int32_t blkno, secsprcyl;
|
|
u_int32_t cylinder, head, sector, count, cmd;
|
|
|
|
/* get request params */
|
|
adp = request->device;
|
|
|
|
/* calculate transfer details */
|
|
blkno = request->blockaddr + (request->donecount / DEV_BSIZE);
|
|
|
|
#ifdef AD_DEBUG
|
|
printf("ad_transfer: blkno=%d\n", blkno);
|
|
#endif
|
|
if (request->donecount == 0) {
|
|
|
|
/* setup transfer parameters */
|
|
count = howmany(request->bytecount, DEV_BSIZE);
|
|
|
|
if (adp->flags & AD_F_LBA_ENABLED) {
|
|
sector = (blkno >> 0) & 0xff;
|
|
cylinder = (blkno >> 8) & 0xffff;
|
|
head = ((blkno >> 24) & 0xf) | ATA_D_LBA;
|
|
}
|
|
else {
|
|
secsprcyl = adp->sectors * adp->heads;
|
|
cylinder = blkno / secsprcyl;
|
|
head = (blkno % secsprcyl) / adp->sectors;
|
|
sector = (blkno % adp->sectors) + 1;
|
|
}
|
|
|
|
/* setup first transfer length */
|
|
request->currentsize = min(request->bytecount, adp->transfersize);
|
|
|
|
devstat_start_transaction(&adp->stats);
|
|
|
|
/* does this drive & transfer work with DMA ? */
|
|
request->flags &= ~AR_F_DMA_USED;
|
|
if ((adp->flags & AD_F_DMA_ENABLED) &&
|
|
!ata_dmasetup(adp->controller, adp->unit,
|
|
(void *)request->data, request->bytecount,
|
|
(request->flags & AR_F_READ))) {
|
|
request->flags |= AR_F_DMA_USED;
|
|
cmd = request->flags & AR_F_READ ? ATA_C_READ_DMA : ATA_C_WRITE_DMA;
|
|
request->currentsize = request->bytecount;
|
|
}
|
|
/* does this drive support multi sector transfers ? */
|
|
else if (request->currentsize > DEV_BSIZE)
|
|
cmd = request->flags & AR_F_READ?ATA_C_READ_MULTI:ATA_C_WRITE_MULTI;
|
|
else
|
|
cmd = request->flags & AR_F_READ ? ATA_C_READ : ATA_C_WRITE;
|
|
|
|
ata_command(adp->controller, adp->unit, cmd, cylinder, head,
|
|
sector, count, 0, ATA_IMMEDIATE);
|
|
}
|
|
|
|
/* if this is a DMA transaction start it, return and wait for interrupt */
|
|
if (request->flags & AR_F_DMA_USED) {
|
|
ata_dmastart(adp->controller, adp->unit);
|
|
#ifdef AD_DEBUG
|
|
printf("ad_transfer: return waiting for DMA interrupt\n");
|
|
#endif
|
|
return;
|
|
}
|
|
|
|
/* calculate this transfer length */
|
|
request->currentsize = min(request->bytecount, adp->transfersize);
|
|
|
|
/* if this is a PIO read operation, return and wait for interrupt */
|
|
if (request->flags & AR_F_READ) {
|
|
#ifdef AD_DEBUG
|
|
printf("ad_transfer: return waiting for PIO read interrupt\n");
|
|
#endif
|
|
return;
|
|
}
|
|
|
|
/* ready to write PIO data ? */
|
|
if (ata_wait(adp->controller, adp->unit,
|
|
ATA_S_DRDY | ATA_S_DSC | ATA_S_DRQ) < 0) {
|
|
printf("ad_transfer: timeout waiting for DRQ");
|
|
}
|
|
|
|
/* output the data */
|
|
#if 0
|
|
outsw(adp->controller->ioaddr + ATA_DATA,
|
|
(void *)((uintptr_t)request->data + request->donecount),
|
|
request->currentsize / sizeof(int16_t));
|
|
#else
|
|
outsl(adp->controller->ioaddr + ATA_DATA,
|
|
(void *)((uintptr_t)request->data + request->donecount),
|
|
request->currentsize / sizeof(int32_t));
|
|
#endif
|
|
request->bytecount -= request->currentsize;
|
|
#ifdef AD_DEBUG
|
|
printf("ad_transfer: return wrote data\n");
|
|
#endif
|
|
}
|
|
|
|
int32_t
|
|
ad_interrupt(struct ad_request *request)
|
|
{
|
|
struct ad_softc *adp = request->device;
|
|
int32_t dma_stat = 0;
|
|
|
|
/* finish DMA transfer */
|
|
if (request->flags & AR_F_DMA_USED)
|
|
dma_stat = ata_dmadone(adp->controller, adp->unit);
|
|
|
|
/* get drive status */
|
|
if (ata_wait(adp->controller, adp->unit, 0) < 0)
|
|
printf("ad_interrupt: timeout waiting for status");
|
|
if (adp->controller->status & (ATA_S_ERROR | ATA_S_CORR) ||
|
|
(request->flags & AR_F_DMA_USED && dma_stat != ATA_BMSTAT_INTERRUPT)) {
|
|
oops:
|
|
printf("ad%d: status=%02x error=%02x\n",
|
|
adp->lun, adp->controller->status, adp->controller->error);
|
|
if (adp->controller->status & ATA_S_ERROR) {
|
|
printf("ad_interrupt: hard error\n");
|
|
request->flags |= AR_F_ERROR;
|
|
}
|
|
if (adp->controller->status & ATA_S_CORR)
|
|
printf("ad_interrupt: soft error ECC corrected\n");
|
|
}
|
|
|
|
/* if this was a PIO read operation, get the data */
|
|
if (!(request->flags & AR_F_DMA_USED) &&
|
|
((request->flags & (AR_F_READ | AR_F_ERROR)) == AR_F_READ)) {
|
|
|
|
/* ready to receive data? */
|
|
if ((adp->controller->status & (ATA_S_DRDY | ATA_S_DSC | ATA_S_DRQ))
|
|
!= (ATA_S_DRDY | ATA_S_DSC | ATA_S_DRQ))
|
|
printf("ad_interrupt: read interrupt arrived early");
|
|
|
|
if (ata_wait(adp->controller, adp->unit,
|
|
ATA_S_DRDY | ATA_S_DSC | ATA_S_DRQ) != 0){
|
|
printf("ad_interrupt: read error detected late");
|
|
goto oops;
|
|
}
|
|
|
|
/* data ready, read in */
|
|
#if 0
|
|
insw(adp->controller->ioaddr + ATA_DATA,
|
|
(void *)((uintptr_t)request->data + request->donecount),
|
|
request->currentsize / sizeof(int16_t));
|
|
#else
|
|
insl(adp->controller->ioaddr + ATA_DATA,
|
|
(void *)((uintptr_t)request->data + request->donecount),
|
|
request->currentsize / sizeof(int32_t));
|
|
#endif
|
|
request->bytecount -= request->currentsize;
|
|
#ifdef AD_DEBUG
|
|
printf("ad_interrupt: read in data\n");
|
|
#endif
|
|
}
|
|
|
|
/* if this was a DMA operation finish up */
|
|
if ((request->flags & AR_F_DMA_USED) && !(request->flags & AR_F_ERROR))
|
|
request->bytecount -= request->currentsize;
|
|
|
|
/* finish up this tranfer, check for more work on this buffer */
|
|
if (adp->controller->active == ATA_ACTIVE_ATA) {
|
|
if (request->flags & AR_F_ERROR) {
|
|
request->bp->b_error = EIO;
|
|
request->bp->b_flags |= B_ERROR;
|
|
}
|
|
else {
|
|
request->donecount += request->currentsize;
|
|
#ifdef AD_DEBUG
|
|
printf("ad_interrupt: %s cmd OK\n",
|
|
(request->flags & AR_F_READ) ? "read" : "write");
|
|
#endif
|
|
if (request->bytecount > 0) {
|
|
ad_transfer(request);
|
|
return ATA_OP_CONTINUES;
|
|
}
|
|
}
|
|
|
|
TAILQ_REMOVE(&adp->controller->ata_queue, request, chain);
|
|
request->bp->b_resid = request->bytecount;
|
|
biodone(request->bp);
|
|
devstat_end_transaction(&adp->stats, request->donecount,
|
|
DEVSTAT_TAG_NONE,
|
|
(request->flags & AR_F_READ) ?
|
|
DEVSTAT_READ : DEVSTAT_WRITE);
|
|
}
|
|
free(request, M_DEVBUF);
|
|
ad_start(adp);
|
|
#ifdef AD_DEBUG
|
|
printf("ad_interrupt: completed\n");
|
|
#endif
|
|
return ATA_OP_FINISHED;
|
|
}
|
|
|
|
static void
|
|
ad_sleep(struct ad_softc *adp, int8_t *mesg)
|
|
{
|
|
int32_t s = splbio();
|
|
|
|
while (adp->controller->active != ATA_IDLE)
|
|
tsleep((caddr_t)&adp->controller->active, PZERO - 1, mesg, 1);
|
|
splx(s);
|
|
}
|
|
|
|
static int8_t
|
|
ad_version(u_int16_t version)
|
|
{
|
|
int32_t bit;
|
|
|
|
if (version == 0xffff)
|
|
return '?';
|
|
for (bit = 15; bit >= 0; bit--)
|
|
if (version & (1<<bit))
|
|
return ('0' + bit);
|
|
return '?';
|
|
}
|
|
|
|
static void
|
|
ad_drvinit(void)
|
|
{
|
|
static int32_t ad_devsw_installed = 0;
|
|
|
|
if (!ad_devsw_installed) {
|
|
if (!ad_cdevsw.d_maxio)
|
|
ad_cdevsw.d_maxio = 254 * DEV_BSIZE;
|
|
cdevsw_add(&ad_cdevsw);
|
|
fakewd_cdevsw = ad_cdevsw;
|
|
fakewd_cdevsw.d_maj = 3;
|
|
fakewd_cdevsw.d_bmaj = 0;
|
|
cdevsw_add(&fakewd_cdevsw); /* grap wd entries too */
|
|
ad_devsw_installed = 1;
|
|
}
|
|
/* register callback for when interrupts are enabled */
|
|
if (!(ad_attach_hook =
|
|
(struct intr_config_hook *)malloc(sizeof(struct intr_config_hook),
|
|
M_TEMP, M_NOWAIT))) {
|
|
printf("ad: malloc attach_hook failed\n");
|
|
return;
|
|
}
|
|
bzero(ad_attach_hook, sizeof(struct intr_config_hook));
|
|
|
|
ad_attach_hook->ich_func = ad_attach;
|
|
if (config_intrhook_establish(ad_attach_hook) != 0) {
|
|
printf("ad: config_intrhook_establish failed\n");
|
|
free(ad_attach_hook, M_TEMP);
|
|
}
|
|
}
|
|
|
|
SYSINIT(addev, SI_SUB_DRIVERS, SI_ORDER_SECOND, ad_drvinit, NULL)
|
|
#endif /* NATA && NATADISK */
|