diff options
Diffstat (limited to 'i386/i386at/gpl/linux/scsi/u14-34f.c')
| -rw-r--r-- | i386/i386at/gpl/linux/scsi/u14-34f.c | 1044 |
1 files changed, 0 insertions, 1044 deletions
diff --git a/i386/i386at/gpl/linux/scsi/u14-34f.c b/i386/i386at/gpl/linux/scsi/u14-34f.c deleted file mode 100644 index ce0e378..0000000 --- a/i386/i386at/gpl/linux/scsi/u14-34f.c +++ /dev/null @@ -1,1044 +0,0 @@ -/* - * u14-34f.c - Low-level driver for UltraStor 14F/34F SCSI host adapters. - * - * 13 Jun 1995 rev. 2.01 for linux 1.2.10 - * HAVE_OLD_UX4F_FIRMWARE should be defined for U34F boards when - * the firmware prom is not the lastest one (28008-006). - * - * 11 Mar 1995 rev. 2.00 for linux 1.2.0 - * Fixed a bug which prevented media change detection for removable - * disk drives. - * - * 23 Feb 1995 rev. 1.18 for linux 1.1.94 - * Added a check for scsi_register returning NULL. - * - * 11 Feb 1995 rev. 1.17 for linux 1.1.91 - * U14F qualified to run with 32 sglists. - * Now DEBUG_RESET is disabled by default. - * - * 9 Feb 1995 rev. 1.16 for linux 1.1.90 - * Use host->wish_block instead of host->block. - * - * 8 Feb 1995 rev. 1.15 for linux 1.1.89 - * Cleared target_time_out counter while performing a reset. - * - * 28 Jan 1995 rev. 1.14 for linux 1.1.86 - * Added module support. - * Log and do a retry when a disk drive returns a target status - * different from zero on a recovered error. - * Auto detects if U14F boards have an old firmware revision. - * Max number of scatter/gather lists set to 16 for all boards - * (most installation run fine using 33 sglists, while other - * has problems when using more then 16). - * - * 16 Jan 1995 rev. 1.13 for linux 1.1.81 - * Display a message if check_region detects a port address - * already in use. - * - * 15 Dec 1994 rev. 1.12 for linux 1.1.74 - * The host->block flag is set for all the detected ISA boards. - * - * 30 Nov 1994 rev. 1.11 for linux 1.1.68 - * Redo i/o on target status CHECK_CONDITION for TYPE_DISK only. - * Added optional support for using a single board at a time. - * - * 14 Nov 1994 rev. 1.10 for linux 1.1.63 - * - * 28 Oct 1994 rev. 1.09 for linux 1.1.58 Final BETA release. - * 16 Jul 1994 rev. 1.00 for linux 1.1.29 Initial ALPHA release. - * - * This driver is a total replacement of the original UltraStor - * scsi driver, but it supports ONLY the 14F and 34F boards. - * It can be configured in the same kernel in which the original - * ultrastor driver is configured to allow the original U24F - * support. - * - * Multiple U14F and/or U34F host adapters are supported. - * - * Copyright (C) 1994, 1995 Dario Ballabio (dario@milano.europe.dg.com) - * - * WARNING: if your 14/34F board has an old firmware revision (see below) - * you must change "#undef" into "#define" in the following - * statement. - */ -#undef HAVE_OLD_UX4F_FIRMWARE -/* - * The UltraStor 14F, 24F, and 34F are a family of intelligent, high - * performance SCSI-2 host adapters. - * Here is the scoop on the various models: - * - * 14F - ISA first-party DMA HA with floppy support and WD1003 emulation. - * 24F - EISA Bus Master HA with floppy support and WD1003 emulation. - * 34F - VESA Local-Bus Bus Master HA (no WD1003 emulation). - * - * This code has been tested with up to two U14F boards, using both - * firmware 28004-005/38004-004 (BIOS rev. 2.00) and the latest firmware - * 28004-006/38004-005 (BIOS rev. 2.01). - * - * The latest firmware is required in order to get reliable operations when - * clustering is enabled. ENABLE_CLUSTERING provides a performance increase - * up to 50% on sequential access. - * - * Since the Scsi_Host_Template structure is shared among all 14F and 34F, - * the last setting of use_clustering is in effect for all of these boards. - * - * Here a sample configuration using two U14F boards: - * - U14F0: PORT 0x330, BIOS 0xc8000, IRQ 11, DMA 5, SG 32, Mbox 16, CmdLun 2, C1. - U14F1: PORT 0x340, BIOS 0x00000, IRQ 10, DMA 6, SG 32, Mbox 16, CmdLun 2, C1. - * - * The boot controller must have its BIOS enabled, while other boards can - * have their BIOS disabled, or enabled to an higher address. - * Boards are named Ux4F0, Ux4F1..., according to the port address order in - * the io_port[] array. - * - * The following facts are based on real testing results (not on - * documentation) on the above U14F board. - * - * - The U14F board should be jumpered for bus on time less or equal to 7 - * microseconds, while the default is 11 microseconds. This is order to - * get acceptable performance while using floppy drive and hard disk - * together. The jumpering for 7 microseconds is: JP13 pin 15-16, - * JP14 pin 7-8 and pin 9-10. - * The reduction has a little impact on scsi performance. - * - * - If scsi bus length exceeds 3m., the scsi bus speed needs to be reduced - * from 10Mhz to 5Mhz (do this by inserting a jumper on JP13 pin 7-8). - * - * - If U14F on board firmware is older than 28004-006/38004-005, - * the U14F board is unable to provide reliable operations if the scsi - * request length exceeds 16Kbyte. When this length is exceeded the - * behavior is: - * - adapter_status equal 0x96 or 0xa3 or 0x93 or 0x94; - * - adapter_status equal 0 and target_status equal 2 on for all targets - * in the next operation following the reset. - * This sequence takes a long time (>3 seconds), so in the meantime - * the SD_TIMEOUT in sd.c could expire giving rise to scsi aborts - * (SD_TIMEOUT has been increased from 3 to 6 seconds in 1.1.31). - * Because of this I had to DISABLE_CLUSTERING and to work around the - * bus reset in the interrupt service routine, returning DID_BUS_BUSY - * so that the operations are retried without complains from the scsi.c - * code. - * Any reset of the scsi bus is going to kill tape operations, since - * no retry is allowed for tapes. Bus resets are more likely when the - * scsi bus is under heavy load. - * Requests using scatter/gather have a maximum length of 16 x 1024 bytes - * when DISABLE_CLUSTERING is in effect, but unscattered requests could be - * larger than 16Kbyte. - * - * The new firmware has fixed all the above problems. - * - * For U34F boards the latest bios prom is 38008-002 (BIOS rev. 2.01), - * the latest firmware prom is 28008-006. Older firmware 28008-005 has - * problems when using more then 16 scatter/gather lists. - * - * In order to support multiple ISA boards in a reliable way, - * the driver sets host->wish_block = TRUE for all ISA boards. - */ - -#if defined(MODULE) -#include <linux/module.h> -#include <linux/version.h> -#endif - -#include <linux/string.h> -#include <linux/sched.h> -#include <linux/kernel.h> -#include <linux/ioport.h> -#include <asm/io.h> -#include <asm/system.h> -#include <linux/proc_fs.h> -#include <linux/blk.h> -#include "scsi.h" -#include "hosts.h" -#include "sd.h" -#include <asm/dma.h> -#include <asm/irq.h> -#include "u14-34f.h" -#include<linux/stat.h> - -struct proc_dir_entry proc_scsi_u14_34f = { - PROC_SCSI_U14_34F, 6, "u14_34f", - S_IFDIR | S_IRUGO | S_IXUGO, 2 -}; - -/* Values for the PRODUCT_ID ports for the 14/34F */ -#define PRODUCT_ID1 0x56 -#define PRODUCT_ID2 0x40 /* NOTE: Only upper nibble is used */ - -/* Subversion values */ -#define ISA 0 -#define ESA 1 - -#define OP_HOST_ADAPTER 0x1 -#define OP_SCSI 0x2 -#define OP_RESET 0x4 -#define DTD_SCSI 0x0 -#define DTD_IN 0x1 -#define DTD_OUT 0x2 -#define DTD_NONE 0x3 -#define HA_CMD_INQUIRY 0x1 -#define HA_CMD_SELF_DIAG 0x2 -#define HA_CMD_READ_BUFF 0x3 -#define HA_CMD_WRITE_BUFF 0x4 - -#undef DEBUG_DETECT -#undef DEBUG_INTERRUPT -#undef DEBUG_STATISTICS -#undef DEBUG_RESET - -#define MAX_TARGET 8 -#define MAX_IRQ 16 -#define MAX_BOARDS 4 -#define MAX_MAILBOXES 16 -#define MAX_SGLIST 32 -#define MAX_SAFE_SGLIST 16 -#define MAX_CMD_PER_LUN 2 - -#define FALSE 0 -#define TRUE 1 -#define FREE 0 -#define IN_USE 1 -#define LOCKED 2 -#define IN_RESET 3 -#define IGNORE 4 -#define NO_IRQ 0xff -#define NO_DMA 0xff -#define MAXLOOP 200000 - -#define REG_LCL_MASK 0 -#define REG_LCL_INTR 1 -#define REG_SYS_MASK 2 -#define REG_SYS_INTR 3 -#define REG_PRODUCT_ID1 4 -#define REG_PRODUCT_ID2 5 -#define REG_CONFIG1 6 -#define REG_CONFIG2 7 -#define REG_OGM 8 -#define REG_ICM 12 -#define REGION_SIZE 13 -#define BSY_ASSERTED 0x01 -#define IRQ_ASSERTED 0x01 -#define CMD_RESET 0xc0 -#define CMD_OGM_INTR 0x01 -#define CMD_CLR_INTR 0x01 -#define CMD_ENA_INTR 0x81 -#define ASOK 0x00 -#define ASST 0x91 - -#define PACKED __attribute__((packed)) - -/* MailBox SCSI Command Packet */ -struct mscp { - unsigned char opcode: 3; /* type of command */ - unsigned char xdir: 2; /* data transfer direction */ - unsigned char dcn: 1; /* disable disconnect */ - unsigned char ca: 1; /* use cache (if available) */ - unsigned char sg: 1; /* scatter/gather operation */ - unsigned char target: 3; /* target SCSI id */ - unsigned char ch_no: 2; /* SCSI channel (always 0 for 14f) */ - unsigned char lun: 3; /* logical unit number */ - unsigned int data_address PACKED; /* transfer data pointer */ - unsigned int data_len PACKED; /* length in bytes */ - unsigned int command_link PACKED; /* for linking command chains */ - unsigned char scsi_command_link_id; /* identifies command in chain */ - unsigned char use_sg; /* (if sg is set) 8 bytes per list */ - unsigned char sense_len; - unsigned char scsi_cdbs_len; /* 6, 10, or 12 */ - unsigned char scsi_cdbs[12]; /* SCSI commands */ - unsigned char adapter_status; /* non-zero indicates HA error */ - unsigned char target_status; /* non-zero indicates target error */ - unsigned int sense_addr PACKED; - - Scsi_Cmnd *SCpnt; - - struct sg_list { - unsigned int address; /* Segment Address */ - unsigned int num_bytes; /* Segment Length */ - } sglist[MAX_SGLIST]; - - unsigned int index; /* cp index */ - }; - -struct hostdata { - struct mscp cp[MAX_MAILBOXES]; /* Mailboxes for this board */ - unsigned int cp_stat[MAX_MAILBOXES]; /* FREE, IN_USE, LOCKED, IN_RESET */ - unsigned int last_cp_used; /* Index of last mailbox used */ - unsigned int iocount; /* Total i/o done for this board */ - unsigned int multicount; /* Total ... in second ihdlr loop */ - int board_number; /* Number of this board */ - char board_name[16]; /* Name of this board */ - char board_id[256]; /* data from INQUIRY on this board */ - int in_reset; /* True if board is doing a reset */ - int target_time_out[MAX_TARGET]; /* N. of timeout errors on target */ - int target_reset[MAX_TARGET]; /* If TRUE redo operation on target */ - unsigned char subversion; /* Bus type, either ISA or ESA */ - unsigned char heads; - unsigned char sectors; - - /* slot != 0 for the U24F, slot == 0 for both the U14F and U34F */ - unsigned char slot; - }; - -static struct Scsi_Host * sh[MAX_BOARDS + 1]; -static const char* driver_name = "Ux4F"; -static unsigned int irqlist[MAX_IRQ], calls[MAX_IRQ]; - -#define HD(board) ((struct hostdata *) &sh[board]->hostdata) -#define BN(board) (HD(board)->board_name) - -static void u14_34f_interrupt_handler(int, struct pt_regs *); -static int do_trace = FALSE; - -static inline unchar wait_on_busy(ushort iobase) { - unsigned int loop = MAXLOOP; - - while (inb(iobase + REG_LCL_INTR) & BSY_ASSERTED) - if (--loop == 0) return TRUE; - - return FALSE; -} - -static int board_inquiry(unsigned int j) { - struct mscp *cpp; - unsigned int time, limit = 0; - - cpp = &HD(j)->cp[0]; - memset(cpp, 0, sizeof(struct mscp)); - cpp->opcode = OP_HOST_ADAPTER; - cpp->xdir = DTD_IN; - cpp->data_address = (unsigned int) HD(j)->board_id; - cpp->data_len = sizeof(HD(j)->board_id); - cpp->scsi_cdbs_len = 6; - cpp->scsi_cdbs[0] = HA_CMD_INQUIRY; - - if (wait_on_busy(sh[j]->io_port)) { - printk("%s: board_inquiry, adapter busy.\n", BN(j)); - return TRUE; - } - - HD(j)->cp_stat[0] = IGNORE; - - /* Clear the interrupt indication */ - outb(CMD_CLR_INTR, sh[j]->io_port + REG_SYS_INTR); - - /* Store pointer in OGM address bytes */ - outl((unsigned int)cpp, sh[j]->io_port + REG_OGM); - - /* Issue OGM interrupt */ - outb(CMD_OGM_INTR, sh[j]->io_port + REG_LCL_INTR); - - sti(); - time = jiffies; - while (jiffies < (time + 100) && limit++ < 100000000); - cli(); - - if (cpp->adapter_status || HD(j)->cp_stat[0] != FREE) { - HD(j)->cp_stat[0] = FREE; - printk("%s: board_inquiry, err 0x%x.\n", BN(j), cpp->adapter_status); - return TRUE; - } - - return FALSE; -} - -static inline int port_detect(ushort *port_base, unsigned int j, - Scsi_Host_Template * tpnt) { - unsigned char irq, dma_channel, subversion; - unsigned char in_byte; - - /* Allowed BIOS base addresses (NULL indicates reserved) */ - void *bios_segment_table[8] = { - NULL, - (void *) 0xc4000, (void *) 0xc8000, (void *) 0xcc000, (void *) 0xd0000, - (void *) 0xd4000, (void *) 0xd8000, (void *) 0xdc000 - }; - - /* Allowed IRQs */ - unsigned char interrupt_table[4] = { 15, 14, 11, 10 }; - - /* Allowed DMA channels for ISA (0 indicates reserved) */ - unsigned char dma_channel_table[4] = { 5, 6, 7, 0 }; - - /* Head/sector mappings */ - struct { - unsigned char heads; - unsigned char sectors; - } mapping_table[4] = { - { 16, 63 }, { 64, 32 }, { 64, 63 }, { 64, 32 } - }; - - struct config_1 { - unsigned char bios_segment: 3; - unsigned char removable_disks_as_fixed: 1; - unsigned char interrupt: 2; - unsigned char dma_channel: 2; - } config_1; - - struct config_2 { - unsigned char ha_scsi_id: 3; - unsigned char mapping_mode: 2; - unsigned char bios_drive_number: 1; - unsigned char tfr_port: 2; - } config_2; - - char name[16]; - - sprintf(name, "%s%d", driver_name, j); - - if(check_region(*port_base, REGION_SIZE)) { - printk("%s: address 0x%03x in use, skipping probe.\n", - name, *port_base); - return FALSE; - } - - if (inb(*port_base + REG_PRODUCT_ID1) != PRODUCT_ID1) return FALSE; - - in_byte = inb(*port_base + REG_PRODUCT_ID2); - - if ((in_byte & 0xf0) != PRODUCT_ID2) return FALSE; - - *(char *)&config_1 = inb(*port_base + REG_CONFIG1); - *(char *)&config_2 = inb(*port_base + REG_CONFIG2); - - irq = interrupt_table[config_1.interrupt]; - dma_channel = dma_channel_table[config_1.dma_channel]; - subversion = (in_byte & 0x0f); - - /* Board detected, allocate its IRQ if not already done */ - if ((irq >= MAX_IRQ) || ((irqlist[irq] == NO_IRQ) && request_irq - (irq, u14_34f_interrupt_handler, SA_INTERRUPT, driver_name))) { - printk("%s: unable to allocate IRQ %u, detaching.\n", name, irq); - return FALSE; - } - - if (subversion == ISA && request_dma(dma_channel, driver_name)) { - printk("%s: unable to allocate DMA channel %u, detaching.\n", - name, dma_channel); - free_irq(irq); - return FALSE; - } - - sh[j] = scsi_register(tpnt, sizeof(struct hostdata)); - - if (sh[j] == NULL) { - printk("%s: unable to register host, detaching.\n", name); - - if (irqlist[irq] == NO_IRQ) free_irq(irq); - - if (subversion == ISA) free_dma(dma_channel); - - return FALSE; - } - - sh[j]->io_port = *port_base; - sh[j]->n_io_port = REGION_SIZE; - sh[j]->base = bios_segment_table[config_1.bios_segment]; - sh[j]->irq = irq; - sh[j]->sg_tablesize = MAX_SGLIST; - sh[j]->this_id = config_2.ha_scsi_id; - sh[j]->can_queue = MAX_MAILBOXES; - sh[j]->cmd_per_lun = MAX_CMD_PER_LUN; - -#if defined(DEBUG_DETECT) - { - unsigned char sys_mask, lcl_mask; - - sys_mask = inb(sh[j]->io_port + REG_SYS_MASK); - lcl_mask = inb(sh[j]->io_port + REG_LCL_MASK); - printk("SYS_MASK 0x%x, LCL_MASK 0x%x.\n", sys_mask, lcl_mask); - } -#endif - - /* If BIOS is disabled, force enable interrupts */ - if (sh[j]->base == 0) outb(CMD_ENA_INTR, sh[j]->io_port + REG_SYS_MASK); - - /* Register the I/O space that we use */ - request_region(sh[j]->io_port, REGION_SIZE, driver_name); - - memset(HD(j), 0, sizeof(struct hostdata)); - HD(j)->heads = mapping_table[config_2.mapping_mode].heads; - HD(j)->sectors = mapping_table[config_2.mapping_mode].sectors; - HD(j)->subversion = subversion; - HD(j)->board_number = j; - irqlist[irq] = j; - - if (HD(j)->subversion == ESA) { - -#if defined (HAVE_OLD_UX4F_FIRMWARE) - sh[j]->sg_tablesize = MAX_SAFE_SGLIST; -#endif - - sh[j]->dma_channel = NO_DMA; - sh[j]->unchecked_isa_dma = FALSE; - sprintf(BN(j), "U34F%d", j); - } - else { - sh[j]->wish_block = TRUE; - -#if defined (HAVE_OLD_UX4F_FIRMWARE) - sh[j]->hostt->use_clustering = DISABLE_CLUSTERING; - sh[j]->sg_tablesize = MAX_SAFE_SGLIST; -#endif - - sh[j]->dma_channel = dma_channel; - sh[j]->unchecked_isa_dma = TRUE; - sprintf(BN(j), "U14F%d", j); - disable_dma(dma_channel); - clear_dma_ff(dma_channel); - set_dma_mode(dma_channel, DMA_MODE_CASCADE); - enable_dma(dma_channel); - } - - if (HD(j)->subversion == ISA && !board_inquiry(j)) { - HD(j)->board_id[40] = 0; - - if (strcmp(&HD(j)->board_id[32], "06000600")) { - printk("%s: %s.\n", BN(j), &HD(j)->board_id[8]); - printk("%s: firmware %s is outdated, FW PROM should be 28004-006.\n", - BN(j), &HD(j)->board_id[32]); - sh[j]->hostt->use_clustering = DISABLE_CLUSTERING; - sh[j]->sg_tablesize = MAX_SAFE_SGLIST; - } - } - - printk("%s: PORT 0x%03x, BIOS 0x%05x, IRQ %u, DMA %u, SG %d, "\ - "Mbox %d, CmdLun %d, C%d.\n", BN(j), sh[j]->io_port, - (int)sh[j]->base, sh[j]->irq, - sh[j]->dma_channel, sh[j]->sg_tablesize, - sh[j]->can_queue, sh[j]->cmd_per_lun, - sh[j]->hostt->use_clustering); - return TRUE; -} - -int u14_34f_detect (Scsi_Host_Template * tpnt) { - unsigned int j = 0, k, flags; - - ushort io_port[] = { - 0x330, 0x340, 0x230, 0x240, 0x210, 0x130, 0x140, 0x0 - }; - - ushort *port_base = io_port; - - tpnt->proc_dir = &proc_scsi_u14_34f; - - save_flags(flags); - cli(); - - for (k = 0; k < MAX_IRQ; k++) { - irqlist[k] = NO_IRQ; - calls[k] = 0; - } - - for (k = 0; k < MAX_BOARDS + 1; k++) sh[k] = NULL; - - while (*port_base) { - - if (j < MAX_BOARDS && port_detect(port_base, j, tpnt)) j++; - - port_base++; - } - - if (j > 0) - printk("UltraStor 14F/34F: Copyright (C) 1994, 1995 Dario Ballabio.\n"); - - restore_flags(flags); - return j; -} - -static inline void build_sg_list(struct mscp *cpp, Scsi_Cmnd *SCpnt) { - unsigned int k, data_len = 0; - struct scatterlist * sgpnt; - - sgpnt = (struct scatterlist *) SCpnt->request_buffer; - - for (k = 0; k < SCpnt->use_sg; k++) { - cpp->sglist[k].address = (unsigned int) sgpnt[k].address; - cpp->sglist[k].num_bytes = sgpnt[k].length; - data_len += sgpnt[k].length; - } - - cpp->use_sg = SCpnt->use_sg; - cpp->data_address = (unsigned int) cpp->sglist; - cpp->data_len = data_len; -} - -int u14_34f_queuecommand(Scsi_Cmnd *SCpnt, void (*done)(Scsi_Cmnd *)) { - unsigned int i, j, k, flags; - struct mscp *cpp; - - save_flags(flags); - cli(); - /* j is the board number */ - j = ((struct hostdata *) SCpnt->host->hostdata)->board_number; - - if (!done) panic("%s: qcomm, pid %ld, null done.\n", BN(j), SCpnt->pid); - - /* i is the mailbox number, look for the first free mailbox - starting from last_cp_used */ - i = HD(j)->last_cp_used + 1; - - for (k = 0; k < sh[j]->can_queue; k++, i++) { - - if (i >= sh[j]->can_queue) i = 0; - - if (HD(j)->cp_stat[i] == FREE) { - HD(j)->last_cp_used = i; - break; - } - } - - if (k == sh[j]->can_queue) { - printk("%s: qcomm, no free mailbox, resetting.\n", BN(j)); - - if (HD(j)->in_reset) - printk("%s: qcomm, already in reset.\n", BN(j)); - else if (u14_34f_reset(SCpnt) == SCSI_RESET_SUCCESS) - panic("%s: qcomm, SCSI_RESET_SUCCESS.\n", BN(j)); - - SCpnt->result = DID_BUS_BUSY << 16; - SCpnt->host_scribble = NULL; - printk("%s: qcomm, pid %ld, DID_BUS_BUSY, done.\n", BN(j), SCpnt->pid); - restore_flags(flags); - done(SCpnt); - return 0; - } - - /* Set pointer to control packet structure */ - cpp = &HD(j)->cp[i]; - - memset(cpp, 0, sizeof(struct mscp)); - SCpnt->scsi_done = done; - cpp->index = i; - SCpnt->host_scribble = (unsigned char *) &cpp->index; - - if (do_trace) printk("%s: qcomm, mbox %d, target %d, pid %ld.\n", - BN(j), i, SCpnt->target, SCpnt->pid); - - cpp->opcode = OP_SCSI; - cpp->xdir = DTD_SCSI; - cpp->target = SCpnt->target; - cpp->lun = SCpnt->lun; - cpp->SCpnt = SCpnt; - cpp->sense_addr = (unsigned int) SCpnt->sense_buffer; - cpp->sense_len = sizeof SCpnt->sense_buffer; - - if (SCpnt->use_sg) { - cpp->sg = TRUE; - build_sg_list(cpp, SCpnt); - } - else { - cpp->data_address = (unsigned int)SCpnt->request_buffer; - cpp->data_len = SCpnt->request_bufflen; - } - - cpp->scsi_cdbs_len = SCpnt->cmd_len; - memcpy(cpp->scsi_cdbs, SCpnt->cmnd, cpp->scsi_cdbs_len); - - if (wait_on_busy(sh[j]->io_port)) { - SCpnt->result = DID_ERROR << 16; - SCpnt->host_scribble = NULL; - printk("%s: qcomm, target %d, pid %ld, adapter busy, DID_ERROR, done.\n", - BN(j), SCpnt->target, SCpnt->pid); - restore_flags(flags); - done(SCpnt); - return 0; - } - - /* Store pointer in OGM address bytes */ - outl((unsigned int)cpp, sh[j]->io_port + REG_OGM); - - /* Issue OGM interrupt */ - outb(CMD_OGM_INTR, sh[j]->io_port + REG_LCL_INTR); - - HD(j)->cp_stat[i] = IN_USE; - restore_flags(flags); - return 0; -} - -int u14_34f_abort(Scsi_Cmnd *SCarg) { - unsigned int i, j, flags; - - save_flags(flags); - cli(); - j = ((struct hostdata *) SCarg->host->hostdata)->board_number; - - if (SCarg->host_scribble == NULL) { - printk("%s: abort, target %d, pid %ld inactive.\n", - BN(j), SCarg->target, SCarg->pid); - restore_flags(flags); - return SCSI_ABORT_NOT_RUNNING; - } - - i = *(unsigned int *)SCarg->host_scribble; - printk("%s: abort, mbox %d, target %d, pid %ld.\n", - BN(j), i, SCarg->target, SCarg->pid); - - if (i >= sh[j]->can_queue) - panic("%s: abort, invalid SCarg->host_scribble.\n", BN(j)); - - if (wait_on_busy(sh[j]->io_port)) { - printk("%s: abort, timeout error.\n", BN(j)); - restore_flags(flags); - return SCSI_ABORT_ERROR; - } - - if (HD(j)->cp_stat[i] == FREE) { - printk("%s: abort, mbox %d is free.\n", BN(j), i); - restore_flags(flags); - return SCSI_ABORT_NOT_RUNNING; - } - - if (HD(j)->cp_stat[i] == IN_USE) { - printk("%s: abort, mbox %d is in use.\n", BN(j), i); - - if (SCarg != HD(j)->cp[i].SCpnt) - panic("%s: abort, mbox %d, SCarg %p, cp SCpnt %p.\n", - BN(j), i, SCarg, HD(j)->cp[i].SCpnt); - - restore_flags(flags); - return SCSI_ABORT_SNOOZE; - } - - if (HD(j)->cp_stat[i] == IN_RESET) { - printk("%s: abort, mbox %d is in reset.\n", BN(j), i); - restore_flags(flags); - return SCSI_ABORT_ERROR; - } - - if (HD(j)->cp_stat[i] == LOCKED) { - printk("%s: abort, mbox %d is locked.\n", BN(j), i); - restore_flags(flags); - return SCSI_ABORT_NOT_RUNNING; - } - restore_flags(flags); - panic("%s: abort, mbox %d, invalid cp_stat.\n", BN(j), i); -} - -int u14_34f_reset(Scsi_Cmnd * SCarg) { - unsigned int i, j, flags, time, k, limit = 0; - int arg_done = FALSE; - Scsi_Cmnd *SCpnt; - - save_flags(flags); - cli(); - j = ((struct hostdata *) SCarg->host->hostdata)->board_number; - printk("%s: reset, enter, target %d, pid %ld.\n", - BN(j), SCarg->target, SCarg->pid); - - if (SCarg->host_scribble == NULL) - printk("%s: reset, pid %ld inactive.\n", BN(j), SCarg->pid); - - if (HD(j)->in_reset) { - printk("%s: reset, exit, already in reset.\n", BN(j)); - restore_flags(flags); - return SCSI_RESET_ERROR; - } - - if (wait_on_busy(sh[j]->io_port)) { - printk("%s: reset, exit, timeout error.\n", BN(j)); - restore_flags(flags); - return SCSI_RESET_ERROR; - } - - for (k = 0; k < MAX_TARGET; k++) HD(j)->target_reset[k] = TRUE; - - for (k = 0; k < MAX_TARGET; k++) HD(j)->target_time_out[k] = 0; - - for (i = 0; i < sh[j]->can_queue; i++) { - - if (HD(j)->cp_stat[i] == FREE) continue; - - if (HD(j)->cp_stat[i] == LOCKED) { - HD(j)->cp_stat[i] = FREE; - printk("%s: reset, locked mbox %d forced free.\n", BN(j), i); - continue; - } - - SCpnt = HD(j)->cp[i].SCpnt; - HD(j)->cp_stat[i] = IN_RESET; - printk("%s: reset, mbox %d in reset, pid %ld.\n", - BN(j), i, SCpnt->pid); - - if (SCpnt == NULL) - panic("%s: reset, mbox %d, SCpnt == NULL.\n", BN(j), i); - - if (SCpnt->host_scribble == NULL) - panic("%s: reset, mbox %d, garbled SCpnt.\n", BN(j), i); - - if (*(unsigned int *)SCpnt->host_scribble != i) - panic("%s: reset, mbox %d, index mismatch.\n", BN(j), i); - - if (SCpnt->scsi_done == NULL) - panic("%s: reset, mbox %d, SCpnt->scsi_done == NULL.\n", BN(j), i); - - if (SCpnt == SCarg) arg_done = TRUE; - } - - if (wait_on_busy(sh[j]->io_port)) { - printk("%s: reset, cannot reset, timeout error.\n", BN(j)); - restore_flags(flags); - return SCSI_RESET_ERROR; - } - - outb(CMD_RESET, sh[j]->io_port + REG_LCL_INTR); - printk("%s: reset, board reset done, enabling interrupts.\n", BN(j)); - -#if defined (DEBUG_RESET) - do_trace = TRUE; -#endif - - HD(j)->in_reset = TRUE; - sti(); - time = jiffies; - while (jiffies < (time + 100) && limit++ < 100000000); - cli(); - printk("%s: reset, interrupts disabled, loops %d.\n", BN(j), limit); - - for (i = 0; i < sh[j]->can_queue; i++) { - - /* Skip mailboxes already set free by interrupt */ - if (HD(j)->cp_stat[i] != IN_RESET) continue; - - SCpnt = HD(j)->cp[i].SCpnt; - SCpnt->result = DID_RESET << 16; - SCpnt->host_scribble = NULL; - - /* This mailbox is still waiting for its interrupt */ - HD(j)->cp_stat[i] = LOCKED; - - printk("%s, reset, mbox %d locked, DID_RESET, pid %ld done.\n", - BN(j), i, SCpnt->pid); - restore_flags(flags); - SCpnt->scsi_done(SCpnt); - cli(); - } - - HD(j)->in_reset = FALSE; - do_trace = FALSE; - restore_flags(flags); - - if (arg_done) { - printk("%s: reset, exit, success.\n", BN(j)); - return SCSI_RESET_SUCCESS; - } - else { - printk("%s: reset, exit, wakeup.\n", BN(j)); - return SCSI_RESET_PUNT; - } -} - -int u14_34f_biosparam(Disk * disk, kdev_t dev, int * dkinfo) { - unsigned int j = 0; - int size = disk->capacity; - - dkinfo[0] = HD(j)->heads; - dkinfo[1] = HD(j)->sectors; - dkinfo[2] = size / (HD(j)->heads * HD(j)->sectors); - return 0; -} - -static void u14_34f_interrupt_handler(int irq, struct pt_regs * regs) { - Scsi_Cmnd *SCpnt; - unsigned int i, j, k, flags, status, tstatus, loops, total_loops = 0; - struct mscp *spp; - - save_flags(flags); - cli(); - - if (irqlist[irq] == NO_IRQ) { - printk("%s, ihdlr, irq %d, unexpected interrupt.\n", driver_name, irq); - restore_flags(flags); - return; - } - - if (do_trace) printk("%s: ihdlr, enter, irq %d, calls %d.\n", - driver_name, irq, calls[irq]); - - /* Service all the boards configured on this irq */ - for (j = 0; sh[j] != NULL; j++) { - - if (sh[j]->irq != irq) continue; - - loops = 0; - - /* Loop until all interrupts for a board are serviced */ - while (inb(sh[j]->io_port + REG_SYS_INTR) & IRQ_ASSERTED) { - total_loops++; - loops++; - - if (do_trace) printk("%s: ihdlr, start service, count %d.\n", - BN(j), HD(j)->iocount); - - spp = (struct mscp *)inl(sh[j]->io_port + REG_ICM); - - /* Clear interrupt pending flag */ - outb(CMD_CLR_INTR, sh[j]->io_port + REG_SYS_INTR); - - i = spp - HD(j)->cp; - - if (i >= sh[j]->can_queue) - panic("%s: ihdlr, invalid mscp address.\n", BN(j)); - - if (HD(j)->cp_stat[i] == IGNORE) { - HD(j)->cp_stat[i] = FREE; - continue; - } - else if (HD(j)->cp_stat[i] == LOCKED) { - HD(j)->cp_stat[i] = FREE; - printk("%s: ihdlr, mbox %d unlocked, count %d.\n", - BN(j), i, HD(j)->iocount); - continue; - } - else if (HD(j)->cp_stat[i] == FREE) { - printk("%s: ihdlr, mbox %d is free, count %d.\n", - BN(j), i, HD(j)->iocount); - continue; - } - else if (HD(j)->cp_stat[i] == IN_RESET) - printk("%s: ihdlr, mbox %d is in reset.\n", BN(j), i); - else if (HD(j)->cp_stat[i] != IN_USE) - panic("%s: ihdlr, mbox %d, invalid cp_stat.\n", BN(j), i); - - HD(j)->cp_stat[i] = FREE; - SCpnt = spp->SCpnt; - - if (SCpnt == NULL) - panic("%s: ihdlr, mbox %d, SCpnt == NULL.\n", BN(j), i); - - if (SCpnt->host_scribble == NULL) - panic("%s: ihdlr, mbox %d, pid %ld, SCpnt %p garbled.\n", - BN(j), i, SCpnt->pid, SCpnt); - - if (*(unsigned int *)SCpnt->host_scribble != i) - panic("%s: ihdlr, mbox %d, pid %ld, index mismatch %d,"\ - " irq %d.\n", BN(j), i, SCpnt->pid, - *(unsigned int *)SCpnt->host_scribble, irq); - - tstatus = status_byte(spp->target_status); - - switch (spp->adapter_status) { - case ASOK: /* status OK */ - - /* Forces a reset if a disk drive keeps returning BUSY */ - if (tstatus == BUSY && SCpnt->device->type != TYPE_TAPE) - status = DID_ERROR << 16; - - /* If there was a bus reset, redo operation on each target */ - else if (tstatus != GOOD - && SCpnt->device->type == TYPE_DISK - && HD(j)->target_reset[SCpnt->target]) - status = DID_BUS_BUSY << 16; - - /* Works around a flaw in scsi.c */ - else if (tstatus == CHECK_CONDITION - && SCpnt->device->type == TYPE_DISK - && (SCpnt->sense_buffer[2] & 0xf) == RECOVERED_ERROR) - status = DID_BUS_BUSY << 16; - - else - status = DID_OK << 16; - - if (tstatus == GOOD) - HD(j)->target_reset[SCpnt->target] = FALSE; - - if (spp->target_status && SCpnt->device->type == TYPE_DISK) - printk("%s: ihdlr, target %d:%d, pid %ld, target_status "\ - "0x%x, sense key 0x%x.\n", BN(j), - SCpnt->target, SCpnt->lun, SCpnt->pid, - spp->target_status, SCpnt->sense_buffer[2]); - - HD(j)->target_time_out[SCpnt->target] = 0; - - break; - case ASST: /* Selection Time Out */ - - if (HD(j)->target_time_out[SCpnt->target] > 1) - status = DID_ERROR << 16; - else { - status = DID_TIME_OUT << 16; - HD(j)->target_time_out[SCpnt->target]++; - } - - break; - case 0x92: /* Data over/under-run */ - case 0x93: /* Unexpected bus free */ - case 0x94: /* Target bus phase sequence failure */ - case 0x96: /* Illegal SCSI command */ - case 0xa3: /* SCSI bus reset error */ - - if (SCpnt->device->type != TYPE_TAPE) - status = DID_BUS_BUSY << 16; - else - status = DID_ERROR << 16; - - for (k = 0; k < MAX_TARGET; k++) - HD(j)->target_reset[k] = TRUE; - - break; - case 0x01: /* Invalid command */ - case 0x02: /* Invalid parameters */ - case 0x03: /* Invalid data list */ - case 0x84: /* SCSI bus abort error */ - case 0x9b: /* Auto request sense error */ - case 0x9f: /* Unexpected command complete message error */ - case 0xff: /* Invalid parameter in the S/G list */ - default: - status = DID_ERROR << 16; - break; - } - - SCpnt->result = status | spp->target_status; - HD(j)->iocount++; - - if (loops > 1) HD(j)->multicount++; - -#if defined (DEBUG_INTERRUPT) - if (SCpnt->result || do_trace) -#else - if ((spp->adapter_status != ASOK && HD(j)->iocount > 1000) || - (spp->adapter_status != ASOK && - spp->adapter_status != ASST && HD(j)->iocount <= 1000) || - do_trace) -#endif - printk("%s: ihdlr, mbox %d, err 0x%x:%x,"\ - " target %d:%d, pid %ld, count %d.\n", - BN(j), i, spp->adapter_status, spp->target_status, - SCpnt->target, SCpnt->lun, SCpnt->pid, HD(j)->iocount); - - /* Set the command state to inactive */ - SCpnt->host_scribble = NULL; - - restore_flags(flags); - SCpnt->scsi_done(SCpnt); - cli(); - - } /* Multiple command loop */ - - } /* Boards loop */ - - calls[irq]++; - - if (total_loops == 0) - printk("%s: ihdlr, irq %d, no command completed, calls %d.\n", - driver_name, irq, calls[irq]); - - if (do_trace) printk("%s: ihdlr, exit, irq %d, calls %d.\n", - driver_name, irq, calls[irq]); - -#if defined (DEBUG_STATISTICS) - if ((calls[irq] % 100000) == 10000) - for (j = 0; sh[j] != NULL; j++) - printk("%s: ihdlr, calls %d, count %d, multi %d.\n", BN(j), - calls[(sh[j]->irq)], HD(j)->iocount, HD(j)->multicount); -#endif - - restore_flags(flags); - return; -} - -#if defined(MODULE) -Scsi_Host_Template driver_template = ULTRASTOR_14_34F; - -#include "scsi_module.c" -#endif |