|  | /* | 
|  | * 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/blkdev.h> | 
|  | #include <linux/delay.h> | 
|  | #include <linux/dma-mapping.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 <scsi/scsi_host.h> | 
|  | #include "wd33c93.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 irqreturn_t sgiwd93_intr(int irq, void *dev_id) | 
|  | { | 
|  | struct Scsi_Host * host = (struct Scsi_Host *) dev_id; | 
|  | unsigned long flags; | 
|  |  | 
|  | spin_lock_irqsave(host->host_lock, flags); | 
|  | wd33c93_intr(host); | 
|  | spin_unlock_irqrestore(host->host_lock, flags); | 
|  |  | 
|  | return IRQ_HANDLED; | 
|  | } | 
|  |  | 
|  | static inline | 
|  | void fill_hpc_entries(struct hpc_chunk *hcp, struct 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 = dma_map_single(NULL, addr, len, 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(struct scsi_cmnd *cmd, int datainp) | 
|  | { | 
|  | struct ip22_hostdata *hdata = HDATA(cmd->device->host); | 
|  | struct hpc3_scsiregs *hregs = | 
|  | (struct hpc3_scsiregs *) cmd->device->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, struct scsi_cmnd *SCpnt, | 
|  | int status) | 
|  | { | 
|  | struct ip22_hostdata *hdata = HDATA(instance); | 
|  | struct hpc3_scsiregs *hregs; | 
|  |  | 
|  | if (!SCpnt) | 
|  | return; | 
|  |  | 
|  | hregs = (struct hpc3_scsiregs *) SCpnt->device->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; | 
|  | dma_unmap_single(NULL, SCpnt->SCp.dma_handle, SCpnt->SCp.this_residual, | 
|  | 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( | 
|  | struct 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 = dma_alloc_coherent(NULL, PAGE_SIZE, &hdata->hd.dma, | 
|  | GFP_KERNEL); | 
|  | 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: | 
|  | dma_free_coherent(NULL, PAGE_SIZE, hdata->hd.cpu, hdata->hd.dma); | 
|  | wd33c93_release(); | 
|  |  | 
|  | out_unregister: | 
|  | scsi_unregister(host); | 
|  |  | 
|  | return NULL; | 
|  | } | 
|  |  | 
|  | static int __init sgiwd93_detect(struct 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; | 
|  | } | 
|  |  | 
|  | static int sgiwd93_release(struct Scsi_Host *instance) | 
|  | { | 
|  | struct ip22_hostdata *hdata = HDATA(instance); | 
|  | int irq = 0; | 
|  |  | 
|  | if (sgiwd93_host && sgiwd93_host == instance) | 
|  | irq = SGI_WD93_0_IRQ; | 
|  | else if (sgiwd93_host1 && sgiwd93_host1 == instance) | 
|  | irq = SGI_WD93_1_IRQ; | 
|  |  | 
|  | free_irq(irq, sgiwd93_intr); | 
|  | dma_free_coherent(NULL, PAGE_SIZE, hdata->hd.cpu, hdata->hd.dma); | 
|  | wd33c93_release(); | 
|  |  | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | static int sgiwd93_bus_reset(struct scsi_cmnd *cmd) | 
|  | { | 
|  | /* FIXME perform bus-specific reset */ | 
|  |  | 
|  | /* FIXME 2: kill this function, and let midlayer fallback | 
|  | to the same result, calling wd33c93_host_reset() */ | 
|  |  | 
|  | spin_lock_irq(cmd->device->host->host_lock); | 
|  | wd33c93_host_reset(cmd); | 
|  | spin_unlock_irq(cmd->device->host->host_lock); | 
|  |  | 
|  | return SUCCESS; | 
|  | } | 
|  |  | 
|  | /* | 
|  | * Kludge alert - the SCSI code calls the abort and reset method with int | 
|  | * arguments not with pointers.  So this is going to blow up beautyfully | 
|  | * on 64-bit systems with memory outside the compat address spaces. | 
|  | */ | 
|  | static struct scsi_host_template driver_template = { | 
|  | .proc_name		= "SGIWD93", | 
|  | .name			= "SGI WD93", | 
|  | .detect			= sgiwd93_detect, | 
|  | .release		= sgiwd93_release, | 
|  | .queuecommand		= wd33c93_queuecommand, | 
|  | .eh_abort_handler	= wd33c93_abort, | 
|  | .eh_bus_reset_handler	= sgiwd93_bus_reset, | 
|  | .eh_host_reset_handler	= wd33c93_host_reset, | 
|  | .can_queue		= 16, | 
|  | .this_id		= 7, | 
|  | .sg_tablesize		= SG_ALL, | 
|  | .cmd_per_lun		= 8, | 
|  | .use_clustering		= DISABLE_CLUSTERING, | 
|  | }; | 
|  | #include "scsi_module.c" |