?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
added 2.6.29.6 aldebaran kernel
[nao-ulib.git] / kernel / 2.6.29.6-aldebaran-rt / drivers / scsi / eata.c
blob976cdd5c94efc3cfd9530dfa9383e384d69f36dd
1 /*
2 * eata.c - Low-level driver for EATA/DMA SCSI host adapters.
3 *
4 * 03 Jun 2003 Rev. 8.10 for linux-2.5.70
5 * + Update for new IRQ API.
6 * + Use "goto" when appropriate.
7 * + Drop eata.h.
8 * + Update for new module_param API.
9 * + Module parameters can now be specified only in the
10 * same format as the kernel boot options.
11 *
12 * boot option old module param
13 * ----------- ------------------
14 * addr,... io_port=addr,...
15 * lc:[y|n] linked_comm=[1|0]
16 * mq:xx max_queue_depth=xx
17 * tm:[0|1|2] tag_mode=[0|1|2]
18 * et:[y|n] ext_tran=[1|0]
19 * rs:[y|n] rev_scan=[1|0]
20 * ip:[y|n] isa_probe=[1|0]
21 * ep:[y|n] eisa_probe=[1|0]
22 * pp:[y|n] pci_probe=[1|0]
23 *
24 * A valid example using the new parameter format is:
25 * modprobe eata "eata=0x7410,0x230,lc:y,tm:0,mq:4,ep:n"
26 *
27 * which is equivalent to the old format:
28 * modprobe eata io_port=0x7410,0x230 linked_comm=1 tag_mode=0 \
29 * max_queue_depth=4 eisa_probe=0
30 *
31 * 12 Feb 2003 Rev. 8.04 for linux 2.5.60
32 * + Release irq before calling scsi_register.
33 *
34 * 12 Nov 2002 Rev. 8.02 for linux 2.5.47
35 * + Release driver_lock before calling scsi_register.
36 *
37 * 11 Nov 2002 Rev. 8.01 for linux 2.5.47
38 * + Fixed bios_param and scsicam_bios_param calling parameters.
39 *
40 * 28 Oct 2002 Rev. 8.00 for linux 2.5.44-ac4
41 * + Use new tcq and adjust_queue_depth api.
42 * + New command line option (tm:[0-2]) to choose the type of tags:
43 * 0 -> disable tagging ; 1 -> simple tags ; 2 -> ordered tags.
44 * Default is tm:0 (tagged commands disabled).
45 * For compatibility the "tc:" option is an alias of the "tm:"
46 * option; tc:n is equivalent to tm:0 and tc:y is equivalent to
47 * tm:1.
48 * + The tagged_comm module parameter has been removed, use tag_mode
49 * instead, equivalent to the "tm:" boot option.
50 *
51 * 10 Oct 2002 Rev. 7.70 for linux 2.5.42
52 * + Foreport from revision 6.70.
53 *
54 * 25 Jun 2002 Rev. 6.70 for linux 2.4.19
55 * + This release is the first one tested on a Big Endian platform:
56 * fixed endian-ness problem due to bitfields;
57 * fixed endian-ness problem in read_pio.
58 * + Added new options for selectively probing ISA, EISA and PCI bus:
59 *
60 * Boot option Parameter name Default according to
61 *
62 * ip:[y|n] isa_probe=[1|0] CONFIG_ISA defined
63 * ep:[y|n] eisa_probe=[1|0] CONFIG_EISA defined
64 * pp:[y|n] pci_probe=[1|0] CONFIG_PCI defined
65 *
66 * The default action is to perform probing if the corrisponding
67 * bus is configured and to skip probing otherwise.
68 *
69 * + If pci_probe is in effect and a list of I/O ports is specified
70 * as parameter or boot option, pci_enable_device() is performed
71 * on all pci devices matching PCI_CLASS_STORAGE_SCSI.
72 *
73 * 21 Feb 2002 Rev. 6.52 for linux 2.4.18
74 * + Backport from rev. 7.22 (use io_request_lock).
75 *
76 * 20 Feb 2002 Rev. 7.22 for linux 2.5.5
77 * + Remove any reference to virt_to_bus().
78 * + Fix pio hang while detecting multiple HBAs.
79 * + Fixed a board detection bug: in a system with
80 * multiple ISA/EISA boards, all but the first one
81 * were erroneously detected as PCI.
82 *
83 * 01 Jan 2002 Rev. 7.20 for linux 2.5.1
84 * + Use the dynamic DMA mapping API.
85 *
86 * 19 Dec 2001 Rev. 7.02 for linux 2.5.1
87 * + Use SCpnt->sc_data_direction if set.
88 * + Use sglist.page instead of sglist.address.
89 *
90 * 11 Dec 2001 Rev. 7.00 for linux 2.5.1
91 * + Use host->host_lock instead of io_request_lock.
92 *
93 * 1 May 2001 Rev. 6.05 for linux 2.4.4
94 * + Clean up all pci related routines.
95 * + Fix data transfer direction for opcode SEND_CUE_SHEET (0x5d)
96 *
97 * 30 Jan 2001 Rev. 6.04 for linux 2.4.1
98 * + Call pci_resource_start after pci_enable_device.
99 *
100 * 25 Jan 2001 Rev. 6.03 for linux 2.4.0
101 * + "check_region" call replaced by "request_region".
102 *
103 * 22 Nov 2000 Rev. 6.02 for linux 2.4.0-test11
104 * + Return code checked when calling pci_enable_device.
105 * + Removed old scsi error handling support.
106 * + The obsolete boot option flag eh:n is silently ignored.
107 * + Removed error messages while a disk drive is powered up at
108 * boot time.
109 * + Improved boot messages: all tagged capable device are
110 * indicated as "tagged" or "soft-tagged" :
111 * - "soft-tagged" means that the driver is trying to do its
112 * own tagging (i.e. the tc:y option is in effect);
113 * - "tagged" means that the device supports tagged commands,
114 * but the driver lets the HBA be responsible for tagging
115 * support.
116 *
117 * 16 Sep 1999 Rev. 5.11 for linux 2.2.12 and 2.3.18
118 * + Updated to the new __setup interface for boot command line options.
119 * + When loaded as a module, accepts the new parameter boot_options
120 * which value is a string with the same format of the kernel boot
121 * command line options. A valid example is:
122 * modprobe eata 'boot_options="0x7410,0x230,lc:y,tc:n,mq:4"'
123 *
124 * 9 Sep 1999 Rev. 5.10 for linux 2.2.12 and 2.3.17
125 * + 64bit cleanup for Linux/Alpha platform support
126 * (contribution from H.J. Lu).
127 *
128 * 22 Jul 1999 Rev. 5.00 for linux 2.2.10 and 2.3.11
129 * + Removed pre-2.2 source code compatibility.
130 * + Added call to pci_set_master.
131 *
132 * 26 Jul 1998 Rev. 4.33 for linux 2.0.35 and 2.1.111
133 * + Added command line option (rs:[y|n]) to reverse the scan order
134 * of PCI boards. The default is rs:y, which reverses the BIOS order
135 * while registering PCI boards. The default value rs:y generates
136 * the same order of all previous revisions of this driver.
137 * Pls. note that "BIOS order" might have been reversed itself
138 * after the 2.1.9x PCI modifications in the linux kernel.
139 * The rs value is ignored when the explicit list of addresses
140 * is used by the "eata=port0,port1,..." command line option.
141 * + Added command line option (et:[y|n]) to force use of extended
142 * translation (255 heads, 63 sectors) as disk geometry.
143 * The default is et:n, which uses the disk geometry returned
144 * by scsicam_bios_param. The default value et:n is compatible with
145 * all previous revisions of this driver.
146 *
147 * 28 May 1998 Rev. 4.32 for linux 2.0.33 and 2.1.104
148 * Increased busy timeout from 10 msec. to 200 msec. while
149 * processing interrupts.
150 *
151 * 16 May 1998 Rev. 4.31 for linux 2.0.33 and 2.1.102
152 * Improved abort handling during the eh recovery process.
153 *
154 * 13 May 1998 Rev. 4.30 for linux 2.0.33 and 2.1.101
155 * The driver is now fully SMP safe, including the
156 * abort and reset routines.
157 * Added command line options (eh:[y|n]) to choose between
158 * new_eh_code and the old scsi code.
159 * If linux version >= 2.1.101 the default is eh:y, while the eh
160 * option is ignored for previous releases and the old scsi code
161 * is used.
162 *
163 * 18 Apr 1998 Rev. 4.20 for linux 2.0.33 and 2.1.97
164 * Reworked interrupt handler.
165 *
166 * 11 Apr 1998 rev. 4.05 for linux 2.0.33 and 2.1.95
167 * Major reliability improvement: when a batch with overlapping
168 * requests is detected, requests are queued one at a time
169 * eliminating any possible board or drive reordering.
170 *
171 * 10 Apr 1998 rev. 4.04 for linux 2.0.33 and 2.1.95
172 * Improved SMP support (if linux version >= 2.1.95).
173 *
174 * 9 Apr 1998 rev. 4.03 for linux 2.0.33 and 2.1.94
175 * Added support for new PCI code and IO-APIC remapping of irqs.
176 * Performance improvement: when sequential i/o is detected,
177 * always use direct sort instead of reverse sort.
178 *
179 * 4 Apr 1998 rev. 4.02 for linux 2.0.33 and 2.1.92
180 * io_port is now unsigned long.
181 *
182 * 17 Mar 1998 rev. 4.01 for linux 2.0.33 and 2.1.88
183 * Use new scsi error handling code (if linux version >= 2.1.88).
184 * Use new interrupt code.
185 *
186 * 12 Sep 1997 rev. 3.11 for linux 2.0.30 and 2.1.55
187 * Use of udelay inside the wait loops to avoid timeout
188 * problems with fast cpus.
189 * Removed check about useless calls to the interrupt service
190 * routine (reported on SMP systems only).
191 * At initialization time "sorted/unsorted" is displayed instead
192 * of "linked/unlinked" to reinforce the fact that "linking" is
193 * nothing but "elevator sorting" in the actual implementation.
194 *
195 * 17 May 1997 rev. 3.10 for linux 2.0.30 and 2.1.38
196 * Use of serial_number_at_timeout in abort and reset processing.
197 * Use of the __initfunc and __initdata macro in setup code.
198 * Minor cleanups in the list_statistics code.
199 * Increased controller busy timeout in order to better support
200 * slow SCSI devices.
201 *
202 * 24 Feb 1997 rev. 3.00 for linux 2.0.29 and 2.1.26
203 * When loading as a module, parameter passing is now supported
204 * both in 2.0 and in 2.1 style.
205 * Fixed data transfer direction for some SCSI opcodes.
206 * Immediate acknowledge to request sense commands.
207 * Linked commands to each disk device are now reordered by elevator
208 * sorting. Rare cases in which reordering of write requests could
209 * cause wrong results are managed.
210 * Fixed spurious timeouts caused by long simple queue tag sequences.
211 * New command line option (tm:[0-3]) to choose the type of tags:
212 * 0 -> mixed (default); 1 -> simple; 2 -> head; 3 -> ordered.
213 *
214 * 18 Jan 1997 rev. 2.60 for linux 2.1.21 and 2.0.28
215 * Added command line options to enable/disable linked commands
216 * (lc:[y|n]), tagged commands (tc:[y|n]) and to set the max queue
217 * depth (mq:xx). Default is "eata=lc:n,tc:n,mq:16".
218 * Improved command linking.
219 * Documented how to setup RAID-0 with DPT SmartRAID boards.
220 *
221 * 8 Jan 1997 rev. 2.50 for linux 2.1.20 and 2.0.27
222 * Added linked command support.
223 * Improved detection of PCI boards using ISA base addresses.
224 *
225 * 3 Dec 1996 rev. 2.40 for linux 2.1.14 and 2.0.27
226 * Added support for tagged commands and queue depth adjustment.
227 *
228 * 22 Nov 1996 rev. 2.30 for linux 2.1.12 and 2.0.26
229 * When CONFIG_PCI is defined, BIOS32 is used to include in the
230 * list of i/o ports to be probed all the PCI SCSI controllers.
231 * The list of i/o ports to be probed can be overwritten by the
232 * "eata=port0,port1,...." boot command line option.
233 * Scatter/gather lists are now allocated by a number of kmalloc
234 * calls, in order to avoid the previous size limit of 64Kb.
235 *
236 * 16 Nov 1996 rev. 2.20 for linux 2.1.10 and 2.0.25
237 * Added support for EATA 2.0C, PCI, multichannel and wide SCSI.
238 *
239 * 27 Sep 1996 rev. 2.12 for linux 2.1.0
240 * Portability cleanups (virtual/bus addressing, little/big endian
241 * support).
242 *
243 * 09 Jul 1996 rev. 2.11 for linux 2.0.4
244 * Number of internal retries is now limited.
245 *
246 * 16 Apr 1996 rev. 2.10 for linux 1.3.90
247 * New argument "reset_flags" to the reset routine.
248 *
249 * 6 Jul 1995 rev. 2.01 for linux 1.3.7
250 * Update required by the new /proc/scsi support.
251 *
252 * 11 Mar 1995 rev. 2.00 for linux 1.2.0
253 * Fixed a bug which prevented media change detection for removable
254 * disk drives.
255 *
256 * 23 Feb 1995 rev. 1.18 for linux 1.1.94
257 * Added a check for scsi_register returning NULL.
258 *
259 * 11 Feb 1995 rev. 1.17 for linux 1.1.91
260 * Now DEBUG_RESET is disabled by default.
261 * Register a board even if it does not assert DMA protocol support
262 * (DPT SK2011B does not report correctly the dmasup bit).
263 *
264 * 9 Feb 1995 rev. 1.16 for linux 1.1.90
265 * Use host->wish_block instead of host->block.
266 * New list of Data Out SCSI commands.
267 *
268 * 8 Feb 1995 rev. 1.15 for linux 1.1.89
269 * Cleared target_time_out counter while performing a reset.
270 * All external symbols renamed to avoid possible name conflicts.
271 *
272 * 28 Jan 1995 rev. 1.14 for linux 1.1.86
273 * Added module support.
274 * Log and do a retry when a disk drive returns a target status
275 * different from zero on a recovered error.
276 *
277 * 24 Jan 1995 rev. 1.13 for linux 1.1.85
278 * Use optimized board configuration, with a measured performance
279 * increase in the range 10%-20% on i/o throughput.
280 *
281 * 16 Jan 1995 rev. 1.12 for linux 1.1.81
282 * Fix mscp structure comments (no functional change).
283 * Display a message if check_region detects a port address
284 * already in use.
285 *
286 * 17 Dec 1994 rev. 1.11 for linux 1.1.74
287 * Use the scsicam_bios_param routine. This allows an easy
288 * migration path from disk partition tables created using
289 * different SCSI drivers and non optimal disk geometry.
290 *
291 * 15 Dec 1994 rev. 1.10 for linux 1.1.74
292 * Added support for ISA EATA boards (DPT PM2011, DPT PM2021).
293 * The host->block flag is set for all the detected ISA boards.
294 * The detect routine no longer enforces LEVEL triggering
295 * for EISA boards, it just prints a warning message.
296 *
297 * 30 Nov 1994 rev. 1.09 for linux 1.1.68
298 * Redo i/o on target status CHECK_CONDITION for TYPE_DISK only.
299 * Added optional support for using a single board at a time.
300 *
301 * 18 Nov 1994 rev. 1.08 for linux 1.1.64
302 * Forces sg_tablesize = 64 and can_queue = 64 if these
303 * values are not correctly detected (DPT PM2012).
304 *
305 * 14 Nov 1994 rev. 1.07 for linux 1.1.63 Final BETA release.
306 * 04 Aug 1994 rev. 1.00 for linux 1.1.39 First BETA release.
307 *
308 *
309 * This driver is based on the CAM (Common Access Method Committee)
310 * EATA (Enhanced AT Bus Attachment) rev. 2.0A, using DMA protocol.
311 *
312 * Copyright (C) 1994-2003 Dario Ballabio (ballabio_dario@emc.com)
313 *
314 * Alternate email: dario.ballabio@inwind.it, dario.ballabio@tiscalinet.it
315 *
316 * Redistribution and use in source and binary forms, with or without
317 * modification, are permitted provided that redistributions of source
318 * code retain the above copyright notice and this comment without
319 * modification.
320 *
321 */
322
323 /*
324 *
325 * Here is a brief description of the DPT SCSI host adapters.
326 * All these boards provide an EATA/DMA compatible programming interface
327 * and are fully supported by this driver in any configuration, including
328 * multiple SCSI channels:
329 *
330 * PM2011B/9X - Entry Level ISA
331 * PM2021A/9X - High Performance ISA
332 * PM2012A Old EISA
333 * PM2012B Old EISA
334 * PM2022A/9X - Entry Level EISA
335 * PM2122A/9X - High Performance EISA
336 * PM2322A/9X - Extra High Performance EISA
337 * PM3021 - SmartRAID Adapter for ISA
338 * PM3222 - SmartRAID Adapter for EISA (PM3222W is 16-bit wide SCSI)
339 * PM3224 - SmartRAID Adapter for PCI (PM3224W is 16-bit wide SCSI)
340 * PM33340UW - SmartRAID Adapter for PCI ultra wide multichannel
341 *
342 * The above list is just an indication: as a matter of fact all DPT
343 * boards using the EATA/DMA protocol are supported by this driver,
344 * since they use exactely the same programming interface.
345 *
346 * The DPT PM2001 provides only the EATA/PIO interface and hence is not
347 * supported by this driver.
348 *
349 * This code has been tested with up to 3 Distributed Processing Technology
350 * PM2122A/9X (DPT SCSI BIOS v002.D1, firmware v05E.0) EISA controllers,
351 * in any combination of private and shared IRQ.
352 * PCI support has been tested using up to 2 DPT PM3224W (DPT SCSI BIOS
353 * v003.D0, firmware v07G.0).
354 *
355 * DPT SmartRAID boards support "Hardware Array" - a group of disk drives
356 * which are all members of the same RAID-0, RAID-1 or RAID-5 array implemented
357 * in host adapter hardware. Hardware Arrays are fully compatible with this
358 * driver, since they look to it as a single disk drive.
359 *
360 * WARNING: to create a RAID-0 "Hardware Array" you must select "Other Unix"
361 * as the current OS in the DPTMGR "Initial System Installation" menu.
362 * Otherwise RAID-0 is generated as an "Array Group" (i.e. software RAID-0),
363 * which is not supported by the actual SCSI subsystem.
364 * To get the "Array Group" functionality, the Linux MD driver must be used
365 * instead of the DPT "Array Group" feature.
366 *
367 * Multiple ISA, EISA and PCI boards can be configured in the same system.
368 * It is suggested to put all the EISA boards on the same IRQ level, all
369 * the PCI boards on another IRQ level, while ISA boards cannot share
370 * interrupts.
371 *
372 * If you configure multiple boards on the same IRQ, the interrupt must
373 * be _level_ triggered (not _edge_ triggered).
374 *
375 * This driver detects EATA boards by probes at fixed port addresses,
376 * so no BIOS32 or PCI BIOS support is required.
377 * The suggested way to detect a generic EATA PCI board is to force on it
378 * any unused EISA address, even if there are other controllers on the EISA
379 * bus, or even if you system has no EISA bus at all.
380 * Do not force any ISA address on EATA PCI boards.
381 *
382 * If PCI bios support is configured into the kernel, BIOS32 is used to
383 * include in the list of i/o ports to be probed all the PCI SCSI controllers.
384 *
385 * Due to a DPT BIOS "feature", it might not be possible to force an EISA
386 * address on more than a single DPT PCI board, so in this case you have to
387 * let the PCI BIOS assign the addresses.
388 *
389 * The sequence of detection probes is:
390 *
391 * - ISA 0x1F0;
392 * - PCI SCSI controllers (only if BIOS32 is available);
393 * - EISA/PCI 0x1C88 through 0xFC88 (corresponding to EISA slots 1 to 15);
394 * - ISA 0x170, 0x230, 0x330.
395 *
396 * The above list of detection probes can be totally replaced by the
397 * boot command line option: "eata=port0,port1,port2,...", where the
398 * port0, port1... arguments are ISA/EISA/PCI addresses to be probed.
399 * For example using "eata=0x7410,0x7450,0x230", the driver probes
400 * only the two PCI addresses 0x7410 and 0x7450 and the ISA address 0x230,
401 * in this order; "eata=0" totally disables this driver.
402 *
403 * After the optional list of detection probes, other possible command line
404 * options are:
405 *
406 * et:y force use of extended translation (255 heads, 63 sectors);
407 * et:n use disk geometry detected by scsicam_bios_param;
408 * rs:y reverse scan order while detecting PCI boards;
409 * rs:n use BIOS order while detecting PCI boards;
410 * lc:y enables linked commands;
411 * lc:n disables linked commands;
412 * tm:0 disables tagged commands (same as tc:n);
413 * tm:1 use simple queue tags (same as tc:y);
414 * tm:2 use ordered queue tags (same as tc:2);
415 * mq:xx set the max queue depth to the value xx (2 <= xx <= 32).
416 *
417 * The default value is: "eata=lc:n,mq:16,tm:0,et:n,rs:n".
418 * An example using the list of detection probes could be:
419 * "eata=0x7410,0x230,lc:y,tm:2,mq:4,et:n".
420 *
421 * When loading as a module, parameters can be specified as well.
422 * The above example would be (use 1 in place of y and 0 in place of n):
423 *
424 * modprobe eata io_port=0x7410,0x230 linked_comm=1 \
425 * max_queue_depth=4 ext_tran=0 tag_mode=2 \
426 * rev_scan=1
427 *
428 * ----------------------------------------------------------------------------
429 * In this implementation, linked commands are designed to work with any DISK
430 * or CD-ROM, since this linking has only the intent of clustering (time-wise)
431 * and reordering by elevator sorting commands directed to each device,
432 * without any relation with the actual SCSI protocol between the controller
433 * and the device.
434 * If Q is the queue depth reported at boot time for each device (also named
435 * cmds/lun) and Q > 2, whenever there is already an active command to the
436 * device all other commands to the same device (up to Q-1) are kept waiting
437 * in the elevator sorting queue. When the active command completes, the
438 * commands in this queue are sorted by sector address. The sort is chosen
439 * between increasing or decreasing by minimizing the seek distance between
440 * the sector of the commands just completed and the sector of the first
441 * command in the list to be sorted.
442 * Trivial math assures that the unsorted average seek distance when doing
443 * random seeks over S sectors is S/3.
444 * When (Q-1) requests are uniformly distributed over S sectors, the average
445 * distance between two adjacent requests is S/((Q-1) + 1), so the sorted
446 * average seek distance for (Q-1) random requests over S sectors is S/Q.
447 * The elevator sorting hence divides the seek distance by a factor Q/3.
448 * The above pure geometric remarks are valid in all cases and the
449 * driver effectively reduces the seek distance by the predicted factor
450 * when there are Q concurrent read i/o operations on the device, but this
451 * does not necessarily results in a noticeable performance improvement:
452 * your mileage may vary....
453 *
454 * Note: command reordering inside a batch of queued commands could cause
455 * wrong results only if there is at least one write request and the
456 * intersection (sector-wise) of all requests is not empty.
457 * When the driver detects a batch including overlapping requests
458 * (a really rare event) strict serial (pid) order is enforced.
459 * ----------------------------------------------------------------------------
460 * The extended translation option (et:y) is useful when using large physical
461 * disks/arrays. It could also be useful when switching between Adaptec boards
462 * and DPT boards without reformatting the disk.
463 * When a boot disk is partitioned with extended translation, in order to
464 * be able to boot it with a DPT board is could be necessary to add to
465 * lilo.conf additional commands as in the following example:
466 *
467 * fix-table
468 * disk=/dev/sda bios=0x80 sectors=63 heads=128 cylindres=546
469 *
470 * where the above geometry should be replaced with the one reported at
471 * power up by the DPT controller.
472 * ----------------------------------------------------------------------------
473 *
474 * The boards are named EATA0, EATA1,... according to the detection order.
475 *
476 * In order to support multiple ISA boards in a reliable way,
477 * the driver sets host->wish_block = 1 for all ISA boards.
478 */
479
480 #include <linux/string.h>
481 #include <linux/kernel.h>
482 #include <linux/ioport.h>
483 #include <linux/delay.h>
484 #include <linux/proc_fs.h>
485 #include <linux/blkdev.h>
486 #include <linux/interrupt.h>
487 #include <linux/stat.h>
488 #include <linux/pci.h>
489 #include <linux/init.h>
490 #include <linux/ctype.h>
491 #include <linux/spinlock.h>
492 #include <linux/dma-mapping.h>
493 #include <asm/byteorder.h>
494 #include <asm/dma.h>
495 #include <asm/io.h>
496 #include <asm/irq.h>
497
498 #include <scsi/scsi.h>
499 #include <scsi/scsi_cmnd.h>
500 #include <scsi/scsi_device.h>
501 #include <scsi/scsi_host.h>
502 #include <scsi/scsi_tcq.h>
503 #include <scsi/scsicam.h>
504
505 static int eata2x_detect(struct scsi_host_template *);
506 static int eata2x_release(struct Scsi_Host *);
507 static int eata2x_queuecommand(struct scsi_cmnd *,
508 void (*done) (struct scsi_cmnd *));
509 static int eata2x_eh_abort(struct scsi_cmnd *);
510 static int eata2x_eh_host_reset(struct scsi_cmnd *);
511 static int eata2x_bios_param(struct scsi_device *, struct block_device *,
512 sector_t, int *);
513 static int eata2x_slave_configure(struct scsi_device *);
514
515 static struct scsi_host_template driver_template = {
516 .name = "EATA/DMA 2.0x rev. 8.10.00 ",
517 .detect = eata2x_detect,
518 .release = eata2x_release,
519 .queuecommand = eata2x_queuecommand,
520 .eh_abort_handler = eata2x_eh_abort,
521 .eh_host_reset_handler = eata2x_eh_host_reset,
522 .bios_param = eata2x_bios_param,
523 .slave_configure = eata2x_slave_configure,
524 .this_id = 7,
525 .unchecked_isa_dma = 1,
526 .use_clustering = ENABLE_CLUSTERING,
527 };
528
529 #if !defined(__BIG_ENDIAN_BITFIELD) && !defined(__LITTLE_ENDIAN_BITFIELD)
530 #error "Adjust your <asm/byteorder.h> defines"
531 #endif
532
533 /* Subversion values */
534 #define ISA 0
535 #define ESA 1
536
537 #undef FORCE_CONFIG
538
539 #undef DEBUG_LINKED_COMMANDS
540 #undef DEBUG_DETECT
541 #undef DEBUG_PCI_DETECT
542 #undef DEBUG_INTERRUPT
543 #undef DEBUG_RESET
544 #undef DEBUG_GENERATE_ERRORS
545 #undef DEBUG_GENERATE_ABORTS
546 #undef DEBUG_GEOMETRY
547
548 #define MAX_ISA 4
549 #define MAX_VESA 0
550 #define MAX_EISA 15
551 #define MAX_PCI 16
552 #define MAX_BOARDS (MAX_ISA + MAX_VESA + MAX_EISA + MAX_PCI)
553 #define MAX_CHANNEL 4
554 #define MAX_LUN 32
555 #define MAX_TARGET 32
556 #define MAX_MAILBOXES 64
557 #define MAX_SGLIST 64
558 #define MAX_LARGE_SGLIST 122
559 #define MAX_INTERNAL_RETRIES 64
560 #define MAX_CMD_PER_LUN 2
561 #define MAX_TAGGED_CMD_PER_LUN (MAX_MAILBOXES - MAX_CMD_PER_LUN)
562
563 #define SKIP ULONG_MAX
564 #define FREE 0
565 #define IN_USE 1
566 #define LOCKED 2
567 #define IN_RESET 3
568 #define IGNORE 4
569 #define READY 5
570 #define ABORTING 6
571 #define NO_DMA 0xff
572 #define MAXLOOP 10000
573 #define TAG_DISABLED 0
574 #define TAG_SIMPLE 1
575 #define TAG_ORDERED 2
576
577 #define REG_CMD 7
578 #define REG_STATUS 7
579 #define REG_AUX_STATUS 8
580 #define REG_DATA 0
581 #define REG_DATA2 1
582 #define REG_SEE 6
583 #define REG_LOW 2
584 #define REG_LM 3
585 #define REG_MID 4
586 #define REG_MSB 5
587 #define REGION_SIZE 9UL
588 #define MAX_ISA_ADDR 0x03ff
589 #define MIN_EISA_ADDR 0x1c88
590 #define MAX_EISA_ADDR 0xfc88
591 #define BSY_ASSERTED 0x80
592 #define DRQ_ASSERTED 0x08
593 #define ABSY_ASSERTED 0x01
594 #define IRQ_ASSERTED 0x02
595 #define READ_CONFIG_PIO 0xf0
596 #define SET_CONFIG_PIO 0xf1
597 #define SEND_CP_PIO 0xf2
598 #define RECEIVE_SP_PIO 0xf3
599 #define TRUNCATE_XFR_PIO 0xf4
600 #define RESET_PIO 0xf9
601 #define READ_CONFIG_DMA 0xfd
602 #define SET_CONFIG_DMA 0xfe
603 #define SEND_CP_DMA 0xff
604 #define ASOK 0x00
605 #define ASST 0x01
606
607 #define YESNO(a) ((a) ? 'y' : 'n')
608 #define TLDEV(type) ((type) == TYPE_DISK || (type) == TYPE_ROM)
609
610 /* "EATA", in Big Endian format */
611 #define EATA_SIG_BE 0x45415441
612
613 /* Number of valid bytes in the board config structure for EATA 2.0x */
614 #define EATA_2_0A_SIZE 28
615 #define EATA_2_0B_SIZE 30
616 #define EATA_2_0C_SIZE 34
617
618 /* Board info structure */
619 struct eata_info {
620 u_int32_t data_len; /* Number of valid bytes after this field */
621 u_int32_t sign; /* ASCII "EATA" signature */
622
623 #if defined(__BIG_ENDIAN_BITFIELD)
624 unchar version : 4,
625 : 4;
626 unchar haaval : 1,
627 ata : 1,
628 drqvld : 1,
629 dmasup : 1,
630 morsup : 1,
631 trnxfr : 1,
632 tarsup : 1,
633 ocsena : 1;
634 #else
635 unchar : 4, /* unused low nibble */
636 version : 4; /* EATA version, should be 0x1 */
637 unchar ocsena : 1, /* Overlap Command Support Enabled */
638 tarsup : 1, /* Target Mode Supported */
639 trnxfr : 1, /* Truncate Transfer Cmd NOT Necessary */
640 morsup : 1, /* More Supported */
641 dmasup : 1, /* DMA Supported */
642 drqvld : 1, /* DRQ Index (DRQX) is valid */
643 ata : 1, /* This is an ATA device */
644 haaval : 1; /* Host Adapter Address Valid */
645 #endif
646
647 ushort cp_pad_len; /* Number of pad bytes after cp_len */
648 unchar host_addr[4]; /* Host Adapter SCSI ID for channels 3, 2, 1, 0 */
649 u_int32_t cp_len; /* Number of valid bytes in cp */
650 u_int32_t sp_len; /* Number of valid bytes in sp */
651 ushort queue_size; /* Max number of cp that can be queued */
652 ushort unused;
653 ushort scatt_size; /* Max number of entries in scatter/gather table */
654
655 #if defined(__BIG_ENDIAN_BITFIELD)
656 unchar drqx : 2,
657 second : 1,
658 irq_tr : 1,
659 irq : 4;
660 unchar sync;
661 unchar : 4,
662 res1 : 1,
663 large_sg : 1,
664 forcaddr : 1,
665 isaena : 1;
666 unchar max_chan : 3,
667 max_id : 5;
668 unchar max_lun;
669 unchar eisa : 1,
670 pci : 1,
671 idquest : 1,
672 m1 : 1,
673 : 4;
674 #else
675 unchar irq : 4, /* Interrupt Request assigned to this controller */
676 irq_tr : 1, /* 0 for edge triggered, 1 for level triggered */
677 second : 1, /* 1 if this is a secondary (not primary) controller */
678 drqx : 2; /* DRQ Index (0=DMA0, 1=DMA7, 2=DMA6, 3=DMA5) */
679 unchar sync; /* 1 if scsi target id 7...0 is running sync scsi */
680
681 /* Structure extension defined in EATA 2.0B */
682 unchar isaena : 1, /* ISA i/o addressing is disabled/enabled */
683 forcaddr : 1, /* Port address has been forced */
684 large_sg : 1, /* 1 if large SG lists are supported */
685 res1 : 1,
686 : 4;
687 unchar max_id : 5, /* Max SCSI target ID number */
688 max_chan : 3; /* Max SCSI channel number on this board */
689
690 /* Structure extension defined in EATA 2.0C */
691 unchar max_lun; /* Max SCSI LUN number */
692 unchar
693 : 4,
694 m1 : 1, /* This is a PCI with an M1 chip installed */
695 idquest : 1, /* RAIDNUM returned is questionable */
696 pci : 1, /* This board is PCI */
697 eisa : 1; /* This board is EISA */
698 #endif
699
700 unchar raidnum; /* Uniquely identifies this HBA in a system */
701 unchar notused;
702
703 ushort ipad[247];
704 };
705
706 /* Board config structure */
707 struct eata_config {
708 ushort len; /* Number of bytes following this field */
709
710 #if defined(__BIG_ENDIAN_BITFIELD)
711 unchar : 4,
712 tarena : 1,
713 mdpena : 1,
714 ocena : 1,
715 edis : 1;
716 #else
717 unchar edis : 1, /* Disable EATA interface after config command */
718 ocena : 1, /* Overlapped Commands Enabled */
719 mdpena : 1, /* Transfer all Modified Data Pointer Messages */
720 tarena : 1, /* Target Mode Enabled for this controller */
721 : 4;
722 #endif
723 unchar cpad[511];
724 };
725
726 /* Returned status packet structure */
727 struct mssp {
728 #if defined(__BIG_ENDIAN_BITFIELD)
729 unchar eoc : 1,
730 adapter_status : 7;
731 #else
732 unchar adapter_status : 7, /* State related to current command */
733 eoc : 1; /* End Of Command (1 = command completed) */
734 #endif
735 unchar target_status; /* SCSI status received after data transfer */
736 unchar unused[2];
737 u_int32_t inv_res_len; /* Number of bytes not transferred */
738 u_int32_t cpp_index; /* Index of address set in cp */
739 char mess[12];
740 };
741
742 struct sg_list {
743 unsigned int address; /* Segment Address */
744 unsigned int num_bytes; /* Segment Length */
745 };
746
747 /* MailBox SCSI Command Packet */
748 struct mscp {
749 #if defined(__BIG_ENDIAN_BITFIELD)
750 unchar din : 1,
751 dout : 1,
752 interp : 1,
753 : 1,
754 sg : 1,
755 reqsen :1,
756 init : 1,
757 sreset : 1;
758 unchar sense_len;
759 unchar unused[3];
760 unchar : 7,
761 fwnest : 1;
762 unchar : 5,
763 hbaci : 1,
764 iat : 1,
765 phsunit : 1;
766 unchar channel : 3,
767 target : 5;
768 unchar one : 1,
769 dispri : 1,
770 luntar : 1,
771 lun : 5;
772 #else
773 unchar sreset :1, /* SCSI Bus Reset Signal should be asserted */
774 init :1, /* Re-initialize controller and self test */
775 reqsen :1, /* Transfer Request Sense Data to addr using DMA */
776 sg :1, /* Use Scatter/Gather */
777 :1,
778 interp :1, /* The controller interprets cp, not the target */
779 dout :1, /* Direction of Transfer is Out (Host to Target) */
780 din :1; /* Direction of Transfer is In (Target to Host) */
781 unchar sense_len; /* Request Sense Length */
782 unchar unused[3];
783 unchar fwnest : 1, /* Send command to a component of an Array Group */
784 : 7;
785 unchar phsunit : 1, /* Send to Target Physical Unit (bypass RAID) */
786 iat : 1, /* Inhibit Address Translation */
787 hbaci : 1, /* Inhibit HBA Caching for this command */
788 : 5;
789 unchar target : 5, /* SCSI target ID */
790 channel : 3; /* SCSI channel number */
791 unchar lun : 5, /* SCSI logical unit number */
792 luntar : 1, /* This cp is for Target (not LUN) */
793 dispri : 1, /* Disconnect Privilege granted */
794 one : 1; /* 1 */
795 #endif
796
797 unchar mess[3]; /* Massage to/from Target */
798 unchar cdb[12]; /* Command Descriptor Block */
799 u_int32_t data_len; /* If sg=0 Data Length, if sg=1 sglist length */
800 u_int32_t cpp_index; /* Index of address to be returned in sp */
801 u_int32_t data_address; /* If sg=0 Data Address, if sg=1 sglist address */
802 u_int32_t sp_dma_addr; /* Address where sp is DMA'ed when cp completes */
803 u_int32_t sense_addr; /* Address where Sense Data is DMA'ed on error */
804
805 /* Additional fields begin here. */
806 struct scsi_cmnd *SCpnt;
807
808 /* All the cp structure is zero filled by queuecommand except the
809 following CP_TAIL_SIZE bytes, initialized by detect */
810 dma_addr_t cp_dma_addr; /* dma handle for this cp structure */
811 struct sg_list *sglist; /* pointer to the allocated SG list */
812 };
813
814 #define CP_TAIL_SIZE (sizeof(struct sglist *) + sizeof(dma_addr_t))
815
816 struct hostdata {
817 struct mscp cp[MAX_MAILBOXES]; /* Mailboxes for this board */
818 unsigned int cp_stat[MAX_MAILBOXES]; /* FREE, IN_USE, LOCKED, IN_RESET */
819 unsigned int last_cp_used; /* Index of last mailbox used */
820 unsigned int iocount; /* Total i/o done for this board */
821 int board_number; /* Number of this board */
822 char board_name[16]; /* Name of this board */
823 int in_reset; /* True if board is doing a reset */
824 int target_to[MAX_TARGET][MAX_CHANNEL]; /* N. of timeout errors on target */
825 int target_redo[MAX_TARGET][MAX_CHANNEL]; /* If 1 redo i/o on target */
826 unsigned int retries; /* Number of internal retries */
827 unsigned long last_retried_pid; /* Pid of last retried command */
828 unsigned char subversion; /* Bus type, either ISA or EISA/PCI */
829 unsigned char protocol_rev; /* EATA 2.0 rev., 'A' or 'B' or 'C' */
830 unsigned char is_pci; /* 1 is bus type is PCI */
831 struct pci_dev *pdev; /* pdev for PCI bus, NULL otherwise */
832 struct mssp *sp_cpu_addr; /* cpu addr for DMA buffer sp */
833 dma_addr_t sp_dma_addr; /* dma handle for DMA buffer sp */
834 struct mssp sp; /* Local copy of sp buffer */
835 };
836
837 static struct Scsi_Host *sh[MAX_BOARDS];
838 static const char *driver_name = "EATA";
839 static char sha[MAX_BOARDS];
840 static DEFINE_SPINLOCK(driver_lock);
841
842 /* Initialize num_boards so that ihdlr can work while detect is in progress */
843 static unsigned int num_boards = MAX_BOARDS;
844
845 static unsigned long io_port[] = {
846
847 /* Space for MAX_INT_PARAM ports usable while loading as a module */
848 SKIP, SKIP, SKIP, SKIP, SKIP, SKIP, SKIP, SKIP,
849 SKIP, SKIP,
850
851 /* First ISA */
852 0x1f0,
853
854 /* Space for MAX_PCI ports possibly reported by PCI_BIOS */
855 SKIP, SKIP, SKIP, SKIP, SKIP, SKIP, SKIP, SKIP,
856 SKIP, SKIP, SKIP, SKIP, SKIP, SKIP, SKIP, SKIP,
857
858 /* MAX_EISA ports */
859 0x1c88, 0x2c88, 0x3c88, 0x4c88, 0x5c88, 0x6c88, 0x7c88, 0x8c88,
860 0x9c88, 0xac88, 0xbc88, 0xcc88, 0xdc88, 0xec88, 0xfc88,
861
862 /* Other (MAX_ISA - 1) ports */
863 0x170, 0x230, 0x330,
864
865 /* End of list */
866 0x0
867 };
868
869 /* Device is Big Endian */
870 #define H2DEV(x) cpu_to_be32(x)
871 #define DEV2H(x) be32_to_cpu(x)
872 #define H2DEV16(x) cpu_to_be16(x)
873 #define DEV2H16(x) be16_to_cpu(x)
874
875 /* But transfer orientation from the 16 bit data register is Little Endian */
876 #define REG2H(x) le16_to_cpu(x)
877
878 static irqreturn_t do_interrupt_handler(int, void *);
879 static void flush_dev(struct scsi_device *, unsigned long, struct hostdata *,
880 unsigned int);
881 static int do_trace = 0;
882 static int setup_done = 0;
883 static int link_statistics;
884 static int ext_tran = 0;
885 static int rev_scan = 1;
886
887 #if defined(CONFIG_SCSI_EATA_TAGGED_QUEUE)
888 static int tag_mode = TAG_SIMPLE;
889 #else
890 static int tag_mode = TAG_DISABLED;
891 #endif
892
893 #if defined(CONFIG_SCSI_EATA_LINKED_COMMANDS)
894 static int linked_comm = 1;
895 #else
896 static int linked_comm = 0;
897 #endif
898
899 #if defined(CONFIG_SCSI_EATA_MAX_TAGS)
900 static int max_queue_depth = CONFIG_SCSI_EATA_MAX_TAGS;
901 #else
902 static int max_queue_depth = MAX_CMD_PER_LUN;
903 #endif
904
905 #if defined(CONFIG_ISA)
906 static int isa_probe = 1;
907 #else
908 static int isa_probe = 0;
909 #endif
910
911 #if defined(CONFIG_EISA)
912 static int eisa_probe = 1;
913 #else
914 static int eisa_probe = 0;
915 #endif
916
917 #if defined(CONFIG_PCI)
918 static int pci_probe = 1;
919 #else
920 static int pci_probe = 0;
921 #endif
922
923 #define MAX_INT_PARAM 10
924 #define MAX_BOOT_OPTIONS_SIZE 256
925 static char boot_options[MAX_BOOT_OPTIONS_SIZE];
926
927 #if defined(MODULE)
928 #include <linux/module.h>
929 #include <linux/moduleparam.h>
930
931 module_param_string(eata, boot_options, MAX_BOOT_OPTIONS_SIZE, 0);
932 MODULE_PARM_DESC(eata, " equivalent to the \"eata=...\" kernel boot option."
933 " Example: modprobe eata \"eata=0x7410,0x230,lc:y,tm:0,mq:4,ep:n\"");
934 MODULE_AUTHOR("Dario Ballabio");
935 MODULE_LICENSE("GPL");
936 MODULE_DESCRIPTION("EATA/DMA SCSI Driver");
937
938 #endif
939
940 static int eata2x_slave_configure(struct scsi_device *dev)
941 {
942 int tqd, utqd;
943 char *tag_suffix, *link_suffix;
944
945 utqd = MAX_CMD_PER_LUN;
946 tqd = max_queue_depth;
947
948 if (TLDEV(dev->type) && dev->tagged_supported) {
949 if (tag_mode == TAG_SIMPLE) {
950 scsi_adjust_queue_depth(dev, MSG_SIMPLE_TAG, tqd);
951 tag_suffix = ", simple tags";
952 } else if (tag_mode == TAG_ORDERED) {
953 scsi_adjust_queue_depth(dev, MSG_ORDERED_TAG, tqd);
954 tag_suffix = ", ordered tags";
955 } else {
956 scsi_adjust_queue_depth(dev, 0, tqd);
957 tag_suffix = ", no tags";
958 }
959 } else if (TLDEV(dev->type) && linked_comm) {
960 scsi_adjust_queue_depth(dev, 0, tqd);
961 tag_suffix = ", untagged";
962 } else {
963 scsi_adjust_queue_depth(dev, 0, utqd);
964 tag_suffix = "";
965 }
966
967 if (TLDEV(dev->type) && linked_comm && dev->queue_depth > 2)
968 link_suffix = ", sorted";
969 else if (TLDEV(dev->type))
970 link_suffix = ", unsorted";
971 else
972 link_suffix = "";
973
974 sdev_printk(KERN_INFO, dev,
975 "cmds/lun %d%s%s.\n",
976 dev->queue_depth, link_suffix, tag_suffix);
977
978 return 0;
979 }
980
981 static int wait_on_busy(unsigned long iobase, unsigned int loop)
982 {
983 while (inb(iobase + REG_AUX_STATUS) & ABSY_ASSERTED) {
984 udelay(1L);
985 if (--loop == 0)
986 return 1;
987 }
988 return 0;
989 }
990
991 static int do_dma(unsigned long iobase, unsigned long addr, unchar cmd)
992 {
993 unsigned char *byaddr;
994 unsigned long devaddr;
995
996 if (wait_on_busy(iobase, (addr ? MAXLOOP * 100 : MAXLOOP)))
997 return 1;
998
999 if (addr) {
1000 devaddr = H2DEV(addr);
1001 byaddr = (unsigned char *)&devaddr;
1002 outb(byaddr[3], iobase + REG_LOW);
1003 outb(byaddr[2], iobase + REG_LM);
1004 outb(byaddr[1], iobase + REG_MID);
1005 outb(byaddr[0], iobase + REG_MSB);
1006 }
1007
1008 outb(cmd, iobase + REG_CMD);
1009 return 0;
1010 }
1011
1012 static int read_pio(unsigned long iobase, ushort * start, ushort * end)
1013 {
1014 unsigned int loop = MAXLOOP;
1015 ushort *p;
1016
1017 for (p = start; p <= end; p++) {
1018 while (!(inb(iobase + REG_STATUS) & DRQ_ASSERTED)) {
1019 udelay(1L);
1020 if (--loop == 0)
1021 return 1;
1022 }
1023 loop = MAXLOOP;
1024 *p = REG2H(inw(iobase));
1025 }
1026
1027 return 0;
1028 }
1029
1030 static struct pci_dev *get_pci_dev(unsigned long port_base)
1031 {
1032 #if defined(CONFIG_PCI)
1033 unsigned int addr;
1034 struct pci_dev *dev = NULL;
1035
1036 while ((dev = pci_get_class(PCI_CLASS_STORAGE_SCSI << 8, dev))) {
1037 addr = pci_resource_start(dev, 0);
1038
1039 #if defined(DEBUG_PCI_DETECT)
1040 printk("%s: get_pci_dev, bus %d, devfn 0x%x, addr 0x%x.\n",
1041 driver_name, dev->bus->number, dev->devfn, addr);
1042 #endif
1043
1044 /* we are in so much trouble for a pci hotplug system with this driver
1045 * anyway, so doing this at least lets people unload the driver and not
1046 * cause memory problems, but in general this is a bad thing to do (this
1047 * driver needs to be converted to the proper PCI api someday... */
1048 pci_dev_put(dev);
1049 if (addr + PCI_BASE_ADDRESS_0 == port_base)
1050 return dev;
1051 }
1052 #endif /* end CONFIG_PCI */
1053 return NULL;
1054 }
1055
1056 static void enable_pci_ports(void)
1057 {
1058 #if defined(CONFIG_PCI)
1059 struct pci_dev *dev = NULL;
1060
1061 while ((dev = pci_get_class(PCI_CLASS_STORAGE_SCSI << 8, dev))) {
1062 #if defined(DEBUG_PCI_DETECT)
1063 printk("%s: enable_pci_ports, bus %d, devfn 0x%x.\n",
1064 driver_name, dev->bus->number, dev->devfn);
1065 #endif
1066
1067 if (pci_enable_device(dev))
1068 printk
1069 ("%s: warning, pci_enable_device failed, bus %d devfn 0x%x.\n",
1070 driver_name, dev->bus->number, dev->devfn);
1071 }
1072
1073 #endif /* end CONFIG_PCI */
1074 }
1075
1076 static int port_detect(unsigned long port_base, unsigned int j,
1077 struct scsi_host_template *tpnt)
1078 {
1079 unsigned char irq, dma_channel, subversion, i, is_pci = 0;
1080 unsigned char protocol_rev;
1081 struct eata_info info;
1082 char *bus_type, dma_name[16];
1083 struct pci_dev *pdev;
1084 /* Allowed DMA channels for ISA (0 indicates reserved) */
1085 unsigned char dma_channel_table[4] = { 5, 6, 7, 0 };
1086 struct Scsi_Host *shost;
1087 struct hostdata *ha;
1088 char name[16];
1089
1090 sprintf(name, "%s%d", driver_name, j);
1091
1092 if (!request_region(port_base, REGION_SIZE, driver_name)) {
1093 #if defined(DEBUG_DETECT)
1094 printk("%s: address 0x%03lx in use, skipping probe.\n", name,
1095 port_base);
1096 #endif
1097 goto fail;
1098 }
1099
1100 spin_lock_irq(&driver_lock);
1101
1102 if (do_dma(port_base, 0, READ_CONFIG_PIO)) {
1103 #if defined(DEBUG_DETECT)
1104 printk("%s: detect, do_dma failed at 0x%03lx.\n", name,
1105 port_base);
1106 #endif
1107 goto freelock;
1108 }
1109
1110 /* Read the info structure */
1111 if (read_pio(port_base, (ushort *) & info, (ushort *) & info.ipad[0])) {
1112 #if defined(DEBUG_DETECT)
1113 printk("%s: detect, read_pio failed at 0x%03lx.\n", name,
1114 port_base);
1115 #endif
1116 goto freelock;
1117 }
1118
1119 info.data_len = DEV2H(info.data_len);
1120 info.sign = DEV2H(info.sign);
1121 info.cp_pad_len = DEV2H16(info.cp_pad_len);
1122 info.cp_len = DEV2H(info.cp_len);
1123 info.sp_len = DEV2H(info.sp_len);
1124 info.scatt_size = DEV2H16(info.scatt_size);
1125 info.queue_size = DEV2H16(info.queue_size);
1126
1127 /* Check the controller "EATA" signature */
1128 if (info.sign != EATA_SIG_BE) {
1129 #if defined(DEBUG_DETECT)
1130 printk("%s: signature 0x%04x discarded.\n", name, info.sign);
1131 #endif
1132 goto freelock;
1133 }
1134
1135 if (info.data_len < EATA_2_0A_SIZE) {
1136 printk
1137 ("%s: config structure size (%d bytes) too short, detaching.\n",
1138 name, info.data_len);
1139 goto freelock;
1140 } else if (info.data_len == EATA_2_0A_SIZE)
1141 protocol_rev = 'A';
1142 else if (info.data_len == EATA_2_0B_SIZE)
1143 protocol_rev = 'B';
1144 else
1145 protocol_rev = 'C';
1146
1147 if (protocol_rev != 'A' && info.forcaddr) {
1148 printk("%s: warning, port address has been forced.\n", name);
1149 bus_type = "PCI";
1150 is_pci = 1;
1151 subversion = ESA;
1152 } else if (port_base > MAX_EISA_ADDR
1153 || (protocol_rev == 'C' && info.pci)) {
1154 bus_type = "PCI";
1155 is_pci = 1;
1156 subversion = ESA;
1157 } else if (port_base >= MIN_EISA_ADDR
1158 || (protocol_rev == 'C' && info.eisa)) {
1159 bus_type = "EISA";
1160 subversion = ESA;
1161 } else if (protocol_rev == 'C' && !info.eisa && !info.pci) {
1162 bus_type = "ISA";
1163 subversion = ISA;
1164 } else if (port_base > MAX_ISA_ADDR) {
1165 bus_type = "PCI";
1166 is_pci = 1;
1167 subversion = ESA;
1168 } else {
1169 bus_type = "ISA";
1170 subversion = ISA;
1171 }
1172
1173 if (!info.haaval || info.ata) {
1174 printk
1175 ("%s: address 0x%03lx, unusable %s board (%d%d), detaching.\n",
1176 name, port_base, bus_type, info.haaval, info.ata);
1177 goto freelock;
1178 }
1179
1180 if (info.drqvld) {
1181 if (subversion == ESA)
1182 printk("%s: warning, weird %s board using DMA.\n", name,
1183 bus_type);
1184
1185 subversion = ISA;
1186 dma_channel = dma_channel_table[3 - info.drqx];
1187 } else {
1188 if (subversion == ISA)
1189 printk("%s: warning, weird %s board not using DMA.\n",
1190 name, bus_type);
1191
1192 subversion = ESA;
1193 dma_channel = NO_DMA;
1194 }
1195
1196 if (!info.dmasup)
1197 printk("%s: warning, DMA protocol support not asserted.\n",
1198 name);
1199
1200 irq = info.irq;
1201
1202 if (subversion == ESA && !info.irq_tr)
1203 printk
1204 ("%s: warning, LEVEL triggering is suggested for IRQ %u.\n",
1205 name, irq);
1206
1207 if (is_pci) {
1208 pdev = get_pci_dev(port_base);
1209 if (!pdev)
1210 printk
1211 ("%s: warning, failed to get pci_dev structure.\n",
1212 name);
1213 } else
1214 pdev = NULL;
1215
1216 if (pdev && (irq != pdev->irq)) {
1217 printk("%s: IRQ %u mapped to IO-APIC IRQ %u.\n", name, irq,
1218 pdev->irq);
1219 irq = pdev->irq;
1220 }
1221
1222 /* Board detected, allocate its IRQ */
1223 if (request_irq(irq, do_interrupt_handler,
1224 IRQF_DISABLED | ((subversion == ESA) ? IRQF_SHARED : 0),
1225 driver_name, (void *)&sha[j])) {
1226 printk("%s: unable to allocate IRQ %u, detaching.\n", name,
1227 irq);
1228 goto freelock;
1229 }
1230
1231 if (subversion == ISA && request_dma(dma_channel, driver_name)) {
1232 printk("%s: unable to allocate DMA channel %u, detaching.\n",
1233 name, dma_channel);
1234 goto freeirq;
1235 }
1236 #if defined(FORCE_CONFIG)
1237 {
1238 struct eata_config *cf;
1239 dma_addr_t cf_dma_addr;
1240
1241 cf = pci_alloc_consistent(pdev, sizeof(struct eata_config),
1242 &cf_dma_addr);
1243
1244 if (!cf) {
1245 printk
1246 ("%s: config, pci_alloc_consistent failed, detaching.\n",
1247 name);
1248 goto freedma;
1249 }
1250
1251 /* Set board configuration */
1252 memset((char *)cf, 0, sizeof(struct eata_config));
1253 cf->len = (ushort) H2DEV16((ushort) 510);
1254 cf->ocena = 1;
1255
1256 if (do_dma(port_base, cf_dma_addr, SET_CONFIG_DMA)) {
1257 printk
1258 ("%s: busy timeout sending configuration, detaching.\n",
1259 name);
1260 pci_free_consistent(pdev, sizeof(struct eata_config),
1261 cf, cf_dma_addr);
1262 goto freedma;
1263 }
1264
1265 }
1266 #endif
1267
1268 spin_unlock_irq(&driver_lock);
1269 sh[j] = shost = scsi_register(tpnt, sizeof(struct hostdata));
1270 spin_lock_irq(&driver_lock);
1271
1272 if (shost == NULL) {
1273 printk("%s: unable to register host, detaching.\n", name);
1274 goto freedma;
1275 }
1276
1277 shost->io_port = port_base;
1278 shost->unique_id = port_base;
1279 shost->n_io_port = REGION_SIZE;
1280 shost->dma_channel = dma_channel;
1281 shost->irq = irq;
1282 shost->sg_tablesize = (ushort) info.scatt_size;
1283 shost->this_id = (ushort) info.host_addr[3];
1284 shost->can_queue = (ushort) info.queue_size;
1285 shost->cmd_per_lun = MAX_CMD_PER_LUN;
1286
1287 ha = (struct hostdata *)shost->hostdata;
1288
1289 memset(ha, 0, sizeof(struct hostdata));
1290 ha->subversion = subversion;
1291 ha->protocol_rev = protocol_rev;
1292 ha->is_pci = is_pci;
1293 ha->pdev = pdev;
1294 ha->board_number = j;
1295
1296 if (ha->subversion == ESA)
1297 shost->unchecked_isa_dma = 0;
1298 else {
1299 unsigned long flags;
1300 shost->unchecked_isa_dma = 1;
1301
1302 flags = claim_dma_lock();
1303 disable_dma(dma_channel);
1304 clear_dma_ff(dma_channel);
1305 set_dma_mode(dma_channel, DMA_MODE_CASCADE);
1306 enable_dma(dma_channel);
1307 release_dma_lock(flags);
1308
1309 }
1310
1311 strcpy(ha->board_name, name);
1312
1313 /* DPT PM2012 does not allow to detect sg_tablesize correctly */
1314 if (shost->sg_tablesize > MAX_SGLIST || shost->sg_tablesize < 2) {
1315 printk("%s: detect, wrong n. of SG lists %d, fixed.\n",
1316 ha->board_name, shost->sg_tablesize);
1317 shost->sg_tablesize = MAX_SGLIST;
1318 }
1319
1320 /* DPT PM2012 does not allow to detect can_queue correctly */
1321 if (shost->can_queue > MAX_MAILBOXES || shost->can_queue < 2) {
1322 printk("%s: detect, wrong n. of mbox %d, fixed.\n",
1323 ha->board_name, shost->can_queue);
1324 shost->can_queue = MAX_MAILBOXES;
1325 }
1326
1327 if (protocol_rev != 'A') {
1328 if (info.max_chan > 0 && info.max_chan < MAX_CHANNEL)
1329 shost->max_channel = info.max_chan;
1330
1331 if (info.max_id > 7 && info.max_id < MAX_TARGET)
1332 shost->max_id = info.max_id + 1;
1333
1334 if (info.large_sg && shost->sg_tablesize == MAX_SGLIST)
1335 shost->sg_tablesize = MAX_LARGE_SGLIST;
1336 }
1337
1338 if (protocol_rev == 'C') {
1339 if (info.max_lun > 7 && info.max_lun < MAX_LUN)
1340 shost->max_lun = info.max_lun + 1;
1341 }
1342
1343 if (dma_channel == NO_DMA)
1344 sprintf(dma_name, "%s", "BMST");
1345 else
1346 sprintf(dma_name, "DMA %u", dma_channel);
1347
1348 spin_unlock_irq(&driver_lock);
1349
1350 for (i = 0; i < shost->can_queue; i++)
1351 ha->cp[i].cp_dma_addr = pci_map_single(ha->pdev,
1352 &ha->cp[i],
1353 sizeof(struct mscp),
1354 PCI_DMA_BIDIRECTIONAL);
1355
1356 for (i = 0; i < shost->can_queue; i++) {
1357 size_t sz = shost->sg_tablesize *sizeof(struct sg_list);
1358 gfp_t gfp_mask = (shost->unchecked_isa_dma ? GFP_DMA : 0) | GFP_ATOMIC;
1359 ha->cp[i].sglist = kmalloc(sz, gfp_mask);
1360 if (!ha->cp[i].sglist) {
1361 printk
1362 ("%s: kmalloc SGlist failed, mbox %d, detaching.\n",
1363 ha->board_name, i);
1364 goto release;
1365 }
1366 }
1367
1368 if (!(ha->sp_cpu_addr = pci_alloc_consistent(ha->pdev,
1369 sizeof(struct mssp),
1370 &ha->sp_dma_addr))) {
1371 printk("%s: pci_alloc_consistent failed, detaching.\n", ha->board_name);
1372 goto release;
1373 }
1374
1375 if (max_queue_depth > MAX_TAGGED_CMD_PER_LUN)
1376 max_queue_depth = MAX_TAGGED_CMD_PER_LUN;
1377
1378 if (max_queue_depth < MAX_CMD_PER_LUN)
1379 max_queue_depth = MAX_CMD_PER_LUN;
1380
1381 if (tag_mode != TAG_DISABLED && tag_mode != TAG_SIMPLE)
1382 tag_mode = TAG_ORDERED;
1383
1384 if (j == 0) {
1385 printk
1386 ("EATA/DMA 2.0x: Copyright (C) 1994-2003 Dario Ballabio.\n");
1387 printk
1388 ("%s config options -> tm:%d, lc:%c, mq:%d, rs:%c, et:%c, "
1389 "ip:%c, ep:%c, pp:%c.\n", driver_name, tag_mode,
1390 YESNO(linked_comm), max_queue_depth, YESNO(rev_scan),
1391 YESNO(ext_tran), YESNO(isa_probe), YESNO(eisa_probe),
1392 YESNO(pci_probe));
1393 }
1394
1395 printk("%s: 2.0%c, %s 0x%03lx, IRQ %u, %s, SG %d, MB %d.\n",
1396 ha->board_name, ha->protocol_rev, bus_type,
1397 (unsigned long)shost->io_port, shost->irq, dma_name,
1398 shost->sg_tablesize, shost->can_queue);
1399
1400 if (shost->max_id > 8 || shost->max_lun > 8)
1401 printk
1402 ("%s: wide SCSI support enabled, max_id %u, max_lun %u.\n",
1403 ha->board_name, shost->max_id, shost->max_lun);
1404
1405 for (i = 0; i <= shost->max_channel; i++)
1406 printk("%s: SCSI channel %u enabled, host target ID %d.\n",
1407 ha->board_name, i, info.host_addr[3 - i]);
1408
1409 #if defined(DEBUG_DETECT)
1410 printk("%s: Vers. 0x%x, ocs %u, tar %u, trnxfr %u, more %u, SYNC 0x%x, "
1411 "sec. %u, infol %d, cpl %d spl %d.\n", name, info.version,
1412 info.ocsena, info.tarsup, info.trnxfr, info.morsup, info.sync,
1413 info.second, info.data_len, info.cp_len, info.sp_len);
1414
1415 if (protocol_rev == 'B' || protocol_rev == 'C')
1416 printk("%s: isaena %u, forcaddr %u, max_id %u, max_chan %u, "
1417 "large_sg %u, res1 %u.\n", name, info.isaena,
1418 info.forcaddr, info.max_id, info.max_chan, info.large_sg,
1419 info.res1);
1420
1421 if (protocol_rev == 'C')
1422 printk("%s: max_lun %u, m1 %u, idquest %u, pci %u, eisa %u, "
1423 "raidnum %u.\n", name, info.max_lun, info.m1,
1424 info.idquest, info.pci, info.eisa, info.raidnum);
1425 #endif
1426
1427 if (ha->pdev) {
1428 pci_set_master(ha->pdev);
1429 if (pci_set_dma_mask(ha->pdev, DMA_32BIT_MASK))
1430 printk("%s: warning, pci_set_dma_mask failed.\n",
1431 ha->board_name);
1432 }
1433
1434 return 1;
1435
1436 freedma:
1437 if (subversion == ISA)
1438 free_dma(dma_channel);
1439 freeirq:
1440 free_irq(irq, &sha[j]);
1441 freelock:
1442 spin_unlock_irq(&driver_lock);
1443 release_region(port_base, REGION_SIZE);
1444 fail:
1445 return 0;
1446
1447 release:
1448 eata2x_release(shost);
1449 return 0;
1450 }
1451
1452 static void internal_setup(char *str, int *ints)
1453 {
1454 int i, argc = ints[0];
1455 char *cur = str, *pc;
1456
1457 if (argc > 0) {
1458 if (argc > MAX_INT_PARAM)
1459 argc = MAX_INT_PARAM;
1460
1461 for (i = 0; i < argc; i++)
1462 io_port[i] = ints[i + 1];
1463
1464 io_port[i] = 0;
1465 setup_done = 1;
1466 }
1467
1468 while (cur && (pc = strchr(cur, ':'))) {
1469 int val = 0, c = *++pc;
1470
1471 if (c == 'n' || c == 'N')
1472 val = 0;
1473 else if (c == 'y' || c == 'Y')
1474 val = 1;
1475 else
1476 val = (int)simple_strtoul(pc, NULL, 0);
1477
1478 if (!strncmp(cur, "lc:", 3))
1479 linked_comm = val;
1480 else if (!strncmp(cur, "tm:", 3))
1481 tag_mode = val;
1482 else if (!strncmp(cur, "tc:", 3))
1483 tag_mode = val;
1484 else if (!strncmp(cur, "mq:", 3))
1485 max_queue_depth = val;
1486 else if (!strncmp(cur, "ls:", 3))
1487 link_statistics = val;
1488 else if (!strncmp(cur, "et:", 3))
1489 ext_tran = val;
1490 else if (!strncmp(cur, "rs:", 3))
1491 rev_scan = val;
1492 else if (!strncmp(cur, "ip:", 3))
1493 isa_probe = val;
1494 else if (!strncmp(cur, "ep:", 3))
1495 eisa_probe = val;
1496 else if (!strncmp(cur, "pp:", 3))
1497 pci_probe = val;
1498
1499 if ((cur = strchr(cur, ',')))
1500 ++cur;
1501 }
1502
1503 return;
1504 }
1505
1506 static int option_setup(char *str)
1507 {
1508 int ints[MAX_INT_PARAM];
1509 char *cur = str;
1510 int i = 1;
1511
1512 while (cur && isdigit(*cur) && i <= MAX_INT_PARAM) {
1513 ints[i++] = simple_strtoul(cur, NULL, 0);
1514
1515 if ((cur = strchr(cur, ',')) != NULL)
1516 cur++;
1517 }
1518
1519 ints[0] = i - 1;
1520 internal_setup(cur, ints);
1521 return 1;
1522 }
1523
1524 static void add_pci_ports(void)
1525 {
1526 #if defined(CONFIG_PCI)
1527 unsigned int addr, k;
1528 struct pci_dev *dev = NULL;
1529
1530 for (k = 0; k < MAX_PCI; k++) {
1531
1532 if (!(dev = pci_get_class(PCI_CLASS_STORAGE_SCSI << 8, dev)))
1533 break;
1534
1535 if (pci_enable_device(dev)) {
1536 #if defined(DEBUG_PCI_DETECT)
1537 printk
1538 ("%s: detect, bus %d, devfn 0x%x, pci_enable_device failed.\n",
1539 driver_name, dev->bus->number, dev->devfn);
1540 #endif
1541
1542 continue;
1543 }
1544
1545 addr = pci_resource_start(dev, 0);
1546
1547 #if defined(DEBUG_PCI_DETECT)
1548 printk("%s: detect, seq. %d, bus %d, devfn 0x%x, addr 0x%x.\n",
1549 driver_name, k, dev->bus->number, dev->devfn, addr);
1550 #endif
1551
1552 /* Order addresses according to rev_scan value */
1553 io_port[MAX_INT_PARAM + (rev_scan ? (MAX_PCI - k) : (1 + k))] =
1554 addr + PCI_BASE_ADDRESS_0;
1555 }
1556
1557 pci_dev_put(dev);
1558 #endif /* end CONFIG_PCI */
1559 }
1560
1561 static int eata2x_detect(struct scsi_host_template *tpnt)
1562 {
1563 unsigned int j = 0, k;
1564
1565 tpnt->proc_name = "eata2x";
1566
1567 if (strlen(boot_options))
1568 option_setup(boot_options);
1569
1570 #if defined(MODULE)
1571 /* io_port could have been modified when loading as a module */
1572 if (io_port[0] != SKIP) {
1573 setup_done = 1;
1574 io_port[MAX_INT_PARAM] = 0;
1575 }
1576 #endif
1577
1578 for (k = MAX_INT_PARAM; io_port[k]; k++)
1579 if (io_port[k] == SKIP)
1580 continue;
1581 else if (io_port[k] <= MAX_ISA_ADDR) {
1582 if (!isa_probe)
1583 io_port[k] = SKIP;
1584 } else if (io_port[k] >= MIN_EISA_ADDR
1585 && io_port[k] <= MAX_EISA_ADDR) {
1586 if (!eisa_probe)
1587 io_port[k] = SKIP;
1588 }
1589
1590 if (pci_probe) {
1591 if (!setup_done)
1592 add_pci_ports();
1593 else
1594 enable_pci_ports();
1595 }
1596
1597 for (k = 0; io_port[k]; k++) {
1598
1599 if (io_port[k] == SKIP)
1600 continue;
1601
1602 if (j < MAX_BOARDS && port_detect(io_port[k], j, tpnt))
1603 j++;
1604 }
1605
1606 num_boards = j;
1607 return j;
1608 }
1609
1610 static void map_dma(unsigned int i, struct hostdata *ha)
1611 {
1612 unsigned int k, pci_dir;
1613 int count;
1614 struct scatterlist *sg;
1615 struct mscp *cpp;
1616 struct scsi_cmnd *SCpnt;
1617
1618 cpp = &ha->cp[i];
1619 SCpnt = cpp->SCpnt;
1620 pci_dir = SCpnt->sc_data_direction;
1621
1622 if (SCpnt->sense_buffer)
1623 cpp->sense_addr =
1624 H2DEV(pci_map_single(ha->pdev, SCpnt->sense_buffer,
1625 SCSI_SENSE_BUFFERSIZE, PCI_DMA_FROMDEVICE));
1626
1627 cpp->sense_len = SCSI_SENSE_BUFFERSIZE;
1628
1629 if (!scsi_sg_count(SCpnt)) {
1630 cpp->data_len = 0;
1631 return;
1632 }
1633
1634 count = pci_map_sg(ha->pdev, scsi_sglist(SCpnt), scsi_sg_count(SCpnt),
1635 pci_dir);
1636 BUG_ON(!count);
1637
1638 scsi_for_each_sg(SCpnt, sg, count, k) {
1639 cpp->sglist[k].address = H2DEV(sg_dma_address(sg));
1640 cpp->sglist[k].num_bytes = H2DEV(sg_dma_len(sg));
1641 }
1642
1643 cpp->sg = 1;
1644 cpp->data_address = H2DEV(pci_map_single(ha->pdev, cpp->sglist,
1645 scsi_sg_count(SCpnt) *
1646 sizeof(struct sg_list),
1647 pci_dir));
1648 cpp->data_len = H2DEV((scsi_sg_count(SCpnt) * sizeof(struct sg_list)));
1649 }
1650
1651 static void unmap_dma(unsigned int i, struct hostdata *ha)
1652 {
1653 unsigned int pci_dir;
1654 struct mscp *cpp;
1655 struct scsi_cmnd *SCpnt;
1656
1657 cpp = &ha->cp[i];
1658 SCpnt = cpp->SCpnt;
1659 pci_dir = SCpnt->sc_data_direction;
1660
1661 if (DEV2H(cpp->sense_addr))
1662 pci_unmap_single(ha->pdev, DEV2H(cpp->sense_addr),
1663 DEV2H(cpp->sense_len), PCI_DMA_FROMDEVICE);
1664
1665 if (scsi_sg_count(SCpnt))
1666 pci_unmap_sg(ha->pdev, scsi_sglist(SCpnt), scsi_sg_count(SCpnt),
1667 pci_dir);
1668
1669 if (!DEV2H(cpp->data_len))
1670 pci_dir = PCI_DMA_BIDIRECTIONAL;
1671
1672 if (DEV2H(cpp->data_address))
1673 pci_unmap_single(ha->pdev, DEV2H(cpp->data_address),
1674 DEV2H(cpp->data_len), pci_dir);
1675 }
1676
1677 static void sync_dma(unsigned int i, struct hostdata *ha)
1678 {
1679 unsigned int pci_dir;
1680 struct mscp *cpp;
1681 struct scsi_cmnd *SCpnt;
1682
1683 cpp = &ha->cp[i];
1684 SCpnt = cpp->SCpnt;
1685 pci_dir = SCpnt->sc_data_direction;
1686
1687 if (DEV2H(cpp->sense_addr))
1688 pci_dma_sync_single_for_cpu(ha->pdev, DEV2H(cpp->sense_addr),
1689 DEV2H(cpp->sense_len),
1690 PCI_DMA_FROMDEVICE);
1691
1692 if (scsi_sg_count(SCpnt))
1693 pci_dma_sync_sg_for_cpu(ha->pdev, scsi_sglist(SCpnt),
1694 scsi_sg_count(SCpnt), pci_dir);
1695
1696 if (!DEV2H(cpp->data_len))
1697 pci_dir = PCI_DMA_BIDIRECTIONAL;
1698
1699 if (DEV2H(cpp->data_address))
1700 pci_dma_sync_single_for_cpu(ha->pdev,
1701 DEV2H(cpp->data_address),
1702 DEV2H(cpp->data_len), pci_dir);
1703 }
1704
1705 static void scsi_to_dev_dir(unsigned int i, struct hostdata *ha)
1706 {
1707 unsigned int k;
1708
1709 static const unsigned char data_out_cmds[] = {
1710 0x0a, 0x2a, 0x15, 0x55, 0x04, 0x07, 0x18, 0x1d, 0x24, 0x2e,
1711 0x30, 0x31, 0x32, 0x38, 0x39, 0x3a, 0x3b, 0x3d, 0x3f, 0x40,
1712 0x41, 0x4c, 0xaa, 0xae, 0xb0, 0xb1, 0xb2, 0xb6, 0xea, 0x1b, 0x5d
1713 };
1714
1715 static const unsigned char data_none_cmds[] = {
1716 0x01, 0x0b, 0x10, 0x11, 0x13, 0x16, 0x17, 0x19, 0x2b, 0x1e,
1717 0x2c, 0xac, 0x2f, 0xaf, 0x33, 0xb3, 0x35, 0x36, 0x45, 0x47,
1718 0x48, 0x49, 0xa9, 0x4b, 0xa5, 0xa6, 0xb5, 0x00
1719 };
1720
1721 struct mscp *cpp;
1722 struct scsi_cmnd *SCpnt;
1723
1724 cpp = &ha->cp[i];
1725 SCpnt = cpp->SCpnt;
1726
1727 if (SCpnt->sc_data_direction == DMA_FROM_DEVICE) {
1728 cpp->din = 1;
1729 cpp->dout = 0;
1730 return;
1731 } else if (SCpnt->sc_data_direction == DMA_TO_DEVICE) {
1732 cpp->din = 0;
1733 cpp->dout = 1;
1734 return;
1735 } else if (SCpnt->sc_data_direction == DMA_NONE) {
1736 cpp->din = 0;
1737 cpp->dout = 0;
1738 return;
1739 }
1740
1741 if (SCpnt->sc_data_direction != DMA_BIDIRECTIONAL)
1742 panic("%s: qcomm, invalid SCpnt->sc_data_direction.\n",
1743 ha->board_name);
1744
1745 for (k = 0; k < ARRAY_SIZE(data_out_cmds); k++)
1746 if (SCpnt->cmnd[0] == data_out_cmds[k]) {
1747 cpp->dout = 1;
1748 break;
1749 }
1750
1751 if ((cpp->din = !cpp->dout))
1752 for (k = 0; k < ARRAY_SIZE(data_none_cmds); k++)
1753 if (SCpnt->cmnd[0] == data_none_cmds[k]) {
1754 cpp->din = 0;
1755 break;
1756 }
1757
1758 }
1759
1760 static int eata2x_queuecommand(struct scsi_cmnd *SCpnt,
1761 void (*done) (struct scsi_cmnd *))
1762 {
1763 struct Scsi_Host *shost = SCpnt->device->host;
1764 struct hostdata *ha = (struct hostdata *)shost->hostdata;
1765 unsigned int i, k;
1766 struct mscp *cpp;
1767
1768 if (SCpnt->host_scribble)
1769 panic("%s: qcomm, pid %ld, SCpnt %p already active.\n",
1770 ha->board_name, SCpnt->serial_number, SCpnt);
1771
1772 /* i is the mailbox number, look for the first free mailbox
1773 starting from last_cp_used */
1774 i = ha->last_cp_used + 1;
1775
1776 for (k = 0; k < shost->can_queue; k++, i++) {
1777 if (i >= shost->can_queue)
1778 i = 0;
1779 if (ha->cp_stat[i] == FREE) {
1780 ha->last_cp_used = i;
1781 break;
1782 }
1783 }
1784
1785 if (k == shost->can_queue) {
1786 printk("%s: qcomm, no free mailbox.\n", ha->board_name);
1787 return 1;
1788 }
1789
1790 /* Set pointer to control packet structure */
1791 cpp = &ha->cp[i];
1792
1793 memset(cpp, 0, sizeof(struct mscp) - CP_TAIL_SIZE);
1794
1795 /* Set pointer to status packet structure, Big Endian format */
1796 cpp->sp_dma_addr = H2DEV(ha->sp_dma_addr);
1797
1798 SCpnt->scsi_done = done;
1799 cpp->cpp_index = i;
1800 SCpnt->host_scribble = (unsigned char *)&cpp->cpp_index;
1801
1802 if (do_trace)
1803 scmd_printk(KERN_INFO, SCpnt,
1804 "qcomm, mbox %d, pid %ld.\n", i, SCpnt->serial_number);
1805
1806 cpp->reqsen = 1;
1807 cpp->dispri = 1;
1808 #if 0
1809 if (SCpnt->device->type == TYPE_TAPE)
1810 cpp->hbaci = 1;
1811 #endif
1812 cpp->one = 1;
1813 cpp->channel = SCpnt->device->channel;
1814 cpp->target = SCpnt->device->id;
1815 cpp->lun = SCpnt->device->lun;
1816 cpp->SCpnt = SCpnt;
1817 memcpy(cpp->cdb, SCpnt->cmnd, SCpnt->cmd_len);
1818
1819 /* Use data transfer direction SCpnt->sc_data_direction */
1820 scsi_to_dev_dir(i, ha);
1821
1822 /* Map DMA buffers and SG list */
1823 map_dma(i, ha);
1824
1825 if (linked_comm && SCpnt->device->queue_depth > 2
1826 && TLDEV(SCpnt->device->type)) {
1827 ha->cp_stat[i] = READY;
1828 flush_dev(SCpnt->device, SCpnt->request->sector, ha, 0);
1829 return 0;
1830 }
1831
1832 /* Send control packet to the board */
1833 if (do_dma(shost->io_port, cpp->cp_dma_addr, SEND_CP_DMA)) {
1834 unmap_dma(i, ha);
1835 SCpnt->host_scribble = NULL;
1836 scmd_printk(KERN_INFO, SCpnt,
1837 "qcomm, pid %ld, adapter busy.\n", SCpnt->serial_number);
1838 return 1;
1839 }
1840
1841 ha->cp_stat[i] = IN_USE;
1842 return 0;
1843 }
1844
1845 static int eata2x_eh_abort(struct scsi_cmnd *SCarg)
1846 {
1847 struct Scsi_Host *shost = SCarg->device->host;
1848 struct hostdata *ha = (struct hostdata *)shost->hostdata;
1849 unsigned int i;
1850
1851 if (SCarg->host_scribble == NULL) {
1852 scmd_printk(KERN_INFO, SCarg,
1853 "abort, pid %ld inactive.\n", SCarg->serial_number);
1854 return SUCCESS;
1855 }
1856
1857 i = *(unsigned int *)SCarg->host_scribble;
1858 scmd_printk(KERN_WARNING, SCarg,
1859 "abort, mbox %d, pid %ld.\n", i, SCarg->serial_number);
1860
1861 if (i >= shost->can_queue)
1862 panic("%s: abort, invalid SCarg->host_scribble.\n", ha->board_name);
1863
1864 if (wait_on_busy(shost->io_port, MAXLOOP)) {
1865 printk("%s: abort, timeout error.\n", ha->board_name);
1866 return FAILED;
1867 }
1868
1869 if (ha->cp_stat[i] == FREE) {
1870 printk("%s: abort, mbox %d is free.\n", ha->board_name, i);
1871 return SUCCESS;
1872 }
1873
1874 if (ha->cp_stat[i] == IN_USE) {
1875 printk("%s: abort, mbox %d is in use.\n", ha->board_name, i);
1876
1877 if (SCarg != ha->cp[i].SCpnt)
1878 panic("%s: abort, mbox %d, SCarg %p, cp SCpnt %p.\n",
1879 ha->board_name, i, SCarg, ha->cp[i].SCpnt);
1880
1881 if (inb(shost->io_port + REG_AUX_STATUS) & IRQ_ASSERTED)
1882 printk("%s: abort, mbox %d, interrupt pending.\n",
1883 ha->board_name, i);
1884
1885 return FAILED;
1886 }
1887
1888 if (ha->cp_stat[i] == IN_RESET) {
1889 printk("%s: abort, mbox %d is in reset.\n", ha->board_name, i);
1890 return FAILED;
1891 }
1892
1893 if (ha->cp_stat[i] == LOCKED) {
1894 printk("%s: abort, mbox %d is locked.\n", ha->board_name, i);
1895 return SUCCESS;
1896 }
1897
1898 if (ha->cp_stat[i] == READY || ha->cp_stat[i] == ABORTING) {
1899 unmap_dma(i, ha);
1900 SCarg->result = DID_ABORT << 16;
1901 SCarg->host_scribble = NULL;
1902 ha->cp_stat[i] = FREE;
1903 printk("%s, abort, mbox %d ready, DID_ABORT, pid %ld done.\n",
1904 ha->board_name, i, SCarg->serial_number);
1905 SCarg->scsi_done(SCarg);
1906 return SUCCESS;
1907 }
1908
1909 panic("%s: abort, mbox %d, invalid cp_stat.\n", ha->board_name, i);
1910 }
1911
1912 static int eata2x_eh_host_reset(struct scsi_cmnd *SCarg)
1913 {
1914 unsigned int i, time, k, c, limit = 0;
1915 int arg_done = 0;
1916 struct scsi_cmnd *SCpnt;
1917 struct Scsi_Host *shost = SCarg->device->host;
1918 struct hostdata *ha = (struct hostdata *)shost->hostdata;
1919
1920 scmd_printk(KERN_INFO, SCarg,
1921 "reset, enter, pid %ld.\n", SCarg->serial_number);
1922
1923 spin_lock_irq(shost->host_lock);
1924
1925 if (SCarg->host_scribble == NULL)
1926 printk("%s: reset, pid %ld inactive.\n", ha->board_name, SCarg->serial_number);
1927
1928 if (ha->in_reset) {
1929 printk("%s: reset, exit, already in reset.\n", ha->board_name);
1930 spin_unlock_irq(shost->host_lock);
1931 return FAILED;
1932 }
1933
1934 if (wait_on_busy(shost->io_port, MAXLOOP)) {
1935 printk("%s: reset, exit, timeout error.\n", ha->board_name);
1936 spin_unlock_irq(shost->host_lock);
1937 return FAILED;
1938 }
1939
1940 ha->retries = 0;
1941
1942 for (c = 0; c <= shost->max_channel; c++)
1943 for (k = 0; k < shost->max_id; k++) {
1944 ha->target_redo[k][c] = 1;
1945 ha->target_to[k][c] = 0;
1946 }
1947
1948 for (i = 0; i < shost->can_queue; i++) {
1949
1950 if (ha->cp_stat[i] == FREE)
1951 continue;
1952
1953 if (ha->cp_stat[i] == LOCKED) {
1954 ha->cp_stat[i] = FREE;
1955 printk("%s: reset, locked mbox %d forced free.\n",
1956 ha->board_name, i);
1957 continue;
1958 }
1959
1960 if (!(SCpnt = ha->cp[i].SCpnt))
1961 panic("%s: reset, mbox %d, SCpnt == NULL.\n", ha->board_name, i);
1962
1963 if (ha->cp_stat[i] == READY || ha->cp_stat[i] == ABORTING) {
1964 ha->cp_stat[i] = ABORTING;
1965 printk("%s: reset, mbox %d aborting, pid %ld.\n",
1966 ha->board_name, i, SCpnt->serial_number);
1967 }
1968
1969 else {
1970 ha->cp_stat[i] = IN_RESET;
1971 printk("%s: reset, mbox %d in reset, pid %ld.\n",
1972 ha->board_name, i, SCpnt->serial_number);
1973 }
1974
1975 if (SCpnt->host_scribble == NULL)
1976 panic("%s: reset, mbox %d, garbled SCpnt.\n", ha->board_name, i);
1977
1978 if (*(unsigned int *)SCpnt->host_scribble != i)
1979 panic("%s: reset, mbox %d, index mismatch.\n", ha->board_name, i);
1980
1981 if (SCpnt->scsi_done == NULL)
1982 panic("%s: reset, mbox %d, SCpnt->scsi_done == NULL.\n",
1983 ha->board_name, i);
1984
1985 if (SCpnt == SCarg)
1986 arg_done = 1;
1987 }
1988
1989 if (do_dma(shost->io_port, 0, RESET_PIO)) {
1990 printk("%s: reset, cannot reset, timeout error.\n", ha->board_name);
1991 spin_unlock_irq(shost->host_lock);
1992 return FAILED;
1993 }
1994
1995 printk("%s: reset, board reset done, enabling interrupts.\n", ha->board_name);
1996
1997 #if defined(DEBUG_RESET)
1998 do_trace = 1;
1999 #endif
2000
2001 ha->in_reset = 1;
2002
2003 spin_unlock_irq(shost->host_lock);
2004
2005 /* FIXME: use a sleep instead */
2006 time = jiffies;
2007 while ((jiffies - time) < (10 * HZ) && limit++ < 200000)
2008 udelay(100L);
2009
2010 spin_lock_irq(shost->host_lock);
2011
2012 printk("%s: reset, interrupts disabled, loops %d.\n", ha->board_name, limit);
2013
2014 for (i = 0; i < shost->can_queue; i++) {
2015
2016 if (ha->cp_stat[i] == IN_RESET) {
2017 SCpnt = ha->cp[i].SCpnt;
2018 unmap_dma(i, ha);
2019 SCpnt->result = DID_RESET << 16;
2020 SCpnt->host_scribble = NULL;
2021
2022 /* This mailbox is still waiting for its interrupt */
2023 ha->cp_stat[i] = LOCKED;
2024
2025 printk
2026 ("%s, reset, mbox %d locked, DID_RESET, pid %ld done.\n",
2027 ha->board_name, i, SCpnt->serial_number);
2028 }
2029
2030 else if (ha->cp_stat[i] == ABORTING) {
2031 SCpnt = ha->cp[i].SCpnt;
2032 unmap_dma(i, ha);
2033 SCpnt->result = DID_RESET << 16;
2034 SCpnt->host_scribble = NULL;
2035
2036 /* This mailbox was never queued to the adapter */
2037 ha->cp_stat[i] = FREE;
2038
2039 printk
2040 ("%s, reset, mbox %d aborting, DID_RESET, pid %ld done.\n",
2041 ha->board_name, i, SCpnt->serial_number);
2042 }
2043
2044 else
2045 /* Any other mailbox has already been set free by interrupt */
2046 continue;
2047
2048 SCpnt->scsi_done(SCpnt);
2049 }
2050
2051 ha->in_reset = 0;
2052 do_trace = 0;
2053
2054 if (arg_done)
2055 printk("%s: reset, exit, pid %ld done.\n", ha->board_name, SCarg->serial_number);
2056 else
2057 printk("%s: reset, exit.\n", ha->board_name);
2058
2059 spin_unlock_irq(shost->host_lock);
2060 return SUCCESS;
2061 }
2062
2063 int eata2x_bios_param(struct scsi_device *sdev, struct block_device *bdev,
2064 sector_t capacity, int *dkinfo)
2065 {
2066 unsigned int size = capacity;
2067
2068 if (ext_tran || (scsicam_bios_param(bdev, capacity, dkinfo) < 0)) {
2069 dkinfo[0] = 255;
2070 dkinfo[1] = 63;
2071 dkinfo[2] = size / (dkinfo[0] * dkinfo[1]);
2072 }
2073 #if defined (DEBUG_GEOMETRY)
2074 printk("%s: bios_param, head=%d, sec=%d, cyl=%d.\n", driver_name,
2075 dkinfo[0], dkinfo[1], dkinfo[2]);
2076 #endif
2077
2078 return 0;
2079 }
2080
2081 static void sort(unsigned long sk[], unsigned int da[], unsigned int n,
2082 unsigned int rev)
2083 {
2084 unsigned int i, j, k, y;
2085 unsigned long x;
2086
2087 for (i = 0; i < n - 1; i++) {
2088 k = i;
2089
2090 for (j = k + 1; j < n; j++)
2091 if (rev) {
2092 if (sk[j] > sk[k])
2093 k = j;
2094 } else {
2095 if (sk[j] < sk[k])
2096 k = j;
2097 }
2098
2099 if (k != i) {
2100 x = sk[k];
2101 sk[k] = sk[i];
2102 sk[i] = x;
2103 y = da[k];
2104 da[k] = da[i];
2105 da[i] = y;
2106 }
2107 }
2108
2109 return;
2110 }
2111
2112 static int reorder(struct hostdata *ha, unsigned long cursec,
2113 unsigned int ihdlr, unsigned int il[], unsigned int n_ready)
2114 {
2115 struct scsi_cmnd *SCpnt;
2116 struct mscp *cpp;
2117 unsigned int k, n;
2118 unsigned int rev = 0, s = 1, r = 1;
2119 unsigned int input_only = 1, overlap = 0;
2120 unsigned long sl[n_ready], pl[n_ready], ll[n_ready];
2121 unsigned long maxsec = 0, minsec = ULONG_MAX, seek = 0, iseek = 0;
2122 unsigned long ioseek = 0;
2123
2124 static unsigned int flushcount = 0, batchcount = 0, sortcount = 0;
2125 static unsigned int readycount = 0, ovlcount = 0, inputcount = 0;
2126 static unsigned int readysorted = 0, revcount = 0;
2127 static unsigned long seeksorted = 0, seeknosort = 0;
2128
2129 if (link_statistics && !(++flushcount % link_statistics))
2130 printk("fc %d bc %d ic %d oc %d rc %d rs %d sc %d re %d"
2131 " av %ldK as %ldK.\n", flushcount, batchcount,
2132 inputcount, ovlcount, readycount, readysorted, sortcount,
2133 revcount, seeknosort / (readycount + 1),
2134 seeksorted / (readycount + 1));
2135
2136 if (n_ready <= 1)
2137 return 0;
2138
2139 for (n = 0; n < n_ready; n++) {
2140 k = il[n];
2141 cpp = &ha->cp[k];
2142 SCpnt = cpp->SCpnt;
2143
2144 if (!cpp->din)
2145 input_only = 0;
2146
2147 if (SCpnt->request->sector < minsec)
2148 minsec = SCpnt->request->sector;
2149 if (SCpnt->request->sector > maxsec)
2150 maxsec = SCpnt->request->sector;
2151
2152 sl[n] = SCpnt->request->sector;
2153 ioseek += SCpnt->request->nr_sectors;
2154
2155 if (!n)
2156 continue;
2157
2158 if (sl[n] < sl[n - 1])
2159 s = 0;
2160 if (sl[n] > sl[n - 1])
2161 r = 0;
2162
2163 if (link_statistics) {
2164 if (sl[n] > sl[n - 1])
2165 seek += sl[n] - sl[n - 1];
2166 else
2167 seek += sl[n - 1] - sl[n];
2168 }
2169
2170 }
2171
2172 if (link_statistics) {
2173 if (cursec > sl[0])
2174 seek += cursec - sl[0];
2175 else
2176 seek += sl[0] - cursec;
2177 }
2178
2179 if (cursec > ((maxsec + minsec) / 2))
2180 rev = 1;
2181
2182 if (ioseek > ((maxsec - minsec) / 2))
2183 rev = 0;
2184
2185 if (!((rev && r) || (!rev && s)))
2186 sort(sl, il, n_ready, rev);
2187
2188 if (!input_only)
2189 for (n = 0; n < n_ready; n++) {
2190 k = il[n];
2191 cpp = &ha->cp[k];
2192 SCpnt = cpp->SCpnt;
2193 ll[n] = SCpnt->request->nr_sectors;
2194 pl[n] = SCpnt->serial_number;
2195
2196 if (!n)
2197 continue;
2198
2199 if ((sl[n] == sl[n - 1])
2200 || (!rev && ((sl[n - 1] + ll[n - 1]) > sl[n]))
2201 || (rev && ((sl[n] + ll[n]) > sl[n - 1])))
2202 overlap = 1;
2203 }
2204
2205 if (overlap)
2206 sort(pl, il, n_ready, 0);
2207
2208 if (link_statistics) {
2209 if (cursec > sl[0])
2210 iseek = cursec - sl[0];
2211 else
2212 iseek = sl[0] - cursec;
2213 batchcount++;
2214 readycount += n_ready;
2215 seeknosort += seek / 1024;
2216 if (input_only)
2217 inputcount++;
2218 if (overlap) {
2219 ovlcount++;
2220 seeksorted += iseek / 1024;
2221 } else
2222 seeksorted += (iseek + maxsec - minsec) / 1024;
2223 if (rev && !r) {
2224 revcount++;
2225 readysorted += n_ready;
2226 }
2227 if (!rev && !s) {
2228 sortcount++;
2229 readysorted += n_ready;
2230 }
2231 }
2232 #if defined(DEBUG_LINKED_COMMANDS)
2233 if (link_statistics && (overlap || !(flushcount % link_statistics)))
2234 for (n = 0; n < n_ready; n++) {
2235 k = il[n];
2236 cpp = &ha->cp[k];
2237 SCpnt = cpp->SCpnt;
2238 scmd_printk(KERN_INFO, SCpnt,
2239 "%s pid %ld mb %d fc %d nr %d sec %ld ns %ld"
2240 " cur %ld s:%c r:%c rev:%c in:%c ov:%c xd %d.\n",
2241 (ihdlr ? "ihdlr" : "qcomm"),
2242 SCpnt->serial_number, k, flushcount,
2243 n_ready, SCpnt->request->sector,
2244 SCpnt->request->nr_sectors, cursec, YESNO(s),
2245 YESNO(r), YESNO(rev), YESNO(input_only),
2246 YESNO(overlap), cpp->din);
2247 }
2248 #endif
2249 return overlap;
2250 }
2251
2252 static void flush_dev(struct scsi_device *dev, unsigned long cursec,
2253 struct hostdata *ha, unsigned int ihdlr)
2254 {
2255 struct scsi_cmnd *SCpnt;
2256 struct mscp *cpp;
2257 unsigned int k, n, n_ready = 0, il[MAX_MAILBOXES];
2258
2259 for (k = 0; k < dev->host->can_queue; k++) {
2260
2261 if (ha->cp_stat[k] != READY && ha->cp_stat[k] != IN_USE)
2262 continue;
2263
2264 cpp = &ha->cp[k];
2265 SCpnt = cpp->SCpnt;
2266
2267 if (SCpnt->device != dev)
2268 continue;
2269
2270 if (ha->cp_stat[k] == IN_USE)
2271 return;
2272
2273 il[n_ready++] = k;
2274 }
2275
2276 if (reorder(ha, cursec, ihdlr, il, n_ready))
2277 n_ready = 1;
2278
2279 for (n = 0; n < n_ready; n++) {
2280 k = il[n];
2281 cpp = &ha->cp[k];
2282 SCpnt = cpp->SCpnt;
2283
2284 if (do_dma(dev->host->io_port, cpp->cp_dma_addr, SEND_CP_DMA)) {
2285 scmd_printk(KERN_INFO, SCpnt,
2286 "%s, pid %ld, mbox %d, adapter"
2287 " busy, will abort.\n",
2288 (ihdlr ? "ihdlr" : "qcomm"),
2289 SCpnt->serial_number, k);
2290 ha->cp_stat[k] = ABORTING;
2291 continue;
2292 }
2293
2294 ha->cp_stat[k] = IN_USE;
2295 }
2296 }
2297
2298 static irqreturn_t ihdlr(struct Scsi_Host *shost)
2299 {
2300 struct scsi_cmnd *SCpnt;
2301 unsigned int i, k, c, status, tstatus, reg;
2302 struct mssp *spp;
2303 struct mscp *cpp;
2304 struct hostdata *ha = (struct hostdata *)shost->hostdata;
2305 int irq = shost->irq;
2306
2307 /* Check if this board need to be serviced */
2308 if (!(inb(shost->io_port + REG_AUX_STATUS) & IRQ_ASSERTED))
2309 goto none;
2310
2311 ha->iocount++;
2312
2313 if (do_trace)
2314 printk("%s: ihdlr, enter, irq %d, count %d.\n", ha->board_name, irq,
2315 ha->iocount);
2316
2317 /* Check if this board is still busy */
2318 if (wait_on_busy(shost->io_port, 20 * MAXLOOP)) {
2319 reg = inb(shost->io_port + REG_STATUS);
2320 printk
2321 ("%s: ihdlr, busy timeout error, irq %d, reg 0x%x, count %d.\n",
2322 ha->board_name, irq, reg, ha->iocount);
2323 goto none;
2324 }
2325
2326 spp = &ha->sp;
2327
2328 /* Make a local copy just before clearing the interrupt indication */
2329 memcpy(spp, ha->sp_cpu_addr, sizeof(struct mssp));
2330
2331 /* Clear the completion flag and cp pointer on the dynamic copy of sp */
2332 memset(ha->sp_cpu_addr, 0, sizeof(struct mssp));
2333
2334 /* Read the status register to clear the interrupt indication */
2335 reg = inb(shost->io_port + REG_STATUS);
2336
2337 #if defined (DEBUG_INTERRUPT)
2338 {
2339 unsigned char *bytesp;
2340 int cnt;
2341 bytesp = (unsigned char *)spp;
2342 if (ha->iocount < 200) {
2343 printk("sp[] =");
2344 for (cnt = 0; cnt < 15; cnt++)
2345 printk(" 0x%x", bytesp[cnt]);
2346 printk("\n");
2347 }
2348 }
2349 #endif
2350
2351 /* Reject any sp with supspect data */
2352 if (spp->eoc == 0 && ha->iocount > 1)
2353 printk
2354 ("%s: ihdlr, spp->eoc == 0, irq %d, reg 0x%x, count %d.\n",
2355 ha->board_name, irq, reg, ha->iocount);
2356 if (spp->cpp_index < 0 || spp->cpp_index >= shost->can_queue)
2357 printk
2358 ("%s: ihdlr, bad spp->cpp_index %d, irq %d, reg 0x%x, count %d.\n",
2359 ha->board_name, spp->cpp_index, irq, reg, ha->iocount);
2360 if (spp->eoc == 0 || spp->cpp_index < 0
2361 || spp->cpp_index >= shost->can_queue)
2362 goto handled;
2363
2364 /* Find the mailbox to be serviced on this board */
2365 i = spp->cpp_index;
2366
2367 cpp = &(ha->cp[i]);
2368
2369 #if defined(DEBUG_GENERATE_ABORTS)
2370 if ((ha->iocount > 500) && ((ha->iocount % 500) < 3))
2371 goto handled;
2372 #endif
2373
2374 if (ha->cp_stat[i] == IGNORE) {
2375 ha->cp_stat[i] = FREE;
2376 goto handled;
2377 } else if (ha->cp_stat[i] == LOCKED) {
2378 ha->cp_stat[i] = FREE;
2379 printk("%s: ihdlr, mbox %d unlocked, count %d.\n", ha->board_name, i,
2380 ha->iocount);
2381 goto handled;
2382 } else if (ha->cp_stat[i] == FREE) {
2383 printk("%s: ihdlr, mbox %d is free, count %d.\n", ha->board_name, i,
2384 ha->iocount);
2385 goto handled;
2386 } else if (ha->cp_stat[i] == IN_RESET)
2387 printk("%s: ihdlr, mbox %d is in reset.\n", ha->board_name, i);
2388 else if (ha->cp_stat[i] != IN_USE)
2389 panic("%s: ihdlr, mbox %d, invalid cp_stat: %d.\n",
2390 ha->board_name, i, ha->cp_stat[i]);
2391
2392 ha->cp_stat[i] = FREE;
2393 SCpnt = cpp->SCpnt;
2394
2395 if (SCpnt == NULL)
2396 panic("%s: ihdlr, mbox %d, SCpnt == NULL.\n", ha->board_name, i);
2397
2398 if (SCpnt->host_scribble == NULL)
2399 panic("%s: ihdlr, mbox %d, pid %ld, SCpnt %p garbled.\n", ha->board_name,
2400 i, SCpnt->serial_number, SCpnt);
2401
2402 if (*(unsigned int *)SCpnt->host_scribble != i)
2403 panic("%s: ihdlr, mbox %d, pid %ld, index mismatch %d.\n",
2404 ha->board_name, i, SCpnt->serial_number,
2405 *(unsigned int *)SCpnt->host_scribble);
2406
2407 sync_dma(i, ha);
2408
2409 if (linked_comm && SCpnt->device->queue_depth > 2
2410 && TLDEV(SCpnt->device->type))
2411 flush_dev(SCpnt->device, SCpnt->request->sector, ha, 1);
2412
2413 tstatus = status_byte(spp->target_status);
2414
2415 #if defined(DEBUG_GENERATE_ERRORS)
2416 if ((ha->iocount > 500) && ((ha->iocount % 200) < 2))
2417 spp->adapter_status = 0x01;
2418 #endif
2419
2420 switch (spp->adapter_status) {
2421 case ASOK: /* status OK */
2422
2423 /* Forces a reset if a disk drive keeps returning BUSY */
2424 if (tstatus == BUSY && SCpnt->device->type != TYPE_TAPE)
2425 status = DID_ERROR << 16;
2426
2427 /* If there was a bus reset, redo operation on each target */
2428 else if (tstatus != GOOD && SCpnt->device->type == TYPE_DISK
2429 && ha->target_redo[SCpnt->device->id][SCpnt->
2430 device->
2431 channel])
2432 status = DID_BUS_BUSY << 16;
2433
2434 /* Works around a flaw in scsi.c */
2435 else if (tstatus == CHECK_CONDITION
2436 && SCpnt->device->type == TYPE_DISK
2437 && (SCpnt->sense_buffer[2] & 0xf) == RECOVERED_ERROR)
2438 status = DID_BUS_BUSY << 16;
2439
2440 else
2441 status = DID_OK << 16;
2442
2443 if (tstatus == GOOD)
2444 ha->target_redo[SCpnt->device->id][SCpnt->device->
2445 channel] = 0;
2446
2447 if (spp->target_status && SCpnt->device->type == TYPE_DISK &&
2448 (!(tstatus == CHECK_CONDITION && ha->iocount <= 1000 &&
2449 (SCpnt->sense_buffer[2] & 0xf) == NOT_READY)))
2450 printk("%s: ihdlr, target %d.%d:%d, pid %ld, "
2451 "target_status 0x%x, sense key 0x%x.\n",
2452 ha->board_name,
2453 SCpnt->device->channel, SCpnt->device->id,
2454 SCpnt->device->lun, SCpnt->serial_number,
2455 spp->target_status, SCpnt->sense_buffer[2]);
2456
2457 ha->target_to[SCpnt->device->id][SCpnt->device->channel] = 0;
2458
2459 if (ha->last_retried_pid == SCpnt->serial_number)
2460 ha->retries = 0;
2461
2462 break;
2463 case ASST: /* Selection Time Out */
2464 case 0x02: /* Command Time Out */
2465
2466 if (ha->target_to[SCpnt->device->id][SCpnt->device->channel] > 1)
2467 status = DID_ERROR << 16;
2468 else {
2469 status = DID_TIME_OUT << 16;
2470 ha->target_to[SCpnt->device->id][SCpnt->device->
2471 channel]++;
2472 }
2473
2474 break;
2475
2476 /* Perform a limited number of internal retries */
2477 case 0x03: /* SCSI Bus Reset Received */
2478 case 0x04: /* Initial Controller Power-up */
2479
2480 for (c = 0; c <= shost->max_channel; c++)
2481 for (k = 0; k < shost->max_id; k++)
2482 ha->target_redo[k][c] = 1;
2483
2484 if (SCpnt->device->type != TYPE_TAPE
2485 && ha->retries < MAX_INTERNAL_RETRIES) {
2486
2487 #if defined(DID_SOFT_ERROR)
2488 status = DID_SOFT_ERROR << 16;
2489 #else
2490 status = DID_BUS_BUSY << 16;
2491 #endif
2492
2493 ha->retries++;
2494 ha->last_retried_pid = SCpnt->serial_number;
2495 } else
2496 status = DID_ERROR << 16;
2497
2498 break;
2499 case 0x05: /* Unexpected Bus Phase */
2500 case 0x06: /* Unexpected Bus Free */
2501 case 0x07: /* Bus Parity Error */
2502 case 0x08: /* SCSI Hung */
2503 case 0x09: /* Unexpected Message Reject */
2504 case 0x0a: /* SCSI Bus Reset Stuck */
2505 case 0x0b: /* Auto Request-Sense Failed */
2506 case 0x0c: /* Controller Ram Parity Error */
2507 default:
2508 status = DID_ERROR << 16;
2509 break;
2510 }
2511
2512 SCpnt->result = status | spp->target_status;
2513
2514 #if defined(DEBUG_INTERRUPT)
2515 if (SCpnt->result || do_trace)
2516 #else
2517 if ((spp->adapter_status != ASOK && ha->iocount > 1000) ||
2518 (spp->adapter_status != ASOK &&
2519 spp->adapter_status != ASST && ha->iocount <= 1000) ||
2520 do_trace || msg_byte(spp->target_status))
2521 #endif
2522 scmd_printk(KERN_INFO, SCpnt, "ihdlr, mbox %2d, err 0x%x:%x,"
2523 " pid %ld, reg 0x%x, count %d.\n",
2524 i, spp->adapter_status, spp->target_status,
2525 SCpnt->serial_number, reg, ha->iocount);
2526
2527 unmap_dma(i, ha);
2528
2529 /* Set the command state to inactive */
2530 SCpnt->host_scribble = NULL;
2531
2532 SCpnt->scsi_done(SCpnt);
2533
2534 if (do_trace)
2535 printk("%s: ihdlr, exit, irq %d, count %d.\n", ha->board_name,
2536 irq, ha->iocount);
2537
2538 handled:
2539 return IRQ_HANDLED;
2540 none:
2541 return IRQ_NONE;
2542 }
2543
2544 static irqreturn_t do_interrupt_handler(int dummy, void *shap)
2545 {
2546 struct Scsi_Host *shost;
2547 unsigned int j;
2548 unsigned long spin_flags;
2549 irqreturn_t ret;
2550
2551 /* Check if the interrupt must be processed by this handler */
2552 if ((j = (unsigned int)((char *)shap - sha)) >= num_boards)
2553 return IRQ_NONE;
2554 shost = sh[j];
2555
2556 spin_lock_irqsave(shost->host_lock, spin_flags);
2557 ret = ihdlr(shost);
2558 spin_unlock_irqrestore(shost->host_lock, spin_flags);
2559 return ret;
2560 }
2561
2562 static int eata2x_release(struct Scsi_Host *shost)
2563 {
2564 struct hostdata *ha = (struct hostdata *)shost->hostdata;
2565 unsigned int i;
2566
2567 for (i = 0; i < shost->can_queue; i++)
2568 kfree((&ha->cp[i])->sglist);
2569
2570 for (i = 0; i < shost->can_queue; i++)
2571 pci_unmap_single(ha->pdev, ha->cp[i].cp_dma_addr,
2572 sizeof(struct mscp), PCI_DMA_BIDIRECTIONAL);
2573
2574 if (ha->sp_cpu_addr)
2575 pci_free_consistent(ha->pdev, sizeof(struct mssp),
2576 ha->sp_cpu_addr, ha->sp_dma_addr);
2577
2578 free_irq(shost->irq, &sha[ha->board_number]);
2579
2580 if (shost->dma_channel != NO_DMA)
2581 free_dma(shost->dma_channel);
2582
2583 release_region(shost->io_port, shost->n_io_port);
2584 scsi_unregister(shost);
2585 return 0;
2586 }
2587
2588 #include "scsi_module.c"
2589
2590 #ifndef MODULE
2591 __setup("eata=", option_setup);
2592 #endif /* end MODULE */
Nao low-level kernelspace/userspace library that runs on our robots, Nao-Team HTWK