Subversion Repositories or1k

/* -*- mode: c; c-basic-offset: 8 -*- */

/* NCR Dual 700 MCA SCSI Driver

 *

 * Copyright (C) 2001 by James.Bottomley@HansenPartnership.com

**-----------------------------------------------------------------------------

**

**  This program is free software; you can redistribute it and/or modify

**  it under the terms of the GNU General Public License as published by

**  the Free Software Foundation; either version 2 of the License, or

**  (at your option) any later version.

**

**  This program is distributed in the hope that it will be useful,

**  but WITHOUT ANY WARRANTY; without even the implied warranty of

**  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

**  GNU General Public License for more details.

**

**  You should have received a copy of the GNU General Public License

**  along with this program; if not, write to the Free Software

**  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

**

**-----------------------------------------------------------------------------

 */

/* Notes:

 *

 * Most of the work is done in the chip specific module, 53c700.o

 *

 * TODO List:

 *

 * 1. Extract the SCSI ID from the voyager CMOS table (necessary to

 *    support multi-host environments.

 *

 * */

/* CHANGELOG

 *

 * Version 2.2

 *

 * Added mca_set_adapter_name().

 *

 * Version 2.1

 *

 * Modularise the driver into a Board piece (this file) and a chip

 * piece 53c700.[ch] and 53c700.scr, added module options.  You can

 * now specify the scsi id by the parameters

 *

 * NCR_D700=slot:<n> [siop:<n>] id:<n> ....

 *

 * They need to be comma separated if compiled into the kernel

 *

 * Version 2.0

 *

 * Initial implementation of TCQ (Tag Command Queueing).  TCQ is full

 * featured and uses the clock algorithm to keep track of outstanding

 * tags and guard against individual tag starvation.  Also fixed a bug

 * in all of the 1.x versions where the D700_data_residue() function

 * was returning results off by 32 bytes (and thus causing the same 32

 * bytes to be written twice corrupting the data block).  It turns out

 * the 53c700 only has a 6 bit DBC and DFIFO registers not 7 bit ones

 * like the 53c710 (The 710 is the only data manual still available,

 * which I'd been using to program the 700).

 *

 * Version 1.2

 *

 * Much improved message handling engine

 *

 * Version 1.1

 *

 * Add code to handle selection reasonably correctly.  By the time we

 * get the selection interrupt, we've already responded, but drop off the

 * bus and hope the selector will go away.

 *

 * Version 1.0:

 *

 *   Initial release.  Fully functional except for procfs and tag

 * command queueing.  Has only been tested on cards with 53c700-66

 * chips and only single ended. Features are

 *

 * 1. Synchronous data transfers to offset 8 (limit of 700-66) and

 *    100ns (10MHz) limit of SCSI-2

 *

 * 2. Disconnection and reselection

 *

 * Testing:

 *

 *  I've only really tested this with the 700-66 chip, but have done

 * soak tests in multi-device environments to verify that

 * disconnections and reselections are being processed correctly.

 * */

#define NCR_D700_VERSION "2.2"

#include <linux/config.h>

#include <linux/version.h>

#include <linux/kernel.h>

#include <linux/types.h>

#include <linux/string.h>

#include <linux/spinlock.h>

#include <linux/ioport.h>

#include <linux/delay.h>

#include <linux/sched.h>

#include <linux/proc_fs.h>

#include <linux/init.h>

#include <linux/mca.h>

#include <asm/dma.h>

#include <asm/system.h>

#include <asm/io.h>

#include <asm/pgtable.h>

#include <asm/byteorder.h>

#include <linux/blk.h>

#include <linux/module.h>

#include "scsi.h"

#include "hosts.h"

#include "constants.h"

#include "53c700.h"

#include "NCR_D700.h"

#ifndef CONFIG_MCA

#error "NCR_D700 driver only compiles for MCA"

#endif

#ifdef NCR_D700_DEBUG

#define STATIC

#else

#define STATIC static

#endif

char *NCR_D700;                 /* command line from insmod */

MODULE_AUTHOR("James Bottomley");

MODULE_DESCRIPTION("NCR Dual700 SCSI Driver");

MODULE_LICENSE("GPL");

MODULE_PARM(NCR_D700, "s");

static __u8 __initdata id_array[2*(MCA_MAX_SLOT_NR + 1)] =

        { [0 ... 2*(MCA_MAX_SLOT_NR + 1)-1] = 7 };

#ifdef MODULE

#define ARG_SEP ' '

#else

#define ARG_SEP ','

#endif

static int __init

param_setup(char *string)

{

        char *pos = string, *next;

        int slot = -1, siop = -1;

        while(pos != NULL && (next = strchr(pos, ':')) != NULL) {

                int val = (int)simple_strtoul(++next, NULL, 0);

                if(!strncmp(pos, "slot:", 5))

                        slot = val;

                else if(!strncmp(pos, "siop:", 5))

                        siop = val;

                else if(!strncmp(pos, "id:", 3)) {

                        if(slot == -1) {

                                printk(KERN_WARNING "NCR D700: Must specify slot for id parameter\n");

                        } else if(slot > MCA_MAX_SLOT_NR) {

                                printk(KERN_WARNING "NCR D700: Illegal slot %d for id %d\n", slot, val);

                        } else {

                                if(siop != 0 && siop != 1) {

                                        id_array[slot*2] = val;

                                        id_array[slot*2 + 1] =val;

                                } else {

                                        id_array[slot*2 + siop] = val;

                                }

                        }

                }

                if((pos = strchr(pos, ARG_SEP)) != NULL)

                        pos++;

        }

        return 1;

}

#ifndef MODULE

__setup("NCR_D700=", param_setup);

#endif

/* Detect a D700 card.  Note, because of the set up---the chips are

 * essentially connectecd to the MCA bus independently, it is easier

 * to set them up as two separate host adapters, rather than one

 * adapter with two channels */

STATIC int __init

D700_detect(Scsi_Host_Template *tpnt)

{

        int slot = 0;

        int found = 0;

        int differential;

        int banner = 1;

        if(!MCA_bus)

                return 0;

#ifdef MODULE

        if(NCR_D700)

                param_setup(NCR_D700);

#endif

        for(slot = 0; (slot = mca_find_adapter(NCR_D700_MCA_ID, slot)) != MCA_NOTFOUND; slot++) {

                int irq, i;

                int pos3j, pos3k, pos3a, pos3b, pos4;

                __u32 base_addr, offset_addr;

                struct Scsi_Host *host = NULL;

                /* enable board interrupt */

                pos4 = mca_read_pos(slot, 4);

                pos4 |= 0x4;

                mca_write_pos(slot, 4, pos4);

                mca_write_pos(slot, 6, 9);

                pos3j = mca_read_pos(slot, 3);

                mca_write_pos(slot, 6, 10);

                pos3k = mca_read_pos(slot, 3);

                mca_write_pos(slot, 6, 0);

                pos3a = mca_read_pos(slot, 3);

                mca_write_pos(slot, 6, 1);

                pos3b = mca_read_pos(slot, 3);

                base_addr = ((pos3j << 8) | pos3k) & 0xfffffff0;

                offset_addr = ((pos3a << 8) | pos3b) & 0xffffff70;

                irq = (pos4 & 0x3) + 11;

                if(irq >= 13)

                        irq++;

                if(banner) {

                        printk(KERN_NOTICE "NCR D700: Driver Version " NCR_D700_VERSION "\n"

                               "NCR D700:  Copyright (c) 2001 by James.Bottomley@HansenPartnership.com\n"

                               "NCR D700:\n");

                        banner = 0;

                }

                printk(KERN_NOTICE "NCR D700: found in slot %d  irq = %d  I/O base = 0x%x\n", slot, irq, offset_addr);

                tpnt->proc_name = "NCR_D700";

                /*outb(BOARD_RESET, base_addr);*/

                /* clear any pending interrupts */

                (void)inb(base_addr + 0x08);

                /* get modctl, used later for setting diff bits */

                switch(differential = (inb(base_addr + 0x08) >> 6)) {

                case 0x00:

                        /* only SIOP1 differential */

                        differential = 0x02;

                        break;

                case 0x01:

                        /* Both SIOPs differential */

                        differential = 0x03;

                        break;

                case 0x03:

                        /* No SIOPs differential */

                        differential = 0x00;

                        break;

                default:

                        printk(KERN_ERR "D700: UNEXPECTED DIFFERENTIAL RESULT 0x%02x\n",

                               differential);

                        differential = 0x00;

                        break;

                }

                /* plumb in both 700 chips */

                for(i=0; i<2; i++) {

                        __u32 region = offset_addr | (0x80 * i);

                        struct NCR_700_Host_Parameters *hostdata =

                                kmalloc(sizeof(struct NCR_700_Host_Parameters),

                                        GFP_KERNEL);

                        if(hostdata == NULL) {

                                printk(KERN_ERR "NCR D700: Failed to allocate host data for channel %d, detatching\n", i);

                                continue;

                        }

                        memset(hostdata, 0, sizeof(struct NCR_700_Host_Parameters));

                        if(request_region(region, 64, "NCR_D700") == NULL) {

                                printk(KERN_ERR "NCR D700: Failed to reserve IO region 0x%x\n", region);

                                kfree(hostdata);

                                continue;

                        }

                        /* Fill in the three required pieces of hostdata */

                        hostdata->base = region;

                        hostdata->differential = (((1<<i) & differential) != 0);

                        hostdata->clock = NCR_D700_CLOCK_MHZ;

                        /* and register the chip */

                        if((host = NCR_700_detect(tpnt, hostdata)) == NULL) {

                                kfree(hostdata);

                                release_region(host->base, 64);

                                continue;

                        }

                        host->irq = irq;

                        /* FIXME: Read this from SUS */

                        host->this_id = id_array[slot * 2 + i];

                        printk(KERN_NOTICE "NCR D700: SIOP%d, SCSI id is %d\n",

                               i, host->this_id);

                        if(request_irq(irq, NCR_700_intr, SA_SHIRQ, "NCR_D700", host)) {

                                printk(KERN_ERR "NCR D700, channel %d: irq problem, detatching\n", i);

                                scsi_unregister(host);

                                NCR_700_release(host);

                                continue;

                        }

                        found++;

                        mca_set_adapter_name(slot, "NCR D700 SCSI Adapter (version " NCR_D700_VERSION ")");

                }

        }

        return found;

}

STATIC int

D700_release(struct Scsi_Host *host)

{

        struct D700_Host_Parameters *hostdata =

                (struct D700_Host_Parameters *)host->hostdata[0];

        NCR_700_release(host);

        kfree(hostdata);

        free_irq(host->irq, host);

        release_region(host->base, 64);

        return 1;

}

static Scsi_Host_Template driver_template = NCR_D700_SCSI;

#include "scsi_module.c"