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