Linux Audio

Check our new training course

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