Linux Audio

Check our new training course

Loading...
v6.8
   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
 839	METHOD_TRACE("ips_eh_reset", 1);
 840
 841#ifdef NO_IPS_RESET
 842	return (FAILED);
 843#else
 844
 845	if (!SC) {
 846		DEBUG(1, "Reset called with NULL scsi command");
 847
 848		return (FAILED);
 849	}
 850
 851	ha = (ips_ha_t *) SC->device->host->hostdata;
 852
 853	if (!ha) {
 854		DEBUG(1, "Reset called with NULL ha struct");
 855
 856		return (FAILED);
 857	}
 858
 859	if (!ha->active)
 860		return (FAILED);
 861
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 862	/* An explanation for the casual observer:                              */
 863	/* Part of the function of a RAID controller is automatic error         */
 864	/* detection and recovery.  As such, the only problem that physically   */
 865	/* resetting an adapter will ever fix is when, for some reason,         */
 866	/* the driver is not successfully communicating with the adapter.       */
 867	/* Therefore, we will attempt to flush this adapter.  If that succeeds, */
 868	/* then there's no real purpose in a physical reset. This will complete */
 869	/* much faster and avoids any problems that might be caused by a        */
 870	/* physical reset ( such as having to fail all the outstanding I/O's ). */
 871
 872	if (ha->ioctl_reset == 0) {	/* IF Not an IOCTL Requested Reset */
 873		scb = &ha->scbs[ha->max_cmds - 1];
 874
 875		ips_init_scb(ha, scb);
 876
 877		scb->timeout = ips_cmd_timeout;
 878		scb->cdb[0] = IPS_CMD_FLUSH;
 879
 880		scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
 881		scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
 882		scb->cmd.flush_cache.state = IPS_NORM_STATE;
 883		scb->cmd.flush_cache.reserved = 0;
 884		scb->cmd.flush_cache.reserved2 = 0;
 885		scb->cmd.flush_cache.reserved3 = 0;
 886		scb->cmd.flush_cache.reserved4 = 0;
 887
 888		/* Attempt the flush command */
 889		ret = ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_IORL);
 890		if (ret == IPS_SUCCESS) {
 891			IPS_PRINTK(KERN_NOTICE, ha->pcidev,
 892				   "Reset Request - Flushed Cache\n");
 893			return (SUCCESS);
 894		}
 895	}
 896
 897	/* Either we can't communicate with the adapter or it's an IOCTL request */
 898	/* from a utility.  A physical reset is needed at this point.            */
 899
 900	ha->ioctl_reset = 0;	/* Reset the IOCTL Requested Reset Flag */
 901
 902	/*
 903	 * command must have already been sent
 904	 * reset the controller
 905	 */
 906	IPS_PRINTK(KERN_NOTICE, ha->pcidev, "Resetting controller.\n");
 907	ret = (*ha->func.reset) (ha);
 908
 909	if (!ret) {
 910		struct scsi_cmnd *scsi_cmd;
 911
 912		IPS_PRINTK(KERN_NOTICE, ha->pcidev,
 913			   "Controller reset failed - controller now offline.\n");
 914
 915		/* Now fail all of the active commands */
 916		DEBUG_VAR(1, "(%s%d) Failing active commands",
 917			  ips_name, ha->host_num);
 918
 919		while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
 920			scb->scsi_cmd->result = DID_ERROR << 16;
 921			scsi_done(scb->scsi_cmd);
 922			ips_freescb(ha, scb);
 923		}
 924
 925		/* Now fail all of the pending commands */
 926		DEBUG_VAR(1, "(%s%d) Failing pending commands",
 927			  ips_name, ha->host_num);
 928
 929		while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
 930			scsi_cmd->result = DID_ERROR;
 931			scsi_done(scsi_cmd);
 932		}
 933
 934		ha->active = false;
 935		return (FAILED);
 936	}
 937
 938	if (!ips_clear_adapter(ha, IPS_INTR_IORL)) {
 939		struct scsi_cmnd *scsi_cmd;
 940
 941		IPS_PRINTK(KERN_NOTICE, ha->pcidev,
 942			   "Controller reset failed - controller now offline.\n");
 943
 944		/* Now fail all of the active commands */
 945		DEBUG_VAR(1, "(%s%d) Failing active commands",
 946			  ips_name, ha->host_num);
 947
 948		while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
 949			scb->scsi_cmd->result = DID_ERROR << 16;
 950			scsi_done(scb->scsi_cmd);
 951			ips_freescb(ha, scb);
 952		}
 953
 954		/* Now fail all of the pending commands */
 955		DEBUG_VAR(1, "(%s%d) Failing pending commands",
 956			  ips_name, ha->host_num);
 957
 958		while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
 959			scsi_cmd->result = DID_ERROR << 16;
 960			scsi_done(scsi_cmd);
 961		}
 962
 963		ha->active = false;
 964		return (FAILED);
 965	}
 966
 967	/* FFDC */
 968	if (le32_to_cpu(ha->subsys->param[3]) & 0x300000) {
 969		ha->last_ffdc = ktime_get_real_seconds();
 
 
 
 970		ha->reset_count++;
 971		ips_ffdc_reset(ha, IPS_INTR_IORL);
 972	}
 973
 974	/* Now fail all of the active commands */
 975	DEBUG_VAR(1, "(%s%d) Failing active commands", ips_name, ha->host_num);
 976
 977	while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
 978		scb->scsi_cmd->result = DID_RESET << 16;
 979		scsi_done(scb->scsi_cmd);
 980		ips_freescb(ha, scb);
 981	}
 982
 983	/* Reset DCDB active command bits */
 984	for (i = 1; i < ha->nbus; i++)
 985		ha->dcdb_active[i - 1] = 0;
 986
 987	/* Reset the number of active IOCTLs */
 988	ha->num_ioctl = 0;
 989
 990	ips_next(ha, IPS_INTR_IORL);
 991
 992	return (SUCCESS);
 993#endif				/* NO_IPS_RESET */
 994
 995}
 996
 997static int ips_eh_reset(struct scsi_cmnd *SC)
 998{
 999	int rc;
1000
1001	spin_lock_irq(SC->device->host->host_lock);
1002	rc = __ips_eh_reset(SC);
1003	spin_unlock_irq(SC->device->host->host_lock);
1004
1005	return rc;
1006}
1007
1008/****************************************************************************/
1009/*                                                                          */
1010/* Routine Name: ips_queue                                                  */
1011/*                                                                          */
1012/* Routine Description:                                                     */
1013/*                                                                          */
1014/*   Send a command to the controller                                       */
1015/*                                                                          */
1016/* NOTE:                                                                    */
1017/*    Linux obtains io_request_lock before calling this function            */
1018/*                                                                          */
1019/****************************************************************************/
1020static int ips_queue_lck(struct scsi_cmnd *SC)
1021{
1022	void (*done)(struct scsi_cmnd *) = scsi_done;
1023	ips_ha_t *ha;
1024	ips_passthru_t *pt;
1025
1026	METHOD_TRACE("ips_queue", 1);
1027
1028	ha = (ips_ha_t *) SC->device->host->hostdata;
1029
1030	if (!ha)
1031		goto out_error;
1032
1033	if (!ha->active)
1034		goto out_error;
1035
1036	if (ips_is_passthru(SC)) {
1037		if (ha->copp_waitlist.count == IPS_MAX_IOCTL_QUEUE) {
1038			SC->result = DID_BUS_BUSY << 16;
1039			done(SC);
1040
1041			return (0);
1042		}
1043	} else if (ha->scb_waitlist.count == IPS_MAX_QUEUE) {
1044		SC->result = DID_BUS_BUSY << 16;
1045		done(SC);
1046
1047		return (0);
1048	}
1049
 
 
1050	DEBUG_VAR(2, "(%s%d): ips_queue: cmd 0x%X (%d %d %d)",
1051		  ips_name,
1052		  ha->host_num,
1053		  SC->cmnd[0],
1054		  SC->device->channel, SC->device->id, SC->device->lun);
1055
1056	/* Check for command to initiator IDs */
1057	if ((scmd_channel(SC) > 0)
1058	    && (scmd_id(SC) == ha->ha_id[scmd_channel(SC)])) {
1059		SC->result = DID_NO_CONNECT << 16;
1060		done(SC);
1061
1062		return (0);
1063	}
1064
1065	if (ips_is_passthru(SC)) {
1066
1067		ips_copp_wait_item_t *scratch;
1068
1069		/* A Reset IOCTL is only sent by the boot CD in extreme cases.           */
1070		/* There can never be any system activity ( network or disk ), but check */
1071		/* anyway just as a good practice.                                       */
1072		pt = (ips_passthru_t *) scsi_sglist(SC);
1073		if ((pt->CoppCP.cmd.reset.op_code == IPS_CMD_RESET_CHANNEL) &&
1074		    (pt->CoppCP.cmd.reset.adapter_flag == 1)) {
1075			if (ha->scb_activelist.count != 0) {
1076				SC->result = DID_BUS_BUSY << 16;
1077				done(SC);
1078				return (0);
1079			}
1080			ha->ioctl_reset = 1;	/* This reset request is from an IOCTL */
1081			__ips_eh_reset(SC);
1082			SC->result = DID_OK << 16;
1083			scsi_done(SC);
1084			return (0);
1085		}
1086
1087		/* allocate space for the scribble */
1088		scratch = kmalloc(sizeof (ips_copp_wait_item_t), GFP_ATOMIC);
1089
1090		if (!scratch) {
1091			SC->result = DID_ERROR << 16;
1092			done(SC);
1093
1094			return (0);
1095		}
1096
1097		scratch->scsi_cmd = SC;
1098		scratch->next = NULL;
1099
1100		ips_putq_copp_tail(&ha->copp_waitlist, scratch);
1101	} else {
1102		ips_putq_wait_tail(&ha->scb_waitlist, SC);
1103	}
1104
1105	ips_next(ha, IPS_INTR_IORL);
1106
1107	return (0);
1108out_error:
1109	SC->result = DID_ERROR << 16;
1110	done(SC);
1111
1112	return (0);
1113}
1114
1115static DEF_SCSI_QCMD(ips_queue)
1116
1117/****************************************************************************/
1118/*                                                                          */
1119/* Routine Name: ips_biosparam                                              */
1120/*                                                                          */
1121/* Routine Description:                                                     */
1122/*                                                                          */
1123/*   Set bios geometry for the controller                                   */
1124/*                                                                          */
1125/****************************************************************************/
1126static int ips_biosparam(struct scsi_device *sdev, struct block_device *bdev,
1127			 sector_t capacity, int geom[])
1128{
1129	ips_ha_t *ha = (ips_ha_t *) sdev->host->hostdata;
1130	int heads;
1131	int sectors;
1132	int cylinders;
1133
1134	METHOD_TRACE("ips_biosparam", 1);
1135
1136	if (!ha)
1137		/* ?!?! host adater info invalid */
1138		return (0);
1139
1140	if (!ha->active)
1141		return (0);
1142
1143	if (!ips_read_adapter_status(ha, IPS_INTR_ON))
1144		/* ?!?! Enquiry command failed */
1145		return (0);
1146
1147	if ((capacity > 0x400000) && ((ha->enq->ucMiscFlag & 0x8) == 0)) {
1148		heads = IPS_NORM_HEADS;
1149		sectors = IPS_NORM_SECTORS;
1150	} else {
1151		heads = IPS_COMP_HEADS;
1152		sectors = IPS_COMP_SECTORS;
1153	}
1154
1155	cylinders = (unsigned long) capacity / (heads * sectors);
1156
1157	DEBUG_VAR(2, "Geometry: heads: %d, sectors: %d, cylinders: %d",
1158		  heads, sectors, cylinders);
1159
1160	geom[0] = heads;
1161	geom[1] = sectors;
1162	geom[2] = cylinders;
1163
1164	return (0);
1165}
1166
1167/****************************************************************************/
1168/*                                                                          */
1169/* Routine Name: ips_slave_configure                                        */
1170/*                                                                          */
1171/* Routine Description:                                                     */
1172/*                                                                          */
1173/*   Set queue depths on devices once scan is complete                      */
1174/*                                                                          */
1175/****************************************************************************/
1176static int
1177ips_slave_configure(struct scsi_device * SDptr)
1178{
1179	ips_ha_t *ha;
1180	int min;
1181
1182	ha = IPS_HA(SDptr->host);
1183	if (SDptr->tagged_supported && SDptr->type == TYPE_DISK) {
1184		min = ha->max_cmds / 2;
1185		if (ha->enq->ucLogDriveCount <= 2)
1186			min = ha->max_cmds - 1;
1187		scsi_change_queue_depth(SDptr, min);
1188	}
1189
1190	SDptr->skip_ms_page_8 = 1;
1191	SDptr->skip_ms_page_3f = 1;
1192	return 0;
1193}
1194
1195/****************************************************************************/
1196/*                                                                          */
1197/* Routine Name: do_ipsintr                                                 */
1198/*                                                                          */
1199/* Routine Description:                                                     */
1200/*                                                                          */
1201/*   Wrapper for the interrupt handler                                      */
1202/*                                                                          */
1203/****************************************************************************/
1204static irqreturn_t
1205do_ipsintr(int irq, void *dev_id)
1206{
1207	ips_ha_t *ha;
1208	struct Scsi_Host *host;
1209	int irqstatus;
1210
1211	METHOD_TRACE("do_ipsintr", 2);
1212
1213	ha = (ips_ha_t *) dev_id;
1214	if (!ha)
1215		return IRQ_NONE;
1216	host = ips_sh[ha->host_num];
1217	/* interrupt during initialization */
1218	if (!host) {
1219		(*ha->func.intr) (ha);
1220		return IRQ_HANDLED;
1221	}
1222
1223	spin_lock(host->host_lock);
1224
1225	if (!ha->active) {
1226		spin_unlock(host->host_lock);
1227		return IRQ_HANDLED;
1228	}
1229
1230	irqstatus = (*ha->func.intr) (ha);
1231
1232	spin_unlock(host->host_lock);
1233
1234	/* start the next command */
1235	ips_next(ha, IPS_INTR_ON);
1236	return IRQ_RETVAL(irqstatus);
1237}
1238
1239/****************************************************************************/
1240/*                                                                          */
1241/* Routine Name: ips_intr_copperhead                                        */
1242/*                                                                          */
1243/* Routine Description:                                                     */
1244/*                                                                          */
1245/*   Polling interrupt handler                                              */
1246/*                                                                          */
1247/*   ASSUMES interrupts are disabled                                        */
1248/*                                                                          */
1249/****************************************************************************/
1250int
1251ips_intr_copperhead(ips_ha_t * ha)
1252{
1253	ips_stat_t *sp;
1254	ips_scb_t *scb;
1255	IPS_STATUS cstatus;
1256	int intrstatus;
1257
1258	METHOD_TRACE("ips_intr", 2);
1259
1260	if (!ha)
1261		return 0;
1262
1263	if (!ha->active)
1264		return 0;
1265
1266	intrstatus = (*ha->func.isintr) (ha);
1267
1268	if (!intrstatus) {
1269		/*
1270		 * Unexpected/Shared interrupt
1271		 */
1272
1273		return 0;
1274	}
1275
1276	while (true) {
1277		sp = &ha->sp;
1278
1279		intrstatus = (*ha->func.isintr) (ha);
1280
1281		if (!intrstatus)
1282			break;
1283		else
1284			cstatus.value = (*ha->func.statupd) (ha);
1285
1286		if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1287			/* Spurious Interrupt ? */
1288			continue;
1289		}
1290
1291		ips_chkstatus(ha, &cstatus);
1292		scb = (ips_scb_t *) sp->scb_addr;
1293
1294		/*
1295		 * use the callback function to finish things up
1296		 * NOTE: interrupts are OFF for this
1297		 */
1298		(*scb->callback) (ha, scb);
1299	}			/* end while */
1300	return 1;
1301}
1302
1303/****************************************************************************/
1304/*                                                                          */
1305/* Routine Name: ips_intr_morpheus                                          */
1306/*                                                                          */
1307/* Routine Description:                                                     */
1308/*                                                                          */
1309/*   Polling interrupt handler                                              */
1310/*                                                                          */
1311/*   ASSUMES interrupts are disabled                                        */
1312/*                                                                          */
1313/****************************************************************************/
1314int
1315ips_intr_morpheus(ips_ha_t * ha)
1316{
1317	ips_stat_t *sp;
1318	ips_scb_t *scb;
1319	IPS_STATUS cstatus;
1320	int intrstatus;
1321
1322	METHOD_TRACE("ips_intr_morpheus", 2);
1323
1324	if (!ha)
1325		return 0;
1326
1327	if (!ha->active)
1328		return 0;
1329
1330	intrstatus = (*ha->func.isintr) (ha);
1331
1332	if (!intrstatus) {
1333		/*
1334		 * Unexpected/Shared interrupt
1335		 */
1336
1337		return 0;
1338	}
1339
1340	while (true) {
1341		sp = &ha->sp;
1342
1343		intrstatus = (*ha->func.isintr) (ha);
1344
1345		if (!intrstatus)
1346			break;
1347		else
1348			cstatus.value = (*ha->func.statupd) (ha);
1349
1350		if (cstatus.value == 0xffffffff)
1351			/* No more to process */
1352			break;
1353
1354		if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1355			IPS_PRINTK(KERN_WARNING, ha->pcidev,
1356				   "Spurious interrupt; no ccb.\n");
1357
1358			continue;
1359		}
1360
1361		ips_chkstatus(ha, &cstatus);
1362		scb = (ips_scb_t *) sp->scb_addr;
1363
1364		/*
1365		 * use the callback function to finish things up
1366		 * NOTE: interrupts are OFF for this
1367		 */
1368		(*scb->callback) (ha, scb);
1369	}			/* end while */
1370	return 1;
1371}
1372
1373/****************************************************************************/
1374/*                                                                          */
1375/* Routine Name: ips_info                                                   */
1376/*                                                                          */
1377/* Routine Description:                                                     */
1378/*                                                                          */
1379/*   Return info about the driver                                           */
1380/*                                                                          */
1381/****************************************************************************/
1382static const char *
1383ips_info(struct Scsi_Host *SH)
1384{
1385	static char buffer[256];
1386	char *bp;
1387	ips_ha_t *ha;
1388
1389	METHOD_TRACE("ips_info", 1);
1390
1391	ha = IPS_HA(SH);
1392
1393	if (!ha)
1394		return (NULL);
1395
1396	bp = &buffer[0];
1397	memset(bp, 0, sizeof (buffer));
1398
1399	sprintf(bp, "%s%s%s Build %d", "IBM PCI ServeRAID ",
1400		IPS_VERSION_HIGH, IPS_VERSION_LOW, IPS_BUILD_IDENT);
1401
1402	if (ha->ad_type > 0 && ha->ad_type <= MAX_ADAPTER_NAME) {
1403		strcat(bp, " <");
1404		strcat(bp, ips_adapter_name[ha->ad_type - 1]);
1405		strcat(bp, ">");
1406	}
1407
1408	return (bp);
1409}
1410
 
 
 
 
 
 
 
 
 
1411static int
1412ips_write_info(struct Scsi_Host *host, char *buffer, int length)
 
1413{
1414	int i;
 
1415	ips_ha_t *ha = NULL;
1416
 
 
1417	/* Find our host structure */
1418	for (i = 0; i < ips_next_controller; i++) {
1419		if (ips_sh[i]) {
1420			if (ips_sh[i] == host) {
1421				ha = (ips_ha_t *) ips_sh[i]->hostdata;
1422				break;
1423			}
1424		}
1425	}
1426
1427	if (!ha)
1428		return (-EINVAL);
1429
1430	return 0;
1431}
 
 
 
 
 
1432
1433static int
1434ips_show_info(struct seq_file *m, struct Scsi_Host *host)
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 ips_host_info(ha, m);
1453}
1454
1455/*--------------------------------------------------------------------------*/
1456/* Helper Functions                                                         */
1457/*--------------------------------------------------------------------------*/
1458
1459/****************************************************************************/
1460/*                                                                          */
1461/* Routine Name: ips_is_passthru                                            */
1462/*                                                                          */
1463/* Routine Description:                                                     */
1464/*                                                                          */
1465/*   Determine if the specified SCSI command is really a passthru command   */
1466/*                                                                          */
1467/****************************************************************************/
1468static int ips_is_passthru(struct scsi_cmnd *SC)
1469{
1470	unsigned long flags;
1471
1472	METHOD_TRACE("ips_is_passthru", 1);
1473
1474	if (!SC)
1475		return (0);
1476
1477	if ((SC->cmnd[0] == IPS_IOCTL_COMMAND) &&
1478	    (SC->device->channel == 0) &&
1479	    (SC->device->id == IPS_ADAPTER_ID) &&
1480	    (SC->device->lun == 0) && scsi_sglist(SC)) {
1481                struct scatterlist *sg = scsi_sglist(SC);
1482                char  *buffer;
1483
 
1484                /* local_irq_save() protects the KM_IRQ0 address slot.     */
1485                local_irq_save(flags);
1486		buffer = kmap_local_page(sg_page(sg)) + sg->offset;
1487		if (buffer && buffer[0] == 'C' && buffer[1] == 'O' &&
1488		    buffer[2] == 'P' && buffer[3] == 'P') {
1489			kunmap_local(buffer);
1490                        local_irq_restore(flags);
1491                        return 1;
1492                }
1493		kunmap_local(buffer);
1494                local_irq_restore(flags);
1495	}
1496	return 0;
1497}
1498
1499/****************************************************************************/
1500/*                                                                          */
1501/* Routine Name: ips_alloc_passthru_buffer                                  */
1502/*                                                                          */
1503/* Routine Description:                                                     */
1504/*   allocate a buffer large enough for the ioctl data if the ioctl buffer  */
1505/*   is too small or doesn't exist                                          */
1506/****************************************************************************/
1507static int
1508ips_alloc_passthru_buffer(ips_ha_t * ha, int length)
1509{
1510	void *bigger_buf;
1511	dma_addr_t dma_busaddr;
1512
1513	if (ha->ioctl_data && length <= ha->ioctl_len)
1514		return 0;
1515	/* there is no buffer or it's not big enough, allocate a new one */
1516	bigger_buf = dma_alloc_coherent(&ha->pcidev->dev, length, &dma_busaddr,
1517			GFP_KERNEL);
1518	if (bigger_buf) {
1519		/* free the old memory */
1520		dma_free_coherent(&ha->pcidev->dev, ha->ioctl_len,
1521				  ha->ioctl_data, ha->ioctl_busaddr);
1522		/* use the new memory */
1523		ha->ioctl_data = (char *) bigger_buf;
1524		ha->ioctl_len = length;
1525		ha->ioctl_busaddr = dma_busaddr;
1526	} else {
1527		return -1;
1528	}
1529	return 0;
1530}
1531
1532/****************************************************************************/
1533/*                                                                          */
1534/* Routine Name: ips_make_passthru                                          */
1535/*                                                                          */
1536/* Routine Description:                                                     */
1537/*                                                                          */
1538/*   Make a passthru command out of the info in the Scsi block              */
1539/*                                                                          */
1540/****************************************************************************/
1541static int
1542ips_make_passthru(ips_ha_t *ha, struct scsi_cmnd *SC, ips_scb_t *scb, int intr)
1543{
1544	ips_passthru_t *pt;
1545	int length = 0;
1546	int i, ret;
1547        struct scatterlist *sg = scsi_sglist(SC);
1548
1549	METHOD_TRACE("ips_make_passthru", 1);
1550
1551        scsi_for_each_sg(SC, sg, scsi_sg_count(SC), i)
1552		length += sg->length;
1553
1554	if (length < sizeof (ips_passthru_t)) {
1555		/* wrong size */
1556		DEBUG_VAR(1, "(%s%d) Passthru structure wrong size",
1557			  ips_name, ha->host_num);
1558		return (IPS_FAILURE);
1559	}
1560	if (ips_alloc_passthru_buffer(ha, length)) {
1561		/* allocation failure!  If ha->ioctl_data exists, use it to return
1562		   some error codes.  Return a failed command to the scsi layer. */
1563		if (ha->ioctl_data) {
1564			pt = (ips_passthru_t *) ha->ioctl_data;
1565			ips_scmd_buf_read(SC, pt, sizeof (ips_passthru_t));
1566			pt->BasicStatus = 0x0B;
1567			pt->ExtendedStatus = 0x00;
1568			ips_scmd_buf_write(SC, pt, sizeof (ips_passthru_t));
1569		}
1570		return IPS_FAILURE;
1571	}
1572	ha->ioctl_datasize = length;
1573
1574	ips_scmd_buf_read(SC, ha->ioctl_data, ha->ioctl_datasize);
1575	pt = (ips_passthru_t *) ha->ioctl_data;
1576
1577	/*
1578	 * Some notes about the passthru interface used
1579	 *
1580	 * IF the scsi op_code == 0x0d then we assume
1581	 * that the data came along with/goes with the
1582	 * packet we received from the sg driver. In this
1583	 * case the CmdBSize field of the pt structure is
1584	 * used for the size of the buffer.
1585	 */
1586
1587	switch (pt->CoppCmd) {
1588	case IPS_NUMCTRLS:
1589		memcpy(ha->ioctl_data + sizeof (ips_passthru_t),
1590		       &ips_num_controllers, sizeof (int));
1591		ips_scmd_buf_write(SC, ha->ioctl_data,
1592				   sizeof (ips_passthru_t) + sizeof (int));
1593		SC->result = DID_OK << 16;
1594
1595		return (IPS_SUCCESS_IMM);
1596
1597	case IPS_COPPUSRCMD:
1598	case IPS_COPPIOCCMD:
1599		if (SC->cmnd[0] == IPS_IOCTL_COMMAND) {
1600			if (length < (sizeof (ips_passthru_t) + pt->CmdBSize)) {
1601				/* wrong size */
1602				DEBUG_VAR(1,
1603					  "(%s%d) Passthru structure wrong size",
1604					  ips_name, ha->host_num);
1605
1606				return (IPS_FAILURE);
1607			}
1608
1609			if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
1610			    pt->CoppCP.cmd.flashfw.op_code ==
1611			    IPS_CMD_RW_BIOSFW) {
1612				ret = ips_flash_copperhead(ha, pt, scb);
1613				ips_scmd_buf_write(SC, ha->ioctl_data,
1614						   sizeof (ips_passthru_t));
1615				return ret;
1616			}
1617			if (ips_usrcmd(ha, pt, scb))
1618				return (IPS_SUCCESS);
1619			else
1620				return (IPS_FAILURE);
1621		}
1622
1623		break;
1624
1625	}			/* end switch */
1626
1627	return (IPS_FAILURE);
1628}
1629
1630/****************************************************************************/
1631/* Routine Name: ips_flash_copperhead                                       */
1632/* Routine Description:                                                     */
1633/*   Flash the BIOS/FW on a Copperhead style controller                     */
1634/****************************************************************************/
1635static int
1636ips_flash_copperhead(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1637{
1638	int datasize;
1639
1640	/* Trombone is the only copperhead that can do packet flash, but only
1641	 * for firmware. No one said it had to make sense. */
1642	if (IPS_IS_TROMBONE(ha) && pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE) {
1643		if (ips_usrcmd(ha, pt, scb))
1644			return IPS_SUCCESS;
1645		else
1646			return IPS_FAILURE;
1647	}
1648	pt->BasicStatus = 0x0B;
1649	pt->ExtendedStatus = 0;
1650	scb->scsi_cmd->result = DID_OK << 16;
1651	/* IF it's OK to Use the "CD BOOT" Flash Buffer, then you can     */
1652	/* avoid allocating a huge buffer per adapter ( which can fail ). */
1653	if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1654	    pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1655		pt->BasicStatus = 0;
1656		return ips_flash_bios(ha, pt, scb);
1657	} else if (pt->CoppCP.cmd.flashfw.packet_num == 0) {
1658		if (ips_FlashData && !test_and_set_bit(0, &ips_FlashDataInUse)){
1659			ha->flash_data = ips_FlashData;
1660			ha->flash_busaddr = ips_flashbusaddr;
1661			ha->flash_len = PAGE_SIZE << 7;
1662			ha->flash_datasize = 0;
1663		} else if (!ha->flash_data) {
1664			datasize = pt->CoppCP.cmd.flashfw.total_packets *
1665			    pt->CoppCP.cmd.flashfw.count;
1666			ha->flash_data = dma_alloc_coherent(&ha->pcidev->dev,
1667					datasize, &ha->flash_busaddr, GFP_KERNEL);
 
1668			if (!ha->flash_data){
1669				printk(KERN_WARNING "Unable to allocate a flash buffer\n");
1670				return IPS_FAILURE;
1671			}
1672			ha->flash_datasize = 0;
1673			ha->flash_len = datasize;
1674		} else
1675			return IPS_FAILURE;
1676	} else {
1677		if (pt->CoppCP.cmd.flashfw.count + ha->flash_datasize >
1678		    ha->flash_len) {
1679			ips_free_flash_copperhead(ha);
1680			IPS_PRINTK(KERN_WARNING, ha->pcidev,
1681				   "failed size sanity check\n");
1682			return IPS_FAILURE;
1683		}
1684	}
1685	if (!ha->flash_data)
1686		return IPS_FAILURE;
1687	pt->BasicStatus = 0;
1688	memcpy(&ha->flash_data[ha->flash_datasize], pt + 1,
1689	       pt->CoppCP.cmd.flashfw.count);
1690	ha->flash_datasize += pt->CoppCP.cmd.flashfw.count;
1691	if (pt->CoppCP.cmd.flashfw.packet_num ==
1692	    pt->CoppCP.cmd.flashfw.total_packets - 1) {
1693		if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE)
1694			return ips_flash_bios(ha, pt, scb);
1695		else if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE)
1696			return ips_flash_firmware(ha, pt, scb);
1697	}
1698	return IPS_SUCCESS_IMM;
1699}
1700
1701/****************************************************************************/
1702/* Routine Name: ips_flash_bios                                             */
1703/* Routine Description:                                                     */
1704/*   flashes the bios of a copperhead adapter                               */
1705/****************************************************************************/
1706static int
1707ips_flash_bios(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1708{
1709
1710	if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1711	    pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_BIOS) {
1712		if ((!ha->func.programbios) || (!ha->func.erasebios) ||
1713		    (!ha->func.verifybios))
1714			goto error;
1715		if ((*ha->func.erasebios) (ha)) {
1716			DEBUG_VAR(1,
1717				  "(%s%d) flash bios failed - unable to erase flash",
1718				  ips_name, ha->host_num);
1719			goto error;
1720		} else
1721		    if ((*ha->func.programbios) (ha,
1722						 ha->flash_data +
1723						 IPS_BIOS_HEADER,
1724						 ha->flash_datasize -
1725						 IPS_BIOS_HEADER, 0)) {
1726			DEBUG_VAR(1,
1727				  "(%s%d) flash bios failed - unable to flash",
1728				  ips_name, ha->host_num);
1729			goto error;
1730		} else
1731		    if ((*ha->func.verifybios) (ha,
1732						ha->flash_data +
1733						IPS_BIOS_HEADER,
1734						ha->flash_datasize -
1735						IPS_BIOS_HEADER, 0)) {
1736			DEBUG_VAR(1,
1737				  "(%s%d) flash bios failed - unable to verify flash",
1738				  ips_name, ha->host_num);
1739			goto error;
1740		}
1741		ips_free_flash_copperhead(ha);
1742		return IPS_SUCCESS_IMM;
1743	} else if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1744		   pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1745		if (!ha->func.erasebios)
1746			goto error;
1747		if ((*ha->func.erasebios) (ha)) {
1748			DEBUG_VAR(1,
1749				  "(%s%d) flash bios failed - unable to erase flash",
1750				  ips_name, ha->host_num);
1751			goto error;
1752		}
1753		return IPS_SUCCESS_IMM;
1754	}
1755      error:
1756	pt->BasicStatus = 0x0B;
1757	pt->ExtendedStatus = 0x00;
1758	ips_free_flash_copperhead(ha);
1759	return IPS_FAILURE;
1760}
1761
1762/****************************************************************************/
1763/*                                                                          */
1764/* Routine Name: ips_fill_scb_sg_single                                     */
1765/*                                                                          */
1766/* Routine Description:                                                     */
1767/*   Fill in a single scb sg_list element from an address                   */
1768/*   return a -1 if a breakup occurred                                      */
1769/****************************************************************************/
1770static int
1771ips_fill_scb_sg_single(ips_ha_t * ha, dma_addr_t busaddr,
1772		       ips_scb_t * scb, int indx, unsigned int e_len)
1773{
1774
1775	int ret_val = 0;
1776
1777	if ((scb->data_len + e_len) > ha->max_xfer) {
1778		e_len = ha->max_xfer - scb->data_len;
1779		scb->breakup = indx;
1780		++scb->sg_break;
1781		ret_val = -1;
1782	} else {
1783		scb->breakup = 0;
1784		scb->sg_break = 0;
1785	}
1786	if (IPS_USE_ENH_SGLIST(ha)) {
1787		scb->sg_list.enh_list[indx].address_lo =
1788		    cpu_to_le32(lower_32_bits(busaddr));
1789		scb->sg_list.enh_list[indx].address_hi =
1790		    cpu_to_le32(upper_32_bits(busaddr));
1791		scb->sg_list.enh_list[indx].length = cpu_to_le32(e_len);
1792	} else {
1793		scb->sg_list.std_list[indx].address =
1794		    cpu_to_le32(lower_32_bits(busaddr));
1795		scb->sg_list.std_list[indx].length = cpu_to_le32(e_len);
1796	}
1797
1798	++scb->sg_len;
1799	scb->data_len += e_len;
1800	return ret_val;
1801}
1802
1803/****************************************************************************/
1804/* Routine Name: ips_flash_firmware                                         */
1805/* Routine Description:                                                     */
1806/*   flashes the firmware of a copperhead adapter                           */
1807/****************************************************************************/
1808static int
1809ips_flash_firmware(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1810{
1811	IPS_SG_LIST sg_list;
1812	uint32_t cmd_busaddr;
1813
1814	if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE &&
1815	    pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_FW) {
1816		memset(&pt->CoppCP.cmd, 0, sizeof (IPS_HOST_COMMAND));
1817		pt->CoppCP.cmd.flashfw.op_code = IPS_CMD_DOWNLOAD;
1818		pt->CoppCP.cmd.flashfw.count = cpu_to_le32(ha->flash_datasize);
1819	} else {
1820		pt->BasicStatus = 0x0B;
1821		pt->ExtendedStatus = 0x00;
1822		ips_free_flash_copperhead(ha);
1823		return IPS_FAILURE;
1824	}
1825	/* Save the S/G list pointer so it doesn't get clobbered */
1826	sg_list.list = scb->sg_list.list;
1827	cmd_busaddr = scb->scb_busaddr;
1828	/* copy in the CP */
1829	memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1830	/* FIX stuff that might be wrong */
1831	scb->sg_list.list = sg_list.list;
1832	scb->scb_busaddr = cmd_busaddr;
1833	scb->bus = scb->scsi_cmd->device->channel;
1834	scb->target_id = scb->scsi_cmd->device->id;
1835	scb->lun = scb->scsi_cmd->device->lun;
1836	scb->sg_len = 0;
1837	scb->data_len = 0;
1838	scb->flags = 0;
1839	scb->op_code = 0;
1840	scb->callback = ipsintr_done;
1841	scb->timeout = ips_cmd_timeout;
1842
1843	scb->data_len = ha->flash_datasize;
1844	scb->data_busaddr =
1845	    dma_map_single(&ha->pcidev->dev, ha->flash_data, scb->data_len,
1846			   IPS_DMA_DIR(scb));
1847	scb->flags |= IPS_SCB_MAP_SINGLE;
1848	scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
1849	scb->cmd.flashfw.buffer_addr = cpu_to_le32(scb->data_busaddr);
1850	if (pt->TimeOut)
1851		scb->timeout = pt->TimeOut;
1852	scb->scsi_cmd->result = DID_OK << 16;
1853	return IPS_SUCCESS;
1854}
1855
1856/****************************************************************************/
1857/* Routine Name: ips_free_flash_copperhead                                  */
1858/* Routine Description:                                                     */
1859/*   release the memory resources used to hold the flash image              */
1860/****************************************************************************/
1861static void
1862ips_free_flash_copperhead(ips_ha_t * ha)
1863{
1864	if (ha->flash_data == ips_FlashData)
1865		test_and_clear_bit(0, &ips_FlashDataInUse);
1866	else if (ha->flash_data)
1867		dma_free_coherent(&ha->pcidev->dev, ha->flash_len,
1868				  ha->flash_data, ha->flash_busaddr);
1869	ha->flash_data = NULL;
1870}
1871
1872/****************************************************************************/
1873/*                                                                          */
1874/* Routine Name: ips_usrcmd                                                 */
1875/*                                                                          */
1876/* Routine Description:                                                     */
1877/*                                                                          */
1878/*   Process a user command and make it ready to send                       */
1879/*                                                                          */
1880/****************************************************************************/
1881static int
1882ips_usrcmd(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1883{
1884	IPS_SG_LIST sg_list;
1885	uint32_t cmd_busaddr;
1886
1887	METHOD_TRACE("ips_usrcmd", 1);
1888
1889	if ((!scb) || (!pt) || (!ha))
1890		return (0);
1891
1892	/* Save the S/G list pointer so it doesn't get clobbered */
1893	sg_list.list = scb->sg_list.list;
1894	cmd_busaddr = scb->scb_busaddr;
1895	/* copy in the CP */
1896	memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1897	memcpy(&scb->dcdb, &pt->CoppCP.dcdb, sizeof (IPS_DCDB_TABLE));
1898
1899	/* FIX stuff that might be wrong */
1900	scb->sg_list.list = sg_list.list;
1901	scb->scb_busaddr = cmd_busaddr;
1902	scb->bus = scb->scsi_cmd->device->channel;
1903	scb->target_id = scb->scsi_cmd->device->id;
1904	scb->lun = scb->scsi_cmd->device->lun;
1905	scb->sg_len = 0;
1906	scb->data_len = 0;
1907	scb->flags = 0;
1908	scb->op_code = 0;
1909	scb->callback = ipsintr_done;
1910	scb->timeout = ips_cmd_timeout;
1911	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
1912
1913	/* we don't support DCDB/READ/WRITE Scatter Gather */
1914	if ((scb->cmd.basic_io.op_code == IPS_CMD_READ_SG) ||
1915	    (scb->cmd.basic_io.op_code == IPS_CMD_WRITE_SG) ||
1916	    (scb->cmd.basic_io.op_code == IPS_CMD_DCDB_SG))
1917		return (0);
1918
1919	if (pt->CmdBSize) {
1920		scb->data_len = pt->CmdBSize;
1921		scb->data_busaddr = ha->ioctl_busaddr + sizeof (ips_passthru_t);
1922	} else {
1923		scb->data_busaddr = 0L;
1924	}
1925
1926	if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1927		scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
1928							 (unsigned long) &scb->
1929							 dcdb -
1930							 (unsigned long) scb);
1931
1932	if (pt->CmdBSize) {
1933		if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1934			scb->dcdb.buffer_pointer =
1935			    cpu_to_le32(scb->data_busaddr);
1936		else
1937			scb->cmd.basic_io.sg_addr =
1938			    cpu_to_le32(scb->data_busaddr);
1939	}
1940
1941	/* set timeouts */
1942	if (pt->TimeOut) {
1943		scb->timeout = pt->TimeOut;
1944
1945		if (pt->TimeOut <= 10)
1946			scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;
1947		else if (pt->TimeOut <= 60)
1948			scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;
1949		else
1950			scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;
1951	}
1952
1953	/* assume success */
1954	scb->scsi_cmd->result = DID_OK << 16;
1955
1956	/* success */
1957	return (1);
1958}
1959
1960/****************************************************************************/
1961/*                                                                          */
1962/* Routine Name: ips_cleanup_passthru                                       */
1963/*                                                                          */
1964/* Routine Description:                                                     */
1965/*                                                                          */
1966/*   Cleanup after a passthru command                                       */
1967/*                                                                          */
1968/****************************************************************************/
1969static void
1970ips_cleanup_passthru(ips_ha_t * ha, ips_scb_t * scb)
1971{
1972	ips_passthru_t *pt;
1973
1974	METHOD_TRACE("ips_cleanup_passthru", 1);
1975
1976	if ((!scb) || (!scb->scsi_cmd) || (!scsi_sglist(scb->scsi_cmd))) {
1977		DEBUG_VAR(1, "(%s%d) couldn't cleanup after passthru",
1978			  ips_name, ha->host_num);
1979
1980		return;
1981	}
1982	pt = (ips_passthru_t *) ha->ioctl_data;
1983
1984	/* Copy data back to the user */
1985	if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)	/* Copy DCDB Back to Caller's Area */
1986		memcpy(&pt->CoppCP.dcdb, &scb->dcdb, sizeof (IPS_DCDB_TABLE));
1987
1988	pt->BasicStatus = scb->basic_status;
1989	pt->ExtendedStatus = scb->extended_status;
1990	pt->AdapterType = ha->ad_type;
1991
1992	if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
1993	    (scb->cmd.flashfw.op_code == IPS_CMD_DOWNLOAD ||
1994	     scb->cmd.flashfw.op_code == IPS_CMD_RW_BIOSFW))
1995		ips_free_flash_copperhead(ha);
1996
1997	ips_scmd_buf_write(scb->scsi_cmd, ha->ioctl_data, ha->ioctl_datasize);
1998}
1999
2000/****************************************************************************/
2001/*                                                                          */
2002/* Routine Name: ips_host_info                                              */
2003/*                                                                          */
2004/* Routine Description:                                                     */
2005/*                                                                          */
2006/*   The passthru interface for the driver                                  */
2007/*                                                                          */
2008/****************************************************************************/
2009static int
2010ips_host_info(ips_ha_t *ha, struct seq_file *m)
2011{
 
 
2012	METHOD_TRACE("ips_host_info", 1);
2013
2014	seq_puts(m, "\nIBM ServeRAID General Information:\n\n");
 
 
 
 
 
 
2015
2016	if ((le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) &&
2017	    (le16_to_cpu(ha->nvram->adapter_type) != 0))
2018		seq_printf(m, "\tController Type                   : %s\n",
2019			  ips_adapter_name[ha->ad_type - 1]);
2020	else
2021		seq_puts(m, "\tController Type                   : Unknown\n");
 
2022
2023	if (ha->io_addr)
2024		seq_printf(m,
2025			  "\tIO region                         : 0x%x (%d bytes)\n",
2026			  ha->io_addr, ha->io_len);
2027
2028	if (ha->mem_addr) {
2029		seq_printf(m,
2030			  "\tMemory region                     : 0x%x (%d bytes)\n",
2031			  ha->mem_addr, ha->mem_len);
2032		seq_printf(m,
2033			  "\tShared memory address             : 0x%lx\n",
2034			  (unsigned long)ha->mem_ptr);
2035	}
2036
2037	seq_printf(m, "\tIRQ number                        : %d\n", ha->pcidev->irq);
2038
2039    /* For the Next 3 lines Check for Binary 0 at the end and don't include it if it's there. */
2040    /* That keeps everything happy for "text" operations on the proc file.                    */
2041
2042	if (le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) {
2043	if (ha->nvram->bios_low[3] == 0) {
2044		seq_printf(m,
2045			  "\tBIOS Version                      : %c%c%c%c%c%c%c\n",
2046			  ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2047			  ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2048			  ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2049			  ha->nvram->bios_low[2]);
2050
2051        } else {
2052		seq_printf(m,
2053			  "\tBIOS Version                      : %c%c%c%c%c%c%c%c\n",
2054			  ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2055			  ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2056			  ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2057			  ha->nvram->bios_low[2], ha->nvram->bios_low[3]);
2058        }
2059
2060    }
2061
2062    if (ha->enq->CodeBlkVersion[7] == 0) {
2063        seq_printf(m,
2064		  "\tFirmware Version                  : %c%c%c%c%c%c%c\n",
2065		  ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2066		  ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2067		  ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2068		  ha->enq->CodeBlkVersion[6]);
2069    } else {
2070	seq_printf(m,
2071		  "\tFirmware Version                  : %c%c%c%c%c%c%c%c\n",
2072		  ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2073		  ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2074		  ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2075		  ha->enq->CodeBlkVersion[6], ha->enq->CodeBlkVersion[7]);
2076    }
2077
2078    if (ha->enq->BootBlkVersion[7] == 0) {
2079        seq_printf(m,
2080		  "\tBoot Block Version                : %c%c%c%c%c%c%c\n",
2081		  ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2082		  ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2083		  ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2084		  ha->enq->BootBlkVersion[6]);
2085    } else {
2086        seq_printf(m,
2087		  "\tBoot Block Version                : %c%c%c%c%c%c%c%c\n",
2088		  ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2089		  ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2090		  ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2091		  ha->enq->BootBlkVersion[6], ha->enq->BootBlkVersion[7]);
2092    }
2093
2094	seq_printf(m, "\tDriver Version                    : %s%s\n",
2095		  IPS_VERSION_HIGH, IPS_VERSION_LOW);
2096
2097	seq_printf(m, "\tDriver Build                      : %d\n",
2098		  IPS_BUILD_IDENT);
2099
2100	seq_printf(m, "\tMax Physical Devices              : %d\n",
2101		  ha->enq->ucMaxPhysicalDevices);
2102	seq_printf(m, "\tMax Active Commands               : %d\n",
2103		  ha->max_cmds);
2104	seq_printf(m, "\tCurrent Queued Commands           : %d\n",
2105		  ha->scb_waitlist.count);
2106	seq_printf(m, "\tCurrent Active Commands           : %d\n",
2107		  ha->scb_activelist.count - ha->num_ioctl);
2108	seq_printf(m, "\tCurrent Queued PT Commands        : %d\n",
2109		  ha->copp_waitlist.count);
2110	seq_printf(m, "\tCurrent Active PT Commands        : %d\n",
2111		  ha->num_ioctl);
2112
2113	seq_putc(m, '\n');
2114
2115	return 0;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2116}
2117
2118/****************************************************************************/
2119/*                                                                          */
2120/* Routine Name: ips_identify_controller                                    */
2121/*                                                                          */
2122/* Routine Description:                                                     */
2123/*                                                                          */
2124/*   Identify this controller                                               */
2125/*                                                                          */
2126/****************************************************************************/
2127static void
2128ips_identify_controller(ips_ha_t * ha)
2129{
2130	METHOD_TRACE("ips_identify_controller", 1);
2131
2132	switch (ha->pcidev->device) {
2133	case IPS_DEVICEID_COPPERHEAD:
2134		if (ha->pcidev->revision <= IPS_REVID_SERVERAID) {
2135			ha->ad_type = IPS_ADTYPE_SERVERAID;
2136		} else if (ha->pcidev->revision == IPS_REVID_SERVERAID2) {
2137			ha->ad_type = IPS_ADTYPE_SERVERAID2;
2138		} else if (ha->pcidev->revision == IPS_REVID_NAVAJO) {
2139			ha->ad_type = IPS_ADTYPE_NAVAJO;
2140		} else if ((ha->pcidev->revision == IPS_REVID_SERVERAID2)
2141			   && (ha->slot_num == 0)) {
2142			ha->ad_type = IPS_ADTYPE_KIOWA;
2143		} else if ((ha->pcidev->revision >= IPS_REVID_CLARINETP1) &&
2144			   (ha->pcidev->revision <= IPS_REVID_CLARINETP3)) {
2145			if (ha->enq->ucMaxPhysicalDevices == 15)
2146				ha->ad_type = IPS_ADTYPE_SERVERAID3L;
2147			else
2148				ha->ad_type = IPS_ADTYPE_SERVERAID3;
2149		} else if ((ha->pcidev->revision >= IPS_REVID_TROMBONE32) &&
2150			   (ha->pcidev->revision <= IPS_REVID_TROMBONE64)) {
2151			ha->ad_type = IPS_ADTYPE_SERVERAID4H;
2152		}
2153		break;
2154
2155	case IPS_DEVICEID_MORPHEUS:
2156		switch (ha->pcidev->subsystem_device) {
2157		case IPS_SUBDEVICEID_4L:
2158			ha->ad_type = IPS_ADTYPE_SERVERAID4L;
2159			break;
2160
2161		case IPS_SUBDEVICEID_4M:
2162			ha->ad_type = IPS_ADTYPE_SERVERAID4M;
2163			break;
2164
2165		case IPS_SUBDEVICEID_4MX:
2166			ha->ad_type = IPS_ADTYPE_SERVERAID4MX;
2167			break;
2168
2169		case IPS_SUBDEVICEID_4LX:
2170			ha->ad_type = IPS_ADTYPE_SERVERAID4LX;
2171			break;
2172
2173		case IPS_SUBDEVICEID_5I2:
2174			ha->ad_type = IPS_ADTYPE_SERVERAID5I2;
2175			break;
2176
2177		case IPS_SUBDEVICEID_5I1:
2178			ha->ad_type = IPS_ADTYPE_SERVERAID5I1;
2179			break;
2180		}
2181
2182		break;
2183
2184	case IPS_DEVICEID_MARCO:
2185		switch (ha->pcidev->subsystem_device) {
2186		case IPS_SUBDEVICEID_6M:
2187			ha->ad_type = IPS_ADTYPE_SERVERAID6M;
2188			break;
2189		case IPS_SUBDEVICEID_6I:
2190			ha->ad_type = IPS_ADTYPE_SERVERAID6I;
2191			break;
2192		case IPS_SUBDEVICEID_7k:
2193			ha->ad_type = IPS_ADTYPE_SERVERAID7k;
2194			break;
2195		case IPS_SUBDEVICEID_7M:
2196			ha->ad_type = IPS_ADTYPE_SERVERAID7M;
2197			break;
2198		}
2199		break;
2200	}
2201}
2202
2203/****************************************************************************/
2204/*                                                                          */
2205/* Routine Name: ips_get_bios_version                                       */
2206/*                                                                          */
2207/* Routine Description:                                                     */
2208/*                                                                          */
2209/*   Get the BIOS revision number                                           */
2210/*                                                                          */
2211/****************************************************************************/
2212static void
2213ips_get_bios_version(ips_ha_t * ha, int intr)
2214{
2215	ips_scb_t *scb;
2216	int ret;
2217	uint8_t major;
2218	uint8_t minor;
2219	uint8_t subminor;
2220	uint8_t *buffer;
 
 
 
2221
2222	METHOD_TRACE("ips_get_bios_version", 1);
2223
2224	major = 0;
2225	minor = 0;
2226
2227	memcpy(ha->bios_version, "       ?", 8);
2228
2229	if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD) {
2230		if (IPS_USE_MEMIO(ha)) {
2231			/* Memory Mapped I/O */
2232
2233			/* test 1st byte */
2234			writel(0, ha->mem_ptr + IPS_REG_FLAP);
2235			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2236				udelay(25);	/* 25 us */
2237
2238			if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
2239				return;
2240
2241			writel(1, ha->mem_ptr + IPS_REG_FLAP);
2242			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2243				udelay(25);	/* 25 us */
2244
2245			if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
2246				return;
2247
2248			/* Get Major version */
2249			writel(0x1FF, ha->mem_ptr + IPS_REG_FLAP);
2250			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2251				udelay(25);	/* 25 us */
2252
2253			major = readb(ha->mem_ptr + IPS_REG_FLDP);
2254
2255			/* Get Minor version */
2256			writel(0x1FE, ha->mem_ptr + IPS_REG_FLAP);
2257			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2258				udelay(25);	/* 25 us */
2259			minor = readb(ha->mem_ptr + IPS_REG_FLDP);
2260
2261			/* Get SubMinor version */
2262			writel(0x1FD, ha->mem_ptr + IPS_REG_FLAP);
2263			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2264				udelay(25);	/* 25 us */
2265			subminor = readb(ha->mem_ptr + IPS_REG_FLDP);
2266
2267		} else {
2268			/* Programmed I/O */
2269
2270			/* test 1st byte */
2271			outl(0, ha->io_addr + IPS_REG_FLAP);
2272			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2273				udelay(25);	/* 25 us */
2274
2275			if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
2276				return;
2277
2278			outl(1, ha->io_addr + IPS_REG_FLAP);
2279			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2280				udelay(25);	/* 25 us */
2281
2282			if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
2283				return;
2284
2285			/* Get Major version */
2286			outl(0x1FF, ha->io_addr + IPS_REG_FLAP);
2287			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2288				udelay(25);	/* 25 us */
2289
2290			major = inb(ha->io_addr + IPS_REG_FLDP);
2291
2292			/* Get Minor version */
2293			outl(0x1FE, ha->io_addr + IPS_REG_FLAP);
2294			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2295				udelay(25);	/* 25 us */
2296
2297			minor = inb(ha->io_addr + IPS_REG_FLDP);
2298
2299			/* Get SubMinor version */
2300			outl(0x1FD, ha->io_addr + IPS_REG_FLAP);
2301			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2302				udelay(25);	/* 25 us */
2303
2304			subminor = inb(ha->io_addr + IPS_REG_FLDP);
2305
2306		}
2307	} else {
2308		/* Morpheus Family - Send Command to the card */
2309
2310		buffer = ha->ioctl_data;
2311
2312		memset(buffer, 0, 0x1000);
2313
2314		scb = &ha->scbs[ha->max_cmds - 1];
2315
2316		ips_init_scb(ha, scb);
2317
2318		scb->timeout = ips_cmd_timeout;
2319		scb->cdb[0] = IPS_CMD_RW_BIOSFW;
2320
2321		scb->cmd.flashfw.op_code = IPS_CMD_RW_BIOSFW;
2322		scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
2323		scb->cmd.flashfw.type = 1;
2324		scb->cmd.flashfw.direction = 0;
2325		scb->cmd.flashfw.count = cpu_to_le32(0x800);
2326		scb->cmd.flashfw.total_packets = 1;
2327		scb->cmd.flashfw.packet_num = 0;
2328		scb->data_len = 0x1000;
2329		scb->cmd.flashfw.buffer_addr = ha->ioctl_busaddr;
2330
2331		/* issue the command */
2332		if (((ret =
2333		      ips_send_wait(ha, scb, ips_cmd_timeout,
2334				    intr)) == IPS_FAILURE)
2335		    || (ret == IPS_SUCCESS_IMM)
2336		    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
2337			/* Error occurred */
2338
2339			return;
2340		}
2341
2342		if ((buffer[0xC0] == 0x55) && (buffer[0xC1] == 0xAA)) {
2343			major = buffer[0x1ff + 0xC0];	/* Offset 0x1ff after the header (0xc0) */
2344			minor = buffer[0x1fe + 0xC0];	/* Offset 0x1fe after the header (0xc0) */
2345			subminor = buffer[0x1fd + 0xC0];	/* Offset 0x1fd after the header (0xc0) */
2346		} else {
2347			return;
2348		}
2349	}
2350
2351	ha->bios_version[0] = hex_asc_upper_hi(major);
2352	ha->bios_version[1] = '.';
2353	ha->bios_version[2] = hex_asc_upper_lo(major);
2354	ha->bios_version[3] = hex_asc_upper_lo(subminor);
2355	ha->bios_version[4] = '.';
2356	ha->bios_version[5] = hex_asc_upper_hi(minor);
2357	ha->bios_version[6] = hex_asc_upper_lo(minor);
2358	ha->bios_version[7] = 0;
2359}
2360
2361/****************************************************************************/
2362/*                                                                          */
2363/* Routine Name: ips_hainit                                                 */
2364/*                                                                          */
2365/* Routine Description:                                                     */
2366/*                                                                          */
2367/*   Initialize the controller                                              */
2368/*                                                                          */
2369/* NOTE: Assumes to be called from with a lock                              */
2370/*                                                                          */
2371/****************************************************************************/
2372static int
2373ips_hainit(ips_ha_t * ha)
2374{
2375	int i;
 
2376
2377	METHOD_TRACE("ips_hainit", 1);
2378
2379	if (!ha)
2380		return (0);
2381
2382	if (ha->func.statinit)
2383		(*ha->func.statinit) (ha);
2384
2385	if (ha->func.enableint)
2386		(*ha->func.enableint) (ha);
2387
2388	/* Send FFDC */
2389	ha->reset_count = 1;
2390	ha->last_ffdc = ktime_get_real_seconds();
 
2391	ips_ffdc_reset(ha, IPS_INTR_IORL);
2392
2393	if (!ips_read_config(ha, IPS_INTR_IORL)) {
2394		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2395			   "unable to read config from controller.\n");
2396
2397		return (0);
2398	}
2399	/* end if */
2400	if (!ips_read_adapter_status(ha, IPS_INTR_IORL)) {
2401		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2402			   "unable to read controller status.\n");
2403
2404		return (0);
2405	}
2406
2407	/* Identify this controller */
2408	ips_identify_controller(ha);
2409
2410	if (!ips_read_subsystem_parameters(ha, IPS_INTR_IORL)) {
2411		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2412			   "unable to read subsystem parameters.\n");
2413
2414		return (0);
2415	}
2416
2417	/* write nvram user page 5 */
2418	if (!ips_write_driver_status(ha, IPS_INTR_IORL)) {
2419		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2420			   "unable to write driver info to controller.\n");
2421
2422		return (0);
2423	}
2424
2425	/* If there are Logical Drives and a Reset Occurred, then an EraseStripeLock is Needed */
2426	if ((ha->conf->ucLogDriveCount > 0) && (ha->requires_esl == 1))
2427		ips_clear_adapter(ha, IPS_INTR_IORL);
2428
2429	/* set limits on SID, LUN, BUS */
2430	ha->ntargets = IPS_MAX_TARGETS + 1;
2431	ha->nlun = 1;
2432	ha->nbus = (ha->enq->ucMaxPhysicalDevices / IPS_MAX_TARGETS) + 1;
2433
2434	switch (ha->conf->logical_drive[0].ucStripeSize) {
2435	case 4:
2436		ha->max_xfer = 0x10000;
2437		break;
2438
2439	case 5:
2440		ha->max_xfer = 0x20000;
2441		break;
2442
2443	case 6:
2444		ha->max_xfer = 0x40000;
2445		break;
2446
2447	case 7:
2448	default:
2449		ha->max_xfer = 0x80000;
2450		break;
2451	}
2452
2453	/* setup max concurrent commands */
2454	if (le32_to_cpu(ha->subsys->param[4]) & 0x1) {
2455		/* Use the new method */
2456		ha->max_cmds = ha->enq->ucConcurrentCmdCount;
2457	} else {
2458		/* use the old method */
2459		switch (ha->conf->logical_drive[0].ucStripeSize) {
2460		case 4:
2461			ha->max_cmds = 32;
2462			break;
2463
2464		case 5:
2465			ha->max_cmds = 16;
2466			break;
2467
2468		case 6:
2469			ha->max_cmds = 8;
2470			break;
2471
2472		case 7:
2473		default:
2474			ha->max_cmds = 4;
2475			break;
2476		}
2477	}
2478
2479	/* Limit the Active Commands on a Lite Adapter */
2480	if ((ha->ad_type == IPS_ADTYPE_SERVERAID3L) ||
2481	    (ha->ad_type == IPS_ADTYPE_SERVERAID4L) ||
2482	    (ha->ad_type == IPS_ADTYPE_SERVERAID4LX)) {
2483		if ((ha->max_cmds > MaxLiteCmds) && (MaxLiteCmds))
2484			ha->max_cmds = MaxLiteCmds;
2485	}
2486
2487	/* set controller IDs */
2488	ha->ha_id[0] = IPS_ADAPTER_ID;
2489	for (i = 1; i < ha->nbus; i++) {
2490		ha->ha_id[i] = ha->conf->init_id[i - 1] & 0x1f;
2491		ha->dcdb_active[i - 1] = 0;
2492	}
2493
2494	return (1);
2495}
2496
2497/****************************************************************************/
2498/*                                                                          */
2499/* Routine Name: ips_next                                                   */
2500/*                                                                          */
2501/* Routine Description:                                                     */
2502/*                                                                          */
2503/*   Take the next command off the queue and send it to the controller      */
2504/*                                                                          */
2505/****************************************************************************/
2506static void
2507ips_next(ips_ha_t * ha, int intr)
2508{
2509	ips_scb_t *scb;
2510	struct scsi_cmnd *SC;
2511	struct scsi_cmnd *p;
2512	struct scsi_cmnd *q;
2513	ips_copp_wait_item_t *item;
2514	int ret;
2515	struct Scsi_Host *host;
2516	METHOD_TRACE("ips_next", 1);
2517
2518	if (!ha)
2519		return;
2520	host = ips_sh[ha->host_num];
2521	/*
2522	 * Block access to the queue function so
2523	 * this command won't time out
2524	 */
2525	if (intr == IPS_INTR_ON)
2526		spin_lock(host->host_lock);
2527
2528	if ((ha->subsys->param[3] & 0x300000)
2529	    && (ha->scb_activelist.count == 0)) {
2530		time64_t now = ktime_get_real_seconds();
2531		if (now - ha->last_ffdc > IPS_SECS_8HOURS) {
2532			ha->last_ffdc = now;
 
 
 
2533			ips_ffdc_time(ha);
2534		}
2535	}
2536
2537	/*
2538	 * Send passthru commands
2539	 * These have priority over normal I/O
2540	 * but shouldn't affect performance too much
2541	 * since we limit the number that can be active
2542	 * on the card at any one time
2543	 */
2544	while ((ha->num_ioctl < IPS_MAX_IOCTL) &&
2545	       (ha->copp_waitlist.head) && (scb = ips_getscb(ha))) {
2546
2547		item = ips_removeq_copp_head(&ha->copp_waitlist);
2548		ha->num_ioctl++;
2549		if (intr == IPS_INTR_ON)
2550			spin_unlock(host->host_lock);
2551		scb->scsi_cmd = item->scsi_cmd;
2552		kfree(item);
2553
2554		ret = ips_make_passthru(ha, scb->scsi_cmd, scb, intr);
2555
2556		if (intr == IPS_INTR_ON)
2557			spin_lock(host->host_lock);
2558		switch (ret) {
2559		case IPS_FAILURE:
2560			if (scb->scsi_cmd) {
2561				scb->scsi_cmd->result = DID_ERROR << 16;
2562				scsi_done(scb->scsi_cmd);
2563			}
2564
2565			ips_freescb(ha, scb);
2566			break;
2567		case IPS_SUCCESS_IMM:
2568			if (scb->scsi_cmd) {
2569				scb->scsi_cmd->result = DID_OK << 16;
2570				scsi_done(scb->scsi_cmd);
2571			}
2572
2573			ips_freescb(ha, scb);
2574			break;
2575		default:
2576			break;
2577		}		/* end case */
2578
2579		if (ret != IPS_SUCCESS) {
2580			ha->num_ioctl--;
2581			continue;
2582		}
2583
2584		ret = ips_send_cmd(ha, scb);
2585
2586		if (ret == IPS_SUCCESS)
2587			ips_putq_scb_head(&ha->scb_activelist, scb);
2588		else
2589			ha->num_ioctl--;
2590
2591		switch (ret) {
2592		case IPS_FAILURE:
2593			if (scb->scsi_cmd) {
2594				scb->scsi_cmd->result = DID_ERROR << 16;
2595			}
2596
2597			ips_freescb(ha, scb);
2598			break;
2599		case IPS_SUCCESS_IMM:
2600			ips_freescb(ha, scb);
2601			break;
2602		default:
2603			break;
2604		}		/* end case */
2605
2606	}
2607
2608	/*
2609	 * Send "Normal" I/O commands
2610	 */
2611
2612	p = ha->scb_waitlist.head;
2613	while ((p) && (scb = ips_getscb(ha))) {
2614		if ((scmd_channel(p) > 0)
2615		    && (ha->
2616			dcdb_active[scmd_channel(p) -
2617				    1] & (1 << scmd_id(p)))) {
2618			ips_freescb(ha, scb);
2619			p = (struct scsi_cmnd *) p->host_scribble;
2620			continue;
2621		}
2622
2623		q = p;
2624		SC = ips_removeq_wait(&ha->scb_waitlist, q);
2625
2626		if (intr == IPS_INTR_ON)
2627			spin_unlock(host->host_lock);	/* Unlock HA after command is taken off queue */
2628
2629		SC->result = DID_OK;
2630		SC->host_scribble = NULL;
2631
2632		scb->target_id = SC->device->id;
2633		scb->lun = SC->device->lun;
2634		scb->bus = SC->device->channel;
2635		scb->scsi_cmd = SC;
2636		scb->breakup = 0;
2637		scb->data_len = 0;
2638		scb->callback = ipsintr_done;
2639		scb->timeout = ips_cmd_timeout;
2640		memset(&scb->cmd, 0, 16);
2641
2642		/* copy in the CDB */
2643		memcpy(scb->cdb, SC->cmnd, SC->cmd_len);
2644
2645                scb->sg_count = scsi_dma_map(SC);
2646                BUG_ON(scb->sg_count < 0);
2647		if (scb->sg_count) {
2648			struct scatterlist *sg;
2649			int i;
2650
2651			scb->flags |= IPS_SCB_MAP_SG;
2652
2653                        scsi_for_each_sg(SC, sg, scb->sg_count, i) {
2654				if (ips_fill_scb_sg_single
2655				    (ha, sg_dma_address(sg), scb, i,
2656				     sg_dma_len(sg)) < 0)
2657					break;
2658			}
2659			scb->dcdb.transfer_length = scb->data_len;
2660		} else {
2661                        scb->data_busaddr = 0L;
2662                        scb->sg_len = 0;
2663                        scb->data_len = 0;
2664                        scb->dcdb.transfer_length = 0;
2665		}
2666
2667		scb->dcdb.cmd_attribute =
2668		    ips_command_direction[scb->scsi_cmd->cmnd[0]];
2669
2670		/* Allow a WRITE BUFFER Command to Have no Data */
2671		/* This is Used by Tape Flash Utilites          */
2672		if ((scb->scsi_cmd->cmnd[0] == WRITE_BUFFER) &&
2673				(scb->data_len == 0))
2674			scb->dcdb.cmd_attribute = 0;
2675
2676		if (!(scb->dcdb.cmd_attribute & 0x3))
2677			scb->dcdb.transfer_length = 0;
2678
2679		if (scb->data_len >= IPS_MAX_XFER) {
2680			scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
2681			scb->dcdb.transfer_length = 0;
2682		}
2683		if (intr == IPS_INTR_ON)
2684			spin_lock(host->host_lock);
2685
2686		ret = ips_send_cmd(ha, scb);
2687
2688		switch (ret) {
2689		case IPS_SUCCESS:
2690			ips_putq_scb_head(&ha->scb_activelist, scb);
2691			break;
2692		case IPS_FAILURE:
2693			if (scb->scsi_cmd) {
2694				scb->scsi_cmd->result = DID_ERROR << 16;
2695				scsi_done(scb->scsi_cmd);
2696			}
2697
2698			if (scb->bus)
2699				ha->dcdb_active[scb->bus - 1] &=
2700				    ~(1 << scb->target_id);
2701
2702			ips_freescb(ha, scb);
2703			break;
2704		case IPS_SUCCESS_IMM:
2705			if (scb->scsi_cmd)
2706				scsi_done(scb->scsi_cmd);
2707
2708			if (scb->bus)
2709				ha->dcdb_active[scb->bus - 1] &=
2710				    ~(1 << scb->target_id);
2711
2712			ips_freescb(ha, scb);
2713			break;
2714		default:
2715			break;
2716		}		/* end case */
2717
2718		p = (struct scsi_cmnd *) p->host_scribble;
2719
2720	}			/* end while */
2721
2722	if (intr == IPS_INTR_ON)
2723		spin_unlock(host->host_lock);
2724}
2725
2726/****************************************************************************/
2727/*                                                                          */
2728/* Routine Name: ips_putq_scb_head                                          */
2729/*                                                                          */
2730/* Routine Description:                                                     */
2731/*                                                                          */
2732/*   Add an item to the head of the queue                                   */
2733/*                                                                          */
2734/* ASSUMED to be called from within the HA lock                             */
2735/*                                                                          */
2736/****************************************************************************/
2737static void
2738ips_putq_scb_head(ips_scb_queue_t * queue, ips_scb_t * item)
2739{
2740	METHOD_TRACE("ips_putq_scb_head", 1);
2741
2742	if (!item)
2743		return;
2744
2745	item->q_next = queue->head;
2746	queue->head = item;
2747
2748	if (!queue->tail)
2749		queue->tail = item;
2750
2751	queue->count++;
2752}
2753
2754/****************************************************************************/
2755/*                                                                          */
2756/* Routine Name: ips_removeq_scb_head                                       */
2757/*                                                                          */
2758/* Routine Description:                                                     */
2759/*                                                                          */
2760/*   Remove the head of the queue                                           */
2761/*                                                                          */
2762/* ASSUMED to be called from within the HA lock                             */
2763/*                                                                          */
2764/****************************************************************************/
2765static ips_scb_t *
2766ips_removeq_scb_head(ips_scb_queue_t * queue)
2767{
2768	ips_scb_t *item;
2769
2770	METHOD_TRACE("ips_removeq_scb_head", 1);
2771
2772	item = queue->head;
2773
2774	if (!item) {
2775		return (NULL);
2776	}
2777
2778	queue->head = item->q_next;
2779	item->q_next = NULL;
2780
2781	if (queue->tail == item)
2782		queue->tail = NULL;
2783
2784	queue->count--;
2785
2786	return (item);
2787}
2788
2789/****************************************************************************/
2790/*                                                                          */
2791/* Routine Name: ips_removeq_scb                                            */
2792/*                                                                          */
2793/* Routine Description:                                                     */
2794/*                                                                          */
2795/*   Remove an item from a queue                                            */
2796/*                                                                          */
2797/* ASSUMED to be called from within the HA lock                             */
2798/*                                                                          */
2799/****************************************************************************/
2800static ips_scb_t *
2801ips_removeq_scb(ips_scb_queue_t * queue, ips_scb_t * item)
2802{
2803	ips_scb_t *p;
2804
2805	METHOD_TRACE("ips_removeq_scb", 1);
2806
2807	if (!item)
2808		return (NULL);
2809
2810	if (item == queue->head) {
2811		return (ips_removeq_scb_head(queue));
2812	}
2813
2814	p = queue->head;
2815
2816	while ((p) && (item != p->q_next))
2817		p = p->q_next;
2818
2819	if (p) {
2820		/* found a match */
2821		p->q_next = item->q_next;
2822
2823		if (!item->q_next)
2824			queue->tail = p;
2825
2826		item->q_next = NULL;
2827		queue->count--;
2828
2829		return (item);
2830	}
2831
2832	return (NULL);
2833}
2834
2835/****************************************************************************/
2836/*                                                                          */
2837/* Routine Name: ips_putq_wait_tail                                         */
2838/*                                                                          */
2839/* Routine Description:                                                     */
2840/*                                                                          */
2841/*   Add an item to the tail of the queue                                   */
2842/*                                                                          */
2843/* ASSUMED to be called from within the HA lock                             */
2844/*                                                                          */
2845/****************************************************************************/
2846static void ips_putq_wait_tail(ips_wait_queue_entry_t *queue, struct scsi_cmnd *item)
2847{
2848	METHOD_TRACE("ips_putq_wait_tail", 1);
2849
2850	if (!item)
2851		return;
2852
2853	item->host_scribble = NULL;
2854
2855	if (queue->tail)
2856		queue->tail->host_scribble = (char *) item;
2857
2858	queue->tail = item;
2859
2860	if (!queue->head)
2861		queue->head = item;
2862
2863	queue->count++;
2864}
2865
2866/****************************************************************************/
2867/*                                                                          */
2868/* Routine Name: ips_removeq_wait_head                                      */
2869/*                                                                          */
2870/* Routine Description:                                                     */
2871/*                                                                          */
2872/*   Remove the head of the queue                                           */
2873/*                                                                          */
2874/* ASSUMED to be called from within the HA lock                             */
2875/*                                                                          */
2876/****************************************************************************/
2877static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_entry_t *queue)
2878{
2879	struct scsi_cmnd *item;
2880
2881	METHOD_TRACE("ips_removeq_wait_head", 1);
2882
2883	item = queue->head;
2884
2885	if (!item) {
2886		return (NULL);
2887	}
2888
2889	queue->head = (struct scsi_cmnd *) item->host_scribble;
2890	item->host_scribble = NULL;
2891
2892	if (queue->tail == item)
2893		queue->tail = NULL;
2894
2895	queue->count--;
2896
2897	return (item);
2898}
2899
2900/****************************************************************************/
2901/*                                                                          */
2902/* Routine Name: ips_removeq_wait                                           */
2903/*                                                                          */
2904/* Routine Description:                                                     */
2905/*                                                                          */
2906/*   Remove an item from a queue                                            */
2907/*                                                                          */
2908/* ASSUMED to be called from within the HA lock                             */
2909/*                                                                          */
2910/****************************************************************************/
2911static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_entry_t *queue,
2912					  struct scsi_cmnd *item)
2913{
2914	struct scsi_cmnd *p;
2915
2916	METHOD_TRACE("ips_removeq_wait", 1);
2917
2918	if (!item)
2919		return (NULL);
2920
2921	if (item == queue->head) {
2922		return (ips_removeq_wait_head(queue));
2923	}
2924
2925	p = queue->head;
2926
2927	while ((p) && (item != (struct scsi_cmnd *) p->host_scribble))
2928		p = (struct scsi_cmnd *) p->host_scribble;
2929
2930	if (p) {
2931		/* found a match */
2932		p->host_scribble = item->host_scribble;
2933
2934		if (!item->host_scribble)
2935			queue->tail = p;
2936
2937		item->host_scribble = NULL;
2938		queue->count--;
2939
2940		return (item);
2941	}
2942
2943	return (NULL);
2944}
2945
2946/****************************************************************************/
2947/*                                                                          */
2948/* Routine Name: ips_putq_copp_tail                                         */
2949/*                                                                          */
2950/* Routine Description:                                                     */
2951/*                                                                          */
2952/*   Add an item to the tail of the queue                                   */
2953/*                                                                          */
2954/* ASSUMED to be called from within the HA lock                             */
2955/*                                                                          */
2956/****************************************************************************/
2957static void
2958ips_putq_copp_tail(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
2959{
2960	METHOD_TRACE("ips_putq_copp_tail", 1);
2961
2962	if (!item)
2963		return;
2964
2965	item->next = NULL;
2966
2967	if (queue->tail)
2968		queue->tail->next = item;
2969
2970	queue->tail = item;
2971
2972	if (!queue->head)
2973		queue->head = item;
2974
2975	queue->count++;
2976}
2977
2978/****************************************************************************/
2979/*                                                                          */
2980/* Routine Name: ips_removeq_copp_head                                      */
2981/*                                                                          */
2982/* Routine Description:                                                     */
2983/*                                                                          */
2984/*   Remove the head of the queue                                           */
2985/*                                                                          */
2986/* ASSUMED to be called from within the HA lock                             */
2987/*                                                                          */
2988/****************************************************************************/
2989static ips_copp_wait_item_t *
2990ips_removeq_copp_head(ips_copp_queue_t * queue)
2991{
2992	ips_copp_wait_item_t *item;
2993
2994	METHOD_TRACE("ips_removeq_copp_head", 1);
2995
2996	item = queue->head;
2997
2998	if (!item) {
2999		return (NULL);
3000	}
3001
3002	queue->head = item->next;
3003	item->next = NULL;
3004
3005	if (queue->tail == item)
3006		queue->tail = NULL;
3007
3008	queue->count--;
3009
3010	return (item);
3011}
3012
3013/****************************************************************************/
3014/*                                                                          */
3015/* Routine Name: ips_removeq_copp                                           */
3016/*                                                                          */
3017/* Routine Description:                                                     */
3018/*                                                                          */
3019/*   Remove an item from a queue                                            */
3020/*                                                                          */
3021/* ASSUMED to be called from within the HA lock                             */
3022/*                                                                          */
3023/****************************************************************************/
3024static ips_copp_wait_item_t *
3025ips_removeq_copp(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
3026{
3027	ips_copp_wait_item_t *p;
3028
3029	METHOD_TRACE("ips_removeq_copp", 1);
3030
3031	if (!item)
3032		return (NULL);
3033
3034	if (item == queue->head) {
3035		return (ips_removeq_copp_head(queue));
3036	}
3037
3038	p = queue->head;
3039
3040	while ((p) && (item != p->next))
3041		p = p->next;
3042
3043	if (p) {
3044		/* found a match */
3045		p->next = item->next;
3046
3047		if (!item->next)
3048			queue->tail = p;
3049
3050		item->next = NULL;
3051		queue->count--;
3052
3053		return (item);
3054	}
3055
3056	return (NULL);
3057}
3058
3059/****************************************************************************/
3060/*                                                                          */
3061/* Routine Name: ipsintr_blocking                                           */
3062/*                                                                          */
3063/* Routine Description:                                                     */
3064/*                                                                          */
3065/*   Finalize an interrupt for internal commands                            */
3066/*                                                                          */
3067/****************************************************************************/
3068static void
3069ipsintr_blocking(ips_ha_t * ha, ips_scb_t * scb)
3070{
3071	METHOD_TRACE("ipsintr_blocking", 2);
3072
3073	ips_freescb(ha, scb);
3074	if (ha->waitflag && ha->cmd_in_progress == scb->cdb[0]) {
3075		ha->waitflag = false;
3076
3077		return;
3078	}
3079}
3080
3081/****************************************************************************/
3082/*                                                                          */
3083/* Routine Name: ipsintr_done                                               */
3084/*                                                                          */
3085/* Routine Description:                                                     */
3086/*                                                                          */
3087/*   Finalize an interrupt for non-internal commands                        */
3088/*                                                                          */
3089/****************************************************************************/
3090static void
3091ipsintr_done(ips_ha_t * ha, ips_scb_t * scb)
3092{
3093	METHOD_TRACE("ipsintr_done", 2);
3094
3095	if (!scb) {
3096		IPS_PRINTK(KERN_WARNING, ha->pcidev,
3097			   "Spurious interrupt; scb NULL.\n");
3098
3099		return;
3100	}
3101
3102	if (scb->scsi_cmd == NULL) {
3103		/* unexpected interrupt */
3104		IPS_PRINTK(KERN_WARNING, ha->pcidev,
3105			   "Spurious interrupt; scsi_cmd not set.\n");
3106
3107		return;
3108	}
3109
3110	ips_done(ha, scb);
3111}
3112
3113/****************************************************************************/
3114/*                                                                          */
3115/* Routine Name: ips_done                                                   */
3116/*                                                                          */
3117/* Routine Description:                                                     */
3118/*                                                                          */
3119/*   Do housekeeping on completed commands                                  */
3120/*  ASSUMED to be called form within the request lock                       */
3121/****************************************************************************/
3122static void
3123ips_done(ips_ha_t * ha, ips_scb_t * scb)
3124{
3125	int ret;
3126
3127	METHOD_TRACE("ips_done", 1);
3128
3129	if (!scb)
3130		return;
3131
3132	if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd))) {
3133		ips_cleanup_passthru(ha, scb);
3134		ha->num_ioctl--;
3135	} else {
3136		/*
3137		 * Check to see if this command had too much
3138		 * data and had to be broke up.  If so, queue
3139		 * the rest of the data and continue.
3140		 */
3141		if ((scb->breakup) || (scb->sg_break)) {
3142                        struct scatterlist *sg;
3143                        int i, sg_dma_index, ips_sg_index = 0;
3144
3145			/* we had a data breakup */
3146			scb->data_len = 0;
3147
3148                        sg = scsi_sglist(scb->scsi_cmd);
3149
3150                        /* Spin forward to last dma chunk */
3151                        sg_dma_index = scb->breakup;
3152                        for (i = 0; i < scb->breakup; i++)
3153                                sg = sg_next(sg);
3154
3155			/* Take care of possible partial on last chunk */
3156                        ips_fill_scb_sg_single(ha,
3157                                               sg_dma_address(sg),
3158                                               scb, ips_sg_index++,
3159                                               sg_dma_len(sg));
3160
3161                        for (; sg_dma_index < scsi_sg_count(scb->scsi_cmd);
3162                             sg_dma_index++, sg = sg_next(sg)) {
3163                                if (ips_fill_scb_sg_single
3164                                    (ha,
3165                                     sg_dma_address(sg),
3166                                     scb, ips_sg_index++,
3167                                     sg_dma_len(sg)) < 0)
3168                                        break;
3169                        }
3170
3171			scb->dcdb.transfer_length = scb->data_len;
3172			scb->dcdb.cmd_attribute |=
3173			    ips_command_direction[scb->scsi_cmd->cmnd[0]];
3174
3175			if (!(scb->dcdb.cmd_attribute & 0x3))
3176				scb->dcdb.transfer_length = 0;
3177
3178			if (scb->data_len >= IPS_MAX_XFER) {
3179				scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
3180				scb->dcdb.transfer_length = 0;
3181			}
3182
3183			ret = ips_send_cmd(ha, scb);
3184
3185			switch (ret) {
3186			case IPS_FAILURE:
3187				if (scb->scsi_cmd) {
3188					scb->scsi_cmd->result = DID_ERROR << 16;
3189					scsi_done(scb->scsi_cmd);
3190				}
3191
3192				ips_freescb(ha, scb);
3193				break;
3194			case IPS_SUCCESS_IMM:
3195				if (scb->scsi_cmd) {
3196					scb->scsi_cmd->result = DID_ERROR << 16;
3197					scsi_done(scb->scsi_cmd);
3198				}
3199
3200				ips_freescb(ha, scb);
3201				break;
3202			default:
3203				break;
3204			}	/* end case */
3205
3206			return;
3207		}
3208	}			/* end if passthru */
3209
3210	if (scb->bus) {
3211		ha->dcdb_active[scb->bus - 1] &= ~(1 << scb->target_id);
3212	}
3213
3214	scsi_done(scb->scsi_cmd);
3215
3216	ips_freescb(ha, scb);
3217}
3218
3219/****************************************************************************/
3220/*                                                                          */
3221/* Routine Name: ips_map_status                                             */
3222/*                                                                          */
3223/* Routine Description:                                                     */
3224/*                                                                          */
3225/*   Map Controller Error codes to Linux Error Codes                        */
3226/*                                                                          */
3227/****************************************************************************/
3228static int
3229ips_map_status(ips_ha_t * ha, ips_scb_t * scb, ips_stat_t * sp)
3230{
3231	int errcode;
3232	int device_error;
3233	uint32_t transfer_len;
3234	IPS_DCDB_TABLE_TAPE *tapeDCDB;
3235	IPS_SCSI_INQ_DATA inquiryData;
3236
3237	METHOD_TRACE("ips_map_status", 1);
3238
3239	if (scb->bus) {
3240		DEBUG_VAR(2,
3241			  "(%s%d) Physical device error (%d %d %d): %x %x, Sense Key: %x, ASC: %x, ASCQ: %x",
3242			  ips_name, ha->host_num,
3243			  scb->scsi_cmd->device->channel,
3244			  scb->scsi_cmd->device->id, scb->scsi_cmd->device->lun,
3245			  scb->basic_status, scb->extended_status,
3246			  scb->extended_status ==
3247			  IPS_ERR_CKCOND ? scb->dcdb.sense_info[2] & 0xf : 0,
3248			  scb->extended_status ==
3249			  IPS_ERR_CKCOND ? scb->dcdb.sense_info[12] : 0,
3250			  scb->extended_status ==
3251			  IPS_ERR_CKCOND ? scb->dcdb.sense_info[13] : 0);
3252	}
3253
3254	/* default driver error */
3255	errcode = DID_ERROR;
3256	device_error = 0;
3257
3258	switch (scb->basic_status & IPS_GSC_STATUS_MASK) {
3259	case IPS_CMD_TIMEOUT:
3260		errcode = DID_TIME_OUT;
3261		break;
3262
3263	case IPS_INVAL_OPCO:
3264	case IPS_INVAL_CMD_BLK:
3265	case IPS_INVAL_PARM_BLK:
3266	case IPS_LD_ERROR:
3267	case IPS_CMD_CMPLT_WERROR:
3268		break;
3269
3270	case IPS_PHYS_DRV_ERROR:
3271		switch (scb->extended_status) {
3272		case IPS_ERR_SEL_TO:
3273			if (scb->bus)
3274				errcode = DID_NO_CONNECT;
3275
3276			break;
3277
3278		case IPS_ERR_OU_RUN:
3279			if ((scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB) ||
3280			    (scb->cmd.dcdb.op_code ==
3281			     IPS_CMD_EXTENDED_DCDB_SG)) {
3282				tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3283				transfer_len = tapeDCDB->transfer_length;
3284			} else {
3285				transfer_len =
3286				    (uint32_t) scb->dcdb.transfer_length;
3287			}
3288
3289			if ((scb->bus) && (transfer_len < scb->data_len)) {
3290				/* Underrun - set default to no error */
3291				errcode = DID_OK;
3292
3293				/* Restrict access to physical DASD */
3294				if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3295				    ips_scmd_buf_read(scb->scsi_cmd,
3296                                      &inquiryData, sizeof (inquiryData));
3297 				    if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK) {
3298				        errcode = DID_TIME_OUT;
3299				        break;
3300				    }
3301				}
3302			} else
3303				errcode = DID_ERROR;
3304
3305			break;
3306
3307		case IPS_ERR_RECOVERY:
3308			/* don't fail recovered errors */
3309			if (scb->bus)
3310				errcode = DID_OK;
3311
3312			break;
3313
3314		case IPS_ERR_HOST_RESET:
3315		case IPS_ERR_DEV_RESET:
3316			errcode = DID_RESET;
3317			break;
3318
3319		case IPS_ERR_CKCOND:
3320			if (scb->bus) {
3321				if ((scb->cmd.dcdb.op_code ==
3322				     IPS_CMD_EXTENDED_DCDB)
3323				    || (scb->cmd.dcdb.op_code ==
3324					IPS_CMD_EXTENDED_DCDB_SG)) {
3325					tapeDCDB =
3326					    (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3327					memcpy_and_pad(scb->scsi_cmd->sense_buffer,
3328					       SCSI_SENSE_BUFFERSIZE,
3329					       tapeDCDB->sense_info,
3330					       sizeof(tapeDCDB->sense_info), 0);
3331				} else {
3332					memcpy_and_pad(scb->scsi_cmd->sense_buffer,
3333					       SCSI_SENSE_BUFFERSIZE,
3334					       scb->dcdb.sense_info,
3335					       sizeof(scb->dcdb.sense_info), 0);
3336				}
3337				device_error = 2;	/* check condition */
3338			}
3339
3340			errcode = DID_OK;
3341
3342			break;
3343
3344		default:
3345			errcode = DID_ERROR;
3346			break;
3347
3348		}		/* end switch */
3349	}			/* end switch */
3350
3351	scb->scsi_cmd->result = device_error | (errcode << 16);
3352
3353	return (1);
3354}
3355
3356/****************************************************************************/
3357/*                                                                          */
3358/* Routine Name: ips_send_wait                                              */
3359/*                                                                          */
3360/* Routine Description:                                                     */
3361/*                                                                          */
3362/*   Send a command to the controller and wait for it to return             */
3363/*                                                                          */
3364/*   The FFDC Time Stamp use this function for the callback, but doesn't    */
3365/*   actually need to wait.                                                 */
3366/****************************************************************************/
3367static int
3368ips_send_wait(ips_ha_t * ha, ips_scb_t * scb, int timeout, int intr)
3369{
3370	int ret;
3371
3372	METHOD_TRACE("ips_send_wait", 1);
3373
3374	if (intr != IPS_FFDC) {	/* Won't be Waiting if this is a Time Stamp */
3375		ha->waitflag = true;
3376		ha->cmd_in_progress = scb->cdb[0];
3377	}
3378	scb->callback = ipsintr_blocking;
3379	ret = ips_send_cmd(ha, scb);
3380
3381	if ((ret == IPS_FAILURE) || (ret == IPS_SUCCESS_IMM))
3382		return (ret);
3383
3384	if (intr != IPS_FFDC)	/* Don't Wait around if this is a Time Stamp */
3385		ret = ips_wait(ha, timeout, intr);
3386
3387	return (ret);
3388}
3389
3390/****************************************************************************/
3391/*                                                                          */
3392/* Routine Name: ips_scmd_buf_write                                         */
3393/*                                                                          */
3394/* Routine Description:                                                     */
3395/*  Write data to struct scsi_cmnd request_buffer at proper offsets	    */
3396/****************************************************************************/
3397static void
3398ips_scmd_buf_write(struct scsi_cmnd *scmd, void *data, unsigned int count)
3399{
3400	unsigned long flags;
3401
3402	local_irq_save(flags);
3403	scsi_sg_copy_from_buffer(scmd, data, count);
3404	local_irq_restore(flags);
3405}
3406
3407/****************************************************************************/
3408/*                                                                          */
3409/* Routine Name: ips_scmd_buf_read                                          */
3410/*                                                                          */
3411/* Routine Description:                                                     */
3412/*  Copy data from a struct scsi_cmnd to a new, linear buffer		    */
3413/****************************************************************************/
3414static void
3415ips_scmd_buf_read(struct scsi_cmnd *scmd, void *data, unsigned int count)
3416{
3417	unsigned long flags;
3418
3419	local_irq_save(flags);
3420	scsi_sg_copy_to_buffer(scmd, data, count);
3421	local_irq_restore(flags);
3422}
3423
3424/****************************************************************************/
3425/*                                                                          */
3426/* Routine Name: ips_send_cmd                                               */
3427/*                                                                          */
3428/* Routine Description:                                                     */
3429/*                                                                          */
3430/*   Map SCSI commands to ServeRAID commands for logical drives             */
3431/*                                                                          */
3432/****************************************************************************/
3433static int
3434ips_send_cmd(ips_ha_t * ha, ips_scb_t * scb)
3435{
3436	int ret;
3437	char *sp;
3438	int device_error;
3439	IPS_DCDB_TABLE_TAPE *tapeDCDB;
3440	int TimeOut;
3441
3442	METHOD_TRACE("ips_send_cmd", 1);
3443
3444	ret = IPS_SUCCESS;
3445
3446	if (!scb->scsi_cmd) {
3447		/* internal command */
3448
3449		if (scb->bus > 0) {
3450			/* Controller commands can't be issued */
3451			/* to real devices -- fail them        */
3452			if (ha->waitflag && ha->cmd_in_progress == scb->cdb[0])
3453				ha->waitflag = false;
 
 
3454
3455			return (1);
3456		}
3457	} else if ((scb->bus == 0) && (!ips_is_passthru(scb->scsi_cmd))) {
3458		/* command to logical bus -- interpret */
3459		ret = IPS_SUCCESS_IMM;
3460
3461		switch (scb->scsi_cmd->cmnd[0]) {
3462		case ALLOW_MEDIUM_REMOVAL:
3463		case REZERO_UNIT:
3464		case ERASE:
3465		case WRITE_FILEMARKS:
3466		case SPACE:
3467			scb->scsi_cmd->result = DID_ERROR << 16;
3468			break;
3469
3470		case START_STOP:
3471			scb->scsi_cmd->result = DID_OK << 16;
3472			break;
3473
3474		case TEST_UNIT_READY:
3475		case INQUIRY:
3476			if (scb->target_id == IPS_ADAPTER_ID) {
3477				/*
3478				 * Either we have a TUR
3479				 * or we have a SCSI inquiry
3480				 */
3481				if (scb->scsi_cmd->cmnd[0] == TEST_UNIT_READY)
3482					scb->scsi_cmd->result = DID_OK << 16;
3483
3484				if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3485					IPS_SCSI_INQ_DATA inquiry;
3486
3487					memset(&inquiry, 0,
3488					       sizeof (IPS_SCSI_INQ_DATA));
3489
3490					inquiry.DeviceType =
3491					    IPS_SCSI_INQ_TYPE_PROCESSOR;
3492					inquiry.DeviceTypeQualifier =
3493					    IPS_SCSI_INQ_LU_CONNECTED;
3494					inquiry.Version = IPS_SCSI_INQ_REV2;
3495					inquiry.ResponseDataFormat =
3496					    IPS_SCSI_INQ_RD_REV2;
3497					inquiry.AdditionalLength = 31;
3498					inquiry.Flags[0] =
3499					    IPS_SCSI_INQ_Address16;
3500					inquiry.Flags[1] =
3501					    IPS_SCSI_INQ_WBus16 |
3502					    IPS_SCSI_INQ_Sync;
3503					memcpy(inquiry.VendorId, "IBM     ",
3504						8);
3505					memcpy(inquiry.ProductId,
3506						"SERVERAID       ", 16);
3507					memcpy(inquiry.ProductRevisionLevel,
3508						"1.00", 4);
3509
3510					ips_scmd_buf_write(scb->scsi_cmd,
3511							   &inquiry,
3512							   sizeof (inquiry));
3513
3514					scb->scsi_cmd->result = DID_OK << 16;
3515				}
3516			} else {
3517				scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3518				scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3519				scb->cmd.logical_info.reserved = 0;
3520				scb->cmd.logical_info.reserved2 = 0;
3521				scb->data_len = sizeof (IPS_LD_INFO);
3522				scb->data_busaddr = ha->logical_drive_info_dma_addr;
3523				scb->flags = 0;
3524				scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3525				ret = IPS_SUCCESS;
3526			}
3527
3528			break;
3529
3530		case REQUEST_SENSE:
3531			ips_reqsen(ha, scb);
3532			scb->scsi_cmd->result = DID_OK << 16;
3533			break;
3534
3535		case READ_6:
3536		case WRITE_6:
3537			if (!scb->sg_len) {
3538				scb->cmd.basic_io.op_code =
3539				    (scb->scsi_cmd->cmnd[0] ==
3540				     READ_6) ? IPS_CMD_READ : IPS_CMD_WRITE;
3541				scb->cmd.basic_io.enhanced_sg = 0;
3542				scb->cmd.basic_io.sg_addr =
3543				    cpu_to_le32(scb->data_busaddr);
3544			} else {
3545				scb->cmd.basic_io.op_code =
3546				    (scb->scsi_cmd->cmnd[0] ==
3547				     READ_6) ? IPS_CMD_READ_SG :
3548				    IPS_CMD_WRITE_SG;
3549				scb->cmd.basic_io.enhanced_sg =
3550				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3551				scb->cmd.basic_io.sg_addr =
3552				    cpu_to_le32(scb->sg_busaddr);
3553			}
3554
3555			scb->cmd.basic_io.segment_4G = 0;
3556			scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3557			scb->cmd.basic_io.log_drv = scb->target_id;
3558			scb->cmd.basic_io.sg_count = scb->sg_len;
3559
3560			if (scb->cmd.basic_io.lba)
3561				le32_add_cpu(&scb->cmd.basic_io.lba,
3562						le16_to_cpu(scb->cmd.basic_io.
3563							    sector_count));
3564			else
3565				scb->cmd.basic_io.lba =
3566				    (((scb->scsi_cmd->
3567				       cmnd[1] & 0x1f) << 16) | (scb->scsi_cmd->
3568								 cmnd[2] << 8) |
3569				     (scb->scsi_cmd->cmnd[3]));
3570
3571			scb->cmd.basic_io.sector_count =
3572			    cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3573
3574			if (le16_to_cpu(scb->cmd.basic_io.sector_count) == 0)
3575				scb->cmd.basic_io.sector_count =
3576				    cpu_to_le16(256);
3577
3578			ret = IPS_SUCCESS;
3579			break;
3580
3581		case READ_10:
3582		case WRITE_10:
3583			if (!scb->sg_len) {
3584				scb->cmd.basic_io.op_code =
3585				    (scb->scsi_cmd->cmnd[0] ==
3586				     READ_10) ? IPS_CMD_READ : IPS_CMD_WRITE;
3587				scb->cmd.basic_io.enhanced_sg = 0;
3588				scb->cmd.basic_io.sg_addr =
3589				    cpu_to_le32(scb->data_busaddr);
3590			} else {
3591				scb->cmd.basic_io.op_code =
3592				    (scb->scsi_cmd->cmnd[0] ==
3593				     READ_10) ? IPS_CMD_READ_SG :
3594				    IPS_CMD_WRITE_SG;
3595				scb->cmd.basic_io.enhanced_sg =
3596				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3597				scb->cmd.basic_io.sg_addr =
3598				    cpu_to_le32(scb->sg_busaddr);
3599			}
3600
3601			scb->cmd.basic_io.segment_4G = 0;
3602			scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3603			scb->cmd.basic_io.log_drv = scb->target_id;
3604			scb->cmd.basic_io.sg_count = scb->sg_len;
3605
3606			if (scb->cmd.basic_io.lba)
3607				le32_add_cpu(&scb->cmd.basic_io.lba,
3608						le16_to_cpu(scb->cmd.basic_io.
3609							    sector_count));
3610			else
3611				scb->cmd.basic_io.lba =
3612				    ((scb->scsi_cmd->cmnd[2] << 24) | (scb->
3613								       scsi_cmd->
3614								       cmnd[3]
3615								       << 16) |
3616				     (scb->scsi_cmd->cmnd[4] << 8) | scb->
3617				     scsi_cmd->cmnd[5]);
3618
3619			scb->cmd.basic_io.sector_count =
3620			    cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3621
3622			if (cpu_to_le16(scb->cmd.basic_io.sector_count) == 0) {
3623				/*
3624				 * This is a null condition
3625				 * we don't have to do anything
3626				 * so just return
3627				 */
3628				scb->scsi_cmd->result = DID_OK << 16;
3629			} else
3630				ret = IPS_SUCCESS;
3631
3632			break;
3633
3634		case RESERVE:
3635		case RELEASE:
3636			scb->scsi_cmd->result = DID_OK << 16;
3637			break;
3638
3639		case MODE_SENSE:
3640			scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
3641			scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3642			scb->cmd.basic_io.segment_4G = 0;
3643			scb->cmd.basic_io.enhanced_sg = 0;
3644			scb->data_len = sizeof (*ha->enq);
3645			scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
3646			ret = IPS_SUCCESS;
3647			break;
3648
3649		case READ_CAPACITY:
3650			scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3651			scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3652			scb->cmd.logical_info.reserved = 0;
3653			scb->cmd.logical_info.reserved2 = 0;
3654			scb->cmd.logical_info.reserved3 = 0;
3655			scb->data_len = sizeof (IPS_LD_INFO);
3656			scb->data_busaddr = ha->logical_drive_info_dma_addr;
3657			scb->flags = 0;
3658			scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3659			ret = IPS_SUCCESS;
3660			break;
3661
3662		case SEND_DIAGNOSTIC:
3663		case REASSIGN_BLOCKS:
3664		case FORMAT_UNIT:
3665		case SEEK_10:
3666		case VERIFY:
3667		case READ_DEFECT_DATA:
3668		case READ_BUFFER:
3669		case WRITE_BUFFER:
3670			scb->scsi_cmd->result = DID_OK << 16;
3671			break;
3672
3673		default:
3674			/* Set the Return Info to appear like the Command was */
3675			/* attempted, a Check Condition occurred, and Sense   */
3676			/* Data indicating an Invalid CDB OpCode is returned. */
3677			sp = (char *) scb->scsi_cmd->sense_buffer;
3678
3679			sp[0] = 0x70;	/* Error Code               */
3680			sp[2] = ILLEGAL_REQUEST;	/* Sense Key 5 Illegal Req. */
3681			sp[7] = 0x0A;	/* Additional Sense Length  */
3682			sp[12] = 0x20;	/* ASC = Invalid OpCode     */
3683			sp[13] = 0x00;	/* ASCQ                     */
3684
3685			device_error = 2;	/* Indicate Check Condition */
3686			scb->scsi_cmd->result = device_error | (DID_OK << 16);
3687			break;
3688		}		/* end switch */
3689	}
3690	/* end if */
3691	if (ret == IPS_SUCCESS_IMM)
3692		return (ret);
3693
3694	/* setup DCDB */
3695	if (scb->bus > 0) {
3696
3697		/* If we already know the Device is Not there, no need to attempt a Command   */
3698		/* This also protects an NT FailOver Controller from getting CDB's sent to it */
3699		if (ha->conf->dev[scb->bus - 1][scb->target_id].ucState == 0) {
3700			scb->scsi_cmd->result = DID_NO_CONNECT << 16;
3701			return (IPS_SUCCESS_IMM);
3702		}
3703
3704		ha->dcdb_active[scb->bus - 1] |= (1 << scb->target_id);
3705		scb->cmd.dcdb.command_id = IPS_COMMAND_ID(ha, scb);
3706		scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
3707							 (unsigned long) &scb->
3708							 dcdb -
3709							 (unsigned long) scb);
3710		scb->cmd.dcdb.reserved = 0;
3711		scb->cmd.dcdb.reserved2 = 0;
3712		scb->cmd.dcdb.reserved3 = 0;
3713		scb->cmd.dcdb.segment_4G = 0;
3714		scb->cmd.dcdb.enhanced_sg = 0;
3715
3716		TimeOut = scsi_cmd_to_rq(scb->scsi_cmd)->timeout;
3717
3718		if (ha->subsys->param[4] & 0x00100000) {	/* If NEW Tape DCDB is Supported */
3719			if (!scb->sg_len) {
3720				scb->cmd.dcdb.op_code = IPS_CMD_EXTENDED_DCDB;
3721			} else {
3722				scb->cmd.dcdb.op_code =
3723				    IPS_CMD_EXTENDED_DCDB_SG;
3724				scb->cmd.dcdb.enhanced_sg =
3725				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3726			}
3727
3728			tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;	/* Use Same Data Area as Old DCDB Struct */
3729			tapeDCDB->device_address =
3730			    ((scb->bus - 1) << 4) | scb->target_id;
3731			tapeDCDB->cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3732			tapeDCDB->cmd_attribute &= ~IPS_TRANSFER64K;	/* Always Turn OFF 64K Size Flag */
3733
3734			if (TimeOut) {
3735				if (TimeOut < (10 * HZ))
3736					tapeDCDB->cmd_attribute |= IPS_TIMEOUT10;	/* TimeOut is 10 Seconds */
3737				else if (TimeOut < (60 * HZ))
3738					tapeDCDB->cmd_attribute |= IPS_TIMEOUT60;	/* TimeOut is 60 Seconds */
3739				else if (TimeOut < (1200 * HZ))
3740					tapeDCDB->cmd_attribute |= IPS_TIMEOUT20M;	/* TimeOut is 20 Minutes */
3741			}
3742
3743			tapeDCDB->cdb_length = scb->scsi_cmd->cmd_len;
3744			tapeDCDB->reserved_for_LUN = 0;
3745			tapeDCDB->transfer_length = scb->data_len;
3746			if (scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB_SG)
3747				tapeDCDB->buffer_pointer =
3748				    cpu_to_le32(scb->sg_busaddr);
3749			else
3750				tapeDCDB->buffer_pointer =
3751				    cpu_to_le32(scb->data_busaddr);
3752			tapeDCDB->sg_count = scb->sg_len;
3753			tapeDCDB->sense_length = sizeof (tapeDCDB->sense_info);
3754			tapeDCDB->scsi_status = 0;
3755			tapeDCDB->reserved = 0;
3756			memcpy(tapeDCDB->scsi_cdb, scb->scsi_cmd->cmnd,
3757			       scb->scsi_cmd->cmd_len);
3758		} else {
3759			if (!scb->sg_len) {
3760				scb->cmd.dcdb.op_code = IPS_CMD_DCDB;
3761			} else {
3762				scb->cmd.dcdb.op_code = IPS_CMD_DCDB_SG;
3763				scb->cmd.dcdb.enhanced_sg =
3764				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3765			}
3766
3767			scb->dcdb.device_address =
3768			    ((scb->bus - 1) << 4) | scb->target_id;
3769			scb->dcdb.cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3770
3771			if (TimeOut) {
3772				if (TimeOut < (10 * HZ))
3773					scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;	/* TimeOut is 10 Seconds */
3774				else if (TimeOut < (60 * HZ))
3775					scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;	/* TimeOut is 60 Seconds */
3776				else if (TimeOut < (1200 * HZ))
3777					scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;	/* TimeOut is 20 Minutes */
3778			}
3779
3780			scb->dcdb.transfer_length = scb->data_len;
3781			if (scb->dcdb.cmd_attribute & IPS_TRANSFER64K)
3782				scb->dcdb.transfer_length = 0;
3783			if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB_SG)
3784				scb->dcdb.buffer_pointer =
3785				    cpu_to_le32(scb->sg_busaddr);
3786			else
3787				scb->dcdb.buffer_pointer =
3788				    cpu_to_le32(scb->data_busaddr);
3789			scb->dcdb.cdb_length = scb->scsi_cmd->cmd_len;
3790			scb->dcdb.sense_length = sizeof (scb->dcdb.sense_info);
3791			scb->dcdb.sg_count = scb->sg_len;
3792			scb->dcdb.reserved = 0;
3793			memcpy(scb->dcdb.scsi_cdb, scb->scsi_cmd->cmnd,
3794			       scb->scsi_cmd->cmd_len);
3795			scb->dcdb.scsi_status = 0;
3796			scb->dcdb.reserved2[0] = 0;
3797			scb->dcdb.reserved2[1] = 0;
3798			scb->dcdb.reserved2[2] = 0;
3799		}
3800	}
3801
3802	return ((*ha->func.issue) (ha, scb));
3803}
3804
3805/****************************************************************************/
3806/*                                                                          */
3807/* Routine Name: ips_chk_status                                             */
3808/*                                                                          */
3809/* Routine Description:                                                     */
3810/*                                                                          */
3811/*   Check the status of commands to logical drives                         */
3812/*   Assumed to be called with the HA lock                                  */
3813/****************************************************************************/
3814static void
3815ips_chkstatus(ips_ha_t * ha, IPS_STATUS * pstatus)
3816{
3817	ips_scb_t *scb;
3818	ips_stat_t *sp;
3819	uint8_t basic_status;
3820	uint8_t ext_status;
3821	int errcode;
3822	IPS_SCSI_INQ_DATA inquiryData;
3823
3824	METHOD_TRACE("ips_chkstatus", 1);
3825
3826	scb = &ha->scbs[pstatus->fields.command_id];
3827	scb->basic_status = basic_status =
3828	    pstatus->fields.basic_status & IPS_BASIC_STATUS_MASK;
3829	scb->extended_status = ext_status = pstatus->fields.extended_status;
3830
3831	sp = &ha->sp;
3832	sp->residue_len = 0;
3833	sp->scb_addr = (void *) scb;
3834
3835	/* Remove the item from the active queue */
3836	ips_removeq_scb(&ha->scb_activelist, scb);
3837
3838	if (!scb->scsi_cmd)
3839		/* internal commands are handled in do_ipsintr */
3840		return;
3841
3842	DEBUG_VAR(2, "(%s%d) ips_chkstatus: cmd 0x%X id %d (%d %d %d)",
3843		  ips_name,
3844		  ha->host_num,
3845		  scb->cdb[0],
3846		  scb->cmd.basic_io.command_id,
3847		  scb->bus, scb->target_id, scb->lun);
3848
3849	if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd)))
3850		/* passthru - just returns the raw result */
3851		return;
3852
3853	errcode = DID_OK;
3854
3855	if (((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_SUCCESS) ||
3856	    ((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_RECOVERED_ERROR)) {
3857
3858		if (scb->bus == 0) {
3859			if ((basic_status & IPS_GSC_STATUS_MASK) ==
3860			    IPS_CMD_RECOVERED_ERROR) {
3861				DEBUG_VAR(1,
3862					  "(%s%d) Recovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3863					  ips_name, ha->host_num,
3864					  scb->cmd.basic_io.op_code,
3865					  basic_status, ext_status);
3866			}
3867
3868			switch (scb->scsi_cmd->cmnd[0]) {
3869			case ALLOW_MEDIUM_REMOVAL:
3870			case REZERO_UNIT:
3871			case ERASE:
3872			case WRITE_FILEMARKS:
3873			case SPACE:
3874				errcode = DID_ERROR;
3875				break;
3876
3877			case START_STOP:
3878				break;
3879
3880			case TEST_UNIT_READY:
3881				if (!ips_online(ha, scb)) {
3882					errcode = DID_TIME_OUT;
3883				}
3884				break;
3885
3886			case INQUIRY:
3887				if (ips_online(ha, scb)) {
3888					ips_inquiry(ha, scb);
3889				} else {
3890					errcode = DID_TIME_OUT;
3891				}
3892				break;
3893
3894			case REQUEST_SENSE:
3895				ips_reqsen(ha, scb);
3896				break;
3897
3898			case READ_6:
3899			case WRITE_6:
3900			case READ_10:
3901			case WRITE_10:
3902			case RESERVE:
3903			case RELEASE:
3904				break;
3905
3906			case MODE_SENSE:
3907				if (!ips_online(ha, scb)
3908				    || !ips_msense(ha, scb)) {
3909					errcode = DID_ERROR;
3910				}
3911				break;
3912
3913			case READ_CAPACITY:
3914				if (ips_online(ha, scb))
3915					ips_rdcap(ha, scb);
3916				else {
3917					errcode = DID_TIME_OUT;
3918				}
3919				break;
3920
3921			case SEND_DIAGNOSTIC:
3922			case REASSIGN_BLOCKS:
3923				break;
3924
3925			case FORMAT_UNIT:
3926				errcode = DID_ERROR;
3927				break;
3928
3929			case SEEK_10:
3930			case VERIFY:
3931			case READ_DEFECT_DATA:
3932			case READ_BUFFER:
3933			case WRITE_BUFFER:
3934				break;
3935
3936			default:
3937				errcode = DID_ERROR;
3938			}	/* end switch */
3939
3940			scb->scsi_cmd->result = errcode << 16;
3941		} else {	/* bus == 0 */
3942			/* restrict access to physical drives */
3943			if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3944			    ips_scmd_buf_read(scb->scsi_cmd,
3945                                  &inquiryData, sizeof (inquiryData));
3946			    if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK)
3947			        scb->scsi_cmd->result = DID_TIME_OUT << 16;
3948			}
3949		}		/* else */
3950	} else {		/* recovered error / success */
3951		if (scb->bus == 0) {
3952			DEBUG_VAR(1,
3953				  "(%s%d) Unrecovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3954				  ips_name, ha->host_num,
3955				  scb->cmd.basic_io.op_code, basic_status,
3956				  ext_status);
3957		}
3958
3959		ips_map_status(ha, scb, sp);
3960	}			/* else */
3961}
3962
3963/****************************************************************************/
3964/*                                                                          */
3965/* Routine Name: ips_online                                                 */
3966/*                                                                          */
3967/* Routine Description:                                                     */
3968/*                                                                          */
3969/*   Determine if a logical drive is online                                 */
3970/*                                                                          */
3971/****************************************************************************/
3972static int
3973ips_online(ips_ha_t * ha, ips_scb_t * scb)
3974{
3975	METHOD_TRACE("ips_online", 1);
3976
3977	if (scb->target_id >= IPS_MAX_LD)
3978		return (0);
3979
3980	if ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1) {
3981		memset(ha->logical_drive_info, 0, sizeof (IPS_LD_INFO));
3982		return (0);
3983	}
3984
3985	if (ha->logical_drive_info->drive_info[scb->target_id].state !=
3986	    IPS_LD_OFFLINE
3987	    && ha->logical_drive_info->drive_info[scb->target_id].state !=
3988	    IPS_LD_FREE
3989	    && ha->logical_drive_info->drive_info[scb->target_id].state !=
3990	    IPS_LD_CRS
3991	    && ha->logical_drive_info->drive_info[scb->target_id].state !=
3992	    IPS_LD_SYS)
3993		return (1);
3994	else
3995		return (0);
3996}
3997
3998/****************************************************************************/
3999/*                                                                          */
4000/* Routine Name: ips_inquiry                                                */
4001/*                                                                          */
4002/* Routine Description:                                                     */
4003/*                                                                          */
4004/*   Simulate an inquiry command to a logical drive                         */
4005/*                                                                          */
4006/****************************************************************************/
4007static int
4008ips_inquiry(ips_ha_t * ha, ips_scb_t * scb)
4009{
4010	IPS_SCSI_INQ_DATA inquiry;
4011
4012	METHOD_TRACE("ips_inquiry", 1);
4013
4014	memset(&inquiry, 0, sizeof (IPS_SCSI_INQ_DATA));
4015
4016	inquiry.DeviceType = IPS_SCSI_INQ_TYPE_DASD;
4017	inquiry.DeviceTypeQualifier = IPS_SCSI_INQ_LU_CONNECTED;
4018	inquiry.Version = IPS_SCSI_INQ_REV2;
4019	inquiry.ResponseDataFormat = IPS_SCSI_INQ_RD_REV2;
4020	inquiry.AdditionalLength = 31;
4021	inquiry.Flags[0] = IPS_SCSI_INQ_Address16;
4022	inquiry.Flags[1] =
4023	    IPS_SCSI_INQ_WBus16 | IPS_SCSI_INQ_Sync | IPS_SCSI_INQ_CmdQue;
4024	memcpy(inquiry.VendorId, "IBM     ", 8);
4025	memcpy(inquiry.ProductId, "SERVERAID       ", 16);
4026	memcpy(inquiry.ProductRevisionLevel, "1.00", 4);
4027
4028	ips_scmd_buf_write(scb->scsi_cmd, &inquiry, sizeof (inquiry));
4029
4030	return (1);
4031}
4032
4033/****************************************************************************/
4034/*                                                                          */
4035/* Routine Name: ips_rdcap                                                  */
4036/*                                                                          */
4037/* Routine Description:                                                     */
4038/*                                                                          */
4039/*   Simulate a read capacity command to a logical drive                    */
4040/*                                                                          */
4041/****************************************************************************/
4042static int
4043ips_rdcap(ips_ha_t * ha, ips_scb_t * scb)
4044{
4045	IPS_SCSI_CAPACITY cap;
4046
4047	METHOD_TRACE("ips_rdcap", 1);
4048
4049	if (scsi_bufflen(scb->scsi_cmd) < 8)
4050		return (0);
4051
4052	cap.lba =
4053	    cpu_to_be32(le32_to_cpu
4054			(ha->logical_drive_info->
4055			 drive_info[scb->target_id].sector_count) - 1);
4056	cap.len = cpu_to_be32((uint32_t) IPS_BLKSIZE);
4057
4058	ips_scmd_buf_write(scb->scsi_cmd, &cap, sizeof (cap));
4059
4060	return (1);
4061}
4062
4063/****************************************************************************/
4064/*                                                                          */
4065/* Routine Name: ips_msense                                                 */
4066/*                                                                          */
4067/* Routine Description:                                                     */
4068/*                                                                          */
4069/*   Simulate a mode sense command to a logical drive                       */
4070/*                                                                          */
4071/****************************************************************************/
4072static int
4073ips_msense(ips_ha_t * ha, ips_scb_t * scb)
4074{
4075	uint16_t heads;
4076	uint16_t sectors;
4077	uint32_t cylinders;
4078	IPS_SCSI_MODE_PAGE_DATA mdata;
4079
4080	METHOD_TRACE("ips_msense", 1);
4081
4082	if (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) > 0x400000 &&
4083	    (ha->enq->ucMiscFlag & 0x8) == 0) {
4084		heads = IPS_NORM_HEADS;
4085		sectors = IPS_NORM_SECTORS;
4086	} else {
4087		heads = IPS_COMP_HEADS;
4088		sectors = IPS_COMP_SECTORS;
4089	}
4090
4091	cylinders =
4092	    (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) -
4093	     1) / (heads * sectors);
4094
4095	memset(&mdata, 0, sizeof (IPS_SCSI_MODE_PAGE_DATA));
4096
4097	mdata.hdr.BlockDescLength = 8;
4098
4099	switch (scb->scsi_cmd->cmnd[2] & 0x3f) {
4100	case 0x03:		/* page 3 */
4101		mdata.pdata.pg3.PageCode = 3;
4102		mdata.pdata.pg3.PageLength = sizeof (IPS_SCSI_MODE_PAGE3);
4103		mdata.hdr.DataLength =
4104		    3 + mdata.hdr.BlockDescLength + mdata.pdata.pg3.PageLength;
4105		mdata.pdata.pg3.TracksPerZone = 0;
4106		mdata.pdata.pg3.AltSectorsPerZone = 0;
4107		mdata.pdata.pg3.AltTracksPerZone = 0;
4108		mdata.pdata.pg3.AltTracksPerVolume = 0;
4109		mdata.pdata.pg3.SectorsPerTrack = cpu_to_be16(sectors);
4110		mdata.pdata.pg3.BytesPerSector = cpu_to_be16(IPS_BLKSIZE);
4111		mdata.pdata.pg3.Interleave = cpu_to_be16(1);
4112		mdata.pdata.pg3.TrackSkew = 0;
4113		mdata.pdata.pg3.CylinderSkew = 0;
4114		mdata.pdata.pg3.flags = IPS_SCSI_MP3_SoftSector;
4115		break;
4116
4117	case 0x4:
4118		mdata.pdata.pg4.PageCode = 4;
4119		mdata.pdata.pg4.PageLength = sizeof (IPS_SCSI_MODE_PAGE4);
4120		mdata.hdr.DataLength =
4121		    3 + mdata.hdr.BlockDescLength + mdata.pdata.pg4.PageLength;
4122		mdata.pdata.pg4.CylindersHigh =
4123		    cpu_to_be16((cylinders >> 8) & 0xFFFF);
4124		mdata.pdata.pg4.CylindersLow = (cylinders & 0xFF);
4125		mdata.pdata.pg4.Heads = heads;
4126		mdata.pdata.pg4.WritePrecompHigh = 0;
4127		mdata.pdata.pg4.WritePrecompLow = 0;
4128		mdata.pdata.pg4.ReducedWriteCurrentHigh = 0;
4129		mdata.pdata.pg4.ReducedWriteCurrentLow = 0;
4130		mdata.pdata.pg4.StepRate = cpu_to_be16(1);
4131		mdata.pdata.pg4.LandingZoneHigh = 0;
4132		mdata.pdata.pg4.LandingZoneLow = 0;
4133		mdata.pdata.pg4.flags = 0;
4134		mdata.pdata.pg4.RotationalOffset = 0;
4135		mdata.pdata.pg4.MediumRotationRate = 0;
4136		break;
4137	case 0x8:
4138		mdata.pdata.pg8.PageCode = 8;
4139		mdata.pdata.pg8.PageLength = sizeof (IPS_SCSI_MODE_PAGE8);
4140		mdata.hdr.DataLength =
4141		    3 + mdata.hdr.BlockDescLength + mdata.pdata.pg8.PageLength;
4142		/* everything else is left set to 0 */
4143		break;
4144
4145	default:
4146		return (0);
4147	}			/* end switch */
4148
4149	ips_scmd_buf_write(scb->scsi_cmd, &mdata, sizeof (mdata));
4150
4151	return (1);
4152}
4153
4154/****************************************************************************/
4155/*                                                                          */
4156/* Routine Name: ips_reqsen                                                 */
4157/*                                                                          */
4158/* Routine Description:                                                     */
4159/*                                                                          */
4160/*   Simulate a request sense command to a logical drive                    */
4161/*                                                                          */
4162/****************************************************************************/
4163static int
4164ips_reqsen(ips_ha_t * ha, ips_scb_t * scb)
4165{
4166	IPS_SCSI_REQSEN reqsen;
4167
4168	METHOD_TRACE("ips_reqsen", 1);
4169
4170	memset(&reqsen, 0, sizeof (IPS_SCSI_REQSEN));
4171
4172	reqsen.ResponseCode =
4173	    IPS_SCSI_REQSEN_VALID | IPS_SCSI_REQSEN_CURRENT_ERR;
4174	reqsen.AdditionalLength = 10;
4175	reqsen.AdditionalSenseCode = IPS_SCSI_REQSEN_NO_SENSE;
4176	reqsen.AdditionalSenseCodeQual = IPS_SCSI_REQSEN_NO_SENSE;
4177
4178	ips_scmd_buf_write(scb->scsi_cmd, &reqsen, sizeof (reqsen));
4179
4180	return (1);
4181}
4182
4183/****************************************************************************/
4184/*                                                                          */
4185/* Routine Name: ips_free                                                   */
4186/*                                                                          */
4187/* Routine Description:                                                     */
4188/*                                                                          */
4189/*   Free any allocated space for this controller                           */
4190/*                                                                          */
4191/****************************************************************************/
4192static void
4193ips_free(ips_ha_t * ha)
4194{
4195
4196	METHOD_TRACE("ips_free", 1);
4197
4198	if (ha) {
4199		if (ha->enq) {
4200			dma_free_coherent(&ha->pcidev->dev, sizeof(IPS_ENQ),
4201					    ha->enq, ha->enq_busaddr);
4202			ha->enq = NULL;
4203		}
4204
4205		kfree(ha->conf);
4206		ha->conf = NULL;
4207
4208		if (ha->adapt) {
4209			dma_free_coherent(&ha->pcidev->dev,
4210					    sizeof (IPS_ADAPTER) +
4211					    sizeof (IPS_IO_CMD), ha->adapt,
4212					    ha->adapt->hw_status_start);
4213			ha->adapt = NULL;
4214		}
4215
4216		if (ha->logical_drive_info) {
4217			dma_free_coherent(&ha->pcidev->dev,
4218					    sizeof (IPS_LD_INFO),
4219					    ha->logical_drive_info,
4220					    ha->logical_drive_info_dma_addr);
4221			ha->logical_drive_info = NULL;
4222		}
4223
4224		kfree(ha->nvram);
4225		ha->nvram = NULL;
4226
4227		kfree(ha->subsys);
4228		ha->subsys = NULL;
4229
4230		if (ha->ioctl_data) {
4231			dma_free_coherent(&ha->pcidev->dev, ha->ioctl_len,
4232					    ha->ioctl_data, ha->ioctl_busaddr);
4233			ha->ioctl_data = NULL;
4234			ha->ioctl_datasize = 0;
4235			ha->ioctl_len = 0;
4236		}
4237		ips_deallocatescbs(ha, ha->max_cmds);
4238
4239		/* free memory mapped (if applicable) */
4240		if (ha->mem_ptr) {
4241			iounmap(ha->ioremap_ptr);
4242			ha->ioremap_ptr = NULL;
4243			ha->mem_ptr = NULL;
4244		}
4245
4246		ha->mem_addr = 0;
4247
4248	}
4249}
4250
4251/****************************************************************************/
4252/*                                                                          */
4253/* Routine Name: ips_deallocatescbs                                         */
4254/*                                                                          */
4255/* Routine Description:                                                     */
4256/*                                                                          */
4257/*   Free the command blocks                                                */
4258/*                                                                          */
4259/****************************************************************************/
4260static int
4261ips_deallocatescbs(ips_ha_t * ha, int cmds)
4262{
4263	if (ha->scbs) {
4264		dma_free_coherent(&ha->pcidev->dev,
4265				    IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * cmds,
4266				    ha->scbs->sg_list.list,
4267				    ha->scbs->sg_busaddr);
4268		dma_free_coherent(&ha->pcidev->dev, sizeof (ips_scb_t) * cmds,
4269				    ha->scbs, ha->scbs->scb_busaddr);
4270		ha->scbs = NULL;
4271	}			/* end if */
4272	return 1;
4273}
4274
4275/****************************************************************************/
4276/*                                                                          */
4277/* Routine Name: ips_allocatescbs                                           */
4278/*                                                                          */
4279/* Routine Description:                                                     */
4280/*                                                                          */
4281/*   Allocate the command blocks                                            */
4282/*                                                                          */
4283/****************************************************************************/
4284static int
4285ips_allocatescbs(ips_ha_t * ha)
4286{
4287	ips_scb_t *scb_p;
4288	IPS_SG_LIST ips_sg;
4289	int i;
4290	dma_addr_t command_dma, sg_dma;
4291
4292	METHOD_TRACE("ips_allocatescbs", 1);
4293
4294	/* Allocate memory for the SCBs */
4295	ha->scbs = dma_alloc_coherent(&ha->pcidev->dev,
4296			ha->max_cmds * sizeof (ips_scb_t),
4297			&command_dma, GFP_KERNEL);
4298	if (ha->scbs == NULL)
4299		return 0;
4300	ips_sg.list = dma_alloc_coherent(&ha->pcidev->dev,
4301			IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * ha->max_cmds,
4302			&sg_dma, GFP_KERNEL);
 
4303	if (ips_sg.list == NULL) {
4304		dma_free_coherent(&ha->pcidev->dev,
4305				    ha->max_cmds * sizeof (ips_scb_t), ha->scbs,
4306				    command_dma);
4307		return 0;
4308	}
4309
4310	memset(ha->scbs, 0, ha->max_cmds * sizeof (ips_scb_t));
4311
4312	for (i = 0; i < ha->max_cmds; i++) {
4313		scb_p = &ha->scbs[i];
4314		scb_p->scb_busaddr = command_dma + sizeof (ips_scb_t) * i;
4315		/* set up S/G list */
4316		if (IPS_USE_ENH_SGLIST(ha)) {
4317			scb_p->sg_list.enh_list =
4318			    ips_sg.enh_list + i * IPS_MAX_SG;
4319			scb_p->sg_busaddr =
4320			    sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4321		} else {
4322			scb_p->sg_list.std_list =
4323			    ips_sg.std_list + i * IPS_MAX_SG;
4324			scb_p->sg_busaddr =
4325			    sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4326		}
4327
4328		/* add to the free list */
4329		if (i < ha->max_cmds - 1) {
4330			scb_p->q_next = ha->scb_freelist;
4331			ha->scb_freelist = scb_p;
4332		}
4333	}
4334
4335	/* success */
4336	return (1);
4337}
4338
4339/****************************************************************************/
4340/*                                                                          */
4341/* Routine Name: ips_init_scb                                               */
4342/*                                                                          */
4343/* Routine Description:                                                     */
4344/*                                                                          */
4345/*   Initialize a CCB to default values                                     */
4346/*                                                                          */
4347/****************************************************************************/
4348static void
4349ips_init_scb(ips_ha_t * ha, ips_scb_t * scb)
4350{
4351	IPS_SG_LIST sg_list;
4352	uint32_t cmd_busaddr, sg_busaddr;
4353	METHOD_TRACE("ips_init_scb", 1);
4354
4355	if (scb == NULL)
4356		return;
4357
4358	sg_list.list = scb->sg_list.list;
4359	cmd_busaddr = scb->scb_busaddr;
4360	sg_busaddr = scb->sg_busaddr;
4361	/* zero fill */
4362	memset(scb, 0, sizeof (ips_scb_t));
4363	memset(ha->dummy, 0, sizeof (IPS_IO_CMD));
4364
4365	/* Initialize dummy command bucket */
4366	ha->dummy->op_code = 0xFF;
4367	ha->dummy->ccsar = cpu_to_le32(ha->adapt->hw_status_start
4368				       + sizeof (IPS_ADAPTER));
4369	ha->dummy->command_id = IPS_MAX_CMDS;
4370
4371	/* set bus address of scb */
4372	scb->scb_busaddr = cmd_busaddr;
4373	scb->sg_busaddr = sg_busaddr;
4374	scb->sg_list.list = sg_list.list;
4375
4376	/* Neptune Fix */
4377	scb->cmd.basic_io.cccr = cpu_to_le32((uint32_t) IPS_BIT_ILE);
4378	scb->cmd.basic_io.ccsar = cpu_to_le32(ha->adapt->hw_status_start
4379					      + sizeof (IPS_ADAPTER));
4380}
4381
4382/****************************************************************************/
4383/*                                                                          */
4384/* Routine Name: ips_get_scb                                                */
4385/*                                                                          */
4386/* Routine Description:                                                     */
4387/*                                                                          */
4388/*   Initialize a CCB to default values                                     */
4389/*                                                                          */
4390/* ASSUMED to be called from within a lock                                 */
4391/*                                                                          */
4392/****************************************************************************/
4393static ips_scb_t *
4394ips_getscb(ips_ha_t * ha)
4395{
4396	ips_scb_t *scb;
4397
4398	METHOD_TRACE("ips_getscb", 1);
4399
4400	if ((scb = ha->scb_freelist) == NULL) {
4401
4402		return (NULL);
4403	}
4404
4405	ha->scb_freelist = scb->q_next;
4406	scb->flags = 0;
4407	scb->q_next = NULL;
4408
4409	ips_init_scb(ha, scb);
4410
4411	return (scb);
4412}
4413
4414/****************************************************************************/
4415/*                                                                          */
4416/* Routine Name: ips_free_scb                                               */
4417/*                                                                          */
4418/* Routine Description:                                                     */
4419/*                                                                          */
4420/*   Return an unused CCB back to the free list                             */
4421/*                                                                          */
4422/* ASSUMED to be called from within a lock                                  */
4423/*                                                                          */
4424/****************************************************************************/
4425static void
4426ips_freescb(ips_ha_t * ha, ips_scb_t * scb)
4427{
4428
4429	METHOD_TRACE("ips_freescb", 1);
4430	if (scb->flags & IPS_SCB_MAP_SG)
4431                scsi_dma_unmap(scb->scsi_cmd);
4432	else if (scb->flags & IPS_SCB_MAP_SINGLE)
4433		dma_unmap_single(&ha->pcidev->dev, scb->data_busaddr,
4434				 scb->data_len, IPS_DMA_DIR(scb));
4435
4436	/* check to make sure this is not our "special" scb */
4437	if (IPS_COMMAND_ID(ha, scb) < (ha->max_cmds - 1)) {
4438		scb->q_next = ha->scb_freelist;
4439		ha->scb_freelist = scb;
4440	}
4441}
4442
4443/****************************************************************************/
4444/*                                                                          */
4445/* Routine Name: ips_isinit_copperhead                                      */
4446/*                                                                          */
4447/* Routine Description:                                                     */
4448/*                                                                          */
4449/*   Is controller initialized ?                                            */
4450/*                                                                          */
4451/****************************************************************************/
4452static int
4453ips_isinit_copperhead(ips_ha_t * ha)
4454{
4455	uint8_t scpr;
4456	uint8_t isr;
4457
4458	METHOD_TRACE("ips_isinit_copperhead", 1);
4459
4460	isr = inb(ha->io_addr + IPS_REG_HISR);
4461	scpr = inb(ha->io_addr + IPS_REG_SCPR);
4462
4463	if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4464		return (0);
4465	else
4466		return (1);
4467}
4468
4469/****************************************************************************/
4470/*                                                                          */
4471/* Routine Name: ips_isinit_copperhead_memio                                */
4472/*                                                                          */
4473/* Routine Description:                                                     */
4474/*                                                                          */
4475/*   Is controller initialized ?                                            */
4476/*                                                                          */
4477/****************************************************************************/
4478static int
4479ips_isinit_copperhead_memio(ips_ha_t * ha)
4480{
4481	uint8_t isr = 0;
4482	uint8_t scpr;
4483
4484	METHOD_TRACE("ips_is_init_copperhead_memio", 1);
4485
4486	isr = readb(ha->mem_ptr + IPS_REG_HISR);
4487	scpr = readb(ha->mem_ptr + IPS_REG_SCPR);
4488
4489	if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4490		return (0);
4491	else
4492		return (1);
4493}
4494
4495/****************************************************************************/
4496/*                                                                          */
4497/* Routine Name: ips_isinit_morpheus                                        */
4498/*                                                                          */
4499/* Routine Description:                                                     */
4500/*                                                                          */
4501/*   Is controller initialized ?                                            */
4502/*                                                                          */
4503/****************************************************************************/
4504static int
4505ips_isinit_morpheus(ips_ha_t * ha)
4506{
4507	uint32_t post;
4508	uint32_t bits;
4509
4510	METHOD_TRACE("ips_is_init_morpheus", 1);
4511
4512	if (ips_isintr_morpheus(ha))
4513	    ips_flush_and_reset(ha);
4514
4515	post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4516	bits = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4517
4518	if (post == 0)
4519		return (0);
4520	else if (bits & 0x3)
4521		return (0);
4522	else
4523		return (1);
4524}
4525
4526/****************************************************************************/
4527/*                                                                          */
4528/* Routine Name: ips_flush_and_reset                                        */
4529/*                                                                          */
4530/* Routine Description:                                                     */
4531/*                                                                          */
4532/*   Perform cleanup ( FLUSH and RESET ) when the adapter is in an unknown  */
4533/*   state ( was trying to INIT and an interrupt was already pending ) ...  */
4534/*                                                                          */
4535/****************************************************************************/
4536static void
4537ips_flush_and_reset(ips_ha_t *ha)
4538{
4539	ips_scb_t *scb;
4540	int  ret;
4541 	int  time;
4542	int  done;
4543	dma_addr_t command_dma;
4544
4545	/* Create a usuable SCB */
4546	scb = dma_alloc_coherent(&ha->pcidev->dev, sizeof(ips_scb_t),
4547			&command_dma, GFP_KERNEL);
4548	if (scb) {
4549	    memset(scb, 0, sizeof(ips_scb_t));
4550	    ips_init_scb(ha, scb);
4551	    scb->scb_busaddr = command_dma;
4552
4553	    scb->timeout = ips_cmd_timeout;
4554	    scb->cdb[0] = IPS_CMD_FLUSH;
4555
4556	    scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
4557	    scb->cmd.flush_cache.command_id = IPS_MAX_CMDS;   /* Use an ID that would otherwise not exist */
4558	    scb->cmd.flush_cache.state = IPS_NORM_STATE;
4559	    scb->cmd.flush_cache.reserved = 0;
4560	    scb->cmd.flush_cache.reserved2 = 0;
4561	    scb->cmd.flush_cache.reserved3 = 0;
4562	    scb->cmd.flush_cache.reserved4 = 0;
4563
4564	    ret = ips_send_cmd(ha, scb);                      /* Send the Flush Command */
4565
4566	    if (ret == IPS_SUCCESS) {
4567	        time = 60 * IPS_ONE_SEC;	              /* Max Wait time is 60 seconds */
4568	        done = 0;
4569
4570	        while ((time > 0) && (!done)) {
4571		   done = ips_poll_for_flush_complete(ha);
4572	           /* This may look evil, but it's only done during extremely rare start-up conditions ! */
4573	           udelay(1000);
4574	           time--;
4575	        }
4576        }
4577	}
4578
4579	/* Now RESET and INIT the adapter */
4580	(*ha->func.reset) (ha);
4581
4582	dma_free_coherent(&ha->pcidev->dev, sizeof(ips_scb_t), scb, command_dma);
4583	return;
4584}
4585
4586/****************************************************************************/
4587/*                                                                          */
4588/* Routine Name: ips_poll_for_flush_complete                                */
4589/*                                                                          */
4590/* Routine Description:                                                     */
4591/*                                                                          */
4592/*   Poll for the Flush Command issued by ips_flush_and_reset() to complete */
4593/*   All other responses are just taken off the queue and ignored           */
4594/*                                                                          */
4595/****************************************************************************/
4596static int
4597ips_poll_for_flush_complete(ips_ha_t * ha)
4598{
4599	IPS_STATUS cstatus;
4600
4601	while (true) {
4602	    cstatus.value = (*ha->func.statupd) (ha);
4603
4604	    if (cstatus.value == 0xffffffff)      /* If No Interrupt to process */
4605			break;
4606
4607	    /* Success is when we see the Flush Command ID */
4608	    if (cstatus.fields.command_id == IPS_MAX_CMDS)
4609	        return 1;
4610	 }
4611
4612	return 0;
4613}
4614
4615/****************************************************************************/
4616/*                                                                          */
4617/* Routine Name: ips_enable_int_copperhead                                  */
4618/*                                                                          */
4619/* Routine Description:                                                     */
4620/*   Turn on interrupts                                                     */
4621/*                                                                          */
4622/****************************************************************************/
4623static void
4624ips_enable_int_copperhead(ips_ha_t * ha)
4625{
4626	METHOD_TRACE("ips_enable_int_copperhead", 1);
4627
4628	outb(ha->io_addr + IPS_REG_HISR, IPS_BIT_EI);
4629	inb(ha->io_addr + IPS_REG_HISR);	/*Ensure PCI Posting Completes*/
4630}
4631
4632/****************************************************************************/
4633/*                                                                          */
4634/* Routine Name: ips_enable_int_copperhead_memio                            */
4635/*                                                                          */
4636/* Routine Description:                                                     */
4637/*   Turn on interrupts                                                     */
4638/*                                                                          */
4639/****************************************************************************/
4640static void
4641ips_enable_int_copperhead_memio(ips_ha_t * ha)
4642{
4643	METHOD_TRACE("ips_enable_int_copperhead_memio", 1);
4644
4645	writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4646	readb(ha->mem_ptr + IPS_REG_HISR);	/*Ensure PCI Posting Completes*/
4647}
4648
4649/****************************************************************************/
4650/*                                                                          */
4651/* Routine Name: ips_enable_int_morpheus                                    */
4652/*                                                                          */
4653/* Routine Description:                                                     */
4654/*   Turn on interrupts                                                     */
4655/*                                                                          */
4656/****************************************************************************/
4657static void
4658ips_enable_int_morpheus(ips_ha_t * ha)
4659{
4660	uint32_t Oimr;
4661
4662	METHOD_TRACE("ips_enable_int_morpheus", 1);
4663
4664	Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4665	Oimr &= ~0x08;
4666	writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4667	readl(ha->mem_ptr + IPS_REG_I960_OIMR);	/*Ensure PCI Posting Completes*/
4668}
4669
4670/****************************************************************************/
4671/*                                                                          */
4672/* Routine Name: ips_init_copperhead                                        */
4673/*                                                                          */
4674/* Routine Description:                                                     */
4675/*                                                                          */
4676/*   Initialize a copperhead controller                                     */
4677/*                                                                          */
4678/****************************************************************************/
4679static int
4680ips_init_copperhead(ips_ha_t * ha)
4681{
4682	uint8_t Isr;
4683	uint8_t Cbsp;
4684	uint8_t PostByte[IPS_MAX_POST_BYTES];
 
4685	int i, j;
4686
4687	METHOD_TRACE("ips_init_copperhead", 1);
4688
4689	for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4690		for (j = 0; j < 45; j++) {
4691			Isr = inb(ha->io_addr + IPS_REG_HISR);
4692			if (Isr & IPS_BIT_GHI)
4693				break;
4694
4695			/* Delay for 1 Second */
4696			MDELAY(IPS_ONE_SEC);
4697		}
4698
4699		if (j >= 45)
4700			/* error occurred */
4701			return (0);
4702
4703		PostByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4704		outb(Isr, ha->io_addr + IPS_REG_HISR);
4705	}
4706
4707	if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4708		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4709			   "reset controller fails (post status %x %x).\n",
4710			   PostByte[0], PostByte[1]);
4711
4712		return (0);
4713	}
4714
4715	for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4716		for (j = 0; j < 240; j++) {
4717			Isr = inb(ha->io_addr + IPS_REG_HISR);
4718			if (Isr & IPS_BIT_GHI)
4719				break;
4720
4721			/* Delay for 1 Second */
4722			MDELAY(IPS_ONE_SEC);
4723		}
4724
4725		if (j >= 240)
4726			/* error occurred */
4727			return (0);
4728
4729		inb(ha->io_addr + IPS_REG_ISPR);
4730		outb(Isr, ha->io_addr + IPS_REG_HISR);
4731	}
4732
4733	for (i = 0; i < 240; i++) {
4734		Cbsp = inb(ha->io_addr + IPS_REG_CBSP);
4735
4736		if ((Cbsp & IPS_BIT_OP) == 0)
4737			break;
4738
4739		/* Delay for 1 Second */
4740		MDELAY(IPS_ONE_SEC);
4741	}
4742
4743	if (i >= 240)
4744		/* reset failed */
4745		return (0);
4746
4747	/* setup CCCR */
4748	outl(0x1010, ha->io_addr + IPS_REG_CCCR);
4749
4750	/* Enable busmastering */
4751	outb(IPS_BIT_EBM, ha->io_addr + IPS_REG_SCPR);
4752
4753	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4754		/* fix for anaconda64 */
4755		outl(0, ha->io_addr + IPS_REG_NDAE);
4756
4757	/* Enable interrupts */
4758	outb(IPS_BIT_EI, ha->io_addr + IPS_REG_HISR);
4759
4760	return (1);
4761}
4762
4763/****************************************************************************/
4764/*                                                                          */
4765/* Routine Name: ips_init_copperhead_memio                                  */
4766/*                                                                          */
4767/* Routine Description:                                                     */
4768/*                                                                          */
4769/*   Initialize a copperhead controller with memory mapped I/O              */
4770/*                                                                          */
4771/****************************************************************************/
4772static int
4773ips_init_copperhead_memio(ips_ha_t * ha)
4774{
4775	uint8_t Isr = 0;
4776	uint8_t Cbsp;
4777	uint8_t PostByte[IPS_MAX_POST_BYTES];
 
4778	int i, j;
4779
4780	METHOD_TRACE("ips_init_copperhead_memio", 1);
4781
4782	for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4783		for (j = 0; j < 45; j++) {
4784			Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4785			if (Isr & IPS_BIT_GHI)
4786				break;
4787
4788			/* Delay for 1 Second */
4789			MDELAY(IPS_ONE_SEC);
4790		}
4791
4792		if (j >= 45)
4793			/* error occurred */
4794			return (0);
4795
4796		PostByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4797		writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4798	}
4799
4800	if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4801		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4802			   "reset controller fails (post status %x %x).\n",
4803			   PostByte[0], PostByte[1]);
4804
4805		return (0);
4806	}
4807
4808	for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4809		for (j = 0; j < 240; j++) {
4810			Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4811			if (Isr & IPS_BIT_GHI)
4812				break;
4813
4814			/* Delay for 1 Second */
4815			MDELAY(IPS_ONE_SEC);
4816		}
4817
4818		if (j >= 240)
4819			/* error occurred */
4820			return (0);
4821
4822		readb(ha->mem_ptr + IPS_REG_ISPR);
4823		writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4824	}
4825
4826	for (i = 0; i < 240; i++) {
4827		Cbsp = readb(ha->mem_ptr + IPS_REG_CBSP);
4828
4829		if ((Cbsp & IPS_BIT_OP) == 0)
4830			break;
4831
4832		/* Delay for 1 Second */
4833		MDELAY(IPS_ONE_SEC);
4834	}
4835
4836	if (i >= 240)
4837		/* error occurred */
4838		return (0);
4839
4840	/* setup CCCR */
4841	writel(0x1010, ha->mem_ptr + IPS_REG_CCCR);
4842
4843	/* Enable busmastering */
4844	writeb(IPS_BIT_EBM, ha->mem_ptr + IPS_REG_SCPR);
4845
4846	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4847		/* fix for anaconda64 */
4848		writel(0, ha->mem_ptr + IPS_REG_NDAE);
4849
4850	/* Enable interrupts */
4851	writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4852
4853	/* if we get here then everything went OK */
4854	return (1);
4855}
4856
4857/****************************************************************************/
4858/*                                                                          */
4859/* Routine Name: ips_init_morpheus                                          */
4860/*                                                                          */
4861/* Routine Description:                                                     */
4862/*                                                                          */
4863/*   Initialize a morpheus controller                                       */
4864/*                                                                          */
4865/****************************************************************************/
4866static int
4867ips_init_morpheus(ips_ha_t * ha)
4868{
4869	uint32_t Post;
4870	uint32_t Config;
4871	uint32_t Isr;
4872	uint32_t Oimr;
4873	int i;
4874
4875	METHOD_TRACE("ips_init_morpheus", 1);
4876
4877	/* Wait up to 45 secs for Post */
4878	for (i = 0; i < 45; i++) {
4879		Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4880
4881		if (Isr & IPS_BIT_I960_MSG0I)
4882			break;
4883
4884		/* Delay for 1 Second */
4885		MDELAY(IPS_ONE_SEC);
4886	}
4887
4888	if (i >= 45) {
4889		/* error occurred */
4890		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4891			   "timeout waiting for post.\n");
4892
4893		return (0);
4894	}
4895
4896	Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4897
4898	if (Post == 0x4F00) {	/* If Flashing the Battery PIC         */
4899		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4900			   "Flashing Battery PIC, Please wait ...\n");
4901
4902		/* Clear the interrupt bit */
4903		Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4904		writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4905
4906		for (i = 0; i < 120; i++) {	/*    Wait Up to 2 Min. for Completion */
4907			Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4908			if (Post != 0x4F00)
4909				break;
4910			/* Delay for 1 Second */
4911			MDELAY(IPS_ONE_SEC);
4912		}
4913
4914		if (i >= 120) {
4915			IPS_PRINTK(KERN_WARNING, ha->pcidev,
4916				   "timeout waiting for Battery PIC Flash\n");
4917			return (0);
4918		}
4919
4920	}
4921
4922	/* Clear the interrupt bit */
4923	Isr = (uint32_t) IPS_BIT_I960_MSG0I;
4924	writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4925
4926	if (Post < (IPS_GOOD_POST_STATUS << 8)) {
4927		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4928			   "reset controller fails (post status %x).\n", Post);
4929
4930		return (0);
4931	}
4932
4933	/* Wait up to 240 secs for config bytes */
4934	for (i = 0; i < 240; i++) {
4935		Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4936
4937		if (Isr & IPS_BIT_I960_MSG1I)
4938			break;
4939
4940		/* Delay for 1 Second */
4941		MDELAY(IPS_ONE_SEC);
4942	}
4943
4944	if (i >= 240) {
4945		/* error occurred */
4946		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4947			   "timeout waiting for config.\n");
4948
4949		return (0);
4950	}
4951
4952	Config = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
4953
4954	/* Clear interrupt bit */
4955	Isr = (uint32_t) IPS_BIT_I960_MSG1I;
4956	writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
4957
4958	/* Turn on the interrupts */
4959	Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4960	Oimr &= ~0x8;
4961	writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4962
4963	/* if we get here then everything went OK */
4964
4965	/* Since we did a RESET, an EraseStripeLock may be needed */
4966	if (Post == 0xEF10) {
4967		if ((Config == 0x000F) || (Config == 0x0009))
4968			ha->requires_esl = 1;
4969	}
4970
4971	return (1);
4972}
4973
4974/****************************************************************************/
4975/*                                                                          */
4976/* Routine Name: ips_reset_copperhead                                       */
4977/*                                                                          */
4978/* Routine Description:                                                     */
4979/*                                                                          */
4980/*   Reset the controller                                                   */
4981/*                                                                          */
4982/****************************************************************************/
4983static int
4984ips_reset_copperhead(ips_ha_t * ha)
4985{
4986	int reset_counter;
4987
4988	METHOD_TRACE("ips_reset_copperhead", 1);
4989
4990	DEBUG_VAR(1, "(%s%d) ips_reset_copperhead: io addr: %x, irq: %d",
4991		  ips_name, ha->host_num, ha->io_addr, ha->pcidev->irq);
4992
4993	reset_counter = 0;
4994
4995	while (reset_counter < 2) {
4996		reset_counter++;
4997
4998		outb(IPS_BIT_RST, ha->io_addr + IPS_REG_SCPR);
4999
5000		/* Delay for 1 Second */
5001		MDELAY(IPS_ONE_SEC);
5002
5003		outb(0, ha->io_addr + IPS_REG_SCPR);
5004
5005		/* Delay for 1 Second */
5006		MDELAY(IPS_ONE_SEC);
5007
5008		if ((*ha->func.init) (ha))
5009			break;
5010		else if (reset_counter >= 2) {
5011
5012			return (0);
5013		}
5014	}
5015
5016	return (1);
5017}
5018
5019/****************************************************************************/
5020/*                                                                          */
5021/* Routine Name: ips_reset_copperhead_memio                                 */
5022/*                                                                          */
5023/* Routine Description:                                                     */
5024/*                                                                          */
5025/*   Reset the controller                                                   */
5026/*                                                                          */
5027/****************************************************************************/
5028static int
5029ips_reset_copperhead_memio(ips_ha_t * ha)
5030{
5031	int reset_counter;
5032
5033	METHOD_TRACE("ips_reset_copperhead_memio", 1);
5034
5035	DEBUG_VAR(1, "(%s%d) ips_reset_copperhead_memio: mem addr: %x, irq: %d",
5036		  ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5037
5038	reset_counter = 0;
5039
5040	while (reset_counter < 2) {
5041		reset_counter++;
5042
5043		writeb(IPS_BIT_RST, ha->mem_ptr + IPS_REG_SCPR);
5044
5045		/* Delay for 1 Second */
5046		MDELAY(IPS_ONE_SEC);
5047
5048		writeb(0, ha->mem_ptr + IPS_REG_SCPR);
5049
5050		/* Delay for 1 Second */
5051		MDELAY(IPS_ONE_SEC);
5052
5053		if ((*ha->func.init) (ha))
5054			break;
5055		else if (reset_counter >= 2) {
5056
5057			return (0);
5058		}
5059	}
5060
5061	return (1);
5062}
5063
5064/****************************************************************************/
5065/*                                                                          */
5066/* Routine Name: ips_reset_morpheus                                         */
5067/*                                                                          */
5068/* Routine Description:                                                     */
5069/*                                                                          */
5070/*   Reset the controller                                                   */
5071/*                                                                          */
5072/****************************************************************************/
5073static int
5074ips_reset_morpheus(ips_ha_t * ha)
5075{
5076	int reset_counter;
5077	uint8_t junk;
5078
5079	METHOD_TRACE("ips_reset_morpheus", 1);
5080
5081	DEBUG_VAR(1, "(%s%d) ips_reset_morpheus: mem addr: %x, irq: %d",
5082		  ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5083
5084	reset_counter = 0;
5085
5086	while (reset_counter < 2) {
5087		reset_counter++;
5088
5089		writel(0x80000000, ha->mem_ptr + IPS_REG_I960_IDR);
5090
5091		/* Delay for 5 Seconds */
5092		MDELAY(5 * IPS_ONE_SEC);
5093
5094		/* Do a PCI config read to wait for adapter */
5095		pci_read_config_byte(ha->pcidev, 4, &junk);
5096
5097		if ((*ha->func.init) (ha))
5098			break;
5099		else if (reset_counter >= 2) {
5100
5101			return (0);
5102		}
5103	}
5104
5105	return (1);
5106}
5107
5108/****************************************************************************/
5109/*                                                                          */
5110/* Routine Name: ips_statinit                                               */
5111/*                                                                          */
5112/* Routine Description:                                                     */
5113/*                                                                          */
5114/*   Initialize the status queues on the controller                         */
5115/*                                                                          */
5116/****************************************************************************/
5117static void
5118ips_statinit(ips_ha_t * ha)
5119{
5120	uint32_t phys_status_start;
5121
5122	METHOD_TRACE("ips_statinit", 1);
5123
5124	ha->adapt->p_status_start = ha->adapt->status;
5125	ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5126	ha->adapt->p_status_tail = ha->adapt->status;
5127
5128	phys_status_start = ha->adapt->hw_status_start;
5129	outl(phys_status_start, ha->io_addr + IPS_REG_SQSR);
5130	outl(phys_status_start + IPS_STATUS_Q_SIZE,
5131	     ha->io_addr + IPS_REG_SQER);
5132	outl(phys_status_start + IPS_STATUS_SIZE,
5133	     ha->io_addr + IPS_REG_SQHR);
5134	outl(phys_status_start, ha->io_addr + IPS_REG_SQTR);
5135
5136	ha->adapt->hw_status_tail = phys_status_start;
5137}
5138
5139/****************************************************************************/
5140/*                                                                          */
5141/* Routine Name: ips_statinit_memio                                         */
5142/*                                                                          */
5143/* Routine Description:                                                     */
5144/*                                                                          */
5145/*   Initialize the status queues on the controller                         */
5146/*                                                                          */
5147/****************************************************************************/
5148static void
5149ips_statinit_memio(ips_ha_t * ha)
5150{
5151	uint32_t phys_status_start;
5152
5153	METHOD_TRACE("ips_statinit_memio", 1);
5154
5155	ha->adapt->p_status_start = ha->adapt->status;
5156	ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5157	ha->adapt->p_status_tail = ha->adapt->status;
5158
5159	phys_status_start = ha->adapt->hw_status_start;
5160	writel(phys_status_start, ha->mem_ptr + IPS_REG_SQSR);
5161	writel(phys_status_start + IPS_STATUS_Q_SIZE,
5162	       ha->mem_ptr + IPS_REG_SQER);
5163	writel(phys_status_start + IPS_STATUS_SIZE, ha->mem_ptr + IPS_REG_SQHR);
5164	writel(phys_status_start, ha->mem_ptr + IPS_REG_SQTR);
5165
5166	ha->adapt->hw_status_tail = phys_status_start;
5167}
5168
5169/****************************************************************************/
5170/*                                                                          */
5171/* Routine Name: ips_statupd_copperhead                                     */
5172/*                                                                          */
5173/* Routine Description:                                                     */
5174/*                                                                          */
5175/*   Remove an element from the status queue                                */
5176/*                                                                          */
5177/****************************************************************************/
5178static uint32_t
5179ips_statupd_copperhead(ips_ha_t * ha)
5180{
5181	METHOD_TRACE("ips_statupd_copperhead", 1);
5182
5183	if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5184		ha->adapt->p_status_tail++;
5185		ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5186	} else {
5187		ha->adapt->p_status_tail = ha->adapt->p_status_start;
5188		ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5189	}
5190
5191	outl(ha->adapt->hw_status_tail,
5192	     ha->io_addr + IPS_REG_SQTR);
5193
5194	return (ha->adapt->p_status_tail->value);
5195}
5196
5197/****************************************************************************/
5198/*                                                                          */
5199/* Routine Name: ips_statupd_copperhead_memio                               */
5200/*                                                                          */
5201/* Routine Description:                                                     */
5202/*                                                                          */
5203/*   Remove an element from the status queue                                */
5204/*                                                                          */
5205/****************************************************************************/
5206static uint32_t
5207ips_statupd_copperhead_memio(ips_ha_t * ha)
5208{
5209	METHOD_TRACE("ips_statupd_copperhead_memio", 1);
5210
5211	if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5212		ha->adapt->p_status_tail++;
5213		ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5214	} else {
5215		ha->adapt->p_status_tail = ha->adapt->p_status_start;
5216		ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5217	}
5218
5219	writel(ha->adapt->hw_status_tail, ha->mem_ptr + IPS_REG_SQTR);
5220
5221	return (ha->adapt->p_status_tail->value);
5222}
5223
5224/****************************************************************************/
5225/*                                                                          */
5226/* Routine Name: ips_statupd_morpheus                                       */
5227/*                                                                          */
5228/* Routine Description:                                                     */
5229/*                                                                          */
5230/*   Remove an element from the status queue                                */
5231/*                                                                          */
5232/****************************************************************************/
5233static uint32_t
5234ips_statupd_morpheus(ips_ha_t * ha)
5235{
5236	uint32_t val;
5237
5238	METHOD_TRACE("ips_statupd_morpheus", 1);
5239
5240	val = readl(ha->mem_ptr + IPS_REG_I2O_OUTMSGQ);
5241
5242	return (val);
5243}
5244
5245/****************************************************************************/
5246/*                                                                          */
5247/* Routine Name: ips_issue_copperhead                                       */
5248/*                                                                          */
5249/* Routine Description:                                                     */
5250/*                                                                          */
5251/*   Send a command down to the controller                                  */
5252/*                                                                          */
5253/****************************************************************************/
5254static int
5255ips_issue_copperhead(ips_ha_t * ha, ips_scb_t * scb)
5256{
5257	uint32_t TimeOut;
5258	uint32_t val;
5259
5260	METHOD_TRACE("ips_issue_copperhead", 1);
5261
5262	if (scb->scsi_cmd) {
5263		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5264			  ips_name,
5265			  ha->host_num,
5266			  scb->cdb[0],
5267			  scb->cmd.basic_io.command_id,
5268			  scb->bus, scb->target_id, scb->lun);
5269	} else {
5270		DEBUG_VAR(2, KERN_NOTICE "(%s%d) ips_issue: logical cmd id %d",
5271			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5272	}
5273
5274	TimeOut = 0;
5275
5276	while ((val =
5277		le32_to_cpu(inl(ha->io_addr + IPS_REG_CCCR))) & IPS_BIT_SEM) {
5278		udelay(1000);
5279
5280		if (++TimeOut >= IPS_SEM_TIMEOUT) {
5281			if (!(val & IPS_BIT_START_STOP))
5282				break;
5283
5284			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5285				   "ips_issue val [0x%x].\n", val);
5286			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5287				   "ips_issue semaphore chk timeout.\n");
5288
5289			return (IPS_FAILURE);
5290		}		/* end if */
5291	}			/* end while */
5292
5293	outl(scb->scb_busaddr, ha->io_addr + IPS_REG_CCSAR);
5294	outw(IPS_BIT_START_CMD, ha->io_addr + IPS_REG_CCCR);
5295
5296	return (IPS_SUCCESS);
5297}
5298
5299/****************************************************************************/
5300/*                                                                          */
5301/* Routine Name: ips_issue_copperhead_memio                                 */
5302/*                                                                          */
5303/* Routine Description:                                                     */
5304/*                                                                          */
5305/*   Send a command down to the controller                                  */
5306/*                                                                          */
5307/****************************************************************************/
5308static int
5309ips_issue_copperhead_memio(ips_ha_t * ha, ips_scb_t * scb)
5310{
5311	uint32_t TimeOut;
5312	uint32_t val;
5313
5314	METHOD_TRACE("ips_issue_copperhead_memio", 1);
5315
5316	if (scb->scsi_cmd) {
5317		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5318			  ips_name,
5319			  ha->host_num,
5320			  scb->cdb[0],
5321			  scb->cmd.basic_io.command_id,
5322			  scb->bus, scb->target_id, scb->lun);
5323	} else {
5324		DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5325			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5326	}
5327
5328	TimeOut = 0;
5329
5330	while ((val = readl(ha->mem_ptr + IPS_REG_CCCR)) & IPS_BIT_SEM) {
5331		udelay(1000);
5332
5333		if (++TimeOut >= IPS_SEM_TIMEOUT) {
5334			if (!(val & IPS_BIT_START_STOP))
5335				break;
5336
5337			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5338				   "ips_issue val [0x%x].\n", val);
5339			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5340				   "ips_issue semaphore chk timeout.\n");
5341
5342			return (IPS_FAILURE);
5343		}		/* end if */
5344	}			/* end while */
5345
5346	writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_CCSAR);
5347	writel(IPS_BIT_START_CMD, ha->mem_ptr + IPS_REG_CCCR);
5348
5349	return (IPS_SUCCESS);
5350}
5351
5352/****************************************************************************/
5353/*                                                                          */
5354/* Routine Name: ips_issue_i2o                                              */
5355/*                                                                          */
5356/* Routine Description:                                                     */
5357/*                                                                          */
5358/*   Send a command down to the controller                                  */
5359/*                                                                          */
5360/****************************************************************************/
5361static int
5362ips_issue_i2o(ips_ha_t * ha, ips_scb_t * scb)
5363{
5364
5365	METHOD_TRACE("ips_issue_i2o", 1);
5366
5367	if (scb->scsi_cmd) {
5368		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5369			  ips_name,
5370			  ha->host_num,
5371			  scb->cdb[0],
5372			  scb->cmd.basic_io.command_id,
5373			  scb->bus, scb->target_id, scb->lun);
5374	} else {
5375		DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5376			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5377	}
5378
5379	outl(scb->scb_busaddr, ha->io_addr + IPS_REG_I2O_INMSGQ);
5380
5381	return (IPS_SUCCESS);
5382}
5383
5384/****************************************************************************/
5385/*                                                                          */
5386/* Routine Name: ips_issue_i2o_memio                                        */
5387/*                                                                          */
5388/* Routine Description:                                                     */
5389/*                                                                          */
5390/*   Send a command down to the controller                                  */
5391/*                                                                          */
5392/****************************************************************************/
5393static int
5394ips_issue_i2o_memio(ips_ha_t * ha, ips_scb_t * scb)
5395{
5396
5397	METHOD_TRACE("ips_issue_i2o_memio", 1);
5398
5399	if (scb->scsi_cmd) {
5400		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5401			  ips_name,
5402			  ha->host_num,
5403			  scb->cdb[0],
5404			  scb->cmd.basic_io.command_id,
5405			  scb->bus, scb->target_id, scb->lun);
5406	} else {
5407		DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5408			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5409	}
5410
5411	writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_I2O_INMSGQ);
5412
5413	return (IPS_SUCCESS);
5414}
5415
5416/****************************************************************************/
5417/*                                                                          */
5418/* Routine Name: ips_isintr_copperhead                                      */
5419/*                                                                          */
5420/* Routine Description:                                                     */
5421/*                                                                          */
5422/*   Test to see if an interrupt is for us                                  */
5423/*                                                                          */
5424/****************************************************************************/
5425static int
5426ips_isintr_copperhead(ips_ha_t * ha)
5427{
5428	uint8_t Isr;
5429
5430	METHOD_TRACE("ips_isintr_copperhead", 2);
5431
5432	Isr = inb(ha->io_addr + IPS_REG_HISR);
5433
5434	if (Isr == 0xFF)
5435		/* ?!?! Nothing really there */
5436		return (0);
5437
5438	if (Isr & IPS_BIT_SCE)
5439		return (1);
5440	else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5441		/* status queue overflow or GHI */
5442		/* just clear the interrupt */
5443		outb(Isr, ha->io_addr + IPS_REG_HISR);
5444	}
5445
5446	return (0);
5447}
5448
5449/****************************************************************************/
5450/*                                                                          */
5451/* Routine Name: ips_isintr_copperhead_memio                                */
5452/*                                                                          */
5453/* Routine Description:                                                     */
5454/*                                                                          */
5455/*   Test to see if an interrupt is for us                                  */
5456/*                                                                          */
5457/****************************************************************************/
5458static int
5459ips_isintr_copperhead_memio(ips_ha_t * ha)
5460{
5461	uint8_t Isr;
5462
5463	METHOD_TRACE("ips_isintr_memio", 2);
5464
5465	Isr = readb(ha->mem_ptr + IPS_REG_HISR);
5466
5467	if (Isr == 0xFF)
5468		/* ?!?! Nothing really there */
5469		return (0);
5470
5471	if (Isr & IPS_BIT_SCE)
5472		return (1);
5473	else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5474		/* status queue overflow or GHI */
5475		/* just clear the interrupt */
5476		writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
5477	}
5478
5479	return (0);
5480}
5481
5482/****************************************************************************/
5483/*                                                                          */
5484/* Routine Name: ips_isintr_morpheus                                        */
5485/*                                                                          */
5486/* Routine Description:                                                     */
5487/*                                                                          */
5488/*   Test to see if an interrupt is for us                                  */
5489/*                                                                          */
5490/****************************************************************************/
5491static int
5492ips_isintr_morpheus(ips_ha_t * ha)
5493{
5494	uint32_t Isr;
5495
5496	METHOD_TRACE("ips_isintr_morpheus", 2);
5497
5498	Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5499
5500	if (Isr & IPS_BIT_I2O_OPQI)
5501		return (1);
5502	else
5503		return (0);
5504}
5505
5506/****************************************************************************/
5507/*                                                                          */
5508/* Routine Name: ips_wait                                                   */
5509/*                                                                          */
5510/* Routine Description:                                                     */
5511/*                                                                          */
5512/*   Wait for a command to complete                                         */
5513/*                                                                          */
5514/****************************************************************************/
5515static int
5516ips_wait(ips_ha_t * ha, int time, int intr)
5517{
5518	int ret;
5519	int done;
5520
5521	METHOD_TRACE("ips_wait", 1);
5522
5523	ret = IPS_FAILURE;
5524	done = false;
5525
5526	time *= IPS_ONE_SEC;	/* convert seconds */
5527
5528	while ((time > 0) && (!done)) {
5529		if (intr == IPS_INTR_ON) {
5530			if (!ha->waitflag) {
5531				ret = IPS_SUCCESS;
5532				done = true;
5533				break;
5534			}
5535		} else if (intr == IPS_INTR_IORL) {
5536			if (!ha->waitflag) {
5537				/*
5538				 * controller generated an interrupt to
5539				 * acknowledge completion of the command
5540				 * and ips_intr() has serviced the interrupt.
5541				 */
5542				ret = IPS_SUCCESS;
5543				done = true;
5544				break;
5545			}
5546
5547			/*
5548			 * NOTE: we already have the io_request_lock so
5549			 * even if we get an interrupt it won't get serviced
5550			 * until after we finish.
5551			 */
5552
5553			(*ha->func.intr) (ha);
5554		}
5555
5556		/* This looks like a very evil loop, but it only does this during start-up */
5557		udelay(1000);
5558		time--;
5559	}
5560
5561	return (ret);
5562}
5563
5564/****************************************************************************/
5565/*                                                                          */
5566/* Routine Name: ips_write_driver_status                                    */
5567/*                                                                          */
5568/* Routine Description:                                                     */
5569/*                                                                          */
5570/*   Write OS/Driver version to Page 5 of the nvram on the controller       */
5571/*                                                                          */
5572/****************************************************************************/
5573static int
5574ips_write_driver_status(ips_ha_t * ha, int intr)
5575{
5576	METHOD_TRACE("ips_write_driver_status", 1);
5577
5578	if (!ips_readwrite_page5(ha, false, intr)) {
5579		IPS_PRINTK(KERN_WARNING, ha->pcidev,
5580			   "unable to read NVRAM page 5.\n");
5581
5582		return (0);
5583	}
5584
5585	/* check to make sure the page has a valid */
5586	/* signature */
5587	if (le32_to_cpu(ha->nvram->signature) != IPS_NVRAM_P5_SIG) {
5588		DEBUG_VAR(1,
5589			  "(%s%d) NVRAM page 5 has an invalid signature: %X.",
5590			  ips_name, ha->host_num, ha->nvram->signature);
5591		ha->nvram->signature = IPS_NVRAM_P5_SIG;
5592	}
5593
5594	DEBUG_VAR(2,
5595		  "(%s%d) Ad Type: %d, Ad Slot: %d, BIOS: %c%c%c%c %c%c%c%c.",
5596		  ips_name, ha->host_num, le16_to_cpu(ha->nvram->adapter_type),
5597		  ha->nvram->adapter_slot, ha->nvram->bios_high[0],
5598		  ha->nvram->bios_high[1], ha->nvram->bios_high[2],
5599		  ha->nvram->bios_high[3], ha->nvram->bios_low[0],
5600		  ha->nvram->bios_low[1], ha->nvram->bios_low[2],
5601		  ha->nvram->bios_low[3]);
5602
5603	ips_get_bios_version(ha, intr);
5604
5605	/* change values (as needed) */
5606	ha->nvram->operating_system = IPS_OS_LINUX;
5607	ha->nvram->adapter_type = ha->ad_type;
5608	memcpy((char *) ha->nvram->driver_high, IPS_VERSION_HIGH, 4);
5609	memcpy((char *) ha->nvram->driver_low, IPS_VERSION_LOW, 4);
5610	memcpy((char *) ha->nvram->bios_high, ha->bios_version, 4);
5611	memcpy((char *) ha->nvram->bios_low, ha->bios_version + 4, 4);
5612
5613	ha->nvram->versioning = 0;	/* Indicate the Driver Does Not Support Versioning */
5614
5615	/* now update the page */
5616	if (!ips_readwrite_page5(ha, true, intr)) {
5617		IPS_PRINTK(KERN_WARNING, ha->pcidev,
5618			   "unable to write NVRAM page 5.\n");
5619
5620		return (0);
5621	}
5622
5623	/* IF NVRAM Page 5 is OK, Use it for Slot Number Info Because Linux Doesn't Do Slots */
5624	ha->slot_num = ha->nvram->adapter_slot;
5625
5626	return (1);
5627}
5628
5629/****************************************************************************/
5630/*                                                                          */
5631/* Routine Name: ips_read_adapter_status                                    */
5632/*                                                                          */
5633/* Routine Description:                                                     */
5634/*                                                                          */
5635/*   Do an Inquiry command to the adapter                                   */
5636/*                                                                          */
5637/****************************************************************************/
5638static int
5639ips_read_adapter_status(ips_ha_t * ha, int intr)
5640{
5641	ips_scb_t *scb;
5642	int ret;
5643
5644	METHOD_TRACE("ips_read_adapter_status", 1);
5645
5646	scb = &ha->scbs[ha->max_cmds - 1];
5647
5648	ips_init_scb(ha, scb);
5649
5650	scb->timeout = ips_cmd_timeout;
5651	scb->cdb[0] = IPS_CMD_ENQUIRY;
5652
5653	scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
5654	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5655	scb->cmd.basic_io.sg_count = 0;
5656	scb->cmd.basic_io.lba = 0;
5657	scb->cmd.basic_io.sector_count = 0;
5658	scb->cmd.basic_io.log_drv = 0;
5659	scb->data_len = sizeof (*ha->enq);
5660	scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
5661
5662	/* send command */
5663	if (((ret =
5664	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5665	    || (ret == IPS_SUCCESS_IMM)
5666	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5667		return (0);
5668
5669	return (1);
5670}
5671
5672/****************************************************************************/
5673/*                                                                          */
5674/* Routine Name: ips_read_subsystem_parameters                              */
5675/*                                                                          */
5676/* Routine Description:                                                     */
5677/*                                                                          */
5678/*   Read subsystem parameters from the adapter                             */
5679/*                                                                          */
5680/****************************************************************************/
5681static int
5682ips_read_subsystem_parameters(ips_ha_t * ha, int intr)
5683{
5684	ips_scb_t *scb;
5685	int ret;
5686
5687	METHOD_TRACE("ips_read_subsystem_parameters", 1);
5688
5689	scb = &ha->scbs[ha->max_cmds - 1];
5690
5691	ips_init_scb(ha, scb);
5692
5693	scb->timeout = ips_cmd_timeout;
5694	scb->cdb[0] = IPS_CMD_GET_SUBSYS;
5695
5696	scb->cmd.basic_io.op_code = IPS_CMD_GET_SUBSYS;
5697	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5698	scb->cmd.basic_io.sg_count = 0;
5699	scb->cmd.basic_io.lba = 0;
5700	scb->cmd.basic_io.sector_count = 0;
5701	scb->cmd.basic_io.log_drv = 0;
5702	scb->data_len = sizeof (*ha->subsys);
5703	scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5704
5705	/* send command */
5706	if (((ret =
5707	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5708	    || (ret == IPS_SUCCESS_IMM)
5709	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5710		return (0);
5711
5712	memcpy(ha->subsys, ha->ioctl_data, sizeof(*ha->subsys));
5713	return (1);
5714}
5715
5716/****************************************************************************/
5717/*                                                                          */
5718/* Routine Name: ips_read_config                                            */
5719/*                                                                          */
5720/* Routine Description:                                                     */
5721/*                                                                          */
5722/*   Read the configuration on the adapter                                  */
5723/*                                                                          */
5724/****************************************************************************/
5725static int
5726ips_read_config(ips_ha_t * ha, int intr)
5727{
5728	ips_scb_t *scb;
5729	int i;
5730	int ret;
5731
5732	METHOD_TRACE("ips_read_config", 1);
5733
5734	/* set defaults for initiator IDs */
5735	for (i = 0; i < 4; i++)
5736		ha->conf->init_id[i] = 7;
5737
5738	scb = &ha->scbs[ha->max_cmds - 1];
5739
5740	ips_init_scb(ha, scb);
5741
5742	scb->timeout = ips_cmd_timeout;
5743	scb->cdb[0] = IPS_CMD_READ_CONF;
5744
5745	scb->cmd.basic_io.op_code = IPS_CMD_READ_CONF;
5746	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5747	scb->data_len = sizeof (*ha->conf);
5748	scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5749
5750	/* send command */
5751	if (((ret =
5752	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5753	    || (ret == IPS_SUCCESS_IMM)
5754	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5755
5756		memset(ha->conf, 0, sizeof (IPS_CONF));
5757
5758		/* reset initiator IDs */
5759		for (i = 0; i < 4; i++)
5760			ha->conf->init_id[i] = 7;
5761
5762		/* Allow Completed with Errors, so JCRM can access the Adapter to fix the problems */
5763		if ((scb->basic_status & IPS_GSC_STATUS_MASK) ==
5764		    IPS_CMD_CMPLT_WERROR)
5765			return (1);
5766
5767		return (0);
5768	}
5769
5770	memcpy(ha->conf, ha->ioctl_data, sizeof(*ha->conf));
5771	return (1);
5772}
5773
5774/****************************************************************************/
5775/*                                                                          */
5776/* Routine Name: ips_readwrite_page5                                        */
5777/*                                                                          */
5778/* Routine Description:                                                     */
5779/*                                                                          */
5780/*   Read nvram page 5 from the adapter                                     */
5781/*                                                                          */
5782/****************************************************************************/
5783static int
5784ips_readwrite_page5(ips_ha_t * ha, int write, int intr)
5785{
5786	ips_scb_t *scb;
5787	int ret;
5788
5789	METHOD_TRACE("ips_readwrite_page5", 1);
5790
5791	scb = &ha->scbs[ha->max_cmds - 1];
5792
5793	ips_init_scb(ha, scb);
5794
5795	scb->timeout = ips_cmd_timeout;
5796	scb->cdb[0] = IPS_CMD_RW_NVRAM_PAGE;
5797
5798	scb->cmd.nvram.op_code = IPS_CMD_RW_NVRAM_PAGE;
5799	scb->cmd.nvram.command_id = IPS_COMMAND_ID(ha, scb);
5800	scb->cmd.nvram.page = 5;
5801	scb->cmd.nvram.write = write;
5802	scb->cmd.nvram.reserved = 0;
5803	scb->cmd.nvram.reserved2 = 0;
5804	scb->data_len = sizeof (*ha->nvram);
5805	scb->cmd.nvram.buffer_addr = ha->ioctl_busaddr;
5806	if (write)
5807		memcpy(ha->ioctl_data, ha->nvram, sizeof(*ha->nvram));
5808
5809	/* issue the command */
5810	if (((ret =
5811	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5812	    || (ret == IPS_SUCCESS_IMM)
5813	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5814
5815		memset(ha->nvram, 0, sizeof (IPS_NVRAM_P5));
5816
5817		return (0);
5818	}
5819	if (!write)
5820		memcpy(ha->nvram, ha->ioctl_data, sizeof(*ha->nvram));
5821	return (1);
5822}
5823
5824/****************************************************************************/
5825/*                                                                          */
5826/* Routine Name: ips_clear_adapter                                          */
5827/*                                                                          */
5828/* Routine Description:                                                     */
5829/*                                                                          */
5830/*   Clear the stripe lock tables                                           */
5831/*                                                                          */
5832/****************************************************************************/
5833static int
5834ips_clear_adapter(ips_ha_t * ha, int intr)
5835{
5836	ips_scb_t *scb;
5837	int ret;
5838
5839	METHOD_TRACE("ips_clear_adapter", 1);
5840
5841	scb = &ha->scbs[ha->max_cmds - 1];
5842
5843	ips_init_scb(ha, scb);
5844
5845	scb->timeout = ips_reset_timeout;
5846	scb->cdb[0] = IPS_CMD_CONFIG_SYNC;
5847
5848	scb->cmd.config_sync.op_code = IPS_CMD_CONFIG_SYNC;
5849	scb->cmd.config_sync.command_id = IPS_COMMAND_ID(ha, scb);
5850	scb->cmd.config_sync.channel = 0;
5851	scb->cmd.config_sync.source_target = IPS_POCL;
5852	scb->cmd.config_sync.reserved = 0;
5853	scb->cmd.config_sync.reserved2 = 0;
5854	scb->cmd.config_sync.reserved3 = 0;
5855
5856	/* issue command */
5857	if (((ret =
5858	      ips_send_wait(ha, scb, ips_reset_timeout, intr)) == IPS_FAILURE)
5859	    || (ret == IPS_SUCCESS_IMM)
5860	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5861		return (0);
5862
5863	/* send unlock stripe command */
5864	ips_init_scb(ha, scb);
5865
5866	scb->cdb[0] = IPS_CMD_ERROR_TABLE;
5867	scb->timeout = ips_reset_timeout;
5868
5869	scb->cmd.unlock_stripe.op_code = IPS_CMD_ERROR_TABLE;
5870	scb->cmd.unlock_stripe.command_id = IPS_COMMAND_ID(ha, scb);
5871	scb->cmd.unlock_stripe.log_drv = 0;
5872	scb->cmd.unlock_stripe.control = IPS_CSL;
5873	scb->cmd.unlock_stripe.reserved = 0;
5874	scb->cmd.unlock_stripe.reserved2 = 0;
5875	scb->cmd.unlock_stripe.reserved3 = 0;
5876
5877	/* issue command */
5878	if (((ret =
5879	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5880	    || (ret == IPS_SUCCESS_IMM)
5881	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5882		return (0);
5883
5884	return (1);
5885}
5886
5887/****************************************************************************/
5888/*                                                                          */
5889/* Routine Name: ips_ffdc_reset                                             */
5890/*                                                                          */
5891/* Routine Description:                                                     */
5892/*                                                                          */
5893/*   FFDC: write reset info                                                 */
5894/*                                                                          */
5895/****************************************************************************/
5896static void
5897ips_ffdc_reset(ips_ha_t * ha, int intr)
5898{
5899	ips_scb_t *scb;
5900
5901	METHOD_TRACE("ips_ffdc_reset", 1);
5902
5903	scb = &ha->scbs[ha->max_cmds - 1];
5904
5905	ips_init_scb(ha, scb);
5906
5907	scb->timeout = ips_cmd_timeout;
5908	scb->cdb[0] = IPS_CMD_FFDC;
5909	scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5910	scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5911	scb->cmd.ffdc.reset_count = ha->reset_count;
5912	scb->cmd.ffdc.reset_type = 0x80;
5913
5914	/* convert time to what the card wants */
5915	ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5916
5917	/* issue command */
5918	ips_send_wait(ha, scb, ips_cmd_timeout, intr);
5919}
5920
5921/****************************************************************************/
5922/*                                                                          */
5923/* Routine Name: ips_ffdc_time                                              */
5924/*                                                                          */
5925/* Routine Description:                                                     */
5926/*                                                                          */
5927/*   FFDC: write time info                                                  */
5928/*                                                                          */
5929/****************************************************************************/
5930static void
5931ips_ffdc_time(ips_ha_t * ha)
5932{
5933	ips_scb_t *scb;
5934
5935	METHOD_TRACE("ips_ffdc_time", 1);
5936
5937	DEBUG_VAR(1, "(%s%d) Sending time update.", ips_name, ha->host_num);
5938
5939	scb = &ha->scbs[ha->max_cmds - 1];
5940
5941	ips_init_scb(ha, scb);
5942
5943	scb->timeout = ips_cmd_timeout;
5944	scb->cdb[0] = IPS_CMD_FFDC;
5945	scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
5946	scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
5947	scb->cmd.ffdc.reset_count = 0;
5948	scb->cmd.ffdc.reset_type = 0;
5949
5950	/* convert time to what the card wants */
5951	ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
5952
5953	/* issue command */
5954	ips_send_wait(ha, scb, ips_cmd_timeout, IPS_FFDC);
5955}
5956
5957/****************************************************************************/
5958/*                                                                          */
5959/* Routine Name: ips_fix_ffdc_time                                          */
5960/*                                                                          */
5961/* Routine Description:                                                     */
5962/*   Adjust time_t to what the card wants                                   */
5963/*                                                                          */
5964/****************************************************************************/
5965static void
5966ips_fix_ffdc_time(ips_ha_t * ha, ips_scb_t * scb, time64_t current_time)
5967{
5968	struct tm tm;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
5969
5970	METHOD_TRACE("ips_fix_ffdc_time", 1);
5971
5972	time64_to_tm(current_time, 0, &tm);
 
5973
5974	scb->cmd.ffdc.hour   = tm.tm_hour;
5975	scb->cmd.ffdc.minute = tm.tm_min;
5976	scb->cmd.ffdc.second = tm.tm_sec;
5977	scb->cmd.ffdc.yearH  = (tm.tm_year + 1900) / 100;
5978	scb->cmd.ffdc.yearL  = tm.tm_year % 100;
5979	scb->cmd.ffdc.month  = tm.tm_mon + 1;
5980	scb->cmd.ffdc.day    = tm.tm_mday;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
5981}
5982
5983/****************************************************************************
5984 * BIOS Flash Routines                                                      *
5985 ****************************************************************************/
5986
5987/****************************************************************************/
5988/*                                                                          */
5989/* Routine Name: ips_erase_bios                                             */
5990/*                                                                          */
5991/* Routine Description:                                                     */
5992/*   Erase the BIOS on the adapter                                          */
5993/*                                                                          */
5994/****************************************************************************/
5995static int
5996ips_erase_bios(ips_ha_t * ha)
5997{
5998	int timeout;
5999	uint8_t status = 0;
6000
6001	METHOD_TRACE("ips_erase_bios", 1);
6002
6003	status = 0;
6004
6005	/* Clear the status register */
6006	outl(0, ha->io_addr + IPS_REG_FLAP);
6007	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6008		udelay(25);	/* 25 us */
6009
6010	outb(0x50, ha->io_addr + IPS_REG_FLDP);
6011	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6012		udelay(25);	/* 25 us */
6013
6014	/* Erase Setup */
6015	outb(0x20, ha->io_addr + IPS_REG_FLDP);
6016	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6017		udelay(25);	/* 25 us */
6018
6019	/* Erase Confirm */
6020	outb(0xD0, ha->io_addr + IPS_REG_FLDP);
6021	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6022		udelay(25);	/* 25 us */
6023
6024	/* Erase Status */
6025	outb(0x70, ha->io_addr + IPS_REG_FLDP);
6026	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6027		udelay(25);	/* 25 us */
6028
6029	timeout = 80000;	/* 80 seconds */
6030
6031	while (timeout > 0) {
6032		if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6033			outl(0, ha->io_addr + IPS_REG_FLAP);
6034			udelay(25);	/* 25 us */
6035		}
6036
6037		status = inb(ha->io_addr + IPS_REG_FLDP);
6038
6039		if (status & 0x80)
6040			break;
6041
6042		MDELAY(1);
6043		timeout--;
6044	}
6045
6046	/* check for timeout */
6047	if (timeout <= 0) {
6048		/* timeout */
6049
6050		/* try to suspend the erase */
6051		outb(0xB0, ha->io_addr + IPS_REG_FLDP);
6052		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6053			udelay(25);	/* 25 us */
6054
6055		/* wait for 10 seconds */
6056		timeout = 10000;
6057		while (timeout > 0) {
6058			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6059				outl(0, ha->io_addr + IPS_REG_FLAP);
6060				udelay(25);	/* 25 us */
6061			}
6062
6063			status = inb(ha->io_addr + IPS_REG_FLDP);
6064
6065			if (status & 0xC0)
6066				break;
6067
6068			MDELAY(1);
6069			timeout--;
6070		}
6071
6072		return (1);
6073	}
6074
6075	/* check for valid VPP */
6076	if (status & 0x08)
6077		/* VPP failure */
6078		return (1);
6079
6080	/* check for successful flash */
6081	if (status & 0x30)
6082		/* sequence error */
6083		return (1);
6084
6085	/* Otherwise, we were successful */
6086	/* clear status */
6087	outb(0x50, ha->io_addr + IPS_REG_FLDP);
6088	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6089		udelay(25);	/* 25 us */
6090
6091	/* enable reads */
6092	outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6093	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6094		udelay(25);	/* 25 us */
6095
6096	return (0);
6097}
6098
6099/****************************************************************************/
6100/*                                                                          */
6101/* Routine Name: ips_erase_bios_memio                                       */
6102/*                                                                          */
6103/* Routine Description:                                                     */
6104/*   Erase the BIOS on the adapter                                          */
6105/*                                                                          */
6106/****************************************************************************/
6107static int
6108ips_erase_bios_memio(ips_ha_t * ha)
6109{
6110	int timeout;
6111	uint8_t status;
6112
6113	METHOD_TRACE("ips_erase_bios_memio", 1);
6114
6115	status = 0;
6116
6117	/* Clear the status register */
6118	writel(0, ha->mem_ptr + IPS_REG_FLAP);
6119	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6120		udelay(25);	/* 25 us */
6121
6122	writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6123	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6124		udelay(25);	/* 25 us */
6125
6126	/* Erase Setup */
6127	writeb(0x20, ha->mem_ptr + IPS_REG_FLDP);
6128	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6129		udelay(25);	/* 25 us */
6130
6131	/* Erase Confirm */
6132	writeb(0xD0, ha->mem_ptr + IPS_REG_FLDP);
6133	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6134		udelay(25);	/* 25 us */
6135
6136	/* Erase Status */
6137	writeb(0x70, ha->mem_ptr + IPS_REG_FLDP);
6138	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6139		udelay(25);	/* 25 us */
6140
6141	timeout = 80000;	/* 80 seconds */
6142
6143	while (timeout > 0) {
6144		if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6145			writel(0, ha->mem_ptr + IPS_REG_FLAP);
6146			udelay(25);	/* 25 us */
6147		}
6148
6149		status = readb(ha->mem_ptr + IPS_REG_FLDP);
6150
6151		if (status & 0x80)
6152			break;
6153
6154		MDELAY(1);
6155		timeout--;
6156	}
6157
6158	/* check for timeout */
6159	if (timeout <= 0) {
6160		/* timeout */
6161
6162		/* try to suspend the erase */
6163		writeb(0xB0, ha->mem_ptr + IPS_REG_FLDP);
6164		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6165			udelay(25);	/* 25 us */
6166
6167		/* wait for 10 seconds */
6168		timeout = 10000;
6169		while (timeout > 0) {
6170			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6171				writel(0, ha->mem_ptr + IPS_REG_FLAP);
6172				udelay(25);	/* 25 us */
6173			}
6174
6175			status = readb(ha->mem_ptr + IPS_REG_FLDP);
6176
6177			if (status & 0xC0)
6178				break;
6179
6180			MDELAY(1);
6181			timeout--;
6182		}
6183
6184		return (1);
6185	}
6186
6187	/* check for valid VPP */
6188	if (status & 0x08)
6189		/* VPP failure */
6190		return (1);
6191
6192	/* check for successful flash */
6193	if (status & 0x30)
6194		/* sequence error */
6195		return (1);
6196
6197	/* Otherwise, we were successful */
6198	/* clear status */
6199	writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6200	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6201		udelay(25);	/* 25 us */
6202
6203	/* enable reads */
6204	writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6205	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6206		udelay(25);	/* 25 us */
6207
6208	return (0);
6209}
6210
6211/****************************************************************************/
6212/*                                                                          */
6213/* Routine Name: ips_program_bios                                           */
6214/*                                                                          */
6215/* Routine Description:                                                     */
6216/*   Program the BIOS on the adapter                                        */
6217/*                                                                          */
6218/****************************************************************************/
6219static int
6220ips_program_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6221		 uint32_t offset)
6222{
6223	int i;
6224	int timeout;
6225	uint8_t status = 0;
6226
6227	METHOD_TRACE("ips_program_bios", 1);
6228
6229	status = 0;
6230
6231	for (i = 0; i < buffersize; i++) {
6232		/* write a byte */
6233		outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6234		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6235			udelay(25);	/* 25 us */
6236
6237		outb(0x40, ha->io_addr + IPS_REG_FLDP);
6238		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6239			udelay(25);	/* 25 us */
6240
6241		outb(buffer[i], ha->io_addr + IPS_REG_FLDP);
6242		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6243			udelay(25);	/* 25 us */
6244
6245		/* wait up to one second */
6246		timeout = 1000;
6247		while (timeout > 0) {
6248			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6249				outl(0, ha->io_addr + IPS_REG_FLAP);
6250				udelay(25);	/* 25 us */
6251			}
6252
6253			status = inb(ha->io_addr + IPS_REG_FLDP);
6254
6255			if (status & 0x80)
6256				break;
6257
6258			MDELAY(1);
6259			timeout--;
6260		}
6261
6262		if (timeout == 0) {
6263			/* timeout error */
6264			outl(0, ha->io_addr + IPS_REG_FLAP);
6265			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6266				udelay(25);	/* 25 us */
6267
6268			outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6269			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6270				udelay(25);	/* 25 us */
6271
6272			return (1);
6273		}
6274
6275		/* check the status */
6276		if (status & 0x18) {
6277			/* programming error */
6278			outl(0, ha->io_addr + IPS_REG_FLAP);
6279			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6280				udelay(25);	/* 25 us */
6281
6282			outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6283			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6284				udelay(25);	/* 25 us */
6285
6286			return (1);
6287		}
6288	}			/* end for */
6289
6290	/* Enable reading */
6291	outl(0, ha->io_addr + IPS_REG_FLAP);
6292	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6293		udelay(25);	/* 25 us */
6294
6295	outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6296	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6297		udelay(25);	/* 25 us */
6298
6299	return (0);
6300}
6301
6302/****************************************************************************/
6303/*                                                                          */
6304/* Routine Name: ips_program_bios_memio                                     */
6305/*                                                                          */
6306/* Routine Description:                                                     */
6307/*   Program the BIOS on the adapter                                        */
6308/*                                                                          */
6309/****************************************************************************/
6310static int
6311ips_program_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6312		       uint32_t offset)
6313{
6314	int i;
6315	int timeout;
6316	uint8_t status = 0;
6317
6318	METHOD_TRACE("ips_program_bios_memio", 1);
6319
6320	status = 0;
6321
6322	for (i = 0; i < buffersize; i++) {
6323		/* write a byte */
6324		writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6325		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6326			udelay(25);	/* 25 us */
6327
6328		writeb(0x40, ha->mem_ptr + IPS_REG_FLDP);
6329		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6330			udelay(25);	/* 25 us */
6331
6332		writeb(buffer[i], ha->mem_ptr + IPS_REG_FLDP);
6333		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6334			udelay(25);	/* 25 us */
6335
6336		/* wait up to one second */
6337		timeout = 1000;
6338		while (timeout > 0) {
6339			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6340				writel(0, ha->mem_ptr + IPS_REG_FLAP);
6341				udelay(25);	/* 25 us */
6342			}
6343
6344			status = readb(ha->mem_ptr + IPS_REG_FLDP);
6345
6346			if (status & 0x80)
6347				break;
6348
6349			MDELAY(1);
6350			timeout--;
6351		}
6352
6353		if (timeout == 0) {
6354			/* timeout error */
6355			writel(0, ha->mem_ptr + IPS_REG_FLAP);
6356			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6357				udelay(25);	/* 25 us */
6358
6359			writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6360			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6361				udelay(25);	/* 25 us */
6362
6363			return (1);
6364		}
6365
6366		/* check the status */
6367		if (status & 0x18) {
6368			/* programming error */
6369			writel(0, ha->mem_ptr + IPS_REG_FLAP);
6370			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6371				udelay(25);	/* 25 us */
6372
6373			writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6374			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6375				udelay(25);	/* 25 us */
6376
6377			return (1);
6378		}
6379	}			/* end for */
6380
6381	/* Enable reading */
6382	writel(0, ha->mem_ptr + IPS_REG_FLAP);
6383	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6384		udelay(25);	/* 25 us */
6385
6386	writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6387	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6388		udelay(25);	/* 25 us */
6389
6390	return (0);
6391}
6392
6393/****************************************************************************/
6394/*                                                                          */
6395/* Routine Name: ips_verify_bios                                            */
6396/*                                                                          */
6397/* Routine Description:                                                     */
6398/*   Verify the BIOS on the adapter                                         */
6399/*                                                                          */
6400/****************************************************************************/
6401static int
6402ips_verify_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6403		uint32_t offset)
6404{
6405	uint8_t checksum;
6406	int i;
6407
6408	METHOD_TRACE("ips_verify_bios", 1);
6409
6410	/* test 1st byte */
6411	outl(0, ha->io_addr + IPS_REG_FLAP);
6412	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6413		udelay(25);	/* 25 us */
6414
6415	if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
6416		return (1);
6417
6418	outl(1, ha->io_addr + IPS_REG_FLAP);
6419	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6420		udelay(25);	/* 25 us */
6421	if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
6422		return (1);
6423
6424	checksum = 0xff;
6425	for (i = 2; i < buffersize; i++) {
6426
6427		outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6428		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6429			udelay(25);	/* 25 us */
6430
6431		checksum = (uint8_t) checksum + inb(ha->io_addr + IPS_REG_FLDP);
6432	}
6433
6434	if (checksum != 0)
6435		/* failure */
6436		return (1);
6437	else
6438		/* success */
6439		return (0);
6440}
6441
6442/****************************************************************************/
6443/*                                                                          */
6444/* Routine Name: ips_verify_bios_memio                                      */
6445/*                                                                          */
6446/* Routine Description:                                                     */
6447/*   Verify the BIOS on the adapter                                         */
6448/*                                                                          */
6449/****************************************************************************/
6450static int
6451ips_verify_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6452		      uint32_t offset)
6453{
6454	uint8_t checksum;
6455	int i;
6456
6457	METHOD_TRACE("ips_verify_bios_memio", 1);
6458
6459	/* test 1st byte */
6460	writel(0, ha->mem_ptr + IPS_REG_FLAP);
6461	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6462		udelay(25);	/* 25 us */
6463
6464	if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
6465		return (1);
6466
6467	writel(1, ha->mem_ptr + IPS_REG_FLAP);
6468	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6469		udelay(25);	/* 25 us */
6470	if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
6471		return (1);
6472
6473	checksum = 0xff;
6474	for (i = 2; i < buffersize; i++) {
6475
6476		writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6477		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6478			udelay(25);	/* 25 us */
6479
6480		checksum =
6481		    (uint8_t) checksum + readb(ha->mem_ptr + IPS_REG_FLDP);
6482	}
6483
6484	if (checksum != 0)
6485		/* failure */
6486		return (1);
6487	else
6488		/* success */
6489		return (0);
6490}
6491
6492/****************************************************************************/
6493/*                                                                          */
6494/* Routine Name: ips_abort_init                                             */
6495/*                                                                          */
6496/* Routine Description:                                                     */
6497/*   cleanup routine for a failed adapter initialization                    */
6498/****************************************************************************/
6499static int
6500ips_abort_init(ips_ha_t * ha, int index)
6501{
6502	ha->active = 0;
6503	ips_free(ha);
6504	ips_ha[index] = NULL;
6505	ips_sh[index] = NULL;
6506	return -1;
6507}
6508
6509/****************************************************************************/
6510/*                                                                          */
6511/* Routine Name: ips_shift_controllers                                      */
6512/*                                                                          */
6513/* Routine Description:                                                     */
6514/*   helper function for ordering adapters                                  */
6515/****************************************************************************/
6516static void
6517ips_shift_controllers(int lowindex, int highindex)
6518{
6519	ips_ha_t *ha_sav = ips_ha[highindex];
6520	struct Scsi_Host *sh_sav = ips_sh[highindex];
6521	int i;
6522
6523	for (i = highindex; i > lowindex; i--) {
6524		ips_ha[i] = ips_ha[i - 1];
6525		ips_sh[i] = ips_sh[i - 1];
6526		ips_ha[i]->host_num = i;
6527	}
6528	ha_sav->host_num = lowindex;
6529	ips_ha[lowindex] = ha_sav;
6530	ips_sh[lowindex] = sh_sav;
6531}
6532
6533/****************************************************************************/
6534/*                                                                          */
6535/* Routine Name: ips_order_controllers                                      */
6536/*                                                                          */
6537/* Routine Description:                                                     */
6538/*   place controllers is the "proper" boot order                           */
6539/****************************************************************************/
6540static void
6541ips_order_controllers(void)
6542{
6543	int i, j, tmp, position = 0;
6544	IPS_NVRAM_P5 *nvram;
6545	if (!ips_ha[0])
6546		return;
6547	nvram = ips_ha[0]->nvram;
6548
6549	if (nvram->adapter_order[0]) {
6550		for (i = 1; i <= nvram->adapter_order[0]; i++) {
6551			for (j = position; j < ips_num_controllers; j++) {
6552				switch (ips_ha[j]->ad_type) {
6553				case IPS_ADTYPE_SERVERAID6M:
6554				case IPS_ADTYPE_SERVERAID7M:
6555					if (nvram->adapter_order[i] == 'M') {
6556						ips_shift_controllers(position,
6557								      j);
6558						position++;
6559					}
6560					break;
6561				case IPS_ADTYPE_SERVERAID4L:
6562				case IPS_ADTYPE_SERVERAID4M:
6563				case IPS_ADTYPE_SERVERAID4MX:
6564				case IPS_ADTYPE_SERVERAID4LX:
6565					if (nvram->adapter_order[i] == 'N') {
6566						ips_shift_controllers(position,
6567								      j);
6568						position++;
6569					}
6570					break;
6571				case IPS_ADTYPE_SERVERAID6I:
6572				case IPS_ADTYPE_SERVERAID5I2:
6573				case IPS_ADTYPE_SERVERAID5I1:
6574				case IPS_ADTYPE_SERVERAID7k:
6575					if (nvram->adapter_order[i] == 'S') {
6576						ips_shift_controllers(position,
6577								      j);
6578						position++;
6579					}
6580					break;
6581				case IPS_ADTYPE_SERVERAID:
6582				case IPS_ADTYPE_SERVERAID2:
6583				case IPS_ADTYPE_NAVAJO:
6584				case IPS_ADTYPE_KIOWA:
6585				case IPS_ADTYPE_SERVERAID3L:
6586				case IPS_ADTYPE_SERVERAID3:
6587				case IPS_ADTYPE_SERVERAID4H:
6588					if (nvram->adapter_order[i] == 'A') {
6589						ips_shift_controllers(position,
6590								      j);
6591						position++;
6592					}
6593					break;
6594				default:
6595					break;
6596				}
6597			}
6598		}
6599		/* if adapter_order[0], then ordering is complete */
6600		return;
6601	}
6602	/* old bios, use older ordering */
6603	tmp = 0;
6604	for (i = position; i < ips_num_controllers; i++) {
6605		if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I2 ||
6606		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I1) {
6607			ips_shift_controllers(position, i);
6608			position++;
6609			tmp = 1;
6610		}
6611	}
6612	/* if there were no 5I cards, then don't do any extra ordering */
6613	if (!tmp)
6614		return;
6615	for (i = position; i < ips_num_controllers; i++) {
6616		if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4L ||
6617		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4M ||
6618		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4LX ||
6619		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4MX) {
6620			ips_shift_controllers(position, i);
6621			position++;
6622		}
6623	}
6624
6625	return;
6626}
6627
6628/****************************************************************************/
6629/*                                                                          */
6630/* Routine Name: ips_register_scsi                                          */
6631/*                                                                          */
6632/* Routine Description:                                                     */
6633/*   perform any registration and setup with the scsi layer                 */
6634/****************************************************************************/
6635static int
6636ips_register_scsi(int index)
6637{
6638	struct Scsi_Host *sh;
6639	ips_ha_t *ha, *oldha = ips_ha[index];
6640	sh = scsi_host_alloc(&ips_driver_template, sizeof (ips_ha_t));
6641	if (!sh) {
6642		IPS_PRINTK(KERN_WARNING, oldha->pcidev,
6643			   "Unable to register controller with SCSI subsystem\n");
6644		return -1;
6645	}
6646	ha = IPS_HA(sh);
6647	memcpy(ha, oldha, sizeof (ips_ha_t));
6648	free_irq(oldha->pcidev->irq, oldha);
6649	/* Install the interrupt handler with the new ha */
6650	if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
6651		IPS_PRINTK(KERN_WARNING, ha->pcidev,
6652			   "Unable to install interrupt handler\n");
6653		goto err_out_sh;
6654	}
6655
6656	kfree(oldha);
6657
6658	/* Store away needed values for later use */
6659	sh->unique_id = (ha->io_addr) ? ha->io_addr : ha->mem_addr;
6660	sh->sg_tablesize = sh->hostt->sg_tablesize;
6661	sh->can_queue = sh->hostt->can_queue;
6662	sh->cmd_per_lun = sh->hostt->cmd_per_lun;
 
6663	sh->max_sectors = 128;
6664
6665	sh->max_id = ha->ntargets;
6666	sh->max_lun = ha->nlun;
6667	sh->max_channel = ha->nbus - 1;
6668	sh->can_queue = ha->max_cmds - 1;
6669
6670	if (scsi_add_host(sh, &ha->pcidev->dev))
6671		goto err_out;
6672
6673	ips_sh[index] = sh;
6674	ips_ha[index] = ha;
6675
6676	scsi_scan_host(sh);
6677
6678	return 0;
6679
6680err_out:
6681	free_irq(ha->pcidev->irq, ha);
6682err_out_sh:
6683	scsi_host_put(sh);
6684	return -1;
6685}
6686
6687/*---------------------------------------------------------------------------*/
6688/*   Routine Name: ips_remove_device                                         */
6689/*                                                                           */
6690/*   Routine Description:                                                    */
6691/*     Remove one Adapter ( Hot Plugging )                                   */
6692/*---------------------------------------------------------------------------*/
6693static void
6694ips_remove_device(struct pci_dev *pci_dev)
6695{
6696	struct Scsi_Host *sh = pci_get_drvdata(pci_dev);
6697
6698	pci_set_drvdata(pci_dev, NULL);
6699
6700	ips_release(sh);
6701
6702	pci_release_regions(pci_dev);
6703	pci_disable_device(pci_dev);
6704}
6705
6706/****************************************************************************/
6707/*                                                                          */
6708/* Routine Name: ips_module_init                                            */
6709/*                                                                          */
6710/* Routine Description:                                                     */
6711/*   function called on module load                                         */
6712/****************************************************************************/
6713static int __init
6714ips_module_init(void)
6715{
6716#if !defined(__i386__) && !defined(__ia64__) && !defined(__x86_64__)
6717	printk(KERN_ERR "ips: This driver has only been tested on the x86/ia64/x86_64 platforms\n");
6718	add_taint(TAINT_CPU_OUT_OF_SPEC, LOCKDEP_STILL_OK);
6719#endif
6720
6721	if (pci_register_driver(&ips_pci_driver) < 0)
6722		return -ENODEV;
6723	ips_driver_template.module = THIS_MODULE;
6724	ips_order_controllers();
6725	if (!ips_detect(&ips_driver_template)) {
6726		pci_unregister_driver(&ips_pci_driver);
6727		return -ENODEV;
6728	}
6729	register_reboot_notifier(&ips_notifier);
6730	return 0;
6731}
6732
6733/****************************************************************************/
6734/*                                                                          */
6735/* Routine Name: ips_module_exit                                            */
6736/*                                                                          */
6737/* Routine Description:                                                     */
6738/*   function called on module unload                                       */
6739/****************************************************************************/
6740static void __exit
6741ips_module_exit(void)
6742{
6743	pci_unregister_driver(&ips_pci_driver);
6744	unregister_reboot_notifier(&ips_notifier);
6745}
6746
6747module_init(ips_module_init);
6748module_exit(ips_module_exit);
6749
6750/*---------------------------------------------------------------------------*/
6751/*   Routine Name: ips_insert_device                                         */
6752/*                                                                           */
6753/*   Routine Description:                                                    */
6754/*     Add One Adapter ( Hot Plug )                                          */
6755/*                                                                           */
6756/*   Return Value:                                                           */
6757/*     0 if Successful, else non-zero                                        */
6758/*---------------------------------------------------------------------------*/
6759static int
6760ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent)
6761{
6762	int index = -1;
6763	int rc;
6764
6765	METHOD_TRACE("ips_insert_device", 1);
6766	rc = pci_enable_device(pci_dev);
6767	if (rc)
6768		return rc;
6769
6770	rc = pci_request_regions(pci_dev, "ips");
6771	if (rc)
6772		goto err_out;
6773
6774	rc = ips_init_phase1(pci_dev, &index);
6775	if (rc == SUCCESS)
6776		rc = ips_init_phase2(index);
6777
6778	if (ips_hotplug)
6779		if (ips_register_scsi(index)) {
6780			ips_free(ips_ha[index]);
6781			rc = -1;
6782		}
6783
6784	if (rc == SUCCESS)
6785		ips_num_controllers++;
6786
6787	ips_next_controller = ips_num_controllers;
6788
6789	if (rc < 0) {
6790		rc = -ENODEV;
6791		goto err_out_regions;
6792	}
6793
6794	pci_set_drvdata(pci_dev, ips_sh[index]);
6795	return 0;
6796
6797err_out_regions:
6798	pci_release_regions(pci_dev);
6799err_out:
6800	pci_disable_device(pci_dev);
6801	return rc;
6802}
6803
6804/*---------------------------------------------------------------------------*/
6805/*   Routine Name: ips_init_phase1                                           */
6806/*                                                                           */
6807/*   Routine Description:                                                    */
6808/*     Adapter Initialization                                                */
6809/*                                                                           */
6810/*   Return Value:                                                           */
6811/*     0 if Successful, else non-zero                                        */
6812/*---------------------------------------------------------------------------*/
6813static int
6814ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr)
6815{
6816	ips_ha_t *ha;
6817	uint32_t io_addr;
6818	uint32_t mem_addr;
6819	uint32_t io_len;
6820	uint32_t mem_len;
 
 
6821	int j;
6822	int index;
6823	dma_addr_t dma_address;
6824	char __iomem *ioremap_ptr;
6825	char __iomem *mem_ptr;
6826	uint32_t IsDead;
6827
6828	METHOD_TRACE("ips_init_phase1", 1);
6829	index = IPS_MAX_ADAPTERS;
6830	for (j = 0; j < IPS_MAX_ADAPTERS; j++) {
6831		if (ips_ha[j] == NULL) {
6832			index = j;
6833			break;
6834		}
6835	}
6836
6837	if (index >= IPS_MAX_ADAPTERS)
6838		return -1;
6839
 
 
 
 
6840	/* Init MEM/IO addresses to 0 */
6841	mem_addr = 0;
6842	io_addr = 0;
6843	mem_len = 0;
6844	io_len = 0;
6845
6846	for (j = 0; j < 2; j++) {
6847		if (!pci_resource_start(pci_dev, j))
6848			break;
6849
6850		if (pci_resource_flags(pci_dev, j) & IORESOURCE_IO) {
6851			io_addr = pci_resource_start(pci_dev, j);
6852			io_len = pci_resource_len(pci_dev, j);
6853		} else {
6854			mem_addr = pci_resource_start(pci_dev, j);
6855			mem_len = pci_resource_len(pci_dev, j);
6856		}
6857	}
6858
6859	/* setup memory mapped area (if applicable) */
6860	if (mem_addr) {
6861		uint32_t base;
6862		uint32_t offs;
6863
6864		base = mem_addr & PAGE_MASK;
6865		offs = mem_addr - base;
6866		ioremap_ptr = ioremap(base, PAGE_SIZE);
6867		if (!ioremap_ptr)
6868			return -1;
6869		mem_ptr = ioremap_ptr + offs;
6870	} else {
6871		ioremap_ptr = NULL;
6872		mem_ptr = NULL;
6873	}
6874
6875	/* found a controller */
6876	ha = kzalloc(sizeof (ips_ha_t), GFP_KERNEL);
6877	if (ha == NULL) {
6878		IPS_PRINTK(KERN_WARNING, pci_dev,
6879			   "Unable to allocate temporary ha struct\n");
6880		return -1;
6881	}
6882
6883	ips_sh[index] = NULL;
6884	ips_ha[index] = ha;
6885	ha->active = 1;
6886
6887	/* Store info in HA structure */
6888	ha->io_addr = io_addr;
6889	ha->io_len = io_len;
6890	ha->mem_addr = mem_addr;
6891	ha->mem_len = mem_len;
6892	ha->mem_ptr = mem_ptr;
6893	ha->ioremap_ptr = ioremap_ptr;
6894	ha->host_num = (uint32_t) index;
6895	ha->slot_num = PCI_SLOT(pci_dev->devfn);
6896	ha->pcidev = pci_dev;
6897
6898	/*
6899	 * Set the pci_dev's dma_mask.  Not all adapters support 64bit
6900	 * addressing so don't enable it if the adapter can't support
6901	 * it!  Also, don't use 64bit addressing if dma addresses
6902	 * are guaranteed to be < 4G.
6903	 */
6904	if (sizeof(dma_addr_t) > 4 && IPS_HAS_ENH_SGLIST(ha) &&
6905	    !dma_set_mask(&ha->pcidev->dev, DMA_BIT_MASK(64))) {
6906		(ha)->flags |= IPS_HA_ENH_SG;
6907	} else {
6908		if (dma_set_mask(&ha->pcidev->dev, DMA_BIT_MASK(32)) != 0) {
6909			printk(KERN_WARNING "Unable to set DMA Mask\n");
6910			return ips_abort_init(ha, index);
6911		}
6912	}
6913	if(ips_cd_boot && !ips_FlashData){
6914		ips_FlashData = dma_alloc_coherent(&pci_dev->dev,
6915				PAGE_SIZE << 7, &ips_flashbusaddr, GFP_KERNEL);
6916	}
6917
6918	ha->enq = dma_alloc_coherent(&pci_dev->dev, sizeof (IPS_ENQ),
6919			&ha->enq_busaddr, GFP_KERNEL);
6920	if (!ha->enq) {
6921		IPS_PRINTK(KERN_WARNING, pci_dev,
6922			   "Unable to allocate host inquiry structure\n");
6923		return ips_abort_init(ha, index);
6924	}
6925
6926	ha->adapt = dma_alloc_coherent(&pci_dev->dev,
6927			sizeof (IPS_ADAPTER) + sizeof (IPS_IO_CMD),
6928			&dma_address, GFP_KERNEL);
6929	if (!ha->adapt) {
6930		IPS_PRINTK(KERN_WARNING, pci_dev,
6931			   "Unable to allocate host adapt & dummy structures\n");
6932		return ips_abort_init(ha, index);
6933	}
6934	ha->adapt->hw_status_start = dma_address;
6935	ha->dummy = (void *) (ha->adapt + 1);
6936
6937
6938
6939	ha->logical_drive_info = dma_alloc_coherent(&pci_dev->dev,
6940			sizeof (IPS_LD_INFO), &dma_address, GFP_KERNEL);
6941	if (!ha->logical_drive_info) {
6942		IPS_PRINTK(KERN_WARNING, pci_dev,
6943			   "Unable to allocate logical drive info structure\n");
6944		return ips_abort_init(ha, index);
6945	}
6946	ha->logical_drive_info_dma_addr = dma_address;
6947
6948
6949	ha->conf = kmalloc(sizeof (IPS_CONF), GFP_KERNEL);
6950
6951	if (!ha->conf) {
6952		IPS_PRINTK(KERN_WARNING, pci_dev,
6953			   "Unable to allocate host conf structure\n");
6954		return ips_abort_init(ha, index);
6955	}
6956
6957	ha->nvram = kmalloc(sizeof (IPS_NVRAM_P5), GFP_KERNEL);
6958
6959	if (!ha->nvram) {
6960		IPS_PRINTK(KERN_WARNING, pci_dev,
6961			   "Unable to allocate host NVRAM structure\n");
6962		return ips_abort_init(ha, index);
6963	}
6964
6965	ha->subsys = kmalloc(sizeof (IPS_SUBSYS), GFP_KERNEL);
6966
6967	if (!ha->subsys) {
6968		IPS_PRINTK(KERN_WARNING, pci_dev,
6969			   "Unable to allocate host subsystem structure\n");
6970		return ips_abort_init(ha, index);
6971	}
6972
6973	/* the ioctl buffer is now used during adapter initialization, so its
6974	 * successful allocation is now required */
6975	if (ips_ioctlsize < PAGE_SIZE)
6976		ips_ioctlsize = PAGE_SIZE;
6977
6978	ha->ioctl_data = dma_alloc_coherent(&pci_dev->dev, ips_ioctlsize,
6979			&ha->ioctl_busaddr, GFP_KERNEL);
6980	ha->ioctl_len = ips_ioctlsize;
6981	if (!ha->ioctl_data) {
6982		IPS_PRINTK(KERN_WARNING, pci_dev,
6983			   "Unable to allocate IOCTL data\n");
6984		return ips_abort_init(ha, index);
6985	}
6986
6987	/*
6988	 * Setup Functions
6989	 */
6990	ips_setup_funclist(ha);
6991
6992	if ((IPS_IS_MORPHEUS(ha)) || (IPS_IS_MARCO(ha))) {
6993		/* If Morpheus appears dead, reset it */
6994		IsDead = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
6995		if (IsDead == 0xDEADBEEF) {
6996			ips_reset_morpheus(ha);
6997		}
6998	}
6999
7000	/*
7001	 * Initialize the card if it isn't already
7002	 */
7003
7004	if (!(*ha->func.isinit) (ha)) {
7005		if (!(*ha->func.init) (ha)) {
7006			/*
7007			 * Initialization failed
7008			 */
7009			IPS_PRINTK(KERN_WARNING, pci_dev,
7010				   "Unable to initialize controller\n");
7011			return ips_abort_init(ha, index);
7012		}
7013	}
7014
7015	*indexPtr = index;
7016	return SUCCESS;
7017}
7018
7019/*---------------------------------------------------------------------------*/
7020/*   Routine Name: ips_init_phase2                                           */
7021/*                                                                           */
7022/*   Routine Description:                                                    */
7023/*     Adapter Initialization Phase 2                                        */
7024/*                                                                           */
7025/*   Return Value:                                                           */
7026/*     0 if Successful, else non-zero                                        */
7027/*---------------------------------------------------------------------------*/
7028static int
7029ips_init_phase2(int index)
7030{
7031	ips_ha_t *ha;
7032
7033	ha = ips_ha[index];
7034
7035	METHOD_TRACE("ips_init_phase2", 1);
7036	if (!ha->active) {
7037		ips_ha[index] = NULL;
7038		return -1;
7039	}
7040
7041	/* Install the interrupt handler */
7042	if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
7043		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7044			   "Unable to install interrupt handler\n");
7045		return ips_abort_init(ha, index);
7046	}
7047
7048	/*
7049	 * Allocate a temporary SCB for initialization
7050	 */
7051	ha->max_cmds = 1;
7052	if (!ips_allocatescbs(ha)) {
7053		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7054			   "Unable to allocate a CCB\n");
7055		free_irq(ha->pcidev->irq, ha);
7056		return ips_abort_init(ha, index);
7057	}
7058
7059	if (!ips_hainit(ha)) {
7060		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7061			   "Unable to initialize controller\n");
7062		free_irq(ha->pcidev->irq, ha);
7063		return ips_abort_init(ha, index);
7064	}
7065	/* Free the temporary SCB */
7066	ips_deallocatescbs(ha, 1);
7067
7068	/* allocate CCBs */
7069	if (!ips_allocatescbs(ha)) {
7070		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7071			   "Unable to allocate CCBs\n");
7072		free_irq(ha->pcidev->irq, ha);
7073		return ips_abort_init(ha, index);
7074	}
7075
7076	return SUCCESS;
7077}
7078
7079MODULE_LICENSE("GPL");
7080MODULE_DESCRIPTION("IBM ServeRAID Adapter Driver " IPS_VER_STRING);
7081MODULE_VERSION(IPS_VER_STRING);
v3.1
   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#if !defined(__i386__) && !defined(__ia64__) && !defined(__x86_64__)
 210#warning "This driver has only been tested on the x86/ia64/x86_64 platforms"
 211#endif
 212
 213#define IPS_DMA_DIR(scb) ((!scb->scsi_cmd || ips_is_passthru(scb->scsi_cmd) || \
 214                         DMA_NONE == scb->scsi_cmd->sc_data_direction) ? \
 215                         PCI_DMA_BIDIRECTIONAL : \
 216                         scb->scsi_cmd->sc_data_direction)
 217
 218#ifdef IPS_DEBUG
 219#define METHOD_TRACE(s, i)    if (ips_debug >= (i+10)) printk(KERN_NOTICE s "\n");
 220#define DEBUG(i, s)           if (ips_debug >= i) printk(KERN_NOTICE s "\n");
 221#define DEBUG_VAR(i, s, v...) if (ips_debug >= i) printk(KERN_NOTICE s "\n", v);
 222#else
 223#define METHOD_TRACE(s, i)
 224#define DEBUG(i, s)
 225#define DEBUG_VAR(i, s, v...)
 226#endif
 227
 228/*
 229 * Function prototypes
 230 */
 231static int ips_detect(struct scsi_host_template *);
 232static int ips_release(struct Scsi_Host *);
 233static int ips_eh_abort(struct scsi_cmnd *);
 234static int ips_eh_reset(struct scsi_cmnd *);
 235static int ips_queue(struct Scsi_Host *, struct scsi_cmnd *);
 236static const char *ips_info(struct Scsi_Host *);
 237static irqreturn_t do_ipsintr(int, void *);
 238static int ips_hainit(ips_ha_t *);
 239static int ips_map_status(ips_ha_t *, ips_scb_t *, ips_stat_t *);
 240static int ips_send_wait(ips_ha_t *, ips_scb_t *, int, int);
 241static int ips_send_cmd(ips_ha_t *, ips_scb_t *);
 242static int ips_online(ips_ha_t *, ips_scb_t *);
 243static int ips_inquiry(ips_ha_t *, ips_scb_t *);
 244static int ips_rdcap(ips_ha_t *, ips_scb_t *);
 245static int ips_msense(ips_ha_t *, ips_scb_t *);
 246static int ips_reqsen(ips_ha_t *, ips_scb_t *);
 247static int ips_deallocatescbs(ips_ha_t *, int);
 248static int ips_allocatescbs(ips_ha_t *);
 249static int ips_reset_copperhead(ips_ha_t *);
 250static int ips_reset_copperhead_memio(ips_ha_t *);
 251static int ips_reset_morpheus(ips_ha_t *);
 252static int ips_issue_copperhead(ips_ha_t *, ips_scb_t *);
 253static int ips_issue_copperhead_memio(ips_ha_t *, ips_scb_t *);
 254static int ips_issue_i2o(ips_ha_t *, ips_scb_t *);
 255static int ips_issue_i2o_memio(ips_ha_t *, ips_scb_t *);
 256static int ips_isintr_copperhead(ips_ha_t *);
 257static int ips_isintr_copperhead_memio(ips_ha_t *);
 258static int ips_isintr_morpheus(ips_ha_t *);
 259static int ips_wait(ips_ha_t *, int, int);
 260static int ips_write_driver_status(ips_ha_t *, int);
 261static int ips_read_adapter_status(ips_ha_t *, int);
 262static int ips_read_subsystem_parameters(ips_ha_t *, int);
 263static int ips_read_config(ips_ha_t *, int);
 264static int ips_clear_adapter(ips_ha_t *, int);
 265static int ips_readwrite_page5(ips_ha_t *, int, int);
 266static int ips_init_copperhead(ips_ha_t *);
 267static int ips_init_copperhead_memio(ips_ha_t *);
 268static int ips_init_morpheus(ips_ha_t *);
 269static int ips_isinit_copperhead(ips_ha_t *);
 270static int ips_isinit_copperhead_memio(ips_ha_t *);
 271static int ips_isinit_morpheus(ips_ha_t *);
 272static int ips_erase_bios(ips_ha_t *);
 273static int ips_program_bios(ips_ha_t *, char *, uint32_t, uint32_t);
 274static int ips_verify_bios(ips_ha_t *, char *, uint32_t, uint32_t);
 275static int ips_erase_bios_memio(ips_ha_t *);
 276static int ips_program_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
 277static int ips_verify_bios_memio(ips_ha_t *, char *, uint32_t, uint32_t);
 278static int ips_flash_copperhead(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
 279static int ips_flash_bios(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
 280static int ips_flash_firmware(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
 281static void ips_free_flash_copperhead(ips_ha_t * ha);
 282static void ips_get_bios_version(ips_ha_t *, int);
 283static void ips_identify_controller(ips_ha_t *);
 284static void ips_chkstatus(ips_ha_t *, IPS_STATUS *);
 285static void ips_enable_int_copperhead(ips_ha_t *);
 286static void ips_enable_int_copperhead_memio(ips_ha_t *);
 287static void ips_enable_int_morpheus(ips_ha_t *);
 288static int ips_intr_copperhead(ips_ha_t *);
 289static int ips_intr_morpheus(ips_ha_t *);
 290static void ips_next(ips_ha_t *, int);
 291static void ipsintr_blocking(ips_ha_t *, struct ips_scb *);
 292static void ipsintr_done(ips_ha_t *, struct ips_scb *);
 293static void ips_done(ips_ha_t *, ips_scb_t *);
 294static void ips_free(ips_ha_t *);
 295static void ips_init_scb(ips_ha_t *, ips_scb_t *);
 296static void ips_freescb(ips_ha_t *, ips_scb_t *);
 297static void ips_setup_funclist(ips_ha_t *);
 298static void ips_statinit(ips_ha_t *);
 299static void ips_statinit_memio(ips_ha_t *);
 300static void ips_fix_ffdc_time(ips_ha_t *, ips_scb_t *, time_t);
 301static void ips_ffdc_reset(ips_ha_t *, int);
 302static void ips_ffdc_time(ips_ha_t *);
 303static uint32_t ips_statupd_copperhead(ips_ha_t *);
 304static uint32_t ips_statupd_copperhead_memio(ips_ha_t *);
 305static uint32_t ips_statupd_morpheus(ips_ha_t *);
 306static ips_scb_t *ips_getscb(ips_ha_t *);
 307static void ips_putq_scb_head(ips_scb_queue_t *, ips_scb_t *);
 308static void ips_putq_wait_tail(ips_wait_queue_t *, struct scsi_cmnd *);
 309static void ips_putq_copp_tail(ips_copp_queue_t *,
 310				      ips_copp_wait_item_t *);
 311static ips_scb_t *ips_removeq_scb_head(ips_scb_queue_t *);
 312static ips_scb_t *ips_removeq_scb(ips_scb_queue_t *, ips_scb_t *);
 313static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_t *);
 314static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_t *,
 315					  struct scsi_cmnd *);
 316static ips_copp_wait_item_t *ips_removeq_copp(ips_copp_queue_t *,
 317						     ips_copp_wait_item_t *);
 318static ips_copp_wait_item_t *ips_removeq_copp_head(ips_copp_queue_t *);
 319
 320static int ips_is_passthru(struct scsi_cmnd *);
 321static int ips_make_passthru(ips_ha_t *, struct scsi_cmnd *, ips_scb_t *, int);
 322static int ips_usrcmd(ips_ha_t *, ips_passthru_t *, ips_scb_t *);
 323static void ips_cleanup_passthru(ips_ha_t *, ips_scb_t *);
 324static void ips_scmd_buf_write(struct scsi_cmnd * scmd, void *data,
 325			       unsigned int count);
 326static void ips_scmd_buf_read(struct scsi_cmnd * scmd, void *data,
 327			      unsigned int count);
 328
 329static int ips_proc_info(struct Scsi_Host *, char *, char **, off_t, int, int);
 330static int ips_host_info(ips_ha_t *, char *, off_t, int);
 331static void copy_mem_info(IPS_INFOSTR *, char *, int);
 332static int copy_info(IPS_INFOSTR *, char *, ...);
 333static int ips_abort_init(ips_ha_t * ha, int index);
 334static int ips_init_phase2(int index);
 335
 336static int ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr);
 337static int ips_register_scsi(int index);
 338
 339static int  ips_poll_for_flush_complete(ips_ha_t * ha);
 340static void ips_flush_and_reset(ips_ha_t *ha);
 341
 342/*
 343 * global variables
 344 */
 345static const char ips_name[] = "ips";
 346static struct Scsi_Host *ips_sh[IPS_MAX_ADAPTERS];	/* Array of host controller structures */
 347static ips_ha_t *ips_ha[IPS_MAX_ADAPTERS];	/* Array of HA structures */
 348static unsigned int ips_next_controller;
 349static unsigned int ips_num_controllers;
 350static unsigned int ips_released_controllers;
 351static int ips_hotplug;
 352static int ips_cmd_timeout = 60;
 353static int ips_reset_timeout = 60 * 5;
 354static int ips_force_memio = 1;		/* Always use Memory Mapped I/O    */
 355static int ips_force_i2o = 1;	/* Always use I2O command delivery */
 356static int ips_ioctlsize = IPS_IOCTL_SIZE;	/* Size of the ioctl buffer        */
 357static int ips_cd_boot;			/* Booting from Manager CD         */
 358static char *ips_FlashData = NULL;	/* CD Boot - Flash Data Buffer      */
 359static dma_addr_t ips_flashbusaddr;
 360static long ips_FlashDataInUse;		/* CD Boot - Flash Data In Use Flag */
 361static uint32_t MaxLiteCmds = 32;	/* Max Active Cmds for a Lite Adapter */
 362static struct scsi_host_template ips_driver_template = {
 363	.detect			= ips_detect,
 364	.release		= ips_release,
 365	.info			= ips_info,
 366	.queuecommand		= ips_queue,
 367	.eh_abort_handler	= ips_eh_abort,
 368	.eh_host_reset_handler	= ips_eh_reset,
 369	.proc_name		= "ips",
 370	.proc_info		= ips_proc_info,
 
 371	.slave_configure	= ips_slave_configure,
 372	.bios_param		= ips_biosparam,
 373	.this_id		= -1,
 374	.sg_tablesize		= IPS_MAX_SG,
 375	.cmd_per_lun		= 3,
 376	.use_clustering		= ENABLE_CLUSTERING,
 377};
 378
 379
 380/* This table describes all ServeRAID Adapters */
 381static struct  pci_device_id  ips_pci_table[] = {
 382	{ 0x1014, 0x002E, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
 383	{ 0x1014, 0x01BD, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
 384	{ 0x9005, 0x0250, PCI_ANY_ID, PCI_ANY_ID, 0, 0 },
 385	{ 0, }
 386};
 387
 388MODULE_DEVICE_TABLE( pci, ips_pci_table );
 389
 390static char ips_hot_plug_name[] = "ips";
 391
 392static int __devinit  ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent);
 393static void __devexit ips_remove_device(struct pci_dev *pci_dev);
 394
 395static struct pci_driver ips_pci_driver = {
 396	.name		= ips_hot_plug_name,
 397	.id_table	= ips_pci_table,
 398	.probe		= ips_insert_device,
 399	.remove		= __devexit_p(ips_remove_device),
 400};
 401
 402
 403/*
 404 * Necessary forward function protoypes
 405 */
 406static int ips_halt(struct notifier_block *nb, ulong event, void *buf);
 407
 408#define MAX_ADAPTER_NAME 15
 409
 410static char ips_adapter_name[][30] = {
 411	"ServeRAID",
 412	"ServeRAID II",
 413	"ServeRAID on motherboard",
 414	"ServeRAID on motherboard",
 415	"ServeRAID 3H",
 416	"ServeRAID 3L",
 417	"ServeRAID 4H",
 418	"ServeRAID 4M",
 419	"ServeRAID 4L",
 420	"ServeRAID 4Mx",
 421	"ServeRAID 4Lx",
 422	"ServeRAID 5i",
 423	"ServeRAID 5i",
 424	"ServeRAID 6M",
 425	"ServeRAID 6i",
 426	"ServeRAID 7t",
 427	"ServeRAID 7k",
 428	"ServeRAID 7M"
 429};
 430
 431static struct notifier_block ips_notifier = {
 432	ips_halt, NULL, 0
 433};
 434
 435/*
 436 * Direction table
 437 */
 438static char ips_command_direction[] = {
 439	IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT,
 440	IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK,
 441	IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 442	IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
 443	IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_OUT,
 444	IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_OUT,
 445	IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_IN,
 446	IPS_DATA_UNK, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
 447	IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_UNK,
 448	IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
 449	IPS_DATA_OUT, IPS_DATA_NONE, IPS_DATA_IN, IPS_DATA_NONE, IPS_DATA_NONE,
 450	IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT,
 451	IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_OUT,
 452	IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_IN, IPS_DATA_NONE,
 453	IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_UNK,
 454	IPS_DATA_NONE, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK,
 455	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 456	IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 457	IPS_DATA_IN, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 458	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 459	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 460	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 461	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 462	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 463	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 464	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 465	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 466	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 467	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 468	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 469	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 470	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 471	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 472	IPS_DATA_NONE, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_NONE,
 473	IPS_DATA_OUT, IPS_DATA_UNK, IPS_DATA_NONE, IPS_DATA_UNK, IPS_DATA_OUT,
 474	IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_OUT, IPS_DATA_NONE,
 475	IPS_DATA_UNK, IPS_DATA_IN, IPS_DATA_OUT, IPS_DATA_IN, IPS_DATA_IN,
 476	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 477	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 478	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 479	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 480	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 481	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 482	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 483	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 484	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 485	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_OUT,
 486	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 487	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 488	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK,
 489	IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK, IPS_DATA_UNK
 490};
 491
 492
 493/****************************************************************************/
 494/*                                                                          */
 495/* Routine Name: ips_setup                                                  */
 496/*                                                                          */
 497/* Routine Description:                                                     */
 498/*                                                                          */
 499/*   setup parameters to the driver                                         */
 500/*                                                                          */
 501/****************************************************************************/
 502static int
 503ips_setup(char *ips_str)
 504{
 505
 506	int i;
 507	char *key;
 508	char *value;
 509	IPS_OPTION options[] = {
 510		{"noi2o", &ips_force_i2o, 0},
 511		{"nommap", &ips_force_memio, 0},
 512		{"ioctlsize", &ips_ioctlsize, IPS_IOCTL_SIZE},
 513		{"cdboot", &ips_cd_boot, 0},
 514		{"maxcmds", &MaxLiteCmds, 32},
 515	};
 516
 517	/* Don't use strtok() anymore ( if 2.4 Kernel or beyond ) */
 518	/* Search for value */
 519	while ((key = strsep(&ips_str, ",."))) {
 520		if (!*key)
 521			continue;
 522		value = strchr(key, ':');
 523		if (value)
 524			*value++ = '\0';
 525		/*
 526		 * We now have key/value pairs.
 527		 * Update the variables
 528		 */
 529		for (i = 0; i < ARRAY_SIZE(options); i++) {
 530			if (strnicmp
 531			    (key, options[i].option_name,
 532			     strlen(options[i].option_name)) == 0) {
 533				if (value)
 534					*options[i].option_flag =
 535					    simple_strtoul(value, NULL, 0);
 536				else
 537					*options[i].option_flag =
 538					    options[i].option_value;
 539				break;
 540			}
 541		}
 542	}
 543
 544	return (1);
 545}
 546
 547__setup("ips=", ips_setup);
 548
 549/****************************************************************************/
 550/*                                                                          */
 551/* Routine Name: ips_detect                                                 */
 552/*                                                                          */
 553/* Routine Description:                                                     */
 554/*                                                                          */
 555/*   Detect and initialize the driver                                       */
 556/*                                                                          */
 557/* NOTE: this routine is called under the io_request_lock spinlock          */
 558/*                                                                          */
 559/****************************************************************************/
 560static int
 561ips_detect(struct scsi_host_template * SHT)
 562{
 563	int i;
 564
 565	METHOD_TRACE("ips_detect", 1);
 566
 567#ifdef MODULE
 568	if (ips)
 569		ips_setup(ips);
 570#endif
 571
 572	for (i = 0; i < ips_num_controllers; i++) {
 573		if (ips_register_scsi(i))
 574			ips_free(ips_ha[i]);
 575		ips_released_controllers++;
 576	}
 577	ips_hotplug = 1;
 578	return (ips_num_controllers);
 579}
 580
 581/****************************************************************************/
 582/*   configure the function pointers to use the functions that will work    */
 583/*   with the found version of the adapter                                  */
 584/****************************************************************************/
 585static void
 586ips_setup_funclist(ips_ha_t * ha)
 587{
 588
 589	/*
 590	 * Setup Functions
 591	 */
 592	if (IPS_IS_MORPHEUS(ha) || IPS_IS_MARCO(ha)) {
 593		/* morpheus / marco / sebring */
 594		ha->func.isintr = ips_isintr_morpheus;
 595		ha->func.isinit = ips_isinit_morpheus;
 596		ha->func.issue = ips_issue_i2o_memio;
 597		ha->func.init = ips_init_morpheus;
 598		ha->func.statupd = ips_statupd_morpheus;
 599		ha->func.reset = ips_reset_morpheus;
 600		ha->func.intr = ips_intr_morpheus;
 601		ha->func.enableint = ips_enable_int_morpheus;
 602	} else if (IPS_USE_MEMIO(ha)) {
 603		/* copperhead w/MEMIO */
 604		ha->func.isintr = ips_isintr_copperhead_memio;
 605		ha->func.isinit = ips_isinit_copperhead_memio;
 606		ha->func.init = ips_init_copperhead_memio;
 607		ha->func.statupd = ips_statupd_copperhead_memio;
 608		ha->func.statinit = ips_statinit_memio;
 609		ha->func.reset = ips_reset_copperhead_memio;
 610		ha->func.intr = ips_intr_copperhead;
 611		ha->func.erasebios = ips_erase_bios_memio;
 612		ha->func.programbios = ips_program_bios_memio;
 613		ha->func.verifybios = ips_verify_bios_memio;
 614		ha->func.enableint = ips_enable_int_copperhead_memio;
 615		if (IPS_USE_I2O_DELIVER(ha))
 616			ha->func.issue = ips_issue_i2o_memio;
 617		else
 618			ha->func.issue = ips_issue_copperhead_memio;
 619	} else {
 620		/* copperhead */
 621		ha->func.isintr = ips_isintr_copperhead;
 622		ha->func.isinit = ips_isinit_copperhead;
 623		ha->func.init = ips_init_copperhead;
 624		ha->func.statupd = ips_statupd_copperhead;
 625		ha->func.statinit = ips_statinit;
 626		ha->func.reset = ips_reset_copperhead;
 627		ha->func.intr = ips_intr_copperhead;
 628		ha->func.erasebios = ips_erase_bios;
 629		ha->func.programbios = ips_program_bios;
 630		ha->func.verifybios = ips_verify_bios;
 631		ha->func.enableint = ips_enable_int_copperhead;
 632
 633		if (IPS_USE_I2O_DELIVER(ha))
 634			ha->func.issue = ips_issue_i2o;
 635		else
 636			ha->func.issue = ips_issue_copperhead;
 637	}
 638}
 639
 640/****************************************************************************/
 641/*                                                                          */
 642/* Routine Name: ips_release                                                */
 643/*                                                                          */
 644/* Routine Description:                                                     */
 645/*                                                                          */
 646/*   Remove a driver                                                        */
 647/*                                                                          */
 648/****************************************************************************/
 649static int
 650ips_release(struct Scsi_Host *sh)
 651{
 652	ips_scb_t *scb;
 653	ips_ha_t *ha;
 654	int i;
 655
 656	METHOD_TRACE("ips_release", 1);
 657
 658	scsi_remove_host(sh);
 659
 660	for (i = 0; i < IPS_MAX_ADAPTERS && ips_sh[i] != sh; i++) ;
 661
 662	if (i == IPS_MAX_ADAPTERS) {
 663		printk(KERN_WARNING
 664		       "(%s) release, invalid Scsi_Host pointer.\n", ips_name);
 665		BUG();
 666		return (FALSE);
 667	}
 668
 669	ha = IPS_HA(sh);
 670
 671	if (!ha)
 672		return (FALSE);
 673
 674	/* flush the cache on the controller */
 675	scb = &ha->scbs[ha->max_cmds - 1];
 676
 677	ips_init_scb(ha, scb);
 678
 679	scb->timeout = ips_cmd_timeout;
 680	scb->cdb[0] = IPS_CMD_FLUSH;
 681
 682	scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
 683	scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
 684	scb->cmd.flush_cache.state = IPS_NORM_STATE;
 685	scb->cmd.flush_cache.reserved = 0;
 686	scb->cmd.flush_cache.reserved2 = 0;
 687	scb->cmd.flush_cache.reserved3 = 0;
 688	scb->cmd.flush_cache.reserved4 = 0;
 689
 690	IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
 691
 692	/* send command */
 693	if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) == IPS_FAILURE)
 694		IPS_PRINTK(KERN_WARNING, ha->pcidev, "Incomplete Flush.\n");
 695
 696	IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Complete.\n");
 697
 698	ips_sh[i] = NULL;
 699	ips_ha[i] = NULL;
 700
 701	/* free extra memory */
 702	ips_free(ha);
 703
 704	/* free IRQ */
 705	free_irq(ha->pcidev->irq, ha);
 706
 707	scsi_host_put(sh);
 708
 709	ips_released_controllers++;
 710
 711	return (FALSE);
 712}
 713
 714/****************************************************************************/
 715/*                                                                          */
 716/* Routine Name: ips_halt                                                   */
 717/*                                                                          */
 718/* Routine Description:                                                     */
 719/*                                                                          */
 720/*   Perform cleanup when the system reboots                                */
 721/*                                                                          */
 722/****************************************************************************/
 723static int
 724ips_halt(struct notifier_block *nb, ulong event, void *buf)
 725{
 726	ips_scb_t *scb;
 727	ips_ha_t *ha;
 728	int i;
 729
 730	if ((event != SYS_RESTART) && (event != SYS_HALT) &&
 731	    (event != SYS_POWER_OFF))
 732		return (NOTIFY_DONE);
 733
 734	for (i = 0; i < ips_next_controller; i++) {
 735		ha = (ips_ha_t *) ips_ha[i];
 736
 737		if (!ha)
 738			continue;
 739
 740		if (!ha->active)
 741			continue;
 742
 743		/* flush the cache on the controller */
 744		scb = &ha->scbs[ha->max_cmds - 1];
 745
 746		ips_init_scb(ha, scb);
 747
 748		scb->timeout = ips_cmd_timeout;
 749		scb->cdb[0] = IPS_CMD_FLUSH;
 750
 751		scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
 752		scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
 753		scb->cmd.flush_cache.state = IPS_NORM_STATE;
 754		scb->cmd.flush_cache.reserved = 0;
 755		scb->cmd.flush_cache.reserved2 = 0;
 756		scb->cmd.flush_cache.reserved3 = 0;
 757		scb->cmd.flush_cache.reserved4 = 0;
 758
 759		IPS_PRINTK(KERN_WARNING, ha->pcidev, "Flushing Cache.\n");
 760
 761		/* send command */
 762		if (ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_ON) ==
 763		    IPS_FAILURE)
 764			IPS_PRINTK(KERN_WARNING, ha->pcidev,
 765				   "Incomplete Flush.\n");
 766		else
 767			IPS_PRINTK(KERN_WARNING, ha->pcidev,
 768				   "Flushing Complete.\n");
 769	}
 770
 771	return (NOTIFY_OK);
 772}
 773
 774/****************************************************************************/
 775/*                                                                          */
 776/* Routine Name: ips_eh_abort                                               */
 777/*                                                                          */
 778/* Routine Description:                                                     */
 779/*                                                                          */
 780/*   Abort a command (using the new error code stuff)                       */
 781/* Note: this routine is called under the io_request_lock                   */
 782/****************************************************************************/
 783int ips_eh_abort(struct scsi_cmnd *SC)
 784{
 785	ips_ha_t *ha;
 786	ips_copp_wait_item_t *item;
 787	int ret;
 788	struct Scsi_Host *host;
 789
 790	METHOD_TRACE("ips_eh_abort", 1);
 791
 792	if (!SC)
 793		return (FAILED);
 794
 795	host = SC->device->host;
 796	ha = (ips_ha_t *) SC->device->host->hostdata;
 797
 798	if (!ha)
 799		return (FAILED);
 800
 801	if (!ha->active)
 802		return (FAILED);
 803
 804	spin_lock(host->host_lock);
 805
 806	/* See if the command is on the copp queue */
 807	item = ha->copp_waitlist.head;
 808	while ((item) && (item->scsi_cmd != SC))
 809		item = item->next;
 810
 811	if (item) {
 812		/* Found it */
 813		ips_removeq_copp(&ha->copp_waitlist, item);
 814		ret = (SUCCESS);
 815
 816		/* See if the command is on the wait queue */
 817	} else if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
 818		/* command not sent yet */
 819		ret = (SUCCESS);
 820	} else {
 821		/* command must have already been sent */
 822		ret = (FAILED);
 823	}
 824
 825	spin_unlock(host->host_lock);
 826	return ret;
 827}
 828
 829/****************************************************************************/
 830/*                                                                          */
 831/* Routine Name: ips_eh_reset                                               */
 832/*                                                                          */
 833/* Routine Description:                                                     */
 834/*                                                                          */
 835/*   Reset the controller (with new eh error code)                          */
 836/*                                                                          */
 837/* NOTE: this routine is called under the io_request_lock spinlock          */
 838/*                                                                          */
 839/****************************************************************************/
 840static int __ips_eh_reset(struct scsi_cmnd *SC)
 841{
 842	int ret;
 843	int i;
 844	ips_ha_t *ha;
 845	ips_scb_t *scb;
 846	ips_copp_wait_item_t *item;
 847
 848	METHOD_TRACE("ips_eh_reset", 1);
 849
 850#ifdef NO_IPS_RESET
 851	return (FAILED);
 852#else
 853
 854	if (!SC) {
 855		DEBUG(1, "Reset called with NULL scsi command");
 856
 857		return (FAILED);
 858	}
 859
 860	ha = (ips_ha_t *) SC->device->host->hostdata;
 861
 862	if (!ha) {
 863		DEBUG(1, "Reset called with NULL ha struct");
 864
 865		return (FAILED);
 866	}
 867
 868	if (!ha->active)
 869		return (FAILED);
 870
 871	/* See if the command is on the copp queue */
 872	item = ha->copp_waitlist.head;
 873	while ((item) && (item->scsi_cmd != SC))
 874		item = item->next;
 875
 876	if (item) {
 877		/* Found it */
 878		ips_removeq_copp(&ha->copp_waitlist, item);
 879		return (SUCCESS);
 880	}
 881
 882	/* See if the command is on the wait queue */
 883	if (ips_removeq_wait(&ha->scb_waitlist, SC)) {
 884		/* command not sent yet */
 885		return (SUCCESS);
 886	}
 887
 888	/* An explanation for the casual observer:                              */
 889	/* Part of the function of a RAID controller is automatic error         */
 890	/* detection and recovery.  As such, the only problem that physically   */
 891	/* resetting an adapter will ever fix is when, for some reason,         */
 892	/* the driver is not successfully communicating with the adapter.       */
 893	/* Therefore, we will attempt to flush this adapter.  If that succeeds, */
 894	/* then there's no real purpose in a physical reset. This will complete */
 895	/* much faster and avoids any problems that might be caused by a        */
 896	/* physical reset ( such as having to fail all the outstanding I/O's ). */
 897
 898	if (ha->ioctl_reset == 0) {	/* IF Not an IOCTL Requested Reset */
 899		scb = &ha->scbs[ha->max_cmds - 1];
 900
 901		ips_init_scb(ha, scb);
 902
 903		scb->timeout = ips_cmd_timeout;
 904		scb->cdb[0] = IPS_CMD_FLUSH;
 905
 906		scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
 907		scb->cmd.flush_cache.command_id = IPS_COMMAND_ID(ha, scb);
 908		scb->cmd.flush_cache.state = IPS_NORM_STATE;
 909		scb->cmd.flush_cache.reserved = 0;
 910		scb->cmd.flush_cache.reserved2 = 0;
 911		scb->cmd.flush_cache.reserved3 = 0;
 912		scb->cmd.flush_cache.reserved4 = 0;
 913
 914		/* Attempt the flush command */
 915		ret = ips_send_wait(ha, scb, ips_cmd_timeout, IPS_INTR_IORL);
 916		if (ret == IPS_SUCCESS) {
 917			IPS_PRINTK(KERN_NOTICE, ha->pcidev,
 918				   "Reset Request - Flushed Cache\n");
 919			return (SUCCESS);
 920		}
 921	}
 922
 923	/* Either we can't communicate with the adapter or it's an IOCTL request */
 924	/* from a utility.  A physical reset is needed at this point.            */
 925
 926	ha->ioctl_reset = 0;	/* Reset the IOCTL Requested Reset Flag */
 927
 928	/*
 929	 * command must have already been sent
 930	 * reset the controller
 931	 */
 932	IPS_PRINTK(KERN_NOTICE, ha->pcidev, "Resetting controller.\n");
 933	ret = (*ha->func.reset) (ha);
 934
 935	if (!ret) {
 936		struct scsi_cmnd *scsi_cmd;
 937
 938		IPS_PRINTK(KERN_NOTICE, ha->pcidev,
 939			   "Controller reset failed - controller now offline.\n");
 940
 941		/* Now fail all of the active commands */
 942		DEBUG_VAR(1, "(%s%d) Failing active commands",
 943			  ips_name, ha->host_num);
 944
 945		while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
 946			scb->scsi_cmd->result = DID_ERROR << 16;
 947			scb->scsi_cmd->scsi_done(scb->scsi_cmd);
 948			ips_freescb(ha, scb);
 949		}
 950
 951		/* Now fail all of the pending commands */
 952		DEBUG_VAR(1, "(%s%d) Failing pending commands",
 953			  ips_name, ha->host_num);
 954
 955		while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
 956			scsi_cmd->result = DID_ERROR;
 957			scsi_cmd->scsi_done(scsi_cmd);
 958		}
 959
 960		ha->active = FALSE;
 961		return (FAILED);
 962	}
 963
 964	if (!ips_clear_adapter(ha, IPS_INTR_IORL)) {
 965		struct scsi_cmnd *scsi_cmd;
 966
 967		IPS_PRINTK(KERN_NOTICE, ha->pcidev,
 968			   "Controller reset failed - controller now offline.\n");
 969
 970		/* Now fail all of the active commands */
 971		DEBUG_VAR(1, "(%s%d) Failing active commands",
 972			  ips_name, ha->host_num);
 973
 974		while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
 975			scb->scsi_cmd->result = DID_ERROR << 16;
 976			scb->scsi_cmd->scsi_done(scb->scsi_cmd);
 977			ips_freescb(ha, scb);
 978		}
 979
 980		/* Now fail all of the pending commands */
 981		DEBUG_VAR(1, "(%s%d) Failing pending commands",
 982			  ips_name, ha->host_num);
 983
 984		while ((scsi_cmd = ips_removeq_wait_head(&ha->scb_waitlist))) {
 985			scsi_cmd->result = DID_ERROR << 16;
 986			scsi_cmd->scsi_done(scsi_cmd);
 987		}
 988
 989		ha->active = FALSE;
 990		return (FAILED);
 991	}
 992
 993	/* FFDC */
 994	if (le32_to_cpu(ha->subsys->param[3]) & 0x300000) {
 995		struct timeval tv;
 996
 997		do_gettimeofday(&tv);
 998		ha->last_ffdc = tv.tv_sec;
 999		ha->reset_count++;
1000		ips_ffdc_reset(ha, IPS_INTR_IORL);
1001	}
1002
1003	/* Now fail all of the active commands */
1004	DEBUG_VAR(1, "(%s%d) Failing active commands", ips_name, ha->host_num);
1005
1006	while ((scb = ips_removeq_scb_head(&ha->scb_activelist))) {
1007		scb->scsi_cmd->result = DID_RESET << 16;
1008		scb->scsi_cmd->scsi_done(scb->scsi_cmd);
1009		ips_freescb(ha, scb);
1010	}
1011
1012	/* Reset DCDB active command bits */
1013	for (i = 1; i < ha->nbus; i++)
1014		ha->dcdb_active[i - 1] = 0;
1015
1016	/* Reset the number of active IOCTLs */
1017	ha->num_ioctl = 0;
1018
1019	ips_next(ha, IPS_INTR_IORL);
1020
1021	return (SUCCESS);
1022#endif				/* NO_IPS_RESET */
1023
1024}
1025
1026static int ips_eh_reset(struct scsi_cmnd *SC)
1027{
1028	int rc;
1029
1030	spin_lock_irq(SC->device->host->host_lock);
1031	rc = __ips_eh_reset(SC);
1032	spin_unlock_irq(SC->device->host->host_lock);
1033
1034	return rc;
1035}
1036
1037/****************************************************************************/
1038/*                                                                          */
1039/* Routine Name: ips_queue                                                  */
1040/*                                                                          */
1041/* Routine Description:                                                     */
1042/*                                                                          */
1043/*   Send a command to the controller                                       */
1044/*                                                                          */
1045/* NOTE:                                                                    */
1046/*    Linux obtains io_request_lock before calling this function            */
1047/*                                                                          */
1048/****************************************************************************/
1049static int ips_queue_lck(struct scsi_cmnd *SC, void (*done) (struct scsi_cmnd *))
1050{
 
1051	ips_ha_t *ha;
1052	ips_passthru_t *pt;
1053
1054	METHOD_TRACE("ips_queue", 1);
1055
1056	ha = (ips_ha_t *) SC->device->host->hostdata;
1057
1058	if (!ha)
1059		return (1);
1060
1061	if (!ha->active)
1062		return (DID_ERROR);
1063
1064	if (ips_is_passthru(SC)) {
1065		if (ha->copp_waitlist.count == IPS_MAX_IOCTL_QUEUE) {
1066			SC->result = DID_BUS_BUSY << 16;
1067			done(SC);
1068
1069			return (0);
1070		}
1071	} else if (ha->scb_waitlist.count == IPS_MAX_QUEUE) {
1072		SC->result = DID_BUS_BUSY << 16;
1073		done(SC);
1074
1075		return (0);
1076	}
1077
1078	SC->scsi_done = done;
1079
1080	DEBUG_VAR(2, "(%s%d): ips_queue: cmd 0x%X (%d %d %d)",
1081		  ips_name,
1082		  ha->host_num,
1083		  SC->cmnd[0],
1084		  SC->device->channel, SC->device->id, SC->device->lun);
1085
1086	/* Check for command to initiator IDs */
1087	if ((scmd_channel(SC) > 0)
1088	    && (scmd_id(SC) == ha->ha_id[scmd_channel(SC)])) {
1089		SC->result = DID_NO_CONNECT << 16;
1090		done(SC);
1091
1092		return (0);
1093	}
1094
1095	if (ips_is_passthru(SC)) {
1096
1097		ips_copp_wait_item_t *scratch;
1098
1099		/* A Reset IOCTL is only sent by the boot CD in extreme cases.           */
1100		/* There can never be any system activity ( network or disk ), but check */
1101		/* anyway just as a good practice.                                       */
1102		pt = (ips_passthru_t *) scsi_sglist(SC);
1103		if ((pt->CoppCP.cmd.reset.op_code == IPS_CMD_RESET_CHANNEL) &&
1104		    (pt->CoppCP.cmd.reset.adapter_flag == 1)) {
1105			if (ha->scb_activelist.count != 0) {
1106				SC->result = DID_BUS_BUSY << 16;
1107				done(SC);
1108				return (0);
1109			}
1110			ha->ioctl_reset = 1;	/* This reset request is from an IOCTL */
1111			__ips_eh_reset(SC);
1112			SC->result = DID_OK << 16;
1113			SC->scsi_done(SC);
1114			return (0);
1115		}
1116
1117		/* allocate space for the scribble */
1118		scratch = kmalloc(sizeof (ips_copp_wait_item_t), GFP_ATOMIC);
1119
1120		if (!scratch) {
1121			SC->result = DID_ERROR << 16;
1122			done(SC);
1123
1124			return (0);
1125		}
1126
1127		scratch->scsi_cmd = SC;
1128		scratch->next = NULL;
1129
1130		ips_putq_copp_tail(&ha->copp_waitlist, scratch);
1131	} else {
1132		ips_putq_wait_tail(&ha->scb_waitlist, SC);
1133	}
1134
1135	ips_next(ha, IPS_INTR_IORL);
1136
1137	return (0);
 
 
 
 
 
1138}
1139
1140static DEF_SCSI_QCMD(ips_queue)
1141
1142/****************************************************************************/
1143/*                                                                          */
1144/* Routine Name: ips_biosparam                                              */
1145/*                                                                          */
1146/* Routine Description:                                                     */
1147/*                                                                          */
1148/*   Set bios geometry for the controller                                   */
1149/*                                                                          */
1150/****************************************************************************/
1151static int ips_biosparam(struct scsi_device *sdev, struct block_device *bdev,
1152			 sector_t capacity, int geom[])
1153{
1154	ips_ha_t *ha = (ips_ha_t *) sdev->host->hostdata;
1155	int heads;
1156	int sectors;
1157	int cylinders;
1158
1159	METHOD_TRACE("ips_biosparam", 1);
1160
1161	if (!ha)
1162		/* ?!?! host adater info invalid */
1163		return (0);
1164
1165	if (!ha->active)
1166		return (0);
1167
1168	if (!ips_read_adapter_status(ha, IPS_INTR_ON))
1169		/* ?!?! Enquiry command failed */
1170		return (0);
1171
1172	if ((capacity > 0x400000) && ((ha->enq->ucMiscFlag & 0x8) == 0)) {
1173		heads = IPS_NORM_HEADS;
1174		sectors = IPS_NORM_SECTORS;
1175	} else {
1176		heads = IPS_COMP_HEADS;
1177		sectors = IPS_COMP_SECTORS;
1178	}
1179
1180	cylinders = (unsigned long) capacity / (heads * sectors);
1181
1182	DEBUG_VAR(2, "Geometry: heads: %d, sectors: %d, cylinders: %d",
1183		  heads, sectors, cylinders);
1184
1185	geom[0] = heads;
1186	geom[1] = sectors;
1187	geom[2] = cylinders;
1188
1189	return (0);
1190}
1191
1192/****************************************************************************/
1193/*                                                                          */
1194/* Routine Name: ips_slave_configure                                        */
1195/*                                                                          */
1196/* Routine Description:                                                     */
1197/*                                                                          */
1198/*   Set queue depths on devices once scan is complete                      */
1199/*                                                                          */
1200/****************************************************************************/
1201static int
1202ips_slave_configure(struct scsi_device * SDptr)
1203{
1204	ips_ha_t *ha;
1205	int min;
1206
1207	ha = IPS_HA(SDptr->host);
1208	if (SDptr->tagged_supported && SDptr->type == TYPE_DISK) {
1209		min = ha->max_cmds / 2;
1210		if (ha->enq->ucLogDriveCount <= 2)
1211			min = ha->max_cmds - 1;
1212		scsi_adjust_queue_depth(SDptr, MSG_ORDERED_TAG, min);
1213	}
1214
1215	SDptr->skip_ms_page_8 = 1;
1216	SDptr->skip_ms_page_3f = 1;
1217	return 0;
1218}
1219
1220/****************************************************************************/
1221/*                                                                          */
1222/* Routine Name: do_ipsintr                                                 */
1223/*                                                                          */
1224/* Routine Description:                                                     */
1225/*                                                                          */
1226/*   Wrapper for the interrupt handler                                      */
1227/*                                                                          */
1228/****************************************************************************/
1229static irqreturn_t
1230do_ipsintr(int irq, void *dev_id)
1231{
1232	ips_ha_t *ha;
1233	struct Scsi_Host *host;
1234	int irqstatus;
1235
1236	METHOD_TRACE("do_ipsintr", 2);
1237
1238	ha = (ips_ha_t *) dev_id;
1239	if (!ha)
1240		return IRQ_NONE;
1241	host = ips_sh[ha->host_num];
1242	/* interrupt during initialization */
1243	if (!host) {
1244		(*ha->func.intr) (ha);
1245		return IRQ_HANDLED;
1246	}
1247
1248	spin_lock(host->host_lock);
1249
1250	if (!ha->active) {
1251		spin_unlock(host->host_lock);
1252		return IRQ_HANDLED;
1253	}
1254
1255	irqstatus = (*ha->func.intr) (ha);
1256
1257	spin_unlock(host->host_lock);
1258
1259	/* start the next command */
1260	ips_next(ha, IPS_INTR_ON);
1261	return IRQ_RETVAL(irqstatus);
1262}
1263
1264/****************************************************************************/
1265/*                                                                          */
1266/* Routine Name: ips_intr_copperhead                                        */
1267/*                                                                          */
1268/* Routine Description:                                                     */
1269/*                                                                          */
1270/*   Polling interrupt handler                                              */
1271/*                                                                          */
1272/*   ASSUMES interrupts are disabled                                        */
1273/*                                                                          */
1274/****************************************************************************/
1275int
1276ips_intr_copperhead(ips_ha_t * ha)
1277{
1278	ips_stat_t *sp;
1279	ips_scb_t *scb;
1280	IPS_STATUS cstatus;
1281	int intrstatus;
1282
1283	METHOD_TRACE("ips_intr", 2);
1284
1285	if (!ha)
1286		return 0;
1287
1288	if (!ha->active)
1289		return 0;
1290
1291	intrstatus = (*ha->func.isintr) (ha);
1292
1293	if (!intrstatus) {
1294		/*
1295		 * Unexpected/Shared interrupt
1296		 */
1297
1298		return 0;
1299	}
1300
1301	while (TRUE) {
1302		sp = &ha->sp;
1303
1304		intrstatus = (*ha->func.isintr) (ha);
1305
1306		if (!intrstatus)
1307			break;
1308		else
1309			cstatus.value = (*ha->func.statupd) (ha);
1310
1311		if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1312			/* Spurious Interrupt ? */
1313			continue;
1314		}
1315
1316		ips_chkstatus(ha, &cstatus);
1317		scb = (ips_scb_t *) sp->scb_addr;
1318
1319		/*
1320		 * use the callback function to finish things up
1321		 * NOTE: interrupts are OFF for this
1322		 */
1323		(*scb->callback) (ha, scb);
1324	}			/* end while */
1325	return 1;
1326}
1327
1328/****************************************************************************/
1329/*                                                                          */
1330/* Routine Name: ips_intr_morpheus                                          */
1331/*                                                                          */
1332/* Routine Description:                                                     */
1333/*                                                                          */
1334/*   Polling interrupt handler                                              */
1335/*                                                                          */
1336/*   ASSUMES interrupts are disabled                                        */
1337/*                                                                          */
1338/****************************************************************************/
1339int
1340ips_intr_morpheus(ips_ha_t * ha)
1341{
1342	ips_stat_t *sp;
1343	ips_scb_t *scb;
1344	IPS_STATUS cstatus;
1345	int intrstatus;
1346
1347	METHOD_TRACE("ips_intr_morpheus", 2);
1348
1349	if (!ha)
1350		return 0;
1351
1352	if (!ha->active)
1353		return 0;
1354
1355	intrstatus = (*ha->func.isintr) (ha);
1356
1357	if (!intrstatus) {
1358		/*
1359		 * Unexpected/Shared interrupt
1360		 */
1361
1362		return 0;
1363	}
1364
1365	while (TRUE) {
1366		sp = &ha->sp;
1367
1368		intrstatus = (*ha->func.isintr) (ha);
1369
1370		if (!intrstatus)
1371			break;
1372		else
1373			cstatus.value = (*ha->func.statupd) (ha);
1374
1375		if (cstatus.value == 0xffffffff)
1376			/* No more to process */
1377			break;
1378
1379		if (cstatus.fields.command_id > (IPS_MAX_CMDS - 1)) {
1380			IPS_PRINTK(KERN_WARNING, ha->pcidev,
1381				   "Spurious interrupt; no ccb.\n");
1382
1383			continue;
1384		}
1385
1386		ips_chkstatus(ha, &cstatus);
1387		scb = (ips_scb_t *) sp->scb_addr;
1388
1389		/*
1390		 * use the callback function to finish things up
1391		 * NOTE: interrupts are OFF for this
1392		 */
1393		(*scb->callback) (ha, scb);
1394	}			/* end while */
1395	return 1;
1396}
1397
1398/****************************************************************************/
1399/*                                                                          */
1400/* Routine Name: ips_info                                                   */
1401/*                                                                          */
1402/* Routine Description:                                                     */
1403/*                                                                          */
1404/*   Return info about the driver                                           */
1405/*                                                                          */
1406/****************************************************************************/
1407static const char *
1408ips_info(struct Scsi_Host *SH)
1409{
1410	static char buffer[256];
1411	char *bp;
1412	ips_ha_t *ha;
1413
1414	METHOD_TRACE("ips_info", 1);
1415
1416	ha = IPS_HA(SH);
1417
1418	if (!ha)
1419		return (NULL);
1420
1421	bp = &buffer[0];
1422	memset(bp, 0, sizeof (buffer));
1423
1424	sprintf(bp, "%s%s%s Build %d", "IBM PCI ServeRAID ",
1425		IPS_VERSION_HIGH, IPS_VERSION_LOW, IPS_BUILD_IDENT);
1426
1427	if (ha->ad_type > 0 && ha->ad_type <= MAX_ADAPTER_NAME) {
1428		strcat(bp, " <");
1429		strcat(bp, ips_adapter_name[ha->ad_type - 1]);
1430		strcat(bp, ">");
1431	}
1432
1433	return (bp);
1434}
1435
1436/****************************************************************************/
1437/*                                                                          */
1438/* Routine Name: ips_proc_info                                              */
1439/*                                                                          */
1440/* Routine Description:                                                     */
1441/*                                                                          */
1442/*   The passthru interface for the driver                                  */
1443/*                                                                          */
1444/****************************************************************************/
1445static int
1446ips_proc_info(struct Scsi_Host *host, char *buffer, char **start, off_t offset,
1447	      int length, int func)
1448{
1449	int i;
1450	int ret;
1451	ips_ha_t *ha = NULL;
1452
1453	METHOD_TRACE("ips_proc_info", 1);
1454
1455	/* Find our host structure */
1456	for (i = 0; i < ips_next_controller; i++) {
1457		if (ips_sh[i]) {
1458			if (ips_sh[i] == host) {
1459				ha = (ips_ha_t *) ips_sh[i]->hostdata;
1460				break;
1461			}
1462		}
1463	}
1464
1465	if (!ha)
1466		return (-EINVAL);
1467
1468	if (func) {
1469		/* write */
1470		return (0);
1471	} else {
1472		/* read */
1473		if (start)
1474			*start = buffer;
1475
1476		ret = ips_host_info(ha, buffer, offset, length);
 
 
 
 
1477
1478		return (ret);
 
 
 
 
 
 
 
1479	}
 
 
 
 
 
1480}
1481
1482/*--------------------------------------------------------------------------*/
1483/* Helper Functions                                                         */
1484/*--------------------------------------------------------------------------*/
1485
1486/****************************************************************************/
1487/*                                                                          */
1488/* Routine Name: ips_is_passthru                                            */
1489/*                                                                          */
1490/* Routine Description:                                                     */
1491/*                                                                          */
1492/*   Determine if the specified SCSI command is really a passthru command   */
1493/*                                                                          */
1494/****************************************************************************/
1495static int ips_is_passthru(struct scsi_cmnd *SC)
1496{
1497	unsigned long flags;
1498
1499	METHOD_TRACE("ips_is_passthru", 1);
1500
1501	if (!SC)
1502		return (0);
1503
1504	if ((SC->cmnd[0] == IPS_IOCTL_COMMAND) &&
1505	    (SC->device->channel == 0) &&
1506	    (SC->device->id == IPS_ADAPTER_ID) &&
1507	    (SC->device->lun == 0) && scsi_sglist(SC)) {
1508                struct scatterlist *sg = scsi_sglist(SC);
1509                char  *buffer;
1510
1511                /* kmap_atomic() ensures addressability of the user buffer.*/
1512                /* local_irq_save() protects the KM_IRQ0 address slot.     */
1513                local_irq_save(flags);
1514                buffer = kmap_atomic(sg_page(sg), KM_IRQ0) + sg->offset;
1515                if (buffer && buffer[0] == 'C' && buffer[1] == 'O' &&
1516                    buffer[2] == 'P' && buffer[3] == 'P') {
1517                        kunmap_atomic(buffer - sg->offset, KM_IRQ0);
1518                        local_irq_restore(flags);
1519                        return 1;
1520                }
1521                kunmap_atomic(buffer - sg->offset, KM_IRQ0);
1522                local_irq_restore(flags);
1523	}
1524	return 0;
1525}
1526
1527/****************************************************************************/
1528/*                                                                          */
1529/* Routine Name: ips_alloc_passthru_buffer                                  */
1530/*                                                                          */
1531/* Routine Description:                                                     */
1532/*   allocate a buffer large enough for the ioctl data if the ioctl buffer  */
1533/*   is too small or doesn't exist                                          */
1534/****************************************************************************/
1535static int
1536ips_alloc_passthru_buffer(ips_ha_t * ha, int length)
1537{
1538	void *bigger_buf;
1539	dma_addr_t dma_busaddr;
1540
1541	if (ha->ioctl_data && length <= ha->ioctl_len)
1542		return 0;
1543	/* there is no buffer or it's not big enough, allocate a new one */
1544	bigger_buf = pci_alloc_consistent(ha->pcidev, length, &dma_busaddr);
 
1545	if (bigger_buf) {
1546		/* free the old memory */
1547		pci_free_consistent(ha->pcidev, ha->ioctl_len, ha->ioctl_data,
1548				    ha->ioctl_busaddr);
1549		/* use the new memory */
1550		ha->ioctl_data = (char *) bigger_buf;
1551		ha->ioctl_len = length;
1552		ha->ioctl_busaddr = dma_busaddr;
1553	} else {
1554		return -1;
1555	}
1556	return 0;
1557}
1558
1559/****************************************************************************/
1560/*                                                                          */
1561/* Routine Name: ips_make_passthru                                          */
1562/*                                                                          */
1563/* Routine Description:                                                     */
1564/*                                                                          */
1565/*   Make a passthru command out of the info in the Scsi block              */
1566/*                                                                          */
1567/****************************************************************************/
1568static int
1569ips_make_passthru(ips_ha_t *ha, struct scsi_cmnd *SC, ips_scb_t *scb, int intr)
1570{
1571	ips_passthru_t *pt;
1572	int length = 0;
1573	int i, ret;
1574        struct scatterlist *sg = scsi_sglist(SC);
1575
1576	METHOD_TRACE("ips_make_passthru", 1);
1577
1578        scsi_for_each_sg(SC, sg, scsi_sg_count(SC), i)
1579		length += sg->length;
1580
1581	if (length < sizeof (ips_passthru_t)) {
1582		/* wrong size */
1583		DEBUG_VAR(1, "(%s%d) Passthru structure wrong size",
1584			  ips_name, ha->host_num);
1585		return (IPS_FAILURE);
1586	}
1587	if (ips_alloc_passthru_buffer(ha, length)) {
1588		/* allocation failure!  If ha->ioctl_data exists, use it to return
1589		   some error codes.  Return a failed command to the scsi layer. */
1590		if (ha->ioctl_data) {
1591			pt = (ips_passthru_t *) ha->ioctl_data;
1592			ips_scmd_buf_read(SC, pt, sizeof (ips_passthru_t));
1593			pt->BasicStatus = 0x0B;
1594			pt->ExtendedStatus = 0x00;
1595			ips_scmd_buf_write(SC, pt, sizeof (ips_passthru_t));
1596		}
1597		return IPS_FAILURE;
1598	}
1599	ha->ioctl_datasize = length;
1600
1601	ips_scmd_buf_read(SC, ha->ioctl_data, ha->ioctl_datasize);
1602	pt = (ips_passthru_t *) ha->ioctl_data;
1603
1604	/*
1605	 * Some notes about the passthru interface used
1606	 *
1607	 * IF the scsi op_code == 0x0d then we assume
1608	 * that the data came along with/goes with the
1609	 * packet we received from the sg driver. In this
1610	 * case the CmdBSize field of the pt structure is
1611	 * used for the size of the buffer.
1612	 */
1613
1614	switch (pt->CoppCmd) {
1615	case IPS_NUMCTRLS:
1616		memcpy(ha->ioctl_data + sizeof (ips_passthru_t),
1617		       &ips_num_controllers, sizeof (int));
1618		ips_scmd_buf_write(SC, ha->ioctl_data,
1619				   sizeof (ips_passthru_t) + sizeof (int));
1620		SC->result = DID_OK << 16;
1621
1622		return (IPS_SUCCESS_IMM);
1623
1624	case IPS_COPPUSRCMD:
1625	case IPS_COPPIOCCMD:
1626		if (SC->cmnd[0] == IPS_IOCTL_COMMAND) {
1627			if (length < (sizeof (ips_passthru_t) + pt->CmdBSize)) {
1628				/* wrong size */
1629				DEBUG_VAR(1,
1630					  "(%s%d) Passthru structure wrong size",
1631					  ips_name, ha->host_num);
1632
1633				return (IPS_FAILURE);
1634			}
1635
1636			if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
1637			    pt->CoppCP.cmd.flashfw.op_code ==
1638			    IPS_CMD_RW_BIOSFW) {
1639				ret = ips_flash_copperhead(ha, pt, scb);
1640				ips_scmd_buf_write(SC, ha->ioctl_data,
1641						   sizeof (ips_passthru_t));
1642				return ret;
1643			}
1644			if (ips_usrcmd(ha, pt, scb))
1645				return (IPS_SUCCESS);
1646			else
1647				return (IPS_FAILURE);
1648		}
1649
1650		break;
1651
1652	}			/* end switch */
1653
1654	return (IPS_FAILURE);
1655}
1656
1657/****************************************************************************/
1658/* Routine Name: ips_flash_copperhead                                       */
1659/* Routine Description:                                                     */
1660/*   Flash the BIOS/FW on a Copperhead style controller                     */
1661/****************************************************************************/
1662static int
1663ips_flash_copperhead(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1664{
1665	int datasize;
1666
1667	/* Trombone is the only copperhead that can do packet flash, but only
1668	 * for firmware. No one said it had to make sense. */
1669	if (IPS_IS_TROMBONE(ha) && pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE) {
1670		if (ips_usrcmd(ha, pt, scb))
1671			return IPS_SUCCESS;
1672		else
1673			return IPS_FAILURE;
1674	}
1675	pt->BasicStatus = 0x0B;
1676	pt->ExtendedStatus = 0;
1677	scb->scsi_cmd->result = DID_OK << 16;
1678	/* IF it's OK to Use the "CD BOOT" Flash Buffer, then you can     */
1679	/* avoid allocating a huge buffer per adapter ( which can fail ). */
1680	if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1681	    pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1682		pt->BasicStatus = 0;
1683		return ips_flash_bios(ha, pt, scb);
1684	} else if (pt->CoppCP.cmd.flashfw.packet_num == 0) {
1685		if (ips_FlashData && !test_and_set_bit(0, &ips_FlashDataInUse)){
1686			ha->flash_data = ips_FlashData;
1687			ha->flash_busaddr = ips_flashbusaddr;
1688			ha->flash_len = PAGE_SIZE << 7;
1689			ha->flash_datasize = 0;
1690		} else if (!ha->flash_data) {
1691			datasize = pt->CoppCP.cmd.flashfw.total_packets *
1692			    pt->CoppCP.cmd.flashfw.count;
1693			ha->flash_data = pci_alloc_consistent(ha->pcidev,
1694					                      datasize,
1695							      &ha->flash_busaddr);
1696			if (!ha->flash_data){
1697				printk(KERN_WARNING "Unable to allocate a flash buffer\n");
1698				return IPS_FAILURE;
1699			}
1700			ha->flash_datasize = 0;
1701			ha->flash_len = datasize;
1702		} else
1703			return IPS_FAILURE;
1704	} else {
1705		if (pt->CoppCP.cmd.flashfw.count + ha->flash_datasize >
1706		    ha->flash_len) {
1707			ips_free_flash_copperhead(ha);
1708			IPS_PRINTK(KERN_WARNING, ha->pcidev,
1709				   "failed size sanity check\n");
1710			return IPS_FAILURE;
1711		}
1712	}
1713	if (!ha->flash_data)
1714		return IPS_FAILURE;
1715	pt->BasicStatus = 0;
1716	memcpy(&ha->flash_data[ha->flash_datasize], pt + 1,
1717	       pt->CoppCP.cmd.flashfw.count);
1718	ha->flash_datasize += pt->CoppCP.cmd.flashfw.count;
1719	if (pt->CoppCP.cmd.flashfw.packet_num ==
1720	    pt->CoppCP.cmd.flashfw.total_packets - 1) {
1721		if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE)
1722			return ips_flash_bios(ha, pt, scb);
1723		else if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE)
1724			return ips_flash_firmware(ha, pt, scb);
1725	}
1726	return IPS_SUCCESS_IMM;
1727}
1728
1729/****************************************************************************/
1730/* Routine Name: ips_flash_bios                                             */
1731/* Routine Description:                                                     */
1732/*   flashes the bios of a copperhead adapter                               */
1733/****************************************************************************/
1734static int
1735ips_flash_bios(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1736{
1737
1738	if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1739	    pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_BIOS) {
1740		if ((!ha->func.programbios) || (!ha->func.erasebios) ||
1741		    (!ha->func.verifybios))
1742			goto error;
1743		if ((*ha->func.erasebios) (ha)) {
1744			DEBUG_VAR(1,
1745				  "(%s%d) flash bios failed - unable to erase flash",
1746				  ips_name, ha->host_num);
1747			goto error;
1748		} else
1749		    if ((*ha->func.programbios) (ha,
1750						 ha->flash_data +
1751						 IPS_BIOS_HEADER,
1752						 ha->flash_datasize -
1753						 IPS_BIOS_HEADER, 0)) {
1754			DEBUG_VAR(1,
1755				  "(%s%d) flash bios failed - unable to flash",
1756				  ips_name, ha->host_num);
1757			goto error;
1758		} else
1759		    if ((*ha->func.verifybios) (ha,
1760						ha->flash_data +
1761						IPS_BIOS_HEADER,
1762						ha->flash_datasize -
1763						IPS_BIOS_HEADER, 0)) {
1764			DEBUG_VAR(1,
1765				  "(%s%d) flash bios failed - unable to verify flash",
1766				  ips_name, ha->host_num);
1767			goto error;
1768		}
1769		ips_free_flash_copperhead(ha);
1770		return IPS_SUCCESS_IMM;
1771	} else if (pt->CoppCP.cmd.flashfw.type == IPS_BIOS_IMAGE &&
1772		   pt->CoppCP.cmd.flashfw.direction == IPS_ERASE_BIOS) {
1773		if (!ha->func.erasebios)
1774			goto error;
1775		if ((*ha->func.erasebios) (ha)) {
1776			DEBUG_VAR(1,
1777				  "(%s%d) flash bios failed - unable to erase flash",
1778				  ips_name, ha->host_num);
1779			goto error;
1780		}
1781		return IPS_SUCCESS_IMM;
1782	}
1783      error:
1784	pt->BasicStatus = 0x0B;
1785	pt->ExtendedStatus = 0x00;
1786	ips_free_flash_copperhead(ha);
1787	return IPS_FAILURE;
1788}
1789
1790/****************************************************************************/
1791/*                                                                          */
1792/* Routine Name: ips_fill_scb_sg_single                                     */
1793/*                                                                          */
1794/* Routine Description:                                                     */
1795/*   Fill in a single scb sg_list element from an address                   */
1796/*   return a -1 if a breakup occurred                                      */
1797/****************************************************************************/
1798static int
1799ips_fill_scb_sg_single(ips_ha_t * ha, dma_addr_t busaddr,
1800		       ips_scb_t * scb, int indx, unsigned int e_len)
1801{
1802
1803	int ret_val = 0;
1804
1805	if ((scb->data_len + e_len) > ha->max_xfer) {
1806		e_len = ha->max_xfer - scb->data_len;
1807		scb->breakup = indx;
1808		++scb->sg_break;
1809		ret_val = -1;
1810	} else {
1811		scb->breakup = 0;
1812		scb->sg_break = 0;
1813	}
1814	if (IPS_USE_ENH_SGLIST(ha)) {
1815		scb->sg_list.enh_list[indx].address_lo =
1816		    cpu_to_le32(pci_dma_lo32(busaddr));
1817		scb->sg_list.enh_list[indx].address_hi =
1818		    cpu_to_le32(pci_dma_hi32(busaddr));
1819		scb->sg_list.enh_list[indx].length = cpu_to_le32(e_len);
1820	} else {
1821		scb->sg_list.std_list[indx].address =
1822		    cpu_to_le32(pci_dma_lo32(busaddr));
1823		scb->sg_list.std_list[indx].length = cpu_to_le32(e_len);
1824	}
1825
1826	++scb->sg_len;
1827	scb->data_len += e_len;
1828	return ret_val;
1829}
1830
1831/****************************************************************************/
1832/* Routine Name: ips_flash_firmware                                         */
1833/* Routine Description:                                                     */
1834/*   flashes the firmware of a copperhead adapter                           */
1835/****************************************************************************/
1836static int
1837ips_flash_firmware(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1838{
1839	IPS_SG_LIST sg_list;
1840	uint32_t cmd_busaddr;
1841
1842	if (pt->CoppCP.cmd.flashfw.type == IPS_FW_IMAGE &&
1843	    pt->CoppCP.cmd.flashfw.direction == IPS_WRITE_FW) {
1844		memset(&pt->CoppCP.cmd, 0, sizeof (IPS_HOST_COMMAND));
1845		pt->CoppCP.cmd.flashfw.op_code = IPS_CMD_DOWNLOAD;
1846		pt->CoppCP.cmd.flashfw.count = cpu_to_le32(ha->flash_datasize);
1847	} else {
1848		pt->BasicStatus = 0x0B;
1849		pt->ExtendedStatus = 0x00;
1850		ips_free_flash_copperhead(ha);
1851		return IPS_FAILURE;
1852	}
1853	/* Save the S/G list pointer so it doesn't get clobbered */
1854	sg_list.list = scb->sg_list.list;
1855	cmd_busaddr = scb->scb_busaddr;
1856	/* copy in the CP */
1857	memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1858	/* FIX stuff that might be wrong */
1859	scb->sg_list.list = sg_list.list;
1860	scb->scb_busaddr = cmd_busaddr;
1861	scb->bus = scb->scsi_cmd->device->channel;
1862	scb->target_id = scb->scsi_cmd->device->id;
1863	scb->lun = scb->scsi_cmd->device->lun;
1864	scb->sg_len = 0;
1865	scb->data_len = 0;
1866	scb->flags = 0;
1867	scb->op_code = 0;
1868	scb->callback = ipsintr_done;
1869	scb->timeout = ips_cmd_timeout;
1870
1871	scb->data_len = ha->flash_datasize;
1872	scb->data_busaddr =
1873	    pci_map_single(ha->pcidev, ha->flash_data, scb->data_len,
1874			   IPS_DMA_DIR(scb));
1875	scb->flags |= IPS_SCB_MAP_SINGLE;
1876	scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
1877	scb->cmd.flashfw.buffer_addr = cpu_to_le32(scb->data_busaddr);
1878	if (pt->TimeOut)
1879		scb->timeout = pt->TimeOut;
1880	scb->scsi_cmd->result = DID_OK << 16;
1881	return IPS_SUCCESS;
1882}
1883
1884/****************************************************************************/
1885/* Routine Name: ips_free_flash_copperhead                                  */
1886/* Routine Description:                                                     */
1887/*   release the memory resources used to hold the flash image              */
1888/****************************************************************************/
1889static void
1890ips_free_flash_copperhead(ips_ha_t * ha)
1891{
1892	if (ha->flash_data == ips_FlashData)
1893		test_and_clear_bit(0, &ips_FlashDataInUse);
1894	else if (ha->flash_data)
1895		pci_free_consistent(ha->pcidev, ha->flash_len, ha->flash_data,
1896				    ha->flash_busaddr);
1897	ha->flash_data = NULL;
1898}
1899
1900/****************************************************************************/
1901/*                                                                          */
1902/* Routine Name: ips_usrcmd                                                 */
1903/*                                                                          */
1904/* Routine Description:                                                     */
1905/*                                                                          */
1906/*   Process a user command and make it ready to send                       */
1907/*                                                                          */
1908/****************************************************************************/
1909static int
1910ips_usrcmd(ips_ha_t * ha, ips_passthru_t * pt, ips_scb_t * scb)
1911{
1912	IPS_SG_LIST sg_list;
1913	uint32_t cmd_busaddr;
1914
1915	METHOD_TRACE("ips_usrcmd", 1);
1916
1917	if ((!scb) || (!pt) || (!ha))
1918		return (0);
1919
1920	/* Save the S/G list pointer so it doesn't get clobbered */
1921	sg_list.list = scb->sg_list.list;
1922	cmd_busaddr = scb->scb_busaddr;
1923	/* copy in the CP */
1924	memcpy(&scb->cmd, &pt->CoppCP.cmd, sizeof (IPS_IOCTL_CMD));
1925	memcpy(&scb->dcdb, &pt->CoppCP.dcdb, sizeof (IPS_DCDB_TABLE));
1926
1927	/* FIX stuff that might be wrong */
1928	scb->sg_list.list = sg_list.list;
1929	scb->scb_busaddr = cmd_busaddr;
1930	scb->bus = scb->scsi_cmd->device->channel;
1931	scb->target_id = scb->scsi_cmd->device->id;
1932	scb->lun = scb->scsi_cmd->device->lun;
1933	scb->sg_len = 0;
1934	scb->data_len = 0;
1935	scb->flags = 0;
1936	scb->op_code = 0;
1937	scb->callback = ipsintr_done;
1938	scb->timeout = ips_cmd_timeout;
1939	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
1940
1941	/* we don't support DCDB/READ/WRITE Scatter Gather */
1942	if ((scb->cmd.basic_io.op_code == IPS_CMD_READ_SG) ||
1943	    (scb->cmd.basic_io.op_code == IPS_CMD_WRITE_SG) ||
1944	    (scb->cmd.basic_io.op_code == IPS_CMD_DCDB_SG))
1945		return (0);
1946
1947	if (pt->CmdBSize) {
1948		scb->data_len = pt->CmdBSize;
1949		scb->data_busaddr = ha->ioctl_busaddr + sizeof (ips_passthru_t);
1950	} else {
1951		scb->data_busaddr = 0L;
1952	}
1953
1954	if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1955		scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
1956							 (unsigned long) &scb->
1957							 dcdb -
1958							 (unsigned long) scb);
1959
1960	if (pt->CmdBSize) {
1961		if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)
1962			scb->dcdb.buffer_pointer =
1963			    cpu_to_le32(scb->data_busaddr);
1964		else
1965			scb->cmd.basic_io.sg_addr =
1966			    cpu_to_le32(scb->data_busaddr);
1967	}
1968
1969	/* set timeouts */
1970	if (pt->TimeOut) {
1971		scb->timeout = pt->TimeOut;
1972
1973		if (pt->TimeOut <= 10)
1974			scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;
1975		else if (pt->TimeOut <= 60)
1976			scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;
1977		else
1978			scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;
1979	}
1980
1981	/* assume success */
1982	scb->scsi_cmd->result = DID_OK << 16;
1983
1984	/* success */
1985	return (1);
1986}
1987
1988/****************************************************************************/
1989/*                                                                          */
1990/* Routine Name: ips_cleanup_passthru                                       */
1991/*                                                                          */
1992/* Routine Description:                                                     */
1993/*                                                                          */
1994/*   Cleanup after a passthru command                                       */
1995/*                                                                          */
1996/****************************************************************************/
1997static void
1998ips_cleanup_passthru(ips_ha_t * ha, ips_scb_t * scb)
1999{
2000	ips_passthru_t *pt;
2001
2002	METHOD_TRACE("ips_cleanup_passthru", 1);
2003
2004	if ((!scb) || (!scb->scsi_cmd) || (!scsi_sglist(scb->scsi_cmd))) {
2005		DEBUG_VAR(1, "(%s%d) couldn't cleanup after passthru",
2006			  ips_name, ha->host_num);
2007
2008		return;
2009	}
2010	pt = (ips_passthru_t *) ha->ioctl_data;
2011
2012	/* Copy data back to the user */
2013	if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB)	/* Copy DCDB Back to Caller's Area */
2014		memcpy(&pt->CoppCP.dcdb, &scb->dcdb, sizeof (IPS_DCDB_TABLE));
2015
2016	pt->BasicStatus = scb->basic_status;
2017	pt->ExtendedStatus = scb->extended_status;
2018	pt->AdapterType = ha->ad_type;
2019
2020	if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD &&
2021	    (scb->cmd.flashfw.op_code == IPS_CMD_DOWNLOAD ||
2022	     scb->cmd.flashfw.op_code == IPS_CMD_RW_BIOSFW))
2023		ips_free_flash_copperhead(ha);
2024
2025	ips_scmd_buf_write(scb->scsi_cmd, ha->ioctl_data, ha->ioctl_datasize);
2026}
2027
2028/****************************************************************************/
2029/*                                                                          */
2030/* Routine Name: ips_host_info                                              */
2031/*                                                                          */
2032/* Routine Description:                                                     */
2033/*                                                                          */
2034/*   The passthru interface for the driver                                  */
2035/*                                                                          */
2036/****************************************************************************/
2037static int
2038ips_host_info(ips_ha_t * ha, char *ptr, off_t offset, int len)
2039{
2040	IPS_INFOSTR info;
2041
2042	METHOD_TRACE("ips_host_info", 1);
2043
2044	info.buffer = ptr;
2045	info.length = len;
2046	info.offset = offset;
2047	info.pos = 0;
2048	info.localpos = 0;
2049
2050	copy_info(&info, "\nIBM ServeRAID General Information:\n\n");
2051
2052	if ((le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) &&
2053	    (le16_to_cpu(ha->nvram->adapter_type) != 0))
2054		copy_info(&info, "\tController Type                   : %s\n",
2055			  ips_adapter_name[ha->ad_type - 1]);
2056	else
2057		copy_info(&info,
2058			  "\tController Type                   : Unknown\n");
2059
2060	if (ha->io_addr)
2061		copy_info(&info,
2062			  "\tIO region                         : 0x%lx (%d bytes)\n",
2063			  ha->io_addr, ha->io_len);
2064
2065	if (ha->mem_addr) {
2066		copy_info(&info,
2067			  "\tMemory region                     : 0x%lx (%d bytes)\n",
2068			  ha->mem_addr, ha->mem_len);
2069		copy_info(&info,
2070			  "\tShared memory address             : 0x%lx\n",
2071			  ha->mem_ptr);
2072	}
2073
2074	copy_info(&info, "\tIRQ number                        : %d\n", ha->pcidev->irq);
2075
2076    /* For the Next 3 lines Check for Binary 0 at the end and don't include it if it's there. */
2077    /* That keeps everything happy for "text" operations on the proc file.                    */
2078
2079	if (le32_to_cpu(ha->nvram->signature) == IPS_NVRAM_P5_SIG) {
2080	if (ha->nvram->bios_low[3] == 0) {
2081            copy_info(&info,
2082			          "\tBIOS Version                      : %c%c%c%c%c%c%c\n",
2083			          ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2084			          ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2085			          ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2086			          ha->nvram->bios_low[2]);
2087
2088        } else {
2089		    copy_info(&info,
2090			          "\tBIOS Version                      : %c%c%c%c%c%c%c%c\n",
2091			          ha->nvram->bios_high[0], ha->nvram->bios_high[1],
2092			          ha->nvram->bios_high[2], ha->nvram->bios_high[3],
2093			          ha->nvram->bios_low[0], ha->nvram->bios_low[1],
2094			          ha->nvram->bios_low[2], ha->nvram->bios_low[3]);
2095        }
2096
2097    }
2098
2099    if (ha->enq->CodeBlkVersion[7] == 0) {
2100        copy_info(&info,
2101		          "\tFirmware Version                  : %c%c%c%c%c%c%c\n",
2102		          ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2103		          ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2104		          ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2105		          ha->enq->CodeBlkVersion[6]);
2106    } else {
2107        copy_info(&info,
2108		          "\tFirmware Version                  : %c%c%c%c%c%c%c%c\n",
2109		          ha->enq->CodeBlkVersion[0], ha->enq->CodeBlkVersion[1],
2110		          ha->enq->CodeBlkVersion[2], ha->enq->CodeBlkVersion[3],
2111		          ha->enq->CodeBlkVersion[4], ha->enq->CodeBlkVersion[5],
2112		          ha->enq->CodeBlkVersion[6], ha->enq->CodeBlkVersion[7]);
2113    }
2114
2115    if (ha->enq->BootBlkVersion[7] == 0) {
2116        copy_info(&info,
2117		          "\tBoot Block Version                : %c%c%c%c%c%c%c\n",
2118		          ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2119		          ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2120		          ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2121		          ha->enq->BootBlkVersion[6]);
2122    } else {
2123        copy_info(&info,
2124		          "\tBoot Block Version                : %c%c%c%c%c%c%c%c\n",
2125		          ha->enq->BootBlkVersion[0], ha->enq->BootBlkVersion[1],
2126		          ha->enq->BootBlkVersion[2], ha->enq->BootBlkVersion[3],
2127		          ha->enq->BootBlkVersion[4], ha->enq->BootBlkVersion[5],
2128		          ha->enq->BootBlkVersion[6], ha->enq->BootBlkVersion[7]);
2129    }
2130
2131	copy_info(&info, "\tDriver Version                    : %s%s\n",
2132		  IPS_VERSION_HIGH, IPS_VERSION_LOW);
2133
2134	copy_info(&info, "\tDriver Build                      : %d\n",
2135		  IPS_BUILD_IDENT);
2136
2137	copy_info(&info, "\tMax Physical Devices              : %d\n",
2138		  ha->enq->ucMaxPhysicalDevices);
2139	copy_info(&info, "\tMax Active Commands               : %d\n",
2140		  ha->max_cmds);
2141	copy_info(&info, "\tCurrent Queued Commands           : %d\n",
2142		  ha->scb_waitlist.count);
2143	copy_info(&info, "\tCurrent Active Commands           : %d\n",
2144		  ha->scb_activelist.count - ha->num_ioctl);
2145	copy_info(&info, "\tCurrent Queued PT Commands        : %d\n",
2146		  ha->copp_waitlist.count);
2147	copy_info(&info, "\tCurrent Active PT Commands        : %d\n",
2148		  ha->num_ioctl);
2149
2150	copy_info(&info, "\n");
2151
2152	return (info.localpos);
2153}
2154
2155/****************************************************************************/
2156/*                                                                          */
2157/* Routine Name: copy_mem_info                                              */
2158/*                                                                          */
2159/* Routine Description:                                                     */
2160/*                                                                          */
2161/*   Copy data into an IPS_INFOSTR structure                                */
2162/*                                                                          */
2163/****************************************************************************/
2164static void
2165copy_mem_info(IPS_INFOSTR * info, char *data, int len)
2166{
2167	METHOD_TRACE("copy_mem_info", 1);
2168
2169	if (info->pos + len < info->offset) {
2170		info->pos += len;
2171		return;
2172	}
2173
2174	if (info->pos < info->offset) {
2175		data += (info->offset - info->pos);
2176		len -= (info->offset - info->pos);
2177		info->pos += (info->offset - info->pos);
2178	}
2179
2180	if (info->localpos + len > info->length)
2181		len = info->length - info->localpos;
2182
2183	if (len > 0) {
2184		memcpy(info->buffer + info->localpos, data, len);
2185		info->pos += len;
2186		info->localpos += len;
2187	}
2188}
2189
2190/****************************************************************************/
2191/*                                                                          */
2192/* Routine Name: copy_info                                                  */
2193/*                                                                          */
2194/* Routine Description:                                                     */
2195/*                                                                          */
2196/*   printf style wrapper for an info structure                             */
2197/*                                                                          */
2198/****************************************************************************/
2199static int
2200copy_info(IPS_INFOSTR * info, char *fmt, ...)
2201{
2202	va_list args;
2203	char buf[128];
2204	int len;
2205
2206	METHOD_TRACE("copy_info", 1);
2207
2208	va_start(args, fmt);
2209	len = vsprintf(buf, fmt, args);
2210	va_end(args);
2211
2212	copy_mem_info(info, buf, len);
2213
2214	return (len);
2215}
2216
2217/****************************************************************************/
2218/*                                                                          */
2219/* Routine Name: ips_identify_controller                                    */
2220/*                                                                          */
2221/* Routine Description:                                                     */
2222/*                                                                          */
2223/*   Identify this controller                                               */
2224/*                                                                          */
2225/****************************************************************************/
2226static void
2227ips_identify_controller(ips_ha_t * ha)
2228{
2229	METHOD_TRACE("ips_identify_controller", 1);
2230
2231	switch (ha->pcidev->device) {
2232	case IPS_DEVICEID_COPPERHEAD:
2233		if (ha->pcidev->revision <= IPS_REVID_SERVERAID) {
2234			ha->ad_type = IPS_ADTYPE_SERVERAID;
2235		} else if (ha->pcidev->revision == IPS_REVID_SERVERAID2) {
2236			ha->ad_type = IPS_ADTYPE_SERVERAID2;
2237		} else if (ha->pcidev->revision == IPS_REVID_NAVAJO) {
2238			ha->ad_type = IPS_ADTYPE_NAVAJO;
2239		} else if ((ha->pcidev->revision == IPS_REVID_SERVERAID2)
2240			   && (ha->slot_num == 0)) {
2241			ha->ad_type = IPS_ADTYPE_KIOWA;
2242		} else if ((ha->pcidev->revision >= IPS_REVID_CLARINETP1) &&
2243			   (ha->pcidev->revision <= IPS_REVID_CLARINETP3)) {
2244			if (ha->enq->ucMaxPhysicalDevices == 15)
2245				ha->ad_type = IPS_ADTYPE_SERVERAID3L;
2246			else
2247				ha->ad_type = IPS_ADTYPE_SERVERAID3;
2248		} else if ((ha->pcidev->revision >= IPS_REVID_TROMBONE32) &&
2249			   (ha->pcidev->revision <= IPS_REVID_TROMBONE64)) {
2250			ha->ad_type = IPS_ADTYPE_SERVERAID4H;
2251		}
2252		break;
2253
2254	case IPS_DEVICEID_MORPHEUS:
2255		switch (ha->pcidev->subsystem_device) {
2256		case IPS_SUBDEVICEID_4L:
2257			ha->ad_type = IPS_ADTYPE_SERVERAID4L;
2258			break;
2259
2260		case IPS_SUBDEVICEID_4M:
2261			ha->ad_type = IPS_ADTYPE_SERVERAID4M;
2262			break;
2263
2264		case IPS_SUBDEVICEID_4MX:
2265			ha->ad_type = IPS_ADTYPE_SERVERAID4MX;
2266			break;
2267
2268		case IPS_SUBDEVICEID_4LX:
2269			ha->ad_type = IPS_ADTYPE_SERVERAID4LX;
2270			break;
2271
2272		case IPS_SUBDEVICEID_5I2:
2273			ha->ad_type = IPS_ADTYPE_SERVERAID5I2;
2274			break;
2275
2276		case IPS_SUBDEVICEID_5I1:
2277			ha->ad_type = IPS_ADTYPE_SERVERAID5I1;
2278			break;
2279		}
2280
2281		break;
2282
2283	case IPS_DEVICEID_MARCO:
2284		switch (ha->pcidev->subsystem_device) {
2285		case IPS_SUBDEVICEID_6M:
2286			ha->ad_type = IPS_ADTYPE_SERVERAID6M;
2287			break;
2288		case IPS_SUBDEVICEID_6I:
2289			ha->ad_type = IPS_ADTYPE_SERVERAID6I;
2290			break;
2291		case IPS_SUBDEVICEID_7k:
2292			ha->ad_type = IPS_ADTYPE_SERVERAID7k;
2293			break;
2294		case IPS_SUBDEVICEID_7M:
2295			ha->ad_type = IPS_ADTYPE_SERVERAID7M;
2296			break;
2297		}
2298		break;
2299	}
2300}
2301
2302/****************************************************************************/
2303/*                                                                          */
2304/* Routine Name: ips_get_bios_version                                       */
2305/*                                                                          */
2306/* Routine Description:                                                     */
2307/*                                                                          */
2308/*   Get the BIOS revision number                                           */
2309/*                                                                          */
2310/****************************************************************************/
2311static void
2312ips_get_bios_version(ips_ha_t * ha, int intr)
2313{
2314	ips_scb_t *scb;
2315	int ret;
2316	uint8_t major;
2317	uint8_t minor;
2318	uint8_t subminor;
2319	uint8_t *buffer;
2320	char hexDigits[] =
2321	    { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C',
2322     'D', 'E', 'F' };
2323
2324	METHOD_TRACE("ips_get_bios_version", 1);
2325
2326	major = 0;
2327	minor = 0;
2328
2329	strncpy(ha->bios_version, "       ?", 8);
2330
2331	if (ha->pcidev->device == IPS_DEVICEID_COPPERHEAD) {
2332		if (IPS_USE_MEMIO(ha)) {
2333			/* Memory Mapped I/O */
2334
2335			/* test 1st byte */
2336			writel(0, ha->mem_ptr + IPS_REG_FLAP);
2337			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2338				udelay(25);	/* 25 us */
2339
2340			if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
2341				return;
2342
2343			writel(1, ha->mem_ptr + IPS_REG_FLAP);
2344			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2345				udelay(25);	/* 25 us */
2346
2347			if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
2348				return;
2349
2350			/* Get Major version */
2351			writel(0x1FF, ha->mem_ptr + IPS_REG_FLAP);
2352			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2353				udelay(25);	/* 25 us */
2354
2355			major = readb(ha->mem_ptr + IPS_REG_FLDP);
2356
2357			/* Get Minor version */
2358			writel(0x1FE, ha->mem_ptr + IPS_REG_FLAP);
2359			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2360				udelay(25);	/* 25 us */
2361			minor = readb(ha->mem_ptr + IPS_REG_FLDP);
2362
2363			/* Get SubMinor version */
2364			writel(0x1FD, ha->mem_ptr + IPS_REG_FLAP);
2365			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2366				udelay(25);	/* 25 us */
2367			subminor = readb(ha->mem_ptr + IPS_REG_FLDP);
2368
2369		} else {
2370			/* Programmed I/O */
2371
2372			/* test 1st byte */
2373			outl(0, ha->io_addr + IPS_REG_FLAP);
2374			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2375				udelay(25);	/* 25 us */
2376
2377			if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
2378				return;
2379
2380			outl(1, ha->io_addr + IPS_REG_FLAP);
2381			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2382				udelay(25);	/* 25 us */
2383
2384			if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
2385				return;
2386
2387			/* Get Major version */
2388			outl(0x1FF, ha->io_addr + IPS_REG_FLAP);
2389			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2390				udelay(25);	/* 25 us */
2391
2392			major = inb(ha->io_addr + IPS_REG_FLDP);
2393
2394			/* Get Minor version */
2395			outl(0x1FE, ha->io_addr + IPS_REG_FLAP);
2396			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2397				udelay(25);	/* 25 us */
2398
2399			minor = inb(ha->io_addr + IPS_REG_FLDP);
2400
2401			/* Get SubMinor version */
2402			outl(0x1FD, ha->io_addr + IPS_REG_FLAP);
2403			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
2404				udelay(25);	/* 25 us */
2405
2406			subminor = inb(ha->io_addr + IPS_REG_FLDP);
2407
2408		}
2409	} else {
2410		/* Morpheus Family - Send Command to the card */
2411
2412		buffer = ha->ioctl_data;
2413
2414		memset(buffer, 0, 0x1000);
2415
2416		scb = &ha->scbs[ha->max_cmds - 1];
2417
2418		ips_init_scb(ha, scb);
2419
2420		scb->timeout = ips_cmd_timeout;
2421		scb->cdb[0] = IPS_CMD_RW_BIOSFW;
2422
2423		scb->cmd.flashfw.op_code = IPS_CMD_RW_BIOSFW;
2424		scb->cmd.flashfw.command_id = IPS_COMMAND_ID(ha, scb);
2425		scb->cmd.flashfw.type = 1;
2426		scb->cmd.flashfw.direction = 0;
2427		scb->cmd.flashfw.count = cpu_to_le32(0x800);
2428		scb->cmd.flashfw.total_packets = 1;
2429		scb->cmd.flashfw.packet_num = 0;
2430		scb->data_len = 0x1000;
2431		scb->cmd.flashfw.buffer_addr = ha->ioctl_busaddr;
2432
2433		/* issue the command */
2434		if (((ret =
2435		      ips_send_wait(ha, scb, ips_cmd_timeout,
2436				    intr)) == IPS_FAILURE)
2437		    || (ret == IPS_SUCCESS_IMM)
2438		    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
2439			/* Error occurred */
2440
2441			return;
2442		}
2443
2444		if ((buffer[0xC0] == 0x55) && (buffer[0xC1] == 0xAA)) {
2445			major = buffer[0x1ff + 0xC0];	/* Offset 0x1ff after the header (0xc0) */
2446			minor = buffer[0x1fe + 0xC0];	/* Offset 0x1fe after the header (0xc0) */
2447			subminor = buffer[0x1fd + 0xC0];	/* Offset 0x1fd after the header (0xc0) */
2448		} else {
2449			return;
2450		}
2451	}
2452
2453	ha->bios_version[0] = hexDigits[(major & 0xF0) >> 4];
2454	ha->bios_version[1] = '.';
2455	ha->bios_version[2] = hexDigits[major & 0x0F];
2456	ha->bios_version[3] = hexDigits[subminor];
2457	ha->bios_version[4] = '.';
2458	ha->bios_version[5] = hexDigits[(minor & 0xF0) >> 4];
2459	ha->bios_version[6] = hexDigits[minor & 0x0F];
2460	ha->bios_version[7] = 0;
2461}
2462
2463/****************************************************************************/
2464/*                                                                          */
2465/* Routine Name: ips_hainit                                                 */
2466/*                                                                          */
2467/* Routine Description:                                                     */
2468/*                                                                          */
2469/*   Initialize the controller                                              */
2470/*                                                                          */
2471/* NOTE: Assumes to be called from with a lock                              */
2472/*                                                                          */
2473/****************************************************************************/
2474static int
2475ips_hainit(ips_ha_t * ha)
2476{
2477	int i;
2478	struct timeval tv;
2479
2480	METHOD_TRACE("ips_hainit", 1);
2481
2482	if (!ha)
2483		return (0);
2484
2485	if (ha->func.statinit)
2486		(*ha->func.statinit) (ha);
2487
2488	if (ha->func.enableint)
2489		(*ha->func.enableint) (ha);
2490
2491	/* Send FFDC */
2492	ha->reset_count = 1;
2493	do_gettimeofday(&tv);
2494	ha->last_ffdc = tv.tv_sec;
2495	ips_ffdc_reset(ha, IPS_INTR_IORL);
2496
2497	if (!ips_read_config(ha, IPS_INTR_IORL)) {
2498		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2499			   "unable to read config from controller.\n");
2500
2501		return (0);
2502	}
2503	/* end if */
2504	if (!ips_read_adapter_status(ha, IPS_INTR_IORL)) {
2505		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2506			   "unable to read controller status.\n");
2507
2508		return (0);
2509	}
2510
2511	/* Identify this controller */
2512	ips_identify_controller(ha);
2513
2514	if (!ips_read_subsystem_parameters(ha, IPS_INTR_IORL)) {
2515		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2516			   "unable to read subsystem parameters.\n");
2517
2518		return (0);
2519	}
2520
2521	/* write nvram user page 5 */
2522	if (!ips_write_driver_status(ha, IPS_INTR_IORL)) {
2523		IPS_PRINTK(KERN_WARNING, ha->pcidev,
2524			   "unable to write driver info to controller.\n");
2525
2526		return (0);
2527	}
2528
2529	/* If there are Logical Drives and a Reset Occurred, then an EraseStripeLock is Needed */
2530	if ((ha->conf->ucLogDriveCount > 0) && (ha->requires_esl == 1))
2531		ips_clear_adapter(ha, IPS_INTR_IORL);
2532
2533	/* set limits on SID, LUN, BUS */
2534	ha->ntargets = IPS_MAX_TARGETS + 1;
2535	ha->nlun = 1;
2536	ha->nbus = (ha->enq->ucMaxPhysicalDevices / IPS_MAX_TARGETS) + 1;
2537
2538	switch (ha->conf->logical_drive[0].ucStripeSize) {
2539	case 4:
2540		ha->max_xfer = 0x10000;
2541		break;
2542
2543	case 5:
2544		ha->max_xfer = 0x20000;
2545		break;
2546
2547	case 6:
2548		ha->max_xfer = 0x40000;
2549		break;
2550
2551	case 7:
2552	default:
2553		ha->max_xfer = 0x80000;
2554		break;
2555	}
2556
2557	/* setup max concurrent commands */
2558	if (le32_to_cpu(ha->subsys->param[4]) & 0x1) {
2559		/* Use the new method */
2560		ha->max_cmds = ha->enq->ucConcurrentCmdCount;
2561	} else {
2562		/* use the old method */
2563		switch (ha->conf->logical_drive[0].ucStripeSize) {
2564		case 4:
2565			ha->max_cmds = 32;
2566			break;
2567
2568		case 5:
2569			ha->max_cmds = 16;
2570			break;
2571
2572		case 6:
2573			ha->max_cmds = 8;
2574			break;
2575
2576		case 7:
2577		default:
2578			ha->max_cmds = 4;
2579			break;
2580		}
2581	}
2582
2583	/* Limit the Active Commands on a Lite Adapter */
2584	if ((ha->ad_type == IPS_ADTYPE_SERVERAID3L) ||
2585	    (ha->ad_type == IPS_ADTYPE_SERVERAID4L) ||
2586	    (ha->ad_type == IPS_ADTYPE_SERVERAID4LX)) {
2587		if ((ha->max_cmds > MaxLiteCmds) && (MaxLiteCmds))
2588			ha->max_cmds = MaxLiteCmds;
2589	}
2590
2591	/* set controller IDs */
2592	ha->ha_id[0] = IPS_ADAPTER_ID;
2593	for (i = 1; i < ha->nbus; i++) {
2594		ha->ha_id[i] = ha->conf->init_id[i - 1] & 0x1f;
2595		ha->dcdb_active[i - 1] = 0;
2596	}
2597
2598	return (1);
2599}
2600
2601/****************************************************************************/
2602/*                                                                          */
2603/* Routine Name: ips_next                                                   */
2604/*                                                                          */
2605/* Routine Description:                                                     */
2606/*                                                                          */
2607/*   Take the next command off the queue and send it to the controller      */
2608/*                                                                          */
2609/****************************************************************************/
2610static void
2611ips_next(ips_ha_t * ha, int intr)
2612{
2613	ips_scb_t *scb;
2614	struct scsi_cmnd *SC;
2615	struct scsi_cmnd *p;
2616	struct scsi_cmnd *q;
2617	ips_copp_wait_item_t *item;
2618	int ret;
2619	struct Scsi_Host *host;
2620	METHOD_TRACE("ips_next", 1);
2621
2622	if (!ha)
2623		return;
2624	host = ips_sh[ha->host_num];
2625	/*
2626	 * Block access to the queue function so
2627	 * this command won't time out
2628	 */
2629	if (intr == IPS_INTR_ON)
2630		spin_lock(host->host_lock);
2631
2632	if ((ha->subsys->param[3] & 0x300000)
2633	    && (ha->scb_activelist.count == 0)) {
2634		struct timeval tv;
2635
2636		do_gettimeofday(&tv);
2637
2638		if (tv.tv_sec - ha->last_ffdc > IPS_SECS_8HOURS) {
2639			ha->last_ffdc = tv.tv_sec;
2640			ips_ffdc_time(ha);
2641		}
2642	}
2643
2644	/*
2645	 * Send passthru commands
2646	 * These have priority over normal I/O
2647	 * but shouldn't affect performance too much
2648	 * since we limit the number that can be active
2649	 * on the card at any one time
2650	 */
2651	while ((ha->num_ioctl < IPS_MAX_IOCTL) &&
2652	       (ha->copp_waitlist.head) && (scb = ips_getscb(ha))) {
2653
2654		item = ips_removeq_copp_head(&ha->copp_waitlist);
2655		ha->num_ioctl++;
2656		if (intr == IPS_INTR_ON)
2657			spin_unlock(host->host_lock);
2658		scb->scsi_cmd = item->scsi_cmd;
2659		kfree(item);
2660
2661		ret = ips_make_passthru(ha, scb->scsi_cmd, scb, intr);
2662
2663		if (intr == IPS_INTR_ON)
2664			spin_lock(host->host_lock);
2665		switch (ret) {
2666		case IPS_FAILURE:
2667			if (scb->scsi_cmd) {
2668				scb->scsi_cmd->result = DID_ERROR << 16;
2669				scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2670			}
2671
2672			ips_freescb(ha, scb);
2673			break;
2674		case IPS_SUCCESS_IMM:
2675			if (scb->scsi_cmd) {
2676				scb->scsi_cmd->result = DID_OK << 16;
2677				scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2678			}
2679
2680			ips_freescb(ha, scb);
2681			break;
2682		default:
2683			break;
2684		}		/* end case */
2685
2686		if (ret != IPS_SUCCESS) {
2687			ha->num_ioctl--;
2688			continue;
2689		}
2690
2691		ret = ips_send_cmd(ha, scb);
2692
2693		if (ret == IPS_SUCCESS)
2694			ips_putq_scb_head(&ha->scb_activelist, scb);
2695		else
2696			ha->num_ioctl--;
2697
2698		switch (ret) {
2699		case IPS_FAILURE:
2700			if (scb->scsi_cmd) {
2701				scb->scsi_cmd->result = DID_ERROR << 16;
2702			}
2703
2704			ips_freescb(ha, scb);
2705			break;
2706		case IPS_SUCCESS_IMM:
2707			ips_freescb(ha, scb);
2708			break;
2709		default:
2710			break;
2711		}		/* end case */
2712
2713	}
2714
2715	/*
2716	 * Send "Normal" I/O commands
2717	 */
2718
2719	p = ha->scb_waitlist.head;
2720	while ((p) && (scb = ips_getscb(ha))) {
2721		if ((scmd_channel(p) > 0)
2722		    && (ha->
2723			dcdb_active[scmd_channel(p) -
2724				    1] & (1 << scmd_id(p)))) {
2725			ips_freescb(ha, scb);
2726			p = (struct scsi_cmnd *) p->host_scribble;
2727			continue;
2728		}
2729
2730		q = p;
2731		SC = ips_removeq_wait(&ha->scb_waitlist, q);
2732
2733		if (intr == IPS_INTR_ON)
2734			spin_unlock(host->host_lock);	/* Unlock HA after command is taken off queue */
2735
2736		SC->result = DID_OK;
2737		SC->host_scribble = NULL;
2738
2739		scb->target_id = SC->device->id;
2740		scb->lun = SC->device->lun;
2741		scb->bus = SC->device->channel;
2742		scb->scsi_cmd = SC;
2743		scb->breakup = 0;
2744		scb->data_len = 0;
2745		scb->callback = ipsintr_done;
2746		scb->timeout = ips_cmd_timeout;
2747		memset(&scb->cmd, 0, 16);
2748
2749		/* copy in the CDB */
2750		memcpy(scb->cdb, SC->cmnd, SC->cmd_len);
2751
2752                scb->sg_count = scsi_dma_map(SC);
2753                BUG_ON(scb->sg_count < 0);
2754		if (scb->sg_count) {
2755			struct scatterlist *sg;
2756			int i;
2757
2758			scb->flags |= IPS_SCB_MAP_SG;
2759
2760                        scsi_for_each_sg(SC, sg, scb->sg_count, i) {
2761				if (ips_fill_scb_sg_single
2762				    (ha, sg_dma_address(sg), scb, i,
2763				     sg_dma_len(sg)) < 0)
2764					break;
2765			}
2766			scb->dcdb.transfer_length = scb->data_len;
2767		} else {
2768                        scb->data_busaddr = 0L;
2769                        scb->sg_len = 0;
2770                        scb->data_len = 0;
2771                        scb->dcdb.transfer_length = 0;
2772		}
2773
2774		scb->dcdb.cmd_attribute =
2775		    ips_command_direction[scb->scsi_cmd->cmnd[0]];
2776
2777		/* Allow a WRITE BUFFER Command to Have no Data */
2778		/* This is Used by Tape Flash Utilites          */
2779		if ((scb->scsi_cmd->cmnd[0] == WRITE_BUFFER) &&
2780				(scb->data_len == 0))
2781			scb->dcdb.cmd_attribute = 0;
2782
2783		if (!(scb->dcdb.cmd_attribute & 0x3))
2784			scb->dcdb.transfer_length = 0;
2785
2786		if (scb->data_len >= IPS_MAX_XFER) {
2787			scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
2788			scb->dcdb.transfer_length = 0;
2789		}
2790		if (intr == IPS_INTR_ON)
2791			spin_lock(host->host_lock);
2792
2793		ret = ips_send_cmd(ha, scb);
2794
2795		switch (ret) {
2796		case IPS_SUCCESS:
2797			ips_putq_scb_head(&ha->scb_activelist, scb);
2798			break;
2799		case IPS_FAILURE:
2800			if (scb->scsi_cmd) {
2801				scb->scsi_cmd->result = DID_ERROR << 16;
2802				scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2803			}
2804
2805			if (scb->bus)
2806				ha->dcdb_active[scb->bus - 1] &=
2807				    ~(1 << scb->target_id);
2808
2809			ips_freescb(ha, scb);
2810			break;
2811		case IPS_SUCCESS_IMM:
2812			if (scb->scsi_cmd)
2813				scb->scsi_cmd->scsi_done(scb->scsi_cmd);
2814
2815			if (scb->bus)
2816				ha->dcdb_active[scb->bus - 1] &=
2817				    ~(1 << scb->target_id);
2818
2819			ips_freescb(ha, scb);
2820			break;
2821		default:
2822			break;
2823		}		/* end case */
2824
2825		p = (struct scsi_cmnd *) p->host_scribble;
2826
2827	}			/* end while */
2828
2829	if (intr == IPS_INTR_ON)
2830		spin_unlock(host->host_lock);
2831}
2832
2833/****************************************************************************/
2834/*                                                                          */
2835/* Routine Name: ips_putq_scb_head                                          */
2836/*                                                                          */
2837/* Routine Description:                                                     */
2838/*                                                                          */
2839/*   Add an item to the head of the queue                                   */
2840/*                                                                          */
2841/* ASSUMED to be called from within the HA lock                             */
2842/*                                                                          */
2843/****************************************************************************/
2844static void
2845ips_putq_scb_head(ips_scb_queue_t * queue, ips_scb_t * item)
2846{
2847	METHOD_TRACE("ips_putq_scb_head", 1);
2848
2849	if (!item)
2850		return;
2851
2852	item->q_next = queue->head;
2853	queue->head = item;
2854
2855	if (!queue->tail)
2856		queue->tail = item;
2857
2858	queue->count++;
2859}
2860
2861/****************************************************************************/
2862/*                                                                          */
2863/* Routine Name: ips_removeq_scb_head                                       */
2864/*                                                                          */
2865/* Routine Description:                                                     */
2866/*                                                                          */
2867/*   Remove the head of the queue                                           */
2868/*                                                                          */
2869/* ASSUMED to be called from within the HA lock                             */
2870/*                                                                          */
2871/****************************************************************************/
2872static ips_scb_t *
2873ips_removeq_scb_head(ips_scb_queue_t * queue)
2874{
2875	ips_scb_t *item;
2876
2877	METHOD_TRACE("ips_removeq_scb_head", 1);
2878
2879	item = queue->head;
2880
2881	if (!item) {
2882		return (NULL);
2883	}
2884
2885	queue->head = item->q_next;
2886	item->q_next = NULL;
2887
2888	if (queue->tail == item)
2889		queue->tail = NULL;
2890
2891	queue->count--;
2892
2893	return (item);
2894}
2895
2896/****************************************************************************/
2897/*                                                                          */
2898/* Routine Name: ips_removeq_scb                                            */
2899/*                                                                          */
2900/* Routine Description:                                                     */
2901/*                                                                          */
2902/*   Remove an item from a queue                                            */
2903/*                                                                          */
2904/* ASSUMED to be called from within the HA lock                             */
2905/*                                                                          */
2906/****************************************************************************/
2907static ips_scb_t *
2908ips_removeq_scb(ips_scb_queue_t * queue, ips_scb_t * item)
2909{
2910	ips_scb_t *p;
2911
2912	METHOD_TRACE("ips_removeq_scb", 1);
2913
2914	if (!item)
2915		return (NULL);
2916
2917	if (item == queue->head) {
2918		return (ips_removeq_scb_head(queue));
2919	}
2920
2921	p = queue->head;
2922
2923	while ((p) && (item != p->q_next))
2924		p = p->q_next;
2925
2926	if (p) {
2927		/* found a match */
2928		p->q_next = item->q_next;
2929
2930		if (!item->q_next)
2931			queue->tail = p;
2932
2933		item->q_next = NULL;
2934		queue->count--;
2935
2936		return (item);
2937	}
2938
2939	return (NULL);
2940}
2941
2942/****************************************************************************/
2943/*                                                                          */
2944/* Routine Name: ips_putq_wait_tail                                         */
2945/*                                                                          */
2946/* Routine Description:                                                     */
2947/*                                                                          */
2948/*   Add an item to the tail of the queue                                   */
2949/*                                                                          */
2950/* ASSUMED to be called from within the HA lock                             */
2951/*                                                                          */
2952/****************************************************************************/
2953static void ips_putq_wait_tail(ips_wait_queue_t *queue, struct scsi_cmnd *item)
2954{
2955	METHOD_TRACE("ips_putq_wait_tail", 1);
2956
2957	if (!item)
2958		return;
2959
2960	item->host_scribble = NULL;
2961
2962	if (queue->tail)
2963		queue->tail->host_scribble = (char *) item;
2964
2965	queue->tail = item;
2966
2967	if (!queue->head)
2968		queue->head = item;
2969
2970	queue->count++;
2971}
2972
2973/****************************************************************************/
2974/*                                                                          */
2975/* Routine Name: ips_removeq_wait_head                                      */
2976/*                                                                          */
2977/* Routine Description:                                                     */
2978/*                                                                          */
2979/*   Remove the head of the queue                                           */
2980/*                                                                          */
2981/* ASSUMED to be called from within the HA lock                             */
2982/*                                                                          */
2983/****************************************************************************/
2984static struct scsi_cmnd *ips_removeq_wait_head(ips_wait_queue_t *queue)
2985{
2986	struct scsi_cmnd *item;
2987
2988	METHOD_TRACE("ips_removeq_wait_head", 1);
2989
2990	item = queue->head;
2991
2992	if (!item) {
2993		return (NULL);
2994	}
2995
2996	queue->head = (struct scsi_cmnd *) item->host_scribble;
2997	item->host_scribble = NULL;
2998
2999	if (queue->tail == item)
3000		queue->tail = NULL;
3001
3002	queue->count--;
3003
3004	return (item);
3005}
3006
3007/****************************************************************************/
3008/*                                                                          */
3009/* Routine Name: ips_removeq_wait                                           */
3010/*                                                                          */
3011/* Routine Description:                                                     */
3012/*                                                                          */
3013/*   Remove an item from a queue                                            */
3014/*                                                                          */
3015/* ASSUMED to be called from within the HA lock                             */
3016/*                                                                          */
3017/****************************************************************************/
3018static struct scsi_cmnd *ips_removeq_wait(ips_wait_queue_t *queue,
3019					  struct scsi_cmnd *item)
3020{
3021	struct scsi_cmnd *p;
3022
3023	METHOD_TRACE("ips_removeq_wait", 1);
3024
3025	if (!item)
3026		return (NULL);
3027
3028	if (item == queue->head) {
3029		return (ips_removeq_wait_head(queue));
3030	}
3031
3032	p = queue->head;
3033
3034	while ((p) && (item != (struct scsi_cmnd *) p->host_scribble))
3035		p = (struct scsi_cmnd *) p->host_scribble;
3036
3037	if (p) {
3038		/* found a match */
3039		p->host_scribble = item->host_scribble;
3040
3041		if (!item->host_scribble)
3042			queue->tail = p;
3043
3044		item->host_scribble = NULL;
3045		queue->count--;
3046
3047		return (item);
3048	}
3049
3050	return (NULL);
3051}
3052
3053/****************************************************************************/
3054/*                                                                          */
3055/* Routine Name: ips_putq_copp_tail                                         */
3056/*                                                                          */
3057/* Routine Description:                                                     */
3058/*                                                                          */
3059/*   Add an item to the tail of the queue                                   */
3060/*                                                                          */
3061/* ASSUMED to be called from within the HA lock                             */
3062/*                                                                          */
3063/****************************************************************************/
3064static void
3065ips_putq_copp_tail(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
3066{
3067	METHOD_TRACE("ips_putq_copp_tail", 1);
3068
3069	if (!item)
3070		return;
3071
3072	item->next = NULL;
3073
3074	if (queue->tail)
3075		queue->tail->next = item;
3076
3077	queue->tail = item;
3078
3079	if (!queue->head)
3080		queue->head = item;
3081
3082	queue->count++;
3083}
3084
3085/****************************************************************************/
3086/*                                                                          */
3087/* Routine Name: ips_removeq_copp_head                                      */
3088/*                                                                          */
3089/* Routine Description:                                                     */
3090/*                                                                          */
3091/*   Remove the head of the queue                                           */
3092/*                                                                          */
3093/* ASSUMED to be called from within the HA lock                             */
3094/*                                                                          */
3095/****************************************************************************/
3096static ips_copp_wait_item_t *
3097ips_removeq_copp_head(ips_copp_queue_t * queue)
3098{
3099	ips_copp_wait_item_t *item;
3100
3101	METHOD_TRACE("ips_removeq_copp_head", 1);
3102
3103	item = queue->head;
3104
3105	if (!item) {
3106		return (NULL);
3107	}
3108
3109	queue->head = item->next;
3110	item->next = NULL;
3111
3112	if (queue->tail == item)
3113		queue->tail = NULL;
3114
3115	queue->count--;
3116
3117	return (item);
3118}
3119
3120/****************************************************************************/
3121/*                                                                          */
3122/* Routine Name: ips_removeq_copp                                           */
3123/*                                                                          */
3124/* Routine Description:                                                     */
3125/*                                                                          */
3126/*   Remove an item from a queue                                            */
3127/*                                                                          */
3128/* ASSUMED to be called from within the HA lock                             */
3129/*                                                                          */
3130/****************************************************************************/
3131static ips_copp_wait_item_t *
3132ips_removeq_copp(ips_copp_queue_t * queue, ips_copp_wait_item_t * item)
3133{
3134	ips_copp_wait_item_t *p;
3135
3136	METHOD_TRACE("ips_removeq_copp", 1);
3137
3138	if (!item)
3139		return (NULL);
3140
3141	if (item == queue->head) {
3142		return (ips_removeq_copp_head(queue));
3143	}
3144
3145	p = queue->head;
3146
3147	while ((p) && (item != p->next))
3148		p = p->next;
3149
3150	if (p) {
3151		/* found a match */
3152		p->next = item->next;
3153
3154		if (!item->next)
3155			queue->tail = p;
3156
3157		item->next = NULL;
3158		queue->count--;
3159
3160		return (item);
3161	}
3162
3163	return (NULL);
3164}
3165
3166/****************************************************************************/
3167/*                                                                          */
3168/* Routine Name: ipsintr_blocking                                           */
3169/*                                                                          */
3170/* Routine Description:                                                     */
3171/*                                                                          */
3172/*   Finalize an interrupt for internal commands                            */
3173/*                                                                          */
3174/****************************************************************************/
3175static void
3176ipsintr_blocking(ips_ha_t * ha, ips_scb_t * scb)
3177{
3178	METHOD_TRACE("ipsintr_blocking", 2);
3179
3180	ips_freescb(ha, scb);
3181	if ((ha->waitflag == TRUE) && (ha->cmd_in_progress == scb->cdb[0])) {
3182		ha->waitflag = FALSE;
3183
3184		return;
3185	}
3186}
3187
3188/****************************************************************************/
3189/*                                                                          */
3190/* Routine Name: ipsintr_done                                               */
3191/*                                                                          */
3192/* Routine Description:                                                     */
3193/*                                                                          */
3194/*   Finalize an interrupt for non-internal commands                        */
3195/*                                                                          */
3196/****************************************************************************/
3197static void
3198ipsintr_done(ips_ha_t * ha, ips_scb_t * scb)
3199{
3200	METHOD_TRACE("ipsintr_done", 2);
3201
3202	if (!scb) {
3203		IPS_PRINTK(KERN_WARNING, ha->pcidev,
3204			   "Spurious interrupt; scb NULL.\n");
3205
3206		return;
3207	}
3208
3209	if (scb->scsi_cmd == NULL) {
3210		/* unexpected interrupt */
3211		IPS_PRINTK(KERN_WARNING, ha->pcidev,
3212			   "Spurious interrupt; scsi_cmd not set.\n");
3213
3214		return;
3215	}
3216
3217	ips_done(ha, scb);
3218}
3219
3220/****************************************************************************/
3221/*                                                                          */
3222/* Routine Name: ips_done                                                   */
3223/*                                                                          */
3224/* Routine Description:                                                     */
3225/*                                                                          */
3226/*   Do housekeeping on completed commands                                  */
3227/*  ASSUMED to be called form within the request lock                       */
3228/****************************************************************************/
3229static void
3230ips_done(ips_ha_t * ha, ips_scb_t * scb)
3231{
3232	int ret;
3233
3234	METHOD_TRACE("ips_done", 1);
3235
3236	if (!scb)
3237		return;
3238
3239	if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd))) {
3240		ips_cleanup_passthru(ha, scb);
3241		ha->num_ioctl--;
3242	} else {
3243		/*
3244		 * Check to see if this command had too much
3245		 * data and had to be broke up.  If so, queue
3246		 * the rest of the data and continue.
3247		 */
3248		if ((scb->breakup) || (scb->sg_break)) {
3249                        struct scatterlist *sg;
3250                        int i, sg_dma_index, ips_sg_index = 0;
3251
3252			/* we had a data breakup */
3253			scb->data_len = 0;
3254
3255                        sg = scsi_sglist(scb->scsi_cmd);
3256
3257                        /* Spin forward to last dma chunk */
3258                        sg_dma_index = scb->breakup;
3259                        for (i = 0; i < scb->breakup; i++)
3260                                sg = sg_next(sg);
3261
3262			/* Take care of possible partial on last chunk */
3263                        ips_fill_scb_sg_single(ha,
3264                                               sg_dma_address(sg),
3265                                               scb, ips_sg_index++,
3266                                               sg_dma_len(sg));
3267
3268                        for (; sg_dma_index < scsi_sg_count(scb->scsi_cmd);
3269                             sg_dma_index++, sg = sg_next(sg)) {
3270                                if (ips_fill_scb_sg_single
3271                                    (ha,
3272                                     sg_dma_address(sg),
3273                                     scb, ips_sg_index++,
3274                                     sg_dma_len(sg)) < 0)
3275                                        break;
3276                        }
3277
3278			scb->dcdb.transfer_length = scb->data_len;
3279			scb->dcdb.cmd_attribute |=
3280			    ips_command_direction[scb->scsi_cmd->cmnd[0]];
3281
3282			if (!(scb->dcdb.cmd_attribute & 0x3))
3283				scb->dcdb.transfer_length = 0;
3284
3285			if (scb->data_len >= IPS_MAX_XFER) {
3286				scb->dcdb.cmd_attribute |= IPS_TRANSFER64K;
3287				scb->dcdb.transfer_length = 0;
3288			}
3289
3290			ret = ips_send_cmd(ha, scb);
3291
3292			switch (ret) {
3293			case IPS_FAILURE:
3294				if (scb->scsi_cmd) {
3295					scb->scsi_cmd->result = DID_ERROR << 16;
3296					scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3297				}
3298
3299				ips_freescb(ha, scb);
3300				break;
3301			case IPS_SUCCESS_IMM:
3302				if (scb->scsi_cmd) {
3303					scb->scsi_cmd->result = DID_ERROR << 16;
3304					scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3305				}
3306
3307				ips_freescb(ha, scb);
3308				break;
3309			default:
3310				break;
3311			}	/* end case */
3312
3313			return;
3314		}
3315	}			/* end if passthru */
3316
3317	if (scb->bus) {
3318		ha->dcdb_active[scb->bus - 1] &= ~(1 << scb->target_id);
3319	}
3320
3321	scb->scsi_cmd->scsi_done(scb->scsi_cmd);
3322
3323	ips_freescb(ha, scb);
3324}
3325
3326/****************************************************************************/
3327/*                                                                          */
3328/* Routine Name: ips_map_status                                             */
3329/*                                                                          */
3330/* Routine Description:                                                     */
3331/*                                                                          */
3332/*   Map Controller Error codes to Linux Error Codes                        */
3333/*                                                                          */
3334/****************************************************************************/
3335static int
3336ips_map_status(ips_ha_t * ha, ips_scb_t * scb, ips_stat_t * sp)
3337{
3338	int errcode;
3339	int device_error;
3340	uint32_t transfer_len;
3341	IPS_DCDB_TABLE_TAPE *tapeDCDB;
3342	IPS_SCSI_INQ_DATA inquiryData;
3343
3344	METHOD_TRACE("ips_map_status", 1);
3345
3346	if (scb->bus) {
3347		DEBUG_VAR(2,
3348			  "(%s%d) Physical device error (%d %d %d): %x %x, Sense Key: %x, ASC: %x, ASCQ: %x",
3349			  ips_name, ha->host_num,
3350			  scb->scsi_cmd->device->channel,
3351			  scb->scsi_cmd->device->id, scb->scsi_cmd->device->lun,
3352			  scb->basic_status, scb->extended_status,
3353			  scb->extended_status ==
3354			  IPS_ERR_CKCOND ? scb->dcdb.sense_info[2] & 0xf : 0,
3355			  scb->extended_status ==
3356			  IPS_ERR_CKCOND ? scb->dcdb.sense_info[12] : 0,
3357			  scb->extended_status ==
3358			  IPS_ERR_CKCOND ? scb->dcdb.sense_info[13] : 0);
3359	}
3360
3361	/* default driver error */
3362	errcode = DID_ERROR;
3363	device_error = 0;
3364
3365	switch (scb->basic_status & IPS_GSC_STATUS_MASK) {
3366	case IPS_CMD_TIMEOUT:
3367		errcode = DID_TIME_OUT;
3368		break;
3369
3370	case IPS_INVAL_OPCO:
3371	case IPS_INVAL_CMD_BLK:
3372	case IPS_INVAL_PARM_BLK:
3373	case IPS_LD_ERROR:
3374	case IPS_CMD_CMPLT_WERROR:
3375		break;
3376
3377	case IPS_PHYS_DRV_ERROR:
3378		switch (scb->extended_status) {
3379		case IPS_ERR_SEL_TO:
3380			if (scb->bus)
3381				errcode = DID_NO_CONNECT;
3382
3383			break;
3384
3385		case IPS_ERR_OU_RUN:
3386			if ((scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB) ||
3387			    (scb->cmd.dcdb.op_code ==
3388			     IPS_CMD_EXTENDED_DCDB_SG)) {
3389				tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3390				transfer_len = tapeDCDB->transfer_length;
3391			} else {
3392				transfer_len =
3393				    (uint32_t) scb->dcdb.transfer_length;
3394			}
3395
3396			if ((scb->bus) && (transfer_len < scb->data_len)) {
3397				/* Underrun - set default to no error */
3398				errcode = DID_OK;
3399
3400				/* Restrict access to physical DASD */
3401				if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3402				    ips_scmd_buf_read(scb->scsi_cmd,
3403                                      &inquiryData, sizeof (inquiryData));
3404 				    if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK) {
3405				        errcode = DID_TIME_OUT;
3406				        break;
3407				    }
3408				}
3409			} else
3410				errcode = DID_ERROR;
3411
3412			break;
3413
3414		case IPS_ERR_RECOVERY:
3415			/* don't fail recovered errors */
3416			if (scb->bus)
3417				errcode = DID_OK;
3418
3419			break;
3420
3421		case IPS_ERR_HOST_RESET:
3422		case IPS_ERR_DEV_RESET:
3423			errcode = DID_RESET;
3424			break;
3425
3426		case IPS_ERR_CKCOND:
3427			if (scb->bus) {
3428				if ((scb->cmd.dcdb.op_code ==
3429				     IPS_CMD_EXTENDED_DCDB)
3430				    || (scb->cmd.dcdb.op_code ==
3431					IPS_CMD_EXTENDED_DCDB_SG)) {
3432					tapeDCDB =
3433					    (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;
3434					memcpy(scb->scsi_cmd->sense_buffer,
 
3435					       tapeDCDB->sense_info,
3436					       SCSI_SENSE_BUFFERSIZE);
3437				} else {
3438					memcpy(scb->scsi_cmd->sense_buffer,
 
3439					       scb->dcdb.sense_info,
3440					       SCSI_SENSE_BUFFERSIZE);
3441				}
3442				device_error = 2;	/* check condition */
3443			}
3444
3445			errcode = DID_OK;
3446
3447			break;
3448
3449		default:
3450			errcode = DID_ERROR;
3451			break;
3452
3453		}		/* end switch */
3454	}			/* end switch */
3455
3456	scb->scsi_cmd->result = device_error | (errcode << 16);
3457
3458	return (1);
3459}
3460
3461/****************************************************************************/
3462/*                                                                          */
3463/* Routine Name: ips_send_wait                                              */
3464/*                                                                          */
3465/* Routine Description:                                                     */
3466/*                                                                          */
3467/*   Send a command to the controller and wait for it to return             */
3468/*                                                                          */
3469/*   The FFDC Time Stamp use this function for the callback, but doesn't    */
3470/*   actually need to wait.                                                 */
3471/****************************************************************************/
3472static int
3473ips_send_wait(ips_ha_t * ha, ips_scb_t * scb, int timeout, int intr)
3474{
3475	int ret;
3476
3477	METHOD_TRACE("ips_send_wait", 1);
3478
3479	if (intr != IPS_FFDC) {	/* Won't be Waiting if this is a Time Stamp */
3480		ha->waitflag = TRUE;
3481		ha->cmd_in_progress = scb->cdb[0];
3482	}
3483	scb->callback = ipsintr_blocking;
3484	ret = ips_send_cmd(ha, scb);
3485
3486	if ((ret == IPS_FAILURE) || (ret == IPS_SUCCESS_IMM))
3487		return (ret);
3488
3489	if (intr != IPS_FFDC)	/* Don't Wait around if this is a Time Stamp */
3490		ret = ips_wait(ha, timeout, intr);
3491
3492	return (ret);
3493}
3494
3495/****************************************************************************/
3496/*                                                                          */
3497/* Routine Name: ips_scmd_buf_write                                         */
3498/*                                                                          */
3499/* Routine Description:                                                     */
3500/*  Write data to struct scsi_cmnd request_buffer at proper offsets	    */
3501/****************************************************************************/
3502static void
3503ips_scmd_buf_write(struct scsi_cmnd *scmd, void *data, unsigned int count)
3504{
3505	unsigned long flags;
3506
3507	local_irq_save(flags);
3508	scsi_sg_copy_from_buffer(scmd, data, count);
3509	local_irq_restore(flags);
3510}
3511
3512/****************************************************************************/
3513/*                                                                          */
3514/* Routine Name: ips_scmd_buf_read                                          */
3515/*                                                                          */
3516/* Routine Description:                                                     */
3517/*  Copy data from a struct scsi_cmnd to a new, linear buffer		    */
3518/****************************************************************************/
3519static void
3520ips_scmd_buf_read(struct scsi_cmnd *scmd, void *data, unsigned int count)
3521{
3522	unsigned long flags;
3523
3524	local_irq_save(flags);
3525	scsi_sg_copy_to_buffer(scmd, data, count);
3526	local_irq_restore(flags);
3527}
3528
3529/****************************************************************************/
3530/*                                                                          */
3531/* Routine Name: ips_send_cmd                                               */
3532/*                                                                          */
3533/* Routine Description:                                                     */
3534/*                                                                          */
3535/*   Map SCSI commands to ServeRAID commands for logical drives             */
3536/*                                                                          */
3537/****************************************************************************/
3538static int
3539ips_send_cmd(ips_ha_t * ha, ips_scb_t * scb)
3540{
3541	int ret;
3542	char *sp;
3543	int device_error;
3544	IPS_DCDB_TABLE_TAPE *tapeDCDB;
3545	int TimeOut;
3546
3547	METHOD_TRACE("ips_send_cmd", 1);
3548
3549	ret = IPS_SUCCESS;
3550
3551	if (!scb->scsi_cmd) {
3552		/* internal command */
3553
3554		if (scb->bus > 0) {
3555			/* Controller commands can't be issued */
3556			/* to real devices -- fail them        */
3557			if ((ha->waitflag == TRUE) &&
3558			    (ha->cmd_in_progress == scb->cdb[0])) {
3559				ha->waitflag = FALSE;
3560			}
3561
3562			return (1);
3563		}
3564	} else if ((scb->bus == 0) && (!ips_is_passthru(scb->scsi_cmd))) {
3565		/* command to logical bus -- interpret */
3566		ret = IPS_SUCCESS_IMM;
3567
3568		switch (scb->scsi_cmd->cmnd[0]) {
3569		case ALLOW_MEDIUM_REMOVAL:
3570		case REZERO_UNIT:
3571		case ERASE:
3572		case WRITE_FILEMARKS:
3573		case SPACE:
3574			scb->scsi_cmd->result = DID_ERROR << 16;
3575			break;
3576
3577		case START_STOP:
3578			scb->scsi_cmd->result = DID_OK << 16;
 
3579
3580		case TEST_UNIT_READY:
3581		case INQUIRY:
3582			if (scb->target_id == IPS_ADAPTER_ID) {
3583				/*
3584				 * Either we have a TUR
3585				 * or we have a SCSI inquiry
3586				 */
3587				if (scb->scsi_cmd->cmnd[0] == TEST_UNIT_READY)
3588					scb->scsi_cmd->result = DID_OK << 16;
3589
3590				if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
3591					IPS_SCSI_INQ_DATA inquiry;
3592
3593					memset(&inquiry, 0,
3594					       sizeof (IPS_SCSI_INQ_DATA));
3595
3596					inquiry.DeviceType =
3597					    IPS_SCSI_INQ_TYPE_PROCESSOR;
3598					inquiry.DeviceTypeQualifier =
3599					    IPS_SCSI_INQ_LU_CONNECTED;
3600					inquiry.Version = IPS_SCSI_INQ_REV2;
3601					inquiry.ResponseDataFormat =
3602					    IPS_SCSI_INQ_RD_REV2;
3603					inquiry.AdditionalLength = 31;
3604					inquiry.Flags[0] =
3605					    IPS_SCSI_INQ_Address16;
3606					inquiry.Flags[1] =
3607					    IPS_SCSI_INQ_WBus16 |
3608					    IPS_SCSI_INQ_Sync;
3609					strncpy(inquiry.VendorId, "IBM     ",
3610						8);
3611					strncpy(inquiry.ProductId,
3612						"SERVERAID       ", 16);
3613					strncpy(inquiry.ProductRevisionLevel,
3614						"1.00", 4);
3615
3616					ips_scmd_buf_write(scb->scsi_cmd,
3617							   &inquiry,
3618							   sizeof (inquiry));
3619
3620					scb->scsi_cmd->result = DID_OK << 16;
3621				}
3622			} else {
3623				scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3624				scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3625				scb->cmd.logical_info.reserved = 0;
3626				scb->cmd.logical_info.reserved2 = 0;
3627				scb->data_len = sizeof (IPS_LD_INFO);
3628				scb->data_busaddr = ha->logical_drive_info_dma_addr;
3629				scb->flags = 0;
3630				scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3631				ret = IPS_SUCCESS;
3632			}
3633
3634			break;
3635
3636		case REQUEST_SENSE:
3637			ips_reqsen(ha, scb);
3638			scb->scsi_cmd->result = DID_OK << 16;
3639			break;
3640
3641		case READ_6:
3642		case WRITE_6:
3643			if (!scb->sg_len) {
3644				scb->cmd.basic_io.op_code =
3645				    (scb->scsi_cmd->cmnd[0] ==
3646				     READ_6) ? IPS_CMD_READ : IPS_CMD_WRITE;
3647				scb->cmd.basic_io.enhanced_sg = 0;
3648				scb->cmd.basic_io.sg_addr =
3649				    cpu_to_le32(scb->data_busaddr);
3650			} else {
3651				scb->cmd.basic_io.op_code =
3652				    (scb->scsi_cmd->cmnd[0] ==
3653				     READ_6) ? IPS_CMD_READ_SG :
3654				    IPS_CMD_WRITE_SG;
3655				scb->cmd.basic_io.enhanced_sg =
3656				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3657				scb->cmd.basic_io.sg_addr =
3658				    cpu_to_le32(scb->sg_busaddr);
3659			}
3660
3661			scb->cmd.basic_io.segment_4G = 0;
3662			scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3663			scb->cmd.basic_io.log_drv = scb->target_id;
3664			scb->cmd.basic_io.sg_count = scb->sg_len;
3665
3666			if (scb->cmd.basic_io.lba)
3667				le32_add_cpu(&scb->cmd.basic_io.lba,
3668						le16_to_cpu(scb->cmd.basic_io.
3669							    sector_count));
3670			else
3671				scb->cmd.basic_io.lba =
3672				    (((scb->scsi_cmd->
3673				       cmnd[1] & 0x1f) << 16) | (scb->scsi_cmd->
3674								 cmnd[2] << 8) |
3675				     (scb->scsi_cmd->cmnd[3]));
3676
3677			scb->cmd.basic_io.sector_count =
3678			    cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3679
3680			if (le16_to_cpu(scb->cmd.basic_io.sector_count) == 0)
3681				scb->cmd.basic_io.sector_count =
3682				    cpu_to_le16(256);
3683
3684			ret = IPS_SUCCESS;
3685			break;
3686
3687		case READ_10:
3688		case WRITE_10:
3689			if (!scb->sg_len) {
3690				scb->cmd.basic_io.op_code =
3691				    (scb->scsi_cmd->cmnd[0] ==
3692				     READ_10) ? IPS_CMD_READ : IPS_CMD_WRITE;
3693				scb->cmd.basic_io.enhanced_sg = 0;
3694				scb->cmd.basic_io.sg_addr =
3695				    cpu_to_le32(scb->data_busaddr);
3696			} else {
3697				scb->cmd.basic_io.op_code =
3698				    (scb->scsi_cmd->cmnd[0] ==
3699				     READ_10) ? IPS_CMD_READ_SG :
3700				    IPS_CMD_WRITE_SG;
3701				scb->cmd.basic_io.enhanced_sg =
3702				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3703				scb->cmd.basic_io.sg_addr =
3704				    cpu_to_le32(scb->sg_busaddr);
3705			}
3706
3707			scb->cmd.basic_io.segment_4G = 0;
3708			scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3709			scb->cmd.basic_io.log_drv = scb->target_id;
3710			scb->cmd.basic_io.sg_count = scb->sg_len;
3711
3712			if (scb->cmd.basic_io.lba)
3713				le32_add_cpu(&scb->cmd.basic_io.lba,
3714						le16_to_cpu(scb->cmd.basic_io.
3715							    sector_count));
3716			else
3717				scb->cmd.basic_io.lba =
3718				    ((scb->scsi_cmd->cmnd[2] << 24) | (scb->
3719								       scsi_cmd->
3720								       cmnd[3]
3721								       << 16) |
3722				     (scb->scsi_cmd->cmnd[4] << 8) | scb->
3723				     scsi_cmd->cmnd[5]);
3724
3725			scb->cmd.basic_io.sector_count =
3726			    cpu_to_le16(scb->data_len / IPS_BLKSIZE);
3727
3728			if (cpu_to_le16(scb->cmd.basic_io.sector_count) == 0) {
3729				/*
3730				 * This is a null condition
3731				 * we don't have to do anything
3732				 * so just return
3733				 */
3734				scb->scsi_cmd->result = DID_OK << 16;
3735			} else
3736				ret = IPS_SUCCESS;
3737
3738			break;
3739
3740		case RESERVE:
3741		case RELEASE:
3742			scb->scsi_cmd->result = DID_OK << 16;
3743			break;
3744
3745		case MODE_SENSE:
3746			scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
3747			scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
3748			scb->cmd.basic_io.segment_4G = 0;
3749			scb->cmd.basic_io.enhanced_sg = 0;
3750			scb->data_len = sizeof (*ha->enq);
3751			scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
3752			ret = IPS_SUCCESS;
3753			break;
3754
3755		case READ_CAPACITY:
3756			scb->cmd.logical_info.op_code = IPS_CMD_GET_LD_INFO;
3757			scb->cmd.logical_info.command_id = IPS_COMMAND_ID(ha, scb);
3758			scb->cmd.logical_info.reserved = 0;
3759			scb->cmd.logical_info.reserved2 = 0;
3760			scb->cmd.logical_info.reserved3 = 0;
3761			scb->data_len = sizeof (IPS_LD_INFO);
3762			scb->data_busaddr = ha->logical_drive_info_dma_addr;
3763			scb->flags = 0;
3764			scb->cmd.logical_info.buffer_addr = scb->data_busaddr;
3765			ret = IPS_SUCCESS;
3766			break;
3767
3768		case SEND_DIAGNOSTIC:
3769		case REASSIGN_BLOCKS:
3770		case FORMAT_UNIT:
3771		case SEEK_10:
3772		case VERIFY:
3773		case READ_DEFECT_DATA:
3774		case READ_BUFFER:
3775		case WRITE_BUFFER:
3776			scb->scsi_cmd->result = DID_OK << 16;
3777			break;
3778
3779		default:
3780			/* Set the Return Info to appear like the Command was */
3781			/* attempted, a Check Condition occurred, and Sense   */
3782			/* Data indicating an Invalid CDB OpCode is returned. */
3783			sp = (char *) scb->scsi_cmd->sense_buffer;
3784
3785			sp[0] = 0x70;	/* Error Code               */
3786			sp[2] = ILLEGAL_REQUEST;	/* Sense Key 5 Illegal Req. */
3787			sp[7] = 0x0A;	/* Additional Sense Length  */
3788			sp[12] = 0x20;	/* ASC = Invalid OpCode     */
3789			sp[13] = 0x00;	/* ASCQ                     */
3790
3791			device_error = 2;	/* Indicate Check Condition */
3792			scb->scsi_cmd->result = device_error | (DID_OK << 16);
3793			break;
3794		}		/* end switch */
3795	}
3796	/* end if */
3797	if (ret == IPS_SUCCESS_IMM)
3798		return (ret);
3799
3800	/* setup DCDB */
3801	if (scb->bus > 0) {
3802
3803		/* If we already know the Device is Not there, no need to attempt a Command   */
3804		/* This also protects an NT FailOver Controller from getting CDB's sent to it */
3805		if (ha->conf->dev[scb->bus - 1][scb->target_id].ucState == 0) {
3806			scb->scsi_cmd->result = DID_NO_CONNECT << 16;
3807			return (IPS_SUCCESS_IMM);
3808		}
3809
3810		ha->dcdb_active[scb->bus - 1] |= (1 << scb->target_id);
3811		scb->cmd.dcdb.command_id = IPS_COMMAND_ID(ha, scb);
3812		scb->cmd.dcdb.dcdb_address = cpu_to_le32(scb->scb_busaddr +
3813							 (unsigned long) &scb->
3814							 dcdb -
3815							 (unsigned long) scb);
3816		scb->cmd.dcdb.reserved = 0;
3817		scb->cmd.dcdb.reserved2 = 0;
3818		scb->cmd.dcdb.reserved3 = 0;
3819		scb->cmd.dcdb.segment_4G = 0;
3820		scb->cmd.dcdb.enhanced_sg = 0;
3821
3822		TimeOut = scb->scsi_cmd->request->timeout;
3823
3824		if (ha->subsys->param[4] & 0x00100000) {	/* If NEW Tape DCDB is Supported */
3825			if (!scb->sg_len) {
3826				scb->cmd.dcdb.op_code = IPS_CMD_EXTENDED_DCDB;
3827			} else {
3828				scb->cmd.dcdb.op_code =
3829				    IPS_CMD_EXTENDED_DCDB_SG;
3830				scb->cmd.dcdb.enhanced_sg =
3831				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3832			}
3833
3834			tapeDCDB = (IPS_DCDB_TABLE_TAPE *) & scb->dcdb;	/* Use Same Data Area as Old DCDB Struct */
3835			tapeDCDB->device_address =
3836			    ((scb->bus - 1) << 4) | scb->target_id;
3837			tapeDCDB->cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3838			tapeDCDB->cmd_attribute &= ~IPS_TRANSFER64K;	/* Always Turn OFF 64K Size Flag */
3839
3840			if (TimeOut) {
3841				if (TimeOut < (10 * HZ))
3842					tapeDCDB->cmd_attribute |= IPS_TIMEOUT10;	/* TimeOut is 10 Seconds */
3843				else if (TimeOut < (60 * HZ))
3844					tapeDCDB->cmd_attribute |= IPS_TIMEOUT60;	/* TimeOut is 60 Seconds */
3845				else if (TimeOut < (1200 * HZ))
3846					tapeDCDB->cmd_attribute |= IPS_TIMEOUT20M;	/* TimeOut is 20 Minutes */
3847			}
3848
3849			tapeDCDB->cdb_length = scb->scsi_cmd->cmd_len;
3850			tapeDCDB->reserved_for_LUN = 0;
3851			tapeDCDB->transfer_length = scb->data_len;
3852			if (scb->cmd.dcdb.op_code == IPS_CMD_EXTENDED_DCDB_SG)
3853				tapeDCDB->buffer_pointer =
3854				    cpu_to_le32(scb->sg_busaddr);
3855			else
3856				tapeDCDB->buffer_pointer =
3857				    cpu_to_le32(scb->data_busaddr);
3858			tapeDCDB->sg_count = scb->sg_len;
3859			tapeDCDB->sense_length = sizeof (tapeDCDB->sense_info);
3860			tapeDCDB->scsi_status = 0;
3861			tapeDCDB->reserved = 0;
3862			memcpy(tapeDCDB->scsi_cdb, scb->scsi_cmd->cmnd,
3863			       scb->scsi_cmd->cmd_len);
3864		} else {
3865			if (!scb->sg_len) {
3866				scb->cmd.dcdb.op_code = IPS_CMD_DCDB;
3867			} else {
3868				scb->cmd.dcdb.op_code = IPS_CMD_DCDB_SG;
3869				scb->cmd.dcdb.enhanced_sg =
3870				    IPS_USE_ENH_SGLIST(ha) ? 0xFF : 0;
3871			}
3872
3873			scb->dcdb.device_address =
3874			    ((scb->bus - 1) << 4) | scb->target_id;
3875			scb->dcdb.cmd_attribute |= IPS_DISCONNECT_ALLOWED;
3876
3877			if (TimeOut) {
3878				if (TimeOut < (10 * HZ))
3879					scb->dcdb.cmd_attribute |= IPS_TIMEOUT10;	/* TimeOut is 10 Seconds */
3880				else if (TimeOut < (60 * HZ))
3881					scb->dcdb.cmd_attribute |= IPS_TIMEOUT60;	/* TimeOut is 60 Seconds */
3882				else if (TimeOut < (1200 * HZ))
3883					scb->dcdb.cmd_attribute |= IPS_TIMEOUT20M;	/* TimeOut is 20 Minutes */
3884			}
3885
3886			scb->dcdb.transfer_length = scb->data_len;
3887			if (scb->dcdb.cmd_attribute & IPS_TRANSFER64K)
3888				scb->dcdb.transfer_length = 0;
3889			if (scb->cmd.dcdb.op_code == IPS_CMD_DCDB_SG)
3890				scb->dcdb.buffer_pointer =
3891				    cpu_to_le32(scb->sg_busaddr);
3892			else
3893				scb->dcdb.buffer_pointer =
3894				    cpu_to_le32(scb->data_busaddr);
3895			scb->dcdb.cdb_length = scb->scsi_cmd->cmd_len;
3896			scb->dcdb.sense_length = sizeof (scb->dcdb.sense_info);
3897			scb->dcdb.sg_count = scb->sg_len;
3898			scb->dcdb.reserved = 0;
3899			memcpy(scb->dcdb.scsi_cdb, scb->scsi_cmd->cmnd,
3900			       scb->scsi_cmd->cmd_len);
3901			scb->dcdb.scsi_status = 0;
3902			scb->dcdb.reserved2[0] = 0;
3903			scb->dcdb.reserved2[1] = 0;
3904			scb->dcdb.reserved2[2] = 0;
3905		}
3906	}
3907
3908	return ((*ha->func.issue) (ha, scb));
3909}
3910
3911/****************************************************************************/
3912/*                                                                          */
3913/* Routine Name: ips_chk_status                                             */
3914/*                                                                          */
3915/* Routine Description:                                                     */
3916/*                                                                          */
3917/*   Check the status of commands to logical drives                         */
3918/*   Assumed to be called with the HA lock                                  */
3919/****************************************************************************/
3920static void
3921ips_chkstatus(ips_ha_t * ha, IPS_STATUS * pstatus)
3922{
3923	ips_scb_t *scb;
3924	ips_stat_t *sp;
3925	uint8_t basic_status;
3926	uint8_t ext_status;
3927	int errcode;
3928	IPS_SCSI_INQ_DATA inquiryData;
3929
3930	METHOD_TRACE("ips_chkstatus", 1);
3931
3932	scb = &ha->scbs[pstatus->fields.command_id];
3933	scb->basic_status = basic_status =
3934	    pstatus->fields.basic_status & IPS_BASIC_STATUS_MASK;
3935	scb->extended_status = ext_status = pstatus->fields.extended_status;
3936
3937	sp = &ha->sp;
3938	sp->residue_len = 0;
3939	sp->scb_addr = (void *) scb;
3940
3941	/* Remove the item from the active queue */
3942	ips_removeq_scb(&ha->scb_activelist, scb);
3943
3944	if (!scb->scsi_cmd)
3945		/* internal commands are handled in do_ipsintr */
3946		return;
3947
3948	DEBUG_VAR(2, "(%s%d) ips_chkstatus: cmd 0x%X id %d (%d %d %d)",
3949		  ips_name,
3950		  ha->host_num,
3951		  scb->cdb[0],
3952		  scb->cmd.basic_io.command_id,
3953		  scb->bus, scb->target_id, scb->lun);
3954
3955	if ((scb->scsi_cmd) && (ips_is_passthru(scb->scsi_cmd)))
3956		/* passthru - just returns the raw result */
3957		return;
3958
3959	errcode = DID_OK;
3960
3961	if (((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_SUCCESS) ||
3962	    ((basic_status & IPS_GSC_STATUS_MASK) == IPS_CMD_RECOVERED_ERROR)) {
3963
3964		if (scb->bus == 0) {
3965			if ((basic_status & IPS_GSC_STATUS_MASK) ==
3966			    IPS_CMD_RECOVERED_ERROR) {
3967				DEBUG_VAR(1,
3968					  "(%s%d) Recovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
3969					  ips_name, ha->host_num,
3970					  scb->cmd.basic_io.op_code,
3971					  basic_status, ext_status);
3972			}
3973
3974			switch (scb->scsi_cmd->cmnd[0]) {
3975			case ALLOW_MEDIUM_REMOVAL:
3976			case REZERO_UNIT:
3977			case ERASE:
3978			case WRITE_FILEMARKS:
3979			case SPACE:
3980				errcode = DID_ERROR;
3981				break;
3982
3983			case START_STOP:
3984				break;
3985
3986			case TEST_UNIT_READY:
3987				if (!ips_online(ha, scb)) {
3988					errcode = DID_TIME_OUT;
3989				}
3990				break;
3991
3992			case INQUIRY:
3993				if (ips_online(ha, scb)) {
3994					ips_inquiry(ha, scb);
3995				} else {
3996					errcode = DID_TIME_OUT;
3997				}
3998				break;
3999
4000			case REQUEST_SENSE:
4001				ips_reqsen(ha, scb);
4002				break;
4003
4004			case READ_6:
4005			case WRITE_6:
4006			case READ_10:
4007			case WRITE_10:
4008			case RESERVE:
4009			case RELEASE:
4010				break;
4011
4012			case MODE_SENSE:
4013				if (!ips_online(ha, scb)
4014				    || !ips_msense(ha, scb)) {
4015					errcode = DID_ERROR;
4016				}
4017				break;
4018
4019			case READ_CAPACITY:
4020				if (ips_online(ha, scb))
4021					ips_rdcap(ha, scb);
4022				else {
4023					errcode = DID_TIME_OUT;
4024				}
4025				break;
4026
4027			case SEND_DIAGNOSTIC:
4028			case REASSIGN_BLOCKS:
4029				break;
4030
4031			case FORMAT_UNIT:
4032				errcode = DID_ERROR;
4033				break;
4034
4035			case SEEK_10:
4036			case VERIFY:
4037			case READ_DEFECT_DATA:
4038			case READ_BUFFER:
4039			case WRITE_BUFFER:
4040				break;
4041
4042			default:
4043				errcode = DID_ERROR;
4044			}	/* end switch */
4045
4046			scb->scsi_cmd->result = errcode << 16;
4047		} else {	/* bus == 0 */
4048			/* restrict access to physical drives */
4049			if (scb->scsi_cmd->cmnd[0] == INQUIRY) {
4050			    ips_scmd_buf_read(scb->scsi_cmd,
4051                                  &inquiryData, sizeof (inquiryData));
4052			    if ((inquiryData.DeviceType & 0x1f) == TYPE_DISK)
4053			        scb->scsi_cmd->result = DID_TIME_OUT << 16;
4054			}
4055		}		/* else */
4056	} else {		/* recovered error / success */
4057		if (scb->bus == 0) {
4058			DEBUG_VAR(1,
4059				  "(%s%d) Unrecovered Logical Drive Error OpCode: %x, BSB: %x, ESB: %x",
4060				  ips_name, ha->host_num,
4061				  scb->cmd.basic_io.op_code, basic_status,
4062				  ext_status);
4063		}
4064
4065		ips_map_status(ha, scb, sp);
4066	}			/* else */
4067}
4068
4069/****************************************************************************/
4070/*                                                                          */
4071/* Routine Name: ips_online                                                 */
4072/*                                                                          */
4073/* Routine Description:                                                     */
4074/*                                                                          */
4075/*   Determine if a logical drive is online                                 */
4076/*                                                                          */
4077/****************************************************************************/
4078static int
4079ips_online(ips_ha_t * ha, ips_scb_t * scb)
4080{
4081	METHOD_TRACE("ips_online", 1);
4082
4083	if (scb->target_id >= IPS_MAX_LD)
4084		return (0);
4085
4086	if ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1) {
4087		memset(ha->logical_drive_info, 0, sizeof (IPS_LD_INFO));
4088		return (0);
4089	}
4090
4091	if (ha->logical_drive_info->drive_info[scb->target_id].state !=
4092	    IPS_LD_OFFLINE
4093	    && ha->logical_drive_info->drive_info[scb->target_id].state !=
4094	    IPS_LD_FREE
4095	    && ha->logical_drive_info->drive_info[scb->target_id].state !=
4096	    IPS_LD_CRS
4097	    && ha->logical_drive_info->drive_info[scb->target_id].state !=
4098	    IPS_LD_SYS)
4099		return (1);
4100	else
4101		return (0);
4102}
4103
4104/****************************************************************************/
4105/*                                                                          */
4106/* Routine Name: ips_inquiry                                                */
4107/*                                                                          */
4108/* Routine Description:                                                     */
4109/*                                                                          */
4110/*   Simulate an inquiry command to a logical drive                         */
4111/*                                                                          */
4112/****************************************************************************/
4113static int
4114ips_inquiry(ips_ha_t * ha, ips_scb_t * scb)
4115{
4116	IPS_SCSI_INQ_DATA inquiry;
4117
4118	METHOD_TRACE("ips_inquiry", 1);
4119
4120	memset(&inquiry, 0, sizeof (IPS_SCSI_INQ_DATA));
4121
4122	inquiry.DeviceType = IPS_SCSI_INQ_TYPE_DASD;
4123	inquiry.DeviceTypeQualifier = IPS_SCSI_INQ_LU_CONNECTED;
4124	inquiry.Version = IPS_SCSI_INQ_REV2;
4125	inquiry.ResponseDataFormat = IPS_SCSI_INQ_RD_REV2;
4126	inquiry.AdditionalLength = 31;
4127	inquiry.Flags[0] = IPS_SCSI_INQ_Address16;
4128	inquiry.Flags[1] =
4129	    IPS_SCSI_INQ_WBus16 | IPS_SCSI_INQ_Sync | IPS_SCSI_INQ_CmdQue;
4130	strncpy(inquiry.VendorId, "IBM     ", 8);
4131	strncpy(inquiry.ProductId, "SERVERAID       ", 16);
4132	strncpy(inquiry.ProductRevisionLevel, "1.00", 4);
4133
4134	ips_scmd_buf_write(scb->scsi_cmd, &inquiry, sizeof (inquiry));
4135
4136	return (1);
4137}
4138
4139/****************************************************************************/
4140/*                                                                          */
4141/* Routine Name: ips_rdcap                                                  */
4142/*                                                                          */
4143/* Routine Description:                                                     */
4144/*                                                                          */
4145/*   Simulate a read capacity command to a logical drive                    */
4146/*                                                                          */
4147/****************************************************************************/
4148static int
4149ips_rdcap(ips_ha_t * ha, ips_scb_t * scb)
4150{
4151	IPS_SCSI_CAPACITY cap;
4152
4153	METHOD_TRACE("ips_rdcap", 1);
4154
4155	if (scsi_bufflen(scb->scsi_cmd) < 8)
4156		return (0);
4157
4158	cap.lba =
4159	    cpu_to_be32(le32_to_cpu
4160			(ha->logical_drive_info->
4161			 drive_info[scb->target_id].sector_count) - 1);
4162	cap.len = cpu_to_be32((uint32_t) IPS_BLKSIZE);
4163
4164	ips_scmd_buf_write(scb->scsi_cmd, &cap, sizeof (cap));
4165
4166	return (1);
4167}
4168
4169/****************************************************************************/
4170/*                                                                          */
4171/* Routine Name: ips_msense                                                 */
4172/*                                                                          */
4173/* Routine Description:                                                     */
4174/*                                                                          */
4175/*   Simulate a mode sense command to a logical drive                       */
4176/*                                                                          */
4177/****************************************************************************/
4178static int
4179ips_msense(ips_ha_t * ha, ips_scb_t * scb)
4180{
4181	uint16_t heads;
4182	uint16_t sectors;
4183	uint32_t cylinders;
4184	IPS_SCSI_MODE_PAGE_DATA mdata;
4185
4186	METHOD_TRACE("ips_msense", 1);
4187
4188	if (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) > 0x400000 &&
4189	    (ha->enq->ucMiscFlag & 0x8) == 0) {
4190		heads = IPS_NORM_HEADS;
4191		sectors = IPS_NORM_SECTORS;
4192	} else {
4193		heads = IPS_COMP_HEADS;
4194		sectors = IPS_COMP_SECTORS;
4195	}
4196
4197	cylinders =
4198	    (le32_to_cpu(ha->enq->ulDriveSize[scb->target_id]) -
4199	     1) / (heads * sectors);
4200
4201	memset(&mdata, 0, sizeof (IPS_SCSI_MODE_PAGE_DATA));
4202
4203	mdata.hdr.BlockDescLength = 8;
4204
4205	switch (scb->scsi_cmd->cmnd[2] & 0x3f) {
4206	case 0x03:		/* page 3 */
4207		mdata.pdata.pg3.PageCode = 3;
4208		mdata.pdata.pg3.PageLength = sizeof (IPS_SCSI_MODE_PAGE3);
4209		mdata.hdr.DataLength =
4210		    3 + mdata.hdr.BlockDescLength + mdata.pdata.pg3.PageLength;
4211		mdata.pdata.pg3.TracksPerZone = 0;
4212		mdata.pdata.pg3.AltSectorsPerZone = 0;
4213		mdata.pdata.pg3.AltTracksPerZone = 0;
4214		mdata.pdata.pg3.AltTracksPerVolume = 0;
4215		mdata.pdata.pg3.SectorsPerTrack = cpu_to_be16(sectors);
4216		mdata.pdata.pg3.BytesPerSector = cpu_to_be16(IPS_BLKSIZE);
4217		mdata.pdata.pg3.Interleave = cpu_to_be16(1);
4218		mdata.pdata.pg3.TrackSkew = 0;
4219		mdata.pdata.pg3.CylinderSkew = 0;
4220		mdata.pdata.pg3.flags = IPS_SCSI_MP3_SoftSector;
4221		break;
4222
4223	case 0x4:
4224		mdata.pdata.pg4.PageCode = 4;
4225		mdata.pdata.pg4.PageLength = sizeof (IPS_SCSI_MODE_PAGE4);
4226		mdata.hdr.DataLength =
4227		    3 + mdata.hdr.BlockDescLength + mdata.pdata.pg4.PageLength;
4228		mdata.pdata.pg4.CylindersHigh =
4229		    cpu_to_be16((cylinders >> 8) & 0xFFFF);
4230		mdata.pdata.pg4.CylindersLow = (cylinders & 0xFF);
4231		mdata.pdata.pg4.Heads = heads;
4232		mdata.pdata.pg4.WritePrecompHigh = 0;
4233		mdata.pdata.pg4.WritePrecompLow = 0;
4234		mdata.pdata.pg4.ReducedWriteCurrentHigh = 0;
4235		mdata.pdata.pg4.ReducedWriteCurrentLow = 0;
4236		mdata.pdata.pg4.StepRate = cpu_to_be16(1);
4237		mdata.pdata.pg4.LandingZoneHigh = 0;
4238		mdata.pdata.pg4.LandingZoneLow = 0;
4239		mdata.pdata.pg4.flags = 0;
4240		mdata.pdata.pg4.RotationalOffset = 0;
4241		mdata.pdata.pg4.MediumRotationRate = 0;
4242		break;
4243	case 0x8:
4244		mdata.pdata.pg8.PageCode = 8;
4245		mdata.pdata.pg8.PageLength = sizeof (IPS_SCSI_MODE_PAGE8);
4246		mdata.hdr.DataLength =
4247		    3 + mdata.hdr.BlockDescLength + mdata.pdata.pg8.PageLength;
4248		/* everything else is left set to 0 */
4249		break;
4250
4251	default:
4252		return (0);
4253	}			/* end switch */
4254
4255	ips_scmd_buf_write(scb->scsi_cmd, &mdata, sizeof (mdata));
4256
4257	return (1);
4258}
4259
4260/****************************************************************************/
4261/*                                                                          */
4262/* Routine Name: ips_reqsen                                                 */
4263/*                                                                          */
4264/* Routine Description:                                                     */
4265/*                                                                          */
4266/*   Simulate a request sense command to a logical drive                    */
4267/*                                                                          */
4268/****************************************************************************/
4269static int
4270ips_reqsen(ips_ha_t * ha, ips_scb_t * scb)
4271{
4272	IPS_SCSI_REQSEN reqsen;
4273
4274	METHOD_TRACE("ips_reqsen", 1);
4275
4276	memset(&reqsen, 0, sizeof (IPS_SCSI_REQSEN));
4277
4278	reqsen.ResponseCode =
4279	    IPS_SCSI_REQSEN_VALID | IPS_SCSI_REQSEN_CURRENT_ERR;
4280	reqsen.AdditionalLength = 10;
4281	reqsen.AdditionalSenseCode = IPS_SCSI_REQSEN_NO_SENSE;
4282	reqsen.AdditionalSenseCodeQual = IPS_SCSI_REQSEN_NO_SENSE;
4283
4284	ips_scmd_buf_write(scb->scsi_cmd, &reqsen, sizeof (reqsen));
4285
4286	return (1);
4287}
4288
4289/****************************************************************************/
4290/*                                                                          */
4291/* Routine Name: ips_free                                                   */
4292/*                                                                          */
4293/* Routine Description:                                                     */
4294/*                                                                          */
4295/*   Free any allocated space for this controller                           */
4296/*                                                                          */
4297/****************************************************************************/
4298static void
4299ips_free(ips_ha_t * ha)
4300{
4301
4302	METHOD_TRACE("ips_free", 1);
4303
4304	if (ha) {
4305		if (ha->enq) {
4306			pci_free_consistent(ha->pcidev, sizeof(IPS_ENQ),
4307					    ha->enq, ha->enq_busaddr);
4308			ha->enq = NULL;
4309		}
4310
4311		kfree(ha->conf);
4312		ha->conf = NULL;
4313
4314		if (ha->adapt) {
4315			pci_free_consistent(ha->pcidev,
4316					    sizeof (IPS_ADAPTER) +
4317					    sizeof (IPS_IO_CMD), ha->adapt,
4318					    ha->adapt->hw_status_start);
4319			ha->adapt = NULL;
4320		}
4321
4322		if (ha->logical_drive_info) {
4323			pci_free_consistent(ha->pcidev,
4324					    sizeof (IPS_LD_INFO),
4325					    ha->logical_drive_info,
4326					    ha->logical_drive_info_dma_addr);
4327			ha->logical_drive_info = NULL;
4328		}
4329
4330		kfree(ha->nvram);
4331		ha->nvram = NULL;
4332
4333		kfree(ha->subsys);
4334		ha->subsys = NULL;
4335
4336		if (ha->ioctl_data) {
4337			pci_free_consistent(ha->pcidev, ha->ioctl_len,
4338					    ha->ioctl_data, ha->ioctl_busaddr);
4339			ha->ioctl_data = NULL;
4340			ha->ioctl_datasize = 0;
4341			ha->ioctl_len = 0;
4342		}
4343		ips_deallocatescbs(ha, ha->max_cmds);
4344
4345		/* free memory mapped (if applicable) */
4346		if (ha->mem_ptr) {
4347			iounmap(ha->ioremap_ptr);
4348			ha->ioremap_ptr = NULL;
4349			ha->mem_ptr = NULL;
4350		}
4351
4352		ha->mem_addr = 0;
4353
4354	}
4355}
4356
4357/****************************************************************************/
4358/*                                                                          */
4359/* Routine Name: ips_deallocatescbs                                         */
4360/*                                                                          */
4361/* Routine Description:                                                     */
4362/*                                                                          */
4363/*   Free the command blocks                                                */
4364/*                                                                          */
4365/****************************************************************************/
4366static int
4367ips_deallocatescbs(ips_ha_t * ha, int cmds)
4368{
4369	if (ha->scbs) {
4370		pci_free_consistent(ha->pcidev,
4371				    IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * cmds,
4372				    ha->scbs->sg_list.list,
4373				    ha->scbs->sg_busaddr);
4374		pci_free_consistent(ha->pcidev, sizeof (ips_scb_t) * cmds,
4375				    ha->scbs, ha->scbs->scb_busaddr);
4376		ha->scbs = NULL;
4377	}			/* end if */
4378	return 1;
4379}
4380
4381/****************************************************************************/
4382/*                                                                          */
4383/* Routine Name: ips_allocatescbs                                           */
4384/*                                                                          */
4385/* Routine Description:                                                     */
4386/*                                                                          */
4387/*   Allocate the command blocks                                            */
4388/*                                                                          */
4389/****************************************************************************/
4390static int
4391ips_allocatescbs(ips_ha_t * ha)
4392{
4393	ips_scb_t *scb_p;
4394	IPS_SG_LIST ips_sg;
4395	int i;
4396	dma_addr_t command_dma, sg_dma;
4397
4398	METHOD_TRACE("ips_allocatescbs", 1);
4399
4400	/* Allocate memory for the SCBs */
4401	ha->scbs =
4402	    pci_alloc_consistent(ha->pcidev, ha->max_cmds * sizeof (ips_scb_t),
4403				 &command_dma);
4404	if (ha->scbs == NULL)
4405		return 0;
4406	ips_sg.list =
4407	    pci_alloc_consistent(ha->pcidev,
4408				 IPS_SGLIST_SIZE(ha) * IPS_MAX_SG *
4409				 ha->max_cmds, &sg_dma);
4410	if (ips_sg.list == NULL) {
4411		pci_free_consistent(ha->pcidev,
4412				    ha->max_cmds * sizeof (ips_scb_t), ha->scbs,
4413				    command_dma);
4414		return 0;
4415	}
4416
4417	memset(ha->scbs, 0, ha->max_cmds * sizeof (ips_scb_t));
4418
4419	for (i = 0; i < ha->max_cmds; i++) {
4420		scb_p = &ha->scbs[i];
4421		scb_p->scb_busaddr = command_dma + sizeof (ips_scb_t) * i;
4422		/* set up S/G list */
4423		if (IPS_USE_ENH_SGLIST(ha)) {
4424			scb_p->sg_list.enh_list =
4425			    ips_sg.enh_list + i * IPS_MAX_SG;
4426			scb_p->sg_busaddr =
4427			    sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4428		} else {
4429			scb_p->sg_list.std_list =
4430			    ips_sg.std_list + i * IPS_MAX_SG;
4431			scb_p->sg_busaddr =
4432			    sg_dma + IPS_SGLIST_SIZE(ha) * IPS_MAX_SG * i;
4433		}
4434
4435		/* add to the free list */
4436		if (i < ha->max_cmds - 1) {
4437			scb_p->q_next = ha->scb_freelist;
4438			ha->scb_freelist = scb_p;
4439		}
4440	}
4441
4442	/* success */
4443	return (1);
4444}
4445
4446/****************************************************************************/
4447/*                                                                          */
4448/* Routine Name: ips_init_scb                                               */
4449/*                                                                          */
4450/* Routine Description:                                                     */
4451/*                                                                          */
4452/*   Initialize a CCB to default values                                     */
4453/*                                                                          */
4454/****************************************************************************/
4455static void
4456ips_init_scb(ips_ha_t * ha, ips_scb_t * scb)
4457{
4458	IPS_SG_LIST sg_list;
4459	uint32_t cmd_busaddr, sg_busaddr;
4460	METHOD_TRACE("ips_init_scb", 1);
4461
4462	if (scb == NULL)
4463		return;
4464
4465	sg_list.list = scb->sg_list.list;
4466	cmd_busaddr = scb->scb_busaddr;
4467	sg_busaddr = scb->sg_busaddr;
4468	/* zero fill */
4469	memset(scb, 0, sizeof (ips_scb_t));
4470	memset(ha->dummy, 0, sizeof (IPS_IO_CMD));
4471
4472	/* Initialize dummy command bucket */
4473	ha->dummy->op_code = 0xFF;
4474	ha->dummy->ccsar = cpu_to_le32(ha->adapt->hw_status_start
4475				       + sizeof (IPS_ADAPTER));
4476	ha->dummy->command_id = IPS_MAX_CMDS;
4477
4478	/* set bus address of scb */
4479	scb->scb_busaddr = cmd_busaddr;
4480	scb->sg_busaddr = sg_busaddr;
4481	scb->sg_list.list = sg_list.list;
4482
4483	/* Neptune Fix */
4484	scb->cmd.basic_io.cccr = cpu_to_le32((uint32_t) IPS_BIT_ILE);
4485	scb->cmd.basic_io.ccsar = cpu_to_le32(ha->adapt->hw_status_start
4486					      + sizeof (IPS_ADAPTER));
4487}
4488
4489/****************************************************************************/
4490/*                                                                          */
4491/* Routine Name: ips_get_scb                                                */
4492/*                                                                          */
4493/* Routine Description:                                                     */
4494/*                                                                          */
4495/*   Initialize a CCB to default values                                     */
4496/*                                                                          */
4497/* ASSUMED to be callled from within a lock                                 */
4498/*                                                                          */
4499/****************************************************************************/
4500static ips_scb_t *
4501ips_getscb(ips_ha_t * ha)
4502{
4503	ips_scb_t *scb;
4504
4505	METHOD_TRACE("ips_getscb", 1);
4506
4507	if ((scb = ha->scb_freelist) == NULL) {
4508
4509		return (NULL);
4510	}
4511
4512	ha->scb_freelist = scb->q_next;
4513	scb->flags = 0;
4514	scb->q_next = NULL;
4515
4516	ips_init_scb(ha, scb);
4517
4518	return (scb);
4519}
4520
4521/****************************************************************************/
4522/*                                                                          */
4523/* Routine Name: ips_free_scb                                               */
4524/*                                                                          */
4525/* Routine Description:                                                     */
4526/*                                                                          */
4527/*   Return an unused CCB back to the free list                             */
4528/*                                                                          */
4529/* ASSUMED to be called from within a lock                                  */
4530/*                                                                          */
4531/****************************************************************************/
4532static void
4533ips_freescb(ips_ha_t * ha, ips_scb_t * scb)
4534{
4535
4536	METHOD_TRACE("ips_freescb", 1);
4537	if (scb->flags & IPS_SCB_MAP_SG)
4538                scsi_dma_unmap(scb->scsi_cmd);
4539	else if (scb->flags & IPS_SCB_MAP_SINGLE)
4540		pci_unmap_single(ha->pcidev, scb->data_busaddr, scb->data_len,
4541				 IPS_DMA_DIR(scb));
4542
4543	/* check to make sure this is not our "special" scb */
4544	if (IPS_COMMAND_ID(ha, scb) < (ha->max_cmds - 1)) {
4545		scb->q_next = ha->scb_freelist;
4546		ha->scb_freelist = scb;
4547	}
4548}
4549
4550/****************************************************************************/
4551/*                                                                          */
4552/* Routine Name: ips_isinit_copperhead                                      */
4553/*                                                                          */
4554/* Routine Description:                                                     */
4555/*                                                                          */
4556/*   Is controller initialized ?                                            */
4557/*                                                                          */
4558/****************************************************************************/
4559static int
4560ips_isinit_copperhead(ips_ha_t * ha)
4561{
4562	uint8_t scpr;
4563	uint8_t isr;
4564
4565	METHOD_TRACE("ips_isinit_copperhead", 1);
4566
4567	isr = inb(ha->io_addr + IPS_REG_HISR);
4568	scpr = inb(ha->io_addr + IPS_REG_SCPR);
4569
4570	if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4571		return (0);
4572	else
4573		return (1);
4574}
4575
4576/****************************************************************************/
4577/*                                                                          */
4578/* Routine Name: ips_isinit_copperhead_memio                                */
4579/*                                                                          */
4580/* Routine Description:                                                     */
4581/*                                                                          */
4582/*   Is controller initialized ?                                            */
4583/*                                                                          */
4584/****************************************************************************/
4585static int
4586ips_isinit_copperhead_memio(ips_ha_t * ha)
4587{
4588	uint8_t isr = 0;
4589	uint8_t scpr;
4590
4591	METHOD_TRACE("ips_is_init_copperhead_memio", 1);
4592
4593	isr = readb(ha->mem_ptr + IPS_REG_HISR);
4594	scpr = readb(ha->mem_ptr + IPS_REG_SCPR);
4595
4596	if (((isr & IPS_BIT_EI) == 0) && ((scpr & IPS_BIT_EBM) == 0))
4597		return (0);
4598	else
4599		return (1);
4600}
4601
4602/****************************************************************************/
4603/*                                                                          */
4604/* Routine Name: ips_isinit_morpheus                                        */
4605/*                                                                          */
4606/* Routine Description:                                                     */
4607/*                                                                          */
4608/*   Is controller initialized ?                                            */
4609/*                                                                          */
4610/****************************************************************************/
4611static int
4612ips_isinit_morpheus(ips_ha_t * ha)
4613{
4614	uint32_t post;
4615	uint32_t bits;
4616
4617	METHOD_TRACE("ips_is_init_morpheus", 1);
4618
4619	if (ips_isintr_morpheus(ha))
4620	    ips_flush_and_reset(ha);
4621
4622	post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
4623	bits = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4624
4625	if (post == 0)
4626		return (0);
4627	else if (bits & 0x3)
4628		return (0);
4629	else
4630		return (1);
4631}
4632
4633/****************************************************************************/
4634/*                                                                          */
4635/* Routine Name: ips_flush_and_reset                                        */
4636/*                                                                          */
4637/* Routine Description:                                                     */
4638/*                                                                          */
4639/*   Perform cleanup ( FLUSH and RESET ) when the adapter is in an unknown  */
4640/*   state ( was trying to INIT and an interrupt was already pending ) ...  */
4641/*                                                                          */
4642/****************************************************************************/
4643static void
4644ips_flush_and_reset(ips_ha_t *ha)
4645{
4646	ips_scb_t *scb;
4647	int  ret;
4648 	int  time;
4649	int  done;
4650	dma_addr_t command_dma;
4651
4652	/* Create a usuable SCB */
4653	scb = pci_alloc_consistent(ha->pcidev, sizeof(ips_scb_t), &command_dma);
 
4654	if (scb) {
4655	    memset(scb, 0, sizeof(ips_scb_t));
4656	    ips_init_scb(ha, scb);
4657	    scb->scb_busaddr = command_dma;
4658
4659	    scb->timeout = ips_cmd_timeout;
4660	    scb->cdb[0] = IPS_CMD_FLUSH;
4661
4662	    scb->cmd.flush_cache.op_code = IPS_CMD_FLUSH;
4663	    scb->cmd.flush_cache.command_id = IPS_MAX_CMDS;   /* Use an ID that would otherwise not exist */
4664	    scb->cmd.flush_cache.state = IPS_NORM_STATE;
4665	    scb->cmd.flush_cache.reserved = 0;
4666	    scb->cmd.flush_cache.reserved2 = 0;
4667	    scb->cmd.flush_cache.reserved3 = 0;
4668	    scb->cmd.flush_cache.reserved4 = 0;
4669
4670	    ret = ips_send_cmd(ha, scb);                      /* Send the Flush Command */
4671
4672	    if (ret == IPS_SUCCESS) {
4673	        time = 60 * IPS_ONE_SEC;	              /* Max Wait time is 60 seconds */
4674	        done = 0;
4675
4676	        while ((time > 0) && (!done)) {
4677		   done = ips_poll_for_flush_complete(ha);
4678	           /* This may look evil, but it's only done during extremely rare start-up conditions ! */
4679	           udelay(1000);
4680	           time--;
4681	        }
4682        }
4683	}
4684
4685	/* Now RESET and INIT the adapter */
4686	(*ha->func.reset) (ha);
4687
4688	pci_free_consistent(ha->pcidev, sizeof(ips_scb_t), scb, command_dma);
4689	return;
4690}
4691
4692/****************************************************************************/
4693/*                                                                          */
4694/* Routine Name: ips_poll_for_flush_complete                                */
4695/*                                                                          */
4696/* Routine Description:                                                     */
4697/*                                                                          */
4698/*   Poll for the Flush Command issued by ips_flush_and_reset() to complete */
4699/*   All other responses are just taken off the queue and ignored           */
4700/*                                                                          */
4701/****************************************************************************/
4702static int
4703ips_poll_for_flush_complete(ips_ha_t * ha)
4704{
4705	IPS_STATUS cstatus;
4706
4707	while (TRUE) {
4708	    cstatus.value = (*ha->func.statupd) (ha);
4709
4710	    if (cstatus.value == 0xffffffff)      /* If No Interrupt to process */
4711			break;
4712
4713	    /* Success is when we see the Flush Command ID */
4714	    if (cstatus.fields.command_id == IPS_MAX_CMDS)
4715	        return 1;
4716	 }
4717
4718	return 0;
4719}
4720
4721/****************************************************************************/
4722/*                                                                          */
4723/* Routine Name: ips_enable_int_copperhead                                  */
4724/*                                                                          */
4725/* Routine Description:                                                     */
4726/*   Turn on interrupts                                                     */
4727/*                                                                          */
4728/****************************************************************************/
4729static void
4730ips_enable_int_copperhead(ips_ha_t * ha)
4731{
4732	METHOD_TRACE("ips_enable_int_copperhead", 1);
4733
4734	outb(ha->io_addr + IPS_REG_HISR, IPS_BIT_EI);
4735	inb(ha->io_addr + IPS_REG_HISR);	/*Ensure PCI Posting Completes*/
4736}
4737
4738/****************************************************************************/
4739/*                                                                          */
4740/* Routine Name: ips_enable_int_copperhead_memio                            */
4741/*                                                                          */
4742/* Routine Description:                                                     */
4743/*   Turn on interrupts                                                     */
4744/*                                                                          */
4745/****************************************************************************/
4746static void
4747ips_enable_int_copperhead_memio(ips_ha_t * ha)
4748{
4749	METHOD_TRACE("ips_enable_int_copperhead_memio", 1);
4750
4751	writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4752	readb(ha->mem_ptr + IPS_REG_HISR);	/*Ensure PCI Posting Completes*/
4753}
4754
4755/****************************************************************************/
4756/*                                                                          */
4757/* Routine Name: ips_enable_int_morpheus                                    */
4758/*                                                                          */
4759/* Routine Description:                                                     */
4760/*   Turn on interrupts                                                     */
4761/*                                                                          */
4762/****************************************************************************/
4763static void
4764ips_enable_int_morpheus(ips_ha_t * ha)
4765{
4766	uint32_t Oimr;
4767
4768	METHOD_TRACE("ips_enable_int_morpheus", 1);
4769
4770	Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
4771	Oimr &= ~0x08;
4772	writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
4773	readl(ha->mem_ptr + IPS_REG_I960_OIMR);	/*Ensure PCI Posting Completes*/
4774}
4775
4776/****************************************************************************/
4777/*                                                                          */
4778/* Routine Name: ips_init_copperhead                                        */
4779/*                                                                          */
4780/* Routine Description:                                                     */
4781/*                                                                          */
4782/*   Initialize a copperhead controller                                     */
4783/*                                                                          */
4784/****************************************************************************/
4785static int
4786ips_init_copperhead(ips_ha_t * ha)
4787{
4788	uint8_t Isr;
4789	uint8_t Cbsp;
4790	uint8_t PostByte[IPS_MAX_POST_BYTES];
4791	uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4792	int i, j;
4793
4794	METHOD_TRACE("ips_init_copperhead", 1);
4795
4796	for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4797		for (j = 0; j < 45; j++) {
4798			Isr = inb(ha->io_addr + IPS_REG_HISR);
4799			if (Isr & IPS_BIT_GHI)
4800				break;
4801
4802			/* Delay for 1 Second */
4803			MDELAY(IPS_ONE_SEC);
4804		}
4805
4806		if (j >= 45)
4807			/* error occurred */
4808			return (0);
4809
4810		PostByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4811		outb(Isr, ha->io_addr + IPS_REG_HISR);
4812	}
4813
4814	if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4815		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4816			   "reset controller fails (post status %x %x).\n",
4817			   PostByte[0], PostByte[1]);
4818
4819		return (0);
4820	}
4821
4822	for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4823		for (j = 0; j < 240; j++) {
4824			Isr = inb(ha->io_addr + IPS_REG_HISR);
4825			if (Isr & IPS_BIT_GHI)
4826				break;
4827
4828			/* Delay for 1 Second */
4829			MDELAY(IPS_ONE_SEC);
4830		}
4831
4832		if (j >= 240)
4833			/* error occurred */
4834			return (0);
4835
4836		ConfigByte[i] = inb(ha->io_addr + IPS_REG_ISPR);
4837		outb(Isr, ha->io_addr + IPS_REG_HISR);
4838	}
4839
4840	for (i = 0; i < 240; i++) {
4841		Cbsp = inb(ha->io_addr + IPS_REG_CBSP);
4842
4843		if ((Cbsp & IPS_BIT_OP) == 0)
4844			break;
4845
4846		/* Delay for 1 Second */
4847		MDELAY(IPS_ONE_SEC);
4848	}
4849
4850	if (i >= 240)
4851		/* reset failed */
4852		return (0);
4853
4854	/* setup CCCR */
4855	outl(0x1010, ha->io_addr + IPS_REG_CCCR);
4856
4857	/* Enable busmastering */
4858	outb(IPS_BIT_EBM, ha->io_addr + IPS_REG_SCPR);
4859
4860	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4861		/* fix for anaconda64 */
4862		outl(0, ha->io_addr + IPS_REG_NDAE);
4863
4864	/* Enable interrupts */
4865	outb(IPS_BIT_EI, ha->io_addr + IPS_REG_HISR);
4866
4867	return (1);
4868}
4869
4870/****************************************************************************/
4871/*                                                                          */
4872/* Routine Name: ips_init_copperhead_memio                                  */
4873/*                                                                          */
4874/* Routine Description:                                                     */
4875/*                                                                          */
4876/*   Initialize a copperhead controller with memory mapped I/O              */
4877/*                                                                          */
4878/****************************************************************************/
4879static int
4880ips_init_copperhead_memio(ips_ha_t * ha)
4881{
4882	uint8_t Isr = 0;
4883	uint8_t Cbsp;
4884	uint8_t PostByte[IPS_MAX_POST_BYTES];
4885	uint8_t ConfigByte[IPS_MAX_CONFIG_BYTES];
4886	int i, j;
4887
4888	METHOD_TRACE("ips_init_copperhead_memio", 1);
4889
4890	for (i = 0; i < IPS_MAX_POST_BYTES; i++) {
4891		for (j = 0; j < 45; j++) {
4892			Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4893			if (Isr & IPS_BIT_GHI)
4894				break;
4895
4896			/* Delay for 1 Second */
4897			MDELAY(IPS_ONE_SEC);
4898		}
4899
4900		if (j >= 45)
4901			/* error occurred */
4902			return (0);
4903
4904		PostByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4905		writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4906	}
4907
4908	if (PostByte[0] < IPS_GOOD_POST_STATUS) {
4909		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4910			   "reset controller fails (post status %x %x).\n",
4911			   PostByte[0], PostByte[1]);
4912
4913		return (0);
4914	}
4915
4916	for (i = 0; i < IPS_MAX_CONFIG_BYTES; i++) {
4917		for (j = 0; j < 240; j++) {
4918			Isr = readb(ha->mem_ptr + IPS_REG_HISR);
4919			if (Isr & IPS_BIT_GHI)
4920				break;
4921
4922			/* Delay for 1 Second */
4923			MDELAY(IPS_ONE_SEC);
4924		}
4925
4926		if (j >= 240)
4927			/* error occurred */
4928			return (0);
4929
4930		ConfigByte[i] = readb(ha->mem_ptr + IPS_REG_ISPR);
4931		writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
4932	}
4933
4934	for (i = 0; i < 240; i++) {
4935		Cbsp = readb(ha->mem_ptr + IPS_REG_CBSP);
4936
4937		if ((Cbsp & IPS_BIT_OP) == 0)
4938			break;
4939
4940		/* Delay for 1 Second */
4941		MDELAY(IPS_ONE_SEC);
4942	}
4943
4944	if (i >= 240)
4945		/* error occurred */
4946		return (0);
4947
4948	/* setup CCCR */
4949	writel(0x1010, ha->mem_ptr + IPS_REG_CCCR);
4950
4951	/* Enable busmastering */
4952	writeb(IPS_BIT_EBM, ha->mem_ptr + IPS_REG_SCPR);
4953
4954	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
4955		/* fix for anaconda64 */
4956		writel(0, ha->mem_ptr + IPS_REG_NDAE);
4957
4958	/* Enable interrupts */
4959	writeb(IPS_BIT_EI, ha->mem_ptr + IPS_REG_HISR);
4960
4961	/* if we get here then everything went OK */
4962	return (1);
4963}
4964
4965/****************************************************************************/
4966/*                                                                          */
4967/* Routine Name: ips_init_morpheus                                          */
4968/*                                                                          */
4969/* Routine Description:                                                     */
4970/*                                                                          */
4971/*   Initialize a morpheus controller                                       */
4972/*                                                                          */
4973/****************************************************************************/
4974static int
4975ips_init_morpheus(ips_ha_t * ha)
4976{
4977	uint32_t Post;
4978	uint32_t Config;
4979	uint32_t Isr;
4980	uint32_t Oimr;
4981	int i;
4982
4983	METHOD_TRACE("ips_init_morpheus", 1);
4984
4985	/* Wait up to 45 secs for Post */
4986	for (i = 0; i < 45; i++) {
4987		Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
4988
4989		if (Isr & IPS_BIT_I960_MSG0I)
4990			break;
4991
4992		/* Delay for 1 Second */
4993		MDELAY(IPS_ONE_SEC);
4994	}
4995
4996	if (i >= 45) {
4997		/* error occurred */
4998		IPS_PRINTK(KERN_WARNING, ha->pcidev,
4999			   "timeout waiting for post.\n");
5000
5001		return (0);
5002	}
5003
5004	Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
5005
5006	if (Post == 0x4F00) {	/* If Flashing the Battery PIC         */
5007		IPS_PRINTK(KERN_WARNING, ha->pcidev,
5008			   "Flashing Battery PIC, Please wait ...\n");
5009
5010		/* Clear the interrupt bit */
5011		Isr = (uint32_t) IPS_BIT_I960_MSG0I;
5012		writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
5013
5014		for (i = 0; i < 120; i++) {	/*    Wait Up to 2 Min. for Completion */
5015			Post = readl(ha->mem_ptr + IPS_REG_I960_MSG0);
5016			if (Post != 0x4F00)
5017				break;
5018			/* Delay for 1 Second */
5019			MDELAY(IPS_ONE_SEC);
5020		}
5021
5022		if (i >= 120) {
5023			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5024				   "timeout waiting for Battery PIC Flash\n");
5025			return (0);
5026		}
5027
5028	}
5029
5030	/* Clear the interrupt bit */
5031	Isr = (uint32_t) IPS_BIT_I960_MSG0I;
5032	writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
5033
5034	if (Post < (IPS_GOOD_POST_STATUS << 8)) {
5035		IPS_PRINTK(KERN_WARNING, ha->pcidev,
5036			   "reset controller fails (post status %x).\n", Post);
5037
5038		return (0);
5039	}
5040
5041	/* Wait up to 240 secs for config bytes */
5042	for (i = 0; i < 240; i++) {
5043		Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5044
5045		if (Isr & IPS_BIT_I960_MSG1I)
5046			break;
5047
5048		/* Delay for 1 Second */
5049		MDELAY(IPS_ONE_SEC);
5050	}
5051
5052	if (i >= 240) {
5053		/* error occurred */
5054		IPS_PRINTK(KERN_WARNING, ha->pcidev,
5055			   "timeout waiting for config.\n");
5056
5057		return (0);
5058	}
5059
5060	Config = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
5061
5062	/* Clear interrupt bit */
5063	Isr = (uint32_t) IPS_BIT_I960_MSG1I;
5064	writel(Isr, ha->mem_ptr + IPS_REG_I2O_HIR);
5065
5066	/* Turn on the interrupts */
5067	Oimr = readl(ha->mem_ptr + IPS_REG_I960_OIMR);
5068	Oimr &= ~0x8;
5069	writel(Oimr, ha->mem_ptr + IPS_REG_I960_OIMR);
5070
5071	/* if we get here then everything went OK */
5072
5073	/* Since we did a RESET, an EraseStripeLock may be needed */
5074	if (Post == 0xEF10) {
5075		if ((Config == 0x000F) || (Config == 0x0009))
5076			ha->requires_esl = 1;
5077	}
5078
5079	return (1);
5080}
5081
5082/****************************************************************************/
5083/*                                                                          */
5084/* Routine Name: ips_reset_copperhead                                       */
5085/*                                                                          */
5086/* Routine Description:                                                     */
5087/*                                                                          */
5088/*   Reset the controller                                                   */
5089/*                                                                          */
5090/****************************************************************************/
5091static int
5092ips_reset_copperhead(ips_ha_t * ha)
5093{
5094	int reset_counter;
5095
5096	METHOD_TRACE("ips_reset_copperhead", 1);
5097
5098	DEBUG_VAR(1, "(%s%d) ips_reset_copperhead: io addr: %x, irq: %d",
5099		  ips_name, ha->host_num, ha->io_addr, ha->pcidev->irq);
5100
5101	reset_counter = 0;
5102
5103	while (reset_counter < 2) {
5104		reset_counter++;
5105
5106		outb(IPS_BIT_RST, ha->io_addr + IPS_REG_SCPR);
5107
5108		/* Delay for 1 Second */
5109		MDELAY(IPS_ONE_SEC);
5110
5111		outb(0, ha->io_addr + IPS_REG_SCPR);
5112
5113		/* Delay for 1 Second */
5114		MDELAY(IPS_ONE_SEC);
5115
5116		if ((*ha->func.init) (ha))
5117			break;
5118		else if (reset_counter >= 2) {
5119
5120			return (0);
5121		}
5122	}
5123
5124	return (1);
5125}
5126
5127/****************************************************************************/
5128/*                                                                          */
5129/* Routine Name: ips_reset_copperhead_memio                                 */
5130/*                                                                          */
5131/* Routine Description:                                                     */
5132/*                                                                          */
5133/*   Reset the controller                                                   */
5134/*                                                                          */
5135/****************************************************************************/
5136static int
5137ips_reset_copperhead_memio(ips_ha_t * ha)
5138{
5139	int reset_counter;
5140
5141	METHOD_TRACE("ips_reset_copperhead_memio", 1);
5142
5143	DEBUG_VAR(1, "(%s%d) ips_reset_copperhead_memio: mem addr: %x, irq: %d",
5144		  ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5145
5146	reset_counter = 0;
5147
5148	while (reset_counter < 2) {
5149		reset_counter++;
5150
5151		writeb(IPS_BIT_RST, ha->mem_ptr + IPS_REG_SCPR);
5152
5153		/* Delay for 1 Second */
5154		MDELAY(IPS_ONE_SEC);
5155
5156		writeb(0, ha->mem_ptr + IPS_REG_SCPR);
5157
5158		/* Delay for 1 Second */
5159		MDELAY(IPS_ONE_SEC);
5160
5161		if ((*ha->func.init) (ha))
5162			break;
5163		else if (reset_counter >= 2) {
5164
5165			return (0);
5166		}
5167	}
5168
5169	return (1);
5170}
5171
5172/****************************************************************************/
5173/*                                                                          */
5174/* Routine Name: ips_reset_morpheus                                         */
5175/*                                                                          */
5176/* Routine Description:                                                     */
5177/*                                                                          */
5178/*   Reset the controller                                                   */
5179/*                                                                          */
5180/****************************************************************************/
5181static int
5182ips_reset_morpheus(ips_ha_t * ha)
5183{
5184	int reset_counter;
5185	uint8_t junk;
5186
5187	METHOD_TRACE("ips_reset_morpheus", 1);
5188
5189	DEBUG_VAR(1, "(%s%d) ips_reset_morpheus: mem addr: %x, irq: %d",
5190		  ips_name, ha->host_num, ha->mem_addr, ha->pcidev->irq);
5191
5192	reset_counter = 0;
5193
5194	while (reset_counter < 2) {
5195		reset_counter++;
5196
5197		writel(0x80000000, ha->mem_ptr + IPS_REG_I960_IDR);
5198
5199		/* Delay for 5 Seconds */
5200		MDELAY(5 * IPS_ONE_SEC);
5201
5202		/* Do a PCI config read to wait for adapter */
5203		pci_read_config_byte(ha->pcidev, 4, &junk);
5204
5205		if ((*ha->func.init) (ha))
5206			break;
5207		else if (reset_counter >= 2) {
5208
5209			return (0);
5210		}
5211	}
5212
5213	return (1);
5214}
5215
5216/****************************************************************************/
5217/*                                                                          */
5218/* Routine Name: ips_statinit                                               */
5219/*                                                                          */
5220/* Routine Description:                                                     */
5221/*                                                                          */
5222/*   Initialize the status queues on the controller                         */
5223/*                                                                          */
5224/****************************************************************************/
5225static void
5226ips_statinit(ips_ha_t * ha)
5227{
5228	uint32_t phys_status_start;
5229
5230	METHOD_TRACE("ips_statinit", 1);
5231
5232	ha->adapt->p_status_start = ha->adapt->status;
5233	ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5234	ha->adapt->p_status_tail = ha->adapt->status;
5235
5236	phys_status_start = ha->adapt->hw_status_start;
5237	outl(phys_status_start, ha->io_addr + IPS_REG_SQSR);
5238	outl(phys_status_start + IPS_STATUS_Q_SIZE,
5239	     ha->io_addr + IPS_REG_SQER);
5240	outl(phys_status_start + IPS_STATUS_SIZE,
5241	     ha->io_addr + IPS_REG_SQHR);
5242	outl(phys_status_start, ha->io_addr + IPS_REG_SQTR);
5243
5244	ha->adapt->hw_status_tail = phys_status_start;
5245}
5246
5247/****************************************************************************/
5248/*                                                                          */
5249/* Routine Name: ips_statinit_memio                                         */
5250/*                                                                          */
5251/* Routine Description:                                                     */
5252/*                                                                          */
5253/*   Initialize the status queues on the controller                         */
5254/*                                                                          */
5255/****************************************************************************/
5256static void
5257ips_statinit_memio(ips_ha_t * ha)
5258{
5259	uint32_t phys_status_start;
5260
5261	METHOD_TRACE("ips_statinit_memio", 1);
5262
5263	ha->adapt->p_status_start = ha->adapt->status;
5264	ha->adapt->p_status_end = ha->adapt->status + IPS_MAX_CMDS;
5265	ha->adapt->p_status_tail = ha->adapt->status;
5266
5267	phys_status_start = ha->adapt->hw_status_start;
5268	writel(phys_status_start, ha->mem_ptr + IPS_REG_SQSR);
5269	writel(phys_status_start + IPS_STATUS_Q_SIZE,
5270	       ha->mem_ptr + IPS_REG_SQER);
5271	writel(phys_status_start + IPS_STATUS_SIZE, ha->mem_ptr + IPS_REG_SQHR);
5272	writel(phys_status_start, ha->mem_ptr + IPS_REG_SQTR);
5273
5274	ha->adapt->hw_status_tail = phys_status_start;
5275}
5276
5277/****************************************************************************/
5278/*                                                                          */
5279/* Routine Name: ips_statupd_copperhead                                     */
5280/*                                                                          */
5281/* Routine Description:                                                     */
5282/*                                                                          */
5283/*   Remove an element from the status queue                                */
5284/*                                                                          */
5285/****************************************************************************/
5286static uint32_t
5287ips_statupd_copperhead(ips_ha_t * ha)
5288{
5289	METHOD_TRACE("ips_statupd_copperhead", 1);
5290
5291	if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5292		ha->adapt->p_status_tail++;
5293		ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5294	} else {
5295		ha->adapt->p_status_tail = ha->adapt->p_status_start;
5296		ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5297	}
5298
5299	outl(ha->adapt->hw_status_tail,
5300	     ha->io_addr + IPS_REG_SQTR);
5301
5302	return (ha->adapt->p_status_tail->value);
5303}
5304
5305/****************************************************************************/
5306/*                                                                          */
5307/* Routine Name: ips_statupd_copperhead_memio                               */
5308/*                                                                          */
5309/* Routine Description:                                                     */
5310/*                                                                          */
5311/*   Remove an element from the status queue                                */
5312/*                                                                          */
5313/****************************************************************************/
5314static uint32_t
5315ips_statupd_copperhead_memio(ips_ha_t * ha)
5316{
5317	METHOD_TRACE("ips_statupd_copperhead_memio", 1);
5318
5319	if (ha->adapt->p_status_tail != ha->adapt->p_status_end) {
5320		ha->adapt->p_status_tail++;
5321		ha->adapt->hw_status_tail += sizeof (IPS_STATUS);
5322	} else {
5323		ha->adapt->p_status_tail = ha->adapt->p_status_start;
5324		ha->adapt->hw_status_tail = ha->adapt->hw_status_start;
5325	}
5326
5327	writel(ha->adapt->hw_status_tail, ha->mem_ptr + IPS_REG_SQTR);
5328
5329	return (ha->adapt->p_status_tail->value);
5330}
5331
5332/****************************************************************************/
5333/*                                                                          */
5334/* Routine Name: ips_statupd_morpheus                                       */
5335/*                                                                          */
5336/* Routine Description:                                                     */
5337/*                                                                          */
5338/*   Remove an element from the status queue                                */
5339/*                                                                          */
5340/****************************************************************************/
5341static uint32_t
5342ips_statupd_morpheus(ips_ha_t * ha)
5343{
5344	uint32_t val;
5345
5346	METHOD_TRACE("ips_statupd_morpheus", 1);
5347
5348	val = readl(ha->mem_ptr + IPS_REG_I2O_OUTMSGQ);
5349
5350	return (val);
5351}
5352
5353/****************************************************************************/
5354/*                                                                          */
5355/* Routine Name: ips_issue_copperhead                                       */
5356/*                                                                          */
5357/* Routine Description:                                                     */
5358/*                                                                          */
5359/*   Send a command down to the controller                                  */
5360/*                                                                          */
5361/****************************************************************************/
5362static int
5363ips_issue_copperhead(ips_ha_t * ha, ips_scb_t * scb)
5364{
5365	uint32_t TimeOut;
5366	uint32_t val;
5367
5368	METHOD_TRACE("ips_issue_copperhead", 1);
5369
5370	if (scb->scsi_cmd) {
5371		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5372			  ips_name,
5373			  ha->host_num,
5374			  scb->cdb[0],
5375			  scb->cmd.basic_io.command_id,
5376			  scb->bus, scb->target_id, scb->lun);
5377	} else {
5378		DEBUG_VAR(2, KERN_NOTICE "(%s%d) ips_issue: logical cmd id %d",
5379			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5380	}
5381
5382	TimeOut = 0;
5383
5384	while ((val =
5385		le32_to_cpu(inl(ha->io_addr + IPS_REG_CCCR))) & IPS_BIT_SEM) {
5386		udelay(1000);
5387
5388		if (++TimeOut >= IPS_SEM_TIMEOUT) {
5389			if (!(val & IPS_BIT_START_STOP))
5390				break;
5391
5392			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5393				   "ips_issue val [0x%x].\n", val);
5394			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5395				   "ips_issue semaphore chk timeout.\n");
5396
5397			return (IPS_FAILURE);
5398		}		/* end if */
5399	}			/* end while */
5400
5401	outl(scb->scb_busaddr, ha->io_addr + IPS_REG_CCSAR);
5402	outw(IPS_BIT_START_CMD, ha->io_addr + IPS_REG_CCCR);
5403
5404	return (IPS_SUCCESS);
5405}
5406
5407/****************************************************************************/
5408/*                                                                          */
5409/* Routine Name: ips_issue_copperhead_memio                                 */
5410/*                                                                          */
5411/* Routine Description:                                                     */
5412/*                                                                          */
5413/*   Send a command down to the controller                                  */
5414/*                                                                          */
5415/****************************************************************************/
5416static int
5417ips_issue_copperhead_memio(ips_ha_t * ha, ips_scb_t * scb)
5418{
5419	uint32_t TimeOut;
5420	uint32_t val;
5421
5422	METHOD_TRACE("ips_issue_copperhead_memio", 1);
5423
5424	if (scb->scsi_cmd) {
5425		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5426			  ips_name,
5427			  ha->host_num,
5428			  scb->cdb[0],
5429			  scb->cmd.basic_io.command_id,
5430			  scb->bus, scb->target_id, scb->lun);
5431	} else {
5432		DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5433			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5434	}
5435
5436	TimeOut = 0;
5437
5438	while ((val = readl(ha->mem_ptr + IPS_REG_CCCR)) & IPS_BIT_SEM) {
5439		udelay(1000);
5440
5441		if (++TimeOut >= IPS_SEM_TIMEOUT) {
5442			if (!(val & IPS_BIT_START_STOP))
5443				break;
5444
5445			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5446				   "ips_issue val [0x%x].\n", val);
5447			IPS_PRINTK(KERN_WARNING, ha->pcidev,
5448				   "ips_issue semaphore chk timeout.\n");
5449
5450			return (IPS_FAILURE);
5451		}		/* end if */
5452	}			/* end while */
5453
5454	writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_CCSAR);
5455	writel(IPS_BIT_START_CMD, ha->mem_ptr + IPS_REG_CCCR);
5456
5457	return (IPS_SUCCESS);
5458}
5459
5460/****************************************************************************/
5461/*                                                                          */
5462/* Routine Name: ips_issue_i2o                                              */
5463/*                                                                          */
5464/* Routine Description:                                                     */
5465/*                                                                          */
5466/*   Send a command down to the controller                                  */
5467/*                                                                          */
5468/****************************************************************************/
5469static int
5470ips_issue_i2o(ips_ha_t * ha, ips_scb_t * scb)
5471{
5472
5473	METHOD_TRACE("ips_issue_i2o", 1);
5474
5475	if (scb->scsi_cmd) {
5476		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5477			  ips_name,
5478			  ha->host_num,
5479			  scb->cdb[0],
5480			  scb->cmd.basic_io.command_id,
5481			  scb->bus, scb->target_id, scb->lun);
5482	} else {
5483		DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5484			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5485	}
5486
5487	outl(scb->scb_busaddr, ha->io_addr + IPS_REG_I2O_INMSGQ);
5488
5489	return (IPS_SUCCESS);
5490}
5491
5492/****************************************************************************/
5493/*                                                                          */
5494/* Routine Name: ips_issue_i2o_memio                                        */
5495/*                                                                          */
5496/* Routine Description:                                                     */
5497/*                                                                          */
5498/*   Send a command down to the controller                                  */
5499/*                                                                          */
5500/****************************************************************************/
5501static int
5502ips_issue_i2o_memio(ips_ha_t * ha, ips_scb_t * scb)
5503{
5504
5505	METHOD_TRACE("ips_issue_i2o_memio", 1);
5506
5507	if (scb->scsi_cmd) {
5508		DEBUG_VAR(2, "(%s%d) ips_issue: cmd 0x%X id %d (%d %d %d)",
5509			  ips_name,
5510			  ha->host_num,
5511			  scb->cdb[0],
5512			  scb->cmd.basic_io.command_id,
5513			  scb->bus, scb->target_id, scb->lun);
5514	} else {
5515		DEBUG_VAR(2, "(%s%d) ips_issue: logical cmd id %d",
5516			  ips_name, ha->host_num, scb->cmd.basic_io.command_id);
5517	}
5518
5519	writel(scb->scb_busaddr, ha->mem_ptr + IPS_REG_I2O_INMSGQ);
5520
5521	return (IPS_SUCCESS);
5522}
5523
5524/****************************************************************************/
5525/*                                                                          */
5526/* Routine Name: ips_isintr_copperhead                                      */
5527/*                                                                          */
5528/* Routine Description:                                                     */
5529/*                                                                          */
5530/*   Test to see if an interrupt is for us                                  */
5531/*                                                                          */
5532/****************************************************************************/
5533static int
5534ips_isintr_copperhead(ips_ha_t * ha)
5535{
5536	uint8_t Isr;
5537
5538	METHOD_TRACE("ips_isintr_copperhead", 2);
5539
5540	Isr = inb(ha->io_addr + IPS_REG_HISR);
5541
5542	if (Isr == 0xFF)
5543		/* ?!?! Nothing really there */
5544		return (0);
5545
5546	if (Isr & IPS_BIT_SCE)
5547		return (1);
5548	else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5549		/* status queue overflow or GHI */
5550		/* just clear the interrupt */
5551		outb(Isr, ha->io_addr + IPS_REG_HISR);
5552	}
5553
5554	return (0);
5555}
5556
5557/****************************************************************************/
5558/*                                                                          */
5559/* Routine Name: ips_isintr_copperhead_memio                                */
5560/*                                                                          */
5561/* Routine Description:                                                     */
5562/*                                                                          */
5563/*   Test to see if an interrupt is for us                                  */
5564/*                                                                          */
5565/****************************************************************************/
5566static int
5567ips_isintr_copperhead_memio(ips_ha_t * ha)
5568{
5569	uint8_t Isr;
5570
5571	METHOD_TRACE("ips_isintr_memio", 2);
5572
5573	Isr = readb(ha->mem_ptr + IPS_REG_HISR);
5574
5575	if (Isr == 0xFF)
5576		/* ?!?! Nothing really there */
5577		return (0);
5578
5579	if (Isr & IPS_BIT_SCE)
5580		return (1);
5581	else if (Isr & (IPS_BIT_SQO | IPS_BIT_GHI)) {
5582		/* status queue overflow or GHI */
5583		/* just clear the interrupt */
5584		writeb(Isr, ha->mem_ptr + IPS_REG_HISR);
5585	}
5586
5587	return (0);
5588}
5589
5590/****************************************************************************/
5591/*                                                                          */
5592/* Routine Name: ips_isintr_morpheus                                        */
5593/*                                                                          */
5594/* Routine Description:                                                     */
5595/*                                                                          */
5596/*   Test to see if an interrupt is for us                                  */
5597/*                                                                          */
5598/****************************************************************************/
5599static int
5600ips_isintr_morpheus(ips_ha_t * ha)
5601{
5602	uint32_t Isr;
5603
5604	METHOD_TRACE("ips_isintr_morpheus", 2);
5605
5606	Isr = readl(ha->mem_ptr + IPS_REG_I2O_HIR);
5607
5608	if (Isr & IPS_BIT_I2O_OPQI)
5609		return (1);
5610	else
5611		return (0);
5612}
5613
5614/****************************************************************************/
5615/*                                                                          */
5616/* Routine Name: ips_wait                                                   */
5617/*                                                                          */
5618/* Routine Description:                                                     */
5619/*                                                                          */
5620/*   Wait for a command to complete                                         */
5621/*                                                                          */
5622/****************************************************************************/
5623static int
5624ips_wait(ips_ha_t * ha, int time, int intr)
5625{
5626	int ret;
5627	int done;
5628
5629	METHOD_TRACE("ips_wait", 1);
5630
5631	ret = IPS_FAILURE;
5632	done = FALSE;
5633
5634	time *= IPS_ONE_SEC;	/* convert seconds */
5635
5636	while ((time > 0) && (!done)) {
5637		if (intr == IPS_INTR_ON) {
5638			if (ha->waitflag == FALSE) {
5639				ret = IPS_SUCCESS;
5640				done = TRUE;
5641				break;
5642			}
5643		} else if (intr == IPS_INTR_IORL) {
5644			if (ha->waitflag == FALSE) {
5645				/*
5646				 * controller generated an interrupt to
5647				 * acknowledge completion of the command
5648				 * and ips_intr() has serviced the interrupt.
5649				 */
5650				ret = IPS_SUCCESS;
5651				done = TRUE;
5652				break;
5653			}
5654
5655			/*
5656			 * NOTE: we already have the io_request_lock so
5657			 * even if we get an interrupt it won't get serviced
5658			 * until after we finish.
5659			 */
5660
5661			(*ha->func.intr) (ha);
5662		}
5663
5664		/* This looks like a very evil loop, but it only does this during start-up */
5665		udelay(1000);
5666		time--;
5667	}
5668
5669	return (ret);
5670}
5671
5672/****************************************************************************/
5673/*                                                                          */
5674/* Routine Name: ips_write_driver_status                                    */
5675/*                                                                          */
5676/* Routine Description:                                                     */
5677/*                                                                          */
5678/*   Write OS/Driver version to Page 5 of the nvram on the controller       */
5679/*                                                                          */
5680/****************************************************************************/
5681static int
5682ips_write_driver_status(ips_ha_t * ha, int intr)
5683{
5684	METHOD_TRACE("ips_write_driver_status", 1);
5685
5686	if (!ips_readwrite_page5(ha, FALSE, intr)) {
5687		IPS_PRINTK(KERN_WARNING, ha->pcidev,
5688			   "unable to read NVRAM page 5.\n");
5689
5690		return (0);
5691	}
5692
5693	/* check to make sure the page has a valid */
5694	/* signature */
5695	if (le32_to_cpu(ha->nvram->signature) != IPS_NVRAM_P5_SIG) {
5696		DEBUG_VAR(1,
5697			  "(%s%d) NVRAM page 5 has an invalid signature: %X.",
5698			  ips_name, ha->host_num, ha->nvram->signature);
5699		ha->nvram->signature = IPS_NVRAM_P5_SIG;
5700	}
5701
5702	DEBUG_VAR(2,
5703		  "(%s%d) Ad Type: %d, Ad Slot: %d, BIOS: %c%c%c%c %c%c%c%c.",
5704		  ips_name, ha->host_num, le16_to_cpu(ha->nvram->adapter_type),
5705		  ha->nvram->adapter_slot, ha->nvram->bios_high[0],
5706		  ha->nvram->bios_high[1], ha->nvram->bios_high[2],
5707		  ha->nvram->bios_high[3], ha->nvram->bios_low[0],
5708		  ha->nvram->bios_low[1], ha->nvram->bios_low[2],
5709		  ha->nvram->bios_low[3]);
5710
5711	ips_get_bios_version(ha, intr);
5712
5713	/* change values (as needed) */
5714	ha->nvram->operating_system = IPS_OS_LINUX;
5715	ha->nvram->adapter_type = ha->ad_type;
5716	strncpy((char *) ha->nvram->driver_high, IPS_VERSION_HIGH, 4);
5717	strncpy((char *) ha->nvram->driver_low, IPS_VERSION_LOW, 4);
5718	strncpy((char *) ha->nvram->bios_high, ha->bios_version, 4);
5719	strncpy((char *) ha->nvram->bios_low, ha->bios_version + 4, 4);
5720
5721	ha->nvram->versioning = 0;	/* Indicate the Driver Does Not Support Versioning */
5722
5723	/* now update the page */
5724	if (!ips_readwrite_page5(ha, TRUE, intr)) {
5725		IPS_PRINTK(KERN_WARNING, ha->pcidev,
5726			   "unable to write NVRAM page 5.\n");
5727
5728		return (0);
5729	}
5730
5731	/* IF NVRAM Page 5 is OK, Use it for Slot Number Info Because Linux Doesn't Do Slots */
5732	ha->slot_num = ha->nvram->adapter_slot;
5733
5734	return (1);
5735}
5736
5737/****************************************************************************/
5738/*                                                                          */
5739/* Routine Name: ips_read_adapter_status                                    */
5740/*                                                                          */
5741/* Routine Description:                                                     */
5742/*                                                                          */
5743/*   Do an Inquiry command to the adapter                                   */
5744/*                                                                          */
5745/****************************************************************************/
5746static int
5747ips_read_adapter_status(ips_ha_t * ha, int intr)
5748{
5749	ips_scb_t *scb;
5750	int ret;
5751
5752	METHOD_TRACE("ips_read_adapter_status", 1);
5753
5754	scb = &ha->scbs[ha->max_cmds - 1];
5755
5756	ips_init_scb(ha, scb);
5757
5758	scb->timeout = ips_cmd_timeout;
5759	scb->cdb[0] = IPS_CMD_ENQUIRY;
5760
5761	scb->cmd.basic_io.op_code = IPS_CMD_ENQUIRY;
5762	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5763	scb->cmd.basic_io.sg_count = 0;
5764	scb->cmd.basic_io.lba = 0;
5765	scb->cmd.basic_io.sector_count = 0;
5766	scb->cmd.basic_io.log_drv = 0;
5767	scb->data_len = sizeof (*ha->enq);
5768	scb->cmd.basic_io.sg_addr = ha->enq_busaddr;
5769
5770	/* send command */
5771	if (((ret =
5772	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5773	    || (ret == IPS_SUCCESS_IMM)
5774	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5775		return (0);
5776
5777	return (1);
5778}
5779
5780/****************************************************************************/
5781/*                                                                          */
5782/* Routine Name: ips_read_subsystem_parameters                              */
5783/*                                                                          */
5784/* Routine Description:                                                     */
5785/*                                                                          */
5786/*   Read subsystem parameters from the adapter                             */
5787/*                                                                          */
5788/****************************************************************************/
5789static int
5790ips_read_subsystem_parameters(ips_ha_t * ha, int intr)
5791{
5792	ips_scb_t *scb;
5793	int ret;
5794
5795	METHOD_TRACE("ips_read_subsystem_parameters", 1);
5796
5797	scb = &ha->scbs[ha->max_cmds - 1];
5798
5799	ips_init_scb(ha, scb);
5800
5801	scb->timeout = ips_cmd_timeout;
5802	scb->cdb[0] = IPS_CMD_GET_SUBSYS;
5803
5804	scb->cmd.basic_io.op_code = IPS_CMD_GET_SUBSYS;
5805	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5806	scb->cmd.basic_io.sg_count = 0;
5807	scb->cmd.basic_io.lba = 0;
5808	scb->cmd.basic_io.sector_count = 0;
5809	scb->cmd.basic_io.log_drv = 0;
5810	scb->data_len = sizeof (*ha->subsys);
5811	scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5812
5813	/* send command */
5814	if (((ret =
5815	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5816	    || (ret == IPS_SUCCESS_IMM)
5817	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5818		return (0);
5819
5820	memcpy(ha->subsys, ha->ioctl_data, sizeof(*ha->subsys));
5821	return (1);
5822}
5823
5824/****************************************************************************/
5825/*                                                                          */
5826/* Routine Name: ips_read_config                                            */
5827/*                                                                          */
5828/* Routine Description:                                                     */
5829/*                                                                          */
5830/*   Read the configuration on the adapter                                  */
5831/*                                                                          */
5832/****************************************************************************/
5833static int
5834ips_read_config(ips_ha_t * ha, int intr)
5835{
5836	ips_scb_t *scb;
5837	int i;
5838	int ret;
5839
5840	METHOD_TRACE("ips_read_config", 1);
5841
5842	/* set defaults for initiator IDs */
5843	for (i = 0; i < 4; i++)
5844		ha->conf->init_id[i] = 7;
5845
5846	scb = &ha->scbs[ha->max_cmds - 1];
5847
5848	ips_init_scb(ha, scb);
5849
5850	scb->timeout = ips_cmd_timeout;
5851	scb->cdb[0] = IPS_CMD_READ_CONF;
5852
5853	scb->cmd.basic_io.op_code = IPS_CMD_READ_CONF;
5854	scb->cmd.basic_io.command_id = IPS_COMMAND_ID(ha, scb);
5855	scb->data_len = sizeof (*ha->conf);
5856	scb->cmd.basic_io.sg_addr = ha->ioctl_busaddr;
5857
5858	/* send command */
5859	if (((ret =
5860	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5861	    || (ret == IPS_SUCCESS_IMM)
5862	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5863
5864		memset(ha->conf, 0, sizeof (IPS_CONF));
5865
5866		/* reset initiator IDs */
5867		for (i = 0; i < 4; i++)
5868			ha->conf->init_id[i] = 7;
5869
5870		/* Allow Completed with Errors, so JCRM can access the Adapter to fix the problems */
5871		if ((scb->basic_status & IPS_GSC_STATUS_MASK) ==
5872		    IPS_CMD_CMPLT_WERROR)
5873			return (1);
5874
5875		return (0);
5876	}
5877
5878	memcpy(ha->conf, ha->ioctl_data, sizeof(*ha->conf));
5879	return (1);
5880}
5881
5882/****************************************************************************/
5883/*                                                                          */
5884/* Routine Name: ips_readwrite_page5                                        */
5885/*                                                                          */
5886/* Routine Description:                                                     */
5887/*                                                                          */
5888/*   Read nvram page 5 from the adapter                                     */
5889/*                                                                          */
5890/****************************************************************************/
5891static int
5892ips_readwrite_page5(ips_ha_t * ha, int write, int intr)
5893{
5894	ips_scb_t *scb;
5895	int ret;
5896
5897	METHOD_TRACE("ips_readwrite_page5", 1);
5898
5899	scb = &ha->scbs[ha->max_cmds - 1];
5900
5901	ips_init_scb(ha, scb);
5902
5903	scb->timeout = ips_cmd_timeout;
5904	scb->cdb[0] = IPS_CMD_RW_NVRAM_PAGE;
5905
5906	scb->cmd.nvram.op_code = IPS_CMD_RW_NVRAM_PAGE;
5907	scb->cmd.nvram.command_id = IPS_COMMAND_ID(ha, scb);
5908	scb->cmd.nvram.page = 5;
5909	scb->cmd.nvram.write = write;
5910	scb->cmd.nvram.reserved = 0;
5911	scb->cmd.nvram.reserved2 = 0;
5912	scb->data_len = sizeof (*ha->nvram);
5913	scb->cmd.nvram.buffer_addr = ha->ioctl_busaddr;
5914	if (write)
5915		memcpy(ha->ioctl_data, ha->nvram, sizeof(*ha->nvram));
5916
5917	/* issue the command */
5918	if (((ret =
5919	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5920	    || (ret == IPS_SUCCESS_IMM)
5921	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1)) {
5922
5923		memset(ha->nvram, 0, sizeof (IPS_NVRAM_P5));
5924
5925		return (0);
5926	}
5927	if (!write)
5928		memcpy(ha->nvram, ha->ioctl_data, sizeof(*ha->nvram));
5929	return (1);
5930}
5931
5932/****************************************************************************/
5933/*                                                                          */
5934/* Routine Name: ips_clear_adapter                                          */
5935/*                                                                          */
5936/* Routine Description:                                                     */
5937/*                                                                          */
5938/*   Clear the stripe lock tables                                           */
5939/*                                                                          */
5940/****************************************************************************/
5941static int
5942ips_clear_adapter(ips_ha_t * ha, int intr)
5943{
5944	ips_scb_t *scb;
5945	int ret;
5946
5947	METHOD_TRACE("ips_clear_adapter", 1);
5948
5949	scb = &ha->scbs[ha->max_cmds - 1];
5950
5951	ips_init_scb(ha, scb);
5952
5953	scb->timeout = ips_reset_timeout;
5954	scb->cdb[0] = IPS_CMD_CONFIG_SYNC;
5955
5956	scb->cmd.config_sync.op_code = IPS_CMD_CONFIG_SYNC;
5957	scb->cmd.config_sync.command_id = IPS_COMMAND_ID(ha, scb);
5958	scb->cmd.config_sync.channel = 0;
5959	scb->cmd.config_sync.source_target = IPS_POCL;
5960	scb->cmd.config_sync.reserved = 0;
5961	scb->cmd.config_sync.reserved2 = 0;
5962	scb->cmd.config_sync.reserved3 = 0;
5963
5964	/* issue command */
5965	if (((ret =
5966	      ips_send_wait(ha, scb, ips_reset_timeout, intr)) == IPS_FAILURE)
5967	    || (ret == IPS_SUCCESS_IMM)
5968	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5969		return (0);
5970
5971	/* send unlock stripe command */
5972	ips_init_scb(ha, scb);
5973
5974	scb->cdb[0] = IPS_CMD_ERROR_TABLE;
5975	scb->timeout = ips_reset_timeout;
5976
5977	scb->cmd.unlock_stripe.op_code = IPS_CMD_ERROR_TABLE;
5978	scb->cmd.unlock_stripe.command_id = IPS_COMMAND_ID(ha, scb);
5979	scb->cmd.unlock_stripe.log_drv = 0;
5980	scb->cmd.unlock_stripe.control = IPS_CSL;
5981	scb->cmd.unlock_stripe.reserved = 0;
5982	scb->cmd.unlock_stripe.reserved2 = 0;
5983	scb->cmd.unlock_stripe.reserved3 = 0;
5984
5985	/* issue command */
5986	if (((ret =
5987	      ips_send_wait(ha, scb, ips_cmd_timeout, intr)) == IPS_FAILURE)
5988	    || (ret == IPS_SUCCESS_IMM)
5989	    || ((scb->basic_status & IPS_GSC_STATUS_MASK) > 1))
5990		return (0);
5991
5992	return (1);
5993}
5994
5995/****************************************************************************/
5996/*                                                                          */
5997/* Routine Name: ips_ffdc_reset                                             */
5998/*                                                                          */
5999/* Routine Description:                                                     */
6000/*                                                                          */
6001/*   FFDC: write reset info                                                 */
6002/*                                                                          */
6003/****************************************************************************/
6004static void
6005ips_ffdc_reset(ips_ha_t * ha, int intr)
6006{
6007	ips_scb_t *scb;
6008
6009	METHOD_TRACE("ips_ffdc_reset", 1);
6010
6011	scb = &ha->scbs[ha->max_cmds - 1];
6012
6013	ips_init_scb(ha, scb);
6014
6015	scb->timeout = ips_cmd_timeout;
6016	scb->cdb[0] = IPS_CMD_FFDC;
6017	scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
6018	scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
6019	scb->cmd.ffdc.reset_count = ha->reset_count;
6020	scb->cmd.ffdc.reset_type = 0x80;
6021
6022	/* convert time to what the card wants */
6023	ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
6024
6025	/* issue command */
6026	ips_send_wait(ha, scb, ips_cmd_timeout, intr);
6027}
6028
6029/****************************************************************************/
6030/*                                                                          */
6031/* Routine Name: ips_ffdc_time                                              */
6032/*                                                                          */
6033/* Routine Description:                                                     */
6034/*                                                                          */
6035/*   FFDC: write time info                                                  */
6036/*                                                                          */
6037/****************************************************************************/
6038static void
6039ips_ffdc_time(ips_ha_t * ha)
6040{
6041	ips_scb_t *scb;
6042
6043	METHOD_TRACE("ips_ffdc_time", 1);
6044
6045	DEBUG_VAR(1, "(%s%d) Sending time update.", ips_name, ha->host_num);
6046
6047	scb = &ha->scbs[ha->max_cmds - 1];
6048
6049	ips_init_scb(ha, scb);
6050
6051	scb->timeout = ips_cmd_timeout;
6052	scb->cdb[0] = IPS_CMD_FFDC;
6053	scb->cmd.ffdc.op_code = IPS_CMD_FFDC;
6054	scb->cmd.ffdc.command_id = IPS_COMMAND_ID(ha, scb);
6055	scb->cmd.ffdc.reset_count = 0;
6056	scb->cmd.ffdc.reset_type = 0;
6057
6058	/* convert time to what the card wants */
6059	ips_fix_ffdc_time(ha, scb, ha->last_ffdc);
6060
6061	/* issue command */
6062	ips_send_wait(ha, scb, ips_cmd_timeout, IPS_FFDC);
6063}
6064
6065/****************************************************************************/
6066/*                                                                          */
6067/* Routine Name: ips_fix_ffdc_time                                          */
6068/*                                                                          */
6069/* Routine Description:                                                     */
6070/*   Adjust time_t to what the card wants                                   */
6071/*                                                                          */
6072/****************************************************************************/
6073static void
6074ips_fix_ffdc_time(ips_ha_t * ha, ips_scb_t * scb, time_t current_time)
6075{
6076	long days;
6077	long rem;
6078	int i;
6079	int year;
6080	int yleap;
6081	int year_lengths[2] = { IPS_DAYS_NORMAL_YEAR, IPS_DAYS_LEAP_YEAR };
6082	int month_lengths[12][2] = { {31, 31},
6083	{28, 29},
6084	{31, 31},
6085	{30, 30},
6086	{31, 31},
6087	{30, 30},
6088	{31, 31},
6089	{31, 31},
6090	{30, 30},
6091	{31, 31},
6092	{30, 30},
6093	{31, 31}
6094	};
6095
6096	METHOD_TRACE("ips_fix_ffdc_time", 1);
6097
6098	days = current_time / IPS_SECS_DAY;
6099	rem = current_time % IPS_SECS_DAY;
6100
6101	scb->cmd.ffdc.hour = (rem / IPS_SECS_HOUR);
6102	rem = rem % IPS_SECS_HOUR;
6103	scb->cmd.ffdc.minute = (rem / IPS_SECS_MIN);
6104	scb->cmd.ffdc.second = (rem % IPS_SECS_MIN);
6105
6106	year = IPS_EPOCH_YEAR;
6107	while (days < 0 || days >= year_lengths[yleap = IPS_IS_LEAP_YEAR(year)]) {
6108		int newy;
6109
6110		newy = year + (days / IPS_DAYS_NORMAL_YEAR);
6111		if (days < 0)
6112			--newy;
6113		days -= (newy - year) * IPS_DAYS_NORMAL_YEAR +
6114		    IPS_NUM_LEAP_YEARS_THROUGH(newy - 1) -
6115		    IPS_NUM_LEAP_YEARS_THROUGH(year - 1);
6116		year = newy;
6117	}
6118
6119	scb->cmd.ffdc.yearH = year / 100;
6120	scb->cmd.ffdc.yearL = year % 100;
6121
6122	for (i = 0; days >= month_lengths[i][yleap]; ++i)
6123		days -= month_lengths[i][yleap];
6124
6125	scb->cmd.ffdc.month = i + 1;
6126	scb->cmd.ffdc.day = days + 1;
6127}
6128
6129/****************************************************************************
6130 * BIOS Flash Routines                                                      *
6131 ****************************************************************************/
6132
6133/****************************************************************************/
6134/*                                                                          */
6135/* Routine Name: ips_erase_bios                                             */
6136/*                                                                          */
6137/* Routine Description:                                                     */
6138/*   Erase the BIOS on the adapter                                          */
6139/*                                                                          */
6140/****************************************************************************/
6141static int
6142ips_erase_bios(ips_ha_t * ha)
6143{
6144	int timeout;
6145	uint8_t status = 0;
6146
6147	METHOD_TRACE("ips_erase_bios", 1);
6148
6149	status = 0;
6150
6151	/* Clear the status register */
6152	outl(0, ha->io_addr + IPS_REG_FLAP);
6153	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6154		udelay(25);	/* 25 us */
6155
6156	outb(0x50, ha->io_addr + IPS_REG_FLDP);
6157	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6158		udelay(25);	/* 25 us */
6159
6160	/* Erase Setup */
6161	outb(0x20, ha->io_addr + IPS_REG_FLDP);
6162	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6163		udelay(25);	/* 25 us */
6164
6165	/* Erase Confirm */
6166	outb(0xD0, ha->io_addr + IPS_REG_FLDP);
6167	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6168		udelay(25);	/* 25 us */
6169
6170	/* Erase Status */
6171	outb(0x70, ha->io_addr + IPS_REG_FLDP);
6172	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6173		udelay(25);	/* 25 us */
6174
6175	timeout = 80000;	/* 80 seconds */
6176
6177	while (timeout > 0) {
6178		if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6179			outl(0, ha->io_addr + IPS_REG_FLAP);
6180			udelay(25);	/* 25 us */
6181		}
6182
6183		status = inb(ha->io_addr + IPS_REG_FLDP);
6184
6185		if (status & 0x80)
6186			break;
6187
6188		MDELAY(1);
6189		timeout--;
6190	}
6191
6192	/* check for timeout */
6193	if (timeout <= 0) {
6194		/* timeout */
6195
6196		/* try to suspend the erase */
6197		outb(0xB0, ha->io_addr + IPS_REG_FLDP);
6198		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6199			udelay(25);	/* 25 us */
6200
6201		/* wait for 10 seconds */
6202		timeout = 10000;
6203		while (timeout > 0) {
6204			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6205				outl(0, ha->io_addr + IPS_REG_FLAP);
6206				udelay(25);	/* 25 us */
6207			}
6208
6209			status = inb(ha->io_addr + IPS_REG_FLDP);
6210
6211			if (status & 0xC0)
6212				break;
6213
6214			MDELAY(1);
6215			timeout--;
6216		}
6217
6218		return (1);
6219	}
6220
6221	/* check for valid VPP */
6222	if (status & 0x08)
6223		/* VPP failure */
6224		return (1);
6225
6226	/* check for successful flash */
6227	if (status & 0x30)
6228		/* sequence error */
6229		return (1);
6230
6231	/* Otherwise, we were successful */
6232	/* clear status */
6233	outb(0x50, ha->io_addr + IPS_REG_FLDP);
6234	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6235		udelay(25);	/* 25 us */
6236
6237	/* enable reads */
6238	outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6239	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6240		udelay(25);	/* 25 us */
6241
6242	return (0);
6243}
6244
6245/****************************************************************************/
6246/*                                                                          */
6247/* Routine Name: ips_erase_bios_memio                                       */
6248/*                                                                          */
6249/* Routine Description:                                                     */
6250/*   Erase the BIOS on the adapter                                          */
6251/*                                                                          */
6252/****************************************************************************/
6253static int
6254ips_erase_bios_memio(ips_ha_t * ha)
6255{
6256	int timeout;
6257	uint8_t status;
6258
6259	METHOD_TRACE("ips_erase_bios_memio", 1);
6260
6261	status = 0;
6262
6263	/* Clear the status register */
6264	writel(0, ha->mem_ptr + IPS_REG_FLAP);
6265	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6266		udelay(25);	/* 25 us */
6267
6268	writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6269	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6270		udelay(25);	/* 25 us */
6271
6272	/* Erase Setup */
6273	writeb(0x20, ha->mem_ptr + IPS_REG_FLDP);
6274	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6275		udelay(25);	/* 25 us */
6276
6277	/* Erase Confirm */
6278	writeb(0xD0, ha->mem_ptr + IPS_REG_FLDP);
6279	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6280		udelay(25);	/* 25 us */
6281
6282	/* Erase Status */
6283	writeb(0x70, ha->mem_ptr + IPS_REG_FLDP);
6284	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6285		udelay(25);	/* 25 us */
6286
6287	timeout = 80000;	/* 80 seconds */
6288
6289	while (timeout > 0) {
6290		if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6291			writel(0, ha->mem_ptr + IPS_REG_FLAP);
6292			udelay(25);	/* 25 us */
6293		}
6294
6295		status = readb(ha->mem_ptr + IPS_REG_FLDP);
6296
6297		if (status & 0x80)
6298			break;
6299
6300		MDELAY(1);
6301		timeout--;
6302	}
6303
6304	/* check for timeout */
6305	if (timeout <= 0) {
6306		/* timeout */
6307
6308		/* try to suspend the erase */
6309		writeb(0xB0, ha->mem_ptr + IPS_REG_FLDP);
6310		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6311			udelay(25);	/* 25 us */
6312
6313		/* wait for 10 seconds */
6314		timeout = 10000;
6315		while (timeout > 0) {
6316			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6317				writel(0, ha->mem_ptr + IPS_REG_FLAP);
6318				udelay(25);	/* 25 us */
6319			}
6320
6321			status = readb(ha->mem_ptr + IPS_REG_FLDP);
6322
6323			if (status & 0xC0)
6324				break;
6325
6326			MDELAY(1);
6327			timeout--;
6328		}
6329
6330		return (1);
6331	}
6332
6333	/* check for valid VPP */
6334	if (status & 0x08)
6335		/* VPP failure */
6336		return (1);
6337
6338	/* check for successful flash */
6339	if (status & 0x30)
6340		/* sequence error */
6341		return (1);
6342
6343	/* Otherwise, we were successful */
6344	/* clear status */
6345	writeb(0x50, ha->mem_ptr + IPS_REG_FLDP);
6346	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6347		udelay(25);	/* 25 us */
6348
6349	/* enable reads */
6350	writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6351	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6352		udelay(25);	/* 25 us */
6353
6354	return (0);
6355}
6356
6357/****************************************************************************/
6358/*                                                                          */
6359/* Routine Name: ips_program_bios                                           */
6360/*                                                                          */
6361/* Routine Description:                                                     */
6362/*   Program the BIOS on the adapter                                        */
6363/*                                                                          */
6364/****************************************************************************/
6365static int
6366ips_program_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6367		 uint32_t offset)
6368{
6369	int i;
6370	int timeout;
6371	uint8_t status = 0;
6372
6373	METHOD_TRACE("ips_program_bios", 1);
6374
6375	status = 0;
6376
6377	for (i = 0; i < buffersize; i++) {
6378		/* write a byte */
6379		outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6380		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6381			udelay(25);	/* 25 us */
6382
6383		outb(0x40, ha->io_addr + IPS_REG_FLDP);
6384		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6385			udelay(25);	/* 25 us */
6386
6387		outb(buffer[i], ha->io_addr + IPS_REG_FLDP);
6388		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6389			udelay(25);	/* 25 us */
6390
6391		/* wait up to one second */
6392		timeout = 1000;
6393		while (timeout > 0) {
6394			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6395				outl(0, ha->io_addr + IPS_REG_FLAP);
6396				udelay(25);	/* 25 us */
6397			}
6398
6399			status = inb(ha->io_addr + IPS_REG_FLDP);
6400
6401			if (status & 0x80)
6402				break;
6403
6404			MDELAY(1);
6405			timeout--;
6406		}
6407
6408		if (timeout == 0) {
6409			/* timeout error */
6410			outl(0, ha->io_addr + IPS_REG_FLAP);
6411			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6412				udelay(25);	/* 25 us */
6413
6414			outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6415			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6416				udelay(25);	/* 25 us */
6417
6418			return (1);
6419		}
6420
6421		/* check the status */
6422		if (status & 0x18) {
6423			/* programming error */
6424			outl(0, ha->io_addr + IPS_REG_FLAP);
6425			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6426				udelay(25);	/* 25 us */
6427
6428			outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6429			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6430				udelay(25);	/* 25 us */
6431
6432			return (1);
6433		}
6434	}			/* end for */
6435
6436	/* Enable reading */
6437	outl(0, ha->io_addr + IPS_REG_FLAP);
6438	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6439		udelay(25);	/* 25 us */
6440
6441	outb(0xFF, ha->io_addr + IPS_REG_FLDP);
6442	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6443		udelay(25);	/* 25 us */
6444
6445	return (0);
6446}
6447
6448/****************************************************************************/
6449/*                                                                          */
6450/* Routine Name: ips_program_bios_memio                                     */
6451/*                                                                          */
6452/* Routine Description:                                                     */
6453/*   Program the BIOS on the adapter                                        */
6454/*                                                                          */
6455/****************************************************************************/
6456static int
6457ips_program_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6458		       uint32_t offset)
6459{
6460	int i;
6461	int timeout;
6462	uint8_t status = 0;
6463
6464	METHOD_TRACE("ips_program_bios_memio", 1);
6465
6466	status = 0;
6467
6468	for (i = 0; i < buffersize; i++) {
6469		/* write a byte */
6470		writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6471		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6472			udelay(25);	/* 25 us */
6473
6474		writeb(0x40, ha->mem_ptr + IPS_REG_FLDP);
6475		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6476			udelay(25);	/* 25 us */
6477
6478		writeb(buffer[i], ha->mem_ptr + IPS_REG_FLDP);
6479		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6480			udelay(25);	/* 25 us */
6481
6482		/* wait up to one second */
6483		timeout = 1000;
6484		while (timeout > 0) {
6485			if (ha->pcidev->revision == IPS_REVID_TROMBONE64) {
6486				writel(0, ha->mem_ptr + IPS_REG_FLAP);
6487				udelay(25);	/* 25 us */
6488			}
6489
6490			status = readb(ha->mem_ptr + IPS_REG_FLDP);
6491
6492			if (status & 0x80)
6493				break;
6494
6495			MDELAY(1);
6496			timeout--;
6497		}
6498
6499		if (timeout == 0) {
6500			/* timeout error */
6501			writel(0, ha->mem_ptr + IPS_REG_FLAP);
6502			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6503				udelay(25);	/* 25 us */
6504
6505			writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6506			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6507				udelay(25);	/* 25 us */
6508
6509			return (1);
6510		}
6511
6512		/* check the status */
6513		if (status & 0x18) {
6514			/* programming error */
6515			writel(0, ha->mem_ptr + IPS_REG_FLAP);
6516			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6517				udelay(25);	/* 25 us */
6518
6519			writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6520			if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6521				udelay(25);	/* 25 us */
6522
6523			return (1);
6524		}
6525	}			/* end for */
6526
6527	/* Enable reading */
6528	writel(0, ha->mem_ptr + IPS_REG_FLAP);
6529	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6530		udelay(25);	/* 25 us */
6531
6532	writeb(0xFF, ha->mem_ptr + IPS_REG_FLDP);
6533	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6534		udelay(25);	/* 25 us */
6535
6536	return (0);
6537}
6538
6539/****************************************************************************/
6540/*                                                                          */
6541/* Routine Name: ips_verify_bios                                            */
6542/*                                                                          */
6543/* Routine Description:                                                     */
6544/*   Verify the BIOS on the adapter                                         */
6545/*                                                                          */
6546/****************************************************************************/
6547static int
6548ips_verify_bios(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6549		uint32_t offset)
6550{
6551	uint8_t checksum;
6552	int i;
6553
6554	METHOD_TRACE("ips_verify_bios", 1);
6555
6556	/* test 1st byte */
6557	outl(0, ha->io_addr + IPS_REG_FLAP);
6558	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6559		udelay(25);	/* 25 us */
6560
6561	if (inb(ha->io_addr + IPS_REG_FLDP) != 0x55)
6562		return (1);
6563
6564	outl(1, ha->io_addr + IPS_REG_FLAP);
6565	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6566		udelay(25);	/* 25 us */
6567	if (inb(ha->io_addr + IPS_REG_FLDP) != 0xAA)
6568		return (1);
6569
6570	checksum = 0xff;
6571	for (i = 2; i < buffersize; i++) {
6572
6573		outl(i + offset, ha->io_addr + IPS_REG_FLAP);
6574		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6575			udelay(25);	/* 25 us */
6576
6577		checksum = (uint8_t) checksum + inb(ha->io_addr + IPS_REG_FLDP);
6578	}
6579
6580	if (checksum != 0)
6581		/* failure */
6582		return (1);
6583	else
6584		/* success */
6585		return (0);
6586}
6587
6588/****************************************************************************/
6589/*                                                                          */
6590/* Routine Name: ips_verify_bios_memio                                      */
6591/*                                                                          */
6592/* Routine Description:                                                     */
6593/*   Verify the BIOS on the adapter                                         */
6594/*                                                                          */
6595/****************************************************************************/
6596static int
6597ips_verify_bios_memio(ips_ha_t * ha, char *buffer, uint32_t buffersize,
6598		      uint32_t offset)
6599{
6600	uint8_t checksum;
6601	int i;
6602
6603	METHOD_TRACE("ips_verify_bios_memio", 1);
6604
6605	/* test 1st byte */
6606	writel(0, ha->mem_ptr + IPS_REG_FLAP);
6607	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6608		udelay(25);	/* 25 us */
6609
6610	if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0x55)
6611		return (1);
6612
6613	writel(1, ha->mem_ptr + IPS_REG_FLAP);
6614	if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6615		udelay(25);	/* 25 us */
6616	if (readb(ha->mem_ptr + IPS_REG_FLDP) != 0xAA)
6617		return (1);
6618
6619	checksum = 0xff;
6620	for (i = 2; i < buffersize; i++) {
6621
6622		writel(i + offset, ha->mem_ptr + IPS_REG_FLAP);
6623		if (ha->pcidev->revision == IPS_REVID_TROMBONE64)
6624			udelay(25);	/* 25 us */
6625
6626		checksum =
6627		    (uint8_t) checksum + readb(ha->mem_ptr + IPS_REG_FLDP);
6628	}
6629
6630	if (checksum != 0)
6631		/* failure */
6632		return (1);
6633	else
6634		/* success */
6635		return (0);
6636}
6637
6638/****************************************************************************/
6639/*                                                                          */
6640/* Routine Name: ips_abort_init                                             */
6641/*                                                                          */
6642/* Routine Description:                                                     */
6643/*   cleanup routine for a failed adapter initialization                    */
6644/****************************************************************************/
6645static int
6646ips_abort_init(ips_ha_t * ha, int index)
6647{
6648	ha->active = 0;
6649	ips_free(ha);
6650	ips_ha[index] = NULL;
6651	ips_sh[index] = NULL;
6652	return -1;
6653}
6654
6655/****************************************************************************/
6656/*                                                                          */
6657/* Routine Name: ips_shift_controllers                                      */
6658/*                                                                          */
6659/* Routine Description:                                                     */
6660/*   helper function for ordering adapters                                  */
6661/****************************************************************************/
6662static void
6663ips_shift_controllers(int lowindex, int highindex)
6664{
6665	ips_ha_t *ha_sav = ips_ha[highindex];
6666	struct Scsi_Host *sh_sav = ips_sh[highindex];
6667	int i;
6668
6669	for (i = highindex; i > lowindex; i--) {
6670		ips_ha[i] = ips_ha[i - 1];
6671		ips_sh[i] = ips_sh[i - 1];
6672		ips_ha[i]->host_num = i;
6673	}
6674	ha_sav->host_num = lowindex;
6675	ips_ha[lowindex] = ha_sav;
6676	ips_sh[lowindex] = sh_sav;
6677}
6678
6679/****************************************************************************/
6680/*                                                                          */
6681/* Routine Name: ips_order_controllers                                      */
6682/*                                                                          */
6683/* Routine Description:                                                     */
6684/*   place controllers is the "proper" boot order                           */
6685/****************************************************************************/
6686static void
6687ips_order_controllers(void)
6688{
6689	int i, j, tmp, position = 0;
6690	IPS_NVRAM_P5 *nvram;
6691	if (!ips_ha[0])
6692		return;
6693	nvram = ips_ha[0]->nvram;
6694
6695	if (nvram->adapter_order[0]) {
6696		for (i = 1; i <= nvram->adapter_order[0]; i++) {
6697			for (j = position; j < ips_num_controllers; j++) {
6698				switch (ips_ha[j]->ad_type) {
6699				case IPS_ADTYPE_SERVERAID6M:
6700				case IPS_ADTYPE_SERVERAID7M:
6701					if (nvram->adapter_order[i] == 'M') {
6702						ips_shift_controllers(position,
6703								      j);
6704						position++;
6705					}
6706					break;
6707				case IPS_ADTYPE_SERVERAID4L:
6708				case IPS_ADTYPE_SERVERAID4M:
6709				case IPS_ADTYPE_SERVERAID4MX:
6710				case IPS_ADTYPE_SERVERAID4LX:
6711					if (nvram->adapter_order[i] == 'N') {
6712						ips_shift_controllers(position,
6713								      j);
6714						position++;
6715					}
6716					break;
6717				case IPS_ADTYPE_SERVERAID6I:
6718				case IPS_ADTYPE_SERVERAID5I2:
6719				case IPS_ADTYPE_SERVERAID5I1:
6720				case IPS_ADTYPE_SERVERAID7k:
6721					if (nvram->adapter_order[i] == 'S') {
6722						ips_shift_controllers(position,
6723								      j);
6724						position++;
6725					}
6726					break;
6727				case IPS_ADTYPE_SERVERAID:
6728				case IPS_ADTYPE_SERVERAID2:
6729				case IPS_ADTYPE_NAVAJO:
6730				case IPS_ADTYPE_KIOWA:
6731				case IPS_ADTYPE_SERVERAID3L:
6732				case IPS_ADTYPE_SERVERAID3:
6733				case IPS_ADTYPE_SERVERAID4H:
6734					if (nvram->adapter_order[i] == 'A') {
6735						ips_shift_controllers(position,
6736								      j);
6737						position++;
6738					}
6739					break;
6740				default:
6741					break;
6742				}
6743			}
6744		}
6745		/* if adapter_order[0], then ordering is complete */
6746		return;
6747	}
6748	/* old bios, use older ordering */
6749	tmp = 0;
6750	for (i = position; i < ips_num_controllers; i++) {
6751		if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I2 ||
6752		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID5I1) {
6753			ips_shift_controllers(position, i);
6754			position++;
6755			tmp = 1;
6756		}
6757	}
6758	/* if there were no 5I cards, then don't do any extra ordering */
6759	if (!tmp)
6760		return;
6761	for (i = position; i < ips_num_controllers; i++) {
6762		if (ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4L ||
6763		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4M ||
6764		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4LX ||
6765		    ips_ha[i]->ad_type == IPS_ADTYPE_SERVERAID4MX) {
6766			ips_shift_controllers(position, i);
6767			position++;
6768		}
6769	}
6770
6771	return;
6772}
6773
6774/****************************************************************************/
6775/*                                                                          */
6776/* Routine Name: ips_register_scsi                                          */
6777/*                                                                          */
6778/* Routine Description:                                                     */
6779/*   perform any registration and setup with the scsi layer                 */
6780/****************************************************************************/
6781static int
6782ips_register_scsi(int index)
6783{
6784	struct Scsi_Host *sh;
6785	ips_ha_t *ha, *oldha = ips_ha[index];
6786	sh = scsi_host_alloc(&ips_driver_template, sizeof (ips_ha_t));
6787	if (!sh) {
6788		IPS_PRINTK(KERN_WARNING, oldha->pcidev,
6789			   "Unable to register controller with SCSI subsystem\n");
6790		return -1;
6791	}
6792	ha = IPS_HA(sh);
6793	memcpy(ha, oldha, sizeof (ips_ha_t));
6794	free_irq(oldha->pcidev->irq, oldha);
6795	/* Install the interrupt handler with the new ha */
6796	if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
6797		IPS_PRINTK(KERN_WARNING, ha->pcidev,
6798			   "Unable to install interrupt handler\n");
6799		goto err_out_sh;
6800	}
6801
6802	kfree(oldha);
6803
6804	/* Store away needed values for later use */
6805	sh->unique_id = (ha->io_addr) ? ha->io_addr : ha->mem_addr;
6806	sh->sg_tablesize = sh->hostt->sg_tablesize;
6807	sh->can_queue = sh->hostt->can_queue;
6808	sh->cmd_per_lun = sh->hostt->cmd_per_lun;
6809	sh->use_clustering = sh->hostt->use_clustering;
6810	sh->max_sectors = 128;
6811
6812	sh->max_id = ha->ntargets;
6813	sh->max_lun = ha->nlun;
6814	sh->max_channel = ha->nbus - 1;
6815	sh->can_queue = ha->max_cmds - 1;
6816
6817	if (scsi_add_host(sh, &ha->pcidev->dev))
6818		goto err_out;
6819
6820	ips_sh[index] = sh;
6821	ips_ha[index] = ha;
6822
6823	scsi_scan_host(sh);
6824
6825	return 0;
6826
6827err_out:
6828	free_irq(ha->pcidev->irq, ha);
6829err_out_sh:
6830	scsi_host_put(sh);
6831	return -1;
6832}
6833
6834/*---------------------------------------------------------------------------*/
6835/*   Routine Name: ips_remove_device                                         */
6836/*                                                                           */
6837/*   Routine Description:                                                    */
6838/*     Remove one Adapter ( Hot Plugging )                                   */
6839/*---------------------------------------------------------------------------*/
6840static void __devexit
6841ips_remove_device(struct pci_dev *pci_dev)
6842{
6843	struct Scsi_Host *sh = pci_get_drvdata(pci_dev);
6844
6845	pci_set_drvdata(pci_dev, NULL);
6846
6847	ips_release(sh);
6848
6849	pci_release_regions(pci_dev);
6850	pci_disable_device(pci_dev);
6851}
6852
6853/****************************************************************************/
6854/*                                                                          */
6855/* Routine Name: ips_module_init                                            */
6856/*                                                                          */
6857/* Routine Description:                                                     */
6858/*   function called on module load                                         */
6859/****************************************************************************/
6860static int __init
6861ips_module_init(void)
6862{
 
 
 
 
 
6863	if (pci_register_driver(&ips_pci_driver) < 0)
6864		return -ENODEV;
6865	ips_driver_template.module = THIS_MODULE;
6866	ips_order_controllers();
6867	if (!ips_detect(&ips_driver_template)) {
6868		pci_unregister_driver(&ips_pci_driver);
6869		return -ENODEV;
6870	}
6871	register_reboot_notifier(&ips_notifier);
6872	return 0;
6873}
6874
6875/****************************************************************************/
6876/*                                                                          */
6877/* Routine Name: ips_module_exit                                            */
6878/*                                                                          */
6879/* Routine Description:                                                     */
6880/*   function called on module unload                                       */
6881/****************************************************************************/
6882static void __exit
6883ips_module_exit(void)
6884{
6885	pci_unregister_driver(&ips_pci_driver);
6886	unregister_reboot_notifier(&ips_notifier);
6887}
6888
6889module_init(ips_module_init);
6890module_exit(ips_module_exit);
6891
6892/*---------------------------------------------------------------------------*/
6893/*   Routine Name: ips_insert_device                                         */
6894/*                                                                           */
6895/*   Routine Description:                                                    */
6896/*     Add One Adapter ( Hot Plug )                                          */
6897/*                                                                           */
6898/*   Return Value:                                                           */
6899/*     0 if Successful, else non-zero                                        */
6900/*---------------------------------------------------------------------------*/
6901static int __devinit
6902ips_insert_device(struct pci_dev *pci_dev, const struct pci_device_id *ent)
6903{
6904	int index = -1;
6905	int rc;
6906
6907	METHOD_TRACE("ips_insert_device", 1);
6908	rc = pci_enable_device(pci_dev);
6909	if (rc)
6910		return rc;
6911
6912	rc = pci_request_regions(pci_dev, "ips");
6913	if (rc)
6914		goto err_out;
6915
6916	rc = ips_init_phase1(pci_dev, &index);
6917	if (rc == SUCCESS)
6918		rc = ips_init_phase2(index);
6919
6920	if (ips_hotplug)
6921		if (ips_register_scsi(index)) {
6922			ips_free(ips_ha[index]);
6923			rc = -1;
6924		}
6925
6926	if (rc == SUCCESS)
6927		ips_num_controllers++;
6928
6929	ips_next_controller = ips_num_controllers;
6930
6931	if (rc < 0) {
6932		rc = -ENODEV;
6933		goto err_out_regions;
6934	}
6935
6936	pci_set_drvdata(pci_dev, ips_sh[index]);
6937	return 0;
6938
6939err_out_regions:
6940	pci_release_regions(pci_dev);
6941err_out:
6942	pci_disable_device(pci_dev);
6943	return rc;
6944}
6945
6946/*---------------------------------------------------------------------------*/
6947/*   Routine Name: ips_init_phase1                                           */
6948/*                                                                           */
6949/*   Routine Description:                                                    */
6950/*     Adapter Initialization                                                */
6951/*                                                                           */
6952/*   Return Value:                                                           */
6953/*     0 if Successful, else non-zero                                        */
6954/*---------------------------------------------------------------------------*/
6955static int
6956ips_init_phase1(struct pci_dev *pci_dev, int *indexPtr)
6957{
6958	ips_ha_t *ha;
6959	uint32_t io_addr;
6960	uint32_t mem_addr;
6961	uint32_t io_len;
6962	uint32_t mem_len;
6963	uint8_t bus;
6964	uint8_t func;
6965	int j;
6966	int index;
6967	dma_addr_t dma_address;
6968	char __iomem *ioremap_ptr;
6969	char __iomem *mem_ptr;
6970	uint32_t IsDead;
6971
6972	METHOD_TRACE("ips_init_phase1", 1);
6973	index = IPS_MAX_ADAPTERS;
6974	for (j = 0; j < IPS_MAX_ADAPTERS; j++) {
6975		if (ips_ha[j] == NULL) {
6976			index = j;
6977			break;
6978		}
6979	}
6980
6981	if (index >= IPS_MAX_ADAPTERS)
6982		return -1;
6983
6984	/* stuff that we get in dev */
6985	bus = pci_dev->bus->number;
6986	func = pci_dev->devfn;
6987
6988	/* Init MEM/IO addresses to 0 */
6989	mem_addr = 0;
6990	io_addr = 0;
6991	mem_len = 0;
6992	io_len = 0;
6993
6994	for (j = 0; j < 2; j++) {
6995		if (!pci_resource_start(pci_dev, j))
6996			break;
6997
6998		if (pci_resource_flags(pci_dev, j) & IORESOURCE_IO) {
6999			io_addr = pci_resource_start(pci_dev, j);
7000			io_len = pci_resource_len(pci_dev, j);
7001		} else {
7002			mem_addr = pci_resource_start(pci_dev, j);
7003			mem_len = pci_resource_len(pci_dev, j);
7004		}
7005	}
7006
7007	/* setup memory mapped area (if applicable) */
7008	if (mem_addr) {
7009		uint32_t base;
7010		uint32_t offs;
7011
7012		base = mem_addr & PAGE_MASK;
7013		offs = mem_addr - base;
7014		ioremap_ptr = ioremap(base, PAGE_SIZE);
7015		if (!ioremap_ptr)
7016			return -1;
7017		mem_ptr = ioremap_ptr + offs;
7018	} else {
7019		ioremap_ptr = NULL;
7020		mem_ptr = NULL;
7021	}
7022
7023	/* found a controller */
7024	ha = kzalloc(sizeof (ips_ha_t), GFP_KERNEL);
7025	if (ha == NULL) {
7026		IPS_PRINTK(KERN_WARNING, pci_dev,
7027			   "Unable to allocate temporary ha struct\n");
7028		return -1;
7029	}
7030
7031	ips_sh[index] = NULL;
7032	ips_ha[index] = ha;
7033	ha->active = 1;
7034
7035	/* Store info in HA structure */
7036	ha->io_addr = io_addr;
7037	ha->io_len = io_len;
7038	ha->mem_addr = mem_addr;
7039	ha->mem_len = mem_len;
7040	ha->mem_ptr = mem_ptr;
7041	ha->ioremap_ptr = ioremap_ptr;
7042	ha->host_num = (uint32_t) index;
7043	ha->slot_num = PCI_SLOT(pci_dev->devfn);
7044	ha->pcidev = pci_dev;
7045
7046	/*
7047	 * Set the pci_dev's dma_mask.  Not all adapters support 64bit
7048	 * addressing so don't enable it if the adapter can't support
7049	 * it!  Also, don't use 64bit addressing if dma addresses
7050	 * are guaranteed to be < 4G.
7051	 */
7052	if (IPS_ENABLE_DMA64 && IPS_HAS_ENH_SGLIST(ha) &&
7053	    !pci_set_dma_mask(ha->pcidev, DMA_BIT_MASK(64))) {
7054		(ha)->flags |= IPS_HA_ENH_SG;
7055	} else {
7056		if (pci_set_dma_mask(ha->pcidev, DMA_BIT_MASK(32)) != 0) {
7057			printk(KERN_WARNING "Unable to set DMA Mask\n");
7058			return ips_abort_init(ha, index);
7059		}
7060	}
7061	if(ips_cd_boot && !ips_FlashData){
7062		ips_FlashData = pci_alloc_consistent(pci_dev, PAGE_SIZE << 7,
7063						     &ips_flashbusaddr);
7064	}
7065
7066	ha->enq = pci_alloc_consistent(pci_dev, sizeof (IPS_ENQ),
7067				       &ha->enq_busaddr);
7068	if (!ha->enq) {
7069		IPS_PRINTK(KERN_WARNING, pci_dev,
7070			   "Unable to allocate host inquiry structure\n");
7071		return ips_abort_init(ha, index);
7072	}
7073
7074	ha->adapt = pci_alloc_consistent(pci_dev, sizeof (IPS_ADAPTER) +
7075					 sizeof (IPS_IO_CMD), &dma_address);
 
7076	if (!ha->adapt) {
7077		IPS_PRINTK(KERN_WARNING, pci_dev,
7078			   "Unable to allocate host adapt & dummy structures\n");
7079		return ips_abort_init(ha, index);
7080	}
7081	ha->adapt->hw_status_start = dma_address;
7082	ha->dummy = (void *) (ha->adapt + 1);
7083
7084
7085
7086	ha->logical_drive_info = pci_alloc_consistent(pci_dev, sizeof (IPS_LD_INFO), &dma_address);
 
7087	if (!ha->logical_drive_info) {
7088		IPS_PRINTK(KERN_WARNING, pci_dev,
7089			   "Unable to allocate logical drive info structure\n");
7090		return ips_abort_init(ha, index);
7091	}
7092	ha->logical_drive_info_dma_addr = dma_address;
7093
7094
7095	ha->conf = kmalloc(sizeof (IPS_CONF), GFP_KERNEL);
7096
7097	if (!ha->conf) {
7098		IPS_PRINTK(KERN_WARNING, pci_dev,
7099			   "Unable to allocate host conf structure\n");
7100		return ips_abort_init(ha, index);
7101	}
7102
7103	ha->nvram = kmalloc(sizeof (IPS_NVRAM_P5), GFP_KERNEL);
7104
7105	if (!ha->nvram) {
7106		IPS_PRINTK(KERN_WARNING, pci_dev,
7107			   "Unable to allocate host NVRAM structure\n");
7108		return ips_abort_init(ha, index);
7109	}
7110
7111	ha->subsys = kmalloc(sizeof (IPS_SUBSYS), GFP_KERNEL);
7112
7113	if (!ha->subsys) {
7114		IPS_PRINTK(KERN_WARNING, pci_dev,
7115			   "Unable to allocate host subsystem structure\n");
7116		return ips_abort_init(ha, index);
7117	}
7118
7119	/* the ioctl buffer is now used during adapter initialization, so its
7120	 * successful allocation is now required */
7121	if (ips_ioctlsize < PAGE_SIZE)
7122		ips_ioctlsize = PAGE_SIZE;
7123
7124	ha->ioctl_data = pci_alloc_consistent(pci_dev, ips_ioctlsize,
7125					      &ha->ioctl_busaddr);
7126	ha->ioctl_len = ips_ioctlsize;
7127	if (!ha->ioctl_data) {
7128		IPS_PRINTK(KERN_WARNING, pci_dev,
7129			   "Unable to allocate IOCTL data\n");
7130		return ips_abort_init(ha, index);
7131	}
7132
7133	/*
7134	 * Setup Functions
7135	 */
7136	ips_setup_funclist(ha);
7137
7138	if ((IPS_IS_MORPHEUS(ha)) || (IPS_IS_MARCO(ha))) {
7139		/* If Morpheus appears dead, reset it */
7140		IsDead = readl(ha->mem_ptr + IPS_REG_I960_MSG1);
7141		if (IsDead == 0xDEADBEEF) {
7142			ips_reset_morpheus(ha);
7143		}
7144	}
7145
7146	/*
7147	 * Initialize the card if it isn't already
7148	 */
7149
7150	if (!(*ha->func.isinit) (ha)) {
7151		if (!(*ha->func.init) (ha)) {
7152			/*
7153			 * Initialization failed
7154			 */
7155			IPS_PRINTK(KERN_WARNING, pci_dev,
7156				   "Unable to initialize controller\n");
7157			return ips_abort_init(ha, index);
7158		}
7159	}
7160
7161	*indexPtr = index;
7162	return SUCCESS;
7163}
7164
7165/*---------------------------------------------------------------------------*/
7166/*   Routine Name: ips_init_phase2                                           */
7167/*                                                                           */
7168/*   Routine Description:                                                    */
7169/*     Adapter Initialization Phase 2                                        */
7170/*                                                                           */
7171/*   Return Value:                                                           */
7172/*     0 if Successful, else non-zero                                        */
7173/*---------------------------------------------------------------------------*/
7174static int
7175ips_init_phase2(int index)
7176{
7177	ips_ha_t *ha;
7178
7179	ha = ips_ha[index];
7180
7181	METHOD_TRACE("ips_init_phase2", 1);
7182	if (!ha->active) {
7183		ips_ha[index] = NULL;
7184		return -1;
7185	}
7186
7187	/* Install the interrupt handler */
7188	if (request_irq(ha->pcidev->irq, do_ipsintr, IRQF_SHARED, ips_name, ha)) {
7189		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7190			   "Unable to install interrupt handler\n");
7191		return ips_abort_init(ha, index);
7192	}
7193
7194	/*
7195	 * Allocate a temporary SCB for initialization
7196	 */
7197	ha->max_cmds = 1;
7198	if (!ips_allocatescbs(ha)) {
7199		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7200			   "Unable to allocate a CCB\n");
7201		free_irq(ha->pcidev->irq, ha);
7202		return ips_abort_init(ha, index);
7203	}
7204
7205	if (!ips_hainit(ha)) {
7206		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7207			   "Unable to initialize controller\n");
7208		free_irq(ha->pcidev->irq, ha);
7209		return ips_abort_init(ha, index);
7210	}
7211	/* Free the temporary SCB */
7212	ips_deallocatescbs(ha, 1);
7213
7214	/* allocate CCBs */
7215	if (!ips_allocatescbs(ha)) {
7216		IPS_PRINTK(KERN_WARNING, ha->pcidev,
7217			   "Unable to allocate CCBs\n");
7218		free_irq(ha->pcidev->irq, ha);
7219		return ips_abort_init(ha, index);
7220	}
7221
7222	return SUCCESS;
7223}
7224
7225MODULE_LICENSE("GPL");
7226MODULE_DESCRIPTION("IBM ServeRAID Adapter Driver " IPS_VER_STRING);
7227MODULE_VERSION(IPS_VER_STRING);
7228
7229
7230/*
7231 * Overrides for Emacs so that we almost follow Linus's tabbing style.
7232 * Emacs will notice this stuff at the end of the file and automatically
7233 * adjust the settings for this buffer only.  This must remain at the end
7234 * of the file.
7235 * ---------------------------------------------------------------------------
7236 * Local variables:
7237 * c-indent-level: 2
7238 * c-brace-imaginary-offset: 0
7239 * c-brace-offset: -2
7240 * c-argdecl-indent: 2
7241 * c-label-offset: -2
7242 * c-continued-statement-offset: 2
7243 * c-continued-brace-offset: 0
7244 * indent-tabs-mode: nil
7245 * tab-width: 8
7246 * End:
7247 */