aboutsummaryrefslogtreecommitdiffstats
path: root/drivers/scsi/fdomain.c
diff options
context:
space:
mode:
authorLinus Torvalds <torvalds@ppc970.osdl.org>2005-04-16 18:20:36 -0400
committerLinus Torvalds <torvalds@ppc970.osdl.org>2005-04-16 18:20:36 -0400
commit1da177e4c3f41524e886b7f1b8a0c1fc7321cac2 (patch)
tree0bba044c4ce775e45a88a51686b5d9f90697ea9d /drivers/scsi/fdomain.c
Linux-2.6.12-rc2v2.6.12-rc2
Initial git repository build. I'm not bothering with the full history, even though we have it. We can create a separate "historical" git archive of that later if we want to, and in the meantime it's about 3.2GB when imported into git - space that would just make the early git days unnecessarily complicated, when we don't have a lot of good infrastructure for it. Let it rip!
Diffstat (limited to 'drivers/scsi/fdomain.c')
-rw-r--r--drivers/scsi/fdomain.c1739
1 files changed, 1739 insertions, 0 deletions
diff --git a/drivers/scsi/fdomain.c b/drivers/scsi/fdomain.c
new file mode 100644
index 000000000000..a843c080c1d8
--- /dev/null
+++ b/drivers/scsi/fdomain.c
@@ -0,0 +1,1739 @@
1/* fdomain.c -- Future Domain TMC-16x0 SCSI driver
2 * Created: Sun May 3 18:53:19 1992 by faith@cs.unc.edu
3 * Revised: Mon Dec 28 21:59:02 1998 by faith@acm.org
4 * Author: Rickard E. Faith, faith@cs.unc.edu
5 * Copyright 1992-1996, 1998 Rickard E. Faith (faith@acm.org)
6 * Shared IRQ supported added 7/7/2001 Alan Cox <alan@redhat.com>
7
8 * This program is free software; you can redistribute it and/or modify it
9 * under the terms of the GNU General Public License as published by the
10 * Free Software Foundation; either version 2, or (at your option) any
11 * later version.
12
13 * This program is distributed in the hope that it will be useful, but
14 * WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * General Public License for more details.
17
18 * You should have received a copy of the GNU General Public License along
19 * with this program; if not, write to the Free Software Foundation, Inc.,
20 * 675 Mass Ave, Cambridge, MA 02139, USA.
21
22 **************************************************************************
23
24 SUMMARY:
25
26 Future Domain BIOS versions supported for autodetect:
27 2.0, 3.0, 3.2, 3.4 (1.0), 3.5 (2.0), 3.6, 3.61
28 Chips are supported:
29 TMC-1800, TMC-18C50, TMC-18C30, TMC-36C70
30 Boards supported:
31 Future Domain TMC-1650, TMC-1660, TMC-1670, TMC-1680, TMC-1610M/MER/MEX
32 Future Domain TMC-3260 (PCI)
33 Quantum ISA-200S, ISA-250MG
34 Adaptec AHA-2920A (PCI) [BUT *NOT* AHA-2920C -- use aic7xxx instead]
35 IBM ?
36 LILO/INSMOD command-line options:
37 fdomain=<PORT_BASE>,<IRQ>[,<ADAPTER_ID>]
38
39
40
41 NOTE:
42
43 The Adaptec AHA-2920C has an Adaptec AIC-7850 chip on it.
44 Use the aic7xxx driver for this board.
45
46 The Adaptec AHA-2920A has a Future Domain chip on it, so this is the right
47 driver for that card. Unfortunately, the boxes will probably just say
48 "2920", so you'll have to look on the card for a Future Domain logo, or a
49 letter after the 2920.
50
51
52
53 THANKS:
54
55 Thanks to Adaptec for providing PCI boards for testing. This finally
56 enabled me to test the PCI detection and correct it for PCI boards that do
57 not have a BIOS at a standard ISA location. For PCI boards, LILO/INSMOD
58 command-line options should no longer be needed. --RF 18Nov98
59
60
61
62 DESCRIPTION:
63
64 This is the Linux low-level SCSI driver for Future Domain TMC-1660/1680
65 TMC-1650/1670, and TMC-3260 SCSI host adapters. The 1650 and 1670 have a
66 25-pin external connector, whereas the 1660 and 1680 have a SCSI-2 50-pin
67 high-density external connector. The 1670 and 1680 have floppy disk
68 controllers built in. The TMC-3260 is a PCI bus card.
69
70 Future Domain's older boards are based on the TMC-1800 chip, and this
71 driver was originally written for a TMC-1680 board with the TMC-1800 chip.
72 More recently, boards are being produced with the TMC-18C50 and TMC-18C30
73 chips. The latest and greatest board may not work with this driver. If
74 you have to patch this driver so that it will recognize your board's BIOS
75 signature, then the driver may fail to function after the board is
76 detected.
77
78 Please note that the drive ordering that Future Domain implemented in BIOS
79 versions 3.4 and 3.5 is the opposite of the order (currently) used by the
80 rest of the SCSI industry. If you have BIOS version 3.4 or 3.5, and have
81 more than one drive, then the drive ordering will be the reverse of that
82 which you see under DOS. For example, under DOS SCSI ID 0 will be D: and
83 SCSI ID 1 will be C: (the boot device). Under Linux, SCSI ID 0 will be
84 /dev/sda and SCSI ID 1 will be /dev/sdb. The Linux ordering is consistent
85 with that provided by all the other SCSI drivers for Linux. If you want
86 this changed, you will probably have to patch the higher level SCSI code.
87 If you do so, please send me patches that are protected by #ifdefs.
88
89 If you have a TMC-8xx or TMC-9xx board, then this is not the driver for
90 your board. Please refer to the Seagate driver for more information and
91 possible support.
92
93
94
95 HISTORY:
96
97 Linux Driver Driver
98 Version Version Date Support/Notes
99
100 0.0 3 May 1992 V2.0 BIOS; 1800 chip
101 0.97 1.9 28 Jul 1992
102 0.98.6 3.1 27 Nov 1992
103 0.99 3.2 9 Dec 1992
104
105 0.99.3 3.3 10 Jan 1993 V3.0 BIOS
106 0.99.5 3.5 18 Feb 1993
107 0.99.10 3.6 15 May 1993 V3.2 BIOS; 18C50 chip
108 0.99.11 3.17 3 Jul 1993 (now under RCS)
109 0.99.12 3.18 13 Aug 1993
110 0.99.14 5.6 31 Oct 1993 (reselection code removed)
111
112 0.99.15 5.9 23 Jan 1994 V3.4 BIOS (preliminary)
113 1.0.8/1.1.1 5.15 1 Apr 1994 V3.4 BIOS; 18C30 chip (preliminary)
114 1.0.9/1.1.3 5.16 7 Apr 1994 V3.4 BIOS; 18C30 chip
115 1.1.38 5.18 30 Jul 1994 36C70 chip (PCI version of 18C30)
116 1.1.62 5.20 2 Nov 1994 V3.5 BIOS
117 1.1.73 5.22 7 Dec 1994 Quantum ISA-200S board; V2.0 BIOS
118
119 1.1.82 5.26 14 Jan 1995 V3.5 BIOS; TMC-1610M/MER/MEX board
120 1.2.10 5.28 5 Jun 1995 Quantum ISA-250MG board; V2.0, V2.01 BIOS
121 1.3.4 5.31 23 Jun 1995 PCI BIOS-32 detection (preliminary)
122 1.3.7 5.33 4 Jul 1995 PCI BIOS-32 detection
123 1.3.28 5.36 17 Sep 1995 V3.61 BIOS; LILO command-line support
124 1.3.34 5.39 12 Oct 1995 V3.60 BIOS; /proc
125 1.3.72 5.39 8 Feb 1996 Adaptec AHA-2920 board
126 1.3.85 5.41 4 Apr 1996
127 2.0.12 5.44 8 Aug 1996 Use ID 7 for all PCI cards
128 2.1.1 5.45 2 Oct 1996 Update ROM accesses for 2.1.x
129 2.1.97 5.46 23 Apr 1998 Rewritten PCI detection routines [mj]
130 2.1.11x 5.47 9 Aug 1998 Touched for 8 SCSI disk majors support
131 5.48 18 Nov 1998 BIOS no longer needed for PCI detection
132 2.2.0 5.50 28 Dec 1998 Support insmod parameters
133
134
135 REFERENCES USED:
136
137 "TMC-1800 SCSI Chip Specification (FDC-1800T)", Future Domain Corporation,
138 1990.
139
140 "Technical Reference Manual: 18C50 SCSI Host Adapter Chip", Future Domain
141 Corporation, January 1992.
142
143 "LXT SCSI Products: Specifications and OEM Technical Manual (Revision
144 B/September 1991)", Maxtor Corporation, 1991.
145
146 "7213S product Manual (Revision P3)", Maxtor Corporation, 1992.
147
148 "Draft Proposed American National Standard: Small Computer System
149 Interface - 2 (SCSI-2)", Global Engineering Documents. (X3T9.2/86-109,
150 revision 10h, October 17, 1991)
151
152 Private communications, Drew Eckhardt (drew@cs.colorado.edu) and Eric
153 Youngdale (ericy@cais.com), 1992.
154
155 Private communication, Tuong Le (Future Domain Engineering department),
156 1994. (Disk geometry computations for Future Domain BIOS version 3.4, and
157 TMC-18C30 detection.)
158
159 Hogan, Thom. The Programmer's PC Sourcebook. Microsoft Press, 1988. Page
160 60 (2.39: Disk Partition Table Layout).
161
162 "18C30 Technical Reference Manual", Future Domain Corporation, 1993, page
163 6-1.
164
165
166
167 NOTES ON REFERENCES:
168
169 The Maxtor manuals were free. Maxtor telephone technical support is
170 great!
171
172 The Future Domain manuals were $25 and $35. They document the chip, not
173 the TMC-16x0 boards, so some information I had to guess at. In 1992,
174 Future Domain sold DOS BIOS source for $250 and the UN*X driver source was
175 $750, but these required a non-disclosure agreement, so even if I could
176 have afforded them, they would *not* have been useful for writing this
177 publically distributable driver. Future Domain technical support has
178 provided some information on the phone and have sent a few useful FAXs.
179 They have been much more helpful since they started to recognize that the
180 word "Linux" refers to an operating system :-).
181
182
183
184 ALPHA TESTERS:
185
186 There are many other alpha testers that come and go as the driver
187 develops. The people listed here were most helpful in times of greatest
188 need (mostly early on -- I've probably left out a few worthy people in
189 more recent times):
190
191 Todd Carrico (todd@wutc.wustl.edu), Dan Poirier (poirier@cs.unc.edu ), Ken
192 Corey (kenc@sol.acs.unt.edu), C. de Bruin (bruin@bruin@sterbbs.nl), Sakari
193 Aaltonen (sakaria@vipunen.hit.fi), John Rice (rice@xanth.cs.odu.edu), Brad
194 Yearwood (brad@optilink.com), and Ray Toy (toy@soho.crd.ge.com).
195
196 Special thanks to Tien-Wan Yang (twyang@cs.uh.edu), who graciously lent me
197 his 18C50-based card for debugging. He is the sole reason that this
198 driver works with the 18C50 chip.
199
200 Thanks to Dave Newman (dnewman@crl.com) for providing initial patches for
201 the version 3.4 BIOS.
202
203 Thanks to James T. McKinley (mckinley@msupa.pa.msu.edu) for providing
204 patches that support the TMC-3260, a PCI bus card with the 36C70 chip.
205 The 36C70 chip appears to be "completely compatible" with the 18C30 chip.
206
207 Thanks to Eric Kasten (tigger@petroglyph.cl.msu.edu) for providing the
208 patch for the version 3.5 BIOS.
209
210 Thanks for Stephen Henson (shenson@nyx10.cs.du.edu) for providing the
211 patch for the Quantum ISA-200S SCSI adapter.
212
213 Thanks to Adam Bowen for the signature to the 1610M/MER/MEX scsi cards, to
214 Martin Andrews (andrewm@ccfadm.eeg.ccf.org) for the signature to some
215 random TMC-1680 repackaged by IBM; and to Mintak Ng (mintak@panix.com) for
216 the version 3.61 BIOS signature.
217
218 Thanks for Mark Singer (elf@netcom.com) and Richard Simpson
219 (rsimpson@ewrcsdra.demon.co.uk) for more Quantum signatures and detective
220 work on the Quantum RAM layout.
221
222 Special thanks to James T. McKinley (mckinley@msupa.pa.msu.edu) for
223 providing patches for proper PCI BIOS32-mediated detection of the TMC-3260
224 card (a PCI bus card with the 36C70 chip). Please send James PCI-related
225 bug reports.
226
227 Thanks to Tom Cavin (tec@usa1.com) for preliminary command-line option
228 patches.
229
230 New PCI detection code written by Martin Mares <mj@atrey.karlin.mff.cuni.cz>
231
232 Insmod parameter code based on patches from Daniel Graham
233 <graham@balance.uoregon.edu>.
234
235 All of the alpha testers deserve much thanks.
236
237
238
239 NOTES ON USER DEFINABLE OPTIONS:
240
241 DEBUG: This turns on the printing of various debug information.
242
243 ENABLE_PARITY: This turns on SCSI parity checking. With the current
244 driver, all attached devices must support SCSI parity. If none of your
245 devices support parity, then you can probably get the driver to work by
246 turning this option off. I have no way of testing this, however, and it
247 would appear that no one ever uses this option.
248
249 FIFO_COUNT: The host adapter has an 8K cache (host adapters based on the
250 18C30 chip have a 2k cache). When this many 512 byte blocks are filled by
251 the SCSI device, an interrupt will be raised. Therefore, this could be as
252 low as 0, or as high as 16. Note, however, that values which are too high
253 or too low seem to prevent any interrupts from occurring, and thereby lock
254 up the machine. I have found that 2 is a good number, but throughput may
255 be increased by changing this value to values which are close to 2.
256 Please let me know if you try any different values.
257
258 RESELECTION: This is no longer an option, since I gave up trying to
259 implement it in version 4.x of this driver. It did not improve
260 performance at all and made the driver unstable (because I never found one
261 of the two race conditions which were introduced by the multiple
262 outstanding command code). The instability seems a very high price to pay
263 just so that you don't have to wait for the tape to rewind. If you want
264 this feature implemented, send me patches. I'll be happy to send a copy
265 of my (broken) driver to anyone who would like to see a copy.
266
267 **************************************************************************/
268
269#include <linux/config.h>
270#include <linux/module.h>
271#include <linux/init.h>
272#include <linux/interrupt.h>
273#include <linux/blkdev.h>
274#include <linux/spinlock.h>
275#include <linux/errno.h>
276#include <linux/string.h>
277#include <linux/ioport.h>
278#include <linux/proc_fs.h>
279#include <linux/pci.h>
280#include <linux/stat.h>
281#include <linux/delay.h>
282#include <scsi/scsicam.h>
283
284#include <asm/io.h>
285#include <asm/system.h>
286
287#include <scsi/scsi.h>
288#include <scsi/scsi_cmnd.h>
289#include <scsi/scsi_device.h>
290#include <scsi/scsi_host.h>
291#include <scsi/scsi_ioctl.h>
292#include "fdomain.h"
293
294MODULE_AUTHOR("Rickard E. Faith");
295MODULE_DESCRIPTION("Future domain SCSI driver");
296MODULE_LICENSE("GPL");
297
298
299#define VERSION "$Revision: 5.51 $"
300
301/* START OF USER DEFINABLE OPTIONS */
302
303#define DEBUG 0 /* Enable debugging output */
304#define ENABLE_PARITY 1 /* Enable SCSI Parity */
305#define FIFO_COUNT 2 /* Number of 512 byte blocks before INTR */
306
307/* END OF USER DEFINABLE OPTIONS */
308
309#if DEBUG
310#define EVERY_ACCESS 0 /* Write a line on every scsi access */
311#define ERRORS_ONLY 1 /* Only write a line if there is an error */
312#define DEBUG_DETECT 0 /* Debug fdomain_16x0_detect() */
313#define DEBUG_MESSAGES 1 /* Debug MESSAGE IN phase */
314#define DEBUG_ABORT 1 /* Debug abort() routine */
315#define DEBUG_RESET 1 /* Debug reset() routine */
316#define DEBUG_RACE 1 /* Debug interrupt-driven race condition */
317#else
318#define EVERY_ACCESS 0 /* LEAVE THESE ALONE--CHANGE THE ONES ABOVE */
319#define ERRORS_ONLY 0
320#define DEBUG_DETECT 0
321#define DEBUG_MESSAGES 0
322#define DEBUG_ABORT 0
323#define DEBUG_RESET 0
324#define DEBUG_RACE 0
325#endif
326
327/* Errors are reported on the line, so we don't need to report them again */
328#if EVERY_ACCESS
329#undef ERRORS_ONLY
330#define ERRORS_ONLY 0
331#endif
332
333#if ENABLE_PARITY
334#define PARITY_MASK 0x08
335#else
336#define PARITY_MASK 0x00
337#endif
338
339enum chip_type {
340 unknown = 0x00,
341 tmc1800 = 0x01,
342 tmc18c50 = 0x02,
343 tmc18c30 = 0x03,
344};
345
346enum {
347 in_arbitration = 0x02,
348 in_selection = 0x04,
349 in_other = 0x08,
350 disconnect = 0x10,
351 aborted = 0x20,
352 sent_ident = 0x40,
353};
354
355enum in_port_type {
356 Read_SCSI_Data = 0,
357 SCSI_Status = 1,
358 TMC_Status = 2,
359 FIFO_Status = 3, /* tmc18c50/tmc18c30 only */
360 Interrupt_Cond = 4, /* tmc18c50/tmc18c30 only */
361 LSB_ID_Code = 5,
362 MSB_ID_Code = 6,
363 Read_Loopback = 7,
364 SCSI_Data_NoACK = 8,
365 Interrupt_Status = 9,
366 Configuration1 = 10,
367 Configuration2 = 11, /* tmc18c50/tmc18c30 only */
368 Read_FIFO = 12,
369 FIFO_Data_Count = 14
370};
371
372enum out_port_type {
373 Write_SCSI_Data = 0,
374 SCSI_Cntl = 1,
375 Interrupt_Cntl = 2,
376 SCSI_Mode_Cntl = 3,
377 TMC_Cntl = 4,
378 Memory_Cntl = 5, /* tmc18c50/tmc18c30 only */
379 Write_Loopback = 7,
380 IO_Control = 11, /* tmc18c30 only */
381 Write_FIFO = 12
382};
383
384/* .bss will zero all the static variables below */
385static int port_base;
386static unsigned long bios_base;
387static void __iomem * bios_mem;
388static int bios_major;
389static int bios_minor;
390static int PCI_bus;
391static int Quantum; /* Quantum board variant */
392static int interrupt_level;
393static volatile int in_command;
394static struct scsi_cmnd *current_SC;
395static enum chip_type chip = unknown;
396static int adapter_mask;
397static int this_id;
398static int setup_called;
399
400#if DEBUG_RACE
401static volatile int in_interrupt_flag;
402#endif
403
404static int FIFO_Size = 0x2000; /* 8k FIFO for
405 pre-tmc18c30 chips */
406
407static irqreturn_t do_fdomain_16x0_intr( int irq, void *dev_id,
408 struct pt_regs * regs );
409/* Allow insmod parameters to be like LILO parameters. For example:
410 insmod fdomain fdomain=0x140,11 */
411static char * fdomain = NULL;
412module_param(fdomain, charp, 0);
413
414static unsigned long addresses[] = {
415 0xc8000,
416 0xca000,
417 0xce000,
418 0xde000,
419 0xcc000, /* Extra addresses for PCI boards */
420 0xd0000,
421 0xe0000,
422};
423#define ADDRESS_COUNT (sizeof( addresses ) / sizeof( unsigned ))
424
425static unsigned short ports[] = { 0x140, 0x150, 0x160, 0x170 };
426#define PORT_COUNT (sizeof( ports ) / sizeof( unsigned short ))
427
428static unsigned short ints[] = { 3, 5, 10, 11, 12, 14, 15, 0 };
429
430/*
431
432 READ THIS BEFORE YOU ADD A SIGNATURE!
433
434 READING THIS SHORT NOTE CAN SAVE YOU LOTS OF TIME!
435
436 READ EVERY WORD, ESPECIALLY THE WORD *NOT*
437
438 This driver works *ONLY* for Future Domain cards using the TMC-1800,
439 TMC-18C50, or TMC-18C30 chip. This includes models TMC-1650, 1660, 1670,
440 and 1680. These are all 16-bit cards.
441
442 The following BIOS signature signatures are for boards which do *NOT*
443 work with this driver (these TMC-8xx and TMC-9xx boards may work with the
444 Seagate driver):
445
446 FUTURE DOMAIN CORP. (C) 1986-1988 V4.0I 03/16/88
447 FUTURE DOMAIN CORP. (C) 1986-1989 V5.0C2/14/89
448 FUTURE DOMAIN CORP. (C) 1986-1989 V6.0A7/28/89
449 FUTURE DOMAIN CORP. (C) 1986-1990 V6.0105/31/90
450 FUTURE DOMAIN CORP. (C) 1986-1990 V6.0209/18/90
451 FUTURE DOMAIN CORP. (C) 1986-1990 V7.009/18/90
452 FUTURE DOMAIN CORP. (C) 1992 V8.00.004/02/92
453
454 (The cards which do *NOT* work are all 8-bit cards -- although some of
455 them have a 16-bit form-factor, the upper 8-bits are used only for IRQs
456 and are *NOT* used for data. You can tell the difference by following
457 the tracings on the circuit board -- if only the IRQ lines are involved,
458 you have a "8-bit" card, and should *NOT* use this driver.)
459
460*/
461
462static struct signature {
463 const char *signature;
464 int sig_offset;
465 int sig_length;
466 int major_bios_version;
467 int minor_bios_version;
468 int flag; /* 1 == PCI_bus, 2 == ISA_200S, 3 == ISA_250MG, 4 == ISA_200S */
469} signatures[] = {
470 /* 1 2 3 4 5 6 */
471 /* 123456789012345678901234567890123456789012345678901234567890 */
472 { "FUTURE DOMAIN CORP. (C) 1986-1990 1800-V2.07/28/89", 5, 50, 2, 0, 0 },
473 { "FUTURE DOMAIN CORP. (C) 1986-1990 1800-V1.07/28/89", 5, 50, 2, 0, 0 },
474 { "FUTURE DOMAIN CORP. (C) 1986-1990 1800-V2.07/28/89", 72, 50, 2, 0, 2 },
475 { "FUTURE DOMAIN CORP. (C) 1986-1990 1800-V2.0", 73, 43, 2, 0, 3 },
476 { "FUTURE DOMAIN CORP. (C) 1991 1800-V2.0.", 72, 39, 2, 0, 4 },
477 { "FUTURE DOMAIN CORP. (C) 1992 V3.00.004/02/92", 5, 44, 3, 0, 0 },
478 { "FUTURE DOMAIN TMC-18XX (C) 1993 V3.203/12/93", 5, 44, 3, 2, 0 },
479 { "IBM F1 P2 BIOS v1.0104/29/93", 5, 28, 3, -1, 0 },
480 { "Future Domain Corp. V1.0008/18/93", 5, 33, 3, 4, 0 },
481 { "Future Domain Corp. V1.0008/18/93", 26, 33, 3, 4, 1 },
482 { "Adaptec AHA-2920 PCI-SCSI Card", 42, 31, 3, -1, 1 },
483 { "IBM F1 P264/32", 5, 14, 3, -1, 1 },
484 /* This next signature may not be a 3.5 bios */
485 { "Future Domain Corp. V2.0108/18/93", 5, 33, 3, 5, 0 },
486 { "FUTURE DOMAIN CORP. V3.5008/18/93", 5, 34, 3, 5, 0 },
487 { "FUTURE DOMAIN 18c30/18c50/1800 (C) 1994 V3.5", 5, 44, 3, 5, 0 },
488 { "FUTURE DOMAIN CORP. V3.6008/18/93", 5, 34, 3, 6, 0 },
489 { "FUTURE DOMAIN CORP. V3.6108/18/93", 5, 34, 3, 6, 0 },
490 { "FUTURE DOMAIN TMC-18XX", 5, 22, -1, -1, 0 },
491
492 /* READ NOTICE ABOVE *BEFORE* YOU WASTE YOUR TIME ADDING A SIGNATURE
493 Also, fix the disk geometry code for your signature and send your
494 changes for faith@cs.unc.edu. Above all, do *NOT* change any old
495 signatures!
496
497 Note that the last line will match a "generic" 18XX bios. Because
498 Future Domain has changed the host SCSI ID and/or the location of the
499 geometry information in the on-board RAM area for each of the first
500 three BIOS's, it is still important to enter a fully qualified
501 signature in the table for any new BIOS's (after the host SCSI ID and
502 geometry location are verified). */
503};
504
505#define SIGNATURE_COUNT (sizeof( signatures ) / sizeof( struct signature ))
506
507static void print_banner( struct Scsi_Host *shpnt )
508{
509 if (!shpnt) return; /* This won't ever happen */
510
511 if (bios_major < 0 && bios_minor < 0) {
512 printk(KERN_INFO "scsi%d: <fdomain> No BIOS; using scsi id %d\n",
513 shpnt->host_no, shpnt->this_id);
514 } else {
515 printk(KERN_INFO "scsi%d: <fdomain> BIOS version ", shpnt->host_no);
516
517 if (bios_major >= 0) printk("%d.", bios_major);
518 else printk("?.");
519
520 if (bios_minor >= 0) printk("%d", bios_minor);
521 else printk("?.");
522
523 printk( " at 0x%lx using scsi id %d\n",
524 bios_base, shpnt->this_id );
525 }
526
527 /* If this driver works for later FD PCI
528 boards, we will have to modify banner
529 for additional PCI cards, but for now if
530 it's PCI it's a TMC-3260 - JTM */
531 printk(KERN_INFO "scsi%d: <fdomain> %s chip at 0x%x irq ",
532 shpnt->host_no,
533 chip == tmc1800 ? "TMC-1800" : (chip == tmc18c50 ? "TMC-18C50" : (chip == tmc18c30 ? (PCI_bus ? "TMC-36C70 (PCI bus)" : "TMC-18C30") : "Unknown")),
534 port_base);
535
536 if (interrupt_level)
537 printk("%d", interrupt_level);
538 else
539 printk("<none>");
540
541 printk( "\n" );
542}
543
544int fdomain_setup(char *str)
545{
546 int ints[4];
547
548 (void)get_options(str, ARRAY_SIZE(ints), ints);
549
550 if (setup_called++ || ints[0] < 2 || ints[0] > 3) {
551 printk(KERN_INFO "scsi: <fdomain> Usage: fdomain=<PORT_BASE>,<IRQ>[,<ADAPTER_ID>]\n");
552 printk(KERN_ERR "scsi: <fdomain> Bad LILO/INSMOD parameters?\n");
553 return 0;
554 }
555
556 port_base = ints[0] >= 1 ? ints[1] : 0;
557 interrupt_level = ints[0] >= 2 ? ints[2] : 0;
558 this_id = ints[0] >= 3 ? ints[3] : 0;
559
560 bios_major = bios_minor = -1; /* Use geometry for BIOS version >= 3.4 */
561 ++setup_called;
562 return 1;
563}
564
565__setup("fdomain=", fdomain_setup);
566
567
568static void do_pause(unsigned amount) /* Pause for amount*10 milliseconds */
569{
570 mdelay(10*amount);
571}
572
573inline static void fdomain_make_bus_idle( void )
574{
575 outb(0, port_base + SCSI_Cntl);
576 outb(0, port_base + SCSI_Mode_Cntl);
577 if (chip == tmc18c50 || chip == tmc18c30)
578 outb(0x21 | PARITY_MASK, port_base + TMC_Cntl); /* Clear forced intr. */
579 else
580 outb(0x01 | PARITY_MASK, port_base + TMC_Cntl);
581}
582
583static int fdomain_is_valid_port( int port )
584{
585#if DEBUG_DETECT
586 printk( " (%x%x),",
587 inb( port + MSB_ID_Code ), inb( port + LSB_ID_Code ) );
588#endif
589
590 /* The MCA ID is a unique id for each MCA compatible board. We
591 are using ISA boards, but Future Domain provides the MCA ID
592 anyway. We can use this ID to ensure that this is a Future
593 Domain TMC-1660/TMC-1680.
594 */
595
596 if (inb( port + LSB_ID_Code ) != 0xe9) { /* test for 0x6127 id */
597 if (inb( port + LSB_ID_Code ) != 0x27) return 0;
598 if (inb( port + MSB_ID_Code ) != 0x61) return 0;
599 chip = tmc1800;
600 } else { /* test for 0xe960 id */
601 if (inb( port + MSB_ID_Code ) != 0x60) return 0;
602 chip = tmc18c50;
603
604 /* Try to toggle 32-bit mode. This only
605 works on an 18c30 chip. (User reports
606 say this works, so we should switch to
607 it in the near future.) */
608
609 outb( 0x80, port + IO_Control );
610 if ((inb( port + Configuration2 ) & 0x80) == 0x80) {
611 outb( 0x00, port + IO_Control );
612 if ((inb( port + Configuration2 ) & 0x80) == 0x00) {
613 chip = tmc18c30;
614 FIFO_Size = 0x800; /* 2k FIFO */
615 }
616 }
617 /* If that failed, we are an 18c50. */
618 }
619
620 return 1;
621}
622
623static int fdomain_test_loopback( void )
624{
625 int i;
626 int result;
627
628 for (i = 0; i < 255; i++) {
629 outb( i, port_base + Write_Loopback );
630 result = inb( port_base + Read_Loopback );
631 if (i != result)
632 return 1;
633 }
634 return 0;
635}
636
637/* fdomain_get_irq assumes that we have a valid MCA ID for a
638 TMC-1660/TMC-1680 Future Domain board. Now, check to be sure the
639 bios_base matches these ports. If someone was unlucky enough to have
640 purchased more than one Future Domain board, then they will have to
641 modify this code, as we only detect one board here. [The one with the
642 lowest bios_base.]
643
644 Note that this routine is only used for systems without a PCI BIOS32
645 (e.g., ISA bus). For PCI bus systems, this routine will likely fail
646 unless one of the IRQs listed in the ints array is used by the board.
647 Sometimes it is possible to use the computer's BIOS setup screen to
648 configure a PCI system so that one of these IRQs will be used by the
649 Future Domain card. */
650
651static int fdomain_get_irq( int base )
652{
653 int options = inb(base + Configuration1);
654
655#if DEBUG_DETECT
656 printk("scsi: <fdomain> Options = %x\n", options);
657#endif
658
659 /* Check for board with lowest bios_base --
660 this isn't valid for the 18c30 or for
661 boards on the PCI bus, so just assume we
662 have the right board. */
663
664 if (chip != tmc18c30 && !PCI_bus && addresses[(options & 0xc0) >> 6 ] != bios_base)
665 return 0;
666 return ints[(options & 0x0e) >> 1];
667}
668
669static int fdomain_isa_detect( int *irq, int *iobase )
670{
671#ifndef PCMCIA
672 int i, j;
673 int base = 0xdeadbeef;
674 int flag = 0;
675
676#if DEBUG_DETECT
677 printk( "scsi: <fdomain> fdomain_isa_detect:" );
678#endif
679
680 for (i = 0; i < ADDRESS_COUNT; i++) {
681 void __iomem *p = ioremap(addresses[i], 0x2000);
682 if (!p)
683 continue;
684#if DEBUG_DETECT
685 printk( " %lx(%lx),", addresses[i], bios_base );
686#endif
687 for (j = 0; j < SIGNATURE_COUNT; j++) {
688 if (check_signature(p + signatures[j].sig_offset,
689 signatures[j].signature,
690 signatures[j].sig_length )) {
691 bios_major = signatures[j].major_bios_version;
692 bios_minor = signatures[j].minor_bios_version;
693 PCI_bus = (signatures[j].flag == 1);
694 Quantum = (signatures[j].flag > 1) ? signatures[j].flag : 0;
695 bios_base = addresses[i];
696 bios_mem = p;
697 goto found;
698 }
699 }
700 iounmap(p);
701 }
702
703found:
704 if (bios_major == 2) {
705 /* The TMC-1660/TMC-1680 has a RAM area just after the BIOS ROM.
706 Assuming the ROM is enabled (otherwise we wouldn't have been
707 able to read the ROM signature :-), then the ROM sets up the
708 RAM area with some magic numbers, such as a list of port
709 base addresses and a list of the disk "geometry" reported to
710 DOS (this geometry has nothing to do with physical geometry).
711 */
712
713 switch (Quantum) {
714 case 2: /* ISA_200S */
715 case 3: /* ISA_250MG */
716 base = readb(bios_mem + 0x1fa2) + (readb(bios_mem + 0x1fa3) << 8);
717 break;
718 case 4: /* ISA_200S (another one) */
719 base = readb(bios_mem + 0x1fa3) + (readb(bios_mem + 0x1fa4) << 8);
720 break;
721 default:
722 base = readb(bios_mem + 0x1fcc) + (readb(bios_mem + 0x1fcd) << 8);
723 break;
724 }
725
726#if DEBUG_DETECT
727 printk( " %x,", base );
728#endif
729
730 for (i = 0; i < PORT_COUNT; i++) {
731 if (base == ports[i]) {
732 if (!request_region(base, 0x10, "fdomain"))
733 break;
734 if (!fdomain_is_valid_port(base)) {
735 release_region(base, 0x10);
736 break;
737 }
738 *irq = fdomain_get_irq( base );
739 *iobase = base;
740 return 1;
741 }
742 }
743
744 /* This is a bad sign. It usually means that someone patched the
745 BIOS signature list (the signatures variable) to contain a BIOS
746 signature for a board *OTHER THAN* the TMC-1660/TMC-1680. */
747
748#if DEBUG_DETECT
749 printk( " RAM FAILED, " );
750#endif
751 }
752
753 /* Anyway, the alternative to finding the address in the RAM is to just
754 search through every possible port address for one that is attached
755 to the Future Domain card. Don't panic, though, about reading all
756 these random port addresses -- there are rumors that the Future
757 Domain BIOS does something very similar.
758
759 Do not, however, check ports which the kernel knows are being used by
760 another driver. */
761
762 for (i = 0; i < PORT_COUNT; i++) {
763 base = ports[i];
764 if (!request_region(base, 0x10, "fdomain")) {
765#if DEBUG_DETECT
766 printk( " (%x inuse),", base );
767#endif
768 continue;
769 }
770#if DEBUG_DETECT
771 printk( " %x,", base );
772#endif
773 flag = fdomain_is_valid_port(base);
774 if (flag)
775 break;
776 release_region(base, 0x10);
777 }
778
779#if DEBUG_DETECT
780 if (flag) printk( " SUCCESS\n" );
781 else printk( " FAILURE\n" );
782#endif
783
784 if (!flag) return 0; /* iobase not found */
785
786 *irq = fdomain_get_irq( base );
787 *iobase = base;
788
789 return 1; /* success */
790#else
791 return 0;
792#endif
793}
794
795/* PCI detection function: int fdomain_pci_bios_detect(int* irq, int*
796 iobase) This function gets the Interrupt Level and I/O base address from
797 the PCI configuration registers. */
798
799#ifdef CONFIG_PCI
800static int fdomain_pci_bios_detect( int *irq, int *iobase, struct pci_dev **ret_pdev )
801{
802 unsigned int pci_irq; /* PCI interrupt line */
803 unsigned long pci_base; /* PCI I/O base address */
804 struct pci_dev *pdev = NULL;
805
806#if DEBUG_DETECT
807 /* Tell how to print a list of the known PCI devices from bios32 and
808 list vendor and device IDs being used if in debug mode. */
809
810 printk( "scsi: <fdomain> INFO: use lspci -v to see list of PCI devices\n" );
811 printk( "scsi: <fdomain> TMC-3260 detect:"
812 " Using Vendor ID: 0x%x and Device ID: 0x%x\n",
813 PCI_VENDOR_ID_FD,
814 PCI_DEVICE_ID_FD_36C70 );
815#endif
816
817 if ((pdev = pci_find_device(PCI_VENDOR_ID_FD, PCI_DEVICE_ID_FD_36C70, pdev)) == NULL)
818 return 0;
819 if (pci_enable_device(pdev)) return 0;
820
821#if DEBUG_DETECT
822 printk( "scsi: <fdomain> TMC-3260 detect:"
823 " PCI bus %u, device %u, function %u\n",
824 pdev->bus->number,
825 PCI_SLOT(pdev->devfn),
826 PCI_FUNC(pdev->devfn));
827#endif
828
829 /* We now have the appropriate device function for the FD board so we
830 just read the PCI config info from the registers. */
831
832 pci_base = pci_resource_start(pdev, 0);
833 pci_irq = pdev->irq;
834
835 if (!request_region( pci_base, 0x10, "fdomain" ))
836 return 0;
837
838 /* Now we have the I/O base address and interrupt from the PCI
839 configuration registers. */
840
841 *irq = pci_irq;
842 *iobase = pci_base;
843 *ret_pdev = pdev;
844
845#if DEBUG_DETECT
846 printk( "scsi: <fdomain> TMC-3260 detect:"
847 " IRQ = %d, I/O base = 0x%x [0x%lx]\n", *irq, *iobase, pci_base );
848#endif
849
850 if (!fdomain_is_valid_port(pci_base)) {
851 printk(KERN_ERR "scsi: <fdomain> PCI card detected, but driver not loaded (invalid port)\n" );
852 release_region(pci_base, 0x10);
853 return 0;
854 }
855
856 /* Fill in a few global variables. Ugh. */
857 bios_major = bios_minor = -1;
858 PCI_bus = 1;
859 Quantum = 0;
860 bios_base = 0;
861
862 return 1;
863}
864#endif
865
866struct Scsi_Host *__fdomain_16x0_detect(struct scsi_host_template *tpnt )
867{
868 int retcode;
869 struct Scsi_Host *shpnt;
870 struct pci_dev *pdev = NULL;
871
872 if (setup_called) {
873#if DEBUG_DETECT
874 printk( "scsi: <fdomain> No BIOS, using port_base = 0x%x, irq = %d\n",
875 port_base, interrupt_level );
876#endif
877 if (!request_region(port_base, 0x10, "fdomain")) {
878 printk( "scsi: <fdomain> port 0x%x is busy\n", port_base );
879 printk( "scsi: <fdomain> Bad LILO/INSMOD parameters?\n" );
880 return NULL;
881 }
882 if (!fdomain_is_valid_port( port_base )) {
883 printk( "scsi: <fdomain> Cannot locate chip at port base 0x%x\n",
884 port_base );
885 printk( "scsi: <fdomain> Bad LILO/INSMOD parameters?\n" );
886 release_region(port_base, 0x10);
887 return NULL;
888 }
889 } else {
890 int flag = 0;
891
892#ifdef CONFIG_PCI
893 /* Try PCI detection first */
894 flag = fdomain_pci_bios_detect( &interrupt_level, &port_base, &pdev );
895#endif
896 if (!flag) {
897 /* Then try ISA bus detection */
898 flag = fdomain_isa_detect( &interrupt_level, &port_base );
899
900 if (!flag) {
901 printk( "scsi: <fdomain> Detection failed (no card)\n" );
902 return NULL;
903 }
904 }
905 }
906
907 fdomain_16x0_bus_reset(NULL);
908
909 if (fdomain_test_loopback()) {
910 printk(KERN_ERR "scsi: <fdomain> Detection failed (loopback test failed at port base 0x%x)\n", port_base);
911 if (setup_called) {
912 printk(KERN_ERR "scsi: <fdomain> Bad LILO/INSMOD parameters?\n");
913 }
914 release_region(port_base, 0x10);
915 return NULL;
916 }
917
918 if (this_id) {
919 tpnt->this_id = (this_id & 0x07);
920 adapter_mask = (1 << tpnt->this_id);
921 } else {
922 if (PCI_bus || (bios_major == 3 && bios_minor >= 2) || bios_major < 0) {
923 tpnt->this_id = 7;
924 adapter_mask = 0x80;
925 } else {
926 tpnt->this_id = 6;
927 adapter_mask = 0x40;
928 }
929 }
930
931/* Print out a banner here in case we can't
932 get resources. */
933
934 shpnt = scsi_register( tpnt, 0 );
935 if(shpnt == NULL) {
936 release_region(port_base, 0x10);
937 return NULL;
938 }
939 shpnt->irq = interrupt_level;
940 shpnt->io_port = port_base;
941 scsi_set_device(shpnt, &pdev->dev);
942 shpnt->n_io_port = 0x10;
943 print_banner( shpnt );
944
945 /* Log IRQ with kernel */
946 if (!interrupt_level) {
947 printk(KERN_ERR "scsi: <fdomain> Card Detected, but driver not loaded (no IRQ)\n" );
948 release_region(port_base, 0x10);
949 return NULL;
950 } else {
951 /* Register the IRQ with the kernel */
952
953 retcode = request_irq( interrupt_level,
954 do_fdomain_16x0_intr, pdev?SA_SHIRQ:0, "fdomain", shpnt);
955
956 if (retcode < 0) {
957 if (retcode == -EINVAL) {
958 printk(KERN_ERR "scsi: <fdomain> IRQ %d is bad!\n", interrupt_level );
959 printk(KERN_ERR " This shouldn't happen!\n" );
960 printk(KERN_ERR " Send mail to faith@acm.org\n" );
961 } else if (retcode == -EBUSY) {
962 printk(KERN_ERR "scsi: <fdomain> IRQ %d is already in use!\n", interrupt_level );
963 printk(KERN_ERR " Please use another IRQ!\n" );
964 } else {
965 printk(KERN_ERR "scsi: <fdomain> Error getting IRQ %d\n", interrupt_level );
966 printk(KERN_ERR " This shouldn't happen!\n" );
967 printk(KERN_ERR " Send mail to faith@acm.org\n" );
968 }
969 printk(KERN_ERR "scsi: <fdomain> Detected, but driver not loaded (IRQ)\n" );
970 release_region(port_base, 0x10);
971 return NULL;
972 }
973 }
974 return shpnt;
975}
976
977static int fdomain_16x0_detect(struct scsi_host_template *tpnt)
978{
979 if (fdomain)
980 fdomain_setup(fdomain);
981 return (__fdomain_16x0_detect(tpnt) != NULL);
982}
983
984static const char *fdomain_16x0_info( struct Scsi_Host *ignore )
985{
986 static char buffer[128];
987 char *pt;
988
989 strcpy( buffer, "Future Domain 16-bit SCSI Driver Version" );
990 if (strchr( VERSION, ':')) { /* Assume VERSION is an RCS Revision string */
991 strcat( buffer, strchr( VERSION, ':' ) + 1 );
992 pt = strrchr( buffer, '$') - 1;
993 if (!pt) /* Stripped RCS Revision string? */
994 pt = buffer + strlen( buffer ) - 1;
995 if (*pt != ' ')
996 ++pt;
997 *pt = '\0';
998 } else { /* Assume VERSION is a number */
999 strcat( buffer, " " VERSION );
1000 }
1001
1002 return buffer;
1003}
1004
1005#if 0
1006static int fdomain_arbitrate( void )
1007{
1008 int status = 0;
1009 unsigned long timeout;
1010
1011#if EVERY_ACCESS
1012 printk( "fdomain_arbitrate()\n" );
1013#endif
1014
1015 outb(0x00, port_base + SCSI_Cntl); /* Disable data drivers */
1016 outb(adapter_mask, port_base + SCSI_Data_NoACK); /* Set our id bit */
1017 outb(0x04 | PARITY_MASK, port_base + TMC_Cntl); /* Start arbitration */
1018
1019 timeout = 500;
1020 do {
1021 status = inb(port_base + TMC_Status); /* Read adapter status */
1022 if (status & 0x02) /* Arbitration complete */
1023 return 0;
1024 mdelay(1); /* Wait one millisecond */
1025 } while (--timeout);
1026
1027 /* Make bus idle */
1028 fdomain_make_bus_idle();
1029
1030#if EVERY_ACCESS
1031 printk( "Arbitration failed, status = %x\n", status );
1032#endif
1033#if ERRORS_ONLY
1034 printk( "scsi: <fdomain> Arbitration failed, status = %x\n", status );
1035#endif
1036 return 1;
1037}
1038#endif
1039
1040static int fdomain_select( int target )
1041{
1042 int status;
1043 unsigned long timeout;
1044#if ERRORS_ONLY
1045 static int flag = 0;
1046#endif
1047
1048 outb(0x82, port_base + SCSI_Cntl); /* Bus Enable + Select */
1049 outb(adapter_mask | (1 << target), port_base + SCSI_Data_NoACK);
1050
1051 /* Stop arbitration and enable parity */
1052 outb(PARITY_MASK, port_base + TMC_Cntl);
1053
1054 timeout = 350; /* 350 msec */
1055
1056 do {
1057 status = inb(port_base + SCSI_Status); /* Read adapter status */
1058 if (status & 1) { /* Busy asserted */
1059 /* Enable SCSI Bus (on error, should make bus idle with 0) */
1060 outb(0x80, port_base + SCSI_Cntl);
1061 return 0;
1062 }
1063 mdelay(1); /* wait one msec */
1064 } while (--timeout);
1065 /* Make bus idle */
1066 fdomain_make_bus_idle();
1067#if EVERY_ACCESS
1068 if (!target) printk( "Selection failed\n" );
1069#endif
1070#if ERRORS_ONLY
1071 if (!target) {
1072 if (!flag) /* Skip first failure for all chips. */
1073 ++flag;
1074 else
1075 printk( "scsi: <fdomain> Selection failed\n" );
1076 }
1077#endif
1078 return 1;
1079}
1080
1081static void my_done(int error)
1082{
1083 if (in_command) {
1084 in_command = 0;
1085 outb(0x00, port_base + Interrupt_Cntl);
1086 fdomain_make_bus_idle();
1087 current_SC->result = error;
1088 if (current_SC->scsi_done)
1089 current_SC->scsi_done( current_SC );
1090 else panic( "scsi: <fdomain> current_SC->scsi_done() == NULL" );
1091 } else {
1092 panic( "scsi: <fdomain> my_done() called outside of command\n" );
1093 }
1094#if DEBUG_RACE
1095 in_interrupt_flag = 0;
1096#endif
1097}
1098
1099static irqreturn_t do_fdomain_16x0_intr(int irq, void *dev_id,
1100 struct pt_regs * regs )
1101{
1102 unsigned long flags;
1103 int status;
1104 int done = 0;
1105 unsigned data_count;
1106
1107 /* The fdomain_16x0_intr is only called via
1108 the interrupt handler. The goal of the
1109 sti() here is to allow other
1110 interruptions while this routine is
1111 running. */
1112
1113 /* Check for other IRQ sources */
1114 if ((inb(port_base + TMC_Status) & 0x01) == 0)
1115 return IRQ_NONE;
1116
1117 /* It is our IRQ */
1118 outb(0x00, port_base + Interrupt_Cntl);
1119
1120 /* We usually have one spurious interrupt after each command. Ignore it. */
1121 if (!in_command || !current_SC) { /* Spurious interrupt */
1122#if EVERY_ACCESS
1123 printk( "Spurious interrupt, in_command = %d, current_SC = %x\n",
1124 in_command, current_SC );
1125#endif
1126 return IRQ_NONE;
1127 }
1128
1129 /* Abort calls my_done, so we do nothing here. */
1130 if (current_SC->SCp.phase & aborted) {
1131#if DEBUG_ABORT
1132 printk( "scsi: <fdomain> Interrupt after abort, ignoring\n" );
1133#endif
1134 /*
1135 return IRQ_HANDLED; */
1136 }
1137
1138#if DEBUG_RACE
1139 ++in_interrupt_flag;
1140#endif
1141
1142 if (current_SC->SCp.phase & in_arbitration) {
1143 status = inb(port_base + TMC_Status); /* Read adapter status */
1144 if (!(status & 0x02)) {
1145#if EVERY_ACCESS
1146 printk( " AFAIL " );
1147#endif
1148 spin_lock_irqsave(current_SC->device->host->host_lock, flags);
1149 my_done( DID_BUS_BUSY << 16 );
1150 spin_unlock_irqrestore(current_SC->device->host->host_lock, flags);
1151 return IRQ_HANDLED;
1152 }
1153 current_SC->SCp.phase = in_selection;
1154
1155 outb(0x40 | FIFO_COUNT, port_base + Interrupt_Cntl);
1156
1157 outb(0x82, port_base + SCSI_Cntl); /* Bus Enable + Select */
1158 outb(adapter_mask | (1 << current_SC->device->id), port_base + SCSI_Data_NoACK);
1159
1160 /* Stop arbitration and enable parity */
1161 outb(0x10 | PARITY_MASK, port_base + TMC_Cntl);
1162#if DEBUG_RACE
1163 in_interrupt_flag = 0;
1164#endif
1165 return IRQ_HANDLED;
1166 } else if (current_SC->SCp.phase & in_selection) {
1167 status = inb(port_base + SCSI_Status);
1168 if (!(status & 0x01)) {
1169 /* Try again, for slow devices */
1170 if (fdomain_select( current_SC->device->id )) {
1171#if EVERY_ACCESS
1172 printk( " SFAIL " );
1173#endif
1174 spin_lock_irqsave(current_SC->device->host->host_lock, flags);
1175 my_done( DID_NO_CONNECT << 16 );
1176 spin_unlock_irqrestore(current_SC->device->host->host_lock, flags);
1177 return IRQ_HANDLED;
1178 } else {
1179#if EVERY_ACCESS
1180 printk( " AltSel " );
1181#endif
1182 /* Stop arbitration and enable parity */
1183 outb(0x10 | PARITY_MASK, port_base + TMC_Cntl);
1184 }
1185 }
1186 current_SC->SCp.phase = in_other;
1187 outb(0x90 | FIFO_COUNT, port_base + Interrupt_Cntl);
1188 outb(0x80, port_base + SCSI_Cntl);
1189#if DEBUG_RACE
1190 in_interrupt_flag = 0;
1191#endif
1192 return IRQ_HANDLED;
1193 }
1194
1195 /* current_SC->SCp.phase == in_other: this is the body of the routine */
1196
1197 status = inb(port_base + SCSI_Status);
1198
1199 if (status & 0x10) { /* REQ */
1200
1201 switch (status & 0x0e) {
1202
1203 case 0x08: /* COMMAND OUT */
1204 outb(current_SC->cmnd[current_SC->SCp.sent_command++],
1205 port_base + Write_SCSI_Data);
1206#if EVERY_ACCESS
1207 printk( "CMD = %x,",
1208 current_SC->cmnd[ current_SC->SCp.sent_command - 1] );
1209#endif
1210 break;
1211 case 0x00: /* DATA OUT -- tmc18c50/tmc18c30 only */
1212 if (chip != tmc1800 && !current_SC->SCp.have_data_in) {
1213 current_SC->SCp.have_data_in = -1;
1214 outb(0xd0 | PARITY_MASK, port_base + TMC_Cntl);
1215 }
1216 break;
1217 case 0x04: /* DATA IN -- tmc18c50/tmc18c30 only */
1218 if (chip != tmc1800 && !current_SC->SCp.have_data_in) {
1219 current_SC->SCp.have_data_in = 1;
1220 outb(0x90 | PARITY_MASK, port_base + TMC_Cntl);
1221 }
1222 break;
1223 case 0x0c: /* STATUS IN */
1224 current_SC->SCp.Status = inb(port_base + Read_SCSI_Data);
1225#if EVERY_ACCESS
1226 printk( "Status = %x, ", current_SC->SCp.Status );
1227#endif
1228#if ERRORS_ONLY
1229 if (current_SC->SCp.Status
1230 && current_SC->SCp.Status != 2
1231 && current_SC->SCp.Status != 8) {
1232 printk( "scsi: <fdomain> target = %d, command = %x, status = %x\n",
1233 current_SC->device->id,
1234 current_SC->cmnd[0],
1235 current_SC->SCp.Status );
1236 }
1237#endif
1238 break;
1239 case 0x0a: /* MESSAGE OUT */
1240 outb(MESSAGE_REJECT, port_base + Write_SCSI_Data); /* Reject */
1241 break;
1242 case 0x0e: /* MESSAGE IN */
1243 current_SC->SCp.Message = inb(port_base + Read_SCSI_Data);
1244#if EVERY_ACCESS
1245 printk( "Message = %x, ", current_SC->SCp.Message );
1246#endif
1247 if (!current_SC->SCp.Message) ++done;
1248#if DEBUG_MESSAGES || EVERY_ACCESS
1249 if (current_SC->SCp.Message) {
1250 printk( "scsi: <fdomain> message = %x\n",
1251 current_SC->SCp.Message );
1252 }
1253#endif
1254 break;
1255 }
1256 }
1257
1258 if (chip == tmc1800 && !current_SC->SCp.have_data_in
1259 && (current_SC->SCp.sent_command >= current_SC->cmd_len)) {
1260
1261 if(current_SC->sc_data_direction == DMA_TO_DEVICE)
1262 {
1263 current_SC->SCp.have_data_in = -1;
1264 outb(0xd0 | PARITY_MASK, port_base + TMC_Cntl);
1265 }
1266 else
1267 {
1268 current_SC->SCp.have_data_in = 1;
1269 outb(0x90 | PARITY_MASK, port_base + TMC_Cntl);
1270 }
1271 }
1272
1273 if (current_SC->SCp.have_data_in == -1) { /* DATA OUT */
1274 while ((data_count = FIFO_Size - inw(port_base + FIFO_Data_Count)) > 512) {
1275#if EVERY_ACCESS
1276 printk( "DC=%d, ", data_count ) ;
1277#endif
1278 if (data_count > current_SC->SCp.this_residual)
1279 data_count = current_SC->SCp.this_residual;
1280 if (data_count > 0) {
1281#if EVERY_ACCESS
1282 printk( "%d OUT, ", data_count );
1283#endif
1284 if (data_count == 1) {
1285 outb(*current_SC->SCp.ptr++, port_base + Write_FIFO);
1286 --current_SC->SCp.this_residual;
1287 } else {
1288 data_count >>= 1;
1289 outsw(port_base + Write_FIFO, current_SC->SCp.ptr, data_count);
1290 current_SC->SCp.ptr += 2 * data_count;
1291 current_SC->SCp.this_residual -= 2 * data_count;
1292 }
1293 }
1294 if (!current_SC->SCp.this_residual) {
1295 if (current_SC->SCp.buffers_residual) {
1296 --current_SC->SCp.buffers_residual;
1297 ++current_SC->SCp.buffer;
1298 current_SC->SCp.ptr = page_address(current_SC->SCp.buffer->page) + current_SC->SCp.buffer->offset;
1299 current_SC->SCp.this_residual = current_SC->SCp.buffer->length;
1300 } else
1301 break;
1302 }
1303 }
1304 }
1305
1306 if (current_SC->SCp.have_data_in == 1) { /* DATA IN */
1307 while ((data_count = inw(port_base + FIFO_Data_Count)) > 0) {
1308#if EVERY_ACCESS
1309 printk( "DC=%d, ", data_count );
1310#endif
1311 if (data_count > current_SC->SCp.this_residual)
1312 data_count = current_SC->SCp.this_residual;
1313 if (data_count) {
1314#if EVERY_ACCESS
1315 printk( "%d IN, ", data_count );
1316#endif
1317 if (data_count == 1) {
1318 *current_SC->SCp.ptr++ = inb(port_base + Read_FIFO);
1319 --current_SC->SCp.this_residual;
1320 } else {
1321 data_count >>= 1; /* Number of words */
1322 insw(port_base + Read_FIFO, current_SC->SCp.ptr, data_count);
1323 current_SC->SCp.ptr += 2 * data_count;
1324 current_SC->SCp.this_residual -= 2 * data_count;
1325 }
1326 }
1327 if (!current_SC->SCp.this_residual
1328 && current_SC->SCp.buffers_residual) {
1329 --current_SC->SCp.buffers_residual;
1330 ++current_SC->SCp.buffer;
1331 current_SC->SCp.ptr = page_address(current_SC->SCp.buffer->page) + current_SC->SCp.buffer->offset;
1332 current_SC->SCp.this_residual = current_SC->SCp.buffer->length;
1333 }
1334 }
1335 }
1336
1337 if (done) {
1338#if EVERY_ACCESS
1339 printk( " ** IN DONE %d ** ", current_SC->SCp.have_data_in );
1340#endif
1341
1342#if ERRORS_ONLY
1343 if (current_SC->cmnd[0] == REQUEST_SENSE && !current_SC->SCp.Status) {
1344 if ((unsigned char)(*((char *)current_SC->request_buffer+2)) & 0x0f) {
1345 unsigned char key;
1346 unsigned char code;
1347 unsigned char qualifier;
1348
1349 key = (unsigned char)(*((char *)current_SC->request_buffer + 2))
1350 & 0x0f;
1351 code = (unsigned char)(*((char *)current_SC->request_buffer + 12));
1352 qualifier = (unsigned char)(*((char *)current_SC->request_buffer
1353 + 13));
1354
1355 if (key != UNIT_ATTENTION
1356 && !(key == NOT_READY
1357 && code == 0x04
1358 && (!qualifier || qualifier == 0x02 || qualifier == 0x01))
1359 && !(key == ILLEGAL_REQUEST && (code == 0x25
1360 || code == 0x24
1361 || !code)))
1362
1363 printk( "scsi: <fdomain> REQUEST SENSE"
1364 " Key = %x, Code = %x, Qualifier = %x\n",
1365 key, code, qualifier );
1366 }
1367 }
1368#endif
1369#if EVERY_ACCESS
1370 printk( "BEFORE MY_DONE. . ." );
1371#endif
1372 spin_lock_irqsave(current_SC->device->host->host_lock, flags);
1373 my_done( (current_SC->SCp.Status & 0xff)
1374 | ((current_SC->SCp.Message & 0xff) << 8) | (DID_OK << 16) );
1375 spin_unlock_irqrestore(current_SC->device->host->host_lock, flags);
1376#if EVERY_ACCESS
1377 printk( "RETURNING.\n" );
1378#endif
1379
1380 } else {
1381 if (current_SC->SCp.phase & disconnect) {
1382 outb(0xd0 | FIFO_COUNT, port_base + Interrupt_Cntl);
1383 outb(0x00, port_base + SCSI_Cntl);
1384 } else {
1385 outb(0x90 | FIFO_COUNT, port_base + Interrupt_Cntl);
1386 }
1387 }
1388#if DEBUG_RACE
1389 in_interrupt_flag = 0;
1390#endif
1391 return IRQ_HANDLED;
1392}
1393
1394static int fdomain_16x0_queue(struct scsi_cmnd *SCpnt,
1395 void (*done)(struct scsi_cmnd *))
1396{
1397 if (in_command) {
1398 panic( "scsi: <fdomain> fdomain_16x0_queue() NOT REENTRANT!\n" );
1399 }
1400#if EVERY_ACCESS
1401 printk( "queue: target = %d cmnd = 0x%02x pieces = %d size = %u\n",
1402 SCpnt->target,
1403 *(unsigned char *)SCpnt->cmnd,
1404 SCpnt->use_sg,
1405 SCpnt->request_bufflen );
1406#endif
1407
1408 fdomain_make_bus_idle();
1409
1410 current_SC = SCpnt; /* Save this for the done function */
1411 current_SC->scsi_done = done;
1412
1413 /* Initialize static data */
1414
1415 if (current_SC->use_sg) {
1416 current_SC->SCp.buffer =
1417 (struct scatterlist *)current_SC->request_buffer;
1418 current_SC->SCp.ptr = page_address(current_SC->SCp.buffer->page) + current_SC->SCp.buffer->offset;
1419 current_SC->SCp.this_residual = current_SC->SCp.buffer->length;
1420 current_SC->SCp.buffers_residual = current_SC->use_sg - 1;
1421 } else {
1422 current_SC->SCp.ptr = (char *)current_SC->request_buffer;
1423 current_SC->SCp.this_residual = current_SC->request_bufflen;
1424 current_SC->SCp.buffer = NULL;
1425 current_SC->SCp.buffers_residual = 0;
1426 }
1427
1428
1429 current_SC->SCp.Status = 0;
1430 current_SC->SCp.Message = 0;
1431 current_SC->SCp.have_data_in = 0;
1432 current_SC->SCp.sent_command = 0;
1433 current_SC->SCp.phase = in_arbitration;
1434
1435 /* Start arbitration */
1436 outb(0x00, port_base + Interrupt_Cntl);
1437 outb(0x00, port_base + SCSI_Cntl); /* Disable data drivers */
1438 outb(adapter_mask, port_base + SCSI_Data_NoACK); /* Set our id bit */
1439 ++in_command;
1440 outb(0x20, port_base + Interrupt_Cntl);
1441 outb(0x14 | PARITY_MASK, port_base + TMC_Cntl); /* Start arbitration */
1442
1443 return 0;
1444}
1445
1446#if DEBUG_ABORT
1447static void print_info(struct scsi_cmnd *SCpnt)
1448{
1449 unsigned int imr;
1450 unsigned int irr;
1451 unsigned int isr;
1452
1453 if (!SCpnt || !SCpnt->device || !SCpnt->device->host) {
1454 printk(KERN_WARNING "scsi: <fdomain> Cannot provide detailed information\n");
1455 return;
1456 }
1457
1458 printk(KERN_INFO "%s\n", fdomain_16x0_info( SCpnt->device->host ) );
1459 print_banner(SCpnt->device->host);
1460 switch (SCpnt->SCp.phase) {
1461 case in_arbitration: printk("arbitration"); break;
1462 case in_selection: printk("selection"); break;
1463 case in_other: printk("other"); break;
1464 default: printk("unknown"); break;
1465 }
1466
1467 printk( " (%d), target = %d cmnd = 0x%02x pieces = %d size = %u\n",
1468 SCpnt->SCp.phase,
1469 SCpnt->device->id,
1470 *(unsigned char *)SCpnt->cmnd,
1471 SCpnt->use_sg,
1472 SCpnt->request_bufflen );
1473 printk( "sent_command = %d, have_data_in = %d, timeout = %d\n",
1474 SCpnt->SCp.sent_command,
1475 SCpnt->SCp.have_data_in,
1476 SCpnt->timeout );
1477#if DEBUG_RACE
1478 printk( "in_interrupt_flag = %d\n", in_interrupt_flag );
1479#endif
1480
1481 imr = (inb( 0x0a1 ) << 8) + inb( 0x21 );
1482 outb( 0x0a, 0xa0 );
1483 irr = inb( 0xa0 ) << 8;
1484 outb( 0x0a, 0x20 );
1485 irr += inb( 0x20 );
1486 outb( 0x0b, 0xa0 );
1487 isr = inb( 0xa0 ) << 8;
1488 outb( 0x0b, 0x20 );
1489 isr += inb( 0x20 );
1490
1491 /* Print out interesting information */
1492 printk( "IMR = 0x%04x", imr );
1493 if (imr & (1 << interrupt_level))
1494 printk( " (masked)" );
1495 printk( ", IRR = 0x%04x, ISR = 0x%04x\n", irr, isr );
1496
1497 printk( "SCSI Status = 0x%02x\n", inb(port_base + SCSI_Status));
1498 printk( "TMC Status = 0x%02x", inb(port_base + TMC_Status));
1499 if (inb((port_base + TMC_Status) & 1))
1500 printk( " (interrupt)" );
1501 printk( "\n" );
1502 printk("Interrupt Status = 0x%02x", inb(port_base + Interrupt_Status));
1503 if (inb(port_base + Interrupt_Status) & 0x08)
1504 printk( " (enabled)" );
1505 printk( "\n" );
1506 if (chip == tmc18c50 || chip == tmc18c30) {
1507 printk("FIFO Status = 0x%02x\n", inb(port_base + FIFO_Status));
1508 printk( "Int. Condition = 0x%02x\n",
1509 inb( port_base + Interrupt_Cond ) );
1510 }
1511 printk( "Configuration 1 = 0x%02x\n", inb( port_base + Configuration1 ) );
1512 if (chip == tmc18c50 || chip == tmc18c30)
1513 printk( "Configuration 2 = 0x%02x\n",
1514 inb( port_base + Configuration2 ) );
1515}
1516#endif
1517
1518static int fdomain_16x0_abort(struct scsi_cmnd *SCpnt)
1519{
1520#if EVERY_ACCESS || ERRORS_ONLY || DEBUG_ABORT
1521 printk( "scsi: <fdomain> abort " );
1522#endif
1523
1524 if (!in_command) {
1525#if EVERY_ACCESS || ERRORS_ONLY
1526 printk( " (not in command)\n" );
1527#endif
1528 return FAILED;
1529 } else printk( "\n" );
1530
1531#if DEBUG_ABORT
1532 print_info( SCpnt );
1533#endif
1534
1535 fdomain_make_bus_idle();
1536 current_SC->SCp.phase |= aborted;
1537 current_SC->result = DID_ABORT << 16;
1538
1539 /* Aborts are not done well. . . */
1540 my_done(DID_ABORT << 16);
1541 return SUCCESS;
1542}
1543
1544int fdomain_16x0_bus_reset(struct scsi_cmnd *SCpnt)
1545{
1546 outb(1, port_base + SCSI_Cntl);
1547 do_pause( 2 );
1548 outb(0, port_base + SCSI_Cntl);
1549 do_pause( 115 );
1550 outb(0, port_base + SCSI_Mode_Cntl);
1551 outb(PARITY_MASK, port_base + TMC_Cntl);
1552 return SUCCESS;
1553}
1554
1555static int fdomain_16x0_biosparam(struct scsi_device *sdev,
1556 struct block_device *bdev,
1557 sector_t capacity, int *info_array)
1558{
1559 int drive;
1560 int size = capacity;
1561 unsigned long offset;
1562 struct drive_info {
1563 unsigned short cylinders;
1564 unsigned char heads;
1565 unsigned char sectors;
1566 } i;
1567
1568 /* NOTES:
1569 The RAM area starts at 0x1f00 from the bios_base address.
1570
1571 For BIOS Version 2.0:
1572
1573 The drive parameter table seems to start at 0x1f30.
1574 The first byte's purpose is not known.
1575 Next is the cylinder, head, and sector information.
1576 The last 4 bytes appear to be the drive's size in sectors.
1577 The other bytes in the drive parameter table are unknown.
1578 If anyone figures them out, please send me mail, and I will
1579 update these notes.
1580
1581 Tape drives do not get placed in this table.
1582
1583 There is another table at 0x1fea:
1584 If the byte is 0x01, then the SCSI ID is not in use.
1585 If the byte is 0x18 or 0x48, then the SCSI ID is in use,
1586 although tapes don't seem to be in this table. I haven't
1587 seen any other numbers (in a limited sample).
1588
1589 0x1f2d is a drive count (i.e., not including tapes)
1590
1591 The table at 0x1fcc are I/O ports addresses for the various
1592 operations. I calculate these by hand in this driver code.
1593
1594
1595
1596 For the ISA-200S version of BIOS Version 2.0:
1597
1598 The drive parameter table starts at 0x1f33.
1599
1600 WARNING: Assume that the table entry is 25 bytes long. Someone needs
1601 to check this for the Quantum ISA-200S card.
1602
1603
1604
1605 For BIOS Version 3.2:
1606
1607 The drive parameter table starts at 0x1f70. Each entry is
1608 0x0a bytes long. Heads are one less than we need to report.
1609 */
1610
1611 if (MAJOR(bdev->bd_dev) != SCSI_DISK0_MAJOR) {
1612 printk("scsi: <fdomain> fdomain_16x0_biosparam: too many disks");
1613 return 0;
1614 }
1615 drive = MINOR(bdev->bd_dev) >> 4;
1616
1617 if (bios_major == 2) {
1618 switch (Quantum) {
1619 case 2: /* ISA_200S */
1620 /* The value of 25 has never been verified.
1621 It should probably be 15. */
1622 offset = 0x1f33 + drive * 25;
1623 break;
1624 case 3: /* ISA_250MG */
1625 offset = 0x1f36 + drive * 15;
1626 break;
1627 case 4: /* ISA_200S (another one) */
1628 offset = 0x1f34 + drive * 15;
1629 break;
1630 default:
1631 offset = 0x1f31 + drive * 25;
1632 break;
1633 }
1634 memcpy_fromio( &i, bios_mem + offset, sizeof( struct drive_info ) );
1635 info_array[0] = i.heads;
1636 info_array[1] = i.sectors;
1637 info_array[2] = i.cylinders;
1638 } else if (bios_major == 3
1639 && bios_minor >= 0
1640 && bios_minor < 4) { /* 3.0 and 3.2 BIOS */
1641 memcpy_fromio( &i, bios_mem + 0x1f71 + drive * 10,
1642 sizeof( struct drive_info ) );
1643 info_array[0] = i.heads + 1;
1644 info_array[1] = i.sectors;
1645 info_array[2] = i.cylinders;
1646 } else { /* 3.4 BIOS (and up?) */
1647 /* This algorithm was provided by Future Domain (much thanks!). */
1648 unsigned char *p = scsi_bios_ptable(bdev);
1649
1650 if (p && p[65] == 0xaa && p[64] == 0x55 /* Partition table valid */
1651 && p[4]) { /* Partition type */
1652
1653 /* The partition table layout is as follows:
1654
1655 Start: 0x1b3h
1656 Offset: 0 = partition status
1657 1 = starting head
1658 2 = starting sector and cylinder (word, encoded)
1659 4 = partition type
1660 5 = ending head
1661 6 = ending sector and cylinder (word, encoded)
1662 8 = starting absolute sector (double word)
1663 c = number of sectors (double word)
1664 Signature: 0x1fe = 0x55aa
1665
1666 So, this algorithm assumes:
1667 1) the first partition table is in use,
1668 2) the data in the first entry is correct, and
1669 3) partitions never divide cylinders
1670
1671 Note that (1) may be FALSE for NetBSD (and other BSD flavors),
1672 as well as for Linux. Note also, that Linux doesn't pay any
1673 attention to the fields that are used by this algorithm -- it
1674 only uses the absolute sector data. Recent versions of Linux's
1675 fdisk(1) will fill this data in correctly, and forthcoming
1676 versions will check for consistency.
1677
1678 Checking for a non-zero partition type is not part of the
1679 Future Domain algorithm, but it seemed to be a reasonable thing
1680 to do, especially in the Linux and BSD worlds. */
1681
1682 info_array[0] = p[5] + 1; /* heads */
1683 info_array[1] = p[6] & 0x3f; /* sectors */
1684 } else {
1685
1686 /* Note that this new method guarantees that there will always be
1687 less than 1024 cylinders on a platter. This is good for drives
1688 up to approximately 7.85GB (where 1GB = 1024 * 1024 kB). */
1689
1690 if ((unsigned int)size >= 0x7e0000U) {
1691 info_array[0] = 0xff; /* heads = 255 */
1692 info_array[1] = 0x3f; /* sectors = 63 */
1693 } else if ((unsigned int)size >= 0x200000U) {
1694 info_array[0] = 0x80; /* heads = 128 */
1695 info_array[1] = 0x3f; /* sectors = 63 */
1696 } else {
1697 info_array[0] = 0x40; /* heads = 64 */
1698 info_array[1] = 0x20; /* sectors = 32 */
1699 }
1700 }
1701 /* For both methods, compute the cylinders */
1702 info_array[2] = (unsigned int)size / (info_array[0] * info_array[1] );
1703 kfree(p);
1704 }
1705
1706 return 0;
1707}
1708
1709static int fdomain_16x0_release(struct Scsi_Host *shpnt)
1710{
1711 if (shpnt->irq)
1712 free_irq(shpnt->irq, shpnt);
1713 if (shpnt->io_port && shpnt->n_io_port)
1714 release_region(shpnt->io_port, shpnt->n_io_port);
1715 return 0;
1716}
1717
1718struct scsi_host_template fdomain_driver_template = {
1719 .module = THIS_MODULE,
1720 .name = "fdomain",
1721 .proc_name = "fdomain",
1722 .detect = fdomain_16x0_detect,
1723 .info = fdomain_16x0_info,
1724 .queuecommand = fdomain_16x0_queue,
1725 .eh_abort_handler = fdomain_16x0_abort,
1726 .eh_bus_reset_handler = fdomain_16x0_bus_reset,
1727 .bios_param = fdomain_16x0_biosparam,
1728 .release = fdomain_16x0_release,
1729 .can_queue = 1,
1730 .this_id = 6,
1731 .sg_tablesize = 64,
1732 .cmd_per_lun = 1,
1733 .use_clustering = DISABLE_CLUSTERING,
1734};
1735
1736#ifndef PCMCIA
1737#define driver_template fdomain_driver_template
1738#include "scsi_module.c"
1739#endif