Linux 2.6.26-rc5
[linux-2.6/openmoko-kernel/knife-kernel.git] / drivers / scsi / in2000.c
blob8053b1e86ccbf78730bf7dc46904379cabbc9aea
1 /*
2 * in2000.c - Linux device driver for the
3 * Always IN2000 ISA SCSI card.
5 * Copyright (c) 1996 John Shifflett, GeoLog Consulting
6 * john@geolog.com
7 * jshiffle@netcom.com
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2, or (at your option)
12 * any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * For the avoidance of doubt the "preferred form" of this code is one which
20 * is in an open non patent encumbered format. Where cryptographic key signing
21 * forms part of the process of creating an executable the information
22 * including keys needed to generate an equivalently functional executable
23 * are deemed to be part of the source code.
25 * Drew Eckhardt's excellent 'Generic NCR5380' sources provided
26 * much of the inspiration and some of the code for this driver.
27 * The Linux IN2000 driver distributed in the Linux kernels through
28 * version 1.2.13 was an extremely valuable reference on the arcane
29 * (and still mysterious) workings of the IN2000's fifo. It also
30 * is where I lifted in2000_biosparam(), the gist of the card
31 * detection scheme, and other bits of code. Many thanks to the
32 * talented and courageous people who wrote, contributed to, and
33 * maintained that driver (including Brad McLean, Shaun Savage,
34 * Bill Earnest, Larry Doolittle, Roger Sunshine, John Luckey,
35 * Matt Postiff, Peter Lu, zerucha@shell.portal.com, and Eric
36 * Youngdale). I should also mention the driver written by
37 * Hamish Macdonald for the (GASP!) Amiga A2091 card, included
38 * in the Linux-m68k distribution; it gave me a good initial
39 * understanding of the proper way to run a WD33c93 chip, and I
40 * ended up stealing lots of code from it.
42 * _This_ driver is (I feel) an improvement over the old one in
43 * several respects:
44 * - All problems relating to the data size of a SCSI request are
45 * gone (as far as I know). The old driver couldn't handle
46 * swapping to partitions because that involved 4k blocks, nor
47 * could it deal with the st.c tape driver unmodified, because
48 * that usually involved 4k - 32k blocks. The old driver never
49 * quite got away from a morbid dependence on 2k block sizes -
50 * which of course is the size of the card's fifo.
52 * - Target Disconnection/Reconnection is now supported. Any
53 * system with more than one device active on the SCSI bus
54 * will benefit from this. The driver defaults to what I'm
55 * calling 'adaptive disconnect' - meaning that each command
56 * is evaluated individually as to whether or not it should
57 * be run with the option to disconnect/reselect (if the
58 * device chooses), or as a "SCSI-bus-hog".
60 * - Synchronous data transfers are now supported. Because there
61 * are a few devices (and many improperly terminated systems)
62 * that choke when doing sync, the default is sync DISABLED
63 * for all devices. This faster protocol can (and should!)
64 * be enabled on selected devices via the command-line.
66 * - Runtime operating parameters can now be specified through
67 * either the LILO or the 'insmod' command line. For LILO do:
68 * "in2000=blah,blah,blah"
69 * and with insmod go like:
70 * "insmod /usr/src/linux/modules/in2000.o setup_strings=blah,blah"
71 * The defaults should be good for most people. See the comment
72 * for 'setup_strings' below for more details.
74 * - The old driver relied exclusively on what the Western Digital
75 * docs call "Combination Level 2 Commands", which are a great
76 * idea in that the CPU is relieved of a lot of interrupt
77 * overhead. However, by accepting a certain (user-settable)
78 * amount of additional interrupts, this driver achieves
79 * better control over the SCSI bus, and data transfers are
80 * almost as fast while being much easier to define, track,
81 * and debug.
83 * - You can force detection of a card whose BIOS has been disabled.
85 * - Multiple IN2000 cards might almost be supported. I've tried to
86 * keep it in mind, but have no way to test...
89 * TODO:
90 * tagged queuing. multiple cards.
93 * NOTE:
94 * When using this or any other SCSI driver as a module, you'll
95 * find that with the stock kernel, at most _two_ SCSI hard
96 * drives will be linked into the device list (ie, usable).
97 * If your IN2000 card has more than 2 disks on its bus, you
98 * might want to change the define of 'SD_EXTRA_DEVS' in the
99 * 'hosts.h' file from 2 to whatever is appropriate. It took
100 * me a while to track down this surprisingly obscure and
101 * undocumented little "feature".
104 * People with bug reports, wish-lists, complaints, comments,
105 * or improvements are asked to pah-leeez email me (John Shifflett)
106 * at john@geolog.com or jshiffle@netcom.com! I'm anxious to get
107 * this thing into as good a shape as possible, and I'm positive
108 * there are lots of lurking bugs and "Stupid Places".
110 * Updated for Linux 2.5 by Alan Cox <alan@redhat.com>
111 * - Using new_eh handler
112 * - Hopefully got all the locking right again
113 * See "FIXME" notes for items that could do with more work
116 #include <linux/module.h>
117 #include <linux/blkdev.h>
118 #include <linux/interrupt.h>
119 #include <linux/string.h>
120 #include <linux/delay.h>
121 #include <linux/proc_fs.h>
122 #include <linux/ioport.h>
123 #include <linux/stat.h>
125 #include <asm/io.h>
126 #include <asm/system.h>
128 #include "scsi.h"
129 #include <scsi/scsi_host.h>
131 #define IN2000_VERSION "1.33-2.5"
132 #define IN2000_DATE "2002/11/03"
134 #include "in2000.h"
138 * 'setup_strings' is a single string used to pass operating parameters and
139 * settings from the kernel/module command-line to the driver. 'setup_args[]'
140 * is an array of strings that define the compile-time default values for
141 * these settings. If Linux boots with a LILO or insmod command-line, those
142 * settings are combined with 'setup_args[]'. Note that LILO command-lines
143 * are prefixed with "in2000=" while insmod uses a "setup_strings=" prefix.
144 * The driver recognizes the following keywords (lower case required) and
145 * arguments:
147 * - ioport:addr -Where addr is IO address of a (usually ROM-less) card.
148 * - noreset -No optional args. Prevents SCSI bus reset at boot time.
149 * - nosync:x -x is a bitmask where the 1st 7 bits correspond with
150 * the 7 possible SCSI devices (bit 0 for device #0, etc).
151 * Set a bit to PREVENT sync negotiation on that device.
152 * The driver default is sync DISABLED on all devices.
153 * - period:ns -ns is the minimum # of nanoseconds in a SCSI data transfer
154 * period. Default is 500; acceptable values are 250 - 1000.
155 * - disconnect:x -x = 0 to never allow disconnects, 2 to always allow them.
156 * x = 1 does 'adaptive' disconnects, which is the default
157 * and generally the best choice.
158 * - debug:x -If 'DEBUGGING_ON' is defined, x is a bitmask that causes
159 * various types of debug output to printed - see the DB_xxx
160 * defines in in2000.h
161 * - proc:x -If 'PROC_INTERFACE' is defined, x is a bitmask that
162 * determines how the /proc interface works and what it
163 * does - see the PR_xxx defines in in2000.h
165 * Syntax Notes:
166 * - Numeric arguments can be decimal or the '0x' form of hex notation. There
167 * _must_ be a colon between a keyword and its numeric argument, with no
168 * spaces.
169 * - Keywords are separated by commas, no spaces, in the standard kernel
170 * command-line manner.
171 * - A keyword in the 'nth' comma-separated command-line member will overwrite
172 * the 'nth' element of setup_args[]. A blank command-line member (in
173 * other words, a comma with no preceding keyword) will _not_ overwrite
174 * the corresponding setup_args[] element.
176 * A few LILO examples (for insmod, use 'setup_strings' instead of 'in2000'):
177 * - in2000=ioport:0x220,noreset
178 * - in2000=period:250,disconnect:2,nosync:0x03
179 * - in2000=debug:0x1e
180 * - in2000=proc:3
183 /* Normally, no defaults are specified... */
184 static char *setup_args[] = { "", "", "", "", "", "", "", "", "" };
186 /* filled in by 'insmod' */
187 static char *setup_strings;
189 module_param(setup_strings, charp, 0);
191 static inline uchar read_3393(struct IN2000_hostdata *hostdata, uchar reg_num)
193 write1_io(reg_num, IO_WD_ADDR);
194 return read1_io(IO_WD_DATA);
198 #define READ_AUX_STAT() read1_io(IO_WD_ASR)
201 static inline void write_3393(struct IN2000_hostdata *hostdata, uchar reg_num, uchar value)
203 write1_io(reg_num, IO_WD_ADDR);
204 write1_io(value, IO_WD_DATA);
208 static inline void write_3393_cmd(struct IN2000_hostdata *hostdata, uchar cmd)
210 /* while (READ_AUX_STAT() & ASR_CIP)
211 printk("|");*/
212 write1_io(WD_COMMAND, IO_WD_ADDR);
213 write1_io(cmd, IO_WD_DATA);
217 static uchar read_1_byte(struct IN2000_hostdata *hostdata)
219 uchar asr, x = 0;
221 write_3393(hostdata, WD_CONTROL, CTRL_IDI | CTRL_EDI | CTRL_POLLED);
222 write_3393_cmd(hostdata, WD_CMD_TRANS_INFO | 0x80);
223 do {
224 asr = READ_AUX_STAT();
225 if (asr & ASR_DBR)
226 x = read_3393(hostdata, WD_DATA);
227 } while (!(asr & ASR_INT));
228 return x;
232 static void write_3393_count(struct IN2000_hostdata *hostdata, unsigned long value)
234 write1_io(WD_TRANSFER_COUNT_MSB, IO_WD_ADDR);
235 write1_io((value >> 16), IO_WD_DATA);
236 write1_io((value >> 8), IO_WD_DATA);
237 write1_io(value, IO_WD_DATA);
241 static unsigned long read_3393_count(struct IN2000_hostdata *hostdata)
243 unsigned long value;
245 write1_io(WD_TRANSFER_COUNT_MSB, IO_WD_ADDR);
246 value = read1_io(IO_WD_DATA) << 16;
247 value |= read1_io(IO_WD_DATA) << 8;
248 value |= read1_io(IO_WD_DATA);
249 return value;
253 /* The 33c93 needs to be told which direction a command transfers its
254 * data; we use this function to figure it out. Returns true if there
255 * will be a DATA_OUT phase with this command, false otherwise.
256 * (Thanks to Joerg Dorchain for the research and suggestion.)
258 static int is_dir_out(Scsi_Cmnd * cmd)
260 switch (cmd->cmnd[0]) {
261 case WRITE_6:
262 case WRITE_10:
263 case WRITE_12:
264 case WRITE_LONG:
265 case WRITE_SAME:
266 case WRITE_BUFFER:
267 case WRITE_VERIFY:
268 case WRITE_VERIFY_12:
269 case COMPARE:
270 case COPY:
271 case COPY_VERIFY:
272 case SEARCH_EQUAL:
273 case SEARCH_HIGH:
274 case SEARCH_LOW:
275 case SEARCH_EQUAL_12:
276 case SEARCH_HIGH_12:
277 case SEARCH_LOW_12:
278 case FORMAT_UNIT:
279 case REASSIGN_BLOCKS:
280 case RESERVE:
281 case MODE_SELECT:
282 case MODE_SELECT_10:
283 case LOG_SELECT:
284 case SEND_DIAGNOSTIC:
285 case CHANGE_DEFINITION:
286 case UPDATE_BLOCK:
287 case SET_WINDOW:
288 case MEDIUM_SCAN:
289 case SEND_VOLUME_TAG:
290 case 0xea:
291 return 1;
292 default:
293 return 0;
299 static struct sx_period sx_table[] = {
300 {1, 0x20},
301 {252, 0x20},
302 {376, 0x30},
303 {500, 0x40},
304 {624, 0x50},
305 {752, 0x60},
306 {876, 0x70},
307 {1000, 0x00},
308 {0, 0}
311 static int round_period(unsigned int period)
313 int x;
315 for (x = 1; sx_table[x].period_ns; x++) {
316 if ((period <= sx_table[x - 0].period_ns) && (period > sx_table[x - 1].period_ns)) {
317 return x;
320 return 7;
323 static uchar calc_sync_xfer(unsigned int period, unsigned int offset)
325 uchar result;
327 period *= 4; /* convert SDTR code to ns */
328 result = sx_table[round_period(period)].reg_value;
329 result |= (offset < OPTIMUM_SX_OFF) ? offset : OPTIMUM_SX_OFF;
330 return result;
335 static void in2000_execute(struct Scsi_Host *instance);
337 static int in2000_queuecommand(Scsi_Cmnd * cmd, void (*done) (Scsi_Cmnd *))
339 struct Scsi_Host *instance;
340 struct IN2000_hostdata *hostdata;
341 Scsi_Cmnd *tmp;
343 instance = cmd->device->host;
344 hostdata = (struct IN2000_hostdata *) instance->hostdata;
346 DB(DB_QUEUE_COMMAND, scmd_printk(KERN_DEBUG, cmd, "Q-%02x-%ld(", cmd->cmnd[0], cmd->serial_number))
348 /* Set up a few fields in the Scsi_Cmnd structure for our own use:
349 * - host_scribble is the pointer to the next cmd in the input queue
350 * - scsi_done points to the routine we call when a cmd is finished
351 * - result is what you'd expect
353 cmd->host_scribble = NULL;
354 cmd->scsi_done = done;
355 cmd->result = 0;
357 /* We use the Scsi_Pointer structure that's included with each command
358 * as a scratchpad (as it's intended to be used!). The handy thing about
359 * the SCp.xxx fields is that they're always associated with a given
360 * cmd, and are preserved across disconnect-reselect. This means we
361 * can pretty much ignore SAVE_POINTERS and RESTORE_POINTERS messages
362 * if we keep all the critical pointers and counters in SCp:
363 * - SCp.ptr is the pointer into the RAM buffer
364 * - SCp.this_residual is the size of that buffer
365 * - SCp.buffer points to the current scatter-gather buffer
366 * - SCp.buffers_residual tells us how many S.G. buffers there are
367 * - SCp.have_data_in helps keep track of >2048 byte transfers
368 * - SCp.sent_command is not used
369 * - SCp.phase records this command's SRCID_ER bit setting
372 if (scsi_bufflen(cmd)) {
373 cmd->SCp.buffer = scsi_sglist(cmd);
374 cmd->SCp.buffers_residual = scsi_sg_count(cmd) - 1;
375 cmd->SCp.ptr = sg_virt(cmd->SCp.buffer);
376 cmd->SCp.this_residual = cmd->SCp.buffer->length;
377 } else {
378 cmd->SCp.buffer = NULL;
379 cmd->SCp.buffers_residual = 0;
380 cmd->SCp.ptr = NULL;
381 cmd->SCp.this_residual = 0;
383 cmd->SCp.have_data_in = 0;
385 /* We don't set SCp.phase here - that's done in in2000_execute() */
387 /* WD docs state that at the conclusion of a "LEVEL2" command, the
388 * status byte can be retrieved from the LUN register. Apparently,
389 * this is the case only for *uninterrupted* LEVEL2 commands! If
390 * there are any unexpected phases entered, even if they are 100%
391 * legal (different devices may choose to do things differently),
392 * the LEVEL2 command sequence is exited. This often occurs prior
393 * to receiving the status byte, in which case the driver does a
394 * status phase interrupt and gets the status byte on its own.
395 * While such a command can then be "resumed" (ie restarted to
396 * finish up as a LEVEL2 command), the LUN register will NOT be
397 * a valid status byte at the command's conclusion, and we must
398 * use the byte obtained during the earlier interrupt. Here, we
399 * preset SCp.Status to an illegal value (0xff) so that when
400 * this command finally completes, we can tell where the actual
401 * status byte is stored.
404 cmd->SCp.Status = ILLEGAL_STATUS_BYTE;
406 /* We need to disable interrupts before messing with the input
407 * queue and calling in2000_execute().
411 * Add the cmd to the end of 'input_Q'. Note that REQUEST_SENSE
412 * commands are added to the head of the queue so that the desired
413 * sense data is not lost before REQUEST_SENSE executes.
416 if (!(hostdata->input_Q) || (cmd->cmnd[0] == REQUEST_SENSE)) {
417 cmd->host_scribble = (uchar *) hostdata->input_Q;
418 hostdata->input_Q = cmd;
419 } else { /* find the end of the queue */
420 for (tmp = (Scsi_Cmnd *) hostdata->input_Q; tmp->host_scribble; tmp = (Scsi_Cmnd *) tmp->host_scribble);
421 tmp->host_scribble = (uchar *) cmd;
424 /* We know that there's at least one command in 'input_Q' now.
425 * Go see if any of them are runnable!
428 in2000_execute(cmd->device->host);
430 DB(DB_QUEUE_COMMAND, printk(")Q-%ld ", cmd->serial_number))
431 return 0;
437 * This routine attempts to start a scsi command. If the host_card is
438 * already connected, we give up immediately. Otherwise, look through
439 * the input_Q, using the first command we find that's intended
440 * for a currently non-busy target/lun.
441 * Note that this function is always called with interrupts already
442 * disabled (either from in2000_queuecommand() or in2000_intr()).
444 static void in2000_execute(struct Scsi_Host *instance)
446 struct IN2000_hostdata *hostdata;
447 Scsi_Cmnd *cmd, *prev;
448 int i;
449 unsigned short *sp;
450 unsigned short f;
451 unsigned short flushbuf[16];
454 hostdata = (struct IN2000_hostdata *) instance->hostdata;
456 DB(DB_EXECUTE, printk("EX("))
458 if (hostdata->selecting || hostdata->connected) {
460 DB(DB_EXECUTE, printk(")EX-0 "))
462 return;
466 * Search through the input_Q for a command destined
467 * for an idle target/lun.
470 cmd = (Scsi_Cmnd *) hostdata->input_Q;
471 prev = NULL;
472 while (cmd) {
473 if (!(hostdata->busy[cmd->device->id] & (1 << cmd->device->lun)))
474 break;
475 prev = cmd;
476 cmd = (Scsi_Cmnd *) cmd->host_scribble;
479 /* quit if queue empty or all possible targets are busy */
481 if (!cmd) {
483 DB(DB_EXECUTE, printk(")EX-1 "))
485 return;
488 /* remove command from queue */
490 if (prev)
491 prev->host_scribble = cmd->host_scribble;
492 else
493 hostdata->input_Q = (Scsi_Cmnd *) cmd->host_scribble;
495 #ifdef PROC_STATISTICS
496 hostdata->cmd_cnt[cmd->device->id]++;
497 #endif
500 * Start the selection process
503 if (is_dir_out(cmd))
504 write_3393(hostdata, WD_DESTINATION_ID, cmd->device->id);
505 else
506 write_3393(hostdata, WD_DESTINATION_ID, cmd->device->id | DSTID_DPD);
508 /* Now we need to figure out whether or not this command is a good
509 * candidate for disconnect/reselect. We guess to the best of our
510 * ability, based on a set of hierarchical rules. When several
511 * devices are operating simultaneously, disconnects are usually
512 * an advantage. In a single device system, or if only 1 device
513 * is being accessed, transfers usually go faster if disconnects
514 * are not allowed:
516 * + Commands should NEVER disconnect if hostdata->disconnect =
517 * DIS_NEVER (this holds for tape drives also), and ALWAYS
518 * disconnect if hostdata->disconnect = DIS_ALWAYS.
519 * + Tape drive commands should always be allowed to disconnect.
520 * + Disconnect should be allowed if disconnected_Q isn't empty.
521 * + Commands should NOT disconnect if input_Q is empty.
522 * + Disconnect should be allowed if there are commands in input_Q
523 * for a different target/lun. In this case, the other commands
524 * should be made disconnect-able, if not already.
526 * I know, I know - this code would flunk me out of any
527 * "C Programming 101" class ever offered. But it's easy
528 * to change around and experiment with for now.
531 cmd->SCp.phase = 0; /* assume no disconnect */
532 if (hostdata->disconnect == DIS_NEVER)
533 goto no;
534 if (hostdata->disconnect == DIS_ALWAYS)
535 goto yes;
536 if (cmd->device->type == 1) /* tape drive? */
537 goto yes;
538 if (hostdata->disconnected_Q) /* other commands disconnected? */
539 goto yes;
540 if (!(hostdata->input_Q)) /* input_Q empty? */
541 goto no;
542 for (prev = (Scsi_Cmnd *) hostdata->input_Q; prev; prev = (Scsi_Cmnd *) prev->host_scribble) {
543 if ((prev->device->id != cmd->device->id) || (prev->device->lun != cmd->device->lun)) {
544 for (prev = (Scsi_Cmnd *) hostdata->input_Q; prev; prev = (Scsi_Cmnd *) prev->host_scribble)
545 prev->SCp.phase = 1;
546 goto yes;
549 goto no;
551 yes:
552 cmd->SCp.phase = 1;
554 #ifdef PROC_STATISTICS
555 hostdata->disc_allowed_cnt[cmd->device->id]++;
556 #endif
559 write_3393(hostdata, WD_SOURCE_ID, ((cmd->SCp.phase) ? SRCID_ER : 0));
561 write_3393(hostdata, WD_TARGET_LUN, cmd->device->lun);
562 write_3393(hostdata, WD_SYNCHRONOUS_TRANSFER, hostdata->sync_xfer[cmd->device->id]);
563 hostdata->busy[cmd->device->id] |= (1 << cmd->device->lun);
565 if ((hostdata->level2 <= L2_NONE) || (hostdata->sync_stat[cmd->device->id] == SS_UNSET)) {
568 * Do a 'Select-With-ATN' command. This will end with
569 * one of the following interrupts:
570 * CSR_RESEL_AM: failure - can try again later.
571 * CSR_TIMEOUT: failure - give up.
572 * CSR_SELECT: success - proceed.
575 hostdata->selecting = cmd;
577 /* Every target has its own synchronous transfer setting, kept in
578 * the sync_xfer array, and a corresponding status byte in sync_stat[].
579 * Each target's sync_stat[] entry is initialized to SS_UNSET, and its
580 * sync_xfer[] entry is initialized to the default/safe value. SS_UNSET
581 * means that the parameters are undetermined as yet, and that we
582 * need to send an SDTR message to this device after selection is
583 * complete. We set SS_FIRST to tell the interrupt routine to do so,
584 * unless we don't want to even _try_ synchronous transfers: In this
585 * case we set SS_SET to make the defaults final.
587 if (hostdata->sync_stat[cmd->device->id] == SS_UNSET) {
588 if (hostdata->sync_off & (1 << cmd->device->id))
589 hostdata->sync_stat[cmd->device->id] = SS_SET;
590 else
591 hostdata->sync_stat[cmd->device->id] = SS_FIRST;
593 hostdata->state = S_SELECTING;
594 write_3393_count(hostdata, 0); /* this guarantees a DATA_PHASE interrupt */
595 write_3393_cmd(hostdata, WD_CMD_SEL_ATN);
598 else {
601 * Do a 'Select-With-ATN-Xfer' command. This will end with
602 * one of the following interrupts:
603 * CSR_RESEL_AM: failure - can try again later.
604 * CSR_TIMEOUT: failure - give up.
605 * anything else: success - proceed.
608 hostdata->connected = cmd;
609 write_3393(hostdata, WD_COMMAND_PHASE, 0);
611 /* copy command_descriptor_block into WD chip
612 * (take advantage of auto-incrementing)
615 write1_io(WD_CDB_1, IO_WD_ADDR);
616 for (i = 0; i < cmd->cmd_len; i++)
617 write1_io(cmd->cmnd[i], IO_WD_DATA);
619 /* The wd33c93 only knows about Group 0, 1, and 5 commands when
620 * it's doing a 'select-and-transfer'. To be safe, we write the
621 * size of the CDB into the OWN_ID register for every case. This
622 * way there won't be problems with vendor-unique, audio, etc.
625 write_3393(hostdata, WD_OWN_ID, cmd->cmd_len);
627 /* When doing a non-disconnect command, we can save ourselves a DATA
628 * phase interrupt later by setting everything up now. With writes we
629 * need to pre-fill the fifo; if there's room for the 32 flush bytes,
630 * put them in there too - that'll avoid a fifo interrupt. Reads are
631 * somewhat simpler.
632 * KLUDGE NOTE: It seems that you can't completely fill the fifo here:
633 * This results in the IO_FIFO_COUNT register rolling over to zero,
634 * and apparently the gate array logic sees this as empty, not full,
635 * so the 3393 chip is never signalled to start reading from the
636 * fifo. Or maybe it's seen as a permanent fifo interrupt condition.
637 * Regardless, we fix this by temporarily pretending that the fifo
638 * is 16 bytes smaller. (I see now that the old driver has a comment
639 * about "don't fill completely" in an analogous place - must be the
640 * same deal.) This results in CDROM, swap partitions, and tape drives
641 * needing an extra interrupt per write command - I think we can live
642 * with that!
645 if (!(cmd->SCp.phase)) {
646 write_3393_count(hostdata, cmd->SCp.this_residual);
647 write_3393(hostdata, WD_CONTROL, CTRL_IDI | CTRL_EDI | CTRL_BUS);
648 write1_io(0, IO_FIFO_WRITE); /* clear fifo counter, write mode */
650 if (is_dir_out(cmd)) {
651 hostdata->fifo = FI_FIFO_WRITING;
652 if ((i = cmd->SCp.this_residual) > (IN2000_FIFO_SIZE - 16))
653 i = IN2000_FIFO_SIZE - 16;
654 cmd->SCp.have_data_in = i; /* this much data in fifo */
655 i >>= 1; /* Gulp. Assuming modulo 2. */
656 sp = (unsigned short *) cmd->SCp.ptr;
657 f = hostdata->io_base + IO_FIFO;
659 #ifdef FAST_WRITE_IO
661 FAST_WRITE2_IO();
662 #else
663 while (i--)
664 write2_io(*sp++, IO_FIFO);
666 #endif
668 /* Is there room for the flush bytes? */
670 if (cmd->SCp.have_data_in <= ((IN2000_FIFO_SIZE - 16) - 32)) {
671 sp = flushbuf;
672 i = 16;
674 #ifdef FAST_WRITE_IO
676 FAST_WRITE2_IO();
677 #else
678 while (i--)
679 write2_io(0, IO_FIFO);
681 #endif
686 else {
687 write1_io(0, IO_FIFO_READ); /* put fifo in read mode */
688 hostdata->fifo = FI_FIFO_READING;
689 cmd->SCp.have_data_in = 0; /* nothing transferred yet */
692 } else {
693 write_3393_count(hostdata, 0); /* this guarantees a DATA_PHASE interrupt */
695 hostdata->state = S_RUNNING_LEVEL2;
696 write_3393_cmd(hostdata, WD_CMD_SEL_ATN_XFER);
700 * Since the SCSI bus can handle only 1 connection at a time,
701 * we get out of here now. If the selection fails, or when
702 * the command disconnects, we'll come back to this routine
703 * to search the input_Q again...
706 DB(DB_EXECUTE, printk("%s%ld)EX-2 ", (cmd->SCp.phase) ? "d:" : "", cmd->serial_number))
712 static void transfer_pio(uchar * buf, int cnt, int data_in_dir, struct IN2000_hostdata *hostdata)
714 uchar asr;
716 DB(DB_TRANSFER, printk("(%p,%d,%s)", buf, cnt, data_in_dir ? "in" : "out"))
718 write_3393(hostdata, WD_CONTROL, CTRL_IDI | CTRL_EDI | CTRL_POLLED);
719 write_3393_count(hostdata, cnt);
720 write_3393_cmd(hostdata, WD_CMD_TRANS_INFO);
721 if (data_in_dir) {
722 do {
723 asr = READ_AUX_STAT();
724 if (asr & ASR_DBR)
725 *buf++ = read_3393(hostdata, WD_DATA);
726 } while (!(asr & ASR_INT));
727 } else {
728 do {
729 asr = READ_AUX_STAT();
730 if (asr & ASR_DBR)
731 write_3393(hostdata, WD_DATA, *buf++);
732 } while (!(asr & ASR_INT));
735 /* Note: we are returning with the interrupt UN-cleared.
736 * Since (presumably) an entire I/O operation has
737 * completed, the bus phase is probably different, and
738 * the interrupt routine will discover this when it
739 * responds to the uncleared int.
746 static void transfer_bytes(Scsi_Cmnd * cmd, int data_in_dir)
748 struct IN2000_hostdata *hostdata;
749 unsigned short *sp;
750 unsigned short f;
751 int i;
753 hostdata = (struct IN2000_hostdata *) cmd->device->host->hostdata;
755 /* Normally, you'd expect 'this_residual' to be non-zero here.
756 * In a series of scatter-gather transfers, however, this
757 * routine will usually be called with 'this_residual' equal
758 * to 0 and 'buffers_residual' non-zero. This means that a
759 * previous transfer completed, clearing 'this_residual', and
760 * now we need to setup the next scatter-gather buffer as the
761 * source or destination for THIS transfer.
763 if (!cmd->SCp.this_residual && cmd->SCp.buffers_residual) {
764 ++cmd->SCp.buffer;
765 --cmd->SCp.buffers_residual;
766 cmd->SCp.this_residual = cmd->SCp.buffer->length;
767 cmd->SCp.ptr = sg_virt(cmd->SCp.buffer);
770 /* Set up hardware registers */
772 write_3393(hostdata, WD_SYNCHRONOUS_TRANSFER, hostdata->sync_xfer[cmd->device->id]);
773 write_3393_count(hostdata, cmd->SCp.this_residual);
774 write_3393(hostdata, WD_CONTROL, CTRL_IDI | CTRL_EDI | CTRL_BUS);
775 write1_io(0, IO_FIFO_WRITE); /* zero counter, assume write */
777 /* Reading is easy. Just issue the command and return - we'll
778 * get an interrupt later when we have actual data to worry about.
781 if (data_in_dir) {
782 write1_io(0, IO_FIFO_READ);
783 if ((hostdata->level2 >= L2_DATA) || (hostdata->level2 == L2_BASIC && cmd->SCp.phase == 0)) {
784 write_3393(hostdata, WD_COMMAND_PHASE, 0x45);
785 write_3393_cmd(hostdata, WD_CMD_SEL_ATN_XFER);
786 hostdata->state = S_RUNNING_LEVEL2;
787 } else
788 write_3393_cmd(hostdata, WD_CMD_TRANS_INFO);
789 hostdata->fifo = FI_FIFO_READING;
790 cmd->SCp.have_data_in = 0;
791 return;
794 /* Writing is more involved - we'll start the WD chip and write as
795 * much data to the fifo as we can right now. Later interrupts will
796 * write any bytes that don't make it at this stage.
799 if ((hostdata->level2 >= L2_DATA) || (hostdata->level2 == L2_BASIC && cmd->SCp.phase == 0)) {
800 write_3393(hostdata, WD_COMMAND_PHASE, 0x45);
801 write_3393_cmd(hostdata, WD_CMD_SEL_ATN_XFER);
802 hostdata->state = S_RUNNING_LEVEL2;
803 } else
804 write_3393_cmd(hostdata, WD_CMD_TRANS_INFO);
805 hostdata->fifo = FI_FIFO_WRITING;
806 sp = (unsigned short *) cmd->SCp.ptr;
808 if ((i = cmd->SCp.this_residual) > IN2000_FIFO_SIZE)
809 i = IN2000_FIFO_SIZE;
810 cmd->SCp.have_data_in = i;
811 i >>= 1; /* Gulp. We assume this_residual is modulo 2 */
812 f = hostdata->io_base + IO_FIFO;
814 #ifdef FAST_WRITE_IO
816 FAST_WRITE2_IO();
817 #else
818 while (i--)
819 write2_io(*sp++, IO_FIFO);
821 #endif
826 /* We need to use spin_lock_irqsave() & spin_unlock_irqrestore() in this
827 * function in order to work in an SMP environment. (I'd be surprised
828 * if the driver is ever used by anyone on a real multi-CPU motherboard,
829 * but it _does_ need to be able to compile and run in an SMP kernel.)
832 static irqreturn_t in2000_intr(int irqnum, void *dev_id)
834 struct Scsi_Host *instance = dev_id;
835 struct IN2000_hostdata *hostdata;
836 Scsi_Cmnd *patch, *cmd;
837 uchar asr, sr, phs, id, lun, *ucp, msg;
838 int i, j;
839 unsigned long length;
840 unsigned short *sp;
841 unsigned short f;
842 unsigned long flags;
844 hostdata = (struct IN2000_hostdata *) instance->hostdata;
846 /* Get the spin_lock and disable further ints, for SMP */
848 spin_lock_irqsave(instance->host_lock, flags);
850 #ifdef PROC_STATISTICS
851 hostdata->int_cnt++;
852 #endif
854 /* The IN2000 card has 2 interrupt sources OR'ed onto its IRQ line - the
855 * WD3393 chip and the 2k fifo (which is actually a dual-port RAM combined
856 * with a big logic array, so it's a little different than what you might
857 * expect). As far as I know, there's no reason that BOTH can't be active
858 * at the same time, but there's a problem: while we can read the 3393
859 * to tell if _it_ wants an interrupt, I don't know of a way to ask the
860 * fifo the same question. The best we can do is check the 3393 and if
861 * it _isn't_ the source of the interrupt, then we can be pretty sure
862 * that the fifo is the culprit.
863 * UPDATE: I have it on good authority (Bill Earnest) that bit 0 of the
864 * IO_FIFO_COUNT register mirrors the fifo interrupt state. I
865 * assume that bit clear means interrupt active. As it turns
866 * out, the driver really doesn't need to check for this after
867 * all, so my remarks above about a 'problem' can safely be
868 * ignored. The way the logic is set up, there's no advantage
869 * (that I can see) to worrying about it.
871 * It seems that the fifo interrupt signal is negated when we extract
872 * bytes during read or write bytes during write.
873 * - fifo will interrupt when data is moving from it to the 3393, and
874 * there are 31 (or less?) bytes left to go. This is sort of short-
875 * sighted: what if you don't WANT to do more? In any case, our
876 * response is to push more into the fifo - either actual data or
877 * dummy bytes if need be. Note that we apparently have to write at
878 * least 32 additional bytes to the fifo after an interrupt in order
879 * to get it to release the ones it was holding on to - writing fewer
880 * than 32 will result in another fifo int.
881 * UPDATE: Again, info from Bill Earnest makes this more understandable:
882 * 32 bytes = two counts of the fifo counter register. He tells
883 * me that the fifo interrupt is a non-latching signal derived
884 * from a straightforward boolean interpretation of the 7
885 * highest bits of the fifo counter and the fifo-read/fifo-write
886 * state. Who'd a thought?
889 write1_io(0, IO_LED_ON);
890 asr = READ_AUX_STAT();
891 if (!(asr & ASR_INT)) { /* no WD33c93 interrupt? */
893 /* Ok. This is definitely a FIFO-only interrupt.
895 * If FI_FIFO_READING is set, there are up to 2048 bytes waiting to be read,
896 * maybe more to come from the SCSI bus. Read as many as we can out of the
897 * fifo and into memory at the location of SCp.ptr[SCp.have_data_in], and
898 * update have_data_in afterwards.
900 * If we have FI_FIFO_WRITING, the FIFO has almost run out of bytes to move
901 * into the WD3393 chip (I think the interrupt happens when there are 31
902 * bytes left, but it may be fewer...). The 3393 is still waiting, so we
903 * shove some more into the fifo, which gets things moving again. If the
904 * original SCSI command specified more than 2048 bytes, there may still
905 * be some of that data left: fine - use it (from SCp.ptr[SCp.have_data_in]).
906 * Don't forget to update have_data_in. If we've already written out the
907 * entire buffer, feed 32 dummy bytes to the fifo - they're needed to
908 * push out the remaining real data.
909 * (Big thanks to Bill Earnest for getting me out of the mud in here.)
912 cmd = (Scsi_Cmnd *) hostdata->connected; /* assume we're connected */
913 CHECK_NULL(cmd, "fifo_int")
915 if (hostdata->fifo == FI_FIFO_READING) {
917 DB(DB_FIFO, printk("{R:%02x} ", read1_io(IO_FIFO_COUNT)))
919 sp = (unsigned short *) (cmd->SCp.ptr + cmd->SCp.have_data_in);
920 i = read1_io(IO_FIFO_COUNT) & 0xfe;
921 i <<= 2; /* # of words waiting in the fifo */
922 f = hostdata->io_base + IO_FIFO;
924 #ifdef FAST_READ_IO
926 FAST_READ2_IO();
927 #else
928 while (i--)
929 *sp++ = read2_io(IO_FIFO);
931 #endif
933 i = sp - (unsigned short *) (cmd->SCp.ptr + cmd->SCp.have_data_in);
934 i <<= 1;
935 cmd->SCp.have_data_in += i;
938 else if (hostdata->fifo == FI_FIFO_WRITING) {
940 DB(DB_FIFO, printk("{W:%02x} ", read1_io(IO_FIFO_COUNT)))
942 /* If all bytes have been written to the fifo, flush out the stragglers.
943 * Note that while writing 16 dummy words seems arbitrary, we don't
944 * have another choice that I can see. What we really want is to read
945 * the 3393 transfer count register (that would tell us how many bytes
946 * needed flushing), but the TRANSFER_INFO command hasn't completed
947 * yet (not enough bytes!) and that register won't be accessible. So,
948 * we use 16 words - a number obtained through trial and error.
949 * UPDATE: Bill says this is exactly what Always does, so there.
950 * More thanks due him for help in this section.
952 if (cmd->SCp.this_residual == cmd->SCp.have_data_in) {
953 i = 16;
954 while (i--) /* write 32 dummy bytes */
955 write2_io(0, IO_FIFO);
958 /* If there are still bytes left in the SCSI buffer, write as many as we
959 * can out to the fifo.
962 else {
963 sp = (unsigned short *) (cmd->SCp.ptr + cmd->SCp.have_data_in);
964 i = cmd->SCp.this_residual - cmd->SCp.have_data_in; /* bytes yet to go */
965 j = read1_io(IO_FIFO_COUNT) & 0xfe;
966 j <<= 2; /* how many words the fifo has room for */
967 if ((j << 1) > i)
968 j = (i >> 1);
969 while (j--)
970 write2_io(*sp++, IO_FIFO);
972 i = sp - (unsigned short *) (cmd->SCp.ptr + cmd->SCp.have_data_in);
973 i <<= 1;
974 cmd->SCp.have_data_in += i;
978 else {
979 printk("*** Spurious FIFO interrupt ***");
982 write1_io(0, IO_LED_OFF);
984 /* release the SMP spin_lock and restore irq state */
985 spin_unlock_irqrestore(instance->host_lock, flags);
986 return IRQ_HANDLED;
989 /* This interrupt was triggered by the WD33c93 chip. The fifo interrupt
990 * may also be asserted, but we don't bother to check it: we get more
991 * detailed info from FIFO_READING and FIFO_WRITING (see below).
994 cmd = (Scsi_Cmnd *) hostdata->connected; /* assume we're connected */
995 sr = read_3393(hostdata, WD_SCSI_STATUS); /* clear the interrupt */
996 phs = read_3393(hostdata, WD_COMMAND_PHASE);
998 if (!cmd && (sr != CSR_RESEL_AM && sr != CSR_TIMEOUT && sr != CSR_SELECT)) {
999 printk("\nNR:wd-intr-1\n");
1000 write1_io(0, IO_LED_OFF);
1002 /* release the SMP spin_lock and restore irq state */
1003 spin_unlock_irqrestore(instance->host_lock, flags);
1004 return IRQ_HANDLED;
1007 DB(DB_INTR, printk("{%02x:%02x-", asr, sr))
1009 /* After starting a FIFO-based transfer, the next _WD3393_ interrupt is
1010 * guaranteed to be in response to the completion of the transfer.
1011 * If we were reading, there's probably data in the fifo that needs
1012 * to be copied into RAM - do that here. Also, we have to update
1013 * 'this_residual' and 'ptr' based on the contents of the
1014 * TRANSFER_COUNT register, in case the device decided to do an
1015 * intermediate disconnect (a device may do this if it has to
1016 * do a seek, or just to be nice and let other devices have
1017 * some bus time during long transfers).
1018 * After doing whatever is necessary with the fifo, we go on and
1019 * service the WD3393 interrupt normally.
1021 if (hostdata->fifo == FI_FIFO_READING) {
1023 /* buffer index = start-of-buffer + #-of-bytes-already-read */
1025 sp = (unsigned short *) (cmd->SCp.ptr + cmd->SCp.have_data_in);
1027 /* bytes remaining in fifo = (total-wanted - #-not-got) - #-already-read */
1029 i = (cmd->SCp.this_residual - read_3393_count(hostdata)) - cmd->SCp.have_data_in;
1030 i >>= 1; /* Gulp. We assume this will always be modulo 2 */
1031 f = hostdata->io_base + IO_FIFO;
1033 #ifdef FAST_READ_IO
1035 FAST_READ2_IO();
1036 #else
1037 while (i--)
1038 *sp++ = read2_io(IO_FIFO);
1040 #endif
1042 hostdata->fifo = FI_FIFO_UNUSED;
1043 length = cmd->SCp.this_residual;
1044 cmd->SCp.this_residual = read_3393_count(hostdata);
1045 cmd->SCp.ptr += (length - cmd->SCp.this_residual);
1047 DB(DB_TRANSFER, printk("(%p,%d)", cmd->SCp.ptr, cmd->SCp.this_residual))
1051 else if (hostdata->fifo == FI_FIFO_WRITING) {
1052 hostdata->fifo = FI_FIFO_UNUSED;
1053 length = cmd->SCp.this_residual;
1054 cmd->SCp.this_residual = read_3393_count(hostdata);
1055 cmd->SCp.ptr += (length - cmd->SCp.this_residual);
1057 DB(DB_TRANSFER, printk("(%p,%d)", cmd->SCp.ptr, cmd->SCp.this_residual))
1061 /* Respond to the specific WD3393 interrupt - there are quite a few! */
1063 switch (sr) {
1065 case CSR_TIMEOUT:
1066 DB(DB_INTR, printk("TIMEOUT"))
1068 if (hostdata->state == S_RUNNING_LEVEL2)
1069 hostdata->connected = NULL;
1070 else {
1071 cmd = (Scsi_Cmnd *) hostdata->selecting; /* get a valid cmd */
1072 CHECK_NULL(cmd, "csr_timeout")
1073 hostdata->selecting = NULL;
1076 cmd->result = DID_NO_CONNECT << 16;
1077 hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
1078 hostdata->state = S_UNCONNECTED;
1079 cmd->scsi_done(cmd);
1081 /* We are not connected to a target - check to see if there
1082 * are commands waiting to be executed.
1085 in2000_execute(instance);
1086 break;
1089 /* Note: this interrupt should not occur in a LEVEL2 command */
1091 case CSR_SELECT:
1092 DB(DB_INTR, printk("SELECT"))
1093 hostdata->connected = cmd = (Scsi_Cmnd *) hostdata->selecting;
1094 CHECK_NULL(cmd, "csr_select")
1095 hostdata->selecting = NULL;
1097 /* construct an IDENTIFY message with correct disconnect bit */
1099 hostdata->outgoing_msg[0] = (0x80 | 0x00 | cmd->device->lun);
1100 if (cmd->SCp.phase)
1101 hostdata->outgoing_msg[0] |= 0x40;
1103 if (hostdata->sync_stat[cmd->device->id] == SS_FIRST) {
1104 #ifdef SYNC_DEBUG
1105 printk(" sending SDTR ");
1106 #endif
1108 hostdata->sync_stat[cmd->device->id] = SS_WAITING;
1110 /* tack on a 2nd message to ask about synchronous transfers */
1112 hostdata->outgoing_msg[1] = EXTENDED_MESSAGE;
1113 hostdata->outgoing_msg[2] = 3;
1114 hostdata->outgoing_msg[3] = EXTENDED_SDTR;
1115 hostdata->outgoing_msg[4] = OPTIMUM_SX_PER / 4;
1116 hostdata->outgoing_msg[5] = OPTIMUM_SX_OFF;
1117 hostdata->outgoing_len = 6;
1118 } else
1119 hostdata->outgoing_len = 1;
1121 hostdata->state = S_CONNECTED;
1122 break;
1125 case CSR_XFER_DONE | PHS_DATA_IN:
1126 case CSR_UNEXP | PHS_DATA_IN:
1127 case CSR_SRV_REQ | PHS_DATA_IN:
1128 DB(DB_INTR, printk("IN-%d.%d", cmd->SCp.this_residual, cmd->SCp.buffers_residual))
1129 transfer_bytes(cmd, DATA_IN_DIR);
1130 if (hostdata->state != S_RUNNING_LEVEL2)
1131 hostdata->state = S_CONNECTED;
1132 break;
1135 case CSR_XFER_DONE | PHS_DATA_OUT:
1136 case CSR_UNEXP | PHS_DATA_OUT:
1137 case CSR_SRV_REQ | PHS_DATA_OUT:
1138 DB(DB_INTR, printk("OUT-%d.%d", cmd->SCp.this_residual, cmd->SCp.buffers_residual))
1139 transfer_bytes(cmd, DATA_OUT_DIR);
1140 if (hostdata->state != S_RUNNING_LEVEL2)
1141 hostdata->state = S_CONNECTED;
1142 break;
1145 /* Note: this interrupt should not occur in a LEVEL2 command */
1147 case CSR_XFER_DONE | PHS_COMMAND:
1148 case CSR_UNEXP | PHS_COMMAND:
1149 case CSR_SRV_REQ | PHS_COMMAND:
1150 DB(DB_INTR, printk("CMND-%02x,%ld", cmd->cmnd[0], cmd->serial_number))
1151 transfer_pio(cmd->cmnd, cmd->cmd_len, DATA_OUT_DIR, hostdata);
1152 hostdata->state = S_CONNECTED;
1153 break;
1156 case CSR_XFER_DONE | PHS_STATUS:
1157 case CSR_UNEXP | PHS_STATUS:
1158 case CSR_SRV_REQ | PHS_STATUS:
1159 DB(DB_INTR, printk("STATUS="))
1161 cmd->SCp.Status = read_1_byte(hostdata);
1162 DB(DB_INTR, printk("%02x", cmd->SCp.Status))
1163 if (hostdata->level2 >= L2_BASIC) {
1164 sr = read_3393(hostdata, WD_SCSI_STATUS); /* clear interrupt */
1165 hostdata->state = S_RUNNING_LEVEL2;
1166 write_3393(hostdata, WD_COMMAND_PHASE, 0x50);
1167 write_3393_cmd(hostdata, WD_CMD_SEL_ATN_XFER);
1168 } else {
1169 hostdata->state = S_CONNECTED;
1171 break;
1174 case CSR_XFER_DONE | PHS_MESS_IN:
1175 case CSR_UNEXP | PHS_MESS_IN:
1176 case CSR_SRV_REQ | PHS_MESS_IN:
1177 DB(DB_INTR, printk("MSG_IN="))
1179 msg = read_1_byte(hostdata);
1180 sr = read_3393(hostdata, WD_SCSI_STATUS); /* clear interrupt */
1182 hostdata->incoming_msg[hostdata->incoming_ptr] = msg;
1183 if (hostdata->incoming_msg[0] == EXTENDED_MESSAGE)
1184 msg = EXTENDED_MESSAGE;
1185 else
1186 hostdata->incoming_ptr = 0;
1188 cmd->SCp.Message = msg;
1189 switch (msg) {
1191 case COMMAND_COMPLETE:
1192 DB(DB_INTR, printk("CCMP-%ld", cmd->serial_number))
1193 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1194 hostdata->state = S_PRE_CMP_DISC;
1195 break;
1197 case SAVE_POINTERS:
1198 DB(DB_INTR, printk("SDP"))
1199 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1200 hostdata->state = S_CONNECTED;
1201 break;
1203 case RESTORE_POINTERS:
1204 DB(DB_INTR, printk("RDP"))
1205 if (hostdata->level2 >= L2_BASIC) {
1206 write_3393(hostdata, WD_COMMAND_PHASE, 0x45);
1207 write_3393_cmd(hostdata, WD_CMD_SEL_ATN_XFER);
1208 hostdata->state = S_RUNNING_LEVEL2;
1209 } else {
1210 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1211 hostdata->state = S_CONNECTED;
1213 break;
1215 case DISCONNECT:
1216 DB(DB_INTR, printk("DIS"))
1217 cmd->device->disconnect = 1;
1218 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1219 hostdata->state = S_PRE_TMP_DISC;
1220 break;
1222 case MESSAGE_REJECT:
1223 DB(DB_INTR, printk("REJ"))
1224 #ifdef SYNC_DEBUG
1225 printk("-REJ-");
1226 #endif
1227 if (hostdata->sync_stat[cmd->device->id] == SS_WAITING)
1228 hostdata->sync_stat[cmd->device->id] = SS_SET;
1229 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1230 hostdata->state = S_CONNECTED;
1231 break;
1233 case EXTENDED_MESSAGE:
1234 DB(DB_INTR, printk("EXT"))
1236 ucp = hostdata->incoming_msg;
1238 #ifdef SYNC_DEBUG
1239 printk("%02x", ucp[hostdata->incoming_ptr]);
1240 #endif
1241 /* Is this the last byte of the extended message? */
1243 if ((hostdata->incoming_ptr >= 2) && (hostdata->incoming_ptr == (ucp[1] + 1))) {
1245 switch (ucp[2]) { /* what's the EXTENDED code? */
1246 case EXTENDED_SDTR:
1247 id = calc_sync_xfer(ucp[3], ucp[4]);
1248 if (hostdata->sync_stat[cmd->device->id] != SS_WAITING) {
1250 /* A device has sent an unsolicited SDTR message; rather than go
1251 * through the effort of decoding it and then figuring out what
1252 * our reply should be, we're just gonna say that we have a
1253 * synchronous fifo depth of 0. This will result in asynchronous
1254 * transfers - not ideal but so much easier.
1255 * Actually, this is OK because it assures us that if we don't
1256 * specifically ask for sync transfers, we won't do any.
1259 write_3393_cmd(hostdata, WD_CMD_ASSERT_ATN); /* want MESS_OUT */
1260 hostdata->outgoing_msg[0] = EXTENDED_MESSAGE;
1261 hostdata->outgoing_msg[1] = 3;
1262 hostdata->outgoing_msg[2] = EXTENDED_SDTR;
1263 hostdata->outgoing_msg[3] = hostdata->default_sx_per / 4;
1264 hostdata->outgoing_msg[4] = 0;
1265 hostdata->outgoing_len = 5;
1266 hostdata->sync_xfer[cmd->device->id] = calc_sync_xfer(hostdata->default_sx_per / 4, 0);
1267 } else {
1268 hostdata->sync_xfer[cmd->device->id] = id;
1270 #ifdef SYNC_DEBUG
1271 printk("sync_xfer=%02x", hostdata->sync_xfer[cmd->device->id]);
1272 #endif
1273 hostdata->sync_stat[cmd->device->id] = SS_SET;
1274 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1275 hostdata->state = S_CONNECTED;
1276 break;
1277 case EXTENDED_WDTR:
1278 write_3393_cmd(hostdata, WD_CMD_ASSERT_ATN); /* want MESS_OUT */
1279 printk("sending WDTR ");
1280 hostdata->outgoing_msg[0] = EXTENDED_MESSAGE;
1281 hostdata->outgoing_msg[1] = 2;
1282 hostdata->outgoing_msg[2] = EXTENDED_WDTR;
1283 hostdata->outgoing_msg[3] = 0; /* 8 bit transfer width */
1284 hostdata->outgoing_len = 4;
1285 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1286 hostdata->state = S_CONNECTED;
1287 break;
1288 default:
1289 write_3393_cmd(hostdata, WD_CMD_ASSERT_ATN); /* want MESS_OUT */
1290 printk("Rejecting Unknown Extended Message(%02x). ", ucp[2]);
1291 hostdata->outgoing_msg[0] = MESSAGE_REJECT;
1292 hostdata->outgoing_len = 1;
1293 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1294 hostdata->state = S_CONNECTED;
1295 break;
1297 hostdata->incoming_ptr = 0;
1300 /* We need to read more MESS_IN bytes for the extended message */
1302 else {
1303 hostdata->incoming_ptr++;
1304 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1305 hostdata->state = S_CONNECTED;
1307 break;
1309 default:
1310 printk("Rejecting Unknown Message(%02x) ", msg);
1311 write_3393_cmd(hostdata, WD_CMD_ASSERT_ATN); /* want MESS_OUT */
1312 hostdata->outgoing_msg[0] = MESSAGE_REJECT;
1313 hostdata->outgoing_len = 1;
1314 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1315 hostdata->state = S_CONNECTED;
1317 break;
1320 /* Note: this interrupt will occur only after a LEVEL2 command */
1322 case CSR_SEL_XFER_DONE:
1324 /* Make sure that reselection is enabled at this point - it may
1325 * have been turned off for the command that just completed.
1328 write_3393(hostdata, WD_SOURCE_ID, SRCID_ER);
1329 if (phs == 0x60) {
1330 DB(DB_INTR, printk("SX-DONE-%ld", cmd->serial_number))
1331 cmd->SCp.Message = COMMAND_COMPLETE;
1332 lun = read_3393(hostdata, WD_TARGET_LUN);
1333 DB(DB_INTR, printk(":%d.%d", cmd->SCp.Status, lun))
1334 hostdata->connected = NULL;
1335 hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
1336 hostdata->state = S_UNCONNECTED;
1337 if (cmd->SCp.Status == ILLEGAL_STATUS_BYTE)
1338 cmd->SCp.Status = lun;
1339 if (cmd->cmnd[0] == REQUEST_SENSE && cmd->SCp.Status != GOOD)
1340 cmd->result = (cmd->result & 0x00ffff) | (DID_ERROR << 16);
1341 else
1342 cmd->result = cmd->SCp.Status | (cmd->SCp.Message << 8);
1343 cmd->scsi_done(cmd);
1345 /* We are no longer connected to a target - check to see if
1346 * there are commands waiting to be executed.
1349 in2000_execute(instance);
1350 } else {
1351 printk("%02x:%02x:%02x-%ld: Unknown SEL_XFER_DONE phase!!---", asr, sr, phs, cmd->serial_number);
1353 break;
1356 /* Note: this interrupt will occur only after a LEVEL2 command */
1358 case CSR_SDP:
1359 DB(DB_INTR, printk("SDP"))
1360 hostdata->state = S_RUNNING_LEVEL2;
1361 write_3393(hostdata, WD_COMMAND_PHASE, 0x41);
1362 write_3393_cmd(hostdata, WD_CMD_SEL_ATN_XFER);
1363 break;
1366 case CSR_XFER_DONE | PHS_MESS_OUT:
1367 case CSR_UNEXP | PHS_MESS_OUT:
1368 case CSR_SRV_REQ | PHS_MESS_OUT:
1369 DB(DB_INTR, printk("MSG_OUT="))
1371 /* To get here, we've probably requested MESSAGE_OUT and have
1372 * already put the correct bytes in outgoing_msg[] and filled
1373 * in outgoing_len. We simply send them out to the SCSI bus.
1374 * Sometimes we get MESSAGE_OUT phase when we're not expecting
1375 * it - like when our SDTR message is rejected by a target. Some
1376 * targets send the REJECT before receiving all of the extended
1377 * message, and then seem to go back to MESSAGE_OUT for a byte
1378 * or two. Not sure why, or if I'm doing something wrong to
1379 * cause this to happen. Regardless, it seems that sending
1380 * NOP messages in these situations results in no harm and
1381 * makes everyone happy.
1383 if (hostdata->outgoing_len == 0) {
1384 hostdata->outgoing_len = 1;
1385 hostdata->outgoing_msg[0] = NOP;
1387 transfer_pio(hostdata->outgoing_msg, hostdata->outgoing_len, DATA_OUT_DIR, hostdata);
1388 DB(DB_INTR, printk("%02x", hostdata->outgoing_msg[0]))
1389 hostdata->outgoing_len = 0;
1390 hostdata->state = S_CONNECTED;
1391 break;
1394 case CSR_UNEXP_DISC:
1396 /* I think I've seen this after a request-sense that was in response
1397 * to an error condition, but not sure. We certainly need to do
1398 * something when we get this interrupt - the question is 'what?'.
1399 * Let's think positively, and assume some command has finished
1400 * in a legal manner (like a command that provokes a request-sense),
1401 * so we treat it as a normal command-complete-disconnect.
1405 /* Make sure that reselection is enabled at this point - it may
1406 * have been turned off for the command that just completed.
1409 write_3393(hostdata, WD_SOURCE_ID, SRCID_ER);
1410 if (cmd == NULL) {
1411 printk(" - Already disconnected! ");
1412 hostdata->state = S_UNCONNECTED;
1414 /* release the SMP spin_lock and restore irq state */
1415 spin_unlock_irqrestore(instance->host_lock, flags);
1416 return IRQ_HANDLED;
1418 DB(DB_INTR, printk("UNEXP_DISC-%ld", cmd->serial_number))
1419 hostdata->connected = NULL;
1420 hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
1421 hostdata->state = S_UNCONNECTED;
1422 if (cmd->cmnd[0] == REQUEST_SENSE && cmd->SCp.Status != GOOD)
1423 cmd->result = (cmd->result & 0x00ffff) | (DID_ERROR << 16);
1424 else
1425 cmd->result = cmd->SCp.Status | (cmd->SCp.Message << 8);
1426 cmd->scsi_done(cmd);
1428 /* We are no longer connected to a target - check to see if
1429 * there are commands waiting to be executed.
1432 in2000_execute(instance);
1433 break;
1436 case CSR_DISC:
1438 /* Make sure that reselection is enabled at this point - it may
1439 * have been turned off for the command that just completed.
1442 write_3393(hostdata, WD_SOURCE_ID, SRCID_ER);
1443 DB(DB_INTR, printk("DISC-%ld", cmd->serial_number))
1444 if (cmd == NULL) {
1445 printk(" - Already disconnected! ");
1446 hostdata->state = S_UNCONNECTED;
1448 switch (hostdata->state) {
1449 case S_PRE_CMP_DISC:
1450 hostdata->connected = NULL;
1451 hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
1452 hostdata->state = S_UNCONNECTED;
1453 DB(DB_INTR, printk(":%d", cmd->SCp.Status))
1454 if (cmd->cmnd[0] == REQUEST_SENSE && cmd->SCp.Status != GOOD)
1455 cmd->result = (cmd->result & 0x00ffff) | (DID_ERROR << 16);
1456 else
1457 cmd->result = cmd->SCp.Status | (cmd->SCp.Message << 8);
1458 cmd->scsi_done(cmd);
1459 break;
1460 case S_PRE_TMP_DISC:
1461 case S_RUNNING_LEVEL2:
1462 cmd->host_scribble = (uchar *) hostdata->disconnected_Q;
1463 hostdata->disconnected_Q = cmd;
1464 hostdata->connected = NULL;
1465 hostdata->state = S_UNCONNECTED;
1467 #ifdef PROC_STATISTICS
1468 hostdata->disc_done_cnt[cmd->device->id]++;
1469 #endif
1471 break;
1472 default:
1473 printk("*** Unexpected DISCONNECT interrupt! ***");
1474 hostdata->state = S_UNCONNECTED;
1477 /* We are no longer connected to a target - check to see if
1478 * there are commands waiting to be executed.
1481 in2000_execute(instance);
1482 break;
1485 case CSR_RESEL_AM:
1486 DB(DB_INTR, printk("RESEL"))
1488 /* First we have to make sure this reselection didn't */
1489 /* happen during Arbitration/Selection of some other device. */
1490 /* If yes, put losing command back on top of input_Q. */
1491 if (hostdata->level2 <= L2_NONE) {
1493 if (hostdata->selecting) {
1494 cmd = (Scsi_Cmnd *) hostdata->selecting;
1495 hostdata->selecting = NULL;
1496 hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
1497 cmd->host_scribble = (uchar *) hostdata->input_Q;
1498 hostdata->input_Q = cmd;
1502 else {
1504 if (cmd) {
1505 if (phs == 0x00) {
1506 hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
1507 cmd->host_scribble = (uchar *) hostdata->input_Q;
1508 hostdata->input_Q = cmd;
1509 } else {
1510 printk("---%02x:%02x:%02x-TROUBLE: Intrusive ReSelect!---", asr, sr, phs);
1511 while (1)
1512 printk("\r");
1518 /* OK - find out which device reselected us. */
1520 id = read_3393(hostdata, WD_SOURCE_ID);
1521 id &= SRCID_MASK;
1523 /* and extract the lun from the ID message. (Note that we don't
1524 * bother to check for a valid message here - I guess this is
1525 * not the right way to go, but....)
1528 lun = read_3393(hostdata, WD_DATA);
1529 if (hostdata->level2 < L2_RESELECT)
1530 write_3393_cmd(hostdata, WD_CMD_NEGATE_ACK);
1531 lun &= 7;
1533 /* Now we look for the command that's reconnecting. */
1535 cmd = (Scsi_Cmnd *) hostdata->disconnected_Q;
1536 patch = NULL;
1537 while (cmd) {
1538 if (id == cmd->device->id && lun == cmd->device->lun)
1539 break;
1540 patch = cmd;
1541 cmd = (Scsi_Cmnd *) cmd->host_scribble;
1544 /* Hmm. Couldn't find a valid command.... What to do? */
1546 if (!cmd) {
1547 printk("---TROUBLE: target %d.%d not in disconnect queue---", id, lun);
1548 break;
1551 /* Ok, found the command - now start it up again. */
1553 if (patch)
1554 patch->host_scribble = cmd->host_scribble;
1555 else
1556 hostdata->disconnected_Q = (Scsi_Cmnd *) cmd->host_scribble;
1557 hostdata->connected = cmd;
1559 /* We don't need to worry about 'initialize_SCp()' or 'hostdata->busy[]'
1560 * because these things are preserved over a disconnect.
1561 * But we DO need to fix the DPD bit so it's correct for this command.
1564 if (is_dir_out(cmd))
1565 write_3393(hostdata, WD_DESTINATION_ID, cmd->device->id);
1566 else
1567 write_3393(hostdata, WD_DESTINATION_ID, cmd->device->id | DSTID_DPD);
1568 if (hostdata->level2 >= L2_RESELECT) {
1569 write_3393_count(hostdata, 0); /* we want a DATA_PHASE interrupt */
1570 write_3393(hostdata, WD_COMMAND_PHASE, 0x45);
1571 write_3393_cmd(hostdata, WD_CMD_SEL_ATN_XFER);
1572 hostdata->state = S_RUNNING_LEVEL2;
1573 } else
1574 hostdata->state = S_CONNECTED;
1576 DB(DB_INTR, printk("-%ld", cmd->serial_number))
1577 break;
1579 default:
1580 printk("--UNKNOWN INTERRUPT:%02x:%02x:%02x--", asr, sr, phs);
1583 write1_io(0, IO_LED_OFF);
1585 DB(DB_INTR, printk("} "))
1587 /* release the SMP spin_lock and restore irq state */
1588 spin_unlock_irqrestore(instance->host_lock, flags);
1589 return IRQ_HANDLED;
1594 #define RESET_CARD 0
1595 #define RESET_CARD_AND_BUS 1
1596 #define B_FLAG 0x80
1599 * Caller must hold instance lock!
1602 static int reset_hardware(struct Scsi_Host *instance, int type)
1604 struct IN2000_hostdata *hostdata;
1605 int qt, x;
1607 hostdata = (struct IN2000_hostdata *) instance->hostdata;
1609 write1_io(0, IO_LED_ON);
1610 if (type == RESET_CARD_AND_BUS) {
1611 write1_io(0, IO_CARD_RESET);
1612 x = read1_io(IO_HARDWARE);
1614 x = read_3393(hostdata, WD_SCSI_STATUS); /* clear any WD intrpt */
1615 write_3393(hostdata, WD_OWN_ID, instance->this_id | OWNID_EAF | OWNID_RAF | OWNID_FS_8);
1616 write_3393(hostdata, WD_CONTROL, CTRL_IDI | CTRL_EDI | CTRL_POLLED);
1617 write_3393(hostdata, WD_SYNCHRONOUS_TRANSFER, calc_sync_xfer(hostdata->default_sx_per / 4, DEFAULT_SX_OFF));
1619 write1_io(0, IO_FIFO_WRITE); /* clear fifo counter */
1620 write1_io(0, IO_FIFO_READ); /* start fifo out in read mode */
1621 write_3393(hostdata, WD_COMMAND, WD_CMD_RESET);
1622 /* FIXME: timeout ?? */
1623 while (!(READ_AUX_STAT() & ASR_INT))
1624 cpu_relax(); /* wait for RESET to complete */
1626 x = read_3393(hostdata, WD_SCSI_STATUS); /* clear interrupt */
1628 write_3393(hostdata, WD_QUEUE_TAG, 0xa5); /* any random number */
1629 qt = read_3393(hostdata, WD_QUEUE_TAG);
1630 if (qt == 0xa5) {
1631 x |= B_FLAG;
1632 write_3393(hostdata, WD_QUEUE_TAG, 0);
1634 write_3393(hostdata, WD_TIMEOUT_PERIOD, TIMEOUT_PERIOD_VALUE);
1635 write_3393(hostdata, WD_CONTROL, CTRL_IDI | CTRL_EDI | CTRL_POLLED);
1636 write1_io(0, IO_LED_OFF);
1637 return x;
1642 static int in2000_bus_reset(Scsi_Cmnd * cmd)
1644 struct Scsi_Host *instance;
1645 struct IN2000_hostdata *hostdata;
1646 int x;
1647 unsigned long flags;
1649 instance = cmd->device->host;
1650 hostdata = (struct IN2000_hostdata *) instance->hostdata;
1652 printk(KERN_WARNING "scsi%d: Reset. ", instance->host_no);
1654 spin_lock_irqsave(instance->host_lock, flags);
1656 /* do scsi-reset here */
1657 reset_hardware(instance, RESET_CARD_AND_BUS);
1658 for (x = 0; x < 8; x++) {
1659 hostdata->busy[x] = 0;
1660 hostdata->sync_xfer[x] = calc_sync_xfer(DEFAULT_SX_PER / 4, DEFAULT_SX_OFF);
1661 hostdata->sync_stat[x] = SS_UNSET; /* using default sync values */
1663 hostdata->input_Q = NULL;
1664 hostdata->selecting = NULL;
1665 hostdata->connected = NULL;
1666 hostdata->disconnected_Q = NULL;
1667 hostdata->state = S_UNCONNECTED;
1668 hostdata->fifo = FI_FIFO_UNUSED;
1669 hostdata->incoming_ptr = 0;
1670 hostdata->outgoing_len = 0;
1672 cmd->result = DID_RESET << 16;
1674 spin_unlock_irqrestore(instance->host_lock, flags);
1675 return SUCCESS;
1678 static int __in2000_abort(Scsi_Cmnd * cmd)
1680 struct Scsi_Host *instance;
1681 struct IN2000_hostdata *hostdata;
1682 Scsi_Cmnd *tmp, *prev;
1683 uchar sr, asr;
1684 unsigned long timeout;
1686 instance = cmd->device->host;
1687 hostdata = (struct IN2000_hostdata *) instance->hostdata;
1689 printk(KERN_DEBUG "scsi%d: Abort-", instance->host_no);
1690 printk("(asr=%02x,count=%ld,resid=%d,buf_resid=%d,have_data=%d,FC=%02x)- ", READ_AUX_STAT(), read_3393_count(hostdata), cmd->SCp.this_residual, cmd->SCp.buffers_residual, cmd->SCp.have_data_in, read1_io(IO_FIFO_COUNT));
1693 * Case 1 : If the command hasn't been issued yet, we simply remove it
1694 * from the inout_Q.
1697 tmp = (Scsi_Cmnd *) hostdata->input_Q;
1698 prev = NULL;
1699 while (tmp) {
1700 if (tmp == cmd) {
1701 if (prev)
1702 prev->host_scribble = cmd->host_scribble;
1703 cmd->host_scribble = NULL;
1704 cmd->result = DID_ABORT << 16;
1705 printk(KERN_WARNING "scsi%d: Abort - removing command %ld from input_Q. ", instance->host_no, cmd->serial_number);
1706 cmd->scsi_done(cmd);
1707 return SUCCESS;
1709 prev = tmp;
1710 tmp = (Scsi_Cmnd *) tmp->host_scribble;
1714 * Case 2 : If the command is connected, we're going to fail the abort
1715 * and let the high level SCSI driver retry at a later time or
1716 * issue a reset.
1718 * Timeouts, and therefore aborted commands, will be highly unlikely
1719 * and handling them cleanly in this situation would make the common
1720 * case of noresets less efficient, and would pollute our code. So,
1721 * we fail.
1724 if (hostdata->connected == cmd) {
1726 printk(KERN_WARNING "scsi%d: Aborting connected command %ld - ", instance->host_no, cmd->serial_number);
1728 printk("sending wd33c93 ABORT command - ");
1729 write_3393(hostdata, WD_CONTROL, CTRL_IDI | CTRL_EDI | CTRL_POLLED);
1730 write_3393_cmd(hostdata, WD_CMD_ABORT);
1732 /* Now we have to attempt to flush out the FIFO... */
1734 printk("flushing fifo - ");
1735 timeout = 1000000;
1736 do {
1737 asr = READ_AUX_STAT();
1738 if (asr & ASR_DBR)
1739 read_3393(hostdata, WD_DATA);
1740 } while (!(asr & ASR_INT) && timeout-- > 0);
1741 sr = read_3393(hostdata, WD_SCSI_STATUS);
1742 printk("asr=%02x, sr=%02x, %ld bytes un-transferred (timeout=%ld) - ", asr, sr, read_3393_count(hostdata), timeout);
1745 * Abort command processed.
1746 * Still connected.
1747 * We must disconnect.
1750 printk("sending wd33c93 DISCONNECT command - ");
1751 write_3393_cmd(hostdata, WD_CMD_DISCONNECT);
1753 timeout = 1000000;
1754 asr = READ_AUX_STAT();
1755 while ((asr & ASR_CIP) && timeout-- > 0)
1756 asr = READ_AUX_STAT();
1757 sr = read_3393(hostdata, WD_SCSI_STATUS);
1758 printk("asr=%02x, sr=%02x.", asr, sr);
1760 hostdata->busy[cmd->device->id] &= ~(1 << cmd->device->lun);
1761 hostdata->connected = NULL;
1762 hostdata->state = S_UNCONNECTED;
1763 cmd->result = DID_ABORT << 16;
1764 cmd->scsi_done(cmd);
1766 in2000_execute(instance);
1768 return SUCCESS;
1772 * Case 3: If the command is currently disconnected from the bus,
1773 * we're not going to expend much effort here: Let's just return
1774 * an ABORT_SNOOZE and hope for the best...
1777 for (tmp = (Scsi_Cmnd *) hostdata->disconnected_Q; tmp; tmp = (Scsi_Cmnd *) tmp->host_scribble)
1778 if (cmd == tmp) {
1779 printk(KERN_DEBUG "scsi%d: unable to abort disconnected command.\n", instance->host_no);
1780 return FAILED;
1784 * Case 4 : If we reached this point, the command was not found in any of
1785 * the queues.
1787 * We probably reached this point because of an unlikely race condition
1788 * between the command completing successfully and the abortion code,
1789 * so we won't panic, but we will notify the user in case something really
1790 * broke.
1793 in2000_execute(instance);
1795 printk("scsi%d: warning : SCSI command probably completed successfully" " before abortion. ", instance->host_no);
1796 return SUCCESS;
1799 static int in2000_abort(Scsi_Cmnd * cmd)
1801 int rc;
1803 spin_lock_irq(cmd->device->host->host_lock);
1804 rc = __in2000_abort(cmd);
1805 spin_unlock_irq(cmd->device->host->host_lock);
1807 return rc;
1811 #define MAX_IN2000_HOSTS 3
1812 #define MAX_SETUP_ARGS ARRAY_SIZE(setup_args)
1813 #define SETUP_BUFFER_SIZE 200
1814 static char setup_buffer[SETUP_BUFFER_SIZE];
1815 static char setup_used[MAX_SETUP_ARGS];
1816 static int done_setup = 0;
1818 static void __init in2000_setup(char *str, int *ints)
1820 int i;
1821 char *p1, *p2;
1823 strlcpy(setup_buffer, str, SETUP_BUFFER_SIZE);
1824 p1 = setup_buffer;
1825 i = 0;
1826 while (*p1 && (i < MAX_SETUP_ARGS)) {
1827 p2 = strchr(p1, ',');
1828 if (p2) {
1829 *p2 = '\0';
1830 if (p1 != p2)
1831 setup_args[i] = p1;
1832 p1 = p2 + 1;
1833 i++;
1834 } else {
1835 setup_args[i] = p1;
1836 break;
1839 for (i = 0; i < MAX_SETUP_ARGS; i++)
1840 setup_used[i] = 0;
1841 done_setup = 1;
1845 /* check_setup_args() returns index if key found, 0 if not
1848 static int __init check_setup_args(char *key, int *val, char *buf)
1850 int x;
1851 char *cp;
1853 for (x = 0; x < MAX_SETUP_ARGS; x++) {
1854 if (setup_used[x])
1855 continue;
1856 if (!strncmp(setup_args[x], key, strlen(key)))
1857 break;
1859 if (x == MAX_SETUP_ARGS)
1860 return 0;
1861 setup_used[x] = 1;
1862 cp = setup_args[x] + strlen(key);
1863 *val = -1;
1864 if (*cp != ':')
1865 return ++x;
1866 cp++;
1867 if ((*cp >= '0') && (*cp <= '9')) {
1868 *val = simple_strtoul(cp, NULL, 0);
1870 return ++x;
1875 /* The "correct" (ie portable) way to access memory-mapped hardware
1876 * such as the IN2000 EPROM and dip switch is through the use of
1877 * special macros declared in 'asm/io.h'. We use readb() and readl()
1878 * when reading from the card's BIOS area in in2000_detect().
1880 static u32 bios_tab[] in2000__INITDATA = {
1881 0xc8000,
1882 0xd0000,
1883 0xd8000,
1887 static unsigned short base_tab[] in2000__INITDATA = {
1888 0x220,
1889 0x200,
1890 0x110,
1891 0x100,
1894 static int int_tab[] in2000__INITDATA = {
1901 static int probe_bios(u32 addr, u32 *s1, uchar *switches)
1903 void __iomem *p = ioremap(addr, 0x34);
1904 if (!p)
1905 return 0;
1906 *s1 = readl(p + 0x10);
1907 if (*s1 == 0x41564f4e || readl(p + 0x30) == 0x61776c41) {
1908 /* Read the switch image that's mapped into EPROM space */
1909 *switches = ~readb(p + 0x20);
1910 iounmap(p);
1911 return 1;
1913 iounmap(p);
1914 return 0;
1917 static int __init in2000_detect(struct scsi_host_template * tpnt)
1919 struct Scsi_Host *instance;
1920 struct IN2000_hostdata *hostdata;
1921 int detect_count;
1922 int bios;
1923 int x;
1924 unsigned short base;
1925 uchar switches;
1926 uchar hrev;
1927 unsigned long flags;
1928 int val;
1929 char buf[32];
1931 /* Thanks to help from Bill Earnest, probing for IN2000 cards is a
1932 * pretty straightforward and fool-proof operation. There are 3
1933 * possible locations for the IN2000 EPROM in memory space - if we
1934 * find a BIOS signature, we can read the dip switch settings from
1935 * the byte at BIOS+32 (shadowed in by logic on the card). From 2
1936 * of the switch bits we get the card's address in IO space. There's
1937 * an image of the dip switch there, also, so we have a way to back-
1938 * check that this really is an IN2000 card. Very nifty. Use the
1939 * 'ioport:xx' command-line parameter if your BIOS EPROM is absent
1940 * or disabled.
1943 if (!done_setup && setup_strings)
1944 in2000_setup(setup_strings, NULL);
1946 detect_count = 0;
1947 for (bios = 0; bios_tab[bios]; bios++) {
1948 u32 s1 = 0;
1949 if (check_setup_args("ioport", &val, buf)) {
1950 base = val;
1951 switches = ~inb(base + IO_SWITCHES) & 0xff;
1952 printk("Forcing IN2000 detection at IOport 0x%x ", base);
1953 bios = 2;
1956 * There have been a couple of BIOS versions with different layouts
1957 * for the obvious ID strings. We look for the 2 most common ones and
1958 * hope that they cover all the cases...
1960 else if (probe_bios(bios_tab[bios], &s1, &switches)) {
1961 printk("Found IN2000 BIOS at 0x%x ", (unsigned int) bios_tab[bios]);
1963 /* Find out where the IO space is */
1965 x = switches & (SW_ADDR0 | SW_ADDR1);
1966 base = base_tab[x];
1968 /* Check for the IN2000 signature in IO space. */
1970 x = ~inb(base + IO_SWITCHES) & 0xff;
1971 if (x != switches) {
1972 printk("Bad IO signature: %02x vs %02x.\n", x, switches);
1973 continue;
1975 } else
1976 continue;
1978 /* OK. We have a base address for the IO ports - run a few safety checks */
1980 if (!(switches & SW_BIT7)) { /* I _think_ all cards do this */
1981 printk("There is no IN-2000 SCSI card at IOport 0x%03x!\n", base);
1982 continue;
1985 /* Let's assume any hardware version will work, although the driver
1986 * has only been tested on 0x21, 0x22, 0x25, 0x26, and 0x27. We'll
1987 * print out the rev number for reference later, but accept them all.
1990 hrev = inb(base + IO_HARDWARE);
1992 /* Bit 2 tells us if interrupts are disabled */
1993 if (switches & SW_DISINT) {
1994 printk("The IN-2000 SCSI card at IOport 0x%03x ", base);
1995 printk("is not configured for interrupt operation!\n");
1996 printk("This driver requires an interrupt: cancelling detection.\n");
1997 continue;
2000 /* Ok. We accept that there's an IN2000 at ioaddr 'base'. Now
2001 * initialize it.
2004 tpnt->proc_name = "in2000";
2005 instance = scsi_register(tpnt, sizeof(struct IN2000_hostdata));
2006 if (instance == NULL)
2007 continue;
2008 detect_count++;
2009 hostdata = (struct IN2000_hostdata *) instance->hostdata;
2010 instance->io_port = hostdata->io_base = base;
2011 hostdata->dip_switch = switches;
2012 hostdata->hrev = hrev;
2014 write1_io(0, IO_FIFO_WRITE); /* clear fifo counter */
2015 write1_io(0, IO_FIFO_READ); /* start fifo out in read mode */
2016 write1_io(0, IO_INTR_MASK); /* allow all ints */
2017 x = int_tab[(switches & (SW_INT0 | SW_INT1)) >> SW_INT_SHIFT];
2018 if (request_irq(x, in2000_intr, IRQF_DISABLED, "in2000", instance)) {
2019 printk("in2000_detect: Unable to allocate IRQ.\n");
2020 detect_count--;
2021 continue;
2023 instance->irq = x;
2024 instance->n_io_port = 13;
2025 request_region(base, 13, "in2000"); /* lock in this IO space for our use */
2027 for (x = 0; x < 8; x++) {
2028 hostdata->busy[x] = 0;
2029 hostdata->sync_xfer[x] = calc_sync_xfer(DEFAULT_SX_PER / 4, DEFAULT_SX_OFF);
2030 hostdata->sync_stat[x] = SS_UNSET; /* using default sync values */
2031 #ifdef PROC_STATISTICS
2032 hostdata->cmd_cnt[x] = 0;
2033 hostdata->disc_allowed_cnt[x] = 0;
2034 hostdata->disc_done_cnt[x] = 0;
2035 #endif
2037 hostdata->input_Q = NULL;
2038 hostdata->selecting = NULL;
2039 hostdata->connected = NULL;
2040 hostdata->disconnected_Q = NULL;
2041 hostdata->state = S_UNCONNECTED;
2042 hostdata->fifo = FI_FIFO_UNUSED;
2043 hostdata->level2 = L2_BASIC;
2044 hostdata->disconnect = DIS_ADAPTIVE;
2045 hostdata->args = DEBUG_DEFAULTS;
2046 hostdata->incoming_ptr = 0;
2047 hostdata->outgoing_len = 0;
2048 hostdata->default_sx_per = DEFAULT_SX_PER;
2050 /* Older BIOS's had a 'sync on/off' switch - use its setting */
2052 if (s1 == 0x41564f4e && (switches & SW_SYNC_DOS5))
2053 hostdata->sync_off = 0x00; /* sync defaults to on */
2054 else
2055 hostdata->sync_off = 0xff; /* sync defaults to off */
2057 #ifdef PROC_INTERFACE
2058 hostdata->proc = PR_VERSION | PR_INFO | PR_STATISTICS | PR_CONNECTED | PR_INPUTQ | PR_DISCQ | PR_STOP;
2059 #ifdef PROC_STATISTICS
2060 hostdata->int_cnt = 0;
2061 #endif
2062 #endif
2064 if (check_setup_args("nosync", &val, buf))
2065 hostdata->sync_off = val;
2067 if (check_setup_args("period", &val, buf))
2068 hostdata->default_sx_per = sx_table[round_period((unsigned int) val)].period_ns;
2070 if (check_setup_args("disconnect", &val, buf)) {
2071 if ((val >= DIS_NEVER) && (val <= DIS_ALWAYS))
2072 hostdata->disconnect = val;
2073 else
2074 hostdata->disconnect = DIS_ADAPTIVE;
2077 if (check_setup_args("noreset", &val, buf))
2078 hostdata->args ^= A_NO_SCSI_RESET;
2080 if (check_setup_args("level2", &val, buf))
2081 hostdata->level2 = val;
2083 if (check_setup_args("debug", &val, buf))
2084 hostdata->args = (val & DB_MASK);
2086 #ifdef PROC_INTERFACE
2087 if (check_setup_args("proc", &val, buf))
2088 hostdata->proc = val;
2089 #endif
2092 /* FIXME: not strictly needed I think but the called code expects
2093 to be locked */
2094 spin_lock_irqsave(instance->host_lock, flags);
2095 x = reset_hardware(instance, (hostdata->args & A_NO_SCSI_RESET) ? RESET_CARD : RESET_CARD_AND_BUS);
2096 spin_unlock_irqrestore(instance->host_lock, flags);
2098 hostdata->microcode = read_3393(hostdata, WD_CDB_1);
2099 if (x & 0x01) {
2100 if (x & B_FLAG)
2101 hostdata->chip = C_WD33C93B;
2102 else
2103 hostdata->chip = C_WD33C93A;
2104 } else
2105 hostdata->chip = C_WD33C93;
2107 printk("dip_switch=%02x irq=%d ioport=%02x floppy=%s sync/DOS5=%s ", (switches & 0x7f), instance->irq, hostdata->io_base, (switches & SW_FLOPPY) ? "Yes" : "No", (switches & SW_SYNC_DOS5) ? "Yes" : "No");
2108 printk("hardware_ver=%02x chip=%s microcode=%02x\n", hrev, (hostdata->chip == C_WD33C93) ? "WD33c93" : (hostdata->chip == C_WD33C93A) ? "WD33c93A" : (hostdata->chip == C_WD33C93B) ? "WD33c93B" : "unknown", hostdata->microcode);
2109 #ifdef DEBUGGING_ON
2110 printk("setup_args = ");
2111 for (x = 0; x < MAX_SETUP_ARGS; x++)
2112 printk("%s,", setup_args[x]);
2113 printk("\n");
2114 #endif
2115 if (hostdata->sync_off == 0xff)
2116 printk("Sync-transfer DISABLED on all devices: ENABLE from command-line\n");
2117 printk("IN2000 driver version %s - %s\n", IN2000_VERSION, IN2000_DATE);
2120 return detect_count;
2123 static int in2000_release(struct Scsi_Host *shost)
2125 if (shost->irq)
2126 free_irq(shost->irq, shost);
2127 if (shost->io_port && shost->n_io_port)
2128 release_region(shost->io_port, shost->n_io_port);
2129 return 0;
2132 /* NOTE: I lifted this function straight out of the old driver,
2133 * and have not tested it. Presumably it does what it's
2134 * supposed to do...
2137 static int in2000_biosparam(struct scsi_device *sdev, struct block_device *bdev, sector_t capacity, int *iinfo)
2139 int size;
2141 size = capacity;
2142 iinfo[0] = 64;
2143 iinfo[1] = 32;
2144 iinfo[2] = size >> 11;
2146 /* This should approximate the large drive handling that the DOS ASPI manager
2147 uses. Drives very near the boundaries may not be handled correctly (i.e.
2148 near 2.0 Gb and 4.0 Gb) */
2150 if (iinfo[2] > 1024) {
2151 iinfo[0] = 64;
2152 iinfo[1] = 63;
2153 iinfo[2] = (unsigned long) capacity / (iinfo[0] * iinfo[1]);
2155 if (iinfo[2] > 1024) {
2156 iinfo[0] = 128;
2157 iinfo[1] = 63;
2158 iinfo[2] = (unsigned long) capacity / (iinfo[0] * iinfo[1]);
2160 if (iinfo[2] > 1024) {
2161 iinfo[0] = 255;
2162 iinfo[1] = 63;
2163 iinfo[2] = (unsigned long) capacity / (iinfo[0] * iinfo[1]);
2165 return 0;
2169 static int in2000_proc_info(struct Scsi_Host *instance, char *buf, char **start, off_t off, int len, int in)
2172 #ifdef PROC_INTERFACE
2174 char *bp;
2175 char tbuf[128];
2176 unsigned long flags;
2177 struct IN2000_hostdata *hd;
2178 Scsi_Cmnd *cmd;
2179 int x, i;
2180 static int stop = 0;
2182 hd = (struct IN2000_hostdata *) instance->hostdata;
2184 /* If 'in' is TRUE we need to _read_ the proc file. We accept the following
2185 * keywords (same format as command-line, but only ONE per read):
2186 * debug
2187 * disconnect
2188 * period
2189 * resync
2190 * proc
2193 if (in) {
2194 buf[len] = '\0';
2195 bp = buf;
2196 if (!strncmp(bp, "debug:", 6)) {
2197 bp += 6;
2198 hd->args = simple_strtoul(bp, NULL, 0) & DB_MASK;
2199 } else if (!strncmp(bp, "disconnect:", 11)) {
2200 bp += 11;
2201 x = simple_strtoul(bp, NULL, 0);
2202 if (x < DIS_NEVER || x > DIS_ALWAYS)
2203 x = DIS_ADAPTIVE;
2204 hd->disconnect = x;
2205 } else if (!strncmp(bp, "period:", 7)) {
2206 bp += 7;
2207 x = simple_strtoul(bp, NULL, 0);
2208 hd->default_sx_per = sx_table[round_period((unsigned int) x)].period_ns;
2209 } else if (!strncmp(bp, "resync:", 7)) {
2210 bp += 7;
2211 x = simple_strtoul(bp, NULL, 0);
2212 for (i = 0; i < 7; i++)
2213 if (x & (1 << i))
2214 hd->sync_stat[i] = SS_UNSET;
2215 } else if (!strncmp(bp, "proc:", 5)) {
2216 bp += 5;
2217 hd->proc = simple_strtoul(bp, NULL, 0);
2218 } else if (!strncmp(bp, "level2:", 7)) {
2219 bp += 7;
2220 hd->level2 = simple_strtoul(bp, NULL, 0);
2222 return len;
2225 spin_lock_irqsave(instance->host_lock, flags);
2226 bp = buf;
2227 *bp = '\0';
2228 if (hd->proc & PR_VERSION) {
2229 sprintf(tbuf, "\nVersion %s - %s. Compiled %s %s", IN2000_VERSION, IN2000_DATE, __DATE__, __TIME__);
2230 strcat(bp, tbuf);
2232 if (hd->proc & PR_INFO) {
2233 sprintf(tbuf, "\ndip_switch=%02x: irq=%d io=%02x floppy=%s sync/DOS5=%s", (hd->dip_switch & 0x7f), instance->irq, hd->io_base, (hd->dip_switch & 0x40) ? "Yes" : "No", (hd->dip_switch & 0x20) ? "Yes" : "No");
2234 strcat(bp, tbuf);
2235 strcat(bp, "\nsync_xfer[] = ");
2236 for (x = 0; x < 7; x++) {
2237 sprintf(tbuf, "\t%02x", hd->sync_xfer[x]);
2238 strcat(bp, tbuf);
2240 strcat(bp, "\nsync_stat[] = ");
2241 for (x = 0; x < 7; x++) {
2242 sprintf(tbuf, "\t%02x", hd->sync_stat[x]);
2243 strcat(bp, tbuf);
2246 #ifdef PROC_STATISTICS
2247 if (hd->proc & PR_STATISTICS) {
2248 strcat(bp, "\ncommands issued: ");
2249 for (x = 0; x < 7; x++) {
2250 sprintf(tbuf, "\t%ld", hd->cmd_cnt[x]);
2251 strcat(bp, tbuf);
2253 strcat(bp, "\ndisconnects allowed:");
2254 for (x = 0; x < 7; x++) {
2255 sprintf(tbuf, "\t%ld", hd->disc_allowed_cnt[x]);
2256 strcat(bp, tbuf);
2258 strcat(bp, "\ndisconnects done: ");
2259 for (x = 0; x < 7; x++) {
2260 sprintf(tbuf, "\t%ld", hd->disc_done_cnt[x]);
2261 strcat(bp, tbuf);
2263 sprintf(tbuf, "\ninterrupts: \t%ld", hd->int_cnt);
2264 strcat(bp, tbuf);
2266 #endif
2267 if (hd->proc & PR_CONNECTED) {
2268 strcat(bp, "\nconnected: ");
2269 if (hd->connected) {
2270 cmd = (Scsi_Cmnd *) hd->connected;
2271 sprintf(tbuf, " %ld-%d:%d(%02x)", cmd->serial_number, cmd->device->id, cmd->device->lun, cmd->cmnd[0]);
2272 strcat(bp, tbuf);
2275 if (hd->proc & PR_INPUTQ) {
2276 strcat(bp, "\ninput_Q: ");
2277 cmd = (Scsi_Cmnd *) hd->input_Q;
2278 while (cmd) {
2279 sprintf(tbuf, " %ld-%d:%d(%02x)", cmd->serial_number, cmd->device->id, cmd->device->lun, cmd->cmnd[0]);
2280 strcat(bp, tbuf);
2281 cmd = (Scsi_Cmnd *) cmd->host_scribble;
2284 if (hd->proc & PR_DISCQ) {
2285 strcat(bp, "\ndisconnected_Q:");
2286 cmd = (Scsi_Cmnd *) hd->disconnected_Q;
2287 while (cmd) {
2288 sprintf(tbuf, " %ld-%d:%d(%02x)", cmd->serial_number, cmd->device->id, cmd->device->lun, cmd->cmnd[0]);
2289 strcat(bp, tbuf);
2290 cmd = (Scsi_Cmnd *) cmd->host_scribble;
2293 if (hd->proc & PR_TEST) {
2294 ; /* insert your own custom function here */
2296 strcat(bp, "\n");
2297 spin_unlock_irqrestore(instance->host_lock, flags);
2298 *start = buf;
2299 if (stop) {
2300 stop = 0;
2301 return 0; /* return 0 to signal end-of-file */
2303 if (off > 0x40000) /* ALWAYS stop after 256k bytes have been read */
2304 stop = 1;
2305 if (hd->proc & PR_STOP) /* stop every other time */
2306 stop = 1;
2307 return strlen(bp);
2309 #else /* PROC_INTERFACE */
2311 return 0;
2313 #endif /* PROC_INTERFACE */
2317 MODULE_LICENSE("GPL");
2320 static struct scsi_host_template driver_template = {
2321 .proc_name = "in2000",
2322 .proc_info = in2000_proc_info,
2323 .name = "Always IN2000",
2324 .detect = in2000_detect,
2325 .release = in2000_release,
2326 .queuecommand = in2000_queuecommand,
2327 .eh_abort_handler = in2000_abort,
2328 .eh_bus_reset_handler = in2000_bus_reset,
2329 .bios_param = in2000_biosparam,
2330 .can_queue = IN2000_CAN_Q,
2331 .this_id = IN2000_HOST_ID,
2332 .sg_tablesize = IN2000_SG,
2333 .cmd_per_lun = IN2000_CPL,
2334 .use_clustering = DISABLE_CLUSTERING,
2336 #include "scsi_module.c"