/* * 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 #include #endif #include #include #include #include #include #include #include "../block/blk.h" #include "scsi.h" #include "hosts.h" #include "sd.h" #include #include #include "u14-34f.h" /* 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 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; 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); 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; } else 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, int 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