1 #include <linux/types.h>
4 #include <linux/sched.h>
5 #include <linux/version.h>
6 #include <linux/ioport.h>
7 #include <linux/init.h>
8 #include <linux/spinlock.h>
10 #include <asm/setup.h>
12 #include <asm/pgtable.h>
13 #include <asm/amigaints.h>
14 #include <asm/amigahw.h>
22 #include<linux/stat.h>
24 #define DMA(ptr) ((a3000_scsiregs *)((ptr)->base))
25 #define HDATA(ptr) ((struct WD33C93_hostdata *)((ptr)->hostdata))
27 static struct Scsi_Host
*a3000_host
= NULL
;
29 static void a3000_intr (int irq
, void *dummy
, struct pt_regs
*fp
)
32 unsigned int status
= DMA(a3000_host
)->ISTR
;
34 if (!(status
& ISTR_INT_P
))
36 if (status
& ISTR_INTS
)
38 spin_lock_irqsave(&io_request_lock
, flags
);
39 wd33c93_intr (a3000_host
);
40 spin_unlock_irqrestore(&io_request_lock
, flags
);
42 printk("Non-serviced A3000 SCSI-interrupt? ISTR = %02x\n",
46 static int dma_setup (Scsi_Cmnd
*cmd
, int dir_in
)
48 unsigned short cntr
= CNTR_PDMD
| CNTR_INTEN
;
49 unsigned long addr
= virt_to_bus(cmd
->SCp
.ptr
);
52 * if the physical address has the wrong alignment, or if
53 * physical address is bad, or if it is a write and at the
54 * end of a physical memory chunk, then allocate a bounce
57 if (addr
& A3000_XFER_MASK
||
58 (!dir_in
&& mm_end_of_chunk (addr
, cmd
->SCp
.this_residual
)))
60 HDATA(a3000_host
)->dma_bounce_len
= (cmd
->SCp
.this_residual
+ 511)
62 HDATA(a3000_host
)->dma_bounce_buffer
=
63 scsi_malloc (HDATA(a3000_host
)->dma_bounce_len
);
65 /* can't allocate memory; use PIO */
66 if (!HDATA(a3000_host
)->dma_bounce_buffer
) {
67 HDATA(a3000_host
)->dma_bounce_len
= 0;
72 /* copy to bounce buffer for a write */
74 memcpy (HDATA(a3000_host
)->dma_bounce_buffer
,
75 cmd
->SCp
.ptr
, cmd
->SCp
.this_residual
);
77 memcpy (HDATA(a3000_host
)->dma_bounce_buffer
,
78 cmd
->request_buffer
, cmd
->request_bufflen
);
81 addr
= virt_to_bus(HDATA(a3000_host
)->dma_bounce_buffer
);
84 /* setup dma direction */
88 /* remember direction */
89 HDATA(a3000_host
)->dma_dir
= dir_in
;
91 DMA(a3000_host
)->CNTR
= cntr
;
93 /* setup DMA *physical* address */
94 DMA(a3000_host
)->ACR
= addr
;
97 /* invalidate any cache */
98 cache_clear (addr
, cmd
->SCp
.this_residual
);
100 /* push any dirty cache */
101 cache_push (addr
, cmd
->SCp
.this_residual
);
104 mb(); /* make sure setup is completed */
105 DMA(a3000_host
)->ST_DMA
= 1;
106 mb(); /* make sure DMA has started before next IO */
112 static void dma_stop (struct Scsi_Host
*instance
, Scsi_Cmnd
*SCpnt
,
115 /* disable SCSI interrupts */
116 unsigned short cntr
= CNTR_PDMD
;
118 if (!HDATA(instance
)->dma_dir
)
121 DMA(instance
)->CNTR
= cntr
;
122 mb(); /* make sure CNTR is updated before next IO */
124 /* flush if we were reading */
125 if (HDATA(instance
)->dma_dir
) {
126 DMA(instance
)->FLUSH
= 1;
127 mb(); /* don't allow prefetch */
128 while (!(DMA(instance
)->ISTR
& ISTR_FE_FLG
))
130 mb(); /* no IO until FLUSH is done */
133 /* clear a possible interrupt */
134 /* I think that this CINT is only necessary if you are
135 * using the terminal count features. HM 7 Mar 1994
137 DMA(instance
)->CINT
= 1;
140 DMA(instance
)->SP_DMA
= 1;
141 mb(); /* make sure DMA is stopped before next IO */
143 /* restore the CONTROL bits (minus the direction flag) */
144 DMA(instance
)->CNTR
= CNTR_PDMD
| CNTR_INTEN
;
145 mb(); /* make sure CNTR is updated before next IO */
147 /* copy from a bounce buffer, if necessary */
148 if (status
&& HDATA(instance
)->dma_bounce_buffer
) {
149 if (SCpnt
&& SCpnt
->use_sg
) {
150 if (HDATA(instance
)->dma_dir
&& SCpnt
)
151 memcpy (SCpnt
->SCp
.ptr
,
152 HDATA(instance
)->dma_bounce_buffer
,
153 SCpnt
->SCp
.this_residual
);
154 scsi_free (HDATA(instance
)->dma_bounce_buffer
,
155 HDATA(instance
)->dma_bounce_len
);
156 HDATA(instance
)->dma_bounce_buffer
= NULL
;
157 HDATA(instance
)->dma_bounce_len
= 0;
159 if (HDATA(instance
)->dma_dir
&& SCpnt
)
160 memcpy (SCpnt
->request_buffer
,
161 HDATA(instance
)->dma_bounce_buffer
,
162 SCpnt
->request_bufflen
);
164 scsi_free (HDATA(instance
)->dma_bounce_buffer
,
165 HDATA(instance
)->dma_bounce_len
);
166 HDATA(instance
)->dma_bounce_buffer
= NULL
;
167 HDATA(instance
)->dma_bounce_len
= 0;
172 int __init
a3000_detect(Scsi_Host_Template
*tpnt
)
174 static unsigned char called
= 0;
179 if (!MACH_IS_AMIGA
|| !AMIGAHW_PRESENT(A3000_SCSI
))
181 if (!request_mem_region(0xDD0000, 256, "wd33c93"))
184 tpnt
->proc_name
= "A3000";
185 tpnt
->proc_info
= &wd33c93_proc_info
;
187 a3000_host
= scsi_register (tpnt
, sizeof(struct WD33C93_hostdata
));
188 if (a3000_host
== NULL
) {
189 release_mem_region(0xDD0000, 256);
192 a3000_host
->base
= ZTWO_VADDR(0xDD0000);
193 a3000_host
->irq
= IRQ_AMIGA_PORTS
;
194 DMA(a3000_host
)->DAWR
= DAWR_A3000
;
195 wd33c93_init(a3000_host
, (wd33c93_regs
*)&(DMA(a3000_host
)->SASR
),
196 dma_setup
, dma_stop
, WD33C93_FS_12_15
);
197 request_irq(IRQ_AMIGA_PORTS
, a3000_intr
, SA_SHIRQ
, "A3000 SCSI",
199 DMA(a3000_host
)->CNTR
= CNTR_PDMD
| CNTR_INTEN
;
207 static Scsi_Host_Template driver_template
= _A3000_SCSI
;
209 #include "scsi_module.c"
211 int a3000_release(struct Scsi_Host
*instance
)
215 DMA(instance
)->CNTR
= 0;
216 release_mem_region(0xDD0000, 256);
217 free_irq(IRQ_AMIGA_PORTS
, a3000_intr
);