xref: /openbmc/linux/drivers/scsi/ips.c (revision 5a170e9e)
1 /*****************************************************************************/
2 /* ips.c -- driver for the Adaptec / IBM ServeRAID controller                */
3 /*                                                                           */
4 /* Written By: Keith Mitchell, IBM Corporation                               */
5 /*             Jack Hammer, Adaptec, Inc.                                    */
6 /*             David Jeffery, Adaptec, Inc.                                  */
7 /*                                                                           */
8 /* Copyright (C) 2000 IBM Corporation                                        */
9 /* Copyright (C) 2002,2003 Adaptec, Inc.                                     */
10 /*                                                                           */
11 /* This program is free software; you can redistribute it and/or modify      */
12 /* it under the terms of the GNU General Public License as published by      */
13 /* the Free Software Foundation; either version 2 of the License, or         */
14 /* (at your option) any later version.                                       */
15 /*                                                                           */
16 /* This program is distributed in the hope that it will be useful,           */
17 /* but WITHOUT ANY WARRANTY; without even the implied warranty of            */
18 /* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the             */
19 /* GNU General Public License for more details.                              */
20 /*                                                                           */
21 /* NO WARRANTY                                                               */
22 /* THE PROGRAM IS PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OR        */
23 /* CONDITIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED INCLUDING, WITHOUT      */
24 /* LIMITATION, ANY WARRANTIES OR CONDITIONS OF TITLE, NON-INFRINGEMENT,      */
25 /* MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. Each Recipient is    */
26 /* solely responsible for determining the appropriateness of using and       */
27 /* distributing the Program and assumes all risks associated with its        */
28 /* exercise of rights under this Agreement, including but not limited to     */
29 /* the risks and costs of program errors, damage to or loss of data,         */
30 /* programs or equipment, and unavailability or interruption of operations.  */
31 /*                                                                           */
32 /* DISCLAIMER OF LIABILITY                                                   */
33 /* NEITHER RECIPIENT NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY   */
34 /* DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL        */
35 /* DAMAGES (INCLUDING WITHOUT LIMITATION LOST PROFITS), HOWEVER CAUSED AND   */
36 /* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR     */
37 /* TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE    */
38 /* USE OR DISTRIBUTION OF THE PROGRAM OR THE EXERCISE OF ANY RIGHTS GRANTED  */
39 /* HEREUNDER, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGES             */
40 /*                                                                           */
41 /* You should have received a copy of the GNU General Public License         */
42 /* along with this program; if not, write to the Free Software               */
43 /* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
44 /*                                                                           */
45 /* Bugs/Comments/Suggestions about this driver should be mailed to:          */
46 /*      ipslinux@adaptec.com        	                                     */
47 /*                                                                           */
48 /* For system support issues, contact your local IBM Customer support.       */
49 /* Directions to find IBM Customer Support for each country can be found at: */
50 /*      http://www.ibm.com/planetwide/                                       */
51 /*                                                                           */
52 /*****************************************************************************/
53 
54 /*****************************************************************************/
55 /* Change Log                                                                */
56 /*                                                                           */
57 /* 0.99.02  - Breakup commands that are bigger than 8 * the stripe size      */
58 /* 0.99.03  - Make interrupt routine handle all completed request on the     */
59 /*            adapter not just the first one                                 */
60 /*          - Make sure passthru commands get woken up if we run out of      */
61 /*            SCBs                                                           */
62 /*          - Send all of the commands on the queue at once rather than      */
63 /*            one at a time since the card will support it.                  */
64 /* 0.99.04  - Fix race condition in the passthru mechanism -- this required  */
65 /*            the interface to the utilities to change                       */
66 /*          - Fix error recovery code                                        */
67 /* 0.99.05  - Fix an oops when we get certain passthru commands              */
68 /* 1.00.00  - Initial Public Release                                         */
69 /*            Functionally equivalent to 0.99.05                             */
70 /* 3.60.00  - Bump max commands to 128 for use with firmware 3.60            */
71 /*          - Change version to 3.60 to coincide with release numbering.     */
72 /* 3.60.01  - Remove bogus error check in passthru routine                   */
73 /* 3.60.02  - Make DCDB direction based on lookup table                      */
74 /*          - Only allow one DCDB command to a SCSI ID at a time             */
75 /* 4.00.00  - Add support for ServeRAID 4                                    */
76 /* 4.00.01  - Add support for First Failure Data Capture                     */
77 /* 4.00.02  - Fix problem with PT DCDB with no buffer                        */
78 /* 4.00.03  - Add alternative passthru interface                             */
79 /*          - Add ability to flash BIOS                                      */
80 /* 4.00.04  - Rename structures/constants to be prefixed with IPS_           */
81 /* 4.00.05  - Remove wish_block from init routine                            */
82 /*          - Use linux/spinlock.h instead of asm/spinlock.h for kernels     */
83 /*            2.3.18 and later                                               */
84 /*          - Sync with other changes from the 2.3 kernels                   */
85 /* 4.00.06  - Fix timeout with initial FFDC command                          */
86 /* 4.00.06a - Port to 2.4 (trivial) -- Christoph Hellwig <hch@infradead.org> */
87 /* 4.10.00  - Add support for ServeRAID 4M/4L                                */
88 /* 4.10.13  - Fix for dynamic unload and proc file system                    */
89 /* 4.20.03  - Rename version to coincide with new release schedules          */
90 /*            Performance fixes                                              */
91 /*            Fix truncation of /proc files with cat                         */
92 /*            Merge in changes through kernel 2.4.0test1ac21                 */
93 /* 4.20.13  - Fix some failure cases / reset code                            */
94 /*          - Hook into the reboot_notifier to flush the controller cache    */
95 /* 4.50.01  - Fix problem when there is a hole in logical drive numbering    */
96 /* 4.70.09  - Use a Common ( Large Buffer ) for Flashing from the JCRM CD    */
97 /*          - Add IPSSEND Flash Support                                      */
98 /*          - Set Sense Data for Unknown SCSI Command                        */
99 /*          - Use Slot Number from NVRAM Page 5                              */
100 /*          - Restore caller's DCDB Structure                                */
101 /* 4.70.12  - Corrective actions for bad controller ( during initialization )*/
102 /* 4.70.13  - Don't Send CDB's if we already know the device is not present  */
103 /*          - Don't release HA Lock in ips_next() until SC taken off queue   */
104 /*          - Unregister SCSI device in ips_release()                        */
105 /* 4.70.15  - Fix Breakup for very large ( non-SG ) requests in ips_done()   */
106 /* 4.71.00  - Change all memory allocations to not use GFP_DMA flag          */
107 /*            Code Clean-Up for 2.4.x kernel                                 */
108 /* 4.72.00  - Allow for a Scatter-Gather Element to exceed MAX_XFER Size     */
109 /* 4.72.01  - I/O Mapped Memory release ( so "insmod ips" does not Fail )    */
110 /*          - Don't Issue Internal FFDC Command if there are Active Commands */
111 /*          - Close Window for getting too many IOCTL's active               */
112 /* 4.80.00  - Make ia64 Safe                                                 */
113 /* 4.80.04  - Eliminate calls to strtok() if 2.4.x or greater                */
114 /*          - Adjustments to Device Queue Depth                              */
115 /* 4.80.14  - Take all semaphores off stack                                  */
116 /*          - Clean Up New_IOCTL path                                        */
117 /* 4.80.20  - Set max_sectors in Scsi_Host structure ( if >= 2.4.7 kernel )  */
118 /*          - 5 second delay needed after resetting an i960 adapter          */
119 /* 4.80.26  - Clean up potential code problems ( Arjan's recommendations )   */
120 /* 4.90.01  - Version Matching for FirmWare, BIOS, and Driver                */
121 /* 4.90.05  - Use New PCI Architecture to facilitate Hot Plug Development    */
122 /* 4.90.08  - Increase Delays in Flashing ( Trombone Only - 4H )             */
123 /* 4.90.08  - Data Corruption if First Scatter Gather Element is > 64K       */
124 /* 4.90.11  - Don't actually RESET unless it's physically required           */
125 /*          - Remove unused compile options                                  */
126 /* 5.00.01  - Sarasota ( 5i ) adapters must always be scanned first          */
127 /*          - Get rid on IOCTL_NEW_COMMAND code                              */
128 /*          - Add Extended DCDB Commands for Tape Support in 5I              */
129 /* 5.10.12  - use pci_dma interfaces, update for 2.5 kernel changes          */
130 /* 5.10.15  - remove unused code (sem, macros, etc.)                         */
131 /* 5.30.00  - use __devexit_p()                                              */
132 /* 6.00.00  - Add 6x Adapters and Battery Flash                              */
133 /* 6.10.00  - Remove 1G Addressing Limitations                               */
134 /* 6.11.xx  - Get VersionInfo buffer off the stack !              DDTS 60401 */
135 /* 6.11.xx  - Make Logical Drive Info structure safe for DMA      DDTS 60639 */
136 /* 7.10.18  - Add highmem_io flag in SCSI Templete for 2.4 kernels           */
137 /*          - Fix path/name for scsi_hosts.h include for 2.6 kernels         */
138 /*          - Fix sort order of 7k                                           */
139 /*          - Remove 3 unused "inline" functions                             */
140 /* 7.12.xx  - Use STATIC functions wherever possible                        */
141 /*          - Clean up deprecated MODULE_PARM calls                          */
142 /* 7.12.05  - Remove Version Matching per IBM request                        */
143 /*****************************************************************************/
144 
145 /*
146  * Conditional Compilation directives for this driver:
147  *
148  * IPS_DEBUG            - Turn on debugging info
149  *
150  * Parameters:
151  *
152  * debug:<number>       - Set debug level to <number>
153  *                        NOTE: only works when IPS_DEBUG compile directive is used.
154  *       1              - Normal debug messages
155  *       2              - Verbose debug messages
156  *       11             - Method trace (non interrupt)
157  *       12             - Method trace (includes interrupt)
158  *
159  * noi2o                - Don't use I2O Queues (ServeRAID 4 only)
160  * nommap               - Don't use memory mapped I/O
161  * ioctlsize            - Initial size of the IOCTL buffer
162  */
163 
164 #include <asm/io.h>
165 #include <asm/byteorder.h>
166 #include <asm/page.h>
167 #include <linux/stddef.h>
168 #include <linux/string.h>
169 #include <linux/errno.h>
170 #include <linux/kernel.h>
171 #include <linux/ioport.h>
172 #include <linux/slab.h>
173 #include <linux/delay.h>
174 #include <linux/pci.h>
175 #include <linux/proc_fs.h>
176 #include <linux/reboot.h>
177 #include <linux/interrupt.h>
178 
179 #include <linux/blkdev.h>
180 #include <linux/types.h>
181 #include <linux/dma-mapping.h>
182 
183 #include <scsi/sg.h>
184 #include "scsi.h"
185 #include <scsi/scsi_host.h>
186 
187 #include "ips.h"
188 
189 #include <linux/module.h>
190 
191 #include <linux/stat.h>
192 
193 #include <linux/spinlock.h>
194 #include <linux/init.h>
195 
196 #include <linux/smp.h>
197 
198 #ifdef MODULE
199 static char *ips = NULL;
200 module_param(ips, charp, 0);
201 #endif
202 
203 /*
204  * DRIVER_VER
205  */
206 #define IPS_VERSION_HIGH        IPS_VER_MAJOR_STRING "." IPS_VER_MINOR_STRING
207 #define IPS_VERSION_LOW         "." IPS_VER_BUILD_STRING " "
208 
209 #define IPS_DMA_DIR(scb) ((!scb->scsi_cmd || ips_is_passthru(scb->scsi_cmd) || \
210                          DMA_NONE == scb->scsi_cmd->sc_data_direction) ? \
211                          DMA_BIDIRECTIONAL : \
212                          scb->scsi_cmd->sc_data_direction)
213 
214 #ifdef IPS_DEBUG
215 #define METHOD_TRACE(s, i)    if (ips_debug >= (i+10)) printk(KERN_NOTICE s "\n");
216 #define DEBUG(i, s)           if (ips_debug >= i) printk(KERN_NOTICE s "\n");
217 #define DEBUG_VAR(i, s, v...) if (ips_debug >= i) printk(KERN_NOTICE s "\n", v);
218 #else
219 #define METHOD_TRACE(s, i)
220 #define DEBUG(i, s)
221 #define DEBUG_VAR(i, s, v...)
222 #endif
223 
224 /*
225  * Function prototypes
226  */
227 static int ips_eh_abort(struct scsi_cmnd *);
228 static int ips_eh_reset(struct scsi_cmnd *);
229 static int ips_queue(struct Scsi_Host *, struct scsi_cmnd *);
230 static const char *ips_info(struct Scsi_Host *);
231 static irqreturn_t do_ipsintr(int, void *);
232 static int ips_hainit(ips_ha_t *);
233 static int ips_map_status(ips_ha_t *, ips_scb_t *, ips_stat_t *);
234 static int ips_send_wait(ips_ha_t *, ips_scb_t *, int, int);
235 static int ips_send_cmd(ips_ha_t *, ips_scb_t *);
236 static int ips_online(ips_ha_t *, ips_scb_t *);
237 static int ips_inquiry(ips_ha_t *, ips_scb_t *);
238 static int ips_rdcap(ips_ha_t *, ips_scb_t *);
239 static int ips_msense(ips_ha_t *, ips_scb_t *);
240 static int ips_reqsen(ips_ha_t *, ips_scb_t *);
241 static int ips_deallocatescbs(ips_ha_t *, int);
242 static int ips_allocatescbs(ips_ha_t *);
243 static int ips_reset_copperhead(ips_ha_t *);
244 static int ips_reset_copperhead_memio(ips_ha_t *);
245 static int ips_reset_morpheus(ips_ha_t *);
246 static int ips_issue_copperhead(ips_ha_t *, ips_scb_t *);
247 static int ips_issue_copperhead_memio(ips_ha_t *, ips_scb_t *);
248 static int ips_issue_i2o(ips_ha_t *, ips_scb_t *);
249 static int ips_issue_i2o_memio(ips_ha_t *, ips_scb_t *);
250 static int ips_isintr_copperhead(ips_ha_t *);
251 static int ips_isintr_copperhead_memio(ips_ha_t *);
252 static int ips_isintr_morpheus(ips_ha_t *);
253 static int ips_wait(ips_ha_t *, int, int);
254 static int ips_write_driver_status(ips_ha_t *, int);
255 static int ips_read_adapter_status(ips_ha_t *, int);
256 static int ips_read_subsystem_parameters(ips_ha_t *, int);
257 static int ips_read_config(ips_ha_t *, int);
258 static int ips_clear_adapter(ips_ha_t *, int);
259 static int ips_readwrite_page5(ips_ha_t *, int, int);
260 static int ips_init_copperhead(ips_ha_t *);
261 static int ips_init_copperhead_memio(ips_ha_t *);
262 static int ips_init_morpheus(ips_ha_t *);
263 static int ips_isinit_copperhead(ips_ha_t *);
264 static int ips_isinit_copperhead_memio(ips_ha_t *);
265 static int ips_isinit_morpheus(ips_ha_t *);
266 static int ips_erase_bios(ips_ha_t *);
267 static int ips_program_bios(ips_ha_t *, char *, uint32_t, uint32_t);
268 static int ips_verify_bios(ips_ha_t *, char *, uint32_t, uint32_t);
269 static int ips_erase_bios_memio(ips_ha_t *);
270 static int ips_program_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
271 static int ips_verify_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
272 static int ips_flash_copperhead(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
273 static int ips_flash_bios(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
274 static int ips_flash_firmware(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
275 static void ips_free_flash_copperhead(ips_ha_t * ha);
276 static void ips_get_bios_version(ips_ha_t *, int);
277 static void ips_identify_controller(ips_ha_t *);
278 static void ips_chkstatus(ips_ha_t *, IPS_STATUS *);
279 static void ips_enable_int_copperhead(ips_ha_t *);
280 static void ips_enable_int_copperhead_memio(ips_ha_t *);
281 static void ips_enable_int_morpheus(ips_ha_t *);
282 static int ips_intr_copperhead(ips_ha_t *);
283 static int ips_intr_morpheus(ips_ha_t *);
284 static void ips_next(ips_ha_t *, int);
285 static void ipsintr_blocking(ips_ha_t *, struct ips_scb *);
286 static void ipsintr_done(ips_ha_t *, struct ips_scb *);
287 static void ips_done(ips_ha_t *, ips_scb_t *);
288 static void ips_free(ips_ha_t *);
289 static void ips_init_scb(ips_ha_t *, ips_scb_t *);
290 static void ips_freescb(ips_ha_t *, ips_scb_t *);
291 static void ips_setup_funclist(ips_ha_t *);
292 static void ips_statinit(ips_ha_t *);
293 static void ips_statinit_memio(ips_ha_t *);
294 static void ips_fix_ffdc_time(ips_ha_t *, ips_scb_t *, time64_t);
295 static void ips_ffdc_reset(ips_ha_t *, int);
296 static void ips_ffdc_time(ips_ha_t *);
297 static uint32_t ips_statupd_copperhead(ips_ha_t *);
298 static uint32_t ips_statupd_copperhead_memio(ips_ha_t *);
299 static uint32_t ips_statupd_morpheus(ips_ha_t *);
300 static ips_scb_t *ips_getscb(ips_ha_t *);
301 static void ips_putq_scb_head(ips_scb_queue_t *, ips_scb_t *);
302 static void ips_putq_wait_tail(ips_wait_queue_entry_t *, struct scsi_cmnd *);
303 static void ips_putq_copp_tail(ips_copp_queue_t *,
304 				      ips_copp_wait_item_t *);
305 static ips_scb_t *ips_removeq_scb_head(ips_scb_queue_t *);
306 static ips_scb_t *ips_removeq_scb(ips_scb_queue_t *, ips_scb_t *);
307 static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_entry_t *);
308 static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_entry_t *,
309 					  struct scsi_cmnd *);
310 static ips_copp_wait_item_t *ips_removeq_copp(ips_copp_queue_t *,
311 						     ips_copp_wait_item_t *);
312 static ips_copp_wait_item_t *ips_removeq_copp_head(ips_copp_queue_t *);
313 
314 static int ips_is_passthru(struct scsi_cmnd *);
315 static int ips_make_passthru(ips_ha_t *, struct scsi_cmnd *, ips_scb_t *, int);
316 static int ips_usrcmd(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
317 static void ips_cleanup_passthru(ips_ha_t *, ips_scb_t *);
318 static void ips_scmd_buf_write(struct scsi_cmnd * scmd, void *data,
319 			       unsigned int count);
320 static void ips_scmd_buf_read(struct scsi_cmnd * scmd, void *data,
321 			      unsigned int count);
322 
323 static int ips_write_info(struct Scsi_Host *, char *, int);
324 static int ips_show_info(struct seq_file *, struct Scsi_Host *);
325 static int ips_host_info(ips_ha_t *, struct seq_file *);
326 static int ips_abort_init(ips_ha_t * ha, int index);
327 static int ips_init_phase2(int index);
328 
329 static int ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr);
330 static int ips_register_scsi(int index);
331 
332 static int  ips_poll_for_flush_complete(ips_ha_t * ha);
333 static void ips_flush_and_reset(ips_ha_t *ha);
334 
335 /*
336  * global variables
337  */
338 static const char ips_name[] = "ips";
339 static struct Scsi_Host *ips_sh[IPS_MAX_ADAPTERS];	/* Array of host controller structures */
340 static ips_ha_t *ips_ha[IPS_MAX_ADAPTERS];	/* Array of HA structures */
341 static unsigned int ips_next_controller;
342 static unsigned int ips_num_controllers;
343 static unsigned int ips_released_controllers;
344 static int ips_hotplug;
345 static int ips_cmd_timeout = 60;
346 static int ips_reset_timeout = 60 * 5;
347 static int ips_force_memio = 1;		/* Always use Memory Mapped I/O    */
348 static int ips_force_i2o = 1;	/* Always use I2O command delivery */
349 static int ips_ioctlsize = IPS_IOCTL_SIZE;	/* Size of the ioctl buffer        */
350 static int ips_cd_boot;			/* Booting from Manager CD         */
351 static char *ips_FlashData = NULL;	/* CD Boot - Flash Data Buffer      */
352 static dma_addr_t ips_flashbusaddr;
353 static long ips_FlashDataInUse;		/* CD Boot - Flash Data In Use Flag */
354 static uint32_t MaxLiteCmds = 32;	/* Max Active Cmds for a Lite Adapter */
355 static struct scsi_host_template ips_driver_template = {
356 	.info			= ips_info,
357 	.queuecommand		= ips_queue,
358 	.eh_abort_handler	= ips_eh_abort,
359 	.eh_host_reset_handler	= ips_eh_reset,
360 	.proc_name		= "ips",
361 	.show_info		= ips_show_info,
362 	.write_info		= ips_write_info,
363 	.slave_configure	= ips_slave_configure,
364 	.bios_param		= ips_biosparam,
365 	.this_id		= -1,
366 	.sg_tablesize		= IPS_MAX_SG,
367 	.cmd_per_lun		= 3,
368 	.no_write_same		= 1,
369 };
370 
371 
372 /* This table describes all ServeRAID Adapters */
373 static struct  pci_device_id  ips_pci_table[] = {
374 	{ 0x1014, 0x002E, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
375 	{ 0x1014, 0x01BD, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
376 	{ 0x9005, 0x0250, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
377 	{ 0, }
378 };
379 
380 MODULE_DEVICE_TABLE( pci, ips_pci_table );
381 
382 static char ips_hot_plug_name[] = "ips";
383 
384 static int  ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent);
385 static void ips_remove_device(struct pci_dev *pci_dev);
386 
387 static struct pci_driver ips_pci_driver = {
388 	.name		= ips_hot_plug_name,
389 	.id_table	= ips_pci_table,
390 	.probe		= ips_insert_device,
391 	.remove		= ips_remove_device,
392 };
393 
394 
395 /*
396  * Necessary forward function protoypes
397  */
398 static int ips_halt(struct notifier_block *nb, ulong event, void *buf);
399 
400 #define MAX_ADAPTER_NAME 15
401 
402 static char ips_adapter_name[][30] = {
403 	"ServeRAID",
404 	"ServeRAID II",
405 	"ServeRAID on motherboard",
406 	"ServeRAID on motherboard",
407 	"ServeRAID 3H",
408 	"ServeRAID 3L",
409 	"ServeRAID 4H",
410 	"ServeRAID 4M",
411 	"ServeRAID 4L",
412 	"ServeRAID 4Mx",
413 	"ServeRAID 4Lx",
414 	"ServeRAID 5i",
415 	"ServeRAID 5i",
416 	"ServeRAID 6M",
417 	"ServeRAID 6i",
418 	"ServeRAID 7t",
419 	"ServeRAID 7k",
420 	"ServeRAID 7M"
421 };
422 
423 static struct notifier_block ips_notifier = {
424 	ips_halt, NULL, 0
425 };
426 
427 /*
428  * Direction table
429  */
430 static char ips_command_direction[] = {
431 	IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT,
432 	IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK,
433 	IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
434 	IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
435 	IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_OUT,
436 	IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
437 	IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_IN,
438 	IPS_DATA_UNK, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
439 	IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_UNK,
440 	IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
441 	IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE,
442 	IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
443 	IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT,
444 	IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_NONE,
445 	IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_UNK,
446 	IPS_DATA_NONE, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
447 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
448 	IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
449 	IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
450 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
451 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
452 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
453 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
454 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
455 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
456 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
457 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
458 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
459 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
460 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
461 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
462 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
463 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
464 	IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_NONE,
465 	IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_OUT,
466 	IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_NONE,
467 	IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN,
468 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
469 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
470 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
471 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
472 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
473 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
474 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
475 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
476 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
477 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_OUT,
478 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
479 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
480 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
481 	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK
482 };
483 
484 
485 /****************************************************************************/
486 /*                                                                          */
487 /* Routine Name: ips_setup                                                  */
488 /*                                                                          */
489 /* Routine Description:                                                     */
490 /*                                                                          */
491 /*   setup parameters to the driver                                         */
492 /*                                                                          */
493 /****************************************************************************/
494 static int
495 ips_setup(char *ips_str)
496 {
497 
498 	int i;
499 	char *key;
500 	char *value;
501 	IPS_OPTION options[] = {
502 		{"noi2o", &ips_force_i2o, 0},
503 		{"nommap", &ips_force_memio, 0},
504 		{"ioctlsize", &ips_ioctlsize, IPS_IOCTL_SIZE},
505 		{"cdboot", &ips_cd_boot, 0},
506 		{"maxcmds", &MaxLiteCmds, 32},
507 	};
508 
509 	/* Don't use strtok() anymore ( if 2.4 Kernel or beyond ) */
510 	/* Search for value */
511 	while ((key = strsep(&ips_str, ",."))) {
512 		if (!*key)
513 			continue;
514 		value = strchr(key, ':');
515 		if (value)
516 			*value++ = '\0';
517 		/*
518 		 * We now have key/value pairs.
519 		 * Update the variables
520 		 */
521 		for (i = 0; i < ARRAY_SIZE(options); i++) {
522 			if (strncasecmp
523 			    (key, options[i].option_name,
524 			     strlen(options[i].option_name)) == 0) {
525 				if (value)
526 					*options[i].option_flag =
527 					    simple_strtoul(value, NULL, 0);
528 				else
529 					*options[i].option_flag =
530 					    options[i].option_value;
531 				break;
532 			}
533 		}
534 	}
535 
536 	return (1);
537 }
538 
539 __setup("ips=", ips_setup);
540 
541 /****************************************************************************/
542 /*                                                                          */
543 /* Routine Name: ips_detect                                                 */
544 /*                                                                          */
545 /* Routine Description:                                                     */
546 /*                                                                          */
547 /*   Detect and initialize the driver                                       */
548 /*                                                                          */
549 /* NOTE: this routine is called under the io_request_lock spinlock          */
550 /*                                                                          */
551 /****************************************************************************/
552 static int
553 ips_detect(struct scsi_host_template * SHT)
554 {
555 	int i;
556 
557 	METHOD_TRACE("ips_detect", 1);
558 
559 #ifdef MODULE
560 	if (ips)
561 		ips_setup(ips);
562 #endif
563 
564 	for (i = 0; i < ips_num_controllers; i++) {
565 		if (ips_register_scsi(i))
566 			ips_free(ips_ha[i]);
567 		ips_released_controllers++;
568 	}
569 	ips_hotplug = 1;
570 	return (ips_num_controllers);
571 }
572 
573 /****************************************************************************/
574 /*   configure the function pointers to use the functions that will work    */
575 /*   with the found version of the adapter                                  */
576 /****************************************************************************/
577 static void
578 ips_setup_funclist(ips_ha_t * ha)
579 {
580 
581 	/*
582 	 * Setup Functions
583 	 */
584 	if (IPS_IS_MORPHEUS(ha) || IPS_IS_MARCO(ha)) {
585 		/* morpheus / marco / sebring */
586 		ha->func.isintr = ips_isintr_morpheus;
587 		ha->func.isinit = ips_isinit_morpheus;
588 		ha->func.issue = ips_issue_i2o_memio;
589 		ha->func.init = ips_init_morpheus;
590 		ha->func.statupd = ips_statupd_morpheus;
591 		ha->func.reset = ips_reset_morpheus;
592 		ha->func.intr = ips_intr_morpheus;
593 		ha->func.enableint = ips_enable_int_morpheus;
594 	} else if (IPS_USE_MEMIO(ha)) {
595 		/* copperhead w/MEMIO */
596 		ha->func.isintr = ips_isintr_copperhead_memio;
597 		ha->func.isinit = ips_isinit_copperhead_memio;
598 		ha->func.init = ips_init_copperhead_memio;
599 		ha->func.statupd = ips_statupd_copperhead_memio;
600 		ha->func.statinit = ips_statinit_memio;
601 		ha->func.reset = ips_reset_copperhead_memio;
602 		ha->func.intr = ips_intr_copperhead;
603 		ha->func.erasebios = ips_erase_bios_memio;
604 		ha->func.programbios = ips_program_bios_memio;
605 		ha->func.verifybios = ips_verify_bios_memio;
606 		ha->func.enableint = ips_enable_int_copperhead_memio;
607 		if (IPS_USE_I2O_DELIVER(ha))
608 			ha->func.issue = ips_issue_i2o_memio;
609 		else
610 			ha->func.issue = ips_issue_copperhead_memio;
611 	} else {
612 		/* copperhead */
613 		ha->func.isintr = ips_isintr_copperhead;
614 		ha->func.isinit = ips_isinit_copperhead;
615 		ha->func.init = ips_init_copperhead;
616 		ha->func.statupd = ips_statupd_copperhead;
617 		ha->func.statinit = ips_statinit;
618 		ha->func.reset = ips_reset_copperhead;
619 		ha->func.intr = ips_intr_copperhead;
620 		ha->func.erasebios = ips_erase_bios;
621 		ha->func.programbios = ips_program_bios;
622 		ha->func.verifybios = ips_verify_bios;
623 		ha->func.enableint = ips_enable_int_copperhead;
624 
625 		if (IPS_USE_I2O_DELIVER(ha))
626 			ha->func.issue = ips_issue_i2o;
627 		else
628 			ha->func.issue = ips_issue_copperhead;
629 	}
630 }
631 
632 /****************************************************************************/
633 /*                                                                          */
634 /* Routine Name: ips_release                                                */
635 /*                                                                          */
636 /* Routine Description:                                                     */
637 /*                                                                          */
638 /*   Remove a driver                                                        */
639 /*                                                                          */
640 /****************************************************************************/
641 static int
642 ips_release(struct Scsi_Host *sh)
643 {
644 	ips_scb_t *scb;
645 	ips_ha_t *ha;
646 	int i;
647 
648 	METHOD_TRACE("ips_release", 1);
649 
650 	scsi_remove_host(sh);
651 
652 	for (i = 0; i < IPS_MAX_ADAPTERS && ips_sh[i] != sh; i++) ;
653 
654 	if (i == IPS_MAX_ADAPTERS) {
655 		printk(KERN_WARNING
656 		       "(%s) release, invalid Scsi_Host pointer.\n", ips_name);
657 		BUG();
658 		return (FALSE);
659 	}
660 
661 	ha = IPS_HA(sh);
662 
663 	if (!ha)
664 		return (FALSE);
665 
666 	/* flush the cache on the controller */
667 	scb = &ha->scbs[ha->max_cmds - 1];
668 
669 	ips_init_scb(ha, scb);
670 
671 	scb->timeout = ips_cmd_timeout;
672 	scb->cdb[0] = IPS_CMD_FLUSH;
673 
674 	scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
675 	scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
676 	scb->cmd.flush_cache.state = IPS_NORM_STATE;
677 	scb->cmd.flush_cache.reserved = 0;
678 	scb->cmd.flush_cache.reserved2 = 0;
679 	scb->cmd.flush_cache.reserved3 = 0;
680 	scb->cmd.flush_cache.reserved4 = 0;
681 
682 	IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
683 
684 	/* send command */
685 	if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) == IPS_FAILURE)
686 		IPS_PRINTK(KERN_WARNING, ha->pcidev, "Incomplete Flush.\n");
687 
688 	IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Complete.\n");
689 
690 	ips_sh[i] = NULL;
691 	ips_ha[i] = NULL;
692 
693 	/* free extra memory */
694 	ips_free(ha);
695 
696 	/* free IRQ */
697 	free_irq(ha->pcidev->irq, ha);
698 
699 	scsi_host_put(sh);
700 
701 	ips_released_controllers++;
702 
703 	return (FALSE);
704 }
705 
706 /****************************************************************************/
707 /*                                                                          */
708 /* Routine Name: ips_halt                                                   */
709 /*                                                                          */
710 /* Routine Description:                                                     */
711 /*                                                                          */
712 /*   Perform cleanup when the system reboots                                */
713 /*                                                                          */
714 /****************************************************************************/
715 static int
716 ips_halt(struct notifier_block *nb, ulong event, void *buf)
717 {
718 	ips_scb_t *scb;
719 	ips_ha_t *ha;
720 	int i;
721 
722 	if ((event != SYS_RESTART) && (event != SYS_HALT) &&
723 	    (event != SYS_POWER_OFF))
724 		return (NOTIFY_DONE);
725 
726 	for (i = 0; i < ips_next_controller; i++) {
727 		ha = (ips_ha_t *) ips_ha[i];
728 
729 		if (!ha)
730 			continue;
731 
732 		if (!ha->active)
733 			continue;
734 
735 		/* flush the cache on the controller */
736 		scb = &ha->scbs[ha->max_cmds - 1];
737 
738 		ips_init_scb(ha, scb);
739 
740 		scb->timeout = ips_cmd_timeout;
741 		scb->cdb[0] = IPS_CMD_FLUSH;
742 
743 		scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
744 		scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
745 		scb->cmd.flush_cache.state = IPS_NORM_STATE;
746 		scb->cmd.flush_cache.reserved = 0;
747 		scb->cmd.flush_cache.reserved2 = 0;
748 		scb->cmd.flush_cache.reserved3 = 0;
749 		scb->cmd.flush_cache.reserved4 = 0;
750 
751 		IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
752 
753 		/* send command */
754 		if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) ==
755 		    IPS_FAILURE)
756 			IPS_PRINTK(KERN_WARNING, ha->pcidev,
757 				   "Incomplete Flush.\n");
758 		else
759 			IPS_PRINTK(KERN_WARNING, ha->pcidev,
760 				   "Flushing Complete.\n");
761 	}
762 
763 	return (NOTIFY_OK);
764 }
765 
766 /****************************************************************************/
767 /*                                                                          */
768 /* Routine Name: ips_eh_abort                                               */
769 /*                                                                          */
770 /* Routine Description:                                                     */
771 /*                                                                          */
772 /*   Abort a command (using the new error code stuff)                       */
773 /* Note: this routine is called under the io_request_lock                   */
774 /****************************************************************************/
775 int ips_eh_abort(struct scsi_cmnd *SC)
776 {
777 	ips_ha_t *ha;
778 	ips_copp_wait_item_t *item;
779 	int ret;
780 	struct Scsi_Host *host;
781 
782 	METHOD_TRACE("ips_eh_abort", 1);
783 
784 	if (!SC)
785 		return (FAILED);
786 
787 	host = SC->device->host;
788 	ha = (ips_ha_t *) SC->device->host->hostdata;
789 
790 	if (!ha)
791 		return (FAILED);
792 
793 	if (!ha->active)
794 		return (FAILED);
795 
796 	spin_lock(host->host_lock);
797 
798 	/* See if the command is on the copp queue */
799 	item = ha->copp_waitlist.head;
800 	while ((item) && (item->scsi_cmd != SC))
801 		item = item->next;
802 
803 	if (item) {
804 		/* Found it */
805 		ips_removeq_copp(&ha->copp_waitlist, item);
806 		ret = (SUCCESS);
807 
808 		/* See if the command is on the wait queue */
809 	} else if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
810 		/* command not sent yet */
811 		ret = (SUCCESS);
812 	} else {
813 		/* command must have already been sent */
814 		ret = (FAILED);
815 	}
816 
817 	spin_unlock(host->host_lock);
818 	return ret;
819 }
820 
821 /****************************************************************************/
822 /*                                                                          */
823 /* Routine Name: ips_eh_reset                                               */
824 /*                                                                          */
825 /* Routine Description:                                                     */
826 /*                                                                          */
827 /*   Reset the controller (with new eh error code)                          */
828 /*                                                                          */
829 /* NOTE: this routine is called under the io_request_lock spinlock          */
830 /*                                                                          */
831 /****************************************************************************/
832 static int __ips_eh_reset(struct scsi_cmnd *SC)
833 {
834 	int ret;
835 	int i;
836 	ips_ha_t *ha;
837 	ips_scb_t *scb;
838 	ips_copp_wait_item_t *item;
839 
840 	METHOD_TRACE("ips_eh_reset", 1);
841 
842 #ifdef NO_IPS_RESET
843 	return (FAILED);
844 #else
845 
846 	if (!SC) {
847 		DEBUG(1, "Reset called with NULL scsi command");
848 
849 		return (FAILED);
850 	}
851 
852 	ha = (ips_ha_t *) SC->device->host->hostdata;
853 
854 	if (!ha) {
855 		DEBUG(1, "Reset called with NULL ha struct");
856 
857 		return (FAILED);
858 	}
859 
860 	if (!ha->active)
861 		return (FAILED);
862 
863 	/* See if the command is on the copp queue */
864 	item = ha->copp_waitlist.head;
865 	while ((item) && (item->scsi_cmd != SC))
866 		item = item->next;
867 
868 	if (item) {
869 		/* Found it */
870 		ips_removeq_copp(&ha->copp_waitlist, item);
871 		return (SUCCESS);
872 	}
873 
874 	/* See if the command is on the wait queue */
875 	if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
876 		/* command not sent yet */
877 		return (SUCCESS);
878 	}
879 
880 	/* An explanation for the casual observer:                              */
881 	/* Part of the function of a RAID controller is automatic error         */
882 	/* detection and recovery.  As such, the only problem that physically   */
883 	/* resetting an adapter will ever fix is when, for some reason,         */
884 	/* the driver is not successfully communicating with the adapter.       */
885 	/* Therefore, we will attempt to flush this adapter.  If that succeeds, */
886 	/* then there's no real purpose in a physical reset. This will complete */
887 	/* much faster and avoids any problems that might be caused by a        */
888 	/* physical reset ( such as having to fail all the outstanding I/O's ). */
889 
890 	if (ha->ioctl_reset == 0) {	/* IF Not an IOCTL Requested Reset */
891 		scb = &ha->scbs[ha->max_cmds - 1];
892 
893 		ips_init_scb(ha, scb);
894 
895 		scb->timeout = ips_cmd_timeout;
896 		scb->cdb[0] = IPS_CMD_FLUSH;
897 
898 		scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
899 		scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
900 		scb->cmd.flush_cache.state = IPS_NORM_STATE;
901 		scb->cmd.flush_cache.reserved = 0;
902 		scb->cmd.flush_cache.reserved2 = 0;
903 		scb->cmd.flush_cache.reserved3 = 0;
904 		scb->cmd.flush_cache.reserved4 = 0;
905 
906 		/* Attempt the flush command */
907 		ret = ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_IORL);
908 		if (ret == IPS_SUCCESS) {
909 			IPS_PRINTK(KERN_NOTICE, ha->pcidev,
910 				   "Reset Request - Flushed Cache\n");
911 			return (SUCCESS);
912 		}
913 	}
914 
915 	/* Either we can't communicate with the adapter or it's an IOCTL request */
916 	/* from a utility.  A physical reset is needed at this point.            */
917 
918 	ha->ioctl_reset = 0;	/* Reset the IOCTL Requested Reset Flag */
919 
920 	/*
921 	 * command must have already been sent
922 	 * reset the controller
923 	 */
924 	IPS_PRINTK(KERN_NOTICE, ha->pcidev, "Resetting controller.\n");
925 	ret = (*ha->func.reset) (ha);
926 
927 	if (!ret) {
928 		struct scsi_cmnd *scsi_cmd;
929 
930 		IPS_PRINTK(KERN_NOTICE, ha->pcidev,
931 			   "Controller reset failed - controller now offline.\n");
932 
933 		/* Now fail all of the active commands */
934 		DEBUG_VAR(1, "(%s%d) Failing active commands",
935 			  ips_name, ha->host_num);
936 
937 		while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
938 			scb->scsi_cmd->result = DID_ERROR << 16;
939 			scb->scsi_cmd->scsi_done(scb->scsi_cmd);
940 			ips_freescb(ha, scb);
941 		}
942 
943 		/* Now fail all of the pending commands */
944 		DEBUG_VAR(1, "(%s%d) Failing pending commands",
945 			  ips_name, ha->host_num);
946 
947 		while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
948 			scsi_cmd->result = DID_ERROR;
949 			scsi_cmd->scsi_done(scsi_cmd);
950 		}
951 
952 		ha->active = FALSE;
953 		return (FAILED);
954 	}
955 
956 	if (!ips_clear_adapter(ha, IPS_INTR_IORL)) {
957 		struct scsi_cmnd *scsi_cmd;
958 
959 		IPS_PRINTK(KERN_NOTICE, ha->pcidev,
960 			   "Controller reset failed - controller now offline.\n");
961 
962 		/* Now fail all of the active commands */
963 		DEBUG_VAR(1, "(%s%d) Failing active commands",
964 			  ips_name, ha->host_num);
965 
966 		while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
967 			scb->scsi_cmd->result = DID_ERROR << 16;
968 			scb->scsi_cmd->scsi_done(scb->scsi_cmd);
969 			ips_freescb(ha, scb);
970 		}
971 
972 		/* Now fail all of the pending commands */
973 		DEBUG_VAR(1, "(%s%d) Failing pending commands",
974 			  ips_name, ha->host_num);
975 
976 		while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
977 			scsi_cmd->result = DID_ERROR << 16;
978 			scsi_cmd->scsi_done(scsi_cmd);
979 		}
980 
981 		ha->active = FALSE;
982 		return (FAILED);
983 	}
984 
985 	/* FFDC */
986 	if (le32_to_cpu(ha->subsys->param[3]) & 0x300000) {
987 		ha->last_ffdc = ktime_get_real_seconds();
988 		ha->reset_count++;
989 		ips_ffdc_reset(ha, IPS_INTR_IORL);
990 	}
991 
992 	/* Now fail all of the active commands */
993 	DEBUG_VAR(1, "(%s%d) Failing active commands", ips_name, ha->host_num);
994 
995 	while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
996 		scb->scsi_cmd->result = DID_RESET << 16;
997 		scb->scsi_cmd->scsi_done(scb->scsi_cmd);
998 		ips_freescb(ha, scb);
999 	}
1000 
1001 	/* Reset DCDB active command bits */
1002 	for (i = 1; i < ha->nbus; i++)
1003 		ha->dcdb_active[i - 1] = 0;
1004 
1005 	/* Reset the number of active IOCTLs */
1006 	ha->num_ioctl = 0;
1007 
1008 	ips_next(ha, IPS_INTR_IORL);
1009 
1010 	return (SUCCESS);
1011 #endif				/* NO_IPS_RESET */
1012 
1013 }
1014 
1015 static int ips_eh_reset(struct scsi_cmnd *SC)
1016 {
1017 	int rc;
1018 
1019 	spin_lock_irq(SC->device->host->host_lock);
1020 	rc = __ips_eh_reset(SC);
1021 	spin_unlock_irq(SC->device->host->host_lock);
1022 
1023 	return rc;
1024 }
1025 
1026 /****************************************************************************/
1027 /*                                                                          */
1028 /* Routine Name: ips_queue                                                  */
1029 /*                                                                          */
1030 /* Routine Description:                                                     */
1031 /*                                                                          */
1032 /*   Send a command to the controller                                       */
1033 /*                                                                          */
1034 /* NOTE:                                                                    */
1035 /*    Linux obtains io_request_lock before calling this function            */
1036 /*                                                                          */
1037 /****************************************************************************/
1038 static int ips_queue_lck(struct scsi_cmnd *SC, void (*done) (struct scsi_cmnd *))
1039 {
1040 	ips_ha_t *ha;
1041 	ips_passthru_t *pt;
1042 
1043 	METHOD_TRACE("ips_queue", 1);
1044 
1045 	ha = (ips_ha_t *) SC->device->host->hostdata;
1046 
1047 	if (!ha)
1048 		return (1);
1049 
1050 	if (!ha->active)
1051 		return (DID_ERROR);
1052 
1053 	if (ips_is_passthru(SC)) {
1054 		if (ha->copp_waitlist.count == IPS_MAX_IOCTL_QUEUE) {
1055 			SC->result = DID_BUS_BUSY << 16;
1056 			done(SC);
1057 
1058 			return (0);
1059 		}
1060 	} else if (ha->scb_waitlist.count == IPS_MAX_QUEUE) {
1061 		SC->result = DID_BUS_BUSY << 16;
1062 		done(SC);
1063 
1064 		return (0);
1065 	}
1066 
1067 	SC->scsi_done = done;
1068 
1069 	DEBUG_VAR(2, "(%s%d): ips_queue: cmd 0x%X (%d %d %d)",
1070 		  ips_name,
1071 		  ha->host_num,
1072 		  SC->cmnd[0],
1073 		  SC->device->channel, SC->device->id, SC->device->lun);
1074 
1075 	/* Check for command to initiator IDs */
1076 	if ((scmd_channel(SC) > 0)
1077 	    && (scmd_id(SC) == ha->ha_id[scmd_channel(SC)])) {
1078 		SC->result = DID_NO_CONNECT << 16;
1079 		done(SC);
1080 
1081 		return (0);
1082 	}
1083 
1084 	if (ips_is_passthru(SC)) {
1085 
1086 		ips_copp_wait_item_t *scratch;
1087 
1088 		/* A Reset IOCTL is only sent by the boot CD in extreme cases.           */
1089 		/* There can never be any system activity ( network or disk ), but check */
1090 		/* anyway just as a good practice.                                       */
1091 		pt = (ips_passthru_t *) scsi_sglist(SC);
1092 		if ((pt->CoppCP.cmd.reset.op_code == IPS_CMD_RESET_CHANNEL) &&
1093 		    (pt->CoppCP.cmd.reset.adapter_flag == 1)) {
1094 			if (ha->scb_activelist.count != 0) {
1095 				SC->result = DID_BUS_BUSY << 16;
1096 				done(SC);
1097 				return (0);
1098 			}
1099 			ha->ioctl_reset = 1;	/* This reset request is from an IOCTL */
1100 			__ips_eh_reset(SC);
1101 			SC->result = DID_OK << 16;
1102 			SC->scsi_done(SC);
1103 			return (0);
1104 		}
1105 
1106 		/* allocate space for the scribble */
1107 		scratch = kmalloc(sizeof (ips_copp_wait_item_t), GFP_ATOMIC);
1108 
1109 		if (!scratch) {
1110 			SC->result = DID_ERROR << 16;
1111 			done(SC);
1112 
1113 			return (0);
1114 		}
1115 
1116 		scratch->scsi_cmd = SC;
1117 		scratch->next = NULL;
1118 
1119 		ips_putq_copp_tail(&ha->copp_waitlist, scratch);
1120 	} else {
1121 		ips_putq_wait_tail(&ha->scb_waitlist, SC);
1122 	}
1123 
1124 	ips_next(ha, IPS_INTR_IORL);
1125 
1126 	return (0);
1127 }
1128 
1129 static DEF_SCSI_QCMD(ips_queue)
1130 
1131 /****************************************************************************/
1132 /*                                                                          */
1133 /* Routine Name: ips_biosparam                                              */
1134 /*                                                                          */
1135 /* Routine Description:                                                     */
1136 /*                                                                          */
1137 /*   Set bios geometry for the controller                                   */
1138 /*                                                                          */
1139 /****************************************************************************/
1140 static int ips_biosparam(struct scsi_device *sdev, struct block_device *bdev,
1141 			 sector_t capacity, int geom[])
1142 {
1143 	ips_ha_t *ha = (ips_ha_t *) sdev->host->hostdata;
1144 	int heads;
1145 	int sectors;
1146 	int cylinders;
1147 
1148 	METHOD_TRACE("ips_biosparam", 1);
1149 
1150 	if (!ha)
1151 		/* ?!?! host adater info invalid */
1152 		return (0);
1153 
1154 	if (!ha->active)
1155 		return (0);
1156 
1157 	if (!ips_read_adapter_status(ha, IPS_INTR_ON))
1158 		/* ?!?! Enquiry command failed */
1159 		return (0);
1160 
1161 	if ((capacity > 0x400000) && ((ha->enq->ucMiscFlag & 0x8) == 0)) {
1162 		heads = IPS_NORM_HEADS;
1163 		sectors = IPS_NORM_SECTORS;
1164 	} else {
1165 		heads = IPS_COMP_HEADS;
1166 		sectors = IPS_COMP_SECTORS;
1167 	}
1168 
1169 	cylinders = (unsigned long) capacity / (heads * sectors);
1170 
1171 	DEBUG_VAR(2, "Geometry: heads: %d, sectors: %d, cylinders: %d",
1172 		  heads, sectors, cylinders);
1173 
1174 	geom[0] = heads;
1175 	geom[1] = sectors;
1176 	geom[2] = cylinders;
1177 
1178 	return (0);
1179 }
1180 
1181 /****************************************************************************/
1182 /*                                                                          */
1183 /* Routine Name: ips_slave_configure                                        */
1184 /*                                                                          */
1185 /* Routine Description:                                                     */
1186 /*                                                                          */
1187 /*   Set queue depths on devices once scan is complete                      */
1188 /*                                                                          */
1189 /****************************************************************************/
1190 static int
1191 ips_slave_configure(struct scsi_device * SDptr)
1192 {
1193 	ips_ha_t *ha;
1194 	int min;
1195 
1196 	ha = IPS_HA(SDptr->host);
1197 	if (SDptr->tagged_supported && SDptr->type == TYPE_DISK) {
1198 		min = ha->max_cmds / 2;
1199 		if (ha->enq->ucLogDriveCount <= 2)
1200 			min = ha->max_cmds - 1;
1201 		scsi_change_queue_depth(SDptr, min);
1202 	}
1203 
1204 	SDptr->skip_ms_page_8 = 1;
1205 	SDptr->skip_ms_page_3f = 1;
1206 	return 0;
1207 }
1208 
1209 /****************************************************************************/
1210 /*                                                                          */
1211 /* Routine Name: do_ipsintr                                                 */
1212 /*                                                                          */
1213 /* Routine Description:                                                     */
1214 /*                                                                          */
1215 /*   Wrapper for the interrupt handler                                      */
1216 /*                                                                          */
1217 /****************************************************************************/
1218 static irqreturn_t
1219 do_ipsintr(int irq, void *dev_id)
1220 {
1221 	ips_ha_t *ha;
1222 	struct Scsi_Host *host;
1223 	int irqstatus;
1224 
1225 	METHOD_TRACE("do_ipsintr", 2);
1226 
1227 	ha = (ips_ha_t *) dev_id;
1228 	if (!ha)
1229 		return IRQ_NONE;
1230 	host = ips_sh[ha->host_num];
1231 	/* interrupt during initialization */
1232 	if (!host) {
1233 		(*ha->func.intr) (ha);
1234 		return IRQ_HANDLED;
1235 	}
1236 
1237 	spin_lock(host->host_lock);
1238 
1239 	if (!ha->active) {
1240 		spin_unlock(host->host_lock);
1241 		return IRQ_HANDLED;
1242 	}
1243 
1244 	irqstatus = (*ha->func.intr) (ha);
1245 
1246 	spin_unlock(host->host_lock);
1247 
1248 	/* start the next command */
1249 	ips_next(ha, IPS_INTR_ON);
1250 	return IRQ_RETVAL(irqstatus);
1251 }
1252 
1253 /****************************************************************************/
1254 /*                                                                          */
1255 /* Routine Name: ips_intr_copperhead                                        */
1256 /*                                                                          */
1257 /* Routine Description:                                                     */
1258 /*                                                                          */
1259 /*   Polling interrupt handler                                              */
1260 /*                                                                          */
1261 /*   ASSUMES interrupts are disabled                                        */
1262 /*                                                                          */
1263 /****************************************************************************/
1264 int
1265 ips_intr_copperhead(ips_ha_t * ha)
1266 {
1267 	ips_stat_t *sp;
1268 	ips_scb_t *scb;
1269 	IPS_STATUS cstatus;
1270 	int intrstatus;
1271 
1272 	METHOD_TRACE("ips_intr", 2);
1273 
1274 	if (!ha)
1275 		return 0;
1276 
1277 	if (!ha->active)
1278 		return 0;
1279 
1280 	intrstatus = (*ha->func.isintr) (ha);
1281 
1282 	if (!intrstatus) {
1283 		/*
1284 		 * Unexpected/Shared interrupt
1285 		 */
1286 
1287 		return 0;
1288 	}
1289 
1290 	while (TRUE) {
1291 		sp = &ha->sp;
1292 
1293 		intrstatus = (*ha->func.isintr) (ha);
1294 
1295 		if (!intrstatus)
1296 			break;
1297 		else
1298 			cstatus.value = (*ha->func.statupd) (ha);
1299 
1300 		if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1301 			/* Spurious Interrupt ? */
1302 			continue;
1303 		}
1304 
1305 		ips_chkstatus(ha, &cstatus);
1306 		scb = (ips_scb_t *) sp->scb_addr;
1307 
1308 		/*
1309 		 * use the callback function to finish things up
1310 		 * NOTE: interrupts are OFF for this
1311 		 */
1312 		(*scb->callback) (ha, scb);
1313 	}			/* end while */
1314 	return 1;
1315 }
1316 
1317 /****************************************************************************/
1318 /*                                                                          */
1319 /* Routine Name: ips_intr_morpheus                                          */
1320 /*                                                                          */
1321 /* Routine Description:                                                     */
1322 /*                                                                          */
1323 /*   Polling interrupt handler                                              */
1324 /*                                                                          */
1325 /*   ASSUMES interrupts are disabled                                        */
1326 /*                                                                          */
1327 /****************************************************************************/
1328 int
1329 ips_intr_morpheus(ips_ha_t * ha)
1330 {
1331 	ips_stat_t *sp;
1332 	ips_scb_t *scb;
1333 	IPS_STATUS cstatus;
1334 	int intrstatus;
1335 
1336 	METHOD_TRACE("ips_intr_morpheus", 2);
1337 
1338 	if (!ha)
1339 		return 0;
1340 
1341 	if (!ha->active)
1342 		return 0;
1343 
1344 	intrstatus = (*ha->func.isintr) (ha);
1345 
1346 	if (!intrstatus) {
1347 		/*
1348 		 * Unexpected/Shared interrupt
1349 		 */
1350 
1351 		return 0;
1352 	}
1353 
1354 	while (TRUE) {
1355 		sp = &ha->sp;
1356 
1357 		intrstatus = (*ha->func.isintr) (ha);
1358 
1359 		if (!intrstatus)
1360 			break;
1361 		else
1362 			cstatus.value = (*ha->func.statupd) (ha);
1363 
1364 		if (cstatus.value == 0xffffffff)
1365 			/* No more to process */
1366 			break;
1367 
1368 		if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1369 			IPS_PRINTK(KERN_WARNING, ha->pcidev,
1370 				   "Spurious interrupt; no ccb.\n");
1371 
1372 			continue;
1373 		}
1374 
1375 		ips_chkstatus(ha, &cstatus);
1376 		scb = (ips_scb_t *) sp->scb_addr;
1377 
1378 		/*
1379 		 * use the callback function to finish things up
1380 		 * NOTE: interrupts are OFF for this
1381 		 */
1382 		(*scb->callback) (ha, scb);
1383 	}			/* end while */
1384 	return 1;
1385 }
1386 
1387 /****************************************************************************/
1388 /*                                                                          */
1389 /* Routine Name: ips_info                                                   */
1390 /*                                                                          */
1391 /* Routine Description:                                                     */
1392 /*                                                                          */
1393 /*   Return info about the driver                                           */
1394 /*                                                                          */
1395 /****************************************************************************/
1396 static const char *
1397 ips_info(struct Scsi_Host *SH)
1398 {
1399 	static char buffer[256];
1400 	char *bp;
1401 	ips_ha_t *ha;
1402 
1403 	METHOD_TRACE("ips_info", 1);
1404 
1405 	ha = IPS_HA(SH);
1406 
1407 	if (!ha)
1408 		return (NULL);
1409 
1410 	bp = &buffer[0];
1411 	memset(bp, 0, sizeof (buffer));
1412 
1413 	sprintf(bp, "%s%s%s Build %d", "IBM PCI ServeRAID ",
1414 		IPS_VERSION_HIGH, IPS_VERSION_LOW, IPS_BUILD_IDENT);
1415 
1416 	if (ha->ad_type > 0 && ha->ad_type <= MAX_ADAPTER_NAME) {
1417 		strcat(bp, " <");
1418 		strcat(bp, ips_adapter_name[ha->ad_type - 1]);
1419 		strcat(bp, ">");
1420 	}
1421 
1422 	return (bp);
1423 }
1424 
1425 static int
1426 ips_write_info(struct Scsi_Host *host, char *buffer, int length)
1427 {
1428 	int i;
1429 	ips_ha_t *ha = NULL;
1430 
1431 	/* Find our host structure */
1432 	for (i = 0; i < ips_next_controller; i++) {
1433 		if (ips_sh[i]) {
1434 			if (ips_sh[i] == host) {
1435 				ha = (ips_ha_t *) ips_sh[i]->hostdata;
1436 				break;
1437 			}
1438 		}
1439 	}
1440 
1441 	if (!ha)
1442 		return (-EINVAL);
1443 
1444 	return 0;
1445 }
1446 
1447 static int
1448 ips_show_info(struct seq_file *m, struct Scsi_Host *host)
1449 {
1450 	int i;
1451 	ips_ha_t *ha = NULL;
1452 
1453 	/* Find our host structure */
1454 	for (i = 0; i < ips_next_controller; i++) {
1455 		if (ips_sh[i]) {
1456 			if (ips_sh[i] == host) {
1457 				ha = (ips_ha_t *) ips_sh[i]->hostdata;
1458 				break;
1459 			}
1460 		}
1461 	}
1462 
1463 	if (!ha)
1464 		return (-EINVAL);
1465 
1466 	return ips_host_info(ha, m);
1467 }
1468 
1469 /*--------------------------------------------------------------------------*/
1470 /* Helper Functions                                                         */
1471 /*--------------------------------------------------------------------------*/
1472 
1473 /****************************************************************************/
1474 /*                                                                          */
1475 /* Routine Name: ips_is_passthru                                            */
1476 /*                                                                          */
1477 /* Routine Description:                                                     */
1478 /*                                                                          */
1479 /*   Determine if the specified SCSI command is really a passthru command   */
1480 /*                                                                          */
1481 /****************************************************************************/
1482 static int ips_is_passthru(struct scsi_cmnd *SC)
1483 {
1484 	unsigned long flags;
1485 
1486 	METHOD_TRACE("ips_is_passthru", 1);
1487 
1488 	if (!SC)
1489 		return (0);
1490 
1491 	if ((SC->cmnd[0] == IPS_IOCTL_COMMAND) &&
1492 	    (SC->device->channel == 0) &&
1493 	    (SC->device->id == IPS_ADAPTER_ID) &&
1494 	    (SC->device->lun == 0) && scsi_sglist(SC)) {
1495                 struct scatterlist *sg = scsi_sglist(SC);
1496                 char  *buffer;
1497 
1498                 /* kmap_atomic() ensures addressability of the user buffer.*/
1499                 /* local_irq_save() protects the KM_IRQ0 address slot.     */
1500                 local_irq_save(flags);
1501                 buffer = kmap_atomic(sg_page(sg)) + sg->offset;
1502                 if (buffer && buffer[0] == 'C' && buffer[1] == 'O' &&
1503                     buffer[2] == 'P' && buffer[3] == 'P') {
1504                         kunmap_atomic(buffer - sg->offset);
1505                         local_irq_restore(flags);
1506                         return 1;
1507                 }
1508                 kunmap_atomic(buffer - sg->offset);
1509                 local_irq_restore(flags);
1510 	}
1511 	return 0;
1512 }
1513 
1514 /****************************************************************************/
1515 /*                                                                          */
1516 /* Routine Name: ips_alloc_passthru_buffer                                  */
1517 /*                                                                          */
1518 /* Routine Description:                                                     */
1519 /*   allocate a buffer large enough for the ioctl data if the ioctl buffer  */
1520 /*   is too small or doesn't exist                                          */
1521 /****************************************************************************/
1522 static int
1523 ips_alloc_passthru_buffer(ips_ha_t * ha, int length)
1524 {
1525 	void *bigger_buf;
1526 	dma_addr_t dma_busaddr;
1527 
1528 	if (ha->ioctl_data && length <= ha->ioctl_len)
1529 		return 0;
1530 	/* there is no buffer or it's not big enough, allocate a new one */
1531 	bigger_buf = dma_alloc_coherent(&ha->pcidev->dev, length, &dma_busaddr,
1532 			GFP_KERNEL);
1533 	if (bigger_buf) {
1534 		/* free the old memory */
1535 		dma_free_coherent(&ha->pcidev->dev, ha->ioctl_len,
1536 				  ha->ioctl_data, ha->ioctl_busaddr);
1537 		/* use the new memory */
1538 		ha->ioctl_data = (char *) bigger_buf;
1539 		ha->ioctl_len = length;
1540 		ha->ioctl_busaddr = dma_busaddr;
1541 	} else {
1542 		return -1;
1543 	}
1544 	return 0;
1545 }
1546 
1547 /****************************************************************************/
1548 /*                                                                          */
1549 /* Routine Name: ips_make_passthru                                          */
1550 /*                                                                          */
1551 /* Routine Description:                                                     */
1552 /*                                                                          */
1553 /*   Make a passthru command out of the info in the Scsi block              */
1554 /*                                                                          */
1555 /****************************************************************************/
1556 static int
1557 ips_make_passthru(ips_ha_t *ha, struct scsi_cmnd *SC, ips_scb_t *scb, int intr)
1558 {
1559 	ips_passthru_t *pt;
1560 	int length = 0;
1561 	int i, ret;
1562         struct scatterlist *sg = scsi_sglist(SC);
1563 
1564 	METHOD_TRACE("ips_make_passthru", 1);
1565 
1566         scsi_for_each_sg(SC, sg, scsi_sg_count(SC), i)
1567 		length += sg->length;
1568 
1569 	if (length < sizeof (ips_passthru_t)) {
1570 		/* wrong size */
1571 		DEBUG_VAR(1, "(%s%d) Passthru structure wrong size",
1572 			  ips_name, ha->host_num);
1573 		return (IPS_FAILURE);
1574 	}
1575 	if (ips_alloc_passthru_buffer(ha, length)) {
1576 		/* allocation failure!  If ha->ioctl_data exists, use it to return
1577 		   some error codes.  Return a failed command to the scsi layer. */
1578 		if (ha->ioctl_data) {
1579 			pt = (ips_passthru_t *) ha->ioctl_data;
1580 			ips_scmd_buf_read(SC, pt, sizeof (ips_passthru_t));
1581 			pt->BasicStatus = 0x0B;
1582 			pt->ExtendedStatus = 0x00;
1583 			ips_scmd_buf_write(SC, pt, sizeof (ips_passthru_t));
1584 		}
1585 		return IPS_FAILURE;
1586 	}
1587 	ha->ioctl_datasize = length;
1588 
1589 	ips_scmd_buf_read(SC, ha->ioctl_data, ha->ioctl_datasize);
1590 	pt = (ips_passthru_t *) ha->ioctl_data;
1591 
1592 	/*
1593 	 * Some notes about the passthru interface used
1594 	 *
1595 	 * IF the scsi op_code == 0x0d then we assume
1596 	 * that the data came along with/goes with the
1597 	 * packet we received from the sg driver. In this
1598 	 * case the CmdBSize field of the pt structure is
1599 	 * used for the size of the buffer.
1600 	 */
1601 
1602 	switch (pt->CoppCmd) {
1603 	case IPS_NUMCTRLS:
1604 		memcpy(ha->ioctl_data + sizeof (ips_passthru_t),
1605 		       &ips_num_controllers, sizeof (int));
1606 		ips_scmd_buf_write(SC, ha->ioctl_data,
1607 				   sizeof (ips_passthru_t) + sizeof (int));
1608 		SC->result = DID_OK << 16;
1609 
1610 		return (IPS_SUCCESS_IMM);
1611 
1612 	case IPS_COPPUSRCMD:
1613 	case IPS_COPPIOCCMD:
1614 		if (SC->cmnd[0] == IPS_IOCTL_COMMAND) {
1615 			if (length < (sizeof (ips_passthru_t) + pt->CmdBSize)) {
1616 				/* wrong size */
1617 				DEBUG_VAR(1,
1618 					  "(%s%d) Passthru structure wrong size",
1619 					  ips_name, ha->host_num);
1620 
1621 				return (IPS_FAILURE);
1622 			}
1623 
1624 			if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
1625 			    pt->CoppCP.cmd.flashfw.op_code ==
1626 			    IPS_CMD_RW_BIOSFW) {
1627 				ret = ips_flash_copperhead(ha, pt, scb);
1628 				ips_scmd_buf_write(SC, ha->ioctl_data,
1629 						   sizeof (ips_passthru_t));
1630 				return ret;
1631 			}
1632 			if (ips_usrcmd(ha, pt, scb))
1633 				return (IPS_SUCCESS);
1634 			else
1635 				return (IPS_FAILURE);
1636 		}
1637 
1638 		break;
1639 
1640 	}			/* end switch */
1641 
1642 	return (IPS_FAILURE);
1643 }
1644 
1645 /****************************************************************************/
1646 /* Routine Name: ips_flash_copperhead                                       */
1647 /* Routine Description:                                                     */
1648 /*   Flash the BIOS/FW on a Copperhead style controller                     */
1649 /****************************************************************************/
1650 static int
1651 ips_flash_copperhead(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1652 {
1653 	int datasize;
1654 
1655 	/* Trombone is the only copperhead that can do packet flash, but only
1656 	 * for firmware. No one said it had to make sense. */
1657 	if (IPS_IS_TROMBONE(ha) && pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE) {
1658 		if (ips_usrcmd(ha, pt, scb))
1659 			return IPS_SUCCESS;
1660 		else
1661 			return IPS_FAILURE;
1662 	}
1663 	pt->BasicStatus = 0x0B;
1664 	pt->ExtendedStatus = 0;
1665 	scb->scsi_cmd->result = DID_OK << 16;
1666 	/* IF it's OK to Use the "CD BOOT" Flash Buffer, then you can     */
1667 	/* avoid allocating a huge buffer per adapter ( which can fail ). */
1668 	if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1669 	    pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1670 		pt->BasicStatus = 0;
1671 		return ips_flash_bios(ha, pt, scb);
1672 	} else if (pt->CoppCP.cmd.flashfw.packet_num == 0) {
1673 		if (ips_FlashData && !test_and_set_bit(0, &ips_FlashDataInUse)){
1674 			ha->flash_data = ips_FlashData;
1675 			ha->flash_busaddr = ips_flashbusaddr;
1676 			ha->flash_len = PAGE_SIZE << 7;
1677 			ha->flash_datasize = 0;
1678 		} else if (!ha->flash_data) {
1679 			datasize = pt->CoppCP.cmd.flashfw.total_packets *
1680 			    pt->CoppCP.cmd.flashfw.count;
1681 			ha->flash_data = dma_alloc_coherent(&ha->pcidev->dev,
1682 					datasize, &ha->flash_busaddr, GFP_KERNEL);
1683 			if (!ha->flash_data){
1684 				printk(KERN_WARNING "Unable to allocate a flash buffer\n");
1685 				return IPS_FAILURE;
1686 			}
1687 			ha->flash_datasize = 0;
1688 			ha->flash_len = datasize;
1689 		} else
1690 			return IPS_FAILURE;
1691 	} else {
1692 		if (pt->CoppCP.cmd.flashfw.count + ha->flash_datasize >
1693 		    ha->flash_len) {
1694 			ips_free_flash_copperhead(ha);
1695 			IPS_PRINTK(KERN_WARNING, ha->pcidev,
1696 				   "failed size sanity check\n");
1697 			return IPS_FAILURE;
1698 		}
1699 	}
1700 	if (!ha->flash_data)
1701 		return IPS_FAILURE;
1702 	pt->BasicStatus = 0;
1703 	memcpy(&ha->flash_data[ha->flash_datasize], pt + 1,
1704 	       pt->CoppCP.cmd.flashfw.count);
1705 	ha->flash_datasize += pt->CoppCP.cmd.flashfw.count;
1706 	if (pt->CoppCP.cmd.flashfw.packet_num ==
1707 	    pt->CoppCP.cmd.flashfw.total_packets - 1) {
1708 		if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE)
1709 			return ips_flash_bios(ha, pt, scb);
1710 		else if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE)
1711 			return ips_flash_firmware(ha, pt, scb);
1712 	}
1713 	return IPS_SUCCESS_IMM;
1714 }
1715 
1716 /****************************************************************************/
1717 /* Routine Name: ips_flash_bios                                             */
1718 /* Routine Description:                                                     */
1719 /*   flashes the bios of a copperhead adapter                               */
1720 /****************************************************************************/
1721 static int
1722 ips_flash_bios(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1723 {
1724 
1725 	if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1726 	    pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_BIOS) {
1727 		if ((!ha->func.programbios) || (!ha->func.erasebios) ||
1728 		    (!ha->func.verifybios))
1729 			goto error;
1730 		if ((*ha->func.erasebios) (ha)) {
1731 			DEBUG_VAR(1,
1732 				  "(%s%d) flash bios failed - unable to erase flash",
1733 				  ips_name, ha->host_num);
1734 			goto error;
1735 		} else
1736 		    if ((*ha->func.programbios) (ha,
1737 						 ha->flash_data +
1738 						 IPS_BIOS_HEADER,
1739 						 ha->flash_datasize -
1740 						 IPS_BIOS_HEADER, 0)) {
1741 			DEBUG_VAR(1,
1742 				  "(%s%d) flash bios failed - unable to flash",
1743 				  ips_name, ha->host_num);
1744 			goto error;
1745 		} else
1746 		    if ((*ha->func.verifybios) (ha,
1747 						ha->flash_data +
1748 						IPS_BIOS_HEADER,
1749 						ha->flash_datasize -
1750 						IPS_BIOS_HEADER, 0)) {
1751 			DEBUG_VAR(1,
1752 				  "(%s%d) flash bios failed - unable to verify flash",
1753 				  ips_name, ha->host_num);
1754 			goto error;
1755 		}
1756 		ips_free_flash_copperhead(ha);
1757 		return IPS_SUCCESS_IMM;
1758 	} else if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1759 		   pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1760 		if (!ha->func.erasebios)
1761 			goto error;
1762 		if ((*ha->func.erasebios) (ha)) {
1763 			DEBUG_VAR(1,
1764 				  "(%s%d) flash bios failed - unable to erase flash",
1765 				  ips_name, ha->host_num);
1766 			goto error;
1767 		}
1768 		return IPS_SUCCESS_IMM;
1769 	}
1770       error:
1771 	pt->BasicStatus = 0x0B;
1772 	pt->ExtendedStatus = 0x00;
1773 	ips_free_flash_copperhead(ha);
1774 	return IPS_FAILURE;
1775 }
1776 
1777 /****************************************************************************/
1778 /*                                                                          */
1779 /* Routine Name: ips_fill_scb_sg_single                                     */
1780 /*                                                                          */
1781 /* Routine Description:                                                     */
1782 /*   Fill in a single scb sg_list element from an address                   */
1783 /*   return a -1 if a breakup occurred                                      */
1784 /****************************************************************************/
1785 static int
1786 ips_fill_scb_sg_single(ips_ha_t * ha, dma_addr_t busaddr,
1787 		       ips_scb_t * scb, int indx, unsigned int e_len)
1788 {
1789 
1790 	int ret_val = 0;
1791 
1792 	if ((scb->data_len + e_len) > ha->max_xfer) {
1793 		e_len = ha->max_xfer - scb->data_len;
1794 		scb->breakup = indx;
1795 		++scb->sg_break;
1796 		ret_val = -1;
1797 	} else {
1798 		scb->breakup = 0;
1799 		scb->sg_break = 0;
1800 	}
1801 	if (IPS_USE_ENH_SGLIST(ha)) {
1802 		scb->sg_list.enh_list[indx].address_lo =
1803 		    cpu_to_le32(lower_32_bits(busaddr));
1804 		scb->sg_list.enh_list[indx].address_hi =
1805 		    cpu_to_le32(upper_32_bits(busaddr));
1806 		scb->sg_list.enh_list[indx].length = cpu_to_le32(e_len);
1807 	} else {
1808 		scb->sg_list.std_list[indx].address =
1809 		    cpu_to_le32(lower_32_bits(busaddr));
1810 		scb->sg_list.std_list[indx].length = cpu_to_le32(e_len);
1811 	}
1812 
1813 	++scb->sg_len;
1814 	scb->data_len += e_len;
1815 	return ret_val;
1816 }
1817 
1818 /****************************************************************************/
1819 /* Routine Name: ips_flash_firmware                                         */
1820 /* Routine Description:                                                     */
1821 /*   flashes the firmware of a copperhead adapter                           */
1822 /****************************************************************************/
1823 static int
1824 ips_flash_firmware(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1825 {
1826 	IPS_SG_LIST sg_list;
1827 	uint32_t cmd_busaddr;
1828 
1829 	if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE &&
1830 	    pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_FW) {
1831 		memset(&pt->CoppCP.cmd, 0, sizeof (IPS_HOST_COMMAND));
1832 		pt->CoppCP.cmd.flashfw.op_code = IPS_CMD_DOWNLOAD;
1833 		pt->CoppCP.cmd.flashfw.count = cpu_to_le32(ha->flash_datasize);
1834 	} else {
1835 		pt->BasicStatus = 0x0B;
1836 		pt->ExtendedStatus = 0x00;
1837 		ips_free_flash_copperhead(ha);
1838 		return IPS_FAILURE;
1839 	}
1840 	/* Save the S/G list pointer so it doesn't get clobbered */
1841 	sg_list.list = scb->sg_list.list;
1842 	cmd_busaddr = scb->scb_busaddr;
1843 	/* copy in the CP */
1844 	memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1845 	/* FIX stuff that might be wrong */
1846 	scb->sg_list.list = sg_list.list;
1847 	scb->scb_busaddr = cmd_busaddr;
1848 	scb->bus = scb->scsi_cmd->device->channel;
1849 	scb->target_id = scb->scsi_cmd->device->id;
1850 	scb->lun = scb->scsi_cmd->device->lun;
1851 	scb->sg_len = 0;
1852 	scb->data_len = 0;
1853 	scb->flags = 0;
1854 	scb->op_code = 0;
1855 	scb->callback = ipsintr_done;
1856 	scb->timeout = ips_cmd_timeout;
1857 
1858 	scb->data_len = ha->flash_datasize;
1859 	scb->data_busaddr =
1860 	    dma_map_single(&ha->pcidev->dev, ha->flash_data, scb->data_len,
1861 			   IPS_DMA_DIR(scb));
1862 	scb->flags |= IPS_SCB_MAP_SINGLE;
1863 	scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
1864 	scb->cmd.flashfw.buffer_addr = cpu_to_le32(scb->data_busaddr);
1865 	if (pt->TimeOut)
1866 		scb->timeout = pt->TimeOut;
1867 	scb->scsi_cmd->result = DID_OK << 16;
1868 	return IPS_SUCCESS;
1869 }
1870 
1871 /****************************************************************************/
1872 /* Routine Name: ips_free_flash_copperhead                                  */
1873 /* Routine Description:                                                     */
1874 /*   release the memory resources used to hold the flash image              */
1875 /****************************************************************************/
1876 static void
1877 ips_free_flash_copperhead(ips_ha_t * ha)
1878 {
1879 	if (ha->flash_data == ips_FlashData)
1880 		test_and_clear_bit(0, &ips_FlashDataInUse);
1881 	else if (ha->flash_data)
1882 		dma_free_coherent(&ha->pcidev->dev, ha->flash_len,
1883 				  ha->flash_data, ha->flash_busaddr);
1884 	ha->flash_data = NULL;
1885 }
1886 
1887 /****************************************************************************/
1888 /*                                                                          */
1889 /* Routine Name: ips_usrcmd                                                 */
1890 /*                                                                          */
1891 /* Routine Description:                                                     */
1892 /*                                                                          */
1893 /*   Process a user command and make it ready to send                       */
1894 /*                                                                          */
1895 /****************************************************************************/
1896 static int
1897 ips_usrcmd(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1898 {
1899 	IPS_SG_LIST sg_list;
1900 	uint32_t cmd_busaddr;
1901 
1902 	METHOD_TRACE("ips_usrcmd", 1);
1903 
1904 	if ((!scb) || (!pt) || (!ha))
1905 		return (0);
1906 
1907 	/* Save the S/G list pointer so it doesn't get clobbered */
1908 	sg_list.list = scb->sg_list.list;
1909 	cmd_busaddr = scb->scb_busaddr;
1910 	/* copy in the CP */
1911 	memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1912 	memcpy(&scb->dcdb, &pt->CoppCP.dcdb, sizeof (IPS_DCDB_TABLE));
1913 
1914 	/* FIX stuff that might be wrong */
1915 	scb->sg_list.list = sg_list.list;
1916 	scb->scb_busaddr = cmd_busaddr;
1917 	scb->bus = scb->scsi_cmd->device->channel;
1918 	scb->target_id = scb->scsi_cmd->device->id;
1919 	scb->lun = scb->scsi_cmd->device->lun;
1920 	scb->sg_len = 0;
1921 	scb->data_len = 0;
1922 	scb->flags = 0;
1923 	scb->op_code = 0;
1924 	scb->callback = ipsintr_done;
1925 	scb->timeout = ips_cmd_timeout;
1926 	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
1927 
1928 	/* we don't support DCDB/READ/WRITE Scatter Gather */
1929 	if ((scb->cmd.basic_io.op_code == IPS_CMD_READ_SG) ||
1930 	    (scb->cmd.basic_io.op_code == IPS_CMD_WRITE_SG) ||
1931 	    (scb->cmd.basic_io.op_code == IPS_CMD_DCDB_SG))
1932 		return (0);
1933 
1934 	if (pt->CmdBSize) {
1935 		scb->data_len = pt->CmdBSize;
1936 		scb->data_busaddr = ha->ioctl_busaddr + sizeof (ips_passthru_t);
1937 	} else {
1938 		scb->data_busaddr = 0L;
1939 	}
1940 
1941 	if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1942 		scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
1943 							 (unsigned long) &scb->
1944 							 dcdb -
1945 							 (unsigned long) scb);
1946 
1947 	if (pt->CmdBSize) {
1948 		if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1949 			scb->dcdb.buffer_pointer =
1950 			    cpu_to_le32(scb->data_busaddr);
1951 		else
1952 			scb->cmd.basic_io.sg_addr =
1953 			    cpu_to_le32(scb->data_busaddr);
1954 	}
1955 
1956 	/* set timeouts */
1957 	if (pt->TimeOut) {
1958 		scb->timeout = pt->TimeOut;
1959 
1960 		if (pt->TimeOut <= 10)
1961 			scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;
1962 		else if (pt->TimeOut <= 60)
1963 			scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;
1964 		else
1965 			scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;
1966 	}
1967 
1968 	/* assume success */
1969 	scb->scsi_cmd->result = DID_OK << 16;
1970 
1971 	/* success */
1972 	return (1);
1973 }
1974 
1975 /****************************************************************************/
1976 /*                                                                          */
1977 /* Routine Name: ips_cleanup_passthru                                       */
1978 /*                                                                          */
1979 /* Routine Description:                                                     */
1980 /*                                                                          */
1981 /*   Cleanup after a passthru command                                       */
1982 /*                                                                          */
1983 /****************************************************************************/
1984 static void
1985 ips_cleanup_passthru(ips_ha_t * ha, ips_scb_t * scb)
1986 {
1987 	ips_passthru_t *pt;
1988 
1989 	METHOD_TRACE("ips_cleanup_passthru", 1);
1990 
1991 	if ((!scb) || (!scb->scsi_cmd) || (!scsi_sglist(scb->scsi_cmd))) {
1992 		DEBUG_VAR(1, "(%s%d) couldn't cleanup after passthru",
1993 			  ips_name, ha->host_num);
1994 
1995 		return;
1996 	}
1997 	pt = (ips_passthru_t *) ha->ioctl_data;
1998 
1999 	/* Copy data back to the user */
2000 	if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)	/* Copy DCDB Back to Caller's Area */
2001 		memcpy(&pt->CoppCP.dcdb, &scb->dcdb, sizeof (IPS_DCDB_TABLE));
2002 
2003 	pt->BasicStatus = scb->basic_status;
2004 	pt->ExtendedStatus = scb->extended_status;
2005 	pt->AdapterType = ha->ad_type;
2006 
2007 	if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
2008 	    (scb->cmd.flashfw.op_code == IPS_CMD_DOWNLOAD ||
2009 	     scb->cmd.flashfw.op_code == IPS_CMD_RW_BIOSFW))
2010 		ips_free_flash_copperhead(ha);
2011 
2012 	ips_scmd_buf_write(scb->scsi_cmd, ha->ioctl_data, ha->ioctl_datasize);
2013 }
2014 
2015 /****************************************************************************/
2016 /*                                                                          */
2017 /* Routine Name: ips_host_info                                              */
2018 /*                                                                          */
2019 /* Routine Description:                                                     */
2020 /*                                                                          */
2021 /*   The passthru interface for the driver                                  */
2022 /*                                                                          */
2023 /****************************************************************************/
2024 static int
2025 ips_host_info(ips_ha_t *ha, struct seq_file *m)
2026 {
2027 	METHOD_TRACE("ips_host_info", 1);
2028 
2029 	seq_puts(m, "\nIBM ServeRAID General Information:\n\n");
2030 
2031 	if ((le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) &&
2032 	    (le16_to_cpu(ha->nvram->adapter_type) != 0))
2033 		seq_printf(m, "\tController Type                   : %s\n",
2034 			  ips_adapter_name[ha->ad_type - 1]);
2035 	else
2036 		seq_puts(m, "\tController Type                   : Unknown\n");
2037 
2038 	if (ha->io_addr)
2039 		seq_printf(m,
2040 			  "\tIO region                         : 0x%x (%d bytes)\n",
2041 			  ha->io_addr, ha->io_len);
2042 
2043 	if (ha->mem_addr) {
2044 		seq_printf(m,
2045 			  "\tMemory region                     : 0x%x (%d bytes)\n",
2046 			  ha->mem_addr, ha->mem_len);
2047 		seq_printf(m,
2048 			  "\tShared memory address             : 0x%lx\n",
2049 			  (unsigned long)ha->mem_ptr);
2050 	}
2051 
2052 	seq_printf(m, "\tIRQ number                        : %d\n", ha->pcidev->irq);
2053 
2054     /* For the Next 3 lines Check for Binary 0 at the end and don't include it if it's there. */
2055     /* That keeps everything happy for "text" operations on the proc file.                    */
2056 
2057 	if (le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) {
2058 	if (ha->nvram->bios_low[3] == 0) {
2059 		seq_printf(m,
2060 			  "\tBIOS Version                      : %c%c%c%c%c%c%c\n",
2061 			  ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2062 			  ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2063 			  ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2064 			  ha->nvram->bios_low[2]);
2065 
2066         } else {
2067 		seq_printf(m,
2068 			  "\tBIOS Version                      : %c%c%c%c%c%c%c%c\n",
2069 			  ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2070 			  ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2071 			  ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2072 			  ha->nvram->bios_low[2], ha->nvram->bios_low[3]);
2073         }
2074 
2075     }
2076 
2077     if (ha->enq->CodeBlkVersion[7] == 0) {
2078         seq_printf(m,
2079 		  "\tFirmware Version                  : %c%c%c%c%c%c%c\n",
2080 		  ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2081 		  ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2082 		  ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2083 		  ha->enq->CodeBlkVersion[6]);
2084     } else {
2085 	seq_printf(m,
2086 		  "\tFirmware Version                  : %c%c%c%c%c%c%c%c\n",
2087 		  ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2088 		  ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2089 		  ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2090 		  ha->enq->CodeBlkVersion[6], ha->enq->CodeBlkVersion[7]);
2091     }
2092 
2093     if (ha->enq->BootBlkVersion[7] == 0) {
2094         seq_printf(m,
2095 		  "\tBoot Block Version                : %c%c%c%c%c%c%c\n",
2096 		  ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2097 		  ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2098 		  ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2099 		  ha->enq->BootBlkVersion[6]);
2100     } else {
2101         seq_printf(m,
2102 		  "\tBoot Block Version                : %c%c%c%c%c%c%c%c\n",
2103 		  ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2104 		  ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2105 		  ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2106 		  ha->enq->BootBlkVersion[6], ha->enq->BootBlkVersion[7]);
2107     }
2108 
2109 	seq_printf(m, "\tDriver Version                    : %s%s\n",
2110 		  IPS_VERSION_HIGH, IPS_VERSION_LOW);
2111 
2112 	seq_printf(m, "\tDriver Build                      : %d\n",
2113 		  IPS_BUILD_IDENT);
2114 
2115 	seq_printf(m, "\tMax Physical Devices              : %d\n",
2116 		  ha->enq->ucMaxPhysicalDevices);
2117 	seq_printf(m, "\tMax Active Commands               : %d\n",
2118 		  ha->max_cmds);
2119 	seq_printf(m, "\tCurrent Queued Commands           : %d\n",
2120 		  ha->scb_waitlist.count);
2121 	seq_printf(m, "\tCurrent Active Commands           : %d\n",
2122 		  ha->scb_activelist.count - ha->num_ioctl);
2123 	seq_printf(m, "\tCurrent Queued PT Commands        : %d\n",
2124 		  ha->copp_waitlist.count);
2125 	seq_printf(m, "\tCurrent Active PT Commands        : %d\n",
2126 		  ha->num_ioctl);
2127 
2128 	seq_putc(m, '\n');
2129 
2130 	return 0;
2131 }
2132 
2133 /****************************************************************************/
2134 /*                                                                          */
2135 /* Routine Name: ips_identify_controller                                    */
2136 /*                                                                          */
2137 /* Routine Description:                                                     */
2138 /*                                                                          */
2139 /*   Identify this controller                                               */
2140 /*                                                                          */
2141 /****************************************************************************/
2142 static void
2143 ips_identify_controller(ips_ha_t * ha)
2144 {
2145 	METHOD_TRACE("ips_identify_controller", 1);
2146 
2147 	switch (ha->pcidev->device) {
2148 	case IPS_DEVICEID_COPPERHEAD:
2149 		if (ha->pcidev->revision <= IPS_REVID_SERVERAID) {
2150 			ha->ad_type = IPS_ADTYPE_SERVERAID;
2151 		} else if (ha->pcidev->revision == IPS_REVID_SERVERAID2) {
2152 			ha->ad_type = IPS_ADTYPE_SERVERAID2;
2153 		} else if (ha->pcidev->revision == IPS_REVID_NAVAJO) {
2154 			ha->ad_type = IPS_ADTYPE_NAVAJO;
2155 		} else if ((ha->pcidev->revision == IPS_REVID_SERVERAID2)
2156 			   && (ha->slot_num == 0)) {
2157 			ha->ad_type = IPS_ADTYPE_KIOWA;
2158 		} else if ((ha->pcidev->revision >= IPS_REVID_CLARINETP1) &&
2159 			   (ha->pcidev->revision <= IPS_REVID_CLARINETP3)) {
2160 			if (ha->enq->ucMaxPhysicalDevices == 15)
2161 				ha->ad_type = IPS_ADTYPE_SERVERAID3L;
2162 			else
2163 				ha->ad_type = IPS_ADTYPE_SERVERAID3;
2164 		} else if ((ha->pcidev->revision >= IPS_REVID_TROMBONE32) &&
2165 			   (ha->pcidev->revision <= IPS_REVID_TROMBONE64)) {
2166 			ha->ad_type = IPS_ADTYPE_SERVERAID4H;
2167 		}
2168 		break;
2169 
2170 	case IPS_DEVICEID_MORPHEUS:
2171 		switch (ha->pcidev->subsystem_device) {
2172 		case IPS_SUBDEVICEID_4L:
2173 			ha->ad_type = IPS_ADTYPE_SERVERAID4L;
2174 			break;
2175 
2176 		case IPS_SUBDEVICEID_4M:
2177 			ha->ad_type = IPS_ADTYPE_SERVERAID4M;
2178 			break;
2179 
2180 		case IPS_SUBDEVICEID_4MX:
2181 			ha->ad_type = IPS_ADTYPE_SERVERAID4MX;
2182 			break;
2183 
2184 		case IPS_SUBDEVICEID_4LX:
2185 			ha->ad_type = IPS_ADTYPE_SERVERAID4LX;
2186 			break;
2187 
2188 		case IPS_SUBDEVICEID_5I2:
2189 			ha->ad_type = IPS_ADTYPE_SERVERAID5I2;
2190 			break;
2191 
2192 		case IPS_SUBDEVICEID_5I1:
2193 			ha->ad_type = IPS_ADTYPE_SERVERAID5I1;
2194 			break;
2195 		}
2196 
2197 		break;
2198 
2199 	case IPS_DEVICEID_MARCO:
2200 		switch (ha->pcidev->subsystem_device) {
2201 		case IPS_SUBDEVICEID_6M:
2202 			ha->ad_type = IPS_ADTYPE_SERVERAID6M;
2203 			break;
2204 		case IPS_SUBDEVICEID_6I:
2205 			ha->ad_type = IPS_ADTYPE_SERVERAID6I;
2206 			break;
2207 		case IPS_SUBDEVICEID_7k:
2208 			ha->ad_type = IPS_ADTYPE_SERVERAID7k;
2209 			break;
2210 		case IPS_SUBDEVICEID_7M:
2211 			ha->ad_type = IPS_ADTYPE_SERVERAID7M;
2212 			break;
2213 		}
2214 		break;
2215 	}
2216 }
2217 
2218 /****************************************************************************/
2219 /*                                                                          */
2220 /* Routine Name: ips_get_bios_version                                       */
2221 /*                                                                          */
2222 /* Routine Description:                                                     */
2223 /*                                                                          */
2224 /*   Get the BIOS revision number                                           */
2225 /*                                                                          */
2226 /****************************************************************************/
2227 static void
2228 ips_get_bios_version(ips_ha_t * ha, int intr)
2229 {
2230 	ips_scb_t *scb;
2231 	int ret;
2232 	uint8_t major;
2233 	uint8_t minor;
2234 	uint8_t subminor;
2235 	uint8_t *buffer;
2236 
2237 	METHOD_TRACE("ips_get_bios_version", 1);
2238 
2239 	major = 0;
2240 	minor = 0;
2241 
2242 	strncpy(ha->bios_version, "       ?", 8);
2243 
2244 	if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD) {
2245 		if (IPS_USE_MEMIO(ha)) {
2246 			/* Memory Mapped I/O */
2247 
2248 			/* test 1st byte */
2249 			writel(0, ha->mem_ptr + IPS_REG_FLAP);
2250 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2251 				udelay(25);	/* 25 us */
2252 
2253 			if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
2254 				return;
2255 
2256 			writel(1, ha->mem_ptr + IPS_REG_FLAP);
2257 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2258 				udelay(25);	/* 25 us */
2259 
2260 			if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
2261 				return;
2262 
2263 			/* Get Major version */
2264 			writel(0x1FF, ha->mem_ptr + IPS_REG_FLAP);
2265 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2266 				udelay(25);	/* 25 us */
2267 
2268 			major = readb(ha->mem_ptr + IPS_REG_FLDP);
2269 
2270 			/* Get Minor version */
2271 			writel(0x1FE, ha->mem_ptr + IPS_REG_FLAP);
2272 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2273 				udelay(25);	/* 25 us */
2274 			minor = readb(ha->mem_ptr + IPS_REG_FLDP);
2275 
2276 			/* Get SubMinor version */
2277 			writel(0x1FD, ha->mem_ptr + IPS_REG_FLAP);
2278 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2279 				udelay(25);	/* 25 us */
2280 			subminor = readb(ha->mem_ptr + IPS_REG_FLDP);
2281 
2282 		} else {
2283 			/* Programmed I/O */
2284 
2285 			/* test 1st byte */
2286 			outl(0, ha->io_addr + IPS_REG_FLAP);
2287 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2288 				udelay(25);	/* 25 us */
2289 
2290 			if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
2291 				return;
2292 
2293 			outl(1, ha->io_addr + IPS_REG_FLAP);
2294 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2295 				udelay(25);	/* 25 us */
2296 
2297 			if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
2298 				return;
2299 
2300 			/* Get Major version */
2301 			outl(0x1FF, ha->io_addr + IPS_REG_FLAP);
2302 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2303 				udelay(25);	/* 25 us */
2304 
2305 			major = inb(ha->io_addr + IPS_REG_FLDP);
2306 
2307 			/* Get Minor version */
2308 			outl(0x1FE, ha->io_addr + IPS_REG_FLAP);
2309 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2310 				udelay(25);	/* 25 us */
2311 
2312 			minor = inb(ha->io_addr + IPS_REG_FLDP);
2313 
2314 			/* Get SubMinor version */
2315 			outl(0x1FD, ha->io_addr + IPS_REG_FLAP);
2316 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2317 				udelay(25);	/* 25 us */
2318 
2319 			subminor = inb(ha->io_addr + IPS_REG_FLDP);
2320 
2321 		}
2322 	} else {
2323 		/* Morpheus Family - Send Command to the card */
2324 
2325 		buffer = ha->ioctl_data;
2326 
2327 		memset(buffer, 0, 0x1000);
2328 
2329 		scb = &ha->scbs[ha->max_cmds - 1];
2330 
2331 		ips_init_scb(ha, scb);
2332 
2333 		scb->timeout = ips_cmd_timeout;
2334 		scb->cdb[0] = IPS_CMD_RW_BIOSFW;
2335 
2336 		scb->cmd.flashfw.op_code = IPS_CMD_RW_BIOSFW;
2337 		scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
2338 		scb->cmd.flashfw.type = 1;
2339 		scb->cmd.flashfw.direction = 0;
2340 		scb->cmd.flashfw.count = cpu_to_le32(0x800);
2341 		scb->cmd.flashfw.total_packets = 1;
2342 		scb->cmd.flashfw.packet_num = 0;
2343 		scb->data_len = 0x1000;
2344 		scb->cmd.flashfw.buffer_addr = ha->ioctl_busaddr;
2345 
2346 		/* issue the command */
2347 		if (((ret =
2348 		      ips_send_wait(ha, scb, ips_cmd_timeout,
2349 				    intr)) == IPS_FAILURE)
2350 		    || (ret == IPS_SUCCESS_IMM)
2351 		    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
2352 			/* Error occurred */
2353 
2354 			return;
2355 		}
2356 
2357 		if ((buffer[0xC0] == 0x55) && (buffer[0xC1] == 0xAA)) {
2358 			major = buffer[0x1ff + 0xC0];	/* Offset 0x1ff after the header (0xc0) */
2359 			minor = buffer[0x1fe + 0xC0];	/* Offset 0x1fe after the header (0xc0) */
2360 			subminor = buffer[0x1fd + 0xC0];	/* Offset 0x1fd after the header (0xc0) */
2361 		} else {
2362 			return;
2363 		}
2364 	}
2365 
2366 	ha->bios_version[0] = hex_asc_upper_hi(major);
2367 	ha->bios_version[1] = '.';
2368 	ha->bios_version[2] = hex_asc_upper_lo(major);
2369 	ha->bios_version[3] = hex_asc_upper_lo(subminor);
2370 	ha->bios_version[4] = '.';
2371 	ha->bios_version[5] = hex_asc_upper_hi(minor);
2372 	ha->bios_version[6] = hex_asc_upper_lo(minor);
2373 	ha->bios_version[7] = 0;
2374 }
2375 
2376 /****************************************************************************/
2377 /*                                                                          */
2378 /* Routine Name: ips_hainit                                                 */
2379 /*                                                                          */
2380 /* Routine Description:                                                     */
2381 /*                                                                          */
2382 /*   Initialize the controller                                              */
2383 /*                                                                          */
2384 /* NOTE: Assumes to be called from with a lock                              */
2385 /*                                                                          */
2386 /****************************************************************************/
2387 static int
2388 ips_hainit(ips_ha_t * ha)
2389 {
2390 	int i;
2391 
2392 	METHOD_TRACE("ips_hainit", 1);
2393 
2394 	if (!ha)
2395 		return (0);
2396 
2397 	if (ha->func.statinit)
2398 		(*ha->func.statinit) (ha);
2399 
2400 	if (ha->func.enableint)
2401 		(*ha->func.enableint) (ha);
2402 
2403 	/* Send FFDC */
2404 	ha->reset_count = 1;
2405 	ha->last_ffdc = ktime_get_real_seconds();
2406 	ips_ffdc_reset(ha, IPS_INTR_IORL);
2407 
2408 	if (!ips_read_config(ha, IPS_INTR_IORL)) {
2409 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2410 			   "unable to read config from controller.\n");
2411 
2412 		return (0);
2413 	}
2414 	/* end if */
2415 	if (!ips_read_adapter_status(ha, IPS_INTR_IORL)) {
2416 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2417 			   "unable to read controller status.\n");
2418 
2419 		return (0);
2420 	}
2421 
2422 	/* Identify this controller */
2423 	ips_identify_controller(ha);
2424 
2425 	if (!ips_read_subsystem_parameters(ha, IPS_INTR_IORL)) {
2426 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2427 			   "unable to read subsystem parameters.\n");
2428 
2429 		return (0);
2430 	}
2431 
2432 	/* write nvram user page 5 */
2433 	if (!ips_write_driver_status(ha, IPS_INTR_IORL)) {
2434 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2435 			   "unable to write driver info to controller.\n");
2436 
2437 		return (0);
2438 	}
2439 
2440 	/* If there are Logical Drives and a Reset Occurred, then an EraseStripeLock is Needed */
2441 	if ((ha->conf->ucLogDriveCount > 0) && (ha->requires_esl == 1))
2442 		ips_clear_adapter(ha, IPS_INTR_IORL);
2443 
2444 	/* set limits on SID, LUN, BUS */
2445 	ha->ntargets = IPS_MAX_TARGETS + 1;
2446 	ha->nlun = 1;
2447 	ha->nbus = (ha->enq->ucMaxPhysicalDevices / IPS_MAX_TARGETS) + 1;
2448 
2449 	switch (ha->conf->logical_drive[0].ucStripeSize) {
2450 	case 4:
2451 		ha->max_xfer = 0x10000;
2452 		break;
2453 
2454 	case 5:
2455 		ha->max_xfer = 0x20000;
2456 		break;
2457 
2458 	case 6:
2459 		ha->max_xfer = 0x40000;
2460 		break;
2461 
2462 	case 7:
2463 	default:
2464 		ha->max_xfer = 0x80000;
2465 		break;
2466 	}
2467 
2468 	/* setup max concurrent commands */
2469 	if (le32_to_cpu(ha->subsys->param[4]) & 0x1) {
2470 		/* Use the new method */
2471 		ha->max_cmds = ha->enq->ucConcurrentCmdCount;
2472 	} else {
2473 		/* use the old method */
2474 		switch (ha->conf->logical_drive[0].ucStripeSize) {
2475 		case 4:
2476 			ha->max_cmds = 32;
2477 			break;
2478 
2479 		case 5:
2480 			ha->max_cmds = 16;
2481 			break;
2482 
2483 		case 6:
2484 			ha->max_cmds = 8;
2485 			break;
2486 
2487 		case 7:
2488 		default:
2489 			ha->max_cmds = 4;
2490 			break;
2491 		}
2492 	}
2493 
2494 	/* Limit the Active Commands on a Lite Adapter */
2495 	if ((ha->ad_type == IPS_ADTYPE_SERVERAID3L) ||
2496 	    (ha->ad_type == IPS_ADTYPE_SERVERAID4L) ||
2497 	    (ha->ad_type == IPS_ADTYPE_SERVERAID4LX)) {
2498 		if ((ha->max_cmds > MaxLiteCmds) && (MaxLiteCmds))
2499 			ha->max_cmds = MaxLiteCmds;
2500 	}
2501 
2502 	/* set controller IDs */
2503 	ha->ha_id[0] = IPS_ADAPTER_ID;
2504 	for (i = 1; i < ha->nbus; i++) {
2505 		ha->ha_id[i] = ha->conf->init_id[i - 1] & 0x1f;
2506 		ha->dcdb_active[i - 1] = 0;
2507 	}
2508 
2509 	return (1);
2510 }
2511 
2512 /****************************************************************************/
2513 /*                                                                          */
2514 /* Routine Name: ips_next                                                   */
2515 /*                                                                          */
2516 /* Routine Description:                                                     */
2517 /*                                                                          */
2518 /*   Take the next command off the queue and send it to the controller      */
2519 /*                                                                          */
2520 /****************************************************************************/
2521 static void
2522 ips_next(ips_ha_t * ha, int intr)
2523 {
2524 	ips_scb_t *scb;
2525 	struct scsi_cmnd *SC;
2526 	struct scsi_cmnd *p;
2527 	struct scsi_cmnd *q;
2528 	ips_copp_wait_item_t *item;
2529 	int ret;
2530 	struct Scsi_Host *host;
2531 	METHOD_TRACE("ips_next", 1);
2532 
2533 	if (!ha)
2534 		return;
2535 	host = ips_sh[ha->host_num];
2536 	/*
2537 	 * Block access to the queue function so
2538 	 * this command won't time out
2539 	 */
2540 	if (intr == IPS_INTR_ON)
2541 		spin_lock(host->host_lock);
2542 
2543 	if ((ha->subsys->param[3] & 0x300000)
2544 	    && (ha->scb_activelist.count == 0)) {
2545 		time64_t now = ktime_get_real_seconds();
2546 		if (now - ha->last_ffdc > IPS_SECS_8HOURS) {
2547 			ha->last_ffdc = now;
2548 			ips_ffdc_time(ha);
2549 		}
2550 	}
2551 
2552 	/*
2553 	 * Send passthru commands
2554 	 * These have priority over normal I/O
2555 	 * but shouldn't affect performance too much
2556 	 * since we limit the number that can be active
2557 	 * on the card at any one time
2558 	 */
2559 	while ((ha->num_ioctl < IPS_MAX_IOCTL) &&
2560 	       (ha->copp_waitlist.head) && (scb = ips_getscb(ha))) {
2561 
2562 		item = ips_removeq_copp_head(&ha->copp_waitlist);
2563 		ha->num_ioctl++;
2564 		if (intr == IPS_INTR_ON)
2565 			spin_unlock(host->host_lock);
2566 		scb->scsi_cmd = item->scsi_cmd;
2567 		kfree(item);
2568 
2569 		ret = ips_make_passthru(ha, scb->scsi_cmd, scb, intr);
2570 
2571 		if (intr == IPS_INTR_ON)
2572 			spin_lock(host->host_lock);
2573 		switch (ret) {
2574 		case IPS_FAILURE:
2575 			if (scb->scsi_cmd) {
2576 				scb->scsi_cmd->result = DID_ERROR << 16;
2577 				scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2578 			}
2579 
2580 			ips_freescb(ha, scb);
2581 			break;
2582 		case IPS_SUCCESS_IMM:
2583 			if (scb->scsi_cmd) {
2584 				scb->scsi_cmd->result = DID_OK << 16;
2585 				scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2586 			}
2587 
2588 			ips_freescb(ha, scb);
2589 			break;
2590 		default:
2591 			break;
2592 		}		/* end case */
2593 
2594 		if (ret != IPS_SUCCESS) {
2595 			ha->num_ioctl--;
2596 			continue;
2597 		}
2598 
2599 		ret = ips_send_cmd(ha, scb);
2600 
2601 		if (ret == IPS_SUCCESS)
2602 			ips_putq_scb_head(&ha->scb_activelist, scb);
2603 		else
2604 			ha->num_ioctl--;
2605 
2606 		switch (ret) {
2607 		case IPS_FAILURE:
2608 			if (scb->scsi_cmd) {
2609 				scb->scsi_cmd->result = DID_ERROR << 16;
2610 			}
2611 
2612 			ips_freescb(ha, scb);
2613 			break;
2614 		case IPS_SUCCESS_IMM:
2615 			ips_freescb(ha, scb);
2616 			break;
2617 		default:
2618 			break;
2619 		}		/* end case */
2620 
2621 	}
2622 
2623 	/*
2624 	 * Send "Normal" I/O commands
2625 	 */
2626 
2627 	p = ha->scb_waitlist.head;
2628 	while ((p) && (scb = ips_getscb(ha))) {
2629 		if ((scmd_channel(p) > 0)
2630 		    && (ha->
2631 			dcdb_active[scmd_channel(p) -
2632 				    1] & (1 << scmd_id(p)))) {
2633 			ips_freescb(ha, scb);
2634 			p = (struct scsi_cmnd *) p->host_scribble;
2635 			continue;
2636 		}
2637 
2638 		q = p;
2639 		SC = ips_removeq_wait(&ha->scb_waitlist, q);
2640 
2641 		if (intr == IPS_INTR_ON)
2642 			spin_unlock(host->host_lock);	/* Unlock HA after command is taken off queue */
2643 
2644 		SC->result = DID_OK;
2645 		SC->host_scribble = NULL;
2646 
2647 		scb->target_id = SC->device->id;
2648 		scb->lun = SC->device->lun;
2649 		scb->bus = SC->device->channel;
2650 		scb->scsi_cmd = SC;
2651 		scb->breakup = 0;
2652 		scb->data_len = 0;
2653 		scb->callback = ipsintr_done;
2654 		scb->timeout = ips_cmd_timeout;
2655 		memset(&scb->cmd, 0, 16);
2656 
2657 		/* copy in the CDB */
2658 		memcpy(scb->cdb, SC->cmnd, SC->cmd_len);
2659 
2660                 scb->sg_count = scsi_dma_map(SC);
2661                 BUG_ON(scb->sg_count < 0);
2662 		if (scb->sg_count) {
2663 			struct scatterlist *sg;
2664 			int i;
2665 
2666 			scb->flags |= IPS_SCB_MAP_SG;
2667 
2668                         scsi_for_each_sg(SC, sg, scb->sg_count, i) {
2669 				if (ips_fill_scb_sg_single
2670 				    (ha, sg_dma_address(sg), scb, i,
2671 				     sg_dma_len(sg)) < 0)
2672 					break;
2673 			}
2674 			scb->dcdb.transfer_length = scb->data_len;
2675 		} else {
2676                         scb->data_busaddr = 0L;
2677                         scb->sg_len = 0;
2678                         scb->data_len = 0;
2679                         scb->dcdb.transfer_length = 0;
2680 		}
2681 
2682 		scb->dcdb.cmd_attribute =
2683 		    ips_command_direction[scb->scsi_cmd->cmnd[0]];
2684 
2685 		/* Allow a WRITE BUFFER Command to Have no Data */
2686 		/* This is Used by Tape Flash Utilites          */
2687 		if ((scb->scsi_cmd->cmnd[0] == WRITE_BUFFER) &&
2688 				(scb->data_len == 0))
2689 			scb->dcdb.cmd_attribute = 0;
2690 
2691 		if (!(scb->dcdb.cmd_attribute & 0x3))
2692 			scb->dcdb.transfer_length = 0;
2693 
2694 		if (scb->data_len >= IPS_MAX_XFER) {
2695 			scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
2696 			scb->dcdb.transfer_length = 0;
2697 		}
2698 		if (intr == IPS_INTR_ON)
2699 			spin_lock(host->host_lock);
2700 
2701 		ret = ips_send_cmd(ha, scb);
2702 
2703 		switch (ret) {
2704 		case IPS_SUCCESS:
2705 			ips_putq_scb_head(&ha->scb_activelist, scb);
2706 			break;
2707 		case IPS_FAILURE:
2708 			if (scb->scsi_cmd) {
2709 				scb->scsi_cmd->result = DID_ERROR << 16;
2710 				scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2711 			}
2712 
2713 			if (scb->bus)
2714 				ha->dcdb_active[scb->bus - 1] &=
2715 				    ~(1 << scb->target_id);
2716 
2717 			ips_freescb(ha, scb);
2718 			break;
2719 		case IPS_SUCCESS_IMM:
2720 			if (scb->scsi_cmd)
2721 				scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2722 
2723 			if (scb->bus)
2724 				ha->dcdb_active[scb->bus - 1] &=
2725 				    ~(1 << scb->target_id);
2726 
2727 			ips_freescb(ha, scb);
2728 			break;
2729 		default:
2730 			break;
2731 		}		/* end case */
2732 
2733 		p = (struct scsi_cmnd *) p->host_scribble;
2734 
2735 	}			/* end while */
2736 
2737 	if (intr == IPS_INTR_ON)
2738 		spin_unlock(host->host_lock);
2739 }
2740 
2741 /****************************************************************************/
2742 /*                                                                          */
2743 /* Routine Name: ips_putq_scb_head                                          */
2744 /*                                                                          */
2745 /* Routine Description:                                                     */
2746 /*                                                                          */
2747 /*   Add an item to the head of the queue                                   */
2748 /*                                                                          */
2749 /* ASSUMED to be called from within the HA lock                             */
2750 /*                                                                          */
2751 /****************************************************************************/
2752 static void
2753 ips_putq_scb_head(ips_scb_queue_t * queue, ips_scb_t * item)
2754 {
2755 	METHOD_TRACE("ips_putq_scb_head", 1);
2756 
2757 	if (!item)
2758 		return;
2759 
2760 	item->q_next = queue->head;
2761 	queue->head = item;
2762 
2763 	if (!queue->tail)
2764 		queue->tail = item;
2765 
2766 	queue->count++;
2767 }
2768 
2769 /****************************************************************************/
2770 /*                                                                          */
2771 /* Routine Name: ips_removeq_scb_head                                       */
2772 /*                                                                          */
2773 /* Routine Description:                                                     */
2774 /*                                                                          */
2775 /*   Remove the head of the queue                                           */
2776 /*                                                                          */
2777 /* ASSUMED to be called from within the HA lock                             */
2778 /*                                                                          */
2779 /****************************************************************************/
2780 static ips_scb_t *
2781 ips_removeq_scb_head(ips_scb_queue_t * queue)
2782 {
2783 	ips_scb_t *item;
2784 
2785 	METHOD_TRACE("ips_removeq_scb_head", 1);
2786 
2787 	item = queue->head;
2788 
2789 	if (!item) {
2790 		return (NULL);
2791 	}
2792 
2793 	queue->head = item->q_next;
2794 	item->q_next = NULL;
2795 
2796 	if (queue->tail == item)
2797 		queue->tail = NULL;
2798 
2799 	queue->count--;
2800 
2801 	return (item);
2802 }
2803 
2804 /****************************************************************************/
2805 /*                                                                          */
2806 /* Routine Name: ips_removeq_scb                                            */
2807 /*                                                                          */
2808 /* Routine Description:                                                     */
2809 /*                                                                          */
2810 /*   Remove an item from a queue                                            */
2811 /*                                                                          */
2812 /* ASSUMED to be called from within the HA lock                             */
2813 /*                                                                          */
2814 /****************************************************************************/
2815 static ips_scb_t *
2816 ips_removeq_scb(ips_scb_queue_t * queue, ips_scb_t * item)
2817 {
2818 	ips_scb_t *p;
2819 
2820 	METHOD_TRACE("ips_removeq_scb", 1);
2821 
2822 	if (!item)
2823 		return (NULL);
2824 
2825 	if (item == queue->head) {
2826 		return (ips_removeq_scb_head(queue));
2827 	}
2828 
2829 	p = queue->head;
2830 
2831 	while ((p) && (item != p->q_next))
2832 		p = p->q_next;
2833 
2834 	if (p) {
2835 		/* found a match */
2836 		p->q_next = item->q_next;
2837 
2838 		if (!item->q_next)
2839 			queue->tail = p;
2840 
2841 		item->q_next = NULL;
2842 		queue->count--;
2843 
2844 		return (item);
2845 	}
2846 
2847 	return (NULL);
2848 }
2849 
2850 /****************************************************************************/
2851 /*                                                                          */
2852 /* Routine Name: ips_putq_wait_tail                                         */
2853 /*                                                                          */
2854 /* Routine Description:                                                     */
2855 /*                                                                          */
2856 /*   Add an item to the tail of the queue                                   */
2857 /*                                                                          */
2858 /* ASSUMED to be called from within the HA lock                             */
2859 /*                                                                          */
2860 /****************************************************************************/
2861 static void ips_putq_wait_tail(ips_wait_queue_entry_t *queue, struct scsi_cmnd *item)
2862 {
2863 	METHOD_TRACE("ips_putq_wait_tail", 1);
2864 
2865 	if (!item)
2866 		return;
2867 
2868 	item->host_scribble = NULL;
2869 
2870 	if (queue->tail)
2871 		queue->tail->host_scribble = (char *) item;
2872 
2873 	queue->tail = item;
2874 
2875 	if (!queue->head)
2876 		queue->head = item;
2877 
2878 	queue->count++;
2879 }
2880 
2881 /****************************************************************************/
2882 /*                                                                          */
2883 /* Routine Name: ips_removeq_wait_head                                      */
2884 /*                                                                          */
2885 /* Routine Description:                                                     */
2886 /*                                                                          */
2887 /*   Remove the head of the queue                                           */
2888 /*                                                                          */
2889 /* ASSUMED to be called from within the HA lock                             */
2890 /*                                                                          */
2891 /****************************************************************************/
2892 static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_entry_t *queue)
2893 {
2894 	struct scsi_cmnd *item;
2895 
2896 	METHOD_TRACE("ips_removeq_wait_head", 1);
2897 
2898 	item = queue->head;
2899 
2900 	if (!item) {
2901 		return (NULL);
2902 	}
2903 
2904 	queue->head = (struct scsi_cmnd *) item->host_scribble;
2905 	item->host_scribble = NULL;
2906 
2907 	if (queue->tail == item)
2908 		queue->tail = NULL;
2909 
2910 	queue->count--;
2911 
2912 	return (item);
2913 }
2914 
2915 /****************************************************************************/
2916 /*                                                                          */
2917 /* Routine Name: ips_removeq_wait                                           */
2918 /*                                                                          */
2919 /* Routine Description:                                                     */
2920 /*                                                                          */
2921 /*   Remove an item from a queue                                            */
2922 /*                                                                          */
2923 /* ASSUMED to be called from within the HA lock                             */
2924 /*                                                                          */
2925 /****************************************************************************/
2926 static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_entry_t *queue,
2927 					  struct scsi_cmnd *item)
2928 {
2929 	struct scsi_cmnd *p;
2930 
2931 	METHOD_TRACE("ips_removeq_wait", 1);
2932 
2933 	if (!item)
2934 		return (NULL);
2935 
2936 	if (item == queue->head) {
2937 		return (ips_removeq_wait_head(queue));
2938 	}
2939 
2940 	p = queue->head;
2941 
2942 	while ((p) && (item != (struct scsi_cmnd *) p->host_scribble))
2943 		p = (struct scsi_cmnd *) p->host_scribble;
2944 
2945 	if (p) {
2946 		/* found a match */
2947 		p->host_scribble = item->host_scribble;
2948 
2949 		if (!item->host_scribble)
2950 			queue->tail = p;
2951 
2952 		item->host_scribble = NULL;
2953 		queue->count--;
2954 
2955 		return (item);
2956 	}
2957 
2958 	return (NULL);
2959 }
2960 
2961 /****************************************************************************/
2962 /*                                                                          */
2963 /* Routine Name: ips_putq_copp_tail                                         */
2964 /*                                                                          */
2965 /* Routine Description:                                                     */
2966 /*                                                                          */
2967 /*   Add an item to the tail of the queue                                   */
2968 /*                                                                          */
2969 /* ASSUMED to be called from within the HA lock                             */
2970 /*                                                                          */
2971 /****************************************************************************/
2972 static void
2973 ips_putq_copp_tail(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
2974 {
2975 	METHOD_TRACE("ips_putq_copp_tail", 1);
2976 
2977 	if (!item)
2978 		return;
2979 
2980 	item->next = NULL;
2981 
2982 	if (queue->tail)
2983 		queue->tail->next = item;
2984 
2985 	queue->tail = item;
2986 
2987 	if (!queue->head)
2988 		queue->head = item;
2989 
2990 	queue->count++;
2991 }
2992 
2993 /****************************************************************************/
2994 /*                                                                          */
2995 /* Routine Name: ips_removeq_copp_head                                      */
2996 /*                                                                          */
2997 /* Routine Description:                                                     */
2998 /*                                                                          */
2999 /*   Remove the head of the queue                                           */
3000 /*                                                                          */
3001 /* ASSUMED to be called from within the HA lock                             */
3002 /*                                                                          */
3003 /****************************************************************************/
3004 static ips_copp_wait_item_t *
3005 ips_removeq_copp_head(ips_copp_queue_t * queue)
3006 {
3007 	ips_copp_wait_item_t *item;
3008 
3009 	METHOD_TRACE("ips_removeq_copp_head", 1);
3010 
3011 	item = queue->head;
3012 
3013 	if (!item) {
3014 		return (NULL);
3015 	}
3016 
3017 	queue->head = item->next;
3018 	item->next = NULL;
3019 
3020 	if (queue->tail == item)
3021 		queue->tail = NULL;
3022 
3023 	queue->count--;
3024 
3025 	return (item);
3026 }
3027 
3028 /****************************************************************************/
3029 /*                                                                          */
3030 /* Routine Name: ips_removeq_copp                                           */
3031 /*                                                                          */
3032 /* Routine Description:                                                     */
3033 /*                                                                          */
3034 /*   Remove an item from a queue                                            */
3035 /*                                                                          */
3036 /* ASSUMED to be called from within the HA lock                             */
3037 /*                                                                          */
3038 /****************************************************************************/
3039 static ips_copp_wait_item_t *
3040 ips_removeq_copp(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
3041 {
3042 	ips_copp_wait_item_t *p;
3043 
3044 	METHOD_TRACE("ips_removeq_copp", 1);
3045 
3046 	if (!item)
3047 		return (NULL);
3048 
3049 	if (item == queue->head) {
3050 		return (ips_removeq_copp_head(queue));
3051 	}
3052 
3053 	p = queue->head;
3054 
3055 	while ((p) && (item != p->next))
3056 		p = p->next;
3057 
3058 	if (p) {
3059 		/* found a match */
3060 		p->next = item->next;
3061 
3062 		if (!item->next)
3063 			queue->tail = p;
3064 
3065 		item->next = NULL;
3066 		queue->count--;
3067 
3068 		return (item);
3069 	}
3070 
3071 	return (NULL);
3072 }
3073 
3074 /****************************************************************************/
3075 /*                                                                          */
3076 /* Routine Name: ipsintr_blocking                                           */
3077 /*                                                                          */
3078 /* Routine Description:                                                     */
3079 /*                                                                          */
3080 /*   Finalize an interrupt for internal commands                            */
3081 /*                                                                          */
3082 /****************************************************************************/
3083 static void
3084 ipsintr_blocking(ips_ha_t * ha, ips_scb_t * scb)
3085 {
3086 	METHOD_TRACE("ipsintr_blocking", 2);
3087 
3088 	ips_freescb(ha, scb);
3089 	if ((ha->waitflag == TRUE) && (ha->cmd_in_progress == scb->cdb[0])) {
3090 		ha->waitflag = FALSE;
3091 
3092 		return;
3093 	}
3094 }
3095 
3096 /****************************************************************************/
3097 /*                                                                          */
3098 /* Routine Name: ipsintr_done                                               */
3099 /*                                                                          */
3100 /* Routine Description:                                                     */
3101 /*                                                                          */
3102 /*   Finalize an interrupt for non-internal commands                        */
3103 /*                                                                          */
3104 /****************************************************************************/
3105 static void
3106 ipsintr_done(ips_ha_t * ha, ips_scb_t * scb)
3107 {
3108 	METHOD_TRACE("ipsintr_done", 2);
3109 
3110 	if (!scb) {
3111 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
3112 			   "Spurious interrupt; scb NULL.\n");
3113 
3114 		return;
3115 	}
3116 
3117 	if (scb->scsi_cmd == NULL) {
3118 		/* unexpected interrupt */
3119 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
3120 			   "Spurious interrupt; scsi_cmd not set.\n");
3121 
3122 		return;
3123 	}
3124 
3125 	ips_done(ha, scb);
3126 }
3127 
3128 /****************************************************************************/
3129 /*                                                                          */
3130 /* Routine Name: ips_done                                                   */
3131 /*                                                                          */
3132 /* Routine Description:                                                     */
3133 /*                                                                          */
3134 /*   Do housekeeping on completed commands                                  */
3135 /*  ASSUMED to be called form within the request lock                       */
3136 /****************************************************************************/
3137 static void
3138 ips_done(ips_ha_t * ha, ips_scb_t * scb)
3139 {
3140 	int ret;
3141 
3142 	METHOD_TRACE("ips_done", 1);
3143 
3144 	if (!scb)
3145 		return;
3146 
3147 	if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd))) {
3148 		ips_cleanup_passthru(ha, scb);
3149 		ha->num_ioctl--;
3150 	} else {
3151 		/*
3152 		 * Check to see if this command had too much
3153 		 * data and had to be broke up.  If so, queue
3154 		 * the rest of the data and continue.
3155 		 */
3156 		if ((scb->breakup) || (scb->sg_break)) {
3157                         struct scatterlist *sg;
3158                         int i, sg_dma_index, ips_sg_index = 0;
3159 
3160 			/* we had a data breakup */
3161 			scb->data_len = 0;
3162 
3163                         sg = scsi_sglist(scb->scsi_cmd);
3164 
3165                         /* Spin forward to last dma chunk */
3166                         sg_dma_index = scb->breakup;
3167                         for (i = 0; i < scb->breakup; i++)
3168                                 sg = sg_next(sg);
3169 
3170 			/* Take care of possible partial on last chunk */
3171                         ips_fill_scb_sg_single(ha,
3172                                                sg_dma_address(sg),
3173                                                scb, ips_sg_index++,
3174                                                sg_dma_len(sg));
3175 
3176                         for (; sg_dma_index < scsi_sg_count(scb->scsi_cmd);
3177                              sg_dma_index++, sg = sg_next(sg)) {
3178                                 if (ips_fill_scb_sg_single
3179                                     (ha,
3180                                      sg_dma_address(sg),
3181                                      scb, ips_sg_index++,
3182                                      sg_dma_len(sg)) < 0)
3183                                         break;
3184                         }
3185 
3186 			scb->dcdb.transfer_length = scb->data_len;
3187 			scb->dcdb.cmd_attribute |=
3188 			    ips_command_direction[scb->scsi_cmd->cmnd[0]];
3189 
3190 			if (!(scb->dcdb.cmd_attribute & 0x3))
3191 				scb->dcdb.transfer_length = 0;
3192 
3193 			if (scb->data_len >= IPS_MAX_XFER) {
3194 				scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
3195 				scb->dcdb.transfer_length = 0;
3196 			}
3197 
3198 			ret = ips_send_cmd(ha, scb);
3199 
3200 			switch (ret) {
3201 			case IPS_FAILURE:
3202 				if (scb->scsi_cmd) {
3203 					scb->scsi_cmd->result = DID_ERROR << 16;
3204 					scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3205 				}
3206 
3207 				ips_freescb(ha, scb);
3208 				break;
3209 			case IPS_SUCCESS_IMM:
3210 				if (scb->scsi_cmd) {
3211 					scb->scsi_cmd->result = DID_ERROR << 16;
3212 					scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3213 				}
3214 
3215 				ips_freescb(ha, scb);
3216 				break;
3217 			default:
3218 				break;
3219 			}	/* end case */
3220 
3221 			return;
3222 		}
3223 	}			/* end if passthru */
3224 
3225 	if (scb->bus) {
3226 		ha->dcdb_active[scb->bus - 1] &= ~(1 << scb->target_id);
3227 	}
3228 
3229 	scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3230 
3231 	ips_freescb(ha, scb);
3232 }
3233 
3234 /****************************************************************************/
3235 /*                                                                          */
3236 /* Routine Name: ips_map_status                                             */
3237 /*                                                                          */
3238 /* Routine Description:                                                     */
3239 /*                                                                          */
3240 /*   Map Controller Error codes to Linux Error Codes                        */
3241 /*                                                                          */
3242 /****************************************************************************/
3243 static int
3244 ips_map_status(ips_ha_t * ha, ips_scb_t * scb, ips_stat_t * sp)
3245 {
3246 	int errcode;
3247 	int device_error;
3248 	uint32_t transfer_len;
3249 	IPS_DCDB_TABLE_TAPE *tapeDCDB;
3250 	IPS_SCSI_INQ_DATA inquiryData;
3251 
3252 	METHOD_TRACE("ips_map_status", 1);
3253 
3254 	if (scb->bus) {
3255 		DEBUG_VAR(2,
3256 			  "(%s%d) Physical device error (%d %d %d): %x %x, Sense Key: %x, ASC: %x, ASCQ: %x",
3257 			  ips_name, ha->host_num,
3258 			  scb->scsi_cmd->device->channel,
3259 			  scb->scsi_cmd->device->id, scb->scsi_cmd->device->lun,
3260 			  scb->basic_status, scb->extended_status,
3261 			  scb->extended_status ==
3262 			  IPS_ERR_CKCOND ? scb->dcdb.sense_info[2] & 0xf : 0,
3263 			  scb->extended_status ==
3264 			  IPS_ERR_CKCOND ? scb->dcdb.sense_info[12] : 0,
3265 			  scb->extended_status ==
3266 			  IPS_ERR_CKCOND ? scb->dcdb.sense_info[13] : 0);
3267 	}
3268 
3269 	/* default driver error */
3270 	errcode = DID_ERROR;
3271 	device_error = 0;
3272 
3273 	switch (scb->basic_status & IPS_GSC_STATUS_MASK) {
3274 	case IPS_CMD_TIMEOUT:
3275 		errcode = DID_TIME_OUT;
3276 		break;
3277 
3278 	case IPS_INVAL_OPCO:
3279 	case IPS_INVAL_CMD_BLK:
3280 	case IPS_INVAL_PARM_BLK:
3281 	case IPS_LD_ERROR:
3282 	case IPS_CMD_CMPLT_WERROR:
3283 		break;
3284 
3285 	case IPS_PHYS_DRV_ERROR:
3286 		switch (scb->extended_status) {
3287 		case IPS_ERR_SEL_TO:
3288 			if (scb->bus)
3289 				errcode = DID_NO_CONNECT;
3290 
3291 			break;
3292 
3293 		case IPS_ERR_OU_RUN:
3294 			if ((scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB) ||
3295 			    (scb->cmd.dcdb.op_code ==
3296 			     IPS_CMD_EXTENDED_DCDB_SG)) {
3297 				tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3298 				transfer_len = tapeDCDB->transfer_length;
3299 			} else {
3300 				transfer_len =
3301 				    (uint32_t) scb->dcdb.transfer_length;
3302 			}
3303 
3304 			if ((scb->bus) && (transfer_len < scb->data_len)) {
3305 				/* Underrun - set default to no error */
3306 				errcode = DID_OK;
3307 
3308 				/* Restrict access to physical DASD */
3309 				if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3310 				    ips_scmd_buf_read(scb->scsi_cmd,
3311                                       &inquiryData, sizeof (inquiryData));
3312  				    if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK) {
3313 				        errcode = DID_TIME_OUT;
3314 				        break;
3315 				    }
3316 				}
3317 			} else
3318 				errcode = DID_ERROR;
3319 
3320 			break;
3321 
3322 		case IPS_ERR_RECOVERY:
3323 			/* don't fail recovered errors */
3324 			if (scb->bus)
3325 				errcode = DID_OK;
3326 
3327 			break;
3328 
3329 		case IPS_ERR_HOST_RESET:
3330 		case IPS_ERR_DEV_RESET:
3331 			errcode = DID_RESET;
3332 			break;
3333 
3334 		case IPS_ERR_CKCOND:
3335 			if (scb->bus) {
3336 				if ((scb->cmd.dcdb.op_code ==
3337 				     IPS_CMD_EXTENDED_DCDB)
3338 				    || (scb->cmd.dcdb.op_code ==
3339 					IPS_CMD_EXTENDED_DCDB_SG)) {
3340 					tapeDCDB =
3341 					    (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3342 					memcpy(scb->scsi_cmd->sense_buffer,
3343 					       tapeDCDB->sense_info,
3344 					       SCSI_SENSE_BUFFERSIZE);
3345 				} else {
3346 					memcpy(scb->scsi_cmd->sense_buffer,
3347 					       scb->dcdb.sense_info,
3348 					       SCSI_SENSE_BUFFERSIZE);
3349 				}
3350 				device_error = 2;	/* check condition */
3351 			}
3352 
3353 			errcode = DID_OK;
3354 
3355 			break;
3356 
3357 		default:
3358 			errcode = DID_ERROR;
3359 			break;
3360 
3361 		}		/* end switch */
3362 	}			/* end switch */
3363 
3364 	scb->scsi_cmd->result = device_error | (errcode << 16);
3365 
3366 	return (1);
3367 }
3368 
3369 /****************************************************************************/
3370 /*                                                                          */
3371 /* Routine Name: ips_send_wait                                              */
3372 /*                                                                          */
3373 /* Routine Description:                                                     */
3374 /*                                                                          */
3375 /*   Send a command to the controller and wait for it to return             */
3376 /*                                                                          */
3377 /*   The FFDC Time Stamp use this function for the callback, but doesn't    */
3378 /*   actually need to wait.                                                 */
3379 /****************************************************************************/
3380 static int
3381 ips_send_wait(ips_ha_t * ha, ips_scb_t * scb, int timeout, int intr)
3382 {
3383 	int ret;
3384 
3385 	METHOD_TRACE("ips_send_wait", 1);
3386 
3387 	if (intr != IPS_FFDC) {	/* Won't be Waiting if this is a Time Stamp */
3388 		ha->waitflag = TRUE;
3389 		ha->cmd_in_progress = scb->cdb[0];
3390 	}
3391 	scb->callback = ipsintr_blocking;
3392 	ret = ips_send_cmd(ha, scb);
3393 
3394 	if ((ret == IPS_FAILURE) || (ret == IPS_SUCCESS_IMM))
3395 		return (ret);
3396 
3397 	if (intr != IPS_FFDC)	/* Don't Wait around if this is a Time Stamp */
3398 		ret = ips_wait(ha, timeout, intr);
3399 
3400 	return (ret);
3401 }
3402 
3403 /****************************************************************************/
3404 /*                                                                          */
3405 /* Routine Name: ips_scmd_buf_write                                         */
3406 /*                                                                          */
3407 /* Routine Description:                                                     */
3408 /*  Write data to struct scsi_cmnd request_buffer at proper offsets	    */
3409 /****************************************************************************/
3410 static void
3411 ips_scmd_buf_write(struct scsi_cmnd *scmd, void *data, unsigned int count)
3412 {
3413 	unsigned long flags;
3414 
3415 	local_irq_save(flags);
3416 	scsi_sg_copy_from_buffer(scmd, data, count);
3417 	local_irq_restore(flags);
3418 }
3419 
3420 /****************************************************************************/
3421 /*                                                                          */
3422 /* Routine Name: ips_scmd_buf_read                                          */
3423 /*                                                                          */
3424 /* Routine Description:                                                     */
3425 /*  Copy data from a struct scsi_cmnd to a new, linear buffer		    */
3426 /****************************************************************************/
3427 static void
3428 ips_scmd_buf_read(struct scsi_cmnd *scmd, void *data, unsigned int count)
3429 {
3430 	unsigned long flags;
3431 
3432 	local_irq_save(flags);
3433 	scsi_sg_copy_to_buffer(scmd, data, count);
3434 	local_irq_restore(flags);
3435 }
3436 
3437 /****************************************************************************/
3438 /*                                                                          */
3439 /* Routine Name: ips_send_cmd                                               */
3440 /*                                                                          */
3441 /* Routine Description:                                                     */
3442 /*                                                                          */
3443 /*   Map SCSI commands to ServeRAID commands for logical drives             */
3444 /*                                                                          */
3445 /****************************************************************************/
3446 static int
3447 ips_send_cmd(ips_ha_t * ha, ips_scb_t * scb)
3448 {
3449 	int ret;
3450 	char *sp;
3451 	int device_error;
3452 	IPS_DCDB_TABLE_TAPE *tapeDCDB;
3453 	int TimeOut;
3454 
3455 	METHOD_TRACE("ips_send_cmd", 1);
3456 
3457 	ret = IPS_SUCCESS;
3458 
3459 	if (!scb->scsi_cmd) {
3460 		/* internal command */
3461 
3462 		if (scb->bus > 0) {
3463 			/* Controller commands can't be issued */
3464 			/* to real devices -- fail them        */
3465 			if ((ha->waitflag == TRUE) &&
3466 			    (ha->cmd_in_progress == scb->cdb[0])) {
3467 				ha->waitflag = FALSE;
3468 			}
3469 
3470 			return (1);
3471 		}
3472 	} else if ((scb->bus == 0) && (!ips_is_passthru(scb->scsi_cmd))) {
3473 		/* command to logical bus -- interpret */
3474 		ret = IPS_SUCCESS_IMM;
3475 
3476 		switch (scb->scsi_cmd->cmnd[0]) {
3477 		case ALLOW_MEDIUM_REMOVAL:
3478 		case REZERO_UNIT:
3479 		case ERASE:
3480 		case WRITE_FILEMARKS:
3481 		case SPACE:
3482 			scb->scsi_cmd->result = DID_ERROR << 16;
3483 			break;
3484 
3485 		case START_STOP:
3486 			scb->scsi_cmd->result = DID_OK << 16;
3487 			break;
3488 
3489 		case TEST_UNIT_READY:
3490 		case INQUIRY:
3491 			if (scb->target_id == IPS_ADAPTER_ID) {
3492 				/*
3493 				 * Either we have a TUR
3494 				 * or we have a SCSI inquiry
3495 				 */
3496 				if (scb->scsi_cmd->cmnd[0] == TEST_UNIT_READY)
3497 					scb->scsi_cmd->result = DID_OK << 16;
3498 
3499 				if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3500 					IPS_SCSI_INQ_DATA inquiry;
3501 
3502 					memset(&inquiry, 0,
3503 					       sizeof (IPS_SCSI_INQ_DATA));
3504 
3505 					inquiry.DeviceType =
3506 					    IPS_SCSI_INQ_TYPE_PROCESSOR;
3507 					inquiry.DeviceTypeQualifier =
3508 					    IPS_SCSI_INQ_LU_CONNECTED;
3509 					inquiry.Version = IPS_SCSI_INQ_REV2;
3510 					inquiry.ResponseDataFormat =
3511 					    IPS_SCSI_INQ_RD_REV2;
3512 					inquiry.AdditionalLength = 31;
3513 					inquiry.Flags[0] =
3514 					    IPS_SCSI_INQ_Address16;
3515 					inquiry.Flags[1] =
3516 					    IPS_SCSI_INQ_WBus16 |
3517 					    IPS_SCSI_INQ_Sync;
3518 					strncpy(inquiry.VendorId, "IBM     ",
3519 						8);
3520 					strncpy(inquiry.ProductId,
3521 						"SERVERAID       ", 16);
3522 					strncpy(inquiry.ProductRevisionLevel,
3523 						"1.00", 4);
3524 
3525 					ips_scmd_buf_write(scb->scsi_cmd,
3526 							   &inquiry,
3527 							   sizeof (inquiry));
3528 
3529 					scb->scsi_cmd->result = DID_OK << 16;
3530 				}
3531 			} else {
3532 				scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3533 				scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3534 				scb->cmd.logical_info.reserved = 0;
3535 				scb->cmd.logical_info.reserved2 = 0;
3536 				scb->data_len = sizeof (IPS_LD_INFO);
3537 				scb->data_busaddr = ha->logical_drive_info_dma_addr;
3538 				scb->flags = 0;
3539 				scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3540 				ret = IPS_SUCCESS;
3541 			}
3542 
3543 			break;
3544 
3545 		case REQUEST_SENSE:
3546 			ips_reqsen(ha, scb);
3547 			scb->scsi_cmd->result = DID_OK << 16;
3548 			break;
3549 
3550 		case READ_6:
3551 		case WRITE_6:
3552 			if (!scb->sg_len) {
3553 				scb->cmd.basic_io.op_code =
3554 				    (scb->scsi_cmd->cmnd[0] ==
3555 				     READ_6) ? IPS_CMD_READ : IPS_CMD_WRITE;
3556 				scb->cmd.basic_io.enhanced_sg = 0;
3557 				scb->cmd.basic_io.sg_addr =
3558 				    cpu_to_le32(scb->data_busaddr);
3559 			} else {
3560 				scb->cmd.basic_io.op_code =
3561 				    (scb->scsi_cmd->cmnd[0] ==
3562 				     READ_6) ? IPS_CMD_READ_SG :
3563 				    IPS_CMD_WRITE_SG;
3564 				scb->cmd.basic_io.enhanced_sg =
3565 				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3566 				scb->cmd.basic_io.sg_addr =
3567 				    cpu_to_le32(scb->sg_busaddr);
3568 			}
3569 
3570 			scb->cmd.basic_io.segment_4G = 0;
3571 			scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3572 			scb->cmd.basic_io.log_drv = scb->target_id;
3573 			scb->cmd.basic_io.sg_count = scb->sg_len;
3574 
3575 			if (scb->cmd.basic_io.lba)
3576 				le32_add_cpu(&scb->cmd.basic_io.lba,
3577 						le16_to_cpu(scb->cmd.basic_io.
3578 							    sector_count));
3579 			else
3580 				scb->cmd.basic_io.lba =
3581 				    (((scb->scsi_cmd->
3582 				       cmnd[1] & 0x1f) << 16) | (scb->scsi_cmd->
3583 								 cmnd[2] << 8) |
3584 				     (scb->scsi_cmd->cmnd[3]));
3585 
3586 			scb->cmd.basic_io.sector_count =
3587 			    cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3588 
3589 			if (le16_to_cpu(scb->cmd.basic_io.sector_count) == 0)
3590 				scb->cmd.basic_io.sector_count =
3591 				    cpu_to_le16(256);
3592 
3593 			ret = IPS_SUCCESS;
3594 			break;
3595 
3596 		case READ_10:
3597 		case WRITE_10:
3598 			if (!scb->sg_len) {
3599 				scb->cmd.basic_io.op_code =
3600 				    (scb->scsi_cmd->cmnd[0] ==
3601 				     READ_10) ? IPS_CMD_READ : IPS_CMD_WRITE;
3602 				scb->cmd.basic_io.enhanced_sg = 0;
3603 				scb->cmd.basic_io.sg_addr =
3604 				    cpu_to_le32(scb->data_busaddr);
3605 			} else {
3606 				scb->cmd.basic_io.op_code =
3607 				    (scb->scsi_cmd->cmnd[0] ==
3608 				     READ_10) ? IPS_CMD_READ_SG :
3609 				    IPS_CMD_WRITE_SG;
3610 				scb->cmd.basic_io.enhanced_sg =
3611 				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3612 				scb->cmd.basic_io.sg_addr =
3613 				    cpu_to_le32(scb->sg_busaddr);
3614 			}
3615 
3616 			scb->cmd.basic_io.segment_4G = 0;
3617 			scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3618 			scb->cmd.basic_io.log_drv = scb->target_id;
3619 			scb->cmd.basic_io.sg_count = scb->sg_len;
3620 
3621 			if (scb->cmd.basic_io.lba)
3622 				le32_add_cpu(&scb->cmd.basic_io.lba,
3623 						le16_to_cpu(scb->cmd.basic_io.
3624 							    sector_count));
3625 			else
3626 				scb->cmd.basic_io.lba =
3627 				    ((scb->scsi_cmd->cmnd[2] << 24) | (scb->
3628 								       scsi_cmd->
3629 								       cmnd[3]
3630 								       << 16) |
3631 				     (scb->scsi_cmd->cmnd[4] << 8) | scb->
3632 				     scsi_cmd->cmnd[5]);
3633 
3634 			scb->cmd.basic_io.sector_count =
3635 			    cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3636 
3637 			if (cpu_to_le16(scb->cmd.basic_io.sector_count) == 0) {
3638 				/*
3639 				 * This is a null condition
3640 				 * we don't have to do anything
3641 				 * so just return
3642 				 */
3643 				scb->scsi_cmd->result = DID_OK << 16;
3644 			} else
3645 				ret = IPS_SUCCESS;
3646 
3647 			break;
3648 
3649 		case RESERVE:
3650 		case RELEASE:
3651 			scb->scsi_cmd->result = DID_OK << 16;
3652 			break;
3653 
3654 		case MODE_SENSE:
3655 			scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
3656 			scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3657 			scb->cmd.basic_io.segment_4G = 0;
3658 			scb->cmd.basic_io.enhanced_sg = 0;
3659 			scb->data_len = sizeof (*ha->enq);
3660 			scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
3661 			ret = IPS_SUCCESS;
3662 			break;
3663 
3664 		case READ_CAPACITY:
3665 			scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3666 			scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3667 			scb->cmd.logical_info.reserved = 0;
3668 			scb->cmd.logical_info.reserved2 = 0;
3669 			scb->cmd.logical_info.reserved3 = 0;
3670 			scb->data_len = sizeof (IPS_LD_INFO);
3671 			scb->data_busaddr = ha->logical_drive_info_dma_addr;
3672 			scb->flags = 0;
3673 			scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3674 			ret = IPS_SUCCESS;
3675 			break;
3676 
3677 		case SEND_DIAGNOSTIC:
3678 		case REASSIGN_BLOCKS:
3679 		case FORMAT_UNIT:
3680 		case SEEK_10:
3681 		case VERIFY:
3682 		case READ_DEFECT_DATA:
3683 		case READ_BUFFER:
3684 		case WRITE_BUFFER:
3685 			scb->scsi_cmd->result = DID_OK << 16;
3686 			break;
3687 
3688 		default:
3689 			/* Set the Return Info to appear like the Command was */
3690 			/* attempted, a Check Condition occurred, and Sense   */
3691 			/* Data indicating an Invalid CDB OpCode is returned. */
3692 			sp = (char *) scb->scsi_cmd->sense_buffer;
3693 
3694 			sp[0] = 0x70;	/* Error Code               */
3695 			sp[2] = ILLEGAL_REQUEST;	/* Sense Key 5 Illegal Req. */
3696 			sp[7] = 0x0A;	/* Additional Sense Length  */
3697 			sp[12] = 0x20;	/* ASC = Invalid OpCode     */
3698 			sp[13] = 0x00;	/* ASCQ                     */
3699 
3700 			device_error = 2;	/* Indicate Check Condition */
3701 			scb->scsi_cmd->result = device_error | (DID_OK << 16);
3702 			break;
3703 		}		/* end switch */
3704 	}
3705 	/* end if */
3706 	if (ret == IPS_SUCCESS_IMM)
3707 		return (ret);
3708 
3709 	/* setup DCDB */
3710 	if (scb->bus > 0) {
3711 
3712 		/* If we already know the Device is Not there, no need to attempt a Command   */
3713 		/* This also protects an NT FailOver Controller from getting CDB's sent to it */
3714 		if (ha->conf->dev[scb->bus - 1][scb->target_id].ucState == 0) {
3715 			scb->scsi_cmd->result = DID_NO_CONNECT << 16;
3716 			return (IPS_SUCCESS_IMM);
3717 		}
3718 
3719 		ha->dcdb_active[scb->bus - 1] |= (1 << scb->target_id);
3720 		scb->cmd.dcdb.command_id = IPS_COMMAND_ID(ha, scb);
3721 		scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
3722 							 (unsigned long) &scb->
3723 							 dcdb -
3724 							 (unsigned long) scb);
3725 		scb->cmd.dcdb.reserved = 0;
3726 		scb->cmd.dcdb.reserved2 = 0;
3727 		scb->cmd.dcdb.reserved3 = 0;
3728 		scb->cmd.dcdb.segment_4G = 0;
3729 		scb->cmd.dcdb.enhanced_sg = 0;
3730 
3731 		TimeOut = scb->scsi_cmd->request->timeout;
3732 
3733 		if (ha->subsys->param[4] & 0x00100000) {	/* If NEW Tape DCDB is Supported */
3734 			if (!scb->sg_len) {
3735 				scb->cmd.dcdb.op_code = IPS_CMD_EXTENDED_DCDB;
3736 			} else {
3737 				scb->cmd.dcdb.op_code =
3738 				    IPS_CMD_EXTENDED_DCDB_SG;
3739 				scb->cmd.dcdb.enhanced_sg =
3740 				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3741 			}
3742 
3743 			tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;	/* Use Same Data Area as Old DCDB Struct */
3744 			tapeDCDB->device_address =
3745 			    ((scb->bus - 1) << 4) | scb->target_id;
3746 			tapeDCDB->cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3747 			tapeDCDB->cmd_attribute &= ~IPS_TRANSFER64K;	/* Always Turn OFF 64K Size Flag */
3748 
3749 			if (TimeOut) {
3750 				if (TimeOut < (10 * HZ))
3751 					tapeDCDB->cmd_attribute |= IPS_TIMEOUT10;	/* TimeOut is 10 Seconds */
3752 				else if (TimeOut < (60 * HZ))
3753 					tapeDCDB->cmd_attribute |= IPS_TIMEOUT60;	/* TimeOut is 60 Seconds */
3754 				else if (TimeOut < (1200 * HZ))
3755 					tapeDCDB->cmd_attribute |= IPS_TIMEOUT20M;	/* TimeOut is 20 Minutes */
3756 			}
3757 
3758 			tapeDCDB->cdb_length = scb->scsi_cmd->cmd_len;
3759 			tapeDCDB->reserved_for_LUN = 0;
3760 			tapeDCDB->transfer_length = scb->data_len;
3761 			if (scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB_SG)
3762 				tapeDCDB->buffer_pointer =
3763 				    cpu_to_le32(scb->sg_busaddr);
3764 			else
3765 				tapeDCDB->buffer_pointer =
3766 				    cpu_to_le32(scb->data_busaddr);
3767 			tapeDCDB->sg_count = scb->sg_len;
3768 			tapeDCDB->sense_length = sizeof (tapeDCDB->sense_info);
3769 			tapeDCDB->scsi_status = 0;
3770 			tapeDCDB->reserved = 0;
3771 			memcpy(tapeDCDB->scsi_cdb, scb->scsi_cmd->cmnd,
3772 			       scb->scsi_cmd->cmd_len);
3773 		} else {
3774 			if (!scb->sg_len) {
3775 				scb->cmd.dcdb.op_code = IPS_CMD_DCDB;
3776 			} else {
3777 				scb->cmd.dcdb.op_code = IPS_CMD_DCDB_SG;
3778 				scb->cmd.dcdb.enhanced_sg =
3779 				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3780 			}
3781 
3782 			scb->dcdb.device_address =
3783 			    ((scb->bus - 1) << 4) | scb->target_id;
3784 			scb->dcdb.cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3785 
3786 			if (TimeOut) {
3787 				if (TimeOut < (10 * HZ))
3788 					scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;	/* TimeOut is 10 Seconds */
3789 				else if (TimeOut < (60 * HZ))
3790 					scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;	/* TimeOut is 60 Seconds */
3791 				else if (TimeOut < (1200 * HZ))
3792 					scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;	/* TimeOut is 20 Minutes */
3793 			}
3794 
3795 			scb->dcdb.transfer_length = scb->data_len;
3796 			if (scb->dcdb.cmd_attribute & IPS_TRANSFER64K)
3797 				scb->dcdb.transfer_length = 0;
3798 			if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB_SG)
3799 				scb->dcdb.buffer_pointer =
3800 				    cpu_to_le32(scb->sg_busaddr);
3801 			else
3802 				scb->dcdb.buffer_pointer =
3803 				    cpu_to_le32(scb->data_busaddr);
3804 			scb->dcdb.cdb_length = scb->scsi_cmd->cmd_len;
3805 			scb->dcdb.sense_length = sizeof (scb->dcdb.sense_info);
3806 			scb->dcdb.sg_count = scb->sg_len;
3807 			scb->dcdb.reserved = 0;
3808 			memcpy(scb->dcdb.scsi_cdb, scb->scsi_cmd->cmnd,
3809 			       scb->scsi_cmd->cmd_len);
3810 			scb->dcdb.scsi_status = 0;
3811 			scb->dcdb.reserved2[0] = 0;
3812 			scb->dcdb.reserved2[1] = 0;
3813 			scb->dcdb.reserved2[2] = 0;
3814 		}
3815 	}
3816 
3817 	return ((*ha->func.issue) (ha, scb));
3818 }
3819 
3820 /****************************************************************************/
3821 /*                                                                          */
3822 /* Routine Name: ips_chk_status                                             */
3823 /*                                                                          */
3824 /* Routine Description:                                                     */
3825 /*                                                                          */
3826 /*   Check the status of commands to logical drives                         */
3827 /*   Assumed to be called with the HA lock                                  */
3828 /****************************************************************************/
3829 static void
3830 ips_chkstatus(ips_ha_t * ha, IPS_STATUS * pstatus)
3831 {
3832 	ips_scb_t *scb;
3833 	ips_stat_t *sp;
3834 	uint8_t basic_status;
3835 	uint8_t ext_status;
3836 	int errcode;
3837 	IPS_SCSI_INQ_DATA inquiryData;
3838 
3839 	METHOD_TRACE("ips_chkstatus", 1);
3840 
3841 	scb = &ha->scbs[pstatus->fields.command_id];
3842 	scb->basic_status = basic_status =
3843 	    pstatus->fields.basic_status & IPS_BASIC_STATUS_MASK;
3844 	scb->extended_status = ext_status = pstatus->fields.extended_status;
3845 
3846 	sp = &ha->sp;
3847 	sp->residue_len = 0;
3848 	sp->scb_addr = (void *) scb;
3849 
3850 	/* Remove the item from the active queue */
3851 	ips_removeq_scb(&ha->scb_activelist, scb);
3852 
3853 	if (!scb->scsi_cmd)
3854 		/* internal commands are handled in do_ipsintr */
3855 		return;
3856 
3857 	DEBUG_VAR(2, "(%s%d) ips_chkstatus: cmd 0x%X id %d (%d %d %d)",
3858 		  ips_name,
3859 		  ha->host_num,
3860 		  scb->cdb[0],
3861 		  scb->cmd.basic_io.command_id,
3862 		  scb->bus, scb->target_id, scb->lun);
3863 
3864 	if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd)))
3865 		/* passthru - just returns the raw result */
3866 		return;
3867 
3868 	errcode = DID_OK;
3869 
3870 	if (((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_SUCCESS) ||
3871 	    ((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_RECOVERED_ERROR)) {
3872 
3873 		if (scb->bus == 0) {
3874 			if ((basic_status & IPS_GSC_STATUS_MASK) ==
3875 			    IPS_CMD_RECOVERED_ERROR) {
3876 				DEBUG_VAR(1,
3877 					  "(%s%d) Recovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3878 					  ips_name, ha->host_num,
3879 					  scb->cmd.basic_io.op_code,
3880 					  basic_status, ext_status);
3881 			}
3882 
3883 			switch (scb->scsi_cmd->cmnd[0]) {
3884 			case ALLOW_MEDIUM_REMOVAL:
3885 			case REZERO_UNIT:
3886 			case ERASE:
3887 			case WRITE_FILEMARKS:
3888 			case SPACE:
3889 				errcode = DID_ERROR;
3890 				break;
3891 
3892 			case START_STOP:
3893 				break;
3894 
3895 			case TEST_UNIT_READY:
3896 				if (!ips_online(ha, scb)) {
3897 					errcode = DID_TIME_OUT;
3898 				}
3899 				break;
3900 
3901 			case INQUIRY:
3902 				if (ips_online(ha, scb)) {
3903 					ips_inquiry(ha, scb);
3904 				} else {
3905 					errcode = DID_TIME_OUT;
3906 				}
3907 				break;
3908 
3909 			case REQUEST_SENSE:
3910 				ips_reqsen(ha, scb);
3911 				break;
3912 
3913 			case READ_6:
3914 			case WRITE_6:
3915 			case READ_10:
3916 			case WRITE_10:
3917 			case RESERVE:
3918 			case RELEASE:
3919 				break;
3920 
3921 			case MODE_SENSE:
3922 				if (!ips_online(ha, scb)
3923 				    || !ips_msense(ha, scb)) {
3924 					errcode = DID_ERROR;
3925 				}
3926 				break;
3927 
3928 			case READ_CAPACITY:
3929 				if (ips_online(ha, scb))
3930 					ips_rdcap(ha, scb);
3931 				else {
3932 					errcode = DID_TIME_OUT;
3933 				}
3934 				break;
3935 
3936 			case SEND_DIAGNOSTIC:
3937 			case REASSIGN_BLOCKS:
3938 				break;
3939 
3940 			case FORMAT_UNIT:
3941 				errcode = DID_ERROR;
3942 				break;
3943 
3944 			case SEEK_10:
3945 			case VERIFY:
3946 			case READ_DEFECT_DATA:
3947 			case READ_BUFFER:
3948 			case WRITE_BUFFER:
3949 				break;
3950 
3951 			default:
3952 				errcode = DID_ERROR;
3953 			}	/* end switch */
3954 
3955 			scb->scsi_cmd->result = errcode << 16;
3956 		} else {	/* bus == 0 */
3957 			/* restrict access to physical drives */
3958 			if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3959 			    ips_scmd_buf_read(scb->scsi_cmd,
3960                                   &inquiryData, sizeof (inquiryData));
3961 			    if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK)
3962 			        scb->scsi_cmd->result = DID_TIME_OUT << 16;
3963 			}
3964 		}		/* else */
3965 	} else {		/* recovered error / success */
3966 		if (scb->bus == 0) {
3967 			DEBUG_VAR(1,
3968 				  "(%s%d) Unrecovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3969 				  ips_name, ha->host_num,
3970 				  scb->cmd.basic_io.op_code, basic_status,
3971 				  ext_status);
3972 		}
3973 
3974 		ips_map_status(ha, scb, sp);
3975 	}			/* else */
3976 }
3977 
3978 /****************************************************************************/
3979 /*                                                                          */
3980 /* Routine Name: ips_online                                                 */
3981 /*                                                                          */
3982 /* Routine Description:                                                     */
3983 /*                                                                          */
3984 /*   Determine if a logical drive is online                                 */
3985 /*                                                                          */
3986 /****************************************************************************/
3987 static int
3988 ips_online(ips_ha_t * ha, ips_scb_t * scb)
3989 {
3990 	METHOD_TRACE("ips_online", 1);
3991 
3992 	if (scb->target_id >= IPS_MAX_LD)
3993 		return (0);
3994 
3995 	if ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1) {
3996 		memset(ha->logical_drive_info, 0, sizeof (IPS_LD_INFO));
3997 		return (0);
3998 	}
3999 
4000 	if (ha->logical_drive_info->drive_info[scb->target_id].state !=
4001 	    IPS_LD_OFFLINE
4002 	    && ha->logical_drive_info->drive_info[scb->target_id].state !=
4003 	    IPS_LD_FREE
4004 	    && ha->logical_drive_info->drive_info[scb->target_id].state !=
4005 	    IPS_LD_CRS
4006 	    && ha->logical_drive_info->drive_info[scb->target_id].state !=
4007 	    IPS_LD_SYS)
4008 		return (1);
4009 	else
4010 		return (0);
4011 }
4012 
4013 /****************************************************************************/
4014 /*                                                                          */
4015 /* Routine Name: ips_inquiry                                                */
4016 /*                                                                          */
4017 /* Routine Description:                                                     */
4018 /*                                                                          */
4019 /*   Simulate an inquiry command to a logical drive                         */
4020 /*                                                                          */
4021 /****************************************************************************/
4022 static int
4023 ips_inquiry(ips_ha_t * ha, ips_scb_t * scb)
4024 {
4025 	IPS_SCSI_INQ_DATA inquiry;
4026 
4027 	METHOD_TRACE("ips_inquiry", 1);
4028 
4029 	memset(&inquiry, 0, sizeof (IPS_SCSI_INQ_DATA));
4030 
4031 	inquiry.DeviceType = IPS_SCSI_INQ_TYPE_DASD;
4032 	inquiry.DeviceTypeQualifier = IPS_SCSI_INQ_LU_CONNECTED;
4033 	inquiry.Version = IPS_SCSI_INQ_REV2;
4034 	inquiry.ResponseDataFormat = IPS_SCSI_INQ_RD_REV2;
4035 	inquiry.AdditionalLength = 31;
4036 	inquiry.Flags[0] = IPS_SCSI_INQ_Address16;
4037 	inquiry.Flags[1] =
4038 	    IPS_SCSI_INQ_WBus16 | IPS_SCSI_INQ_Sync | IPS_SCSI_INQ_CmdQue;
4039 	strncpy(inquiry.VendorId, "IBM     ", 8);
4040 	strncpy(inquiry.ProductId, "SERVERAID       ", 16);
4041 	strncpy(inquiry.ProductRevisionLevel, "1.00", 4);
4042 
4043 	ips_scmd_buf_write(scb->scsi_cmd, &inquiry, sizeof (inquiry));
4044 
4045 	return (1);
4046 }
4047 
4048 /****************************************************************************/
4049 /*                                                                          */
4050 /* Routine Name: ips_rdcap                                                  */
4051 /*                                                                          */
4052 /* Routine Description:                                                     */
4053 /*                                                                          */
4054 /*   Simulate a read capacity command to a logical drive                    */
4055 /*                                                                          */
4056 /****************************************************************************/
4057 static int
4058 ips_rdcap(ips_ha_t * ha, ips_scb_t * scb)
4059 {
4060 	IPS_SCSI_CAPACITY cap;
4061 
4062 	METHOD_TRACE("ips_rdcap", 1);
4063 
4064 	if (scsi_bufflen(scb->scsi_cmd) < 8)
4065 		return (0);
4066 
4067 	cap.lba =
4068 	    cpu_to_be32(le32_to_cpu
4069 			(ha->logical_drive_info->
4070 			 drive_info[scb->target_id].sector_count) - 1);
4071 	cap.len = cpu_to_be32((uint32_t) IPS_BLKSIZE);
4072 
4073 	ips_scmd_buf_write(scb->scsi_cmd, &cap, sizeof (cap));
4074 
4075 	return (1);
4076 }
4077 
4078 /****************************************************************************/
4079 /*                                                                          */
4080 /* Routine Name: ips_msense                                                 */
4081 /*                                                                          */
4082 /* Routine Description:                                                     */
4083 /*                                                                          */
4084 /*   Simulate a mode sense command to a logical drive                       */
4085 /*                                                                          */
4086 /****************************************************************************/
4087 static int
4088 ips_msense(ips_ha_t * ha, ips_scb_t * scb)
4089 {
4090 	uint16_t heads;
4091 	uint16_t sectors;
4092 	uint32_t cylinders;
4093 	IPS_SCSI_MODE_PAGE_DATA mdata;
4094 
4095 	METHOD_TRACE("ips_msense", 1);
4096 
4097 	if (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) > 0x400000 &&
4098 	    (ha->enq->ucMiscFlag & 0x8) == 0) {
4099 		heads = IPS_NORM_HEADS;
4100 		sectors = IPS_NORM_SECTORS;
4101 	} else {
4102 		heads = IPS_COMP_HEADS;
4103 		sectors = IPS_COMP_SECTORS;
4104 	}
4105 
4106 	cylinders =
4107 	    (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) -
4108 	     1) / (heads * sectors);
4109 
4110 	memset(&mdata, 0, sizeof (IPS_SCSI_MODE_PAGE_DATA));
4111 
4112 	mdata.hdr.BlockDescLength = 8;
4113 
4114 	switch (scb->scsi_cmd->cmnd[2] & 0x3f) {
4115 	case 0x03:		/* page 3 */
4116 		mdata.pdata.pg3.PageCode = 3;
4117 		mdata.pdata.pg3.PageLength = sizeof (IPS_SCSI_MODE_PAGE3);
4118 		mdata.hdr.DataLength =
4119 		    3 + mdata.hdr.BlockDescLength + mdata.pdata.pg3.PageLength;
4120 		mdata.pdata.pg3.TracksPerZone = 0;
4121 		mdata.pdata.pg3.AltSectorsPerZone = 0;
4122 		mdata.pdata.pg3.AltTracksPerZone = 0;
4123 		mdata.pdata.pg3.AltTracksPerVolume = 0;
4124 		mdata.pdata.pg3.SectorsPerTrack = cpu_to_be16(sectors);
4125 		mdata.pdata.pg3.BytesPerSector = cpu_to_be16(IPS_BLKSIZE);
4126 		mdata.pdata.pg3.Interleave = cpu_to_be16(1);
4127 		mdata.pdata.pg3.TrackSkew = 0;
4128 		mdata.pdata.pg3.CylinderSkew = 0;
4129 		mdata.pdata.pg3.flags = IPS_SCSI_MP3_SoftSector;
4130 		break;
4131 
4132 	case 0x4:
4133 		mdata.pdata.pg4.PageCode = 4;
4134 		mdata.pdata.pg4.PageLength = sizeof (IPS_SCSI_MODE_PAGE4);
4135 		mdata.hdr.DataLength =
4136 		    3 + mdata.hdr.BlockDescLength + mdata.pdata.pg4.PageLength;
4137 		mdata.pdata.pg4.CylindersHigh =
4138 		    cpu_to_be16((cylinders >> 8) & 0xFFFF);
4139 		mdata.pdata.pg4.CylindersLow = (cylinders & 0xFF);
4140 		mdata.pdata.pg4.Heads = heads;
4141 		mdata.pdata.pg4.WritePrecompHigh = 0;
4142 		mdata.pdata.pg4.WritePrecompLow = 0;
4143 		mdata.pdata.pg4.ReducedWriteCurrentHigh = 0;
4144 		mdata.pdata.pg4.ReducedWriteCurrentLow = 0;
4145 		mdata.pdata.pg4.StepRate = cpu_to_be16(1);
4146 		mdata.pdata.pg4.LandingZoneHigh = 0;
4147 		mdata.pdata.pg4.LandingZoneLow = 0;
4148 		mdata.pdata.pg4.flags = 0;
4149 		mdata.pdata.pg4.RotationalOffset = 0;
4150 		mdata.pdata.pg4.MediumRotationRate = 0;
4151 		break;
4152 	case 0x8:
4153 		mdata.pdata.pg8.PageCode = 8;
4154 		mdata.pdata.pg8.PageLength = sizeof (IPS_SCSI_MODE_PAGE8);
4155 		mdata.hdr.DataLength =
4156 		    3 + mdata.hdr.BlockDescLength + mdata.pdata.pg8.PageLength;
4157 		/* everything else is left set to 0 */
4158 		break;
4159 
4160 	default:
4161 		return (0);
4162 	}			/* end switch */
4163 
4164 	ips_scmd_buf_write(scb->scsi_cmd, &mdata, sizeof (mdata));
4165 
4166 	return (1);
4167 }
4168 
4169 /****************************************************************************/
4170 /*                                                                          */
4171 /* Routine Name: ips_reqsen                                                 */
4172 /*                                                                          */
4173 /* Routine Description:                                                     */
4174 /*                                                                          */
4175 /*   Simulate a request sense command to a logical drive                    */
4176 /*                                                                          */
4177 /****************************************************************************/
4178 static int
4179 ips_reqsen(ips_ha_t * ha, ips_scb_t * scb)
4180 {
4181 	IPS_SCSI_REQSEN reqsen;
4182 
4183 	METHOD_TRACE("ips_reqsen", 1);
4184 
4185 	memset(&reqsen, 0, sizeof (IPS_SCSI_REQSEN));
4186 
4187 	reqsen.ResponseCode =
4188 	    IPS_SCSI_REQSEN_VALID | IPS_SCSI_REQSEN_CURRENT_ERR;
4189 	reqsen.AdditionalLength = 10;
4190 	reqsen.AdditionalSenseCode = IPS_SCSI_REQSEN_NO_SENSE;
4191 	reqsen.AdditionalSenseCodeQual = IPS_SCSI_REQSEN_NO_SENSE;
4192 
4193 	ips_scmd_buf_write(scb->scsi_cmd, &reqsen, sizeof (reqsen));
4194 
4195 	return (1);
4196 }
4197 
4198 /****************************************************************************/
4199 /*                                                                          */
4200 /* Routine Name: ips_free                                                   */
4201 /*                                                                          */
4202 /* Routine Description:                                                     */
4203 /*                                                                          */
4204 /*   Free any allocated space for this controller                           */
4205 /*                                                                          */
4206 /****************************************************************************/
4207 static void
4208 ips_free(ips_ha_t * ha)
4209 {
4210 
4211 	METHOD_TRACE("ips_free", 1);
4212 
4213 	if (ha) {
4214 		if (ha->enq) {
4215 			dma_free_coherent(&ha->pcidev->dev, sizeof(IPS_ENQ),
4216 					    ha->enq, ha->enq_busaddr);
4217 			ha->enq = NULL;
4218 		}
4219 
4220 		kfree(ha->conf);
4221 		ha->conf = NULL;
4222 
4223 		if (ha->adapt) {
4224 			dma_free_coherent(&ha->pcidev->dev,
4225 					    sizeof (IPS_ADAPTER) +
4226 					    sizeof (IPS_IO_CMD), ha->adapt,
4227 					    ha->adapt->hw_status_start);
4228 			ha->adapt = NULL;
4229 		}
4230 
4231 		if (ha->logical_drive_info) {
4232 			dma_free_coherent(&ha->pcidev->dev,
4233 					    sizeof (IPS_LD_INFO),
4234 					    ha->logical_drive_info,
4235 					    ha->logical_drive_info_dma_addr);
4236 			ha->logical_drive_info = NULL;
4237 		}
4238 
4239 		kfree(ha->nvram);
4240 		ha->nvram = NULL;
4241 
4242 		kfree(ha->subsys);
4243 		ha->subsys = NULL;
4244 
4245 		if (ha->ioctl_data) {
4246 			dma_free_coherent(&ha->pcidev->dev, ha->ioctl_len,
4247 					    ha->ioctl_data, ha->ioctl_busaddr);
4248 			ha->ioctl_data = NULL;
4249 			ha->ioctl_datasize = 0;
4250 			ha->ioctl_len = 0;
4251 		}
4252 		ips_deallocatescbs(ha, ha->max_cmds);
4253 
4254 		/* free memory mapped (if applicable) */
4255 		if (ha->mem_ptr) {
4256 			iounmap(ha->ioremap_ptr);
4257 			ha->ioremap_ptr = NULL;
4258 			ha->mem_ptr = NULL;
4259 		}
4260 
4261 		ha->mem_addr = 0;
4262 
4263 	}
4264 }
4265 
4266 /****************************************************************************/
4267 /*                                                                          */
4268 /* Routine Name: ips_deallocatescbs                                         */
4269 /*                                                                          */
4270 /* Routine Description:                                                     */
4271 /*                                                                          */
4272 /*   Free the command blocks                                                */
4273 /*                                                                          */
4274 /****************************************************************************/
4275 static int
4276 ips_deallocatescbs(ips_ha_t * ha, int cmds)
4277 {
4278 	if (ha->scbs) {
4279 		dma_free_coherent(&ha->pcidev->dev,
4280 				    IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * cmds,
4281 				    ha->scbs->sg_list.list,
4282 				    ha->scbs->sg_busaddr);
4283 		dma_free_coherent(&ha->pcidev->dev, sizeof (ips_scb_t) * cmds,
4284 				    ha->scbs, ha->scbs->scb_busaddr);
4285 		ha->scbs = NULL;
4286 	}			/* end if */
4287 	return 1;
4288 }
4289 
4290 /****************************************************************************/
4291 /*                                                                          */
4292 /* Routine Name: ips_allocatescbs                                           */
4293 /*                                                                          */
4294 /* Routine Description:                                                     */
4295 /*                                                                          */
4296 /*   Allocate the command blocks                                            */
4297 /*                                                                          */
4298 /****************************************************************************/
4299 static int
4300 ips_allocatescbs(ips_ha_t * ha)
4301 {
4302 	ips_scb_t *scb_p;
4303 	IPS_SG_LIST ips_sg;
4304 	int i;
4305 	dma_addr_t command_dma, sg_dma;
4306 
4307 	METHOD_TRACE("ips_allocatescbs", 1);
4308 
4309 	/* Allocate memory for the SCBs */
4310 	ha->scbs = dma_alloc_coherent(&ha->pcidev->dev,
4311 			ha->max_cmds * sizeof (ips_scb_t),
4312 			&command_dma, GFP_KERNEL);
4313 	if (ha->scbs == NULL)
4314 		return 0;
4315 	ips_sg.list = dma_alloc_coherent(&ha->pcidev->dev,
4316 			IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * ha->max_cmds,
4317 			&sg_dma, GFP_KERNEL);
4318 	if (ips_sg.list == NULL) {
4319 		dma_free_coherent(&ha->pcidev->dev,
4320 				    ha->max_cmds * sizeof (ips_scb_t), ha->scbs,
4321 				    command_dma);
4322 		return 0;
4323 	}
4324 
4325 	memset(ha->scbs, 0, ha->max_cmds * sizeof (ips_scb_t));
4326 
4327 	for (i = 0; i < ha->max_cmds; i++) {
4328 		scb_p = &ha->scbs[i];
4329 		scb_p->scb_busaddr = command_dma + sizeof (ips_scb_t) * i;
4330 		/* set up S/G list */
4331 		if (IPS_USE_ENH_SGLIST(ha)) {
4332 			scb_p->sg_list.enh_list =
4333 			    ips_sg.enh_list + i * IPS_MAX_SG;
4334 			scb_p->sg_busaddr =
4335 			    sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4336 		} else {
4337 			scb_p->sg_list.std_list =
4338 			    ips_sg.std_list + i * IPS_MAX_SG;
4339 			scb_p->sg_busaddr =
4340 			    sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4341 		}
4342 
4343 		/* add to the free list */
4344 		if (i < ha->max_cmds - 1) {
4345 			scb_p->q_next = ha->scb_freelist;
4346 			ha->scb_freelist = scb_p;
4347 		}
4348 	}
4349 
4350 	/* success */
4351 	return (1);
4352 }
4353 
4354 /****************************************************************************/
4355 /*                                                                          */
4356 /* Routine Name: ips_init_scb                                               */
4357 /*                                                                          */
4358 /* Routine Description:                                                     */
4359 /*                                                                          */
4360 /*   Initialize a CCB to default values                                     */
4361 /*                                                                          */
4362 /****************************************************************************/
4363 static void
4364 ips_init_scb(ips_ha_t * ha, ips_scb_t * scb)
4365 {
4366 	IPS_SG_LIST sg_list;
4367 	uint32_t cmd_busaddr, sg_busaddr;
4368 	METHOD_TRACE("ips_init_scb", 1);
4369 
4370 	if (scb == NULL)
4371 		return;
4372 
4373 	sg_list.list = scb->sg_list.list;
4374 	cmd_busaddr = scb->scb_busaddr;
4375 	sg_busaddr = scb->sg_busaddr;
4376 	/* zero fill */
4377 	memset(scb, 0, sizeof (ips_scb_t));
4378 	memset(ha->dummy, 0, sizeof (IPS_IO_CMD));
4379 
4380 	/* Initialize dummy command bucket */
4381 	ha->dummy->op_code = 0xFF;
4382 	ha->dummy->ccsar = cpu_to_le32(ha->adapt->hw_status_start
4383 				       + sizeof (IPS_ADAPTER));
4384 	ha->dummy->command_id = IPS_MAX_CMDS;
4385 
4386 	/* set bus address of scb */
4387 	scb->scb_busaddr = cmd_busaddr;
4388 	scb->sg_busaddr = sg_busaddr;
4389 	scb->sg_list.list = sg_list.list;
4390 
4391 	/* Neptune Fix */
4392 	scb->cmd.basic_io.cccr = cpu_to_le32((uint32_t) IPS_BIT_ILE);
4393 	scb->cmd.basic_io.ccsar = cpu_to_le32(ha->adapt->hw_status_start
4394 					      + sizeof (IPS_ADAPTER));
4395 }
4396 
4397 /****************************************************************************/
4398 /*                                                                          */
4399 /* Routine Name: ips_get_scb                                                */
4400 /*                                                                          */
4401 /* Routine Description:                                                     */
4402 /*                                                                          */
4403 /*   Initialize a CCB to default values                                     */
4404 /*                                                                          */
4405 /* ASSUMED to be called from within a lock                                 */
4406 /*                                                                          */
4407 /****************************************************************************/
4408 static ips_scb_t *
4409 ips_getscb(ips_ha_t * ha)
4410 {
4411 	ips_scb_t *scb;
4412 
4413 	METHOD_TRACE("ips_getscb", 1);
4414 
4415 	if ((scb = ha->scb_freelist) == NULL) {
4416 
4417 		return (NULL);
4418 	}
4419 
4420 	ha->scb_freelist = scb->q_next;
4421 	scb->flags = 0;
4422 	scb->q_next = NULL;
4423 
4424 	ips_init_scb(ha, scb);
4425 
4426 	return (scb);
4427 }
4428 
4429 /****************************************************************************/
4430 /*                                                                          */
4431 /* Routine Name: ips_free_scb                                               */
4432 /*                                                                          */
4433 /* Routine Description:                                                     */
4434 /*                                                                          */
4435 /*   Return an unused CCB back to the free list                             */
4436 /*                                                                          */
4437 /* ASSUMED to be called from within a lock                                  */
4438 /*                                                                          */
4439 /****************************************************************************/
4440 static void
4441 ips_freescb(ips_ha_t * ha, ips_scb_t * scb)
4442 {
4443 
4444 	METHOD_TRACE("ips_freescb", 1);
4445 	if (scb->flags & IPS_SCB_MAP_SG)
4446                 scsi_dma_unmap(scb->scsi_cmd);
4447 	else if (scb->flags & IPS_SCB_MAP_SINGLE)
4448 		dma_unmap_single(&ha->pcidev->dev, scb->data_busaddr,
4449 				 scb->data_len, IPS_DMA_DIR(scb));
4450 
4451 	/* check to make sure this is not our "special" scb */
4452 	if (IPS_COMMAND_ID(ha, scb) < (ha->max_cmds - 1)) {
4453 		scb->q_next = ha->scb_freelist;
4454 		ha->scb_freelist = scb;
4455 	}
4456 }
4457 
4458 /****************************************************************************/
4459 /*                                                                          */
4460 /* Routine Name: ips_isinit_copperhead                                      */
4461 /*                                                                          */
4462 /* Routine Description:                                                     */
4463 /*                                                                          */
4464 /*   Is controller initialized ?                                            */
4465 /*                                                                          */
4466 /****************************************************************************/
4467 static int
4468 ips_isinit_copperhead(ips_ha_t * ha)
4469 {
4470 	uint8_t scpr;
4471 	uint8_t isr;
4472 
4473 	METHOD_TRACE("ips_isinit_copperhead", 1);
4474 
4475 	isr = inb(ha->io_addr + IPS_REG_HISR);
4476 	scpr = inb(ha->io_addr + IPS_REG_SCPR);
4477 
4478 	if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4479 		return (0);
4480 	else
4481 		return (1);
4482 }
4483 
4484 /****************************************************************************/
4485 /*                                                                          */
4486 /* Routine Name: ips_isinit_copperhead_memio                                */
4487 /*                                                                          */
4488 /* Routine Description:                                                     */
4489 /*                                                                          */
4490 /*   Is controller initialized ?                                            */
4491 /*                                                                          */
4492 /****************************************************************************/
4493 static int
4494 ips_isinit_copperhead_memio(ips_ha_t * ha)
4495 {
4496 	uint8_t isr = 0;
4497 	uint8_t scpr;
4498 
4499 	METHOD_TRACE("ips_is_init_copperhead_memio", 1);
4500 
4501 	isr = readb(ha->mem_ptr + IPS_REG_HISR);
4502 	scpr = readb(ha->mem_ptr + IPS_REG_SCPR);
4503 
4504 	if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4505 		return (0);
4506 	else
4507 		return (1);
4508 }
4509 
4510 /****************************************************************************/
4511 /*                                                                          */
4512 /* Routine Name: ips_isinit_morpheus                                        */
4513 /*                                                                          */
4514 /* Routine Description:                                                     */
4515 /*                                                                          */
4516 /*   Is controller initialized ?                                            */
4517 /*                                                                          */
4518 /****************************************************************************/
4519 static int
4520 ips_isinit_morpheus(ips_ha_t * ha)
4521 {
4522 	uint32_t post;
4523 	uint32_t bits;
4524 
4525 	METHOD_TRACE("ips_is_init_morpheus", 1);
4526 
4527 	if (ips_isintr_morpheus(ha))
4528 	    ips_flush_and_reset(ha);
4529 
4530 	post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4531 	bits = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4532 
4533 	if (post == 0)
4534 		return (0);
4535 	else if (bits & 0x3)
4536 		return (0);
4537 	else
4538 		return (1);
4539 }
4540 
4541 /****************************************************************************/
4542 /*                                                                          */
4543 /* Routine Name: ips_flush_and_reset                                        */
4544 /*                                                                          */
4545 /* Routine Description:                                                     */
4546 /*                                                                          */
4547 /*   Perform cleanup ( FLUSH and RESET ) when the adapter is in an unknown  */
4548 /*   state ( was trying to INIT and an interrupt was already pending ) ...  */
4549 /*                                                                          */
4550 /****************************************************************************/
4551 static void
4552 ips_flush_and_reset(ips_ha_t *ha)
4553 {
4554 	ips_scb_t *scb;
4555 	int  ret;
4556  	int  time;
4557 	int  done;
4558 	dma_addr_t command_dma;
4559 
4560 	/* Create a usuable SCB */
4561 	scb = dma_alloc_coherent(&ha->pcidev->dev, sizeof(ips_scb_t),
4562 			&command_dma, GFP_KERNEL);
4563 	if (scb) {
4564 	    memset(scb, 0, sizeof(ips_scb_t));
4565 	    ips_init_scb(ha, scb);
4566 	    scb->scb_busaddr = command_dma;
4567 
4568 	    scb->timeout = ips_cmd_timeout;
4569 	    scb->cdb[0] = IPS_CMD_FLUSH;
4570 
4571 	    scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
4572 	    scb->cmd.flush_cache.command_id = IPS_MAX_CMDS;   /* Use an ID that would otherwise not exist */
4573 	    scb->cmd.flush_cache.state = IPS_NORM_STATE;
4574 	    scb->cmd.flush_cache.reserved = 0;
4575 	    scb->cmd.flush_cache.reserved2 = 0;
4576 	    scb->cmd.flush_cache.reserved3 = 0;
4577 	    scb->cmd.flush_cache.reserved4 = 0;
4578 
4579 	    ret = ips_send_cmd(ha, scb);                      /* Send the Flush Command */
4580 
4581 	    if (ret == IPS_SUCCESS) {
4582 	        time = 60 * IPS_ONE_SEC;	              /* Max Wait time is 60 seconds */
4583 	        done = 0;
4584 
4585 	        while ((time > 0) && (!done)) {
4586 		   done = ips_poll_for_flush_complete(ha);
4587 	           /* This may look evil, but it's only done during extremely rare start-up conditions ! */
4588 	           udelay(1000);
4589 	           time--;
4590 	        }
4591         }
4592 	}
4593 
4594 	/* Now RESET and INIT the adapter */
4595 	(*ha->func.reset) (ha);
4596 
4597 	dma_free_coherent(&ha->pcidev->dev, sizeof(ips_scb_t), scb, command_dma);
4598 	return;
4599 }
4600 
4601 /****************************************************************************/
4602 /*                                                                          */
4603 /* Routine Name: ips_poll_for_flush_complete                                */
4604 /*                                                                          */
4605 /* Routine Description:                                                     */
4606 /*                                                                          */
4607 /*   Poll for the Flush Command issued by ips_flush_and_reset() to complete */
4608 /*   All other responses are just taken off the queue and ignored           */
4609 /*                                                                          */
4610 /****************************************************************************/
4611 static int
4612 ips_poll_for_flush_complete(ips_ha_t * ha)
4613 {
4614 	IPS_STATUS cstatus;
4615 
4616 	while (TRUE) {
4617 	    cstatus.value = (*ha->func.statupd) (ha);
4618 
4619 	    if (cstatus.value == 0xffffffff)      /* If No Interrupt to process */
4620 			break;
4621 
4622 	    /* Success is when we see the Flush Command ID */
4623 	    if (cstatus.fields.command_id == IPS_MAX_CMDS)
4624 	        return 1;
4625 	 }
4626 
4627 	return 0;
4628 }
4629 
4630 /****************************************************************************/
4631 /*                                                                          */
4632 /* Routine Name: ips_enable_int_copperhead                                  */
4633 /*                                                                          */
4634 /* Routine Description:                                                     */
4635 /*   Turn on interrupts                                                     */
4636 /*                                                                          */
4637 /****************************************************************************/
4638 static void
4639 ips_enable_int_copperhead(ips_ha_t * ha)
4640 {
4641 	METHOD_TRACE("ips_enable_int_copperhead", 1);
4642 
4643 	outb(ha->io_addr + IPS_REG_HISR, IPS_BIT_EI);
4644 	inb(ha->io_addr + IPS_REG_HISR);	/*Ensure PCI Posting Completes*/
4645 }
4646 
4647 /****************************************************************************/
4648 /*                                                                          */
4649 /* Routine Name: ips_enable_int_copperhead_memio                            */
4650 /*                                                                          */
4651 /* Routine Description:                                                     */
4652 /*   Turn on interrupts                                                     */
4653 /*                                                                          */
4654 /****************************************************************************/
4655 static void
4656 ips_enable_int_copperhead_memio(ips_ha_t * ha)
4657 {
4658 	METHOD_TRACE("ips_enable_int_copperhead_memio", 1);
4659 
4660 	writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4661 	readb(ha->mem_ptr + IPS_REG_HISR);	/*Ensure PCI Posting Completes*/
4662 }
4663 
4664 /****************************************************************************/
4665 /*                                                                          */
4666 /* Routine Name: ips_enable_int_morpheus                                    */
4667 /*                                                                          */
4668 /* Routine Description:                                                     */
4669 /*   Turn on interrupts                                                     */
4670 /*                                                                          */
4671 /****************************************************************************/
4672 static void
4673 ips_enable_int_morpheus(ips_ha_t * ha)
4674 {
4675 	uint32_t Oimr;
4676 
4677 	METHOD_TRACE("ips_enable_int_morpheus", 1);
4678 
4679 	Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4680 	Oimr &= ~0x08;
4681 	writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4682 	readl(ha->mem_ptr + IPS_REG_I960_OIMR);	/*Ensure PCI Posting Completes*/
4683 }
4684 
4685 /****************************************************************************/
4686 /*                                                                          */
4687 /* Routine Name: ips_init_copperhead                                        */
4688 /*                                                                          */
4689 /* Routine Description:                                                     */
4690 /*                                                                          */
4691 /*   Initialize a copperhead controller                                     */
4692 /*                                                                          */
4693 /****************************************************************************/
4694 static int
4695 ips_init_copperhead(ips_ha_t * ha)
4696 {
4697 	uint8_t Isr;
4698 	uint8_t Cbsp;
4699 	uint8_t PostByte[IPS_MAX_POST_BYTES];
4700 	uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4701 	int i, j;
4702 
4703 	METHOD_TRACE("ips_init_copperhead", 1);
4704 
4705 	for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4706 		for (j = 0; j < 45; j++) {
4707 			Isr = inb(ha->io_addr + IPS_REG_HISR);
4708 			if (Isr & IPS_BIT_GHI)
4709 				break;
4710 
4711 			/* Delay for 1 Second */
4712 			MDELAY(IPS_ONE_SEC);
4713 		}
4714 
4715 		if (j >= 45)
4716 			/* error occurred */
4717 			return (0);
4718 
4719 		PostByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4720 		outb(Isr, ha->io_addr + IPS_REG_HISR);
4721 	}
4722 
4723 	if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4724 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4725 			   "reset controller fails (post status %x %x).\n",
4726 			   PostByte[0], PostByte[1]);
4727 
4728 		return (0);
4729 	}
4730 
4731 	for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4732 		for (j = 0; j < 240; j++) {
4733 			Isr = inb(ha->io_addr + IPS_REG_HISR);
4734 			if (Isr & IPS_BIT_GHI)
4735 				break;
4736 
4737 			/* Delay for 1 Second */
4738 			MDELAY(IPS_ONE_SEC);
4739 		}
4740 
4741 		if (j >= 240)
4742 			/* error occurred */
4743 			return (0);
4744 
4745 		ConfigByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4746 		outb(Isr, ha->io_addr + IPS_REG_HISR);
4747 	}
4748 
4749 	for (i = 0; i < 240; i++) {
4750 		Cbsp = inb(ha->io_addr + IPS_REG_CBSP);
4751 
4752 		if ((Cbsp & IPS_BIT_OP) == 0)
4753 			break;
4754 
4755 		/* Delay for 1 Second */
4756 		MDELAY(IPS_ONE_SEC);
4757 	}
4758 
4759 	if (i >= 240)
4760 		/* reset failed */
4761 		return (0);
4762 
4763 	/* setup CCCR */
4764 	outl(0x1010, ha->io_addr + IPS_REG_CCCR);
4765 
4766 	/* Enable busmastering */
4767 	outb(IPS_BIT_EBM, ha->io_addr + IPS_REG_SCPR);
4768 
4769 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4770 		/* fix for anaconda64 */
4771 		outl(0, ha->io_addr + IPS_REG_NDAE);
4772 
4773 	/* Enable interrupts */
4774 	outb(IPS_BIT_EI, ha->io_addr + IPS_REG_HISR);
4775 
4776 	return (1);
4777 }
4778 
4779 /****************************************************************************/
4780 /*                                                                          */
4781 /* Routine Name: ips_init_copperhead_memio                                  */
4782 /*                                                                          */
4783 /* Routine Description:                                                     */
4784 /*                                                                          */
4785 /*   Initialize a copperhead controller with memory mapped I/O              */
4786 /*                                                                          */
4787 /****************************************************************************/
4788 static int
4789 ips_init_copperhead_memio(ips_ha_t * ha)
4790 {
4791 	uint8_t Isr = 0;
4792 	uint8_t Cbsp;
4793 	uint8_t PostByte[IPS_MAX_POST_BYTES];
4794 	uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4795 	int i, j;
4796 
4797 	METHOD_TRACE("ips_init_copperhead_memio", 1);
4798 
4799 	for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4800 		for (j = 0; j < 45; j++) {
4801 			Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4802 			if (Isr & IPS_BIT_GHI)
4803 				break;
4804 
4805 			/* Delay for 1 Second */
4806 			MDELAY(IPS_ONE_SEC);
4807 		}
4808 
4809 		if (j >= 45)
4810 			/* error occurred */
4811 			return (0);
4812 
4813 		PostByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4814 		writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4815 	}
4816 
4817 	if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4818 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4819 			   "reset controller fails (post status %x %x).\n",
4820 			   PostByte[0], PostByte[1]);
4821 
4822 		return (0);
4823 	}
4824 
4825 	for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4826 		for (j = 0; j < 240; j++) {
4827 			Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4828 			if (Isr & IPS_BIT_GHI)
4829 				break;
4830 
4831 			/* Delay for 1 Second */
4832 			MDELAY(IPS_ONE_SEC);
4833 		}
4834 
4835 		if (j >= 240)
4836 			/* error occurred */
4837 			return (0);
4838 
4839 		ConfigByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4840 		writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4841 	}
4842 
4843 	for (i = 0; i < 240; i++) {
4844 		Cbsp = readb(ha->mem_ptr + IPS_REG_CBSP);
4845 
4846 		if ((Cbsp & IPS_BIT_OP) == 0)
4847 			break;
4848 
4849 		/* Delay for 1 Second */
4850 		MDELAY(IPS_ONE_SEC);
4851 	}
4852 
4853 	if (i >= 240)
4854 		/* error occurred */
4855 		return (0);
4856 
4857 	/* setup CCCR */
4858 	writel(0x1010, ha->mem_ptr + IPS_REG_CCCR);
4859 
4860 	/* Enable busmastering */
4861 	writeb(IPS_BIT_EBM, ha->mem_ptr + IPS_REG_SCPR);
4862 
4863 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4864 		/* fix for anaconda64 */
4865 		writel(0, ha->mem_ptr + IPS_REG_NDAE);
4866 
4867 	/* Enable interrupts */
4868 	writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4869 
4870 	/* if we get here then everything went OK */
4871 	return (1);
4872 }
4873 
4874 /****************************************************************************/
4875 /*                                                                          */
4876 /* Routine Name: ips_init_morpheus                                          */
4877 /*                                                                          */
4878 /* Routine Description:                                                     */
4879 /*                                                                          */
4880 /*   Initialize a morpheus controller                                       */
4881 /*                                                                          */
4882 /****************************************************************************/
4883 static int
4884 ips_init_morpheus(ips_ha_t * ha)
4885 {
4886 	uint32_t Post;
4887 	uint32_t Config;
4888 	uint32_t Isr;
4889 	uint32_t Oimr;
4890 	int i;
4891 
4892 	METHOD_TRACE("ips_init_morpheus", 1);
4893 
4894 	/* Wait up to 45 secs for Post */
4895 	for (i = 0; i < 45; i++) {
4896 		Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4897 
4898 		if (Isr & IPS_BIT_I960_MSG0I)
4899 			break;
4900 
4901 		/* Delay for 1 Second */
4902 		MDELAY(IPS_ONE_SEC);
4903 	}
4904 
4905 	if (i >= 45) {
4906 		/* error occurred */
4907 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4908 			   "timeout waiting for post.\n");
4909 
4910 		return (0);
4911 	}
4912 
4913 	Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4914 
4915 	if (Post == 0x4F00) {	/* If Flashing the Battery PIC         */
4916 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4917 			   "Flashing Battery PIC, Please wait ...\n");
4918 
4919 		/* Clear the interrupt bit */
4920 		Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4921 		writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4922 
4923 		for (i = 0; i < 120; i++) {	/*    Wait Up to 2 Min. for Completion */
4924 			Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4925 			if (Post != 0x4F00)
4926 				break;
4927 			/* Delay for 1 Second */
4928 			MDELAY(IPS_ONE_SEC);
4929 		}
4930 
4931 		if (i >= 120) {
4932 			IPS_PRINTK(KERN_WARNING, ha->pcidev,
4933 				   "timeout waiting for Battery PIC Flash\n");
4934 			return (0);
4935 		}
4936 
4937 	}
4938 
4939 	/* Clear the interrupt bit */
4940 	Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4941 	writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4942 
4943 	if (Post < (IPS_GOOD_POST_STATUS << 8)) {
4944 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4945 			   "reset controller fails (post status %x).\n", Post);
4946 
4947 		return (0);
4948 	}
4949 
4950 	/* Wait up to 240 secs for config bytes */
4951 	for (i = 0; i < 240; i++) {
4952 		Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4953 
4954 		if (Isr & IPS_BIT_I960_MSG1I)
4955 			break;
4956 
4957 		/* Delay for 1 Second */
4958 		MDELAY(IPS_ONE_SEC);
4959 	}
4960 
4961 	if (i >= 240) {
4962 		/* error occurred */
4963 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4964 			   "timeout waiting for config.\n");
4965 
4966 		return (0);
4967 	}
4968 
4969 	Config = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
4970 
4971 	/* Clear interrupt bit */
4972 	Isr = (uint32_t) IPS_BIT_I960_MSG1I;
4973 	writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4974 
4975 	/* Turn on the interrupts */
4976 	Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4977 	Oimr &= ~0x8;
4978 	writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4979 
4980 	/* if we get here then everything went OK */
4981 
4982 	/* Since we did a RESET, an EraseStripeLock may be needed */
4983 	if (Post == 0xEF10) {
4984 		if ((Config == 0x000F) || (Config == 0x0009))
4985 			ha->requires_esl = 1;
4986 	}
4987 
4988 	return (1);
4989 }
4990 
4991 /****************************************************************************/
4992 /*                                                                          */
4993 /* Routine Name: ips_reset_copperhead                                       */
4994 /*                                                                          */
4995 /* Routine Description:                                                     */
4996 /*                                                                          */
4997 /*   Reset the controller                                                   */
4998 /*                                                                          */
4999 /****************************************************************************/
5000 static int
5001 ips_reset_copperhead(ips_ha_t * ha)
5002 {
5003 	int reset_counter;
5004 
5005 	METHOD_TRACE("ips_reset_copperhead", 1);
5006 
5007 	DEBUG_VAR(1, "(%s%d) ips_reset_copperhead: io addr: %x, irq: %d",
5008 		  ips_name, ha->host_num, ha->io_addr, ha->pcidev->irq);
5009 
5010 	reset_counter = 0;
5011 
5012 	while (reset_counter < 2) {
5013 		reset_counter++;
5014 
5015 		outb(IPS_BIT_RST, ha->io_addr + IPS_REG_SCPR);
5016 
5017 		/* Delay for 1 Second */
5018 		MDELAY(IPS_ONE_SEC);
5019 
5020 		outb(0, ha->io_addr + IPS_REG_SCPR);
5021 
5022 		/* Delay for 1 Second */
5023 		MDELAY(IPS_ONE_SEC);
5024 
5025 		if ((*ha->func.init) (ha))
5026 			break;
5027 		else if (reset_counter >= 2) {
5028 
5029 			return (0);
5030 		}
5031 	}
5032 
5033 	return (1);
5034 }
5035 
5036 /****************************************************************************/
5037 /*                                                                          */
5038 /* Routine Name: ips_reset_copperhead_memio                                 */
5039 /*                                                                          */
5040 /* Routine Description:                                                     */
5041 /*                                                                          */
5042 /*   Reset the controller                                                   */
5043 /*                                                                          */
5044 /****************************************************************************/
5045 static int
5046 ips_reset_copperhead_memio(ips_ha_t * ha)
5047 {
5048 	int reset_counter;
5049 
5050 	METHOD_TRACE("ips_reset_copperhead_memio", 1);
5051 
5052 	DEBUG_VAR(1, "(%s%d) ips_reset_copperhead_memio: mem addr: %x, irq: %d",
5053 		  ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5054 
5055 	reset_counter = 0;
5056 
5057 	while (reset_counter < 2) {
5058 		reset_counter++;
5059 
5060 		writeb(IPS_BIT_RST, ha->mem_ptr + IPS_REG_SCPR);
5061 
5062 		/* Delay for 1 Second */
5063 		MDELAY(IPS_ONE_SEC);
5064 
5065 		writeb(0, ha->mem_ptr + IPS_REG_SCPR);
5066 
5067 		/* Delay for 1 Second */
5068 		MDELAY(IPS_ONE_SEC);
5069 
5070 		if ((*ha->func.init) (ha))
5071 			break;
5072 		else if (reset_counter >= 2) {
5073 
5074 			return (0);
5075 		}
5076 	}
5077 
5078 	return (1);
5079 }
5080 
5081 /****************************************************************************/
5082 /*                                                                          */
5083 /* Routine Name: ips_reset_morpheus                                         */
5084 /*                                                                          */
5085 /* Routine Description:                                                     */
5086 /*                                                                          */
5087 /*   Reset the controller                                                   */
5088 /*                                                                          */
5089 /****************************************************************************/
5090 static int
5091 ips_reset_morpheus(ips_ha_t * ha)
5092 {
5093 	int reset_counter;
5094 	uint8_t junk;
5095 
5096 	METHOD_TRACE("ips_reset_morpheus", 1);
5097 
5098 	DEBUG_VAR(1, "(%s%d) ips_reset_morpheus: mem addr: %x, irq: %d",
5099 		  ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5100 
5101 	reset_counter = 0;
5102 
5103 	while (reset_counter < 2) {
5104 		reset_counter++;
5105 
5106 		writel(0x80000000, ha->mem_ptr + IPS_REG_I960_IDR);
5107 
5108 		/* Delay for 5 Seconds */
5109 		MDELAY(5 * IPS_ONE_SEC);
5110 
5111 		/* Do a PCI config read to wait for adapter */
5112 		pci_read_config_byte(ha->pcidev, 4, &junk);
5113 
5114 		if ((*ha->func.init) (ha))
5115 			break;
5116 		else if (reset_counter >= 2) {
5117 
5118 			return (0);
5119 		}
5120 	}
5121 
5122 	return (1);
5123 }
5124 
5125 /****************************************************************************/
5126 /*                                                                          */
5127 /* Routine Name: ips_statinit                                               */
5128 /*                                                                          */
5129 /* Routine Description:                                                     */
5130 /*                                                                          */
5131 /*   Initialize the status queues on the controller                         */
5132 /*                                                                          */
5133 /****************************************************************************/
5134 static void
5135 ips_statinit(ips_ha_t * ha)
5136 {
5137 	uint32_t phys_status_start;
5138 
5139 	METHOD_TRACE("ips_statinit", 1);
5140 
5141 	ha->adapt->p_status_start = ha->adapt->status;
5142 	ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5143 	ha->adapt->p_status_tail = ha->adapt->status;
5144 
5145 	phys_status_start = ha->adapt->hw_status_start;
5146 	outl(phys_status_start, ha->io_addr + IPS_REG_SQSR);
5147 	outl(phys_status_start + IPS_STATUS_Q_SIZE,
5148 	     ha->io_addr + IPS_REG_SQER);
5149 	outl(phys_status_start + IPS_STATUS_SIZE,
5150 	     ha->io_addr + IPS_REG_SQHR);
5151 	outl(phys_status_start, ha->io_addr + IPS_REG_SQTR);
5152 
5153 	ha->adapt->hw_status_tail = phys_status_start;
5154 }
5155 
5156 /****************************************************************************/
5157 /*                                                                          */
5158 /* Routine Name: ips_statinit_memio                                         */
5159 /*                                                                          */
5160 /* Routine Description:                                                     */
5161 /*                                                                          */
5162 /*   Initialize the status queues on the controller                         */
5163 /*                                                                          */
5164 /****************************************************************************/
5165 static void
5166 ips_statinit_memio(ips_ha_t * ha)
5167 {
5168 	uint32_t phys_status_start;
5169 
5170 	METHOD_TRACE("ips_statinit_memio", 1);
5171 
5172 	ha->adapt->p_status_start = ha->adapt->status;
5173 	ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5174 	ha->adapt->p_status_tail = ha->adapt->status;
5175 
5176 	phys_status_start = ha->adapt->hw_status_start;
5177 	writel(phys_status_start, ha->mem_ptr + IPS_REG_SQSR);
5178 	writel(phys_status_start + IPS_STATUS_Q_SIZE,
5179 	       ha->mem_ptr + IPS_REG_SQER);
5180 	writel(phys_status_start + IPS_STATUS_SIZE, ha->mem_ptr + IPS_REG_SQHR);
5181 	writel(phys_status_start, ha->mem_ptr + IPS_REG_SQTR);
5182 
5183 	ha->adapt->hw_status_tail = phys_status_start;
5184 }
5185 
5186 /****************************************************************************/
5187 /*                                                                          */
5188 /* Routine Name: ips_statupd_copperhead                                     */
5189 /*                                                                          */
5190 /* Routine Description:                                                     */
5191 /*                                                                          */
5192 /*   Remove an element from the status queue                                */
5193 /*                                                                          */
5194 /****************************************************************************/
5195 static uint32_t
5196 ips_statupd_copperhead(ips_ha_t * ha)
5197 {
5198 	METHOD_TRACE("ips_statupd_copperhead", 1);
5199 
5200 	if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5201 		ha->adapt->p_status_tail++;
5202 		ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5203 	} else {
5204 		ha->adapt->p_status_tail = ha->adapt->p_status_start;
5205 		ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5206 	}
5207 
5208 	outl(ha->adapt->hw_status_tail,
5209 	     ha->io_addr + IPS_REG_SQTR);
5210 
5211 	return (ha->adapt->p_status_tail->value);
5212 }
5213 
5214 /****************************************************************************/
5215 /*                                                                          */
5216 /* Routine Name: ips_statupd_copperhead_memio                               */
5217 /*                                                                          */
5218 /* Routine Description:                                                     */
5219 /*                                                                          */
5220 /*   Remove an element from the status queue                                */
5221 /*                                                                          */
5222 /****************************************************************************/
5223 static uint32_t
5224 ips_statupd_copperhead_memio(ips_ha_t * ha)
5225 {
5226 	METHOD_TRACE("ips_statupd_copperhead_memio", 1);
5227 
5228 	if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5229 		ha->adapt->p_status_tail++;
5230 		ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5231 	} else {
5232 		ha->adapt->p_status_tail = ha->adapt->p_status_start;
5233 		ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5234 	}
5235 
5236 	writel(ha->adapt->hw_status_tail, ha->mem_ptr + IPS_REG_SQTR);
5237 
5238 	return (ha->adapt->p_status_tail->value);
5239 }
5240 
5241 /****************************************************************************/
5242 /*                                                                          */
5243 /* Routine Name: ips_statupd_morpheus                                       */
5244 /*                                                                          */
5245 /* Routine Description:                                                     */
5246 /*                                                                          */
5247 /*   Remove an element from the status queue                                */
5248 /*                                                                          */
5249 /****************************************************************************/
5250 static uint32_t
5251 ips_statupd_morpheus(ips_ha_t * ha)
5252 {
5253 	uint32_t val;
5254 
5255 	METHOD_TRACE("ips_statupd_morpheus", 1);
5256 
5257 	val = readl(ha->mem_ptr + IPS_REG_I2O_OUTMSGQ);
5258 
5259 	return (val);
5260 }
5261 
5262 /****************************************************************************/
5263 /*                                                                          */
5264 /* Routine Name: ips_issue_copperhead                                       */
5265 /*                                                                          */
5266 /* Routine Description:                                                     */
5267 /*                                                                          */
5268 /*   Send a command down to the controller                                  */
5269 /*                                                                          */
5270 /****************************************************************************/
5271 static int
5272 ips_issue_copperhead(ips_ha_t * ha, ips_scb_t * scb)
5273 {
5274 	uint32_t TimeOut;
5275 	uint32_t val;
5276 
5277 	METHOD_TRACE("ips_issue_copperhead", 1);
5278 
5279 	if (scb->scsi_cmd) {
5280 		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5281 			  ips_name,
5282 			  ha->host_num,
5283 			  scb->cdb[0],
5284 			  scb->cmd.basic_io.command_id,
5285 			  scb->bus, scb->target_id, scb->lun);
5286 	} else {
5287 		DEBUG_VAR(2, KERN_NOTICE "(%s%d) ips_issue: logical cmd id %d",
5288 			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5289 	}
5290 
5291 	TimeOut = 0;
5292 
5293 	while ((val =
5294 		le32_to_cpu(inl(ha->io_addr + IPS_REG_CCCR))) & IPS_BIT_SEM) {
5295 		udelay(1000);
5296 
5297 		if (++TimeOut >= IPS_SEM_TIMEOUT) {
5298 			if (!(val & IPS_BIT_START_STOP))
5299 				break;
5300 
5301 			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5302 				   "ips_issue val [0x%x].\n", val);
5303 			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5304 				   "ips_issue semaphore chk timeout.\n");
5305 
5306 			return (IPS_FAILURE);
5307 		}		/* end if */
5308 	}			/* end while */
5309 
5310 	outl(scb->scb_busaddr, ha->io_addr + IPS_REG_CCSAR);
5311 	outw(IPS_BIT_START_CMD, ha->io_addr + IPS_REG_CCCR);
5312 
5313 	return (IPS_SUCCESS);
5314 }
5315 
5316 /****************************************************************************/
5317 /*                                                                          */
5318 /* Routine Name: ips_issue_copperhead_memio                                 */
5319 /*                                                                          */
5320 /* Routine Description:                                                     */
5321 /*                                                                          */
5322 /*   Send a command down to the controller                                  */
5323 /*                                                                          */
5324 /****************************************************************************/
5325 static int
5326 ips_issue_copperhead_memio(ips_ha_t * ha, ips_scb_t * scb)
5327 {
5328 	uint32_t TimeOut;
5329 	uint32_t val;
5330 
5331 	METHOD_TRACE("ips_issue_copperhead_memio", 1);
5332 
5333 	if (scb->scsi_cmd) {
5334 		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5335 			  ips_name,
5336 			  ha->host_num,
5337 			  scb->cdb[0],
5338 			  scb->cmd.basic_io.command_id,
5339 			  scb->bus, scb->target_id, scb->lun);
5340 	} else {
5341 		DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5342 			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5343 	}
5344 
5345 	TimeOut = 0;
5346 
5347 	while ((val = readl(ha->mem_ptr + IPS_REG_CCCR)) & IPS_BIT_SEM) {
5348 		udelay(1000);
5349 
5350 		if (++TimeOut >= IPS_SEM_TIMEOUT) {
5351 			if (!(val & IPS_BIT_START_STOP))
5352 				break;
5353 
5354 			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5355 				   "ips_issue val [0x%x].\n", val);
5356 			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5357 				   "ips_issue semaphore chk timeout.\n");
5358 
5359 			return (IPS_FAILURE);
5360 		}		/* end if */
5361 	}			/* end while */
5362 
5363 	writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_CCSAR);
5364 	writel(IPS_BIT_START_CMD, ha->mem_ptr + IPS_REG_CCCR);
5365 
5366 	return (IPS_SUCCESS);
5367 }
5368 
5369 /****************************************************************************/
5370 /*                                                                          */
5371 /* Routine Name: ips_issue_i2o                                              */
5372 /*                                                                          */
5373 /* Routine Description:                                                     */
5374 /*                                                                          */
5375 /*   Send a command down to the controller                                  */
5376 /*                                                                          */
5377 /****************************************************************************/
5378 static int
5379 ips_issue_i2o(ips_ha_t * ha, ips_scb_t * scb)
5380 {
5381 
5382 	METHOD_TRACE("ips_issue_i2o", 1);
5383 
5384 	if (scb->scsi_cmd) {
5385 		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5386 			  ips_name,
5387 			  ha->host_num,
5388 			  scb->cdb[0],
5389 			  scb->cmd.basic_io.command_id,
5390 			  scb->bus, scb->target_id, scb->lun);
5391 	} else {
5392 		DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5393 			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5394 	}
5395 
5396 	outl(scb->scb_busaddr, ha->io_addr + IPS_REG_I2O_INMSGQ);
5397 
5398 	return (IPS_SUCCESS);
5399 }
5400 
5401 /****************************************************************************/
5402 /*                                                                          */
5403 /* Routine Name: ips_issue_i2o_memio                                        */
5404 /*                                                                          */
5405 /* Routine Description:                                                     */
5406 /*                                                                          */
5407 /*   Send a command down to the controller                                  */
5408 /*                                                                          */
5409 /****************************************************************************/
5410 static int
5411 ips_issue_i2o_memio(ips_ha_t * ha, ips_scb_t * scb)
5412 {
5413 
5414 	METHOD_TRACE("ips_issue_i2o_memio", 1);
5415 
5416 	if (scb->scsi_cmd) {
5417 		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5418 			  ips_name,
5419 			  ha->host_num,
5420 			  scb->cdb[0],
5421 			  scb->cmd.basic_io.command_id,
5422 			  scb->bus, scb->target_id, scb->lun);
5423 	} else {
5424 		DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5425 			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5426 	}
5427 
5428 	writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_I2O_INMSGQ);
5429 
5430 	return (IPS_SUCCESS);
5431 }
5432 
5433 /****************************************************************************/
5434 /*                                                                          */
5435 /* Routine Name: ips_isintr_copperhead                                      */
5436 /*                                                                          */
5437 /* Routine Description:                                                     */
5438 /*                                                                          */
5439 /*   Test to see if an interrupt is for us                                  */
5440 /*                                                                          */
5441 /****************************************************************************/
5442 static int
5443 ips_isintr_copperhead(ips_ha_t * ha)
5444 {
5445 	uint8_t Isr;
5446 
5447 	METHOD_TRACE("ips_isintr_copperhead", 2);
5448 
5449 	Isr = inb(ha->io_addr + IPS_REG_HISR);
5450 
5451 	if (Isr == 0xFF)
5452 		/* ?!?! Nothing really there */
5453 		return (0);
5454 
5455 	if (Isr & IPS_BIT_SCE)
5456 		return (1);
5457 	else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5458 		/* status queue overflow or GHI */
5459 		/* just clear the interrupt */
5460 		outb(Isr, ha->io_addr + IPS_REG_HISR);
5461 	}
5462 
5463 	return (0);
5464 }
5465 
5466 /****************************************************************************/
5467 /*                                                                          */
5468 /* Routine Name: ips_isintr_copperhead_memio                                */
5469 /*                                                                          */
5470 /* Routine Description:                                                     */
5471 /*                                                                          */
5472 /*   Test to see if an interrupt is for us                                  */
5473 /*                                                                          */
5474 /****************************************************************************/
5475 static int
5476 ips_isintr_copperhead_memio(ips_ha_t * ha)
5477 {
5478 	uint8_t Isr;
5479 
5480 	METHOD_TRACE("ips_isintr_memio", 2);
5481 
5482 	Isr = readb(ha->mem_ptr + IPS_REG_HISR);
5483 
5484 	if (Isr == 0xFF)
5485 		/* ?!?! Nothing really there */
5486 		return (0);
5487 
5488 	if (Isr & IPS_BIT_SCE)
5489 		return (1);
5490 	else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5491 		/* status queue overflow or GHI */
5492 		/* just clear the interrupt */
5493 		writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
5494 	}
5495 
5496 	return (0);
5497 }
5498 
5499 /****************************************************************************/
5500 /*                                                                          */
5501 /* Routine Name: ips_isintr_morpheus                                        */
5502 /*                                                                          */
5503 /* Routine Description:                                                     */
5504 /*                                                                          */
5505 /*   Test to see if an interrupt is for us                                  */
5506 /*                                                                          */
5507 /****************************************************************************/
5508 static int
5509 ips_isintr_morpheus(ips_ha_t * ha)
5510 {
5511 	uint32_t Isr;
5512 
5513 	METHOD_TRACE("ips_isintr_morpheus", 2);
5514 
5515 	Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5516 
5517 	if (Isr & IPS_BIT_I2O_OPQI)
5518 		return (1);
5519 	else
5520 		return (0);
5521 }
5522 
5523 /****************************************************************************/
5524 /*                                                                          */
5525 /* Routine Name: ips_wait                                                   */
5526 /*                                                                          */
5527 /* Routine Description:                                                     */
5528 /*                                                                          */
5529 /*   Wait for a command to complete                                         */
5530 /*                                                                          */
5531 /****************************************************************************/
5532 static int
5533 ips_wait(ips_ha_t * ha, int time, int intr)
5534 {
5535 	int ret;
5536 	int done;
5537 
5538 	METHOD_TRACE("ips_wait", 1);
5539 
5540 	ret = IPS_FAILURE;
5541 	done = FALSE;
5542 
5543 	time *= IPS_ONE_SEC;	/* convert seconds */
5544 
5545 	while ((time > 0) && (!done)) {
5546 		if (intr == IPS_INTR_ON) {
5547 			if (ha->waitflag == FALSE) {
5548 				ret = IPS_SUCCESS;
5549 				done = TRUE;
5550 				break;
5551 			}
5552 		} else if (intr == IPS_INTR_IORL) {
5553 			if (ha->waitflag == FALSE) {
5554 				/*
5555 				 * controller generated an interrupt to
5556 				 * acknowledge completion of the command
5557 				 * and ips_intr() has serviced the interrupt.
5558 				 */
5559 				ret = IPS_SUCCESS;
5560 				done = TRUE;
5561 				break;
5562 			}
5563 
5564 			/*
5565 			 * NOTE: we already have the io_request_lock so
5566 			 * even if we get an interrupt it won't get serviced
5567 			 * until after we finish.
5568 			 */
5569 
5570 			(*ha->func.intr) (ha);
5571 		}
5572 
5573 		/* This looks like a very evil loop, but it only does this during start-up */
5574 		udelay(1000);
5575 		time--;
5576 	}
5577 
5578 	return (ret);
5579 }
5580 
5581 /****************************************************************************/
5582 /*                                                                          */
5583 /* Routine Name: ips_write_driver_status                                    */
5584 /*                                                                          */
5585 /* Routine Description:                                                     */
5586 /*                                                                          */
5587 /*   Write OS/Driver version to Page 5 of the nvram on the controller       */
5588 /*                                                                          */
5589 /****************************************************************************/
5590 static int
5591 ips_write_driver_status(ips_ha_t * ha, int intr)
5592 {
5593 	METHOD_TRACE("ips_write_driver_status", 1);
5594 
5595 	if (!ips_readwrite_page5(ha, FALSE, intr)) {
5596 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
5597 			   "unable to read NVRAM page 5.\n");
5598 
5599 		return (0);
5600 	}
5601 
5602 	/* check to make sure the page has a valid */
5603 	/* signature */
5604 	if (le32_to_cpu(ha->nvram->signature) != IPS_NVRAM_P5_SIG) {
5605 		DEBUG_VAR(1,
5606 			  "(%s%d) NVRAM page 5 has an invalid signature: %X.",
5607 			  ips_name, ha->host_num, ha->nvram->signature);
5608 		ha->nvram->signature = IPS_NVRAM_P5_SIG;
5609 	}
5610 
5611 	DEBUG_VAR(2,
5612 		  "(%s%d) Ad Type: %d, Ad Slot: %d, BIOS: %c%c%c%c %c%c%c%c.",
5613 		  ips_name, ha->host_num, le16_to_cpu(ha->nvram->adapter_type),
5614 		  ha->nvram->adapter_slot, ha->nvram->bios_high[0],
5615 		  ha->nvram->bios_high[1], ha->nvram->bios_high[2],
5616 		  ha->nvram->bios_high[3], ha->nvram->bios_low[0],
5617 		  ha->nvram->bios_low[1], ha->nvram->bios_low[2],
5618 		  ha->nvram->bios_low[3]);
5619 
5620 	ips_get_bios_version(ha, intr);
5621 
5622 	/* change values (as needed) */
5623 	ha->nvram->operating_system = IPS_OS_LINUX;
5624 	ha->nvram->adapter_type = ha->ad_type;
5625 	strncpy((char *) ha->nvram->driver_high, IPS_VERSION_HIGH, 4);
5626 	strncpy((char *) ha->nvram->driver_low, IPS_VERSION_LOW, 4);
5627 	strncpy((char *) ha->nvram->bios_high, ha->bios_version, 4);
5628 	strncpy((char *) ha->nvram->bios_low, ha->bios_version + 4, 4);
5629 
5630 	ha->nvram->versioning = 0;	/* Indicate the Driver Does Not Support Versioning */
5631 
5632 	/* now update the page */
5633 	if (!ips_readwrite_page5(ha, TRUE, intr)) {
5634 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
5635 			   "unable to write NVRAM page 5.\n");
5636 
5637 		return (0);
5638 	}
5639 
5640 	/* IF NVRAM Page 5 is OK, Use it for Slot Number Info Because Linux Doesn't Do Slots */
5641 	ha->slot_num = ha->nvram->adapter_slot;
5642 
5643 	return (1);
5644 }
5645 
5646 /****************************************************************************/
5647 /*                                                                          */
5648 /* Routine Name: ips_read_adapter_status                                    */
5649 /*                                                                          */
5650 /* Routine Description:                                                     */
5651 /*                                                                          */
5652 /*   Do an Inquiry command to the adapter                                   */
5653 /*                                                                          */
5654 /****************************************************************************/
5655 static int
5656 ips_read_adapter_status(ips_ha_t * ha, int intr)
5657 {
5658 	ips_scb_t *scb;
5659 	int ret;
5660 
5661 	METHOD_TRACE("ips_read_adapter_status", 1);
5662 
5663 	scb = &ha->scbs[ha->max_cmds - 1];
5664 
5665 	ips_init_scb(ha, scb);
5666 
5667 	scb->timeout = ips_cmd_timeout;
5668 	scb->cdb[0] = IPS_CMD_ENQUIRY;
5669 
5670 	scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
5671 	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5672 	scb->cmd.basic_io.sg_count = 0;
5673 	scb->cmd.basic_io.lba = 0;
5674 	scb->cmd.basic_io.sector_count = 0;
5675 	scb->cmd.basic_io.log_drv = 0;
5676 	scb->data_len = sizeof (*ha->enq);
5677 	scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
5678 
5679 	/* send command */
5680 	if (((ret =
5681 	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5682 	    || (ret == IPS_SUCCESS_IMM)
5683 	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5684 		return (0);
5685 
5686 	return (1);
5687 }
5688 
5689 /****************************************************************************/
5690 /*                                                                          */
5691 /* Routine Name: ips_read_subsystem_parameters                              */
5692 /*                                                                          */
5693 /* Routine Description:                                                     */
5694 /*                                                                          */
5695 /*   Read subsystem parameters from the adapter                             */
5696 /*                                                                          */
5697 /****************************************************************************/
5698 static int
5699 ips_read_subsystem_parameters(ips_ha_t * ha, int intr)
5700 {
5701 	ips_scb_t *scb;
5702 	int ret;
5703 
5704 	METHOD_TRACE("ips_read_subsystem_parameters", 1);
5705 
5706 	scb = &ha->scbs[ha->max_cmds - 1];
5707 
5708 	ips_init_scb(ha, scb);
5709 
5710 	scb->timeout = ips_cmd_timeout;
5711 	scb->cdb[0] = IPS_CMD_GET_SUBSYS;
5712 
5713 	scb->cmd.basic_io.op_code = IPS_CMD_GET_SUBSYS;
5714 	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5715 	scb->cmd.basic_io.sg_count = 0;
5716 	scb->cmd.basic_io.lba = 0;
5717 	scb->cmd.basic_io.sector_count = 0;
5718 	scb->cmd.basic_io.log_drv = 0;
5719 	scb->data_len = sizeof (*ha->subsys);
5720 	scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5721 
5722 	/* send command */
5723 	if (((ret =
5724 	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5725 	    || (ret == IPS_SUCCESS_IMM)
5726 	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5727 		return (0);
5728 
5729 	memcpy(ha->subsys, ha->ioctl_data, sizeof(*ha->subsys));
5730 	return (1);
5731 }
5732 
5733 /****************************************************************************/
5734 /*                                                                          */
5735 /* Routine Name: ips_read_config                                            */
5736 /*                                                                          */
5737 /* Routine Description:                                                     */
5738 /*                                                                          */
5739 /*   Read the configuration on the adapter                                  */
5740 /*                                                                          */
5741 /****************************************************************************/
5742 static int
5743 ips_read_config(ips_ha_t * ha, int intr)
5744 {
5745 	ips_scb_t *scb;
5746 	int i;
5747 	int ret;
5748 
5749 	METHOD_TRACE("ips_read_config", 1);
5750 
5751 	/* set defaults for initiator IDs */
5752 	for (i = 0; i < 4; i++)
5753 		ha->conf->init_id[i] = 7;
5754 
5755 	scb = &ha->scbs[ha->max_cmds - 1];
5756 
5757 	ips_init_scb(ha, scb);
5758 
5759 	scb->timeout = ips_cmd_timeout;
5760 	scb->cdb[0] = IPS_CMD_READ_CONF;
5761 
5762 	scb->cmd.basic_io.op_code = IPS_CMD_READ_CONF;
5763 	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5764 	scb->data_len = sizeof (*ha->conf);
5765 	scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5766 
5767 	/* send command */
5768 	if (((ret =
5769 	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5770 	    || (ret == IPS_SUCCESS_IMM)
5771 	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5772 
5773 		memset(ha->conf, 0, sizeof (IPS_CONF));
5774 
5775 		/* reset initiator IDs */
5776 		for (i = 0; i < 4; i++)
5777 			ha->conf->init_id[i] = 7;
5778 
5779 		/* Allow Completed with Errors, so JCRM can access the Adapter to fix the problems */
5780 		if ((scb->basic_status & IPS_GSC_STATUS_MASK) ==
5781 		    IPS_CMD_CMPLT_WERROR)
5782 			return (1);
5783 
5784 		return (0);
5785 	}
5786 
5787 	memcpy(ha->conf, ha->ioctl_data, sizeof(*ha->conf));
5788 	return (1);
5789 }
5790 
5791 /****************************************************************************/
5792 /*                                                                          */
5793 /* Routine Name: ips_readwrite_page5                                        */
5794 /*                                                                          */
5795 /* Routine Description:                                                     */
5796 /*                                                                          */
5797 /*   Read nvram page 5 from the adapter                                     */
5798 /*                                                                          */
5799 /****************************************************************************/
5800 static int
5801 ips_readwrite_page5(ips_ha_t * ha, int write, int intr)
5802 {
5803 	ips_scb_t *scb;
5804 	int ret;
5805 
5806 	METHOD_TRACE("ips_readwrite_page5", 1);
5807 
5808 	scb = &ha->scbs[ha->max_cmds - 1];
5809 
5810 	ips_init_scb(ha, scb);
5811 
5812 	scb->timeout = ips_cmd_timeout;
5813 	scb->cdb[0] = IPS_CMD_RW_NVRAM_PAGE;
5814 
5815 	scb->cmd.nvram.op_code = IPS_CMD_RW_NVRAM_PAGE;
5816 	scb->cmd.nvram.command_id = IPS_COMMAND_ID(ha, scb);
5817 	scb->cmd.nvram.page = 5;
5818 	scb->cmd.nvram.write = write;
5819 	scb->cmd.nvram.reserved = 0;
5820 	scb->cmd.nvram.reserved2 = 0;
5821 	scb->data_len = sizeof (*ha->nvram);
5822 	scb->cmd.nvram.buffer_addr = ha->ioctl_busaddr;
5823 	if (write)
5824 		memcpy(ha->ioctl_data, ha->nvram, sizeof(*ha->nvram));
5825 
5826 	/* issue the command */
5827 	if (((ret =
5828 	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5829 	    || (ret == IPS_SUCCESS_IMM)
5830 	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5831 
5832 		memset(ha->nvram, 0, sizeof (IPS_NVRAM_P5));
5833 
5834 		return (0);
5835 	}
5836 	if (!write)
5837 		memcpy(ha->nvram, ha->ioctl_data, sizeof(*ha->nvram));
5838 	return (1);
5839 }
5840 
5841 /****************************************************************************/
5842 /*                                                                          */
5843 /* Routine Name: ips_clear_adapter                                          */
5844 /*                                                                          */
5845 /* Routine Description:                                                     */
5846 /*                                                                          */
5847 /*   Clear the stripe lock tables                                           */
5848 /*                                                                          */
5849 /****************************************************************************/
5850 static int
5851 ips_clear_adapter(ips_ha_t * ha, int intr)
5852 {
5853 	ips_scb_t *scb;
5854 	int ret;
5855 
5856 	METHOD_TRACE("ips_clear_adapter", 1);
5857 
5858 	scb = &ha->scbs[ha->max_cmds - 1];
5859 
5860 	ips_init_scb(ha, scb);
5861 
5862 	scb->timeout = ips_reset_timeout;
5863 	scb->cdb[0] = IPS_CMD_CONFIG_SYNC;
5864 
5865 	scb->cmd.config_sync.op_code = IPS_CMD_CONFIG_SYNC;
5866 	scb->cmd.config_sync.command_id = IPS_COMMAND_ID(ha, scb);
5867 	scb->cmd.config_sync.channel = 0;
5868 	scb->cmd.config_sync.source_target = IPS_POCL;
5869 	scb->cmd.config_sync.reserved = 0;
5870 	scb->cmd.config_sync.reserved2 = 0;
5871 	scb->cmd.config_sync.reserved3 = 0;
5872 
5873 	/* issue command */
5874 	if (((ret =
5875 	      ips_send_wait(ha, scb, ips_reset_timeout, intr)) == IPS_FAILURE)
5876 	    || (ret == IPS_SUCCESS_IMM)
5877 	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5878 		return (0);
5879 
5880 	/* send unlock stripe command */
5881 	ips_init_scb(ha, scb);
5882 
5883 	scb->cdb[0] = IPS_CMD_ERROR_TABLE;
5884 	scb->timeout = ips_reset_timeout;
5885 
5886 	scb->cmd.unlock_stripe.op_code = IPS_CMD_ERROR_TABLE;
5887 	scb->cmd.unlock_stripe.command_id = IPS_COMMAND_ID(ha, scb);
5888 	scb->cmd.unlock_stripe.log_drv = 0;
5889 	scb->cmd.unlock_stripe.control = IPS_CSL;
5890 	scb->cmd.unlock_stripe.reserved = 0;
5891 	scb->cmd.unlock_stripe.reserved2 = 0;
5892 	scb->cmd.unlock_stripe.reserved3 = 0;
5893 
5894 	/* issue command */
5895 	if (((ret =
5896 	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5897 	    || (ret == IPS_SUCCESS_IMM)
5898 	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5899 		return (0);
5900 
5901 	return (1);
5902 }
5903 
5904 /****************************************************************************/
5905 /*                                                                          */
5906 /* Routine Name: ips_ffdc_reset                                             */
5907 /*                                                                          */
5908 /* Routine Description:                                                     */
5909 /*                                                                          */
5910 /*   FFDC: write reset info                                                 */
5911 /*                                                                          */
5912 /****************************************************************************/
5913 static void
5914 ips_ffdc_reset(ips_ha_t * ha, int intr)
5915 {
5916 	ips_scb_t *scb;
5917 
5918 	METHOD_TRACE("ips_ffdc_reset", 1);
5919 
5920 	scb = &ha->scbs[ha->max_cmds - 1];
5921 
5922 	ips_init_scb(ha, scb);
5923 
5924 	scb->timeout = ips_cmd_timeout;
5925 	scb->cdb[0] = IPS_CMD_FFDC;
5926 	scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5927 	scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5928 	scb->cmd.ffdc.reset_count = ha->reset_count;
5929 	scb->cmd.ffdc.reset_type = 0x80;
5930 
5931 	/* convert time to what the card wants */
5932 	ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5933 
5934 	/* issue command */
5935 	ips_send_wait(ha, scb, ips_cmd_timeout, intr);
5936 }
5937 
5938 /****************************************************************************/
5939 /*                                                                          */
5940 /* Routine Name: ips_ffdc_time                                              */
5941 /*                                                                          */
5942 /* Routine Description:                                                     */
5943 /*                                                                          */
5944 /*   FFDC: write time info                                                  */
5945 /*                                                                          */
5946 /****************************************************************************/
5947 static void
5948 ips_ffdc_time(ips_ha_t * ha)
5949 {
5950 	ips_scb_t *scb;
5951 
5952 	METHOD_TRACE("ips_ffdc_time", 1);
5953 
5954 	DEBUG_VAR(1, "(%s%d) Sending time update.", ips_name, ha->host_num);
5955 
5956 	scb = &ha->scbs[ha->max_cmds - 1];
5957 
5958 	ips_init_scb(ha, scb);
5959 
5960 	scb->timeout = ips_cmd_timeout;
5961 	scb->cdb[0] = IPS_CMD_FFDC;
5962 	scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5963 	scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5964 	scb->cmd.ffdc.reset_count = 0;
5965 	scb->cmd.ffdc.reset_type = 0;
5966 
5967 	/* convert time to what the card wants */
5968 	ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5969 
5970 	/* issue command */
5971 	ips_send_wait(ha, scb, ips_cmd_timeout, IPS_FFDC);
5972 }
5973 
5974 /****************************************************************************/
5975 /*                                                                          */
5976 /* Routine Name: ips_fix_ffdc_time                                          */
5977 /*                                                                          */
5978 /* Routine Description:                                                     */
5979 /*   Adjust time_t to what the card wants                                   */
5980 /*                                                                          */
5981 /****************************************************************************/
5982 static void
5983 ips_fix_ffdc_time(ips_ha_t * ha, ips_scb_t * scb, time64_t current_time)
5984 {
5985 	struct tm tm;
5986 
5987 	METHOD_TRACE("ips_fix_ffdc_time", 1);
5988 
5989 	time64_to_tm(current_time, 0, &tm);
5990 
5991 	scb->cmd.ffdc.hour   = tm.tm_hour;
5992 	scb->cmd.ffdc.minute = tm.tm_min;
5993 	scb->cmd.ffdc.second = tm.tm_sec;
5994 	scb->cmd.ffdc.yearH  = (tm.tm_year + 1900) / 100;
5995 	scb->cmd.ffdc.yearL  = tm.tm_year % 100;
5996 	scb->cmd.ffdc.month  = tm.tm_mon + 1;
5997 	scb->cmd.ffdc.day    = tm.tm_mday;
5998 }
5999 
6000 /****************************************************************************
6001  * BIOS Flash Routines                                                      *
6002  ****************************************************************************/
6003 
6004 /****************************************************************************/
6005 /*                                                                          */
6006 /* Routine Name: ips_erase_bios                                             */
6007 /*                                                                          */
6008 /* Routine Description:                                                     */
6009 /*   Erase the BIOS on the adapter                                          */
6010 /*                                                                          */
6011 /****************************************************************************/
6012 static int
6013 ips_erase_bios(ips_ha_t * ha)
6014 {
6015 	int timeout;
6016 	uint8_t status = 0;
6017 
6018 	METHOD_TRACE("ips_erase_bios", 1);
6019 
6020 	status = 0;
6021 
6022 	/* Clear the status register */
6023 	outl(0, ha->io_addr + IPS_REG_FLAP);
6024 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6025 		udelay(25);	/* 25 us */
6026 
6027 	outb(0x50, ha->io_addr + IPS_REG_FLDP);
6028 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6029 		udelay(25);	/* 25 us */
6030 
6031 	/* Erase Setup */
6032 	outb(0x20, ha->io_addr + IPS_REG_FLDP);
6033 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6034 		udelay(25);	/* 25 us */
6035 
6036 	/* Erase Confirm */
6037 	outb(0xD0, ha->io_addr + IPS_REG_FLDP);
6038 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6039 		udelay(25);	/* 25 us */
6040 
6041 	/* Erase Status */
6042 	outb(0x70, ha->io_addr + IPS_REG_FLDP);
6043 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6044 		udelay(25);	/* 25 us */
6045 
6046 	timeout = 80000;	/* 80 seconds */
6047 
6048 	while (timeout > 0) {
6049 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6050 			outl(0, ha->io_addr + IPS_REG_FLAP);
6051 			udelay(25);	/* 25 us */
6052 		}
6053 
6054 		status = inb(ha->io_addr + IPS_REG_FLDP);
6055 
6056 		if (status & 0x80)
6057 			break;
6058 
6059 		MDELAY(1);
6060 		timeout--;
6061 	}
6062 
6063 	/* check for timeout */
6064 	if (timeout <= 0) {
6065 		/* timeout */
6066 
6067 		/* try to suspend the erase */
6068 		outb(0xB0, ha->io_addr + IPS_REG_FLDP);
6069 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6070 			udelay(25);	/* 25 us */
6071 
6072 		/* wait for 10 seconds */
6073 		timeout = 10000;
6074 		while (timeout > 0) {
6075 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6076 				outl(0, ha->io_addr + IPS_REG_FLAP);
6077 				udelay(25);	/* 25 us */
6078 			}
6079 
6080 			status = inb(ha->io_addr + IPS_REG_FLDP);
6081 
6082 			if (status & 0xC0)
6083 				break;
6084 
6085 			MDELAY(1);
6086 			timeout--;
6087 		}
6088 
6089 		return (1);
6090 	}
6091 
6092 	/* check for valid VPP */
6093 	if (status & 0x08)
6094 		/* VPP failure */
6095 		return (1);
6096 
6097 	/* check for successful flash */
6098 	if (status & 0x30)
6099 		/* sequence error */
6100 		return (1);
6101 
6102 	/* Otherwise, we were successful */
6103 	/* clear status */
6104 	outb(0x50, ha->io_addr + IPS_REG_FLDP);
6105 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6106 		udelay(25);	/* 25 us */
6107 
6108 	/* enable reads */
6109 	outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6110 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6111 		udelay(25);	/* 25 us */
6112 
6113 	return (0);
6114 }
6115 
6116 /****************************************************************************/
6117 /*                                                                          */
6118 /* Routine Name: ips_erase_bios_memio                                       */
6119 /*                                                                          */
6120 /* Routine Description:                                                     */
6121 /*   Erase the BIOS on the adapter                                          */
6122 /*                                                                          */
6123 /****************************************************************************/
6124 static int
6125 ips_erase_bios_memio(ips_ha_t * ha)
6126 {
6127 	int timeout;
6128 	uint8_t status;
6129 
6130 	METHOD_TRACE("ips_erase_bios_memio", 1);
6131 
6132 	status = 0;
6133 
6134 	/* Clear the status register */
6135 	writel(0, ha->mem_ptr + IPS_REG_FLAP);
6136 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6137 		udelay(25);	/* 25 us */
6138 
6139 	writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6140 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6141 		udelay(25);	/* 25 us */
6142 
6143 	/* Erase Setup */
6144 	writeb(0x20, ha->mem_ptr + IPS_REG_FLDP);
6145 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6146 		udelay(25);	/* 25 us */
6147 
6148 	/* Erase Confirm */
6149 	writeb(0xD0, ha->mem_ptr + IPS_REG_FLDP);
6150 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6151 		udelay(25);	/* 25 us */
6152 
6153 	/* Erase Status */
6154 	writeb(0x70, ha->mem_ptr + IPS_REG_FLDP);
6155 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6156 		udelay(25);	/* 25 us */
6157 
6158 	timeout = 80000;	/* 80 seconds */
6159 
6160 	while (timeout > 0) {
6161 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6162 			writel(0, ha->mem_ptr + IPS_REG_FLAP);
6163 			udelay(25);	/* 25 us */
6164 		}
6165 
6166 		status = readb(ha->mem_ptr + IPS_REG_FLDP);
6167 
6168 		if (status & 0x80)
6169 			break;
6170 
6171 		MDELAY(1);
6172 		timeout--;
6173 	}
6174 
6175 	/* check for timeout */
6176 	if (timeout <= 0) {
6177 		/* timeout */
6178 
6179 		/* try to suspend the erase */
6180 		writeb(0xB0, ha->mem_ptr + IPS_REG_FLDP);
6181 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6182 			udelay(25);	/* 25 us */
6183 
6184 		/* wait for 10 seconds */
6185 		timeout = 10000;
6186 		while (timeout > 0) {
6187 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6188 				writel(0, ha->mem_ptr + IPS_REG_FLAP);
6189 				udelay(25);	/* 25 us */
6190 			}
6191 
6192 			status = readb(ha->mem_ptr + IPS_REG_FLDP);
6193 
6194 			if (status & 0xC0)
6195 				break;
6196 
6197 			MDELAY(1);
6198 			timeout--;
6199 		}
6200 
6201 		return (1);
6202 	}
6203 
6204 	/* check for valid VPP */
6205 	if (status & 0x08)
6206 		/* VPP failure */
6207 		return (1);
6208 
6209 	/* check for successful flash */
6210 	if (status & 0x30)
6211 		/* sequence error */
6212 		return (1);
6213 
6214 	/* Otherwise, we were successful */
6215 	/* clear status */
6216 	writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6217 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6218 		udelay(25);	/* 25 us */
6219 
6220 	/* enable reads */
6221 	writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6222 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6223 		udelay(25);	/* 25 us */
6224 
6225 	return (0);
6226 }
6227 
6228 /****************************************************************************/
6229 /*                                                                          */
6230 /* Routine Name: ips_program_bios                                           */
6231 /*                                                                          */
6232 /* Routine Description:                                                     */
6233 /*   Program the BIOS on the adapter                                        */
6234 /*                                                                          */
6235 /****************************************************************************/
6236 static int
6237 ips_program_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6238 		 uint32_t offset)
6239 {
6240 	int i;
6241 	int timeout;
6242 	uint8_t status = 0;
6243 
6244 	METHOD_TRACE("ips_program_bios", 1);
6245 
6246 	status = 0;
6247 
6248 	for (i = 0; i < buffersize; i++) {
6249 		/* write a byte */
6250 		outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6251 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6252 			udelay(25);	/* 25 us */
6253 
6254 		outb(0x40, ha->io_addr + IPS_REG_FLDP);
6255 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6256 			udelay(25);	/* 25 us */
6257 
6258 		outb(buffer[i], ha->io_addr + IPS_REG_FLDP);
6259 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6260 			udelay(25);	/* 25 us */
6261 
6262 		/* wait up to one second */
6263 		timeout = 1000;
6264 		while (timeout > 0) {
6265 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6266 				outl(0, ha->io_addr + IPS_REG_FLAP);
6267 				udelay(25);	/* 25 us */
6268 			}
6269 
6270 			status = inb(ha->io_addr + IPS_REG_FLDP);
6271 
6272 			if (status & 0x80)
6273 				break;
6274 
6275 			MDELAY(1);
6276 			timeout--;
6277 		}
6278 
6279 		if (timeout == 0) {
6280 			/* timeout error */
6281 			outl(0, ha->io_addr + IPS_REG_FLAP);
6282 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6283 				udelay(25);	/* 25 us */
6284 
6285 			outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6286 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6287 				udelay(25);	/* 25 us */
6288 
6289 			return (1);
6290 		}
6291 
6292 		/* check the status */
6293 		if (status & 0x18) {
6294 			/* programming error */
6295 			outl(0, ha->io_addr + IPS_REG_FLAP);
6296 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6297 				udelay(25);	/* 25 us */
6298 
6299 			outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6300 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6301 				udelay(25);	/* 25 us */
6302 
6303 			return (1);
6304 		}
6305 	}			/* end for */
6306 
6307 	/* Enable reading */
6308 	outl(0, ha->io_addr + IPS_REG_FLAP);
6309 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6310 		udelay(25);	/* 25 us */
6311 
6312 	outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6313 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6314 		udelay(25);	/* 25 us */
6315 
6316 	return (0);
6317 }
6318 
6319 /****************************************************************************/
6320 /*                                                                          */
6321 /* Routine Name: ips_program_bios_memio                                     */
6322 /*                                                                          */
6323 /* Routine Description:                                                     */
6324 /*   Program the BIOS on the adapter                                        */
6325 /*                                                                          */
6326 /****************************************************************************/
6327 static int
6328 ips_program_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6329 		       uint32_t offset)
6330 {
6331 	int i;
6332 	int timeout;
6333 	uint8_t status = 0;
6334 
6335 	METHOD_TRACE("ips_program_bios_memio", 1);
6336 
6337 	status = 0;
6338 
6339 	for (i = 0; i < buffersize; i++) {
6340 		/* write a byte */
6341 		writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6342 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6343 			udelay(25);	/* 25 us */
6344 
6345 		writeb(0x40, ha->mem_ptr + IPS_REG_FLDP);
6346 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6347 			udelay(25);	/* 25 us */
6348 
6349 		writeb(buffer[i], ha->mem_ptr + IPS_REG_FLDP);
6350 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6351 			udelay(25);	/* 25 us */
6352 
6353 		/* wait up to one second */
6354 		timeout = 1000;
6355 		while (timeout > 0) {
6356 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6357 				writel(0, ha->mem_ptr + IPS_REG_FLAP);
6358 				udelay(25);	/* 25 us */
6359 			}
6360 
6361 			status = readb(ha->mem_ptr + IPS_REG_FLDP);
6362 
6363 			if (status & 0x80)
6364 				break;
6365 
6366 			MDELAY(1);
6367 			timeout--;
6368 		}
6369 
6370 		if (timeout == 0) {
6371 			/* timeout error */
6372 			writel(0, ha->mem_ptr + IPS_REG_FLAP);
6373 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6374 				udelay(25);	/* 25 us */
6375 
6376 			writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6377 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6378 				udelay(25);	/* 25 us */
6379 
6380 			return (1);
6381 		}
6382 
6383 		/* check the status */
6384 		if (status & 0x18) {
6385 			/* programming error */
6386 			writel(0, ha->mem_ptr + IPS_REG_FLAP);
6387 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6388 				udelay(25);	/* 25 us */
6389 
6390 			writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6391 			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6392 				udelay(25);	/* 25 us */
6393 
6394 			return (1);
6395 		}
6396 	}			/* end for */
6397 
6398 	/* Enable reading */
6399 	writel(0, ha->mem_ptr + IPS_REG_FLAP);
6400 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6401 		udelay(25);	/* 25 us */
6402 
6403 	writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6404 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6405 		udelay(25);	/* 25 us */
6406 
6407 	return (0);
6408 }
6409 
6410 /****************************************************************************/
6411 /*                                                                          */
6412 /* Routine Name: ips_verify_bios                                            */
6413 /*                                                                          */
6414 /* Routine Description:                                                     */
6415 /*   Verify the BIOS on the adapter                                         */
6416 /*                                                                          */
6417 /****************************************************************************/
6418 static int
6419 ips_verify_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6420 		uint32_t offset)
6421 {
6422 	uint8_t checksum;
6423 	int i;
6424 
6425 	METHOD_TRACE("ips_verify_bios", 1);
6426 
6427 	/* test 1st byte */
6428 	outl(0, ha->io_addr + IPS_REG_FLAP);
6429 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6430 		udelay(25);	/* 25 us */
6431 
6432 	if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
6433 		return (1);
6434 
6435 	outl(1, ha->io_addr + IPS_REG_FLAP);
6436 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6437 		udelay(25);	/* 25 us */
6438 	if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
6439 		return (1);
6440 
6441 	checksum = 0xff;
6442 	for (i = 2; i < buffersize; i++) {
6443 
6444 		outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6445 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6446 			udelay(25);	/* 25 us */
6447 
6448 		checksum = (uint8_t) checksum + inb(ha->io_addr + IPS_REG_FLDP);
6449 	}
6450 
6451 	if (checksum != 0)
6452 		/* failure */
6453 		return (1);
6454 	else
6455 		/* success */
6456 		return (0);
6457 }
6458 
6459 /****************************************************************************/
6460 /*                                                                          */
6461 /* Routine Name: ips_verify_bios_memio                                      */
6462 /*                                                                          */
6463 /* Routine Description:                                                     */
6464 /*   Verify the BIOS on the adapter                                         */
6465 /*                                                                          */
6466 /****************************************************************************/
6467 static int
6468 ips_verify_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6469 		      uint32_t offset)
6470 {
6471 	uint8_t checksum;
6472 	int i;
6473 
6474 	METHOD_TRACE("ips_verify_bios_memio", 1);
6475 
6476 	/* test 1st byte */
6477 	writel(0, ha->mem_ptr + IPS_REG_FLAP);
6478 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6479 		udelay(25);	/* 25 us */
6480 
6481 	if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
6482 		return (1);
6483 
6484 	writel(1, ha->mem_ptr + IPS_REG_FLAP);
6485 	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6486 		udelay(25);	/* 25 us */
6487 	if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
6488 		return (1);
6489 
6490 	checksum = 0xff;
6491 	for (i = 2; i < buffersize; i++) {
6492 
6493 		writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6494 		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6495 			udelay(25);	/* 25 us */
6496 
6497 		checksum =
6498 		    (uint8_t) checksum + readb(ha->mem_ptr + IPS_REG_FLDP);
6499 	}
6500 
6501 	if (checksum != 0)
6502 		/* failure */
6503 		return (1);
6504 	else
6505 		/* success */
6506 		return (0);
6507 }
6508 
6509 /****************************************************************************/
6510 /*                                                                          */
6511 /* Routine Name: ips_abort_init                                             */
6512 /*                                                                          */
6513 /* Routine Description:                                                     */
6514 /*   cleanup routine for a failed adapter initialization                    */
6515 /****************************************************************************/
6516 static int
6517 ips_abort_init(ips_ha_t * ha, int index)
6518 {
6519 	ha->active = 0;
6520 	ips_free(ha);
6521 	ips_ha[index] = NULL;
6522 	ips_sh[index] = NULL;
6523 	return -1;
6524 }
6525 
6526 /****************************************************************************/
6527 /*                                                                          */
6528 /* Routine Name: ips_shift_controllers                                      */
6529 /*                                                                          */
6530 /* Routine Description:                                                     */
6531 /*   helper function for ordering adapters                                  */
6532 /****************************************************************************/
6533 static void
6534 ips_shift_controllers(int lowindex, int highindex)
6535 {
6536 	ips_ha_t *ha_sav = ips_ha[highindex];
6537 	struct Scsi_Host *sh_sav = ips_sh[highindex];
6538 	int i;
6539 
6540 	for (i = highindex; i > lowindex; i--) {
6541 		ips_ha[i] = ips_ha[i - 1];
6542 		ips_sh[i] = ips_sh[i - 1];
6543 		ips_ha[i]->host_num = i;
6544 	}
6545 	ha_sav->host_num = lowindex;
6546 	ips_ha[lowindex] = ha_sav;
6547 	ips_sh[lowindex] = sh_sav;
6548 }
6549 
6550 /****************************************************************************/
6551 /*                                                                          */
6552 /* Routine Name: ips_order_controllers                                      */
6553 /*                                                                          */
6554 /* Routine Description:                                                     */
6555 /*   place controllers is the "proper" boot order                           */
6556 /****************************************************************************/
6557 static void
6558 ips_order_controllers(void)
6559 {
6560 	int i, j, tmp, position = 0;
6561 	IPS_NVRAM_P5 *nvram;
6562 	if (!ips_ha[0])
6563 		return;
6564 	nvram = ips_ha[0]->nvram;
6565 
6566 	if (nvram->adapter_order[0]) {
6567 		for (i = 1; i <= nvram->adapter_order[0]; i++) {
6568 			for (j = position; j < ips_num_controllers; j++) {
6569 				switch (ips_ha[j]->ad_type) {
6570 				case IPS_ADTYPE_SERVERAID6M:
6571 				case IPS_ADTYPE_SERVERAID7M:
6572 					if (nvram->adapter_order[i] == 'M') {
6573 						ips_shift_controllers(position,
6574 								      j);
6575 						position++;
6576 					}
6577 					break;
6578 				case IPS_ADTYPE_SERVERAID4L:
6579 				case IPS_ADTYPE_SERVERAID4M:
6580 				case IPS_ADTYPE_SERVERAID4MX:
6581 				case IPS_ADTYPE_SERVERAID4LX:
6582 					if (nvram->adapter_order[i] == 'N') {
6583 						ips_shift_controllers(position,
6584 								      j);
6585 						position++;
6586 					}
6587 					break;
6588 				case IPS_ADTYPE_SERVERAID6I:
6589 				case IPS_ADTYPE_SERVERAID5I2:
6590 				case IPS_ADTYPE_SERVERAID5I1:
6591 				case IPS_ADTYPE_SERVERAID7k:
6592 					if (nvram->adapter_order[i] == 'S') {
6593 						ips_shift_controllers(position,
6594 								      j);
6595 						position++;
6596 					}
6597 					break;
6598 				case IPS_ADTYPE_SERVERAID:
6599 				case IPS_ADTYPE_SERVERAID2:
6600 				case IPS_ADTYPE_NAVAJO:
6601 				case IPS_ADTYPE_KIOWA:
6602 				case IPS_ADTYPE_SERVERAID3L:
6603 				case IPS_ADTYPE_SERVERAID3:
6604 				case IPS_ADTYPE_SERVERAID4H:
6605 					if (nvram->adapter_order[i] == 'A') {
6606 						ips_shift_controllers(position,
6607 								      j);
6608 						position++;
6609 					}
6610 					break;
6611 				default:
6612 					break;
6613 				}
6614 			}
6615 		}
6616 		/* if adapter_order[0], then ordering is complete */
6617 		return;
6618 	}
6619 	/* old bios, use older ordering */
6620 	tmp = 0;
6621 	for (i = position; i < ips_num_controllers; i++) {
6622 		if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I2 ||
6623 		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I1) {
6624 			ips_shift_controllers(position, i);
6625 			position++;
6626 			tmp = 1;
6627 		}
6628 	}
6629 	/* if there were no 5I cards, then don't do any extra ordering */
6630 	if (!tmp)
6631 		return;
6632 	for (i = position; i < ips_num_controllers; i++) {
6633 		if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4L ||
6634 		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4M ||
6635 		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4LX ||
6636 		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4MX) {
6637 			ips_shift_controllers(position, i);
6638 			position++;
6639 		}
6640 	}
6641 
6642 	return;
6643 }
6644 
6645 /****************************************************************************/
6646 /*                                                                          */
6647 /* Routine Name: ips_register_scsi                                          */
6648 /*                                                                          */
6649 /* Routine Description:                                                     */
6650 /*   perform any registration and setup with the scsi layer                 */
6651 /****************************************************************************/
6652 static int
6653 ips_register_scsi(int index)
6654 {
6655 	struct Scsi_Host *sh;
6656 	ips_ha_t *ha, *oldha = ips_ha[index];
6657 	sh = scsi_host_alloc(&ips_driver_template, sizeof (ips_ha_t));
6658 	if (!sh) {
6659 		IPS_PRINTK(KERN_WARNING, oldha->pcidev,
6660 			   "Unable to register controller with SCSI subsystem\n");
6661 		return -1;
6662 	}
6663 	ha = IPS_HA(sh);
6664 	memcpy(ha, oldha, sizeof (ips_ha_t));
6665 	free_irq(oldha->pcidev->irq, oldha);
6666 	/* Install the interrupt handler with the new ha */
6667 	if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
6668 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
6669 			   "Unable to install interrupt handler\n");
6670 		goto err_out_sh;
6671 	}
6672 
6673 	kfree(oldha);
6674 
6675 	/* Store away needed values for later use */
6676 	sh->unique_id = (ha->io_addr) ? ha->io_addr : ha->mem_addr;
6677 	sh->sg_tablesize = sh->hostt->sg_tablesize;
6678 	sh->can_queue = sh->hostt->can_queue;
6679 	sh->cmd_per_lun = sh->hostt->cmd_per_lun;
6680 	sh->max_sectors = 128;
6681 
6682 	sh->max_id = ha->ntargets;
6683 	sh->max_lun = ha->nlun;
6684 	sh->max_channel = ha->nbus - 1;
6685 	sh->can_queue = ha->max_cmds - 1;
6686 
6687 	if (scsi_add_host(sh, &ha->pcidev->dev))
6688 		goto err_out;
6689 
6690 	ips_sh[index] = sh;
6691 	ips_ha[index] = ha;
6692 
6693 	scsi_scan_host(sh);
6694 
6695 	return 0;
6696 
6697 err_out:
6698 	free_irq(ha->pcidev->irq, ha);
6699 err_out_sh:
6700 	scsi_host_put(sh);
6701 	return -1;
6702 }
6703 
6704 /*---------------------------------------------------------------------------*/
6705 /*   Routine Name: ips_remove_device                                         */
6706 /*                                                                           */
6707 /*   Routine Description:                                                    */
6708 /*     Remove one Adapter ( Hot Plugging )                                   */
6709 /*---------------------------------------------------------------------------*/
6710 static void
6711 ips_remove_device(struct pci_dev *pci_dev)
6712 {
6713 	struct Scsi_Host *sh = pci_get_drvdata(pci_dev);
6714 
6715 	pci_set_drvdata(pci_dev, NULL);
6716 
6717 	ips_release(sh);
6718 
6719 	pci_release_regions(pci_dev);
6720 	pci_disable_device(pci_dev);
6721 }
6722 
6723 /****************************************************************************/
6724 /*                                                                          */
6725 /* Routine Name: ips_module_init                                            */
6726 /*                                                                          */
6727 /* Routine Description:                                                     */
6728 /*   function called on module load                                         */
6729 /****************************************************************************/
6730 static int __init
6731 ips_module_init(void)
6732 {
6733 #if !defined(__i386__) && !defined(__ia64__) && !defined(__x86_64__)
6734 	printk(KERN_ERR "ips: This driver has only been tested on the x86/ia64/x86_64 platforms\n");
6735 	add_taint(TAINT_CPU_OUT_OF_SPEC, LOCKDEP_STILL_OK);
6736 #endif
6737 
6738 	if (pci_register_driver(&ips_pci_driver) < 0)
6739 		return -ENODEV;
6740 	ips_driver_template.module = THIS_MODULE;
6741 	ips_order_controllers();
6742 	if (!ips_detect(&ips_driver_template)) {
6743 		pci_unregister_driver(&ips_pci_driver);
6744 		return -ENODEV;
6745 	}
6746 	register_reboot_notifier(&ips_notifier);
6747 	return 0;
6748 }
6749 
6750 /****************************************************************************/
6751 /*                                                                          */
6752 /* Routine Name: ips_module_exit                                            */
6753 /*                                                                          */
6754 /* Routine Description:                                                     */
6755 /*   function called on module unload                                       */
6756 /****************************************************************************/
6757 static void __exit
6758 ips_module_exit(void)
6759 {
6760 	pci_unregister_driver(&ips_pci_driver);
6761 	unregister_reboot_notifier(&ips_notifier);
6762 }
6763 
6764 module_init(ips_module_init);
6765 module_exit(ips_module_exit);
6766 
6767 /*---------------------------------------------------------------------------*/
6768 /*   Routine Name: ips_insert_device                                         */
6769 /*                                                                           */
6770 /*   Routine Description:                                                    */
6771 /*     Add One Adapter ( Hot Plug )                                          */
6772 /*                                                                           */
6773 /*   Return Value:                                                           */
6774 /*     0 if Successful, else non-zero                                        */
6775 /*---------------------------------------------------------------------------*/
6776 static int
6777 ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent)
6778 {
6779 	int index = -1;
6780 	int rc;
6781 
6782 	METHOD_TRACE("ips_insert_device", 1);
6783 	rc = pci_enable_device(pci_dev);
6784 	if (rc)
6785 		return rc;
6786 
6787 	rc = pci_request_regions(pci_dev, "ips");
6788 	if (rc)
6789 		goto err_out;
6790 
6791 	rc = ips_init_phase1(pci_dev, &index);
6792 	if (rc == SUCCESS)
6793 		rc = ips_init_phase2(index);
6794 
6795 	if (ips_hotplug)
6796 		if (ips_register_scsi(index)) {
6797 			ips_free(ips_ha[index]);
6798 			rc = -1;
6799 		}
6800 
6801 	if (rc == SUCCESS)
6802 		ips_num_controllers++;
6803 
6804 	ips_next_controller = ips_num_controllers;
6805 
6806 	if (rc < 0) {
6807 		rc = -ENODEV;
6808 		goto err_out_regions;
6809 	}
6810 
6811 	pci_set_drvdata(pci_dev, ips_sh[index]);
6812 	return 0;
6813 
6814 err_out_regions:
6815 	pci_release_regions(pci_dev);
6816 err_out:
6817 	pci_disable_device(pci_dev);
6818 	return rc;
6819 }
6820 
6821 /*---------------------------------------------------------------------------*/
6822 /*   Routine Name: ips_init_phase1                                           */
6823 /*                                                                           */
6824 /*   Routine Description:                                                    */
6825 /*     Adapter Initialization                                                */
6826 /*                                                                           */
6827 /*   Return Value:                                                           */
6828 /*     0 if Successful, else non-zero                                        */
6829 /*---------------------------------------------------------------------------*/
6830 static int
6831 ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr)
6832 {
6833 	ips_ha_t *ha;
6834 	uint32_t io_addr;
6835 	uint32_t mem_addr;
6836 	uint32_t io_len;
6837 	uint32_t mem_len;
6838 	uint8_t bus;
6839 	uint8_t func;
6840 	int j;
6841 	int index;
6842 	dma_addr_t dma_address;
6843 	char __iomem *ioremap_ptr;
6844 	char __iomem *mem_ptr;
6845 	uint32_t IsDead;
6846 
6847 	METHOD_TRACE("ips_init_phase1", 1);
6848 	index = IPS_MAX_ADAPTERS;
6849 	for (j = 0; j < IPS_MAX_ADAPTERS; j++) {
6850 		if (ips_ha[j] == NULL) {
6851 			index = j;
6852 			break;
6853 		}
6854 	}
6855 
6856 	if (index >= IPS_MAX_ADAPTERS)
6857 		return -1;
6858 
6859 	/* stuff that we get in dev */
6860 	bus = pci_dev->bus->number;
6861 	func = pci_dev->devfn;
6862 
6863 	/* Init MEM/IO addresses to 0 */
6864 	mem_addr = 0;
6865 	io_addr = 0;
6866 	mem_len = 0;
6867 	io_len = 0;
6868 
6869 	for (j = 0; j < 2; j++) {
6870 		if (!pci_resource_start(pci_dev, j))
6871 			break;
6872 
6873 		if (pci_resource_flags(pci_dev, j) & IORESOURCE_IO) {
6874 			io_addr = pci_resource_start(pci_dev, j);
6875 			io_len = pci_resource_len(pci_dev, j);
6876 		} else {
6877 			mem_addr = pci_resource_start(pci_dev, j);
6878 			mem_len = pci_resource_len(pci_dev, j);
6879 		}
6880 	}
6881 
6882 	/* setup memory mapped area (if applicable) */
6883 	if (mem_addr) {
6884 		uint32_t base;
6885 		uint32_t offs;
6886 
6887 		base = mem_addr & PAGE_MASK;
6888 		offs = mem_addr - base;
6889 		ioremap_ptr = ioremap(base, PAGE_SIZE);
6890 		if (!ioremap_ptr)
6891 			return -1;
6892 		mem_ptr = ioremap_ptr + offs;
6893 	} else {
6894 		ioremap_ptr = NULL;
6895 		mem_ptr = NULL;
6896 	}
6897 
6898 	/* found a controller */
6899 	ha = kzalloc(sizeof (ips_ha_t), GFP_KERNEL);
6900 	if (ha == NULL) {
6901 		IPS_PRINTK(KERN_WARNING, pci_dev,
6902 			   "Unable to allocate temporary ha struct\n");
6903 		return -1;
6904 	}
6905 
6906 	ips_sh[index] = NULL;
6907 	ips_ha[index] = ha;
6908 	ha->active = 1;
6909 
6910 	/* Store info in HA structure */
6911 	ha->io_addr = io_addr;
6912 	ha->io_len = io_len;
6913 	ha->mem_addr = mem_addr;
6914 	ha->mem_len = mem_len;
6915 	ha->mem_ptr = mem_ptr;
6916 	ha->ioremap_ptr = ioremap_ptr;
6917 	ha->host_num = (uint32_t) index;
6918 	ha->slot_num = PCI_SLOT(pci_dev->devfn);
6919 	ha->pcidev = pci_dev;
6920 
6921 	/*
6922 	 * Set the pci_dev's dma_mask.  Not all adapters support 64bit
6923 	 * addressing so don't enable it if the adapter can't support
6924 	 * it!  Also, don't use 64bit addressing if dma addresses
6925 	 * are guaranteed to be < 4G.
6926 	 */
6927 	if (sizeof(dma_addr_t) > 4 && IPS_HAS_ENH_SGLIST(ha) &&
6928 	    !dma_set_mask(&ha->pcidev->dev, DMA_BIT_MASK(64))) {
6929 		(ha)->flags |= IPS_HA_ENH_SG;
6930 	} else {
6931 		if (dma_set_mask(&ha->pcidev->dev, DMA_BIT_MASK(32)) != 0) {
6932 			printk(KERN_WARNING "Unable to set DMA Mask\n");
6933 			return ips_abort_init(ha, index);
6934 		}
6935 	}
6936 	if(ips_cd_boot && !ips_FlashData){
6937 		ips_FlashData = dma_alloc_coherent(&pci_dev->dev,
6938 				PAGE_SIZE << 7, &ips_flashbusaddr, GFP_KERNEL);
6939 	}
6940 
6941 	ha->enq = dma_alloc_coherent(&pci_dev->dev, sizeof (IPS_ENQ),
6942 			&ha->enq_busaddr, GFP_KERNEL);
6943 	if (!ha->enq) {
6944 		IPS_PRINTK(KERN_WARNING, pci_dev,
6945 			   "Unable to allocate host inquiry structure\n");
6946 		return ips_abort_init(ha, index);
6947 	}
6948 
6949 	ha->adapt = dma_alloc_coherent(&pci_dev->dev,
6950 			sizeof (IPS_ADAPTER) + sizeof (IPS_IO_CMD),
6951 			&dma_address, GFP_KERNEL);
6952 	if (!ha->adapt) {
6953 		IPS_PRINTK(KERN_WARNING, pci_dev,
6954 			   "Unable to allocate host adapt & dummy structures\n");
6955 		return ips_abort_init(ha, index);
6956 	}
6957 	ha->adapt->hw_status_start = dma_address;
6958 	ha->dummy = (void *) (ha->adapt + 1);
6959 
6960 
6961 
6962 	ha->logical_drive_info = dma_alloc_coherent(&pci_dev->dev,
6963 			sizeof (IPS_LD_INFO), &dma_address, GFP_KERNEL);
6964 	if (!ha->logical_drive_info) {
6965 		IPS_PRINTK(KERN_WARNING, pci_dev,
6966 			   "Unable to allocate logical drive info structure\n");
6967 		return ips_abort_init(ha, index);
6968 	}
6969 	ha->logical_drive_info_dma_addr = dma_address;
6970 
6971 
6972 	ha->conf = kmalloc(sizeof (IPS_CONF), GFP_KERNEL);
6973 
6974 	if (!ha->conf) {
6975 		IPS_PRINTK(KERN_WARNING, pci_dev,
6976 			   "Unable to allocate host conf structure\n");
6977 		return ips_abort_init(ha, index);
6978 	}
6979 
6980 	ha->nvram = kmalloc(sizeof (IPS_NVRAM_P5), GFP_KERNEL);
6981 
6982 	if (!ha->nvram) {
6983 		IPS_PRINTK(KERN_WARNING, pci_dev,
6984 			   "Unable to allocate host NVRAM structure\n");
6985 		return ips_abort_init(ha, index);
6986 	}
6987 
6988 	ha->subsys = kmalloc(sizeof (IPS_SUBSYS), GFP_KERNEL);
6989 
6990 	if (!ha->subsys) {
6991 		IPS_PRINTK(KERN_WARNING, pci_dev,
6992 			   "Unable to allocate host subsystem structure\n");
6993 		return ips_abort_init(ha, index);
6994 	}
6995 
6996 	/* the ioctl buffer is now used during adapter initialization, so its
6997 	 * successful allocation is now required */
6998 	if (ips_ioctlsize < PAGE_SIZE)
6999 		ips_ioctlsize = PAGE_SIZE;
7000 
7001 	ha->ioctl_data = dma_alloc_coherent(&pci_dev->dev, ips_ioctlsize,
7002 			&ha->ioctl_busaddr, GFP_KERNEL);
7003 	ha->ioctl_len = ips_ioctlsize;
7004 	if (!ha->ioctl_data) {
7005 		IPS_PRINTK(KERN_WARNING, pci_dev,
7006 			   "Unable to allocate IOCTL data\n");
7007 		return ips_abort_init(ha, index);
7008 	}
7009 
7010 	/*
7011 	 * Setup Functions
7012 	 */
7013 	ips_setup_funclist(ha);
7014 
7015 	if ((IPS_IS_MORPHEUS(ha)) || (IPS_IS_MARCO(ha))) {
7016 		/* If Morpheus appears dead, reset it */
7017 		IsDead = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
7018 		if (IsDead == 0xDEADBEEF) {
7019 			ips_reset_morpheus(ha);
7020 		}
7021 	}
7022 
7023 	/*
7024 	 * Initialize the card if it isn't already
7025 	 */
7026 
7027 	if (!(*ha->func.isinit) (ha)) {
7028 		if (!(*ha->func.init) (ha)) {
7029 			/*
7030 			 * Initialization failed
7031 			 */
7032 			IPS_PRINTK(KERN_WARNING, pci_dev,
7033 				   "Unable to initialize controller\n");
7034 			return ips_abort_init(ha, index);
7035 		}
7036 	}
7037 
7038 	*indexPtr = index;
7039 	return SUCCESS;
7040 }
7041 
7042 /*---------------------------------------------------------------------------*/
7043 /*   Routine Name: ips_init_phase2                                           */
7044 /*                                                                           */
7045 /*   Routine Description:                                                    */
7046 /*     Adapter Initialization Phase 2                                        */
7047 /*                                                                           */
7048 /*   Return Value:                                                           */
7049 /*     0 if Successful, else non-zero                                        */
7050 /*---------------------------------------------------------------------------*/
7051 static int
7052 ips_init_phase2(int index)
7053 {
7054 	ips_ha_t *ha;
7055 
7056 	ha = ips_ha[index];
7057 
7058 	METHOD_TRACE("ips_init_phase2", 1);
7059 	if (!ha->active) {
7060 		ips_ha[index] = NULL;
7061 		return -1;
7062 	}
7063 
7064 	/* Install the interrupt handler */
7065 	if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
7066 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7067 			   "Unable to install interrupt handler\n");
7068 		return ips_abort_init(ha, index);
7069 	}
7070 
7071 	/*
7072 	 * Allocate a temporary SCB for initialization
7073 	 */
7074 	ha->max_cmds = 1;
7075 	if (!ips_allocatescbs(ha)) {
7076 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7077 			   "Unable to allocate a CCB\n");
7078 		free_irq(ha->pcidev->irq, ha);
7079 		return ips_abort_init(ha, index);
7080 	}
7081 
7082 	if (!ips_hainit(ha)) {
7083 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7084 			   "Unable to initialize controller\n");
7085 		free_irq(ha->pcidev->irq, ha);
7086 		return ips_abort_init(ha, index);
7087 	}
7088 	/* Free the temporary SCB */
7089 	ips_deallocatescbs(ha, 1);
7090 
7091 	/* allocate CCBs */
7092 	if (!ips_allocatescbs(ha)) {
7093 		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7094 			   "Unable to allocate CCBs\n");
7095 		free_irq(ha->pcidev->irq, ha);
7096 		return ips_abort_init(ha, index);
7097 	}
7098 
7099 	return SUCCESS;
7100 }
7101 
7102 MODULE_LICENSE("GPL");
7103 MODULE_DESCRIPTION("IBM ServeRAID Adapter Driver " IPS_VER_STRING);
7104 MODULE_VERSION(IPS_VER_STRING);
7105 
7106 
7107 /*
7108  * Overrides for Emacs so that we almost follow Linus's tabbing style.
7109  * Emacs will notice this stuff at the end of the file and automatically
7110  * adjust the settings for this buffer only.  This must remain at the end
7111  * of the file.
7112  * ---------------------------------------------------------------------------
7113  * Local variables:
7114  * c-indent-level: 2
7115  * c-brace-imaginary-offset: 0
7116  * c-brace-offset: -2
7117  * c-argdecl-indent: 2
7118  * c-label-offset: -2
7119  * c-continued-statement-offset: 2
7120  * c-continued-brace-offset: 0
7121  * indent-tabs-mode: nil
7122  * tab-width: 8
7123  * End:
7124  */
7125