drivers/scsi/ips.c

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