diff options
author | Ralf Baechle <ralf@linux-mips.org> | 1997-01-07 02:33:00 +0000 |
---|---|---|
committer | <ralf@linux-mips.org> | 1997-01-07 02:33:00 +0000 |
commit | beb116954b9b7f3bb56412b2494b562f02b864b1 (patch) | |
tree | 120e997879884e1b9d93b265221b939d2ef1ade1 /drivers/scsi/53c7,8xx.c | |
parent | 908d4681a1dc3792ecafbe64265783a86c4cccb6 (diff) |
Import of Linux/MIPS 2.1.14
Diffstat (limited to 'drivers/scsi/53c7,8xx.c')
-rw-r--r-- | drivers/scsi/53c7,8xx.c | 4671 |
1 files changed, 3545 insertions, 1126 deletions
diff --git a/drivers/scsi/53c7,8xx.c b/drivers/scsi/53c7,8xx.c index 764eb6fe0..025bd7e5b 100644 --- a/drivers/scsi/53c7,8xx.c +++ b/drivers/scsi/53c7,8xx.c @@ -1,18 +1,85 @@ -/* - * Set these options for all host adapters. - * - Memory mapped IO does not work. - * - Test 1 does a bus mastering test, which will help - * weed out brain damaged main boards. - */ - - -#define PERM_OPTIONS (OPTION_IO_MAPPED|OPTION_DEBUG_TEST1) /* - * Define SCSI_MALLOC to use scsi_malloc instead of kmalloc. Other than - * preventing deadlock, I'm not sure why we'd want to do this. + * PERM_OPTIONS are driver options which will be enabled for all NCR boards + * in the system at driver initialization time. + * + * Don't THINK about touching these in PERM_OPTIONS : + * OPTION_IO_MAPPED + * Memory mapped IO does not work under i86 Linux. + * + * OPTION_DEBUG_TEST1 + * Test 1 does bus mastering and interrupt tests, which will help weed + * out brain damaged main boards. + * + * These are development kernel changes. Code for them included in this + * driver release may or may not work. If you turn them on, you should be + * running the latest copy of the development sources from + * + * ftp://tsx-11.mit.edu/pub/linux/ALPHA/scsi/53c7,8xx + * + * and be subscribed to the ncr53c810@colorado.edu mailing list. To + * subscribe, send mail to majordomo@colorado.edu with + * + * subscribe ncr53c810 + * + * in the text. + * + * + * OPTION_NO_ASYNC + * Don't negotiate for asynchronous transfers on the first command + * when OPTION_ALWAYS_SYNCHRONOUS is set. Useful for dain bramaged + * devices which do something bad rather than sending a MESSAGE + * REJECT back to us like they should if they can't cope. + * + * OPTION_SYNCHRONOUS + * Enable support for synchronous transfers. Target negotiated + * synchronous transfers will be responded to. To initiate + * a synchronous transfer request, call + * + * request_synchronous (hostno, target) + * + * from within KGDB. + * + * OPTION_ALWAYS_SYNCHRONOUS + * Negotiate for synchronous transfers with every target after + * driver initialization or a SCSI bus reset. This is a bit dangerous, + * since there are some dain bramaged SCSI devices which will accept + * SDTR messages but keep talking asynchronously. + * + * OPTION_DISCONNECT + * Enable support for disconnect/reconnect. To change the + * default setting on a given host adapter, call + * + * request_disconnect (hostno, allow) + * + * where allow is non-zero to allow, 0 to disallow. + * + * If you really want to run 10MHz FAST SCSI-II transfers, you should + * know that the NCR driver currently ignores parity information. Most + * systems do 5MHz SCSI fine. I've seen a lot that have problems faster + * than 8MHz. To play it safe, we only request 5MHz transfers. + * + * If you'd rather get 10MHz transfers, edit sdtr_message and change + * the fourth byte from 50 to 25. */ -#define SCSI_MALLOC +#include <linux/config.h> + +#ifdef CONFIG_SCSI_NCR53C7xx_sync +#ifdef CONFIG_SCSI_NCR53C7xx_DISCONNECT +#define PERM_OPTIONS (OPTION_IO_MAPPED|OPTION_DEBUG_TEST1|OPTION_DISCONNECT|\ + OPTION_SYNCHRONOUS|OPTION_ALWAYS_SYNCHRONOUS) +#else +#define PERM_OPTIONS (OPTION_IO_MAPPED|OPTION_DEBUG_TEST1|\ + OPTION_SYNCHRONOUS|OPTION_ALWAYS_SYNCHRONOUS) +#endif +#else +#ifdef CONFIG_SCSI_NCR53C7xx_DISCONNECT +#define PERM_OPTIONS (OPTION_IO_MAPPED|OPTION_DEBUG_TEST1|OPTION_DISCONNECT|\ + OPTION_SYNCHRONOUS) +#else +#define PERM_OPTIONS (OPTION_IO_MAPPED|OPTION_DEBUG_TEST1|OPTION_SYNCHRONOUS) +#endif +#endif /* * Sponsored by @@ -23,19 +90,14 @@ * Copyright 1993, 1994, 1995 Drew Eckhardt * Visionary Computing * (Unix and Linux consulting and custom programming) - * drew@Colorado.EDU + * drew@PoohSticks.ORG * +1 (303) 786-7975 * * TolerANT and SCSI SCRIPTS are registered trademarks of NCR Corporation. * * For more information, please consult * - * - * NCR 53C700/53C700-66 - * SCSI I/O Processor - * Data Manual - * - * NCR53C710 + * NCR53C810 * SCSI I/O Processor * Programmer's Guide * @@ -46,14 +108,10 @@ * NCR 53C810/53C820 * PCI-SCSI I/O Processor Design In Guide * - * NCR Microelectronics - * 1635 Aeroplaza Drive - * Colorado Springs, CO 80916 - * +1 (719) 578-3400 - * - * Toll free literature number - * +1 (800) 334-5454 - * + * For literature on Symbios Logic Inc. formerly NCR, SCSI, + * and Communication products please call (800) 334-5454 or + * (719) 536-3300. + * * PCI BIOS Specification Revision * PCI Local Bus Specification * PCI System Design Guide @@ -69,14 +127,14 @@ /* * Design issues : * The cumulative latency needed to propagate a read/write request - * through the filesystem, buffer cache, driver stacks, SCSI host, and + * through the file system, buffer cache, driver stacks, SCSI host, and * SCSI device is ultimately the limiting factor in throughput once we * have a sufficiently fast host adapter. * * So, to maximize performance we want to keep the ratio of latency to data * transfer time to a minimum by * 1. Minimizing the total number of commands sent (typical command latency - * including drive and busmastering host overhead is as high as 4.5ms) + * including drive and bus mastering host overhead is as high as 4.5ms) * to transfer a given amount of data. * * This is accomplished by placing no arbitrary limit on the number @@ -89,20 +147,21 @@ * this means offloading the practical maximum amount of processing * to the SCSI chip. * - * On the NCR53c810/820, this is accomplished by using - * interrupt-on-the-fly signals with the DSA address as a - * parameter when commands complete, and only handling fatal - * errors and SDTR / WDTR messages in the host code. - * - * On the NCR53c710/720, interrupts are generated as on the NCR53c8x0, - * only the lack of a interrupt-on-the-fly facility complicates - * things. + * On the NCR53c810/820/720, this is accomplished by using + * interrupt-on-the-fly signals when commands complete, + * and only handling fatal errors and SDTR / WDTR messages + * in the host code. + * + * On the NCR53c710, interrupts are generated as on the NCR53c8x0, + * only the lack of an interrupt-on-the-fly facility complicates + * things. Also, SCSI ID registers and commands are + * bit fielded rather than binary encoded. * - * On the NCR53c700 and NCR53c700-66, operations that were done via - * indirect, table mode on the more advanced chips have - * been replaced by calls through a jump table which + * On the NCR53c700 and NCR53c700-66, operations that are done via + * indirect, table mode on the more advanced chips must be + * replaced by calls through a jump table which * acts as a surrogate for the DSA. Unfortunately, this - * means that we must service an interrupt for each + * will mean that we must service an interrupt for each * disconnect/reconnect. * * 3. Eliminating latency by pipelining operations at the different levels. @@ -110,29 +169,23 @@ * This driver allows a configurable number of commands to be enqueued * for each target/lun combination (experimentally, I have discovered * that two seems to work best) and will ultimately allow for - * SCSI-II tagged queueing. + * SCSI-II tagged queuing. * * * Architecture : - * This driver is built around two queues of commands waiting to - * be executed - the Linux issue queue, and the shared Linux/NCR - * queue which are manipulated by the NCR53c7xx_queue_command and - * NCR53c7x0_intr routines. - * - * When the higher level routines pass a SCSI request down to - * NCR53c7xx_queue_command, it looks to see if that target/lun - * is currently busy. If not, the command is inserted into the - * shared Linux/NCR queue, otherwise it is inserted into the Linux - * queue. + * This driver is built around a Linux queue of commands waiting to + * be executed, and a shared Linux/NCR array of commands to start. Commands + * are transfered to the array by the run_process_issue_queue() function + * which is called whenever a command completes. * * As commands are completed, the interrupt routine is triggered, * looks for commands in the linked list of completed commands with - * valid status, removes these commands from the list, calls - * the done routine, and flags their target/luns as not busy. + * valid status, removes these commands from a list of running commands, + * calls the done routine, and flags their target/luns as not busy. * * Due to limitations in the intelligence of the NCR chips, certain * concessions are made. In many cases, it is easier to dynamically - * generate/fixup code rather than calculate on the NCR at run time. + * generate/fix-up code rather than calculate on the NCR at run time. * So, code is generated or fixed up for * * - Handling data transfers, using a variable number of MOVE instructions @@ -154,6 +207,31 @@ * */ +/* + * Accommodate differences between stock 1.2.x and 1.3.x asm-i386/types.h + * so lusers can drop in 53c7,8xx.* and get something which compiles + * without warnings. + */ + +#if !defined(LINUX_1_2) && !defined(LINUX_1_3) +#include <linux/version.h> +#if LINUX_VERSION_CODE > 65536 + 3 * 256 +#define LINUX_1_3 +#else +#define LINUX_1_2 +#endif +#endif + +#ifdef LINUX_1_2 +#define u32 bogus_u32 +#define s32 bogus_s32 +#include <asm/types.h> +#undef u32 +#undef s32 +typedef __signed__ int s32; +typedef unsigned int u32; +#endif /* def LINUX_1_2 */ + #ifdef MODULE #include <linux/module.h> #endif @@ -167,27 +245,60 @@ #include <linux/errno.h> #include <linux/bios32.h> #include <linux/pci.h> +#include <linux/proc_fs.h> #include <linux/string.h> +#include <linux/malloc.h> +#include <linux/vmalloc.h> #include <linux/mm.h> -#include "../block/blk.h" +#include <linux/ioport.h> +#include <linux/time.h> +#include <linux/blk.h> +#undef current + #include "scsi.h" #include "hosts.h" #include "53c7,8xx.h" #include "constants.h" #include "sd.h" +#include <linux/stat.h> +#include <linux/stddef.h> + +#ifndef LINUX_1_2 +struct proc_dir_entry proc_scsi_ncr53c7xx = { + PROC_SCSI_NCR53C7xx, 9, "ncr53c7xx", + S_IFDIR | S_IRUGO | S_IXUGO, 2 +}; +#endif +static int check_address (unsigned long addr, int size); +static void dump_events (struct Scsi_Host *host, int count); +static Scsi_Cmnd * return_outstanding_commands (struct Scsi_Host *host, + int free, int issue); +static void hard_reset (struct Scsi_Host *host); +static void ncr_scsi_reset (struct Scsi_Host *host); +static void print_lots (struct Scsi_Host *host); +static void set_synchronous (struct Scsi_Host *host, int target, int sxfer, + int scntl3, int now_connected); +static int datapath_residual (struct Scsi_Host *host); +static const char * sbcl_to_phase (int sbcl); +static void print_progress (Scsi_Cmnd *cmd); +static void print_queues (struct Scsi_Host *host); +static void process_issue_queue (unsigned long flags); +static int shutdown (struct Scsi_Host *host); static void abnormal_finished (struct NCR53c7x0_cmd *cmd, int result); +static int disable (struct Scsi_Host *host); static int NCR53c8xx_run_tests (struct Scsi_Host *host); static int NCR53c8xx_script_len; static int NCR53c8xx_dsa_len; -static void NCR53c7x0_intr(int irq, struct pt_regs * regs); -static int halt (struct Scsi_Host *host); +static void NCR53c7x0_intr(int irq, void *dev_id, struct pt_regs * regs); +static int ncr_halt (struct Scsi_Host *host); static void intr_phase_mismatch (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd); static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd); -static void print_dsa (struct Scsi_Host *host, unsigned long *dsa); -static int print_insn (struct Scsi_Host *host, unsigned long *insn, - char *prefix, int kernel); +static void print_dsa (struct Scsi_Host *host, u32 *dsa, + const char *prefix); +static int print_insn (struct Scsi_Host *host, const u32 *insn, + const char *prefix, int kernel); static void NCR53c8xx_dsa_fixup (struct NCR53c7x0_cmd *cmd); static void NCR53c8x0_init_fixup (struct Scsi_Host *host); @@ -195,39 +306,138 @@ static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd); static void NCR53c8x0_soft_reset (struct Scsi_Host *host); -static int perm_options = PERM_OPTIONS; +/* INSMOD variables */ +static long long perm_options = PERM_OPTIONS; +/* 14 = .5s; 15 is max; decreasing divides by two. */ +static int selection_timeout = 14; +/* Size of event list (per host adapter) */ +static int track_events = 0; static struct Scsi_Host *first_host = NULL; /* Head of list of NCR boards */ static Scsi_Host_Template *the_template = NULL; +/* + * KNOWN BUGS : + * - There is some sort of conflict when the PPP driver is compiled with + * support for 16 channels? + * + * - On systems which predate the 1.3.x initialization order change, + * the NCR driver will cause Cannot get free page messages to appear. + * These are harmless, but I don't know of an easy way to avoid them. + * + * - With OPTION_DISCONNECT, on two systems under unknown circumstances, + * we get a PHASE MISMATCH with DSA set to zero (suggests that we + * are occurring somewhere in the reselection code) where + * DSP=some value DCMD|DBC=same value. + * + * Closer inspection suggests that we may be trying to execute + * some portion of the DSA? + * scsi0 : handling residual transfer (+ 0 bytes from DMA FIFO) + * scsi0 : handling residual transfer (+ 0 bytes from DMA FIFO) + * scsi0 : no current command : unexpected phase MSGIN. + * DSP=0x1c46cc, DCMD|DBC=0x1c46ac, DSA=0x0 + * DSPS=0x0, TEMP=0x1c3e70, DMODE=0x80 + * scsi0 : DSP-> + * 001c46cc : 0x001c46cc 0x00000000 + * 001c46d4 : 0x001c5ea0 0x000011f8 + * + * Changed the print code in the phase_mismatch handler so + * that we call print_lots to try to diagnose this. + * + */ + +/* + * Possible future direction of architecture for max performance : + * + * We're using a single start array for the NCR chip. This is + * sub-optimal, because we cannot add a command which would conflict with + * an executing command to this start queue, and therefore must insert the + * next command for a given I/T/L combination after the first has completed; + * incurring our interrupt latency between SCSI commands. + * + * To allow further pipelining of the NCR and host CPU operation, we want + * to set things up so that immediately on termination of a command destined + * for a given LUN, we get that LUN busy again. + * + * To do this, we need to add a 32 bit pointer to which is jumped to + * on completion of a command. If no new command is available, this + * would point to the usual DSA issue queue select routine. + * + * If one were, it would point to a per-NCR53c7x0_cmd select routine + * which starts execution immediately, inserting the command at the head + * of the start queue if the NCR chip is selected or reselected. + * + * We would change so that we keep a list of outstanding commands + * for each unit, rather than a single running_list. We'd insert + * a new command into the right running list; if the NCR didn't + * have something running for that yet, we'd put it in the + * start queue as well. Some magic needs to happen to handle the + * race condition between the first command terminating before the + * new one is written. + * + * Potential for profiling : + * Call do_gettimeofday(struct timeval *tv) to get 800ns resolution. + */ + /* * TODO : + * 1. To support WIDE transfers, not much needs to happen. We + * should do CHMOVE instructions instead of MOVEs when + * we have scatter/gather segments of uneven length. When + * we do this, we need to handle the case where we disconnect + * between segments. + * + * 2. Currently, when Icky things happen we do a FATAL(). Instead, + * we want to do an integrity check on the parts of the NCR hostdata + * structure which were initialized at boot time; FATAL() if that + * fails, and otherwise try to recover. Keep track of how many + * times this has happened within a single SCSI command; if it + * gets excessive, then FATAL(). * - * 1. Implement single step / trace code? + * 3. Parity checking is currently disabled, and a few things should + * happen here now that we support synchronous SCSI transfers : + * 1. On soft-reset, we should set the EPC (Enable Parity Checking) + * and AAP (Assert SATN/ on parity error) bits in SCNTL0. + * + * 2. We should enable the parity interrupt in the SIEN0 register. * - * 2. The initial code has been tested on the NCR53c810. I don't + * 3. intr_phase_mismatch() needs to believe that message out is + * always an "acceptable" phase to have a mismatch in. If + * the old phase was MSG_IN, we should send a MESSAGE PARITY + * error. If the old phase was something else, we should send + * a INITIATOR_DETECTED_ERROR message. Note that this could + * cause a RESTORE POINTERS message; so we should handle that + * correctly first. Instead, we should probably do an + * initiator_abort. + * + * 4. MPEE bit of CTEST4 should be set so we get interrupted if + * we detect an error. + * + * + * 5. The initial code has been tested on the NCR53c810. I don't * have access to NCR53c700, 700-66 (Forex boards), NCR53c710 - * (NCR Pentium systems), NCR53c720, or NCR53c820 boards to finish - * development on those platforms. + * (NCR Pentium systems), NCR53c720, NCR53c820, or NCR53c825 boards to + * finish development on those platforms. * - * NCR53c820/720 - need to add wide transfer support, including WDTR + * NCR53c820/825/720 - need to add wide transfer support, including WDTR * negotiation, programming of wide transfer capabilities * on reselection and table indirect selection. * - * NCR53c720/710 - need to add fatal interrupt or GEN code for - * command completion signaling. Need to take care of - * ADD WITH CARRY instructions since carry is unimplemented. - * Also need to modify all SDID, SCID, etc. registers, - * and table indirect select code since these use bit - * fielded (ie 1<<target) instead of binary encoded - * target ids. Also, SCNTL3 is _not_ automatically - * programmed on selection, so we need to add more code. + * NCR53c710 - need to add fatal interrupt or GEN code for + * command completion signaling. Need to modify all + * SDID, SCID, etc. registers, and table indirect select code + * since these use bit fielded (ie 1<<target) instead of + * binary encoded target ids. Need to accommodate + * different register mappings, probably scan through + * the SCRIPT code and change the non SFBR register operand + * of all MOVE instructions. * * NCR53c700/700-66 - need to add code to refix addresses on - * every nexus change, eliminate all table indirect code. + * every nexus change, eliminate all table indirect code, + * very messy. * - * 3. The NCR53c7x0 series is very popular on other platforms that + * 6. The NCR53c7x0 series is very popular on other platforms that * could be running Linux - ie, some high performance AMIGA SCSI * boards use it. * @@ -239,53 +449,59 @@ static Scsi_Host_Template *the_template = NULL; * the right way, we need to provide options to reverse words * when the scripts are relocated. * - * 4. Implement code to include page table entries for the - * area occupied by memory mapped boards so we don't have - * to use the potentially slower I/O accesses. + * 7. Use ioremap() to access memory mapped boards. */ /* - * XXX - note that my assembler was modified so that internally, - * the names used can take a prefix, so that there is no conflict - * between multiple copies of the same script assembled with - * different defines. - * - * * Allow for simultaneous existence of multiple SCSI scripts so we * can have a single driver binary for all of the family. * * - one for NCR53c700 and NCR53c700-66 chips (not yet supported) - * - one for NCR53c710 and NCR53c720 chips (not yet supported) - * - one for NCR53c810 and NCR53c820 chips (only the NCR53c810 is - * currently supported) - * - * For the very similar chips, we should probably hack the fixup code - * and interrupt code so that it works everywhere, but I suspect the - * NCR53c700 is going to need it's own fixup routine. + * - one for rest (only the NCR53c810, 815, 820, and 825 are currently + * supported) + * + * So that we only need two SCSI scripts, we need to modify things so + * that we fixup register accesses in READ/WRITE instructions, and + * we'll also have to accommodate the bit vs. binary encoding of IDs + * with the 7xx chips. */ /* - * Use to translate between device IDs of various types. + * Use pci_chips_ids to translate in both directions between PCI device ID + * and chip numbers. */ -struct pci_chip { +static struct { unsigned short pci_device_id; int chip; +/* + * The revision field of the PCI_CLASS_REVISION register is compared + * against each of these fields if the field is not -1. If it + * is less than min_revision or larger than max_revision, a warning + * message is printed. + */ int max_revision; int min_revision; -}; - -static struct pci_chip pci_chip_ids[] = { - {PCI_DEVICE_ID_NCR_53C810, 810, 1, 1}, - {PCI_DEVICE_ID_NCR_53C815, 815, 2, 3}, +} pci_chip_ids[] = { + {PCI_DEVICE_ID_NCR_53C810, 810, 2, 1}, + {PCI_DEVICE_ID_NCR_53C815, 815, 3, 2}, {PCI_DEVICE_ID_NCR_53C820, 820, -1, -1}, {PCI_DEVICE_ID_NCR_53C825, 825, -1, -1} }; #define NPCI_CHIP_IDS (sizeof (pci_chip_ids) / sizeof(pci_chip_ids[0])) +#define ROUNDUP(adr,type) \ + ((void *) (((long) (adr) + sizeof(type) - 1) & ~(sizeof(type) - 1))) -/* Forced detection and autoprobe code for various hardware */ +/* + * Forced detection and autoprobe code for various hardware. Currently, + * entry points for these are not included in init/main.c because if the + * PCI BIOS code isn't working right, you're not going to be able to use + * the hardware anyways; this way we force users to solve their + * problems rather than forcing detection and blaming us when it + * does not work. + */ static struct override { int chip; /* 700, 70066, 710, 720, 810, 820 */ @@ -304,7 +520,7 @@ static struct override { int function; } pci; } data; - int options; + long long options; } overrides [4] = {{0,},}; static int commandline_current = 0; static int no_overrides = 0; @@ -316,6 +532,43 @@ static int no_overrides = 0; #endif /* + * Function: issue_to_cmd + * + * Purpose: convert jump instruction in issue array to NCR53c7x0_cmd + * structure pointer. + * + * Inputs; issue - pointer to start of NOP or JUMP instruction + * in issue array. + * + * Returns: pointer to command on success; 0 if opcode is NOP. + */ + +static inline struct NCR53c7x0_cmd * +issue_to_cmd (struct Scsi_Host *host, struct NCR53c7x0_hostdata *hostdata, + u32 *issue) +{ + return (issue[0] != hostdata->NOP_insn) ? + /* + * If the IF TRUE bit is set, it's a JUMP instruction. The + * operand is a bus pointer to the dsa_begin routine for this DSA. The + * dsa field of the NCR53c7x0_cmd structure starts with the + * DSA code template. By converting to a virtual address, + * subtracting the code template size, and offset of the + * dsa field, we end up with a pointer to the start of the + * structure (alternatively, we could use the + * dsa_cmnd field, an anachronism from when we weren't + * sure what the relationship between the NCR structures + * and host structures were going to be. + */ + (struct NCR53c7x0_cmd *) ((char *) bus_to_virt (issue[1]) - + (hostdata->E_dsa_code_begin - hostdata->E_dsa_code_template) - + offsetof(struct NCR53c7x0_cmd, dsa)) + /* If the IF TRUE bit is not set, it's a NOP */ + : NULL; +} + + +/* * Function : static internal_setup(int board, int chip, char *str, int *ints) * * Purpose : LILO command line initialization of the overrides array, @@ -326,7 +579,8 @@ static int no_overrides = 0; * */ -static void internal_setup(int board, int chip, char *str, int *ints) { +static void +internal_setup(int board, int chip, char *str, int *ints) { unsigned char pci; /* Specifies a PCI override, with bus, device, function */ @@ -346,12 +600,14 @@ static void internal_setup(int board, int chip, char *str, int *ints) { overrides[commandline_current].data.normal.irq = ints[3]; overrides[commandline_current].data.normal.dma = (ints[0] >= 4) ? ints[4] : DMA_NONE; + /* FIXME: options is now a long long */ overrides[commandline_current].options = (ints[0] >= 5) ? ints[5] : 0; } else { overrides[commandline_current].data.pci.bus = ints[1]; overrides[commandline_current].data.pci.device = ints[2]; - overrides[commandline_current].data.pci.device = ints[3]; + overrides[commandline_current].data.pci.function = ints[3]; + /* FIXME: options is now a long long */ overrides[commandline_current].options = (ints[0] >= 4) ? ints[4] : 0; } @@ -385,31 +641,275 @@ setup_wrapper(820) setup_wrapper(825) /* + * FIXME: we should junk these, in favor of synchronous_want and + * wide_want in the NCR53c7x0_hostdata structure. + */ + +/* Template for "preferred" synchronous transfer parameters. */ + +static const unsigned char sdtr_message[] = { +#ifdef CONFIG_SCSI_NCR53C7xx_FAST + EXTENDED_MESSAGE, 3 /* length */, EXTENDED_SDTR, 25 /* *4ns */, 8 /* off */ +#else + EXTENDED_MESSAGE, 3 /* length */, EXTENDED_SDTR, 50 /* *4ns */, 8 /* off */ +#endif +}; + +/* Template to request asynchronous transfers */ + +static const unsigned char async_message[] = { + EXTENDED_MESSAGE, 3 /* length */, EXTENDED_SDTR, 0, 0 /* asynchronous */ +}; + +/* Template for "preferred" WIDE transfer parameters */ + +static const unsigned char wdtr_message[] = { + EXTENDED_MESSAGE, 2 /* length */, EXTENDED_WDTR, 1 /* 2^1 bytes */ +}; + +/* + * Function : struct Scsi_Host *find_host (int host) + * + * Purpose : KGDB support function which translates a host number + * to a host structure. + * + * Inputs : host - number of SCSI host + * + * Returns : NULL on failure, pointer to host structure on success. + */ + +static struct Scsi_Host * +find_host (int host) { + struct Scsi_Host *h; + for (h = first_host; h && h->host_no != host; h = h->next); + if (!h) { + printk (KERN_ALERT "scsi%d not found\n", host); + return NULL; + } else if (h->hostt != the_template) { + printk (KERN_ALERT "scsi%d is not a NCR board\n", host); + return NULL; + } + return h; +} + +/* + * Function : request_synchronous (int host, int target) + * + * Purpose : KGDB interface which will allow us to negotiate for + * synchronous transfers. This ill be replaced with a more + * integrated function; perhaps a new entry in the scsi_host + * structure, accessible via an ioctl() or perhaps /proc/scsi. + * + * Inputs : host - number of SCSI host; target - number of target. + * + * Returns : 0 when negotiation has been setup for next SCSI command, + * -1 on failure. + */ + +static int +request_synchronous (int host, int target) { + struct Scsi_Host *h; + struct NCR53c7x0_hostdata *hostdata; + unsigned long flags; + if (target < 0) { + printk (KERN_ALERT "target %d is bogus\n", target); + return -1; + } + if (!(h = find_host (host))) + return -1; + else if (h->this_id == target) { + printk (KERN_ALERT "target %d is host ID\n", target); + return -1; + } +#ifndef LINUX_1_2 + else if (target > h->max_id) { + printk (KERN_ALERT "target %d exceeds maximum of %d\n", target, + h->max_id); + return -1; + } +#endif + hostdata = (struct NCR53c7x0_hostdata *)h->hostdata; + + save_flags(flags); + cli(); + if (hostdata->initiate_sdtr & (1 << target)) { + restore_flags(flags); + printk (KERN_ALERT "target %d already doing SDTR\n", target); + return -1; + } + hostdata->initiate_sdtr |= (1 << target); + restore_flags(flags); + return 0; +} + +/* + * Function : request_disconnect (int host, int on_or_off) + * + * Purpose : KGDB support function, tells us to allow or disallow + * disconnections. + * + * Inputs : host - number of SCSI host; on_or_off - non-zero to allow, + * zero to disallow. + * + * Returns : 0 on success, * -1 on failure. + */ + +static int +request_disconnect (int host, int on_or_off) { + struct Scsi_Host *h; + struct NCR53c7x0_hostdata *hostdata; + if (!(h = find_host (host))) + return -1; + hostdata = (struct NCR53c7x0_hostdata *) h->hostdata; + if (on_or_off) + hostdata->options |= OPTION_DISCONNECT; + else + hostdata->options &= ~OPTION_DISCONNECT; + return 0; +} + +/* + * Function : static void NCR53c7x0_driver_init (struct Scsi_Host *host) + * + * Purpose : Initialize internal structures, as required on startup, or + * after a SCSI bus reset. + * + * Inputs : host - pointer to this host adapter's structure + */ + +static void +NCR53c7x0_driver_init (struct Scsi_Host *host) { + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + int i, j; + u32 *current; + for (i = 0; i < 16; ++i) { + hostdata->request_sense[i] = 0; + for (j = 0; j < 8; ++j) + hostdata->busy[i][j] = 0; + set_synchronous (host, i, /* sxfer */ 0, hostdata->saved_scntl3, 0); + } + hostdata->issue_queue = NULL; + hostdata->running_list = hostdata->finished_queue = + hostdata->current = NULL; + for (i = 0, current = (u32 *) hostdata->schedule; + i < host->can_queue; ++i, current += 2) { + current[0] = hostdata->NOP_insn; + current[1] = 0xdeadbeef; + } + current[0] = ((DCMD_TYPE_TCI|DCMD_TCI_OP_JUMP) << 24) | DBC_TCI_TRUE; + current[1] = (u32) virt_to_bus (hostdata->script) + + hostdata->E_wait_reselect; + hostdata->reconnect_dsa_head = 0; + hostdata->addr_reconnect_dsa_head = (u32) + virt_to_bus((void *) &(hostdata->reconnect_dsa_head)); + hostdata->expecting_iid = 0; + hostdata->expecting_sto = 0; + if (hostdata->options & OPTION_ALWAYS_SYNCHRONOUS) + hostdata->initiate_sdtr = 0xffff; + else + hostdata->initiate_sdtr = 0; + hostdata->talked_to = 0; + hostdata->idle = 1; +} + +/* + * Function : static int ccf_to_clock (int ccf) + * + * Purpose : Return the largest SCSI clock allowable for a given + * clock conversion factor, allowing us to do synchronous periods + * when we don't know what the SCSI clock is by taking at least + * as long as the device says we can. + * + * Inputs : ccf + * + * Returns : clock on success, -1 on failure. + */ + +static int +ccf_to_clock (int ccf) { + switch (ccf) { + case 1: return 25000000; /* Divide by 1.0 */ + case 2: return 37500000; /* Divide by 1.5 */ + case 3: return 50000000; /* Divide by 2.0 */ + case 0: /* Divide by 3.0 */ + case 4: return 66000000; + default: return -1; + } +} + +/* + * Function : static int clock_to_ccf (int clock) + * + * Purpose : Return the clock conversion factor for a given SCSI clock. + * + * Inputs : clock - SCSI clock expressed in Hz. + * + * Returns : ccf on success, -1 on failure. + */ + +static int +clock_to_ccf (int clock) { + if (clock < 16666666) + return -1; + if (clock < 25000000) + return 1; /* Divide by 1.0 */ + else if (clock < 37500000) + return 2; /* Divide by 1.5 */ + else if (clock < 50000000) + return 3; /* Divide by 2.0 */ + else if (clock < 66000000) + return 4; /* Divide by 3.0 */ + else + return -1; +} + +/* * Function : static int NCR53c7x0_init (struct Scsi_Host *host) * * Purpose : initialize the internal structures for a given SCSI host * - * Inputs : host - pointer to this host adapter's structure/ + * Inputs : host - pointer to this host adapter's structure * * Preconditions : when this function is called, the chip_type * field of the hostdata structure MUST have been set. + * + * Returns : 0 on success, -1 on failure. */ static int NCR53c7x0_init (struct Scsi_Host *host) { NCR53c7x0_local_declare(); - /* unsigned char tmp; */ - int i, j, ccf; + int i, ccf, expected_ccf; struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; struct Scsi_Host *search; + /* + * There are some things which we need to know about in order to provide + * a semblance of support. Print 'em if they aren't what we expect, + * otherwise don't add to the noise. + * + * -1 means we don't know what to expect. + */ + int expected_id = -1; + int expected_clock = -1; + int uninitialized = 0; + /* + * FIXME : this is only on Intel boxes. On other platforms, this + * will differ. + */ + int expected_mapping = OPTION_IO_MAPPED; NCR53c7x0_local_setup(host); switch (hostdata->chip) { - case 810: - case 815: case 820: case 825: +#ifdef notyet + host->max_id = 15; +#endif + /* Fall through */ + case 810: + case 815: hostdata->dstat_sir_intr = NCR53c8x0_dstat_sir_intr; hostdata->init_save_regs = NULL; hostdata->dsa_fixup = NCR53c8xx_dsa_fixup; @@ -417,7 +917,8 @@ NCR53c7x0_init (struct Scsi_Host *host) { hostdata->soft_reset = NCR53c8x0_soft_reset; hostdata->run_tests = NCR53c8xx_run_tests; /* Is the SCSI clock ever anything else on these chips? */ - hostdata->scsi_clock = 40000000; + expected_clock = hostdata->scsi_clock = 40000000; + expected_id = 7; break; default: printk ("scsi%d : chip type of %d is not supported yet, detaching.\n", @@ -431,30 +932,14 @@ NCR53c7x0_init (struct Scsi_Host *host) { hostdata->NCR53c7xx_msg_reject = MESSAGE_REJECT; hostdata->NCR53c7xx_msg_abort = ABORT; hostdata->NCR53c7xx_msg_nop = NOP; + hostdata->NOP_insn = (DCMD_TYPE_TCI|DCMD_TCI_OP_JUMP) << 24; - /* - * Set up an interrupt handler if we aren't already sharing an IRQ - * with another board. - */ - - for (search = first_host; search && ((search->hostt != the_template) || - (search->irq != host->irq)); search=search->next); - - if (!search) { - if (request_irq(host->irq, NCR53c7x0_intr, SA_INTERRUPT, "53c7,8xx")) { - printk("scsi%d : IRQ%d not free, detaching\n", - host->host_no, host->irq); - scsi_unregister (host); - return -1; - } - } else { - printk("scsi%d : using interrupt handler previously installed for scsi%d\n", - host->host_no, search->host_no); - } - - printk ("scsi%d : using %s mapped access\n", host->host_no, - (hostdata->options & OPTION_MEMORY_MAPPED) ? "memory" : - "io"); + if (expected_mapping == -1 || + (hostdata->options & (OPTION_MEMORY_MAPPED)) != + (expected_mapping & OPTION_MEMORY_MAPPED)) + printk ("scsi%d : using %s mapped access\n", host->host_no, + (hostdata->options & OPTION_MEMORY_MAPPED) ? "memory" : + "io"); hostdata->dmode = (hostdata->chip == 700 || hostdata->chip == 70066) ? DMODE_REG_00 : DMODE_REG_10; @@ -463,7 +948,7 @@ NCR53c7x0_init (struct Scsi_Host *host) { /* Only the ISTAT register is readable when the NCR is running, so make sure it's halted. */ - halt(host); + ncr_halt(host); /* * XXX - the NCR53c700 uses bitfielded registers for SCID, SDID, etc, @@ -477,12 +962,28 @@ NCR53c7x0_init (struct Scsi_Host *host) { tmp = hostdata->this_id_mask = NCR53c7x0_read8(SCID_REG); for (host->this_id = 0; tmp != 1; tmp >>=1, ++host->this_id); #else - host->this_id = NCR53c7x0_read8(SCID_REG) & 7; + host->this_id = NCR53c7x0_read8(SCID_REG) & 15; + if (host->this_id == 0) + host->this_id = 7; /* sanitize hostid---0 doesn't make sense */ hostdata->this_id_mask = 1 << host->this_id; #endif - printk("scsi%d : using initiator ID %d\n", host->host_no, - host->this_id); +/* + * Note : we should never encounter a board setup for ID0. So, + * if we see ID0, assume that it was uninitialized and set it + * to the industry standard 7. + */ + if (!host->this_id) { + printk("scsi%d : initiator ID was %d, changing to 7\n", + host->host_no, host->this_id); + host->this_id = 7; + hostdata->this_id_mask = 1 << 7; + uninitialized = 1; + }; + + if (expected_id == -1 || host->this_id != expected_id) + printk("scsi%d : using initiator ID %d\n", host->host_no, + host->this_id); /* * Save important registers to allow a soft reset. @@ -506,12 +1007,17 @@ NCR53c7x0_init (struct Scsi_Host *host) { * On NCR53c700 series chips, DCNTL controls the SCSI clock divisor, * on 800 series chips, it allows for a totem-pole IRQ driver. */ + hostdata->saved_dcntl = NCR53c7x0_read8(DCNTL_REG); - + + /* + * DCNTL_800_IRQM controls weather we are using an open drain + * driver (reset) or totem pole driver (set). In all cases, + * it's level active. I suppose this is an issue when we're trying to + * wire-or the same PCI INTx line? + */ if ((hostdata->chip / 100) == 8) - printk ("scsi%d : using %s interrupts\n", host->host_no, - (hostdata->saved_dcntl & DCNTL_800_IRQM) ? "edge triggered" : - "level active"); + hostdata->saved_dcntl &= ~DCNTL_800_IRQM; /* * DMODE controls DMA burst length, and on 700 series chips, @@ -521,7 +1027,7 @@ NCR53c7x0_init (struct Scsi_Host *host) { /* * Now that burst length and enabled/disabled status is known, - * clue the user in on it. + * clue the user in on it. */ if ((hostdata->chip / 100) == 8) { @@ -544,8 +1050,18 @@ NCR53c7x0_init (struct Scsi_Host *host) { * and normal clock conversion factors. */ if (hostdata->chip / 100 == 8) { + expected_ccf = clock_to_ccf (expected_clock); hostdata->saved_scntl3 = NCR53c7x0_read8(SCNTL3_REG_800); ccf = hostdata->saved_scntl3 & SCNTL3_800_CCF_MASK; + if (expected_ccf != -1 && ccf != expected_ccf && !ccf) { + hostdata->saved_scntl3 = (hostdata->saved_scntl3 & + ~SCNTL3_800_CCF_MASK) | expected_ccf; + if (!uninitialized) { + printk ("scsi%d : reset ccf to %d from %d\n", + host->host_no, expected_ccf, ccf); + uninitialized = 1; + } + } } else ccf = 0; @@ -553,63 +1069,24 @@ NCR53c7x0_init (struct Scsi_Host *host) { * If we don't have a SCSI clock programmed, pick one on the upper * bound of that allowed by NCR so that our transfers err on the * slow side, since transfer period must be >= the agreed - * appon period. - */ - - if (!hostdata->scsi_clock) - switch(ccf) { - case 1: hostdata->scsi_clock = 25000000; break; /* Divide by 1.0 */ - case 2: hostdata->scsi_clock = 37500000; break; /* Divide by 1.5 */ - case 3: hostdata->scsi_clock = 50000000; break; /* Divide by 2.0 */ - case 0: /* Divide by 3.0 */ - case 4: hostdata->scsi_clock = 66000000; break; - default: - printk ("scsi%d : clock conversion factor %d unknown.\n" - " synchronous transfers disabled\n", - host->host_no, ccf); - hostdata->options &= ~OPTION_SYNCHRONOUS; - hostdata->scsi_clock = 0; - } - - printk ("scsi%d : using %dMHz SCSI clock\n", host->host_no, - hostdata->scsi_clock / 1000000); - /* - * Initialize per-target structures, including busy flags and - * synchronous transfer parameters. + * upon period. */ - for (i = 0; i < 8; ++i) { - hostdata->cmd_allocated[i] = 0; - for (j = 0; j < 8; ++j) - hostdata->busy[i][j] = 0; - /* - * NCR53c700 and NCR53c700-66 chips lack the DSA and use a - * different architecture. For chips using the DSA architecture, - * initialize the per-target synchronous parameters. - */ - if (hostdata->chip != 700 && hostdata->chip != 70066) { - hostdata->sync[i].select_indirect |= (i << 16); - /* XXX - program SCSI script for immediate return */ - hostdata->sync[i].script[0] = (DCMD_TYPE_TCI|DCMD_TCI_OP_RETURN) << 24 | - DBC_TCI_TRUE; - switch (hostdata->chip) { - /* Clock divisor */ - case 825: - case 820: - /* Fall through to 810 */ - case 815: - case 810: - hostdata->sync[i].select_indirect |= (hostdata->saved_scntl3) << 24; - break; - default: - } - } + if ((!hostdata->scsi_clock) && (hostdata->scsi_clock = ccf_to_clock (ccf)) + == -1) { + printk ("scsi%d : clock conversion factor %d unknown.\n" + " synchronous transfers disabled\n", + host->host_no, ccf); + hostdata->options &= ~OPTION_SYNCHRONOUS; + hostdata->scsi_clock = 0; } - hostdata->issue_queue = hostdata->running_list = - hostdata->finished_queue = NULL; - hostdata->issue_dsa_head = NULL; - hostdata->issue_dsa_tail = NULL; + if (expected_clock == -1 || hostdata->scsi_clock != expected_clock) + printk ("scsi%d : using %dMHz SCSI clock\n", host->host_no, + hostdata->scsi_clock / 1000000); + + for (i = 0; i < 16; ++i) + hostdata->cmd_allocated[i] = 0; if (hostdata->init_save_regs) hostdata->init_save_regs (host); @@ -621,8 +1098,6 @@ NCR53c7x0_init (struct Scsi_Host *host) { first_host = host; } - hostdata->idle = 1; - /* * Linux SCSI drivers have always been plagued with initialization * problems - some didn't work with the BIOS disabled since they expected @@ -635,25 +1110,67 @@ NCR53c7x0_init (struct Scsi_Host *host) { hostdata->soft_reset (host); +#if 1 hostdata->debug_count_limit = -1; +#else + hostdata->debug_count_limit = 1; +#endif hostdata->intrs = -1; - hostdata->expecting_iid = 0; - hostdata->expecting_sto = 0; + hostdata->resets = -1; + memcpy ((void *) hostdata->synchronous_want, (void *) sdtr_message, + sizeof (hostdata->synchronous_want)); + + NCR53c7x0_driver_init (host); + + /* + * Set up an interrupt handler if we aren't already sharing an IRQ + * with another board. + */ + + for (search = first_host; search && !(search->hostt == the_template && + search->irq == host->irq && search != host); search=search->next); + + if (!search) { + if (request_irq(host->irq, NCR53c7x0_intr, SA_INTERRUPT, "53c7,8xx", NULL)) { + printk("scsi%d : IRQ%d not free, detaching\n" + " You have either a configuration problem, or a\n" + " broken BIOS. You may wish to manually assign\n" + " an interrupt to the NCR board rather than using\n" + " an automatic setting.\n", + host->host_no, host->irq); + scsi_unregister (host); + return -1; + } + } else { + printk("scsi%d : using interrupt handler previously installed for scsi%d\n", + host->host_no, search->host_no); + } + if ((hostdata->run_tests && hostdata->run_tests(host) == -1) || (hostdata->options & OPTION_DEBUG_TESTS_ONLY)) { /* XXX Should disable interrupts, etc. here */ scsi_unregister (host); return -1; - } else - return 0; + } else { + if (host->io_port) { + host->n_io_port = 128; + request_region (host->io_port, host->n_io_port, "ncr53c7,8xx"); + } + } + + if (NCR53c7x0_read8 (SBCL_REG) & SBCL_BSY) { + printk ("scsi%d : bus wedge, doing SCSI reset\n", host->host_no); + hard_reset (host); + } + return 0; } /* * Function : static int normal_init(Scsi_Host_Template *tpnt, int board, - * int chip, int base, int io_port, int irq, int dma, int pcivalid, + * int chip, u32 base, int io_port, int irq, int dma, int pcivalid, * unsigned char pci_bus, unsigned char pci_device_fn, - * int options); + * long long options); * * Purpose : initializes a NCR53c7,8x0 based on base addresses, * IRQ, and DMA channel. @@ -670,16 +1187,17 @@ NCR53c7x0_init (struct Scsi_Host *host) { * */ -static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, - int base, int io_port, int irq, int dma, int pci_valid, - unsigned char pci_bus, unsigned char pci_device_fn, int options) { +static int +normal_init (Scsi_Host_Template *tpnt, int board, int chip, + u32 base, int io_port, int irq, int dma, int pci_valid, + unsigned char pci_bus, unsigned char pci_device_fn, long long options) { struct Scsi_Host *instance; struct NCR53c7x0_hostdata *hostdata; char chip_str[80]; - int script_len = 0, dsa_len = 0, size = 0, max_cmd_size = 0; - int ok = 0; + int script_len = 0, dsa_len = 0, size = 0, max_cmd_size = 0, + schedule_size = 0, ok = 0; + void *tmp; - options |= perm_options; switch (chip) { @@ -687,6 +1205,7 @@ static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, case 820: case 815: case 810: + schedule_size = (tpnt->can_queue + 1) * 8 /* JUMP instruction size */; script_len = NCR53c8xx_script_len; dsa_len = NCR53c8xx_dsa_len; options |= OPTION_INTFLY; @@ -698,7 +1217,7 @@ static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, } printk("scsi-ncr53c7,8xx : %s at memory 0x%x, io 0x%x, irq %d", - chip_str, base, io_port, irq); + chip_str, (unsigned) base, io_port, irq); if (dma == DMA_NONE) printk("\n"); else @@ -708,7 +1227,7 @@ static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, printk ("scsi-ncr53c7,8xx : for better reliability and performance, please use the\n" " PCI override instead.\n" " Syntax : ncr53c8{10,15,20,25}=pci,<bus>,<device>,<function>\n" - " <bus> and <device> are usually 0.\n"); + " <bus> and <device> are usually 0.\n"); if (options & OPTION_DEBUG_PROBE_ONLY) { printk ("scsi-ncr53c7,8xx : probe only enabled, aborting initialization\n"); @@ -723,9 +1242,6 @@ static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, 3 /* Current startup / termination required per phase */ ) * 8 /* Each instruction is eight bytes */; - /* Note that alignment will be guaranteed, since we put the command - allocated at probe time after the fixed-up SCSI script, which - consists of 32 bit words, aligned on a 32 bit boundary. */ /* Allocate fixed part of hostdata, dynamic part to hold appropriate SCSI SCRIPT(tm) plus a single, maximum-sized NCR53c7x0_cmd structure. @@ -741,20 +1257,26 @@ static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, ASSUMPTION : Regardless of how many simultaneous SCSI commands we allow, - the probe code only executes a _single_ instruction at a time, + the probe code only executes a _single_ instruction at a time, so we only need one here, and don't need to allocate NCR53c7x0_cmd structures for each target until we are no longer in scan_scsis and kmalloc() has become functional (memory_init() happens after all device driver initialization). */ - size = sizeof(struct NCR53c7x0_hostdata) + script_len + max_cmd_size; + size = sizeof(struct NCR53c7x0_hostdata) + script_len + + /* Note that alignment will be guaranteed, since we put the command + allocated at probe time after the fixed-up SCSI script, which + consists of 32 bit words, aligned on a 32 bit boundary. But + on a 64bit machine we need 8 byte alignment for hostdata->free, so + we add in another 4 bytes to take care of potential misalignment + */ + (sizeof(void *) - sizeof(u32)) + max_cmd_size + schedule_size; instance = scsi_register (tpnt, size); if (!instance) return -1; - /* FIXME : if we ever support an ISA NCR53c7xx based board, we need to check if the chip is running in a 16 bit mode, and if so unregister it if it is past the 16M (0x1000000) mark */ @@ -762,7 +1284,7 @@ static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, hostdata = (struct NCR53c7x0_hostdata *) instance->hostdata; hostdata->size = size; - hostdata->script_count = script_len / sizeof(long); + hostdata->script_count = script_len / sizeof(u32); hostdata = (struct NCR53c7x0_hostdata *) instance->hostdata; hostdata->board = board; hostdata->chip = chip; @@ -786,7 +1308,7 @@ static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, */ if (base) { - instance->base = (unsigned char *) base; + instance->base = (unsigned char *) (unsigned long) base; /* Check for forced I/O mapping */ if (!(options & OPTION_IO_MAPPED)) { options |= OPTION_MEMORY_MAPPED; @@ -814,25 +1336,52 @@ static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, instance->dma_channel = dma; hostdata->options = options; - hostdata->dsa_size = dsa_len; + hostdata->dsa_len = dsa_len; hostdata->max_cmd_size = max_cmd_size; hostdata->num_cmds = 1; /* Initialize single command */ - hostdata->free = (struct NCR53c7x0_cmd *) - (hostdata->script + hostdata->script_count); - hostdata->free->real = (void *) hostdata->free; + tmp = (hostdata->script + hostdata->script_count); + hostdata->free = ROUNDUP(tmp, void *); + hostdata->free->real = tmp; hostdata->free->size = max_cmd_size; hostdata->free->free = NULL; hostdata->free->next = NULL; + hostdata->extra_allocate = 0; + + /* Allocate command start code space */ + hostdata->schedule = (chip == 700 || chip == 70066) ? + NULL : (u32 *) ((char *)hostdata->free + max_cmd_size); +/* + * For diagnostic purposes, we don't really care how fast things blaze. + * For profiling, we want to access the 800ns resolution system clock, + * using a 'C' call on the host processor. + * + * Therefore, there's no need for the NCR chip to directly manipulate + * this data, and we should put it wherever is most convenient for + * Linux. + */ + if (track_events) + hostdata->events = (struct NCR53c7x0_event *) (track_events ? + vmalloc (sizeof (struct NCR53c7x0_event) * track_events) : NULL); + else + hostdata->events = NULL; + + if (hostdata->events) { + memset ((void *) hostdata->events, 0, sizeof(struct NCR53c7x0_event) * + track_events); + hostdata->event_size = track_events; + hostdata->event_index = 0; + } else + hostdata->event_size = 0; return NCR53c7x0_init(instance); } /* - * Function : static int ncr_init(Scsi_Host_Template *tpnt, int board, - * int chip, int bus, int device_fn, int options) + * Function : static int ncr_pci_init(Scsi_Host_Template *tpnt, int board, + * int chip, int bus, int device_fn, long long options) * * Purpose : initializes a NCR53c800 family based on the PCI * bus, device, and function location of it. Allows @@ -851,10 +1400,16 @@ static int normal_init (Scsi_Host_Template *tpnt, int board, int chip, * */ -static int ncr_init (Scsi_Host_Template *tpnt, int board, int chip, - unsigned char bus, unsigned char device_fn, int options) { +static int +ncr_pci_init (Scsi_Host_Template *tpnt, int board, int chip, + unsigned char bus, unsigned char device_fn, long long options) { unsigned short vendor_id, device_id, command; - unsigned long base, io_port; +#ifdef LINUX_1_2 + unsigned long +#else + unsigned int +#endif + base, io_port; unsigned char irq, revision; int error, expected_chip; int expected_id = -1, max_revision = -1, min_revision = -1; @@ -864,7 +1419,7 @@ static int ncr_init (Scsi_Host_Template *tpnt, int board, int chip, bus, (int) (device_fn & 0xf8) >> 3, (int) device_fn & 7); - if (!pcibios_present) { + if (!pcibios_present()) { printk("scsi-ncr53c7,8xx : not initializing due to lack of PCI BIOS,\n" " try using memory, port, irq override instead.\n"); return -1; @@ -907,8 +1462,9 @@ static int ncr_init (Scsi_Host_Template *tpnt, int board, int chip, if (command & PCI_COMMAND_IO) { if ((io_port & 3) != 1) { - printk ("scsi-ncr53c7,8xx : disabling I/O mapping since base address 0 (0x%lx)\n" - " bits 0..1 indicate a non-IO mapping\n", io_port); + printk ("scsi-ncr53c7,8xx : disabling I/O mapping since base address 0 (0x%x)\n" + " bits 0..1 indicate a non-IO mapping\n", + (unsigned) io_port); io_port = 0; } else io_port &= PCI_BASE_ADDRESS_IO_MASK; @@ -924,7 +1480,7 @@ static int ncr_init (Scsi_Host_Template *tpnt, int board, int chip, } else base &= PCI_BASE_ADDRESS_MEM_MASK; } else { - base = 0; + base = 0; } if (!io_port && !base) { @@ -959,7 +1515,13 @@ static int ncr_init (Scsi_Host_Template *tpnt, int board, int chip, printk ("scsi-ncr53c7,8xx : warning : revision of %d is less than %d.\n", (int) revision, min_revision); - return normal_init (tpnt, board, chip, (int) base, (int) io_port, + if (io_port && check_region (io_port, 128)) { + printk ("scsi-ncr53c7,8xx : IO region 0x%x to 0x%x is in use\n", + (unsigned) io_port, (unsigned) io_port + 127); + return -1; + } + + return normal_init (tpnt, board, chip, (int) base, io_port, (int) irq, DMA_NONE, 1, bus, device_fn, options); } @@ -977,18 +1539,22 @@ static int ncr_init (Scsi_Host_Template *tpnt, int board, int chip, * */ -int NCR53c7xx_detect(Scsi_Host_Template *tpnt) { +int +NCR53c7xx_detect(Scsi_Host_Template *tpnt) { int i; int current_override; int count; /* Number of boards detected */ unsigned char pci_bus, pci_device_fn; static short pci_index=0; /* Device index to PCI BIOS calls */ - + +#ifndef LINUX_1_2 + tpnt->proc_dir = &proc_scsi_ncr53c7xx; +#endif for (current_override = count = 0; current_override < OVERRIDE_LIMIT; ++current_override) { if (overrides[current_override].pci ? - !ncr_init (tpnt, overrides[current_override].board, + !ncr_pci_init (tpnt, overrides[current_override].board, overrides[current_override].chip, (unsigned char) overrides[current_override].data.pci.bus, (((overrides[current_override].data.pci.device @@ -1012,10 +1578,11 @@ int NCR53c7xx_detect(Scsi_Host_Template *tpnt) { for (pci_index = 0; !pcibios_find_device (PCI_VENDOR_ID_NCR, pci_chip_ids[i].pci_device_id, pci_index, &pci_bus, - &pci_device_fn) && - !ncr_init (tpnt, BOARD_GENERIC, pci_chip_ids[i].chip, - pci_bus, pci_device_fn, /* no options */ 0); - ++count, ++pci_index); + &pci_device_fn); + ++pci_index) + if (!ncr_pci_init (tpnt, BOARD_GENERIC, pci_chip_ids[i].chip, + pci_bus, pci_device_fn, /* no options */ 0)) + ++count; } return count; } @@ -1023,6 +1590,9 @@ int NCR53c7xx_detect(Scsi_Host_Template *tpnt) { /* NCR53c810 and NCR53c820 script handling code */ #include "53c8xx_d.h" +#ifdef A_int_debug_sync +#define DEBUG_SYNC_INTR A_int_debug_sync +#endif static int NCR53c8xx_script_len = sizeof (SCRIPT); static int NCR53c8xx_dsa_len = A_dsa_end + Ent_dsa_zero - Ent_dsa_code_template; @@ -1041,12 +1611,11 @@ NCR53c8x0_init_fixup (struct Scsi_Host *host) { struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; unsigned char tmp; - int i, ncr_to_memory, memory_to_ncr, ncr_to_ncr; - unsigned long base; + int i, ncr_to_memory, memory_to_ncr; + u32 base; NCR53c7x0_local_setup(host); - /* XXX - NOTE : this code MUST be made endian aware */ /* Copy code into buffer that was allocated at detection time. */ memcpy ((void *) hostdata->script, (void *) SCRIPT, @@ -1054,27 +1623,43 @@ NCR53c8x0_init_fixup (struct Scsi_Host *host) { /* Fixup labels */ for (i = 0; i < PATCHES; ++i) hostdata->script[LABELPATCHES[i]] += - (unsigned long) hostdata->script; + virt_to_bus(hostdata->script); /* Fixup addresses of constants that used to be EXTERNAL */ - + patch_abs_32 (hostdata->script, 0, NCR53c7xx_msg_abort, - (long) &(hostdata->NCR53c7xx_msg_abort)); + virt_to_bus(&(hostdata->NCR53c7xx_msg_abort))); patch_abs_32 (hostdata->script, 0, NCR53c7xx_msg_reject, - (long) &(hostdata->NCR53c7xx_msg_reject)); + virt_to_bus(&(hostdata->NCR53c7xx_msg_reject))); patch_abs_32 (hostdata->script, 0, NCR53c7xx_zero, - (long) &(hostdata->NCR53c7xx_zero)); + virt_to_bus(&(hostdata->NCR53c7xx_zero))); patch_abs_32 (hostdata->script, 0, NCR53c7xx_sink, - (long) &(hostdata->NCR53c7xx_sink)); + virt_to_bus(&(hostdata->NCR53c7xx_sink))); + patch_abs_32 (hostdata->script, 0, NOP_insn, + virt_to_bus(&(hostdata->NOP_insn))); + patch_abs_32 (hostdata->script, 0, schedule, + virt_to_bus((void *) hostdata->schedule)); + + /* Fixup references to external variables: */ + for (i = 0; i < EXTERNAL_PATCHES_LEN; ++i) + hostdata->script[EXTERNAL_PATCHES[i].offset] += + virt_to_bus(EXTERNAL_PATCHES[i].address); /* * Fixup absolutes set at boot-time. * - * All Absolute variables suffixed with "dsa_" and "int_" + * All non-code absolute variables suffixed with "dsa_" and "int_" * are constants, and need no fixup provided the assembler has done * it for us (I don't know what the "real" NCR assembler does in * this case, my assembler does the right magic). */ + patch_abs_rwri_data (hostdata->script, 0, dsa_save_data_pointer, + Ent_dsa_code_save_data_pointer - Ent_dsa_zero); + patch_abs_rwri_data (hostdata->script, 0, dsa_restore_pointers, + Ent_dsa_code_restore_pointers - Ent_dsa_zero); + patch_abs_rwri_data (hostdata->script, 0, dsa_check_reselect, + Ent_dsa_code_check_reselect - Ent_dsa_zero); + /* * Just for the hell of it, preserve the settings of * Burst Length and Enable Read Line bits from the DMODE @@ -1085,17 +1670,15 @@ NCR53c8x0_init_fixup (struct Scsi_Host *host) { tmp &= (DMODE_800_ERL | DMODE_BL_MASK); if (!(hostdata->options & OPTION_MEMORY_MAPPED)) { - base = (long) host->io_port; + base = (u32) host->io_port; memory_to_ncr = tmp|DMODE_800_DIOM; ncr_to_memory = tmp|DMODE_800_SIOM; - ncr_to_ncr = tmp|DMODE_800_DIOM|DMODE_800_SIOM; } else { - base = (long) host->base; - ncr_to_ncr = memory_to_ncr = ncr_to_memory = tmp; + base = virt_to_bus(host->base); + memory_to_ncr = ncr_to_memory = tmp; } patch_abs_32 (hostdata->script, 0, addr_scratch, base + SCRATCHA_REG_800); - patch_abs_32 (hostdata->script, 0, addr_sfbr, base + SFBR_REG); patch_abs_32 (hostdata->script, 0, addr_temp, base + TEMP_REG); /* @@ -1110,42 +1693,79 @@ NCR53c8x0_init_fixup (struct Scsi_Host *host) { patch_abs_rwri_data (hostdata->script, 0, dmode_memory_to_memory, tmp); patch_abs_rwri_data (hostdata->script, 0, dmode_memory_to_ncr, memory_to_ncr); patch_abs_rwri_data (hostdata->script, 0, dmode_ncr_to_memory, ncr_to_memory); - patch_abs_rwri_data (hostdata->script, 0, dmode_ncr_to_ncr, ncr_to_ncr); - patch_abs_32 (hostdata->script, 0, issue_dsa_head, - (long) &(hostdata->issue_dsa_head)); - patch_abs_32 (hostdata->script, 0, msg_buf, (long) &(hostdata->msg_buf)); + patch_abs_32 (hostdata->script, 0, msg_buf, + virt_to_bus((void *)&(hostdata->msg_buf))); patch_abs_32 (hostdata->script, 0, reconnect_dsa_head, - (long) &(hostdata->reconnect_dsa_head)); + virt_to_bus((void *)&(hostdata->reconnect_dsa_head))); + patch_abs_32 (hostdata->script, 0, addr_reconnect_dsa_head, + virt_to_bus((void *)&(hostdata->addr_reconnect_dsa_head))); patch_abs_32 (hostdata->script, 0, reselected_identify, - (long) &(hostdata->reselected_identify)); + virt_to_bus((void *)&(hostdata->reselected_identify))); +/* reselected_tag is currently unused */ +#if 0 patch_abs_32 (hostdata->script, 0, reselected_tag, - (long) &(hostdata->reselected_tag)); + virt_to_bus((void *)&(hostdata->reselected_tag))); +#endif - patch_abs_32 (hostdata->script, 0, test_dest, (long) &(hostdata->test_dest)); - patch_abs_32 (hostdata->script, 0, test_src, (long) &(hostdata->test_source)); + patch_abs_32 (hostdata->script, 0, test_dest, + virt_to_bus((void*)&hostdata->test_dest)); + patch_abs_32 (hostdata->script, 0, test_src, + virt_to_bus(&hostdata->test_source)); + patch_abs_rwri_data (hostdata->script, 0, dsa_check_reselect, + (unsigned char)(Ent_dsa_code_check_reselect - Ent_dsa_zero)); + +/* These are for event logging; the ncr_event enum contains the + actual interrupt numbers. */ +#ifdef A_int_EVENT_SELECT + patch_abs_32 (hostdata->script, 0, int_EVENT_SELECT, (u32) EVENT_SELECT); +#endif +#ifdef A_int_EVENT_DISCONNECT + patch_abs_32 (hostdata->script, 0, int_EVENT_DISCONNECT, (u32) EVENT_DISCONNECT); +#endif +#ifdef A_int_EVENT_RESELECT + patch_abs_32 (hostdata->script, 0, int_EVENT_RESELECT, (u32) EVENT_RESELECT); +#endif +#ifdef A_int_EVENT_COMPLETE + patch_abs_32 (hostdata->script, 0, int_EVENT_COMPLETE, (u32) EVENT_COMPLETE); +#endif +#ifdef A_int_EVENT_IDLE + patch_abs_32 (hostdata->script, 0, int_EVENT_IDLE, (u32) EVENT_IDLE); +#endif +#ifdef A_int_EVENT_SELECT_FAILED + patch_abs_32 (hostdata->script, 0, int_EVENT_SELECT_FAILED, + (u32) EVENT_SELECT_FAILED); +#endif +#ifdef A_int_EVENT_BEFORE_SELECT + patch_abs_32 (hostdata->script, 0, int_EVENT_BEFORE_SELECT, + (u32) EVENT_BEFORE_SELECT); +#endif +#ifdef A_int_EVENT_RESELECT_FAILED + patch_abs_32 (hostdata->script, 0, int_EVENT_RESELECT_FAILED, + (u32) EVENT_RESELECT_FAILED); +#endif /* * Make sure the NCR and Linux code agree on the location of * certain fields. */ -/* - * XXX - for cleanness, E_* fields should be type unsigned long * - * and should reflect the _relocated_ addresses. Change this. - */ hostdata->E_accept_message = Ent_accept_message; hostdata->E_command_complete = Ent_command_complete; + hostdata->E_cmdout_cmdout = Ent_cmdout_cmdout; + hostdata->E_data_transfer = Ent_data_transfer; hostdata->E_debug_break = Ent_debug_break; hostdata->E_dsa_code_template = Ent_dsa_code_template; hostdata->E_dsa_code_template_end = Ent_dsa_code_template_end; + hostdata->E_end_data_transfer = Ent_end_data_transfer; hostdata->E_initiator_abort = Ent_initiator_abort; hostdata->E_msg_in = Ent_msg_in; hostdata->E_other_transfer = Ent_other_transfer; + hostdata->E_other_in = Ent_other_in; + hostdata->E_other_out = Ent_other_out; hostdata->E_reject_message = Ent_reject_message; hostdata->E_respond_message = Ent_respond_message; - hostdata->E_schedule = Ent_schedule; hostdata->E_select = Ent_select; hostdata->E_select_msgout = Ent_select_msgout; hostdata->E_target_abort = Ent_target_abort; @@ -1157,6 +1777,8 @@ NCR53c8x0_init_fixup (struct Scsi_Host *host) { #ifdef Ent_test_3 hostdata->E_test_3 = Ent_test_3; #endif + hostdata->E_wait_reselect = Ent_wait_reselect; + hostdata->E_dsa_code_begin = Ent_dsa_code_begin; hostdata->dsa_cmdout = A_dsa_cmdout; hostdata->dsa_cmnd = A_dsa_cmnd; @@ -1170,6 +1792,8 @@ NCR53c8x0_init_fixup (struct Scsi_Host *host) { hostdata->dsa_select = A_dsa_select; hostdata->dsa_start = Ent_dsa_code_template - Ent_dsa_zero; hostdata->dsa_status = A_dsa_status; + hostdata->dsa_jump_dest = Ent_dsa_code_fix_jump - Ent_dsa_zero + + 8 /* destination operand */; /* sanity check */ if (A_dsa_fields_start != Ent_dsa_code_template_end - @@ -1178,8 +1802,8 @@ NCR53c8x0_init_fixup (struct Scsi_Host *host) { host->host_no, A_dsa_fields_start, Ent_dsa_code_template_end - Ent_dsa_zero); - printk("scsi%d : NCR code relocated to 0x%lx\n", host->host_no, - (unsigned long) hostdata->script); + printk("scsi%d : NCR code relocated to 0x%lx (virt 0x%p)\n", host->host_no, + virt_to_bus(hostdata->script), hostdata->script); } /* @@ -1197,14 +1821,15 @@ NCR53c8x0_init_fixup (struct Scsi_Host *host) { * */ -static int NCR53c8xx_run_tests (struct Scsi_Host *host) { +static int +NCR53c8xx_run_tests (struct Scsi_Host *host) { NCR53c7x0_local_declare(); struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; - unsigned long timeout, start; + unsigned long timeout; + u32 start; int failed, i; unsigned long flags; - NCR53c7x0_local_setup(host); /* The NCR chip _must_ be idle to run the test scripts */ @@ -1222,26 +1847,28 @@ static int NCR53c8xx_run_tests (struct Scsi_Host *host) { * autoprobe routine. */ - if (hostdata->issue_dsa_head) { - printk ("scsi%d : hostdata->issue_dsa_head corrupt before test 1\n", - host->host_no); - hostdata->issue_dsa_head = NULL; - } - - if (hostdata->options & OPTION_DEBUG_TEST1) { + if ((hostdata->options & OPTION_DEBUG_TEST1) && + hostdata->state != STATE_DISABLED) { hostdata->idle = 0; hostdata->test_running = 1; hostdata->test_completed = -1; hostdata->test_dest = 0; hostdata->test_source = 0xdeadbeef; - start = ((unsigned long) hostdata->script) + hostdata->E_test_1; + start = virt_to_bus (hostdata->script) + hostdata->E_test_1; hostdata->state = STATE_RUNNING; printk ("scsi%d : test 1", host->host_no); NCR53c7x0_write32 (DSP_REG, start); printk (" started\n"); sti(); - timeout = jiffies + 50; /* arbitrary */ + /* + * This is currently a .5 second timeout, since (in theory) no slow + * board will take that long. In practice, we've seen one + * pentium which occasionally fails with this, but works with + * 10 times as much? + */ + + timeout = jiffies + 5 * HZ / 10; while ((hostdata->test_completed == -1) && jiffies < timeout) barrier(); @@ -1258,38 +1885,33 @@ static int NCR53c8xx_run_tests (struct Scsi_Host *host) { " most PCI motherboards lack support for INTB, INTC, and INTD.\n" : ""); else if (hostdata->test_completed != 1) - printk ("scsi%d : test 1 bad interrupt value (%ld)\n", host->host_no, - hostdata->test_completed); + printk ("scsi%d : test 1 bad interrupt value (%d)\n", + host->host_no, hostdata->test_completed); else failed = (hostdata->test_dest != 0xdeadbeef); if (hostdata->test_dest != 0xdeadbeef) { printk ("scsi%d : driver test 1 read 0x%x instead of 0xdeadbeef indicating a\n" " probable cache invalidation problem. Please configure caching\n" - " as write-through or disabled\n", + " as write-through or disabled\n", host->host_no, hostdata->test_dest); } if (failed) { - printk ("scsi%d : DSP = 0x%lx (script at 0x%lx, start at 0x%lx)\n", - host->host_no, (unsigned long) NCR53c7x0_read32(DSP_REG), - (unsigned long) hostdata->script, start); - printk ("scsi%d : DSPS = 0x%lx\n", host->host_no, - (unsigned long) NCR53c7x0_read32(DSPS_REG)); + printk ("scsi%d : DSP = 0x%p (script at 0x%p, start at 0x%x)\n", + host->host_no, bus_to_virt(NCR53c7x0_read32(DSP_REG)), + hostdata->script, start); + printk ("scsi%d : DSPS = 0x%x\n", host->host_no, + NCR53c7x0_read32(DSPS_REG)); restore_flags(flags); return -1; } hostdata->test_running = 0; } - if (hostdata->issue_dsa_head) { - printk ("scsi%d : hostdata->issue_dsa_head corrupt after test 1\n", - host->host_no); - hostdata->issue_dsa_head = NULL; - } - - if (hostdata->options & OPTION_DEBUG_TEST2) { - unsigned long dsa[48]; + if ((hostdata->options & OPTION_DEBUG_TEST2) && + hostdata->state != STATE_DISABLED) { + u32 dsa[48]; unsigned char identify = IDENTIFY(0, 0); unsigned char cmd[6]; unsigned char data[36]; @@ -1301,18 +1923,18 @@ static int NCR53c8xx_run_tests (struct Scsi_Host *host) { cmd[4] = sizeof(data); dsa[2] = 1; - dsa[3] = (unsigned long) &identify; + dsa[3] = virt_to_bus(&identify); dsa[4] = 6; - dsa[5] = (unsigned long) &cmd; + dsa[5] = virt_to_bus(&cmd); dsa[6] = sizeof(data); - dsa[7] = (unsigned long) &data; + dsa[7] = virt_to_bus(&data); dsa[8] = 1; - dsa[9] = (unsigned long) &status; + dsa[9] = virt_to_bus(&status); dsa[10] = 1; - dsa[11] = (unsigned long) &msg; + dsa[11] = virt_to_bus(&msg); for (i = 0; i < 3; ++i) { - cli(); + cli(); if (!hostdata->idle) { printk ("scsi%d : chip not idle, aborting tests\n", host->host_no); restore_flags(flags); @@ -1324,13 +1946,13 @@ static int NCR53c8xx_run_tests (struct Scsi_Host *host) { hostdata->idle = 0; hostdata->test_running = 2; hostdata->test_completed = -1; - start = ((unsigned long) hostdata->script) + hostdata->E_test_2; + start = virt_to_bus(hostdata->script) + hostdata->E_test_2; hostdata->state = STATE_RUNNING; - NCR53c7x0_write32 (DSA_REG, (unsigned long) dsa); + NCR53c7x0_write32 (DSA_REG, virt_to_bus(dsa)); NCR53c7x0_write32 (DSP_REG, start); sti(); - timeout = jiffies + 500; /* arbitrary */ + timeout = jiffies + 5 * HZ; /* arbitrary */ while ((hostdata->test_completed == -1) && jiffies < timeout) barrier(); NCR53c7x0_write32 (DSA_REG, 0); @@ -1358,11 +1980,6 @@ static int NCR53c8xx_run_tests (struct Scsi_Host *host) { return -1; } hostdata->test_running = 0; - if (hostdata->issue_dsa_head) { - printk ("scsi%d : hostdata->issue_dsa_head corrupt after test 2 id %d\n", - host->host_no, i); - hostdata->issue_dsa_head = NULL; - } } } @@ -1380,7 +1997,8 @@ static int NCR53c8xx_run_tests (struct Scsi_Host *host) { * enough to hold the NCR53c8xx dsa. */ -static void NCR53c8xx_dsa_fixup (struct NCR53c7x0_cmd *cmd) { +static void +NCR53c8xx_dsa_fixup (struct NCR53c7x0_cmd *cmd) { Scsi_Cmnd *c = cmd->cmd; struct Scsi_Host *host = c->host; struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) @@ -1390,17 +2008,74 @@ static void NCR53c8xx_dsa_fixup (struct NCR53c7x0_cmd *cmd) { memcpy (cmd->dsa, hostdata->script + (hostdata->E_dsa_code_template / 4), hostdata->E_dsa_code_template_end - hostdata->E_dsa_code_template); - patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(long), - dsa_temp_jump_resume, ((unsigned long) cmd->dsa) + - Ent_dsa_jump_resume - Ent_dsa_zero); - patch_abs_rwri_data (cmd->dsa, Ent_dsa_code_template / sizeof(long), + /* + * Note : within the NCR 'C' code, dsa points to the _start_ + * of the DSA structure, and _not_ the offset of dsa_zero within + * that structure used to facilitate shorter signed offsets + * for the 8 bit ALU. + * + * The implications of this are that + * + * - 32 bit A_dsa_* absolute values require an additional + * dsa_zero added to their value to be correct, since they are + * relative to dsa_zero which is in essentially a separate + * space from the code symbols. + * + * - All other symbols require no special treatment. + */ + + patch_abs_tci_data (cmd->dsa, Ent_dsa_code_template / sizeof(u32), dsa_temp_lun, c->lun); - patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(long), - dsa_temp_dsa_next, ((unsigned long) cmd->dsa) + A_dsa_next); - patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(long), - dsa_temp_sync, hostdata->sync[c->target].select_indirect); - patch_abs_rwri_data (cmd->dsa, Ent_dsa_code_template / sizeof(long), + patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(u32), + dsa_temp_addr_next, virt_to_bus(&cmd->dsa_next_addr)); + patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(u32), + dsa_temp_next, virt_to_bus(cmd->dsa) + Ent_dsa_zero - + Ent_dsa_code_template + A_dsa_next); + patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(u32), + dsa_temp_sync, virt_to_bus((void *)hostdata->sync[c->target].script)); + patch_abs_tci_data (cmd->dsa, Ent_dsa_code_template / sizeof(u32), dsa_temp_target, c->target); + /* XXX - new pointer stuff */ + patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(u32), + dsa_temp_addr_saved_pointer, virt_to_bus(&cmd->saved_data_pointer)); + patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(u32), + dsa_temp_addr_saved_residual, virt_to_bus(&cmd->saved_residual)); + patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(u32), + dsa_temp_addr_residual, virt_to_bus(&cmd->residual)); + + /* XXX - new start stuff */ + patch_abs_32 (cmd->dsa, Ent_dsa_code_template / sizeof(u32), + dsa_temp_addr_dsa_value, virt_to_bus(&cmd->dsa_addr)); + +} + +/* + * Function : run_process_issue_queue (void) + * + * Purpose : insure that the coroutine is running and will process our + * request. process_issue_queue_running is checked/set here (in an + * inline function) rather than in process_issue_queue itself to reduce + * the chances of stack overflow. + * + */ + +static volatile int process_issue_queue_running = 0; + +static __inline__ void +run_process_issue_queue(void) { + unsigned long flags; + save_flags (flags); + cli(); + if (!process_issue_queue_running) { + process_issue_queue_running = 1; + process_issue_queue(flags); + /* + * process_issue_queue_running is cleared in process_issue_queue + * once it can't do more work, and process_issue_queue exits with + * interrupts disabled. + */ + } + restore_flags (flags); } /* @@ -1418,46 +2093,107 @@ static void NCR53c8xx_dsa_fixup (struct NCR53c7x0_cmd *cmd) { * the NCR expects to have exclusive access to. */ -static void abnormal_finished (struct NCR53c7x0_cmd *cmd, int result) { +static void +abnormal_finished (struct NCR53c7x0_cmd *cmd, int result) { Scsi_Cmnd *c = cmd->cmd; struct Scsi_Host *host = c->host; struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; unsigned long flags; - char **prev, *search; - int i; + int left, found; + volatile struct NCR53c7x0_cmd * linux_search; + volatile struct NCR53c7x0_cmd * volatile *linux_prev; + volatile u32 *ncr_prev, *current, ncr_search; + +#if 0 + printk ("scsi%d: abnormal finished\n", host->host_no); +#endif save_flags(flags); cli(); - for (i = 0; i < 2; ++i) { - for (search = (char *) (i ? hostdata->issue_dsa_head : - hostdata->reconnect_dsa_head), prev = (char **) (i ? - &(hostdata->issue_dsa_head) : &(hostdata->reconnect_dsa_head)); - search && (search + hostdata->dsa_start) != (char *) cmd->dsa; - prev = (char **) (search + hostdata->dsa_next), - search = *prev); + found = 0; + /* + * Traverse the NCR issue array until we find a match or run out + * of instructions. Instructions in the NCR issue array are + * either JUMP or NOP instructions, which are 2 words in length. + */ - if (search) - *prev = *(char **) (search + hostdata->dsa_next); + + for (found = 0, left = host->can_queue, current = hostdata->schedule; + left > 0; --left, current += 2) + { + if (issue_to_cmd (host, hostdata, (u32 *) current) == cmd) + { + current[0] = hostdata->NOP_insn; + current[1] = 0xdeadbeef; + ++found; + break; + } } + + /* + * Traverse the NCR reconnect list of DSA structures until we find + * a pointer to this dsa or have found too many command structures. + * We let prev point at the next field of the previous element or + * head of the list, so we don't do anything different for removing + * the head element. + */ - if (cmd->prev) - cmd->prev->next = cmd->next; + for (left = host->can_queue, + ncr_search = hostdata->reconnect_dsa_head, + ncr_prev = &hostdata->reconnect_dsa_head; + left >= 0 && ncr_search && + ((char*)bus_to_virt(ncr_search) + hostdata->dsa_start) + != (char *) cmd->dsa; + ncr_prev = (u32*) ((char*)bus_to_virt(ncr_search) + + hostdata->dsa_next), ncr_search = *ncr_prev, --left); + + if (left < 0) + printk("scsi%d: loop detected in ncr reconnect list\n", + host->host_no); + else if (ncr_search) + if (found) + printk("scsi%d: scsi %ld in ncr issue array and reconnect lists\n", + host->host_no, c->pid); + else { + volatile u32 * next = (u32 *) + ((char *)bus_to_virt(ncr_search) + hostdata->dsa_next); + *ncr_prev = *next; +/* If we're at the tail end of the issue queue, update that pointer too. */ + found = 1; + } - if (cmd->next) - cmd->next->prev = cmd->prev; + /* + * Traverse the host running list until we find this command or discover + * we have too many elements, pointing linux_prev at the next field of the + * linux_previous element or head of the list, search at this element. + */ - if (hostdata->running_list == cmd) - hostdata->running_list = cmd->next; + for (left = host->can_queue, linux_search = hostdata->running_list, + linux_prev = &hostdata->running_list; + left >= 0 && linux_search && linux_search != cmd; + linux_prev = &(linux_search->next), + linux_search = linux_search->next, --left); + + if (left < 0) + printk ("scsi%d: loop detected in host running list for scsi pid %ld\n", + host->host_no, c->pid); + else if (linux_search) { + *linux_prev = linux_search->next; + --hostdata->busy[c->target][c->lun]; + } + /* Return the NCR command structure to the free list */ cmd->next = hostdata->free; hostdata->free = cmd; - c->host_scribble = NULL; + + /* And return */ c->result = result; c->scsi_done(c); restore_flags(flags); + run_process_issue_queue(); } /* @@ -1472,14 +2208,15 @@ static void abnormal_finished (struct NCR53c7x0_cmd *cmd, int result) { * */ -static void intr_break (struct Scsi_Host *host, struct +static void +intr_break (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { NCR53c7x0_local_declare(); struct NCR53c7x0_break *bp; #if 0 Scsi_Cmnd *c = cmd ? cmd->cmd : NULL; #endif - unsigned long *dsp; + u32 *dsp; struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; unsigned long flags; @@ -1492,7 +2229,7 @@ static void intr_break (struct Scsi_Host *host, struct */ save_flags(flags); cli(); - dsp = (unsigned long *) NCR53c7x0_read32(DSP_REG); + dsp = (u32 *) bus_to_virt(NCR53c7x0_read32(DSP_REG)); for (bp = hostdata->breakpoints; bp && bp->address != dsp; bp = bp->next); if (!bp) @@ -1515,45 +2252,132 @@ static void intr_break (struct Scsi_Host *host, struct restore_flags(flags); } - /* - * Function : static int asynchronous (struct Scsi_Host *host, int target) + * Function : static void print_synchronous (const char *prefix, + * const unsigned char *msg) + * + * Purpose : print a pretty, user and machine parsable representation + * of a SDTR message, including the "real" parameters, data + * clock so we can tell transfer rate at a glance. * - * Purpose : reprogram between the selected SCSI Host adapter and target - * (assumed to be currently connected) for asynchronous transfers. + * Inputs ; prefix - text to prepend, msg - SDTR message (5 bytes) + */ + +static void +print_synchronous (const char *prefix, const unsigned char *msg) { + if (msg[4]) { + int Hz = 1000000000 / (msg[3] * 4); + int integer = Hz / 1000000; + int fraction = (Hz - (integer * 1000000)) / 10000; + printk ("%speriod %dns offset %d %d.%02dMHz %s SCSI%s\n", + prefix, (int) msg[3] * 4, (int) msg[4], integer, fraction, + (((msg[3] * 4) < 200) ? "FAST" : "synchronous"), + (((msg[3] * 4) < 200) ? "-II" : "")); + } else + printk ("%sasynchronous SCSI\n", prefix); +} + +/* + * Function : static void set_synchronous (struct Scsi_Host *host, + * int target, int sxfer, int scntl3, int now_connected) * - * Inputs : host - SCSI host structure, target - numeric target ID. + * Purpose : reprogram transfers between the selected SCSI initiator and + * target with the given register values; in the indirect + * select operand, reselection script, and chip registers. * - * Preconditions : the NCR chip should be in one of the halted states + * Inputs : host - NCR53c7,8xx SCSI host, target - number SCSI target id, + * sxfer and scntl3 - NCR registers. now_connected - if non-zero, + * we should reprogram the registers now too. */ - -static int asynchronous (struct Scsi_Host *host, int target) { + +static void +set_synchronous (struct Scsi_Host *host, int target, int sxfer, int scntl3, + int now_connected) { NCR53c7x0_local_declare(); - struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; + u32 *script; NCR53c7x0_local_setup(host); - if ((hostdata->chip / 100) == 8) { - hostdata->sync[target].select_indirect = (hostdata->saved_scntl3 << 24) - | (target << 16); -/* Fill in script here */ - } else if ((hostdata->chip != 700) && (hostdata->chip != 70066)) { - hostdata->sync[target].select_indirect = (1 << (target & 7)) << 16; - } + /* These are eight bit registers */ + sxfer &= 0xff; + scntl3 &= 0xff; + + hostdata->sync[target].sxfer_sanity = sxfer; + hostdata->sync[target].scntl3_sanity = scntl3; /* - * Halted implies connected, when resetting we shouldn't change the - * current parameters but must reset all targets to asynchronous. + * HARD CODED : synchronous script is EIGHT words long. This + * must agree with 53c7.8xx.h */ - if (hostdata->state == STATE_HALTED) { + if ((hostdata->chip != 700) && (hostdata->chip != 70066)) { + hostdata->sync[target].select_indirect = (scntl3 << 24) | + (target << 16) | (sxfer << 8); + + script = (u32 *) hostdata->sync[target].script; + + /* XXX - add NCR53c7x0 code to reprogram SCF bits if we want to */ if ((hostdata->chip / 100) == 8) { - NCR53c7x0_write8 (SCNTL3_REG_800, hostdata->saved_scntl3); + script[0] = ((DCMD_TYPE_RWRI | DCMD_RWRI_OPC_MODIFY | + DCMD_RWRI_OP_MOVE) << 24) | + (SCNTL3_REG_800 << 16) | (scntl3 << 8); + script[1] = 0; + script += 2; } - /* Offset = 0, transfer period = divide SCLK by 4 */ - NCR53c7x0_write8 (SXFER_REG, 0); + + script[0] = ((DCMD_TYPE_RWRI | DCMD_RWRI_OPC_MODIFY | + DCMD_RWRI_OP_MOVE) << 24) | + (SXFER_REG << 16) | (sxfer << 8); + script[1] = 0; + script += 2; + +#ifdef DEBUG_SYNC_INTR + if (hostdata->options & OPTION_DEBUG_DISCONNECT) { + script[0] = ((DCMD_TYPE_TCI|DCMD_TCI_OP_INT) << 24) | DBC_TCI_TRUE; + script[1] = DEBUG_SYNC_INTR; + script += 2; + } +#endif + + script[0] = ((DCMD_TYPE_TCI|DCMD_TCI_OP_RETURN) << 24) | DBC_TCI_TRUE; + script[1] = 0; + script += 2; + } + + if (hostdata->options & OPTION_DEBUG_SYNCHRONOUS) + printk ("scsi%d : target %d sync parameters are sxfer=0x%x, scntl3=0x%x\n", + host->host_no, target, sxfer, scntl3); + + if (now_connected) { + if ((hostdata->chip / 100) == 8) + NCR53c7x0_write8(SCNTL3_REG_800, scntl3); + NCR53c7x0_write8(SXFER_REG, sxfer); } - return 0; +} + + +/* + * Function : static int asynchronous (struct Scsi_Host *host, int target) + * + * Purpose : reprogram between the selected SCSI Host adapter and target + * (assumed to be currently connected) for asynchronous transfers. + * + * Inputs : host - SCSI host structure, target - numeric target ID. + * + * Preconditions : the NCR chip should be in one of the halted states + */ + +static void +asynchronous (struct Scsi_Host *host, int target) { + NCR53c7x0_local_declare(); + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + NCR53c7x0_local_setup(host); + set_synchronous (host, target, /* no offset */ 0, hostdata->saved_scntl3, + 1); + printk ("scsi%d : setting target %d to asynchronous SCSI\n", + host->host_no, target); } /* @@ -1565,9 +2389,9 @@ static int asynchronous (struct Scsi_Host *host, int target) { /* Table for NCR53c8xx synchronous values */ static const struct { - int div; - unsigned char scf; - unsigned char tp; + int div; /* Total clock divisor * 10 */ + unsigned char scf; /* */ + unsigned char tp; /* 4 + tp = xferp divisor */ } syncs[] = { /* div scf tp div scf tp div scf tp */ { 40, 1, 0}, { 50, 1, 1}, { 60, 1, 2}, @@ -1595,60 +2419,50 @@ static const struct { */ -static void synchronous (struct Scsi_Host *host, int target, char *msg) { +static void +synchronous (struct Scsi_Host *host, int target, char *msg) { struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; int desire, divisor, i, limit; - unsigned long *script; unsigned char scntl3, sxfer; +/* The diagnostic message fits on one line, even with max. width integers */ + char buf[80]; -/* Scale divisor by 10 to accommodate fractions */ +/* Desired transfer clock in Hz */ desire = 1000000000L / (msg[3] * 4); - divisor = desire / (hostdata->scsi_clock / 10); +/* Scale the available SCSI clock by 10 so we get tenths */ + divisor = (hostdata->scsi_clock * 10) / desire; +/* NCR chips can handle at most an offset of 8 */ if (msg[4] > 8) msg[4] = 8; - printk("scsi%d : optimal synchronous divisor of %d.%01d\n", host->host_no, - divisor / 10, divisor % 10); + if (hostdata->options & OPTION_DEBUG_SDTR) + printk("scsi%d : optimal synchronous divisor of %d.%01d\n", + host->host_no, divisor / 10, divisor % 10); - limit = (sizeof(syncs) / sizeof(syncs[0])) - 1; - for (i = 0; (i < limit) && (divisor < syncs[i + 1].div); ++i); + limit = (sizeof(syncs) / sizeof(syncs[0]) -1); + for (i = 0; (i < limit) && (divisor > syncs[i].div); ++i); - printk("scsi%d : selected synchronous divisor of %d.%01d\n", host->host_no, - syncs[i].div / 10, syncs[i].div % 10); + if (hostdata->options & OPTION_DEBUG_SDTR) + printk("scsi%d : selected synchronous divisor of %d.%01d\n", + host->host_no, syncs[i].div / 10, syncs[i].div % 10); - msg[3] = (1000000000 / divisor / 10 / 4); + msg[3] = ((1000000000L / hostdata->scsi_clock) * syncs[i].div / 10 / 4); + + if (hostdata->options & OPTION_DEBUG_SDTR) + printk("scsi%d : selected synchronous period of %dns\n", host->host_no, + msg[3] * 4); scntl3 = (hostdata->chip / 100 == 8) ? ((hostdata->saved_scntl3 & ~SCNTL3_800_SCF_MASK) | (syncs[i].scf << SCNTL3_800_SCF_SHIFT)) : 0; sxfer = (msg[4] << SXFER_MO_SHIFT) | ((syncs[i].tp) << SXFER_TP_SHIFT); - - if ((hostdata->chip != 700) && (hostdata->chip != 70066)) { - hostdata->sync[target].select_indirect = (scntl3 << 24) | (target << 16) | - (sxfer << 8); - - script = (long *) hostdata->sync[target].script; - - /* XXX - add NCR53c7x0 code to reprogram SCF bits if we want to */ - if ((hostdata->chip / 100) == 8) { - script[0] = ((DCMD_TYPE_RWRI | DCMD_RWRI_OPC_MODIFY | - DCMD_RWRI_OP_MOVE) << 24) | - (SCNTL3_REG_800 << 16) | (scntl3 << 8); - script[1] = 0; - script += 2; - } - - script[0] = ((DCMD_TYPE_RWRI | DCMD_RWRI_OPC_MODIFY | - DCMD_RWRI_OP_MOVE) << 24) | - (SXFER_REG << 16) | (sxfer << 8); - script[1] = 0; - script += 2; - - script[0] = ((DCMD_TYPE_TCI|DCMD_TCI_OP_RETURN) << 24) | DBC_TCI_TRUE; - script[1] = 0; - script += 2; - } + if (hostdata->options & OPTION_DEBUG_SDTR) + printk ("scsi%d : sxfer=0x%x scntl3=0x%x\n", + host->host_no, (int) sxfer, (int) scntl3); + set_synchronous (host, target, sxfer, scntl3, 1); + sprintf (buf, "scsi%d : setting target %d to ", host->host_no, target); + print_synchronous (buf, msg); } /* @@ -1664,27 +2478,25 @@ static void synchronous (struct Scsi_Host *host, int target, char *msg) { * */ -static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct +static int +NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { NCR53c7x0_local_declare(); + int print; Scsi_Cmnd *c = cmd ? cmd->cmd : NULL; struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; - unsigned long dsps,*dsp; /* Argument of the INT instruction */ + u32 dsps,*dsp; /* Argument of the INT instruction */ NCR53c7x0_local_setup(host); dsps = NCR53c7x0_read32(DSPS_REG); - dsp = (unsigned long *) NCR53c7x0_read32(DSP_REG); + dsp = (u32 *) bus_to_virt(NCR53c7x0_read32(DSP_REG)); if (hostdata->options & OPTION_DEBUG_INTR) - printk ("scsi%d : DSPS = 0x%lx\n", host->host_no, dsps); + printk ("scsi%d : DSPS = 0x%x\n", host->host_no, dsps); switch (dsps) { case A_int_msg_1: - printk ("scsi%d : message", host->host_no); - if (cmd) - printk (" from target %d lun %d", c->target, c->lun); - print_msg ((unsigned char *) hostdata->msg_buf); - printk("\n"); + print = 1; switch (hostdata->msg_buf[0]) { /* * Unless we've initiated synchronous negotiation, I don't @@ -1692,22 +2504,58 @@ static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct */ case MESSAGE_REJECT: hostdata->dsp = hostdata->script + hostdata->E_accept_message / - sizeof(long); + sizeof(u32); hostdata->dsp_changed = 1; + if (cmd && (cmd->flags & CMD_FLAG_SDTR)) { + printk ("scsi%d : target %d rejected SDTR\n", host->host_no, + c->target); + cmd->flags &= ~CMD_FLAG_SDTR; + asynchronous (host, c->target); + print = 0; + } break; case INITIATE_RECOVERY: printk ("scsi%d : extended contingent allegiance not supported yet, rejecting\n", host->host_no); + /* Fall through to default */ + hostdata->dsp = hostdata->script + hostdata->E_reject_message / + sizeof(u32); + hostdata->dsp_changed = 1; + break; + default: + printk ("scsi%d : unsupported message, rejecting\n", + host->host_no); hostdata->dsp = hostdata->script + hostdata->E_reject_message / - sizeof(long); + sizeof(u32); hostdata->dsp_changed = 1; } + if (print) { + printk ("scsi%d : received message", host->host_no); + if (c) + printk (" from target %d lun %d ", c->target, c->lun); + print_msg ((unsigned char *) hostdata->msg_buf); + printk("\n"); + } + return SPECIFIC_INT_NOTHING; + + case A_int_msg_sdtr: +/* + * At this point, hostdata->msg_buf contains + * 0 EXTENDED MESSAGE + * 1 length + * 2 SDTR + * 3 period * 4ns + * 4 offset + */ + if (cmd) { - printk ("scsi%d : target %d %s synchronous transfer period %dns, offset%d\n", - host->host_no, c->target, (cmd->flags & CMD_FLAG_SDTR) ? "accepting" : - "requesting", hostdata->msg_buf[3] * 4, hostdata->msg_buf[4]); + char buf[80]; + sprintf (buf, "scsi%d : target %d %s ", host->host_no, c->target, + (cmd->flags & CMD_FLAG_SDTR) ? "accepting" : "requesting"); + print_synchronous (buf, (unsigned char *) hostdata->msg_buf); + /* * Initiator initiated, won't happen unless synchronous * transfers are enabled. If we get a SDTR message in @@ -1718,49 +2566,38 @@ static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct */ if (cmd->flags & CMD_FLAG_SDTR) { cmd->flags &= ~CMD_FLAG_SDTR; - synchronous (host, c->target, (unsigned char *) - hostdata->msg_buf); + if (hostdata->msg_buf[4]) + synchronous (host, c->target, (unsigned char *) + hostdata->msg_buf); + else + asynchronous (host, c->target); hostdata->dsp = hostdata->script + hostdata->E_accept_message / - sizeof(long); + sizeof(u32); hostdata->dsp_changed = 1; return SPECIFIC_INT_NOTHING; } else { if (hostdata->options & OPTION_SYNCHRONOUS) { cmd->flags |= CMD_FLAG_DID_SDTR; - synchronous (host, c->target, (unsigned char *) - hostdata->msg_buf); + synchronous (host, c->target, (unsigned char *) + hostdata->msg_buf); } else { hostdata->msg_buf[4] = 0; /* 0 offset = async */ + asynchronous (host, c->target); } - patch_dsa_32 (cmd->dsa, dsa_msgout_other, 0, 5); - patch_dsa_32 (cmd->dsa, dsa_msgout_other, 1, - hostdata->msg_buf); + patch_dsa_32 (cmd->dsa, dsa_msgout_other, 1, (u32) + virt_to_bus ((void *)&hostdata->msg_buf)); hostdata->dsp = hostdata->script + - hostdata->E_respond_message / sizeof(long); + hostdata->E_respond_message / sizeof(u32); hostdata->dsp_changed = 1; } - - if (hostdata->msg_buf[4]) { - int Hz = 1000000000 / (hostdata->msg_buf[3] * 4); - printk ("scsi%d : setting target %d to %d.%02dMhz %s SCSI%s\n" - " period = %dns, max offset = %d\n", - host->host_no, c->target, Hz / 1000000, Hz % 1000000, - ((hostdata->msg_buf[3] < 200) ? "FAST " : - "synchronous") , - ((hostdata->msg_buf[3] < 200) ? "-II" : ""), - (int) hostdata->msg_buf[3] * 4, (int) - hostdata->msg_buf[4]); - } else { - printk ("scsi%d : setting target %d to asynchronous SCSI\n", - host->host_no, c->target); - } return SPECIFIC_INT_NOTHING; } - /* Fall through to abort */ + /* Fall through to abort if we couldn't find a cmd, and + therefore a dsa structure to twiddle */ case A_int_msg_wdtr: hostdata->dsp = hostdata->script + hostdata->E_reject_message / - sizeof(long); + sizeof(u32); hostdata->dsp_changed = 1; return SPECIFIC_INT_NOTHING; case A_int_err_unexpected_phase: @@ -1769,16 +2606,17 @@ static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct return SPECIFIC_INT_ABORT; case A_int_err_selected: printk ("scsi%d : selected by target %d\n", host->host_no, - (int) NCR53c7x0_read8(SSID_REG_800) &7); + (int) NCR53c7x0_read8(SDID_REG_800) &7); hostdata->dsp = hostdata->script + hostdata->E_target_abort / - sizeof(long); + sizeof(u32); hostdata->dsp_changed = 1; return SPECIFIC_INT_NOTHING; case A_int_err_unexpected_reselect: - printk ("scsi%d : unexpected reselect by target %d\n", host->host_no, - (int) NCR53c7x0_read8(SSID_REG_800)); + printk ("scsi%d : unexpected reselect by target %d lun %d\n", + host->host_no, (int) NCR53c7x0_read8(SDID_REG_800) & 7, + hostdata->reselected_identify & 7); hostdata->dsp = hostdata->script + hostdata->E_initiator_abort / - sizeof(long); + sizeof(u32); hostdata->dsp_changed = 1; return SPECIFIC_INT_NOTHING; /* @@ -1801,19 +2639,12 @@ static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct return SPECIFIC_INT_PANIC; } -/* - * When a contingent allegiance condition is created, the target - * reverts to asynchronous transfers. - */ - - asynchronous (host, c->target); - /* - * Use normal one-byte selection message, with no attempts to - * reestablish synchronous or wide messages since this may - * be the crux of our problem. + * FIXME : this uses the normal one-byte selection message. + * We may want to renegotiate for synchronous & WIDE transfers + * since these could be the crux of our problem. * - * XXX - once SCSI-II tagged queuing is implemented, we'll + hostdata->NOP_insn* FIXME : once SCSI-II tagged queuing is implemented, we'll * have to set this up so that the rest of the DSA * agrees with this being an untagged queue'd command. */ @@ -1840,15 +2671,18 @@ static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct * command so overflow/underrun conditions are detected. */ - patch_dsa_32 (cmd->dsa, dsa_dataout, 0, hostdata->E_other_transfer); - patch_dsa_32 (cmd->dsa, dsa_datain, 0, cmd->data_transfer_start); + patch_dsa_32 (cmd->dsa, dsa_dataout, 0, + virt_to_bus(hostdata->script) + hostdata->E_other_transfer); + patch_dsa_32 (cmd->dsa, dsa_datain, 0, + virt_to_bus(cmd->data_transfer_start)); cmd->data_transfer_start[0] = (((DCMD_TYPE_BMI | DCMD_BMI_OP_MOVE_I | DCMD_BMI_IO)) << 24) | sizeof(c->sense_buffer); - cmd->data_transfer_start[1] = (unsigned long) c->sense_buffer; + cmd->data_transfer_start[1] = (u32) virt_to_bus(c->sense_buffer); cmd->data_transfer_start[2] = ((DCMD_TYPE_TCI | DCMD_TCI_OP_JUMP) << 24) | DBC_TCI_TRUE; - cmd->data_transfer_start[3] = hostdata->E_other_transfer; + cmd->data_transfer_start[3] = (u32) virt_to_bus(hostdata->script) + + hostdata->E_other_transfer; /* * Currently, this command is flagged as completed, ie @@ -1857,20 +2691,19 @@ static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct * status, etc are used. */ - cmd->cmd->result = 0xffff; + cmd->cmd->result = 0xffff; /* * Restart command as a REQUEST SENSE. */ - hostdata->dsp = hostdata->script + hostdata->E_select / - sizeof(long); + hostdata->dsp = (u32 *) hostdata->script + hostdata->E_select / + sizeof(u32); hostdata->dsp_changed = 1; return SPECIFIC_INT_NOTHING; case A_int_debug_break: return SPECIFIC_INT_BREAK; case A_int_norm_aborted: - hostdata->dsp = hostdata->script + hostdata->E_schedule / - sizeof(long); + hostdata->dsp = (u32 *) hostdata->schedule; hostdata->dsp_changed = 1; if (cmd) abnormal_finished (cmd, DID_ERROR << 16); @@ -1880,14 +2713,99 @@ static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct hostdata->idle = 1; hostdata->test_completed = (dsps - A_int_test_1) / 0x00010000 + 1; if (hostdata->options & OPTION_DEBUG_INTR) - printk("scsi%d : test%ld complete\n", host->host_no, + printk("scsi%d : test%d complete\n", host->host_no, hostdata->test_completed); return SPECIFIC_INT_NOTHING; +#ifdef A_int_debug_reselected_ok + case A_int_debug_reselected_ok: + if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR| + OPTION_DEBUG_DISCONNECT)) { + /* + * Note - this dsa is not based on location relative to + * the command structure, but to location relative to the + * DSA register + */ + u32 *dsa; + dsa = (u32 *) bus_to_virt (NCR53c7x0_read32(DSA_REG)); + + printk("scsi%d : reselected_ok (DSA = 0x%x (virt 0x%p)\n", + host->host_no, NCR53c7x0_read32(DSA_REG), dsa); + printk("scsi%d : resume address is 0x%x (virt 0x%p)\n", + host->host_no, cmd->saved_data_pointer, + bus_to_virt(cmd->saved_data_pointer)); + print_insn (host, hostdata->script + Ent_reselected_ok / + sizeof(u32), "", 1); + printk ("scsi%d : sxfer=0x%x, scntl3=0x%x\n", + host->host_no, NCR53c7x0_read8(SXFER_REG), + NCR53c7x0_read8(SCNTL3_REG_800)); + if (c) { + print_insn (host, (u32 *) + hostdata->sync[c->target].script, "", 1); + print_insn (host, (u32 *) + hostdata->sync[c->target].script + 2, "", 1); + } + } + return SPECIFIC_INT_RESTART; +#endif +#ifdef A_int_debug_reselect_check + case A_int_debug_reselect_check: + if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR)) { + u32 *dsa; +#if 0 + u32 *code; +#endif + /* + * Note - this dsa is not based on location relative to + * the command structure, but to location relative to the + * DSA register + */ + dsa = bus_to_virt (NCR53c7x0_read32(DSA_REG)); + printk("scsi%d : reselected_check_next (DSA = 0x%lx (virt 0x%p))\n", + host->host_no, virt_to_bus(dsa), dsa); + if (dsa) { + printk("scsi%d : resume address is 0x%x (virt 0x%p)\n", + host->host_no, cmd->saved_data_pointer, + bus_to_virt (cmd->saved_data_pointer)); +#if 0 + printk("scsi%d : template code :\n", host->host_no); + for (code = dsa + (Ent_dsa_code_check_reselect - Ent_dsa_zero) + / sizeof(u32); code < (dsa + Ent_dsa_zero / sizeof(u32)); + code += print_insn (host, code, "", 1)); +#endif + } + print_insn (host, hostdata->script + Ent_reselected_ok / + sizeof(u32), "", 1); + } + return SPECIFIC_INT_RESTART; +#endif +#ifdef A_int_debug_dsa_schedule + case A_int_debug_dsa_schedule: + if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR)) { + u32 *dsa; + /* + * Note - this dsa is not based on location relative to + * the command structure, but to location relative to the + * DSA register + */ + dsa = (u32 *) bus_to_virt (NCR53c7x0_read32(DSA_REG)); + printk("scsi%d : dsa_schedule (old DSA = 0x%lx (virt 0x%p))\n", + host->host_no, virt_to_bus(dsa), dsa); + if (dsa) + printk("scsi%d : resume address is 0x%x (virt 0x%p)\n" + " (temp was 0x%x (virt 0x%p))\n", + host->host_no, cmd->saved_data_pointer, + bus_to_virt (cmd->saved_data_pointer), + NCR53c7x0_read32 (TEMP_REG), + bus_to_virt (NCR53c7x0_read32(TEMP_REG))); + } + return SPECIFIC_INT_RESTART; +#endif #ifdef A_int_debug_scheduled case A_int_debug_scheduled: if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR)) { - printk("scsi%d : new I/O 0x%lx scheduled\n", host->host_no, - NCR53c7x0_read32(DSA_REG)); + printk("scsi%d : new I/O 0x%x (virt 0x%p) scheduled\n", + host->host_no, NCR53c7x0_read32(DSA_REG), + bus_to_virt(NCR53c7x0_read32(DSA_REG))); } return SPECIFIC_INT_RESTART; #endif @@ -1903,38 +2821,196 @@ static int NCR53c8x0_dstat_sir_intr (struct Scsi_Host *host, struct if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR)) { printk("scsi%d : command sent\n"); } - return SPECIFIC_INT_RESTART; + return SPECIFIC_INT_RESTART; #endif #ifdef A_int_debug_dsa_loaded case A_int_debug_dsa_loaded: if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR)) { - printk("scsi%d : DSA loaded with 0x%lx\n", host->host_no, - NCR53c7x0_read32(DSA_REG)); + printk("scsi%d : DSA loaded with 0x%x (virt 0x%p)\n", host->host_no, + NCR53c7x0_read32(DSA_REG), + bus_to_virt(NCR53c7x0_read32(DSA_REG))); } return SPECIFIC_INT_RESTART; #endif #ifdef A_int_debug_reselected case A_int_debug_reselected: - if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR)) { + if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR| + OPTION_DEBUG_DISCONNECT)) { printk("scsi%d : reselected by target %d lun %d\n", - host->host_no, (int) NCR53c7x0_read8(SSID_REG_800), + host->host_no, (int) NCR53c7x0_read8(SDID_REG_800) & ~0x80, (int) hostdata->reselected_identify & 7); + print_queues(host); } - return SPECIFIC_INT_RESTART; + return SPECIFIC_INT_RESTART; #endif -#ifdef A_int_debug_head - case A_int_debug_head: +#ifdef A_int_debug_disconnect_msg + case A_int_debug_disconnect_msg: if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR)) { - printk("scsi%d : issue_dsa_head now 0x%lx\n", - host->host_no, (unsigned long) hostdata->issue_dsa_head); + if (c) + printk("scsi%d : target %d lun %d disconnecting\n", + host->host_no, c->target, c->lun); + else + printk("scsi%d : unknown target disconnecting\n", + host->host_no); + } + return SPECIFIC_INT_RESTART; +#endif +#ifdef A_int_debug_disconnected + case A_int_debug_disconnected: + if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR| + OPTION_DEBUG_DISCONNECT)) { + printk ("scsi%d : disconnected, new queues are\n", + host->host_no); + print_queues(host); +#if 0 + printk ("scsi%d : sxfer=0x%x, scntl3=0x%x\n", + host->host_no, NCR53c7x0_read8(SXFER_REG), + NCR53c7x0_read8(SCNTL3_REG_800)); +#endif + if (c) { + print_insn (host, (u32 *) + hostdata->sync[c->target].script, "", 1); + print_insn (host, (u32 *) + hostdata->sync[c->target].script + 2, "", 1); + } + } + return SPECIFIC_INT_RESTART; +#endif +#ifdef A_int_debug_panic + case A_int_debug_panic: + printk("scsi%d : int_debug_panic received\n", host->host_no); + print_lots (host); + return SPECIFIC_INT_PANIC; +#endif +#ifdef A_int_debug_saved + case A_int_debug_saved: + if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR| + OPTION_DEBUG_DISCONNECT)) { + printk ("scsi%d : saved data pointer 0x%x (virt 0x%p)\n", + host->host_no, cmd->saved_data_pointer, + bus_to_virt (cmd->saved_data_pointer)); + print_progress (c); + } + return SPECIFIC_INT_RESTART; +#endif +#ifdef A_int_debug_restored + case A_int_debug_restored: + if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR| + OPTION_DEBUG_DISCONNECT)) { + if (cmd) { + int size; + printk ("scsi%d : restored data pointer 0x%x (virt 0x%p)\n", + host->host_no, cmd->saved_data_pointer, bus_to_virt ( + cmd->saved_data_pointer)); + size = print_insn (host, (u32 *) + bus_to_virt(cmd->saved_data_pointer), "", 1); + size = print_insn (host, (u32 *) + bus_to_virt(cmd->saved_data_pointer) + size, "", 1); + print_progress (c); + } +#if 0 + printk ("scsi%d : datapath residual %d\n", + host->host_no, datapath_residual (host)) ; +#endif + } + return SPECIFIC_INT_RESTART; +#endif +#ifdef A_int_debug_sync + case A_int_debug_sync: + if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR| + OPTION_DEBUG_DISCONNECT|OPTION_DEBUG_SDTR)) { + unsigned char sxfer = NCR53c7x0_read8 (SXFER_REG), + scntl3 = NCR53c7x0_read8 (SCNTL3_REG_800); + if (c) { + if (sxfer != hostdata->sync[c->target].sxfer_sanity || + scntl3 != hostdata->sync[c->target].scntl3_sanity) { + printk ("scsi%d : sync sanity check failed sxfer=0x%x, scntl3=0x%x", + host->host_no, sxfer, scntl3); + NCR53c7x0_write8 (SXFER_REG, sxfer); + NCR53c7x0_write8 (SCNTL3_REG_800, scntl3); + } + } else + printk ("scsi%d : unknown command sxfer=0x%x, scntl3=0x%x\n", + host->host_no, (int) sxfer, (int) scntl3); } - return SPECIFIC_INT_RESTART; + return SPECIFIC_INT_RESTART; +#endif +#ifdef A_int_debug_datain + case A_int_debug_datain: + if (hostdata->options & (OPTION_DEBUG_SCRIPT|OPTION_DEBUG_INTR| + OPTION_DEBUG_DISCONNECT|OPTION_DEBUG_SDTR)) { + int size; + printk ("scsi%d : In do_datain (%s) sxfer=0x%x, scntl3=0x%x\n" + " datapath residual=%d\n", + host->host_no, sbcl_to_phase (NCR53c7x0_read8 (SBCL_REG)), + (int) NCR53c7x0_read8(SXFER_REG), + (int) NCR53c7x0_read8(SCNTL3_REG_800), + datapath_residual (host)) ; + print_insn (host, dsp, "", 1); + size = print_insn (host, (u32 *) bus_to_virt(dsp[1]), "", 1); + print_insn (host, (u32 *) bus_to_virt(dsp[1]) + size, "", 1); + } + return SPECIFIC_INT_RESTART; +#endif +/* + * FIXME : for 7xx support, we need to read SDID_REG_700 and handle + * the comparison as bitfielded, not binary. + */ +#ifdef A_int_debug_check_dsa + case A_int_debug_check_dsa: + if (NCR53c7x0_read8 (SCNTL1_REG) & SCNTL1_CON) { + int sdid = NCR53c7x0_read8 (SDID_REG_800) & 15; + char *where = dsp - NCR53c7x0_insn_size(NCR53c7x0_read8 + (DCMD_REG)) == hostdata->script + + Ent_select_check_dsa / sizeof(u32) ? + "selection" : "reselection"; + if (c && sdid != c->target) { + printk ("scsi%d : SDID target %d != DSA target %d at %s\n", + host->host_no, sdid, c->target, where); + print_lots(host); + dump_events (host, 20); + return SPECIFIC_INT_PANIC; + } + } + return SPECIFIC_INT_RESTART; #endif default: if ((dsps & 0xff000000) == 0x03000000) { - printk ("scsi%d : misc debug interrupt 0x%lx\n", + printk ("scsi%d : misc debug interrupt 0x%x\n", host->host_no, dsps); return SPECIFIC_INT_RESTART; + } else if ((dsps & 0xff000000) == 0x05000000) { + if (hostdata->events) { + struct NCR53c7x0_event *event; + ++hostdata->event_index; + if (hostdata->event_index >= hostdata->event_size) + hostdata->event_index = 0; + event = (struct NCR53c7x0_event *) hostdata->events + + hostdata->event_index; + event->event = (enum ncr_event) dsps; + event->dsa = bus_to_virt(NCR53c7x0_read32(DSA_REG)); + /* FIXME : this needs to change for the '7xx family */ + if (NCR53c7x0_read8 (SCNTL1_REG) & SCNTL1_CON) + event->target = NCR53c7x0_read8(SSID_REG_800); + else + event->target = 255; + + if (event->event == EVENT_RESELECT) + event->lun = hostdata->reselected_identify & 0xf; + else if (c) + event->lun = c->lun; + else + event->lun = 255; + do_gettimeofday(&(event->time)); + if (c) { + event->pid = c->pid; + memcpy ((void *) event->cmnd, (void *) c->cmnd, + sizeof (event->cmnd)); + } else { + event->pid = -1; + } + } + return SPECIFIC_INT_RESTART; } printk ("scsi%d : unknown user interrupt 0x%x\n", @@ -1989,7 +3065,7 @@ static const char debugger_help = "ms <addr> <size> <value> - store memory\n" "rp <num> <size> - print register\n" "rs <num> <size> <value> - store register\n" -"s - single step\n" +"s - single step\n" "tb - begin trace \n" "te - end trace\n"; @@ -1999,7 +3075,7 @@ static const char debugger_help = */ static int debugger_fn_bc (struct Scsi_Host *host, struct debugger_token *token, - unsigned long args[]) { + u32 args[]) { struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) instance->hostdata; struct NCR53c7x0_break *bp, **prev; @@ -2030,8 +3106,9 @@ static int debugger_fn_bc (struct Scsi_Host *host, struct debugger_token *token, } -static int debugger_fn_bl (struct Scsi_Host *host, struct debugger_token *token, - unsigned long args[]) { +static int +debugger_fn_bl (struct Scsi_Host *host, struct debugger_token *token, + u32 args[]) { struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; struct NCR53c7x0_break *bp; @@ -2057,7 +3134,7 @@ static int debugger_fn_bl (struct Scsi_Host *host, struct debugger_token *token, len = strlen(buf); if ((bp->old[0] & (DCMD_TYPE_MASK << 24)) == (DCMD_TYPE_MMI << 24)) { - sprintf(buf + len, "%08x\n", * (long *) bp->addr); + sprintf(buf + len, "%08x\n", * (u32 *) bp->addr); } else { sprintf(buf + len, "\n"); } @@ -2068,8 +3145,9 @@ static int debugger_fn_bl (struct Scsi_Host *host, struct debugger_token *token, return 0; } -static int debugger_fn_bs (struct Scsi_Host *host, struct debugger_token *token, - unsigned long args[]) { +static int +debugger_fn_bs (struct Scsi_Host *host, struct debugger_token *token, + u32 args[]) { struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; struct NCR53c7x0_break *bp; @@ -2093,7 +3171,7 @@ static int debugger_fn_bs (struct Scsi_Host *host, struct debugger_token *token, return -1; } - bp->address = (unsigned long *) args[0]; + bp->address = (u32 *) args[0]; memcpy ((void *) bp->old_instruction, (void *) bp->address, 8); bp->old_size = (((bp->old_instruction[0] >> 24) & DCMD_TYPE_MASK) == DCMD_TYPE_MMI ? 3 : 2; @@ -2109,7 +3187,7 @@ static int debugger_fn_bs (struct Scsi_Host *host, struct debugger_token *token, static const struct debugger_token { char *name; int numargs; - int (*fn)(struct debugger_token *token, unsigned long args[]); + int (*fn)(struct debugger_token *token, u32 args[]); } debugger_tokens[] = { TOKEN(bc,1), TOKEN(bl,0), TOKEN(bs,1), TOKEN(g,0), TOKEN(halt,0), {DT_help, "?", 0} , TOKEN(h,0), TOKEN(i,0), TOKEN(mp,2), @@ -2118,7 +3196,7 @@ static const struct debugger_token { #define NDT sizeof(debugger_tokens / sizeof(struct debugger_token)) -static struct Scsi_Host * inode_to_host (struct inode *inode) {$ +static struct Scsi_Host * inode_to_host (struct inode *inode) { int dev; struct Scsi_Host *tmp; for (dev = MINOR(inode->rdev), host = first_host; @@ -2128,13 +3206,14 @@ static struct Scsi_Host * inode_to_host (struct inode *inode) {$ } -static debugger_user_write (struct inode *inode,struct file *filp, +static int +debugger_user_write (struct inode *inode,struct file *filp, char *buf,int count) { struct Scsi_Host *host; /* This SCSI host */ struct NCR53c7x0_hostadata *hostdata; char input_buf[80], /* Kernel space copy of buf */ *ptr; /* Pointer to argument list */ - unsigned long args[3]; /* Arguments */ + u32 args[3]; /* Arguments */ int i, j, error, len; if (!(host = inode_to_host(inode))) @@ -2180,13 +3259,15 @@ static debugger_user_write (struct inode *inode,struct file *filp, return count; } -static debugger_user_read (struct inode *inode,struct file *filp, +static int +debugger_user_read (struct inode *inode,struct file *filp, char *buf,int count) { struct Scsi_Host *instance; } -static debugger_kernel_write (struct Scsi_Host *host, char *buf, size_t +static int +debugger_kernel_write (struct Scsi_Host *host, char *buf, size_t buflen) { struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; @@ -2247,7 +3328,7 @@ NCR53c8x0_soft_reset (struct Scsi_Host *host) { /* - * Respond to reselection by targets and use our _initiator_ SCSI ID + * Respond to reselection by targets and use our _initiator_ SCSI ID * for arbitration. If notyet, also respond to SCSI selection. * * XXX - Note : we must reprogram this when reselecting as @@ -2266,15 +3347,26 @@ NCR53c8x0_soft_reset (struct Scsi_Host *host) { * and SCSI recommended .5s selection timeout. */ + /* + * The new gcc won't recognize preprocessing directives + * within macro args. + */ +#if 0 NCR53c7x0_write8(STIME0_REG_800, - ((14 << STIME0_800_SEL_SHIFT) & STIME0_800_SEL_MASK) + ((selection_timeout << STIME0_800_SEL_SHIFT) & STIME0_800_SEL_MASK) + | ((15 << STIME0_800_HTH_SHIFT) & STIME0_800_HTH_MASK)); +#else /* Disable HTH interrupt */ -#if 0 - | ((15 << STIME0_800_HTH_SHIFT) & STIME0_800_HTH_MASK) + NCR53c7x0_write8(STIME0_REG_800, + ((selection_timeout << STIME0_800_SEL_SHIFT) & STIME0_800_SEL_MASK)); #endif - ); + /* + * Enable active negation for happy synchronous transfers. + */ + + NCR53c7x0_write8(STEST3_REG_800, STEST3_800_TE); /* * Enable all interrupts, except parity which we only want when @@ -2299,20 +3391,107 @@ NCR53c8x0_soft_reset (struct Scsi_Host *host) { /* Enable active negation */ NCR53c7x0_write8(STEST3_REG_800, STEST3_800_TE); +} - +/* + * Function static struct NCR53c7x0_cmd *allocate_cmd (Scsi_Cmnd *cmd) + * + * Purpose : Return the first free NCR53c7x0_cmd structure (which are + * reused in a LIFO manner to minimize cache thrashing). + * + * Side effects : If we haven't yet scheduled allocation of NCR53c7x0_cmd + * structures for this device, do so. Attempt to complete all scheduled + * allocations using kmalloc(), putting NCR53c7x0_cmd structures on + * the free list. Teach programmers not to drink and hack. + * + * Inputs : cmd - SCSI command + * + * Returns : NCR53c7x0_cmd structure allocated on behalf of cmd; + * NULL on failure. + */ + +static struct NCR53c7x0_cmd * +allocate_cmd (Scsi_Cmnd *cmd) { + struct Scsi_Host *host = cmd->host; + struct NCR53c7x0_hostdata *hostdata = + (struct NCR53c7x0_hostdata *) host->hostdata; + void *real; /* Real address */ + int size; /* Size of *tmp */ + struct NCR53c7x0_cmd *tmp; + unsigned long flags; + + if (hostdata->options & OPTION_DEBUG_ALLOCATION) + printk ("scsi%d : num_cmds = %d, can_queue = %d\n" + " target = %d, lun = %d, %s\n", + host->host_no, hostdata->num_cmds, host->can_queue, + cmd->target, cmd->lun, (hostdata->cmd_allocated[cmd->target] & + (1 << cmd->lun)) ? "already allocated" : "not allocated"); + +/* + * If we have not yet reserved commands for this I_T_L nexus, and + * the device exists (as indicated by permanent Scsi_Cmnd structures + * being allocated under 1.3.x, or being outside of scan_scsis in + * 1.2.x), do so now. + */ + if (!(hostdata->cmd_allocated[cmd->target] & (1 << cmd->lun)) && +#ifdef LINUX_1_2 + !in_scan_scsis +#else + cmd->device && cmd->device->has_cmdblocks +#endif + ) { + if ((hostdata->extra_allocate + hostdata->num_cmds) < host->can_queue) + hostdata->extra_allocate += host->cmd_per_lun; + hostdata->cmd_allocated[cmd->target] |= (1 << cmd->lun); + } + + for (; hostdata->extra_allocate > 0 ; --hostdata->extra_allocate, + ++hostdata->num_cmds) { + /* historically, kmalloc has returned unaligned addresses; pad so we + have enough room to ROUNDUP */ + size = hostdata->max_cmd_size + sizeof (void *); +/* FIXME: for ISA bus '7xx chips, we need to or GFP_DMA in here */ + real = kmalloc (size, GFP_ATOMIC); + if (!real) { + if (hostdata->options & OPTION_DEBUG_ALLOCATION) + printk ("scsi%d : kmalloc(%d) failed\n", + host->host_no, size); + break; + } + tmp = ROUNDUP(real, void *); + tmp->real = real; + tmp->size = size; +#ifdef LINUX_1_2 + tmp->free = ((void (*)(void *, int)) kfree_s); +#else + tmp->free = ((void (*)(void *, int)) kfree); +#endif + save_flags (flags); + cli(); + tmp->next = hostdata->free; + hostdata->free = tmp; + restore_flags (flags); + } + save_flags(flags); + cli(); + tmp = (struct NCR53c7x0_cmd *) hostdata->free; + if (tmp) { + hostdata->free = tmp->next; + } + restore_flags(flags); + if (!tmp) + printk ("scsi%d : can't allocate command for target %d lun %d\n", + host->host_no, cmd->target, cmd->lun); + return tmp; } /* * Function static struct NCR53c7x0_cmd *create_cmd (Scsi_Cmnd *cmd) * - * Purpose : If we have not already allocated enough NCR53c7x0_cmd - * structures to satisfy any allowable number of simultaneous - * commands for this host; do so (using either scsi_malloc() - * or kmalloc() depending on configuration), and add them to the - * hostdata free list. Take the first structure off the free list, - * initialize it based on the Scsi_Cmnd structure passed in, - * including dsa and Linux field initialization, and dsa code relocation. + * + * Purpose : allocate a NCR53c7x0_cmd structure, initialize it based on the + * Scsi_Cmnd structure passed in cmd, including dsa and Linux field + * initialization, and dsa code relocation. * * Inputs : cmd - SCSI command * @@ -2326,76 +3505,22 @@ create_cmd (Scsi_Cmnd *cmd) { struct Scsi_Host *host = cmd->host; struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; - struct NCR53c7x0_cmd *tmp = NULL; /* NCR53c7x0_cmd structure for this command */ + struct NCR53c7x0_cmd *tmp; /* NCR53c7x0_cmd structure for this command */ int datain, /* Number of instructions per phase */ dataout; int data_transfer_instructions, /* Count of dynamic instructions */ i; /* Counter */ - unsigned long *cmd_datain, /* Address of datain/dataout code */ + u32 *cmd_datain, /* Address of datain/dataout code */ *cmd_dataout; /* Incremented as we assemble */ #ifdef notyet - void *real; /* Real address */ - int size; /* Size of *tmp */ - int alignment; /* Alignment adjustment (0 - 4) */ + unsigned char *msgptr; /* Current byte in select message */ + int msglen; /* Length of whole select message */ #endif unsigned long flags; NCR53c7x0_local_setup(cmd->host); -/* FIXME : when we start doing multiple simultaneous commands per LUN, - we will need to either - - Do an attach_slave() and detach_slave() the right way (allocate - memory in attach_slave() as we do in scsi_register). - - Make sure this code works - with the former being cleaner. At the same time, we can also go with - a per-device host_scribble, and introduce a NCR53c7x0_device structure - to replace the messy fixed length arrays we're starting to use. */ - -#ifdef notyet - - if (hostdata->num_commands < host->can_queue && - !in_scan_scsis && - !(hostdata->cmd_allocated[cmd->target] & (1 << cmd->lun))) { - for (i = host->hostt->cmd_per_lun - 1; i >= 0 --i) { -#ifdef SCSI_MALLOC - /* scsi_malloc must allocate with a 512 byte granularity, but always - returns buffers which are aligned on a 512 boundary */ - size = (hostdata->max_cmd_size + 511) / 512 * 512; - tmp = (struct NCR53c7x0_cmd *) scsi_malloc (size); - if (!tmp) - break; - tmp->real = (void *) tmp; -#else - /* kmalloc() can allocate any size, but historically has returned - unaligned addresses, so we need to allow for alignment */ - size = hostdata->max_cmd_size + 4; - real = kmalloc (size, GFP_ATOMIC); - alignment = 4 - (((unsigned) real) & 3); - tmp = (struct NCR53c7x0_cmd *) (((char *) real) + alignment); - if (!tmp) - break; - tmp->real = real; -#endif /* def SCSI_MALLOC */ - tmp->size = size; - /* Insert all but last into list */ - if (i > 0) { - tmp->next = hostdata->free; - hostdata->free = tmp; - } - } - } -#endif /* def notyet */ - if (!tmp) { - save_flags(flags); - cli(); - tmp = (struct NCR53c7x0_cmd *) hostdata->free; - if (tmp) { - hostdata->free = tmp->next; - restore_flags(flags); - } else { - restore_flags(flags); - return NULL; - } - } + if (!(tmp = allocate_cmd (cmd))) + return NULL; /* @@ -2418,6 +3543,7 @@ create_cmd (Scsi_Cmnd *cmd) { case MODE_SELECT: case WRITE_6: case WRITE_10: + case START_STOP: /* also SCAN, which may do DATA OUT */ #if 0 printk("scsi%d : command is ", host->host_no); print_command(cmd->cmnd); @@ -2436,7 +3562,6 @@ create_cmd (Scsi_Cmnd *cmd) { * These commands do no data transfer, we should force an * interrupt if a data phase is attempted on them. */ - case START_STOP: case TEST_UNIT_READY: datain = dataout = 0; break; @@ -2448,10 +3573,26 @@ create_cmd (Scsi_Cmnd *cmd) { datain = dataout = 2 * (cmd->use_sg ? cmd->use_sg : 1) + 3; } - /* - * For each data phase implemented, we need a JUMP instruction - * to return control to other_transfer. We also need a MOVE - * and a CALL instruction for each scatter/gather segment. + /* + * New code : so that active pointers work correctly regardless + * of where the saved data pointer is at, we want to immediately + * enter the dynamic code after selection, and on a non-data + * phase perform a CALL to the non-data phase handler, with + * returns back to this address. + * + * If a phase mismatch is encountered in the middle of a + * Block MOVE instruction, we want to _leave_ that instruction + * unchanged as the current case is, modify a temporary buffer, + * and point the active pointer (TEMP) at that. + * + * Furthermore, we want to implement a saved data pointer, + * set by the SAVE_DATA_POINTERs message. + * + * So, the data transfer segments will change to + * CALL data_transfer, WHEN NOT data phase + * MOVE x, x, WHEN data phase + * ( repeat ) + * JUMP other_transfer */ data_transfer_instructions = datain + dataout; @@ -2467,19 +3608,30 @@ create_cmd (Scsi_Cmnd *cmd) { /* + * The saved data pointer is set up so that a RESTORE POINTERS message + * will start the data transfer over at the beginning. + */ + + tmp->saved_data_pointer = virt_to_bus (hostdata->script) + + hostdata->E_data_transfer; + + /* * Initialize Linux specific fields. */ tmp->cmd = cmd; tmp->next = NULL; - tmp->prev = NULL; + tmp->flags = 0; + tmp->dsa_next_addr = virt_to_bus(tmp->dsa) + hostdata->dsa_next - + hostdata->dsa_start; + tmp->dsa_addr = virt_to_bus(tmp->dsa) - hostdata->dsa_start; /* * Calculate addresses of dynamic code to fill in DSA */ tmp->data_transfer_start = tmp->dsa + (hostdata->dsa_end - - hostdata->dsa_start) / sizeof(long); + hostdata->dsa_start) / sizeof(u32); tmp->data_transfer_end = tmp->data_transfer_start + 2 * data_transfer_instructions; @@ -2498,54 +3650,101 @@ create_cmd (Scsi_Cmnd *cmd) { if (hostdata->dsa_fixup) hostdata->dsa_fixup(tmp); - patch_dsa_32(tmp->dsa, dsa_next, 0, NULL); - patch_dsa_32(tmp->dsa, dsa_cmnd, 0, cmd); + patch_dsa_32(tmp->dsa, dsa_next, 0, 0); + patch_dsa_32(tmp->dsa, dsa_cmnd, 0, virt_to_bus(cmd)); + + if (hostdata->options & OPTION_DEBUG_SYNCHRONOUS) + if (hostdata->sync[cmd->target].select_indirect != + ((hostdata->sync[cmd->target].scntl3_sanity << 24) | + (cmd->target << 16) | + (hostdata->sync[cmd->target].sxfer_sanity << 8))) { + printk ("scsi%d : sanity check failed select_indirect=0x%x\n", + host->host_no, hostdata->sync[cmd->target].select_indirect); + FATAL(host); + + } + patch_dsa_32(tmp->dsa, dsa_select, 0, hostdata->sync[cmd->target]. select_indirect); /* - * XXX - we need to figure this size based on whether - * or not we'll be using any additional messages. + * Right now, we'll do the WIDE and SYNCHRONOUS negotiations on + * different commands; although it should be trivial to do them + * both at the same time. */ - patch_dsa_32(tmp->dsa, dsa_msgout, 0, 1); -#if 0 - tmp->select[0] = IDENTIFY (1, cmd->lun); -#else - tmp->select[0] = IDENTIFY (0, cmd->lun); + if (hostdata->initiate_wdtr & (1 << cmd->target)) { + memcpy ((void *) (tmp->select + 1), (void *) wdtr_message, + sizeof(wdtr_message)); + patch_dsa_32(tmp->dsa, dsa_msgout, 0, 1 + sizeof(wdtr_message)); + save_flags(flags); + cli(); + hostdata->initiate_wdtr &= ~(1 << cmd->target); + restore_flags(flags); + } else if (hostdata->initiate_sdtr & (1 << cmd->target)) { + memcpy ((void *) (tmp->select + 1), (void *) sdtr_message, + sizeof(sdtr_message)); + patch_dsa_32(tmp->dsa, dsa_msgout, 0, 1 + sizeof(sdtr_message)); + tmp->flags |= CMD_FLAG_SDTR; + save_flags(flags); + cli(); + hostdata->initiate_sdtr &= ~(1 << cmd->target); + restore_flags(flags); + + } +#if 1 + else if (!(hostdata->talked_to & (1 << cmd->target)) && + !(hostdata->options & OPTION_NO_ASYNC)) { + memcpy ((void *) (tmp->select + 1), (void *) async_message, + sizeof(async_message)); + patch_dsa_32(tmp->dsa, dsa_msgout, 0, 1 + sizeof(async_message)); + tmp->flags |= CMD_FLAG_SDTR; + } #endif - patch_dsa_32(tmp->dsa, dsa_msgout, 1, tmp->select); + else + patch_dsa_32(tmp->dsa, dsa_msgout, 0, 1); + hostdata->talked_to |= (1 << cmd->target); + tmp->select[0] = (hostdata->options & OPTION_DISCONNECT) ? + IDENTIFY (1, cmd->lun) : IDENTIFY (0, cmd->lun); + patch_dsa_32(tmp->dsa, dsa_msgout, 1, virt_to_bus(tmp->select)); patch_dsa_32(tmp->dsa, dsa_cmdout, 0, cmd->cmd_len); - patch_dsa_32(tmp->dsa, dsa_cmdout, 1, cmd->cmnd); + patch_dsa_32(tmp->dsa, dsa_cmdout, 1, virt_to_bus(cmd->cmnd)); patch_dsa_32(tmp->dsa, dsa_dataout, 0, cmd_dataout ? - cmd_dataout : hostdata->script + hostdata->E_other_transfer / - sizeof (long)); + virt_to_bus (cmd_dataout) + : virt_to_bus (hostdata->script) + hostdata->E_other_transfer); patch_dsa_32(tmp->dsa, dsa_datain, 0, cmd_datain ? - cmd_datain : hostdata->script + hostdata->E_other_transfer / - sizeof (long)); + virt_to_bus (cmd_datain) + : virt_to_bus (hostdata->script) + hostdata->E_other_transfer); /* * XXX - need to make endian aware, should use separate variables * for both status and message bytes. */ patch_dsa_32(tmp->dsa, dsa_msgin, 0, 1); - patch_dsa_32(tmp->dsa, dsa_msgin, 1, (((unsigned long) &cmd->result) + 1)); +/* + * FIXME : these only works for little endian. We probably want to + * provide message and status fields in the NCR53c7x0_cmd + * structure, and assign them to cmd->result when we're done. + */ + patch_dsa_32(tmp->dsa, dsa_msgin, 1, virt_to_bus(&cmd->result) + 1); patch_dsa_32(tmp->dsa, dsa_status, 0, 1); - patch_dsa_32(tmp->dsa, dsa_status, 1, &cmd->result); + patch_dsa_32(tmp->dsa, dsa_status, 1, virt_to_bus(&cmd->result)); patch_dsa_32(tmp->dsa, dsa_msgout_other, 0, 1); patch_dsa_32(tmp->dsa, dsa_msgout_other, 1, - &(hostdata->NCR53c7xx_msg_nop)); - + virt_to_bus(&(hostdata->NCR53c7xx_msg_nop))); /* * Generate code for zero or more of the DATA IN, DATA OUT phases * in the format * + * CALL data_transfer, WHEN NOT phase * MOVE first buffer length, first buffer address, WHEN phase - * CALL msgin, WHEN MSG_IN * ... * MOVE last buffer length, last buffer address, WHEN phase * JUMP other_transfer */ -/* See if we're getting to data transfer */ +/* + * See if we're getting to data transfer by generating an unconditional + * interrupt. + */ #if 0 if (datain) { cmd_datain[0] = 0x98080000; @@ -2571,36 +3770,39 @@ create_cmd (Scsi_Cmnd *cmd) { for (i = 0; cmd->use_sg ? (i < cmd->use_sg) : !i; cmd_datain += 4, cmd_dataout += 4, ++i) { - unsigned long buf = (unsigned long) (cmd->use_sg ? - ((struct scatterlist *)cmd->buffer)[i].address : - cmd->request_buffer); - unsigned long count = (unsigned long) (cmd->use_sg ? + u32 buf = cmd->use_sg ? + virt_to_bus(((struct scatterlist *)cmd->buffer)[i].address) : + virt_to_bus(cmd->request_buffer); + u32 count = cmd->use_sg ? ((struct scatterlist *)cmd->buffer)[i].length : - cmd->request_bufflen); + cmd->request_bufflen; if (datain) { - cmd_datain[0] = ((DCMD_TYPE_BMI | DCMD_BMI_OP_MOVE_I | DCMD_BMI_IO) + /* CALL other_in, WHEN NOT DATA_IN */ + cmd_datain[0] = ((DCMD_TYPE_TCI | DCMD_TCI_OP_CALL | + DCMD_TCI_IO) << 24) | + DBC_TCI_WAIT_FOR_VALID | DBC_TCI_COMPARE_PHASE; + cmd_datain[1] = virt_to_bus (hostdata->script) + + hostdata->E_other_in; + /* MOVE count, buf, WHEN DATA_IN */ + cmd_datain[2] = ((DCMD_TYPE_BMI | DCMD_BMI_OP_MOVE_I | DCMD_BMI_IO) << 24) | count; - cmd_datain[1] = buf; - cmd_datain[2] = ((DCMD_TYPE_TCI | DCMD_TCI_OP_CALL | - DCMD_TCI_CD | DCMD_TCI_IO | DCMD_TCI_MSG) << 24) | - DBC_TCI_WAIT_FOR_VALID | DBC_TCI_COMPARE_PHASE | DBC_TCI_TRUE; - cmd_datain[3] = (unsigned long) hostdata->script + - hostdata->E_msg_in; + cmd_datain[3] = buf; #if 0 print_insn (host, cmd_datain, "dynamic ", 1); print_insn (host, cmd_datain + 2, "dynamic ", 1); #endif } if (dataout) { - cmd_dataout[0] = ((DCMD_TYPE_BMI | DCMD_BMI_OP_MOVE_I) << 24) + /* CALL other_out, WHEN NOT DATA_OUT */ + cmd_dataout[0] = ((DCMD_TYPE_TCI | DCMD_TCI_OP_CALL) << 24) | + DBC_TCI_WAIT_FOR_VALID | DBC_TCI_COMPARE_PHASE; + cmd_dataout[1] = virt_to_bus(hostdata->script) + + hostdata->E_other_out; + /* MOVE count, buf, WHEN DATA+OUT */ + cmd_dataout[2] = ((DCMD_TYPE_BMI | DCMD_BMI_OP_MOVE_I) << 24) | count; - cmd_dataout[1] = buf; - cmd_dataout[2] = ((DCMD_TYPE_TCI | DCMD_TCI_OP_CALL | - DCMD_TCI_CD | DCMD_TCI_IO | DCMD_TCI_MSG) << 24) | - DBC_TCI_WAIT_FOR_VALID | DBC_TCI_COMPARE_PHASE | DBC_TCI_TRUE; - cmd_dataout[3] = (unsigned long) hostdata->script + - hostdata->E_msg_in; + cmd_dataout[3] = buf; #if 0 print_insn (host, cmd_dataout, "dynamic ", 1); print_insn (host, cmd_dataout + 2, "dynamic ", 1); @@ -2617,7 +3819,7 @@ create_cmd (Scsi_Cmnd *cmd) { if (datain) { cmd_datain[0] = ((DCMD_TYPE_TCI | DCMD_TCI_OP_JUMP) << 24) | DBC_TCI_TRUE; - cmd_datain[1] = (unsigned long) hostdata->script + + cmd_datain[1] = virt_to_bus(hostdata->script) + hostdata->E_other_transfer; #if 0 print_insn (host, cmd_datain, "dynamic jump ", 1); @@ -2631,216 +3833,323 @@ create_cmd (Scsi_Cmnd *cmd) { cmd_datain += 2; } #endif - - if (dataout) { cmd_dataout[0] = ((DCMD_TYPE_TCI | DCMD_TCI_OP_JUMP) << 24) | DBC_TCI_TRUE; - cmd_dataout[1] = (unsigned long) hostdata->script + + cmd_dataout[1] = virt_to_bus(hostdata->script) + hostdata->E_other_transfer; #if 0 print_insn (host, cmd_dataout, "dynamic jump ", 1); #endif cmd_dataout += 2; } - - return tmp; } - -/* + +/* * Function : int NCR53c7xx_queue_command (Scsi_Cmnd *cmd, - * void (*done)(Scsi_Cmnd *)) + * void (*done)(Scsi_Cmnd *)) * * Purpose : enqueues a SCSI command * * Inputs : cmd - SCSI command, done - function called on completion, with * a pointer to the command descriptor. - * - * Returns : 0 * - * Side effects : - * cmd is added to the per instance issue_queue, with minor - * twiddling done to the host specific fields of cmd. If the - * main coroutine is not running, it is restarted. + * Returns : 0 * + * Side effects : + * cmd is added to the per instance driver issue_queue, with major + * twiddling done to the host specific fields of cmd. If the + * process_issue_queue coroutine isn't running, it is restarted. + * + * NOTE : we use the host_scribble field of the Scsi_Cmnd structure to + * hold our own data, and pervert the ptr field of the SCp field + * to create a linked list. */ -int NCR53c7xx_queue_command (Scsi_Cmnd *cmd, void (* done)(Scsi_Cmnd *)) { - NCR53c7x0_local_declare(); - struct NCR53c7x0_cmd *tmp; +int +NCR53c7xx_queue_command (Scsi_Cmnd *cmd, void (* done)(Scsi_Cmnd *)) { struct Scsi_Host *host = cmd->host; - struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) - host->hostdata; + struct NCR53c7x0_hostdata *hostdata = + (struct NCR53c7x0_hostdata *) host->hostdata; unsigned long flags; - unsigned char target_was_busy; - NCR53c7x0_local_setup(host); - - if (((hostdata->options & (OPTION_DEBUG_INIT_ONLY|OPTION_DEBUG_PROBE_ONLY)) || - ((hostdata->options & OPTION_DEBUG_TARGET_LIMIT) && - !(hostdata->debug_lun_limit[cmd->target] & (1 << cmd->lun)))) || - cmd->target > 7) { - printk("scsi%d : disabled target %d lun %d\n", host->host_no, + Scsi_Cmnd *tmp; + + cmd->scsi_done = done; + cmd->host_scribble = NULL; + cmd->SCp.ptr = NULL; + cmd->SCp.buffer = NULL; + + save_flags(flags); + cli(); + if ((hostdata->options & (OPTION_DEBUG_INIT_ONLY|OPTION_DEBUG_PROBE_ONLY)) + || ((hostdata->options & OPTION_DEBUG_TARGET_LIMIT) && + !(hostdata->debug_lun_limit[cmd->target] & (1 << cmd->lun))) +#ifdef LINUX_1_2 + || cmd->target > 7 +#else + || cmd->target > host->max_id +#endif + || cmd->target == host->this_id + || hostdata->state == STATE_DISABLED) { + printk("scsi%d : disabled or bad target %d lun %d\n", host->host_no, cmd->target, cmd->lun); cmd->result = (DID_BAD_TARGET << 16); - done(cmd); - return 0; - } - - if (hostdata->options & OPTION_DEBUG_NCOMMANDS_LIMIT) { - if (hostdata->debug_count_limit == 0) { - printk("scsi%d : maximum commands exceeded\n", host->host_no); - cmd->result = (DID_BAD_TARGET << 16); - done(cmd); - return 0; - } else if (hostdata->debug_count_limit != -1) - --hostdata->debug_count_limit; - } - - if (hostdata->options & OPTION_DEBUG_READ_ONLY) { + } else if ((hostdata->options & OPTION_DEBUG_NCOMMANDS_LIMIT) && + (hostdata->debug_count_limit == 0)) { + printk("scsi%d : maximum commands exceeded\n", host->host_no); + cmd->result = (DID_BAD_TARGET << 16); + cmd->result = (DID_BAD_TARGET << 16); + } else if (hostdata->options & OPTION_DEBUG_READ_ONLY) { switch (cmd->cmnd[0]) { case WRITE_6: case WRITE_10: printk("scsi%d : WRITE attempted with NO_WRITE debugging flag set\n", host->host_no); cmd->result = (DID_BAD_TARGET << 16); - done(cmd); - return 0; } + } else { + if ((hostdata->options & OPTION_DEBUG_TARGET_LIMIT) && + hostdata->debug_count_limit != -1) + --hostdata->debug_count_limit; + restore_flags (flags); + cmd->result = 0xffff; /* The NCR will overwrite message + and status with valid data */ + cmd->host_scribble = (unsigned char *) tmp = create_cmd (cmd); } - - cmd->scsi_done = done; - cmd->result = 0xffff; /* The NCR will overwrite message - and status with valid data */ - - cmd->host_scribble = (unsigned char *) tmp = create_cmd (cmd); - - /* - * On NCR53c710 and better chips, we have two issue queues : - * The queue maintained by the Linux driver, and the queue - * maintained by the NCR chip. - * - * The Linux queue includes commands which have been generated, - * but may be unable to execute because the device is busy, - * where as the NCR queue contains commands to issue as soon - * as BUS FREE is detected. - * - * NCR53c700 and NCR53c700-66 chips use only the Linux driver - * queue. - * - * So, insert into the Linux queue if the device is busy or - * we are running on an old chip, otherwise insert directly into - * the NCR queue. - */ - + cli(); /* - * REQUEST sense commands need to be executed before all other - * commands since any command will clear the contingent allegiance - * condition that exists and the sense data is only guaranteed to be - * valid while the condition exists. + * REQUEST SENSE commands are inserted at the head of the queue + * so that we do not clear the contingent allegiance condition + * they may be looking at. */ - save_flags(flags); - cli(); + if (!(hostdata->issue_queue) || (cmd->cmnd[0] == REQUEST_SENSE)) { + cmd->SCp.ptr = (unsigned char *) hostdata->issue_queue; + hostdata->issue_queue = cmd; + } else { + for (tmp = (Scsi_Cmnd *) hostdata->issue_queue; tmp->SCp.ptr; + tmp = (Scsi_Cmnd *) tmp->SCp.ptr); + tmp->SCp.ptr = (unsigned char *) cmd; + } + restore_flags (flags); + run_process_issue_queue(); + return 0; +} - /* - * Consider a target busy if there are _any_ commands running - * on it. - * XXX - Once we do SCSI-II tagged queuing, we want to use - * a different definition of busy. - */ - - target_was_busy = hostdata->busy[cmd->target][cmd->lun] -#ifdef LUN_BUSY - ++ -#endif -; - - if (!(hostdata->options & OPTION_700) && - !target_was_busy) { - unsigned char *dsa = ((unsigned char *) tmp->dsa) - - hostdata->dsa_start; - /* dsa start is negative, so subtraction is used */ +/* + * Function : void to_schedule_list (struct Scsi_Host *host, + * struct NCR53c7x0_hostdata * hostdata, Scsi_Cmnd *cmd) + * + * Purpose : takes a SCSI command which was just removed from the + * issue queue, and deals with it by inserting it in the first + * free slot in the schedule list or by terminating it immediately. + * + * Inputs : + * host - SCSI host adapter; hostdata - hostdata structure for + * this adapter; cmd - a pointer to the command; should have + * the host_scribble field initialized to point to a valid + * + * Side effects : + * cmd is added to the per instance schedule list, with minor + * twiddling done to the host specific fields of cmd. + * + */ + +static __inline__ void +to_schedule_list (struct Scsi_Host *host, struct NCR53c7x0_hostdata *hostdata, + struct NCR53c7x0_cmd *cmd) { + NCR53c7x0_local_declare(); + Scsi_Cmnd *tmp = cmd->cmd; + unsigned long flags; + /* dsa start is negative, so subtraction is used */ + volatile u32 *current; + + int i; + NCR53c7x0_local_setup(host); #if 0 - printk("scsi%d : new dsa is 0x%x\n", host->host_no, (unsigned) dsa); + printk("scsi%d : new dsa is 0x%lx (virt 0x%p)\n", host->host_no, + virt_to_bus(dsa), dsa); #endif - if (hostdata->running_list) - hostdata->running_list->prev = tmp; - - tmp->next = hostdata->running_list; + save_flags(flags); + cli(); + + /* + * Work around race condition : if an interrupt fired and we + * got disabled forget about this command. + */ - if (!hostdata->running_list) - hostdata->running_list = tmp; - + if (hostdata->state == STATE_DISABLED) { + printk("scsi%d : driver disabled\n", host->host_no); + tmp->result = (DID_BAD_TARGET << 16); + cmd->next = (struct NCR53c7x0_cmd *) hostdata->free; + hostdata->free = cmd; + tmp->scsi_done(tmp); + restore_flags (flags); + return; + } - if (hostdata->idle) { - hostdata->idle = 0; - hostdata->state = STATE_RUNNING; - NCR53c7x0_write32 (DSP_REG, ((unsigned long) hostdata->script) + - hostdata->E_schedule); - } + for (i = host->can_queue, current = hostdata->schedule; + i > 0 && current[0] != hostdata->NOP_insn; + --i, current += 2 /* JUMP instructions are two words */); + + if (i > 0) { + ++hostdata->busy[tmp->target][tmp->lun]; + cmd->next = hostdata->running_list; + hostdata->running_list = cmd; + + /* Restore this instruction to a NOP once the command starts */ + cmd->dsa [(hostdata->dsa_jump_dest - hostdata->dsa_start) / + sizeof(u32)] = (u32) virt_to_bus ((void *)current); + /* Replace the current jump operand. */ + current[1] = + virt_to_bus ((void *) cmd->dsa) + hostdata->E_dsa_code_begin - + hostdata->E_dsa_code_template; + /* Replace the NOP instruction with a JUMP */ + current[0] = ((DCMD_TYPE_TCI|DCMD_TCI_OP_JUMP) << 24) | + DBC_TCI_TRUE; + } else { + printk ("scsi%d: no free slot\n", host->host_no); + disable(host); + tmp->result = (DID_ERROR << 16); + cmd->next = (struct NCR53c7x0_cmd *) hostdata->free; + hostdata->free = cmd; + tmp->scsi_done(tmp); + restore_flags (flags); + return; + } -/* XXX - make function */ - for (;;) { - /* - * If the NCR doesn't have any commands waiting in its - * issue queue, then we simply create a new issue queue, - * and signal the NCR that we have more commands. - */ - - if (!hostdata->issue_dsa_head) { -#if 0 - printk ("scsi%d : no issue queue\n", host->host_no); -#endif - hostdata->issue_dsa_tail = hostdata->issue_dsa_head = dsa; - NCR53c7x0_write8(hostdata->istat, - NCR53c7x0_read8(hostdata->istat) | ISTAT_10_SIGP); - break; - /* - * Otherwise, we blindly perform an atomic write - * to the next pointer of the last command we - * placed in that queue. - * - * Looks like it doesn't work, but I think it does - - */ - } else { - printk ("scsi%d : existing issue queue\n", host->host_no); - /* XXX - Replace with XCHG or equivalent */ - hostdata->issue_dsa_tail = *((unsigned char **) - (hostdata->issue_dsa_tail + hostdata->dsa_next)) = dsa; - /* - * After which, one of two things will happen : - * The NCR will have scheduled a command, either this - * one, or the next one. In this case, we successfully - * added our command to the queue. - * - * The NCR will have written the hostdata->issue_dsa_head - * pointer with the NULL pointer terminating the list, - * in which case we were too late. If this happens, - * we restart - */ - if (hostdata->issue_dsa_head) - break; - } - } -/* XXX - end */ + /* + * If the NCR chip is in an idle state, start it running the scheduler + * immediately. Otherwise, signal the chip to jump to schedule as + * soon as it is idle. + */ + if (hostdata->idle) { + hostdata->idle = 0; + hostdata->state = STATE_RUNNING; + NCR53c7x0_write32 (DSP_REG, virt_to_bus ((void *)hostdata->schedule)); } else { -#if 1 - printk ("scsi%d : using issue_queue instead of issue_dsa_head!\n", - host->host_no); -#endif - for (tmp = (struct NCR53c7x0_cmd *) hostdata->issue_queue; - tmp->next; tmp = (struct NCR53c7x0_cmd *) tmp->next); - tmp->next = tmp; + NCR53c7x0_write8(hostdata->istat, ISTAT_10_SIGP); } + restore_flags(flags); - return 0; } +/* + * Function : busyp (struct Scsi_Host *host, struct NCR53c7x0_hostdata + * *hostdata, Scsi_Cmnd *cmd) + * + * Purpose : decide if we can pass the given SCSI command on to the + * device in question or not. + * + * Returns : non-zero when we're busy, 0 when we aren't. + */ -int fix_pointers (unsigned long dsa) { - return 0; +static __inline__ int +busyp (struct Scsi_Host *host, struct NCR53c7x0_hostdata *hostdata, + Scsi_Cmnd *cmd) { + /* FIXME : in the future, this needs to accommodate SCSI-II tagged + queuing, and we may be able to play with fairness here a bit. + */ + return hostdata->busy[cmd->target][cmd->lun]; +} + +/* + * Function : process_issue_queue (void) + * + * Purpose : transfer commands from the issue queue to NCR start queue + * of each NCR53c7/8xx in the system, avoiding kernel stack + * overflows when the scsi_done() function is invoked recursively. + * + * NOTE : process_issue_queue exits with interrupts *disabled*, so the + * caller must reenable them if it desires. + * + * NOTE : process_issue_queue should be called from both + * NCR53c7x0_queue_command() and from the interrupt handler + * after command completion in case NCR53c7x0_queue_command() + * isn't invoked again but we've freed up resources that are + * needed. + */ + +static void +process_issue_queue (unsigned long flags) { + Scsi_Cmnd *tmp, *prev; + struct Scsi_Host *host; + struct NCR53c7x0_hostdata *hostdata; + int done; + + /* + * We run (with interrupts disabled) until we're sure that none of + * the host adapters have anything that can be done, at which point + * we set process_issue_queue_running to 0 and exit. + * + * Interrupts are enabled before doing various other internal + * instructions, after we've decided that we need to run through + * the loop again. + * + */ + + do { + cli(); /* Freeze request queues */ + done = 1; + for (host = first_host; host && host->hostt == the_template; + host = host->next) { + hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; + cli(); + if (hostdata->issue_queue) { + if (hostdata->state == STATE_DISABLED) { + tmp = (Scsi_Cmnd *) hostdata->issue_queue; + hostdata->issue_queue = (Scsi_Cmnd *) tmp->SCp.ptr; + tmp->result = (DID_BAD_TARGET << 16); + if (tmp->host_scribble) { + ((struct NCR53c7x0_cmd *)tmp->host_scribble)->next = + hostdata->free; + hostdata->free = + (struct NCR53c7x0_cmd *)tmp->host_scribble; + tmp->host_scribble = NULL; + } + tmp->scsi_done (tmp); + done = 0; + } else + for (tmp = (Scsi_Cmnd *) hostdata->issue_queue, + prev = NULL; tmp; prev = tmp, tmp = (Scsi_Cmnd *) + tmp->SCp.ptr) + if (!tmp->host_scribble || + !busyp (host, hostdata, tmp)) { + if (prev) + prev->SCp.ptr = tmp->SCp.ptr; + else + hostdata->issue_queue = (Scsi_Cmnd *) + tmp->SCp.ptr; + tmp->SCp.ptr = NULL; + if (tmp->host_scribble) { + if (hostdata->options & OPTION_DEBUG_QUEUES) + printk ("scsi%d : moving command for target %d lun %d to start list\n", + host->host_no, tmp->target, tmp->lun); + + + to_schedule_list (host, hostdata, + (struct NCR53c7x0_cmd *) + tmp->host_scribble); + } else { + if (((tmp->result & 0xff) == 0xff) || + ((tmp->result & 0xff00) == 0xff00)) { + printk ("scsi%d : danger Will Robinson!\n", + host->host_no); + tmp->result = DID_ERROR << 16; + disable (host); + } + tmp->scsi_done(tmp); + } + done = 0; + } /* if target/lun is not busy */ + } /* if hostdata->issue_queue */ + if (!done) + restore_flags (flags); + } /* for host */ + } while (!done); + process_issue_queue_running = 0; } /* @@ -2854,18 +4163,22 @@ int fix_pointers (unsigned long dsa) { * may be NULL. */ -static void intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { +static void +intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { NCR53c7x0_local_declare(); struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; unsigned char sstat0_sist0, sist1, /* Registers */ fatal; /* Did a fatal interrupt occur ? */ + + int is_8xx_chip; NCR53c7x0_local_setup(host); fatal = 0; - - if ((hostdata->chip / 100) == 8) { + + is_8xx_chip = ((unsigned) (hostdata->chip - 800)) < 100; + if (is_8xx_chip) { sstat0_sist0 = NCR53c7x0_read8(SIST0_REG_800); udelay(1); sist1 = NCR53c7x0_read8(SIST1_REG_800); @@ -2879,8 +4192,8 @@ static void intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { sstat0_sist0, sist1); /* 250ms selection timeout */ - if ((((hostdata->chip / 100) == 8) && (sist1 & SIST1_800_STO)) || - (((hostdata->chip / 100) != 8) && (sstat0_sist0 & SSTAT0_700_STO))) { + if ((is_8xx_chip && (sist1 & SIST1_800_STO)) || + (!is_8xx_chip && (sstat0_sist0 & SSTAT0_700_STO))) { fatal = 1; if (hostdata->options & OPTION_DEBUG_INTR) { printk ("scsi%d : Selection Timeout\n", host->host_no); @@ -2888,8 +4201,9 @@ static void intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { printk("scsi%d : target %d, lun %d, command ", host->host_no, cmd->cmd->target, cmd->cmd->lun); print_command (cmd->cmd->cmnd); - printk("scsi%d : dsp = 0x%x\n", host->host_no, - (unsigned) NCR53c7x0_read32(DSP_REG)); + printk("scsi%d : dsp = 0x%x (virt 0x%p)\n", host->host_no, + NCR53c7x0_read32(DSP_REG), + bus_to_virt(NCR53c7x0_read32(DSP_REG))); } else { printk("scsi%d : no command\n", host->host_no); } @@ -2915,20 +4229,26 @@ static void intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { #endif } } - + +/* + * FIXME : in theory, we can also get a UDC when a STO occurs. + */ if (sstat0_sist0 & SSTAT0_UDC) { fatal = 1; if (cmd) { printk("scsi%d : target %d lun %d unexpected disconnect\n", host->host_no, cmd->cmd->target, cmd->cmd->lun); + print_lots (host); abnormal_finished(cmd, DID_ERROR << 16); - } - hostdata->dsp = hostdata->script + hostdata->E_schedule / - sizeof(long); + } else + printk("scsi%d : unexpected disconnect (no command)\n", + host->host_no); + + hostdata->dsp = (u32 *) hostdata->schedule; hostdata->dsp_changed = 1; - /* SCSI PARITY error */ - } + } + /* SCSI PARITY error */ if (sstat0_sist0 & SSTAT0_PAR) { fatal = 1; if (cmd && cmd->cmd) { @@ -2941,7 +4261,7 @@ static void intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { /* XXX - Reduce synchronous transfer rate! */ hostdata->dsp = hostdata->script + hostdata->E_initiator_abort / - sizeof(long); + sizeof(u32); hostdata->dsp_changed = 1; /* SCSI GROSS error */ } @@ -2949,9 +4269,29 @@ static void intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { if (sstat0_sist0 & SSTAT0_SGE) { fatal = 1; printk("scsi%d : gross error\n", host->host_no); - /* XXX Reduce synchronous transfer rate! */ + /* Reset SCSI offset */ + if ((hostdata->chip / 100) == 8) { + NCR53c7x0_write8 (STEST2_REG_800, STEST2_800_ROF); + } + + /* + * A SCSI gross error may occur when we have + * + * - A synchronous offset which causes the SCSI FIFO to be overwritten. + * + * - A REQ which causes the maximum synchronous offset programmed in + * the SXFER register to be exceeded. + * + * - A phase change with an outstanding synchronous offset. + * + * - Residual data in the synchronous data FIFO, with a transfer + * other than a synchronous receive is started.$# + */ + + + /* XXX Should deduce synchronous transfer rate! */ hostdata->dsp = hostdata->script + hostdata->E_initiator_abort / - sizeof(long); + sizeof(u32); hostdata->dsp_changed = 1; /* Phase mismatch */ } @@ -2963,7 +4303,11 @@ static void intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { intr_phase_mismatch (host, cmd); } -#if 1 +#if 0 + if (sstat0_sist0 & SIST0_800_RSL) + printk ("scsi%d : Oh no Mr. Bill!\n", host->host_no); +#endif + /* * If a fatal SCSI interrupt occurs, we must insure that the DMA and * SCSI FIFOs were flushed. @@ -2978,27 +4322,23 @@ static void intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { /* XXX - code check for 700/800 chips */ if (!(hostdata->dstat & DSTAT_DFE)) { printk ("scsi%d : DMA FIFO not empty\n", host->host_no); -#if 0 if (NCR53c7x0_read8 (CTEST2_REG_800) & CTEST2_800_DDIR) { + printk ("scsi%d: Flushing DMA FIFO\n", + host->host_no); NCR53c7x0_write8 (CTEST3_REG_800, CTEST3_800_FLF); while (!((hostdata->dstat = NCR53c7x0_read8(DSTAT_REG)) & DSTAT_DFE)); - } else -#endif - { + } else { NCR53c7x0_write8 (CTEST3_REG_800, CTEST3_800_CLF); while (NCR53c7x0_read8 (CTEST3_REG_800) & CTEST3_800_CLF); } + hostdata->dstat |= DSTAT_DFE; } - - NCR53c7x0_write8 (STEST3_REG_800, STEST3_800_CSF); - while (NCR53c7x0_read8 (STEST3_REG_800) & STEST3_800_CSF); } -#endif } /* - * Function : static void NCR53c7x0_intr (int irq, struct pt_regs * regs) + * Function : static void NCR53c7x0_intr (int irq, void *dev_id, struct pt_regs * regs) * * Purpose : handle NCR53c7x0 interrupts for all NCR devices sharing * the same IRQ line. @@ -3008,18 +4348,22 @@ static void intr_scsi (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { * this handler. */ -static void NCR53c7x0_intr (int irq, struct pt_regs * regs) { +static void +NCR53c7x0_intr (int irq, void *dev_id, struct pt_regs * regs) { NCR53c7x0_local_declare(); struct Scsi_Host *host; /* Host we are looking at */ unsigned char istat; /* Values of interrupt regs */ struct NCR53c7x0_hostdata *hostdata; /* host->hostdata */ struct NCR53c7x0_cmd *cmd, /* command which halted */ **cmd_prev_ptr; - unsigned long *dsa; /* DSA */ + u32 *dsa; /* DSA */ int done = 1; /* Indicates when handler should terminate */ int interrupted = 0; /* This HA generated an interrupt */ + int have_intfly; /* Don't print warning + messages when we stack + INTFLYs */ unsigned long flags; #ifdef NCR_DEBUG @@ -3027,27 +4371,25 @@ static void NCR53c7x0_intr (int irq, struct pt_regs * regs) { size_t buflen; /* Length of same */ #endif -#if 0 - printk("interrupt %d received\n", irq); -#endif - do { done = 1; - for (host = first_host; host; host = hostdata->next ? - hostdata->next : NULL) { + for (host = first_host; host; host = host->next) + if (host->hostt == the_template && host->irq == irq) { NCR53c7x0_local_setup(host); hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; hostdata->dsp_changed = 0; interrupted = 0; - + have_intfly = 0; do { + int is_8xx_chip; + hostdata->dstat_valid = 0; interrupted = 0; /* * Only read istat once, since reading it again will unstack - * interrupts. + * interrupts? */ istat = NCR53c7x0_read8(hostdata->istat); @@ -3057,16 +4399,18 @@ static void NCR53c7x0_intr (int irq, struct pt_regs * regs) { * the SCSI processor continues running, we can't just look * at the contents of the DSA register and continue running. */ -/* XXX - this is getting big, and should move to intr_intfly() */ +/* XXX - this is too big, offends my sense of aesthetics, and should + move to intr_intfly() */ + is_8xx_chip = ((unsigned) (hostdata->chip - 800)) < 100; if ((hostdata->options & OPTION_INTFLY) && - ((hostdata->chip / 100) == 8 && (istat & ISTAT_800_INTF))) { + (is_8xx_chip && (istat & ISTAT_800_INTF))) { char search_found = 0; /* Got at least one ? */ done = 0; interrupted = 1; /* - * Clear the INTF bit by writing a one. This reset operation - * is self-clearing. + * Clear the INTF bit by writing a one. + * This reset operation is self-clearing. */ NCR53c7x0_write8(hostdata->istat, istat|ISTAT_800_INTF); @@ -3086,8 +4430,8 @@ static void NCR53c7x0_intr (int irq, struct pt_regs * regs) { restart: for (cmd_prev_ptr = (struct NCR53c7x0_cmd **) &(hostdata->running_list), cmd = - (struct NCR53c7x0_cmd *) hostdata->running_list; cmd ; - cmd_prev_ptr = (struct NCR53c7x0_cmd **) &(cmd->next), + (struct NCR53c7x0_cmd *) hostdata->running_list; cmd ; + cmd_prev_ptr = (struct NCR53c7x0_cmd **) &(cmd->next), cmd = (struct NCR53c7x0_cmd *) cmd->next) { Scsi_Cmnd *tmp; @@ -3113,19 +4457,10 @@ restart: search_found = 1; /* Important - remove from list _before_ done is called */ - /* XXX - SLL. Seems like DLL is unnecessary */ - if (cmd->prev) - cmd->prev->next = cmd->next; if (cmd_prev_ptr) *cmd_prev_ptr = (struct NCR53c7x0_cmd *) cmd->next; -#ifdef LUN_BUSY - /* Check for next command for target, add to issue queue */ - if (--hostdata->busy[tmp->target][tmp->lun]) { - } -#endif - - + --hostdata->busy[tmp->target][tmp->lun]; cmd->next = hostdata->free; hostdata->free = cmd; @@ -3136,7 +4471,6 @@ restart: host->host_no, tmp->pid, tmp->target, tmp->lun, tmp->result); print_command (tmp->cmnd); } - #if 0 hostdata->options &= ~OPTION_DEBUG_INTR; @@ -3146,10 +4480,20 @@ restart: } restore_flags(flags); - - if (!search_found) { + + /* + * I think that we're stacking INTFLY interrupts; taking care of + * all the finished commands on the first one, and then getting + * worried when we see the next one. The magic with have_intfly + * should tell if this is the case.. + */ + + if (!search_found && !have_intfly) { printk ("scsi%d : WARNING : INTFLY with no completed commands.\n", host->host_no); + } else if (!have_intfly) { + have_intfly = 1; + run_process_issue_queue(); } } @@ -3157,6 +4501,12 @@ restart: done = 0; interrupted = 1; hostdata->state = STATE_HALTED; + + if (NCR53c7x0_read8 ((hostdata->chip / 100) == 8 ? + SSTAT1_REG : SSTAT2_REG) & SSTAT2_FF_MASK) + printk ("scsi%d : SCSI FIFO not empty\n", + host->host_no); + /* * NCR53c700 and NCR53c700-66 change the current SCSI * process, hostdata->current, in the Linux driver so @@ -3170,10 +4520,10 @@ restart: if (hostdata->options & OPTION_700) { cmd = (struct NCR53c7x0_cmd *) hostdata->current; } else { - dsa = (unsigned long *) NCR53c7x0_read32(DSA_REG); + dsa = bus_to_virt(NCR53c7x0_read32(DSA_REG)); for (cmd = (struct NCR53c7x0_cmd *) hostdata->running_list; cmd && - (dsa + (hostdata->dsa_start / sizeof(long))) != + (dsa + (hostdata->dsa_start / sizeof(u32))) != cmd->dsa; cmd = (struct NCR53c7x0_cmd *)(cmd->next)); } @@ -3205,23 +4555,22 @@ restart: hostdata->dstat_valid = 1; } -#if 1 /* XXX - code check for 700/800 chips */ if (!(hostdata->dstat & DSTAT_DFE)) { printk ("scsi%d : DMA FIFO not empty\n", host->host_no); - #if 0 if (NCR53c7x0_read8 (CTEST2_REG_800) & CTEST2_800_DDIR) { + printk ("scsi%d: Flushing DMA FIFO\n", + host->host_no); NCR53c7x0_write8 (CTEST3_REG_800, CTEST3_800_FLF); while (!((hostdata->dstat = NCR53c7x0_read8(DSTAT_REG)) & DSTAT_DFE)); } else - #endif { NCR53c7x0_write8 (CTEST3_REG_800, CTEST3_800_CLF); while (NCR53c7x0_read8 (CTEST3_REG_800) & CTEST3_800_CLF); } + hostdata->dstat |= DSTAT_DFE; } -#endif } } while (interrupted); @@ -3230,26 +4579,25 @@ restart: if (hostdata->intrs != -1) hostdata->intrs++; #if 0 - if (hostdata->intrs > 4) { + if (hostdata->intrs > 40) { printk("scsi%d : too many interrupts, halting", host->host_no); - hostdata->idle = 1; - hostdata->options |= OPTION_DEBUG_INIT_ONLY; - panic("dying...\n"); + disable(host); } #endif if (!hostdata->idle && hostdata->state == STATE_HALTED) { if (!hostdata->dsp_changed) { - hostdata->dsp = (unsigned long *) NCR53c7x0_read32(DSP_REG); + hostdata->dsp = (u32 *) + bus_to_virt(NCR53c7x0_read32(DSP_REG)); } #if 0 - printk("scsi%d : new dsp is 0x%lx\n", host->host_no, - (long) hostdata->dsp); + printk("scsi%d : new dsp is 0x%lx (virt 0x%p)\n", + host->host_no, virt_to_bus(hostdata->dsp), hostdata->dsp); #endif hostdata->state = STATE_RUNNING; - NCR53c7x0_write32 (DSP_REG, (unsigned long) hostdata->dsp); + NCR53c7x0_write32 (DSP_REG, virt_to_bus(hostdata->dsp)); } } } while (!done); @@ -3270,20 +4618,166 @@ restart: static int abort_connected (struct Scsi_Host *host) { +#ifdef NEW_ABORT + NCR53c7x0_local_declare(); +#endif struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; +/* FIXME : this probably should change for production kernels; at the + least, counter should move to a per-host structure. */ + static int counter = 5; +#ifdef NEW_ABORT + int sstat, phase, offset; + u32 *script; + NCR53c7x0_local_setup(host); +#endif + + if (--counter <= 0) { + disable(host); + return 0; + } - hostdata->dsp = hostdata->script + hostdata->E_initiator_abort / - sizeof(long); - hostdata->dsp_changed = 1; printk ("scsi%d : DANGER : abort_connected() called \n", host->host_no); + +#ifdef NEW_ABORT + +/* + * New strategy : Rather than using a generic abort routine, + * we'll specifically try to source or sink the appropriate + * amount of data for the phase we're currently in (taking into + * account the current synchronous offset) + */ + + sstat = (NCR53c8x0_read8 ((chip / 100) == 8 ? SSTAT1_REG : SSTAT2_REG); + offset = OFFSET (sstat & SSTAT2_FF_MASK) >> SSTAT2_FF_SHIFT; + phase = sstat & SSTAT2_PHASE_MASK; + +/* + * SET ATN + * MOVE source_or_sink, WHEN CURRENT PHASE + * < repeat for each outstanding byte > + * JUMP send_abort_message + */ + + script = hostdata->abort_script = kmalloc ( + 8 /* instruction size */ * ( + 1 /* set ATN */ + + (!offset ? 1 : offset) /* One transfer per outstanding byte */ + + 1 /* send abort message */), + GFP_ATOMIC); + + +#else /* def NEW_ABORT */ + hostdata->dsp = hostdata->script + hostdata->E_initiator_abort / + sizeof(u32); +#endif /* def NEW_ABORT */ + hostdata->dsp_changed = 1; + /* XXX - need to flag the command as aborted after the abort_connected code runs */ return 0; } +/* + * Function : static int datapath_residual (Scsi_Host *host) + * + * Purpose : return residual data count of what's in the chip. + * + * Inputs : host - SCSI host + */ + +static int +datapath_residual (struct Scsi_Host *host) { + NCR53c7x0_local_declare(); + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + int count, synchronous, sstat; + NCR53c7x0_local_setup(host); + /* COMPAT : the 700 and 700-66 need to use DFIFO_00_BO_MASK */ + count = ((NCR53c7x0_read8 (DFIFO_REG) & DFIFO_10_BO_MASK) - + (NCR53c7x0_read32 (DBC_REG) & DFIFO_10_BO_MASK)) & DFIFO_10_BO_MASK; + synchronous = NCR53c7x0_read8 (SXFER_REG) & SXFER_MO_MASK; + /* COMPAT : DDIR is elsewhere on non-'8xx chips. */ + if (NCR53c7x0_read8 (CTEST2_REG_800) & CTEST2_800_DDIR) { + /* Receive */ + if (synchronous) + count += (NCR53c7x0_read8 ((hostdata->chip / 100) == 8 ? + SSTAT1_REG : SSTAT2_REG) & SSTAT2_FF_MASK) >> SSTAT2_FF_SHIFT; + else + if (NCR53c7x0_read8 ((hostdata->chip / 100) == 8 ? + SSTAT0_REG : SSTAT1_REG) & SSTAT1_ILF) + ++count; + } else { + /* Send */ + sstat = ((hostdata->chip / 100) == 8) ? NCR53c7x0_read8 (SSTAT0_REG) : + NCR53c7x0_read8 (SSTAT1_REG); + if (sstat & SSTAT1_OLF) + ++count; + if (synchronous && (sstat & SSTAT1_ORF)) + ++count; + } + return count; +} + +/* + * Function : static const char * sbcl_to_phase (int sbcl)_ + * + * Purpose : Convert SBCL register to user-parsable phase representation + * + * Inputs : sbcl - value of sbcl register + */ + + +static const char * +sbcl_to_phase (int sbcl) { + switch (sbcl & SBCL_PHASE_MASK) { + case SBCL_PHASE_DATAIN: + return "DATAIN"; + case SBCL_PHASE_DATAOUT: + return "DATAOUT"; + case SBCL_PHASE_MSGIN: + return "MSGIN"; + case SBCL_PHASE_MSGOUT: + return "MSGOUT"; + case SBCL_PHASE_CMDOUT: + return "CMDOUT"; + case SBCL_PHASE_STATIN: + return "STATUSIN"; + default: + return "unknown"; + } +} + +/* + * Function : static const char * sstat2_to_phase (int sstat)_ + * + * Purpose : Convert SSTAT2 register to user-parsable phase representation + * + * Inputs : sstat - value of sstat register + */ + + +static const char * +sstat2_to_phase (int sstat) { + switch (sstat & SSTAT2_PHASE_MASK) { + case SSTAT2_PHASE_DATAIN: + return "DATAIN"; + case SSTAT2_PHASE_DATAOUT: + return "DATAOUT"; + case SSTAT2_PHASE_MSGIN: + return "MSGIN"; + case SSTAT2_PHASE_MSGOUT: + return "MSGOUT"; + case SSTAT2_PHASE_CMDOUT: + return "CMDOUT"; + case SSTAT2_PHASE_STATIN: + return "STATUSIN"; + default: + return "unknown"; + } +} /* * Function : static void intr_phase_mismatch (struct Scsi_Host *host, @@ -3298,153 +4792,313 @@ abort_connected (struct Scsi_Host *host) { * is restarted, jumping to the command_complete entry point, or * patching the address and transfer count of the current instruction * and calling the msg_in entry point as appropriate. - * */ -static void intr_phase_mismatch (struct Scsi_Host *host, struct NCR53c7x0_cmd - *cmd) { +static void +intr_phase_mismatch (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { NCR53c7x0_local_declare(); - unsigned long dbc_dcmd, *dsp, *dsp_next; + u32 dbc_dcmd, *dsp, *dsp_next; unsigned char dcmd, sbcl; struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; - char *phase; + int residual; + enum {ACTION_ABORT, ACTION_ABORT_PRINT, ACTION_CONTINUE} action = + ACTION_ABORT_PRINT; + const char *where = NULL; NCR53c7x0_local_setup(host); - if (!cmd) { - printk ("scsi%d : phase mismatch interrupt occurred with no current command.\n", - host->host_no); - abort_connected(host); - return; - } - /* * Corrective action is based on where in the SCSI SCRIPT(tm) the error * occurred, as well as which SCSI phase we are currently in. */ + dsp_next = bus_to_virt(NCR53c7x0_read32(DSP_REG)); - dsp_next = (unsigned long *) NCR53c7x0_read32(DSP_REG); - - /* - * Like other processors, the NCR adjusts the DSP pointer before - * instruction decode. Set the DSP address back to what it should - * be for this instruction based on its size (2 or 3 longs). + /* + * Fetch the current instruction, and remove the operands for easier + * interpretation. */ - dbc_dcmd = NCR53c7x0_read32(DBC_REG); dcmd = (dbc_dcmd & 0xff000000) >> 24; + /* + * Like other processors, the NCR adjusts the instruction pointer before + * instruction decode. Set the DSP address back to what it should + * be for this instruction based on its size (2 or 3 32 bit words). + */ dsp = dsp_next - NCR53c7x0_insn_size(dcmd); - + + + /* + * Read new SCSI phase from the SBCL lines. Since all of our code uses + * a WHEN conditional instead of an IF conditional, we don't need to + * wait for a new REQ. + */ + sbcl = NCR53c7x0_read8(SBCL_REG) & SBCL_PHASE_MASK; + + if (!cmd) { + action = ACTION_ABORT_PRINT; + where = "no current command"; /* - * Read new SCSI phase from the SBCL lines. + * The way my SCSI SCRIPTS(tm) are architected, recoverable phase + * mismatches should only occur where we're doing a multi-byte + * BMI instruction. Specifically, this means + * + * - select messages (a SCSI-I target may ignore additional messages + * after the IDENTIFY; any target may reject a SDTR or WDTR) + * + * - command out (targets may send a message to signal an error + * condition, or go into STATUSIN after they've decided + * they don't like the command. + * + * - reply_message (targets may reject a multi-byte message in the + * middle) * - * Note that since all of our code uses a WHEN conditional instead of an - * IF conditional, we don't need to wait for a valid REQ. + * - data transfer routines (command completion with buffer space + * left, disconnect message, or error message) */ - sbcl = NCR53c7x0_read8(SBCL_REG); - switch (sbcl) { - case SBCL_PHASE_DATAIN: - phase = "DATAIN"; - break; - case SBCL_PHASE_DATAOUT: - phase = "DATAOUT"; - break; - case SBCL_PHASE_MSGIN: - phase = "MSGIN"; - break; - case SBCL_PHASE_MSGOUT: - phase = "MSGOUT"; - break; - case SBCL_PHASE_CMDOUT: - phase = "CMDOUT"; - break; - case SBCL_PHASE_STATIN: - phase = "STATUSIN"; + } else if (((dsp >= cmd->data_transfer_start && + dsp < cmd->data_transfer_end)) || dsp == (cmd->residual + 2)) { + if ((dcmd & (DCMD_TYPE_MASK|DCMD_BMI_OP_MASK|DCMD_BMI_INDIRECT| + DCMD_BMI_MSG|DCMD_BMI_CD)) == (DCMD_TYPE_BMI| + DCMD_BMI_OP_MOVE_I)) { + residual = datapath_residual (host); + if (hostdata->options & OPTION_DEBUG_DISCONNECT) + printk ("scsi%d : handling residual transfer (+ %d bytes from DMA FIFO)\n", + host->host_no, residual); + + /* + * The first instruction is a CALL to the alternate handler for + * this data transfer phase, so we can do calls to + * munge_msg_restart as we would if control were passed + * from normal dynamic code. + */ + if (dsp != cmd->residual + 2) { + cmd->residual[0] = ((DCMD_TYPE_TCI | DCMD_TCI_OP_CALL | + ((dcmd & DCMD_BMI_IO) ? DCMD_TCI_IO : 0)) << 24) | + DBC_TCI_WAIT_FOR_VALID | DBC_TCI_COMPARE_PHASE; + cmd->residual[1] = virt_to_bus(hostdata->script) + + ((dcmd & DCMD_BMI_IO) + ? hostdata->E_other_in : hostdata->E_other_out); + } + + /* + * The second instruction is the a data transfer block + * move instruction, reflecting the pointer and count at the + * time of the phase mismatch. + */ + cmd->residual[2] = dbc_dcmd + residual; + cmd->residual[3] = NCR53c7x0_read32(DNAD_REG) - residual; + + /* + * The third and final instruction is a jump to the instruction + * which follows the instruction which had to be 'split' + */ + if (dsp != cmd->residual + 2) { + cmd->residual[4] = ((DCMD_TYPE_TCI|DCMD_TCI_OP_JUMP) + << 24) | DBC_TCI_TRUE; + cmd->residual[5] = virt_to_bus(dsp_next); + } + + /* + * For the sake of simplicity, transfer control to the + * conditional CALL at the start of the residual buffer. + */ + hostdata->dsp = cmd->residual; + hostdata->dsp_changed = 1; + action = ACTION_CONTINUE; + } else { + where = "non-BMI dynamic DSA code"; + action = ACTION_ABORT_PRINT; + } + } else if (dsp == (hostdata->script + hostdata->E_select_msgout / 4)) { + /* Release ATN */ + NCR53c7x0_write8 (SOCL_REG, 0); + switch (sbcl) { + /* + * Some devices (SQ555 come to mind) grab the IDENTIFY message + * sent on selection, and decide to go into COMMAND OUT phase + * rather than accepting the rest of the messages or rejecting + * them. Handle these devices gracefully. + */ + case SBCL_PHASE_CMDOUT: + hostdata->dsp = dsp + 2 /* two _words_ */; + hostdata->dsp_changed = 1; + printk ("scsi%d : target %d ignored SDTR and went into COMMAND OUT\n", + host->host_no, cmd->cmd->target); + cmd->flags &= ~CMD_FLAG_SDTR; + action = ACTION_CONTINUE; + break; + case SBCL_PHASE_MSGIN: + hostdata->dsp = hostdata->script + hostdata->E_msg_in / + sizeof(u32); + hostdata->dsp_changed = 1; + action = ACTION_CONTINUE; + break; + default: + where="select message out"; + action = ACTION_ABORT_PRINT; + } + /* + * Some SCSI devices will interpret a command as they read the bytes + * off the SCSI bus, and may decide that the command is Bogus before + * they've read the entire command off the bus. + */ + } else if (dsp == hostdata->script + hostdata->E_cmdout_cmdout / sizeof + (u32)) { + hostdata->dsp = hostdata->script + hostdata->E_data_transfer / + sizeof (u32); + hostdata->dsp_changed = 1; + action = ACTION_CONTINUE; + /* FIXME : we need to handle message reject, etc. within msg_respond. */ +#ifdef notyet + } else if (dsp == hostdata->script + hostdata->E_reply_message) { + switch (sbcl) { + /* Any other phase mismatches abort the currently executing command. */ +#endif + } else { + where = "unknown location"; + action = ACTION_ABORT_PRINT; + } + + /* Flush DMA FIFO */ + if (!hostdata->dstat_valid) { + hostdata->dstat = NCR53c7x0_read8(DSTAT_REG); + hostdata->dstat_valid = 1; + } + if (!(hostdata->dstat & DSTAT_DFE)) { + if (NCR53c7x0_read8 (CTEST2_REG_800) & CTEST2_800_DDIR) { + printk ("scsi%d: Flushing DMA FIFO\n", + host->host_no); + NCR53c7x0_write8 (CTEST3_REG_800, CTEST3_800_FLF); + /* FIXME : what about stacked DMA interrupts? */ + while (!((hostdata->dstat = NCR53c7x0_read8(DSTAT_REG)) & + DSTAT_DFE)); + } else { + NCR53c7x0_write8 (CTEST3_REG_800, CTEST3_800_CLF); + while (NCR53c7x0_read8 (CTEST3_REG_800) & CTEST3_800_CLF); + } + hostdata->dstat |= DSTAT_DFE; + } + + switch (action) { + case ACTION_ABORT_PRINT: + printk("scsi%d : %s : unexpected phase %s.\n", + host->host_no, where ? where : "unknown location", + sbcl_to_phase(sbcl)); + print_lots (host); + /* Fall through to ACTION_ABORT */ + case ACTION_ABORT: + abort_connected (host); break; - default: - phase = "unknown"; + case ACTION_CONTINUE: break; } +#if 0 + if (hostdata->dsp_changed) { + printk("scsi%d: new dsp 0x%p\n", host->host_no, hostdata->dsp); + print_insn (host, hostdata->dsp, "", 1); + } +#endif + +} + +/* + * Function : static void intr_bf (struct Scsi_Host *host, + * struct NCR53c7x0_cmd *cmd) + * + * Purpose : handle BUS FAULT interrupts + * + * Inputs : host, cmd - host and NCR command causing the interrupt, cmd + * may be NULL. + */ + +static void +intr_bf (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { + NCR53c7x0_local_declare(); + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + u32 *dsp, + *next_dsp, /* Current dsp */ + *dsa, + dbc_dcmd; /* DCMD (high eight bits) + DBC */ + unsigned short pci_status; + int tmp; + unsigned long flags; + char *reason = NULL; + /* Default behavior is for a silent error, with a retry until we've + exhausted retries. */ + enum {MAYBE, ALWAYS, NEVER} retry = MAYBE; + int report = 0; + NCR53c7x0_local_setup(host); + + dbc_dcmd = NCR53c7x0_read32 (DBC_REG); + next_dsp = bus_to_virt (NCR53c7x0_read32(DSP_REG)); + dsp = next_dsp - NCR53c7x0_insn_size ((dbc_dcmd >> 24) & 0xff); +/* FIXME - check chip type */ + dsa = bus_to_virt (NCR53c7x0_read32(DSA_REG)); /* - * The way the SCSI SCRIPTS(tm) are architected, recoverable phase - * mismatches should only occur in the data transfer routines, or - * when a command is being aborted. + * Bus faults can be caused by either a Bad Address or + * Target Abort. We should check the Received Target Abort + * bit of the PCI status register and Master Abort Bit. + * + * - Master Abort bit indicates that no device claimed + * the address with DEVSEL within five clocks + * + * - Target Abort bit indicates that a target claimed it, + * but changed its mind once it saw the byte enables. + * */ - if (dsp >= cmd->data_transfer_start & dsp < cmd->data_transfer_end) { - /* - * There are three instructions used in our data transfer routines with - * a phase conditional on them - * - * 1. MOVE count, address, WHEN DATA_IN - * 2. MOVE count, address, WHEN DATA_OUT - * 3. CALL msg_in, WHEN MSG_IN. - */ - switch (sbcl & SBCL_PHASE_MASK) { - /* - * 1. STATUS phase : pass control to command_complete as if - * a JUMP instruction was executed. No patches are made. - */ - case SBCL_PHASE_STATIN: - if (hostdata->options & OPTION_DEBUG_INTR) - printk ("scsi%d : new phase = STATIN\n", host->host_no); - hostdata->dsp = hostdata->script + hostdata->E_command_complete / - sizeof(long); - hostdata->dsp_changed = 1; - return; - /* - * 2. MSGIN phase : pass control to msg_in as if a CALL - * instruction was executed. Patch current instruction. - */ -/* - * XXX - This is buggy. - */ - case SBCL_PHASE_MSGIN: - if (hostdata->options & OPTION_DEBUG_INTR) - printk ("scsi%d : new phase = MSGIN\n", host->host_no); - if ((dcmd & (DCMD_TYPE_MASK|DCMD_BMI_OP_MASK|DCMD_BMI_INDIRECT| - DCMD_BMI_MSG|DCMD_BMI_CD)) == (DCMD_TYPE_BMI| - DCMD_BMI_OP_MOVE_I)) { - dsp[0] = dbc_dcmd; - dsp[1] = NCR53c7x0_read32(DNAD_REG); - NCR53c7x0_write32(TEMP_REG, (unsigned long) dsp); - hostdata->dsp = hostdata->script + hostdata->E_msg_in / - sizeof(long); - hostdata->dsp_changed = 1; - } else { - printk("scsi%d : unexpected MSGIN in dynamic NCR code, dcmd=0x%x.\n", - host->host_no, dcmd); - print_insn (host, dsp, "", 1); - print_insn (host, dsp_next, "", 1); - abort_connected (host); + if ((hostdata->chip / 100) == 8) { + save_flags (flags); + cli(); + tmp = pcibios_read_config_word (hostdata->pci_bus, + hostdata->pci_device_fn, PCI_STATUS, &pci_status); + restore_flags (flags); + if (tmp == PCIBIOS_SUCCESSFUL) { + if (pci_status & PCI_STATUS_REC_TARGET_ABORT) { + reason = "PCI target abort"; + pci_status &= ~PCI_STATUS_REC_TARGET_ABORT; + } else if (pci_status & PCI_STATUS_REC_MASTER_ABORT) { + reason = "No device asserted PCI DEVSEL within five bus clocks"; + pci_status &= ~PCI_STATUS_REC_MASTER_ABORT; + } else if (pci_status & PCI_STATUS_PARITY) { + report = 1; + pci_status &= ~PCI_STATUS_PARITY; } - return; - /* - * MSGOUT phase - shouldn't happen, because we haven't - * asserted ATN. - * CMDOUT phase - shouldn't happen, since we've already - * sent a valid command. - * DATAIN/DATAOUT - other one shouldn't happen, since - * SCSI commands can ONLY have one or the other. - * - * So, we abort the command if one of these things happens. - */ - default: - printk ("scsi%d : unexpected phase %s in data routine\n", - host->host_no, phase); - abort_connected(host); - } - /* - * Any other phase mismatches abort the currently executing command. + } else { + printk ("scsi%d : couldn't read status register : %s\n", + host->host_no, pcibios_strerror (tmp)); + retry = NEVER; + } + } + +#ifndef notyet + report = 1; +#endif + if (report && reason) { + printk(KERN_ALERT "scsi%d : BUS FAULT reason = %s\n", + host->host_no, reason ? reason : "unknown"); + print_lots (host); + } + +#ifndef notyet + retry = NEVER; +#endif + + /* + * TODO : we should attempt to recover from any spurious bus + * faults. After X retries, we should figure that things are + * sufficiently wedged, and call NCR53c7xx_reset. + * + * This code should only get executed once we've decided that we + * cannot retry. */ - } else { - printk ("scsi%d : unexpected phase %s at dsp = 0x%x\n", - host->host_no, phase, (unsigned) dsp); - print_insn (host, dsp, "", 1); - print_insn (host, dsp_next, "", 1); - abort_connected(host); + + if (retry == NEVER) { + printk(KERN_ALERT " mail drew@PoohSticks.ORG\n"); + FATAL (host); } } @@ -3459,12 +5113,13 @@ static void intr_phase_mismatch (struct Scsi_Host *host, struct NCR53c7x0_cmd * may be NULL. */ -static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { +static void +intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { NCR53c7x0_local_declare(); struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; unsigned char dstat; /* DSTAT */ - unsigned long *dsp, + u32 *dsp, *next_dsp, /* Current dsp */ *dsa, dbc_dcmd; /* DCMD (high eight bits) + DBC */ @@ -3483,10 +5138,10 @@ static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { printk("scsi%d : DSTAT=0x%x\n", host->host_no, (int) dstat); dbc_dcmd = NCR53c7x0_read32 (DBC_REG); - next_dsp = (unsigned long *) NCR53c7x0_read32(DSP_REG); + next_dsp = bus_to_virt(NCR53c7x0_read32(DSP_REG)); dsp = next_dsp - NCR53c7x0_insn_size ((dbc_dcmd >> 24) & 0xff); /* XXX - check chip type */ - dsa = (unsigned long *) NCR53c7x0_read32(DSA_REG); + dsa = bus_to_virt(NCR53c7x0_read32(DSA_REG)); /* * DSTAT_ABRT is the aborted interrupt. This is set whenever the @@ -3503,14 +5158,14 @@ static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { #if 0 /* XXX - add code here to deal with normal abort */ if ((hostdata->options & OPTION_700) && (hostdata->state == - STATE_ABORTING) { + STATE_ABORTING)) { } else #endif { - printk("scsi%d : unexpected abort interrupt at\n" + printk(KERN_ALERT "scsi%d : unexpected abort interrupt at\n" " ", host->host_no); - print_insn (host, dsp, "s ", 1); - panic(" "); + print_insn (host, dsp, KERN_ALERT "s ", 1); + FATAL (host); } } @@ -3531,10 +5186,11 @@ static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { ~DCNTL_SSM) | DCNTL_STD); restore_flags(flags); } else { - printk("scsi%d : unexpected single step interrupt at\n" + printk(KERN_ALERT "scsi%d : unexpected single step interrupt at\n" " ", host->host_no); - print_insn (host, dsp, "", 1); - panic(" mail drew@colorad.edu\n"); + print_insn (host, dsp, KERN_ALERT "", 1); + printk(KERN_ALERT " mail drew@PoohSticks.ORG\n"); + FATAL (host); } } @@ -3545,7 +5201,7 @@ static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { * * XXX - we may want to emulate INTFLY here, so we can use * the same SCSI SCRIPT (tm) for NCR53c710 through NCR53c810 - * chips once we remove the ADD WITH CARRY instructions. + * chips. */ if (dstat & DSTAT_OPC) { @@ -3561,9 +5217,9 @@ static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { * can ignore it. */ - if (((dsp >= (hostdata->script + hostdata->E_select / sizeof(long))) && + if (((dsp >= (hostdata->script + hostdata->E_select / sizeof(u32))) && (dsp <= (hostdata->script + hostdata->E_select_msgout / - sizeof(long) + 8))) || (hostdata->test_running == 2)) { + sizeof(u32) + 8))) || (hostdata->test_running == 2)) { if (hostdata->options & OPTION_DEBUG_INTR) printk ("scsi%d : ignoring DSTAT_IID for SSTAT_STO\n", host->host_no); @@ -3578,41 +5234,44 @@ static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { } else { hostdata->expecting_sto = 1; } + /* + * We can't guarantee we'll be able to execute the WAIT DISCONNECT + * instruction within the 3.4us of bus free and arbitration delay + * that a target can RESELECT in and assert REQ after we've dropped + * ACK. If this happens, we'll get an illegal instruction interrupt. + * Doing away with the WAIT DISCONNECT instructions broke everything, + * so instead I'll settle for moving one WAIT DISCONNECT a few + * instructions closer to the CLEAR ACK before it to minimize the + * chances of this happening, and handle it if it occurs anyway. + * + * Simply continue with what we were doing, and control should + * be transfered to the schedule routine which will ultimately + * pass control onto the reselection or selection (not yet) + * code. + */ + } else if (dbc_dcmd == 0x48000000 && (NCR53c7x0_read8 (SBCL_REG) & + SBCL_REQ)) { + if (!(hostdata->options & OPTION_NO_PRINT_RACE)) + { + printk("scsi%d: REQ before WAIT DISCONNECT IID\n", + host->host_no); + hostdata->options |= OPTION_NO_PRINT_RACE; + } } else { - printk("scsi%d : illegal instruction ", host->host_no); - print_insn (host, dsp, "", 1); - printk("scsi%d : DSP=0x%lx, DCMD|DBC=0x%lx, DSA=0x%lx\n" - " DSPS=0x%lx, TEMP=0x%lx, DMODE=0x%x,\n" - " DNAD=0x%lx\n", - host->host_no, (unsigned long) dsp, dbc_dcmd, - (unsigned long) dsa, NCR53c7x0_read32(DSPS_REG), - NCR53c7x0_read32(TEMP_REG), (int) NCR53c7x0_read8(hostdata->dmode), - NCR53c7x0_read32(DNAD_REG)); - panic(" mail drew@Colorado.EDU\n"); + printk(KERN_ALERT "scsi%d : illegal instruction\n", host->host_no); + print_lots (host); + printk(KERN_ALERT " mail drew@PoohSticks.ORG with ALL\n" + " boot messages and diagnostic output\n"); + FATAL (host); } } /* - * DSTAT_BF are bus fault errors, generated when the chip has - * attempted to access an illegal address. + * DSTAT_BF are bus fault errors */ if (dstat & DSTAT_800_BF) { - printk("scsi%d : BUS FAULT, DSP=0x%lx, DCMD|DBC=0x%lx, DSA=0x%lx\n" - " DSPS=0x%lx, TEMP=0x%lx, DMODE=0x%x\n", - host->host_no, (unsigned long) dsp, NCR53c7x0_read32(DBC_REG), - (unsigned long) dsa, NCR53c7x0_read32(DSPS_REG), - NCR53c7x0_read32(TEMP_REG), (int) NCR53c7x0_read8(hostdata->dmode)); - print_dsa (host, dsa); - printk("scsi%d : DSP->\n", host->host_no); - print_insn(host, dsp, "", 1); - print_insn(host, next_dsp, "", 1); -#if 0 - panic(" mail drew@Colorado.EDU\n"); -#else - hostdata->idle = 1; - hostdata->options |= OPTION_DEBUG_INIT_ONLY; -#endif + intr_bf (host, cmd); } @@ -3635,29 +5294,33 @@ static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { abort_connected(host); break; case SPECIFIC_INT_PANIC: - printk("scsi%d : failure at ", host->host_no); - print_insn (host, dsp, "", 1); - panic(" dstat_sir_intr() returned SPECIFIC_INT_PANIC\n"); + printk(KERN_ALERT "scsi%d : failure at ", host->host_no); + print_insn (host, dsp, KERN_ALERT "", 1); + printk(KERN_ALERT " dstat_sir_intr() returned SPECIFIC_INT_PANIC\n"); + FATAL (host); break; case SPECIFIC_INT_BREAK: intr_break (host, cmd); break; default: - printk("scsi%d : failure at ", host->host_no); - print_insn (host, dsp, "", 1); - panic(" dstat_sir_intr() returned unknown value %d\n", + printk(KERN_ALERT "scsi%d : failure at ", host->host_no); + print_insn (host, dsp, KERN_ALERT "", 1); + printk(KERN_ALERT" dstat_sir_intr() returned unknown value %d\n", tmp); + FATAL (host); } } -/* All DMA interrupts are fatal. Flush SCSI queue */ - NCR53c7x0_write8 (STEST3_REG_800, STEST3_800_CSF); - while (NCR53c7x0_read8 (STEST3_REG_800) & STEST3_800_CSF); + if ((hostdata->chip / 100) == 8 && (dstat & DSTAT_800_MDPE)) { + printk(KERN_ALERT "scsi%d : Master Data Parity Error\n", + host->host_no); + FATAL (host); + } } /* * Function : static int print_insn (struct Scsi_Host *host, - * unsigned long *insn, int kernel) + * u32 *insn, int kernel) * * Purpose : print numeric representation of the instruction pointed * to by insn to the debugging or kernel message buffer @@ -3669,26 +5332,59 @@ static void intr_dma (struct Scsi_Host *host, struct NCR53c7x0_cmd *cmd) { * Inputs : host, insn - host, pointer to instruction, prefix - * string to prepend, kernel - use printk instead of debugging buffer. * - * Returns : size, in longs, of instruction printed. + * Returns : size, in u32s, of instruction printed. + */ + +/* + * FIXME: should change kernel parameter so that it takes an ENUM + * specifying severity - either KERN_ALERT or KERN_PANIC so + * all panic messages are output with the same severity. */ -static int print_insn (struct Scsi_Host *host, unsigned long *insn, - char *prefix, int kernel) { - char buf[80], /* Temporary buffer and pointer */ +static int +print_insn (struct Scsi_Host *host, const u32 *insn, + const char *prefix, int kernel) { + char buf[160], /* Temporary buffer and pointer. ICKY + arbitrary length. */ + + *tmp; unsigned char dcmd; /* dcmd register for *insn */ int size; - dcmd = (insn[0] >> 24) & 0xff; - sprintf(buf, "%s%08lx : 0x%08lx 0x%08lx", (prefix ? prefix : ""), - (unsigned long) insn, insn[0], insn[1]); - tmp = buf + strlen(buf); - if ((dcmd & DCMD_TYPE_MASK) == DCMD_TYPE_MMI) { - sprintf (tmp, " 0x%08lx\n", insn[2]); - size = 3; + /* + * Check to see if the instruction pointer is not bogus before + * indirecting through it; avoiding red-zone at start of + * memory. + * + * FIXME: icky magic needs to happen here on non-intel boxes which + * don't have kernel memory mapped in like this. Might be reasonable + * to use vverify()? + */ + + if (MAP_NR(insn) < 1 || MAP_NR(insn + 8) > MAP_NR(high_memory) || + ((((dcmd = (insn[0] >> 24) & 0xff) & DCMD_TYPE_MMI) == DCMD_TYPE_MMI) && + MAP_NR(insn + 12) > MAP_NR(high_memory))) { + size = 0; + sprintf (buf, "%s%p: address out of range\n", + prefix, insn); } else { - sprintf (tmp, "\n"); - size = 2; +/* + * FIXME : (void *) cast in virt_to_bus should be unnecessary, because + * it should take const void * as argument. + */ + sprintf(buf, "%s0x%lx (virt 0x%p) : 0x%08x 0x%08x (virt 0x%p)", + (prefix ? prefix : ""), virt_to_bus((void *) insn), insn, + insn[0], insn[1], bus_to_virt (insn[1])); + tmp = buf + strlen(buf); + if ((dcmd & DCMD_TYPE_MASK) == DCMD_TYPE_MMI) { + sprintf (tmp, " 0x%08x (virt 0x%p)\n", insn[2], + bus_to_virt(insn[2])); + size = 3; + } else { + sprintf (tmp, "\n"); + size = 2; + } } if (kernel) @@ -3703,6 +5399,28 @@ static int print_insn (struct Scsi_Host *host, unsigned long *insn, } /* + * Function : static const char *ncr_state (int state) + * + * Purpose : convert state (probably from hostdata->state) to a string + * + * Inputs : state + * + * Returns : char * representation of state, "unknown" on error. + */ + +static const char * +ncr_state (int state) { + switch (state) { + case STATE_HALTED: return "halted"; + case STATE_WAITING: return "waiting"; + case STATE_RUNNING: return "running"; + case STATE_ABORTING: return "aborting"; + case STATE_DISABLED: return "disabled"; + default: return "unknown"; + } +} + +/* * Function : int NCR53c7xx_abort (Scsi_Cmnd *cmd) * * Purpose : Abort an errant SCSI command, doing all necessary @@ -3714,14 +5432,61 @@ static int print_insn (struct Scsi_Host *host, unsigned long *insn, * Returns : 0 on success, -1 on failure. */ -int NCR53c7xx_abort (Scsi_Cmnd *cmd) { +int +NCR53c7xx_abort (Scsi_Cmnd *cmd) { + NCR53c7x0_local_declare(); struct Scsi_Host *host = cmd->host; - struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) - host->hostdata; + struct NCR53c7x0_hostdata *hostdata = host ? (struct NCR53c7x0_hostdata *) + host->hostdata : NULL; unsigned long flags; struct NCR53c7x0_cmd *curr, **prev; + Scsi_Cmnd *me, **last; +#if 0 + static long cache_pid = -1; +#endif + + + if (!host) { + printk ("Bogus SCSI command pid %ld; no host structure\n", + cmd->pid); + return SCSI_ABORT_ERROR; + } else if (!hostdata) { + printk ("Bogus SCSI host %d; no hostdata\n", host->host_no); + return SCSI_ABORT_ERROR; + } + NCR53c7x0_local_setup(host); + +/* + * CHECK : I don't think that reading ISTAT will unstack any interrupts, + * since we need to write the INTF bit to clear it, and SCSI/DMA + * interrupts don't clear until we read SSTAT/SIST and DSTAT registers. + * + * See that this is the case. + * + * I suspect that several of our failures may be coming from a new fatal + * interrupt (possibly due to a phase mismatch) happening after we've left + * the interrupt handler, but before the PIC has had the interrupt condition + * cleared. + */ + + if (NCR53c7x0_read8(hostdata->istat) & + (ISTAT_DIP|ISTAT_SIP| + (hostdata->chip / 100 == 8 ? ISTAT_800_INTF : 0))) { + printk ("scsi%d : dropped interrupt for command %ld\n", host->host_no, + cmd->pid); + NCR53c7x0_intr (host->irq, NULL, NULL); + return SCSI_ABORT_BUSY; + } + save_flags(flags); cli(); +#if 0 + if (cache_pid == cmd->pid) + panic ("scsi%d : bloody fetus %d\n", host->host_no, cmd->pid); + else + cache_pid = cmd->pid; +#endif + /* * The command could be hiding in the issue_queue. This would be very @@ -3733,23 +5498,24 @@ int NCR53c7xx_abort (Scsi_Cmnd *cmd) { * pull the command out of the old queue, and call it aborted. */ - for (curr = (struct NCR53c7x0_cmd *) hostdata->issue_queue, - prev = (struct NCR53c7x0_cmd **) &(hostdata->issue_queue); - curr && curr->cmd != cmd; prev = (struct NCR53c7x0_cmd **) - &(curr->next), curr = (struct NCR53c7x0_cmd *) curr->next); - - if (curr) { - *prev = (struct NCR53c7x0_cmd *) curr->next; -/* XXX - get rid of DLL ? */ - if (curr->prev) - curr->prev->next = curr->next; - - curr->next = hostdata->free; - hostdata->free = curr; - - cmd->result = 0; + for (me = (Scsi_Cmnd *) hostdata->issue_queue, + last = (Scsi_Cmnd **) &(hostdata->issue_queue); + me && me != cmd; last = (Scsi_Cmnd **)&(me->SCp.ptr), + me = (Scsi_Cmnd *)me->SCp.ptr); + + if (me) { + *last = (Scsi_Cmnd *) me->SCp.ptr; + if (me->host_scribble) { + ((struct NCR53c7x0_cmd *)me->host_scribble)->next = hostdata->free; + hostdata->free = (struct NCR53c7x0_cmd *) me->host_scribble; + me->host_scribble = NULL; + } + cmd->result = DID_ABORT << 16; cmd->scsi_done(cmd); + printk ("scsi%d : found command %ld in Linux issue queue\n", + host->host_no, me->pid); restore_flags(flags); + run_process_issue_queue(); return SCSI_ABORT_SUCCESS; } @@ -3764,32 +5530,59 @@ int NCR53c7xx_abort (Scsi_Cmnd *cmd) { &(curr->next), curr = (struct NCR53c7x0_cmd *) curr->next); if (curr) { - restore_flags(flags); - printk ("scsi%d : DANGER : command in running list, can not abort.\n", - cmd->host->host_no); - return SCSI_ABORT_SNOOZE; + if ((cmd->result & 0xff) != 0xff && (cmd->result & 0xff00) != 0xff00) { + if (prev) + *prev = (struct NCR53c7x0_cmd *) curr->next; + curr->next = (struct NCR53c7x0_cmd *) hostdata->free; + cmd->host_scribble = NULL; + hostdata->free = curr; + cmd->scsi_done(cmd); + printk ("scsi%d : found finished command %ld in running list\n", + host->host_no, cmd->pid); + restore_flags(flags); + return SCSI_ABORT_NOT_RUNNING; + } else { + printk ("scsi%d : DANGER : command running, can not abort.\n", + cmd->host->host_no); + restore_flags(flags); + return SCSI_ABORT_BUSY; + } } - /* * And if we couldn't find it in any of our queues, it must have been * a dropped interrupt. */ curr = (struct NCR53c7x0_cmd *) cmd->host_scribble; - curr->next = hostdata->free; - hostdata->free = curr; + if (curr) { + curr->next = hostdata->free; + hostdata->free = curr; + cmd->host_scribble = NULL; + } if (((cmd->result & 0xff00) == 0xff00) || ((cmd->result & 0xff) == 0xff)) { printk ("scsi%d : did this command ever run?\n", host->host_no); + cmd->result = DID_ABORT << 16; } else { printk ("scsi%d : probably lost INTFLY, normal completion\n", host->host_no); +/* + * FIXME : We need to add an additional flag which indicates if a + * command was ever counted as BUSY, so if we end up here we can + * decrement the busy count if and only if it is necessary. + */ + --hostdata->busy[cmd->target][cmd->lun]; } - cmd->scsi_done(cmd); restore_flags(flags); - return SCSI_ABORT_SNOOZE; + cmd->scsi_done(cmd); + +/* + * We need to run process_issue_queue since termination of this command + * may allow another queued command to execute first? + */ + return SCSI_ABORT_NOT_RUNNING; } /* @@ -3804,45 +5597,74 @@ int NCR53c7xx_abort (Scsi_Cmnd *cmd) { */ int -NCR53c7xx_reset (Scsi_Cmnd *cmd) { +NCR53c7xx_reset (Scsi_Cmnd *cmd, unsigned int reset_flags) { NCR53c7x0_local_declare(); unsigned long flags; - int found; + int found = 0; struct NCR53c7x0_cmd * c; Scsi_Cmnd *tmp; + /* + * When we call scsi_done(), it's going to wake up anything sleeping on the + * resources which were in use by the aborted commands, and we'll start to + * get new commands. + * + * We can't let this happen until after we've re-initialized the driver + * structures, and can't reinitialize those structures until after we've + * dealt with their contents. + * + * So, we need to find all of the commands which were running, stick + * them on a linked list of completed commands (we'll use the host_scribble + * pointer), do our reinitialization, and then call the done function for + * each command. + */ + Scsi_Cmnd *nuke_list = NULL; struct Scsi_Host *host = cmd->host; - struct NCR53c7x0_hostdata *hostdata = host ? - (struct NCR53c7x0_hostdata *) host->hostdata : NULL; + struct NCR53c7x0_hostdata *hostdata = + (struct NCR53c7x0_hostdata *) host->hostdata; + NCR53c7x0_local_setup(host); save_flags(flags); - halt (host); - NCR53c7x0_write8(SCNTL1_REG, SCNTL1_RST); - udelay(25); /* Minimum amount of time to assert RST */ - NCR53c7x0_write8(SCNTL1_REG, SCNTL1_RST); - for (c = (struct NCR53c7x0_cmd *) hostdata->running_list, found = 0; c; - c = (struct NCR53c7x0_cmd *) c->next) { - tmp = c->cmd; - c->next = hostdata->free; - hostdata->free = c; - - if (tmp == cmd) - found = 1; - tmp->result = DID_RESET << 16; - tmp->scsi_done(tmp); - } + cli(); + ncr_halt (host); + print_lots (host); + dump_events (host, 30); + ncr_scsi_reset (host); + for (tmp = nuke_list = return_outstanding_commands (host, 1 /* free */, + 0 /* issue */ ); tmp; tmp = (Scsi_Cmnd *) tmp->SCp.buffer) + if (tmp == cmd) { + found = 1; + break; + } + + /* + * If we didn't find the command which caused this reset in our running + * list, then we've lost it. See that it terminates normally anyway. + */ if (!found) { c = (struct NCR53c7x0_cmd *) cmd->host_scribble; if (c) { + cmd->host_scribble = NULL; c->next = hostdata->free; hostdata->free = c; - } - cmd->result = DID_RESET << 16; - cmd->scsi_done(cmd); + } else + printk ("scsi%d: lost command %ld\n", host->host_no, cmd->pid); + cmd->SCp.buffer = (struct scatterlist *) nuke_list; + nuke_list = cmd; } - restore_flags(flags); - printk ("scsi%d : DANGER : NCR53c7xx_reset is NOP\n", - cmd->host->host_no); + NCR53c7x0_driver_init (host); + hostdata->soft_reset (host); + if (hostdata->resets == 0) + disable(host); + else if (hostdata->resets != -1) + --hostdata->resets; + sti(); + for (; nuke_list; nuke_list = tmp) { + tmp = (Scsi_Cmnd *) nuke_list->SCp.buffer; + nuke_list->result = DID_RESET << 16; + nuke_list->scsi_done (nuke_list); + } + restore_flags(flags); return SCSI_RESET_SUCCESS; } @@ -3851,24 +5673,335 @@ NCR53c7xx_reset (Scsi_Cmnd *cmd) { * therefore shares the scsicam_bios_param function. */ -static void print_dsa (struct Scsi_Host *host, unsigned long *dsa) { +/* + * Function : int insn_to_offset (Scsi_Cmnd *cmd, u32 *insn) + * + * Purpose : convert instructions stored at NCR pointer into data + * pointer offset. + * + * Inputs : cmd - SCSI command; insn - pointer to instruction. Either current + * DSP, or saved data pointer. + * + * Returns : offset on success, -1 on failure. + */ + + +static int +insn_to_offset (Scsi_Cmnd *cmd, u32 *insn) { + struct NCR53c7x0_hostdata *hostdata = + (struct NCR53c7x0_hostdata *) cmd->host->hostdata; + struct NCR53c7x0_cmd *ncmd = + (struct NCR53c7x0_cmd *) cmd->host_scribble; + int offset = 0, buffers; + struct scatterlist *segment; + char *ptr; + int found = 0; + +/* + * With the current code implementation, if the insn is inside dynamically + * generated code, the data pointer will be the instruction preceding + * the next transfer segment. + */ + + if (!check_address ((unsigned long) ncmd, sizeof (struct NCR53c7x0_cmd)) && + ((insn >= ncmd->data_transfer_start && + insn < ncmd->data_transfer_end) || + (insn >= ncmd->residual && + insn < (ncmd->residual + + sizeof(ncmd->residual))))) { + ptr = bus_to_virt(insn[3]); + + if ((buffers = cmd->use_sg)) { + for (offset = 0, + segment = (struct scatterlist *) cmd->buffer; + buffers && !((found = ((ptr >= segment->address) && + (ptr < (segment->address + segment->length))))); + --buffers, offset += segment->length, ++segment) +#if 0 + printk("scsi%d: comparing 0x%p to 0x%p\n", + cmd->host->host_no, saved, segment->address); +#else + ; +#endif + offset += ptr - segment->address; + } else { + found = 1; + offset = ptr - (char *) (cmd->request_buffer); + } + } else if ((insn >= hostdata->script + + hostdata->E_data_transfer / sizeof(u32)) && + (insn <= hostdata->script + + hostdata->E_end_data_transfer / sizeof(u32))) { + found = 1; + offset = 0; + } + return found ? offset : -1; +} + + + +/* + * Function : void print_progress (Scsi_Cmnd *cmd) + * + * Purpose : print the current location of the saved data pointer + * + * Inputs : cmd - command we are interested in + * + */ + +static void +print_progress (Scsi_Cmnd *cmd) { + NCR53c7x0_local_declare(); + struct NCR53c7x0_cmd *ncmd = + (struct NCR53c7x0_cmd *) cmd->host_scribble; + int offset, i; + char *where; + u32 *ptr; + NCR53c7x0_local_setup (cmd->host); + for (i = 0; i < 2; ++i) { + if (check_address ((unsigned long) ncmd, + sizeof (struct NCR53c7x0_cmd)) == -1) + continue; + if (!i) { + where = "saved"; + ptr = bus_to_virt(ncmd->saved_data_pointer); + } else { + where = "active"; + ptr = bus_to_virt (NCR53c7x0_read32 (DSP_REG) - + NCR53c7x0_insn_size (NCR53c7x0_read8 (DCMD_REG)) * + sizeof(u32)); + } + offset = insn_to_offset (cmd, ptr); + + if (offset != -1) + printk ("scsi%d : %s data pointer at offset %d\n", + cmd->host->host_no, where, offset); + else { + int size; + printk ("scsi%d : can't determine %s data pointer offset\n", + cmd->host->host_no, where); + if (ncmd) { + size = print_insn (cmd->host, + bus_to_virt(ncmd->saved_data_pointer), "", 1); + print_insn (cmd->host, + bus_to_virt(ncmd->saved_data_pointer) + size * sizeof(u32), + "", 1); + } + } + } +} + + +static void +print_dsa (struct Scsi_Host *host, u32 *dsa, const char *prefix) { struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; int i, len; char *ptr; + Scsi_Cmnd *cmd; - printk("scsi%d : dsa at 0x%x\n" - " + %ld : dsa_msgout length = %lu, data = 0x%lx\n" , - host->host_no, (unsigned) dsa, hostdata->dsa_msgout, - dsa[hostdata->dsa_msgout / sizeof(long)], - dsa[hostdata->dsa_msgout / sizeof(long) + 1]); - - for (i = dsa[hostdata->dsa_msgout / sizeof(long)], - ptr = (char *) dsa[hostdata->dsa_msgout / sizeof(long) + 1]; i > 0; - ptr += len, i -= len) { - printk(" "); - len = print_msg (ptr); + if (check_address ((unsigned long) dsa, hostdata->dsa_end - + hostdata->dsa_start) == -1) { + printk("scsi%d : bad dsa virt 0x%p\n", host->host_no, dsa); + return; + } + printk("%sscsi%d : dsa at phys 0x%lx (virt 0x%p)\n" + " + %d : dsa_msgout length = %u, data = 0x%x (virt 0x%p)\n" , + prefix ? prefix : "", + host->host_no, virt_to_bus (dsa), dsa, hostdata->dsa_msgout, + dsa[hostdata->dsa_msgout / sizeof(u32)], + dsa[hostdata->dsa_msgout / sizeof(u32) + 1], + bus_to_virt (dsa[hostdata->dsa_msgout / sizeof(u32) + 1])); + + /* + * Only print messages if they're sane in length so we don't + * blow the kernel printk buffer on something which won't buy us + * anything. + */ + + if (dsa[hostdata->dsa_msgout / sizeof(u32)] < + sizeof (hostdata->free->select)) + for (i = dsa[hostdata->dsa_msgout / sizeof(u32)], + ptr = bus_to_virt (dsa[hostdata->dsa_msgout / sizeof(u32) + 1]); + i > 0 && !check_address ((unsigned long) ptr, 1); + ptr += len, i -= len) { + printk(" "); + len = print_msg (ptr); + printk("\n"); + if (!len) + break; + } + + printk(" + %d : select_indirect = 0x%x\n", + hostdata->dsa_select, dsa[hostdata->dsa_select / sizeof(u32)]); + cmd = (Scsi_Cmnd *) bus_to_virt(dsa[hostdata->dsa_cmnd / sizeof(u32)]); + printk(" + %d : dsa_cmnd = 0x%x ", hostdata->dsa_cmnd, + (u32) virt_to_bus(cmd)); + if (cmd) { + printk(" result = 0x%x, target = %d, lun = %d, cmd = ", + cmd->result, cmd->target, cmd->lun); + print_command(cmd->cmnd); + } else printk("\n"); + printk(" + %d : dsa_next = 0x%x\n", hostdata->dsa_next, + dsa[hostdata->dsa_next / sizeof(u32)]); + if (cmd) { + printk("scsi%d target %d : sxfer_sanity = 0x%x, scntl3_sanity = 0x%x\n" + " script : ", + host->host_no, cmd->target, + hostdata->sync[cmd->target].sxfer_sanity, + hostdata->sync[cmd->target].scntl3_sanity); + for (i = 0; i < (sizeof(hostdata->sync[cmd->target].script) / 4); ++i) + printk ("0x%x ", hostdata->sync[cmd->target].script[i]); + printk ("\n"); + print_progress (cmd); + } +} +/* + * Function : void print_queues (Scsi_Host *host) + * + * Purpose : print the contents of the NCR issue and reconnect queues + * + * Inputs : host - SCSI host we are interested in + * + */ + +static void +print_queues (struct Scsi_Host *host) { + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + u32 *dsa, *next_dsa; + volatile u32 *current; + int left; + Scsi_Cmnd *cmd, *next_cmd; + unsigned long flags; + + printk ("scsi%d : issue queue\n", host->host_no); + + for (left = host->can_queue, cmd = (Scsi_Cmnd *) hostdata->issue_queue; + left >= 0 && cmd; + cmd = next_cmd) { + next_cmd = (Scsi_Cmnd *) cmd->SCp.ptr; + save_flags(flags); + cli(); + if (cmd->host_scribble) { + if (check_address ((unsigned long) (cmd->host_scribble), + sizeof (cmd->host_scribble)) == -1) + printk ("scsi%d: scsi pid %ld bad pointer to NCR53c7x0_cmd\n", + host->host_no, cmd->pid); + /* print_dsa does sanity check on address, no need to check */ + else + print_dsa (host, ((struct NCR53c7x0_cmd *) cmd->host_scribble) + -> dsa, ""); + } else + printk ("scsi%d : scsi pid %ld for target %d lun %d has no NCR53c7x0_cmd\n", + host->host_no, cmd->pid, cmd->target, cmd->lun); + restore_flags(flags); + } + + if (left <= 0) { + printk ("scsi%d : loop detected in issue queue\n", + host->host_no); + } + + /* + * Traverse the NCR reconnect and start DSA structures, printing out + * each element until we hit the end or detect a loop. Currently, + * the reconnect structure is a linked list; and the start structure + * is an array. Eventually, the reconnect structure will become a + * list as well, since this simplifies the code. + */ + + printk ("scsi%d : schedule dsa array :\n", host->host_no); + for (left = host->can_queue, current = hostdata->schedule; + left > 0; current += 2, --left) + if (current[0] != hostdata->NOP_insn) +/* FIXME : convert pointer to dsa_begin to pointer to dsa. */ + print_dsa (host, bus_to_virt (current[1] - + (hostdata->E_dsa_code_begin - + hostdata->E_dsa_code_template)), ""); + printk ("scsi%d : end schedule dsa array\n", host->host_no); + + printk ("scsi%d : reconnect_dsa_head :\n", host->host_no); + + for (left = host->can_queue, + dsa = bus_to_virt (hostdata->reconnect_dsa_head); + left >= 0 && dsa; + dsa = next_dsa) { + save_flags (flags); + cli(); + if (check_address ((unsigned long) dsa, sizeof(dsa)) == -1) { + printk ("scsi%d: bad DSA pointer 0x%p", host->host_no, + dsa); + next_dsa = NULL; + } + else + { + next_dsa = bus_to_virt(dsa[hostdata->dsa_next / sizeof(u32)]); + print_dsa (host, dsa, ""); + } + restore_flags(flags); + } + printk ("scsi%d : end reconnect_dsa_head\n", host->host_no); + if (left < 0) + printk("scsi%d: possible loop in ncr reconnect list\n", + host->host_no); +} + +static void +print_lots (struct Scsi_Host *host) { + NCR53c7x0_local_declare(); + struct NCR53c7x0_hostdata *hostdata = + (struct NCR53c7x0_hostdata *) host->hostdata; + u32 *dsp_next, *dsp, *dsa, dbc_dcmd; + unsigned char dcmd, sbcl; + int i, size; + NCR53c7x0_local_setup(host); + + if ((dsp_next = bus_to_virt(NCR53c7x0_read32 (DSP_REG)))) { + dbc_dcmd = NCR53c7x0_read32(DBC_REG); + dcmd = (dbc_dcmd & 0xff000000) >> 24; + dsp = dsp_next - NCR53c7x0_insn_size(dcmd); + dsa = bus_to_virt(NCR53c7x0_read32(DSA_REG)); + sbcl = NCR53c7x0_read8 (SBCL_REG); + + + printk ("scsi%d : DCMD|DBC=0x%x, DNAD=0x%x (virt 0x%p)\n" + " DSA=0x%lx (virt 0x%p)\n" + " DSPS=0x%x, TEMP=0x%x (virt 0x%p), DMODE=0x%x\n" + " SXFER=0x%x, SCNTL3=0x%x\n" + " %s%s%sphase=%s, %d bytes in SCSI FIFO\n" + " STEST0=0x%x\n", + host->host_no, dbc_dcmd, NCR53c7x0_read32(DNAD_REG), + bus_to_virt(NCR53c7x0_read32(DNAD_REG)), + virt_to_bus(dsa), dsa, + NCR53c7x0_read32(DSPS_REG), NCR53c7x0_read32(TEMP_REG), + bus_to_virt (NCR53c7x0_read32(TEMP_REG)), + (int) NCR53c7x0_read8(hostdata->dmode), + (int) NCR53c7x0_read8(SXFER_REG), + (int) NCR53c7x0_read8(SCNTL3_REG_800), + (sbcl & SBCL_BSY) ? "BSY " : "", + (sbcl & SBCL_SEL) ? "SEL " : "", + (sbcl & SBCL_REQ) ? "REQ " : "", + sstat2_to_phase(NCR53c7x0_read8 (((hostdata->chip / 100) == 8) ? + SSTAT1_REG : SSTAT2_REG)), + (NCR53c7x0_read8 ((hostdata->chip / 100) == 8 ? + SSTAT1_REG : SSTAT2_REG) & SSTAT2_FF_MASK) >> SSTAT2_FF_SHIFT, + NCR53c7x0_read8 (STEST0_REG_800)); + printk ("scsi%d : DSP 0x%lx (virt 0x%p) ->\n", host->host_no, + virt_to_bus(dsp), dsp); + for (i = 6; i > 0; --i, dsp += size) + size = print_insn (host, dsp, "", 1); + if (NCR53c7x0_read8 (SCNTL1_REG) & SCNTL1_CON) { + printk ("scsi%d : connected (SDID=0x%x, SSID=0x%x)\n", + host->host_no, NCR53c7x0_read8 (SDID_REG_800), + NCR53c7x0_read8 (SSID_REG_800)); + print_dsa (host, dsa, ""); + } + +#if 1 + print_queues (host); +#endif } } @@ -3877,11 +6010,9 @@ static void print_dsa (struct Scsi_Host *host, unsigned long *dsa) { * * Purpose : does a clean (we hope) shutdown of the NCR SCSI * chip. Use prior to dumping core, unloading the NCR driver, - * etc. * * Returns : 0 on success */ -#ifdef MODULE static int shutdown (struct Scsi_Host *host) { NCR53c7x0_local_declare(); @@ -3891,26 +6022,179 @@ shutdown (struct Scsi_Host *host) { NCR53c7x0_local_setup(host); save_flags (flags); cli(); - halt (host); +/* Get in a state where we can reset the SCSI bus */ + ncr_halt (host); + ncr_scsi_reset (host); hostdata->soft_reset(host); -/* - * For now, we take the simplest solution : reset the SCSI bus. Eventually, - * - If a command is connected, kill it with an ABORT message - * - If commands are disconnected, connect to each target/LUN and - * do a ABORT, followed by a SOFT reset, followed by a hard - * reset. + + disable (host); + restore_flags (flags); + return 0; +} + +/* + * Function : void ncr_scsi_reset (struct Scsi_Host *host) + * + * Purpose : reset the SCSI bus. */ + +static void +ncr_scsi_reset (struct Scsi_Host *host) { + NCR53c7x0_local_declare(); + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + unsigned long flags; + int sien = 0; + NCR53c7x0_local_setup(host); + save_flags (flags); + cli(); + if ((hostdata->chip / 100) == 8) { + sien = NCR53c7x0_read8(SIEN0_REG_800); + NCR53c7x0_write8(SIEN0_REG_800, sien & ~SIEN_RST); + } NCR53c7x0_write8(SCNTL1_REG, SCNTL1_RST); udelay(25); /* Minimum amount of time to assert RST */ - NCR53c7x0_write8(SCNTL1_REG, SCNTL1_RST); + NCR53c7x0_write8(SCNTL1_REG, 0); + if ((hostdata->chip / 100) == 8) { + NCR53c7x0_write8(SIEN0_REG_800, sien); + } restore_flags (flags); - return 0; } -#endif + +/* + * Function : void hard_reset (struct Scsi_Host *host) + * + */ + +static void +hard_reset (struct Scsi_Host *host) { + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + unsigned long flags; + save_flags (flags); + cli(); + ncr_scsi_reset(host); + NCR53c7x0_driver_init (host); + if (hostdata->soft_reset) + hostdata->soft_reset (host); + restore_flags(flags); +} /* - * Function : static int halt (struct Scsi_Host *host) + * Function : Scsi_Cmnd *return_outstanding_commands (struct Scsi_Host *host, + * int free, int issue) + * + * Purpose : return a linked list (using the SCp.buffer field as next, + * so we don't perturb hostdata. We don't use a field of the + * NCR53c7x0_cmd structure since we may not have allocated one + * for the command causing the reset.) of Scsi_Cmnd structures that + * had propagated below the Linux issue queue level. If free is set, + * free the NCR53c7x0_cmd structures which are associated with + * the Scsi_Cmnd structures, and clean up any internal + * NCR lists that the commands were on. If issue is set, + * also return commands in the issue queue. + * + * Returns : linked list of commands + * + * NOTE : the caller should insure that the NCR chip is halted + * if the free flag is set. + */ + +static Scsi_Cmnd * +return_outstanding_commands (struct Scsi_Host *host, int free, int issue) { + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + struct NCR53c7x0_cmd *c; + int i; + u32 *current; + Scsi_Cmnd *list = NULL, *tmp; + for (c = (struct NCR53c7x0_cmd *) hostdata->running_list; c; + c = (struct NCR53c7x0_cmd *) c->next) { + if (c->cmd->SCp.buffer) { + printk ("scsi%d : loop detected in running list!\n", host->host_no); + break; + } else { + printk ("The sti() implicit in a printk() prevents hangs\n"); + break; + } + + c->cmd->SCp.buffer = (struct scatterlist *) list; + list = c->cmd; + if (free) { + c->next = hostdata->free; + hostdata->free = c; + } + } + + if (free) { + for (i = 0, current = (u32 *) hostdata->schedule; + i < host->can_queue; ++i, current += 2) { + current[0] = hostdata->NOP_insn; + current[1] = 0xdeadbeef; + } + hostdata->current = NULL; + } + + if (issue) { + for (tmp = (Scsi_Cmnd *) hostdata->issue_queue; tmp; tmp = tmp->next) { + if (tmp->SCp.buffer) { + printk ("scsi%d : loop detected in issue queue!\n", + host->host_no); + break; + } + tmp->SCp.buffer = (struct scatterlist *) list; + list = tmp; + } + if (free) + hostdata->issue_queue = NULL; + + } + return list; +} + +/* + * Function : static int disable (struct Scsi_Host *host) + * + * Purpose : disables the given NCR host, causing all commands + * to return a driver error. Call this so we can unload the + * module during development and try again. Eventually, + * we should be able to find clean workarounds for these + * problems. + * + * Inputs : host - hostadapter to twiddle + * + * Returns : 0 on success. + */ + +static int +disable (struct Scsi_Host *host) { + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + unsigned long flags; + Scsi_Cmnd *nuke_list, *tmp; + save_flags(flags); + cli(); + if (hostdata->state != STATE_HALTED) + ncr_halt (host); + nuke_list = return_outstanding_commands (host, 1 /* free */, 1 /* issue */); + hard_reset (host); + hostdata->state = STATE_DISABLED; + restore_flags(flags); + printk ("scsi%d : nuking commands\n", host->host_no); + for (; nuke_list; nuke_list = tmp) { + tmp = (Scsi_Cmnd *) nuke_list->SCp.buffer; + nuke_list->result = DID_ERROR << 16; + nuke_list->scsi_done(nuke_list); + } + printk ("scsi%d : done. \n", host->host_no); + printk (KERN_ALERT "scsi%d : disabled. Unload and reload\n", + host->host_no); + return 0; +} + +/* + * Function : static int ncr_halt (struct Scsi_Host *host) * * Purpose : halts the SCSI SCRIPTS(tm) processor on the NCR chip * @@ -3920,19 +6204,27 @@ shutdown (struct Scsi_Host *host) { */ static int -halt (struct Scsi_Host *host) { +ncr_halt (struct Scsi_Host *host) { NCR53c7x0_local_declare(); unsigned long flags; unsigned char istat, tmp; struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) host->hostdata; + int stage; NCR53c7x0_local_setup(host); save_flags(flags); cli(); - NCR53c7x0_write8(hostdata->istat, ISTAT_ABRT); - /* Eat interrupts until we find what we're looking for */ - for (;;) { + /* Stage 0 : eat all interrupts + Stage 1 : set ABORT + Stage 2 : eat all but abort interrupts + Stage 3 : eat all interrupts + */ + for (stage = 0;;) { + if (stage == 1) { + NCR53c7x0_write8(hostdata->istat, ISTAT_ABRT); + ++stage; + } istat = NCR53c7x0_read8 (hostdata->istat); if (istat & ISTAT_SIP) { if ((hostdata->chip / 100) == 8) { @@ -3943,23 +6235,131 @@ halt (struct Scsi_Host *host) { tmp = NCR53c7x0_read8(SSTAT0_REG); } } else if (istat & ISTAT_DIP) { - NCR53c7x0_write8(hostdata->istat, 0); tmp = NCR53c7x0_read8(DSTAT_REG); - if (tmp & DSTAT_ABRT) - break; - else - panic("scsi%d: could not halt NCR chip\n", host->host_no); + if (stage == 2) { + if (tmp & DSTAT_ABRT) { + NCR53c7x0_write8(hostdata->istat, 0); + ++stage; + } else { + printk(KERN_ALERT "scsi%d : could not halt NCR chip\n", + host->host_no); + disable (host); + } + } } + if (!(istat & (ISTAT_SIP|ISTAT_DIP))) + if (stage == 0) + ++stage; + else if (stage == 3) + break; } hostdata->state = STATE_HALTED; restore_flags(flags); +#if 0 + print_lots (host); +#endif return 0; } +/* + * Function: event_name (int event) + * + * Purpose: map event enum into user-readable strings. + */ + +static const char * +event_name (int event) { + switch (event) { + case EVENT_NONE: return "none"; + case EVENT_ISSUE_QUEUE: return "to issue queue"; + case EVENT_START_QUEUE: return "to start queue"; + case EVENT_SELECT: return "selected"; + case EVENT_DISCONNECT: return "disconnected"; + case EVENT_RESELECT: return "reselected"; + case EVENT_COMPLETE: return "completed"; + case EVENT_IDLE: return "idle"; + case EVENT_SELECT_FAILED: return "select failed"; + case EVENT_BEFORE_SELECT: return "before select"; + case EVENT_RESELECT_FAILED: return "reselect failed"; + default: return "unknown"; + } +} + +/* + * Function : void dump_events (struct Scsi_Host *host, count) + * + * Purpose : print last count events which have occurred. + */ +static void +dump_events (struct Scsi_Host *host, int count) { + struct NCR53c7x0_hostdata *hostdata = (struct NCR53c7x0_hostdata *) + host->hostdata; + struct NCR53c7x0_event event; + int i; + unsigned long flags; + if (hostdata->events) { + if (count > hostdata->event_size) + count = hostdata->event_size; + for (i = hostdata->event_index; count > 0; + i = (i ? i - 1 : hostdata->event_size -1), --count) { + save_flags(flags); +/* + * By copying the event we're currently examining with interrupts + * disabled, we can do multiple printk(), etc. operations and + * still be guaranteed that they're happening on the same + * event structure. + */ + cli(); +#if 0 + event = hostdata->events[i]; +#else + memcpy ((void *) &event, (void *) &(hostdata->events[i]), + sizeof(event)); +#endif + + restore_flags(flags); + printk ("scsi%d : %s event %d at %ld secs %ld usecs target %d lun %d\n", + host->host_no, event_name (event.event), count, + (long) event.time.tv_sec, (long) event.time.tv_usec, + event.target, event.lun); + if (event.dsa) + printk (" event for dsa 0x%lx (virt 0x%p)\n", + virt_to_bus(event.dsa), event.dsa); + if (event.pid != -1) { + printk (" event for pid %ld ", event.pid); + print_command (event.cmnd); + } + } + } +} + +/* + * Function: check_address + * + * Purpose: Check to see if a possibly corrupt pointer will fault the + * kernel. + * + * Inputs: addr - address; size - size of area + * + * Returns: 0 if area is OK, -1 on error. + * + * NOTES: should be implemented in terms of vverify on kernels + * that have it. + */ + +static int +check_address (unsigned long addr, int size) { + return (MAP_NR(addr) < 1 || MAP_NR(addr + size) > MAP_NR(high_memory) ? + -1 : 0); +} + #ifdef MODULE -int NCR53c7x0_release(struct Scsi_Host *host) { +int +NCR53c7x0_release(struct Scsi_Host *host) { + struct NCR53c7x0_hostdata *hostdata = + (struct NCR53c7x0_hostdata *) host->hostdata; + struct NCR53c7x0_cmd *cmd, *tmp; shutdown (host); -/* FIXME : need to recursively free tpnt structure */ if (host->irq != IRQ_NONE) { int irq_count; @@ -3968,10 +6368,29 @@ int NCR53c7x0_release(struct Scsi_Host *host) { if (tmp->hostt == the_template && tmp->irq == host->irq) ++irq_count; if (irq_count == 1) - free_irq(host->irq); + free_irq(host->irq, NULL); } if (host->dma_channel != DMA_NONE) free_dma(host->dma_channel); + if (host->io_port) + release_region(host->io_port, host->n_io_port); + + for (cmd = (struct NCR53c7x0_cmd *) hostdata->free; cmd; cmd = tmp, + --hostdata->num_cmds) { + tmp = (struct NCR53c7x0_cmd *) cmd->next; + /* + * If we're going to loop, try to stop it to get a more accurate + * count of the leaked commands. + */ + cmd->next = NULL; + if (cmd->free) + cmd->free ((void *) cmd->real, cmd->size); + } + if (hostdata->num_cmds) + printk ("scsi%d : leaked %d NCR53c7x0_cmd structures\n", + host->host_no, hostdata->num_cmds); + if (hostdata->events) + vfree ((void *)hostdata->events); return 1; } Scsi_Host_Template driver_template = NCR53c7xx; |