diff options
author | Thomas Schwinge <tschwinge@gnu.org> | 2006-10-08 13:57:26 +0000 |
---|---|---|
committer | Thomas Schwinge <tschwinge@gnu.org> | 2009-06-18 00:26:43 +0200 |
commit | 28a9a30f1be07f5262957d879a6a9b311605fae8 (patch) | |
tree | d8f8be2eedbc9f445a41efb6a372cade8b1710f0 /linux/dev | |
parent | 5bde205d1b42d031e6bb1422337ab9a37752b2e7 (diff) |
2006-10-08 Thomas Schwinge <tschwinge@gnu.org>
* linux/dev/drivers/scsi/seagate.c: Move file...
* linux/src/drivers/scsi/seagate.c: ... here.
Diffstat (limited to 'linux/dev')
-rw-r--r-- | linux/dev/drivers/scsi/seagate.c | 1679 |
1 files changed, 0 insertions, 1679 deletions
diff --git a/linux/dev/drivers/scsi/seagate.c b/linux/dev/drivers/scsi/seagate.c deleted file mode 100644 index 3dd8f9d..0000000 --- a/linux/dev/drivers/scsi/seagate.c +++ /dev/null @@ -1,1679 +0,0 @@ -/* - * 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" - * - * 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. - */ - -/* - * 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. - * - * -DFAST or -DFAST32 will use blind transfers where possible - * - * -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. - * - * -DSLOW_HANDSHAKE will allow compatibility with broken devices that don't - * handshake fast enough (ie, some CD ROM's) for the Seagate - * code. - * - * -DSLOW_RATE=x, x some number will let you specify a default - * transfer rate if handshaking isn't working correctly. - */ - -#ifdef MACH -#define ARBITRATE -#define SLOW_HANDSHAKE -#define FAST32 -#endif - -#include <linux/module.h> - -#include <asm/io.h> -#include <asm/system.h> -#include <linux/signal.h> -#include <linux/sched.h> -#include <linux/string.h> -#include <linux/config.h> -#include <linux/proc_fs.h> - -#include <linux/blk.h> -#include "scsi.h" -#include "hosts.h" -#include "seagate.h" -#include "constants.h" -#include<linux/stat.h> - -struct proc_dir_entry proc_scsi_seagate = { - PROC_SCSI_SEAGATE, 7, "seagate", - S_IFDIR | S_IRUGO | S_IXUGO, 2 -}; - - -#ifndef IRQ -#define IRQ 5 -#endif - -#if (defined(FAST32) && !defined(FAST)) -#define FAST -#endif - -#if defined(SLOW_RATE) && !defined(SLOW_HANDSHAKE) -#define SLOW_HANDSHAKE -#endif - -#if defined(SLOW_HANDSHAKE) && !defined(SLOW_RATE) -#define SLOW_RATE 50 -#endif - - -#if defined(LINKED) -#undef LINKED /* Linked commands are currently broken ! */ -#endif - -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 const void *base_address = NULL; /* - Where the card ROM starts, - used to calculate memory mapped - register location. - */ -#ifdef notyet -static volatile int abort_confirm = 0; -#endif - -static volatile void *st0x_cr_sr; /* - control register write, - status register read. - 256 bytes in length. - - Read is status of SCSI BUS, - as per STAT masks. - - */ - - -static volatile void *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 unsigned char irq = IRQ; - -#define retcode(result) (((result) << 16) | (message << 8) | status) -#define STATUS (*(volatile unsigned char *) st0x_cr_sr) -#define CONTROL STATUS -#define DATA (*(volatile unsigned char *) st0x_dr) -#define WRITE_CONTROL(d) { writeb((d), st0x_cr_sr); } -#define WRITE_DATA(d) { writeb((d), st0x_dr); } - -void st0x_setup (char *str, int *ints) { - controller_type = SEAGATE; - base_address = (void *) ints[1]; - irq = ints[2]; -} - -void tmc8xx_setup (char *str, int *ints) { - controller_type = FD; - base_address = (void *) ints[1]; - irq = ints[2]; -} - - -#ifndef OVERRIDE -static const char * seagate_bases[] = { - (char *) 0xc8000, (char *) 0xca000, (char *) 0xcc000, - (char *) 0xce000, (char *) 0xdc000, (char *) 0xde000 -}; - -typedef struct { - const char *signature ; - unsigned offset; - unsigned length; - unsigned char type; -} Signature; - -static const Signature signatures[] = { -#ifdef CONFIG_SCSI_SEAGATE -{"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}, -#endif /* CONFIG_SCSI_SEAGATE */ -} -; - -#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 *); - -#ifdef FAST -static int fast = 1; -#endif - -#ifdef SLOW_HANDSHAKE -/* - * 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. - */ - -static int borken_calibration = 0; -static void borken_init (void) { - register int count = 0, start = jiffies + 1, stop = start + 25; - - while (jiffies < start); - for (;jiffies < stop; ++count); - -/* - * 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; -#if (DEBUG & DEBUG_BORKEN) - printk("scsi%d : borken calibrated to %dK/sec, %d cycles per transfer\n", - hostno, BORKEN_RATE, borken_calibration); -#endif -} - -static inline void borken_wait(void) { - register int count; - for (count = borken_calibration; count && (STATUS & STAT_REQ); - --count); -#if (DEBUG & DEBUG_BORKEN) - if (count) - printk("scsi%d : borken timeout\n", hostno); -#endif -} - -#endif /* def SLOW_HANDSHAKE */ - -int seagate_st0x_detect (Scsi_Host_Template * tpnt) - { - struct Scsi_Host *instance; -#ifndef OVERRIDE - int i,j; -#endif - - tpnt->proc_dir = &proc_scsi_seagate; -/* - * First, we try for the manual override. - */ -#ifdef DEBUG - printk("Autodetecting ST0x / TMC-8xx\n"); -#endif - - if (hostno != -1) - { - printk ("ERROR : 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 = (void *) OVERRIDE; - -/* CONTROLLER is used to override controller (SEAGATE or FD). PM: 07/01/93 */ -#ifdef CONTROLLER - controller_type = CONTROLLER; -#else -#error Please use -DCONTROLLER=SEAGATE or -DCONTROLLER=FD to override controller type -#endif /* CONTROLLER */ -#ifdef DEBUG - printk("Base address overridden to %x, controller type is %s\n", - base_address,controller_type == SEAGATE ? "SEAGATE" : "FD"); -#endif -#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 (char * )); ++i) - for (j = 0; !base_address && j < NUM_SIGNATURES; ++j) - if (!memcmp ((const void *) (seagate_bases[i] + - signatures[j].offset), (const void *) signatures[j].signature, - signatures[j].length)) { - base_address = (const void *) 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) - { - st0x_cr_sr =(void *) (((const unsigned char *) base_address) + (controller_type == SEAGATE ? 0x1a00 : 0x1c00)); - st0x_dr = (void *) (((const unsigned char *) base_address ) + (controller_type == SEAGATE ? 0x1c00 : 0x1e00)); -#ifdef DEBUG - printk("%s detected. Base address = %x, cr = %x, dr = %x\n", tpnt->name, base_address, st0x_cr_sr, st0x_dr); -#endif -/* - * At all times, we will use IRQ 5. Should also check for IRQ3 if we - * loose our first interrupt. - */ - instance = scsi_register(tpnt, 0); - hostno = instance->host_no; - if (request_irq((int) irq, seagate_reconnect_intr, SA_INTERRUPT, - (controller_type == SEAGATE) ? "seagate" : "tmc-8xx", NULL)) { - printk("scsi%d : unable to allocate IRQ%d\n", - hostno, (int) irq); - return 0; - } - instance->irq = irq; - instance->io_port = (unsigned int) base_address; -#ifdef SLOW_HANDSHAKE - borken_init(); -#endif - - printk("%s options:" -#ifdef ARBITRATE - " ARBITRATE" -#endif -#ifdef SLOW_HANDSHAKE - " SLOW_HANDSHAKE" -#endif -#ifdef FAST -#ifdef FAST32 - " FAST32" -#else - " FAST" -#endif -#endif -#ifdef LINKED - " LINKED" -#endif - "\n", tpnt->name); - return 1; - } - else - { -#ifdef DEBUG - printk("ST0x / TMC-8xx not detected.\n"); -#endif - return 0; - } - } - -const char *seagate_st0x_info(struct Scsi_Host * shpnt) { - static char buffer[64]; - sprintf(buffer, "%s at irq %d, address 0x%05X", - (controller_type == SEAGATE) ? ST0X_ID_STR : FD_ID_STR, - irq, (unsigned int)base_address); - return buffer; -} - -int seagate_st0x_proc_info(char *buffer, char **start, off_t offset, - int length, int hostno, int inout) -{ - const char *info = seagate_st0x_info(NULL); - int len; - int pos; - int begin; - - if (inout) return(-ENOSYS); - - begin = 0; - strcpy(buffer,info); - strcat(buffer,"\n"); - - pos = len = strlen(buffer); - - if (pos<offset) { - len = 0; - begin = pos; - } - - *start = buffer + (offset - begin); - len -= (offset - begin); - if ( len > length ) len = length; - return(len); -} - -/* - * 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 - -#ifdef LINKED - -/* - * 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. - */ - -#define LINKED_RIGHT 3 -#define LINKED_WRONG 4 -#endif - -/* - * 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 seagate_reconnect_intr(int irq, void *dev_id, struct pt_regs *regs) - { - int temp; - Scsi_Cmnd * SCtmp; - -/* enable all other interrupts. */ - sti(); -#if (DEBUG & PHASE_RESELECT) - printk("scsi%d : seagate_reconnect_intr() called\n", hostno); -#endif - - if (!should_reconnect) - printk("scsi%d: unexpected interrupt.\n", hostno); - else { - should_reconnect = 0; - -#if (DEBUG & PHASE_RESELECT) - printk("scsi%d : internal_command(" - "%d, %08x, %08x, %d, RECONNECT_NOW\n", hostno, - current_target, current_data, current_bufflen); -#endif - - temp = internal_command (current_target, current_lun, - current_cmnd, current_data, current_bufflen, - RECONNECT_NOW); - - if (msg_byte(temp) != DISCONNECT) { - if (done_fn) { -#if (DEBUG & PHASE_RESELECT) - printk("scsi%d : done_fn(%d,%08x)", hostno, - hostno, temp); -#endif - if(!SCint) panic("SCint == NULL in seagate"); - SCtmp = SCint; - SCint = NULL; - SCtmp->result = temp; - done_fn (SCtmp); - } else - printk("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; - -int seagate_st0x_queue_command (Scsi_Cmnd * SCpnt, void (*done)(Scsi_Cmnd *)) - { - int result, reconnect; - Scsi_Cmnd * SCtmp; - - done_fn = done; - current_target = SCpnt->target; - current_lun = SCpnt->lun; - current_cmnd = SCpnt->cmnd; - current_data = (unsigned char *) SCpnt->request_buffer; - current_bufflen = SCpnt->request_bufflen; - SCint = SCpnt; - if(recursion_depth) { - return 0; - }; - recursion_depth++; - do{ -#ifdef LINKED -/* - * Set linked command bit in control field of SCSI command. - */ - - current_cmnd[SCpnt->cmd_len] |= 0x01; - if (linked_connected) { -#if (DEBUG & DEBUG_LINKED) - printk("scsi%d : using linked commands, current I_T_L nexus is ", - hostno); -#endif - if ((linked_target == current_target) && - (linked_lun == current_lun)) { -#if (DEBUG & DEBUG_LINKED) - printk("correct\n"); -#endif - reconnect = LINKED_RIGHT; - } else { -#if (DEBUG & DEBUG_LINKED) - printk("incorrect\n"); -#endif - reconnect = LINKED_WRONG; - } - } else -#endif /* LINKED */ - reconnect = CAN_RECONNECT; - - - - - - result = internal_command (SCint->target, SCint->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; - } - -int seagate_st0x_command (Scsi_Cmnd * SCpnt) { - return internal_command (SCpnt->target, SCpnt->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) { - int len = 0; - unsigned char *data = NULL; - struct scatterlist *buffer = NULL; - int nobuffs = 0; - int clock; - int temp; -#ifdef SLOW_HANDSHAKE - int borken; /* Does the current target require Very Slow I/O ? */ -#endif - - -#if (DEBUG & PHASE_DATAIN) || (DEBUG & PHASE_DATOUT) - int transfered = 0; -#endif - -#if (((DEBUG & PHASE_ETC) == PHASE_ETC) || (DEBUG & PRINT_COMMAND) || \ - (DEBUG & PHASE_EXIT)) - int i; -#endif - -#if ((DEBUG & PHASE_ETC) == PHASE_ETC) - int phase=0, newphase; -#endif - - int done = 0; - unsigned char status = 0; - unsigned char message = 0; - register unsigned char status_read; - - unsigned transfersize = 0, underflow = 0; - - incommand = 0; - st0x_aborted = 0; - -#ifdef SLOW_HANDSHAKE - borken = (int) SCint->device->borken; -#endif - -#if (DEBUG & PRINT_COMMAND) - printk ("scsi%d : target = %d, command = ", hostno, target); - print_command((unsigned char *) cmnd); - printk("\n"); -#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 "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: -#if (DEBUG & PHASE_RESELECT) - printk("scsi%d : phase RESELECT \n", hostno); -#endif - -/* - * 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. - */ - clock = jiffies + 10; - for (;;) { - temp = STATUS; - if ((temp & STAT_IO) && !(temp & STAT_BSY)) - break; - - if (jiffies > clock) { -#if (DEBUG & PHASE_RESELECT) - printk("scsi%d : RESELECT timed out while waiting for IO .\n", - hostno); -#endif - 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))) - { -#if (DEBUG & PHASE_RESELECT) - printk("scsi%d : detected reconnect request to different target.\n" - "\tData bus = %d\n", hostno, temp); -#endif - return (DID_BAD_INTR << 16); - } - - if (!(temp & (1 << current_target))) - { - printk("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 - CONTROL = (BASE_CMD | CMD_DRVR_ENABLE | CMD_BSY); -#else - CONTROL = (BASE_CMD | CMD_BSY); -#endif - -/* - * The target will drop SEL, and raise BSY, at which time we must drop - * BSY. - */ - - for (clock = jiffies + 10; (jiffies < clock) && (STATUS & STAT_SEL);); - - if (jiffies >= clock) - { - CONTROL = (BASE_CMD | CMD_INTR); -#if (DEBUG & PHASE_RESELECT) - printk("scsi%d : RESELECT timed out while waiting for SEL.\n", - hostno); -#endif - return (DID_BAD_INTR << 16); - } - - 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 - -#if (DEBUG & PHASE_BUS_FREE) - printk ("scsi%d : phase = BUS FREE \n", hostno); -#endif - -/* - * 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. - */ - - clock = jiffies + ST0X_BUS_FREE_DELAY; - -#if !defined (ARBITRATE) - while (((STATUS | STATUS | STATUS) & - (STAT_BSY | STAT_SEL)) && - (!st0x_aborted) && (jiffies < clock)); - - if (jiffies > clock) - return retcode(DID_BUS_BUSY); - else if (st0x_aborted) - return retcode(st0x_aborted); -#endif - -#if (DEBUG & PHASE_SELECTION) - printk("scsi%d : phase = SELECTION\n", hostno); -#endif - - 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 - */ - -#if defined(ARBITRATE) - cli(); - CONTROL = 0; - DATA = (controller_type == SEAGATE) ? 0x80 : 0x40; - CONTROL = CMD_START_ARB; - sti(); - while (!((status_read = STATUS) & (STAT_ARB_CMPL | STAT_SEL)) && - (jiffies < clock) && !st0x_aborted); - - if (!(status_read & STAT_ARB_CMPL)) { -#if (DEBUG & PHASE_SELECTION) - if (status_read & STAT_SEL) - printk("scsi%d : arbitration lost\n", hostno); - else - printk("scsi%d : arbitration timeout.\n", hostno); -#endif - CONTROL = BASE_CMD; - return retcode(DID_NO_CONNECT); - }; - -#if (DEBUG & PHASE_SELECTION) - printk("scsi%d : arbitration complete\n", hostno); -#endif -#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. - */ - cli(); - DATA = (unsigned char) ((1 << target) | (controller_type == SEAGATE ? 0x80 : 0x40)); - CONTROL = BASE_CMD | CMD_DRVR_ENABLE | CMD_SEL | - (reselect ? CMD_ATTN : 0); - sti(); - while (!((status_read = STATUS) & STAT_BSY) && - (jiffies < clock) && !st0x_aborted) - -#if 0 && (DEBUG & PHASE_SELECTION) - { - temp = clock - jiffies; - - if (!(jiffies % 5)) - printk("seagate_st0x_timeout : %d \r",temp); - - } - printk("Done. \n"); - printk("scsi%d : status = %02x, seagate_st0x_timeout = %d, aborted = %02x \n", - hostno, status_read, temp, st0x_aborted); -#else - ; -#endif - - - if ((jiffies >= clock) && !(status_read & STAT_BSY)) - { -#if (DEBUG & PHASE_SELECTION) - printk ("scsi%d : NO CONNECT with target %d, status = %x \n", - hostno, target, STATUS); -#endif - return retcode(DID_NO_CONNECT); - } - -/* - * 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. - */ - - if (st0x_aborted) { - CONTROL = BASE_CMD; - if (STATUS & STAT_BSY) { - printk("scsi%d : BST asserted after we've been aborted.\n", - hostno); - seagate_st0x_reset(NULL, 0); - return retcode(DID_RESET); - } - return retcode(st0x_aborted); - } - -/* 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 = %08x length = %d\n", - hostno, i, buffer[i].address, buffer[i].length); - } -#endif - - buffer = (struct scatterlist *) SCint->buffer; - len = buffer->length; - data = (unsigned char *) buffer->address; - } else { -#if (DEBUG & DEBUG_SG) - printk("scsi%d : scatter gather not requested.\n", hostno); -#endif - buffer = NULL; - len = SCint->request_bufflen; - data = (unsigned char *) SCint->request_buffer; - } - -#if (DEBUG & (PHASE_DATAIN | PHASE_DATAOUT)) - printk("scsi%d : len = %d\n", hostno, len); -#endif - - break; -#ifdef LINKED - case LINKED_RIGHT: - break; - case LINKED_WRONG: - break; -#endif - } - -/* - * 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. - */ - - - CONTROL = BASE_CMD | CMD_DRVR_ENABLE | - (((reselect == CAN_RECONNECT) -#ifdef LINKED - || (reselect == LINKED_WRONG) -#endif - ) ? CMD_ATTN : 0) ; - -/* - * 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. - */ - -#if ((DEBUG & PHASE_ETC) == PHASE_ETC) - printk("scsi%d : phase = INFORMATION TRANSFER\n", hostno); -#endif - - 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("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. - */ - -#ifdef FAST -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 - ) { -#if (DEBUG & DEBUG_FAST) - printk("scsi%d : FAST transfer, underflow = %d, transfersize = %d\n" - " len = %d, data = %08x\n", hostno, SCint->underflow, - SCint->transfersize, len, data); -#endif - - { -#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++; - } - - len -= transfersize; - data += transfersize; - -#if (DEBUG & DEBUG_FAST) - printk("scsi%d : FAST transfer complete len = %d data = %08x\n", - hostno, len, data); -#endif - - -} else -#endif - -{ -/* - * We loop as long as we are in a data out phase, there is data to send, - * and BSY is still active. - */ - - 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; - } - } -} - - if (!len && nobuffs) { - --nobuffs; - ++buffer; - len = buffer->length; - data = (unsigned char *) buffer->address; -#if (DEBUG & DEBUG_SG) - printk("scsi%d : next scatter-gather buffer len = %d address = %08x\n", - hostno, len, data); -#endif - } - break; - - case REQ_DATAIN : -#ifdef SLOW_HANDSHAKE - 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 -#ifdef FAST -if (fast && transfersize && !(len % transfersize) && (len >= transfersize) -#ifdef FAST32 - && !(transfersize % 4) -#endif - ) { -#if (DEBUG & DEBUG_FAST) - printk("scsi%d : FAST transfer, underflow = %d, transfersize = %d\n" - " len = %d, data = %08x\n", hostno, SCint->underflow, - SCint->transfersize, len, data); -#endif - { -#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; - } - - len -= transfersize; - data += transfersize; - -#if (DEBUG & PHASE_DATAIN) - printk("scsi%d: transfered += %d\n", hostno, transfersize); - transfered += transfersize; -#endif - -#if (DEBUG & DEBUG_FAST) - printk("scsi%d : FAST transfer complete len = %d data = %08x\n", - hostno, len, data); -#endif - -} else -#endif -{ - -#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 - */ - - while (len) - { - unsigned char stat; - - stat = STATUS; - if (!(stat & STAT_BSY) || ((stat & REQ_MASK) != REQ_DATAIN)) - break; - if (stat & STAT_REQ) - { - *data++ = DATA; - --len; - } - } - -#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 = (unsigned char *) buffer->address; -#if (DEBUG & DEBUG_SG) - printk("scsi%d : next scatter-gather buffer len = %d address = %08x\n", - hostno, len, data); -#endif - } - - break; - - case REQ_CMDOUT : - while (((status_read = STATUS) & STAT_BSY) && - ((status_read & REQ_MASK) == REQ_CMDOUT)) - if (status_read & STAT_REQ) { - DATA = *(const unsigned char *) cmnd; - cmnd = 1+(const unsigned char *) cmnd; -#ifdef SLOW_HANDSHAKE - 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. - */ - - 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: - DATA = IDENTIFY(1, lun); - -#if (DEBUG & (PHASE_RESELECT | PHASE_MSGOUT)) - printk("scsi%d : sent IDENTIFY message.\n", hostno); -#endif - break; -#ifdef LINKED - case LINKED_WRONG: - DATA = ABORT; - linked_connected = 0; - reselect = CAN_RECONNECT; - goto connect_loop; -#if (DEBUG & (PHASE_MSGOUT | DEBUG_LINKED)) - printk("scsi%d : sent ABORT message to cancel incorrect I_T_L nexus.\n", hostno); -#endif -#endif /* LINKED */ -#if (DEBUG & DEBUG_LINKED) - printk("correct\n"); -#endif - default: - DATA = NOP; - printk("scsi%d : target %d requested MSGOUT, sent NOP message.\n", hostno, target); - } - break; - - case REQ_MSGIN : - switch (message = DATA) { - case DISCONNECT : - 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; -#if (DEBUG & (PHASE_RESELECT | PHASE_MSGIN)) - printk("scsi%d : disconnected.\n", hostno); -#endif - break; - -#ifdef LINKED - case LINKED_CMD_COMPLETE: - case LINKED_FLG_CMD_COMPLETE: -#endif - case COMMAND_COMPLETE : -/* - * Note : we should check for underflow here. - */ -#if (DEBUG & PHASE_MSGIN) - printk("scsi%d : command complete.\n", hostno); -#endif - done = 1; - break; - case ABORT : -#if (DEBUG & PHASE_MSGIN) - printk("scsi%d : abort message.\n", hostno); -#endif - done=1; - break; - case SAVE_POINTERS : - current_buffer = buffer; - current_bufflen = len; /* WDE add */ - current_data = data; /* WDE mod */ - current_nobuffs = nobuffs; -#if (DEBUG & PHASE_MSGIN) - printk("scsi%d : pointers saved.\n", hostno); -#endif - break; - case RESTORE_POINTERS: - buffer=current_buffer; - cmnd=current_cmnd; - data=current_data; /* WDE mod */ - len=current_bufflen; - nobuffs=current_nobuffs; -#if (DEBUG & PHASE_MSGIN) - printk("scsi%d : pointers restored.\n", hostno); -#endif - break; - default: - -/* - * IDENTIFY distinguishes itself from the other messages by setting the - * high byte. - * - * 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) { -#if (DEBUG & PHASE_MSGIN) - printk("scsi%d : IDENTIFY message received from id %d, lun %d.\n", - hostno, target, message & 7); -#endif - } 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. - */ - -#if (DEBUG & PHASE_MSGIN) - printk("scsi%d : unknown message %d from target %d.\n", - hostno, message, target); -#endif - } - } - break; - - default : - printk("scsi%d : unknown phase.\n", hostno); - st0x_aborted = DID_ERROR; - } - -#ifdef SLOW_HANDSHAKE -/* - * 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 ends */ - } /* while ends */ - -#if (DEBUG & (PHASE_DATAIN | PHASE_DATAOUT | PHASE_EXIT)) - printk("scsi%d : Transfered %d bytes\n", hostno, transfered); -#endif - -#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 notyet - if (st0x_aborted) { - if (STATUS & STAT_BSY) { - seagate_st0x_reset(NULL); - st0x_aborted = DID_RESET; - } - abort_confirm = 1; - } -#endif - -#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; -#if (DEBUG & DEBUG_LINKED) - printk("scsi%d : keeping I_T_L nexus established for linked command.\n", - hostno); -#endif -/* - * 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 : -#if (DEBUG & DEBUG_LINKED) - printk("scsi%d : closing I_T_L nexus.\n", hostno); -#endif - linked_connected = 0; - } - } -#endif /* LINKED */ - - - - - if (should_reconnect) { -#if (DEBUG & PHASE_RESELECT) - printk("scsi%d : exiting seagate_st0x_queue_command() with reconnect enabled.\n", - hostno); -#endif - CONTROL = BASE_CMD | CMD_INTR ; - } else - CONTROL = BASE_CMD; - - return retcode (st0x_aborted); - } - -int seagate_st0x_abort (Scsi_Cmnd * SCpnt) - { - st0x_aborted = DID_ABORT; - - return SCSI_ABORT_PENDING; - } - -/* - the seagate_st0x_reset function resets the SCSI bus -*/ - -int seagate_st0x_reset (Scsi_Cmnd * SCpnt, unsigned int reset_flags) - { - unsigned clock; - /* - No timeouts - this command is going to fail because - it was reset. - */ - -#ifdef DEBUG - printk("In seagate_st0x_reset()\n"); -#endif - - - /* assert RESET signal on SCSI bus. */ - - CONTROL = BASE_CMD | CMD_RST; - clock=jiffies+2; - - - /* Wait. */ - - while (jiffies < clock); - - CONTROL = BASE_CMD; - - st0x_aborted = DID_RESET; - -#ifdef DEBUG - printk("SCSI bus reset.\n"); -#endif - return SCSI_RESET_WAKEUP; - } - -#include <asm/segment.h> -#include "sd.h" -#include <scsi/scsi_ioctl.h> - -int seagate_st0x_biosparam(Disk * disk, kdev_t dev, int* ip) { - unsigned char buf[256 + sizeof(int) * 2], cmd[6], *data, *page; - int *sizes, result, formatted_sectors, total_sectors; - int cylinders, heads, sectors; - int capacity; - -/* - * Only SCSI-I CCS drives and later implement the necessary mode sense - * pages. - */ - - if (disk->device->scsi_level < 2) - return -1; - - sizes = (int *) buf; - data = (unsigned char *) (sizes + 2); - - cmd[0] = MODE_SENSE; - cmd[1] = (disk->device->lun << 5) & 0xe5; - cmd[2] = 0x04; /* Read page 4, rigid disk geometry page current values */ - cmd[3] = 0; - cmd[4] = 255; - cmd[5] = 0; - -/* - * We are transferring 0 bytes in the out direction, and expect to get back - * 24 bytes for each mode page. - */ - - sizes[0] = 0; - sizes[1] = 256; - - memcpy (data, cmd, 6); - - if (!(result = kernel_scsi_ioctl (disk->device, SCSI_IOCTL_SEND_COMMAND, (void *) buf))) { -/* - * The mode page lies beyond the MODE SENSE header, with length 4, and - * the BLOCK DESCRIPTOR, with length header[3]. - */ - - page = data + 4 + data[3]; - heads = (int) page[5]; - cylinders = (page[2] << 16) | (page[3] << 8) | page[4]; - - cmd[2] = 0x03; /* Read page 3, format page current values */ - memcpy (data, cmd, 6); - - if (!(result = kernel_scsi_ioctl (disk->device, SCSI_IOCTL_SEND_COMMAND, (void *) buf))) { - page = data + 4 + data[3]; - sectors = (page[10] << 8) | page[11]; - - -/* - * Get the total number of formatted sectors from the block descriptor, - * so we can tell how many are being used for alternates. - */ - - formatted_sectors = (data[4 + 1] << 16) | (data[4 + 2] << 8) | - data[4 + 3] ; - - total_sectors = (heads * cylinders * sectors); - -/* - * Adjust the real geometry by subtracting - * (spare sectors / (heads * tracks)) cylinders from the number of cylinders. - * - * It appears that the CE cylinder CAN be a partial cylinder. - */ - - -printk("scsi%d : heads = %d cylinders = %d sectors = %d total = %d formatted = %d\n", - hostno, heads, cylinders, sectors, total_sectors, formatted_sectors); - - if (!heads || !sectors || !cylinders) - result = -1; - else - cylinders -= ((total_sectors - formatted_sectors) / (heads * sectors)); - -/* - * Now, we need to do a sanity check on the geometry to see if it is - * BIOS compatible. The maximum BIOS geometry is 1024 cylinders * - * 256 heads * 64 sectors. - */ - - if ((cylinders > 1024) || (sectors > 64)) { - /* The Seagate's seem to have some mapping - * Multiple heads * sectors * cyl to get capacity - * Then start rounding down. */ - capacity = heads * sectors * cylinders; - sectors = 17; /* Old MFM Drives use this, so does the Seagate */ - heads = 2; - capacity = capacity / sectors; - while (cylinders > 1024) - { - heads *= 2; /* For some reason, they go in multiples */ - cylinders = capacity / heads; - } - } - ip[0] = heads; - ip[1] = sectors; - ip[2] = cylinders; - -/* - * There should be an alternate mapping for things the seagate doesn't - * understand, but I couldn't say what it is with reasonable certainty. - */ - - } - } - - return result; -} - -#ifdef MODULE -/* Eventually this will go into an include file, but this will be later */ -Scsi_Host_Template driver_template = SEAGATE_ST0X; - -#include "scsi_module.c" -#endif |