patch-1.3.94 linux/drivers/scsi/a3000.c

• Lines: 204
• Date: Sun Mar 17 21:53:33 1996
• Orig file: v1.3.93/linux/drivers/scsi/a3000.c
• Orig date: Thu Jan 1 02:00:00 1970

diff -u --recursive --new-file v1.3.93/linux/drivers/scsi/a3000.c linux/drivers/scsi/a3000.c
@@ -0,0 +1,203 @@
+#include <linux/types.h>
+#include <linux/mm.h>
+#include <linux/blk.h>
+
+#include <asm/page.h>
+#include <asm/pgtable.h>
+#include <asm/bootinfo.h>
+#include <asm/amigaints.h>
+#include <asm/amigahw.h>
+#include <asm/irq.h>
+
+#include "scsi.h"
+#include "hosts.h"
+#include "wd33c93.h"
+#include "a3000.h"
+
+#include<linux/stat.h>
+
+struct proc_dir_entry proc_scsi_a3000 = {
+    PROC_SCSI_A3000, 5, "A3000",
+    S_IFDIR | S_IRUGO | S_IXUGO, 2
+};
+
+#define DMA(ptr) ((a3000_scsiregs *)((ptr)->base))
+#define HDATA(ptr) ((struct WD33C93_hostdata *)((ptr)->hostdata))
+
+static struct Scsi_Host *a3000_host = NULL;
+
+static void a3000_intr (int irq, struct pt_regs *fp, void *dummy)
+{
+    unsigned int status = DMA(a3000_host)->ISTR;
+
+    if (!(status & ISTR_INT_P))
+	return;
+
+    if (status & ISTR_INTS)
+    {
+	/* disable PORTS interrupt */
+	custom.intena = IF_PORTS;
+	wd33c93_intr (a3000_host);
+	/* enable PORTS interrupt */
+	custom.intena = IF_SETCLR | IF_PORTS;
+    } else {
+      printk("Non-serviced A3000 SCSI-interrupt? ISTR = %02x\n", status);
+    }
+}
+
+static int dma_setup (Scsi_Cmnd *cmd, int dir_in)
+{
+    unsigned short cntr = CNTR_PDMD | CNTR_INTEN;
+    unsigned long addr = VTOP(cmd->SCp.ptr);
+
+    /*
+     * if the physical address has the wrong alignment, or if
+     * physical address is bad, or if it is a write and at the
+     * end of a physical memory chunk, then allocate a bounce
+     * buffer
+     */
+    if (addr & A3000_XFER_MASK ||
+	(!dir_in && mm_end_of_chunk (addr, cmd->SCp.this_residual)))
+    {
+	HDATA(a3000_host)->dma_bounce_len = (cmd->SCp.this_residual + 511)
+	    & ~0x1ff;
+	HDATA(a3000_host)->dma_bounce_buffer =
+	    scsi_malloc (HDATA(a3000_host)->dma_bounce_len);
+	
+	/* can't allocate memory; use PIO */
+	if (!HDATA(a3000_host)->dma_bounce_buffer) {
+	    HDATA(a3000_host)->dma_bounce_len = 0;
+	    return 1;
+	}
+
+	if (!dir_in) {
+	    /* copy to bounce buffer for a write */
+	    if (cmd->use_sg) {
+		memcpy (HDATA(a3000_host)->dma_bounce_buffer,
+			cmd->SCp.ptr, cmd->SCp.this_residual);
+	    } else
+		memcpy (HDATA(a3000_host)->dma_bounce_buffer,
+			cmd->request_buffer, cmd->request_bufflen);
+	}
+
+	addr = VTOP(HDATA(a3000_host)->dma_bounce_buffer);
+    }
+
+    /* setup dma direction */
+    if (!dir_in)
+	cntr |= CNTR_DDIR;
+
+    /* remember direction */
+    HDATA(a3000_host)->dma_dir = dir_in;
+
+    DMA(a3000_host)->CNTR = cntr;
+
+    /* setup DMA *physical* address */
+    DMA(a3000_host)->ACR = addr;
+
+
+    if (dir_in)
+      {
+  	/* invalidate any cache */
+        /*
+         * On the 68040 it's not ok to use cache_clear, as it just invalidates
+         * cache-lines, and thereby trashing them. We need to use cache_push
+         * to avoid problems/crashes.
+         * This was a real bitch to catch :-( -Jes
+         */
+
+        if (boot_info.cputype & CPU_68040)
+	  cache_push (addr, cmd->SCp.this_residual);
+	else
+	  cache_clear (addr, cmd->SCp.this_residual);
+      }
+    else
+      /* push any dirty cache */
+      cache_push (addr, cmd->SCp.this_residual);
+      
+
+    /* start DMA */
+    DMA(a3000_host)->ST_DMA = 1;
+
+    /* return success */
+    return 0;
+}
+
+static void dma_stop (struct Scsi_Host *instance, Scsi_Cmnd *SCpnt,
+		      int status)
+{
+    /* disable SCSI interrupts */
+    unsigned short cntr = CNTR_PDMD;
+
+    if (!HDATA(instance)->dma_dir)
+	cntr |= CNTR_DDIR;
+
+    DMA(instance)->CNTR = cntr;
+
+    /* flush if we were reading */
+    if (HDATA(instance)->dma_dir) {
+	DMA(instance)->FLUSH = 1;
+	while (!(DMA(instance)->ISTR & ISTR_FE_FLG))
+	    ;
+    }
+
+    /* clear a possible interrupt */
+    /* I think that this CINT is only necessary if you are
+     * using the terminal count features.   HM 7 Mar 1994
+     */
+    DMA(instance)->CINT = 1;
+
+    /* stop DMA */
+    DMA(instance)->SP_DMA = 1;
+
+    /* restore the CONTROL bits (minus the direction flag) */
+    DMA(instance)->CNTR = CNTR_PDMD | CNTR_INTEN;
+
+    /* copy from a bounce buffer, if necessary */
+    if (status && HDATA(instance)->dma_bounce_buffer) {
+	if (SCpnt && SCpnt->use_sg) {
+	    if (HDATA(instance)->dma_dir && SCpnt)
+		memcpy (SCpnt->SCp.ptr,
+			HDATA(instance)->dma_bounce_buffer,
+			SCpnt->SCp.this_residual);
+	    scsi_free (HDATA(instance)->dma_bounce_buffer,
+		       HDATA(instance)->dma_bounce_len);
+	    HDATA(instance)->dma_bounce_buffer = NULL;
+	    HDATA(instance)->dma_bounce_len = 0;
+	} else {
+	    if (HDATA(instance)->dma_dir && SCpnt)
+		memcpy (SCpnt->request_buffer,
+			HDATA(instance)->dma_bounce_buffer,
+			SCpnt->request_bufflen);
+
+	    scsi_free (HDATA(instance)->dma_bounce_buffer,
+		       HDATA(instance)->dma_bounce_len);
+	    HDATA(instance)->dma_bounce_buffer = NULL;
+	    HDATA(instance)->dma_bounce_len = 0;
+	}
+    }
+}
+
+int a3000_detect(Scsi_Host_Template *tpnt)
+{
+    static unsigned char called = 0;
+
+    if (called)
+	return 0;
+
+    if  (!MACH_IS_AMIGA || !AMIGAHW_PRESENT(A3000_SCSI))
+	return 0;
+
+    tpnt->proc_dir = &proc_scsi_a3000;
+
+    a3000_host = scsi_register (tpnt, sizeof(struct WD33C93_hostdata));
+    a3000_host->base = (unsigned char *)ZTWO_VADDR(0xDD0000);
+    DMA(a3000_host)->DAWR = DAWR_A3000;
+    wd33c93_init(a3000_host, (wd33c93_regs *)&(DMA(a3000_host)->SASR),
+		 dma_setup, dma_stop, WD33C93_FS_12_15);
+    add_isr(IRQ_AMIGA_PORTS, a3000_intr, 0, NULL, "A3000 SCSI");
+    DMA(a3000_host)->CNTR = CNTR_PDMD | CNTR_INTEN;
+    called = 1;
+
+    return 1;
+}