Merge master.kernel.org:/pub/scm/linux/kernel/git/jejb/scsi-misc-2.6
[sfrench/cifs-2.6.git] / drivers / scsi / aic7xxx_old.c
1 /*+M*************************************************************************
2  * Adaptec AIC7xxx device driver for Linux.
3  *
4  * Copyright (c) 1994 John Aycock
5  *   The University of Calgary Department of Computer Science.
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2, or (at your option)
10  * any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; see the file COPYING.  If not, write to
19  * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
20  *
21  * Sources include the Adaptec 1740 driver (aha1740.c), the Ultrastor 24F
22  * driver (ultrastor.c), various Linux kernel source, the Adaptec EISA
23  * config file (!adp7771.cfg), the Adaptec AHA-2740A Series User's Guide,
24  * the Linux Kernel Hacker's Guide, Writing a SCSI Device Driver for Linux,
25  * the Adaptec 1542 driver (aha1542.c), the Adaptec EISA overlay file
26  * (adp7770.ovl), the Adaptec AHA-2740 Series Technical Reference Manual,
27  * the Adaptec AIC-7770 Data Book, the ANSI SCSI specification, the
28  * ANSI SCSI-2 specification (draft 10c), ...
29  *
30  * --------------------------------------------------------------------------
31  *
32  *  Modifications by Daniel M. Eischen (deischen@iworks.InterWorks.org):
33  *
34  *  Substantially modified to include support for wide and twin bus
35  *  adapters, DMAing of SCBs, tagged queueing, IRQ sharing, bug fixes,
36  *  SCB paging, and other rework of the code.
37  *
38  *  Parts of this driver were also based on the FreeBSD driver by
39  *  Justin T. Gibbs.  His copyright follows:
40  *
41  * --------------------------------------------------------------------------  
42  * Copyright (c) 1994-1997 Justin Gibbs.
43  * All rights reserved.
44  *
45  * Redistribution and use in source and binary forms, with or without
46  * modification, are permitted provided that the following conditions
47  * are met:
48  * 1. Redistributions of source code must retain the above copyright
49  *    notice, this list of conditions, and the following disclaimer,
50  *    without modification, immediately at the beginning of the file.
51  * 2. Redistributions in binary form must reproduce the above copyright
52  *    notice, this list of conditions and the following disclaimer in the
53  *    documentation and/or other materials provided with the distribution.
54  * 3. The name of the author may not be used to endorse or promote products
55  *    derived from this software without specific prior written permission.
56  *
57  * Where this Software is combined with software released under the terms of 
58  * the GNU General Public License ("GPL") and the terms of the GPL would require the 
59  * combined work to also be released under the terms of the GPL, the terms
60  * and conditions of this License will apply in addition to those of the
61  * GPL with the exception of any terms or conditions of this License that
62  * conflict with, or are expressly prohibited by, the GPL.
63  *
64  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
65  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
66  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
67  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
68  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
69  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
70  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
71  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
72  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
73  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
74  * SUCH DAMAGE.
75  *
76  *      $Id: aic7xxx.c,v 1.119 1997/06/27 19:39:18 gibbs Exp $
77  *---------------------------------------------------------------------------
78  *
79  *  Thanks also go to (in alphabetical order) the following:
80  *
81  *    Rory Bolt     - Sequencer bug fixes
82  *    Jay Estabrook - Initial DEC Alpha support
83  *    Doug Ledford  - Much needed abort/reset bug fixes
84  *    Kai Makisara  - DMAing of SCBs
85  *
86  *  A Boot time option was also added for not resetting the scsi bus.
87  *
88  *    Form:  aic7xxx=extended
89  *           aic7xxx=no_reset
90  *           aic7xxx=ultra
91  *           aic7xxx=irq_trigger:[0,1]  # 0 edge, 1 level
92  *           aic7xxx=verbose
93  *
94  *  Daniel M. Eischen, deischen@iworks.InterWorks.org, 1/23/97
95  *
96  *  $Id: aic7xxx.c,v 4.1 1997/06/12 08:23:42 deang Exp $
97  *-M*************************************************************************/
98
99 /*+M**************************************************************************
100  *
101  * Further driver modifications made by Doug Ledford <dledford@redhat.com>
102  *
103  * Copyright (c) 1997-1999 Doug Ledford
104  *
105  * These changes are released under the same licensing terms as the FreeBSD
106  * driver written by Justin Gibbs.  Please see his Copyright notice above
107  * for the exact terms and conditions covering my changes as well as the
108  * warranty statement.
109  *
110  * Modifications made to the aic7xxx.c,v 4.1 driver from Dan Eischen include
111  * but are not limited to:
112  *
113  *  1: Import of the latest FreeBSD sequencer code for this driver
114  *  2: Modification of kernel code to accommodate different sequencer semantics
115  *  3: Extensive changes throughout kernel portion of driver to improve
116  *     abort/reset processing and error hanndling
117  *  4: Other work contributed by various people on the Internet
118  *  5: Changes to printk information and verbosity selection code
119  *  6: General reliability related changes, especially in IRQ management
120  *  7: Modifications to the default probe/attach order for supported cards
121  *  8: SMP friendliness has been improved
122  *
123  * Overall, this driver represents a significant departure from the official
124  * aic7xxx driver released by Dan Eischen in two ways.  First, in the code
125  * itself.  A diff between the two version of the driver is now a several
126  * thousand line diff.  Second, in approach to solving the same problem.  The
127  * problem is importing the FreeBSD aic7xxx driver code to linux can be a
128  * difficult and time consuming process, that also can be error prone.  Dan
129  * Eischen's official driver uses the approach that the linux and FreeBSD
130  * drivers should be as identical as possible.  To that end, his next version
131  * of this driver will be using a mid-layer code library that he is developing
132  * to moderate communications between the linux mid-level SCSI code and the
133  * low level FreeBSD driver.  He intends to be able to essentially drop the
134  * FreeBSD driver into the linux kernel with only a few minor tweaks to some
135  * include files and the like and get things working, making for fast easy
136  * imports of the FreeBSD code into linux.
137  *
138  * I disagree with Dan's approach.  Not that I don't think his way of doing
139  * things would be nice, easy to maintain, and create a more uniform driver
140  * between FreeBSD and Linux.  I have no objection to those issues.  My
141  * disagreement is on the needed functionality.  There simply are certain
142  * things that are done differently in FreeBSD than linux that will cause
143  * problems for this driver regardless of any middle ware Dan implements.
144  * The biggest example of this at the moment is interrupt semantics.  Linux
145  * doesn't provide the same protection techniques as FreeBSD does, nor can
146  * they be easily implemented in any middle ware code since they would truly
147  * belong in the kernel proper and would effect all drivers.  For the time
148  * being, I see issues such as these as major stumbling blocks to the 
149  * reliability of code based upon such middle ware.  Therefore, I choose to
150  * use a different approach to importing the FreeBSD code that doesn't
151  * involve any middle ware type code.  My approach is to import the sequencer
152  * code from FreeBSD wholesale.  Then, to only make changes in the kernel
153  * portion of the driver as they are needed for the new sequencer semantics.
154  * In this way, the portion of the driver that speaks to the rest of the
155  * linux kernel is fairly static and can be changed/modified to solve
156  * any problems one might encounter without concern for the FreeBSD driver.
157  *
158  * Note: If time and experience should prove me wrong that the middle ware
159  * code Dan writes is reliable in its operation, then I'll retract my above
160  * statements.  But, for those that don't know, I'm from Missouri (in the US)
161  * and our state motto is "The Show-Me State".  Well, before I will put
162  * faith into it, you'll have to show me that it works :)
163  *
164  *_M*************************************************************************/
165
166 /*
167  * The next three defines are user configurable.  These should be the only
168  * defines a user might need to get in here and change.  There are other
169  * defines buried deeper in the code, but those really shouldn't need touched
170  * under normal conditions.
171  */
172
173 /*
174  * AIC7XXX_STRICT_PCI_SETUP
175  *   Should we assume the PCI config options on our controllers are set with
176  *   sane and proper values, or should we be anal about our PCI config
177  *   registers and force them to what we want?  The main advantage to
178  *   defining this option is on non-Intel hardware where the BIOS may not
179  *   have been run to set things up, or if you have one of the BIOSless
180  *   Adaptec controllers, such as a 2910, that don't get set up by the
181  *   BIOS.  However, keep in mind that we really do set the most important
182  *   items in the driver regardless of this setting, this only controls some
183  *   of the more esoteric PCI options on these cards.  In that sense, I
184  *   would default to leaving this off.  However, if people wish to try
185  *   things both ways, that would also help me to know if there are some
186  *   machines where it works one way but not another.
187  *
188  *   -- July 7, 17:09
189  *     OK...I need this on my machine for testing, so the default is to
190  *     leave it defined.
191  *
192  *   -- July 7, 18:49
193  *     I needed it for testing, but it didn't make any difference, so back
194  *     off she goes.
195  *
196  *   -- July 16, 23:04
197  *     I turned it back on to try and compensate for the 2.1.x PCI code
198  *     which no longer relies solely on the BIOS and now tries to set
199  *     things itself.
200  */
201
202 #define AIC7XXX_STRICT_PCI_SETUP
203
204 /*
205  * AIC7XXX_VERBOSE_DEBUGGING
206  *   This option enables a lot of extra printk();s in the code, surrounded
207  *   by if (aic7xxx_verbose ...) statements.  Executing all of those if
208  *   statements and the extra checks can get to where it actually does have
209  *   an impact on CPU usage and such, as well as code size.  Disabling this
210  *   define will keep some of those from becoming part of the code.
211  *
212  *   NOTE:  Currently, this option has no real effect, I will be adding the
213  *   various #ifdef's in the code later when I've decided a section is
214  *   complete and no longer needs debugging.  OK...a lot of things are now
215  *   surrounded by this define, so turning this off does have an impact.
216  */
217  
218 /*
219  * #define AIC7XXX_VERBOSE_DEBUGGING
220  */
221  
222 #include <linux/module.h>
223 #include <stdarg.h>
224 #include <asm/io.h>
225 #include <asm/irq.h>
226 #include <asm/byteorder.h>
227 #include <linux/string.h>
228 #include <linux/errno.h>
229 #include <linux/kernel.h>
230 #include <linux/ioport.h>
231 #include <linux/delay.h>
232 #include <linux/sched.h>
233 #include <linux/pci.h>
234 #include <linux/proc_fs.h>
235 #include <linux/blkdev.h>
236 #include <linux/init.h>
237 #include <linux/spinlock.h>
238 #include <linux/smp.h>
239 #include <linux/interrupt.h>
240 #include "scsi.h"
241 #include <scsi/scsi_host.h>
242 #include "aic7xxx_old/aic7xxx.h"
243
244 #include "aic7xxx_old/sequencer.h"
245 #include "aic7xxx_old/scsi_message.h"
246 #include "aic7xxx_old/aic7xxx_reg.h"
247 #include <scsi/scsicam.h>
248
249 #include <linux/stat.h>
250 #include <linux/slab.h>        /* for kmalloc() */
251
252 #define AIC7XXX_C_VERSION  "5.2.6"
253
254 #define ALL_TARGETS -1
255 #define ALL_CHANNELS -1
256 #define ALL_LUNS -1
257 #define MAX_TARGETS  16
258 #define MAX_LUNS     8
259 #ifndef TRUE
260 #  define TRUE 1
261 #endif
262 #ifndef FALSE
263 #  define FALSE 0
264 #endif
265
266 #if defined(__powerpc__) || defined(__i386__) || defined(__x86_64__)
267 #  define MMAPIO
268 #endif
269
270 /*
271  * You can try raising me for better performance or lowering me if you have
272  * flaky devices that go off the scsi bus when hit with too many tagged
273  * commands (like some IBM SCSI-3 LVD drives).
274  */
275 #define AIC7XXX_CMDS_PER_DEVICE 32
276
277 typedef struct
278 {
279   unsigned char tag_commands[16];   /* Allow for wide/twin adapters. */
280 } adapter_tag_info_t;
281
282 /*
283  * Make a define that will tell the driver not to the default tag depth
284  * everywhere.
285  */
286 #define DEFAULT_TAG_COMMANDS {0, 0, 0, 0, 0, 0, 0, 0,\
287                               0, 0, 0, 0, 0, 0, 0, 0}
288
289 /*
290  * Modify this as you see fit for your system.  By setting tag_commands
291  * to 0, the driver will use it's own algorithm for determining the
292  * number of commands to use (see above).  When 255, the driver will
293  * not enable tagged queueing for that particular device.  When positive
294  * (> 0) and (< 255) the values in the array are used for the queue_depth.
295  * Note that the maximum value for an entry is 254, but you're insane if
296  * you try to use that many commands on one device.
297  *
298  * In this example, the first line will disable tagged queueing for all
299  * the devices on the first probed aic7xxx adapter.
300  *
301  * The second line enables tagged queueing with 4 commands/LUN for IDs
302  * (1, 2-11, 13-15), disables tagged queueing for ID 12, and tells the
303  * driver to use its own algorithm for ID 1.
304  *
305  * The third line is the same as the first line.
306  *
307  * The fourth line disables tagged queueing for devices 0 and 3.  It
308  * enables tagged queueing for the other IDs, with 16 commands/LUN
309  * for IDs 1 and 4, 127 commands/LUN for ID 8, and 4 commands/LUN for
310  * IDs 2, 5-7, and 9-15.
311  */
312
313 /*
314  * NOTE: The below structure is for reference only, the actual structure
315  *       to modify in order to change things is found after this fake one.
316  *
317 adapter_tag_info_t aic7xxx_tag_info[] =
318 {
319   {DEFAULT_TAG_COMMANDS},
320   {{4, 0, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 255, 4, 4, 4}},
321   {DEFAULT_TAG_COMMANDS},
322   {{255, 16, 4, 255, 16, 4, 4, 4, 127, 4, 4, 4, 4, 4, 4, 4}}
323 };
324 */
325
326 static adapter_tag_info_t aic7xxx_tag_info[] =
327 {
328   {DEFAULT_TAG_COMMANDS},
329   {DEFAULT_TAG_COMMANDS},
330   {DEFAULT_TAG_COMMANDS},
331   {DEFAULT_TAG_COMMANDS},
332   {DEFAULT_TAG_COMMANDS},
333   {DEFAULT_TAG_COMMANDS},
334   {DEFAULT_TAG_COMMANDS},
335   {DEFAULT_TAG_COMMANDS},
336   {DEFAULT_TAG_COMMANDS},
337   {DEFAULT_TAG_COMMANDS},
338   {DEFAULT_TAG_COMMANDS},
339   {DEFAULT_TAG_COMMANDS},
340   {DEFAULT_TAG_COMMANDS},
341   {DEFAULT_TAG_COMMANDS},
342   {DEFAULT_TAG_COMMANDS},
343   {DEFAULT_TAG_COMMANDS}
344 };
345
346
347 /*
348  * Define an array of board names that can be indexed by aha_type.
349  * Don't forget to change this when changing the types!
350  */
351 static const char *board_names[] = {
352   "AIC-7xxx Unknown",                                   /* AIC_NONE */
353   "Adaptec AIC-7810 Hardware RAID Controller",          /* AIC_7810 */
354   "Adaptec AIC-7770 SCSI host adapter",                 /* AIC_7770 */
355   "Adaptec AHA-274X SCSI host adapter",                 /* AIC_7771 */
356   "Adaptec AHA-284X SCSI host adapter",                 /* AIC_284x */
357   "Adaptec AIC-7850 SCSI host adapter",                 /* AIC_7850 */
358   "Adaptec AIC-7855 SCSI host adapter",                 /* AIC_7855 */
359   "Adaptec AIC-7860 Ultra SCSI host adapter",           /* AIC_7860 */
360   "Adaptec AHA-2940A Ultra SCSI host adapter",          /* AIC_7861 */
361   "Adaptec AIC-7870 SCSI host adapter",                 /* AIC_7870 */
362   "Adaptec AHA-294X SCSI host adapter",                 /* AIC_7871 */
363   "Adaptec AHA-394X SCSI host adapter",                 /* AIC_7872 */
364   "Adaptec AHA-398X SCSI host adapter",                 /* AIC_7873 */
365   "Adaptec AHA-2944 SCSI host adapter",                 /* AIC_7874 */
366   "Adaptec AIC-7880 Ultra SCSI host adapter",           /* AIC_7880 */
367   "Adaptec AHA-294X Ultra SCSI host adapter",           /* AIC_7881 */
368   "Adaptec AHA-394X Ultra SCSI host adapter",           /* AIC_7882 */
369   "Adaptec AHA-398X Ultra SCSI host adapter",           /* AIC_7883 */
370   "Adaptec AHA-2944 Ultra SCSI host adapter",           /* AIC_7884 */
371   "Adaptec AHA-2940UW Pro Ultra SCSI host adapter",     /* AIC_7887 */
372   "Adaptec AIC-7895 Ultra SCSI host adapter",           /* AIC_7895 */
373   "Adaptec AIC-7890/1 Ultra2 SCSI host adapter",        /* AIC_7890 */
374   "Adaptec AHA-293X Ultra2 SCSI host adapter",          /* AIC_7890 */
375   "Adaptec AHA-294X Ultra2 SCSI host adapter",          /* AIC_7890 */
376   "Adaptec AIC-7896/7 Ultra2 SCSI host adapter",        /* AIC_7896 */
377   "Adaptec AHA-394X Ultra2 SCSI host adapter",          /* AIC_7897 */
378   "Adaptec AHA-395X Ultra2 SCSI host adapter",          /* AIC_7897 */
379   "Adaptec PCMCIA SCSI controller",                     /* card bus stuff */
380   "Adaptec AIC-7892 Ultra 160/m SCSI host adapter",     /* AIC_7892 */
381   "Adaptec AIC-7899 Ultra 160/m SCSI host adapter",     /* AIC_7899 */
382 };
383
384 /*
385  * There should be a specific return value for this in scsi.h, but
386  * it seems that most drivers ignore it.
387  */
388 #define DID_UNDERFLOW   DID_ERROR
389
390 /*
391  *  What we want to do is have the higher level scsi driver requeue
392  *  the command to us. There is no specific driver status for this
393  *  condition, but the higher level scsi driver will requeue the
394  *  command on a DID_BUS_BUSY error.
395  *
396  *  Upon further inspection and testing, it seems that DID_BUS_BUSY
397  *  will *always* retry the command.  We can get into an infinite loop
398  *  if this happens when we really want some sort of counter that
399  *  will automatically abort/reset the command after so many retries.
400  *  Using DID_ERROR will do just that.  (Made by a suggestion by
401  *  Doug Ledford 8/1/96)
402  */
403 #define DID_RETRY_COMMAND DID_ERROR
404
405 #define HSCSIID        0x07
406 #define SCSI_RESET     0x040
407
408 /*
409  * EISA/VL-bus stuff
410  */
411 #define MINSLOT                1
412 #define MAXSLOT                15
413 #define SLOTBASE(x)        ((x) << 12)
414 #define BASE_TO_SLOT(x) ((x) >> 12)
415
416 /*
417  * Standard EISA Host ID regs  (Offset from slot base)
418  */
419 #define AHC_HID0              0x80   /* 0,1: msb of ID2, 2-7: ID1      */
420 #define AHC_HID1              0x81   /* 0-4: ID3, 5-7: LSB ID2         */
421 #define AHC_HID2              0x82   /* product                        */
422 #define AHC_HID3              0x83   /* firmware revision              */
423
424 /*
425  * AIC-7770 I/O range to reserve for a card
426  */
427 #define MINREG                0xC00
428 #define MAXREG                0xCFF
429
430 #define INTDEF                0x5C      /* Interrupt Definition Register */
431
432 /*
433  * AIC-78X0 PCI registers
434  */
435 #define        CLASS_PROGIF_REVID        0x08
436 #define                DEVREVID        0x000000FFul
437 #define                PROGINFC        0x0000FF00ul
438 #define                SUBCLASS        0x00FF0000ul
439 #define                BASECLASS        0xFF000000ul
440
441 #define        CSIZE_LATTIME                0x0C
442 #define                CACHESIZE        0x0000003Ful        /* only 5 bits */
443 #define                LATTIME                0x0000FF00ul
444
445 #define        DEVCONFIG                0x40
446 #define                SCBSIZE32        0x00010000ul        /* aic789X only */
447 #define                MPORTMODE        0x00000400ul        /* aic7870 only */
448 #define                RAMPSM           0x00000200ul        /* aic7870 only */
449 #define                RAMPSM_ULTRA2    0x00000004
450 #define                VOLSENSE         0x00000100ul
451 #define                SCBRAMSEL        0x00000080ul
452 #define                SCBRAMSEL_ULTRA2 0x00000008
453 #define                MRDCEN           0x00000040ul
454 #define                EXTSCBTIME       0x00000020ul        /* aic7870 only */
455 #define                EXTSCBPEN        0x00000010ul        /* aic7870 only */
456 #define                BERREN           0x00000008ul
457 #define                DACEN            0x00000004ul
458 #define                STPWLEVEL        0x00000002ul
459 #define                DIFACTNEGEN      0x00000001ul        /* aic7870 only */
460
461 #define        SCAMCTL                  0x1a                /* Ultra2 only  */
462 #define        CCSCBBADDR               0xf0                /* aic7895/6/7  */
463
464 /*
465  * Define the different types of SEEPROMs on aic7xxx adapters
466  * and make it also represent the address size used in accessing
467  * its registers.  The 93C46 chips have 1024 bits organized into
468  * 64 16-bit words, while the 93C56 chips have 2048 bits organized
469  * into 128 16-bit words.  The C46 chips use 6 bits to address
470  * each word, while the C56 and C66 (4096 bits) use 8 bits to
471  * address each word.
472  */
473 typedef enum {C46 = 6, C56_66 = 8} seeprom_chip_type;
474
475 /*
476  *
477  * Define the format of the SEEPROM registers (16 bits).
478  *
479  */
480 struct seeprom_config {
481
482 /*
483  * SCSI ID Configuration Flags
484  */
485 #define CFXFER                0x0007      /* synchronous transfer rate */
486 #define CFSYNCH               0x0008      /* enable synchronous transfer */
487 #define CFDISC                0x0010      /* enable disconnection */
488 #define CFWIDEB               0x0020      /* wide bus device (wide card) */
489 #define CFSYNCHISULTRA        0x0040      /* CFSYNC is an ultra offset */
490 #define CFNEWULTRAFORMAT      0x0080      /* Use the Ultra2 SEEPROM format */
491 #define CFSTART               0x0100      /* send start unit SCSI command */
492 #define CFINCBIOS             0x0200      /* include in BIOS scan */
493 #define CFRNFOUND             0x0400      /* report even if not found */
494 #define CFMULTILUN            0x0800      /* probe mult luns in BIOS scan */
495 #define CFWBCACHEYES          0x4000      /* Enable W-Behind Cache on drive */
496 #define CFWBCACHENC           0xc000      /* Don't change W-Behind Cache */
497 /* UNUSED                0x3000 */
498   unsigned short device_flags[16];        /* words 0-15 */
499
500 /*
501  * BIOS Control Bits
502  */
503 #define CFSUPREM        0x0001  /* support all removable drives */
504 #define CFSUPREMB       0x0002  /* support removable drives for boot only */
505 #define CFBIOSEN        0x0004  /* BIOS enabled */
506 /* UNUSED                0x0008 */
507 #define CFSM2DRV        0x0010  /* support more than two drives */
508 #define CF284XEXTEND    0x0020  /* extended translation (284x cards) */
509 /* UNUSED                0x0040 */
510 #define CFEXTEND        0x0080  /* extended translation enabled */
511 /* UNUSED                0xFF00 */
512   unsigned short bios_control;  /* word 16 */
513
514 /*
515  * Host Adapter Control Bits
516  */
517 #define CFAUTOTERM      0x0001  /* Perform Auto termination */
518 #define CFULTRAEN       0x0002  /* Ultra SCSI speed enable (Ultra cards) */
519 #define CF284XSELTO     0x0003  /* Selection timeout (284x cards) */
520 #define CF284XFIFO      0x000C  /* FIFO Threshold (284x cards) */
521 #define CFSTERM         0x0004  /* SCSI low byte termination */
522 #define CFWSTERM        0x0008  /* SCSI high byte termination (wide card) */
523 #define CFSPARITY       0x0010  /* SCSI parity */
524 #define CF284XSTERM     0x0020  /* SCSI low byte termination (284x cards) */
525 #define CFRESETB        0x0040  /* reset SCSI bus at boot */
526 #define CFBPRIMARY      0x0100  /* Channel B primary on 7895 chipsets */
527 #define CFSEAUTOTERM    0x0400  /* aic7890 Perform SE Auto Term */
528 #define CFLVDSTERM      0x0800  /* aic7890 LVD Termination */
529 /* UNUSED                0xF280 */
530   unsigned short adapter_control;        /* word 17 */
531
532 /*
533  * Bus Release, Host Adapter ID
534  */
535 #define CFSCSIID        0x000F                /* host adapter SCSI ID */
536 /* UNUSED                0x00F0 */
537 #define CFBRTIME        0xFF00                /* bus release time */
538   unsigned short brtime_id;                /* word 18 */
539
540 /*
541  * Maximum targets
542  */
543 #define CFMAXTARG        0x00FF        /* maximum targets */
544 /* UNUSED                0xFF00 */
545   unsigned short max_targets;                /* word 19 */
546
547   unsigned short res_1[11];                /* words 20-30 */
548   unsigned short checksum;                /* word 31 */
549 };
550
551 #define SELBUS_MASK                0x0a
552 #define         SELNARROW        0x00
553 #define         SELBUSB                0x08
554 #define SINGLE_BUS                0x00
555
556 #define SCB_TARGET(scb)         \
557        (((scb)->hscb->target_channel_lun & TID) >> 4)
558 #define SCB_LUN(scb)            \
559        ((scb)->hscb->target_channel_lun & LID)
560 #define SCB_IS_SCSIBUS_B(scb)   \
561        (((scb)->hscb->target_channel_lun & SELBUSB) != 0)
562
563 /*
564  * If an error occurs during a data transfer phase, run the command
565  * to completion - it's easier that way - making a note of the error
566  * condition in this location. This then will modify a DID_OK status
567  * into an appropriate error for the higher-level SCSI code.
568  */
569 #define aic7xxx_error(cmd)        ((cmd)->SCp.Status)
570
571 /*
572  * Keep track of the targets returned status.
573  */
574 #define aic7xxx_status(cmd)        ((cmd)->SCp.sent_command)
575
576 /*
577  * The position of the SCSI commands scb within the scb array.
578  */
579 #define aic7xxx_position(cmd)        ((cmd)->SCp.have_data_in)
580
581 /*
582  * The stored DMA mapping for single-buffer data transfers.
583  */
584 #define aic7xxx_mapping(cmd)         ((cmd)->SCp.phase)
585
586 /*
587  * Get out private data area from a scsi cmd pointer
588  */
589 #define AIC_DEV(cmd)    ((struct aic_dev_data *)(cmd)->device->hostdata)
590
591 /*
592  * So we can keep track of our host structs
593  */
594 static struct aic7xxx_host *first_aic7xxx = NULL;
595
596 /*
597  * As of Linux 2.1, the mid-level SCSI code uses virtual addresses
598  * in the scatter-gather lists.  We need to convert the virtual
599  * addresses to physical addresses.
600  */
601 struct hw_scatterlist {
602   unsigned int address;
603   unsigned int length;
604 };
605
606 /*
607  * Maximum number of SG segments these cards can support.
608  */
609 #define        AIC7XXX_MAX_SG 128
610
611 /*
612  * The maximum number of SCBs we could have for ANY type
613  * of card. DON'T FORGET TO CHANGE THE SCB MASK IN THE
614  * SEQUENCER CODE IF THIS IS MODIFIED!
615  */
616 #define AIC7XXX_MAXSCB        255
617
618
619 struct aic7xxx_hwscb {
620 /* ------------    Begin hardware supported fields    ---------------- */
621 /* 0*/  unsigned char control;
622 /* 1*/  unsigned char target_channel_lun;       /* 4/1/3 bits */
623 /* 2*/  unsigned char target_status;
624 /* 3*/  unsigned char SG_segment_count;
625 /* 4*/  unsigned int  SG_list_pointer;
626 /* 8*/  unsigned char residual_SG_segment_count;
627 /* 9*/  unsigned char residual_data_count[3];
628 /*12*/  unsigned int  data_pointer;
629 /*16*/  unsigned int  data_count;
630 /*20*/  unsigned int  SCSI_cmd_pointer;
631 /*24*/  unsigned char SCSI_cmd_length;
632 /*25*/  unsigned char tag;          /* Index into our kernel SCB array.
633                                      * Also used as the tag for tagged I/O
634                                      */
635 #define SCB_PIO_TRANSFER_SIZE  26   /* amount we need to upload/download
636                                      * via PIO to initialize a transaction.
637                                      */
638 /*26*/  unsigned char next;         /* Used to thread SCBs awaiting selection
639                                      * or disconnected down in the sequencer.
640                                      */
641 /*27*/  unsigned char prev;
642 /*28*/  unsigned int pad;           /*
643                                      * Unused by the kernel, but we require
644                                      * the padding so that the array of
645                                      * hardware SCBs is aligned on 32 byte
646                                      * boundaries so the sequencer can index
647                                      */
648 };
649
650 typedef enum {
651         SCB_FREE                = 0x0000,
652         SCB_DTR_SCB             = 0x0001,
653         SCB_WAITINGQ            = 0x0002,
654         SCB_ACTIVE              = 0x0004,
655         SCB_SENSE               = 0x0008,
656         SCB_ABORT               = 0x0010,
657         SCB_DEVICE_RESET        = 0x0020,
658         SCB_RESET               = 0x0040,
659         SCB_RECOVERY_SCB        = 0x0080,
660         SCB_MSGOUT_PPR          = 0x0100,
661         SCB_MSGOUT_SENT         = 0x0200,
662         SCB_MSGOUT_SDTR         = 0x0400,
663         SCB_MSGOUT_WDTR         = 0x0800,
664         SCB_MSGOUT_BITS         = SCB_MSGOUT_PPR |
665                                   SCB_MSGOUT_SENT | 
666                                   SCB_MSGOUT_SDTR |
667                                   SCB_MSGOUT_WDTR,
668         SCB_QUEUED_ABORT        = 0x1000,
669         SCB_QUEUED_FOR_DONE     = 0x2000,
670         SCB_WAS_BUSY            = 0x4000,
671         SCB_QUEUE_FULL          = 0x8000
672 } scb_flag_type;
673
674 typedef enum {
675         AHC_FNONE                 = 0x00000000,
676         AHC_PAGESCBS              = 0x00000001,
677         AHC_CHANNEL_B_PRIMARY     = 0x00000002,
678         AHC_USEDEFAULTS           = 0x00000004,
679         AHC_INDIRECT_PAGING       = 0x00000008,
680         AHC_CHNLB                 = 0x00000020,
681         AHC_CHNLC                 = 0x00000040,
682         AHC_EXTEND_TRANS_A        = 0x00000100,
683         AHC_EXTEND_TRANS_B        = 0x00000200,
684         AHC_TERM_ENB_A            = 0x00000400,
685         AHC_TERM_ENB_SE_LOW       = 0x00000400,
686         AHC_TERM_ENB_B            = 0x00000800,
687         AHC_TERM_ENB_SE_HIGH      = 0x00000800,
688         AHC_HANDLING_REQINITS     = 0x00001000,
689         AHC_TARGETMODE            = 0x00002000,
690         AHC_NEWEEPROM_FMT         = 0x00004000,
691  /*
692   *  Here ends the FreeBSD defined flags and here begins the linux defined
693   *  flags.  NOTE: I did not preserve the old flag name during this change
694   *  specifically to force me to evaluate what flags were being used properly
695   *  and what flags weren't.  This way, I could clean up the flag usage on
696   *  a use by use basis.  Doug Ledford
697   */
698         AHC_MOTHERBOARD           = 0x00020000,
699         AHC_NO_STPWEN             = 0x00040000,
700         AHC_RESET_DELAY           = 0x00080000,
701         AHC_A_SCANNED             = 0x00100000,
702         AHC_B_SCANNED             = 0x00200000,
703         AHC_MULTI_CHANNEL         = 0x00400000,
704         AHC_BIOS_ENABLED          = 0x00800000,
705         AHC_SEEPROM_FOUND         = 0x01000000,
706         AHC_TERM_ENB_LVD          = 0x02000000,
707         AHC_ABORT_PENDING         = 0x04000000,
708         AHC_RESET_PENDING         = 0x08000000,
709 #define AHC_IN_ISR_BIT              28
710         AHC_IN_ISR                = 0x10000000,
711         AHC_IN_ABORT              = 0x20000000,
712         AHC_IN_RESET              = 0x40000000,
713         AHC_EXTERNAL_SRAM         = 0x80000000
714 } ahc_flag_type;
715
716 typedef enum {
717   AHC_NONE             = 0x0000,
718   AHC_CHIPID_MASK      = 0x00ff,
719   AHC_AIC7770          = 0x0001,
720   AHC_AIC7850          = 0x0002,
721   AHC_AIC7860          = 0x0003,
722   AHC_AIC7870          = 0x0004,
723   AHC_AIC7880          = 0x0005,
724   AHC_AIC7890          = 0x0006,
725   AHC_AIC7895          = 0x0007,
726   AHC_AIC7896          = 0x0008,
727   AHC_AIC7892          = 0x0009,
728   AHC_AIC7899          = 0x000a,
729   AHC_VL               = 0x0100,
730   AHC_EISA             = 0x0200,
731   AHC_PCI              = 0x0400,
732 } ahc_chip;
733
734 typedef enum {
735   AHC_FENONE           = 0x0000,
736   AHC_ULTRA            = 0x0001,
737   AHC_ULTRA2           = 0x0002,
738   AHC_WIDE             = 0x0004,
739   AHC_TWIN             = 0x0008,
740   AHC_MORE_SRAM        = 0x0010,
741   AHC_CMD_CHAN         = 0x0020,
742   AHC_QUEUE_REGS       = 0x0040,
743   AHC_SG_PRELOAD       = 0x0080,
744   AHC_SPIOCAP          = 0x0100,
745   AHC_ULTRA3           = 0x0200,
746   AHC_NEW_AUTOTERM     = 0x0400,
747   AHC_AIC7770_FE       = AHC_FENONE,
748   AHC_AIC7850_FE       = AHC_SPIOCAP,
749   AHC_AIC7860_FE       = AHC_ULTRA|AHC_SPIOCAP,
750   AHC_AIC7870_FE       = AHC_FENONE,
751   AHC_AIC7880_FE       = AHC_ULTRA,
752   AHC_AIC7890_FE       = AHC_MORE_SRAM|AHC_CMD_CHAN|AHC_ULTRA2|
753                          AHC_QUEUE_REGS|AHC_SG_PRELOAD|AHC_NEW_AUTOTERM,
754   AHC_AIC7895_FE       = AHC_MORE_SRAM|AHC_CMD_CHAN|AHC_ULTRA,
755   AHC_AIC7896_FE       = AHC_AIC7890_FE,
756   AHC_AIC7892_FE       = AHC_AIC7890_FE|AHC_ULTRA3,
757   AHC_AIC7899_FE       = AHC_AIC7890_FE|AHC_ULTRA3,
758 } ahc_feature;
759
760 #define SCB_DMA_ADDR(scb, addr) ((unsigned long)(addr) + (scb)->scb_dma->dma_offset)
761
762 struct aic7xxx_scb_dma {
763         unsigned long          dma_offset;    /* Correction you have to add
764                                                * to virtual address to get
765                                                * dma handle in this region */
766         dma_addr_t             dma_address;   /* DMA handle of the start,
767                                                * for unmap */
768         unsigned int           dma_len;       /* DMA length */
769 };
770
771 typedef enum {
772   AHC_BUG_NONE            = 0x0000,
773   AHC_BUG_TMODE_WIDEODD   = 0x0001,
774   AHC_BUG_AUTOFLUSH       = 0x0002,
775   AHC_BUG_CACHETHEN       = 0x0004,
776   AHC_BUG_CACHETHEN_DIS   = 0x0008,
777   AHC_BUG_PCI_2_1_RETRY   = 0x0010,
778   AHC_BUG_PCI_MWI         = 0x0020,
779   AHC_BUG_SCBCHAN_UPLOAD  = 0x0040,
780 } ahc_bugs;
781
782 struct aic7xxx_scb {
783         struct aic7xxx_hwscb    *hscb;          /* corresponding hardware scb */
784         struct scsi_cmnd        *cmd;           /* scsi_cmnd for this scb */
785         struct aic7xxx_scb      *q_next;        /* next scb in queue */
786         volatile scb_flag_type  flags;          /* current state of scb */
787         struct hw_scatterlist   *sg_list;       /* SG list in adapter format */
788         unsigned char           tag_action;
789         unsigned char           sg_count;
790         unsigned char           *sense_cmd;     /*
791                                                  * Allocate 6 characters for
792                                                  * sense command.
793                                                  */
794         unsigned char           *cmnd;
795         unsigned int            sg_length;      /*
796                                                  * We init this during
797                                                  * buildscb so we don't have
798                                                  * to calculate anything during
799                                                  * underflow/overflow/stat code
800                                                  */
801         void                    *kmalloc_ptr;
802         struct aic7xxx_scb_dma  *scb_dma;
803 };
804
805 /*
806  * Define a linked list of SCBs.
807  */
808 typedef struct {
809   struct aic7xxx_scb *head;
810   struct aic7xxx_scb *tail;
811 } scb_queue_type;
812
813 static struct {
814   unsigned char errno;
815   const char *errmesg;
816 } hard_error[] = {
817   { ILLHADDR,  "Illegal Host Access" },
818   { ILLSADDR,  "Illegal Sequencer Address referenced" },
819   { ILLOPCODE, "Illegal Opcode in sequencer program" },
820   { SQPARERR,  "Sequencer Ram Parity Error" },
821   { DPARERR,   "Data-Path Ram Parity Error" },
822   { MPARERR,   "Scratch Ram/SCB Array Ram Parity Error" },
823   { PCIERRSTAT,"PCI Error detected" },
824   { CIOPARERR, "CIOBUS Parity Error" }
825 };
826
827 static unsigned char
828 generic_sense[] = { REQUEST_SENSE, 0, 0, 0, 255, 0 };
829
830 typedef struct {
831   scb_queue_type free_scbs;        /*
832                                     * SCBs assigned to free slot on
833                                     * card (no paging required)
834                                     */
835   struct aic7xxx_scb   *scb_array[AIC7XXX_MAXSCB];
836   struct aic7xxx_hwscb *hscbs;
837   unsigned char  numscbs;          /* current number of scbs */
838   unsigned char  maxhscbs;         /* hardware scbs */
839   unsigned char  maxscbs;          /* max scbs including pageable scbs */
840   dma_addr_t     hscbs_dma;        /* DMA handle to hscbs */
841   unsigned int   hscbs_dma_len;    /* length of the above DMA area */
842   void          *hscb_kmalloc_ptr;
843 } scb_data_type;
844
845 struct target_cmd {
846   unsigned char mesg_bytes[4];
847   unsigned char command[28];
848 };
849
850 #define AHC_TRANS_CUR    0x0001
851 #define AHC_TRANS_ACTIVE 0x0002
852 #define AHC_TRANS_GOAL   0x0004
853 #define AHC_TRANS_USER   0x0008
854 #define AHC_TRANS_QUITE  0x0010
855 typedef struct {
856   unsigned char width;
857   unsigned char period;
858   unsigned char offset;
859   unsigned char options;
860 } transinfo_type;
861
862 struct aic_dev_data {
863   volatile scb_queue_type  delayed_scbs;
864   volatile unsigned short  temp_q_depth;
865   unsigned short           max_q_depth;
866   volatile unsigned char   active_cmds;
867   /*
868    * Statistics Kept:
869    *
870    * Total Xfers (count for each command that has a data xfer),
871    * broken down by reads && writes.
872    *
873    * Further sorted into a few bins for keeping tabs on how many commands
874    * we get of various sizes.
875    *
876    */
877   long w_total;                          /* total writes */
878   long r_total;                          /* total reads */
879   long barrier_total;                    /* total num of REQ_BARRIER commands */
880   long ordered_total;                    /* How many REQ_BARRIER commands we
881                                             used ordered tags to satisfy */
882   long w_bins[6];                       /* binned write */
883   long r_bins[6];                       /* binned reads */
884   transinfo_type        cur;
885   transinfo_type        goal;
886 #define  BUS_DEVICE_RESET_PENDING       0x01
887 #define  DEVICE_RESET_DELAY             0x02
888 #define  DEVICE_PRINT_DTR               0x04
889 #define  DEVICE_WAS_BUSY                0x08
890 #define  DEVICE_DTR_SCANNED             0x10
891 #define  DEVICE_SCSI_3                  0x20
892   volatile unsigned char   flags;
893   unsigned needppr:1;
894   unsigned needppr_copy:1;
895   unsigned needsdtr:1;
896   unsigned needsdtr_copy:1;
897   unsigned needwdtr:1;
898   unsigned needwdtr_copy:1;
899   unsigned dtr_pending:1;
900   struct scsi_device *SDptr;
901   struct list_head list;
902 };
903
904 /*
905  * Define a structure used for each host adapter.  Note, in order to avoid
906  * problems with architectures I can't test on (because I don't have one,
907  * such as the Alpha based systems) which happen to give faults for
908  * non-aligned memory accesses, care was taken to align this structure
909  * in a way that gauranteed all accesses larger than 8 bits were aligned
910  * on the appropriate boundary.  It's also organized to try and be more
911  * cache line efficient.  Be careful when changing this lest you might hurt
912  * overall performance and bring down the wrath of the masses.
913  */
914 struct aic7xxx_host {
915   /*
916    *  This is the first 64 bytes in the host struct
917    */
918
919   /*
920    * We are grouping things here....first, items that get either read or
921    * written with nearly every interrupt
922    */
923         volatile long   flags;
924         ahc_feature     features;       /* chip features */
925         unsigned long   base;           /* card base address */
926         volatile unsigned char  __iomem *maddr; /* memory mapped address */
927         unsigned long   isr_count;      /* Interrupt count */
928         unsigned long   spurious_int;
929         scb_data_type   *scb_data;
930         struct aic7xxx_cmd_queue {
931                 struct scsi_cmnd *head;
932                 struct scsi_cmnd *tail;
933         } completeq;
934
935         /*
936         * Things read/written on nearly every entry into aic7xxx_queue()
937         */
938         volatile scb_queue_type waiting_scbs;
939         unsigned char   unpause;        /* unpause value for HCNTRL */
940         unsigned char   pause;          /* pause value for HCNTRL */
941         volatile unsigned char  qoutfifonext;
942         volatile unsigned char  activescbs;     /* active scbs */
943         volatile unsigned char  max_activescbs;
944         volatile unsigned char  qinfifonext;
945         volatile unsigned char  *untagged_scbs;
946         volatile unsigned char  *qoutfifo;
947         volatile unsigned char  *qinfifo;
948
949         unsigned char   dev_last_queue_full[MAX_TARGETS];
950         unsigned char   dev_last_queue_full_count[MAX_TARGETS];
951         unsigned short  ultraenb; /* Gets downloaded to card as a bitmap */
952         unsigned short  discenable; /* Gets downloaded to card as a bitmap */
953         transinfo_type  user[MAX_TARGETS];
954
955         unsigned char   msg_buf[13];    /* The message for the target */
956         unsigned char   msg_type;
957 #define MSG_TYPE_NONE              0x00
958 #define MSG_TYPE_INITIATOR_MSGOUT  0x01
959 #define MSG_TYPE_INITIATOR_MSGIN   0x02
960         unsigned char   msg_len;        /* Length of message */
961         unsigned char   msg_index;      /* Index into msg_buf array */
962
963
964         /*
965          * We put the less frequently used host structure items
966          * after the more frequently used items to try and ease
967          * the burden on the cache subsystem.
968          * These entries are not *commonly* accessed, whereas
969          * the preceding entries are accessed very often.
970          */
971
972         unsigned int    irq;            /* IRQ for this adapter */
973         int             instance;       /* aic7xxx instance number */
974         int             scsi_id;        /* host adapter SCSI ID */
975         int             scsi_id_b;      /* channel B for twin adapters */
976         unsigned int    bios_address;
977         int             board_name_index;
978         unsigned short  bios_control;           /* bios control - SEEPROM */
979         unsigned short  adapter_control;        /* adapter control - SEEPROM */
980         struct pci_dev  *pdev;
981         unsigned char   pci_bus;
982         unsigned char   pci_device_fn;
983         struct seeprom_config   sc;
984         unsigned short  sc_type;
985         unsigned short  sc_size;
986         struct aic7xxx_host     *next;  /* allow for multiple IRQs */
987         struct Scsi_Host        *host;  /* pointer to scsi host */
988         struct list_head         aic_devs; /* all aic_dev structs on host */
989         int             host_no;        /* SCSI host number */
990         unsigned long   mbase;          /* I/O memory address */
991         ahc_chip        chip;           /* chip type */
992         ahc_bugs        bugs;
993         dma_addr_t      fifo_dma;       /* DMA handle for fifo arrays */
994 };
995
996 /*
997  * Valid SCSIRATE values. (p. 3-17)
998  * Provides a mapping of transfer periods in ns/4 to the proper value to
999  * stick in the SCSIRATE reg to use that transfer rate.
1000  */
1001 #define AHC_SYNCRATE_ULTRA3 0
1002 #define AHC_SYNCRATE_ULTRA2 1
1003 #define AHC_SYNCRATE_ULTRA  3
1004 #define AHC_SYNCRATE_FAST   6
1005 #define AHC_SYNCRATE_CRC 0x40
1006 #define AHC_SYNCRATE_SE  0x10
1007 static struct aic7xxx_syncrate {
1008   /* Rates in Ultra mode have bit 8 of sxfr set */
1009 #define                ULTRA_SXFR 0x100
1010   int sxfr_ultra2;
1011   int sxfr;
1012   unsigned char period;
1013   const char *rate[2];
1014 } aic7xxx_syncrates[] = {
1015   { 0x42,  0x000,   9,  {"80.0", "160.0"} },
1016   { 0x13,  0x000,  10,  {"40.0", "80.0"} },
1017   { 0x14,  0x000,  11,  {"33.0", "66.6"} },
1018   { 0x15,  0x100,  12,  {"20.0", "40.0"} },
1019   { 0x16,  0x110,  15,  {"16.0", "32.0"} },
1020   { 0x17,  0x120,  18,  {"13.4", "26.8"} },
1021   { 0x18,  0x000,  25,  {"10.0", "20.0"} },
1022   { 0x19,  0x010,  31,  {"8.0",  "16.0"} },
1023   { 0x1a,  0x020,  37,  {"6.67", "13.3"} },
1024   { 0x1b,  0x030,  43,  {"5.7",  "11.4"} },
1025   { 0x10,  0x040,  50,  {"5.0",  "10.0"} },
1026   { 0x00,  0x050,  56,  {"4.4",  "8.8" } },
1027   { 0x00,  0x060,  62,  {"4.0",  "8.0" } },
1028   { 0x00,  0x070,  68,  {"3.6",  "7.2" } },
1029   { 0x00,  0x000,  0,   {NULL, NULL}   },
1030 };
1031
1032 #define CTL_OF_SCB(scb) (((scb->hscb)->target_channel_lun >> 3) & 0x1),  \
1033                         (((scb->hscb)->target_channel_lun >> 4) & 0xf), \
1034                         ((scb->hscb)->target_channel_lun & 0x07)
1035
1036 #define CTL_OF_CMD(cmd) ((cmd->device->channel) & 0x01),  \
1037                         ((cmd->device->id) & 0x0f), \
1038                         ((cmd->device->lun) & 0x07)
1039
1040 #define TARGET_INDEX(cmd)  ((cmd)->device->id | ((cmd)->device->channel << 3))
1041
1042 /*
1043  * A nice little define to make doing our printks a little easier
1044  */
1045
1046 #define WARN_LEAD KERN_WARNING "(scsi%d:%d:%d:%d) "
1047 #define INFO_LEAD KERN_INFO "(scsi%d:%d:%d:%d) "
1048
1049 /*
1050  * XXX - these options apply unilaterally to _all_ 274x/284x/294x
1051  *       cards in the system.  This should be fixed.  Exceptions to this
1052  *       rule are noted in the comments.
1053  */
1054
1055 /*
1056  * Use this as the default queue depth when setting tagged queueing on.
1057  */
1058 static unsigned int aic7xxx_default_queue_depth = AIC7XXX_CMDS_PER_DEVICE;
1059
1060 /*
1061  * Skip the scsi bus reset.  Non 0 make us skip the reset at startup.  This
1062  * has no effect on any later resets that might occur due to things like
1063  * SCSI bus timeouts.
1064  */
1065 static unsigned int aic7xxx_no_reset = 0;
1066 /*
1067  * Certain PCI motherboards will scan PCI devices from highest to lowest,
1068  * others scan from lowest to highest, and they tend to do all kinds of
1069  * strange things when they come into contact with PCI bridge chips.  The
1070  * net result of all this is that the PCI card that is actually used to boot
1071  * the machine is very hard to detect.  Most motherboards go from lowest
1072  * PCI slot number to highest, and the first SCSI controller found is the
1073  * one you boot from.  The only exceptions to this are when a controller
1074  * has its BIOS disabled.  So, we by default sort all of our SCSI controllers
1075  * from lowest PCI slot number to highest PCI slot number.  We also force
1076  * all controllers with their BIOS disabled to the end of the list.  This
1077  * works on *almost* all computers.  Where it doesn't work, we have this
1078  * option.  Setting this option to non-0 will reverse the order of the sort
1079  * to highest first, then lowest, but will still leave cards with their BIOS
1080  * disabled at the very end.  That should fix everyone up unless there are
1081  * really strange cirumstances.
1082  */
1083 static int aic7xxx_reverse_scan = 0;
1084 /*
1085  * Should we force EXTENDED translation on a controller.
1086  *     0 == Use whatever is in the SEEPROM or default to off
1087  *     1 == Use whatever is in the SEEPROM or default to on
1088  */
1089 static unsigned int aic7xxx_extended = 0;
1090 /*
1091  * The IRQ trigger method used on EISA controllers. Does not effect PCI cards.
1092  *   -1 = Use detected settings.
1093  *    0 = Force Edge triggered mode.
1094  *    1 = Force Level triggered mode.
1095  */
1096 static int aic7xxx_irq_trigger = -1;
1097 /*
1098  * This variable is used to override the termination settings on a controller.
1099  * This should not be used under normal conditions.  However, in the case
1100  * that a controller does not have a readable SEEPROM (so that we can't
1101  * read the SEEPROM settings directly) and that a controller has a buggered
1102  * version of the cable detection logic, this can be used to force the 
1103  * correct termination.  It is preferable to use the manual termination
1104  * settings in the BIOS if possible, but some motherboard controllers store
1105  * those settings in a format we can't read.  In other cases, auto term
1106  * should also work, but the chipset was put together with no auto term
1107  * logic (common on motherboard controllers).  In those cases, we have
1108  * 32 bits here to work with.  That's good for 8 controllers/channels.  The
1109  * bits are organized as 4 bits per channel, with scsi0 getting the lowest
1110  * 4 bits in the int.  A 1 in a bit position indicates the termination setting
1111  * that corresponds to that bit should be enabled, a 0 is disabled.
1112  * It looks something like this:
1113  *
1114  *    0x0f =  1111-Single Ended Low Byte Termination on/off
1115  *            ||\-Single Ended High Byte Termination on/off
1116  *            |\-LVD Low Byte Termination on/off
1117  *            \-LVD High Byte Termination on/off
1118  *
1119  * For non-Ultra2 controllers, the upper 2 bits are not important.  So, to
1120  * enable both high byte and low byte termination on scsi0, I would need to
1121  * make sure that the override_term variable was set to 0x03 (bits 0011).
1122  * To make sure that all termination is enabled on an Ultra2 controller at
1123  * scsi2 and only high byte termination on scsi1 and high and low byte
1124  * termination on scsi0, I would set override_term=0xf23 (bits 1111 0010 0011)
1125  *
1126  * For the most part, users should never have to use this, that's why I
1127  * left it fairly cryptic instead of easy to understand.  If you need it,
1128  * most likely someone will be telling you what your's needs to be set to.
1129  */
1130 static int aic7xxx_override_term = -1;
1131 /*
1132  * Certain motherboard chipset controllers tend to screw
1133  * up the polarity of the term enable output pin.  Use this variable
1134  * to force the correct polarity for your system.  This is a bitfield variable
1135  * similar to the previous one, but this one has one bit per channel instead
1136  * of four.
1137  *    0 = Force the setting to active low.
1138  *    1 = Force setting to active high.
1139  * Most Adaptec cards are active high, several motherboards are active low.
1140  * To force a 2940 card at SCSI 0 to active high and a motherboard 7895
1141  * controller at scsi1 and scsi2 to active low, and a 2910 card at scsi3
1142  * to active high, you would need to set stpwlev=0x9 (bits 1001).
1143  *
1144  * People shouldn't need to use this, but if you are experiencing lots of
1145  * SCSI timeout problems, this may help.  There is one sure way to test what
1146  * this option needs to be.  Using a boot floppy to boot the system, configure
1147  * your system to enable all SCSI termination (in the Adaptec SCSI BIOS) and
1148  * if needed then also pass a value to override_term to make sure that the
1149  * driver is enabling SCSI termination, then set this variable to either 0
1150  * or 1.  When the driver boots, make sure there are *NO* SCSI cables
1151  * connected to your controller.  If it finds and inits the controller
1152  * without problem, then the setting you passed to stpwlev was correct.  If
1153  * the driver goes into a reset loop and hangs the system, then you need the
1154  * other setting for this variable.  If neither setting lets the machine
1155  * boot then you have definite termination problems that may not be fixable.
1156  */
1157 static int aic7xxx_stpwlev = -1;
1158 /*
1159  * Set this to non-0 in order to force the driver to panic the kernel
1160  * and print out debugging info on a SCSI abort or reset cycle.
1161  */
1162 static int aic7xxx_panic_on_abort = 0;
1163 /*
1164  * PCI bus parity checking of the Adaptec controllers.  This is somewhat
1165  * dubious at best.  To my knowledge, this option has never actually
1166  * solved a PCI parity problem, but on certain machines with broken PCI
1167  * chipset configurations, it can generate tons of false error messages.
1168  * It's included in the driver for completeness.
1169  *   0 = Shut off PCI parity check
1170  *  -1 = Normal polarity pci parity checking
1171  *   1 = reverse polarity pci parity checking
1172  *
1173  * NOTE: you can't actually pass -1 on the lilo prompt.  So, to set this
1174  * variable to -1 you would actually want to simply pass the variable
1175  * name without a number.  That will invert the 0 which will result in
1176  * -1.
1177  */
1178 static int aic7xxx_pci_parity = 0;
1179 /*
1180  * Set this to any non-0 value to cause us to dump the contents of all
1181  * the card's registers in a hex dump format tailored to each model of
1182  * controller.
1183  * 
1184  * NOTE: THE CONTROLLER IS LEFT IN AN UNUSEABLE STATE BY THIS OPTION.
1185  *       YOU CANNOT BOOT UP WITH THIS OPTION, IT IS FOR DEBUGGING PURPOSES
1186  *       ONLY
1187  */
1188 static int aic7xxx_dump_card = 0;
1189 /*
1190  * Set this to a non-0 value to make us dump out the 32 bit instruction
1191  * registers on the card after completing the sequencer download.  This
1192  * allows the actual sequencer download to be verified.  It is possible
1193  * to use this option and still boot up and run your system.  This is
1194  * only intended for debugging purposes.
1195  */
1196 static int aic7xxx_dump_sequencer = 0;
1197 /*
1198  * Certain newer motherboards have put new PCI based devices into the
1199  * IO spaces that used to typically be occupied by VLB or EISA cards.
1200  * This overlap can cause these newer motherboards to lock up when scanned
1201  * for older EISA and VLB devices.  Setting this option to non-0 will
1202  * cause the driver to skip scanning for any VLB or EISA controllers and
1203  * only support the PCI controllers.  NOTE: this means that if the kernel
1204  * os compiled with PCI support disabled, then setting this to non-0
1205  * would result in never finding any devices :)
1206  */
1207 static int aic7xxx_no_probe = 0;
1208 /*
1209  * On some machines, enabling the external SCB RAM isn't reliable yet.  I
1210  * haven't had time to make test patches for things like changing the
1211  * timing mode on that external RAM either.  Some of those changes may
1212  * fix the problem.  Until then though, we default to external SCB RAM
1213  * off and give a command line option to enable it.
1214  */
1215 static int aic7xxx_scbram = 0;
1216 /*
1217  * So that we can set how long each device is given as a selection timeout.
1218  * The table of values goes like this:
1219  *   0 - 256ms
1220  *   1 - 128ms
1221  *   2 - 64ms
1222  *   3 - 32ms
1223  * We default to 64ms because it's fast.  Some old SCSI-I devices need a
1224  * longer time.  The final value has to be left shifted by 3, hence 0x10
1225  * is the final value.
1226  */
1227 static int aic7xxx_seltime = 0x10;
1228 /*
1229  * So that insmod can find the variable and make it point to something
1230  */
1231 #ifdef MODULE
1232 static char * aic7xxx = NULL;
1233 module_param(aic7xxx, charp, 0);
1234 #endif
1235
1236 #define VERBOSE_NORMAL         0x0000
1237 #define VERBOSE_NEGOTIATION    0x0001
1238 #define VERBOSE_SEQINT         0x0002
1239 #define VERBOSE_SCSIINT        0x0004
1240 #define VERBOSE_PROBE          0x0008
1241 #define VERBOSE_PROBE2         0x0010
1242 #define VERBOSE_NEGOTIATION2   0x0020
1243 #define VERBOSE_MINOR_ERROR    0x0040
1244 #define VERBOSE_TRACING        0x0080
1245 #define VERBOSE_ABORT          0x0f00
1246 #define VERBOSE_ABORT_MID      0x0100
1247 #define VERBOSE_ABORT_FIND     0x0200
1248 #define VERBOSE_ABORT_PROCESS  0x0400
1249 #define VERBOSE_ABORT_RETURN   0x0800
1250 #define VERBOSE_RESET          0xf000
1251 #define VERBOSE_RESET_MID      0x1000
1252 #define VERBOSE_RESET_FIND     0x2000
1253 #define VERBOSE_RESET_PROCESS  0x4000
1254 #define VERBOSE_RESET_RETURN   0x8000
1255 static int aic7xxx_verbose = VERBOSE_NORMAL | VERBOSE_NEGOTIATION |
1256            VERBOSE_PROBE;                     /* verbose messages */
1257
1258
1259 /****************************************************************************
1260  *
1261  * We're going to start putting in function declarations so that order of
1262  * functions is no longer important.  As needed, they are added here.
1263  *
1264  ***************************************************************************/
1265
1266 static int aic7xxx_release(struct Scsi_Host *host);
1267 static void aic7xxx_set_syncrate(struct aic7xxx_host *p, 
1268                 struct aic7xxx_syncrate *syncrate, int target, int channel,
1269                 unsigned int period, unsigned int offset, unsigned char options,
1270                 unsigned int type, struct aic_dev_data *aic_dev);
1271 static void aic7xxx_set_width(struct aic7xxx_host *p, int target, int channel,
1272                 int lun, unsigned int width, unsigned int type,
1273                 struct aic_dev_data *aic_dev);
1274 static void aic7xxx_panic_abort(struct aic7xxx_host *p, struct scsi_cmnd *cmd);
1275 static void aic7xxx_print_card(struct aic7xxx_host *p);
1276 static void aic7xxx_print_scratch_ram(struct aic7xxx_host *p);
1277 static void aic7xxx_print_sequencer(struct aic7xxx_host *p, int downloaded);
1278 #ifdef AIC7XXX_VERBOSE_DEBUGGING
1279 static void aic7xxx_check_scbs(struct aic7xxx_host *p, char *buffer);
1280 #endif
1281
1282 /****************************************************************************
1283  *
1284  * These functions are now used.  They happen to be wrapped in useless
1285  * inb/outb port read/writes around the real reads and writes because it
1286  * seems that certain very fast CPUs have a problem dealing with us when
1287  * going at full speed.
1288  *
1289  ***************************************************************************/
1290
1291 static unsigned char
1292 aic_inb(struct aic7xxx_host *p, long port)
1293 {
1294 #ifdef MMAPIO
1295   unsigned char x;
1296   if(p->maddr)
1297   {
1298     x = readb(p->maddr + port);
1299   }
1300   else
1301   {
1302     x = inb(p->base + port);
1303   }
1304   return(x);
1305 #else
1306   return(inb(p->base + port));
1307 #endif
1308 }
1309
1310 static void
1311 aic_outb(struct aic7xxx_host *p, unsigned char val, long port)
1312 {
1313 #ifdef MMAPIO
1314   if(p->maddr)
1315   {
1316     writeb(val, p->maddr + port);
1317     mb(); /* locked operation in order to force CPU ordering */
1318     readb(p->maddr + HCNTRL); /* dummy read to flush the PCI write */
1319   }
1320   else
1321   {
1322     outb(val, p->base + port);
1323     mb(); /* locked operation in order to force CPU ordering */
1324   }
1325 #else
1326   outb(val, p->base + port);
1327   mb(); /* locked operation in order to force CPU ordering */
1328 #endif
1329 }
1330
1331 /*+F*************************************************************************
1332  * Function:
1333  *   aic7xxx_setup
1334  *
1335  * Description:
1336  *   Handle Linux boot parameters. This routine allows for assigning a value
1337  *   to a parameter with a ':' between the parameter and the value.
1338  *   ie. aic7xxx=unpause:0x0A,extended
1339  *-F*************************************************************************/
1340 static int
1341 aic7xxx_setup(char *s)
1342 {
1343   int   i, n;
1344   char *p;
1345   char *end;
1346
1347   static struct {
1348     const char *name;
1349     unsigned int *flag;
1350   } options[] = {
1351     { "extended",    &aic7xxx_extended },
1352     { "no_reset",    &aic7xxx_no_reset },
1353     { "irq_trigger", &aic7xxx_irq_trigger },
1354     { "verbose",     &aic7xxx_verbose },
1355     { "reverse_scan",&aic7xxx_reverse_scan },
1356     { "override_term", &aic7xxx_override_term },
1357     { "stpwlev", &aic7xxx_stpwlev },
1358     { "no_probe", &aic7xxx_no_probe },
1359     { "panic_on_abort", &aic7xxx_panic_on_abort },
1360     { "pci_parity", &aic7xxx_pci_parity },
1361     { "dump_card", &aic7xxx_dump_card },
1362     { "dump_sequencer", &aic7xxx_dump_sequencer },
1363     { "default_queue_depth", &aic7xxx_default_queue_depth },
1364     { "scbram", &aic7xxx_scbram },
1365     { "seltime", &aic7xxx_seltime },
1366     { "tag_info",    NULL }
1367   };
1368
1369   end = strchr(s, '\0');
1370
1371   while ((p = strsep(&s, ",.")) != NULL)
1372   {
1373     for (i = 0; i < ARRAY_SIZE(options); i++)
1374     {
1375       n = strlen(options[i].name);
1376       if (!strncmp(options[i].name, p, n))
1377       {
1378         if (!strncmp(p, "tag_info", n))
1379         {
1380           if (p[n] == ':')
1381           {
1382             char *base;
1383             char *tok, *tok_end, *tok_end2;
1384             char tok_list[] = { '.', ',', '{', '}', '\0' };
1385             int i, instance = -1, device = -1;
1386             unsigned char done = FALSE;
1387
1388             base = p;
1389             tok = base + n + 1;  /* Forward us just past the ':' */
1390             tok_end = strchr(tok, '\0');
1391             if (tok_end < end)
1392               *tok_end = ',';
1393             while(!done)
1394             {
1395               switch(*tok)
1396               {
1397                 case '{':
1398                   if (instance == -1)
1399                     instance = 0;
1400                   else if (device == -1)
1401                     device = 0;
1402                   tok++;
1403                   break;
1404                 case '}':
1405                   if (device != -1)
1406                     device = -1;
1407                   else if (instance != -1)
1408                     instance = -1;
1409                   tok++;
1410                   break;
1411                 case ',':
1412                 case '.':
1413                   if (instance == -1)
1414                     done = TRUE;
1415                   else if (device >= 0)
1416                     device++;
1417                   else if (instance >= 0)
1418                     instance++;
1419                   if ( (device >= MAX_TARGETS) || 
1420                        (instance >= ARRAY_SIZE(aic7xxx_tag_info)) )
1421                     done = TRUE;
1422                   tok++;
1423                   if (!done)
1424                   {
1425                     base = tok;
1426                   }
1427                   break;
1428                 case '\0':
1429                   done = TRUE;
1430                   break;
1431                 default:
1432                   done = TRUE;
1433                   tok_end = strchr(tok, '\0');
1434                   for(i=0; tok_list[i]; i++)
1435                   {
1436                     tok_end2 = strchr(tok, tok_list[i]);
1437                     if ( (tok_end2) && (tok_end2 < tok_end) )
1438                     {
1439                       tok_end = tok_end2;
1440                       done = FALSE;
1441                     }
1442                   }
1443                   if ( (instance >= 0) && (device >= 0) &&
1444                        (instance < ARRAY_SIZE(aic7xxx_tag_info)) &&
1445                        (device < MAX_TARGETS) )
1446                     aic7xxx_tag_info[instance].tag_commands[device] =
1447                       simple_strtoul(tok, NULL, 0) & 0xff;
1448                   tok = tok_end;
1449                   break;
1450               }
1451             }
1452             while((p != base) && (p != NULL))
1453               p = strsep(&s, ",.");
1454           }
1455         }
1456         else if (p[n] == ':')
1457         {
1458           *(options[i].flag) = simple_strtoul(p + n + 1, NULL, 0);
1459           if(!strncmp(p, "seltime", n))
1460           {
1461             *(options[i].flag) = (*(options[i].flag) % 4) << 3;
1462           }
1463         }
1464         else if (!strncmp(p, "verbose", n))
1465         {
1466           *(options[i].flag) = 0xff29;
1467         }
1468         else
1469         {
1470           *(options[i].flag) = ~(*(options[i].flag));
1471           if(!strncmp(p, "seltime", n))
1472           {
1473             *(options[i].flag) = (*(options[i].flag) % 4) << 3;
1474           }
1475         }
1476       }
1477     }
1478   }
1479   return 1;
1480 }
1481
1482 __setup("aic7xxx=", aic7xxx_setup);
1483
1484 /*+F*************************************************************************
1485  * Function:
1486  *   pause_sequencer
1487  *
1488  * Description:
1489  *   Pause the sequencer and wait for it to actually stop - this
1490  *   is important since the sequencer can disable pausing for critical
1491  *   sections.
1492  *-F*************************************************************************/
1493 static void
1494 pause_sequencer(struct aic7xxx_host *p)
1495 {
1496   aic_outb(p, p->pause, HCNTRL);
1497   while ((aic_inb(p, HCNTRL) & PAUSE) == 0)
1498   {
1499     ;
1500   }
1501   if(p->features & AHC_ULTRA2)
1502   {
1503     aic_inb(p, CCSCBCTL);
1504   }
1505 }
1506
1507 /*+F*************************************************************************
1508  * Function:
1509  *   unpause_sequencer
1510  *
1511  * Description:
1512  *   Unpause the sequencer. Unremarkable, yet done often enough to
1513  *   warrant an easy way to do it.
1514  *-F*************************************************************************/
1515 static void
1516 unpause_sequencer(struct aic7xxx_host *p, int unpause_always)
1517 {
1518   if (unpause_always ||
1519       ( !(aic_inb(p, INTSTAT) & (SCSIINT | SEQINT | BRKADRINT)) &&
1520         !(p->flags & AHC_HANDLING_REQINITS) ) )
1521   {
1522     aic_outb(p, p->unpause, HCNTRL);
1523   }
1524 }
1525
1526 /*+F*************************************************************************
1527  * Function:
1528  *   restart_sequencer
1529  *
1530  * Description:
1531  *   Restart the sequencer program from address zero.  This assumes
1532  *   that the sequencer is already paused.
1533  *-F*************************************************************************/
1534 static void
1535 restart_sequencer(struct aic7xxx_host *p)
1536 {
1537   aic_outb(p, 0, SEQADDR0);
1538   aic_outb(p, 0, SEQADDR1);
1539   aic_outb(p, FASTMODE, SEQCTL);
1540 }
1541
1542 /*
1543  * We include the aic7xxx_seq.c file here so that the other defines have
1544  * already been made, and so that it comes before the code that actually
1545  * downloads the instructions (since we don't typically use function
1546  * prototype, our code has to be ordered that way, it's a left-over from
1547  * the original driver days.....I should fix it some time DL).
1548  */
1549 #include "aic7xxx_old/aic7xxx_seq.c"
1550
1551 /*+F*************************************************************************
1552  * Function:
1553  *   aic7xxx_check_patch
1554  *
1555  * Description:
1556  *   See if the next patch to download should be downloaded.
1557  *-F*************************************************************************/
1558 static int
1559 aic7xxx_check_patch(struct aic7xxx_host *p,
1560   struct sequencer_patch **start_patch, int start_instr, int *skip_addr)
1561 {
1562   struct sequencer_patch *cur_patch;
1563   struct sequencer_patch *last_patch;
1564   int num_patches;
1565
1566   num_patches = ARRAY_SIZE(sequencer_patches);
1567   last_patch = &sequencer_patches[num_patches];
1568   cur_patch = *start_patch;
1569
1570   while ((cur_patch < last_patch) && (start_instr == cur_patch->begin))
1571   {
1572     if (cur_patch->patch_func(p) == 0)
1573     {
1574       /*
1575        * Start rejecting code.
1576        */
1577       *skip_addr = start_instr + cur_patch->skip_instr;
1578       cur_patch += cur_patch->skip_patch;
1579     }
1580     else
1581     {
1582       /*
1583        * Found an OK patch.  Advance the patch pointer to the next patch
1584        * and wait for our instruction pointer to get here.
1585        */
1586       cur_patch++;
1587     }
1588   }
1589
1590   *start_patch = cur_patch;
1591   if (start_instr < *skip_addr)
1592     /*
1593      * Still skipping
1594      */
1595     return (0);
1596   return(1);
1597 }
1598
1599
1600 /*+F*************************************************************************
1601  * Function:
1602  *   aic7xxx_download_instr
1603  *
1604  * Description:
1605  *   Find the next patch to download.
1606  *-F*************************************************************************/
1607 static void
1608 aic7xxx_download_instr(struct aic7xxx_host *p, int instrptr,
1609   unsigned char *dconsts)
1610 {
1611   union ins_formats instr;
1612   struct ins_format1 *fmt1_ins;
1613   struct ins_format3 *fmt3_ins;
1614   unsigned char opcode;
1615
1616   instr = *(union ins_formats*) &seqprog[instrptr * 4];
1617
1618   instr.integer = le32_to_cpu(instr.integer);
1619   
1620   fmt1_ins = &instr.format1;
1621   fmt3_ins = NULL;
1622
1623   /* Pull the opcode */
1624   opcode = instr.format1.opcode;
1625   switch (opcode)
1626   {
1627     case AIC_OP_JMP:
1628     case AIC_OP_JC:
1629     case AIC_OP_JNC:
1630     case AIC_OP_CALL:
1631     case AIC_OP_JNE:
1632     case AIC_OP_JNZ:
1633     case AIC_OP_JE:
1634     case AIC_OP_JZ:
1635     {
1636       struct sequencer_patch *cur_patch;
1637       int address_offset;
1638       unsigned int address;
1639       int skip_addr;
1640       int i;
1641
1642       fmt3_ins = &instr.format3;
1643       address_offset = 0;
1644       address = fmt3_ins->address;
1645       cur_patch = sequencer_patches;
1646       skip_addr = 0;
1647
1648       for (i = 0; i < address;)
1649       {
1650         aic7xxx_check_patch(p, &cur_patch, i, &skip_addr);
1651         if (skip_addr > i)
1652         {
1653           int end_addr;
1654
1655           end_addr = min_t(int, address, skip_addr);
1656           address_offset += end_addr - i;
1657           i = skip_addr;
1658         }
1659         else
1660         {
1661           i++;
1662         }
1663       }
1664       address -= address_offset;
1665       fmt3_ins->address = address;
1666       /* Fall Through to the next code section */
1667     }
1668     case AIC_OP_OR:
1669     case AIC_OP_AND:
1670     case AIC_OP_XOR:
1671     case AIC_OP_ADD:
1672     case AIC_OP_ADC:
1673     case AIC_OP_BMOV:
1674       if (fmt1_ins->parity != 0)
1675       {
1676         fmt1_ins->immediate = dconsts[fmt1_ins->immediate];
1677       }
1678       fmt1_ins->parity = 0;
1679       /* Fall Through to the next code section */
1680     case AIC_OP_ROL:
1681       if ((p->features & AHC_ULTRA2) != 0)
1682       {
1683         int i, count;
1684
1685         /* Calculate odd parity for the instruction */
1686         for ( i=0, count=0; i < 31; i++)
1687         {
1688           unsigned int mask;
1689
1690           mask = 0x01 << i;
1691           if ((instr.integer & mask) != 0)
1692             count++;
1693         }
1694         if (!(count & 0x01))
1695           instr.format1.parity = 1;
1696       }
1697       else
1698       {
1699         if (fmt3_ins != NULL)
1700         {
1701           instr.integer =  fmt3_ins->immediate |
1702                           (fmt3_ins->source << 8) |
1703                           (fmt3_ins->address << 16) |
1704                           (fmt3_ins->opcode << 25);
1705         }
1706         else
1707         {
1708           instr.integer =  fmt1_ins->immediate |
1709                           (fmt1_ins->source << 8) |
1710                           (fmt1_ins->destination << 16) |
1711                           (fmt1_ins->ret << 24) |
1712                           (fmt1_ins->opcode << 25);
1713         }
1714       }
1715       aic_outb(p, (instr.integer & 0xff), SEQRAM);
1716       aic_outb(p, ((instr.integer >> 8) & 0xff), SEQRAM);
1717       aic_outb(p, ((instr.integer >> 16) & 0xff), SEQRAM);
1718       aic_outb(p, ((instr.integer >> 24) & 0xff), SEQRAM);
1719       udelay(10);
1720       break;
1721
1722     default:
1723       panic("aic7xxx: Unknown opcode encountered in sequencer program.");
1724       break;
1725   }
1726 }
1727
1728
1729 /*+F*************************************************************************
1730  * Function:
1731  *   aic7xxx_loadseq
1732  *
1733  * Description:
1734  *   Load the sequencer code into the controller memory.
1735  *-F*************************************************************************/
1736 static void
1737 aic7xxx_loadseq(struct aic7xxx_host *p)
1738 {
1739   struct sequencer_patch *cur_patch;
1740   int i;
1741   int downloaded;
1742   int skip_addr;
1743   unsigned char download_consts[4] = {0, 0, 0, 0};
1744
1745   if (aic7xxx_verbose & VERBOSE_PROBE)
1746   {
1747     printk(KERN_INFO "(scsi%d) Downloading sequencer code...", p->host_no);
1748   }
1749 #if 0
1750   download_consts[TMODE_NUMCMDS] = p->num_targetcmds;
1751 #endif
1752   download_consts[TMODE_NUMCMDS] = 0;
1753   cur_patch = &sequencer_patches[0];
1754   downloaded = 0;
1755   skip_addr = 0;
1756
1757   aic_outb(p, PERRORDIS|LOADRAM|FAILDIS|FASTMODE, SEQCTL);
1758   aic_outb(p, 0, SEQADDR0);
1759   aic_outb(p, 0, SEQADDR1);
1760
1761   for (i = 0; i < sizeof(seqprog) / 4;  i++)
1762   {
1763     if (aic7xxx_check_patch(p, &cur_patch, i, &skip_addr) == 0)
1764     {
1765       /* Skip this instruction for this configuration. */
1766       continue;
1767     }
1768     aic7xxx_download_instr(p, i, &download_consts[0]);
1769     downloaded++;
1770   }
1771
1772   aic_outb(p, 0, SEQADDR0);
1773   aic_outb(p, 0, SEQADDR1);
1774   aic_outb(p, FASTMODE | FAILDIS, SEQCTL);
1775   unpause_sequencer(p, TRUE);
1776   mdelay(1);
1777   pause_sequencer(p);
1778   aic_outb(p, FASTMODE, SEQCTL);
1779   if (aic7xxx_verbose & VERBOSE_PROBE)
1780   {
1781     printk(" %d instructions downloaded\n", downloaded);
1782   }
1783   if (aic7xxx_dump_sequencer)
1784     aic7xxx_print_sequencer(p, downloaded);
1785 }
1786
1787 /*+F*************************************************************************
1788  * Function:
1789  *   aic7xxx_print_sequencer
1790  *
1791  * Description:
1792  *   Print the contents of the sequencer memory to the screen.
1793  *-F*************************************************************************/
1794 static void
1795 aic7xxx_print_sequencer(struct aic7xxx_host *p, int downloaded)
1796 {
1797   int i, k, temp;
1798   
1799   aic_outb(p, PERRORDIS|LOADRAM|FAILDIS|FASTMODE, SEQCTL);
1800   aic_outb(p, 0, SEQADDR0);
1801   aic_outb(p, 0, SEQADDR1);
1802
1803   k = 0;
1804   for (i=0; i < downloaded; i++)
1805   {
1806     if ( k == 0 )
1807       printk("%03x: ", i);
1808     temp = aic_inb(p, SEQRAM);
1809     temp |= (aic_inb(p, SEQRAM) << 8);
1810     temp |= (aic_inb(p, SEQRAM) << 16);
1811     temp |= (aic_inb(p, SEQRAM) << 24);
1812     printk("%08x", temp);
1813     if ( ++k == 8 )
1814     {
1815       printk("\n");
1816       k = 0;
1817     }
1818     else
1819       printk(" ");
1820   }
1821   aic_outb(p, 0, SEQADDR0);
1822   aic_outb(p, 0, SEQADDR1);
1823   aic_outb(p, FASTMODE | FAILDIS, SEQCTL);
1824   unpause_sequencer(p, TRUE);
1825   mdelay(1);
1826   pause_sequencer(p);
1827   aic_outb(p, FASTMODE, SEQCTL);
1828   printk("\n");
1829 }
1830
1831 /*+F*************************************************************************
1832  * Function:
1833  *   aic7xxx_info
1834  *
1835  * Description:
1836  *   Return a string describing the driver.
1837  *-F*************************************************************************/
1838 static const char *
1839 aic7xxx_info(struct Scsi_Host *dooh)
1840 {
1841   static char buffer[256];
1842   char *bp;
1843   struct aic7xxx_host *p;
1844
1845   bp = &buffer[0];
1846   p = (struct aic7xxx_host *)dooh->hostdata;
1847   memset(bp, 0, sizeof(buffer));
1848   strcpy(bp, "Adaptec AHA274x/284x/294x (EISA/VLB/PCI-Fast SCSI) ");
1849   strcat(bp, AIC7XXX_C_VERSION);
1850   strcat(bp, "/");
1851   strcat(bp, AIC7XXX_H_VERSION);
1852   strcat(bp, "\n");
1853   strcat(bp, "       <");
1854   strcat(bp, board_names[p->board_name_index]);
1855   strcat(bp, ">");
1856
1857   return(bp);
1858 }
1859
1860 /*+F*************************************************************************
1861  * Function:
1862  *   aic7xxx_find_syncrate
1863  *
1864  * Description:
1865  *   Look up the valid period to SCSIRATE conversion in our table
1866  *-F*************************************************************************/
1867 static struct aic7xxx_syncrate *
1868 aic7xxx_find_syncrate(struct aic7xxx_host *p, unsigned int *period,
1869   unsigned int maxsync, unsigned char *options)
1870 {
1871   struct aic7xxx_syncrate *syncrate;
1872   int done = FALSE;
1873
1874   switch(*options)
1875   {
1876     case MSG_EXT_PPR_OPTION_DT_CRC:
1877     case MSG_EXT_PPR_OPTION_DT_UNITS:
1878       if(!(p->features & AHC_ULTRA3))
1879       {
1880         *options = 0;
1881         maxsync = max_t(unsigned int, maxsync, AHC_SYNCRATE_ULTRA2);
1882       }
1883       break;
1884     case MSG_EXT_PPR_OPTION_DT_CRC_QUICK:
1885     case MSG_EXT_PPR_OPTION_DT_UNITS_QUICK:
1886       if(!(p->features & AHC_ULTRA3))
1887       {
1888         *options = 0;
1889         maxsync = max_t(unsigned int, maxsync, AHC_SYNCRATE_ULTRA2);
1890       }
1891       else
1892       {
1893         /*
1894          * we don't support the Quick Arbitration variants of dual edge
1895          * clocking.  As it turns out, we want to send back the
1896          * same basic option, but without the QA attribute.
1897          * We know that we are responding because we would never set
1898          * these options ourself, we would only respond to them.
1899          */
1900         switch(*options)
1901         {
1902           case MSG_EXT_PPR_OPTION_DT_CRC_QUICK:
1903             *options = MSG_EXT_PPR_OPTION_DT_CRC;
1904             break;
1905           case MSG_EXT_PPR_OPTION_DT_UNITS_QUICK:
1906             *options = MSG_EXT_PPR_OPTION_DT_UNITS;
1907             break;
1908         }
1909       }
1910       break;
1911     default:
1912       *options = 0;
1913       maxsync = max_t(unsigned int, maxsync, AHC_SYNCRATE_ULTRA2);
1914       break;
1915   }
1916   syncrate = &aic7xxx_syncrates[maxsync];
1917   while ( (syncrate->rate[0] != NULL) &&
1918          (!(p->features & AHC_ULTRA2) || syncrate->sxfr_ultra2) )
1919   {
1920     if (*period <= syncrate->period) 
1921     {
1922       switch(*options)
1923       {
1924         case MSG_EXT_PPR_OPTION_DT_CRC:
1925         case MSG_EXT_PPR_OPTION_DT_UNITS:
1926           if(!(syncrate->sxfr_ultra2 & AHC_SYNCRATE_CRC))
1927           {
1928             done = TRUE;
1929             /*
1930              * oops, we went too low for the CRC/DualEdge signalling, so
1931              * clear the options byte
1932              */
1933             *options = 0;
1934             /*
1935              * We'll be sending a reply to this packet to set the options
1936              * properly, so unilaterally set the period as well.
1937              */
1938             *period = syncrate->period;
1939           }
1940           else
1941           {
1942             done = TRUE;
1943             if(syncrate == &aic7xxx_syncrates[maxsync])
1944             {
1945               *period = syncrate->period;
1946             }
1947           }
1948           break;
1949         default:
1950           if(!(syncrate->sxfr_ultra2 & AHC_SYNCRATE_CRC))
1951           {
1952             done = TRUE;
1953             if(syncrate == &aic7xxx_syncrates[maxsync])
1954             {
1955               *period = syncrate->period;
1956             }
1957           }
1958           break;
1959       }
1960       if(done)
1961       {
1962         break;
1963       }
1964     }
1965     syncrate++;
1966   }
1967   if ( (*period == 0) || (syncrate->rate[0] == NULL) ||
1968        ((p->features & AHC_ULTRA2) && (syncrate->sxfr_ultra2 == 0)) )
1969   {
1970     /*
1971      * Use async transfers for this target
1972      */
1973     *options = 0;
1974     *period = 255;
1975     syncrate = NULL;
1976   }
1977   return (syncrate);
1978 }
1979
1980
1981 /*+F*************************************************************************
1982  * Function:
1983  *   aic7xxx_find_period
1984  *
1985  * Description:
1986  *   Look up the valid SCSIRATE to period conversion in our table
1987  *-F*************************************************************************/
1988 static unsigned int
1989 aic7xxx_find_period(struct aic7xxx_host *p, unsigned int scsirate,
1990   unsigned int maxsync)
1991 {
1992   struct aic7xxx_syncrate *syncrate;
1993
1994   if (p->features & AHC_ULTRA2)
1995   {
1996     scsirate &= SXFR_ULTRA2;
1997   }
1998   else
1999   {
2000     scsirate &= SXFR;
2001   }
2002
2003   syncrate = &aic7xxx_syncrates[maxsync];
2004   while (syncrate->rate[0] != NULL)
2005   {
2006     if (p->features & AHC_ULTRA2)
2007     {
2008       if (syncrate->sxfr_ultra2 == 0)
2009         break;
2010       else if (scsirate == syncrate->sxfr_ultra2)
2011         return (syncrate->period);
2012       else if (scsirate == (syncrate->sxfr_ultra2 & ~AHC_SYNCRATE_CRC))
2013         return (syncrate->period);
2014     }
2015     else if (scsirate == (syncrate->sxfr & ~ULTRA_SXFR))
2016     {
2017       return (syncrate->period);
2018     }
2019     syncrate++;
2020   }
2021   return (0); /* async */
2022 }
2023
2024 /*+F*************************************************************************
2025  * Function:
2026  *   aic7xxx_validate_offset
2027  *
2028  * Description:
2029  *   Set a valid offset value for a particular card in use and transfer
2030  *   settings in use.
2031  *-F*************************************************************************/
2032 static void
2033 aic7xxx_validate_offset(struct aic7xxx_host *p,
2034   struct aic7xxx_syncrate *syncrate, unsigned int *offset, int wide)
2035 {
2036   unsigned int maxoffset;
2037
2038   /* Limit offset to what the card (and device) can do */
2039   if (syncrate == NULL)
2040   {
2041     maxoffset = 0;
2042   }
2043   else if (p->features & AHC_ULTRA2)
2044   {
2045     maxoffset = MAX_OFFSET_ULTRA2;
2046   }
2047   else
2048   {
2049     if (wide)
2050       maxoffset = MAX_OFFSET_16BIT;
2051     else
2052       maxoffset = MAX_OFFSET_8BIT;
2053   }
2054   *offset = min(*offset, maxoffset);
2055 }
2056
2057 /*+F*************************************************************************
2058  * Function:
2059  *   aic7xxx_set_syncrate
2060  *
2061  * Description:
2062  *   Set the actual syncrate down in the card and in our host structs
2063  *-F*************************************************************************/
2064 static void
2065 aic7xxx_set_syncrate(struct aic7xxx_host *p, struct aic7xxx_syncrate *syncrate,
2066     int target, int channel, unsigned int period, unsigned int offset,
2067     unsigned char options, unsigned int type, struct aic_dev_data *aic_dev)
2068 {
2069   unsigned char tindex;
2070   unsigned short target_mask;
2071   unsigned char lun, old_options;
2072   unsigned int old_period, old_offset;
2073
2074   tindex = target | (channel << 3);
2075   target_mask = 0x01 << tindex;
2076   lun = aic_inb(p, SCB_TCL) & 0x07;
2077
2078   if (syncrate == NULL)
2079   {
2080     period = 0;
2081     offset = 0;
2082   }
2083
2084   old_period = aic_dev->cur.period;
2085   old_offset = aic_dev->cur.offset;
2086   old_options = aic_dev->cur.options;
2087
2088   
2089   if (type & AHC_TRANS_CUR)
2090   {
2091     unsigned int scsirate;
2092
2093     scsirate = aic_inb(p, TARG_SCSIRATE + tindex);
2094     if (p->features & AHC_ULTRA2)
2095     {
2096       scsirate &= ~SXFR_ULTRA2;
2097       if (syncrate != NULL)
2098       {
2099         switch(options)
2100         {
2101           case MSG_EXT_PPR_OPTION_DT_UNITS:
2102             /*
2103              * mask off the CRC bit in the xfer settings
2104              */
2105             scsirate |= (syncrate->sxfr_ultra2 & ~AHC_SYNCRATE_CRC);
2106             break;
2107           default:
2108             scsirate |= syncrate->sxfr_ultra2;
2109             break;
2110         }
2111       }
2112       if (type & AHC_TRANS_ACTIVE)
2113       {
2114         aic_outb(p, offset, SCSIOFFSET);
2115       }
2116       aic_outb(p, offset, TARG_OFFSET + tindex);
2117     }
2118     else /* Not an Ultra2 controller */
2119     {
2120       scsirate &= ~(SXFR|SOFS);
2121       p->ultraenb &= ~target_mask;
2122       if (syncrate != NULL)
2123       {
2124         if (syncrate->sxfr & ULTRA_SXFR)
2125         {
2126           p->ultraenb |= target_mask;
2127         }
2128         scsirate |= (syncrate->sxfr & SXFR);
2129         scsirate |= (offset & SOFS);
2130       }
2131       if (type & AHC_TRANS_ACTIVE)
2132       {
2133         unsigned char sxfrctl0;
2134
2135         sxfrctl0 = aic_inb(p, SXFRCTL0);
2136         sxfrctl0 &= ~FAST20;
2137         if (p->ultraenb & target_mask)
2138           sxfrctl0 |= FAST20;
2139         aic_outb(p, sxfrctl0, SXFRCTL0);
2140       }
2141       aic_outb(p, p->ultraenb & 0xff, ULTRA_ENB);
2142       aic_outb(p, (p->ultraenb >> 8) & 0xff, ULTRA_ENB + 1 );
2143     }
2144     if (type & AHC_TRANS_ACTIVE)
2145     {
2146       aic_outb(p, scsirate, SCSIRATE);
2147     }
2148     aic_outb(p, scsirate, TARG_SCSIRATE + tindex);
2149     aic_dev->cur.period = period;
2150     aic_dev->cur.offset = offset;
2151     aic_dev->cur.options = options;
2152     if ( !(type & AHC_TRANS_QUITE) &&
2153          (aic7xxx_verbose & VERBOSE_NEGOTIATION) &&
2154          (aic_dev->flags & DEVICE_PRINT_DTR) )
2155     {
2156       if (offset)
2157       {
2158         int rate_mod = (scsirate & WIDEXFER) ? 1 : 0;
2159       
2160         printk(INFO_LEAD "Synchronous at %s Mbyte/sec, "
2161                "offset %d.\n", p->host_no, channel, target, lun,
2162                syncrate->rate[rate_mod], offset);
2163       }
2164       else
2165       {
2166         printk(INFO_LEAD "Using asynchronous transfers.\n",
2167                p->host_no, channel, target, lun);
2168       }
2169       aic_dev->flags &= ~DEVICE_PRINT_DTR;
2170     }
2171   }
2172
2173   if (type & AHC_TRANS_GOAL)
2174   {
2175     aic_dev->goal.period = period;
2176     aic_dev->goal.offset = offset;
2177     aic_dev->goal.options = options;
2178   }
2179
2180   if (type & AHC_TRANS_USER)
2181   {
2182     p->user[tindex].period = period;
2183     p->user[tindex].offset = offset;
2184     p->user[tindex].options = options;
2185   }
2186 }
2187
2188 /*+F*************************************************************************
2189  * Function:
2190  *   aic7xxx_set_width
2191  *
2192  * Description:
2193  *   Set the actual width down in the card and in our host structs
2194  *-F*************************************************************************/
2195 static void
2196 aic7xxx_set_width(struct aic7xxx_host *p, int target, int channel, int lun,
2197     unsigned int width, unsigned int type, struct aic_dev_data *aic_dev)
2198 {
2199   unsigned char tindex;
2200   unsigned short target_mask;
2201   unsigned int old_width;
2202
2203   tindex = target | (channel << 3);
2204   target_mask = 1 << tindex;
2205   
2206   old_width = aic_dev->cur.width;
2207
2208   if (type & AHC_TRANS_CUR) 
2209   {
2210     unsigned char scsirate;
2211
2212     scsirate = aic_inb(p, TARG_SCSIRATE + tindex);
2213
2214     scsirate &= ~WIDEXFER;
2215     if (width == MSG_EXT_WDTR_BUS_16_BIT)
2216       scsirate |= WIDEXFER;
2217
2218     aic_outb(p, scsirate, TARG_SCSIRATE + tindex);
2219
2220     if (type & AHC_TRANS_ACTIVE)
2221       aic_outb(p, scsirate, SCSIRATE);
2222
2223     aic_dev->cur.width = width;
2224
2225     if ( !(type & AHC_TRANS_QUITE) &&
2226           (aic7xxx_verbose & VERBOSE_NEGOTIATION2) && 
2227           (aic_dev->flags & DEVICE_PRINT_DTR) )
2228     {
2229       printk(INFO_LEAD "Using %s transfers\n", p->host_no, channel, target,
2230         lun, (scsirate & WIDEXFER) ? "Wide(16bit)" : "Narrow(8bit)" );
2231     }
2232   }
2233
2234   if (type & AHC_TRANS_GOAL)
2235     aic_dev->goal.width = width;
2236   if (type & AHC_TRANS_USER)
2237     p->user[tindex].width = width;
2238
2239   if (aic_dev->goal.offset)
2240   {
2241     if (p->features & AHC_ULTRA2)
2242     {
2243       aic_dev->goal.offset = MAX_OFFSET_ULTRA2;
2244     }
2245     else if (width == MSG_EXT_WDTR_BUS_16_BIT)
2246     {
2247       aic_dev->goal.offset = MAX_OFFSET_16BIT;
2248     }
2249     else
2250     {
2251       aic_dev->goal.offset = MAX_OFFSET_8BIT;
2252     }
2253   }
2254 }
2255       
2256 /*+F*************************************************************************
2257  * Function:
2258  *   scbq_init
2259  *
2260  * Description:
2261  *   SCB queue initialization.
2262  *
2263  *-F*************************************************************************/
2264 static void
2265 scbq_init(volatile scb_queue_type *queue)
2266 {
2267   queue->head = NULL;
2268   queue->tail = NULL;
2269 }
2270
2271 /*+F*************************************************************************
2272  * Function:
2273  *   scbq_insert_head
2274  *
2275  * Description:
2276  *   Add an SCB to the head of the list.
2277  *
2278  *-F*************************************************************************/
2279 static inline void
2280 scbq_insert_head(volatile scb_queue_type *queue, struct aic7xxx_scb *scb)
2281 {
2282   scb->q_next = queue->head;
2283   queue->head = scb;
2284   if (queue->tail == NULL)       /* If list was empty, update tail. */
2285     queue->tail = queue->head;
2286 }
2287
2288 /*+F*************************************************************************
2289  * Function:
2290  *   scbq_remove_head
2291  *
2292  * Description:
2293  *   Remove an SCB from the head of the list.
2294  *
2295  *-F*************************************************************************/
2296 static inline struct aic7xxx_scb *
2297 scbq_remove_head(volatile scb_queue_type *queue)
2298 {
2299   struct aic7xxx_scb * scbp;
2300
2301   scbp = queue->head;
2302   if (queue->head != NULL)
2303     queue->head = queue->head->q_next;
2304   if (queue->head == NULL)       /* If list is now empty, update tail. */
2305     queue->tail = NULL;
2306   return(scbp);
2307 }
2308
2309 /*+F*************************************************************************
2310  * Function:
2311  *   scbq_remove
2312  *
2313  * Description:
2314  *   Removes an SCB from the list.
2315  *
2316  *-F*************************************************************************/
2317 static inline void
2318 scbq_remove(volatile scb_queue_type *queue, struct aic7xxx_scb *scb)
2319 {
2320   if (queue->head == scb)
2321   {
2322     /* At beginning of queue, remove from head. */
2323     scbq_remove_head(queue);
2324   }
2325   else
2326   {
2327     struct aic7xxx_scb *curscb = queue->head;
2328
2329     /*
2330      * Search until the next scb is the one we're looking for, or
2331      * we run out of queue.
2332      */
2333     while ((curscb != NULL) && (curscb->q_next != scb))
2334     {
2335       curscb = curscb->q_next;
2336     }
2337     if (curscb != NULL)
2338     {
2339       /* Found it. */
2340       curscb->q_next = scb->q_next;
2341       if (scb->q_next == NULL)
2342       {
2343         /* Update the tail when removing the tail. */
2344         queue->tail = curscb;
2345       }
2346     }
2347   }
2348 }
2349
2350 /*+F*************************************************************************
2351  * Function:
2352  *   scbq_insert_tail
2353  *
2354  * Description:
2355  *   Add an SCB at the tail of the list.
2356  *
2357  *-F*************************************************************************/
2358 static inline void
2359 scbq_insert_tail(volatile scb_queue_type *queue, struct aic7xxx_scb *scb)
2360 {
2361   scb->q_next = NULL;
2362   if (queue->tail != NULL)       /* Add the scb at the end of the list. */
2363     queue->tail->q_next = scb;
2364   queue->tail = scb;             /* Update the tail. */
2365   if (queue->head == NULL)       /* If list was empty, update head. */
2366     queue->head = queue->tail;
2367 }
2368
2369 /*+F*************************************************************************
2370  * Function:
2371  *   aic7xxx_match_scb
2372  *
2373  * Description:
2374  *   Checks to see if an scb matches the target/channel as specified.
2375  *   If target is ALL_TARGETS (-1), then we're looking for any device
2376  *   on the specified channel; this happens when a channel is going
2377  *   to be reset and all devices on that channel must be aborted.
2378  *-F*************************************************************************/
2379 static int
2380 aic7xxx_match_scb(struct aic7xxx_host *p, struct aic7xxx_scb *scb,
2381     int target, int channel, int lun, unsigned char tag)
2382 {
2383   int targ = (scb->hscb->target_channel_lun >> 4) & 0x0F;
2384   int chan = (scb->hscb->target_channel_lun >> 3) & 0x01;
2385   int slun = scb->hscb->target_channel_lun & 0x07;
2386   int match;
2387
2388   match = ((chan == channel) || (channel == ALL_CHANNELS));
2389   if (match != 0)
2390     match = ((targ == target) || (target == ALL_TARGETS));
2391   if (match != 0)
2392     match = ((lun == slun) || (lun == ALL_LUNS));
2393   if (match != 0)
2394     match = ((tag == scb->hscb->tag) || (tag == SCB_LIST_NULL));
2395
2396   return (match);
2397 }
2398
2399 /*+F*************************************************************************
2400  * Function:
2401  *   aic7xxx_add_curscb_to_free_list
2402  *
2403  * Description:
2404  *   Adds the current scb (in SCBPTR) to the list of free SCBs.
2405  *-F*************************************************************************/
2406 static void
2407 aic7xxx_add_curscb_to_free_list(struct aic7xxx_host *p)
2408 {
2409   /*
2410    * Invalidate the tag so that aic7xxx_find_scb doesn't think
2411    * it's active
2412    */
2413   aic_outb(p, SCB_LIST_NULL, SCB_TAG);
2414   aic_outb(p, 0, SCB_CONTROL);
2415
2416   aic_outb(p, aic_inb(p, FREE_SCBH), SCB_NEXT);
2417   aic_outb(p, aic_inb(p, SCBPTR), FREE_SCBH);
2418 }
2419
2420 /*+F*************************************************************************
2421  * Function:
2422  *   aic7xxx_rem_scb_from_disc_list
2423  *
2424  * Description:
2425  *   Removes the current SCB from the disconnected list and adds it
2426  *   to the free list.
2427  *-F*************************************************************************/
2428 static unsigned char
2429 aic7xxx_rem_scb_from_disc_list(struct aic7xxx_host *p, unsigned char scbptr,
2430                                unsigned char prev)
2431 {
2432   unsigned char next;
2433
2434   aic_outb(p, scbptr, SCBPTR);
2435   next = aic_inb(p, SCB_NEXT);
2436   aic7xxx_add_curscb_to_free_list(p);
2437
2438   if (prev != SCB_LIST_NULL)
2439   {
2440     aic_outb(p, prev, SCBPTR);
2441     aic_outb(p, next, SCB_NEXT);
2442   }
2443   else
2444   {
2445     aic_outb(p, next, DISCONNECTED_SCBH);
2446   }
2447
2448   return next;
2449 }
2450
2451 /*+F*************************************************************************
2452  * Function:
2453  *   aic7xxx_busy_target
2454  *
2455  * Description:
2456  *   Set the specified target busy.
2457  *-F*************************************************************************/
2458 static inline void
2459 aic7xxx_busy_target(struct aic7xxx_host *p, struct aic7xxx_scb *scb)
2460 {
2461   p->untagged_scbs[scb->hscb->target_channel_lun] = scb->hscb->tag;
2462 }
2463
2464 /*+F*************************************************************************
2465  * Function:
2466  *   aic7xxx_index_busy_target
2467  *
2468  * Description:
2469  *   Returns the index of the busy target, and optionally sets the
2470  *   target inactive.
2471  *-F*************************************************************************/
2472 static inline unsigned char
2473 aic7xxx_index_busy_target(struct aic7xxx_host *p, unsigned char tcl,
2474     int unbusy)
2475 {
2476   unsigned char busy_scbid;
2477
2478   busy_scbid = p->untagged_scbs[tcl];
2479   if (unbusy)
2480   {
2481     p->untagged_scbs[tcl] = SCB_LIST_NULL;
2482   }
2483   return (busy_scbid);
2484 }
2485
2486 /*+F*************************************************************************
2487  * Function:
2488  *   aic7xxx_find_scb
2489  *
2490  * Description:
2491  *   Look through the SCB array of the card and attempt to find the
2492  *   hardware SCB that corresponds to the passed in SCB.  Return
2493  *   SCB_LIST_NULL if unsuccessful.  This routine assumes that the
2494  *   card is already paused.
2495  *-F*************************************************************************/
2496 static unsigned char
2497 aic7xxx_find_scb(struct aic7xxx_host *p, struct aic7xxx_scb *scb)
2498 {
2499   unsigned char saved_scbptr;
2500   unsigned char curindex;
2501
2502   saved_scbptr = aic_inb(p, SCBPTR);
2503   curindex = 0;
2504   for (curindex = 0; curindex < p->scb_data->maxhscbs; curindex++)
2505   {
2506     aic_outb(p, curindex, SCBPTR);
2507     if (aic_inb(p, SCB_TAG) == scb->hscb->tag)
2508     {
2509       break;
2510     }
2511   }
2512   aic_outb(p, saved_scbptr, SCBPTR);
2513   if (curindex >= p->scb_data->maxhscbs)
2514   {
2515     curindex = SCB_LIST_NULL;
2516   }
2517
2518   return (curindex);
2519 }
2520
2521 /*+F*************************************************************************
2522  * Function:
2523  *   aic7xxx_allocate_scb
2524  *
2525  * Description:
2526  *   Get an SCB from the free list or by allocating a new one.
2527  *-F*************************************************************************/
2528 static int
2529 aic7xxx_allocate_scb(struct aic7xxx_host *p)
2530 {
2531   struct aic7xxx_scb   *scbp = NULL;
2532   int scb_size = (sizeof (struct hw_scatterlist) * AIC7XXX_MAX_SG) + 12 + 6;
2533   int i;
2534   int step = PAGE_SIZE / 1024;
2535   unsigned long scb_count = 0;
2536   struct hw_scatterlist *hsgp;
2537   struct aic7xxx_scb *scb_ap;
2538   struct aic7xxx_scb_dma *scb_dma;
2539   unsigned char *bufs;
2540
2541   if (p->scb_data->numscbs < p->scb_data->maxscbs)
2542   {
2543     /*
2544      * Calculate the optimal number of SCBs to allocate.
2545      *
2546      * NOTE: This formula works because the sizeof(sg_array) is always
2547      * 1024.  Therefore, scb_size * i would always be > PAGE_SIZE *
2548      * (i/step).  The (i-1) allows the left hand side of the equation
2549      * to grow into the right hand side to a point of near perfect
2550      * efficiency since scb_size * (i -1) is growing slightly faster
2551      * than the right hand side.  If the number of SG array elements
2552      * is changed, this function may not be near so efficient any more.
2553      *
2554      * Since the DMA'able buffers are now allocated in a separate
2555      * chunk this algorithm has been modified to match.  The '12'
2556      * and '6' factors in scb_size are for the DMA'able command byte
2557      * and sensebuffers respectively.  -DaveM
2558      */
2559     for ( i=step;; i *= 2 )
2560     {
2561       if ( (scb_size * (i-1)) >= ( (PAGE_SIZE * (i/step)) - 64 ) )
2562       {
2563         i /= 2;
2564         break;
2565       }
2566     }
2567     scb_count = min( (i-1), p->scb_data->maxscbs - p->scb_data->numscbs);
2568     scb_ap = (struct aic7xxx_scb *)kmalloc(sizeof (struct aic7xxx_scb) * scb_count
2569                                            + sizeof(struct aic7xxx_scb_dma), GFP_ATOMIC);
2570     if (scb_ap == NULL)
2571       return(0);
2572     scb_dma = (struct aic7xxx_scb_dma *)&scb_ap[scb_count];
2573     hsgp = (struct hw_scatterlist *)
2574       pci_alloc_consistent(p->pdev, scb_size * scb_count,
2575                            &scb_dma->dma_address);
2576     if (hsgp == NULL)
2577     {
2578       kfree(scb_ap);
2579       return(0);
2580     }
2581     bufs = (unsigned char *)&hsgp[scb_count * AIC7XXX_MAX_SG];
2582 #ifdef AIC7XXX_VERBOSE_DEBUGGING
2583     if (aic7xxx_verbose > 0xffff)
2584     {
2585       if (p->scb_data->numscbs == 0)
2586         printk(INFO_LEAD "Allocating initial %ld SCB structures.\n",
2587           p->host_no, -1, -1, -1, scb_count);
2588       else
2589         printk(INFO_LEAD "Allocating %ld additional SCB structures.\n",
2590           p->host_no, -1, -1, -1, scb_count);
2591     }
2592 #endif
2593     memset(scb_ap, 0, sizeof (struct aic7xxx_scb) * scb_count);
2594     scb_dma->dma_offset = (unsigned long)scb_dma->dma_address
2595                           - (unsigned long)hsgp;
2596     scb_dma->dma_len = scb_size * scb_count;
2597     for (i=0; i < scb_count; i++)
2598     {
2599       scbp = &scb_ap[i];
2600       scbp->hscb = &p->scb_data->hscbs[p->scb_data->numscbs];
2601       scbp->sg_list = &hsgp[i * AIC7XXX_MAX_SG];
2602       scbp->sense_cmd = bufs;
2603       scbp->cmnd = bufs + 6;
2604       bufs += 12 + 6;
2605       scbp->scb_dma = scb_dma;
2606       memset(scbp->hscb, 0, sizeof(struct aic7xxx_hwscb));
2607       scbp->hscb->tag = p->scb_data->numscbs;
2608       /*
2609        * Place in the scb array; never is removed
2610        */
2611       p->scb_data->scb_array[p->scb_data->numscbs++] = scbp;
2612       scbq_insert_tail(&p->scb_data->free_scbs, scbp);
2613     }
2614     scbp->kmalloc_ptr = scb_ap;
2615   }
2616   return(scb_count);
2617 }
2618
2619 /*+F*************************************************************************
2620  * Function:
2621  *   aic7xxx_queue_cmd_complete
2622  *
2623  * Description:
2624  *   Due to race conditions present in the SCSI subsystem, it is easier
2625  *   to queue completed commands, then call scsi_done() on them when
2626  *   we're finished.  This function queues the completed commands.
2627  *-F*************************************************************************/
2628 static void
2629 aic7xxx_queue_cmd_complete(struct aic7xxx_host *p, struct scsi_cmnd *cmd)
2630 {
2631   aic7xxx_position(cmd) = SCB_LIST_NULL;
2632   cmd->host_scribble = (char *)p->completeq.head;
2633   p->completeq.head = cmd;
2634 }
2635
2636 /*+F*************************************************************************
2637  * Function:
2638  *   aic7xxx_done_cmds_complete
2639  *
2640  * Description:
2641  *   Process the completed command queue.
2642  *-F*************************************************************************/
2643 static void aic7xxx_done_cmds_complete(struct aic7xxx_host *p)
2644 {
2645         struct scsi_cmnd *cmd;
2646
2647         while (p->completeq.head != NULL) {
2648                 cmd = p->completeq.head;
2649                 p->completeq.head = (struct scsi_Cmnd *) cmd->host_scribble;
2650                 cmd->host_scribble = NULL;
2651                 cmd->scsi_done(cmd);
2652         }
2653 }
2654
2655 /*+F*************************************************************************
2656  * Function:
2657  *   aic7xxx_free_scb
2658  *
2659  * Description:
2660  *   Free the scb and insert into the free scb list.
2661  *-F*************************************************************************/
2662 static void
2663 aic7xxx_free_scb(struct aic7xxx_host *p, struct aic7xxx_scb *scb)
2664 {
2665
2666   scb->flags = SCB_FREE;
2667   scb->cmd = NULL;
2668   scb->sg_count = 0;
2669   scb->sg_length = 0;
2670   scb->tag_action = 0;
2671   scb->hscb->control = 0;
2672   scb->hscb->target_status = 0;
2673   scb->hscb->target_channel_lun = SCB_LIST_NULL;
2674
2675   scbq_insert_head(&p->scb_data->free_scbs, scb);
2676 }
2677
2678 /*+F*************************************************************************
2679  * Function:
2680  *   aic7xxx_done
2681  *
2682  * Description:
2683  *   Calls the higher level scsi done function and frees the scb.
2684  *-F*************************************************************************/
2685 static void
2686 aic7xxx_done(struct aic7xxx_host *p, struct aic7xxx_scb *scb)
2687 {
2688         struct scsi_cmnd *cmd = scb->cmd;
2689         struct aic_dev_data *aic_dev = cmd->device->hostdata;
2690         int tindex = TARGET_INDEX(cmd);
2691         struct aic7xxx_scb *scbp;
2692         unsigned char queue_depth;
2693
2694   if (cmd->use_sg > 1)
2695   {
2696     struct scatterlist *sg;
2697
2698     sg = (struct scatterlist *)cmd->request_buffer;
2699     pci_unmap_sg(p->pdev, sg, cmd->use_sg, cmd->sc_data_direction);
2700   }
2701   else if (cmd->request_bufflen)
2702     pci_unmap_single(p->pdev, aic7xxx_mapping(cmd),
2703                      cmd->request_bufflen,
2704                      cmd->sc_data_direction);
2705   if (scb->flags & SCB_SENSE)
2706   {
2707     pci_unmap_single(p->pdev,
2708                      le32_to_cpu(scb->sg_list[0].address),
2709                      sizeof(cmd->sense_buffer),
2710                      PCI_DMA_FROMDEVICE);
2711   }
2712   if (scb->flags & SCB_RECOVERY_SCB)
2713   {
2714     p->flags &= ~AHC_ABORT_PENDING;
2715   }
2716   if (scb->flags & (SCB_RESET|SCB_ABORT))
2717   {
2718     cmd->result |= (DID_RESET << 16);
2719   }
2720
2721   if ((scb->flags & SCB_MSGOUT_BITS) != 0)
2722   {
2723     unsigned short mask;
2724     int message_error = FALSE;
2725
2726     mask = 0x01 << tindex;
2727  
2728     /*
2729      * Check to see if we get an invalid message or a message error
2730      * after failing to negotiate a wide or sync transfer message.
2731      */
2732     if ((scb->flags & SCB_SENSE) && 
2733           ((scb->cmd->sense_buffer[12] == 0x43) ||  /* INVALID_MESSAGE */
2734           (scb->cmd->sense_buffer[12] == 0x49))) /* MESSAGE_ERROR  */
2735     {
2736       message_error = TRUE;
2737     }
2738
2739     if (scb->flags & SCB_MSGOUT_WDTR)
2740     {
2741       if (message_error)
2742       {
2743         if ( (aic7xxx_verbose & VERBOSE_NEGOTIATION2) &&
2744              (aic_dev->flags & DEVICE_PRINT_DTR) )
2745         {
2746           printk(INFO_LEAD "Device failed to complete Wide Negotiation "
2747             "processing and\n", p->host_no, CTL_OF_SCB(scb));
2748           printk(INFO_LEAD "returned a sense error code for invalid message, "
2749             "disabling future\n", p->host_no, CTL_OF_SCB(scb));
2750           printk(INFO_LEAD "Wide negotiation to this device.\n", p->host_no,
2751             CTL_OF_SCB(scb));
2752         }
2753         aic_dev->needwdtr = aic_dev->needwdtr_copy = 0;
2754       }
2755     }
2756     if (scb->flags & SCB_MSGOUT_SDTR)
2757     {
2758       if (message_error)
2759       {
2760         if ( (aic7xxx_verbose & VERBOSE_NEGOTIATION2) &&
2761              (aic_dev->flags & DEVICE_PRINT_DTR) )
2762         {
2763           printk(INFO_LEAD "Device failed to complete Sync Negotiation "
2764             "processing and\n", p->host_no, CTL_OF_SCB(scb));
2765           printk(INFO_LEAD "returned a sense error code for invalid message, "
2766             "disabling future\n", p->host_no, CTL_OF_SCB(scb));
2767           printk(INFO_LEAD "Sync negotiation to this device.\n", p->host_no,
2768             CTL_OF_SCB(scb));
2769           aic_dev->flags &= ~DEVICE_PRINT_DTR;
2770         }
2771         aic_dev->needsdtr = aic_dev->needsdtr_copy = 0;
2772       }
2773     }
2774     if (scb->flags & SCB_MSGOUT_PPR)
2775     {
2776       if(message_error)
2777       {
2778         if ( (aic7xxx_verbose & VERBOSE_NEGOTIATION2) &&
2779              (aic_dev->flags & DEVICE_PRINT_DTR) )
2780         {
2781           printk(INFO_LEAD "Device failed to complete Parallel Protocol "
2782             "Request processing and\n", p->host_no, CTL_OF_SCB(scb));
2783           printk(INFO_LEAD "returned a sense error code for invalid message, "
2784             "disabling future\n", p->host_no, CTL_OF_SCB(scb));
2785           printk(INFO_LEAD "Parallel Protocol Request negotiation to this "
2786             "device.\n", p->host_no, CTL_OF_SCB(scb));
2787         }
2788         /*
2789          * Disable PPR negotiation and revert back to WDTR and SDTR setup
2790          */
2791         aic_dev->needppr = aic_dev->needppr_copy = 0;
2792         aic_dev->needsdtr = aic_dev->needsdtr_copy = 1;
2793         aic_dev->needwdtr = aic_dev->needwdtr_copy = 1;
2794       }
2795     }
2796   }
2797
2798   queue_depth = aic_dev->temp_q_depth;
2799   if (queue_depth >= aic_dev->active_cmds)
2800   {
2801     scbp = scbq_remove_head(&aic_dev->delayed_scbs);
2802     if (scbp)
2803     {
2804       if (queue_depth == 1)
2805       {
2806         /*
2807          * Give extra preference to untagged devices, such as CD-R devices
2808          * This makes it more likely that a drive *won't* stuff up while
2809          * waiting on data at a critical time, such as CD-R writing and
2810          * audio CD ripping operations.  Should also benefit tape drives.
2811          */
2812         scbq_insert_head(&p->waiting_scbs, scbp);
2813       }
2814       else
2815       {
2816         scbq_insert_tail(&p->waiting_scbs, scbp);
2817       }
2818 #ifdef AIC7XXX_VERBOSE_DEBUGGING
2819       if (aic7xxx_verbose > 0xffff)
2820         printk(INFO_LEAD "Moving SCB from delayed to waiting queue.\n",
2821                p->host_no, CTL_OF_SCB(scbp));
2822 #endif
2823       if (queue_depth > aic_dev->active_cmds)
2824       {
2825         scbp = scbq_remove_head(&aic_dev->delayed_scbs);
2826         if (scbp)
2827           scbq_insert_tail(&p->waiting_scbs, scbp);
2828       }
2829     }
2830   }
2831   if (!(scb->tag_action))
2832   {
2833     aic7xxx_index_busy_target(p, scb->hscb->target_channel_lun,
2834                               /* unbusy */ TRUE);
2835     if (cmd->device->simple_tags)
2836     {
2837       aic_dev->temp_q_depth = aic_dev->max_q_depth;
2838     }
2839   }
2840   if(scb->flags & SCB_DTR_SCB)
2841   {
2842     aic_dev->dtr_pending = 0;
2843   }
2844   aic_dev->active_cmds--;
2845   p->activescbs--;
2846
2847   if ((scb->sg_length >= 512) && (((cmd->result >> 16) & 0xf) == DID_OK))
2848   {
2849     long *ptr;
2850     int x, i;
2851
2852
2853     if (rq_data_dir(cmd->request) == WRITE)
2854     {
2855       aic_dev->w_total++;
2856       ptr = aic_dev->w_bins;
2857     }
2858     else
2859     {
2860       aic_dev->r_total++;
2861       ptr = aic_dev->r_bins;
2862     }
2863     if(cmd->device->simple_tags && cmd->request->cmd_flags & REQ_HARDBARRIER)
2864     {
2865       aic_dev->barrier_total++;
2866       if(scb->tag_action == MSG_ORDERED_Q_TAG)
2867         aic_dev->ordered_total++;
2868     }
2869     x = scb->sg_length;
2870     x >>= 10;
2871     for(i=0; i<6; i++)
2872     {
2873       x >>= 2;
2874       if(!x) {
2875         ptr[i]++;
2876         break;
2877       }
2878     }
2879     if(i == 6 && x)
2880       ptr[5]++;
2881   }
2882   aic7xxx_free_scb(p, scb);
2883   aic7xxx_queue_cmd_complete(p, cmd);
2884
2885 }
2886
2887 /*+F*************************************************************************
2888  * Function:
2889  *   aic7xxx_run_done_queue
2890  *
2891  * Description:
2892  *   Calls the aic7xxx_done() for the scsi_cmnd of each scb in the
2893  *   aborted list, and adds each scb to the free list.  If complete
2894  *   is TRUE, we also process the commands complete list.
2895  *-F*************************************************************************/
2896 static void
2897 aic7xxx_run_done_queue(struct aic7xxx_host *p, /*complete*/ int complete)
2898 {
2899   struct aic7xxx_scb *scb;
2900   int i, found = 0;
2901
2902   for (i = 0; i < p->scb_data->numscbs; i++)
2903   {
2904     scb = p->scb_data->scb_array[i];
2905     if (scb->flags & SCB_QUEUED_FOR_DONE)
2906     {
2907       if (scb->flags & SCB_QUEUE_FULL)
2908       {
2909         scb->cmd->result = QUEUE_FULL << 1;
2910       }
2911       else
2912       {
2913         if (aic7xxx_verbose & (VERBOSE_ABORT_PROCESS | VERBOSE_RESET_PROCESS))
2914           printk(INFO_LEAD "Aborting scb %d\n",
2915                p->host_no, CTL_OF_SCB(scb), scb->hscb->tag);
2916         /*
2917          * Clear any residual information since the normal aic7xxx_done() path
2918          * doesn't touch the residuals.
2919          */
2920         scb->hscb->residual_SG_segment_count = 0;
2921         scb->hscb->residual_data_count[0] = 0;
2922         scb->hscb->residual_data_count[1] = 0;
2923         scb->hscb->residual_data_count[2] = 0;
2924       }
2925       found++;
2926       aic7xxx_done(p, scb);
2927     }
2928   }
2929   if (aic7xxx_verbose & (VERBOSE_ABORT_RETURN | VERBOSE_RESET_RETURN))
2930   {
2931     printk(INFO_LEAD "%d commands found and queued for "
2932         "completion.\n", p->host_no, -1, -1, -1, found);
2933   }
2934   if (complete)
2935   {
2936     aic7xxx_done_cmds_complete(p);
2937   }
2938 }
2939
2940 /*+F*************************************************************************
2941  * Function:
2942  *   aic7xxx_abort_waiting_scb
2943  *
2944  * Description:
2945  *   Manipulate the waiting for selection list and return the
2946  *   scb that follows the one that we remove.
2947  *-F*************************************************************************/
2948 static unsigned char
2949 aic7xxx_abort_waiting_scb(struct aic7xxx_host *p, struct aic7xxx_scb *scb,
2950     unsigned char scbpos, unsigned char prev)
2951 {
2952   unsigned char curscb, next;
2953
2954   /*
2955    * Select the SCB we want to abort and pull the next pointer out of it.
2956    */
2957   curscb = aic_inb(p, SCBPTR);
2958   aic_outb(p, scbpos, SCBPTR);
2959   next = aic_inb(p, SCB_NEXT);
2960
2961   aic7xxx_add_curscb_to_free_list(p);
2962
2963   /*
2964    * Update the waiting list
2965    */
2966   if (prev == SCB_LIST_NULL)
2967   {
2968     /*
2969      * First in the list
2970      */
2971     aic_outb(p, next, WAITING_SCBH);
2972   }
2973   else
2974   {
2975     /*
2976      * Select the scb that pointed to us and update its next pointer.
2977      */
2978     aic_outb(p, prev, SCBPTR);
2979     aic_outb(p, next, SCB_NEXT);
2980   }
2981   /*
2982    * Point us back at the original scb position and inform the SCSI
2983    * system that the command has been aborted.
2984    */
2985   aic_outb(p, curscb, SCBPTR);
2986   return (next);
2987 }
2988
2989 /*+F*************************************************************************
2990  * Function:
2991  *   aic7xxx_search_qinfifo
2992  *
2993  * Description:
2994  *   Search the queue-in FIFO for matching SCBs and conditionally
2995  *   requeue.  Returns the number of matching SCBs.
2996  *-F*************************************************************************/
2997 static int
2998 aic7xxx_search_qinfifo(struct aic7xxx_host *p, int target, int channel,
2999     int lun, unsigned char tag, int flags, int requeue,
3000     volatile scb_queue_type *queue)
3001 {
3002   int      found;
3003   unsigned char qinpos, qintail;
3004   struct aic7xxx_scb *scbp;
3005
3006   found = 0;
3007   qinpos = aic_inb(p, QINPOS);
3008   qintail = p->qinfifonext;
3009
3010   p->qinfifonext = qinpos;
3011
3012   while (qinpos != qintail)
3013   {
3014     scbp = p->scb_data->scb_array[p->qinfifo[qinpos++]];
3015     if (aic7xxx_match_scb(p, scbp, target, channel, lun, tag))
3016     {
3017        /*
3018         * We found an scb that needs to be removed.
3019         */
3020        if (requeue && (queue != NULL))
3021        {
3022          if (scbp->flags & SCB_WAITINGQ)
3023          {
3024            scbq_remove(queue, scbp);
3025            scbq_remove(&p->waiting_scbs, scbp);
3026            scbq_remove(&AIC_DEV(scbp->cmd)->delayed_scbs, scbp);
3027            AIC_DEV(scbp->cmd)->active_cmds++;
3028            p->activescbs++;
3029          }
3030          scbq_insert_tail(queue, scbp);
3031          AIC_DEV(scbp->cmd)->active_cmds--;
3032          p->activescbs--;
3033          scbp->flags |= SCB_WAITINGQ;
3034          if ( !(scbp->tag_action & TAG_ENB) )
3035          {
3036            aic7xxx_index_busy_target(p, scbp->hscb->target_channel_lun,
3037              TRUE);
3038          }
3039        }
3040        else if (requeue)
3041        {
3042          p->qinfifo[p->qinfifonext++] = scbp->hscb->tag;
3043        }
3044        else
3045        {
3046         /*
3047          * Preserve any SCB_RECOVERY_SCB flags on this scb then set the
3048          * flags we were called with, presumeably so aic7xxx_run_done_queue
3049          * can find this scb
3050          */
3051          scbp->flags = flags | (scbp->flags & SCB_RECOVERY_SCB);
3052          if (aic7xxx_index_busy_target(p, scbp->hscb->target_channel_lun,
3053                                        FALSE) == scbp->hscb->tag)
3054          {
3055            aic7xxx_index_busy_target(p, scbp->hscb->target_channel_lun,
3056              TRUE);
3057          }
3058        }
3059        found++;
3060     }
3061     else
3062     {
3063       p->qinfifo[p->qinfifonext++] = scbp->hscb->tag;
3064     }
3065   }
3066   /*
3067    * Now that we've done the work, clear out any left over commands in the
3068    * qinfifo and update the KERNEL_QINPOS down on the card.
3069    *
3070    *  NOTE: This routine expect the sequencer to already be paused when
3071    *        it is run....make sure it's that way!
3072    */
3073   qinpos = p->qinfifonext;
3074   while(qinpos != qintail)
3075   {
3076     p->qinfifo[qinpos++] = SCB_LIST_NULL;
3077   }
3078   if (p->features & AHC_QUEUE_REGS)
3079     aic_outb(p, p->qinfifonext, HNSCB_QOFF);
3080   else
3081     aic_outb(p, p->qinfifonext, KERNEL_QINPOS);
3082
3083   return (found);
3084 }
3085
3086 /*+F*************************************************************************
3087  * Function:
3088  *   aic7xxx_scb_on_qoutfifo
3089  *
3090  * Description:
3091  *   Is the scb that was passed to us currently on the qoutfifo?
3092  *-F*************************************************************************/
3093 static int
3094 aic7xxx_scb_on_qoutfifo(struct aic7xxx_host *p, struct aic7xxx_scb *scb)
3095 {
3096   int i=0;
3097
3098   while(p->qoutfifo[(p->qoutfifonext + i) & 0xff ] != SCB_LIST_NULL)
3099   {
3100     if(p->qoutfifo[(p->qoutfifonext + i) & 0xff ] == scb->hscb->tag)
3101       return TRUE;
3102     else
3103       i++;
3104   }
3105   return FALSE;
3106 }
3107
3108
3109 /*+F*************************************************************************
3110  * Function:
3111  *   aic7xxx_reset_device
3112  *
3113  * Description:
3114  *   The device at the given target/channel has been reset.  Abort
3115  *   all active and queued scbs for that target/channel.  This function
3116  *   need not worry about linked next pointers because if was a MSG_ABORT_TAG
3117  *   then we had a tagged command (no linked next), if it was MSG_ABORT or
3118  *   MSG_BUS_DEV_RESET then the device won't know about any commands any more
3119  *   and no busy commands will exist, and if it was a bus reset, then nothing
3120  *   knows about any linked next commands any more.  In all cases, we don't
3121  *   need to worry about the linked next or busy scb, we just need to clear
3122  *   them.
3123  *-F*************************************************************************/
3124 static void
3125 aic7xxx_reset_device(struct aic7xxx_host *p, int target, int channel,
3126                      int lun, unsigned char tag)
3127 {
3128   struct aic7xxx_scb *scbp, *prev_scbp;
3129   struct scsi_device *sd;
3130   unsigned char active_scb, tcl, scb_tag;
3131   int i = 0, init_lists = FALSE;
3132   struct aic_dev_data *aic_dev;
3133
3134   /*
3135    * Restore this when we're done
3136    */
3137   active_scb = aic_inb(p, SCBPTR);
3138   scb_tag = aic_inb(p, SCB_TAG);
3139
3140   if (aic7xxx_verbose & (VERBOSE_RESET_PROCESS | VERBOSE_ABORT_PROCESS))
3141   {
3142     printk(INFO_LEAD "Reset device, hardware_scb %d,\n",
3143          p->host_no, channel, target, lun, active_scb);
3144     printk(INFO_LEAD "Current scb %d, SEQADDR 0x%x, LASTPHASE "
3145            "0x%x\n",
3146          p->host_no, channel, target, lun, scb_tag,
3147          aic_inb(p, SEQADDR0) | (aic_inb(p, SEQADDR1) << 8),
3148          aic_inb(p, LASTPHASE));
3149     printk(INFO_LEAD "SG_CACHEPTR 0x%x, SG_COUNT %d, SCSISIGI 0x%x\n",
3150          p->host_no, channel, target, lun,
3151          (p->features & AHC_ULTRA2) ?  aic_inb(p, SG_CACHEPTR) : 0,
3152          aic_inb(p, SG_COUNT), aic_inb(p, SCSISIGI));
3153     printk(INFO_LEAD "SSTAT0 0x%x, SSTAT1 0x%x, SSTAT2 0x%x\n",
3154          p->host_no, channel, target, lun, aic_inb(p, SSTAT0),
3155          aic_inb(p, SSTAT1), aic_inb(p, SSTAT2));
3156   }
3157
3158   /*
3159    * Deal with the busy target and linked next issues.
3160    */
3161   list_for_each_entry(aic_dev, &p->aic_devs, list)
3162   {
3163     if (aic7xxx_verbose & (VERBOSE_RESET_PROCESS | VERBOSE_ABORT_PROCESS))
3164       printk(INFO_LEAD "processing aic_dev %p\n", p->host_no, channel, target,
3165                     lun, aic_dev);
3166     sd = aic_dev->SDptr;
3167
3168     if((target != ALL_TARGETS && target != sd->id) ||
3169        (channel != ALL_CHANNELS && channel != sd->channel))
3170       continue;
3171     if (aic7xxx_verbose & (VERBOSE_ABORT_PROCESS | VERBOSE_RESET_PROCESS))
3172         printk(INFO_LEAD "Cleaning up status information "
3173           "and delayed_scbs.\n", p->host_no, sd->channel, sd->id, sd->lun);
3174     aic_dev->flags &= ~BUS_DEVICE_RESET_PENDING;
3175     if ( tag == SCB_LIST_NULL )
3176     {
3177       aic_dev->dtr_pending = 0;
3178       aic_dev->needppr = aic_dev->needppr_copy;
3179       aic_dev->needsdtr = aic_dev->needsdtr_copy;
3180       aic_dev->needwdtr = aic_dev->needwdtr_copy;
3181       aic_dev->flags = DEVICE_PRINT_DTR;
3182       aic_dev->temp_q_depth = aic_dev->max_q_depth;
3183     }
3184     tcl = (sd->id << 4) | (sd->channel << 3) | sd->lun;
3185     if ( (aic7xxx_index_busy_target(p, tcl, FALSE) == tag) ||
3186          (tag == SCB_LIST_NULL) )
3187       aic7xxx_index_busy_target(p, tcl, /* unbusy */ TRUE);
3188     prev_scbp = NULL; 
3189     scbp = aic_dev->delayed_scbs.head;
3190     while (scbp != NULL)
3191     {
3192       prev_scbp = scbp;
3193       scbp = scbp->q_next;
3194       if (aic7xxx_match_scb(p, prev_scbp, target, channel, lun, tag))
3195       {
3196         scbq_remove(&aic_dev->delayed_scbs, prev_scbp);
3197         if (prev_scbp->flags & SCB_WAITINGQ)
3198         {
3199           aic_dev->active_cmds++;
3200           p->activescbs++;
3201         }
3202         prev_scbp->flags &= ~(SCB_ACTIVE | SCB_WAITINGQ);
3203         prev_scbp->flags |= SCB_RESET | SCB_QUEUED_FOR_DONE;
3204       }
3205     }
3206   }
3207
3208   if (aic7xxx_verbose & (VERBOSE_ABORT_PROCESS | VERBOSE_RESET_PROCESS))
3209     printk(INFO_LEAD "Cleaning QINFIFO.\n", p->host_no, channel, target, lun );
3210   aic7xxx_search_qinfifo(p, target, channel, lun, tag,
3211       SCB_RESET | SCB_QUEUED_FOR_DONE, /* requeue */ FALSE, NULL);
3212
3213 /*
3214  *  Search the waiting_scbs queue for matches, this catches any SCB_QUEUED
3215  *  ABORT/RESET commands.
3216  */
3217   if (aic7xxx_verbose & (VERBOSE_ABORT_PROCESS | VERBOSE_RESET_PROCESS))
3218     printk(INFO_LEAD "Cleaning waiting_scbs.\n", p->host_no, channel,
3219       target, lun );
3220   {
3221     struct aic7xxx_scb *scbp, *prev_scbp;
3222
3223     prev_scbp = NULL; 
3224     scbp = p->waiting_scbs.head;
3225     while (scbp != NULL)
3226     {
3227       prev_scbp = scbp;
3228       scbp = scbp->q_next;
3229       if (aic7xxx_match_scb(p, prev_scbp, target, channel, lun, tag))
3230       {
3231         scbq_remove(&p->waiting_scbs, prev_scbp);
3232         if (prev_scbp->flags & SCB_WAITINGQ)
3233         {
3234           AIC_DEV(prev_scbp->cmd)->active_cmds++;
3235           p->activescbs++;
3236         }
3237         prev_scbp->flags &= ~(SCB_ACTIVE | SCB_WAITINGQ);
3238         prev_scbp->flags |= SCB_RESET | SCB_QUEUED_FOR_DONE;
3239       }
3240     }
3241   }
3242
3243
3244   /*
3245    * Search waiting for selection list.
3246    */
3247   if (aic7xxx_verbose & (VERBOSE_ABORT_PROCESS | VERBOSE_RESET_PROCESS))
3248     printk(INFO_LEAD "Cleaning waiting for selection "
3249       "list.\n", p->host_no, channel, target, lun);
3250   {
3251     unsigned char next, prev, scb_index;
3252
3253     next = aic_inb(p, WAITING_SCBH);  /* Start at head of list. */
3254     prev = SCB_LIST_NULL;
3255     while (next != SCB_LIST_NULL)
3256     {
3257       aic_outb(p, next, SCBPTR);
3258       scb_index = aic_inb(p, SCB_TAG);
3259       if (scb_index >= p->scb_data->numscbs)
3260       {
3261        /*
3262         * No aic7xxx_verbose check here.....we want to see this since it
3263         * means either the kernel driver or the sequencer screwed things up
3264         */
3265         printk(WARN_LEAD "Waiting List inconsistency; SCB index=%d, "
3266           "numscbs=%d\n", p->host_no, channel, target, lun, scb_index,
3267           p->scb_data->numscbs);
3268         next = aic_inb(p, SCB_NEXT);
3269         aic7xxx_add_curscb_to_free_list(p);
3270       }
3271       else
3272       {
3273         scbp = p->scb_data->scb_array[scb_index];
3274         if (aic7xxx_match_scb(p, scbp, target, channel, lun, tag))
3275         {
3276           next = aic7xxx_abort_waiting_scb(p, scbp, next, prev);
3277           if (scbp->flags & SCB_WAITINGQ)
3278           {
3279             AIC_DEV(scbp->cmd)->active_cmds++;
3280             p->activescbs++;
3281           }
3282           scbp->flags &= ~(SCB_ACTIVE | SCB_WAITINGQ);
3283           scbp->flags |= SCB_RESET | SCB_QUEUED_FOR_DONE;
3284           if (prev == SCB_LIST_NULL)
3285           {
3286             /*
3287              * This is either the first scb on the waiting list, or we
3288              * have already yanked the first and haven't left any behind.
3289              * Either way, we need to turn off the selection hardware if
3290              * it isn't already off.
3291              */
3292             aic_outb(p, aic_inb(p, SCSISEQ) & ~ENSELO, SCSISEQ);
3293             aic_outb(p, CLRSELTIMEO, CLRSINT1);
3294           }
3295         }
3296         else
3297         {
3298           prev = next;
3299           next = aic_inb(p, SCB_NEXT);
3300         }
3301       }
3302     }
3303   }
3304
3305   /*
3306    * Go through disconnected list and remove any entries we have queued
3307    * for completion, zeroing their control byte too.
3308    */
3309   if (aic7xxx_verbose & (VERBOSE_ABORT_PROCESS | VERBOSE_RESET_PROCESS))
3310     printk(INFO_LEAD "Cleaning disconnected scbs "
3311       "list.\n", p->host_no, channel, target, lun);
3312   if (p->flags & AHC_PAGESCBS)
3313   {
3314     unsigned char next, prev, scb_index;
3315
3316     next = aic_inb(p, DISCONNECTED_SCBH);
3317     prev = SCB_LIST_NULL;
3318     while (next != SCB_LIST_NULL)
3319     {
3320       aic_outb(p, next, SCBPTR);
3321       scb_index = aic_inb(p, SCB_TAG);
3322       if (scb_index > p->scb_data->numscbs)
3323       {
3324         printk(WARN_LEAD "Disconnected List inconsistency; SCB index=%d, "
3325           "numscbs=%d\n", p->host_no, channel, target, lun, scb_index,
3326           p->scb_data->numscbs);
3327         next = aic7xxx_rem_scb_from_disc_list(p, next, prev);
3328       }
3329       else
3330       {
3331         scbp = p->scb_data->scb_array[scb_index];
3332         if (aic7xxx_match_scb(p, scbp, target, channel, lun, tag))
3333         {
3334           next = aic7xxx_rem_scb_from_disc_list(p, next, prev);
3335           if (scbp->flags & SCB_WAITINGQ)
3336           {
3337             AIC_DEV(scbp->cmd)->active_cmds++;
3338             p->activescbs++;
3339           }
3340           scbp->flags &= ~(SCB_ACTIVE | SCB_WAITINGQ);
3341           scbp->flags |= SCB_RESET | SCB_QUEUED_FOR_DONE;
3342           scbp->hscb->control = 0;
3343         }
3344         else
3345         {
3346           prev = next;
3347           next = aic_inb(p, SCB_NEXT);
3348         }
3349       }
3350     }
3351   }
3352
3353   /*
3354    * Walk the free list making sure no entries on the free list have
3355    * a valid SCB_TAG value or SCB_CONTROL byte.
3356    */
3357   if (p->flags & AHC_PAGESCBS)
3358   {
3359     unsigned char next;
3360
3361     next = aic_inb(p, FREE_SCBH);
3362     while (next != SCB_LIST_NULL)
3363     {
3364       aic_outb(p, next, SCBPTR);
3365       if (aic_inb(p, SCB_TAG) < p->scb_data->numscbs)
3366       {
3367         printk(WARN_LEAD "Free list inconsistency!.\n", p->host_no, channel,
3368           target, lun);
3369         init_lists = TRUE;
3370         next = SCB_LIST_NULL;
3371       }
3372       else
3373       {
3374         aic_outb(p, SCB_LIST_NULL, SCB_TAG);
3375         aic_outb(p, 0, SCB_CONTROL);
3376         next = aic_inb(p, SCB_NEXT);
3377       }
3378     }
3379   }
3380
3381   /*
3382    * Go through the hardware SCB array looking for commands that
3383    * were active but not on any list.
3384    */
3385   if (init_lists)
3386   {
3387     aic_outb(p, SCB_LIST_NULL, FREE_SCBH);