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