Skip to content

L
linux
Commit 6fc80776 authored by Alan Cox's avatar Alan Cox Committed by Dave Jones
Browse files
Options

[PATCH] first pass eata-pio updates

parent 8ecb25b5
Hide whitespace changes
Inline Side-by-side
Showing with 781 additions and 870 deletions
drivers/scsi/eata_pio.c
View file @ 6fc80776
...@@ -14,6 +14,9 @@ ...@@ -14,6 +14,9 @@
* neuffer@goofy.zdv.uni-mainz.de * * neuffer@goofy.zdv.uni-mainz.de *
* a.arnold@kfa-juelich.de * * a.arnold@kfa-juelich.de *
* * * *
* Updated 2002 by Alan Cox <alan@redhat.com> for Linux *
* 2.5.x and the newer locking and error handling *
* *
* This program is free software; you can redistribute it * * This program is free software; you can redistribute it *
* and/or modify it under the terms of the GNU General * * and/or modify it under the terms of the GNU General *
* Public License as published by the Free Software * * Public License as published by the Free Software *
...@@ -30,15 +33,23 @@ ...@@ -30,15 +33,23 @@
* Public License along with this kernel; if not, write to * * Public License along with this kernel; if not, write to *
* the Free Software Foundation, Inc., 675 Mass Ave, * * the Free Software Foundation, Inc., 675 Mass Ave, *
* Cambridge, MA 02139, USA. * * Cambridge, MA 02139, USA. *
* *
* For the avoidance of doubt the "preferred form" of this *
* code is one which is in an open non patent encumbered *
* format. Where cryptographic key signing forms part of *
* the process of creating an executable the information *
* including keys needed to generate an equivalently *
* functional executable are deemed to be part of the *
* source code are deemed to be part of the source code. *
* * * *
************************************************************ ************************************************************
* last change: 96/07/16 OS: Linux 2.0.8 * * last change: 2002/11/02 OS: Linux 2.5.45 *
************************************************************/ ************************************************************/
/* Look in eata_pio.h for configuration information */ /* Look in eata_pio.h for configuration information */
#include <linux/module.h> #include <linux/module.h>
#include <linux/kernel.h> #include <linux/kernel.h>
#include <linux/sched.h> #include <linux/sched.h>
#include <linux/string.h> #include <linux/string.h>
...@@ -57,902 +68,830 @@ ...@@ -57,902 +68,830 @@
#include <linux/blk.h> #include <linux/blk.h>
#include <linux/spinlock.h> #include <linux/spinlock.h>
static uint ISAbases[MAXISA] = static uint ISAbases[MAXISA] = {
{0x1F0, 0x170, 0x330, 0x230}; 0x1F0, 0x170, 0x330, 0x230
static uint ISAirqs[MAXISA] = };
{14,12,15,11};
static unchar EISAbases[] = static uint ISAirqs[MAXISA] = {
{1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}; 14, 12, 15, 11
};
static unsigned char EISAbases[] = {
1, 1, 1, 1, 1, 1, 1, 1,
1, 1, 1, 1, 1, 1, 1, 1
};
static uint registered_HBAs = 0; static uint registered_HBAs = 0;
static struct Scsi_Host *last_HBA = NULL; static struct Scsi_Host *last_HBA;
static struct Scsi_Host *first_HBA = NULL; static struct Scsi_Host *first_HBA;
static unchar reg_IRQ[] = static unsigned char reg_IRQ[];
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}; static unsigned char reg_IRQL[];
static unchar reg_IRQL[] =
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
static ulong int_counter = 0; static unsigned long int_counter = 0;
static ulong queue_counter = 0; static unsigned long queue_counter = 0;
#include "eata_pio_proc.c" #include "eata_pio_proc.c"
#ifdef MODULE static int eata_pio_release(struct Scsi_Host *sh)
int eata_pio_release(struct Scsi_Host *sh)
{ {
if (sh->irq && reg_IRQ[sh->irq] == 1) free_irq(sh->irq, NULL); if (sh->irq && reg_IRQ[sh->irq] == 1)
else reg_IRQ[sh->irq]--; free_irq(sh->irq, NULL);
if (SD(sh)->channel == 0) { else
if (sh->io_port && sh->n_io_port) reg_IRQ[sh->irq]--;
release_region(sh->io_port, sh->n_io_port); if (SD(sh)->channel == 0) {
} if (sh->io_port && sh->n_io_port)
return(TRUE); release_region(sh->io_port, sh->n_io_port);
}
return (TRUE);
} }
#endif
void IncStat(Scsi_Pointer *SCp, uint Increment) static void IncStat(Scsi_Pointer * SCp, uint Increment)
{ {
SCp->ptr+=Increment; SCp->ptr += Increment;
if ((SCp->this_residual-=Increment)==0) if ((SCp->this_residual -= Increment) == 0) {
{ if ((--SCp->buffers_residual) == 0)
if ((--SCp->buffers_residual)==0) SCp->Status=FALSE; SCp->Status = FALSE;
else else {
{ SCp->buffer++;
SCp->buffer++; SCp->ptr = page_address(SCp->buffer->page) + SCp->buffer->offset;
SCp->ptr=page_address(SCp->buffer->page) + SCp->buffer->offset; SCp->this_residual = SCp->buffer->length;
SCp->this_residual=SCp->buffer->length; }
} }
}
} }
void eata_pio_int_handler(int irq, void *dev_id, struct pt_regs * regs); static void eata_pio_int_handler(int irq, void *dev_id, struct pt_regs *regs);
void do_eata_pio_int_handler(int irq, void *dev_id, struct pt_regs * regs) static void do_eata_pio_int_handler(int irq, void *dev_id, struct pt_regs *regs)
{ {
unsigned long flags; unsigned long flags;
struct Scsi_Host *dev = dev_id; struct Scsi_Host *dev = dev_id;
spin_lock_irqsave(dev->host_lock, flags); spin_lock_irqsave(dev->host_lock, flags);
eata_pio_int_handler(irq, dev_id, regs); eata_pio_int_handler(irq, dev_id, regs);
spin_unlock_irqrestore(dev->host_lock, flags); spin_unlock_irqrestore(dev->host_lock, flags);
} }
void eata_pio_int_handler(int irq, void *dev_id, struct pt_regs * regs) static void eata_pio_int_handler(int irq, void *dev_id, struct pt_regs *regs)
{ {
uint eata_stat = 0xfffff; uint eata_stat = 0xfffff;
Scsi_Cmnd *cmd; Scsi_Cmnd *cmd;
hostdata *hd; hostdata *hd;
struct eata_ccb *cp; struct eata_ccb *cp;
uint base; uint base;
uint x,z; uint x, z;
struct Scsi_Host *sh; struct Scsi_Host *sh;
ushort zwickel=0; unsigned short zwickel = 0;
unchar stat,odd; unsigned char stat, odd;
for (x = 1, sh = first_HBA; x <= registered_HBAs; x++, sh = SD(sh)->prev) { for (x = 1, sh = first_HBA; x <= registered_HBAs; x++, sh = SD(sh)->prev)
if (sh->irq != irq)
continue;
if (inb((uint)sh->base + HA_RSTATUS) & HA_SBUSY)
continue;
int_counter++;
hd=SD(sh);
cp = &hd->ccb[0];
cmd = cp->cmd;
base = (uint) cmd->host->base;
do
{ {
stat=inb(base+HA_RSTATUS); if (sh->irq != irq)
if (stat&HA_SDRQ) { continue;
if (cp->DataIn) if (inb((uint) sh->base + HA_RSTATUS) & HA_SBUSY)
{ continue;
z=256; odd=FALSE;
while ((cmd->SCp.Status)&&((z>0)||(odd))) int_counter++;
{
if (odd) hd = SD(sh);
{
*(cmd->SCp.ptr)=zwickel>>8; cp = &hd->ccb[0];
IncStat(&cmd->SCp,1); cmd = cp->cmd;
odd=FALSE; base = (uint) cmd->host->base;
do {
stat = inb(base + HA_RSTATUS);
if (stat & HA_SDRQ) {
if (cp->DataIn) {
z = 256;
odd = FALSE;
while ((cmd->SCp.Status) && ((z > 0) || (odd))) {
if (odd) {
*(cmd->SCp.ptr) = zwickel >> 8;
IncStat(&cmd->SCp, 1);
odd = FALSE;
}
x = min_t(unsigned int, z, cmd->SCp.this_residual / 2);
insw(base + HA_RDATA, cmd->SCp.ptr, x);
z -= x;
IncStat(&cmd->SCp, 2 * x);
if ((z > 0) && (cmd->SCp.this_residual == 1)) {
zwickel = inw(base + HA_RDATA);
*(cmd->SCp.ptr) = zwickel & 0xff;
IncStat(&cmd->SCp, 1);
z--;
odd = TRUE;
}
}
while (z > 0) {
zwickel = inw(base + HA_RDATA);
z--;
}
} else { /* cp->DataOut */
odd = FALSE;
z = 256;
while ((cmd->SCp.Status) && ((z > 0) || (odd))) {
if (odd) {
zwickel += *(cmd->SCp.ptr) << 8;
IncStat(&cmd->SCp, 1);
outw(zwickel, base + HA_RDATA);
z--;
odd = FALSE;
}
x = min_t(unsigned int, z, cmd->SCp.this_residual / 2);
outsw(base + HA_RDATA, cmd->SCp.ptr, x);
z -= x;
IncStat(&cmd->SCp, 2 * x);
if ((z > 0) && (cmd->SCp.this_residual == 1)) {
zwickel = *(cmd->SCp.ptr);
zwickel &= 0xff;
IncStat(&cmd->SCp, 1);
odd = TRUE;
}
}
while (z > 0 || odd) {
outw(zwickel, base + HA_RDATA);
z--;
odd = FALSE;
}
}
} }
x=min_t(unsigned int,z,cmd->SCp.this_residual/2);
insw(base+HA_RDATA,cmd->SCp.ptr,x);
z-=x;
IncStat(&cmd->SCp,2*x);
if ((z>0)&&(cmd->SCp.this_residual==1))
{
zwickel=inw(base+HA_RDATA);
*(cmd->SCp.ptr)=zwickel&0xff;
IncStat(&cmd->SCp,1); z--;
odd=TRUE;
}
}
while (z>0) {
zwickel=inw(base+HA_RDATA);
z--;
}
} }
else /* cp->DataOut */ while ((stat & HA_SDRQ) || ((stat & HA_SMORE) && hd->moresupport));
{
odd=FALSE; z=256; /* terminate handler if HBA goes busy again, i.e. transfers
while ((cmd->SCp.Status)&&((z>0)||(odd))) * more data */
{
if (odd) if (stat & HA_SBUSY)
{ break;
zwickel+=*(cmd->SCp.ptr)<<8;
IncStat(&cmd->SCp,1); /* OK, this is quite stupid, but I haven't found any correct
outw(zwickel,base+HA_RDATA); * way to get HBA&SCSI status so far */
z--;
odd=FALSE; if (!(inb(base + HA_RSTATUS) & HA_SERROR)) {
} cmd->result = (DID_OK << 16);
x=min_t(unsigned int,z,cmd->SCp.this_residual/2); hd->devflags |= (1 << cp->cp_id);
outsw(base+HA_RDATA,cmd->SCp.ptr,x); } else if (hd->devflags & 1 << cp->cp_id)
z-=x; cmd->result = (DID_OK << 16) + 0x02;
IncStat(&cmd->SCp,2*x); else
if ((z>0)&&(cmd->SCp.this_residual==1)) cmd->result = (DID_NO_CONNECT << 16);
{
zwickel=*(cmd->SCp.ptr); if (cp->status == LOCKED) {
zwickel&=0xff; cp->status = FREE;
IncStat(&cmd->SCp,1); eata_stat = inb(base + HA_RSTATUS);
odd=TRUE; printk(KERN_CRIT "eata_pio: int_handler, freeing locked " "queueslot\n");
} return;
}
while (z>0||odd) {
outw(zwickel,base+HA_RDATA);
z--;
odd=FALSE;
}
} }
}
}
while ((stat&HA_SDRQ)||((stat&HA_SMORE)&&hd->moresupport));
/* terminate handler if HBA goes busy again, i.e. transfers
* more data */
if (stat&HA_SBUSY) break;
/* OK, this is quite stupid, but I haven't found any correct
* way to get HBA&SCSI status so far */
if (!(inb(base+HA_RSTATUS)&HA_SERROR))
{
cmd->result=(DID_OK<<16);
hd->devflags|=(1<<cp->cp_id);
}
else if (hd->devflags&1<<cp->cp_id)
cmd->result=(DID_OK<<16)+0x02;
else cmd->result=(DID_NO_CONNECT<<16);
if (cp->status == LOCKED) {
cp->status = FREE;
eata_stat = inb(base + HA_RSTATUS);
printk(KERN_CRIT "eata_pio: int_handler, freeing locked "
"queueslot\n");
return;
}
#if DBG_INTR2 #if DBG_INTR2
if (stat != 0x50) if (stat != 0x50)
printk(KERN_DEBUG "stat: %#.2x, result: %#.8x\n", stat, printk(KERN_DEBUG "stat: %#.2x, result: %#.8x\n", stat, cmd->result);
cmd->result);
#endif #endif
cp->status = FREE; /* now we can release the slot */ cp->status = FREE; /* now we can release the slot */
cmd->scsi_done(cmd); cmd->scsi_done(cmd);
} }
return; return;
} }
inline uint eata_pio_send_command(uint base, unchar command) static inline uint eata_pio_send_command(uint base, unsigned char command)
{ {
uint loop = HZ/2; uint loop = HZ / 2;
while (inb(base + HA_RSTATUS) & HA_SBUSY) while (inb(base + HA_RSTATUS) & HA_SBUSY)
if (--loop == 0) if (--loop == 0)
return(TRUE); return (TRUE);
/* Enable interrupts for HBA. It is not the best way to do it at this /* Enable interrupts for HBA. It is not the best way to do it at this
* place, but I hope that it doesn't interfere with the IDE driver * place, but I hope that it doesn't interfere with the IDE driver
* initialization this way */ * initialization this way */
outb(HA_CTRL_8HEADS,base+HA_CTRLREG); outb(HA_CTRL_8HEADS, base + HA_CTRLREG);
outb(command, base + HA_WCOMMAND); outb(command, base + HA_WCOMMAND);
return(FALSE); return (FALSE);
} }
int eata_pio_queue(Scsi_Cmnd * cmd, void (*done) (Scsi_Cmnd *)) static int eata_pio_queue(Scsi_Cmnd * cmd, void (*done) (Scsi_Cmnd *))
{ {
uint x, y; uint x, y;
uint base; uint base;
hostdata *hd; hostdata *hd;
struct Scsi_Host *sh; struct Scsi_Host *sh;
struct eata_ccb *cp; struct eata_ccb *cp;
queue_counter++; queue_counter++;
hd = HD(cmd); hd = HD(cmd);
sh = cmd->host; sh = cmd->host;
base = (uint) sh->base; base = (uint) sh->base;
/* use only slot 0, as 2001 can handle only one cmd at a time */ /* use only slot 0, as 2001 can handle only one cmd at a time */
y = x = 0; y = x = 0;
if (hd->ccb[y].status!=FREE) { if (hd->ccb[y].status != FREE) {
DBG(DBG_QUEUE, printk(KERN_EMERG "can_queue %d, x %d, y %d\n", DBG(DBG_QUEUE, printk(KERN_EMERG "can_queue %d, x %d, y %d\n", sh->can_queue, x, y));
sh->can_queue,x,y));
#if DEBUG_EATA #if DEBUG_EATA
panic(KERN_EMERG "eata_pio: run out of queue slots cmdno:%ld " panic(KERN_EMERG "eata_pio: run out of queue slots cmdno:%ld " "intrno: %ld\n", queue_counter, int_counter);
"intrno: %ld\n", queue_counter, int_counter);
#else #else
panic(KERN_EMERG "eata_pio: run out of queue slots....\n"); panic(KERN_EMERG "eata_pio: run out of queue slots....\n");
#endif #endif
} }
cp = &hd->ccb[y]; cp = &hd->ccb[y];
memset(cp, 0, sizeof(struct eata_ccb)); memset(cp, 0, sizeof(struct eata_ccb));
memset(cmd->sense_buffer, 0, sizeof(cmd->sense_buffer)); memset(cmd->sense_buffer, 0, sizeof(cmd->sense_buffer));
cp->status = USED; /* claim free slot */ cp->status = USED; /* claim free slot */
DBG(DBG_QUEUE, printk(KERN_DEBUG "eata_pio_queue pid %ld, target: %x, lun:" DBG(DBG_QUEUE, printk(KERN_DEBUG "eata_pio_queue pid %ld, target: %x, lun:" " %x, y %d\n", cmd->pid, cmd->target, cmd->lun, y));
" %x, y %d\n", cmd->pid, cmd->target, cmd->lun, y));
cmd->scsi_done = (void *) done;
cmd->scsi_done = (void *)done;
if(cmd->sc_data_direction == SCSI_DATA_WRITE)
/* FIXME: use passed direction flag !! */ cp->DataOut = TRUE; /* Output mode */
switch (cmd->cmnd[0]) { else
case CHANGE_DEFINITION: case COMPARE: case COPY: cp->DataIn = TRUE; /* Input mode */
case COPY_VERIFY: case LOG_SELECT: case MODE_SELECT:
case MODE_SELECT_10: case SEND_DIAGNOSTIC: case WRITE_BUFFER: cp->Interpret = (cmd->target == hd->hostid);
case FORMAT_UNIT: case REASSIGN_BLOCKS: case RESERVE: cp->cp_datalen = htonl((unsigned long) cmd->request_bufflen);
case SEARCH_EQUAL: case SEARCH_HIGH: case SEARCH_LOW: cp->Auto_Req_Sen = FALSE;
case WRITE_6: case WRITE_10: case WRITE_VERIFY: cp->cp_reqDMA = htonl(0);
case UPDATE_BLOCK: case WRITE_LONG: case WRITE_SAME: cp->reqlen = 0;
case SEARCH_HIGH_12: case SEARCH_EQUAL_12: case SEARCH_LOW_12:
case WRITE_12: case WRITE_VERIFY_12: case SET_WINDOW: cp->cp_id = cmd->target;
case MEDIUM_SCAN: case SEND_VOLUME_TAG: cp->cp_lun = cmd->lun;
case 0xea: /* alternate number for WRITE LONG */ cp->cp_dispri = FALSE;
cp->DataOut = TRUE; /* Output mode */ cp->cp_identify = TRUE;
break; memcpy(cp->cp_cdb, cmd->cmnd, COMMAND_SIZE(*cmd->cmnd));
case TEST_UNIT_READY:
default: cp->cp_statDMA = htonl(0);
cp->DataIn = TRUE; /* Input mode */
} cp->cp_viraddr = cp;
cp->cmd = cmd;
cp->Interpret = (cmd->target == hd->hostid); cmd->host_scribble = (char *) &hd->ccb[y];
cp->cp_datalen = htonl((ulong)cmd->request_bufflen);
cp->Auto_Req_Sen = FALSE; if (cmd->use_sg == 0) {
cp->cp_reqDMA = htonl(0); cmd->SCp.buffers_residual = 1;
cp->reqlen = 0; cmd->SCp.ptr = cmd->request_buffer;
cmd->SCp.this_residual = cmd->request_bufflen;
cp->cp_id = cmd->target; cmd->SCp.buffer = NULL;
cp->cp_lun = cmd->lun; } else {
cp->cp_dispri = FALSE; cmd->SCp.buffer = cmd->request_buffer;
cp->cp_identify = TRUE; cmd->SCp.buffers_residual = cmd->use_sg;
memcpy(cp->cp_cdb, cmd->cmnd, COMMAND_SIZE(*cmd->cmnd)); cmd->SCp.ptr = page_address(cmd->SCp.buffer->page) + cmd->SCp.buffer->offset;
cmd->SCp.this_residual = cmd->SCp.buffer->length;
cp->cp_statDMA = htonl(0); }
cmd->SCp.Status = (cmd->SCp.this_residual != 0); /* TRUE as long as bytes
cp->cp_viraddr = cp; * are to transfer */
cp->cmd = cmd;
cmd->host_scribble = (char *)&hd->ccb[y]; if (eata_pio_send_command(base, EATA_CMD_PIO_SEND_CP)) {
cmd->result = DID_BUS_BUSY << 16;
if (cmd->use_sg == 0) printk(KERN_NOTICE "eata_pio_queue target %d, pid %ld, HBA busy, " "returning DID_BUS_BUSY, done.\n", cmd->target, cmd->pid);
{ done(cmd);
cmd->SCp.buffers_residual=1; cp->status = FREE;
cmd->SCp.ptr = cmd->request_buffer; return (0);
cmd->SCp.this_residual = cmd->request_bufflen; }
cmd->SCp.buffer = NULL; /* FIXME: timeout */
} else { while (!(inb(base + HA_RSTATUS) & HA_SDRQ))
cmd->SCp.buffer = cmd->request_buffer; cpu_relax();
cmd->SCp.buffers_residual = cmd->use_sg; outsw(base + HA_RDATA, cp, hd->cplen);
cmd->SCp.ptr = page_address(cmd->SCp.buffer->page) + cmd->SCp.buffer->offset; outb(EATA_CMD_PIO_TRUNC, base + HA_WCOMMAND);
cmd->SCp.this_residual = cmd->SCp.buffer->length; for (x = 0; x < hd->cppadlen; x++)
} outw(0, base + HA_RDATA);
cmd->SCp.Status = (cmd->SCp.this_residual != 0); /* TRUE as long as bytes
* are to transfer */ DBG(DBG_QUEUE, printk(KERN_DEBUG "Queued base %#.4lx pid: %ld target: %x " "lun: %x slot %d irq %d\n", (long) sh->base, cmd->pid, cmd->target, cmd->lun, y, sh->irq));
if (eata_pio_send_command(base, EATA_CMD_PIO_SEND_CP))
{
cmd->result = DID_BUS_BUSY << 16;
printk(KERN_NOTICE "eata_pio_queue target %d, pid %ld, HBA busy, "
"returning DID_BUS_BUSY, done.\n", cmd->target, cmd->pid);
done(cmd);
cp->status = FREE;
return (0); return (0);
}
while (!(inb(base + HA_RSTATUS) & HA_SDRQ))
cpu_relax();
outsw(base + HA_RDATA, cp, hd->cplen);
outb(EATA_CMD_PIO_TRUNC, base + HA_WCOMMAND);
for (x = 0; x < hd->cppadlen; x++) outw(0, base + HA_RDATA);
DBG(DBG_QUEUE,printk(KERN_DEBUG "Queued base %#.4lx pid: %ld target: %x "
"lun: %x slot %d irq %d\n", (long)sh->base, cmd->pid,
cmd->target, cmd->lun, y, sh->irq));
return (0);
} }
int eata_pio_abort(Scsi_Cmnd * cmd) static int eata_pio_abort(Scsi_Cmnd * cmd)
{ {
ulong flags; uint loop = HZ;
uint loop = HZ;
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_abort called pid: %ld " "target: %x lun: %x reason %x\n", cmd->pid, cmd->target, cmd->lun, cmd->abort_reason));
spin_lock_irqsave(cmd->host->host_lock, flags);
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_abort called pid: %ld "
"target: %x lun: %x reason %x\n", cmd->pid, while (inb(cmd->host->base + HA_RAUXSTAT) & HA_ABUSY)
cmd->target, cmd->lun, cmd->abort_reason)); if (--loop == 0) {
printk(KERN_WARNING "eata_pio: abort, timeout error.\n");
return FAILED;
while (inb((uint)(cmd->host->base) + HA_RAUXSTAT) & HA_ABUSY) }
if (--loop == 0) { if (CD(cmd)->status == FREE) {
printk(KERN_WARNING "eata_pio: abort, timeout error.\n"); DBG(DBG_ABNORM, printk(KERN_WARNING "Returning: SCSI_ABORT_NOT_RUNNING\n"));
spin_unlock_irqrestore(cmd->host->host_lock, flags); return FAILED;
return (SCSI_ABORT_ERROR); }
if (CD(cmd)->status == USED) {
DBG(DBG_ABNORM, printk(KERN_WARNING "Returning: SCSI_ABORT_BUSY\n"));
/* We want to sleep a bit more here */
return FAILED; /* SNOOZE */
}
if (CD(cmd)->status == RESET) {
printk(KERN_WARNING "eata_pio: abort, command reset error.\n");
return FAILED;
}
if (CD(cmd)->status == LOCKED) {
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio: abort, queue slot " "locked.\n"));
return FAILED;
} }
if (CD(cmd)->status == FREE) { panic("eata_pio: abort: invalid slot status\n");
DBG(DBG_ABNORM, printk(KERN_WARNING "Returning: SCSI_ABORT_NOT_RUNNING\n"));
spin_unlock_irqrestore(cmd->host->host_lock, flags);
return (SCSI_ABORT_NOT_RUNNING);
}
if (CD(cmd)->status == USED) {
DBG(DBG_ABNORM, printk(KERN_WARNING "Returning: SCSI_ABORT_BUSY\n"));
spin_unlock_irqrestore(cmd->host->host_lock, flags);
return (SCSI_ABORT_BUSY); /* SNOOZE */
}
if (CD(cmd)->status == RESET) {
spin_unlock_irqrestore(cmd->host->host_lock, flags);
printk(KERN_WARNING "eata_pio: abort, command reset error.\n");
return (SCSI_ABORT_ERROR);
}
if (CD(cmd)->status == LOCKED) {
spin_unlock_irqrestore(cmd->host->host_lock, flags);
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio: abort, queue slot "
"locked.\n"));
return (SCSI_ABORT_NOT_RUNNING);
}
spin_unlock_irqrestore(cmd->host->host_lock, flags);
panic("eata_pio: abort: invalid slot status\n");
} }
int eata_pio_reset(Scsi_Cmnd * cmd, unsigned int dummy) static int eata_pio_host_reset(Scsi_Cmnd * cmd)
{ {
uint x, limit = 0; uint x, limit = 0;
ulong flags; unsigned char success = FALSE;
unchar success = FALSE; Scsi_Cmnd *sp;
Scsi_Cmnd *sp; struct Scsi_Host *host = cmd->host;
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset called pid:%ld target:" DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset called pid:%ld target:" " %x lun: %x reason %x\n", cmd->pid, cmd->target, cmd->lun, cmd->abort_reason));
" %x lun: %x reason %x\n", cmd->pid, cmd->target,
cmd->lun, cmd->abort_reason)); if (HD(cmd)->state == RESET) {
printk(KERN_WARNING "eata_pio_reset: exit, already in reset.\n");
spin_lock_irqsave(cmd->host->host_lock, flags); return FAILED;
if (HD(cmd)->state == RESET) { }
printk(KERN_WARNING "eata_pio_reset: exit, already in reset.\n");
spin_unlock_irqrestore(cmd->host->host_lock, flags); /* force all slots to be free */
return (SCSI_RESET_ERROR);
} for (x = 0; x < cmd->host->can_queue; x++) {
/* force all slots to be free */ if (HD(cmd)->ccb[x].status == FREE)
continue;
for (x = 0; x < cmd->host->can_queue; x++) {
sp = HD(cmd)->ccb[x].cmd;
if (HD(cmd)->ccb[x].status == FREE) HD(cmd)->ccb[x].status = RESET;
continue; printk(KERN_WARNING "eata_pio_reset: slot %d in reset, pid %ld.\n", x, sp->pid);
sp = HD(cmd)->ccb[x].cmd; if (sp == NULL)
HD(cmd)->ccb[x].status = RESET; panic("eata_pio_reset: slot %d, sp==NULL.\n", x);
printk(KERN_WARNING "eata_pio_reset: slot %d in reset, pid %ld.\n", x, }
sp->pid);
/* hard reset the HBA */
if (sp == NULL) outb(EATA_CMD_RESET, (uint) cmd->host->base + HA_WCOMMAND);
panic("eata_pio_reset: slot %d, sp==NULL.\n", x);
} DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset: board reset done.\n"));
HD(cmd)->state = RESET;
/* hard reset the HBA */
outb(EATA_CMD_RESET, (uint) cmd->host->base+HA_WCOMMAND); spin_unlock_irq(host->host_lock);
set_current_state(TASK_UNINTERRUPTIBLE);
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset: board reset done.\n")); schedule_timeout(3 * HZ);
HD(cmd)->state = RESET; spin_lock_irq(host->host_lock);
set_current_state(TASK_UNINTERRUPTIBLE); DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset: interrupts disabled, " "loops %d.\n", limit));
schedule_timeout(3*HZ);
for (x = 0; x < cmd->host->can_queue; x++) {
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset: interrupts disabled, "
"loops %d.\n", limit)); /* Skip slots already set free by interrupt */
if (HD(cmd)->ccb[x].status != RESET)
for (x = 0; x < cmd->host->can_queue; x++) { continue;
/* Skip slots already set free by interrupt */ sp = HD(cmd)->ccb[x].cmd;
if (HD(cmd)->ccb[x].status != RESET) sp->result = DID_RESET << 16;
continue;
/* This mailbox is terminated */
sp = HD(cmd)->ccb[x].cmd; printk(KERN_WARNING "eata_pio_reset: reset ccb %d.\n", x);
sp->result = DID_RESET << 16; HD(cmd)->ccb[x].status = FREE;
/* This mailbox is terminated */ sp->scsi_done(sp);
printk(KERN_WARNING "eata_pio_reset: reset ccb %d.\n",x); }
HD(cmd)->ccb[x].status = FREE;
HD(cmd)->state = FALSE;
sp->scsi_done(sp);
} if (success) { /* hmmm... */
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset: exit, success.\n"));
HD(cmd)->state = FALSE; return SUCCESS;
spin_unlock_irqrestore(cmd->host->host_lock, flags); } else {
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset: exit, wakeup.\n"));
if (success) { /* hmmm... */ return FAILED;
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset: exit, success.\n")); }
return (SCSI_RESET_SUCCESS);
} else {
DBG(DBG_ABNORM, printk(KERN_WARNING "eata_pio_reset: exit, wakeup.\n"));
return (SCSI_RESET_PUNT);
}
} }
char * get_pio_board_data(ulong base, uint irq, uint id, ulong cplen, ushort cppadlen) static char *get_pio_board_data(unsigned long base, uint irq, uint id, unsigned long cplen, unsigned short cppadlen)
{ {
struct eata_ccb cp; struct eata_ccb cp;
static char buff[256]; static char buff[256];
int z; int z;
memset(&cp, 0, sizeof(struct eata_ccb)); memset(&cp, 0, sizeof(struct eata_ccb));
memset(buff, 0, sizeof(buff)); memset(buff, 0, sizeof(buff));
cp.DataIn = TRUE; cp.DataIn = TRUE;
cp.Interpret = TRUE; /* Interpret command */ cp.Interpret = TRUE; /* Interpret command */
cp.cp_datalen = htonl(254); cp.cp_datalen = htonl(254);
cp.cp_dataDMA = htonl(0); cp.cp_dataDMA = htonl(0);
cp.cp_id = id; cp.cp_id = id;
cp.cp_lun = 0; cp.cp_lun = 0;
cp.cp_cdb[0] = INQUIRY; cp.cp_cdb[0] = INQUIRY;
cp.cp_cdb[1] = 0; cp.cp_cdb[1] = 0;
cp.cp_cdb[2] = 0; cp.cp_cdb[2] = 0;
cp.cp_cdb[3] = 0; cp.cp_cdb[3] = 0;
cp.cp_cdb[4] = 254; cp.cp_cdb[4] = 254;
cp.cp_cdb[5] = 0; cp.cp_cdb[5] = 0;
if (eata_pio_send_command((uint) base, EATA_CMD_PIO_SEND_CP)) if (eata_pio_send_command((uint) base, EATA_CMD_PIO_SEND_CP))
return (NULL); return (NULL);
while (!(inb(base + HA_RSTATUS) & HA_SDRQ)); while (!(inb(base + HA_RSTATUS) & HA_SDRQ));
outsw(base + HA_RDATA, &cp, cplen); outsw(base + HA_RDATA, &cp, cplen);
outb(EATA_CMD_PIO_TRUNC, base + HA_WCOMMAND); outb(EATA_CMD_PIO_TRUNC, base + HA_WCOMMAND);
for (z = 0; z < cppadlen; z++) outw(0, base + HA_RDATA); for (z = 0; z < cppadlen; z++)
outw(0, base + HA_RDATA);
while (inb(base + HA_RSTATUS) & HA_SBUSY);
if (inb(base + HA_RSTATUS) & HA_SERROR) while (inb(base + HA_RSTATUS) & HA_SBUSY);
return (NULL); if (inb(base + HA_RSTATUS) & HA_SERROR)
else if (!(inb(base + HA_RSTATUS) & HA_SDRQ)) return (NULL);
return (NULL); else if (!(inb(base + HA_RSTATUS) & HA_SDRQ))
else return (NULL);
{ else {
insw(base+HA_RDATA, &buff, 127); insw(base + HA_RDATA, &buff, 127);
while (inb(base + HA_RSTATUS)&HA_SDRQ) inw(base + HA_RDATA); while (inb(base + HA_RSTATUS) & HA_SDRQ)
return (buff); inw(base + HA_RDATA);
} return (buff);
}
} }
int get_pio_conf_PIO(u32 base, struct get_conf *buf) static int get_pio_conf_PIO(u32 base, struct get_conf *buf)
{ {
ulong loop = HZ/2; unsigned long loop = HZ / 2;
int z; int z;
ushort *p; unsigned short *p;
if(check_region(base, 9)) if (check_region(base, 9))
return (FALSE);
memset(buf, 0, sizeof(struct get_conf));
while (inb(base + HA_RSTATUS) & HA_SBUSY)
if (--loop == 0)
return (FALSE);
DBG(DBG_PIO && DBG_PROBE,
printk(KERN_DEBUG "Issuing PIO READ CONFIG to HBA at %#x\n", base));
eata_pio_send_command(base, EATA_CMD_PIO_READ_CONFIG);
loop = HZ/2;
for (p = (ushort *) buf;
(long)p <= ((long)buf + (sizeof(struct get_conf) / 2)); p++) {
while (!(inb(base + HA_RSTATUS) & HA_SDRQ))
if (--loop == 0)
return (FALSE); return (FALSE);
loop = HZ/2; memset(buf, 0, sizeof(struct get_conf));
*p = inw(base + HA_RDATA);
} while (inb(base + HA_RSTATUS) & HA_SBUSY)
if (!(inb(base + HA_RSTATUS) & HA_SERROR)) { /* Error ? */ if (--loop == 0)
if (htonl(EATA_SIGNATURE) == buf->signature) { return (FALSE);
DBG(DBG_PIO&&DBG_PROBE, printk(KERN_NOTICE "EATA Controller found "
"at %#4x EATA Level: %x\n", base, DBG(DBG_PIO && DBG_PROBE, printk(KERN_DEBUG "Issuing PIO READ CONFIG to HBA at %#x\n", base));
(uint) (buf->version))); eata_pio_send_command(base, EATA_CMD_PIO_READ_CONFIG);
while (inb(base + HA_RSTATUS) & HA_SDRQ) loop = HZ / 2;
inw(base + HA_RDATA); for (p = (unsigned short *) buf; (long) p <= ((long) buf + (sizeof(struct get_conf) / 2)); p++) {
if(ALLOW_DMA_BOARDS == FALSE) { while (!(inb(base + HA_RSTATUS) & HA_SDRQ))
for (z = 0; z < MAXISA; z++) if (--loop == 0)
if (base == ISAbases[z]) { return (FALSE);
buf->IRQ = ISAirqs[z];
break; loop = HZ / 2;
} *p = inw(base + HA_RDATA);
} }
return (TRUE); if (!(inb(base + HA_RSTATUS) & HA_SERROR)) { /* Error ? */
} if (htonl(EATA_SIGNATURE) == buf->signature) {
} else { DBG(DBG_PIO && DBG_PROBE, printk(KERN_NOTICE "EATA Controller found " "at %#4x EATA Level: %x\n", base, (uint) (buf->version)));
DBG(DBG_PROBE, printk("eata_dma: get_conf_PIO, error during transfer "
"for HBA at %x\n", base)); while (inb(base + HA_RSTATUS) & HA_SDRQ)
} inw(base + HA_RDATA);
return (FALSE); if (ALLOW_DMA_BOARDS == FALSE) {
for (z = 0; z < MAXISA; z++)
if (base == ISAbases[z]) {
buf->IRQ = ISAirqs[z];
break;
}
}
return (TRUE);
}
} else {
DBG(DBG_PROBE, printk("eata_dma: get_conf_PIO, error during transfer " "for HBA at %x\n", base));
}
return (FALSE);
} }
void print_pio_config(struct get_conf *gc) static void print_pio_config(struct get_conf *gc)
{ {
printk("Please check values: (read config data)\n"); printk("Please check values: (read config data)\n");
printk("LEN: %d ver:%d OCS:%d TAR:%d TRNXFR:%d MORES:%d\n", printk("LEN: %d ver:%d OCS:%d TAR:%d TRNXFR:%d MORES:%d\n", (uint) ntohl(gc->len), gc->version, gc->OCS_enabled, gc->TAR_support, gc->TRNXFR, gc->MORE_support);
(uint) ntohl(gc->len), gc->version, printk("HAAV:%d SCSIID0:%d ID1:%d ID2:%d QUEUE:%d SG:%d SEC:%d\n", gc->HAA_valid, gc->scsi_id[3], gc->scsi_id[2], gc->scsi_id[1], ntohs(gc->queuesiz), ntohs(gc->SGsiz), gc->SECOND);
gc->OCS_enabled, gc->TAR_support, gc->TRNXFR, gc->MORE_support); printk("IRQ:%d IRQT:%d FORCADR:%d MCH:%d RIDQ:%d\n", gc->IRQ, gc->IRQ_TR, gc->FORCADR, gc->MAX_CHAN, gc->ID_qest);
printk("HAAV:%d SCSIID0:%d ID1:%d ID2:%d QUEUE:%d SG:%d SEC:%d\n",
gc->HAA_valid, gc->scsi_id[3], gc->scsi_id[2],
gc->scsi_id[1], ntohs(gc->queuesiz), ntohs(gc->SGsiz), gc->SECOND);
printk("IRQ:%d IRQT:%d FORCADR:%d MCH:%d RIDQ:%d\n",
gc->IRQ, gc->IRQ_TR, gc->FORCADR,
gc->MAX_CHAN, gc->ID_qest);
} }
static uint print_selftest(uint base) static uint print_selftest(uint base)
{ {
unchar buffer[512]; unsigned char buffer[512];
#ifdef VERBOSE_SETUP #ifdef VERBOSE_SETUP
int z; int z;
#endif #endif
printk("eata_pio: executing controller self test & setup...\n"); printk("eata_pio: executing controller self test & setup...\n");
while (inb(base + HA_RSTATUS) & HA_SBUSY); while (inb(base + HA_RSTATUS) & HA_SBUSY);
outb(EATA_CMD_PIO_SETUPTEST, base + HA_WCOMMAND); outb(EATA_CMD_PIO_SETUPTEST, base + HA_WCOMMAND);
do { do {
while (inb(base + HA_RSTATUS) & HA_SBUSY) while (inb(base + HA_RSTATUS) & HA_SBUSY)
/* nothing */ ; /* nothing */ ;
if (inb(base + HA_RSTATUS) & HA_SDRQ) if (inb(base + HA_RSTATUS) & HA_SDRQ) {
{ insw(base + HA_RDATA, &buffer, 256);
insw(base + HA_RDATA, &buffer, 256);
#ifdef VERBOSE_SETUP #ifdef VERBOSE_SETUP
/* no beeps please... */ /* no beeps please... */
for (z = 0; z < 511 && buffer[z]; z++) for (z = 0; z < 511 && buffer[z]; z++)
if (buffer[z] != 7) printk("%c", buffer[z]); if (buffer[z] != 7)
printk("%c", buffer[z]);
#endif #endif
} }
} while (inb(base+HA_RSTATUS) & (HA_SBUSY|HA_SDRQ)); } while (inb(base + HA_RSTATUS) & (HA_SBUSY | HA_SDRQ));
return (!(inb(base+HA_RSTATUS) & HA_SERROR)); return (!(inb(base + HA_RSTATUS) & HA_SERROR));
} }
int register_pio_HBA(long base, struct get_conf *gc, Scsi_Host_Template * tpnt) static int register_pio_HBA(long base, struct get_conf *gc, Scsi_Host_Template * tpnt)
{ {
ulong size = 0; unsigned long size = 0;
char *buff; char *buff;
ulong cplen; unsigned long cplen;
ushort cppadlen; unsigned short cppadlen;
struct Scsi_Host *sh; struct Scsi_Host *sh;
hostdata *hd; hostdata *hd;
DBG(DBG_REGISTER, print_pio_config(gc)); DBG(DBG_REGISTER, print_pio_config(gc));
if (gc->DMA_support == TRUE) { if (gc->DMA_support == TRUE) {
printk("HBA at %#.4lx supports DMA. Please use EATA-DMA driver.\n",base); printk("HBA at %#.4lx supports DMA. Please use EATA-DMA driver.\n", base);
if(ALLOW_DMA_BOARDS == FALSE) if (ALLOW_DMA_BOARDS == FALSE)
return (FALSE); return (FALSE);
} }
if ((buff = get_pio_board_data((uint)base, gc->IRQ, gc->scsi_id[3], if ((buff = get_pio_board_data((uint) base, gc->IRQ, gc->scsi_id[3], cplen = (htonl(gc->cplen) + 1) / 2, cppadlen = (htons(gc->cppadlen) + 1) / 2)) == NULL) {
cplen =(htonl(gc->cplen )+1)/2, printk("HBA at %#lx didn't react on INQUIRY. Sorry.\n", (unsigned long) base);
cppadlen=(htons(gc->cppadlen)+1)/2)) == NULL) return (FALSE);
{ }
printk("HBA at %#lx didn't react on INQUIRY. Sorry.\n", (ulong) base);
return (FALSE); if (print_selftest(base) == FALSE && ALLOW_DMA_BOARDS == FALSE) {
} printk("HBA at %#lx failed while performing self test & setup.\n", (unsigned long) base);
return (FALSE);
if (print_selftest(base) == FALSE && ALLOW_DMA_BOARDS == FALSE) }
{
printk("HBA at %#lx failed while performing self test & setup.\n", request_region(base, 8, "eata_pio");
(ulong) base);
return (FALSE); size = sizeof(hostdata) + (sizeof(struct eata_ccb) * ntohs(gc->queuesiz));
}
sh = scsi_register(tpnt, size);
request_region(base, 8, "eata_pio"); if (sh == NULL) {
release_region(base, 8);
size = sizeof(hostdata) + (sizeof(struct eata_ccb) * ntohs(gc->queuesiz)); return FALSE;
}
sh = scsi_register(tpnt, size);
if(sh == NULL) if (!reg_IRQ[gc->IRQ]) { /* Interrupt already registered ? */
{ if (!request_irq(gc->IRQ, do_eata_pio_int_handler, SA_INTERRUPT, "EATA-PIO", sh)) {
release_region(base, 8); reg_IRQ[gc->IRQ]++;
return FALSE; if (!gc->IRQ_TR)
} reg_IRQL[gc->IRQ] = TRUE; /* IRQ is edge triggered */
} else {
if (!reg_IRQ[gc->IRQ]) { /* Interrupt already registered ? */ printk("Couldn't allocate IRQ %d, Sorry.\n", gc->IRQ);
if (!request_irq(gc->IRQ, do_eata_pio_int_handler, SA_INTERRUPT, release_region(base, 8);
"EATA-PIO", sh)){ return (FALSE);
reg_IRQ[gc->IRQ]++; }
if (!gc->IRQ_TR) } else { /* More than one HBA on this IRQ */
reg_IRQL[gc->IRQ] = TRUE; /* IRQ is edge triggered */ if (reg_IRQL[gc->IRQ] == TRUE) {
printk("Can't support more than one HBA on this IRQ,\n" " if the IRQ is edge triggered. Sorry.\n");
release_region(base, 8);
return (FALSE);
} else
reg_IRQ[gc->IRQ]++;
}
hd = SD(sh);
memset(hd->ccb, 0, (sizeof(struct eata_ccb) * ntohs(gc->queuesiz)));
memset(hd->reads, 0, sizeof(unsigned long) * 26);
strncpy(SD(sh)->vendor, &buff[8], 8);
SD(sh)->vendor[8] = 0;
strncpy(SD(sh)->name, &buff[16], 17);
SD(sh)->name[17] = 0;
SD(sh)->revision[0] = buff[32];
SD(sh)->revision[1] = buff[33];
SD(sh)->revision[2] = buff[34];
SD(sh)->revision[3] = '.';
SD(sh)->revision[4] = buff[35];
SD(sh)->revision[5] = 0;
switch (ntohl(gc->len)) {
case 0x1c:
SD(sh)->EATA_revision = 'a';
break;
case 0x1e:
SD(sh)->EATA_revision = 'b';
break;
case 0x22:
SD(sh)->EATA_revision = 'c';
break;
case 0x24:
SD(sh)->EATA_revision = 'z';
default:
SD(sh)->EATA_revision = '?';
}
if (ntohl(gc->len) >= 0x22) {
if (gc->is_PCI == TRUE)
hd->bustype = IS_PCI;
else if (gc->is_EISA == TRUE)
hd->bustype = IS_EISA;
else
hd->bustype = IS_ISA;
} else { } else {
printk("Couldn't allocate IRQ %d, Sorry.\n", gc->IRQ); if (buff[21] == '4')
release_region(base, 8); hd->bustype = IS_PCI;
return (FALSE); else if (buff[21] == '2')
hd->bustype = IS_EISA;
else
hd->bustype = IS_ISA;
} }
} else { /* More than one HBA on this IRQ */
if (reg_IRQL[gc->IRQ] == TRUE) { SD(sh)->cplen = cplen;
printk("Can't support more than one HBA on this IRQ,\n" SD(sh)->cppadlen = cppadlen;
" if the IRQ is edge triggered. Sorry.\n"); SD(sh)->hostid = gc->scsi_id[3];
release_region(base, 8); SD(sh)->devflags = 1 << gc->scsi_id[3];
return (FALSE); SD(sh)->moresupport = gc->MORE_support;
} else sh->unique_id = base;
reg_IRQ[gc->IRQ]++; sh->base = base;
} sh->io_port = base;
sh->n_io_port = 8;
hd = SD(sh); sh->irq = gc->IRQ;
sh->dma_channel = PIO;
memset(hd->ccb, 0, (sizeof(struct eata_ccb) * ntohs(gc->queuesiz))); sh->this_id = gc->scsi_id[3];
memset(hd->reads, 0, sizeof(ulong) * 26); sh->can_queue = 1;
sh->cmd_per_lun = 1;
strncpy(SD(sh)->vendor, &buff[8], 8); sh->sg_tablesize = SG_ALL;
SD(sh)->vendor[8] = 0;
strncpy(SD(sh)->name, &buff[16], 17); hd->channel = 0;
SD(sh)->name[17] = 0;
SD(sh)->revision[0] = buff[32]; sh->max_id = 8;
SD(sh)->revision[1] = buff[33]; sh->max_lun = 8;
SD(sh)->revision[2] = buff[34];
SD(sh)->revision[3] = '.'; if (gc->SECOND)
SD(sh)->revision[4] = buff[35]; hd->primary = FALSE;
SD(sh)->revision[5] = 0;
switch (ntohl(gc->len)) {
case 0x1c:
SD(sh)->EATA_revision = 'a';
break;
case 0x1e:
SD(sh)->EATA_revision = 'b';
break;
case 0x22:
SD(sh)->EATA_revision = 'c';
break;
case 0x24:
SD(sh)->EATA_revision = 'z';
default:
SD(sh)->EATA_revision = '?';
}
if(ntohl(gc->len) >= 0x22) {
if (gc->is_PCI == TRUE)
hd->bustype = IS_PCI;
else if (gc->is_EISA == TRUE)
hd->bustype = IS_EISA;
else
hd->bustype = IS_ISA;
} else {
if (buff[21] == '4')
hd->bustype = IS_PCI;
else if (buff[21] == '2')
hd->bustype = IS_EISA;
else else
hd->bustype = IS_ISA; hd->primary = TRUE;
}
sh->unchecked_isa_dma = FALSE; /* We can only do PIO */
SD(sh)->cplen=cplen;
SD(sh)->cppadlen=cppadlen; hd->next = NULL; /* build a linked list of all HBAs */
SD(sh)->hostid=gc->scsi_id[3]; hd->prev = last_HBA;
SD(sh)->devflags=1<<gc->scsi_id[3]; if (hd->prev != NULL)
SD(sh)->moresupport=gc->MORE_support; SD(hd->prev)->next = sh;
sh->unique_id = base; last_HBA = sh;
sh->base = base; if (first_HBA == NULL)
sh->io_port = base; first_HBA = sh;
sh->n_io_port = 8; registered_HBAs++;
sh->irq = gc->IRQ; return (1);
sh->dma_channel = PIO;
sh->this_id = gc->scsi_id[3];
sh->can_queue = 1;
sh->cmd_per_lun = 1;
sh->sg_tablesize = SG_ALL;
hd->channel = 0;
sh->max_id = 8;
sh->max_lun = 8;
if (gc->SECOND)
hd->primary = FALSE;
else
hd->primary = TRUE;
sh->unchecked_isa_dma = FALSE; /* We can only do PIO */
hd->next = NULL; /* build a linked list of all HBAs */
hd->prev = last_HBA;
if(hd->prev != NULL)
SD(hd->prev)->next = sh;
last_HBA = sh;
if (first_HBA == NULL)
first_HBA = sh;
registered_HBAs++;
return (1);
} }
void find_pio_ISA(struct get_conf *buf, Scsi_Host_Template * tpnt) static void find_pio_ISA(struct get_conf *buf, Scsi_Host_Template * tpnt)
{ {
int i; int i;
for (i = 0; i < MAXISA; i++) { for (i = 0; i < MAXISA; i++) {
if (ISAbases[i]) { if (ISAbases[i]) {
if (get_pio_conf_PIO(ISAbases[i], buf) == TRUE){ if (get_pio_conf_PIO(ISAbases[i], buf) == TRUE) {
register_pio_HBA(ISAbases[i], buf, tpnt); register_pio_HBA(ISAbases[i], buf, tpnt);
} }
ISAbases[i] = 0; ISAbases[i] = 0;
}
} }
} return;
return;
} }
void find_pio_EISA(struct get_conf *buf, Scsi_Host_Template * tpnt) static void find_pio_EISA(struct get_conf *buf, Scsi_Host_Template * tpnt)
{ {
u32 base; u32 base;
int i; int i;
#if CHECKPAL #if CHECKPAL
u8 pal1, pal2, pal3; u8 pal1, pal2, pal3;
#endif #endif
for (i = 0; i < MAXEISA; i++) { for (i = 0; i < MAXEISA; i++) {
if (EISAbases[i] == TRUE) { /* Still a possibility ? */ if (EISAbases[i] == TRUE) { /* Still a possibility ? */
base = 0x1c88 + (i * 0x1000); base = 0x1c88 + (i * 0x1000);
#if CHECKPAL #if CHECKPAL
pal1 = inb((u16)base - 8); pal1 = inb((u16) base - 8);
pal2 = inb((u16)base - 7); pal2 = inb((u16) base - 7);
pal3 = inb((u16)base - 6); pal3 = inb((u16) base - 6);
if (((pal1 == 0x12) && (pal2 == 0x14)) || if (((pal1 == 0x12) && (pal2 == 0x14)) || ((pal1 == 0x38) && (pal2 == 0xa3) && (pal3 == 0x82)) || ((pal1 == 0x06) && (pal2 == 0x94) && (pal3 == 0x24))) {
((pal1 == 0x38) && (pal2 == 0xa3) && (pal3 == 0x82)) || DBG(DBG_PROBE, printk(KERN_NOTICE "EISA EATA id tags found: " "%x %x %x \n", (int) pal1, (int) pal2, (int) pal3));
((pal1 == 0x06) && (pal2 == 0x94) && (pal3 == 0x24))) {
DBG(DBG_PROBE, printk(KERN_NOTICE "EISA EATA id tags found: "
"%x %x %x \n",
(int)pal1, (int)pal2, (int)pal3));
#endif #endif
if (get_pio_conf_PIO(base, buf) == TRUE) { if (get_pio_conf_PIO(base, buf) == TRUE) {
DBG(DBG_PROBE && DBG_EISA, print_pio_config(buf)); DBG(DBG_PROBE && DBG_EISA, print_pio_config(buf));
if (buf->IRQ) { if (buf->IRQ) {
register_pio_HBA(base, buf, tpnt); register_pio_HBA(base, buf, tpnt);
} else } else
printk(KERN_NOTICE "eata_dma: No valid IRQ. HBA " printk(KERN_NOTICE "eata_dma: No valid IRQ. HBA " "removed from list\n");
"removed from list\n"); }
} /* Nothing found here so we take it from the list */
/* Nothing found here so we take it from the list */ EISAbases[i] = 0;
EISAbases[i] = 0;
#if CHECKPAL #if CHECKPAL
} }
#endif #endif
}
} }
} return;
return;
} }
void find_pio_PCI(struct get_conf *buf, Scsi_Host_Template * tpnt) static void find_pio_PCI(struct get_conf *buf, Scsi_Host_Template * tpnt)
{ {
#ifndef CONFIG_PCI #ifndef CONFIG_PCI
printk("eata_dma: kernel PCI support not enabled. Skipping scan for PCI HBAs.\n"); printk("eata_dma: kernel PCI support not enabled. Skipping scan for PCI HBAs.\n");
#else #else
struct pci_dev *dev = NULL; struct pci_dev *dev = NULL;
u32 base, x; u32 base, x;
while ((dev = pci_find_device(PCI_VENDOR_ID_DPT, PCI_DEVICE_ID_DPT, dev)) != NULL) { while ((dev = pci_find_device(PCI_VENDOR_ID_DPT, PCI_DEVICE_ID_DPT, dev)) != NULL) {
DBG(DBG_PROBE && DBG_PCI, DBG(DBG_PROBE && DBG_PCI, printk("eata_pio: find_PCI, HBA at %s\n", dev->name));
printk("eata_pio: find_PCI, HBA at %s\n", dev->name)); if (pci_enable_device(dev))
if (pci_enable_device(dev)) continue;
continue; pci_set_master(dev);
pci_set_master(dev); base = pci_resource_flags(dev, 0);
base = pci_resource_flags(dev, 0); if (base & IORESOURCE_MEM) {
if (base & IORESOURCE_MEM) { printk("eata_pio: invalid base address of device %s\n", dev->name);
printk("eata_pio: invalid base address of device %s\n", dev->name); continue;
continue; }
} base = pci_resource_start(dev, 0);
base = pci_resource_start(dev, 0); /* EISA tag there ? */
/* EISA tag there ? */ if ((inb(base) == 0x12) && (inb(base + 1) == 0x14))
if ((inb(base) == 0x12) && (inb(base + 1) == 0x14)) continue; /* Jep, it's forced, so move on */
continue; /* Jep, it's forced, so move on */ base += 0x10; /* Now, THIS is the real address */
base += 0x10; /* Now, THIS is the real address */ if (base != 0x1f8) {
if (base != 0x1f8) { /* We didn't find it in the primary search */
/* We didn't find it in the primary search */ if (get_pio_conf_PIO(base, buf) == TRUE) {
if (get_pio_conf_PIO(base, buf) == TRUE) { if (buf->FORCADR) /* If the address is forced */
if (buf->FORCADR) /* If the address is forced */ continue; /* we'll find it later */
continue; /* we'll find it later */
/* OK. We made it till here, so we can go now
/* OK. We made it till here, so we can go now * and register it. We only have to check and
* and register it. We only have to check and * eventually remove it from the EISA and ISA list
* eventually remove it from the EISA and ISA list */
*/
register_pio_HBA(base, buf, tpnt);
register_pio_HBA(base, buf, tpnt);
if (base < 0x1000) {
if (base < 0x1000) { for (x = 0; x < MAXISA; ++x) {
for (x = 0; x < MAXISA; ++x) { if (ISAbases[x] == base) {
if (ISAbases[x] == base) { ISAbases[x] = 0;
ISAbases[x] = 0; break;
break; }
} }
} else if ((base & 0x0fff) == 0x0c88) {
x = (base >> 12) & 0x0f;
EISAbases[x] = 0;
}
} }
} else if ((base & 0x0fff) == 0x0c88) {
x = (base >> 12) & 0x0f;
EISAbases[x] = 0;
}
}
#if CHECK_BLINK #if CHECK_BLINK
else if (check_blink_state(base) == TRUE) { else if (check_blink_state(base) == TRUE) {
printk("eata_pio: HBA is in BLINK state.\n" printk("eata_pio: HBA is in BLINK state.\n" "Consult your HBAs manual to correct this.\n");
"Consult your HBAs manual to correct this.\n"); }
}
#endif #endif
} }
} }
#endif /* #ifndef CONFIG_PCI */ #endif /* #ifndef CONFIG_PCI */
} }
int eata_pio_detect(Scsi_Host_Template * tpnt) static int eata_pio_detect(Scsi_Host_Template * tpnt)
{ {
struct Scsi_Host *HBA_ptr; struct Scsi_Host *HBA_ptr;
struct get_conf gc; struct get_conf gc;
int i; int i;
tpnt->proc_name = "eata_pio"; tpnt->proc_name = "eata_pio";
find_pio_PCI(&gc, tpnt); find_pio_PCI(&gc, tpnt);
find_pio_EISA(&gc, tpnt); find_pio_EISA(&gc, tpnt);
find_pio_ISA(&gc, tpnt); find_pio_ISA(&gc, tpnt);
for (i = 0; i <= MAXIRQ; i++) for (i = 0; i <= MAXIRQ; i++)
if (reg_IRQ[i]) if (reg_IRQ[i])
request_irq(i, do_eata_pio_int_handler, SA_INTERRUPT, "EATA-PIO", NULL); request_irq(i, do_eata_pio_int_handler, SA_INTERRUPT, "EATA-PIO", NULL);
HBA_ptr = first_HBA; HBA_ptr = first_HBA;
if (registered_HBAs != 0) { if (registered_HBAs != 0) {
printk("EATA (Extended Attachment) PIO driver version: %d.%d%s\n" printk("EATA (Extended Attachment) PIO driver version: %d.%d%s\n"
"(c) 1993-95 Michael Neuffer, neuffer@goofy.zdv.uni-mainz.de\n" "(c) 1993-95 Michael Neuffer, neuffer@goofy.zdv.uni-mainz.de\n" " Alfred Arnold, a.arnold@kfa-juelich.de\n" "This release only supports DASD devices (harddisks)\n", VER_MAJOR, VER_MINOR, VER_SUB);
" Alfred Arnold, a.arnold@kfa-juelich.de\n"
"This release only supports DASD devices (harddisks)\n", printk("Registered HBAs:\n");
VER_MAJOR, VER_MINOR, VER_SUB); printk("HBA no. Boardtype: Revis: EATA: Bus: BaseIO: IRQ: Ch: ID: Pr:" " QS: SG: CPL:\n");
for (i = 1; i <= registered_HBAs; i++) {
printk("Registered HBAs:\n"); printk("scsi%-2d: %.10s v%s 2.0%c %s %#.4x %2d %d %d %c"
printk("HBA no. Boardtype: Revis: EATA: Bus: BaseIO: IRQ: Ch: ID: Pr:" " %2d %2d %2d\n",
" QS: SG: CPL:\n"); HBA_ptr->host_no, SD(HBA_ptr)->name, SD(HBA_ptr)->revision,
for (i = 1; i <= registered_HBAs; i++) { SD(HBA_ptr)->EATA_revision, (SD(HBA_ptr)->bustype == 'P') ?
printk("scsi%-2d: %.10s v%s 2.0%c %s %#.4x %2d %d %d %c" "PCI " : (SD(HBA_ptr)->bustype == 'E') ? "EISA" : "ISA ",
" %2d %2d %2d\n", (uint) HBA_ptr->base, HBA_ptr->irq, SD(HBA_ptr)->channel, HBA_ptr->this_id, (SD(HBA_ptr)->primary == TRUE) ? 'Y' : 'N', HBA_ptr->can_queue, HBA_ptr->sg_tablesize, HBA_ptr->cmd_per_lun);
HBA_ptr->host_no, SD(HBA_ptr)->name, SD(HBA_ptr)->revision, HBA_ptr = SD(HBA_ptr)->next;
SD(HBA_ptr)->EATA_revision, (SD(HBA_ptr)->bustype == 'P')? }
"PCI ":(SD(HBA_ptr)->bustype == 'E')?"EISA":"ISA ",
(uint) HBA_ptr->base, HBA_ptr->irq, SD(HBA_ptr)->channel,
HBA_ptr->this_id, (SD(HBA_ptr)->primary == TRUE)?'Y':'N',
HBA_ptr->can_queue, HBA_ptr->sg_tablesize,
HBA_ptr->cmd_per_lun);
HBA_ptr = SD(HBA_ptr)->next;
} }
} return (registered_HBAs);
return (registered_HBAs);
} }
/* Eventually this will go into an include file, but this will be later */ /* Eventually this will go into an include file, but this will be later */
......
drivers/scsi/eata_pio.h
View file @ 6fc80776
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
* Header file for eata_pio.c Linux EATA-PIO SCSI driver * * Header file for eata_pio.c Linux EATA-PIO SCSI driver *
* (c) 1993-96 Michael Neuffer * * (c) 1993-96 Michael Neuffer *
********************************************************* *********************************************************
* last change: 96/05/05 * * last change: 2002/11/02 *
********************************************************/ ********************************************************/
...@@ -14,7 +14,6 @@ ...@@ -14,7 +14,6 @@
#include "hosts.h" #include "hosts.h"
#include <scsi/scsicam.h> #include <scsi/scsicam.h>
#ifndef HOSTS_C
#include "eata_generic.h" #include "eata_generic.h"
#define VER_MAJOR 0 #define VER_MAJOR 0
...@@ -25,82 +24,55 @@ ...@@ -25,82 +24,55 @@
* Here you can switch parts of the code on and of * * Here you can switch parts of the code on and of *
************************************************************************/ ************************************************************************/
#define VERBOSE_SETUP /* show startup screen of 2001 */ #define VERBOSE_SETUP /* show startup screen of 2001 */
#define ALLOW_DMA_BOARDS 1 #define ALLOW_DMA_BOARDS 1
/************************************************************************ /************************************************************************
* Debug options. * * Debug options. *
* Enable DEBUG and whichever options you require. * * Enable DEBUG and whichever options you require. *
************************************************************************/ ************************************************************************/
#define DEBUG_EATA 1 /* Enable debug code. */ #define DEBUG_EATA 1 /* Enable debug code. */
#define DPT_DEBUG 0 /* Bobs special */ #define DPT_DEBUG 0 /* Bobs special */
#define DBG_DELAY 0 /* Build in delays so debug messages can be #define DBG_DELAY 0 /* Build in delays so debug messages can be
* be read before they vanish of the top of * be read before they vanish of the top of
* the screen! * the screen!
*/ */
#define DBG_PROBE 0 /* Debug probe routines. */ #define DBG_PROBE 0 /* Debug probe routines. */
#define DBG_ISA 0 /* Trace ISA routines */ #define DBG_ISA 0 /* Trace ISA routines */
#define DBG_EISA 0 /* Trace EISA routines */ #define DBG_EISA 0 /* Trace EISA routines */
#define DBG_PCI 0 /* Trace PCI routines */ #define DBG_PCI 0 /* Trace PCI routines */
#define DBG_PIO 0 /* Trace get_config_PIO */ #define DBG_PIO 0 /* Trace get_config_PIO */
#define DBG_COM 0 /* Trace command call */ #define DBG_COM 0 /* Trace command call */
#define DBG_QUEUE 0 /* Trace command queueing. */ #define DBG_QUEUE 0 /* Trace command queueing. */
#define DBG_INTR 0 /* Trace interrupt service routine. */ #define DBG_INTR 0 /* Trace interrupt service routine. */
#define DBG_INTR2 0 /* Trace interrupt service routine. */ #define DBG_INTR2 0 /* Trace interrupt service routine. */
#define DBG_PROC 0 /* Debug proc-fs related statistics */ #define DBG_PROC 0 /* Debug proc-fs related statistics */
#define DBG_PROC_WRITE 0 #define DBG_PROC_WRITE 0
#define DBG_REGISTER 0 /* */ #define DBG_REGISTER 0 /* */
#define DBG_ABNORM 1 /* Debug abnormal actions (reset, abort) */ #define DBG_ABNORM 1 /* Debug abnormal actions (reset, abort) */
#if DEBUG_EATA #if DEBUG_EATA
#define DBG(x, y) if ((x)) {y;} #define DBG(x, y) if ((x)) {y;}
#else #else
#define DBG(x, y) #define DBG(x, y)
#endif #endif
#endif /* !HOSTS_C */ static int eata_pio_detect(Scsi_Host_Template *);
static int eata_pio_queue(Scsi_Cmnd *, void (*done) (Scsi_Cmnd *));
static int eata_pio_abort(Scsi_Cmnd *);
static int eata_pio_host_reset(Scsi_Cmnd *);
static int eata_pio_proc_info(char *, char **, off_t, int, int, int);
static int eata_pio_release(struct Scsi_Host *);
int eata_pio_detect(Scsi_Host_Template *); #define EATA_PIO { \
const char *eata_pio_info(struct Scsi_Host *); proc_info: eata_pio_proc_info, /* procinfo */ \
int eata_pio_command(Scsi_Cmnd *); name: "EATA (Extended Attachment) PIO driver",\
int eata_pio_queue(Scsi_Cmnd *, void (*done)(Scsi_Cmnd *)); detect: eata_pio_detect, \
int eata_pio_abort(Scsi_Cmnd *); release: eata_pio_release, \
int eata_pio_reset(Scsi_Cmnd *, unsigned int); queuecommand: eata_pio_queue, \
int eata_pio_proc_info(char *, char **, off_t, int, int, int); eh_abort_handler: eata_pio_abort, \
#ifdef MODULE eh_host_reset_handler: eata_pio_host_reset, \
int eata_pio_release(struct Scsi_Host *); use_clustering: ENABLE_CLUSTERING \
#else }
#define eata_pio_release NULL
#endif
#define EATA_PIO { \
proc_info: eata_pio_proc_info, /* procinfo */ \
name: "EATA (Extended Attachment) PIO driver", \
detect: eata_pio_detect, \
release: eata_pio_release, \
queuecommand: eata_pio_queue, \
abort: eata_pio_abort, \
reset: eata_pio_reset, \
unchecked_isa_dma: 1, /* True if ISA */ \
use_clustering: ENABLE_CLUSTERING }
#endif /* _EATA_PIO_H */
/* #endif /* _EATA_PIO_H */
* Overrides for Emacs so that we almost follow Linus's tabbing style.
* Emacs will notice this stuff at the end of the file and automatically
* adjust the settings for this buffer only. This must remain at the end
* of the file.
* ---------------------------------------------------------------------------
* Local variables:
* c-indent-level: 4
* c-brace-imaginary-offset: 0
* c-brace-offset: -4
* c-argdecl-indent: 4
* c-label-offset: -4
* c-continued-statement-offset: 4
* c-continued-brace-offset: 0
* tab-width: 8
* End:
*/
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment
GitLab Nexedi Edition | About GitLab | About Nexedi | 沪ICP备2021021310号-2 | 沪ICP备2021021310号-7