Subversion Repositories or1k

/*

 * This file is subject to the terms and conditions of the GNU General Public

 * License.  See the file "COPYING" in the main directory of this archive

 * for more details.

 *

 * Copyright (C) 1996 David S. Miller (dm@engr.sgi.com)

 * Copyright (C) 1999 Andrew R. Baker (andrewb@uab.edu)

 * Copyright (C) 2001 Florian Lohoff (flo@rfc822.org)

 * Copyright (C) 2003 Ralf Baechle (ralf@linux-mips.org)

 *

 * (In all truth, Jed Schimmel wrote all this code.)

 */

#include <linux/init.h>

#include <linux/interrupt.h>

#include <linux/types.h>

#include <linux/mm.h>

#include <linux/blk.h>

#include <linux/version.h>

#include <linux/delay.h>

#include <linux/pci.h>

#include <linux/spinlock.h>

#include <asm/page.h>

#include <asm/pgtable.h>

#include <asm/sgialib.h>

#include <asm/sgi/sgi.h>

#include <asm/sgi/mc.h>

#include <asm/sgi/hpc3.h>

#include <asm/sgi/ip22.h>

#include <asm/irq.h>

#include <asm/io.h>

#include "scsi.h"

#include "hosts.h"

#include "wd33c93.h"

#include "sgiwd93.h"

#include <linux/stat.h>

#if 0

#define DPRINTK(args...)        printk(args)

#else

#define DPRINTK(args...)

#endif

#define HDATA(ptr) ((struct ip22_hostdata *)((ptr)->hostdata))

struct ip22_hostdata {

        struct WD33C93_hostdata wh;

        struct hpc_data {

                dma_addr_t      dma;

                void            * cpu;

        } hd;

};

struct hpc_chunk {

        struct hpc_dma_desc desc;

        u32 _padding;   /* align to quadword boundary */

};

struct Scsi_Host *sgiwd93_host;

struct Scsi_Host *sgiwd93_host1;

/* Wuff wuff, wuff, wd33c93.c, wuff wuff, object oriented, bow wow. */

static inline void write_wd33c93_count(const wd33c93_regs regs,

                                      unsigned long value)

{

        *regs.SASR = WD_TRANSFER_COUNT_MSB;

        mb();

        *regs.SCMD = ((value >> 16) & 0xff);

        *regs.SCMD = ((value >>  8) & 0xff);

        *regs.SCMD = ((value >>  0) & 0xff);

        mb();

}

static inline unsigned long read_wd33c93_count(const wd33c93_regs regs)

{

        unsigned long value;

        *regs.SASR = WD_TRANSFER_COUNT_MSB;

        mb();

        value =  ((*regs.SCMD & 0xff) << 16);

        value |= ((*regs.SCMD & 0xff) <<  8);

        value |= ((*regs.SCMD & 0xff) <<  0);

        mb();

        return value;

}

static void sgiwd93_intr(int irq, void *dev_id, struct pt_regs *regs)

{

        unsigned long flags;

        spin_lock_irqsave(&io_request_lock, flags);

        wd33c93_intr((struct Scsi_Host *) dev_id);

        spin_unlock_irqrestore(&io_request_lock, flags);

}

static inline

void fill_hpc_entries(struct hpc_chunk *hcp, Scsi_Cmnd *cmd, int datainp)

{

        unsigned long len = cmd->SCp.this_residual;

        void *addr = cmd->SCp.ptr;

        dma_addr_t physaddr;

        unsigned long count;

        physaddr = pci_map_single(NULL, addr, len,

                scsi_to_pci_dma_dir(cmd->sc_data_direction));

        cmd->SCp.dma_handle = physaddr;

        while (len) {

                /*

                 * even cntinfo could be up to 16383, without

                 * magic only 8192 works correctly

                 */

                count = len > 8192 ? 8192 : len;

                hcp->desc.pbuf = physaddr;

                hcp->desc.cntinfo = count;

                hcp++;

                len -= count;

                physaddr += count;

        }

        /*

         * To make sure, if we trip an HPC bug, that we transfer every single

         * byte, we tag on an extra zero length dma descriptor at the end of

         * the chain.

         */

        hcp->desc.pbuf = 0;

        hcp->desc.cntinfo = HPCDMA_EOX;

}

static int dma_setup(Scsi_Cmnd *cmd, int datainp)

{

        struct ip22_hostdata *hdata = HDATA(cmd->host);

        struct hpc3_scsiregs *hregs =

                (struct hpc3_scsiregs *) cmd->host->base;

        struct hpc_chunk *hcp = (struct hpc_chunk *) hdata->hd.cpu;

        DPRINTK("dma_setup: datainp<%d> hcp<%p> ", datainp, hcp);

        hdata->wh.dma_dir = datainp;

        /*

         * wd33c93 shouldn't pass us bogus dma_setups, but it does:-(  The

         * other wd33c93 drivers deal with it the same way (which isn't that

         * obvious).  IMHO a better fix would be, not to do these dma setups

         * in the first place.

         */

        if (cmd->SCp.ptr == NULL || cmd->SCp.this_residual == 0)

                return 1;

        fill_hpc_entries(hcp, cmd, datainp);

        DPRINTK(" HPCGO\n");

        /* Start up the HPC. */

        hregs->ndptr = hdata->hd.dma;

        if (datainp)

                hregs->ctrl = HPC3_SCTRL_ACTIVE;

        else

                hregs->ctrl = HPC3_SCTRL_ACTIVE | HPC3_SCTRL_DIR;

        return 0;

}

static void dma_stop(struct Scsi_Host *instance, Scsi_Cmnd *SCpnt,

                     int status)

{

        struct ip22_hostdata *hdata = HDATA(instance);

        struct hpc3_scsiregs *hregs;

        if (!SCpnt)

                return;

        hregs = (struct hpc3_scsiregs *) SCpnt->host->base;

        DPRINTK("dma_stop: status<%d> ", status);

        /* First stop the HPC and flush it's FIFO. */

        if (hdata->wh.dma_dir) {

                hregs->ctrl |= HPC3_SCTRL_FLUSH;

                while (hregs->ctrl & HPC3_SCTRL_ACTIVE)

                        barrier();

        }

        hregs->ctrl = 0;

        pci_unmap_single(NULL, SCpnt->SCp.dma_handle, SCpnt->SCp.this_residual,

                         scsi_to_pci_dma_dir(SCpnt->sc_data_direction));

        DPRINTK("\n");

}

void sgiwd93_reset(unsigned long base)

{

        struct hpc3_scsiregs *hregs = (struct hpc3_scsiregs *) base;

        hregs->ctrl = HPC3_SCTRL_CRESET;

        udelay(50);

        hregs->ctrl = 0;

}

static inline void init_hpc_chain(struct hpc_data *hd)

{

        struct hpc_chunk *hcp = (struct hpc_chunk *) hd->cpu;

        struct hpc_chunk *dma = (struct hpc_chunk *) hd->dma;

        unsigned long start, end;

        start = (unsigned long) hcp;

        end = start + PAGE_SIZE;

        while (start < end) {

                hcp->desc.pnext = (u32) (dma + 1);

                hcp->desc.cntinfo = HPCDMA_EOX;

                hcp++; dma++;

                start += sizeof(struct hpc_chunk);

        };

        hcp--;

        hcp->desc.pnext = hd->dma;

}

static struct Scsi_Host * __init sgiwd93_setup_scsi(

        Scsi_Host_Template *SGIblows, int unit, int irq,

        struct hpc3_scsiregs *hregs, unsigned char *wdregs)

{

        struct ip22_hostdata *hdata;

        struct Scsi_Host *host;

        wd33c93_regs regs;

        host = scsi_register(SGIblows, sizeof(struct ip22_hostdata));

        if (!host)

                return NULL;

        host->base = (unsigned long) hregs;

        host->irq = irq;

        hdata = HDATA(host);

        hdata->hd.cpu = pci_alloc_consistent(NULL, PAGE_SIZE, &hdata->hd.dma);

        if (!hdata->hd.cpu) {

                printk(KERN_WARNING "sgiwd93: Could not allocate memory for "

                       "host %d buffer.\n", unit);

                goto out_unregister;

        }

        init_hpc_chain(&hdata->hd);

        regs.SASR = wdregs + 3;

        regs.SCMD = wdregs + 7;

        wd33c93_init(host, regs, dma_setup, dma_stop, WD33C93_FS_16_20);

        hdata->wh.no_sync = 0;

        if (request_irq(irq, sgiwd93_intr, 0, "SGI WD93", (void *) host)) {

                printk(KERN_WARNING "sgiwd93: Could not register irq %d "

                       "for host %d.\n", irq, unit);

                goto out_free;

        }

        return host;

out_free:

        pci_free_consistent(NULL, PAGE_SIZE, hdata->hd.cpu, hdata->hd.dma);

        wd33c93_release();

out_unregister:

        scsi_unregister(host);

        return NULL;

}

int __init sgiwd93_detect(Scsi_Host_Template *SGIblows)

{

        int found = 0;

        SGIblows->proc_name = "SGIWD93";

        sgiwd93_host = sgiwd93_setup_scsi(SGIblows, 0, SGI_WD93_0_IRQ,

                                          &hpc3c0->scsi_chan0,

                                          (unsigned char *)hpc3c0->scsi0_ext);

        if (sgiwd93_host)

                found++;

        /* Set up second controller on the Indigo2 */

        if (ip22_is_fullhouse()) {

                sgiwd93_host1 = sgiwd93_setup_scsi(SGIblows, 1, SGI_WD93_1_IRQ,

                                          &hpc3c0->scsi_chan1,

                                          (unsigned char *)hpc3c0->scsi1_ext);

                if (sgiwd93_host1)

                        found++;

        }

        return found;

}

#define HOSTS_C

#include "sgiwd93.h"

static Scsi_Host_Template driver_template = SGIWD93_SCSI;

#include "scsi_module.c"

int sgiwd93_release(struct Scsi_Host *instance)

{

#ifdef MODULE

        free_irq(SGI_WD93_0_IRQ, sgiwd93_intr);

        pci_free_consistent(NULL, PAGE_SIZE, hdata->hd.cpu, hdata->hd.dma);

        wd33c93_release();

        if (ip22_is_fullhouse()) {

                free_irq(SGI_WD93_1_IRQ, sgiwd93_intr);

                pci_free_consistent(NULL, PAGE_SIZE, hdata1->hd.cpu,

                                    hdata1->hd.dma);

                wd33c93_release();

        }

#endif

        return 1;

}