1 /* 2 * Generic Generic NCR5380 driver 3 * 4 * Copyright 1995-2002, Russell King 5 */ 6 #include <linux/module.h> 7 #include <linux/signal.h> 8 #include <linux/ioport.h> 9 #include <linux/delay.h> 10 #include <linux/blkdev.h> 11 #include <linux/init.h> 12 13 #include <asm/ecard.h> 14 #include <asm/io.h> 15 16 #include "../scsi.h" 17 #include <scsi/scsi_host.h> 18 19 #include <scsi/scsicam.h> 20 21 #define AUTOSENSE 22 #define PSEUDO_DMA 23 24 #define CUMANASCSI_PUBLIC_RELEASE 1 25 26 #define priv(host) ((struct NCR5380_hostdata *)(host)->hostdata) 27 #define NCR5380_local_declare() struct Scsi_Host *_instance 28 #define NCR5380_setup(instance) _instance = instance 29 #define NCR5380_read(reg) cumanascsi_read(_instance, reg) 30 #define NCR5380_write(reg, value) cumanascsi_write(_instance, reg, value) 31 #define NCR5380_intr cumanascsi_intr 32 #define NCR5380_queue_command cumanascsi_queue_command 33 34 #define NCR5380_implementation_fields \ 35 unsigned ctrl; \ 36 void __iomem *base; \ 37 void __iomem *dma 38 39 #define BOARD_NORMAL 0 40 #define BOARD_NCR53C400 1 41 42 #include "../NCR5380.h" 43 44 void cumanascsi_setup(char *str, int *ints) 45 { 46 } 47 48 const char *cumanascsi_info(struct Scsi_Host *spnt) 49 { 50 return ""; 51 } 52 53 #define CTRL 0x16fc 54 #define STAT 0x2004 55 #define L(v) (((v)<<16)|((v) & 0x0000ffff)) 56 #define H(v) (((v)>>16)|((v) & 0xffff0000)) 57 58 static inline int 59 NCR5380_pwrite(struct Scsi_Host *host, unsigned char *addr, int len) 60 { 61 unsigned long *laddr; 62 void __iomem *dma = priv(host)->dma + 0x2000; 63 64 if(!len) return 0; 65 66 writeb(0x02, priv(host)->base + CTRL); 67 laddr = (unsigned long *)addr; 68 while(len >= 32) 69 { 70 unsigned int status; 71 unsigned long v; 72 status = readb(priv(host)->base + STAT); 73 if(status & 0x80) 74 goto end; 75 if(!(status & 0x40)) 76 continue; 77 v=*laddr++; writew(L(v), dma); writew(H(v), dma); 78 v=*laddr++; writew(L(v), dma); writew(H(v), dma); 79 v=*laddr++; writew(L(v), dma); writew(H(v), dma); 80 v=*laddr++; writew(L(v), dma); writew(H(v), dma); 81 v=*laddr++; writew(L(v), dma); writew(H(v), dma); 82 v=*laddr++; writew(L(v), dma); writew(H(v), dma); 83 v=*laddr++; writew(L(v), dma); writew(H(v), dma); 84 v=*laddr++; writew(L(v), dma); writew(H(v), dma); 85 len -= 32; 86 if(len == 0) 87 break; 88 } 89 90 addr = (unsigned char *)laddr; 91 writeb(0x12, priv(host)->base + CTRL); 92 93 while(len > 0) 94 { 95 unsigned int status; 96 status = readb(priv(host)->base + STAT); 97 if(status & 0x80) 98 goto end; 99 if(status & 0x40) 100 { 101 writeb(*addr++, dma); 102 if(--len == 0) 103 break; 104 } 105 106 status = readb(priv(host)->base + STAT); 107 if(status & 0x80) 108 goto end; 109 if(status & 0x40) 110 { 111 writeb(*addr++, dma); 112 if(--len == 0) 113 break; 114 } 115 } 116 end: 117 writeb(priv(host)->ctrl | 0x40, priv(host)->base + CTRL); 118 return len; 119 } 120 121 static inline int 122 NCR5380_pread(struct Scsi_Host *host, unsigned char *addr, int len) 123 { 124 unsigned long *laddr; 125 void __iomem *dma = priv(host)->dma + 0x2000; 126 127 if(!len) return 0; 128 129 writeb(0x00, priv(host)->base + CTRL); 130 laddr = (unsigned long *)addr; 131 while(len >= 32) 132 { 133 unsigned int status; 134 status = readb(priv(host)->base + STAT); 135 if(status & 0x80) 136 goto end; 137 if(!(status & 0x40)) 138 continue; 139 *laddr++ = readw(dma) | (readw(dma) << 16); 140 *laddr++ = readw(dma) | (readw(dma) << 16); 141 *laddr++ = readw(dma) | (readw(dma) << 16); 142 *laddr++ = readw(dma) | (readw(dma) << 16); 143 *laddr++ = readw(dma) | (readw(dma) << 16); 144 *laddr++ = readw(dma) | (readw(dma) << 16); 145 *laddr++ = readw(dma) | (readw(dma) << 16); 146 *laddr++ = readw(dma) | (readw(dma) << 16); 147 len -= 32; 148 if(len == 0) 149 break; 150 } 151 152 addr = (unsigned char *)laddr; 153 writeb(0x10, priv(host)->base + CTRL); 154 155 while(len > 0) 156 { 157 unsigned int status; 158 status = readb(priv(host)->base + STAT); 159 if(status & 0x80) 160 goto end; 161 if(status & 0x40) 162 { 163 *addr++ = readb(dma); 164 if(--len == 0) 165 break; 166 } 167 168 status = readb(priv(host)->base + STAT); 169 if(status & 0x80) 170 goto end; 171 if(status & 0x40) 172 { 173 *addr++ = readb(dma); 174 if(--len == 0) 175 break; 176 } 177 } 178 end: 179 writeb(priv(host)->ctrl | 0x40, priv(host)->base + CTRL); 180 return len; 181 } 182 183 static unsigned char cumanascsi_read(struct Scsi_Host *host, unsigned int reg) 184 { 185 void __iomem *base = priv(host)->base; 186 unsigned char val; 187 188 writeb(0, base + CTRL); 189 190 val = readb(base + 0x2100 + (reg << 2)); 191 192 priv(host)->ctrl = 0x40; 193 writeb(0x40, base + CTRL); 194 195 return val; 196 } 197 198 static void cumanascsi_write(struct Scsi_Host *host, unsigned int reg, unsigned int value) 199 { 200 void __iomem *base = priv(host)->base; 201 202 writeb(0, base + CTRL); 203 204 writeb(value, base + 0x2100 + (reg << 2)); 205 206 priv(host)->ctrl = 0x40; 207 writeb(0x40, base + CTRL); 208 } 209 210 #include "../NCR5380.c" 211 212 static struct scsi_host_template cumanascsi_template = { 213 .module = THIS_MODULE, 214 .name = "Cumana 16-bit SCSI", 215 .info = cumanascsi_info, 216 .queuecommand = cumanascsi_queue_command, 217 .eh_abort_handler = NCR5380_abort, 218 .eh_bus_reset_handler = NCR5380_bus_reset, 219 .can_queue = 16, 220 .this_id = 7, 221 .sg_tablesize = SG_ALL, 222 .cmd_per_lun = 2, 223 .use_clustering = DISABLE_CLUSTERING, 224 .proc_name = "CumanaSCSI-1", 225 }; 226 227 static int cumanascsi1_probe(struct expansion_card *ec, 228 const struct ecard_id *id) 229 { 230 struct Scsi_Host *host; 231 int ret; 232 233 ret = ecard_request_resources(ec); 234 if (ret) 235 goto out; 236 237 host = scsi_host_alloc(&cumanascsi_template, sizeof(struct NCR5380_hostdata)); 238 if (!host) { 239 ret = -ENOMEM; 240 goto out_release; 241 } 242 243 priv(host)->base = ioremap(ecard_resource_start(ec, ECARD_RES_IOCSLOW), 244 ecard_resource_len(ec, ECARD_RES_IOCSLOW)); 245 priv(host)->dma = ioremap(ecard_resource_start(ec, ECARD_RES_MEMC), 246 ecard_resource_len(ec, ECARD_RES_MEMC)); 247 if (!priv(host)->base || !priv(host)->dma) { 248 ret = -ENOMEM; 249 goto out_unmap; 250 } 251 252 host->irq = ec->irq; 253 254 NCR5380_init(host, 0); 255 256 priv(host)->ctrl = 0; 257 writeb(0, priv(host)->base + CTRL); 258 259 host->n_io_port = 255; 260 if (!(request_region(host->io_port, host->n_io_port, "CumanaSCSI-1"))) { 261 ret = -EBUSY; 262 goto out_unmap; 263 } 264 265 ret = request_irq(host->irq, cumanascsi_intr, 0, 266 "CumanaSCSI-1", host); 267 if (ret) { 268 printk("scsi%d: IRQ%d not free: %d\n", 269 host->host_no, host->irq, ret); 270 goto out_unmap; 271 } 272 273 printk("scsi%d: at port 0x%08lx irq %d", 274 host->host_no, host->io_port, host->irq); 275 printk(" options CAN_QUEUE=%d CMD_PER_LUN=%d release=%d", 276 host->can_queue, host->cmd_per_lun, CUMANASCSI_PUBLIC_RELEASE); 277 printk("\nscsi%d:", host->host_no); 278 NCR5380_print_options(host); 279 printk("\n"); 280 281 ret = scsi_add_host(host, &ec->dev); 282 if (ret) 283 goto out_free_irq; 284 285 scsi_scan_host(host); 286 goto out; 287 288 out_free_irq: 289 free_irq(host->irq, host); 290 out_unmap: 291 iounmap(priv(host)->base); 292 iounmap(priv(host)->dma); 293 scsi_host_put(host); 294 out_release: 295 ecard_release_resources(ec); 296 out: 297 return ret; 298 } 299 300 static void cumanascsi1_remove(struct expansion_card *ec) 301 { 302 struct Scsi_Host *host = ecard_get_drvdata(ec); 303 304 ecard_set_drvdata(ec, NULL); 305 306 scsi_remove_host(host); 307 free_irq(host->irq, host); 308 NCR5380_exit(host); 309 iounmap(priv(host)->base); 310 iounmap(priv(host)->dma); 311 scsi_host_put(host); 312 ecard_release_resources(ec); 313 } 314 315 static const struct ecard_id cumanascsi1_cids[] = { 316 { MANU_CUMANA, PROD_CUMANA_SCSI_1 }, 317 { 0xffff, 0xffff } 318 }; 319 320 static struct ecard_driver cumanascsi1_driver = { 321 .probe = cumanascsi1_probe, 322 .remove = cumanascsi1_remove, 323 .id_table = cumanascsi1_cids, 324 .drv = { 325 .name = "cumanascsi1", 326 }, 327 }; 328 329 static int __init cumanascsi_init(void) 330 { 331 return ecard_register_driver(&cumanascsi1_driver); 332 } 333 334 static void __exit cumanascsi_exit(void) 335 { 336 ecard_remove_driver(&cumanascsi1_driver); 337 } 338 339 module_init(cumanascsi_init); 340 module_exit(cumanascsi_exit); 341 342 MODULE_DESCRIPTION("Cumana SCSI-1 driver for Acorn machines"); 343 MODULE_LICENSE("GPL"); 344