[linux-2.6-block.git] / drivers / scsi / pas16.c

#define PSEUDO_DMA
#define UNSAFE  /* Not unsafe for PAS16 -- use it */
#define PDEBUG 0

/*
 * This driver adapted from Drew Eckhardt's Trantor T128 driver
 *
 * Copyright 1993, Drew Eckhardt
 *	Visionary Computing
 *	(Unix and Linux consulting and custom programming)
 *	drew@colorado.edu
 *      +1 (303) 666-5836
 *
 *  ( Based on T128 - DISTRIBUTION RELEASE 3. ) 
 *
 * Modified to work with the Pro Audio Spectrum/Studio 16
 * by John Weidman.
 *
 *
 * For more information, please consult 
 *
 * Media Vision
 * (510) 770-8600
 * (800) 348-7116
 */

/*
 * The card is detected and initialized in one of several ways : 
 * 1.  Autoprobe (default) - There are many different models of
 *     the Pro Audio Spectrum/Studio 16, and I only have one of
 *     them, so this may require a little tweaking.  An interrupt
 *     is triggered to autoprobe for the interrupt line.  Note:
 *     with the newer model boards, the interrupt is set via
 *     software after reset using the default_irq for the
 *     current board number.
 *
 * 2.  With command line overrides - pas16=port,irq may be 
 *     used on the LILO command line to override the defaults.
 *
 * 3.  With the PAS16_OVERRIDE compile time define.  This is 
 *     specified as an array of address, irq tuples.  Ie, for
 *     one board at the default 0x388 address, IRQ10, I could say 
 *     -DPAS16_OVERRIDE={{0x388, 10}}
 *     NOTE:  Untested.
 *	
 * 4.  When included as a module, with arguments passed on the command line:
 *         pas16_irq=xx		the interrupt
 *         pas16_addr=xx	the port
 *     e.g. "modprobe pas16 pas16_addr=0x388 pas16_irq=5"
 *
 *     Note that if the override methods are used, place holders must
 *     be specified for other boards in the system.
 *
 *
 * Configuration notes :
 *   The current driver does not support interrupt sharing with the
 *   sound portion of the card.  If you use the same irq for the
 *   scsi port and sound you will have problems.  Either use
 *   a different irq for the scsi port or don't use interrupts
 *   for the scsi port.
 *
 *   If you have problems with your card not being recognized, use
 *   the LILO command line override.  Try to get it recognized without
 *   interrupts.  Ie, for a board at the default 0x388 base port,
 *   boot: linux pas16=0x388,0
 *
 *   NO_IRQ (0) should be specified for no interrupt,
 *   IRQ_AUTO (254) to autoprobe for an IRQ line if overridden
 *   on the command line.
 */
 
#include <linux/module.h>

#include <linux/signal.h>
#include <linux/proc_fs.h>
#include <asm/io.h>
#include <asm/dma.h>
#include <linux/blkdev.h>
#include <linux/delay.h>
#include <linux/interrupt.h>
#include <linux/stat.h>
#include <linux/init.h>

#include <scsi/scsi_host.h>
#include "pas16.h"
#define AUTOPROBE_IRQ
#include "NCR5380.h"


static unsigned short pas16_addr = 0;
static int pas16_irq = 0;
 

static const int scsi_irq_translate[] =
	{ 0,  0,  1,  2,  3,  4,  5,  6, 0,  0,  7,  8,  9,  0, 10, 11 };

/* The default_irqs array contains values used to set the irq into the
 * board via software (as must be done on newer model boards without
 * irq jumpers on the board).  The first value in the array will be
 * assigned to logical board 0, the next to board 1, etc.
 */
static int default_irqs[] __initdata =
	{  PAS16_DEFAULT_BOARD_1_IRQ,
	   PAS16_DEFAULT_BOARD_2_IRQ,
	   PAS16_DEFAULT_BOARD_3_IRQ,
	   PAS16_DEFAULT_BOARD_4_IRQ
	};

static struct override {
    unsigned short io_port;
    int  irq;
} overrides
#ifdef PAS16_OVERRIDE
    [] __initdata = PAS16_OVERRIDE;
#else
    [4] __initdata = {{0,IRQ_AUTO}, {0,IRQ_AUTO}, {0,IRQ_AUTO},
	{0,IRQ_AUTO}};
#endif

#define NO_OVERRIDES ARRAY_SIZE(overrides)

static struct base {
    unsigned short io_port;
    int noauto;
} bases[] __initdata =
	{ {PAS16_DEFAULT_BASE_1, 0},
	  {PAS16_DEFAULT_BASE_2, 0},
	  {PAS16_DEFAULT_BASE_3, 0},
	  {PAS16_DEFAULT_BASE_4, 0}
	};

#define NO_BASES ARRAY_SIZE(bases)

static const unsigned short  pas16_offset[ 8 ] =
    {
	0x1c00,    /* OUTPUT_DATA_REG */
	0x1c01,    /* INITIATOR_COMMAND_REG */
	0x1c02,    /* MODE_REG */
	0x1c03,    /* TARGET_COMMAND_REG */
	0x3c00,    /* STATUS_REG ro, SELECT_ENABLE_REG wo */
	0x3c01,    /* BUS_AND_STATUS_REG ro, START_DMA_SEND_REG wo */
	0x3c02,    /* INPUT_DATA_REGISTER ro, (N/A on PAS16 ?)
		    * START_DMA_TARGET_RECEIVE_REG wo
		    */
	0x3c03,    /* RESET_PARITY_INTERRUPT_REG ro,
		    * START_DMA_INITIATOR_RECEIVE_REG wo
		    */
    };
/*----------------------------------------------------------------*/
/* the following will set the monitor border color (useful to find
 where something crashed or gets stuck at */
/* 1 = blue
 2 = green
 3 = cyan
 4 = red
 5 = magenta
 6 = yellow
 7 = white
*/
#if 1
#define rtrc(i) {inb(0x3da); outb(0x31, 0x3c0); outb((i), 0x3c0);}
#else
#define rtrc(i) {}
#endif


/*
 * Function : enable_board( int  board_num, unsigned short port )
 *
 * Purpose :  set address in new model board
 *
 * Inputs : board_num - logical board number 0-3, port - base address
 *
 */

static void __init
	enable_board( int  board_num,  unsigned short port )
{
    outb( 0xbc + board_num, MASTER_ADDRESS_PTR );
    outb( port >> 2, MASTER_ADDRESS_PTR );
}


/*
 * Function : init_board( unsigned short port, int irq )
 *
 * Purpose :  Set the board up to handle the SCSI interface
 *
 * Inputs : port - base address of the board,
 *	    irq - irq to assign to the SCSI port
 *	    force_irq - set it even if it conflicts with sound driver
 *
 */

static void __init 
	init_board( unsigned short io_port, int irq, int force_irq )
{
	unsigned int	tmp;
	unsigned int	pas_irq_code;

	/* Initialize the SCSI part of the board */

	outb( 0x30, io_port + P_TIMEOUT_COUNTER_REG );  /* Timeout counter */
	outb( 0x01, io_port + P_TIMEOUT_STATUS_REG_OFFSET );   /* Reset TC */
	outb( 0x01, io_port + WAIT_STATE );   /* 1 Wait state */

	NCR5380_read( RESET_PARITY_INTERRUPT_REG );

	/* Set the SCSI interrupt pointer without mucking up the sound
	 * interrupt pointer in the same byte.
	 */
	pas_irq_code = ( irq < 16 ) ? scsi_irq_translate[irq] : 0;
	tmp = inb( io_port + IO_CONFIG_3 );

	if( (( tmp & 0x0f ) == pas_irq_code) && pas_irq_code > 0 
	    && !force_irq )
	{
	    printk( "pas16: WARNING: Can't use same irq as sound "
		    "driver -- interrupts disabled\n" );
	    /* Set up the drive parameters, disable 5380 interrupts */
	    outb( 0x4d, io_port + SYS_CONFIG_4 );
	}
	else
	{
	    tmp = (  tmp & 0x0f ) | ( pas_irq_code << 4 );
	    outb( tmp, io_port + IO_CONFIG_3 );

	    /* Set up the drive parameters and enable 5380 interrupts */
	    outb( 0x6d, io_port + SYS_CONFIG_4 );
	}
}


/*
 * Function : pas16_hw_detect( unsigned short board_num )
 *
 * Purpose : determine if a pas16 board is present
 * 
 * Inputs : board_num - logical board number ( 0 - 3 )
 *
 * Returns : 0 if board not found, 1 if found.
 */

static int __init 
     pas16_hw_detect( unsigned short  board_num )
{
    unsigned char	board_rev, tmp;
    unsigned short	io_port = bases[ board_num ].io_port;

    /* See if we can find a PAS16 board at the address associated
     * with this logical board number.
     */

    /* First, attempt to take a newer model board out of reset and
     * give it a base address.  This shouldn't affect older boards.
     */
    enable_board( board_num, io_port );

    /* Now see if it looks like a PAS16 board */
    board_rev = inb( io_port + PCB_CONFIG );

    if( board_rev == 0xff )
	return 0;

    tmp = board_rev ^ 0xe0;

    outb( tmp, io_port + PCB_CONFIG );
    tmp = inb( io_port + PCB_CONFIG );
    outb( board_rev, io_port + PCB_CONFIG );

    if( board_rev != tmp ) 	/* Not a PAS-16 */
	return 0;

    if( ( inb( io_port + OPERATION_MODE_1 ) & 0x03 ) != 0x03 ) 
	return 0;  	/* return if no SCSI interface found */

    /* Mediavision has some new model boards that return ID bits
     * that indicate a SCSI interface, but they're not (LMS).  We'll
     * put in an additional test to try to weed them out.
     */

    outb( 0x01, io_port + WAIT_STATE ); 	/* 1 Wait state */
    NCR5380_write( MODE_REG, 0x20 );		/* Is it really SCSI? */
    if( NCR5380_read( MODE_REG ) != 0x20 )	/* Write to a reg.    */
	return 0;				/* and try to read    */
    NCR5380_write( MODE_REG, 0x00 );		/* it back.	      */
    if( NCR5380_read( MODE_REG ) != 0x00 )
	return 0;

    return 1;
}


#ifndef MODULE
/*
 * Function : pas16_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.
 *
 */

static int __init pas16_setup(char *str)
{
    static int commandline_current = 0;
    int i;
    int ints[10];

    get_options(str, ARRAY_SIZE(ints), ints);
    if (ints[0] != 2) 
	printk("pas16_setup : usage pas16=io_port,irq\n");
    else 
	if (commandline_current < NO_OVERRIDES) {
	    overrides[commandline_current].io_port = (unsigned short) ints[1];
	    overrides[commandline_current].irq = ints[2];
	    for (i = 0; i < NO_BASES; ++i)
		if (bases[i].io_port == (unsigned short) ints[1]) {
 		    bases[i].noauto = 1;
		    break;
		}
	    ++commandline_current;
	}
    return 1;
}

__setup("pas16=", pas16_setup);
#endif

/* 
 * Function : int pas16_detect(struct scsi_host_template * tpnt)
 *
 * Purpose : detects and initializes PAS16 controllers
 *	that were autoprobed, overridden on the LILO command line, 
 *	or specified at compile time.
 *
 * Inputs : tpnt - template for this SCSI adapter.
 * 
 * Returns : 1 if a host adapter was found, 0 if not.
 *
 */

static int __init pas16_detect(struct scsi_host_template *tpnt)
{
    static int current_override = 0;
    static unsigned short current_base = 0;
    struct Scsi_Host *instance;
    unsigned short io_port;
    int  count;

    if (pas16_addr != 0) {
	overrides[0].io_port = pas16_addr;
	/*
	*  This is how we avoid seeing more than
	*  one host adapter at the same I/O port.
	*  Cribbed shamelessly from pas16_setup().
	*/
	for (count = 0; count < NO_BASES; ++count)
	    if (bases[count].io_port == pas16_addr) {
 		    bases[count].noauto = 1;
		    break;
	}
    }
    if (pas16_irq != 0)
	overrides[0].irq = pas16_irq;

    for (count = 0; current_override < NO_OVERRIDES; ++current_override) {
	io_port = 0;

	if (overrides[current_override].io_port)
	{
	    io_port = overrides[current_override].io_port;
	    enable_board( current_override, io_port );
	    init_board( io_port, overrides[current_override].irq, 1 );
	}
	else
	    for (; !io_port && (current_base < NO_BASES); ++current_base) {
#if (PDEBUG & PDEBUG_INIT)
    printk("scsi-pas16 : probing io_port %04x\n", (unsigned int) bases[current_base].io_port);
#endif
		if ( !bases[current_base].noauto &&
		     pas16_hw_detect( current_base ) ){
			io_port = bases[current_base].io_port;
			init_board( io_port, default_irqs[ current_base ], 0 ); 
#if (PDEBUG & PDEBUG_INIT)
			printk("scsi-pas16 : detected board.\n");
#endif
		}
    }


#if defined(PDEBUG) && (PDEBUG & PDEBUG_INIT)
	printk("scsi-pas16 : io_port = %04x\n", (unsigned int) io_port);
#endif

	if (!io_port)
	    break;

	instance = scsi_register (tpnt, sizeof(struct NCR5380_hostdata));
	if(instance == NULL)
		break;
		
	instance->io_port = io_port;

	NCR5380_init(instance, 0);

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

	/* Compatibility with documented NCR5380 kernel parameters */
	if (instance->irq == 255)
		instance->irq = NO_IRQ;

	if (instance->irq != NO_IRQ)
	    if (request_irq(instance->irq, pas16_intr, 0,
			    "pas16", instance)) {
		printk("scsi%d : IRQ%d not free, interrupts disabled\n", 
		    instance->host_no, instance->irq);
		instance->irq = NO_IRQ;
	    } 

	if (instance->irq == NO_IRQ) {
	    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);
	    /* Disable 5380 interrupts, leave drive params the same */
	    outb( 0x4d, io_port + SYS_CONFIG_4 );
	    outb( (inb(io_port + IO_CONFIG_3) & 0x0f), io_port + IO_CONFIG_3 );
	}

#if defined(PDEBUG) && (PDEBUG & PDEBUG_INIT)
	printk("scsi%d : irq = %d\n", instance->host_no, instance->irq);
#endif

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

/*
 * Function : int pas16_biosparam(Disk *disk, struct block_device *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.
 */

static int pas16_biosparam(struct scsi_device *sdev, struct block_device *dev,
                           sector_t capacity, int *ip)
{
  int size = capacity;
  ip[0] = 64;
  ip[1] = 32;
  ip[2] = size >> 11;		/* I think I have it as /(32*64) */
  if( ip[2] > 1024 ) {		/* yes, >, not >= */
	ip[0]=255;
	ip[1]=63;
	ip[2]=size/(63*255);
	if( ip[2] > 1023 )	/* yes >1023... */
		ip[2] = 1023;
  }

  return 0;
}

/*
 * Function : int NCR5380_pread (struct Scsi_Host *instance, 
 *	unsigned char *dst, int len)
 *
 * Purpose : Fast 5380 pseudo-dma read function, transfers len bytes to 
 *	dst
 * 
 * Inputs : dst = destination, len = length in bytes
 *
 * Returns : 0 on success, non zero on a failure such as a watchdog 
 * 	timeout.
 */

static inline int NCR5380_pread (struct Scsi_Host *instance, unsigned char *dst,
    int len) {
    register unsigned char  *d = dst;
    register unsigned short reg = (unsigned short) (instance->io_port + 
	P_DATA_REG_OFFSET);
    register int i = len;
    int ii = 0;
    struct NCR5380_hostdata *hostdata = shost_priv(instance);

    while ( !(inb(instance->io_port + P_STATUS_REG_OFFSET) & P_ST_RDY) )
	 ++ii;

    insb( reg, d, i );

    if ( inb(instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET) & P_TS_TIM) {
	outb( P_TS_CT, instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET);
	printk("scsi%d : watchdog timer fired in NCR5380_pread()\n",
	    instance->host_no);
	return -1;
    }
    if (ii > hostdata->spin_max_r)
        hostdata->spin_max_r = ii;
    return 0;
}

/*
 * Function : int NCR5380_pwrite (struct Scsi_Host *instance, 
 *	unsigned char *src, int len)
 *
 * Purpose : Fast 5380 pseudo-dma write function, transfers len bytes from
 *	src
 * 
 * Inputs : src = source, len = length in bytes
 *
 * Returns : 0 on success, non zero on a failure such as a watchdog 
 * 	timeout.
 */

static inline int NCR5380_pwrite (struct Scsi_Host *instance, unsigned char *src,
    int len) {
    register unsigned char *s = src;
    register unsigned short reg = (instance->io_port + P_DATA_REG_OFFSET);
    register int i = len;
    int ii = 0;
    struct NCR5380_hostdata *hostdata = shost_priv(instance);

    while ( !((inb(instance->io_port + P_STATUS_REG_OFFSET)) & P_ST_RDY) )
	 ++ii;
 
    outsb( reg, s, i );

    if (inb(instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET) & P_TS_TIM) {
	outb( P_TS_CT, instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET);
	printk("scsi%d : watchdog timer fired in NCR5380_pwrite()\n",
	    instance->host_no);
	return -1;
    }
    if (ii > hostdata->spin_max_w)
        hostdata->spin_max_w = ii;
    return 0;
}

#include "NCR5380.c"

static int pas16_release(struct Scsi_Host *shost)
{
	if (shost->irq != NO_IRQ)
		free_irq(shost->irq, shost);
	NCR5380_exit(shost);
	if (shost->io_port && shost->n_io_port)
		release_region(shost->io_port, shost->n_io_port);
	scsi_unregister(shost);
	return 0;
}

static struct scsi_host_template driver_template = {
	.name           = "Pro Audio Spectrum-16 SCSI",
	.detect         = pas16_detect,
	.release        = pas16_release,
	.proc_name      = "pas16",
	.show_info      = pas16_show_info,
	.write_info     = pas16_write_info,
	.info           = pas16_info,
	.queuecommand   = pas16_queue_command,
	.eh_abort_handler = pas16_abort,
	.eh_bus_reset_handler = pas16_bus_reset,
	.bios_param     = pas16_biosparam, 
	.can_queue      = CAN_QUEUE,
	.this_id        = 7,
	.sg_tablesize   = SG_ALL,
	.cmd_per_lun    = CMD_PER_LUN,
	.use_clustering = DISABLE_CLUSTERING,
};
#include "scsi_module.c"

#ifdef MODULE
module_param(pas16_addr, ushort, 0);
module_param(pas16_irq, int, 0);
#endif
MODULE_LICENSE("GPL");
Commit	Line	Data
1da177e4	1	#define PSEUDO_DMA
1da177e4	2	#define UNSAFE /* Not unsafe for PAS16 -- use it */
44456d37	3	#define PDEBUG 0
1da177e4 LT	4
	5	/*
	6	* This driver adapted from Drew Eckhardt's Trantor T128 driver
	7	*
	8	* Copyright 1993, Drew Eckhardt
	9	* Visionary Computing
	10	* (Unix and Linux consulting and custom programming)
	11	* drew@colorado.edu
	12	* +1 (303) 666-5836
	13	*
	14	* ( Based on T128 - DISTRIBUTION RELEASE 3. )
	15	*
	16	* Modified to work with the Pro Audio Spectrum/Studio 16
	17	* by John Weidman.
	18	*
	19	*
	20	* For more information, please consult
	21	*
	22	* Media Vision
	23	* (510) 770-8600
	24	* (800) 348-7116
1da177e4 LT	25	*/
	26
	27	/*
1da177e4 LT	28	* The card is detected and initialized in one of several ways :
	29	* 1. Autoprobe (default) - There are many different models of
	30	* the Pro Audio Spectrum/Studio 16, and I only have one of
	31	* them, so this may require a little tweaking. An interrupt
	32	* is triggered to autoprobe for the interrupt line. Note:
	33	* with the newer model boards, the interrupt is set via
	34	* software after reset using the default_irq for the
	35	* current board number.
	36	*
	37	* 2. With command line overrides - pas16=port,irq may be
	38	* used on the LILO command line to override the defaults.
	39	*
	40	* 3. With the PAS16_OVERRIDE compile time define. This is
	41	* specified as an array of address, irq tuples. Ie, for
	42	* one board at the default 0x388 address, IRQ10, I could say
	43	* -DPAS16_OVERRIDE={{0x388, 10}}
	44	* NOTE: Untested.
	45	*
	46	* 4. When included as a module, with arguments passed on the command line:
	47	* pas16_irq=xx the interrupt
	48	* pas16_addr=xx the port
	49	* e.g. "modprobe pas16 pas16_addr=0x388 pas16_irq=5"
	50	*
	51	* Note that if the override methods are used, place holders must
	52	* be specified for other boards in the system.
	53	*
	54	*
	55	* Configuration notes :
	56	* The current driver does not support interrupt sharing with the
	57	* sound portion of the card. If you use the same irq for the
	58	* scsi port and sound you will have problems. Either use
	59	* a different irq for the scsi port or don't use interrupts
	60	* for the scsi port.
	61	*
	62	* If you have problems with your card not being recognized, use
	63	* the LILO command line override. Try to get it recognized without
	64	* interrupts. Ie, for a board at the default 0x388 base port,
22f5f10d	65	* boot: linux pas16=0x388,0
1da177e4	66	*
22f5f10d	67	* NO_IRQ (0) should be specified for no interrupt,
1da177e4 LT	68	* IRQ_AUTO (254) to autoprobe for an IRQ line if overridden
1da177e4 LT	69	* on the command line.
1da177e4 LT	70	*/
	71
	72	#include <linux/module.h>
	73
1da177e4 LT	74	#include <linux/signal.h>
1da177e4 LT	75	#include <linux/proc_fs.h>
1da177e4 LT	76	#include <asm/io.h>
	77	#include <asm/dma.h>
	78	#include <linux/blkdev.h>
	79	#include <linux/delay.h>
	80	#include <linux/interrupt.h>
	81	#include <linux/stat.h>
	82	#include <linux/init.h>
	83
1da177e4 LT	84	#include <scsi/scsi_host.h>
	85	#include "pas16.h"
	86	#define AUTOPROBE_IRQ
	87	#include "NCR5380.h"
	88
	89
1da177e4 LT	90	static unsigned short pas16_addr = 0;
	91	static int pas16_irq = 0;
	92
	93
408b664a	94	static const int scsi_irq_translate[] =
1da177e4 LT	95	{ 0, 0, 1, 2, 3, 4, 5, 6, 0, 0, 7, 8, 9, 0, 10, 11 };
	96
	97	/* The default_irqs array contains values used to set the irq into the
	98	* board via software (as must be done on newer model boards without
	99	* irq jumpers on the board). The first value in the array will be
	100	* assigned to logical board 0, the next to board 1, etc.
	101	*/
408b664a	102	static int default_irqs[] __initdata =
1da177e4 LT	103	{ PAS16_DEFAULT_BOARD_1_IRQ,
	104	PAS16_DEFAULT_BOARD_2_IRQ,
	105	PAS16_DEFAULT_BOARD_3_IRQ,
	106	PAS16_DEFAULT_BOARD_4_IRQ
	107	};
	108
	109	static struct override {
	110	unsigned short io_port;
	111	int irq;
6391a113	112	} overrides
1da177e4 LT	113	#ifdef PAS16_OVERRIDE
	114	[] __initdata = PAS16_OVERRIDE;
	115	#else
	116	[4] __initdata = {{0,IRQ_AUTO}, {0,IRQ_AUTO}, {0,IRQ_AUTO},
	117	{0,IRQ_AUTO}};
	118	#endif
	119
6391a113	120	#define NO_OVERRIDES ARRAY_SIZE(overrides)
1da177e4 LT	121
	122	static struct base {
	123	unsigned short io_port;
	124	int noauto;
6391a113	125	} bases[] __initdata =
1da177e4 LT	126	{ {PAS16_DEFAULT_BASE_1, 0},
	127	{PAS16_DEFAULT_BASE_2, 0},
	128	{PAS16_DEFAULT_BASE_3, 0},
	129	{PAS16_DEFAULT_BASE_4, 0}
	130	};
	131
6391a113	132	#define NO_BASES ARRAY_SIZE(bases)
1da177e4	133
408b664a	134	static const unsigned short pas16_offset[ 8 ] =
1da177e4 LT	135	{
	136	0x1c00, /* OUTPUT_DATA_REG */
	137	0x1c01, /* INITIATOR_COMMAND_REG */
	138	0x1c02, /* MODE_REG */
	139	0x1c03, /* TARGET_COMMAND_REG */
	140	0x3c00, /* STATUS_REG ro, SELECT_ENABLE_REG wo */
	141	0x3c01, /* BUS_AND_STATUS_REG ro, START_DMA_SEND_REG wo */
	142	0x3c02, /* INPUT_DATA_REGISTER ro, (N/A on PAS16 ?)
	143	* START_DMA_TARGET_RECEIVE_REG wo
	144	*/
	145	0x3c03, /* RESET_PARITY_INTERRUPT_REG ro,
	146	* START_DMA_INITIATOR_RECEIVE_REG wo
	147	*/
	148	};
	149	/----------------------------------------------------------------/
	150	/* the following will set the monitor border color (useful to find
	151	where something crashed or gets stuck at */
	152	/* 1 = blue
	153	2 = green
	154	3 = cyan
	155	4 = red
	156	5 = magenta
	157	6 = yellow
	158	7 = white
	159	*/
	160	#if 1
	161	#define rtrc(i) {inb(0x3da); outb(0x31, 0x3c0); outb((i), 0x3c0);}
	162	#else
	163	#define rtrc(i) {}
	164	#endif
	165
	166
	167	/*
	168	* Function : enable_board( int board_num, unsigned short port )
	169	*
	170	* Purpose : set address in new model board
	171	*
	172	* Inputs : board_num - logical board number 0-3, port - base address
	173	*
	174	*/
	175
	176	static void __init
	177	enable_board( int board_num, unsigned short port )
	178	{
	179	outb( 0xbc + board_num, MASTER_ADDRESS_PTR );
	180	outb( port >> 2, MASTER_ADDRESS_PTR );
	181	}
	182
	183
	184
	185	/*
	186	* Function : init_board( unsigned short port, int irq )
	187	*
	188	* Purpose : Set the board up to handle the SCSI interface
	189	*
	190	* Inputs : port - base address of the board,
	191	* irq - irq to assign to the SCSI port
	192	* force_irq - set it even if it conflicts with sound driver
	193	*
	194	*/
	195
	196	static void __init
	197	init_board( unsigned short io_port, int irq, int force_irq )
	198	{
199	unsigned int tmp;
200	unsigned int pas_irq_code;
201
202	/* Initialize the SCSI part of the board */
203
204	outb( 0x30, io_port + P_TIMEOUT_COUNTER_REG ); /* Timeout counter */
205	outb( 0x01, io_port + P_TIMEOUT_STATUS_REG_OFFSET ); /* Reset TC */
206	outb( 0x01, io_port + WAIT_STATE ); /* 1 Wait state */
207
208	NCR5380_read( RESET_PARITY_INTERRUPT_REG );
209
210	/* Set the SCSI interrupt pointer without mucking up the sound
211	* interrupt pointer in the same byte.
212	*/
213	pas_irq_code = ( irq < 16 ) ? scsi_irq_translate[irq] : 0;
214	tmp = inb( io_port + IO_CONFIG_3 );
215
216	if( (( tmp & 0x0f ) == pas_irq_code) && pas_irq_code > 0
217	&& !force_irq )
218	{
219	printk( "pas16: WARNING: Can't use same irq as sound "
220	"driver -- interrupts disabled\n" );
221	/* Set up the drive parameters, disable 5380 interrupts */
222	outb( 0x4d, io_port + SYS_CONFIG_4 );
223	}
224	else
225	{
226	tmp = ( tmp & 0x0f ) \| ( pas_irq_code << 4 );
227	outb( tmp, io_port + IO_CONFIG_3 );
228
229	/* Set up the drive parameters and enable 5380 interrupts */
230	outb( 0x6d, io_port + SYS_CONFIG_4 );
231	}
232	}
233
234
235	/*
236	* Function : pas16_hw_detect( unsigned short board_num )
237	*
238	* Purpose : determine if a pas16 board is present
239	*
240	* Inputs : board_num - logical board number ( 0 - 3 )
241	*
242	* Returns : 0 if board not found, 1 if found.
243	*/
244
245	static int __init
246	pas16_hw_detect( unsigned short board_num )
247	{
248	unsigned char board_rev, tmp;
249	unsigned short io_port = bases[ board_num ].io_port;
250
251	/* See if we can find a PAS16 board at the address associated
252	* with this logical board number.
253	*/
254
255	/* First, attempt to take a newer model board out of reset and
256	* give it a base address. This shouldn't affect older boards.
257	*/
258	enable_board( board_num, io_port );
259
260	/* Now see if it looks like a PAS16 board */
261	board_rev = inb( io_port + PCB_CONFIG );
262
263	if( board_rev == 0xff )
264	return 0;
265
266	tmp = board_rev ^ 0xe0;
267
268	outb( tmp, io_port + PCB_CONFIG );
269	tmp = inb( io_port + PCB_CONFIG );
270	outb( board_rev, io_port + PCB_CONFIG );
271
272	if( board_rev != tmp ) /* Not a PAS-16 */
273	return 0;
274
275	if( ( inb( io_port + OPERATION_MODE_1 ) & 0x03 ) != 0x03 )
276	return 0; /* return if no SCSI interface found */
277
278	/* Mediavision has some new model boards that return ID bits
279	* that indicate a SCSI interface, but they're not (LMS). We'll
280	* put in an additional test to try to weed them out.
281	*/
282
283	outb( 0x01, io_port + WAIT_STATE ); /* 1 Wait state */
284	NCR5380_write( MODE_REG, 0x20 ); /* Is it really SCSI? */
285	if( NCR5380_read( MODE_REG ) != 0x20 ) /* Write to a reg. */
286	return 0; /* and try to read */
287	NCR5380_write( MODE_REG, 0x00 ); /* it back. */
288	if( NCR5380_read( MODE_REG ) != 0x00 )
289	return 0;
290
291	return 1;
292	}
293
294
925e4610	295	#ifndef MODULE
1da177e4 LT	296	/*
	297	* Function : pas16_setup(char str, int ints)
	298	*
	299	* Purpose : LILO command line initialization of the overrides array,
	300	*
	301	* Inputs : str - unused, ints - array of integer parameters with ints[0]
	302	* equal to the number of ints.
	303	*
	304	*/
	305
925e4610	306	static int __init pas16_setup(char *str)
1da177e4 LT	307	{
	308	static int commandline_current = 0;
	309	int i;
925e4610 FT	310	int ints[10];
	311
	312	get_options(str, ARRAY_SIZE(ints), ints);
1da177e4 LT	313	if (ints[0] != 2)
	314	printk("pas16_setup : usage pas16=io_port,irq\n");
	315	else
	316	if (commandline_current < NO_OVERRIDES) {
	317	overrides[commandline_current].io_port = (unsigned short) ints[1];
	318	overrides[commandline_current].irq = ints[2];
	319	for (i = 0; i < NO_BASES; ++i)
	320	if (bases[i].io_port == (unsigned short) ints[1]) {
	321	bases[i].noauto = 1;
	322	break;
	323	}
	324	++commandline_current;
	325	}
925e4610	326	return 1;
1da177e4 LT	327	}
1da177e4 LT	328
925e4610 FT	329	__setup("pas16=", pas16_setup);
	330	#endif
	331
1da177e4	332	/*
d0be4a7d	333	* Function : int pas16_detect(struct scsi_host_template * tpnt)
1da177e4 LT	334	*
	335	* Purpose : detects and initializes PAS16 controllers
	336	* that were autoprobed, overridden on the LILO command line,
	337	* or specified at compile time.
	338	*
	339	* Inputs : tpnt - template for this SCSI adapter.
	340	*
	341	* Returns : 1 if a host adapter was found, 0 if not.
	342	*
	343	*/
	344
ed8b9e7f	345	static int __init pas16_detect(struct scsi_host_template *tpnt)
1da177e4 LT	346	{
	347	static int current_override = 0;
	348	static unsigned short current_base = 0;
	349	struct Scsi_Host *instance;
	350	unsigned short io_port;
	351	int count;
	352
1da177e4 LT	353	if (pas16_addr != 0) {
	354	overrides[0].io_port = pas16_addr;
	355	/*
	356	* This is how we avoid seeing more than
	357	* one host adapter at the same I/O port.
	358	* Cribbed shamelessly from pas16_setup().
	359	*/
	360	for (count = 0; count < NO_BASES; ++count)
	361	if (bases[count].io_port == pas16_addr) {
	362	bases[count].noauto = 1;
	363	break;
	364	}
	365	}
	366	if (pas16_irq != 0)
	367	overrides[0].irq = pas16_irq;
	368
	369	for (count = 0; current_override < NO_OVERRIDES; ++current_override) {
	370	io_port = 0;
	371
	372	if (overrides[current_override].io_port)
	373	{
	374	io_port = overrides[current_override].io_port;
	375	enable_board( current_override, io_port );
	376	init_board( io_port, overrides[current_override].irq, 1 );
	377	}
	378	else
	379	for (; !io_port && (current_base < NO_BASES); ++current_base) {
	380	#if (PDEBUG & PDEBUG_INIT)
	381	printk("scsi-pas16 : probing io_port %04x\n", (unsigned int) bases[current_base].io_port);
	382	#endif
	383	if ( !bases[current_base].noauto &&
	384	pas16_hw_detect( current_base ) ){
	385	io_port = bases[current_base].io_port;
	386	init_board( io_port, default_irqs[ current_base ], 0 );
	387	#if (PDEBUG & PDEBUG_INIT)
	388	printk("scsi-pas16 : detected board.\n");
	389	#endif
	390	}
	391	}
	392
	393
	394	#if defined(PDEBUG) && (PDEBUG & PDEBUG_INIT)
	395	printk("scsi-pas16 : io_port = %04x\n", (unsigned int) io_port);
	396	#endif
	397
	398	if (!io_port)
	399	break;
	400
	401	instance = scsi_register (tpnt, sizeof(struct NCR5380_hostdata));
	402	if(instance == NULL)
	403	break;
	404
	405	instance->io_port = io_port;
	406
	407	NCR5380_init(instance, 0);
	408
	409	if (overrides[current_override].irq != IRQ_AUTO)
	410	instance->irq = overrides[current_override].irq;
	411	else
	412	instance->irq = NCR5380_probe_irq(instance, PAS16_IRQS);
	413
22f5f10d FT	414	/* Compatibility with documented NCR5380 kernel parameters */
	415	if (instance->irq == 255)
	416	instance->irq = NO_IRQ;
	417
	418	if (instance->irq != NO_IRQ)
4909cc2b	419	if (request_irq(instance->irq, pas16_intr, 0,
1e641664	420	"pas16", instance)) {
1da177e4 LT	421	printk("scsi%d : IRQ%d not free, interrupts disabled\n",
1da177e4 LT	422	instance->host_no, instance->irq);
22f5f10d	423	instance->irq = NO_IRQ;
1da177e4 LT	424	}
1da177e4 LT	425
22f5f10d	426	if (instance->irq == NO_IRQ) {
1da177e4 LT	427	printk("scsi%d : interrupts not enabled. for better interactive performance,\n", instance->host_no);
	428	printk("scsi%d : please jumper the board for a free IRQ.\n", instance->host_no);
	429	/* Disable 5380 interrupts, leave drive params the same */
	430	outb( 0x4d, io_port + SYS_CONFIG_4 );
	431	outb( (inb(io_port + IO_CONFIG_3) & 0x0f), io_port + IO_CONFIG_3 );
	432	}
	433
	434	#if defined(PDEBUG) && (PDEBUG & PDEBUG_INIT)
	435	printk("scsi%d : irq = %d\n", instance->host_no, instance->irq);
	436	#endif
	437
1da177e4 LT	438	++current_override;
	439	++count;
	440	}
	441	return count;
	442	}
	443
	444	/*
	445	* Function : int pas16_biosparam(Disk disk, struct block_device dev, int *ip)
	446	*
	447	* Purpose : Generates a BIOS / DOS compatible H-C-S mapping for
	448	* the specified device / size.
	449	*
	450	* Inputs : size = size of device in sectors (512 bytes), dev = block device
	451	* major / minor, ip[] = {heads, sectors, cylinders}
	452	*
	453	* Returns : always 0 (success), initializes ip
	454	*
	455	*/
	456
	457	/*
	458	* XXX Most SCSI boards use this mapping, I could be incorrect. Some one
	459	* using hard disks on a trantor should verify that this mapping corresponds
	460	* to that used by the BIOS / ASPI driver by running the linux fdisk program
	461	* and matching the H_C_S coordinates to what DOS uses.
	462	*/
	463
ed8b9e7f FT	464	static int pas16_biosparam(struct scsi_device sdev, struct block_device dev,
ed8b9e7f FT	465	sector_t capacity, int *ip)
1da177e4 LT	466	{
	467	int size = capacity;
	468	ip[0] = 64;
	469	ip[1] = 32;
	470	ip[2] = size >> 11; /* I think I have it as /(3264) /
	471	if( ip[2] > 1024 ) { /* yes, >, not >= */
	472	ip[0]=255;
	473	ip[1]=63;
	474	ip[2]=size/(63*255);
	475	if( ip[2] > 1023 ) /* yes >1023... */
	476	ip[2] = 1023;
	477	}
	478
	479	return 0;
	480	}
	481
	482	/*
	483	* Function : int NCR5380_pread (struct Scsi_Host *instance,
	484	* unsigned char *dst, int len)
	485	*
	486	* Purpose : Fast 5380 pseudo-dma read function, transfers len bytes to
	487	* dst
	488	*
	489	* Inputs : dst = destination, len = length in bytes
	490	*
	491	* Returns : 0 on success, non zero on a failure such as a watchdog
	492	* timeout.
	493	*/
	494
	495	static inline int NCR5380_pread (struct Scsi_Host instance, unsigned char dst,
	496	int len) {
	497	register unsigned char *d = dst;
	498	register unsigned short reg = (unsigned short) (instance->io_port +
	499	P_DATA_REG_OFFSET);
	500	register int i = len;
	501	int ii = 0;
a9c2dc43	502	struct NCR5380_hostdata *hostdata = shost_priv(instance);
1da177e4 LT	503
	504	while ( !(inb(instance->io_port + P_STATUS_REG_OFFSET) & P_ST_RDY) )
	505	++ii;
	506
	507	insb( reg, d, i );
	508
	509	if ( inb(instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET) & P_TS_TIM) {
	510	outb( P_TS_CT, instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET);
	511	printk("scsi%d : watchdog timer fired in NCR5380_pread()\n",
	512	instance->host_no);
	513	return -1;
	514	}
a9c2dc43 FT	515	if (ii > hostdata->spin_max_r)
a9c2dc43 FT	516	hostdata->spin_max_r = ii;
1da177e4 LT	517	return 0;
	518	}
	519
	520	/*
	521	* Function : int NCR5380_pwrite (struct Scsi_Host *instance,
	522	* unsigned char *src, int len)
	523	*
	524	* Purpose : Fast 5380 pseudo-dma write function, transfers len bytes from
	525	* src
	526	*
	527	* Inputs : src = source, len = length in bytes
	528	*
	529	* Returns : 0 on success, non zero on a failure such as a watchdog
	530	* timeout.
	531	*/
	532
	533	static inline int NCR5380_pwrite (struct Scsi_Host instance, unsigned char src,
	534	int len) {
	535	register unsigned char *s = src;
	536	register unsigned short reg = (instance->io_port + P_DATA_REG_OFFSET);
	537	register int i = len;
	538	int ii = 0;
a9c2dc43	539	struct NCR5380_hostdata *hostdata = shost_priv(instance);
1da177e4 LT	540
	541	while ( !((inb(instance->io_port + P_STATUS_REG_OFFSET)) & P_ST_RDY) )
	542	++ii;
	543
	544	outsb( reg, s, i );
	545
	546	if (inb(instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET) & P_TS_TIM) {
	547	outb( P_TS_CT, instance->io_port + P_TIMEOUT_STATUS_REG_OFFSET);
	548	printk("scsi%d : watchdog timer fired in NCR5380_pwrite()\n",
	549	instance->host_no);
	550	return -1;
	551	}
a9c2dc43 FT	552	if (ii > hostdata->spin_max_w)
a9c2dc43 FT	553	hostdata->spin_max_w = ii;
1da177e4 LT	554	return 0;
	555	}
	556
	557	#include "NCR5380.c"
	558
	559	static int pas16_release(struct Scsi_Host *shost)
	560	{
22f5f10d	561	if (shost->irq != NO_IRQ)
1e641664	562	free_irq(shost->irq, shost);
1da177e4	563	NCR5380_exit(shost);
1da177e4 LT	564	if (shost->io_port && shost->n_io_port)
	565	release_region(shost->io_port, shost->n_io_port);
	566	scsi_unregister(shost);
	567	return 0;
	568	}
	569
d0be4a7d	570	static struct scsi_host_template driver_template = {
1da177e4 LT	571	.name = "Pro Audio Spectrum-16 SCSI",
	572	.detect = pas16_detect,
	573	.release = pas16_release,
4d3d2a54 FT	574	.proc_name = "pas16",
	575	.show_info = pas16_show_info,
	576	.write_info = pas16_write_info,
8c32513b	577	.info = pas16_info,
1da177e4 LT	578	.queuecommand = pas16_queue_command,
	579	.eh_abort_handler = pas16_abort,
	580	.eh_bus_reset_handler = pas16_bus_reset,
1da177e4 LT	581	.bios_param = pas16_biosparam,
	582	.can_queue = CAN_QUEUE,
	583	.this_id = 7,
	584	.sg_tablesize = SG_ALL,
	585	.cmd_per_lun = CMD_PER_LUN,
	586	.use_clustering = DISABLE_CLUSTERING,
	587	};
	588	#include "scsi_module.c"
	589
	590	#ifdef MODULE
	591	module_param(pas16_addr, ushort, 0);
	592	module_param(pas16_irq, int, 0);
	593	#endif
	594	MODULE_LICENSE("GPL");