Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /* $Id: $ |
| 2 | * linux/drivers/scsi/wd7000.c |
| 3 | * |
| 4 | * Copyright (C) 1992 Thomas Wuensche |
| 5 | * closely related to the aha1542 driver from Tommy Thorn |
| 6 | * ( as close as different hardware allows on a lowlevel-driver :-) ) |
| 7 | * |
| 8 | * Revised (and renamed) by John Boyd <boyd@cis.ohio-state.edu> to |
| 9 | * accommodate Eric Youngdale's modifications to scsi.c. Nov 1992. |
| 10 | * |
| 11 | * Additional changes to support scatter/gather. Dec. 1992. tw/jb |
| 12 | * |
| 13 | * No longer tries to reset SCSI bus at boot (it wasn't working anyway). |
| 14 | * Rewritten to support multiple host adapters. |
| 15 | * Miscellaneous cleanup. |
| 16 | * So far, still doesn't do reset or abort correctly, since I have no idea |
| 17 | * how to do them with this board (8^(. Jan 1994 jb |
| 18 | * |
| 19 | * This driver now supports both of the two standard configurations (per |
| 20 | * the 3.36 Owner's Manual, my latest reference) by the same method as |
| 21 | * before; namely, by looking for a BIOS signature. Thus, the location of |
| 22 | * the BIOS signature determines the board configuration. Until I have |
| 23 | * time to do something more flexible, users should stick to one of the |
| 24 | * following: |
| 25 | * |
| 26 | * Standard configuration for single-adapter systems: |
| 27 | * - BIOS at CE00h |
| 28 | * - I/O base address 350h |
| 29 | * - IRQ level 15 |
| 30 | * - DMA channel 6 |
| 31 | * Standard configuration for a second adapter in a system: |
| 32 | * - BIOS at C800h |
| 33 | * - I/O base address 330h |
| 34 | * - IRQ level 11 |
| 35 | * - DMA channel 5 |
| 36 | * |
| 37 | * Anyone who can recompile the kernel is welcome to add others as need |
| 38 | * arises, but unpredictable results may occur if there are conflicts. |
| 39 | * In any event, if there are multiple adapters in a system, they MUST |
| 40 | * use different I/O bases, IRQ levels, and DMA channels, since they will be |
| 41 | * indistinguishable (and in direct conflict) otherwise. |
| 42 | * |
| 43 | * As a point of information, the NO_OP command toggles the CMD_RDY bit |
| 44 | * of the status port, and this fact could be used as a test for the I/O |
| 45 | * base address (or more generally, board detection). There is an interrupt |
| 46 | * status port, so IRQ probing could also be done. I suppose the full |
| 47 | * DMA diagnostic could be used to detect the DMA channel being used. I |
| 48 | * haven't done any of this, though, because I think there's too much of |
| 49 | * a chance that such explorations could be destructive, if some other |
| 50 | * board's resources are used inadvertently. So, call me a wimp, but I |
| 51 | * don't want to try it. The only kind of exploration I trust is memory |
| 52 | * exploration, since it's more certain that reading memory won't be |
| 53 | * destructive. |
| 54 | * |
| 55 | * More to my liking would be a LILO boot command line specification, such |
| 56 | * as is used by the aha152x driver (and possibly others). I'll look into |
| 57 | * it, as I have time... |
| 58 | * |
| 59 | * I get mail occasionally from people who either are using or are |
| 60 | * considering using a WD7000 with Linux. There is a variety of |
| 61 | * nomenclature describing WD7000's. To the best of my knowledge, the |
| 62 | * following is a brief summary (from an old WD doc - I don't work for |
| 63 | * them or anything like that): |
| 64 | * |
| 65 | * WD7000-FASST2: This is a WD7000 board with the real-mode SST ROM BIOS |
| 66 | * installed. Last I heard, the BIOS was actually done by Columbia |
| 67 | * Data Products. The BIOS is only used by this driver (and thus |
| 68 | * by Linux) to identify the board; none of it can be executed under |
| 69 | * Linux. |
| 70 | * |
| 71 | * WD7000-ASC: This is the original adapter board, with or without BIOS. |
| 72 | * The board uses a WD33C93 or WD33C93A SBIC, which in turn is |
| 73 | * controlled by an onboard Z80 processor. The board interface |
| 74 | * visible to the host CPU is defined effectively by the Z80's |
| 75 | * firmware, and it is this firmware's revision level that is |
| 76 | * determined and reported by this driver. (The version of the |
| 77 | * on-board BIOS is of no interest whatsoever.) The host CPU has |
| 78 | * no access to the SBIC; hence the fact that it is a WD33C93 is |
| 79 | * also of no interest to this driver. |
| 80 | * |
| 81 | * WD7000-AX: |
| 82 | * WD7000-MX: |
| 83 | * WD7000-EX: These are newer versions of the WD7000-ASC. The -ASC is |
| 84 | * largely built from discrete components; these boards use more |
| 85 | * integration. The -AX is an ISA bus board (like the -ASC), |
| 86 | * the -MX is an MCA (i.e., PS/2) bus board), and the -EX is an |
| 87 | * EISA bus board. |
| 88 | * |
| 89 | * At the time of my documentation, the -?X boards were "future" products, |
| 90 | * and were not yet available. However, I vaguely recall that Thomas |
| 91 | * Wuensche had an -AX, so I believe at least it is supported by this |
| 92 | * driver. I have no personal knowledge of either -MX or -EX boards. |
| 93 | * |
| 94 | * P.S. Just recently, I've discovered (directly from WD and Future |
| 95 | * Domain) that all but the WD7000-EX have been out of production for |
| 96 | * two years now. FD has production rights to the 7000-EX, and are |
| 97 | * producing it under a new name, and with a new BIOS. If anyone has |
| 98 | * one of the FD boards, it would be nice to come up with a signature |
| 99 | * for it. |
| 100 | * J.B. Jan 1994. |
| 101 | * |
| 102 | * |
| 103 | * Revisions by Miroslav Zagorac <zaga@fly.cc.fer.hr> |
| 104 | * |
| 105 | * 08/24/1996. |
| 106 | * |
| 107 | * Enhancement for wd7000_detect function has been made, so you don't have |
| 108 | * to enter BIOS ROM address in initialisation data (see struct Config). |
| 109 | * We cannot detect IRQ, DMA and I/O base address for now, so we have to |
| 110 | * enter them as arguments while wd_7000 is detected. If someone has IRQ, |
| 111 | * DMA or I/O base address set to some other value, he can enter them in |
| 112 | * configuration without any problem. Also I wrote a function wd7000_setup, |
| 113 | * so now you can enter WD-7000 definition as kernel arguments, |
| 114 | * as in lilo.conf: |
| 115 | * |
| 116 | * append="wd7000=IRQ,DMA,IO" |
| 117 | * |
| 118 | * PS: If card BIOS ROM is disabled, function wd7000_detect now will recognize |
| 119 | * adapter, unlike the old one. Anyway, BIOS ROM from WD7000 adapter is |
| 120 | * useless for Linux. B^) |
| 121 | * |
| 122 | * |
| 123 | * 09/06/1996. |
| 124 | * |
| 125 | * Autodetecting of I/O base address from wd7000_detect function is removed, |
| 126 | * some little bugs removed, etc... |
| 127 | * |
| 128 | * Thanks to Roger Scott for driver debugging. |
| 129 | * |
| 130 | * 06/07/1997 |
| 131 | * |
| 132 | * Added support for /proc file system (/proc/scsi/wd7000/[0...] files). |
| 133 | * Now, driver can handle hard disks with capacity >1GB. |
| 134 | * |
| 135 | * 01/15/1998 |
| 136 | * |
| 137 | * Added support for BUS_ON and BUS_OFF parameters in config line. |
| 138 | * Miscellaneous cleanup. |
| 139 | * |
| 140 | * 03/01/1998 |
| 141 | * |
| 142 | * WD7000 driver now work on kernels >= 2.1.x |
| 143 | * |
| 144 | * |
| 145 | * 12/31/2001 - Arnaldo Carvalho de Melo <acme@conectiva.com.br> |
| 146 | * |
| 147 | * use host->host_lock, not io_request_lock, cleanups |
| 148 | * |
| 149 | * 2002/10/04 - Alan Cox <alan@redhat.com> |
| 150 | * |
| 151 | * Use dev_id for interrupts, kill __FUNCTION__ pasting |
| 152 | * Add a lock for the scb pool, clean up all other cli/sti usage stuff |
| 153 | * Use the adapter lock for the other places we had the cli's |
| 154 | * |
| 155 | * 2002/10/06 - Alan Cox <alan@redhat.com> |
| 156 | * |
| 157 | * Switch to new style error handling |
| 158 | * Clean up delay to udelay, and yielding sleeps |
| 159 | * Make host reset actually reset the card |
| 160 | * Make everything static |
| 161 | * |
| 162 | * 2003/02/12 - Christoph Hellwig <hch@infradead.org> |
| 163 | * |
| 164 | * Cleaned up host template defintion |
| 165 | * Removed now obsolete wd7000.h |
| 166 | */ |
| 167 | |
| 168 | #include <linux/delay.h> |
| 169 | #include <linux/module.h> |
| 170 | #include <linux/interrupt.h> |
| 171 | #include <linux/kernel.h> |
| 172 | #include <linux/types.h> |
| 173 | #include <linux/string.h> |
| 174 | #include <linux/slab.h> |
| 175 | #include <linux/spinlock.h> |
| 176 | #include <linux/ioport.h> |
| 177 | #include <linux/proc_fs.h> |
| 178 | #include <linux/blkdev.h> |
| 179 | #include <linux/init.h> |
| 180 | #include <linux/stat.h> |
| 181 | |
| 182 | #include <asm/system.h> |
| 183 | #include <asm/dma.h> |
| 184 | #include <asm/io.h> |
| 185 | |
| 186 | #include <scsi/scsi.h> |
| 187 | #include <scsi/scsi_cmnd.h> |
| 188 | #include <scsi/scsi_device.h> |
| 189 | #include <scsi/scsi_host.h> |
| 190 | #include <scsi/scsicam.h> |
| 191 | |
| 192 | |
| 193 | #undef WD7000_DEBUG /* general debug */ |
| 194 | #ifdef WD7000_DEBUG |
| 195 | #define dprintk printk |
| 196 | #else |
| 197 | #define dprintk(format,args...) |
| 198 | #endif |
| 199 | |
| 200 | /* |
| 201 | * Mailbox structure sizes. |
| 202 | * I prefer to keep the number of ICMBs much larger than the number of |
| 203 | * OGMBs. OGMBs are used very quickly by the driver to start one or |
| 204 | * more commands, while ICMBs are used by the host adapter per command. |
| 205 | */ |
| 206 | #define OGMB_CNT 16 |
| 207 | #define ICMB_CNT 32 |
| 208 | |
| 209 | /* |
| 210 | * Scb's are shared by all active adapters. So, if they all become busy, |
| 211 | * callers may be made to wait in alloc_scbs for them to free. That can |
| 212 | * be avoided by setting MAX_SCBS to NUM_CONFIG * WD7000_Q. If you'd |
| 213 | * rather conserve memory, use a smaller number (> 0, of course) - things |
| 214 | * will should still work OK. |
| 215 | */ |
| 216 | #define MAX_SCBS 32 |
| 217 | |
| 218 | /* |
| 219 | * In this version, sg_tablesize now defaults to WD7000_SG, and will |
| 220 | * be set to SG_NONE for older boards. This is the reverse of the |
| 221 | * previous default, and was changed so that the driver-level |
| 222 | * scsi_host_template would reflect the driver's support for scatter/ |
| 223 | * gather. |
| 224 | * |
| 225 | * Also, it has been reported that boards at Revision 6 support scatter/ |
| 226 | * gather, so the new definition of an "older" board has been changed |
| 227 | * accordingly. |
| 228 | */ |
| 229 | #define WD7000_Q 16 |
| 230 | #define WD7000_SG 16 |
| 231 | |
| 232 | |
| 233 | /* |
| 234 | * WD7000-specific mailbox structure |
| 235 | * |
| 236 | */ |
| 237 | typedef volatile struct mailbox { |
| 238 | unchar status; |
| 239 | unchar scbptr[3]; /* SCSI-style - MSB first (big endian) */ |
| 240 | } Mailbox; |
| 241 | |
| 242 | /* |
| 243 | * This structure should contain all per-adapter global data. I.e., any |
| 244 | * new global per-adapter data should put in here. |
| 245 | */ |
| 246 | typedef struct adapter { |
| 247 | struct Scsi_Host *sh; /* Pointer to Scsi_Host structure */ |
| 248 | int iobase; /* This adapter's I/O base address */ |
| 249 | int irq; /* This adapter's IRQ level */ |
| 250 | int dma; /* This adapter's DMA channel */ |
| 251 | int int_counter; /* This adapter's interrupt counter */ |
| 252 | int bus_on; /* This adapter's BUS_ON time */ |
| 253 | int bus_off; /* This adapter's BUS_OFF time */ |
| 254 | struct { /* This adapter's mailboxes */ |
| 255 | Mailbox ogmb[OGMB_CNT]; /* Outgoing mailboxes */ |
| 256 | Mailbox icmb[ICMB_CNT]; /* Incoming mailboxes */ |
| 257 | } mb; |
| 258 | int next_ogmb; /* to reduce contention at mailboxes */ |
| 259 | unchar control; /* shadows CONTROL port value */ |
| 260 | unchar rev1, rev2; /* filled in by wd7000_revision */ |
| 261 | } Adapter; |
| 262 | |
| 263 | /* |
| 264 | * (linear) base address for ROM BIOS |
| 265 | */ |
| 266 | static const long wd7000_biosaddr[] = { |
| 267 | 0xc0000, 0xc2000, 0xc4000, 0xc6000, 0xc8000, 0xca000, 0xcc000, 0xce000, |
| 268 | 0xd0000, 0xd2000, 0xd4000, 0xd6000, 0xd8000, 0xda000, 0xdc000, 0xde000 |
| 269 | }; |
Tobias Klauser | 6391a11 | 2006-06-08 22:23:48 -0700 | [diff] [blame] | 270 | #define NUM_ADDRS ARRAY_SIZE(wd7000_biosaddr) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 271 | |
| 272 | static const unsigned short wd7000_iobase[] = { |
| 273 | 0x0300, 0x0308, 0x0310, 0x0318, 0x0320, 0x0328, 0x0330, 0x0338, |
| 274 | 0x0340, 0x0348, 0x0350, 0x0358, 0x0360, 0x0368, 0x0370, 0x0378, |
| 275 | 0x0380, 0x0388, 0x0390, 0x0398, 0x03a0, 0x03a8, 0x03b0, 0x03b8, |
| 276 | 0x03c0, 0x03c8, 0x03d0, 0x03d8, 0x03e0, 0x03e8, 0x03f0, 0x03f8 |
| 277 | }; |
Tobias Klauser | 6391a11 | 2006-06-08 22:23:48 -0700 | [diff] [blame] | 278 | #define NUM_IOPORTS ARRAY_SIZE(wd7000_iobase) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 279 | |
| 280 | static const short wd7000_irq[] = { 3, 4, 5, 7, 9, 10, 11, 12, 14, 15 }; |
Tobias Klauser | 6391a11 | 2006-06-08 22:23:48 -0700 | [diff] [blame] | 281 | #define NUM_IRQS ARRAY_SIZE(wd7000_irq) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 282 | |
| 283 | static const short wd7000_dma[] = { 5, 6, 7 }; |
Tobias Klauser | 6391a11 | 2006-06-08 22:23:48 -0700 | [diff] [blame] | 284 | #define NUM_DMAS ARRAY_SIZE(wd7000_dma) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 285 | |
| 286 | /* |
| 287 | * The following is set up by wd7000_detect, and used thereafter for |
| 288 | * proc and other global ookups |
| 289 | */ |
| 290 | |
| 291 | #define UNITS 8 |
| 292 | static struct Scsi_Host *wd7000_host[UNITS]; |
| 293 | |
| 294 | #define BUS_ON 64 /* x 125ns = 8000ns (BIOS default) */ |
| 295 | #define BUS_OFF 15 /* x 125ns = 1875ns (BIOS default) */ |
| 296 | |
| 297 | /* |
| 298 | * Standard Adapter Configurations - used by wd7000_detect |
| 299 | */ |
| 300 | typedef struct { |
| 301 | short irq; /* IRQ level */ |
| 302 | short dma; /* DMA channel */ |
| 303 | unsigned iobase; /* I/O base address */ |
| 304 | short bus_on; /* Time that WD7000 spends on the AT-bus when */ |
| 305 | /* transferring data. BIOS default is 8000ns. */ |
| 306 | short bus_off; /* Time that WD7000 spends OFF THE BUS after */ |
| 307 | /* while it is transferring data. */ |
| 308 | /* BIOS default is 1875ns */ |
| 309 | } Config; |
| 310 | |
| 311 | /* |
| 312 | * Add here your configuration... |
| 313 | */ |
| 314 | static Config configs[] = { |
| 315 | {15, 6, 0x350, BUS_ON, BUS_OFF}, /* defaults for single adapter */ |
| 316 | {11, 5, 0x320, BUS_ON, BUS_OFF}, /* defaults for second adapter */ |
| 317 | {7, 6, 0x350, BUS_ON, BUS_OFF}, /* My configuration (Zaga) */ |
| 318 | {-1, -1, 0x0, BUS_ON, BUS_OFF} /* Empty slot */ |
| 319 | }; |
Tobias Klauser | 6391a11 | 2006-06-08 22:23:48 -0700 | [diff] [blame] | 320 | #define NUM_CONFIGS ARRAY_SIZE(configs) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 321 | |
| 322 | /* |
| 323 | * The following list defines strings to look for in the BIOS that identify |
| 324 | * it as the WD7000-FASST2 SST BIOS. I suspect that something should be |
| 325 | * added for the Future Domain version. |
| 326 | */ |
| 327 | typedef struct signature { |
| 328 | const char *sig; /* String to look for */ |
| 329 | unsigned long ofs; /* offset from BIOS base address */ |
| 330 | unsigned len; /* length of string */ |
| 331 | } Signature; |
| 332 | |
| 333 | static const Signature signatures[] = { |
| 334 | {"SSTBIOS", 0x0000d, 7} /* "SSTBIOS" @ offset 0x0000d */ |
| 335 | }; |
Tobias Klauser | 6391a11 | 2006-06-08 22:23:48 -0700 | [diff] [blame] | 336 | #define NUM_SIGNATURES ARRAY_SIZE(signatures) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 337 | |
| 338 | |
| 339 | /* |
| 340 | * I/O Port Offsets and Bit Definitions |
| 341 | * 4 addresses are used. Those not defined here are reserved. |
| 342 | */ |
| 343 | #define ASC_STAT 0 /* Status, Read */ |
| 344 | #define ASC_COMMAND 0 /* Command, Write */ |
| 345 | #define ASC_INTR_STAT 1 /* Interrupt Status, Read */ |
| 346 | #define ASC_INTR_ACK 1 /* Acknowledge, Write */ |
| 347 | #define ASC_CONTROL 2 /* Control, Write */ |
| 348 | |
| 349 | /* |
| 350 | * ASC Status Port |
| 351 | */ |
| 352 | #define INT_IM 0x80 /* Interrupt Image Flag */ |
| 353 | #define CMD_RDY 0x40 /* Command Port Ready */ |
| 354 | #define CMD_REJ 0x20 /* Command Port Byte Rejected */ |
| 355 | #define ASC_INIT 0x10 /* ASC Initialized Flag */ |
| 356 | #define ASC_STATMASK 0xf0 /* The lower 4 Bytes are reserved */ |
| 357 | |
| 358 | /* |
| 359 | * COMMAND opcodes |
| 360 | * |
| 361 | * Unfortunately, I have no idea how to properly use some of these commands, |
| 362 | * as the OEM manual does not make it clear. I have not been able to use |
| 363 | * enable/disable unsolicited interrupts or the reset commands with any |
| 364 | * discernible effect whatsoever. I think they may be related to certain |
| 365 | * ICB commands, but again, the OEM manual doesn't make that clear. |
| 366 | */ |
| 367 | #define NO_OP 0 /* NO-OP toggles CMD_RDY bit in ASC_STAT */ |
| 368 | #define INITIALIZATION 1 /* initialization (10 bytes) */ |
| 369 | #define DISABLE_UNS_INTR 2 /* disable unsolicited interrupts */ |
| 370 | #define ENABLE_UNS_INTR 3 /* enable unsolicited interrupts */ |
| 371 | #define INTR_ON_FREE_OGMB 4 /* interrupt on free OGMB */ |
| 372 | #define SOFT_RESET 5 /* SCSI bus soft reset */ |
| 373 | #define HARD_RESET_ACK 6 /* SCSI bus hard reset acknowledge */ |
| 374 | #define START_OGMB 0x80 /* start command in OGMB (n) */ |
| 375 | #define SCAN_OGMBS 0xc0 /* start multiple commands, signature (n) */ |
| 376 | /* where (n) = lower 6 bits */ |
| 377 | /* |
| 378 | * For INITIALIZATION: |
| 379 | */ |
| 380 | typedef struct initCmd { |
| 381 | unchar op; /* command opcode (= 1) */ |
| 382 | unchar ID; /* Adapter's SCSI ID */ |
| 383 | unchar bus_on; /* Bus on time, x 125ns (see below) */ |
| 384 | unchar bus_off; /* Bus off time, "" "" */ |
| 385 | unchar rsvd; /* Reserved */ |
| 386 | unchar mailboxes[3]; /* Address of Mailboxes, MSB first */ |
| 387 | unchar ogmbs; /* Number of outgoing MBs, max 64, 0,1 = 1 */ |
| 388 | unchar icmbs; /* Number of incoming MBs, "" "" */ |
| 389 | } InitCmd; |
| 390 | |
| 391 | /* |
| 392 | * Interrupt Status Port - also returns diagnostic codes at ASC reset |
| 393 | * |
| 394 | * if msb is zero, the lower bits are diagnostic status |
| 395 | * Diagnostics: |
| 396 | * 01 No diagnostic error occurred |
| 397 | * 02 RAM failure |
| 398 | * 03 FIFO R/W failed |
| 399 | * 04 SBIC register read/write failed |
| 400 | * 05 Initialization D-FF failed |
| 401 | * 06 Host IRQ D-FF failed |
| 402 | * 07 ROM checksum error |
| 403 | * Interrupt status (bitwise): |
| 404 | * 10NNNNNN outgoing mailbox NNNNNN is free |
| 405 | * 11NNNNNN incoming mailbox NNNNNN needs service |
| 406 | */ |
| 407 | #define MB_INTR 0xC0 /* Mailbox Service possible/required */ |
| 408 | #define IMB_INTR 0x40 /* 1 Incoming / 0 Outgoing */ |
| 409 | #define MB_MASK 0x3f /* mask for mailbox number */ |
| 410 | |
| 411 | /* |
| 412 | * CONTROL port bits |
| 413 | */ |
| 414 | #define INT_EN 0x08 /* Interrupt Enable */ |
| 415 | #define DMA_EN 0x04 /* DMA Enable */ |
| 416 | #define SCSI_RES 0x02 /* SCSI Reset */ |
| 417 | #define ASC_RES 0x01 /* ASC Reset */ |
| 418 | |
| 419 | /* |
| 420 | * Driver data structures: |
| 421 | * - mb and scbs are required for interfacing with the host adapter. |
| 422 | * An SCB has extra fields not visible to the adapter; mb's |
| 423 | * _cannot_ do this, since the adapter assumes they are contiguous in |
| 424 | * memory, 4 bytes each, with ICMBs following OGMBs, and uses this fact |
| 425 | * to access them. |
| 426 | * - An icb is for host-only (non-SCSI) commands. ICBs are 16 bytes each; |
| 427 | * the additional bytes are used only by the driver. |
| 428 | * - For now, a pool of SCBs are kept in global storage by this driver, |
| 429 | * and are allocated and freed as needed. |
| 430 | * |
| 431 | * The 7000-FASST2 marks OGMBs empty as soon as it has _started_ a command, |
| 432 | * not when it has finished. Since the SCB must be around for completion, |
| 433 | * problems arise when SCBs correspond to OGMBs, which may be reallocated |
| 434 | * earlier (or delayed unnecessarily until a command completes). |
| 435 | * Mailboxes are used as transient data structures, simply for |
| 436 | * carrying SCB addresses to/from the 7000-FASST2. |
| 437 | * |
| 438 | * Note also since SCBs are not "permanently" associated with mailboxes, |
| 439 | * there is no need to keep a global list of scsi_cmnd pointers indexed |
| 440 | * by OGMB. Again, SCBs reference their scsi_cmnds directly, so mailbox |
| 441 | * indices need not be involved. |
| 442 | */ |
| 443 | |
| 444 | /* |
| 445 | * WD7000-specific scatter/gather element structure |
| 446 | */ |
| 447 | typedef struct sgb { |
| 448 | unchar len[3]; |
| 449 | unchar ptr[3]; /* Also SCSI-style - MSB first */ |
| 450 | } Sgb; |
| 451 | |
| 452 | typedef struct scb { /* Command Control Block 5.4.1 */ |
| 453 | unchar op; /* Command Control Block Operation Code */ |
| 454 | unchar idlun; /* op=0,2:Target Id, op=1:Initiator Id */ |
| 455 | /* Outbound data transfer, length is checked */ |
| 456 | /* Inbound data transfer, length is checked */ |
| 457 | /* Logical Unit Number */ |
| 458 | unchar cdb[12]; /* SCSI Command Block */ |
| 459 | volatile unchar status; /* SCSI Return Status */ |
| 460 | volatile unchar vue; /* Vendor Unique Error Code */ |
| 461 | unchar maxlen[3]; /* Maximum Data Transfer Length */ |
| 462 | unchar dataptr[3]; /* SCSI Data Block Pointer */ |
| 463 | unchar linkptr[3]; /* Next Command Link Pointer */ |
| 464 | unchar direc; /* Transfer Direction */ |
| 465 | unchar reserved2[6]; /* SCSI Command Descriptor Block */ |
| 466 | /* end of hardware SCB */ |
| 467 | struct scsi_cmnd *SCpnt;/* scsi_cmnd using this SCB */ |
| 468 | Sgb sgb[WD7000_SG]; /* Scatter/gather list for this SCB */ |
| 469 | Adapter *host; /* host adapter */ |
| 470 | struct scb *next; /* for lists of scbs */ |
| 471 | } Scb; |
| 472 | |
| 473 | /* |
| 474 | * This driver is written to allow host-only commands to be executed. |
| 475 | * These use a 16-byte block called an ICB. The format is extended by the |
| 476 | * driver to 18 bytes, to support the status returned in the ICMB and |
| 477 | * an execution phase code. |
| 478 | * |
| 479 | * There are other formats besides these; these are the ones I've tried |
| 480 | * to use. Formats for some of the defined ICB opcodes are not defined |
| 481 | * (notably, get/set unsolicited interrupt status) in my copy of the OEM |
| 482 | * manual, and others are ambiguous/hard to follow. |
| 483 | */ |
| 484 | #define ICB_OP_MASK 0x80 /* distinguishes scbs from icbs */ |
| 485 | #define ICB_OP_OPEN_RBUF 0x80 /* open receive buffer */ |
| 486 | #define ICB_OP_RECV_CMD 0x81 /* receive command from initiator */ |
| 487 | #define ICB_OP_RECV_DATA 0x82 /* receive data from initiator */ |
| 488 | #define ICB_OP_RECV_SDATA 0x83 /* receive data with status from init. */ |
| 489 | #define ICB_OP_SEND_DATA 0x84 /* send data with status to initiator */ |
| 490 | #define ICB_OP_SEND_STAT 0x86 /* send command status to initiator */ |
| 491 | /* 0x87 is reserved */ |
| 492 | #define ICB_OP_READ_INIT 0x88 /* read initialization bytes */ |
| 493 | #define ICB_OP_READ_ID 0x89 /* read adapter's SCSI ID */ |
| 494 | #define ICB_OP_SET_UMASK 0x8A /* set unsolicited interrupt mask */ |
| 495 | #define ICB_OP_GET_UMASK 0x8B /* read unsolicited interrupt mask */ |
| 496 | #define ICB_OP_GET_REVISION 0x8C /* read firmware revision level */ |
| 497 | #define ICB_OP_DIAGNOSTICS 0x8D /* execute diagnostics */ |
| 498 | #define ICB_OP_SET_EPARMS 0x8E /* set execution parameters */ |
| 499 | #define ICB_OP_GET_EPARMS 0x8F /* read execution parameters */ |
| 500 | |
| 501 | typedef struct icbRecvCmd { |
| 502 | unchar op; |
| 503 | unchar IDlun; /* Initiator SCSI ID/lun */ |
| 504 | unchar len[3]; /* command buffer length */ |
| 505 | unchar ptr[3]; /* command buffer address */ |
| 506 | unchar rsvd[7]; /* reserved */ |
| 507 | volatile unchar vue; /* vendor-unique error code */ |
| 508 | volatile unchar status; /* returned (icmb) status */ |
| 509 | volatile unchar phase; /* used by interrupt handler */ |
| 510 | } IcbRecvCmd; |
| 511 | |
| 512 | typedef struct icbSendStat { |
| 513 | unchar op; |
| 514 | unchar IDlun; /* Target SCSI ID/lun */ |
| 515 | unchar stat; /* (outgoing) completion status byte 1 */ |
| 516 | unchar rsvd[12]; /* reserved */ |
| 517 | volatile unchar vue; /* vendor-unique error code */ |
| 518 | volatile unchar status; /* returned (icmb) status */ |
| 519 | volatile unchar phase; /* used by interrupt handler */ |
| 520 | } IcbSendStat; |
| 521 | |
| 522 | typedef struct icbRevLvl { |
| 523 | unchar op; |
| 524 | volatile unchar primary; /* primary revision level (returned) */ |
| 525 | volatile unchar secondary; /* secondary revision level (returned) */ |
| 526 | unchar rsvd[12]; /* reserved */ |
| 527 | volatile unchar vue; /* vendor-unique error code */ |
| 528 | volatile unchar status; /* returned (icmb) status */ |
| 529 | volatile unchar phase; /* used by interrupt handler */ |
| 530 | } IcbRevLvl; |
| 531 | |
| 532 | typedef struct icbUnsMask { /* I'm totally guessing here */ |
| 533 | unchar op; |
| 534 | volatile unchar mask[14]; /* mask bits */ |
| 535 | #if 0 |
| 536 | unchar rsvd[12]; /* reserved */ |
| 537 | #endif |
| 538 | volatile unchar vue; /* vendor-unique error code */ |
| 539 | volatile unchar status; /* returned (icmb) status */ |
| 540 | volatile unchar phase; /* used by interrupt handler */ |
| 541 | } IcbUnsMask; |
| 542 | |
| 543 | typedef struct icbDiag { |
| 544 | unchar op; |
| 545 | unchar type; /* diagnostics type code (0-3) */ |
| 546 | unchar len[3]; /* buffer length */ |
| 547 | unchar ptr[3]; /* buffer address */ |
| 548 | unchar rsvd[7]; /* reserved */ |
| 549 | volatile unchar vue; /* vendor-unique error code */ |
| 550 | volatile unchar status; /* returned (icmb) status */ |
| 551 | volatile unchar phase; /* used by interrupt handler */ |
| 552 | } IcbDiag; |
| 553 | |
| 554 | #define ICB_DIAG_POWERUP 0 /* Power-up diags only */ |
| 555 | #define ICB_DIAG_WALKING 1 /* walking 1's pattern */ |
| 556 | #define ICB_DIAG_DMA 2 /* DMA - system memory diags */ |
| 557 | #define ICB_DIAG_FULL 3 /* do both 1 & 2 */ |
| 558 | |
| 559 | typedef struct icbParms { |
| 560 | unchar op; |
| 561 | unchar rsvd1; /* reserved */ |
| 562 | unchar len[3]; /* parms buffer length */ |
| 563 | unchar ptr[3]; /* parms buffer address */ |
| 564 | unchar idx[2]; /* index (MSB-LSB) */ |
| 565 | unchar rsvd2[5]; /* reserved */ |
| 566 | volatile unchar vue; /* vendor-unique error code */ |
| 567 | volatile unchar status; /* returned (icmb) status */ |
| 568 | volatile unchar phase; /* used by interrupt handler */ |
| 569 | } IcbParms; |
| 570 | |
| 571 | typedef struct icbAny { |
| 572 | unchar op; |
| 573 | unchar data[14]; /* format-specific data */ |
| 574 | volatile unchar vue; /* vendor-unique error code */ |
| 575 | volatile unchar status; /* returned (icmb) status */ |
| 576 | volatile unchar phase; /* used by interrupt handler */ |
| 577 | } IcbAny; |
| 578 | |
| 579 | typedef union icb { |
| 580 | unchar op; /* ICB opcode */ |
| 581 | IcbRecvCmd recv_cmd; /* format for receive command */ |
| 582 | IcbSendStat send_stat; /* format for send status */ |
| 583 | IcbRevLvl rev_lvl; /* format for get revision level */ |
| 584 | IcbDiag diag; /* format for execute diagnostics */ |
| 585 | IcbParms eparms; /* format for get/set exec parms */ |
| 586 | IcbAny icb; /* generic format */ |
| 587 | unchar data[18]; |
| 588 | } Icb; |
| 589 | |
| 590 | #ifdef MODULE |
| 591 | static char *wd7000; |
| 592 | module_param(wd7000, charp, 0); |
| 593 | #endif |
| 594 | |
| 595 | /* |
| 596 | * Driver SCB structure pool. |
| 597 | * |
| 598 | * The SCBs declared here are shared by all host adapters; hence, this |
| 599 | * structure is not part of the Adapter structure. |
| 600 | */ |
| 601 | static Scb scbs[MAX_SCBS]; |
| 602 | static Scb *scbfree; /* free list */ |
| 603 | static int freescbs = MAX_SCBS; /* free list counter */ |
| 604 | static spinlock_t scbpool_lock; /* guards the scb free list and count */ |
| 605 | |
| 606 | /* |
| 607 | * END of data/declarations - code follows. |
| 608 | */ |
| 609 | static void __init setup_error(char *mesg, int *ints) |
| 610 | { |
| 611 | if (ints[0] == 3) |
| 612 | printk(KERN_ERR "wd7000_setup: \"wd7000=%d,%d,0x%x\" -> %s\n", ints[1], ints[2], ints[3], mesg); |
| 613 | else if (ints[0] == 4) |
| 614 | printk(KERN_ERR "wd7000_setup: \"wd7000=%d,%d,0x%x,%d\" -> %s\n", ints[1], ints[2], ints[3], ints[4], mesg); |
| 615 | else |
| 616 | printk(KERN_ERR "wd7000_setup: \"wd7000=%d,%d,0x%x,%d,%d\" -> %s\n", ints[1], ints[2], ints[3], ints[4], ints[5], mesg); |
| 617 | } |
| 618 | |
| 619 | |
| 620 | /* |
| 621 | * Note: You can now set these options from the kernel's "command line". |
| 622 | * The syntax is: |
| 623 | * |
| 624 | * wd7000=<IRQ>,<DMA>,<IO>[,<BUS_ON>[,<BUS_OFF>]] |
| 625 | * |
| 626 | * , where BUS_ON and BUS_OFF are in nanoseconds. BIOS default values |
| 627 | * are 8000ns for BUS_ON and 1875ns for BUS_OFF. |
| 628 | * eg: |
| 629 | * wd7000=7,6,0x350 |
| 630 | * |
| 631 | * will configure the driver for a WD-7000 controller |
| 632 | * using IRQ 15 with a DMA channel 6, at IO base address 0x350. |
| 633 | */ |
| 634 | static int __init wd7000_setup(char *str) |
| 635 | { |
| 636 | static short wd7000_card_num; /* .bss will zero this */ |
| 637 | short i; |
| 638 | int ints[6]; |
| 639 | |
| 640 | (void) get_options(str, ARRAY_SIZE(ints), ints); |
| 641 | |
| 642 | if (wd7000_card_num >= NUM_CONFIGS) { |
| 643 | printk(KERN_ERR "%s: Too many \"wd7000=\" configurations in " "command line!\n", __FUNCTION__); |
| 644 | return 0; |
| 645 | } |
| 646 | |
| 647 | if ((ints[0] < 3) || (ints[0] > 5)) { |
| 648 | printk(KERN_ERR "%s: Error in command line! " "Usage: wd7000=<IRQ>,<DMA>,IO>[,<BUS_ON>" "[,<BUS_OFF>]]\n", __FUNCTION__); |
| 649 | } else { |
| 650 | for (i = 0; i < NUM_IRQS; i++) |
| 651 | if (ints[1] == wd7000_irq[i]) |
| 652 | break; |
| 653 | |
| 654 | if (i == NUM_IRQS) { |
| 655 | setup_error("invalid IRQ.", ints); |
| 656 | return 0; |
| 657 | } else |
| 658 | configs[wd7000_card_num].irq = ints[1]; |
| 659 | |
| 660 | for (i = 0; i < NUM_DMAS; i++) |
| 661 | if (ints[2] == wd7000_dma[i]) |
| 662 | break; |
| 663 | |
| 664 | if (i == NUM_DMAS) { |
| 665 | setup_error("invalid DMA channel.", ints); |
| 666 | return 0; |
| 667 | } else |
| 668 | configs[wd7000_card_num].dma = ints[2]; |
| 669 | |
| 670 | for (i = 0; i < NUM_IOPORTS; i++) |
| 671 | if (ints[3] == wd7000_iobase[i]) |
| 672 | break; |
| 673 | |
| 674 | if (i == NUM_IOPORTS) { |
| 675 | setup_error("invalid I/O base address.", ints); |
| 676 | return 0; |
| 677 | } else |
| 678 | configs[wd7000_card_num].iobase = ints[3]; |
| 679 | |
| 680 | if (ints[0] > 3) { |
| 681 | if ((ints[4] < 500) || (ints[4] > 31875)) { |
| 682 | setup_error("BUS_ON value is out of range (500" " to 31875 nanoseconds)!", ints); |
| 683 | configs[wd7000_card_num].bus_on = BUS_ON; |
| 684 | } else |
| 685 | configs[wd7000_card_num].bus_on = ints[4] / 125; |
| 686 | } else |
| 687 | configs[wd7000_card_num].bus_on = BUS_ON; |
| 688 | |
| 689 | if (ints[0] > 4) { |
| 690 | if ((ints[5] < 500) || (ints[5] > 31875)) { |
| 691 | setup_error("BUS_OFF value is out of range (500" " to 31875 nanoseconds)!", ints); |
| 692 | configs[wd7000_card_num].bus_off = BUS_OFF; |
| 693 | } else |
| 694 | configs[wd7000_card_num].bus_off = ints[5] / 125; |
| 695 | } else |
| 696 | configs[wd7000_card_num].bus_off = BUS_OFF; |
| 697 | |
| 698 | if (wd7000_card_num) { |
| 699 | for (i = 0; i < (wd7000_card_num - 1); i++) { |
| 700 | int j = i + 1; |
| 701 | |
| 702 | for (; j < wd7000_card_num; j++) |
| 703 | if (configs[i].irq == configs[j].irq) { |
| 704 | setup_error("duplicated IRQ!", ints); |
| 705 | return 0; |
| 706 | } |
| 707 | if (configs[i].dma == configs[j].dma) { |
| 708 | setup_error("duplicated DMA " "channel!", ints); |
| 709 | return 0; |
| 710 | } |
| 711 | if (configs[i].iobase == configs[j].iobase) { |
| 712 | setup_error("duplicated I/O " "base address!", ints); |
| 713 | return 0; |
| 714 | } |
| 715 | } |
| 716 | } |
| 717 | |
| 718 | dprintk(KERN_DEBUG "wd7000_setup: IRQ=%d, DMA=%d, I/O=0x%x, " |
| 719 | "BUS_ON=%dns, BUS_OFF=%dns\n", configs[wd7000_card_num].irq, configs[wd7000_card_num].dma, configs[wd7000_card_num].iobase, configs[wd7000_card_num].bus_on * 125, configs[wd7000_card_num].bus_off * 125); |
| 720 | |
| 721 | wd7000_card_num++; |
| 722 | } |
| 723 | return 1; |
| 724 | } |
| 725 | |
| 726 | __setup("wd7000=", wd7000_setup); |
| 727 | |
| 728 | static inline void any2scsi(unchar * scsi, int any) |
| 729 | { |
| 730 | *scsi++ = (unsigned)any >> 16; |
| 731 | *scsi++ = (unsigned)any >> 8; |
| 732 | *scsi++ = any; |
| 733 | } |
| 734 | |
| 735 | static inline int scsi2int(unchar * scsi) |
| 736 | { |
| 737 | return (scsi[0] << 16) | (scsi[1] << 8) | scsi[2]; |
| 738 | } |
| 739 | |
| 740 | static inline void wd7000_enable_intr(Adapter * host) |
| 741 | { |
| 742 | host->control |= INT_EN; |
| 743 | outb(host->control, host->iobase + ASC_CONTROL); |
| 744 | } |
| 745 | |
| 746 | |
| 747 | static inline void wd7000_enable_dma(Adapter * host) |
| 748 | { |
| 749 | unsigned long flags; |
| 750 | host->control |= DMA_EN; |
| 751 | outb(host->control, host->iobase + ASC_CONTROL); |
| 752 | |
| 753 | flags = claim_dma_lock(); |
| 754 | set_dma_mode(host->dma, DMA_MODE_CASCADE); |
| 755 | enable_dma(host->dma); |
| 756 | release_dma_lock(flags); |
| 757 | |
| 758 | } |
| 759 | |
| 760 | |
| 761 | #define WAITnexttimeout 200 /* 2 seconds */ |
| 762 | |
| 763 | static inline short WAIT(unsigned port, unsigned mask, unsigned allof, unsigned noneof) |
| 764 | { |
| 765 | unsigned WAITbits; |
| 766 | unsigned long WAITtimeout = jiffies + WAITnexttimeout; |
| 767 | |
| 768 | while (time_before_eq(jiffies, WAITtimeout)) { |
| 769 | WAITbits = inb(port) & mask; |
| 770 | |
| 771 | if (((WAITbits & allof) == allof) && ((WAITbits & noneof) == 0)) |
| 772 | return (0); |
| 773 | } |
| 774 | |
| 775 | return (1); |
| 776 | } |
| 777 | |
| 778 | |
| 779 | static inline int command_out(Adapter * host, unchar * cmd, int len) |
| 780 | { |
| 781 | if (!WAIT(host->iobase + ASC_STAT, ASC_STATMASK, CMD_RDY, 0)) { |
| 782 | while (len--) { |
| 783 | do { |
| 784 | outb(*cmd, host->iobase + ASC_COMMAND); |
| 785 | WAIT(host->iobase + ASC_STAT, ASC_STATMASK, CMD_RDY, 0); |
| 786 | } while (inb(host->iobase + ASC_STAT) & CMD_REJ); |
| 787 | |
| 788 | cmd++; |
| 789 | } |
| 790 | |
| 791 | return (1); |
| 792 | } |
| 793 | |
| 794 | printk(KERN_WARNING "wd7000 command_out: WAIT failed(%d)\n", len + 1); |
| 795 | |
| 796 | return (0); |
| 797 | } |
| 798 | |
| 799 | |
| 800 | /* |
| 801 | * This version of alloc_scbs is in preparation for supporting multiple |
| 802 | * commands per lun and command chaining, by queueing pending commands. |
| 803 | * We will need to allocate Scbs in blocks since they will wait to be |
| 804 | * executed so there is the possibility of deadlock otherwise. |
| 805 | * Also, to keep larger requests from being starved by smaller requests, |
| 806 | * we limit access to this routine with an internal busy flag, so that |
| 807 | * the satisfiability of a request is not dependent on the size of the |
| 808 | * request. |
| 809 | */ |
| 810 | static inline Scb *alloc_scbs(struct Scsi_Host *host, int needed) |
| 811 | { |
| 812 | Scb *scb, *p = NULL; |
| 813 | unsigned long flags; |
| 814 | unsigned long timeout = jiffies + WAITnexttimeout; |
| 815 | unsigned long now; |
| 816 | int i; |
| 817 | |
| 818 | if (needed <= 0) |
| 819 | return (NULL); /* sanity check */ |
| 820 | |
| 821 | spin_unlock_irq(host->host_lock); |
| 822 | |
| 823 | retry: |
| 824 | while (freescbs < needed) { |
| 825 | timeout = jiffies + WAITnexttimeout; |
| 826 | do { |
| 827 | /* FIXME: can we actually just yield here ?? */ |
| 828 | for (now = jiffies; now == jiffies;) |
| 829 | cpu_relax(); /* wait a jiffy */ |
| 830 | } while (freescbs < needed && time_before_eq(jiffies, timeout)); |
| 831 | /* |
| 832 | * If we get here with enough free Scbs, we can take them. |
| 833 | * Otherwise, we timed out and didn't get enough. |
| 834 | */ |
| 835 | if (freescbs < needed) { |
| 836 | printk(KERN_ERR "wd7000: can't get enough free SCBs.\n"); |
| 837 | return (NULL); |
| 838 | } |
| 839 | } |
| 840 | |
| 841 | /* Take the lock, then check we didnt get beaten, if so try again */ |
| 842 | spin_lock_irqsave(&scbpool_lock, flags); |
| 843 | if (freescbs < needed) { |
| 844 | spin_unlock_irqrestore(&scbpool_lock, flags); |
| 845 | goto retry; |
| 846 | } |
| 847 | |
| 848 | scb = scbfree; |
| 849 | freescbs -= needed; |
| 850 | for (i = 0; i < needed; i++) { |
| 851 | p = scbfree; |
| 852 | scbfree = p->next; |
| 853 | } |
| 854 | p->next = NULL; |
| 855 | |
| 856 | spin_unlock_irqrestore(&scbpool_lock, flags); |
| 857 | |
| 858 | spin_lock_irq(host->host_lock); |
| 859 | return (scb); |
| 860 | } |
| 861 | |
| 862 | |
| 863 | static inline void free_scb(Scb * scb) |
| 864 | { |
| 865 | unsigned long flags; |
| 866 | |
| 867 | spin_lock_irqsave(&scbpool_lock, flags); |
| 868 | |
| 869 | memset(scb, 0, sizeof(Scb)); |
| 870 | scb->next = scbfree; |
| 871 | scbfree = scb; |
| 872 | freescbs++; |
| 873 | |
| 874 | spin_unlock_irqrestore(&scbpool_lock, flags); |
| 875 | } |
| 876 | |
| 877 | |
| 878 | static inline void init_scbs(void) |
| 879 | { |
| 880 | int i; |
| 881 | |
| 882 | spin_lock_init(&scbpool_lock); |
| 883 | |
| 884 | /* This is only ever called before the SCB pool is active */ |
| 885 | |
| 886 | scbfree = &(scbs[0]); |
| 887 | memset(scbs, 0, sizeof(scbs)); |
| 888 | for (i = 0; i < MAX_SCBS - 1; i++) { |
| 889 | scbs[i].next = &(scbs[i + 1]); |
| 890 | scbs[i].SCpnt = NULL; |
| 891 | } |
| 892 | scbs[MAX_SCBS - 1].next = NULL; |
| 893 | scbs[MAX_SCBS - 1].SCpnt = NULL; |
| 894 | } |
| 895 | |
| 896 | |
| 897 | static int mail_out(Adapter * host, Scb * scbptr) |
| 898 | /* |
| 899 | * Note: this can also be used for ICBs; just cast to the parm type. |
| 900 | */ |
| 901 | { |
| 902 | int i, ogmb; |
| 903 | unsigned long flags; |
| 904 | unchar start_ogmb; |
| 905 | Mailbox *ogmbs = host->mb.ogmb; |
| 906 | int *next_ogmb = &(host->next_ogmb); |
| 907 | |
| 908 | dprintk("wd7000_mail_out: 0x%06lx", (long) scbptr); |
| 909 | |
| 910 | /* We first look for a free outgoing mailbox */ |
| 911 | spin_lock_irqsave(host->sh->host_lock, flags); |
| 912 | ogmb = *next_ogmb; |
| 913 | for (i = 0; i < OGMB_CNT; i++) { |
| 914 | if (ogmbs[ogmb].status == 0) { |
| 915 | dprintk(" using OGMB 0x%x", ogmb); |
| 916 | ogmbs[ogmb].status = 1; |
| 917 | any2scsi((unchar *) ogmbs[ogmb].scbptr, (int) scbptr); |
| 918 | |
| 919 | *next_ogmb = (ogmb + 1) % OGMB_CNT; |
| 920 | break; |
| 921 | } else |
| 922 | ogmb = (ogmb + 1) % OGMB_CNT; |
| 923 | } |
| 924 | spin_unlock_irqrestore(host->sh->host_lock, flags); |
| 925 | |
| 926 | dprintk(", scb is 0x%06lx", (long) scbptr); |
| 927 | |
| 928 | if (i >= OGMB_CNT) { |
| 929 | /* |
| 930 | * Alternatively, we might issue the "interrupt on free OGMB", |
| 931 | * and sleep, but it must be ensured that it isn't the init |
| 932 | * task running. Instead, this version assumes that the caller |
| 933 | * will be persistent, and try again. Since it's the adapter |
| 934 | * that marks OGMB's free, waiting even with interrupts off |
| 935 | * should work, since they are freed very quickly in most cases. |
| 936 | */ |
| 937 | dprintk(", no free OGMBs.\n"); |
| 938 | return (0); |
| 939 | } |
| 940 | |
| 941 | wd7000_enable_intr(host); |
| 942 | |
| 943 | start_ogmb = START_OGMB | ogmb; |
| 944 | command_out(host, &start_ogmb, 1); |
| 945 | |
| 946 | dprintk(", awaiting interrupt.\n"); |
| 947 | |
| 948 | return (1); |
| 949 | } |
| 950 | |
| 951 | |
| 952 | static int make_code(unsigned hosterr, unsigned scsierr) |
| 953 | { |
| 954 | #ifdef WD7000_DEBUG |
| 955 | int in_error = hosterr; |
| 956 | #endif |
| 957 | |
| 958 | switch ((hosterr >> 8) & 0xff) { |
| 959 | case 0: /* Reserved */ |
| 960 | hosterr = DID_ERROR; |
| 961 | break; |
| 962 | case 1: /* Command Complete, no errors */ |
| 963 | hosterr = DID_OK; |
| 964 | break; |
| 965 | case 2: /* Command complete, error logged in scb status (scsierr) */ |
| 966 | hosterr = DID_OK; |
| 967 | break; |
| 968 | case 4: /* Command failed to complete - timeout */ |
| 969 | hosterr = DID_TIME_OUT; |
| 970 | break; |
| 971 | case 5: /* Command terminated; Bus reset by external device */ |
| 972 | hosterr = DID_RESET; |
| 973 | break; |
| 974 | case 6: /* Unexpected Command Received w/ host as target */ |
| 975 | hosterr = DID_BAD_TARGET; |
| 976 | break; |
| 977 | case 80: /* Unexpected Reselection */ |
| 978 | case 81: /* Unexpected Selection */ |
| 979 | hosterr = DID_BAD_INTR; |
| 980 | break; |
| 981 | case 82: /* Abort Command Message */ |
| 982 | hosterr = DID_ABORT; |
| 983 | break; |
| 984 | case 83: /* SCSI Bus Software Reset */ |
| 985 | case 84: /* SCSI Bus Hardware Reset */ |
| 986 | hosterr = DID_RESET; |
| 987 | break; |
| 988 | default: /* Reserved */ |
| 989 | hosterr = DID_ERROR; |
| 990 | } |
| 991 | #ifdef WD7000_DEBUG |
| 992 | if (scsierr || hosterr) |
| 993 | dprintk("\nSCSI command error: SCSI 0x%02x host 0x%04x return %d\n", scsierr, in_error, hosterr); |
| 994 | #endif |
| 995 | return (scsierr | (hosterr << 16)); |
| 996 | } |
| 997 | |
| 998 | #define wd7000_intr_ack(host) outb (0, host->iobase + ASC_INTR_ACK) |
| 999 | |
| 1000 | |
| 1001 | static irqreturn_t wd7000_intr(int irq, void *dev_id, struct pt_regs *regs) |
| 1002 | { |
| 1003 | Adapter *host = (Adapter *) dev_id; |
| 1004 | int flag, icmb, errstatus, icmb_status; |
| 1005 | int host_error, scsi_error; |
| 1006 | Scb *scb; /* for SCSI commands */ |
| 1007 | IcbAny *icb; /* for host commands */ |
| 1008 | struct scsi_cmnd *SCpnt; |
| 1009 | Mailbox *icmbs = host->mb.icmb; |
| 1010 | unsigned long flags; |
| 1011 | |
| 1012 | spin_lock_irqsave(host->sh->host_lock, flags); |
| 1013 | host->int_counter++; |
| 1014 | |
| 1015 | dprintk("wd7000_intr: irq = %d, host = 0x%06lx\n", irq, (long) host); |
| 1016 | |
| 1017 | flag = inb(host->iobase + ASC_INTR_STAT); |
| 1018 | |
| 1019 | dprintk("wd7000_intr: intr stat = 0x%02x\n", flag); |
| 1020 | |
| 1021 | if (!(inb(host->iobase + ASC_STAT) & INT_IM)) { |
| 1022 | /* NB: these are _very_ possible if IRQ 15 is being used, since |
| 1023 | * it's the "garbage collector" on the 2nd 8259 PIC. Specifically, |
| 1024 | * any interrupt signal into the 8259 which can't be identified |
| 1025 | * comes out as 7 from the 8259, which is 15 to the host. Thus, it |
| 1026 | * is a good thing the WD7000 has an interrupt status port, so we |
| 1027 | * can sort these out. Otherwise, electrical noise and other such |
| 1028 | * problems would be indistinguishable from valid interrupts... |
| 1029 | */ |
| 1030 | dprintk("wd7000_intr: phantom interrupt...\n"); |
| 1031 | goto ack; |
| 1032 | } |
| 1033 | |
| 1034 | if (!(flag & MB_INTR)) |
| 1035 | goto ack; |
| 1036 | |
| 1037 | /* The interrupt is for a mailbox */ |
| 1038 | if (!(flag & IMB_INTR)) { |
| 1039 | dprintk("wd7000_intr: free outgoing mailbox\n"); |
| 1040 | /* |
| 1041 | * If sleep_on() and the "interrupt on free OGMB" command are |
| 1042 | * used in mail_out(), wake_up() should correspondingly be called |
| 1043 | * here. For now, we don't need to do anything special. |
| 1044 | */ |
| 1045 | goto ack; |
| 1046 | } |
| 1047 | |
| 1048 | /* The interrupt is for an incoming mailbox */ |
| 1049 | icmb = flag & MB_MASK; |
| 1050 | icmb_status = icmbs[icmb].status; |
| 1051 | if (icmb_status & 0x80) { /* unsolicited - result in ICMB */ |
| 1052 | dprintk("wd7000_intr: unsolicited interrupt 0x%02x\n", icmb_status); |
| 1053 | goto ack; |
| 1054 | } |
| 1055 | |
| 1056 | /* Aaaargh! (Zaga) */ |
| 1057 | scb = isa_bus_to_virt(scsi2int((unchar *) icmbs[icmb].scbptr)); |
| 1058 | icmbs[icmb].status = 0; |
| 1059 | if (scb->op & ICB_OP_MASK) { /* an SCB is done */ |
| 1060 | icb = (IcbAny *) scb; |
| 1061 | icb->status = icmb_status; |
| 1062 | icb->phase = 0; |
| 1063 | goto ack; |
| 1064 | } |
| 1065 | |
| 1066 | SCpnt = scb->SCpnt; |
| 1067 | if (--(SCpnt->SCp.phase) <= 0) { /* all scbs are done */ |
| 1068 | host_error = scb->vue | (icmb_status << 8); |
| 1069 | scsi_error = scb->status; |
| 1070 | errstatus = make_code(host_error, scsi_error); |
| 1071 | SCpnt->result = errstatus; |
| 1072 | |
| 1073 | free_scb(scb); |
| 1074 | |
| 1075 | SCpnt->scsi_done(SCpnt); |
| 1076 | } |
| 1077 | |
| 1078 | ack: |
| 1079 | dprintk("wd7000_intr: return from interrupt handler\n"); |
| 1080 | wd7000_intr_ack(host); |
| 1081 | |
| 1082 | spin_unlock_irqrestore(host->sh->host_lock, flags); |
| 1083 | return IRQ_HANDLED; |
| 1084 | } |
| 1085 | |
| 1086 | static int wd7000_queuecommand(struct scsi_cmnd *SCpnt, |
| 1087 | void (*done)(struct scsi_cmnd *)) |
| 1088 | { |
| 1089 | Scb *scb; |
| 1090 | Sgb *sgb; |
| 1091 | unchar *cdb = (unchar *) SCpnt->cmnd; |
| 1092 | unchar idlun; |
| 1093 | short cdblen; |
| 1094 | Adapter *host = (Adapter *) SCpnt->device->host->hostdata; |
| 1095 | |
| 1096 | cdblen = SCpnt->cmd_len; |
| 1097 | idlun = ((SCpnt->device->id << 5) & 0xe0) | (SCpnt->device->lun & 7); |
| 1098 | SCpnt->scsi_done = done; |
| 1099 | SCpnt->SCp.phase = 1; |
| 1100 | scb = alloc_scbs(SCpnt->device->host, 1); |
| 1101 | scb->idlun = idlun; |
| 1102 | memcpy(scb->cdb, cdb, cdblen); |
| 1103 | scb->direc = 0x40; /* Disable direction check */ |
| 1104 | |
| 1105 | scb->SCpnt = SCpnt; /* so we can find stuff later */ |
| 1106 | SCpnt->host_scribble = (unchar *) scb; |
| 1107 | scb->host = host; |
| 1108 | |
| 1109 | if (SCpnt->use_sg) { |
| 1110 | struct scatterlist *sg = (struct scatterlist *) SCpnt->request_buffer; |
| 1111 | unsigned i; |
| 1112 | |
| 1113 | if (SCpnt->device->host->sg_tablesize == SG_NONE) { |
| 1114 | panic("wd7000_queuecommand: scatter/gather not supported.\n"); |
| 1115 | } |
| 1116 | dprintk("Using scatter/gather with %d elements.\n", SCpnt->use_sg); |
| 1117 | |
| 1118 | sgb = scb->sgb; |
| 1119 | scb->op = 1; |
| 1120 | any2scsi(scb->dataptr, (int) sgb); |
| 1121 | any2scsi(scb->maxlen, SCpnt->use_sg * sizeof(Sgb)); |
| 1122 | |
| 1123 | for (i = 0; i < SCpnt->use_sg; i++) { |
| 1124 | any2scsi(sgb[i].ptr, isa_page_to_bus(sg[i].page) + sg[i].offset); |
| 1125 | any2scsi(sgb[i].len, sg[i].length); |
| 1126 | } |
| 1127 | } else { |
| 1128 | scb->op = 0; |
| 1129 | any2scsi(scb->dataptr, isa_virt_to_bus(SCpnt->request_buffer)); |
| 1130 | any2scsi(scb->maxlen, SCpnt->request_bufflen); |
| 1131 | } |
| 1132 | |
| 1133 | /* FIXME: drop lock and yield here ? */ |
| 1134 | |
| 1135 | while (!mail_out(host, scb)) |
| 1136 | cpu_relax(); /* keep trying */ |
| 1137 | |
| 1138 | return 0; |
| 1139 | } |
| 1140 | |
| 1141 | static int wd7000_diagnostics(Adapter * host, int code) |
| 1142 | { |
| 1143 | static IcbDiag icb = { ICB_OP_DIAGNOSTICS }; |
| 1144 | static unchar buf[256]; |
| 1145 | unsigned long timeout; |
| 1146 | |
| 1147 | icb.type = code; |
| 1148 | any2scsi(icb.len, sizeof(buf)); |
| 1149 | any2scsi(icb.ptr, (int) &buf); |
| 1150 | icb.phase = 1; |
| 1151 | /* |
| 1152 | * This routine is only called at init, so there should be OGMBs |
| 1153 | * available. I'm assuming so here. If this is going to |
| 1154 | * fail, I can just let the timeout catch the failure. |
| 1155 | */ |
| 1156 | mail_out(host, (struct scb *) &icb); |
| 1157 | timeout = jiffies + WAITnexttimeout; /* wait up to 2 seconds */ |
| 1158 | while (icb.phase && time_before(jiffies, timeout)) { |
| 1159 | cpu_relax(); /* wait for completion */ |
| 1160 | barrier(); |
| 1161 | } |
| 1162 | |
| 1163 | if (icb.phase) { |
| 1164 | printk("wd7000_diagnostics: timed out.\n"); |
| 1165 | return (0); |
| 1166 | } |
| 1167 | if (make_code(icb.vue | (icb.status << 8), 0)) { |
| 1168 | printk("wd7000_diagnostics: failed (0x%02x,0x%02x)\n", icb.vue, icb.status); |
| 1169 | return (0); |
| 1170 | } |
| 1171 | |
| 1172 | return (1); |
| 1173 | } |
| 1174 | |
| 1175 | |
| 1176 | static int wd7000_adapter_reset(Adapter * host) |
| 1177 | { |
| 1178 | InitCmd init_cmd = { |
| 1179 | INITIALIZATION, |
| 1180 | 7, |
| 1181 | host->bus_on, |
| 1182 | host->bus_off, |
| 1183 | 0, |
| 1184 | {0, 0, 0}, |
| 1185 | OGMB_CNT, |
| 1186 | ICMB_CNT |
| 1187 | }; |
| 1188 | int diag; |
| 1189 | /* |
| 1190 | * Reset the adapter - only. The SCSI bus was initialized at power-up, |
| 1191 | * and we need to do this just so we control the mailboxes, etc. |
| 1192 | */ |
| 1193 | outb(ASC_RES, host->iobase + ASC_CONTROL); |
| 1194 | udelay(40); /* reset pulse: this is 40us, only need 25us */ |
| 1195 | outb(0, host->iobase + ASC_CONTROL); |
| 1196 | host->control = 0; /* this must always shadow ASC_CONTROL */ |
| 1197 | |
| 1198 | if (WAIT(host->iobase + ASC_STAT, ASC_STATMASK, CMD_RDY, 0)) { |
| 1199 | printk(KERN_ERR "wd7000_init: WAIT timed out.\n"); |
| 1200 | return -1; /* -1 = not ok */ |
| 1201 | } |
| 1202 | |
| 1203 | if ((diag = inb(host->iobase + ASC_INTR_STAT)) != 1) { |
| 1204 | printk("wd7000_init: "); |
| 1205 | |
| 1206 | switch (diag) { |
| 1207 | case 2: |
| 1208 | printk(KERN_ERR "RAM failure.\n"); |
| 1209 | break; |
| 1210 | case 3: |
| 1211 | printk(KERN_ERR "FIFO R/W failed\n"); |
| 1212 | break; |
| 1213 | case 4: |
| 1214 | printk(KERN_ERR "SBIC register R/W failed\n"); |
| 1215 | break; |
| 1216 | case 5: |
| 1217 | printk(KERN_ERR "Initialization D-FF failed.\n"); |
| 1218 | break; |
| 1219 | case 6: |
| 1220 | printk(KERN_ERR "Host IRQ D-FF failed.\n"); |
| 1221 | break; |
| 1222 | case 7: |
| 1223 | printk(KERN_ERR "ROM checksum error.\n"); |
| 1224 | break; |
| 1225 | default: |
| 1226 | printk(KERN_ERR "diagnostic code 0x%02Xh received.\n", diag); |
| 1227 | } |
| 1228 | return -1; |
| 1229 | } |
| 1230 | /* Clear mailboxes */ |
| 1231 | memset(&(host->mb), 0, sizeof(host->mb)); |
| 1232 | |
| 1233 | /* Execute init command */ |
| 1234 | any2scsi((unchar *) & (init_cmd.mailboxes), (int) &(host->mb)); |
| 1235 | if (!command_out(host, (unchar *) & init_cmd, sizeof(init_cmd))) { |
| 1236 | printk(KERN_ERR "wd7000_adapter_reset: adapter initialization failed.\n"); |
| 1237 | return -1; |
| 1238 | } |
| 1239 | |
| 1240 | if (WAIT(host->iobase + ASC_STAT, ASC_STATMASK, ASC_INIT, 0)) { |
| 1241 | printk("wd7000_adapter_reset: WAIT timed out.\n"); |
| 1242 | return -1; |
| 1243 | } |
| 1244 | return 0; |
| 1245 | } |
| 1246 | |
| 1247 | static int wd7000_init(Adapter * host) |
| 1248 | { |
| 1249 | if (wd7000_adapter_reset(host) == -1) |
| 1250 | return 0; |
| 1251 | |
| 1252 | |
| 1253 | if (request_irq(host->irq, wd7000_intr, SA_INTERRUPT, "wd7000", host)) { |
| 1254 | printk("wd7000_init: can't get IRQ %d.\n", host->irq); |
| 1255 | return (0); |
| 1256 | } |
| 1257 | if (request_dma(host->dma, "wd7000")) { |
| 1258 | printk("wd7000_init: can't get DMA channel %d.\n", host->dma); |
| 1259 | free_irq(host->irq, host); |
| 1260 | return (0); |
| 1261 | } |
| 1262 | wd7000_enable_dma(host); |
| 1263 | wd7000_enable_intr(host); |
| 1264 | |
| 1265 | if (!wd7000_diagnostics(host, ICB_DIAG_FULL)) { |
| 1266 | free_dma(host->dma); |
| 1267 | free_irq(host->irq, NULL); |
| 1268 | return (0); |
| 1269 | } |
| 1270 | |
| 1271 | return (1); |
| 1272 | } |
| 1273 | |
| 1274 | |
| 1275 | static void wd7000_revision(Adapter * host) |
| 1276 | { |
| 1277 | static IcbRevLvl icb = { ICB_OP_GET_REVISION }; |
| 1278 | |
| 1279 | icb.phase = 1; |
| 1280 | /* |
| 1281 | * Like diagnostics, this is only done at init time, in fact, from |
| 1282 | * wd7000_detect, so there should be OGMBs available. If it fails, |
| 1283 | * the only damage will be that the revision will show up as 0.0, |
| 1284 | * which in turn means that scatter/gather will be disabled. |
| 1285 | */ |
| 1286 | mail_out(host, (struct scb *) &icb); |
| 1287 | while (icb.phase) { |
| 1288 | cpu_relax(); /* wait for completion */ |
| 1289 | barrier(); |
| 1290 | } |
| 1291 | host->rev1 = icb.primary; |
| 1292 | host->rev2 = icb.secondary; |
| 1293 | } |
| 1294 | |
| 1295 | |
| 1296 | #undef SPRINTF |
| 1297 | #define SPRINTF(args...) { if (pos < (buffer + length)) pos += sprintf (pos, ## args); } |
| 1298 | |
| 1299 | static int wd7000_set_info(char *buffer, int length, struct Scsi_Host *host) |
| 1300 | { |
| 1301 | dprintk("Buffer = <%.*s>, length = %d\n", length, buffer, length); |
| 1302 | |
| 1303 | /* |
| 1304 | * Currently this is a no-op |
| 1305 | */ |
| 1306 | dprintk("Sorry, this function is currently out of order...\n"); |
| 1307 | return (length); |
| 1308 | } |
| 1309 | |
| 1310 | |
| 1311 | static int wd7000_proc_info(struct Scsi_Host *host, char *buffer, char **start, off_t offset, int length, int inout) |
| 1312 | { |
| 1313 | Adapter *adapter = (Adapter *)host->hostdata; |
| 1314 | unsigned long flags; |
| 1315 | char *pos = buffer; |
| 1316 | #ifdef WD7000_DEBUG |
| 1317 | Mailbox *ogmbs, *icmbs; |
| 1318 | short count; |
| 1319 | #endif |
| 1320 | |
| 1321 | /* |
| 1322 | * Has data been written to the file ? |
| 1323 | */ |
| 1324 | if (inout) |
| 1325 | return (wd7000_set_info(buffer, length, host)); |
| 1326 | |
| 1327 | spin_lock_irqsave(host->host_lock, flags); |
| 1328 | SPRINTF("Host scsi%d: Western Digital WD-7000 (rev %d.%d)\n", host->host_no, adapter->rev1, adapter->rev2); |
| 1329 | SPRINTF(" IO base: 0x%x\n", adapter->iobase); |
| 1330 | SPRINTF(" IRQ: %d\n", adapter->irq); |
| 1331 | SPRINTF(" DMA channel: %d\n", adapter->dma); |
| 1332 | SPRINTF(" Interrupts: %d\n", adapter->int_counter); |
| 1333 | SPRINTF(" BUS_ON time: %d nanoseconds\n", adapter->bus_on * 125); |
| 1334 | SPRINTF(" BUS_OFF time: %d nanoseconds\n", adapter->bus_off * 125); |
| 1335 | |
| 1336 | #ifdef WD7000_DEBUG |
| 1337 | ogmbs = adapter->mb.ogmb; |
| 1338 | icmbs = adapter->mb.icmb; |
| 1339 | |
| 1340 | SPRINTF("\nControl port value: 0x%x\n", adapter->control); |
| 1341 | SPRINTF("Incoming mailbox:\n"); |
| 1342 | SPRINTF(" size: %d\n", ICMB_CNT); |
| 1343 | SPRINTF(" queued messages: "); |
| 1344 | |
| 1345 | for (i = count = 0; i < ICMB_CNT; i++) |
| 1346 | if (icmbs[i].status) { |
| 1347 | count++; |
| 1348 | SPRINTF("0x%x ", i); |
| 1349 | } |
| 1350 | |
| 1351 | SPRINTF(count ? "\n" : "none\n"); |
| 1352 | |
| 1353 | SPRINTF("Outgoing mailbox:\n"); |
| 1354 | SPRINTF(" size: %d\n", OGMB_CNT); |
| 1355 | SPRINTF(" next message: 0x%x\n", adapter->next_ogmb); |
| 1356 | SPRINTF(" queued messages: "); |
| 1357 | |
| 1358 | for (i = count = 0; i < OGMB_CNT; i++) |
| 1359 | if (ogmbs[i].status) { |
| 1360 | count++; |
| 1361 | SPRINTF("0x%x ", i); |
| 1362 | } |
| 1363 | |
| 1364 | SPRINTF(count ? "\n" : "none\n"); |
| 1365 | #endif |
| 1366 | |
| 1367 | spin_unlock_irqrestore(host->host_lock, flags); |
| 1368 | |
| 1369 | /* |
| 1370 | * Calculate start of next buffer, and return value. |
| 1371 | */ |
| 1372 | *start = buffer + offset; |
| 1373 | |
| 1374 | if ((pos - buffer) < offset) |
| 1375 | return (0); |
| 1376 | else if ((pos - buffer - offset) < length) |
| 1377 | return (pos - buffer - offset); |
| 1378 | else |
| 1379 | return (length); |
| 1380 | } |
| 1381 | |
| 1382 | |
| 1383 | /* |
| 1384 | * Returns the number of adapters this driver is supporting. |
| 1385 | * |
| 1386 | * The source for hosts.c says to wait to call scsi_register until 100% |
| 1387 | * sure about an adapter. We need to do it a little sooner here; we |
| 1388 | * need the storage set up by scsi_register before wd7000_init, and |
| 1389 | * changing the location of an Adapter structure is more trouble than |
| 1390 | * calling scsi_unregister. |
| 1391 | * |
| 1392 | */ |
| 1393 | |
Randy.Dunlap | b9bcf9c | 2006-06-25 05:48:05 -0700 | [diff] [blame] | 1394 | static __init int wd7000_detect(struct scsi_host_template *tpnt) |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1395 | { |
| 1396 | short present = 0, biosaddr_ptr, sig_ptr, i, pass; |
| 1397 | short biosptr[NUM_CONFIGS]; |
| 1398 | unsigned iobase; |
| 1399 | Adapter *host = NULL; |
| 1400 | struct Scsi_Host *sh; |
| 1401 | int unit = 0; |
| 1402 | |
| 1403 | dprintk("wd7000_detect: started\n"); |
| 1404 | |
| 1405 | #ifdef MODULE |
| 1406 | if (wd7000) |
| 1407 | wd7000_setup(wd7000); |
| 1408 | #endif |
| 1409 | |
| 1410 | for (i = 0; i < UNITS; wd7000_host[i++] = NULL); |
| 1411 | for (i = 0; i < NUM_CONFIGS; biosptr[i++] = -1); |
| 1412 | |
| 1413 | tpnt->proc_name = "wd7000"; |
| 1414 | tpnt->proc_info = &wd7000_proc_info; |
| 1415 | |
| 1416 | /* |
| 1417 | * Set up SCB free list, which is shared by all adapters |
| 1418 | */ |
| 1419 | init_scbs(); |
| 1420 | |
| 1421 | for (pass = 0; pass < NUM_CONFIGS; pass++) { |
| 1422 | /* |
| 1423 | * First, search for BIOS SIGNATURE... |
| 1424 | */ |
| 1425 | for (biosaddr_ptr = 0; biosaddr_ptr < NUM_ADDRS; biosaddr_ptr++) |
| 1426 | for (sig_ptr = 0; sig_ptr < NUM_SIGNATURES; sig_ptr++) { |
| 1427 | for (i = 0; i < pass; i++) |
| 1428 | if (biosptr[i] == biosaddr_ptr) |
| 1429 | break; |
| 1430 | |
| 1431 | if (i == pass) { |
| 1432 | void __iomem *biosaddr = ioremap(wd7000_biosaddr[biosaddr_ptr] + signatures[sig_ptr].ofs, |
| 1433 | signatures[sig_ptr].len); |
| 1434 | short bios_match = 1; |
| 1435 | |
| 1436 | if (biosaddr) |
| 1437 | bios_match = check_signature(biosaddr, signatures[sig_ptr].sig, signatures[sig_ptr].len); |
| 1438 | |
| 1439 | iounmap(biosaddr); |
| 1440 | |
| 1441 | if (bios_match) |
| 1442 | goto bios_matched; |
| 1443 | } |
| 1444 | } |
| 1445 | |
| 1446 | bios_matched: |
| 1447 | /* |
| 1448 | * BIOS SIGNATURE has been found. |
| 1449 | */ |
| 1450 | #ifdef WD7000_DEBUG |
| 1451 | dprintk("wd7000_detect: pass %d\n", pass + 1); |
| 1452 | |
| 1453 | if (biosaddr_ptr == NUM_ADDRS) |
| 1454 | dprintk("WD-7000 SST BIOS not detected...\n"); |
| 1455 | else |
| 1456 | dprintk("WD-7000 SST BIOS detected at 0x%lx: checking...\n", wd7000_biosaddr[biosaddr_ptr]); |
| 1457 | #endif |
| 1458 | |
| 1459 | if (configs[pass].irq < 0) |
| 1460 | continue; |
| 1461 | |
| 1462 | if (unit == UNITS) |
| 1463 | continue; |
| 1464 | |
| 1465 | iobase = configs[pass].iobase; |
| 1466 | |
| 1467 | dprintk("wd7000_detect: check IO 0x%x region...\n", iobase); |
| 1468 | |
| 1469 | if (request_region(iobase, 4, "wd7000")) { |
| 1470 | |
| 1471 | dprintk("wd7000_detect: ASC reset (IO 0x%x) ...", iobase); |
| 1472 | /* |
| 1473 | * ASC reset... |
| 1474 | */ |
| 1475 | outb(ASC_RES, iobase + ASC_CONTROL); |
| 1476 | msleep(10); |
| 1477 | outb(0, iobase + ASC_CONTROL); |
| 1478 | |
| 1479 | if (WAIT(iobase + ASC_STAT, ASC_STATMASK, CMD_RDY, 0)) { |
| 1480 | dprintk("failed!\n"); |
| 1481 | goto err_release; |
| 1482 | } else |
| 1483 | dprintk("ok!\n"); |
| 1484 | |
| 1485 | if (inb(iobase + ASC_INTR_STAT) == 1) { |
| 1486 | /* |
| 1487 | * We register here, to get a pointer to the extra space, |
| 1488 | * which we'll use as the Adapter structure (host) for |
| 1489 | * this adapter. It is located just after the registered |
| 1490 | * Scsi_Host structure (sh), and is located by the empty |
| 1491 | * array hostdata. |
| 1492 | */ |
| 1493 | sh = scsi_register(tpnt, sizeof(Adapter)); |
| 1494 | if (sh == NULL) |
| 1495 | goto err_release; |
| 1496 | |
| 1497 | host = (Adapter *) sh->hostdata; |
| 1498 | |
| 1499 | dprintk("wd7000_detect: adapter allocated at 0x%x\n", (int) host); |
| 1500 | memset(host, 0, sizeof(Adapter)); |
| 1501 | |
| 1502 | host->irq = configs[pass].irq; |
| 1503 | host->dma = configs[pass].dma; |
| 1504 | host->iobase = iobase; |
| 1505 | host->int_counter = 0; |
| 1506 | host->bus_on = configs[pass].bus_on; |
| 1507 | host->bus_off = configs[pass].bus_off; |
| 1508 | host->sh = wd7000_host[unit] = sh; |
| 1509 | unit++; |
| 1510 | |
| 1511 | dprintk("wd7000_detect: Trying init WD-7000 card at IO " "0x%x, IRQ %d, DMA %d...\n", host->iobase, host->irq, host->dma); |
| 1512 | |
| 1513 | if (!wd7000_init(host)) /* Initialization failed */ |
| 1514 | goto err_unregister; |
| 1515 | |
| 1516 | /* |
| 1517 | * OK from here - we'll use this adapter/configuration. |
| 1518 | */ |
| 1519 | wd7000_revision(host); /* important for scatter/gather */ |
| 1520 | |
| 1521 | /* |
| 1522 | * For boards before rev 6.0, scatter/gather isn't supported. |
| 1523 | */ |
| 1524 | if (host->rev1 < 6) |
| 1525 | sh->sg_tablesize = SG_NONE; |
| 1526 | |
| 1527 | present++; /* count it */ |
| 1528 | |
| 1529 | if (biosaddr_ptr != NUM_ADDRS) |
| 1530 | biosptr[pass] = biosaddr_ptr; |
| 1531 | |
| 1532 | printk(KERN_INFO "Western Digital WD-7000 (rev %d.%d) ", host->rev1, host->rev2); |
| 1533 | printk("using IO 0x%x, IRQ %d, DMA %d.\n", host->iobase, host->irq, host->dma); |
| 1534 | printk(" BUS_ON time: %dns, BUS_OFF time: %dns\n", host->bus_on * 125, host->bus_off * 125); |
| 1535 | } |
| 1536 | } else |
| 1537 | dprintk("wd7000_detect: IO 0x%x region already allocated!\n", iobase); |
| 1538 | |
| 1539 | continue; |
| 1540 | |
| 1541 | err_unregister: |
| 1542 | scsi_unregister(sh); |
| 1543 | err_release: |
| 1544 | release_region(iobase, 4); |
| 1545 | |
| 1546 | } |
| 1547 | |
| 1548 | if (!present) |
| 1549 | printk("Failed initialization of WD-7000 SCSI card!\n"); |
| 1550 | |
| 1551 | return (present); |
| 1552 | } |
| 1553 | |
| 1554 | static int wd7000_release(struct Scsi_Host *shost) |
| 1555 | { |
| 1556 | if (shost->irq) |
| 1557 | free_irq(shost->irq, NULL); |
| 1558 | if (shost->io_port && shost->n_io_port) |
| 1559 | release_region(shost->io_port, shost->n_io_port); |
| 1560 | scsi_unregister(shost); |
| 1561 | return 0; |
| 1562 | } |
| 1563 | |
| 1564 | #if 0 |
| 1565 | /* |
| 1566 | * I have absolutely NO idea how to do an abort with the WD7000... |
| 1567 | */ |
| 1568 | static int wd7000_abort(Scsi_Cmnd * SCpnt) |
| 1569 | { |
| 1570 | Adapter *host = (Adapter *) SCpnt->device->host->hostdata; |
| 1571 | |
| 1572 | if (inb(host->iobase + ASC_STAT) & INT_IM) { |
| 1573 | printk("wd7000_abort: lost interrupt\n"); |
| 1574 | wd7000_intr_handle(host->irq, NULL, NULL); |
| 1575 | return FAILED; |
| 1576 | } |
| 1577 | return FAILED; |
| 1578 | } |
| 1579 | #endif |
| 1580 | |
| 1581 | /* |
| 1582 | * Last resort. Reinitialize the board. |
| 1583 | */ |
| 1584 | |
| 1585 | static int wd7000_host_reset(struct scsi_cmnd *SCpnt) |
| 1586 | { |
| 1587 | Adapter *host = (Adapter *) SCpnt->device->host->hostdata; |
| 1588 | |
Jeff Garzik | df0ae24 | 2005-05-28 07:57:14 -0400 | [diff] [blame] | 1589 | spin_unlock_irq(SCpnt->device->host->host_lock); |
| 1590 | |
| 1591 | if (wd7000_adapter_reset(host) < 0) { |
| 1592 | spin_unlock_irq(SCpnt->device->host->host_lock); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1593 | return FAILED; |
Jeff Garzik | df0ae24 | 2005-05-28 07:57:14 -0400 | [diff] [blame] | 1594 | } |
| 1595 | |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1596 | wd7000_enable_intr(host); |
Jeff Garzik | df0ae24 | 2005-05-28 07:57:14 -0400 | [diff] [blame] | 1597 | |
| 1598 | spin_unlock_irq(SCpnt->device->host->host_lock); |
Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1599 | return SUCCESS; |
| 1600 | } |
| 1601 | |
| 1602 | /* |
| 1603 | * This was borrowed directly from aha1542.c. (Zaga) |
| 1604 | */ |
| 1605 | |
| 1606 | static int wd7000_biosparam(struct scsi_device *sdev, |
| 1607 | struct block_device *bdev, sector_t capacity, int *ip) |
| 1608 | { |
| 1609 | char b[BDEVNAME_SIZE]; |
| 1610 | |
| 1611 | dprintk("wd7000_biosparam: dev=%s, size=%d, ", |
| 1612 | bdevname(bdev, b), capacity); |
| 1613 | (void)b; /* unused var warning? */ |
| 1614 | |
| 1615 | /* |
| 1616 | * try default translation |
| 1617 | */ |
| 1618 | ip[0] = 64; |
| 1619 | ip[1] = 32; |
| 1620 | ip[2] = capacity >> 11; |
| 1621 | |
| 1622 | /* |
| 1623 | * for disks >1GB do some guessing |
| 1624 | */ |
| 1625 | if (ip[2] >= 1024) { |
| 1626 | int info[3]; |
| 1627 | |
| 1628 | /* |
| 1629 | * try to figure out the geometry from the partition table |
| 1630 | */ |
| 1631 | if ((scsicam_bios_param(bdev, capacity, info) < 0) || !(((info[0] == 64) && (info[1] == 32)) || ((info[0] == 255) && (info[1] == 63)))) { |
| 1632 | printk("wd7000_biosparam: unable to verify geometry for disk with >1GB.\n" " using extended translation.\n"); |
| 1633 | |
| 1634 | ip[0] = 255; |
| 1635 | ip[1] = 63; |
| 1636 | ip[2] = (unsigned long) capacity / (255 * 63); |
| 1637 | } else { |
| 1638 | ip[0] = info[0]; |
| 1639 | ip[1] = info[1]; |
| 1640 | ip[2] = info[2]; |
| 1641 | |
| 1642 | if (info[0] == 255) |
| 1643 | printk(KERN_INFO "%s: current partition table is " "using extended translation.\n", __FUNCTION__); |
| 1644 | } |
| 1645 | } |
| 1646 | |
| 1647 | dprintk("bios geometry: head=%d, sec=%d, cyl=%d\n", ip[0], ip[1], ip[2]); |
| 1648 | dprintk("WARNING: check, if the bios geometry is correct.\n"); |
| 1649 | |
| 1650 | return (0); |
| 1651 | } |
| 1652 | |
| 1653 | MODULE_AUTHOR("Thomas Wuensche, John Boyd, Miroslav Zagorac"); |
| 1654 | MODULE_DESCRIPTION("Driver for the WD7000 series ISA controllers"); |
| 1655 | MODULE_LICENSE("GPL"); |
| 1656 | |
| 1657 | static struct scsi_host_template driver_template = { |
| 1658 | .proc_name = "wd7000", |
| 1659 | .proc_info = wd7000_proc_info, |
| 1660 | .name = "Western Digital WD-7000", |
| 1661 | .detect = wd7000_detect, |
| 1662 | .release = wd7000_release, |
| 1663 | .queuecommand = wd7000_queuecommand, |
| 1664 | .eh_host_reset_handler = wd7000_host_reset, |
| 1665 | .bios_param = wd7000_biosparam, |
| 1666 | .can_queue = WD7000_Q, |
| 1667 | .this_id = 7, |
| 1668 | .sg_tablesize = WD7000_SG, |
| 1669 | .cmd_per_lun = 1, |
| 1670 | .unchecked_isa_dma = 1, |
| 1671 | .use_clustering = ENABLE_CLUSTERING, |
| 1672 | }; |
| 1673 | |
| 1674 | #include "scsi_module.c" |