/* * eata.c - Low-level driver for EATA/DMA SCSI host adapters. * * 6 Jul 1995 rev. 2.01 for linux 1.3.7 * Update required by the new /proc/scsi support. * * 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 * Now DEBUG_RESET is disabled by default. * Register a board even if it does not assert DMA protocol support * (DPT SK2011B does not report correctly the dmasup bit). * * 9 Feb 1995 rev. 1.16 for linux 1.1.90 * Use host->wish_block instead of host->block. * New list of Data Out SCSI commands. * * 8 Feb 1995 rev. 1.15 for linux 1.1.89 * Cleared target_time_out counter while performing a reset. * All external symbols renamed to avoid possible name conflicts. * * 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. * * 24 Jan 1995 rev. 1.13 for linux 1.1.85 * Use optimized board configuration, with a measured performance * increase in the range 10%-20% on i/o throughput. * * 16 Jan 1995 rev. 1.12 for linux 1.1.81 * Fix mscp structure comments (no functional change). * Display a message if check_region detects a port address * already in use. * * 17 Dec 1994 rev. 1.11 for linux 1.1.74 * Use the scsicam_bios_param routine. This allows an easy * migration path from disk partition tables created using * different SCSI drivers and non optimal disk geometry. * * 15 Dec 1994 rev. 1.10 for linux 1.1.74 * Added support for ISA EATA boards (DPT PM2011, DPT PM2021). * The host->block flag is set for all the detected ISA boards. * The detect routine no longer enforces LEVEL triggering * for EISA boards, it just prints a warning message. * * 30 Nov 1994 rev. 1.09 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. * * 18 Nov 1994 rev. 1.08 for linux 1.1.64 * Forces sg_tablesize = 64 and can_queue = 64 if these * values are not correctly detected (DPT PM2012). * * 14 Nov 1994 rev. 1.07 for linux 1.1.63 Final BETA release. * 04 Aug 1994 rev. 1.00 for linux 1.1.39 First BETA release. * * * This driver is based on the CAM (Common Access Method Committee) * EATA (Enhanced AT Bus Attachment) rev. 2.0A, using DMA protocol. * * Copyright (C) 1994, 1995 Dario Ballabio (dario@milano.europe.dg.com) * */ /* * * Here is a brief description of the DPT SCSI host adapters. * All these boards provide an EATA/DMA compatible programming interface * and are fully supported by this driver: * * PM2011B/9X - Entry Level ISA * PM2021A/9X - High Performance ISA * PM2012A Old EISA * PM2012B Old EISA * PM2022A/9X - Entry Level EISA * PM2122A/9X - High Performance EISA * PM2322A/9X - Extra High Performance EISA * * The DPT PM2001 provides only the EATA/PIO interface and hence is not * supported by this driver. * * This code has been tested with up to 3 Distributed Processing Technology * PM2122A/9X (DPT SCSI BIOS v002.D1, firmware v05E.0) eisa controllers, * no on board cache and no RAID option. * BIOS must be enabled on the first board and must be disabled for all other * boards. * Support is provided for any number of DPT PM2122 eisa boards. * All boards should be configured at the same IRQ level. * Multiple IRQ configurations are supported too. * Boards can be located in any eisa slot (1-15) and are named EATA0, * EATA1,... in increasing eisa slot number. ISA boards are detected * after the eisa slot probes. * * The IRQ for EISA boards should be _level_ triggered (not _edge_ triggered). * This is a requirement in order to support multiple boards on the same IRQ. * * Other eisa configuration parameters are: * * COMMAND QUEUING : ENABLED * COMMAND TIMEOUT : ENABLED * CACHE : DISABLED * * 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 #include #include "scsi.h" #include "hosts.h" #include "sd.h" #include #include #include "linux/in.h" #include "eata.h" #include struct proc_dir_entry proc_scsi_eata2x = { PROC_SCSI_EATA2X, 6, "eata2x", S_IFDIR | S_IRUGO | S_IXUGO, 2 }; /* Subversion values */ #define ISA 0 #define ESA 1 #undef FORCE_CONFIG #undef DEBUG_DETECT #undef DEBUG_INTERRUPT #undef DEBUG_STATISTICS #undef DEBUG_RESET #define MAX_TARGET 8 #define MAX_IRQ 16 #define MAX_BOARDS 18 #define MAX_MAILBOXES 64 #define MAX_SGLIST 64 #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_CMD 7 #define REG_STATUS 7 #define REG_AUX_STATUS 8 #define REG_DATA 0 #define REG_DATA2 1 #define REG_SEE 6 #define REG_LOW 2 #define REG_LM 3 #define REG_MID 4 #define REG_MSB 5 #define REGION_SIZE 9 #define EISA_RANGE 0xf000 #define BSY_ASSERTED 0x80 #define DRQ_ASSERTED 0x08 #define ABSY_ASSERTED 0x01 #define IRQ_ASSERTED 0x02 #define READ_CONFIG_PIO 0xf0 #define SET_CONFIG_PIO 0xf1 #define SEND_CP_PIO 0xf2 #define RECEIVE_SP_PIO 0xf3 #define TRUNCATE_XFR_PIO 0xf4 #define RESET_PIO 0xf9 #define READ_CONFIG_DMA 0xfd #define SET_CONFIG_DMA 0xfe #define SEND_CP_DMA 0xff #define ASOK 0x00 #define ASST 0x01 #define ARRAY_SIZE(arr) (sizeof (arr) / sizeof (arr)[0]) /* "EATA", in Big Endian format */ #define EATA_SIGNATURE 0x41544145 /* Number of valid bytes in the board config structure for EATA 2.0x */ #define EATA_2_0A_SIZE 28 #define EATA_2_0B_SIZE 30 /* Board info structure */ struct eata_info { ulong data_len; /* Number of valid bytes after this field */ ulong sign; /* ASCII "EATA" signature */ unchar :4, /* unused low nibble */ version:4; /* EATA version, should be 0x1 */ unchar ocsena:1, /* Overlap Command Support Enabled */ tarsup:1, /* Target Mode Supported */ :2, dmasup:1, /* DMA Supported */ drqvld:1, /* DRQ Index (DRQX) is valid */ ata:1, /* This is an ATA device */ haaval:1; /* Host Adapter Address Valid */ ushort cp_pad_len; /* Number of pad bytes after cp_len */ unchar host_addr[3]; /* Host Adapter SCSI ID for channels 2, 1, 0 */ unchar reserved; ulong cp_len; /* Number of valid bytes in cp */ ulong sp_len; /* Number of valid bytes in sp */ ushort queue_size; /* Max number of cp that can be queued */ ushort unused; ushort scatt_size; /* Max number of entries in scatter/gather table */ unchar irq:4, /* Interrupt Request assigned to this controller */ irq_tr:1, /* 0 for edge triggered, 1 for level triggered */ second:1, /* 1 if this is a secondary (not primary) controller */ drqx:2; /* DRQ Index (0=DMA0, 1=DMA7, 2=DMA6, 3=DMA5) */ unchar sync; /* 1 if scsi target id 7...0 is running sync scsi */ /* Structure extension defined in EATA 2.0B */ unchar isaena:1, /* ISA i/o addressing is disabled/enabled */ forcaddr:1, /* Port address has been forced */ :6; unchar max_id:5, /* Max number of SCSI target IDs */ max_chan:3; /* Max SCSI channel number on this board */ ushort ipad[249]; }; /* Board config structure */ struct eata_config { ushort len; /* Number of bytes following this field */ unchar edis:1, /* Disable EATA interface after config command */ ocena:1, /* Overlapped Commands Enabled */ mdpena:1, /* Transfer all Modified Data Pointer Messages */ tarena:1, /* Target Mode Enabled for this controller */ :4; unchar cpad[511]; }; /* Returned status packet structure */ struct mssp { unchar adapter_status:7, /* State related to current command */ eoc:1; /* End Of Command (1 = command completed) */ unchar target_status; /* SCSI status received after data transfer */ unchar unused[2]; ulong inv_res_len; /* Number of bytes not transferred */ Scsi_Cmnd *SCpnt; /* Address set in cp */ char mess[12]; }; /* MailBox SCSI Command Packet */ struct mscp { unchar sreset:1, /* SCSI Bus Reset Signal should be asserted */ init:1, /* Re-initialize controller and self test */ reqsen:1, /* Transfer Request Sense Data to addr using DMA */ sg:1, /* Use Scatter/Gather */ :1, interp:1, /* The controller interprets cp, not the target */ dout:1, /* Direction of Transfer is Out (Host to Target) */ din:1; /* Direction of Transfer is In (Target to Host) */ unchar sense_len; /* Request Sense Length */ unchar unused[4]; unchar phsunit:1, /* Send to Target Physical Unit (bypass RAID) */ notused:7; unchar target; /* SCSI Target ID */ unchar lun:3, /* LUN */ :2, luntar:1, /* This cp is for Target (not LUN) */ dispri:1, /* Disconnect Privilege granted */ one:1; /* 1 */ unchar mess[3]; /* Massage to/from Target */ unchar cdb[12]; /* Command Descriptor Block */ ulong data_len; /* If sg=0 Data Length, if sg=1 sglist length */ Scsi_Cmnd *SCpnt; /* Address to be returned is sp */ ulong data_address; /* If sg=0 Data Address, if sg=1 sglist address */ ulong sp_addr; /* Address where sp is DMA'ed when cp completes */ ulong sense_addr; /* Address where Sense Data is DMA'ed on error */ 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 protocol_rev; /* EATA 2.0 rev., 'A' or 'B' or 'C' */ struct mssp sp[MAX_MAILBOXES]; /* Returned status for this board */ }; static struct Scsi_Host * sh[MAX_BOARDS + 1]; static const char* driver_name = "EATA"; 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 eata2x_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_AUX_STATUS) & ABSY_ASSERTED) if (--loop == 0) return TRUE; return FALSE; } static inline unchar do_dma (ushort iobase, unsigned int addr, unchar cmd) { if (wait_on_busy(iobase)) return TRUE; if (addr) { outb((char) addr, iobase + REG_LOW); outb((char) (addr >> 8), iobase + REG_LM); outb((char) (addr >> 16), iobase + REG_MID); outb((char) (addr >> 24), iobase + REG_MSB); } outb(cmd, iobase + REG_CMD); return FALSE; } static inline unchar read_pio (ushort iobase, ushort *start, ushort *end) { unsigned int loop = MAXLOOP; ushort *p; for (p = start; p <= end; p++) { while (!(inb(iobase + REG_STATUS) & DRQ_ASSERTED)) if (--loop == 0) return TRUE; loop = MAXLOOP; *p = inw(iobase); } 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 protocol_rev; struct eata_info info; const char *board_status; /* Allowed DMA channels for ISA (0 indicates reserved) */ unsigned char dma_channel_table[4] = { 5, 6, 7, 0 }; 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 (do_dma(*port_base, 0, READ_CONFIG_PIO)) return FALSE; /* Read the info structure */ if (read_pio(*port_base, (ushort *)&info, (ushort *)&info.ipad[0])) return FALSE; /* Check the controller "EATA" signature */ if (info.sign != EATA_SIGNATURE) return FALSE; if (ntohl(info.data_len) < EATA_2_0A_SIZE) { printk("%s: config structure size (%ld bytes) too short, detaching.\n", name, ntohl(info.data_len)); return FALSE; } else if (ntohl(info.data_len) == EATA_2_0A_SIZE) protocol_rev = 'A'; else if (ntohl(info.data_len) == EATA_2_0B_SIZE) protocol_rev = 'B'; else protocol_rev = 'C'; if (protocol_rev != 'A' && info.max_chan > 0) printk("%s: warning, only scsi channel 0 is supported.\n", name); irq = info.irq; if (*port_base & EISA_RANGE) { if (!info.haaval || info.ata || info.drqvld) { printk("%s: unusable EISA board found (%d%d%d), detaching.\n", name, info.haaval, info.ata, info.drqvld); return FALSE; } subversion = ESA; dma_channel = NO_DMA; } else { if (!info.haaval || info.ata || !info.drqvld) { printk("%s: unusable ISA board found (%d%d%d), detaching.\n", name, info.haaval, info.ata, info.drqvld); return FALSE; } subversion = ISA; dma_channel = dma_channel_table[3 - info.drqx]; } if (!info.dmasup) printk("%s: warning, DMA protocol support not asserted.\n", name); if (subversion == ESA && !info.irq_tr) printk("%s: warning, LEVEL triggering is suggested for IRQ %u.\n", name, irq); if (info.second) board_status = "Sec."; else board_status = "Prim."; /* Board detected, allocate its IRQ if not already done */ if ((irq >= MAX_IRQ) || ((irqlist[irq] == NO_IRQ) && request_irq (irq, eata2x_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; } #if defined (FORCE_CONFIG) { struct eata_config config; /* Set board configuration */ memset((char *)&config, 0, sizeof(struct eata_config)); config.len = (ushort) htons((ushort)510); config.ocena = TRUE; if (do_dma(*port_base, (unsigned int)&config, SET_CONFIG_DMA)) { printk("%s: busy timeout sending configuration, detaching.\n", name); return FALSE; } } #endif 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]->dma_channel = dma_channel; sh[j]->irq = irq; sh[j]->sg_tablesize = (ushort) ntohs(info.scatt_size); sh[j]->this_id = (ushort) info.host_addr[3]; sh[j]->can_queue = (ushort) ntohs(info.queue_size); sh[j]->cmd_per_lun = MAX_CMD_PER_LUN; /* 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)->subversion = subversion; HD(j)->protocol_rev = protocol_rev; HD(j)->board_number = j; irqlist[irq] = j; if (HD(j)->subversion == ESA) sh[j]->unchecked_isa_dma = FALSE; else { sh[j]->wish_block = TRUE; sh[j]->unchecked_isa_dma = TRUE; disable_dma(dma_channel); clear_dma_ff(dma_channel); set_dma_mode(dma_channel, DMA_MODE_CASCADE); enable_dma(dma_channel); } strcpy(BN(j), name); printk("%s: 2.0%c, %s, ID %d, PORT 0x%03x, IRQ %u, DMA %u, SG %d, "\ "Mbox %d, CmdLun %d.\n", BN(j), HD(j)->protocol_rev, board_status, sh[j]->this_id, sh[j]->io_port, sh[j]->irq, sh[j]->dma_channel, sh[j]->sg_tablesize, sh[j]->can_queue, sh[j]->cmd_per_lun); /* DPT PM2012 does not allow to detect sg_tablesize correctly */ if (sh[j]->sg_tablesize > MAX_SGLIST || sh[j]->sg_tablesize < 2) { printk("%s: detect, forcing to use %d SG lists.\n", BN(j), MAX_SGLIST); sh[j]->sg_tablesize = MAX_SGLIST; } /* DPT PM2012 does not allow to detect can_queue correctly */ if (sh[j]->can_queue > MAX_MAILBOXES || sh[j]->can_queue < 2) { printk("%s: detect, forcing to use %d Mbox.\n", BN(j), MAX_MAILBOXES); sh[j]->can_queue = MAX_MAILBOXES; } #if defined (DEBUG_DETECT) if (protocol_rev != 'A') printk("%s: EATA 2.0%c, isaena %u, forcaddr %u, max_id %u,"\ " max_chan %u.\n", name, protocol_rev, info.isaena, info.forcaddr, info.max_id, info.max_chan); printk("%s: Version 0x%x, SYNC 0x%x, infol %ld, cpl %ld spl %ld.\n", name, info.version, info.sync, ntohl(info.data_len), ntohl(info.cp_len), ntohl(info.sp_len)); #endif return TRUE; } int eata2x_detect (Scsi_Host_Template * tpnt) { unsigned int j = 0, k, flags; ushort io_port[] = { 0x1c88, 0x2c88, 0x3c88, 0x4c88, 0x5c88, 0x6c88, 0x7c88, 0x8c88, 0x9c88, 0xac88, 0xbc88, 0xcc88, 0xdc88, 0xec88, 0xfc88, 0x1f0, 0x170, 0x330, 0x230, 0x0 }; ushort *port_base = io_port; tpnt->proc_dir = &proc_scsi_eata2x; 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("EATA/DMA 2.0x: 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; struct scatterlist * sgpnt; sgpnt = (struct scatterlist *) SCpnt->request_buffer; for (k = 0; k < SCpnt->use_sg; k++) { cpp->sglist[k].address = htonl((unsigned int) sgpnt[k].address); cpp->sglist[k].num_bytes = htonl((unsigned int) sgpnt[k].length); } cpp->data_address = htonl((unsigned int) cpp->sglist); cpp->data_len = htonl((SCpnt->use_sg * sizeof(struct sg_list))); } int eata2x_queuecommand (Scsi_Cmnd *SCpnt, void (*done)(Scsi_Cmnd *)) { unsigned int i, j, k, flags; struct mscp *cpp; struct mssp *spp; static const unsigned char data_out_cmds[] = { 0x0a, 0x2a, 0x15, 0x55, 0x04, 0x07, 0x0b, 0x10, 0x16, 0x18, 0x1d, 0x24, 0x2b, 0x2e, 0x30, 0x31, 0x32, 0x38, 0x39, 0x3a, 0x3b, 0x3d, 0x3f, 0x40, 0x41, 0x4c, 0xaa, 0xae, 0xb0, 0xb1, 0xb2, 0xb6, 0xea }; 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 (eata2x_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)); /* Set pointer to status packet structure */ spp = &HD(j)->sp[i]; memset(spp, 0, sizeof(struct mssp)); /* The EATA protocol uses Big Endian format, while Intel is Little Endian */ cpp->sp_addr = htonl((unsigned int) spp); 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); for (k = 0; k < ARRAY_SIZE(data_out_cmds); k++) if (SCpnt->cmnd[0] == data_out_cmds[k]) { cpp->dout = TRUE; break; } cpp->din = !cpp->dout; cpp->reqsen = TRUE; cpp->dispri = TRUE; cpp->one = TRUE; cpp->target = SCpnt->target; cpp->lun = SCpnt->lun; cpp->SCpnt = SCpnt; cpp->sense_addr = htonl((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 = htonl((unsigned int) SCpnt->request_buffer); cpp->data_len = htonl(SCpnt->request_bufflen); } memcpy(cpp->cdb, SCpnt->cmnd, SCpnt->cmd_len); /* Send control packet to the board */ if (do_dma(sh[j]->io_port, (unsigned int) cpp, SEND_CP_DMA)) { 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; } HD(j)->cp_stat[i] = IN_USE; restore_flags(flags); return 0; } int eata2x_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 eata2x_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 (do_dma(sh[j]->io_port, 0, RESET_PIO)) { printk("%s: reset, cannot reset, timeout error.\n", BN(j)); restore_flags(flags); return SCSI_RESET_ERROR; } 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; } } static void eata2x_interrupt_handler(int irq, struct pt_regs * regs) { Scsi_Cmnd *SCpnt; unsigned int i, j, k, flags, status, tstatus, loops, total_loops = 0; struct mssp *spp; struct mscp *cpp; 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_AUX_STATUS) & IRQ_ASSERTED) { total_loops++; loops++; if (do_trace) printk("%s: ihdlr, start service, count %d.\n", BN(j), HD(j)->iocount); /* Read the status register to clear the interrupt indication */ inb(sh[j]->io_port + REG_STATUS); /* Service all mailboxes of this board */ for (i = 0; i < sh[j]->can_queue; i++) { spp = &HD(j)->sp[i]; /* Check if this mailbox has completed the operation */ if (spp->eoc == FALSE) continue; spp->eoc = FALSE; 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; cpp = &HD(j)->cp[i]; SCpnt = spp->SCpnt; if (SCpnt == NULL) panic("%s: ihdlr, mbox %d, SCpnt == NULL.\n", BN(j), i); if (SCpnt != cpp->SCpnt) panic("%s: ihdlr, mbox %d, sp SCpnt %p, cp SCpnt %p.\n", BN(j), i, SCpnt, cpp->SCpnt); 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 */ case 0x02: /* Command 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 0x03: /* SCSI Bus Reset Received */ case 0x04: /* Initial Controller Power-up */ 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 0x07: /* Bus Parity Error */ case 0x0c: /* Controller Ram Parity */ case 0x05: /* Unexpected Bus Phase */ case 0x06: /* Unexpected Bus Free */ case 0x08: /* SCSI Hung */ case 0x09: /* Unexpected Message Reject */ case 0x0a: /* SCSI Bus Reset Stuck */ case 0x0b: /* Auto Request-Sense Failed */ 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(); } /* Mailbox loop */ } /* 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 = EATA; #include "scsi_module.c" #endif