blob: aff2408f280091c35571a5c6d9c9c10b58152e1e [file] [log] [blame]
/*
* seagate.c Copyright (C) 1992, 1993 Drew Eckhardt
* low level scsi driver for ST01/ST02, Future Domain TMC-885,
* TMC-950 by Drew Eckhardt <drew@colorado.edu>
*
* Note : TMC-880 boards don't work because they have two bits in
* the status register flipped, I'll fix this "RSN"
* [why do I have strong feeling that above message is from 1993? :-)
* pavel@ucw.cz]
*
* This card does all the I/O via memory mapped I/O, so there is no need
* to check or allocate a region of the I/O address space.
*/
/* 1996 - to use new read{b,w,l}, write{b,w,l}, and phys_to_virt
* macros, replaced assembler routines with C. There's probably a
* performance hit, but I only have a cdrom and can't tell. Define
* SEAGATE_USE_ASM if you want the old assembler code -- SJT
*
* 1998-jul-29 - created DPRINTK macros and made it work under
* linux 2.1.112, simplified some #defines etc. <pavel@ucw.cz>
*
* Aug 2000 - aeb - deleted seagate_st0x_biosparam(). It would try to
* read the physical disk geometry, a bad mistake. Of course it doesn't
* matter much what geometry one invents, but on large disks it
* returned 256 (or more) heads, causing all kind of failures.
* Of course this means that people might see a different geometry now,
* so boot parameters may be necessary in some cases.
*/
/*
* Configuration :
* To use without BIOS -DOVERRIDE=base_address -DCONTROLLER=FD or SEAGATE
* -DIRQ will override the default of 5.
* Note: You can now set these options from the kernel's "command line".
* The syntax is:
*
* st0x=ADDRESS,IRQ (for a Seagate controller)
* or:
* tmc8xx=ADDRESS,IRQ (for a TMC-8xx or TMC-950 controller)
* eg:
* tmc8xx=0xC8000,15
*
* will configure the driver for a TMC-8xx style controller using IRQ 15
* with a base address of 0xC8000.
*
* -DARBITRATE
* Will cause the host adapter to arbitrate for the
* bus for better SCSI-II compatibility, rather than just
* waiting for BUS FREE and then doing its thing. Should
* let us do one command per Lun when I integrate my
* reorganization changes into the distribution sources.
*
* -DDEBUG=65535
* Will activate debug code.
*
* -DFAST or -DFAST32
* Will use blind transfers where possible
*
* -DPARITY
* This will enable parity.
*
* -DSEAGATE_USE_ASM
* Will use older seagate assembly code. should be (very small amount)
* Faster.
*
* -DSLOW_RATE=50
* Will allow compatibility with broken devices that don't
* handshake fast enough (ie, some CD ROM's) for the Seagate
* code.
*
* 50 is some number, It will let you specify a default
* transfer rate if handshaking isn't working correctly.
*
* -DOLDCNTDATASCEME There is a new sceme to set the CONTROL
* and DATA reigsters which complies more closely
* with the SCSI2 standard. This hopefully eliminates
* the need to swap the order these registers are
* 'messed' with. It makes the following two options
* obsolete. To reenable the old sceme define this.
*
* The following to options are patches from the SCSI.HOWTO
*
* -DSWAPSTAT This will swap the definitions for STAT_MSG and STAT_CD.
*
* -DSWAPCNTDATA This will swap the order that seagate.c messes with
* the CONTROL an DATA registers.
*/
#include <linux/module.h>
#include <linux/interrupt.h>
#include <linux/spinlock.h>
#include <linux/signal.h>
#include <linux/string.h>
#include <linux/proc_fs.h>
#include <linux/init.h>
#include <linux/delay.h>
#include <linux/blk.h>
#include <linux/stat.h>
#include <asm/io.h>
#include <asm/system.h>
#include <asm/uaccess.h>
#include "scsi.h"
#include "hosts.h"
#include "seagate.h"
#include <scsi/scsi_ioctl.h>
#ifdef DEBUG
#define DPRINTK( when, msg... ) do { if ( (DEBUG & (when)) == (when) ) printk( msg ); } while (0)
#else
#define DPRINTK( when, msg... ) do { } while (0)
#endif
#define DANY( msg... ) DPRINTK( 0xffff, msg );
#ifndef IRQ
#define IRQ 5
#endif
#ifdef FAST32
#define FAST
#endif
#undef LINKED /* Linked commands are currently broken! */
#if defined(OVERRIDE) && !defined(CONTROLLER)
#error Please use -DCONTROLLER=SEAGATE or -DCONTROLLER=FD to override controller type
#endif
#ifndef __i386__
#undef SEAGATE_USE_ASM
#endif
/*
Thanks to Brian Antoine for the example code in his Messy-Loss ST-01
driver, and Mitsugu Suzuki for information on the ST-01
SCSI host.
*/
/*
CONTROL defines
*/
#define CMD_RST 0x01
#define CMD_SEL 0x02
#define CMD_BSY 0x04
#define CMD_ATTN 0x08
#define CMD_START_ARB 0x10
#define CMD_EN_PARITY 0x20
#define CMD_INTR 0x40
#define CMD_DRVR_ENABLE 0x80
/*
STATUS
*/
#ifdef SWAPSTAT
#define STAT_MSG 0x08
#define STAT_CD 0x02
#else
#define STAT_MSG 0x02
#define STAT_CD 0x08
#endif
#define STAT_BSY 0x01
#define STAT_IO 0x04
#define STAT_REQ 0x10
#define STAT_SEL 0x20
#define STAT_PARITY 0x40
#define STAT_ARB_CMPL 0x80
/*
REQUESTS
*/
#define REQ_MASK (STAT_CD | STAT_IO | STAT_MSG)
#define REQ_DATAOUT 0
#define REQ_DATAIN STAT_IO
#define REQ_CMDOUT STAT_CD
#define REQ_STATIN (STAT_CD | STAT_IO)
#define REQ_MSGOUT (STAT_MSG | STAT_CD)
#define REQ_MSGIN (STAT_MSG | STAT_CD | STAT_IO)
extern volatile int seagate_st0x_timeout;
#ifdef PARITY
#define BASE_CMD CMD_EN_PARITY
#else
#define BASE_CMD 0
#endif
/*
Debugging code
*/
#define PHASE_BUS_FREE 1
#define PHASE_ARBITRATION 2
#define PHASE_SELECTION 4
#define PHASE_DATAIN 8
#define PHASE_DATAOUT 0x10
#define PHASE_CMDOUT 0x20
#define PHASE_MSGIN 0x40
#define PHASE_MSGOUT 0x80
#define PHASE_STATUSIN 0x100
#define PHASE_ETC (PHASE_DATAIN | PHASE_DATAOUT | PHASE_CMDOUT | PHASE_MSGIN | PHASE_MSGOUT | PHASE_STATUSIN)
#define PRINT_COMMAND 0x200
#define PHASE_EXIT 0x400
#define PHASE_RESELECT 0x800
#define DEBUG_FAST 0x1000
#define DEBUG_SG 0x2000
#define DEBUG_LINKED 0x4000
#define DEBUG_BORKEN 0x8000
/*
* Control options - these are timeouts specified in .01 seconds.
*/
/* 30, 20 work */
#define ST0X_BUS_FREE_DELAY 25
#define ST0X_SELECTION_DELAY 25
#define SEAGATE 1 /* these determine the type of the controller */
#define FD 2
#define ST0X_ID_STR "Seagate ST-01/ST-02"
#define FD_ID_STR "TMC-8XX/TMC-950"
static int internal_command (unsigned char target, unsigned char lun,
const void *cmnd,
void *buff, int bufflen, int reselect);
static int incommand; /* set if arbitration has finished
and we are in some command phase. */
static unsigned int base_address = 0; /* Where the card ROM starts, used to
calculate memory mapped register
location. */
static unsigned long st0x_cr_sr; /* control register write, status
register read. 256 bytes in
length.
Read is status of SCSI BUS, as per
STAT masks. */
static unsigned long st0x_dr; /* data register, read write 256
bytes in length. */
static volatile int st0x_aborted = 0; /* set when we are aborted, ie by a
time out, etc. */
static unsigned char controller_type = 0; /* set to SEAGATE for ST0x
boards or FD for TMC-8xx
boards */
static int irq = IRQ;
MODULE_PARM (base_address, "i");
MODULE_PARM (controller_type, "b");
MODULE_PARM (irq, "i");
MODULE_LICENSE("GPL");
#define retcode(result) (((result) << 16) | (message << 8) | status)
#define STATUS ((u8) isa_readb(st0x_cr_sr))
#define DATA ((u8) isa_readb(st0x_dr))
#define WRITE_CONTROL(d) { isa_writeb((d), st0x_cr_sr); }
#define WRITE_DATA(d) { isa_writeb((d), st0x_dr); }
static void st0x_setup (char *str, int *ints)
{
controller_type = SEAGATE;
base_address = ints[1];
irq = ints[2];
}
static void tmc8xx_setup (char *str, int *ints)
{
controller_type = FD;
base_address = ints[1];
irq = ints[2];
}
#ifndef OVERRIDE
static unsigned int seagate_bases[] = {
0xc8000, 0xca000, 0xcc000,
0xce000, 0xdc000, 0xde000
};
typedef struct {
const unsigned char *signature;
unsigned offset;
unsigned length;
unsigned char type;
} Signature;
static Signature __initdata signatures[] = {
{"ST01 v1.7 (C) Copyright 1987 Seagate", 15, 37, SEAGATE},
{"SCSI BIOS 2.00 (C) Copyright 1987 Seagate", 15, 40, SEAGATE},
/*
* The following two lines are NOT mistakes. One detects ROM revision
* 3.0.0, the other 3.2. Since seagate has only one type of SCSI adapter,
* and this is not going to change, the "SEAGATE" and "SCSI" together
* are probably "good enough"
*/
{"SEAGATE SCSI BIOS ", 16, 17, SEAGATE},
{"SEAGATE SCSI BIOS ", 17, 17, SEAGATE},
/*
* However, future domain makes several incompatible SCSI boards, so specific
* signatures must be used.
*/
{"FUTURE DOMAIN CORP. (C) 1986-1989 V5.0C2/14/89", 5, 46, FD},
{"FUTURE DOMAIN CORP. (C) 1986-1989 V6.0A7/28/89", 5, 46, FD},
{"FUTURE DOMAIN CORP. (C) 1986-1990 V6.0105/31/90", 5, 47, FD},
{"FUTURE DOMAIN CORP. (C) 1986-1990 V6.0209/18/90", 5, 47, FD},
{"FUTURE DOMAIN CORP. (C) 1986-1990 V7.009/18/90", 5, 46, FD},
{"FUTURE DOMAIN CORP. (C) 1992 V8.00.004/02/92", 5, 44, FD},
{"IBM F1 BIOS V1.1004/30/92", 5, 25, FD},
{"FUTURE DOMAIN TMC-950", 5, 21, FD},
/* Added for 2.2.16 by Matthias_Heidbrink@b.maus.de */
{"IBM F1 V1.2009/22/93", 5, 25, FD},
};
#define NUM_SIGNATURES (sizeof(signatures) / sizeof(Signature))
#endif /* n OVERRIDE */
/*
* hostno stores the hostnumber, as told to us by the init routine.
*/
static int hostno = -1;
static void seagate_reconnect_intr (int, void *, struct pt_regs *);
static void do_seagate_reconnect_intr (int, void *, struct pt_regs *);
#ifdef FAST
static int fast = 1;
#else
#define fast 0
#endif
#ifdef SLOW_RATE
/*
* Support for broken devices :
* The Seagate board has a handshaking problem. Namely, a lack
* thereof for slow devices. You can blast 600K/second through
* it if you are polling for each byte, more if you do a blind
* transfer. In the first case, with a fast device, REQ will
* transition high-low or high-low-high before your loop restarts
* and you'll have no problems. In the second case, the board
* will insert wait states for up to 13.2 usecs for REQ to
* transition low->high, and everything will work.
*
* However, there's nothing in the state machine that says
* you *HAVE* to see a high-low-high set of transitions before
* sending the next byte, and slow things like the Trantor CD ROMS
* will break because of this.
*
* So, we need to slow things down, which isn't as simple as it
* seems. We can't slow things down period, because then people
* who don't recompile their kernels will shoot me for ruining
* their performance. We need to do it on a case per case basis.
*
* The best for performance will be to, only for borken devices
* (this is stored on a per-target basis in the scsi_devices array)
*
* Wait for a low->high transition before continuing with that
* transfer. If we timeout, continue anyways. We don't need
* a long timeout, because REQ should only be asserted until the
* corresponding ACK is received and processed.
*
* Note that we can't use the system timer for this, because of
* resolution, and we *really* can't use the timer chip since
* gettimeofday() and the beeper routines use that. So,
* the best thing for us to do will be to calibrate a timing
* loop in the initialization code using the timer chip before
* gettimeofday() can screw with it.
*
* FIXME: this is broken (not borken :-). Empty loop costs less than
* loop with ISA access in it! -- pavel@ucw.cz
*/
static int borken_calibration = 0;
static void __init borken_init (void)
{
register int count = 0, start = jiffies + 1, stop = start + 25;
/* FIXME: There may be a better approach, this is a straight port for
now */
preempt_disable();
while (time_before (jiffies, start))
cpu_relax();
for (; time_before (jiffies, stop); ++count)
cpu_relax();
preempt_enable();
/*
* Ok, we now have a count for .25 seconds. Convert to a
* count per second and divide by transfer rate in K. */
borken_calibration = (count * 4) / (SLOW_RATE * 1024);
if (borken_calibration < 1)
borken_calibration = 1;
}
static inline void borken_wait (void)
{
register int count;
for (count = borken_calibration; count && (STATUS & STAT_REQ); --count)
cpu_relax();
#if (DEBUG & DEBUG_BORKEN)
if (count)
printk ("scsi%d : borken timeout\n", hostno);
#endif
}
#endif /* def SLOW_RATE */
/* These beasts only live on ISA, and ISA means 8MHz. Each ULOOP()
* contains at least one ISA access, which takes more than 0.125
* usec. So if we loop 8 times time in usec, we are safe.
*/
#define ULOOP( i ) for (clock = i*8;;)
#define TIMEOUT (!(clock--))
int __init seagate_st0x_detect (Scsi_Host_Template * tpnt)
{
struct Scsi_Host *instance;
int i, j;
tpnt->proc_name = "seagate";
/*
* First, we try for the manual override.
*/
DANY ("Autodetecting ST0x / TMC-8xx\n");
if (hostno != -1) {
printk (KERN_ERR "seagate_st0x_detect() called twice?!\n");
return 0;
}
/* If the user specified the controller type from the command line,
controller_type will be non-zero, so don't try to detect one */
if (!controller_type) {
#ifdef OVERRIDE
base_address = OVERRIDE;
controller_type = CONTROLLER;
DANY ("Base address overridden to %x, controller type is %s\n",
base_address,
controller_type == SEAGATE ? "SEAGATE" : "FD");
#else /* OVERRIDE */
/*
* To detect this card, we simply look for the signature
* from the BIOS version notice in all the possible locations
* of the ROM's. This has a nice side effect of not trashing
* any register locations that might be used by something else.
*
* XXX - note that we probably should be probing the address
* space for the on-board RAM instead.
*/
for (i = 0; i < (sizeof (seagate_bases) / sizeof (unsigned int)); ++i)
for (j = 0; !base_address && j < NUM_SIGNATURES; ++j)
if (isa_check_signature(seagate_bases[i] + signatures[j].offset, signatures[j].signature, signatures[j].length)) {
base_address = seagate_bases[i];
controller_type = signatures[j].type;
}
#endif /* OVERRIDE */
}
/* (! controller_type) */
tpnt->this_id = (controller_type == SEAGATE) ? 7 : 6;
tpnt->name = (controller_type == SEAGATE) ? ST0X_ID_STR : FD_ID_STR;
if (!base_address) {
printk(KERN_INFO "seagate: ST0x/TMC-8xx not detected.\n");
return 0;
}
st0x_cr_sr = base_address + (controller_type == SEAGATE ? 0x1a00 : 0x1c00);
st0x_dr = st0x_cr_sr + 0x200;
DANY("%s detected. Base address = %x, cr = %x, dr = %x\n",
tpnt->name, base_address, st0x_cr_sr, st0x_dr);
/*
* At all times, we will use IRQ 5. Should also check for IRQ3
* if we lose our first interrupt.
*/
instance = scsi_register (tpnt, 0);
if (instance == NULL)
return 0;
hostno = instance->host_no;
if (request_irq (irq, do_seagate_reconnect_intr, SA_INTERRUPT, (controller_type == SEAGATE) ? "seagate" : "tmc-8xx", instance)) {
printk(KERN_ERR "scsi%d : unable to allocate IRQ%d\n", hostno, irq);
return 0;
}
instance->irq = irq;
instance->io_port = base_address;
#ifdef SLOW_RATE
printk(KERN_INFO "Calibrating borken timer... ");
borken_init();
printk(" %d cycles per transfer\n", borken_calibration);
#endif
printk (KERN_INFO "This is one second... ");
{
int clock;
ULOOP (1 * 1000 * 1000) {
STATUS;
if (TIMEOUT)
break;
}
}
printk ("done, %s options:"
#ifdef ARBITRATE
" ARBITRATE"
#endif
#ifdef DEBUG
" DEBUG"
#endif
#ifdef FAST
" FAST"
#ifdef FAST32
"32"
#endif
#endif
#ifdef LINKED
" LINKED"
#endif
#ifdef PARITY
" PARITY"
#endif
#ifdef SEAGATE_USE_ASM
" SEAGATE_USE_ASM"
#endif
#ifdef SLOW_RATE
" SLOW_RATE"
#endif
#ifdef SWAPSTAT
" SWAPSTAT"
#endif
#ifdef SWAPCNTDATA
" SWAPCNTDATA"
#endif
"\n", tpnt->name);
return 1;
}
static const char *seagate_st0x_info (struct Scsi_Host *shpnt)
{
static char buffer[64];
snprintf(buffer, 64, "%s at irq %d, address 0x%05X",
(controller_type == SEAGATE) ? ST0X_ID_STR : FD_ID_STR,
irq, base_address);
return buffer;
}
/*
* These are our saved pointers for the outstanding command that is
* waiting for a reconnect
*/
static unsigned char current_target, current_lun;
static unsigned char *current_cmnd, *current_data;
static int current_nobuffs;
static struct scatterlist *current_buffer;
static int current_bufflen;
#ifdef LINKED
/*
* linked_connected indicates whether or not we are currently connected to
* linked_target, linked_lun and in an INFORMATION TRANSFER phase,
* using linked commands.
*/
static int linked_connected = 0;
static unsigned char linked_target, linked_lun;
#endif
static void (*done_fn) (Scsi_Cmnd *) = NULL;
static Scsi_Cmnd *SCint = NULL;
/*
* These control whether or not disconnect / reconnect will be attempted,
* or are being attempted.
*/
#define NO_RECONNECT 0
#define RECONNECT_NOW 1
#define CAN_RECONNECT 2
/*
* LINKED_RIGHT indicates that we are currently connected to the correct target
* for this command, LINKED_WRONG indicates that we are connected to the wrong
* target. Note that these imply CAN_RECONNECT and require defined(LINKED).
*/
#define LINKED_RIGHT 3
#define LINKED_WRONG 4
/*
* This determines if we are expecting to reconnect or not.
*/
static int should_reconnect = 0;
/*
* The seagate_reconnect_intr routine is called when a target reselects the
* host adapter. This occurs on the interrupt triggered by the target
* asserting SEL.
*/
static void do_seagate_reconnect_intr (int irq, void *dev_id, struct pt_regs *regs)
{
unsigned long flags;
struct Scsi_Host *dev = dev_id;
spin_lock_irqsave (dev->host_lock, flags);
seagate_reconnect_intr (irq, dev_id, regs);
spin_unlock_irqrestore (dev->host_lock, flags);
}
static void seagate_reconnect_intr (int irq, void *dev_id, struct pt_regs *regs)
{
int temp;
Scsi_Cmnd *SCtmp;
DPRINTK (PHASE_RESELECT, "scsi%d : seagate_reconnect_intr() called\n", hostno);
if (!should_reconnect)
printk(KERN_WARNING "scsi%d: unexpected interrupt.\n", hostno);
else {
should_reconnect = 0;
DPRINTK (PHASE_RESELECT, "scsi%d : internal_command(%d, %08x, %08x, RECONNECT_NOW\n",
hostno, current_target, current_data, current_bufflen);
temp = internal_command (current_target, current_lun, current_cmnd, current_data, current_bufflen, RECONNECT_NOW);
if (msg_byte(temp) != DISCONNECT) {
if (done_fn) {
DPRINTK(PHASE_RESELECT, "scsi%d : done_fn(%d,%08x)", hostno, hostno, temp);
if (!SCint)
panic ("SCint == NULL in seagate");
SCtmp = SCint;
SCint = NULL;
SCtmp->result = temp;
done_fn(SCtmp);
} else
printk(KERN_ERR "done_fn() not defined.\n");
}
}
}
/*
* The seagate_st0x_queue_command() function provides a queued interface
* to the seagate SCSI driver. Basically, it just passes control onto the
* seagate_command() function, after fixing it so that the done_fn()
* is set to the one passed to the function. We have to be very careful,
* because there are some commands on some devices that do not disconnect,
* and if we simply call the done_fn when the command is done then another
* command is started and queue_command is called again... We end up
* overflowing the kernel stack, and this tends not to be such a good idea.
*/
static int recursion_depth = 0;
static int seagate_st0x_queue_command (Scsi_Cmnd * SCpnt, void (*done) (Scsi_Cmnd *))
{
int result, reconnect;
Scsi_Cmnd *SCtmp;
DANY ("seagate: que_command");
done_fn = done;
current_target = SCpnt->device->id;
current_lun = SCpnt->device->lun;
current_cmnd = SCpnt->cmnd;
current_data = (unsigned char *) SCpnt->request_buffer;
current_bufflen = SCpnt->request_bufflen;
SCint = SCpnt;
if (recursion_depth)
return 1;
recursion_depth++;
do {
#ifdef LINKED
/*
* Set linked command bit in control field of SCSI command.
*/
current_cmnd[SCpnt->cmd_len] |= 0x01;
if (linked_connected) {
DPRINTK (DEBUG_LINKED, "scsi%d : using linked commands, current I_T_L nexus is ", hostno);
if (linked_target == current_target && linked_lun == current_lun)
{
DPRINTK(DEBUG_LINKED, "correct\n");
reconnect = LINKED_RIGHT;
} else {
DPRINTK(DEBUG_LINKED, "incorrect\n");
reconnect = LINKED_WRONG;
}
} else
#endif /* LINKED */
reconnect = CAN_RECONNECT;
result = internal_command(SCint->device->id, SCint->device->lun, SCint->cmnd,
SCint->request_buffer, SCint->request_bufflen, reconnect);
if (msg_byte(result) == DISCONNECT)
break;
SCtmp = SCint;
SCint = NULL;
SCtmp->result = result;
done_fn(SCtmp);
}
while (SCint);
recursion_depth--;
return 0;
}
static int seagate_st0x_command(Scsi_Cmnd * SCpnt)
{
return internal_command (SCpnt->device->id, SCpnt->device->lun, SCpnt->cmnd,
SCpnt->request_buffer, SCpnt->request_bufflen,
(int) NO_RECONNECT);
}
static int internal_command (unsigned char target, unsigned char lun,
const void *cmnd, void *buff, int bufflen, int reselect)
{
unsigned char *data = NULL;
struct scatterlist *buffer = NULL;
int clock, temp, nobuffs = 0, done = 0, len = 0;
#ifdef DEBUG
int transfered = 0, phase = 0, newphase;
#endif
register unsigned char status_read;
unsigned char tmp_data, tmp_control, status = 0, message = 0;
unsigned transfersize = 0, underflow = 0;
#ifdef SLOW_RATE
int borken = (int) SCint->device->borken; /* Does the current target require
Very Slow I/O ? */
#endif
incommand = 0;
st0x_aborted = 0;
#if (DEBUG & PRINT_COMMAND)
printk("scsi%d : target = %d, command = ", hostno, target);
print_command((unsigned char *) cmnd);
#endif
#if (DEBUG & PHASE_RESELECT)
switch (reselect) {
case RECONNECT_NOW:
printk("scsi%d : reconnecting\n", hostno);
break;
#ifdef LINKED
case LINKED_RIGHT:
printk("scsi%d : connected, can reconnect\n", hostno);
break;
case LINKED_WRONG:
printk("scsi%d : connected to wrong target, can reconnect\n",
hostno);
break;
#endif
case CAN_RECONNECT:
printk("scsi%d : allowed to reconnect\n", hostno);
break;
default:
printk("scsi%d : not allowed to reconnect\n", hostno);
}
#endif
if (target == (controller_type == SEAGATE ? 7 : 6))
return DID_BAD_TARGET;
/*
* We work it differently depending on if this is is "the first time,"
* or a reconnect. If this is a reselect phase, then SEL will
* be asserted, and we must skip selection / arbitration phases.
*/
switch (reselect) {
case RECONNECT_NOW:
DPRINTK (PHASE_RESELECT, "scsi%d : phase RESELECT \n", hostno);
/*
* At this point, we should find the logical or of our ID
* and the original target's ID on the BUS, with BSY, SEL,
* and I/O signals asserted.
*
* After ARBITRATION phase is completed, only SEL, BSY,
* and the target ID are asserted. A valid initiator ID
* is not on the bus until IO is asserted, so we must wait
* for that.
*/
ULOOP (100 * 1000) {
temp = STATUS;
if ((temp & STAT_IO) && !(temp & STAT_BSY))
break;
if (TIMEOUT) {
DPRINTK (PHASE_RESELECT, "scsi%d : RESELECT timed out while waiting for IO .\n", hostno);
return (DID_BAD_INTR << 16);
}
}
/*
* After I/O is asserted by the target, we can read our ID
* and its ID off of the BUS.
*/
if (!((temp = DATA) & (controller_type == SEAGATE ? 0x80 : 0x40))) {
DPRINTK (PHASE_RESELECT, "scsi%d : detected reconnect request to different target.\n\tData bus = %d\n", hostno, temp);
return (DID_BAD_INTR << 16);
}
if (!(temp & (1 << current_target))) {
printk(KERN_WARNING "scsi%d : Unexpected reselect interrupt. Data bus = %d\n", hostno, temp);
return (DID_BAD_INTR << 16);
}
buffer = current_buffer;
cmnd = current_cmnd; /* WDE add */
data = current_data; /* WDE add */
len = current_bufflen; /* WDE add */
nobuffs = current_nobuffs;
/*
* We have determined that we have been selected. At this
* point, we must respond to the reselection by asserting
* BSY ourselves
*/
#if 1
WRITE_CONTROL (BASE_CMD | CMD_DRVR_ENABLE | CMD_BSY);
#else
WRITE_CONTROL (BASE_CMD | CMD_BSY);
#endif
/*
* The target will drop SEL, and raise BSY, at which time
* we must drop BSY.
*/
ULOOP (100 * 1000) {
if (!(STATUS & STAT_SEL))
break;
if (TIMEOUT) {
WRITE_CONTROL (BASE_CMD | CMD_INTR);
DPRINTK (PHASE_RESELECT, "scsi%d : RESELECT timed out while waiting for SEL.\n", hostno);
return (DID_BAD_INTR << 16);
}
}
WRITE_CONTROL (BASE_CMD);
/*
* At this point, we have connected with the target
* and can get on with our lives.
*/
break;
case CAN_RECONNECT:
#ifdef LINKED
/*
* This is a bletcherous hack, just as bad as the Unix #!
* interpreter stuff. If it turns out we are using the wrong
* I_T_L nexus, the easiest way to deal with it is to go into
* our INFORMATION TRANSFER PHASE code, send a ABORT
* message on MESSAGE OUT phase, and then loop back to here.
*/
connect_loop:
#endif
DPRINTK (PHASE_BUS_FREE, "scsi%d : phase = BUS FREE \n", hostno);
/*
* BUS FREE PHASE
*
* On entry, we make sure that the BUS is in a BUS FREE
* phase, by insuring that both BSY and SEL are low for
* at least one bus settle delay. Several reads help
* eliminate wire glitch.
*/
#ifndef ARBITRATE
#error FIXME: this is broken: we may not use jiffies here - we are under cli(). It will hardlock.
clock = jiffies + ST0X_BUS_FREE_DELAY;
while (((STATUS | STATUS | STATUS) & (STAT_BSY | STAT_SEL)) && (!st0x_aborted) && time_before (jiffies, clock))
cpu_relax();
if (time_after (jiffies, clock))
return retcode (DID_BUS_BUSY);
else if (st0x_aborted)
return retcode (st0x_aborted);
#endif
DPRINTK (PHASE_SELECTION, "scsi%d : phase = SELECTION\n", hostno);
clock = jiffies + ST0X_SELECTION_DELAY;
/*
* Arbitration/selection procedure :
* 1. Disable drivers
* 2. Write HOST adapter address bit
* 3. Set start arbitration.
* 4. We get either ARBITRATION COMPLETE or SELECT at this
* point.
* 5. OR our ID and targets on bus.
* 6. Enable SCSI drivers and asserted SEL and ATTN
*/
#ifdef ARBITRATE
/* FIXME: verify host lock is always held here */
WRITE_CONTROL(0);
WRITE_DATA((controller_type == SEAGATE) ? 0x80 : 0x40);
WRITE_CONTROL(CMD_START_ARB);
ULOOP (ST0X_SELECTION_DELAY * 10000) {
status_read = STATUS;
if (status_read & STAT_ARB_CMPL)
break;
if (st0x_aborted) /* FIXME: What? We are going to do something even after abort? */
break;
if (TIMEOUT || (status_read & STAT_SEL)) {
printk(KERN_WARNING "scsi%d : arbitration lost or timeout.\n", hostno);
WRITE_CONTROL (BASE_CMD);
return retcode (DID_NO_CONNECT);
}
}
DPRINTK (PHASE_SELECTION, "scsi%d : arbitration complete\n", hostno);
#endif
/*
* When the SCSI device decides that we're gawking at it,
* it will respond by asserting BUSY on the bus.
*
* Note : the Seagate ST-01/02 product manual says that we
* should twiddle the DATA register before the control
* register. However, this does not work reliably so we do
* it the other way around.
*
* Probably could be a problem with arbitration too, we
* really should try this with a SCSI protocol or logic
* analyzer to see what is going on.
*/
tmp_data = (unsigned char) ((1 << target) | (controller_type == SEAGATE ? 0x80 : 0x40));
tmp_control = BASE_CMD | CMD_DRVR_ENABLE | CMD_SEL | (reselect ? CMD_ATTN : 0);
/* FIXME: verify host lock is always held here */
#ifdef OLDCNTDATASCEME
#ifdef SWAPCNTDATA
WRITE_CONTROL (tmp_control);
WRITE_DATA (tmp_data);
#else
WRITE_DATA (tmp_data);
WRITE_CONTROL (tmp_control);
#endif
#else
tmp_control ^= CMD_BSY; /* This is guesswork. What used to be in driver */
WRITE_CONTROL (tmp_control); /* could never work: it sent data into control */
WRITE_DATA (tmp_data); /* register and control info into data. Hopefully */
tmp_control ^= CMD_BSY; /* fixed, but order of first two may be wrong. */
WRITE_CONTROL (tmp_control); /* -- pavel@ucw.cz */
#endif
ULOOP (250 * 1000) {
if (st0x_aborted) {
/*
* If we have been aborted, and we have a
* command in progress, IE the target
* still has BSY asserted, then we will
* reset the bus, and notify the midlevel
* driver to expect sense.
*/
WRITE_CONTROL (BASE_CMD);
if (STATUS & STAT_BSY) {
printk(KERN_WARNING "scsi%d : BST asserted after we've been aborted.\n", hostno);
seagate_st0x_bus_reset(NULL);
return retcode (DID_RESET);
}
return retcode (st0x_aborted);
}
if (STATUS & STAT_BSY)
break;
if (TIMEOUT) {
DPRINTK (PHASE_SELECTION, "scsi%d : NO CONNECT with target %d, stat = %x \n", hostno, target, STATUS);
return retcode (DID_NO_CONNECT);
}
}
/* Establish current pointers. Take into account scatter / gather */
if ((nobuffs = SCint->use_sg)) {
#if (DEBUG & DEBUG_SG)
{
int i;
printk("scsi%d : scatter gather requested, using %d buffers.\n", hostno, nobuffs);
for (i = 0; i < nobuffs; ++i)
printk("scsi%d : buffer %d address = %p length = %d\n",
hostno, i,
page_address(buffer[i].page) + buffer[i].offset,
buffer[i].length);
}
#endif
buffer = (struct scatterlist *) SCint->buffer;
len = buffer->length;
data = page_address(buffer->page) + buffer->offset;
} else {
DPRINTK (DEBUG_SG, "scsi%d : scatter gather not requested.\n", hostno);
buffer = NULL;
len = SCint->request_bufflen;
data = (unsigned char *) SCint->request_buffer;
}
DPRINTK (PHASE_DATAIN | PHASE_DATAOUT, "scsi%d : len = %d\n",
hostno, len);
break;
#ifdef LINKED
case LINKED_RIGHT:
break;
case LINKED_WRONG:
break;
#endif
} /* end of switch(reselect) */
/*
* There are several conditions under which we wish to send a message :
* 1. When we are allowing disconnect / reconnect, and need to
* establish the I_T_L nexus via an IDENTIFY with the DiscPriv bit
* set.
*
* 2. When we are doing linked commands, are have the wrong I_T_L
* nexus established and want to send an ABORT message.
*/
/* GCC does not like an ifdef inside a macro, so do it the hard way. */
#ifdef LINKED
WRITE_CONTROL (BASE_CMD | CMD_DRVR_ENABLE | (((reselect == CAN_RECONNECT)|| (reselect == LINKED_WRONG))? CMD_ATTN : 0));
#else
WRITE_CONTROL (BASE_CMD | CMD_DRVR_ENABLE | (((reselect == CAN_RECONNECT))? CMD_ATTN : 0));
#endif
/*
* INFORMATION TRANSFER PHASE
*
* The nasty looking read / write inline assembler loops we use for
* DATAIN and DATAOUT phases are approximately 4-5 times as fast as
* the 'C' versions - since we're moving 1024 bytes of data, this
* really adds up.
*
* SJT: The nasty-looking assembler is gone, so it's slower.
*
*/
DPRINTK (PHASE_ETC, "scsi%d : phase = INFORMATION TRANSFER\n", hostno);
incommand = 1;
transfersize = SCint->transfersize;
underflow = SCint->underflow;
/*
* Now, we poll the device for status information,
* and handle any requests it makes. Note that since we are unsure
* of how much data will be flowing across the system, etc and
* cannot make reasonable timeouts, that we will instead have the
* midlevel driver handle any timeouts that occur in this phase.
*/
while (((status_read = STATUS) & STAT_BSY) && !st0x_aborted && !done) {
#ifdef PARITY
if (status_read & STAT_PARITY) {
printk(KERN_ERR "scsi%d : got parity error\n", hostno);
st0x_aborted = DID_PARITY;
}
#endif
if (status_read & STAT_REQ) {
#if ((DEBUG & PHASE_ETC) == PHASE_ETC)
if ((newphase = (status_read & REQ_MASK)) != phase) {
phase = newphase;
switch (phase) {
case REQ_DATAOUT:
printk ("scsi%d : phase = DATA OUT\n", hostno);
break;
case REQ_DATAIN:
printk ("scsi%d : phase = DATA IN\n", hostno);
break;
case REQ_CMDOUT:
printk
("scsi%d : phase = COMMAND OUT\n", hostno);
break;
case REQ_STATIN:
printk ("scsi%d : phase = STATUS IN\n", hostno);
break;
case REQ_MSGOUT:
printk
("scsi%d : phase = MESSAGE OUT\n", hostno);
break;
case REQ_MSGIN:
printk ("scsi%d : phase = MESSAGE IN\n", hostno);
break;
default:
printk ("scsi%d : phase = UNKNOWN\n", hostno);
st0x_aborted = DID_ERROR;
}
}
#endif
switch (status_read & REQ_MASK) {
case REQ_DATAOUT:
/*
* If we are in fast mode, then we simply splat
* the data out in word-sized chunks as fast as
* we can.
*/
if (!len) {
#if 0
printk("scsi%d: underflow to target %d lun %d \n", hostno, target, lun);
st0x_aborted = DID_ERROR;
fast = 0;
#endif
break;
}
if (fast && transfersize
&& !(len % transfersize)
&& (len >= transfersize)
#ifdef FAST32
&& !(transfersize % 4)
#endif
) {
DPRINTK (DEBUG_FAST,
"scsi%d : FAST transfer, underflow = %d, transfersize = %d\n"
" len = %d, data = %08x\n",
hostno, SCint->underflow,
SCint->transfersize, len,
data);
/* SJT: Start. Fast Write */
#ifdef SEAGATE_USE_ASM
__asm__ ("cld\n\t"
#ifdef FAST32
"shr $2, %%ecx\n\t"
"1:\t"
"lodsl\n\t"
"movl %%eax, (%%edi)\n\t"
#else
"1:\t"
"lodsb\n\t"
"movb %%al, (%%edi)\n\t"
#endif
"loop 1b;"
/* output */ :
/* input */ :"D" (phys_to_virt (st0x_dr)),
"S"
(data),
"c" (SCint->transfersize)
/* clobbered */
: "eax", "ecx",
"esi");
#else /* SEAGATE_USE_ASM */
{
#ifdef FAST32
unsigned int *iop = phys_to_virt (st0x_dr);
const unsigned int *dp =(unsigned int *) data;
int xferlen = transfersize >> 2;
#else
unsigned char *iop = phys_to_virt (st0x_dr);
const unsigned char *dp = data;
int xferlen = transfersize;
#endif
for (; xferlen; --xferlen)
*iop = *dp++;
}
#endif /* SEAGATE_USE_ASM */
/* SJT: End */
len -= transfersize;
data += transfersize;
DPRINTK (DEBUG_FAST, "scsi%d : FAST transfer complete len = %d data = %08x\n", hostno, len, data);
} else {
/*
* We loop as long as we are in a
* data out phase, there is data to
* send, and BSY is still active.
*/
/* SJT: Start. Slow Write. */
#ifdef SEAGATE_USE_ASM
int __dummy_1, __dummy_2;
/*
* We loop as long as we are in a data out phase, there is data to send,
* and BSY is still active.
*/
/* Local variables : len = ecx , data = esi,
st0x_cr_sr = ebx, st0x_dr = edi
*/
__asm__ (
/* Test for any data here at all. */
"orl %%ecx, %%ecx\n\t"
"jz 2f\n\t" "cld\n\t"
/* "movl st0x_cr_sr, %%ebx\n\t" */
/* "movl st0x_dr, %%edi\n\t" */
"1:\t"
"movb (%%ebx), %%al\n\t"
/* Test for BSY */
"test $1, %%al\n\t"
"jz 2f\n\t"
/* Test for data out phase - STATUS & REQ_MASK should be
REQ_DATAOUT, which is 0. */
"test $0xe, %%al\n\t"
"jnz 2f\n\t"
/* Test for REQ */
"test $0x10, %%al\n\t"
"jz 1b\n\t"
"lodsb\n\t"
"movb %%al, (%%edi)\n\t"
"loop 1b\n\t" "2:\n"
/* output */ :"=S" (data), "=c" (len),
"=b"
(__dummy_1),
"=D" (__dummy_2)
/* input */
: "0" (data), "1" (len),
"2" (phys_to_virt
(st0x_cr_sr)),
"3" (phys_to_virt
(st0x_dr))
/* clobbered */
: "eax");
#else /* SEAGATE_USE_ASM */
while (len) {
unsigned char stat;
stat = STATUS;
if (!(stat & STAT_BSY)
|| ((stat & REQ_MASK) !=
REQ_DATAOUT))
break;
if (stat & STAT_REQ) {
WRITE_DATA (*data++);
--len;
}
}
#endif /* SEAGATE_USE_ASM */
/* SJT: End. */
}
if (!len && nobuffs) {
--nobuffs;
++buffer;
len = buffer->length;
data = page_address(buffer->page) + buffer->offset;
DPRINTK (DEBUG_SG,
"scsi%d : next scatter-gather buffer len = %d address = %08x\n",
hostno, len, data);
}
break;
case REQ_DATAIN:
#ifdef SLOW_RATE
if (borken) {
#if (DEBUG & (PHASE_DATAIN))
transfered += len;
#endif
for (; len && (STATUS & (REQ_MASK | STAT_REQ)) == (REQ_DATAIN | STAT_REQ); --len) {
*data++ = DATA;
borken_wait();
}
#if (DEBUG & (PHASE_DATAIN))
transfered -= len;
#endif
} else
#endif
if (fast && transfersize
&& !(len % transfersize)
&& (len >= transfersize)
#ifdef FAST32
&& !(transfersize % 4)
#endif
) {
DPRINTK (DEBUG_FAST,
"scsi%d : FAST transfer, underflow = %d, transfersize = %d\n"
" len = %d, data = %08x\n",
hostno, SCint->underflow,
SCint->transfersize, len,
data);
/* SJT: Start. Fast Read */
#ifdef SEAGATE_USE_ASM
__asm__ ("cld\n\t"
#ifdef FAST32
"shr $2, %%ecx\n\t"
"1:\t"
"movl (%%esi), %%eax\n\t"
"stosl\n\t"
#else
"1:\t"
"movb (%%esi), %%al\n\t"
"stosb\n\t"
#endif
"loop 1b\n\t"
/* output */ :
/* input */ :"S" (phys_to_virt (st0x_dr)),
"D"
(data),
"c" (SCint->transfersize)
/* clobbered */
: "eax", "ecx",
"edi");
#else /* SEAGATE_USE_ASM */
{
#ifdef FAST32
const unsigned int *iop =
phys_to_virt (st0x_dr);
unsigned int *dp =
(unsigned int *) data;
int xferlen = len >> 2;
#else
const unsigned char *iop =
phys_to_virt (st0x_dr);
unsigned char *dp = data;
int xferlen = len;
#endif
for (; xferlen; --xferlen)
*dp++ = *iop;
}
#endif /* SEAGATE_USE_ASM */
/* SJT: End */
len -= transfersize;
data += transfersize;
#if (DEBUG & PHASE_DATAIN)
printk ("scsi%d: transfered += %d\n", hostno, transfersize);
transfered += transfersize;
#endif
DPRINTK (DEBUG_FAST, "scsi%d : FAST transfer complete len = %d data = %08x\n", hostno, len, data);
} else {
#if (DEBUG & PHASE_DATAIN)
printk ("scsi%d: transfered += %d\n", hostno, len);
transfered += len; /* Assume we'll transfer it all, then
subtract what we *didn't* transfer */
#endif
/*
* We loop as long as we are in a data in phase, there is room to read,
* and BSY is still active
*/
/* SJT: Start. */
#ifdef SEAGATE_USE_ASM
int __dummy_3, __dummy_4;
/* Dummy clobbering variables for the new gcc-2.95 */
/*
* We loop as long as we are in a data in phase, there is room to read,
* and BSY is still active
*/
/* Local variables : ecx = len, edi = data
esi = st0x_cr_sr, ebx = st0x_dr */
__asm__ (
/* Test for room to read */
"orl %%ecx, %%ecx\n\t"
"jz 2f\n\t" "cld\n\t"
/* "movl st0x_cr_sr, %%esi\n\t" */
/* "movl st0x_dr, %%ebx\n\t" */
"1:\t"
"movb (%%esi), %%al\n\t"
/* Test for BSY */
"test $1, %%al\n\t"
"jz 2f\n\t"
/* Test for data in phase - STATUS & REQ_MASK should be REQ_DATAIN,
= STAT_IO, which is 4. */
"movb $0xe, %%ah\n\t"
"andb %%al, %%ah\n\t"
"cmpb $0x04, %%ah\n\t"
"jne 2f\n\t"
/* Test for REQ */
"test $0x10, %%al\n\t"
"jz 1b\n\t"
"movb (%%ebx), %%al\n\t"
"stosb\n\t"
"loop 1b\n\t" "2:\n"
/* output */ :"=D" (data), "=c" (len),
"=S"
(__dummy_3),
"=b" (__dummy_4)
/* input */
: "0" (data), "1" (len),
"2" (phys_to_virt
(st0x_cr_sr)),
"3" (phys_to_virt
(st0x_dr))
/* clobbered */
: "eax");
#else /* SEAGATE_USE_ASM */
while (len) {
unsigned char stat;
stat = STATUS;
if (!(stat & STAT_BSY)
|| ((stat & REQ_MASK) !=
REQ_DATAIN))
break;
if (stat & STAT_REQ) {
*data++ = DATA;
--len;
}
}
#endif /* SEAGATE_USE_ASM */
/* SJT: End. */
#if (DEBUG & PHASE_DATAIN)
printk ("scsi%d: transfered -= %d\n", hostno, len);
transfered -= len; /* Since we assumed all of Len got *
transfered, correct our mistake */
#endif
}
if (!len && nobuffs) {
--nobuffs;
++buffer;
len = buffer->length;
data = page_address(buffer->page) + buffer->offset;
DPRINTK (DEBUG_SG, "scsi%d : next scatter-gather buffer len = %d address = %08x\n", hostno, len, data);
}
break;
case REQ_CMDOUT:
while (((status_read = STATUS) & STAT_BSY) &&
((status_read & REQ_MASK) == REQ_CMDOUT))
if (status_read & STAT_REQ) {
WRITE_DATA (*(const unsigned char *) cmnd);
cmnd = 1 + (const unsigned char *)cmnd;
#ifdef SLOW_RATE
if (borken)
borken_wait ();
#endif
}
break;
case REQ_STATIN:
status = DATA;
break;
case REQ_MSGOUT:
/*
* We can only have sent a MSG OUT if we
* requested to do this by raising ATTN.
* So, we must drop ATTN.
*/
WRITE_CONTROL (BASE_CMD | CMD_DRVR_ENABLE);
/*
* If we are reconnecting, then we must
* send an IDENTIFY message in response
* to MSGOUT.
*/
switch (reselect) {
case CAN_RECONNECT:
WRITE_DATA (IDENTIFY (1, lun));
DPRINTK (PHASE_RESELECT | PHASE_MSGOUT, "scsi%d : sent IDENTIFY message.\n", hostno);
break;
#ifdef LINKED
case LINKED_WRONG:
WRITE_DATA (ABORT);
linked_connected = 0;
reselect = CAN_RECONNECT;
goto connect_loop;
DPRINTK (PHASE_MSGOUT | DEBUG_LINKED, "scsi%d : sent ABORT message to cancel incorrect I_T_L nexus.\n", hostno);
#endif /* LINKED */
DPRINTK (DEBUG_LINKED, "correct\n");
default:
WRITE_DATA (NOP);
printk("scsi%d : target %d requested MSGOUT, sent NOP message.\n", hostno, target);
}
break;
case REQ_MSGIN:
switch (message = DATA) {
case DISCONNECT:
DANY("seagate: deciding to disconnect\n");
should_reconnect = 1;
current_data = data; /* WDE add */
current_buffer = buffer;
current_bufflen = len; /* WDE add */
current_nobuffs = nobuffs;
#ifdef LINKED
linked_connected = 0;
#endif
done = 1;
DPRINTK ((PHASE_RESELECT | PHASE_MSGIN), "scsi%d : disconnected.\n", hostno);
break;
#ifdef LINKED
case LINKED_CMD_COMPLETE:
case LINKED_FLG_CMD_COMPLETE:
#endif
case COMMAND_COMPLETE:
/*
* Note : we should check for underflow here.
*/
DPRINTK(PHASE_MSGIN, "scsi%d : command complete.\n", hostno);
done = 1;
break;
case ABORT:
DPRINTK(PHASE_MSGIN, "scsi%d : abort message.\n", hostno);
done = 1;
break;
case SAVE_POINTERS:
current_buffer = buffer;
current_bufflen = len; /* WDE add */
current_data = data; /* WDE mod */
current_nobuffs = nobuffs;
DPRINTK (PHASE_MSGIN, "scsi%d : pointers saved.\n", hostno);
break;
case RESTORE_POINTERS:
buffer = current_buffer;
cmnd = current_cmnd;
data = current_data; /* WDE mod */
len = current_bufflen;
nobuffs = current_nobuffs;
DPRINTK(PHASE_MSGIN, "scsi%d : pointers restored.\n", hostno);
break;
default:
/*
* IDENTIFY distinguishes itself
* from the other messages by
* setting the high bit.
*
* Note : we need to handle at
* least one outstanding command
* per LUN, and need to hash the
* SCSI command for that I_T_L
* nexus based on the known ID
* (at this point) and LUN.
*/
if (message & 0x80) {
DPRINTK (PHASE_MSGIN, "scsi%d : IDENTIFY message received from id %d, lun %d.\n", hostno, target, message & 7);
} else {
/*
* We should go into a
* MESSAGE OUT phase, and
* send a MESSAGE_REJECT
* if we run into a message
* that we don't like. The
* seagate driver needs
* some serious
* restructuring first
* though.
*/
DPRINTK (PHASE_MSGIN, "scsi%d : unknown message %d from target %d.\n", hostno, message, target);
}
}
break;
default:
printk(KERN_ERR "scsi%d : unknown phase.\n", hostno);
st0x_aborted = DID_ERROR;
} /* end of switch (status_read & REQ_MASK) */
#ifdef SLOW_RATE
/*
* I really don't care to deal with borken devices in
* each single byte transfer case (ie, message in,
* message out, status), so I'll do the wait here if
* necessary.
*/
if(borken)
borken_wait();
#endif
} /* if(status_read & STAT_REQ) ends */
} /* while(((status_read = STATUS)...) ends */
DPRINTK(PHASE_DATAIN | PHASE_DATAOUT | PHASE_EXIT, "scsi%d : Transfered %d bytes\n", hostno, transfered);
#if (DEBUG & PHASE_EXIT)
#if 0 /* Doesn't work for scatter/gather */
printk("Buffer : \n");
for(i = 0; i < 20; ++i)
printk("%02x ", ((unsigned char *) data)[i]); /* WDE mod */
printk("\n");
#endif
printk("scsi%d : status = ", hostno);
print_status(status);
printk(" message = %02x\n", message);
#endif
/* We shouldn't reach this until *after* BSY has been deasserted */
#ifdef LINKED
else
{
/*
* Fix the message byte so that unsuspecting high level drivers
* don't puke when they see a LINKED COMMAND message in place of
* the COMMAND COMPLETE they may be expecting. Shouldn't be
* necessary, but it's better to be on the safe side.
*
* A non LINKED* message byte will indicate that the command
* completed, and we are now disconnected.
*/
switch (message) {
case LINKED_CMD_COMPLETE:
case LINKED_FLG_CMD_COMPLETE:
message = COMMAND_COMPLETE;
linked_target = current_target;
linked_lun = current_lun;
linked_connected = 1;
DPRINTK (DEBUG_LINKED, "scsi%d : keeping I_T_L nexus established for linked command.\n", hostno);
/* We also will need to adjust status to accommodate intermediate
conditions. */
if ((status == INTERMEDIATE_GOOD) || (status == INTERMEDIATE_C_GOOD))
status = GOOD;
break;
/*
* We should also handle what are "normal" termination
* messages here (ABORT, BUS_DEVICE_RESET?, and
* COMMAND_COMPLETE individually, and flake if things
* aren't right.
*/
default:
DPRINTK (DEBUG_LINKED, "scsi%d : closing I_T_L nexus.\n", hostno);
linked_connected = 0;
}
}
#endif /* LINKED */
if (should_reconnect) {
DPRINTK (PHASE_RESELECT, "scsi%d : exiting seagate_st0x_queue_command() with reconnect enabled.\n", hostno);
WRITE_CONTROL (BASE_CMD | CMD_INTR);
} else
WRITE_CONTROL (BASE_CMD);
return retcode (st0x_aborted);
} /* end of internal_command */
static int seagate_st0x_abort (Scsi_Cmnd * SCpnt)
{
st0x_aborted = DID_ABORT;
return SUCCESS;
}
#undef ULOOP
#undef TIMEOUT
/*
* the seagate_st0x_reset function resets the SCSI bus
*
* May be called with SCpnt = NULL
*/
static int seagate_st0x_bus_reset(Scsi_Cmnd * SCpnt)
{
/* No timeouts - this command is going to fail because it was reset. */
DANY ("scsi%d: Reseting bus... ", hostno);
/* assert RESET signal on SCSI bus. */
WRITE_CONTROL (BASE_CMD | CMD_RST);
udelay (20 * 1000);
WRITE_CONTROL (BASE_CMD);
st0x_aborted = DID_RESET;
DANY ("done.\n");
return SUCCESS;
}
static int seagate_st0x_host_reset(Scsi_Cmnd *SCpnt)
{
return FAILED;
}
static int seagate_st0x_device_reset(Scsi_Cmnd *SCpnt)
{
return FAILED;
}
static int seagate_st0x_release(struct Scsi_Host *shost)
{
if (shost->irq)
free_irq(shost->irq, shost);
release_region(shost->io_port, shost->n_io_port);
return 0;
}
/* Eventually this will go into an include file, but this will be later */
static Scsi_Host_Template driver_template = SEAGATE_ST0X;
#include "scsi_module.c"