1 #include <linux/types.h> 2 #include <linux/mm.h> 3 #include <linux/blkdev.h> 4 #include <linux/ioport.h> 5 #include <linux/init.h> 6 #include <linux/spinlock.h> 7 #include <linux/interrupt.h> 8 9 #include <asm/setup.h> 10 #include <asm/page.h> 11 #include <asm/pgtable.h> 12 #include <asm/amigaints.h> 13 #include <asm/amigahw.h> 14 #include <asm/irq.h> 15 16 #include "scsi.h" 17 #include <scsi/scsi_host.h> 18 #include "wd33c93.h" 19 #include "a3000.h" 20 21 #include<linux/stat.h> 22 23 #define DMA(ptr) ((a3000_scsiregs *)((ptr)->base)) 24 #define HDATA(ptr) ((struct WD33C93_hostdata *)((ptr)->hostdata)) 25 26 static struct Scsi_Host *a3000_host = NULL; 27 28 static irqreturn_t a3000_intr (int irq, void *dummy) 29 { 30 unsigned long flags; 31 unsigned int status = DMA(a3000_host)->ISTR; 32 33 if (!(status & ISTR_INT_P)) 34 return IRQ_NONE; 35 if (status & ISTR_INTS) 36 { 37 spin_lock_irqsave(a3000_host->host_lock, flags); 38 wd33c93_intr (a3000_host); 39 spin_unlock_irqrestore(a3000_host->host_lock, flags); 40 return IRQ_HANDLED; 41 } 42 printk("Non-serviced A3000 SCSI-interrupt? ISTR = %02x\n", status); 43 return IRQ_NONE; 44 } 45 46 static int dma_setup(struct scsi_cmnd *cmd, int dir_in) 47 { 48 unsigned short cntr = CNTR_PDMD | CNTR_INTEN; 49 unsigned long addr = virt_to_bus(cmd->SCp.ptr); 50 51 /* 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 55 * buffer 56 */ 57 if (addr & A3000_XFER_MASK || 58 (!dir_in && mm_end_of_chunk (addr, cmd->SCp.this_residual))) 59 { 60 HDATA(a3000_host)->dma_bounce_len = (cmd->SCp.this_residual + 511) 61 & ~0x1ff; 62 HDATA(a3000_host)->dma_bounce_buffer = 63 kmalloc (HDATA(a3000_host)->dma_bounce_len, GFP_KERNEL); 64 65 /* can't allocate memory; use PIO */ 66 if (!HDATA(a3000_host)->dma_bounce_buffer) { 67 HDATA(a3000_host)->dma_bounce_len = 0; 68 return 1; 69 } 70 71 if (!dir_in) { 72 /* copy to bounce buffer for a write */ 73 if (cmd->use_sg) { 74 memcpy (HDATA(a3000_host)->dma_bounce_buffer, 75 cmd->SCp.ptr, cmd->SCp.this_residual); 76 } else 77 memcpy (HDATA(a3000_host)->dma_bounce_buffer, 78 cmd->request_buffer, cmd->request_bufflen); 79 } 80 81 addr = virt_to_bus(HDATA(a3000_host)->dma_bounce_buffer); 82 } 83 84 /* setup dma direction */ 85 if (!dir_in) 86 cntr |= CNTR_DDIR; 87 88 /* remember direction */ 89 HDATA(a3000_host)->dma_dir = dir_in; 90 91 DMA(a3000_host)->CNTR = cntr; 92 93 /* setup DMA *physical* address */ 94 DMA(a3000_host)->ACR = addr; 95 96 if (dir_in) 97 /* invalidate any cache */ 98 cache_clear (addr, cmd->SCp.this_residual); 99 else 100 /* push any dirty cache */ 101 cache_push (addr, cmd->SCp.this_residual); 102 103 /* start DMA */ 104 mb(); /* make sure setup is completed */ 105 DMA(a3000_host)->ST_DMA = 1; 106 mb(); /* make sure DMA has started before next IO */ 107 108 /* return success */ 109 return 0; 110 } 111 112 static void dma_stop(struct Scsi_Host *instance, struct scsi_cmnd *SCpnt, 113 int status) 114 { 115 /* disable SCSI interrupts */ 116 unsigned short cntr = CNTR_PDMD; 117 118 if (!HDATA(instance)->dma_dir) 119 cntr |= CNTR_DDIR; 120 121 DMA(instance)->CNTR = cntr; 122 mb(); /* make sure CNTR is updated before next IO */ 123 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)) 129 barrier(); 130 mb(); /* no IO until FLUSH is done */ 131 } 132 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 136 */ 137 DMA(instance)->CINT = 1; 138 139 /* stop DMA */ 140 DMA(instance)->SP_DMA = 1; 141 mb(); /* make sure DMA is stopped before next IO */ 142 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 */ 146 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 kfree (HDATA(instance)->dma_bounce_buffer); 155 HDATA(instance)->dma_bounce_buffer = NULL; 156 HDATA(instance)->dma_bounce_len = 0; 157 } else { 158 if (HDATA(instance)->dma_dir && SCpnt) 159 memcpy (SCpnt->request_buffer, 160 HDATA(instance)->dma_bounce_buffer, 161 SCpnt->request_bufflen); 162 163 kfree (HDATA(instance)->dma_bounce_buffer); 164 HDATA(instance)->dma_bounce_buffer = NULL; 165 HDATA(instance)->dma_bounce_len = 0; 166 } 167 } 168 } 169 170 int __init a3000_detect(struct scsi_host_template *tpnt) 171 { 172 wd33c93_regs regs; 173 174 if (!MACH_IS_AMIGA || !AMIGAHW_PRESENT(A3000_SCSI)) 175 return 0; 176 if (!request_mem_region(0xDD0000, 256, "wd33c93")) 177 return 0; 178 179 tpnt->proc_name = "A3000"; 180 tpnt->proc_info = &wd33c93_proc_info; 181 182 a3000_host = scsi_register (tpnt, sizeof(struct WD33C93_hostdata)); 183 if (a3000_host == NULL) 184 goto fail_register; 185 186 a3000_host->base = ZTWO_VADDR(0xDD0000); 187 a3000_host->irq = IRQ_AMIGA_PORTS; 188 DMA(a3000_host)->DAWR = DAWR_A3000; 189 regs.SASR = &(DMA(a3000_host)->SASR); 190 regs.SCMD = &(DMA(a3000_host)->SCMD); 191 wd33c93_init(a3000_host, regs, dma_setup, dma_stop, WD33C93_FS_12_15); 192 if (request_irq(IRQ_AMIGA_PORTS, a3000_intr, IRQF_SHARED, "A3000 SCSI", 193 a3000_intr)) 194 goto fail_irq; 195 DMA(a3000_host)->CNTR = CNTR_PDMD | CNTR_INTEN; 196 197 return 1; 198 199 fail_irq: 200 wd33c93_release(); 201 scsi_unregister(a3000_host); 202 fail_register: 203 release_mem_region(0xDD0000, 256); 204 return 0; 205 } 206 207 static int a3000_bus_reset(struct scsi_cmnd *cmd) 208 { 209 /* FIXME perform bus-specific reset */ 210 211 /* FIXME 2: kill this entire function, which should 212 cause mid-layer to call wd33c93_host_reset anyway? */ 213 214 spin_lock_irq(cmd->device->host->host_lock); 215 wd33c93_host_reset(cmd); 216 spin_unlock_irq(cmd->device->host->host_lock); 217 218 return SUCCESS; 219 } 220 221 #define HOSTS_C 222 223 static struct scsi_host_template driver_template = { 224 .proc_name = "A3000", 225 .name = "Amiga 3000 built-in SCSI", 226 .detect = a3000_detect, 227 .release = a3000_release, 228 .queuecommand = wd33c93_queuecommand, 229 .eh_abort_handler = wd33c93_abort, 230 .eh_bus_reset_handler = a3000_bus_reset, 231 .eh_host_reset_handler = wd33c93_host_reset, 232 .can_queue = CAN_QUEUE, 233 .this_id = 7, 234 .sg_tablesize = SG_ALL, 235 .cmd_per_lun = CMD_PER_LUN, 236 .use_clustering = ENABLE_CLUSTERING 237 }; 238 239 240 #include "scsi_module.c" 241 242 int a3000_release(struct Scsi_Host *instance) 243 { 244 wd33c93_release(); 245 DMA(instance)->CNTR = 0; 246 release_mem_region(0xDD0000, 256); 247 free_irq(IRQ_AMIGA_PORTS, a3000_intr); 248 return 1; 249 } 250 251 MODULE_LICENSE("GPL"); 252