g_ncr5380.c

基于组件方式开发操作系统的OSKIT源代码

/*
 * Generic Generic NCR5380 driver
 *	
 * Copyright 1993, Drew Eckhardt
 *	Visionary Computing
 *	(Unix and Linux consulting and custom programming)
 *	[e-mail]
 *      [phone]
 *
 * NCR53C400 extensions (c) 1994,1995,1996, Kevin Lentin
 *    [e-mail]
 *
 * NCR53C400A extensions (c) 1996, Ingmar Baumgart
 *    [e-mail]
 *
 * DTC3181E extensions (c) 1997, Ronald van Cuijlenborg
 * [e-mail] or [e-mail]
 *
 * ALPHA RELEASE 1. 
 *
 * For more information, please consult 
 *
 * NCR 5380 Family
 * SCSI Protocol Controller
 * Databook
 *
 * NCR Microelectronics
 * 1635 Aeroplaza Drive
 * Colorado Springs, CO 80916
 * 1+ [phone]
 * 1+ [phone]
 */

/* 
 * TODO : flesh out DMA support, find some one actually using this (I have
 * 	a memory mapped Trantor board that works fine)
 */

/*
 * Options :
 *
 * PARITY - enable parity checking.  Not supported.
 *
 * SCSI2 - enable support for SCSI-II tagged queueing.  Untested.
 *
 * USLEEP - enable support for devices that don't disconnect.  Untested.
 *
 * The card is detected and initialized in one of several ways : 
 * 1.  With command line overrides - NCR5380=port,irq may be 
 *     used on the LILO command line to override the defaults.
 *
 * 2.  With the GENERIC_NCR5380_OVERRIDE compile time define.  This is 
 *     specified as an array of address, irq, dma, board tuples.  Ie, for
 *     one board at 0x350, IRQ5, no dma, I could say  
 *     -DGENERIC_NCR5380_OVERRIDE={{0xcc000, 5, DMA_NONE, BOARD_NCR5380}}
 * 
 * -1 should be specified for no or DMA interrupt, -2 to autoprobe for an 
 * 	IRQ line if overridden on the command line.
 *
 * 3.  When included as a module, with arguments passed on the command line:
 *         ncr_irq=xx	the interrupt
 *         ncr_addr=xx  the port or base address (for port or memory
 *              	mapped, resp.)
 *         ncr_dma=xx	the DMA
 *         ncr_5380=1	to set up for a NCR5380 board
 *         ncr_53c400=1	to set up for a NCR53C400 board
 *     e.g.
 *     modprobe g_NCR5380 ncr_irq=5 ncr_addr=0x350 ncr_5380=1
 *       for a port mapped NCR5380 board or
 *     modprobe g_NCR5380 ncr_irq=255 ncr_addr=0xc8000 ncr_53c400=1
 *       for a memory mapped NCR53C400 board with interrupts disabled.
 * 
 * 255 should be specified for no or DMA interrupt, 254 to autoprobe for an 
 * 	IRQ line if overridden on the command line.
 *     
 */
 
/*
 * $Log: generic_NCR5380.c,v $
 */

/* settings for DTC3181E card with only Mustek scanner attached */
#define USLEEP
#define USLEEP_POLL	1
#define USLEEP_SLEEP	20
#define USLEEP_WAITLONG	500

#define AUTOPROBE_IRQ
#define AUTOSENSE

#include <linux/config.h>
#ifdef CONFIG_SCSI_GENERIC_NCR5380

#ifdef CONFIG_SCSI_GENERIC_NCR53C400
#define NCR53C400_PSEUDO_DMA 1
#define PSEUDO_DMA
#define NCR53C400
#define NCR5380_STATS
#undef NCR5380_STAT_LIMIT
#endif
#if defined(CONFIG_SCSI_G_NCR5380_PORT) && defined(CONFIG_SCSI_G_NCR5380_MEM)
#error You can not configure the Generic NCR 5380 SCSI Driver for memory mapped I/O and port mapped I/O at the same time (yet)
#endif
#if !defined(CONFIG_SCSI_G_NCR5380_PORT) && !defined(CONFIG_SCSI_G_NCR5380_MEM)
#error You must configure the Generic NCR 5380 SCSI Driver for one of memory mapped I/O and port mapped I/O.
#endif

#include <asm/system.h>
#include <asm/io.h>
#include <linux/signal.h>
#include <linux/sched.h>
#include <linux/blk.h>
#include "scsi.h"
#include "hosts.h"
#include "g_NCR5380.h"
#include "NCR5380.h"
#include "constants.h"
#include "sd.h"
#include <linux/stat.h>
#include <linux/init.h>
#include<linux/ioport.h>

struct proc_dir_entry proc_scsi_g_ncr5380 = {
    PROC_SCSI_GENERIC_NCR5380, 9, "g_NCR5380",
    S_IFDIR | S_IRUGO | S_IXUGO, 2
};

#define NCR_NOT_SET 0
static int ncr_irq=NCR_NOT_SET;
static int ncr_dma=NCR_NOT_SET;
static int ncr_addr=NCR_NOT_SET;
static int ncr_5380=NCR_NOT_SET;
static int ncr_53c400=NCR_NOT_SET;
static int ncr_53c400a=NCR_NOT_SET;
static int dtc_3181e=NCR_NOT_SET;

static struct override {
	NCR5380_implementation_fields;
    int irq;
    int dma;
    int board;	/* Use NCR53c400, Ricoh, etc. extensions ? */
} overrides 
#ifdef GENERIC_NCR5380_OVERRIDE 
    [] __initdata = GENERIC_NCR5380_OVERRIDE
#else
    [1] __initdata = {{0,},};
#endif

#define NO_OVERRIDES (sizeof(overrides) / sizeof(struct override))

/*
 * Function : static internal_setup(int board, char *str, int *ints)
 *
 * Purpose : LILO command line initialization of the overrides array,
 * 
 * Inputs : board - either BOARD_NCR5380 for a normal NCR5380 board, 
 * 	or BOARD_NCR53C400 for a NCR53C400 board. str - unused, ints - 
 *	array of integer parameters with ints[0] equal to the number of ints.
 *
 */

__initfunc(static void internal_setup(int board, char *str, int *ints)) {
    static int commandline_current = 0;
    switch (board) {
    case BOARD_NCR5380:
	if (ints[0] != 2 && ints[0] != 3) {
	    printk("generic_NCR5380_setup : usage ncr5380=" STRVAL(NCR5380_map_name) ",irq,dma\n");
	    return;
	}
    case BOARD_NCR53C400:
	if (ints[0] != 2) {
	    printk("generic_NCR53C400_setup : usage ncr53c400=" STRVAL(NCR5380_map_name) ",irq\n");
	    return;
	}
    case BOARD_NCR53C400A:
	if (ints[0] != 2) {
	    printk("generic_NCR53C400A_setup : usage ncr53c400a=" STRVAL(NCR5380_map_name) ",irq\n");
	    return;
	}
    case BOARD_DTC3181E:
	if (ints[0] != 2) {
	    printk("generic_DTC3181E_setup : usage dtc3181e=" STRVAL(NCR5380_map_name) ",irq\n");
	    return;
	}
    }

    if (commandline_current < NO_OVERRIDES) {
	overrides[commandline_current].NCR5380_map_name = (NCR5380_map_type)ints[1];
	overrides[commandline_current].irq = ints[2];
	if (ints[0] == 3) 
	    overrides[commandline_current].dma = ints[3];
	else 
	    overrides[commandline_current].dma = DMA_NONE;
	overrides[commandline_current].board = board;
	    ++commandline_current;
    }
}

/*
 * Function : generic_NCR5380_setup (char *str, int *ints)
 *
 * Purpose : LILO command line initialization of the overrides array,
 * 
 * Inputs : str - unused, ints - array of integer parameters with ints[0] 
 * 	equal to the number of ints.
 */

__initfunc(void generic_NCR5380_setup (char *str, int *ints)) {
    internal_setup (BOARD_NCR5380, str, ints);
}

/*
 * Function : generic_NCR53C400_setup (char *str, int *ints)
 *
 * Purpose : LILO command line initialization of the overrides array,
 * 
 * Inputs : str - unused, ints - array of integer parameters with ints[0] 
 * 	equal to the number of ints.
 */

__initfunc(void generic_NCR53C400_setup (char *str, int *ints)) {
    internal_setup (BOARD_NCR53C400, str, ints);
}

/*
 * Function : generic_NCR53C400A_setup (char *str, int *ints)
 *
 * Purpose : LILO command line initialization of the overrides array,
 * 
 * Inputs : str - unused, ints - array of integer parameters with ints[0] 
 * 	equal to the number of ints.
 */

void generic_NCR53C400A_setup (char *str, int *ints) {
    internal_setup (BOARD_NCR53C400A, str, ints);
}

/*
 * Function : generic_DTC3181E_setup (char *str, int *ints)
 *
 * Purpose : LILO command line initialization of the overrides array,
 * 
 * Inputs : str - unused, ints - array of integer parameters with ints[0] 
 * 	equal to the number of ints.
 */

void generic_DTC3181E_setup (char *str, int *ints) {
    internal_setup (BOARD_DTC3181E, str, ints);
}

/* 
 * Function : int generic_NCR5380_detect(Scsi_Host_Template * tpnt)
 *
 * Purpose : initializes generic NCR5380 driver based on the 
 *	command line / compile time port and irq definitions.
 *
 * Inputs : tpnt - template for this SCSI adapter.
 * 
 * Returns : 1 if a host adapter was found, 0 if not.
 *
 */

__initfunc(int generic_NCR5380_detect(Scsi_Host_Template * tpnt)) {
    static int current_override = 0;
    int count, i;
    u_int *ports;
    u_int ncr_53c400a_ports[] = {0x280, 0x290, 0x300, 0x310, 0x330,
    		     		0x340, 0x348, 0x350, 0};
    u_int dtc_3181e_ports[] = {0x220, 0x240, 0x280, 0x2a0, 0x2c0,
    			     0x300, 0x320, 0x340, 0};
    int flags = 0;
    struct Scsi_Host *instance;

    if (ncr_irq != NCR_NOT_SET)
	overrides[0].irq=ncr_irq;
    if (ncr_dma != NCR_NOT_SET)
	overrides[0].dma=ncr_dma;
    if (ncr_addr != NCR_NOT_SET)
	overrides[0].NCR5380_map_name=(NCR5380_map_type)ncr_addr;
    if (ncr_5380 != NCR_NOT_SET)
	overrides[0].board=BOARD_NCR5380;
    else if (ncr_53c400 != NCR_NOT_SET)
	overrides[0].board=BOARD_NCR53C400;
    else if (ncr_53c400a != NCR_NOT_SET)
        overrides[0].board=BOARD_NCR53C400A;
    else if (dtc_3181e != NCR_NOT_SET)
        overrides[0].board=BOARD_DTC3181E;

    tpnt->proc_dir = &proc_scsi_g_ncr5380;

    for (count = 0; current_override < NO_OVERRIDES; ++current_override) {
	if (!(overrides[current_override].NCR5380_map_name))
	    continue;

	ports = 0;
	switch (overrides[current_override].board) {
	case BOARD_NCR5380:
	    flags = FLAG_NO_PSEUDO_DMA;
	    break;
	case BOARD_NCR53C400:
	    flags = FLAG_NCR53C400;
	    break;
	case BOARD_NCR53C400A:
	    flags = FLAG_NO_PSEUDO_DMA;
            ports = ncr_53c400a_ports;
	    break;
	case BOARD_DTC3181E:
	    flags = FLAG_NO_PSEUDO_DMA | FLAG_DTC3181E;
	    ports = dtc_3181e_ports;
	    break;
	}

	if (ports) {
	    /* wakeup sequence for the NCR53C400A and DTC3181E*/

	    /* Disable the adapter and look for a free io port */
	    outb(0x59, 0x779);
	    outb(0xb9, 0x379);
	    outb(0xc5, 0x379);
	    outb(0xae, 0x379);
	    outb(0xa6, 0x379);
	    outb(0x00, 0x379);

	    if (overrides[current_override].NCR5380_map_name != PORT_AUTO)
	        for(i=0; ports[i]; i++) {
	            if (overrides[current_override].NCR5380_map_name == ports[i])
	                break;
	        }
	    else
	        for(i=0; ports[i]; i++) {
	            if ((!check_region(ports[i], 16)) && (inb(ports[i]) == 0xff))
	                break;
		}
	    if (ports[i]) {
	        outb(0x59, 0x779);
	        outb(0xb9, 0x379);
	        outb(0xc5, 0x379);
	        outb(0xae, 0x379);
	        outb(0xa6, 0x379);
	        outb(0x80 | i, 0x379);          /* set io port to be used */
        	outb(0xc0, ports[i] + 9);
	        if (inb(ports[i] + 9) != 0x80)
	            continue;
	        else
	            overrides[current_override].NCR5380_map_name=ports[i];
	    } else
	        continue;
	}

	request_region(overrides[current_override].NCR5380_map_name,
					NCR5380_region_size, "ncr5380");

	instance = scsi_register (tpnt, sizeof(struct NCR5380_hostdata));
	instance->NCR5380_instance_name = overrides[current_override].NCR5380_map_name;

	NCR5380_init(instance, flags);

	if (overrides[current_override].irq != IRQ_AUTO)
	    instance->irq = overrides[current_override].irq;
	else 
	    instance->irq = NCR5380_probe_irq(instance, 0xffff);

	if (instance->irq != IRQ_NONE) 
	    if (request_irq(instance->irq, do_generic_NCR5380_intr, SA_INTERRUPT, "NCR5380", NULL)) {
		printk("scsi%d : IRQ%d not free, interrupts disabled\n", 
		    instance->host_no, instance->irq);
		instance->irq = IRQ_NONE;
	    } 

	if (instance->irq == IRQ_NONE) {
	    printk("scsi%d : interrupts not enabled. for better interactive performance,\n", instance->host_no);
	    printk("scsi%d : please jumper the board for a free IRQ.\n", instance->host_no);
	}

	printk("scsi%d : at " STRVAL(NCR5380_map_name) " 0x%x", instance->host_no, (unsigned int)instance->NCR5380_instance_name);
	if (instance->irq == IRQ_NONE)
	    printk (" interrupts disabled");
	else 
	    printk (" irq %d", instance->irq);
	printk(" options CAN_QUEUE=%d  CMD_PER_LUN=%d release=%d",
	    CAN_QUEUE, CMD_PER_LUN, GENERIC_NCR5380_PUBLIC_RELEASE);
	NCR5380_print_options(instance);
	printk("\n");

	++current_override;
	++count;
    }
    return count;
}

const char * generic_NCR5380_info (struct Scsi_Host* host) {
    static const char string[]="Generic NCR5380/53C400 Driver";
    return string;
}

int generic_NCR5380_release_resources(struct Scsi_Host * instance)
{
    NCR5380_local_declare();

    NCR5380_setup(instance);

    release_region(instance->NCR5380_instance_name, NCR5380_region_size);

    if (instance->irq != IRQ_NONE)
	free_irq(instance->irq, NULL);

	return 0;
}

#ifdef BIOSPARAM
/*
 * Function : int generic_NCR5380_biosparam(Disk * disk, kdev_t dev, int *ip)
 *
 * Purpose : Generates a BIOS / DOS compatible H-C-S mapping for 
 *	the specified device / size.
 * 
 * Inputs : size = size of device in sectors (512 bytes), dev = block device
 *	major / minor, ip[] = {heads, sectors, cylinders}  
 *
 * Returns : always 0 (success), initializes ip
 *	
 */

/* 
 * XXX Most SCSI boards use this mapping, I could be incorrect.  Some one
 * using hard disks on a trantor should verify that this mapping corresponds
 * to that used by the BIOS / ASPI driver by running the linux fdisk program
 * and matching the H_C_S coordinates to what DOS uses.
 */

int generic_NCR5380_biosparam(Disk * disk, kdev_t dev, int *ip)