diff options
author | Linus Torvalds <torvalds@ppc970.osdl.org> | 2005-04-16 15:20:36 -0700 |
---|---|---|
committer | Linus Torvalds <torvalds@ppc970.osdl.org> | 2005-04-16 15:20:36 -0700 |
commit | 1da177e4c3f41524e886b7f1b8a0c1fc7321cac2 (patch) | |
tree | 0bba044c4ce775e45a88a51686b5d9f90697ea9d /drivers/scsi/seagate.c |
Linux-2.6.12-rc2v2.6.12-rc2
Initial git repository build. I'm not bothering with the full history,
even though we have it. We can create a separate "historical" git
archive of that later if we want to, and in the meantime it's about
3.2GB when imported into git - space that would just make the early
git days unnecessarily complicated, when we don't have a lot of good
infrastructure for it.
Let it rip!
Diffstat (limited to 'drivers/scsi/seagate.c')
-rw-r--r-- | drivers/scsi/seagate.c | 1675 |
1 files changed, 1675 insertions, 0 deletions
diff --git a/drivers/scsi/seagate.c b/drivers/scsi/seagate.c new file mode 100644 index 000000000000..b362ff2811da --- /dev/null +++ b/drivers/scsi/seagate.c @@ -0,0 +1,1675 @@ +/* + * 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/blkdev.h> +#include <linux/stat.h> + +#include <asm/io.h> +#include <asm/system.h> +#include <asm/uaccess.h> + +#include "scsi.h" +#include <scsi/scsi_host.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 void __iomem *st0x_cr_sr; /* control register write, status + register read. 256 bytes in + length. + Read is status of SCSI BUS, as per + STAT masks. */ + +static void __iomem *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_param(base_address, uint, 0); +module_param(controller_type, byte, 0); +module_param(irq, int, 0); +MODULE_LICENSE("GPL"); + + +#define retcode(result) (((result) << 16) | (message << 8) | status) +#define STATUS ((u8) readb(st0x_cr_sr)) +#define DATA ((u8) readb(st0x_dr)) +#define WRITE_CONTROL(d) { writeb((d), st0x_cr_sr); } +#define WRITE_DATA(d) { writeb((d), st0x_dr); } + +#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 irqreturn_t 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; + unsigned long cr, dr; + + 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) { + void __iomem *p = ioremap(seagate_bases[i], 0x2000); + if (!p) + continue; + for (j = 0; j < NUM_SIGNATURES; ++j) + if (check_signature(p + signatures[j].offset, signatures[j].signature, signatures[j].length)) { + base_address = seagate_bases[i]; + controller_type = signatures[j].type; + break; + } + iounmap(p); + } +#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; + } + + cr = base_address + (controller_type == SEAGATE ? 0x1a00 : 0x1c00); + dr = cr + 0x200; + st0x_cr_sr = ioremap(cr, 0x100); + st0x_dr = ioremap(dr, 0x100); + + DANY("%s detected. Base address = %x, cr = %x, dr = %x\n", + tpnt->name, base_address, cr, 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 irqreturn_t 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); + return IRQ_HANDLED; +} + +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 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" (st0x_dr), + "S" + (data), + "c" (SCint->transfersize) +/* clobbered */ + : "eax", "ecx", + "esi"); +#else /* SEAGATE_USE_ASM */ + memcpy_toio(st0x_dr, data, transfersize); +#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" (st0x_cr_sr), + "3" (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" (st0x_dr), + "D" + (data), + "c" (SCint->transfersize) +/* clobbered */ + : "eax", "ecx", + "edi"); +#else /* SEAGATE_USE_ASM */ + memcpy_fromio(data, st0x_dr, len); +#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" (st0x_cr_sr), + "3" (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; +} + +static Scsi_Host_Template driver_template = { + .detect = seagate_st0x_detect, + .release = seagate_st0x_release, + .info = seagate_st0x_info, + .queuecommand = seagate_st0x_queue_command, + .eh_abort_handler = seagate_st0x_abort, + .eh_bus_reset_handler = seagate_st0x_bus_reset, + .eh_host_reset_handler = seagate_st0x_host_reset, + .eh_device_reset_handler = seagate_st0x_device_reset, + .can_queue = 1, + .this_id = 7, + .sg_tablesize = SG_ALL, + .cmd_per_lun = 1, + .use_clustering = DISABLE_CLUSTERING, +}; +#include "scsi_module.c" |