summaryrefslogtreecommitdiff
path: root/linux
diff options
context:
space:
mode:
authorThomas Schwinge <tschwinge@gnu.org>2006-10-08 13:57:26 +0000
committerThomas Schwinge <tschwinge@gnu.org>2009-06-18 00:26:43 +0200
commit28a9a30f1be07f5262957d879a6a9b311605fae8 (patch)
treed8f8be2eedbc9f445a41efb6a372cade8b1710f0 /linux
parent5bde205d1b42d031e6bb1422337ab9a37752b2e7 (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')
-rw-r--r--linux/dev/drivers/scsi/seagate.c1679
-rw-r--r--linux/src/drivers/scsi/seagate.c186
2 files changed, 55 insertions, 1810 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
diff --git a/linux/src/drivers/scsi/seagate.c b/linux/src/drivers/scsi/seagate.c
index 9e94274..3dd8f9d 100644
--- a/linux/src/drivers/scsi/seagate.c
+++ b/linux/src/drivers/scsi/seagate.c
@@ -46,6 +46,12 @@
* 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>
@@ -136,6 +142,8 @@ static unsigned char irq = IRQ;
#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;
@@ -557,7 +565,7 @@ int seagate_st0x_queue_command (Scsi_Cmnd * SCpnt, void (*done)(Scsi_Cmnd *))
done_fn = done;
current_target = SCpnt->target;
current_lun = SCpnt->lun;
- (const void *) current_cmnd = SCpnt->cmnd;
+ current_cmnd = SCpnt->cmnd;
current_data = (unsigned char *) SCpnt->request_buffer;
current_bufflen = SCpnt->request_bufflen;
SCint = SCpnt;
@@ -1091,24 +1099,19 @@ if (fast && transfersize && !(len % transfersize) && (len >= transfersize)
SCint->transfersize, len, data);
#endif
- __asm__("
- cld;
-"
+ {
#ifdef FAST32
-" shr $2, %%ecx;
-1: lodsl;
- movl %%eax, (%%edi);
-"
+ unsigned int *iop = phys_to_virt (st0x_dr);
+ const unsigned int *dp = (unsigned int *) data;
+ int xferlen = transfersize >> 2;
#else
-"1: lodsb;
- movb %%al, (%%edi);
-"
+ unsigned char *iop = phys_to_virt (st0x_dr);
+ const unsigned char *dp = data;
+ int xferlen = transfersize;
#endif
-" loop 1b;" : :
- /* input */
- "D" (st0x_dr), "S" (data), "c" (SCint->transfersize) :
- /* clobbered */
- "eax", "ecx", "esi" );
+ for (; xferlen; --xferlen)
+ *iop = *dp++;
+ }
len -= transfersize;
data += transfersize;
@@ -1127,55 +1130,20 @@ if (fast && transfersize && !(len % transfersize) && (len >= transfersize)
* We loop as long as we are in a data out phase, there is data to send,
* and BSY is still active.
*/
- __asm__ (
-
-/*
- Local variables :
- len = ecx
- data = esi
- st0x_cr_sr = ebx
- st0x_dr = edi
-
- Test for any data here at all.
-*/
- "\torl %%ecx, %%ecx
- jz 2f
- cld
-
- movl " SYMBOL_NAME_STR(st0x_cr_sr) ", %%ebx
- movl " SYMBOL_NAME_STR(st0x_dr) ", %%edi
-
-1: movb (%%ebx), %%al\n"
-/*
- Test for BSY
-*/
-
- "\ttest $1, %%al
- jz 2f\n"
-
-/*
- Test for data out phase - STATUS & REQ_MASK should be REQ_DATAOUT, which is 0.
-*/
- "\ttest $0xe, %%al
- jnz 2f \n"
-/*
- Test for REQ
-*/
- "\ttest $0x10, %%al
- jz 1b
- lodsb
- movb %%al, (%%edi)
- loop 1b
-
-2:
- ":
-/* output */
-"=S" (data), "=c" (len) :
-/* input */
-"0" (data), "1" (len) :
-/* clobbered */
-"eax", "ebx", "edi");
+ 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) {
@@ -1217,25 +1185,19 @@ if (fast && transfersize && !(len % transfersize) && (len >= transfersize)
" len = %d, data = %08x\n", hostno, SCint->underflow,
SCint->transfersize, len, data);
#endif
- __asm__("
- cld;
-"
+ {
#ifdef FAST32
-" shr $2, %%ecx;
-1: movl (%%esi), %%eax;
- stosl;
-"
+ const unsigned int *iop = phys_to_virt (st0x_dr);
+ unsigned int *dp = (unsigned int *) data;
+ int xferlen = len >> 2;
#else
-"1: movb (%%esi), %%al;
- stosb;
-"
+ const unsigned char *iop = phys_to_virt (st0x_dr);
+ unsigned char *dp = data;
+ int xferlen = len;
#endif
-
-" loop 1b;" : :
- /* input */
- "S" (st0x_dr), "D" (data), "c" (SCint->transfersize) :
- /* clobbered */
- "eax", "ecx", "edi");
+ for (; xferlen; --xferlen)
+ *dp++ = *iop;
+ }
len -= transfersize;
data += transfersize;
@@ -1265,57 +1227,19 @@ if (fast && transfersize && !(len % transfersize) && (len >= transfersize)
* and BSY is still active
*/
- __asm__ (
-/*
- Local variables :
- ecx = len
- edi = data
- esi = st0x_cr_sr
- ebx = st0x_dr
-
- Test for room to read
-*/
- "\torl %%ecx, %%ecx
- jz 2f
-
- cld
- movl " SYMBOL_NAME_STR(st0x_cr_sr) ", %%esi
- movl " SYMBOL_NAME_STR(st0x_dr) ", %%ebx
-
-1: movb (%%esi), %%al\n"
-/*
- Test for BSY
-*/
-
- "\ttest $1, %%al
- jz 2f\n"
-
-/*
- Test for data in phase - STATUS & REQ_MASK should be REQ_DATAIN, = STAT_IO, which is 4.
-*/
- "\tmovb $0xe, %%ah
- andb %%al, %%ah
- cmpb $0x04, %%ah
- jne 2f\n"
-
-/*
- Test for REQ
-*/
- "\ttest $0x10, %%al
- jz 1b
-
- movb (%%ebx), %%al
- stosb
- loop 1b\n"
-
-"2:\n"
- :
-/* output */
-"=D" (data), "=c" (len) :
-/* input */
-"0" (data), "1" (len) :
-/* clobbered */
-"eax","ebx", "esi");
+ 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);