/* * pmcraid.c -- driver for PMC Sierra MaxRAID controller adapters * * Written By: Anil Ravindranath<anil_ravindranath@pmc-sierra.com> * PMC-Sierra Inc * * Copyright (C) 2008, 2009 PMC Sierra Inc * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, * USA * */ #include <linux/fs.h> #include <linux/init.h> #include <linux/types.h> #include <linux/errno.h> #include <linux/kernel.h> #include <linux/ioport.h> #include <linux/delay.h> #include <linux/pci.h> #include <linux/wait.h> #include <linux/spinlock.h> #include <linux/sched.h> #include <linux/interrupt.h> #include <linux/blkdev.h> #include <linux/firmware.h> #include <linux/module.h> #include <linux/moduleparam.h> #include <linux/hdreg.h> #include <linux/io.h> #include <linux/slab.h> #include <asm/irq.h> #include <asm/processor.h> #include <linux/libata.h> #include <linux/mutex.h> #include <scsi/scsi.h> #include <scsi/scsi_host.h> #include <scsi/scsi_device.h> #include <scsi/scsi_tcq.h> #include <scsi/scsi_eh.h> #include <scsi/scsi_cmnd.h> #include <scsi/scsicam.h> #include "pmcraid.h" /* * Module configuration parameters */ static unsigned int pmcraid_debug_log; static unsigned int pmcraid_disable_aen; static unsigned int pmcraid_log_level = IOASC_LOG_LEVEL_MUST; static unsigned int pmcraid_enable_msix; /* * Data structures to support multiple adapters by the LLD. * pmcraid_adapter_count - count of configured adapters */ static atomic_t pmcraid_adapter_count = ATOMIC_INIT(0); /* * Supporting user-level control interface through IOCTL commands. * pmcraid_major - major number to use * pmcraid_minor - minor number(s) to use */ static unsigned int pmcraid_major; static struct class *pmcraid_class; DECLARE_BITMAP(pmcraid_minor, PMCRAID_MAX_ADAPTERS); /* * Module parameters */ MODULE_AUTHOR("Anil Ravindranath<anil_ravindranath@pmc-sierra.com>"); MODULE_DESCRIPTION("PMC Sierra MaxRAID Controller Driver"); MODULE_LICENSE("GPL"); MODULE_VERSION(PMCRAID_DRIVER_VERSION); module_param_named(log_level, pmcraid_log_level, uint, (S_IRUGO | S_IWUSR)); MODULE_PARM_DESC(log_level, "Enables firmware error code logging, default :1 high-severity" " errors, 2: all errors including high-severity errors," " 0: disables logging"); module_param_named(debug, pmcraid_debug_log, uint, (S_IRUGO | S_IWUSR)); MODULE_PARM_DESC(debug, "Enable driver verbose message logging. Set 1 to enable." "(default: 0)"); module_param_named(disable_aen, pmcraid_disable_aen, uint, (S_IRUGO | S_IWUSR)); MODULE_PARM_DESC(disable_aen, "Disable driver aen notifications to apps. Set 1 to disable." "(default: 0)"); /* chip specific constants for PMC MaxRAID controllers (same for * 0x5220 and 0x8010 */ static struct pmcraid_chip_details pmcraid_chip_cfg[] = { { .ioastatus = 0x0, .ioarrin = 0x00040, .mailbox = 0x7FC30, .global_intr_mask = 0x00034, .ioa_host_intr = 0x0009C, .ioa_host_intr_clr = 0x000A0, .ioa_host_msix_intr = 0x7FC40, .ioa_host_mask = 0x7FC28, .ioa_host_mask_clr = 0x7FC28, .host_ioa_intr = 0x00020, .host_ioa_intr_clr = 0x00020, .transop_timeout = 300 } }; /* * PCI device ids supported by pmcraid driver */ static struct pci_device_id pmcraid_pci_table[] __devinitdata = { { PCI_DEVICE(PCI_VENDOR_ID_PMC, PCI_DEVICE_ID_PMC_MAXRAID), 0, 0, (kernel_ulong_t)&pmcraid_chip_cfg[0] }, {} }; MODULE_DEVICE_TABLE(pci, pmcraid_pci_table); /** * pmcraid_slave_alloc - Prepare for commands to a device * @scsi_dev: scsi device struct * * This function is called by mid-layer prior to sending any command to the new * device. Stores resource entry details of the device in scsi_device struct. * Queuecommand uses the resource handle and other details to fill up IOARCB * while sending commands to the device. * * Return value: * 0 on success / -ENXIO if device does not exist */ static int pmcraid_slave_alloc(struct scsi_device *scsi_dev) { struct pmcraid_resource_entry *temp, *res = NULL; struct pmcraid_instance *pinstance; u8 target, bus, lun; unsigned long lock_flags; int rc = -ENXIO; u16 fw_version; pinstance = shost_priv(scsi_dev->host); fw_version = be16_to_cpu(pinstance->inq_data->fw_version); /* Driver exposes VSET and GSCSI resources only; all other device types * are not exposed. Resource list is synchronized using resource lock * so any traversal or modifications to the list should be done inside * this lock */ spin_lock_irqsave(&pinstance->resource_lock, lock_flags); list_for_each_entry(temp, &pinstance->used_res_q, queue) { /* do not expose VSETs with order-ids > MAX_VSET_TARGETS */ if (RES_IS_VSET(temp->cfg_entry)) { if (fw_version <= PMCRAID_FW_VERSION_1) target = temp->cfg_entry.unique_flags1; else target = temp->cfg_entry.array_id & 0xFF; if (target > PMCRAID_MAX_VSET_TARGETS) continue; bus = PMCRAID_VSET_BUS_ID; lun = 0; } else if (RES_IS_GSCSI(temp->cfg_entry)) { target = RES_TARGET(temp->cfg_entry.resource_address); bus = PMCRAID_PHYS_BUS_ID; lun = RES_LUN(temp->cfg_entry.resource_address); } else { continue; } if (bus == scsi_dev->channel && target == scsi_dev->id && lun == scsi_dev->lun) { res = temp; break; } } if (res) { res->scsi_dev = scsi_dev; scsi_dev->hostdata = res; res->change_detected = 0; atomic_set(&res->read_failures, 0); atomic_set(&res->write_failures, 0); rc = 0; } spin_unlock_irqrestore(&pinstance->resource_lock, lock_flags); return rc; } /** * pmcraid_slave_configure - Configures a SCSI device * @scsi_dev: scsi device struct * * This function is executed by SCSI mid layer just after a device is first * scanned (i.e. it has responded to an INQUIRY). For VSET resources, the * timeout value (default 30s) will be over-written to a higher value (60s) * and max_sectors value will be over-written to 512. It also sets queue depth * to host->cmd_per_lun value * * Return value: * 0 on success */ static int pmcraid_slave_configure(struct scsi_device *scsi_dev) { struct pmcraid_resource_entry *res = scsi_dev->hostdata; if (!res) return 0; /* LLD exposes VSETs and Enclosure devices only */ if (RES_IS_GSCSI(res->cfg_entry) && scsi_dev->type != TYPE_ENCLOSURE) return -ENXIO; pmcraid_info("configuring %x:%x:%x:%x\n", scsi_dev->host->unique_id, scsi_dev->channel, scsi_dev->id, scsi_dev->lun); if (RES_IS_GSCSI(res->cfg_entry)) { scsi_dev->allow_restart = 1; } else if (RES_IS_VSET(res->cfg_entry)) { scsi_dev->allow_restart = 1; blk_queue_rq_timeout(scsi_dev->request_queue, PMCRAID_VSET_IO_TIMEOUT); blk_queue_max_hw_sectors(scsi_dev->request_queue, PMCRAID_VSET_MAX_SECTORS); } if (scsi_dev->tagged_supported && (RES_IS_GSCSI(res->cfg_entry) || RES_IS_VSET(res->cfg_entry))) { scsi_activate_tcq(scsi_dev, scsi_dev->queue_depth); scsi_adjust_queue_depth(scsi_dev, MSG_SIMPLE_TAG, scsi_dev->host->cmd_per_lun); } else { scsi_adjust_queue_depth(scsi_dev, 0, scsi_dev->host->cmd_per_lun); } return 0; } /** * pmcraid_slave_destroy - Unconfigure a SCSI device before removing it * * @scsi_dev: scsi device struct * * This is called by mid-layer before removing a device. Pointer assignments * done in pmcraid_slave_alloc will be reset to NULL here. * * Return value * none */ static void pmcraid_slave_destroy(struct scsi_device *scsi_dev) { struct pmcraid_resource_entry *res; res = (struct pmcraid_resource_entry *)scsi_dev->hostdata; if (res) res->scsi_dev = NULL; scsi_dev->hostdata = NULL; } /** * pmcraid_change_queue_depth - Change the device's queue depth * @scsi_dev: scsi device struct * @depth: depth to set * @reason: calling context * * Return value * actual depth set */ static int pmcraid_change_queue_depth(struct scsi_device *scsi_dev, int depth, int reason) { if (reason != SCSI_QDEPTH_DEFAULT) return -EOPNOTSUPP; if (depth > PMCRAID_MAX_CMD_PER_LUN) depth = PMCRAID_MAX_CMD_PER_LUN; scsi_adjust_queue_depth(scsi_dev, scsi_get_tag_type(scsi_dev), depth); return scsi_dev->queue_depth; } /** * pmcraid_change_queue_type - Change the device's queue type * @scsi_dev: scsi device struct * @tag: type of tags to use * * Return value: * actual queue type set */ static int pmcraid_change_queue_type(struct scsi_device *scsi_dev, int tag) { struct pmcraid_resource_entry *res; res = (struct pmcraid_resource_entry *)scsi_dev->hostdata; if ((res) && scsi_dev->tagged_supported && (RES_IS_GSCSI(res->cfg_entry) || RES_IS_VSET(res->cfg_entry))) { scsi_set_tag_type(scsi_dev, tag); if (tag) scsi_activate_tcq(scsi_dev, scsi_dev->queue_depth); else scsi_deactivate_tcq(scsi_dev, scsi_dev->queue_depth); } else tag = 0; return tag; } /** * pmcraid_init_cmdblk - initializes a command block * * @cmd: pointer to struct pmcraid_cmd to be initialized * @index: if >=0 first time initialization; otherwise reinitialization * * Return Value * None */ void pmcraid_init_cmdblk(struct pmcraid_cmd *cmd, int index) { struct pmcraid_ioarcb *ioarcb = &(cmd->ioa_cb->ioarcb); dma_addr_t dma_addr = cmd->ioa_cb_bus_addr; if (index >= 0) { /* first time initialization (called from probe) */ u32 ioasa_offset = offsetof(struct pmcraid_control_block, ioasa); cmd->index = index; ioarcb->response_handle = cpu_to_le32(index << 2); ioarcb->ioarcb_bus_addr = cpu_to_le64(dma_addr); ioarcb->ioasa_bus_addr = cpu_to_le64(dma_addr + ioasa_offset); ioarcb->ioasa_len = cpu_to_le16(sizeof(struct pmcraid_ioasa)); } else { /* re-initialization of various lengths, called once command is * processed by IOA */ memset(&cmd->ioa_cb->ioarcb.cdb, 0, PMCRAID_MAX_CDB_LEN); ioarcb->hrrq_id = 0; ioarcb->request_flags0 = 0; ioarcb->request_flags1 = 0; ioarcb->cmd_timeout = 0; ioarcb->ioarcb_bus_addr &= (~0x1FULL); ioarcb->ioadl_bus_addr = 0; ioarcb->ioadl_length = 0; ioarcb->data_transfer_length = 0; ioarcb->add_cmd_param_length = 0; ioarcb->add_cmd_param_offset = 0; cmd->ioa_cb->ioasa.ioasc = 0; cmd->ioa_cb->ioasa.residual_data_length = 0; cmd->time_left = 0; } cmd->cmd_done = NULL; cmd->scsi_cmd = NULL; cmd->release = 0; cmd->completion_req = 0; cmd->sense_buffer = 0; cmd->sense_buffer_dma = 0; cmd->dma_handle = 0; init_timer(&cmd->timer); } /** * pmcraid_reinit_cmdblk - reinitialize a command block * * @cmd: pointer to struct pmcraid_cmd to be reinitialized * * Return Value * None */ static void pmcraid_reinit_cmdblk(struct pmcraid_cmd *cmd) { pmcraid_init_cmdblk(cmd, -1); } /** * pmcraid_get_free_cmd - get a free cmd block from command block pool * @pinstance: adapter instance structure * * Return Value: * returns pointer to cmd block or NULL if no blocks are available */ static struct pmcraid_cmd *pmcraid_get_free_cmd( struct pmcraid_instance *pinstance ) { struct pmcraid_cmd *cmd = NULL; unsigned long lock_flags; /* free cmd block list is protected by free_pool_lock */ spin_lock_irqsave(&pinstance->free_pool_lock, lock_flags); if (!list_empty(&pinstance->free_cmd_pool)) { cmd = list_entry(pinstance->free_cmd_pool.next, struct pmcraid_cmd, free_list); list_del(&cmd->free_list); } spin_unlock_irqrestore(&pinstance->free_pool_lock, lock_flags); /* Initialize the command block before giving it the caller */ if (cmd != NULL) pmcraid_reinit_cmdblk(cmd); return cmd; } /** * pmcraid_return_cmd - return a completed command block back into free pool * @cmd: pointer to the command block * * Return Value: * nothing */ void pmcraid_return_cmd(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; unsigned long lock_flags; spin_lock_irqsave(&pinstance->free_pool_lock, lock_flags); list_add_tail(&cmd->free_list, &pinstance->free_cmd_pool); spin_unlock_irqrestore(&pinstance->free_pool_lock, lock_flags); } /** * pmcraid_read_interrupts - reads IOA interrupts * * @pinstance: pointer to adapter instance structure * * Return value * interrupts read from IOA */ static u32 pmcraid_read_interrupts(struct pmcraid_instance *pinstance) { return (pinstance->interrupt_mode) ? ioread32(pinstance->int_regs.ioa_host_msix_interrupt_reg) : ioread32(pinstance->int_regs.ioa_host_interrupt_reg); } /** * pmcraid_disable_interrupts - Masks and clears all specified interrupts * * @pinstance: pointer to per adapter instance structure * @intrs: interrupts to disable * * Return Value * None */ static void pmcraid_disable_interrupts( struct pmcraid_instance *pinstance, u32 intrs ) { u32 gmask = ioread32(pinstance->int_regs.global_interrupt_mask_reg); u32 nmask = gmask | GLOBAL_INTERRUPT_MASK; iowrite32(intrs, pinstance->int_regs.ioa_host_interrupt_clr_reg); iowrite32(nmask, pinstance->int_regs.global_interrupt_mask_reg); ioread32(pinstance->int_regs.global_interrupt_mask_reg); if (!pinstance->interrupt_mode) { iowrite32(intrs, pinstance->int_regs.ioa_host_interrupt_mask_reg); ioread32(pinstance->int_regs.ioa_host_interrupt_mask_reg); } } /** * pmcraid_enable_interrupts - Enables specified interrupts * * @pinstance: pointer to per adapter instance structure * @intr: interrupts to enable * * Return Value * None */ static void pmcraid_enable_interrupts( struct pmcraid_instance *pinstance, u32 intrs ) { u32 gmask = ioread32(pinstance->int_regs.global_interrupt_mask_reg); u32 nmask = gmask & (~GLOBAL_INTERRUPT_MASK); iowrite32(nmask, pinstance->int_regs.global_interrupt_mask_reg); if (!pinstance->interrupt_mode) { iowrite32(~intrs, pinstance->int_regs.ioa_host_interrupt_mask_reg); ioread32(pinstance->int_regs.ioa_host_interrupt_mask_reg); } pmcraid_info("enabled interrupts global mask = %x intr_mask = %x\n", ioread32(pinstance->int_regs.global_interrupt_mask_reg), ioread32(pinstance->int_regs.ioa_host_interrupt_mask_reg)); } /** * pmcraid_clr_trans_op - clear trans to op interrupt * * @pinstance: pointer to per adapter instance structure * * Return Value * None */ static void pmcraid_clr_trans_op( struct pmcraid_instance *pinstance ) { unsigned long lock_flags; if (!pinstance->interrupt_mode) { iowrite32(INTRS_TRANSITION_TO_OPERATIONAL, pinstance->int_regs.ioa_host_interrupt_mask_reg); ioread32(pinstance->int_regs.ioa_host_interrupt_mask_reg); iowrite32(INTRS_TRANSITION_TO_OPERATIONAL, pinstance->int_regs.ioa_host_interrupt_clr_reg); ioread32(pinstance->int_regs.ioa_host_interrupt_clr_reg); } if (pinstance->reset_cmd != NULL) { del_timer(&pinstance->reset_cmd->timer); spin_lock_irqsave( pinstance->host->host_lock, lock_flags); pinstance->reset_cmd->cmd_done(pinstance->reset_cmd); spin_unlock_irqrestore( pinstance->host->host_lock, lock_flags); } } /** * pmcraid_reset_type - Determine the required reset type * @pinstance: pointer to adapter instance structure * * IOA requires hard reset if any of the following conditions is true. * 1. If HRRQ valid interrupt is not masked * 2. IOA reset alert doorbell is set * 3. If there are any error interrupts */ static void pmcraid_reset_type(struct pmcraid_instance *pinstance) { u32 mask; u32 intrs; u32 alerts; mask = ioread32(pinstance->int_regs.ioa_host_interrupt_mask_reg); intrs = ioread32(pinstance->int_regs.ioa_host_interrupt_reg); alerts = ioread32(pinstance->int_regs.host_ioa_interrupt_reg); if ((mask & INTRS_HRRQ_VALID) == 0 || (alerts & DOORBELL_IOA_RESET_ALERT) || (intrs & PMCRAID_ERROR_INTERRUPTS)) { pmcraid_info("IOA requires hard reset\n"); pinstance->ioa_hard_reset = 1; } /* If unit check is active, trigger the dump */ if (intrs & INTRS_IOA_UNIT_CHECK) pinstance->ioa_unit_check = 1; } /** * pmcraid_bist_done - completion function for PCI BIST * @cmd: pointer to reset command * Return Value * none */ static void pmcraid_ioa_reset(struct pmcraid_cmd *); static void pmcraid_bist_done(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; unsigned long lock_flags; int rc; u16 pci_reg; rc = pci_read_config_word(pinstance->pdev, PCI_COMMAND, &pci_reg); /* If PCI config space can't be accessed wait for another two secs */ if ((rc != PCIBIOS_SUCCESSFUL || (!(pci_reg & PCI_COMMAND_MEMORY))) && cmd->time_left > 0) { pmcraid_info("BIST not complete, waiting another 2 secs\n"); cmd->timer.expires = jiffies + cmd->time_left; cmd->time_left = 0; cmd->timer.data = (unsigned long)cmd; cmd->timer.function = (void (*)(unsigned long))pmcraid_bist_done; add_timer(&cmd->timer); } else { cmd->time_left = 0; pmcraid_info("BIST is complete, proceeding with reset\n"); spin_lock_irqsave(pinstance->host->host_lock, lock_flags); pmcraid_ioa_reset(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); } } /** * pmcraid_start_bist - starts BIST * @cmd: pointer to reset cmd * Return Value * none */ static void pmcraid_start_bist(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; u32 doorbells, intrs; /* proceed with bist and wait for 2 seconds */ iowrite32(DOORBELL_IOA_START_BIST, pinstance->int_regs.host_ioa_interrupt_reg); doorbells = ioread32(pinstance->int_regs.host_ioa_interrupt_reg); intrs = ioread32(pinstance->int_regs.ioa_host_interrupt_reg); pmcraid_info("doorbells after start bist: %x intrs: %x\n", doorbells, intrs); cmd->time_left = msecs_to_jiffies(PMCRAID_BIST_TIMEOUT); cmd->timer.data = (unsigned long)cmd; cmd->timer.expires = jiffies + msecs_to_jiffies(PMCRAID_BIST_TIMEOUT); cmd->timer.function = (void (*)(unsigned long))pmcraid_bist_done; add_timer(&cmd->timer); } /** * pmcraid_reset_alert_done - completion routine for reset_alert * @cmd: pointer to command block used in reset sequence * Return value * None */ static void pmcraid_reset_alert_done(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; u32 status = ioread32(pinstance->ioa_status); unsigned long lock_flags; /* if the critical operation in progress bit is set or the wait times * out, invoke reset engine to proceed with hard reset. If there is * some more time to wait, restart the timer */ if (((status & INTRS_CRITICAL_OP_IN_PROGRESS) == 0) || cmd->time_left <= 0) { pmcraid_info("critical op is reset proceeding with reset\n"); spin_lock_irqsave(pinstance->host->host_lock, lock_flags); pmcraid_ioa_reset(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); } else { pmcraid_info("critical op is not yet reset waiting again\n"); /* restart timer if some more time is available to wait */ cmd->time_left -= PMCRAID_CHECK_FOR_RESET_TIMEOUT; cmd->timer.data = (unsigned long)cmd; cmd->timer.expires = jiffies + PMCRAID_CHECK_FOR_RESET_TIMEOUT; cmd->timer.function = (void (*)(unsigned long))pmcraid_reset_alert_done; add_timer(&cmd->timer); } } /** * pmcraid_reset_alert - alerts IOA for a possible reset * @cmd : command block to be used for reset sequence. * * Return Value * returns 0 if pci config-space is accessible and RESET_DOORBELL is * successfully written to IOA. Returns non-zero in case pci_config_space * is not accessible */ static void pmcraid_notify_ioastate(struct pmcraid_instance *, u32); static void pmcraid_reset_alert(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; u32 doorbells; int rc; u16 pci_reg; /* If we are able to access IOA PCI config space, alert IOA that we are * going to reset it soon. This enables IOA to preserv persistent error * data if any. In case memory space is not accessible, proceed with * BIST or slot_reset */ rc = pci_read_config_word(pinstance->pdev, PCI_COMMAND, &pci_reg); if ((rc == PCIBIOS_SUCCESSFUL) && (pci_reg & PCI_COMMAND_MEMORY)) { /* wait for IOA permission i.e until CRITICAL_OPERATION bit is * reset IOA doesn't generate any interrupts when CRITICAL * OPERATION bit is reset. A timer is started to wait for this * bit to be reset. */ cmd->time_left = PMCRAID_RESET_TIMEOUT; cmd->timer.data = (unsigned long)cmd; cmd->timer.expires = jiffies + PMCRAID_CHECK_FOR_RESET_TIMEOUT; cmd->timer.function = (void (*)(unsigned long))pmcraid_reset_alert_done; add_timer(&cmd->timer); iowrite32(DOORBELL_IOA_RESET_ALERT, pinstance->int_regs.host_ioa_interrupt_reg); doorbells = ioread32(pinstance->int_regs.host_ioa_interrupt_reg); pmcraid_info("doorbells after reset alert: %x\n", doorbells); } else { pmcraid_info("PCI config is not accessible starting BIST\n"); pinstance->ioa_state = IOA_STATE_IN_HARD_RESET; pmcraid_start_bist(cmd); } } /** * pmcraid_timeout_handler - Timeout handler for internally generated ops * * @cmd : pointer to command structure, that got timedout * * This function blocks host requests and initiates an adapter reset. * * Return value: * None */ static void pmcraid_timeout_handler(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; unsigned long lock_flags; dev_info(&pinstance->pdev->dev, "Adapter being reset due to cmd(CDB[0] = %x) timeout\n", cmd->ioa_cb->ioarcb.cdb[0]); /* Command timeouts result in hard reset sequence. The command that got * timed out may be the one used as part of reset sequence. In this * case restart reset sequence using the same command block even if * reset is in progress. Otherwise fail this command and get a free * command block to restart the reset sequence. */ spin_lock_irqsave(pinstance->host->host_lock, lock_flags); if (!pinstance->ioa_reset_in_progress) { pinstance->ioa_reset_attempts = 0; cmd = pmcraid_get_free_cmd(pinstance); /* If we are out of command blocks, just return here itself. * Some other command's timeout handler can do the reset job */ if (cmd == NULL) { spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); pmcraid_err("no free cmnd block for timeout handler\n"); return; } pinstance->reset_cmd = cmd; pinstance->ioa_reset_in_progress = 1; } else { pmcraid_info("reset is already in progress\n"); if (pinstance->reset_cmd != cmd) { /* This command should have been given to IOA, this * command will be completed by fail_outstanding_cmds * anyway */ pmcraid_err("cmd is pending but reset in progress\n"); } /* If this command was being used as part of the reset * sequence, set cmd_done pointer to pmcraid_ioa_reset. This * causes fail_outstanding_commands not to return the command * block back to free pool */ if (cmd == pinstance->reset_cmd) cmd->cmd_done = pmcraid_ioa_reset; } /* Notify apps of important IOA bringup/bringdown sequences */ if (pinstance->scn.ioa_state != PMC_DEVICE_EVENT_RESET_START && pinstance->scn.ioa_state != PMC_DEVICE_EVENT_SHUTDOWN_START) pmcraid_notify_ioastate(pinstance, PMC_DEVICE_EVENT_RESET_START); pinstance->ioa_state = IOA_STATE_IN_RESET_ALERT; scsi_block_requests(pinstance->host); pmcraid_reset_alert(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); } /** * pmcraid_internal_done - completion routine for internally generated cmds * * @cmd: command that got response from IOA * * Return Value: * none */ static void pmcraid_internal_done(struct pmcraid_cmd *cmd) { pmcraid_info("response internal cmd CDB[0] = %x ioasc = %x\n", cmd->ioa_cb->ioarcb.cdb[0], le32_to_cpu(cmd->ioa_cb->ioasa.ioasc)); /* Some of the internal commands are sent with callers blocking for the * response. Same will be indicated as part of cmd->completion_req * field. Response path needs to wake up any waiters waiting for cmd * completion if this flag is set. */ if (cmd->completion_req) { cmd->completion_req = 0; complete(&cmd->wait_for_completion); } /* most of the internal commands are completed by caller itself, so * no need to return the command block back to free pool until we are * required to do so (e.g once done with initialization). */ if (cmd->release) { cmd->release = 0; pmcraid_return_cmd(cmd); } } /** * pmcraid_reinit_cfgtable_done - done function for cfg table reinitialization * * @cmd: command that got response from IOA * * This routine is called after driver re-reads configuration table due to a * lost CCN. It returns the command block back to free pool and schedules * worker thread to add/delete devices into the system. * * Return Value: * none */ static void pmcraid_reinit_cfgtable_done(struct pmcraid_cmd *cmd) { pmcraid_info("response internal cmd CDB[0] = %x ioasc = %x\n", cmd->ioa_cb->ioarcb.cdb[0], le32_to_cpu(cmd->ioa_cb->ioasa.ioasc)); if (cmd->release) { cmd->release = 0; pmcraid_return_cmd(cmd); } pmcraid_info("scheduling worker for config table reinitialization\n"); schedule_work(&cmd->drv_inst->worker_q); } /** * pmcraid_erp_done - Process completion of SCSI error response from device * @cmd: pmcraid_command * * This function copies the sense buffer into the scsi_cmd struct and completes * scsi_cmd by calling scsi_done function. * * Return value: * none */ static void pmcraid_erp_done(struct pmcraid_cmd *cmd) { struct scsi_cmnd *scsi_cmd = cmd->scsi_cmd; struct pmcraid_instance *pinstance = cmd->drv_inst; u32 ioasc = le32_to_cpu(cmd->ioa_cb->ioasa.ioasc); if (PMCRAID_IOASC_SENSE_KEY(ioasc) > 0) { scsi_cmd->result |= (DID_ERROR << 16); scmd_printk(KERN_INFO, scsi_cmd, "command CDB[0] = %x failed with IOASC: 0x%08X\n", cmd->ioa_cb->ioarcb.cdb[0], ioasc); } /* if we had allocated sense buffers for request sense, copy the sense * release the buffers */ if (cmd->sense_buffer != NULL) { memcpy(scsi_cmd->sense_buffer, cmd->sense_buffer, SCSI_SENSE_BUFFERSIZE); pci_free_consistent(pinstance->pdev, SCSI_SENSE_BUFFERSIZE, cmd->sense_buffer, cmd->sense_buffer_dma); cmd->sense_buffer = NULL; cmd->sense_buffer_dma = 0; } scsi_dma_unmap(scsi_cmd); pmcraid_return_cmd(cmd); scsi_cmd->scsi_done(scsi_cmd); } /** * pmcraid_fire_command - sends an IOA command to adapter * * This function adds the given block into pending command list * and returns without waiting * * @cmd : command to be sent to the device * * Return Value * None */ static void _pmcraid_fire_command(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; unsigned long lock_flags; /* Add this command block to pending cmd pool. We do this prior to * writting IOARCB to ioarrin because IOA might complete the command * by the time we are about to add it to the list. Response handler * (isr/tasklet) looks for cmd block in the pending pending list. */ spin_lock_irqsave(&pinstance->pending_pool_lock, lock_flags); list_add_tail(&cmd->free_list, &pinstance->pending_cmd_pool); spin_unlock_irqrestore(&pinstance->pending_pool_lock, lock_flags); atomic_inc(&pinstance->outstanding_cmds); /* driver writes lower 32-bit value of IOARCB address only */ mb(); iowrite32(le32_to_cpu(cmd->ioa_cb->ioarcb.ioarcb_bus_addr), pinstance->ioarrin); } /** * pmcraid_send_cmd - fires a command to IOA * * This function also sets up timeout function, and command completion * function * * @cmd: pointer to the command block to be fired to IOA * @cmd_done: command completion function, called once IOA responds * @timeout: timeout to wait for this command completion * @timeout_func: timeout handler * * Return value * none */ static void pmcraid_send_cmd( struct pmcraid_cmd *cmd, void (*cmd_done) (struct pmcraid_cmd *), unsigned long timeout, void (*timeout_func) (struct pmcraid_cmd *) ) { /* initialize done function */ cmd->cmd_done = cmd_done; if (timeout_func) { /* setup timeout handler */ cmd->timer.data = (unsigned long)cmd; cmd->timer.expires = jiffies + timeout; cmd->timer.function = (void (*)(unsigned long))timeout_func; add_timer(&cmd->timer); } /* fire the command to IOA */ _pmcraid_fire_command(cmd); } /** * pmcraid_ioa_shutdown_done - completion function for IOA shutdown command * @cmd: pointer to the command block used for sending IOA shutdown command * * Return value * None */ static void pmcraid_ioa_shutdown_done(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; unsigned long lock_flags; spin_lock_irqsave(pinstance->host->host_lock, lock_flags); pmcraid_ioa_reset(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); } /** * pmcraid_ioa_shutdown - sends SHUTDOWN command to ioa * * @cmd: pointer to the command block used as part of reset sequence * * Return Value * None */ static void pmcraid_ioa_shutdown(struct pmcraid_cmd *cmd) { pmcraid_info("response for Cancel CCN CDB[0] = %x ioasc = %x\n", cmd->ioa_cb->ioarcb.cdb[0], le32_to_cpu(cmd->ioa_cb->ioasa.ioasc)); /* Note that commands sent during reset require next command to be sent * to IOA. Hence reinit the done function as well as timeout function */ pmcraid_reinit_cmdblk(cmd); cmd->ioa_cb->ioarcb.request_type = REQ_TYPE_IOACMD; cmd->ioa_cb->ioarcb.resource_handle = cpu_to_le32(PMCRAID_IOA_RES_HANDLE); cmd->ioa_cb->ioarcb.cdb[0] = PMCRAID_IOA_SHUTDOWN; cmd->ioa_cb->ioarcb.cdb[1] = PMCRAID_SHUTDOWN_NORMAL; /* fire shutdown command to hardware. */ pmcraid_info("firing normal shutdown command (%d) to IOA\n", le32_to_cpu(cmd->ioa_cb->ioarcb.response_handle)); pmcraid_notify_ioastate(cmd->drv_inst, PMC_DEVICE_EVENT_SHUTDOWN_START); pmcraid_send_cmd(cmd, pmcraid_ioa_shutdown_done, PMCRAID_SHUTDOWN_TIMEOUT, pmcraid_timeout_handler); } /** * pmcraid_get_fwversion_done - completion function for get_fwversion * * @cmd: pointer to command block used to send INQUIRY command * * Return Value * none */ static void pmcraid_querycfg(struct pmcraid_cmd *); static void pmcraid_get_fwversion_done(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; u32 ioasc = le32_to_cpu(cmd->ioa_cb->ioasa.ioasc); unsigned long lock_flags; /* configuration table entry size depends on firmware version. If fw * version is not known, it is not possible to interpret IOA config * table */ if (ioasc) { pmcraid_err("IOA Inquiry failed with %x\n", ioasc); spin_lock_irqsave(pinstance->host->host_lock, lock_flags); pinstance->ioa_state = IOA_STATE_IN_RESET_ALERT; pmcraid_reset_alert(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); } else { pmcraid_querycfg(cmd); } } /** * pmcraid_get_fwversion - reads firmware version information * * @cmd: pointer to command block used to send INQUIRY command * * Return Value * none */ static void pmcraid_get_fwversion(struct pmcraid_cmd *cmd) { struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; struct pmcraid_ioadl_desc *ioadl = ioarcb->add_data.u.ioadl; struct pmcraid_instance *pinstance = cmd->drv_inst; u16 data_size = sizeof(struct pmcraid_inquiry_data); pmcraid_reinit_cmdblk(cmd); ioarcb->request_type = REQ_TYPE_SCSI; ioarcb->resource_handle = cpu_to_le32(PMCRAID_IOA_RES_HANDLE); ioarcb->cdb[0] = INQUIRY; ioarcb->cdb[1] = 1; ioarcb->cdb[2] = 0xD0; ioarcb->cdb[3] = (data_size >> 8) & 0xFF; ioarcb->cdb[4] = data_size & 0xFF; /* Since entire inquiry data it can be part of IOARCB itself */ ioarcb->ioadl_bus_addr = cpu_to_le64((cmd->ioa_cb_bus_addr) + offsetof(struct pmcraid_ioarcb, add_data.u.ioadl[0])); ioarcb->ioadl_length = cpu_to_le32(sizeof(struct pmcraid_ioadl_desc)); ioarcb->ioarcb_bus_addr &= ~(0x1FULL); ioarcb->request_flags0 |= NO_LINK_DESCS; ioarcb->data_transfer_length = cpu_to_le32(data_size); ioadl = &(ioarcb->add_data.u.ioadl[0]); ioadl->flags = IOADL_FLAGS_LAST_DESC; ioadl->address = cpu_to_le64(pinstance->inq_data_baddr); ioadl->data_len = cpu_to_le32(data_size); pmcraid_send_cmd(cmd, pmcraid_get_fwversion_done, PMCRAID_INTERNAL_TIMEOUT, pmcraid_timeout_handler); } /** * pmcraid_identify_hrrq - registers host rrq buffers with IOA * @cmd: pointer to command block to be used for identify hrrq * * Return Value * none */ static void pmcraid_identify_hrrq(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; int index = cmd->hrrq_index; __be64 hrrq_addr = cpu_to_be64(pinstance->hrrq_start_bus_addr[index]); u32 hrrq_size = cpu_to_be32(sizeof(u32) * PMCRAID_MAX_CMD); void (*done_function)(struct pmcraid_cmd *); pmcraid_reinit_cmdblk(cmd); cmd->hrrq_index = index + 1; if (cmd->hrrq_index < pinstance->num_hrrq) { done_function = pmcraid_identify_hrrq; } else { cmd->hrrq_index = 0; done_function = pmcraid_get_fwversion; } /* Initialize ioarcb */ ioarcb->request_type = REQ_TYPE_IOACMD; ioarcb->resource_handle = cpu_to_le32(PMCRAID_IOA_RES_HANDLE); /* initialize the hrrq number where IOA will respond to this command */ ioarcb->hrrq_id = index; ioarcb->cdb[0] = PMCRAID_IDENTIFY_HRRQ; ioarcb->cdb[1] = index; /* IOA expects 64-bit pci address to be written in B.E format * (i.e cdb[2]=MSByte..cdb[9]=LSB. */ pmcraid_info("HRRQ_IDENTIFY with hrrq:ioarcb:index => %llx:%llx:%x\n", hrrq_addr, ioarcb->ioarcb_bus_addr, index); memcpy(&(ioarcb->cdb[2]), &hrrq_addr, sizeof(hrrq_addr)); memcpy(&(ioarcb->cdb[10]), &hrrq_size, sizeof(hrrq_size)); /* Subsequent commands require HRRQ identification to be successful. * Note that this gets called even during reset from SCSI mid-layer * or tasklet */ pmcraid_send_cmd(cmd, done_function, PMCRAID_INTERNAL_TIMEOUT, pmcraid_timeout_handler); } static void pmcraid_process_ccn(struct pmcraid_cmd *cmd); static void pmcraid_process_ldn(struct pmcraid_cmd *cmd); /** * pmcraid_send_hcam_cmd - send an initialized command block(HCAM) to IOA * * @cmd: initialized command block pointer * * Return Value * none */ static void pmcraid_send_hcam_cmd(struct pmcraid_cmd *cmd) { if (cmd->ioa_cb->ioarcb.cdb[1] == PMCRAID_HCAM_CODE_CONFIG_CHANGE) atomic_set(&(cmd->drv_inst->ccn.ignore), 0); else atomic_set(&(cmd->drv_inst->ldn.ignore), 0); pmcraid_send_cmd(cmd, cmd->cmd_done, 0, NULL); } /** * pmcraid_init_hcam - send an initialized command block(HCAM) to IOA * * @pinstance: pointer to adapter instance structure * @type: HCAM type * * Return Value * pointer to initialized pmcraid_cmd structure or NULL */ static struct pmcraid_cmd *pmcraid_init_hcam ( struct pmcraid_instance *pinstance, u8 type ) { struct pmcraid_cmd *cmd; struct pmcraid_ioarcb *ioarcb; struct pmcraid_ioadl_desc *ioadl; struct pmcraid_hostrcb *hcam; void (*cmd_done) (struct pmcraid_cmd *); dma_addr_t dma; int rcb_size; cmd = pmcraid_get_free_cmd(pinstance); if (!cmd) { pmcraid_err("no free command blocks for hcam\n"); return cmd; } if (type == PMCRAID_HCAM_CODE_CONFIG_CHANGE) { rcb_size = sizeof(struct pmcraid_hcam_ccn_ext); cmd_done = pmcraid_process_ccn; dma = pinstance->ccn.baddr + PMCRAID_AEN_HDR_SIZE; hcam = &pinstance->ccn; } else { rcb_size = sizeof(struct pmcraid_hcam_ldn); cmd_done = pmcraid_process_ldn; dma = pinstance->ldn.baddr + PMCRAID_AEN_HDR_SIZE; hcam = &pinstance->ldn; } /* initialize command pointer used for HCAM registration */ hcam->cmd = cmd; ioarcb = &cmd->ioa_cb->ioarcb; ioarcb->ioadl_bus_addr = cpu_to_le64((cmd->ioa_cb_bus_addr) + offsetof(struct pmcraid_ioarcb, add_data.u.ioadl[0])); ioarcb->ioadl_length = cpu_to_le32(sizeof(struct pmcraid_ioadl_desc)); ioadl = ioarcb->add_data.u.ioadl; /* Initialize ioarcb */ ioarcb->request_type = REQ_TYPE_HCAM; ioarcb->resource_handle = cpu_to_le32(PMCRAID_IOA_RES_HANDLE); ioarcb->cdb[0] = PMCRAID_HOST_CONTROLLED_ASYNC; ioarcb->cdb[1] = type; ioarcb->cdb[7] = (rcb_size >> 8) & 0xFF; ioarcb->cdb[8] = (rcb_size) & 0xFF; ioarcb->data_transfer_length = cpu_to_le32(rcb_size); ioadl[0].flags |= IOADL_FLAGS_READ_LAST; ioadl[0].data_len = cpu_to_le32(rcb_size); ioadl[0].address = cpu_to_le32(dma); cmd->cmd_done = cmd_done; return cmd; } /** * pmcraid_send_hcam - Send an HCAM to IOA * @pinstance: ioa config struct * @type: HCAM type * * This function will send a Host Controlled Async command to IOA. * * Return value: * none */ static void pmcraid_send_hcam(struct pmcraid_instance *pinstance, u8 type) { struct pmcraid_cmd *cmd = pmcraid_init_hcam(pinstance, type); pmcraid_send_hcam_cmd(cmd); } /** * pmcraid_prepare_cancel_cmd - prepares a command block to abort another * * @cmd: pointer to cmd that is used as cancelling command * @cmd_to_cancel: pointer to the command that needs to be cancelled */ static void pmcraid_prepare_cancel_cmd( struct pmcraid_cmd *cmd, struct pmcraid_cmd *cmd_to_cancel ) { struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; __be64 ioarcb_addr = cmd_to_cancel->ioa_cb->ioarcb.ioarcb_bus_addr; /* Get the resource handle to where the command to be aborted has been * sent. */ ioarcb->resource_handle = cmd_to_cancel->ioa_cb->ioarcb.resource_handle; ioarcb->request_type = REQ_TYPE_IOACMD; memset(ioarcb->cdb, 0, PMCRAID_MAX_CDB_LEN); ioarcb->cdb[0] = PMCRAID_ABORT_CMD; /* IOARCB address of the command to be cancelled is given in * cdb[2]..cdb[9] is Big-Endian format. Note that length bits in * IOARCB address are not masked. */ ioarcb_addr = cpu_to_be64(ioarcb_addr); memcpy(&(ioarcb->cdb[2]), &ioarcb_addr, sizeof(ioarcb_addr)); } /** * pmcraid_cancel_hcam - sends ABORT task to abort a given HCAM * * @cmd: command to be used as cancelling command * @type: HCAM type * @cmd_done: op done function for the cancelling command */ static void pmcraid_cancel_hcam( struct pmcraid_cmd *cmd, u8 type, void (*cmd_done) (struct pmcraid_cmd *) ) { struct pmcraid_instance *pinstance; struct pmcraid_hostrcb *hcam; pinstance = cmd->drv_inst; hcam = (type == PMCRAID_HCAM_CODE_LOG_DATA) ? &pinstance->ldn : &pinstance->ccn; /* prepare for cancelling previous hcam command. If the HCAM is * currently not pending with IOA, we would have hcam->cmd as non-null */ if (hcam->cmd == NULL) return; pmcraid_prepare_cancel_cmd(cmd, hcam->cmd); /* writing to IOARRIN must be protected by host_lock, as mid-layer * schedule queuecommand while we are doing this */ pmcraid_send_cmd(cmd, cmd_done, PMCRAID_INTERNAL_TIMEOUT, pmcraid_timeout_handler); } /** * pmcraid_cancel_ccn - cancel CCN HCAM already registered with IOA * * @cmd: command block to be used for cancelling the HCAM */ static void pmcraid_cancel_ccn(struct pmcraid_cmd *cmd) { pmcraid_info("response for Cancel LDN CDB[0] = %x ioasc = %x\n", cmd->ioa_cb->ioarcb.cdb[0], le32_to_cpu(cmd->ioa_cb->ioasa.ioasc)); pmcraid_reinit_cmdblk(cmd); pmcraid_cancel_hcam(cmd, PMCRAID_HCAM_CODE_CONFIG_CHANGE, pmcraid_ioa_shutdown); } /** * pmcraid_cancel_ldn - cancel LDN HCAM already registered with IOA * * @cmd: command block to be used for cancelling the HCAM */ static void pmcraid_cancel_ldn(struct pmcraid_cmd *cmd) { pmcraid_cancel_hcam(cmd, PMCRAID_HCAM_CODE_LOG_DATA, pmcraid_cancel_ccn); } /** * pmcraid_expose_resource - check if the resource can be exposed to OS * * @fw_version: firmware version code * @cfgte: pointer to configuration table entry of the resource * * Return value: * true if resource can be added to midlayer, false(0) otherwise */ static int pmcraid_expose_resource(u16 fw_version, struct pmcraid_config_table_entry *cfgte) { int retval = 0; if (cfgte->resource_type == RES_TYPE_VSET) { if (fw_version <= PMCRAID_FW_VERSION_1) retval = ((cfgte->unique_flags1 & 0x80) == 0); else retval = ((cfgte->unique_flags0 & 0x80) == 0 && (cfgte->unique_flags1 & 0x80) == 0); } else if (cfgte->resource_type == RES_TYPE_GSCSI) retval = (RES_BUS(cfgte->resource_address) != PMCRAID_VIRTUAL_ENCL_BUS_ID); return retval; } /* attributes supported by pmcraid_event_family */ enum { PMCRAID_AEN_ATTR_UNSPEC, PMCRAID_AEN_ATTR_EVENT, __PMCRAID_AEN_ATTR_MAX, }; #define PMCRAID_AEN_ATTR_MAX (__PMCRAID_AEN_ATTR_MAX - 1) /* commands supported by pmcraid_event_family */ enum { PMCRAID_AEN_CMD_UNSPEC, PMCRAID_AEN_CMD_EVENT, __PMCRAID_AEN_CMD_MAX, }; #define PMCRAID_AEN_CMD_MAX (__PMCRAID_AEN_CMD_MAX - 1) static struct genl_family pmcraid_event_family = { .id = GENL_ID_GENERATE, .name = "pmcraid", .version = 1, .maxattr = PMCRAID_AEN_ATTR_MAX }; /** * pmcraid_netlink_init - registers pmcraid_event_family * * Return value: * 0 if the pmcraid_event_family is successfully registered * with netlink generic, non-zero otherwise */ static int pmcraid_netlink_init(void) { int result; result = genl_register_family(&pmcraid_event_family); if (result) return result; pmcraid_info("registered NETLINK GENERIC group: %d\n", pmcraid_event_family.id); return result; } /** * pmcraid_netlink_release - unregisters pmcraid_event_family * * Return value: * none */ static void pmcraid_netlink_release(void) { genl_unregister_family(&pmcraid_event_family); } /** * pmcraid_notify_aen - sends event msg to user space application * @pinstance: pointer to adapter instance structure * @type: HCAM type * * Return value: * 0 if success, error value in case of any failure. */ static int pmcraid_notify_aen( struct pmcraid_instance *pinstance, struct pmcraid_aen_msg *aen_msg, u32 data_size ) { struct sk_buff *skb; void *msg_header; u32 total_size, nla_genl_hdr_total_size; int result; aen_msg->hostno = (pinstance->host->unique_id << 16 | MINOR(pinstance->cdev.dev)); aen_msg->length = data_size; data_size += sizeof(*aen_msg); total_size = nla_total_size(data_size); /* Add GENL_HDR to total_size */ nla_genl_hdr_total_size = (total_size + (GENL_HDRLEN + ((struct genl_family *)&pmcraid_event_family)->hdrsize) + NLMSG_HDRLEN); skb = genlmsg_new(nla_genl_hdr_total_size, GFP_ATOMIC); if (!skb) { pmcraid_err("Failed to allocate aen data SKB of size: %x\n", total_size); return -ENOMEM; } /* add the genetlink message header */ msg_header = genlmsg_put(skb, 0, 0, &pmcraid_event_family, 0, PMCRAID_AEN_CMD_EVENT); if (!msg_header) { pmcraid_err("failed to copy command details\n"); nlmsg_free(skb); return -ENOMEM; } result = nla_put(skb, PMCRAID_AEN_ATTR_EVENT, data_size, aen_msg); if (result) { pmcraid_err("failed to copy AEN attribute data\n"); nlmsg_free(skb); return -EINVAL; } /* send genetlink multicast message to notify appplications */ result = genlmsg_end(skb, msg_header); if (result < 0) { pmcraid_err("genlmsg_end failed\n"); nlmsg_free(skb); return result; } result = genlmsg_multicast(skb, 0, pmcraid_event_family.id, GFP_ATOMIC); /* If there are no listeners, genlmsg_multicast may return non-zero * value. */ if (result) pmcraid_info("error (%x) sending aen event message\n", result); return result; } /** * pmcraid_notify_ccn - notifies about CCN event msg to user space * @pinstance: pointer adapter instance structure * * Return value: * 0 if success, error value in case of any failure */ static int pmcraid_notify_ccn(struct pmcraid_instance *pinstance) { return pmcraid_notify_aen(pinstance, pinstance->ccn.msg, pinstance->ccn.hcam->data_len + sizeof(struct pmcraid_hcam_hdr)); } /** * pmcraid_notify_ldn - notifies about CCN event msg to user space * @pinstance: pointer adapter instance structure * * Return value: * 0 if success, error value in case of any failure */ static int pmcraid_notify_ldn(struct pmcraid_instance *pinstance) { return pmcraid_notify_aen(pinstance, pinstance->ldn.msg, pinstance->ldn.hcam->data_len + sizeof(struct pmcraid_hcam_hdr)); } /** * pmcraid_notify_ioastate - sends IOA state event msg to user space * @pinstance: pointer adapter instance structure * @evt: controller state event to be sent * * Return value: * 0 if success, error value in case of any failure */ static void pmcraid_notify_ioastate(struct pmcraid_instance *pinstance, u32 evt) { pinstance->scn.ioa_state = evt; pmcraid_notify_aen(pinstance, &pinstance->scn.msg, sizeof(u32)); } /** * pmcraid_handle_config_change - Handle a config change from the adapter * @pinstance: pointer to per adapter instance structure * * Return value: * none */ static void pmcraid_handle_config_change(struct pmcraid_instance *pinstance) { struct pmcraid_config_table_entry *cfg_entry; struct pmcraid_hcam_ccn *ccn_hcam; struct pmcraid_cmd *cmd; struct pmcraid_cmd *cfgcmd; struct pmcraid_resource_entry *res = NULL; unsigned long lock_flags; unsigned long host_lock_flags; u32 new_entry = 1; u32 hidden_entry = 0; u16 fw_version; int rc; ccn_hcam = (struct pmcraid_hcam_ccn *)pinstance->ccn.hcam; cfg_entry = &ccn_hcam->cfg_entry; fw_version = be16_to_cpu(pinstance->inq_data->fw_version); pmcraid_info("CCN(%x): %x timestamp: %llx type: %x lost: %x flags: %x \ res: %x:%x:%x:%x\n", pinstance->ccn.hcam->ilid, pinstance->ccn.hcam->op_code, ((pinstance->ccn.hcam->timestamp1) | ((pinstance->ccn.hcam->timestamp2 & 0xffffffffLL) << 32)), pinstance->ccn.hcam->notification_type, pinstance->ccn.hcam->notification_lost, pinstance->ccn.hcam->flags, pinstance->host->unique_id, RES_IS_VSET(*cfg_entry) ? PMCRAID_VSET_BUS_ID : (RES_IS_GSCSI(*cfg_entry) ? PMCRAID_PHYS_BUS_ID : RES_BUS(cfg_entry->resource_address)), RES_IS_VSET(*cfg_entry) ? (fw_version <= PMCRAID_FW_VERSION_1 ? cfg_entry->unique_flags1 : cfg_entry->array_id & 0xFF) : RES_TARGET(cfg_entry->resource_address), RES_LUN(cfg_entry->resource_address)); /* If this HCAM indicates a lost notification, read the config table */ if (pinstance->ccn.hcam->notification_lost) { cfgcmd = pmcraid_get_free_cmd(pinstance); if (cfgcmd) { pmcraid_info("lost CCN, reading config table\b"); pinstance->reinit_cfg_table = 1; pmcraid_querycfg(cfgcmd); } else { pmcraid_err("lost CCN, no free cmd for querycfg\n"); } goto out_notify_apps; } /* If this resource is not going to be added to mid-layer, just notify * applications and return. If this notification is about hiding a VSET * resource, check if it was exposed already. */ if (pinstance->ccn.hcam->notification_type == NOTIFICATION_TYPE_ENTRY_CHANGED && cfg_entry->resource_type == RES_TYPE_VSET) { if (fw_version <= PMCRAID_FW_VERSION_1) hidden_entry = (cfg_entry->unique_flags1 & 0x80) != 0; else hidden_entry = (cfg_entry->unique_flags1 & 0x80) != 0; } else if (!pmcraid_expose_resource(fw_version, cfg_entry)) { goto out_notify_apps; } spin_lock_irqsave(&pinstance->resource_lock, lock_flags); list_for_each_entry(res, &pinstance->used_res_q, queue) { rc = memcmp(&res->cfg_entry.resource_address, &cfg_entry->resource_address, sizeof(cfg_entry->resource_address)); if (!rc) { new_entry = 0; break; } } if (new_entry) { if (hidden_entry) { spin_unlock_irqrestore(&pinstance->resource_lock, lock_flags); goto out_notify_apps; } /* If there are more number of resources than what driver can * manage, do not notify the applications about the CCN. Just * ignore this notifications and re-register the same HCAM */ if (list_empty(&pinstance->free_res_q)) { spin_unlock_irqrestore(&pinstance->resource_lock, lock_flags); pmcraid_err("too many resources attached\n"); spin_lock_irqsave(pinstance->host->host_lock, host_lock_flags); pmcraid_send_hcam(pinstance, PMCRAID_HCAM_CODE_CONFIG_CHANGE); spin_unlock_irqrestore(pinstance->host->host_lock, host_lock_flags); return; } res = list_entry(pinstance->free_res_q.next, struct pmcraid_resource_entry, queue); list_del(&res->queue); res->scsi_dev = NULL; res->reset_progress = 0; list_add_tail(&res->queue, &pinstance->used_res_q); } memcpy(&res->cfg_entry, cfg_entry, pinstance->config_table_entry_size); if (pinstance->ccn.hcam->notification_type == NOTIFICATION_TYPE_ENTRY_DELETED || hidden_entry) { if (res->scsi_dev) { if (fw_version <= PMCRAID_FW_VERSION_1) res->cfg_entry.unique_flags1 &= 0x7F; else res->cfg_entry.array_id &= 0xFF; res->change_detected = RES_CHANGE_DEL; res->cfg_entry.resource_handle = PMCRAID_INVALID_RES_HANDLE; schedule_work(&pinstance->worker_q); } else { /* This may be one of the non-exposed resources */ list_move_tail(&res->queue, &pinstance->free_res_q); } } else if (!res->scsi_dev) { res->change_detected = RES_CHANGE_ADD; schedule_work(&pinstance->worker_q); } spin_unlock_irqrestore(&pinstance->resource_lock, lock_flags); out_notify_apps: /* Notify configuration changes to registered applications.*/ if (!pmcraid_disable_aen) pmcraid_notify_ccn(pinstance); cmd = pmcraid_init_hcam(pinstance, PMCRAID_HCAM_CODE_CONFIG_CHANGE); if (cmd) pmcraid_send_hcam_cmd(cmd); } /** * pmcraid_get_error_info - return error string for an ioasc * @ioasc: ioasc code * Return Value * none */ static struct pmcraid_ioasc_error *pmcraid_get_error_info(u32 ioasc) { int i; for (i = 0; i < ARRAY_SIZE(pmcraid_ioasc_error_table); i++) { if (pmcraid_ioasc_error_table[i].ioasc_code == ioasc) return &pmcraid_ioasc_error_table[i]; } return NULL; } /** * pmcraid_ioasc_logger - log IOASC information based user-settings * @ioasc: ioasc code * @cmd: pointer to command that resulted in 'ioasc' */ void pmcraid_ioasc_logger(u32 ioasc, struct pmcraid_cmd *cmd) { struct pmcraid_ioasc_error *error_info = pmcraid_get_error_info(ioasc); if (error_info == NULL || cmd->drv_inst->current_log_level < error_info->log_level) return; /* log the error string */ pmcraid_err("cmd [%x] for resource %x failed with %x(%s)\n", cmd->ioa_cb->ioarcb.cdb[0], cmd->ioa_cb->ioarcb.resource_handle, le32_to_cpu(ioasc), error_info->error_string); } /** * pmcraid_handle_error_log - Handle a config change (error log) from the IOA * * @pinstance: pointer to per adapter instance structure * * Return value: * none */ static void pmcraid_handle_error_log(struct pmcraid_instance *pinstance) { struct pmcraid_hcam_ldn *hcam_ldn; u32 ioasc; hcam_ldn = (struct pmcraid_hcam_ldn *)pinstance->ldn.hcam; pmcraid_info ("LDN(%x): %x type: %x lost: %x flags: %x overlay id: %x\n", pinstance->ldn.hcam->ilid, pinstance->ldn.hcam->op_code, pinstance->ldn.hcam->notification_type, pinstance->ldn.hcam->notification_lost, pinstance->ldn.hcam->flags, pinstance->ldn.hcam->overlay_id); /* log only the errors, no need to log informational log entries */ if (pinstance->ldn.hcam->notification_type != NOTIFICATION_TYPE_ERROR_LOG) return; if (pinstance->ldn.hcam->notification_lost == HOSTRCB_NOTIFICATIONS_LOST) dev_info(&pinstance->pdev->dev, "Error notifications lost\n"); ioasc = le32_to_cpu(hcam_ldn->error_log.fd_ioasc); if (ioasc == PMCRAID_IOASC_UA_BUS_WAS_RESET || ioasc == PMCRAID_IOASC_UA_BUS_WAS_RESET_BY_OTHER) { dev_info(&pinstance->pdev->dev, "UnitAttention due to IOA Bus Reset\n"); scsi_report_bus_reset( pinstance->host, RES_BUS(hcam_ldn->error_log.fd_ra)); } return; } /** * pmcraid_process_ccn - Op done function for a CCN. * @cmd: pointer to command struct * * This function is the op done function for a configuration * change notification * * Return value: * none */ static void pmcraid_process_ccn(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; u32 ioasc = le32_to_cpu(cmd->ioa_cb->ioasa.ioasc); unsigned long lock_flags; pinstance->ccn.cmd = NULL; pmcraid_return_cmd(cmd); /* If driver initiated IOA reset happened while this hcam was pending * with IOA, or IOA bringdown sequence is in progress, no need to * re-register the hcam */ if (ioasc == PMCRAID_IOASC_IOA_WAS_RESET || atomic_read(&pinstance->ccn.ignore) == 1) { return; } else if (ioasc) { dev_info(&pinstance->pdev->dev, "Host RCB (CCN) failed with IOASC: 0x%08X\n", ioasc); spin_lock_irqsave(pinstance->host->host_lock, lock_flags); pmcraid_send_hcam(pinstance, PMCRAID_HCAM_CODE_CONFIG_CHANGE); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); } else { pmcraid_handle_config_change(pinstance); } } /** * pmcraid_process_ldn - op done function for an LDN * @cmd: pointer to command block * * Return value * none */ static void pmcraid_initiate_reset(struct pmcraid_instance *); static void pmcraid_set_timestamp(struct pmcraid_cmd *cmd); static void pmcraid_process_ldn(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; struct pmcraid_hcam_ldn *ldn_hcam = (struct pmcraid_hcam_ldn *)pinstance->ldn.hcam; u32 ioasc = le32_to_cpu(cmd->ioa_cb->ioasa.ioasc); u32 fd_ioasc = le32_to_cpu(ldn_hcam->error_log.fd_ioasc); unsigned long lock_flags; /* return the command block back to freepool */ pinstance->ldn.cmd = NULL; pmcraid_return_cmd(cmd); /* If driver initiated IOA reset happened while this hcam was pending * with IOA, no need to re-register the hcam as reset engine will do it * once reset sequence is complete */ if (ioasc == PMCRAID_IOASC_IOA_WAS_RESET || atomic_read(&pinstance->ccn.ignore) == 1) { return; } else if (!ioasc) { pmcraid_handle_error_log(pinstance); if (fd_ioasc == PMCRAID_IOASC_NR_IOA_RESET_REQUIRED) { spin_lock_irqsave(pinstance->host->host_lock, lock_flags); pmcraid_initiate_reset(pinstance); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); return; } if (fd_ioasc == PMCRAID_IOASC_TIME_STAMP_OUT_OF_SYNC) { pinstance->timestamp_error = 1; pmcraid_set_timestamp(cmd); } } else { dev_info(&pinstance->pdev->dev, "Host RCB(LDN) failed with IOASC: 0x%08X\n", ioasc); } /* send netlink message for HCAM notification if enabled */ if (!pmcraid_disable_aen) pmcraid_notify_ldn(pinstance); cmd = pmcraid_init_hcam(pinstance, PMCRAID_HCAM_CODE_LOG_DATA); if (cmd) pmcraid_send_hcam_cmd(cmd); } /** * pmcraid_register_hcams - register HCAMs for CCN and LDN * * @pinstance: pointer per adapter instance structure * * Return Value * none */ static void pmcraid_register_hcams(struct pmcraid_instance *pinstance) { pmcraid_send_hcam(pinstance, PMCRAID_HCAM_CODE_CONFIG_CHANGE); pmcraid_send_hcam(pinstance, PMCRAID_HCAM_CODE_LOG_DATA); } /** * pmcraid_unregister_hcams - cancel HCAMs registered already * @cmd: pointer to command used as part of reset sequence */ static void pmcraid_unregister_hcams(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; /* During IOA bringdown, HCAM gets fired and tasklet proceeds with * handling hcam response though it is not necessary. In order to * prevent this, set 'ignore', so that bring-down sequence doesn't * re-send any more hcams */ atomic_set(&pinstance->ccn.ignore, 1); atomic_set(&pinstance->ldn.ignore, 1); /* If adapter reset was forced as part of runtime reset sequence, * start the reset sequence. Reset will be triggered even in case * IOA unit_check. */ if ((pinstance->force_ioa_reset && !pinstance->ioa_bringdown) || pinstance->ioa_unit_check) { pinstance->force_ioa_reset = 0; pinstance->ioa_unit_check = 0; pinstance->ioa_state = IOA_STATE_IN_RESET_ALERT; pmcraid_reset_alert(cmd); return; } /* Driver tries to cancel HCAMs by sending ABORT TASK for each HCAM * one after the other. So CCN cancellation will be triggered by * pmcraid_cancel_ldn itself. */ pmcraid_cancel_ldn(cmd); } /** * pmcraid_reset_enable_ioa - re-enable IOA after a hard reset * @pinstance: pointer to adapter instance structure * Return Value * 1 if TRANSITION_TO_OPERATIONAL is active, otherwise 0 */ static void pmcraid_reinit_buffers(struct pmcraid_instance *); static int pmcraid_reset_enable_ioa(struct pmcraid_instance *pinstance) { u32 intrs; pmcraid_reinit_buffers(pinstance); intrs = pmcraid_read_interrupts(pinstance); pmcraid_enable_interrupts(pinstance, PMCRAID_PCI_INTERRUPTS); if (intrs & INTRS_TRANSITION_TO_OPERATIONAL) { if (!pinstance->interrupt_mode) { iowrite32(INTRS_TRANSITION_TO_OPERATIONAL, pinstance->int_regs. ioa_host_interrupt_mask_reg); iowrite32(INTRS_TRANSITION_TO_OPERATIONAL, pinstance->int_regs.ioa_host_interrupt_clr_reg); } return 1; } else { return 0; } } /** * pmcraid_soft_reset - performs a soft reset and makes IOA become ready * @cmd : pointer to reset command block * * Return Value * none */ static void pmcraid_soft_reset(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; u32 int_reg; u32 doorbell; /* There will be an interrupt when Transition to Operational bit is * set so tasklet would execute next reset task. The timeout handler * would re-initiate a reset */ cmd->cmd_done = pmcraid_ioa_reset; cmd->timer.data = (unsigned long)cmd; cmd->timer.expires = jiffies + msecs_to_jiffies(PMCRAID_TRANSOP_TIMEOUT); cmd->timer.function = (void (*)(unsigned long))pmcraid_timeout_handler; if (!timer_pending(&cmd->timer)) add_timer(&cmd->timer); /* Enable destructive diagnostics on IOA if it is not yet in * operational state */ doorbell = DOORBELL_RUNTIME_RESET | DOORBELL_ENABLE_DESTRUCTIVE_DIAGS; /* Since we do RESET_ALERT and Start BIST we have to again write * MSIX Doorbell to indicate the interrupt mode */ if (pinstance->interrupt_mode) { iowrite32(DOORBELL_INTR_MODE_MSIX, pinstance->int_regs.host_ioa_interrupt_reg); ioread32(pinstance->int_regs.host_ioa_interrupt_reg); } iowrite32(doorbell, pinstance->int_regs.host_ioa_interrupt_reg); ioread32(pinstance->int_regs.host_ioa_interrupt_reg), int_reg = ioread32(pinstance->int_regs.ioa_host_interrupt_reg); pmcraid_info("Waiting for IOA to become operational %x:%x\n", ioread32(pinstance->int_regs.host_ioa_interrupt_reg), int_reg); } /** * pmcraid_get_dump - retrieves IOA dump in case of Unit Check interrupt * * @pinstance: pointer to adapter instance structure * * Return Value * none */ static void pmcraid_get_dump(struct pmcraid_instance *pinstance) { pmcraid_info("%s is not yet implemented\n", __func__); } /** * pmcraid_fail_outstanding_cmds - Fails all outstanding ops. * @pinstance: pointer to adapter instance structure * * This function fails all outstanding ops. If they are submitted to IOA * already, it sends cancel all messages if IOA is still accepting IOARCBs, * otherwise just completes the commands and returns the cmd blocks to free * pool. * * Return value: * none */ static void pmcraid_fail_outstanding_cmds(struct pmcraid_instance *pinstance) { struct pmcraid_cmd *cmd, *temp; unsigned long lock_flags; /* pending command list is protected by pending_pool_lock. Its * traversal must be done as within this lock */ spin_lock_irqsave(&pinstance->pending_pool_lock, lock_flags); list_for_each_entry_safe(cmd, temp, &pinstance->pending_cmd_pool, free_list) { list_del(&cmd->free_list); spin_unlock_irqrestore(&pinstance->pending_pool_lock, lock_flags); cmd->ioa_cb->ioasa.ioasc = cpu_to_le32(PMCRAID_IOASC_IOA_WAS_RESET); cmd->ioa_cb->ioasa.ilid = cpu_to_be32(PMCRAID_DRIVER_ILID); /* In case the command timer is still running */ del_timer(&cmd->timer); /* If this is an IO command, complete it by invoking scsi_done * function. If this is one of the internal commands other * than pmcraid_ioa_reset and HCAM commands invoke cmd_done to * complete it */ if (cmd->scsi_cmd) { struct scsi_cmnd *scsi_cmd = cmd->scsi_cmd; __le32 resp = cmd->ioa_cb->ioarcb.response_handle; scsi_cmd->result |= DID_ERROR << 16; scsi_dma_unmap(scsi_cmd); pmcraid_return_cmd(cmd); pmcraid_info("failing(%d) CDB[0] = %x result: %x\n", le32_to_cpu(resp) >> 2, cmd->ioa_cb->ioarcb.cdb[0], scsi_cmd->result); scsi_cmd->scsi_done(scsi_cmd); } else if (cmd->cmd_done == pmcraid_internal_done || cmd->cmd_done == pmcraid_erp_done) { cmd->cmd_done(cmd); } else if (cmd->cmd_done != pmcraid_ioa_reset && cmd->cmd_done != pmcraid_ioa_shutdown_done) { pmcraid_return_cmd(cmd); } atomic_dec(&pinstance->outstanding_cmds); spin_lock_irqsave(&pinstance->pending_pool_lock, lock_flags); } spin_unlock_irqrestore(&pinstance->pending_pool_lock, lock_flags); } /** * pmcraid_ioa_reset - Implementation of IOA reset logic * * @cmd: pointer to the cmd block to be used for entire reset process * * This function executes most of the steps required for IOA reset. This gets * called by user threads (modprobe/insmod/rmmod) timer, tasklet and midlayer's * 'eh_' thread. Access to variables used for controlling the reset sequence is * synchronized using host lock. Various functions called during reset process * would make use of a single command block, pointer to which is also stored in * adapter instance structure. * * Return Value * None */ static void pmcraid_ioa_reset(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; u8 reset_complete = 0; pinstance->ioa_reset_in_progress = 1; if (pinstance->reset_cmd != cmd) { pmcraid_err("reset is called with different command block\n"); pinstance->reset_cmd = cmd; } pmcraid_info("reset_engine: state = %d, command = %p\n", pinstance->ioa_state, cmd); switch (pinstance->ioa_state) { case IOA_STATE_DEAD: /* If IOA is offline, whatever may be the reset reason, just * return. callers might be waiting on the reset wait_q, wake * up them */ pmcraid_err("IOA is offline no reset is possible\n"); reset_complete = 1; break; case IOA_STATE_IN_BRINGDOWN: /* we enter here, once ioa shutdown command is processed by IOA * Alert IOA for a possible reset. If reset alert fails, IOA * goes through hard-reset */ pmcraid_disable_interrupts(pinstance, ~0); pinstance->ioa_state = IOA_STATE_IN_RESET_ALERT; pmcraid_reset_alert(cmd); break; case IOA_STATE_UNKNOWN: /* We may be called during probe or resume. Some pre-processing * is required for prior to reset */ scsi_block_requests(pinstance->host); /* If asked to reset while IOA was processing responses or * there are any error responses then IOA may require * hard-reset. */ if (pinstance->ioa_hard_reset == 0) { if (ioread32(pinstance->ioa_status) & INTRS_TRANSITION_TO_OPERATIONAL) { pmcraid_info("sticky bit set, bring-up\n"); pinstance->ioa_state = IOA_STATE_IN_BRINGUP; pmcraid_reinit_cmdblk(cmd); pmcraid_identify_hrrq(cmd); } else { pinstance->ioa_state = IOA_STATE_IN_SOFT_RESET; pmcraid_soft_reset(cmd); } } else { /* Alert IOA of a possible reset and wait for critical * operation in progress bit to reset */ pinstance->ioa_state = IOA_STATE_IN_RESET_ALERT; pmcraid_reset_alert(cmd); } break; case IOA_STATE_IN_RESET_ALERT: /* If critical operation in progress bit is reset or wait gets * timed out, reset proceeds with starting BIST on the IOA. * pmcraid_ioa_hard_reset keeps a count of reset attempts. If * they are 3 or more, reset engine marks IOA dead and returns */ pinstance->ioa_state = IOA_STATE_IN_HARD_RESET; pmcraid_start_bist(cmd); break; case IOA_STATE_IN_HARD_RESET: pinstance->ioa_reset_attempts++; /* retry reset if we haven't reached maximum allowed limit */ if (pinstance->ioa_reset_attempts > PMCRAID_RESET_ATTEMPTS) { pinstance->ioa_reset_attempts = 0; pmcraid_err("IOA didn't respond marking it as dead\n"); pinstance->ioa_state = IOA_STATE_DEAD; if (pinstance->ioa_bringdown) pmcraid_notify_ioastate(pinstance, PMC_DEVICE_EVENT_SHUTDOWN_FAILED); else pmcraid_notify_ioastate(pinstance, PMC_DEVICE_EVENT_RESET_FAILED); reset_complete = 1; break; } /* Once either bist or pci reset is done, restore PCI config * space. If this fails, proceed with hard reset again */ pci_restore_state(pinstance->pdev); /* fail all pending commands */ pmcraid_fail_outstanding_cmds(pinstance); /* check if unit check is active, if so extract dump */ if (pinstance->ioa_unit_check) { pmcraid_info("unit check is active\n"); pinstance->ioa_unit_check = 0; pmcraid_get_dump(pinstance); pinstance->ioa_reset_attempts--; pinstance->ioa_state = IOA_STATE_IN_RESET_ALERT; pmcraid_reset_alert(cmd); break; } /* if the reset reason is to bring-down the ioa, we might be * done with the reset restore pci_config_space and complete * the reset */ if (pinstance->ioa_bringdown) { pmcraid_info("bringing down the adapter\n"); pinstance->ioa_shutdown_type = SHUTDOWN_NONE; pinstance->ioa_bringdown = 0; pinstance->ioa_state = IOA_STATE_UNKNOWN; pmcraid_notify_ioastate(pinstance, PMC_DEVICE_EVENT_SHUTDOWN_SUCCESS); reset_complete = 1; } else { /* bring-up IOA, so proceed with soft reset * Reinitialize hrrq_buffers and their indices also * enable interrupts after a pci_restore_state */ if (pmcraid_reset_enable_ioa(pinstance)) { pinstance->ioa_state = IOA_STATE_IN_BRINGUP; pmcraid_info("bringing up the adapter\n"); pmcraid_reinit_cmdblk(cmd); pmcraid_identify_hrrq(cmd); } else { pinstance->ioa_state = IOA_STATE_IN_SOFT_RESET; pmcraid_soft_reset(cmd); } } break; case IOA_STATE_IN_SOFT_RESET: /* TRANSITION TO OPERATIONAL is on so start initialization * sequence */ pmcraid_info("In softreset proceeding with bring-up\n"); pinstance->ioa_state = IOA_STATE_IN_BRINGUP; /* Initialization commands start with HRRQ identification. From * now on tasklet completes most of the commands as IOA is up * and intrs are enabled */ pmcraid_identify_hrrq(cmd); break; case IOA_STATE_IN_BRINGUP: /* we are done with bringing up of IOA, change the ioa_state to * operational and wake up any waiters */ pinstance->ioa_state = IOA_STATE_OPERATIONAL; reset_complete = 1; break; case IOA_STATE_OPERATIONAL: default: /* When IOA is operational and a reset is requested, check for * the reset reason. If reset is to bring down IOA, unregister * HCAMs and initiate shutdown; if adapter reset is forced then * restart reset sequence again */ if (pinstance->ioa_shutdown_type == SHUTDOWN_NONE && pinstance->force_ioa_reset == 0) { pmcraid_notify_ioastate(pinstance, PMC_DEVICE_EVENT_RESET_SUCCESS); reset_complete = 1; } else { if (pinstance->ioa_shutdown_type != SHUTDOWN_NONE) pinstance->ioa_state = IOA_STATE_IN_BRINGDOWN; pmcraid_reinit_cmdblk(cmd); pmcraid_unregister_hcams(cmd); } break; } /* reset will be completed if ioa_state is either DEAD or UNKNOWN or * OPERATIONAL. Reset all control variables used during reset, wake up * any waiting threads and let the SCSI mid-layer send commands. Note * that host_lock must be held before invoking scsi_report_bus_reset. */ if (reset_complete) { pinstance->ioa_reset_in_progress = 0; pinstance->ioa_reset_attempts = 0; pinstance->reset_cmd = NULL; pinstance->ioa_shutdown_type = SHUTDOWN_NONE; pinstance->ioa_bringdown = 0; pmcraid_return_cmd(cmd); /* If target state is to bring up the adapter, proceed with * hcam registration and resource exposure to mid-layer. */ if (pinstance->ioa_state == IOA_STATE_OPERATIONAL) pmcraid_register_hcams(pinstance); wake_up_all(&pinstance->reset_wait_q); } return; } /** * pmcraid_initiate_reset - initiates reset sequence. This is called from * ISR/tasklet during error interrupts including IOA unit check. If reset * is already in progress, it just returns, otherwise initiates IOA reset * to bring IOA up to operational state. * * @pinstance: pointer to adapter instance structure * * Return value * none */ static void pmcraid_initiate_reset(struct pmcraid_instance *pinstance) { struct pmcraid_cmd *cmd; /* If the reset is already in progress, just return, otherwise start * reset sequence and return */ if (!pinstance->ioa_reset_in_progress) { scsi_block_requests(pinstance->host); cmd = pmcraid_get_free_cmd(pinstance); if (cmd == NULL) { pmcraid_err("no cmnd blocks for initiate_reset\n"); return; } pinstance->ioa_shutdown_type = SHUTDOWN_NONE; pinstance->reset_cmd = cmd; pinstance->force_ioa_reset = 1; pmcraid_notify_ioastate(pinstance, PMC_DEVICE_EVENT_RESET_START); pmcraid_ioa_reset(cmd); } } /** * pmcraid_reset_reload - utility routine for doing IOA reset either to bringup * or bringdown IOA * @pinstance: pointer adapter instance structure * @shutdown_type: shutdown type to be used NONE, NORMAL or ABRREV * @target_state: expected target state after reset * * Note: This command initiates reset and waits for its completion. Hence this * should not be called from isr/timer/tasklet functions (timeout handlers, * error response handlers and interrupt handlers). * * Return Value * 1 in case ioa_state is not target_state, 0 otherwise. */ static int pmcraid_reset_reload( struct pmcraid_instance *pinstance, u8 shutdown_type, u8 target_state ) { struct pmcraid_cmd *reset_cmd = NULL; unsigned long lock_flags; int reset = 1; spin_lock_irqsave(pinstance->host->host_lock, lock_flags); if (pinstance->ioa_reset_in_progress) { pmcraid_info("reset_reload: reset is already in progress\n"); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); wait_event(pinstance->reset_wait_q, !pinstance->ioa_reset_in_progress); spin_lock_irqsave(pinstance->host->host_lock, lock_flags); if (pinstance->ioa_state == IOA_STATE_DEAD) { spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); pmcraid_info("reset_reload: IOA is dead\n"); return reset; } else if (pinstance->ioa_state == target_state) { reset = 0; } } if (reset) { pmcraid_info("reset_reload: proceeding with reset\n"); scsi_block_requests(pinstance->host); reset_cmd = pmcraid_get_free_cmd(pinstance); if (reset_cmd == NULL) { pmcraid_err("no free cmnd for reset_reload\n"); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); return reset; } if (shutdown_type == SHUTDOWN_NORMAL) pinstance->ioa_bringdown = 1; pinstance->ioa_shutdown_type = shutdown_type; pinstance->reset_cmd = reset_cmd; pinstance->force_ioa_reset = reset; pmcraid_info("reset_reload: initiating reset\n"); pmcraid_ioa_reset(reset_cmd); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); pmcraid_info("reset_reload: waiting for reset to complete\n"); wait_event(pinstance->reset_wait_q, !pinstance->ioa_reset_in_progress); pmcraid_info("reset_reload: reset is complete !!\n"); scsi_unblock_requests(pinstance->host); if (pinstance->ioa_state == target_state) reset = 0; } return reset; } /** * pmcraid_reset_bringdown - wrapper over pmcraid_reset_reload to bringdown IOA * * @pinstance: pointer to adapter instance structure * * Return Value * whatever is returned from pmcraid_reset_reload */ static int pmcraid_reset_bringdown(struct pmcraid_instance *pinstance) { return pmcraid_reset_reload(pinstance, SHUTDOWN_NORMAL, IOA_STATE_UNKNOWN); } /** * pmcraid_reset_bringup - wrapper over pmcraid_reset_reload to bring up IOA * * @pinstance: pointer to adapter instance structure * * Return Value * whatever is returned from pmcraid_reset_reload */ static int pmcraid_reset_bringup(struct pmcraid_instance *pinstance) { pmcraid_notify_ioastate(pinstance, PMC_DEVICE_EVENT_RESET_START); return pmcraid_reset_reload(pinstance, SHUTDOWN_NONE, IOA_STATE_OPERATIONAL); } /** * pmcraid_request_sense - Send request sense to a device * @cmd: pmcraid command struct * * This function sends a request sense to a device as a result of a check * condition. This method re-uses the same command block that failed earlier. */ static void pmcraid_request_sense(struct pmcraid_cmd *cmd) { struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; struct pmcraid_ioadl_desc *ioadl = ioarcb->add_data.u.ioadl; /* allocate DMAable memory for sense buffers */ cmd->sense_buffer = pci_alloc_consistent(cmd->drv_inst->pdev, SCSI_SENSE_BUFFERSIZE, &cmd->sense_buffer_dma); if (cmd->sense_buffer == NULL) { pmcraid_err ("couldn't allocate sense buffer for request sense\n"); pmcraid_erp_done(cmd); return; } /* re-use the command block */ memset(&cmd->ioa_cb->ioasa, 0, sizeof(struct pmcraid_ioasa)); memset(ioarcb->cdb, 0, PMCRAID_MAX_CDB_LEN); ioarcb->request_flags0 = (SYNC_COMPLETE | NO_LINK_DESCS | INHIBIT_UL_CHECK); ioarcb->request_type = REQ_TYPE_SCSI; ioarcb->cdb[0] = REQUEST_SENSE; ioarcb->cdb[4] = SCSI_SENSE_BUFFERSIZE; ioarcb->ioadl_bus_addr = cpu_to_le64((cmd->ioa_cb_bus_addr) + offsetof(struct pmcraid_ioarcb, add_data.u.ioadl[0])); ioarcb->ioadl_length = cpu_to_le32(sizeof(struct pmcraid_ioadl_desc)); ioarcb->data_transfer_length = cpu_to_le32(SCSI_SENSE_BUFFERSIZE); ioadl->address = cpu_to_le64(cmd->sense_buffer_dma); ioadl->data_len = cpu_to_le32(SCSI_SENSE_BUFFERSIZE); ioadl->flags = IOADL_FLAGS_LAST_DESC; /* request sense might be called as part of error response processing * which runs in tasklets context. It is possible that mid-layer might * schedule queuecommand during this time, hence, writting to IOARRIN * must be protect by host_lock */ pmcraid_send_cmd(cmd, pmcraid_erp_done, PMCRAID_REQUEST_SENSE_TIMEOUT, pmcraid_timeout_handler); } /** * pmcraid_cancel_all - cancel all outstanding IOARCBs as part of error recovery * @cmd: command that failed * @sense: true if request_sense is required after cancel all * * This function sends a cancel all to a device to clear the queue. */ static void pmcraid_cancel_all(struct pmcraid_cmd *cmd, u32 sense) { struct scsi_cmnd *scsi_cmd = cmd->scsi_cmd; struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; struct pmcraid_resource_entry *res = scsi_cmd->device->hostdata; void (*cmd_done) (struct pmcraid_cmd *) = sense ? pmcraid_erp_done : pmcraid_request_sense; memset(ioarcb->cdb, 0, PMCRAID_MAX_CDB_LEN); ioarcb->request_flags0 = SYNC_OVERRIDE; ioarcb->request_type = REQ_TYPE_IOACMD; ioarcb->cdb[0] = PMCRAID_CANCEL_ALL_REQUESTS; if (RES_IS_GSCSI(res->cfg_entry)) ioarcb->cdb[1] = PMCRAID_SYNC_COMPLETE_AFTER_CANCEL; ioarcb->ioadl_bus_addr = 0; ioarcb->ioadl_length = 0; ioarcb->data_transfer_length = 0; ioarcb->ioarcb_bus_addr &= (~0x1FULL); /* writing to IOARRIN must be protected by host_lock, as mid-layer * schedule queuecommand while we are doing this */ pmcraid_send_cmd(cmd, cmd_done, PMCRAID_REQUEST_SENSE_TIMEOUT, pmcraid_timeout_handler); } /** * pmcraid_frame_auto_sense: frame fixed format sense information * * @cmd: pointer to failing command block * * Return value * none */ static void pmcraid_frame_auto_sense(struct pmcraid_cmd *cmd) { u8 *sense_buf = cmd->scsi_cmd->sense_buffer; struct pmcraid_resource_entry *res = cmd->scsi_cmd->device->hostdata; struct pmcraid_ioasa *ioasa = &cmd->ioa_cb->ioasa; u32 ioasc = le32_to_cpu(ioasa->ioasc); u32 failing_lba = 0; memset(sense_buf, 0, SCSI_SENSE_BUFFERSIZE); cmd->scsi_cmd->result = SAM_STAT_CHECK_CONDITION; if (RES_IS_VSET(res->cfg_entry) && ioasc == PMCRAID_IOASC_ME_READ_ERROR_NO_REALLOC && ioasa->u.vset.failing_lba_hi != 0) { sense_buf[0] = 0x72; sense_buf[1] = PMCRAID_IOASC_SENSE_KEY(ioasc); sense_buf[2] = PMCRAID_IOASC_SENSE_CODE(ioasc); sense_buf[3] = PMCRAID_IOASC_SENSE_QUAL(ioasc); sense_buf[7] = 12; sense_buf[8] = 0; sense_buf[9] = 0x0A; sense_buf[10] = 0x80; failing_lba = le32_to_cpu(ioasa->u.vset.failing_lba_hi); sense_buf[12] = (failing_lba & 0xff000000) >> 24; sense_buf[13] = (failing_lba & 0x00ff0000) >> 16; sense_buf[14] = (failing_lba & 0x0000ff00) >> 8; sense_buf[15] = failing_lba & 0x000000ff; failing_lba = le32_to_cpu(ioasa->u.vset.failing_lba_lo); sense_buf[16] = (failing_lba & 0xff000000) >> 24; sense_buf[17] = (failing_lba & 0x00ff0000) >> 16; sense_buf[18] = (failing_lba & 0x0000ff00) >> 8; sense_buf[19] = failing_lba & 0x000000ff; } else { sense_buf[0] = 0x70; sense_buf[2] = PMCRAID_IOASC_SENSE_KEY(ioasc); sense_buf[12] = PMCRAID_IOASC_SENSE_CODE(ioasc); sense_buf[13] = PMCRAID_IOASC_SENSE_QUAL(ioasc); if (ioasc == PMCRAID_IOASC_ME_READ_ERROR_NO_REALLOC) { if (RES_IS_VSET(res->cfg_entry)) failing_lba = le32_to_cpu(ioasa->u. vset.failing_lba_lo); sense_buf[0] |= 0x80; sense_buf[3] = (failing_lba >> 24) & 0xff; sense_buf[4] = (failing_lba >> 16) & 0xff; sense_buf[5] = (failing_lba >> 8) & 0xff; sense_buf[6] = failing_lba & 0xff; } sense_buf[7] = 6; /* additional length */ } } /** * pmcraid_error_handler - Error response handlers for a SCSI op * @cmd: pointer to pmcraid_cmd that has failed * * This function determines whether or not to initiate ERP on the affected * device. This is called from a tasklet, which doesn't hold any locks. * * Return value: * 0 it caller can complete the request, otherwise 1 where in error * handler itself completes the request and returns the command block * back to free-pool */ static int pmcraid_error_handler(struct pmcraid_cmd *cmd) { struct scsi_cmnd *scsi_cmd = cmd->scsi_cmd; struct pmcraid_resource_entry *res = scsi_cmd->device->hostdata; struct pmcraid_instance *pinstance = cmd->drv_inst; struct pmcraid_ioasa *ioasa = &cmd->ioa_cb->ioasa; u32 ioasc = le32_to_cpu(ioasa->ioasc); u32 masked_ioasc = ioasc & PMCRAID_IOASC_SENSE_MASK; u32 sense_copied = 0; if (!res) { pmcraid_info("resource pointer is NULL\n"); return 0; } /* If this was a SCSI read/write command keep count of errors */ if (SCSI_CMD_TYPE(scsi_cmd->cmnd[0]) == SCSI_READ_CMD) atomic_inc(&res->read_failures); else if (SCSI_CMD_TYPE(scsi_cmd->cmnd[0]) == SCSI_WRITE_CMD) atomic_inc(&res->write_failures); if (!RES_IS_GSCSI(res->cfg_entry) && masked_ioasc != PMCRAID_IOASC_HW_DEVICE_BUS_STATUS_ERROR) { pmcraid_frame_auto_sense(cmd); } /* Log IOASC/IOASA information based on user settings */ pmcraid_ioasc_logger(ioasc, cmd); switch (masked_ioasc) { case PMCRAID_IOASC_AC_TERMINATED_BY_HOST: scsi_cmd->result |= (DID_ABORT << 16); break; case PMCRAID_IOASC_IR_INVALID_RESOURCE_HANDLE: case PMCRAID_IOASC_HW_CANNOT_COMMUNICATE: scsi_cmd->result |= (DID_NO_CONNECT << 16); break; case PMCRAID_IOASC_NR_SYNC_REQUIRED: res->sync_reqd = 1; scsi_cmd->result |= (DID_IMM_RETRY << 16); break; case PMCRAID_IOASC_ME_READ_ERROR_NO_REALLOC: scsi_cmd->result |= (DID_PASSTHROUGH << 16); break; case PMCRAID_IOASC_UA_BUS_WAS_RESET: case PMCRAID_IOASC_UA_BUS_WAS_RESET_BY_OTHER: if (!res->reset_progress) scsi_report_bus_reset(pinstance->host, scsi_cmd->device->channel); scsi_cmd->result |= (DID_ERROR << 16); break; case PMCRAID_IOASC_HW_DEVICE_BUS_STATUS_ERROR: scsi_cmd->result |= PMCRAID_IOASC_SENSE_STATUS(ioasc); res->sync_reqd = 1; /* if check_condition is not active return with error otherwise * get/frame the sense buffer */ if (PMCRAID_IOASC_SENSE_STATUS(ioasc) != SAM_STAT_CHECK_CONDITION && PMCRAID_IOASC_SENSE_STATUS(ioasc) != SAM_STAT_ACA_ACTIVE) return 0; /* If we have auto sense data as part of IOASA pass it to * mid-layer */ if (ioasa->auto_sense_length != 0) { short sense_len = ioasa->auto_sense_length; int data_size = min_t(u16, le16_to_cpu(sense_len), SCSI_SENSE_BUFFERSIZE); memcpy(scsi_cmd->sense_buffer, ioasa->sense_data, data_size); sense_copied = 1; } if (RES_IS_GSCSI(res->cfg_entry)) pmcraid_cancel_all(cmd, sense_copied); else if (sense_copied) pmcraid_erp_done(cmd); else pmcraid_request_sense(cmd); return 1; case PMCRAID_IOASC_NR_INIT_CMD_REQUIRED: break; default: if (PMCRAID_IOASC_SENSE_KEY(ioasc) > RECOVERED_ERROR) scsi_cmd->result |= (DID_ERROR << 16); break; } return 0; } /** * pmcraid_reset_device - device reset handler functions * * @scsi_cmd: scsi command struct * @modifier: reset modifier indicating the reset sequence to be performed * * This function issues a device reset to the affected device. * A LUN reset will be sent to the device first. If that does * not work, a target reset will be sent. * * Return value: * SUCCESS / FAILED */ static int pmcraid_reset_device( struct scsi_cmnd *scsi_cmd, unsigned long timeout, u8 modifier ) { struct pmcraid_cmd *cmd; struct pmcraid_instance *pinstance; struct pmcraid_resource_entry *res; struct pmcraid_ioarcb *ioarcb; unsigned long lock_flags; u32 ioasc; pinstance = (struct pmcraid_instance *)scsi_cmd->device->host->hostdata; res = scsi_cmd->device->hostdata; if (!res) { sdev_printk(KERN_ERR, scsi_cmd->device, "reset_device: NULL resource pointer\n"); return FAILED; } /* If adapter is currently going through reset/reload, return failed. * This will force the mid-layer to call _eh_bus/host reset, which * will then go to sleep and wait for the reset to complete */ spin_lock_irqsave(pinstance->host->host_lock, lock_flags); if (pinstance->ioa_reset_in_progress || pinstance->ioa_state == IOA_STATE_DEAD) { spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); return FAILED; } res->reset_progress = 1; pmcraid_info("Resetting %s resource with addr %x\n", ((modifier & RESET_DEVICE_LUN) ? "LUN" : ((modifier & RESET_DEVICE_TARGET) ? "TARGET" : "BUS")), le32_to_cpu(res->cfg_entry.resource_address)); /* get a free cmd block */ cmd = pmcraid_get_free_cmd(pinstance); if (cmd == NULL) { spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); pmcraid_err("%s: no cmd blocks are available\n", __func__); return FAILED; } ioarcb = &cmd->ioa_cb->ioarcb; ioarcb->resource_handle = res->cfg_entry.resource_handle; ioarcb->request_type = REQ_TYPE_IOACMD; ioarcb->cdb[0] = PMCRAID_RESET_DEVICE; /* Initialize reset modifier bits */ if (modifier) modifier = ENABLE_RESET_MODIFIER | modifier; ioarcb->cdb[1] = modifier; init_completion(&cmd->wait_for_completion); cmd->completion_req = 1; pmcraid_info("cmd(CDB[0] = %x) for %x with index = %d\n", cmd->ioa_cb->ioarcb.cdb[0], le32_to_cpu(cmd->ioa_cb->ioarcb.resource_handle), le32_to_cpu(cmd->ioa_cb->ioarcb.response_handle) >> 2); pmcraid_send_cmd(cmd, pmcraid_internal_done, timeout, pmcraid_timeout_handler); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); /* RESET_DEVICE command completes after all pending IOARCBs are * completed. Once this command is completed, pmcraind_internal_done * will wake up the 'completion' queue. */ wait_for_completion(&cmd->wait_for_completion); /* complete the command here itself and return the command block * to free list */ pmcraid_return_cmd(cmd); res->reset_progress = 0; ioasc = le32_to_cpu(cmd->ioa_cb->ioasa.ioasc); /* set the return value based on the returned ioasc */ return PMCRAID_IOASC_SENSE_KEY(ioasc) ? FAILED : SUCCESS; } /** * _pmcraid_io_done - helper for pmcraid_io_done function * * @cmd: pointer to pmcraid command struct * @reslen: residual data length to be set in the ioasa * @ioasc: ioasc either returned by IOA or set by driver itself. * * This function is invoked by pmcraid_io_done to complete mid-layer * scsi ops. * * Return value: * 0 if caller is required to return it to free_pool. Returns 1 if * caller need not worry about freeing command block as error handler * will take care of that. */ static int _pmcraid_io_done(struct pmcraid_cmd *cmd, int reslen, int ioasc) { struct scsi_cmnd *scsi_cmd = cmd->scsi_cmd; int rc = 0; scsi_set_resid(scsi_cmd, reslen); pmcraid_info("response(%d) CDB[0] = %x ioasc:result: %x:%x\n", le32_to_cpu(cmd->ioa_cb->ioarcb.response_handle) >> 2, cmd->ioa_cb->ioarcb.cdb[0], ioasc, scsi_cmd->result); if (PMCRAID_IOASC_SENSE_KEY(ioasc) != 0) rc = pmcraid_error_handler(cmd); if (rc == 0) { scsi_dma_unmap(scsi_cmd); scsi_cmd->scsi_done(scsi_cmd); } return rc; } /** * pmcraid_io_done - SCSI completion function * * @cmd: pointer to pmcraid command struct * * This function is invoked by tasklet/mid-layer error handler to completing * the SCSI ops sent from mid-layer. * * Return value * none */ static void pmcraid_io_done(struct pmcraid_cmd *cmd) { u32 ioasc = le32_to_cpu(cmd->ioa_cb->ioasa.ioasc); u32 reslen = le32_to_cpu(cmd->ioa_cb->ioasa.residual_data_length); if (_pmcraid_io_done(cmd, reslen, ioasc) == 0) pmcraid_return_cmd(cmd); } /** * pmcraid_abort_cmd - Aborts a single IOARCB already submitted to IOA * * @cmd: command block of the command to be aborted * * Return Value: * returns pointer to command structure used as cancelling cmd */ static struct pmcraid_cmd *pmcraid_abort_cmd(struct pmcraid_cmd *cmd) { struct pmcraid_cmd *cancel_cmd; struct pmcraid_instance *pinstance; struct pmcraid_resource_entry *res; pinstance = (struct pmcraid_instance *)cmd->drv_inst; res = cmd->scsi_cmd->device->hostdata; cancel_cmd = pmcraid_get_free_cmd(pinstance); if (cancel_cmd == NULL) { pmcraid_err("%s: no cmd blocks are available\n", __func__); return NULL; } pmcraid_prepare_cancel_cmd(cancel_cmd, cmd); pmcraid_info("aborting command CDB[0]= %x with index = %d\n", cmd->ioa_cb->ioarcb.cdb[0], cmd->ioa_cb->ioarcb.response_handle >> 2); init_completion(&cancel_cmd->wait_for_completion); cancel_cmd->completion_req = 1; pmcraid_info("command (%d) CDB[0] = %x for %x\n", le32_to_cpu(cancel_cmd->ioa_cb->ioarcb.response_handle) >> 2, cancel_cmd->ioa_cb->ioarcb.cdb[0], le32_to_cpu(cancel_cmd->ioa_cb->ioarcb.resource_handle)); pmcraid_send_cmd(cancel_cmd, pmcraid_internal_done, PMCRAID_INTERNAL_TIMEOUT, pmcraid_timeout_handler); return cancel_cmd; } /** * pmcraid_abort_complete - Waits for ABORT TASK completion * * @cancel_cmd: command block use as cancelling command * * Return Value: * returns SUCCESS if ABORT TASK has good completion * otherwise FAILED */ static int pmcraid_abort_complete(struct pmcraid_cmd *cancel_cmd) { struct pmcraid_resource_entry *res; u32 ioasc; wait_for_completion(&cancel_cmd->wait_for_completion); res = cancel_cmd->res; cancel_cmd->res = NULL; ioasc = le32_to_cpu(cancel_cmd->ioa_cb->ioasa.ioasc); /* If the abort task is not timed out we will get a Good completion * as sense_key, otherwise we may get one the following responses * due to subsequent bus reset or device reset. In case IOASC is * NR_SYNC_REQUIRED, set sync_reqd flag for the corresponding resource */ if (ioasc == PMCRAID_IOASC_UA_BUS_WAS_RESET || ioasc == PMCRAID_IOASC_NR_SYNC_REQUIRED) { if (ioasc == PMCRAID_IOASC_NR_SYNC_REQUIRED) res->sync_reqd = 1; ioasc = 0; } /* complete the command here itself */ pmcraid_return_cmd(cancel_cmd); return PMCRAID_IOASC_SENSE_KEY(ioasc) ? FAILED : SUCCESS; } /** * pmcraid_eh_abort_handler - entry point for aborting a single task on errors * * @scsi_cmd: scsi command struct given by mid-layer. When this is called * mid-layer ensures that no other commands are queued. This * never gets called under interrupt, but a separate eh thread. * * Return value: * SUCCESS / FAILED */ static int pmcraid_eh_abort_handler(struct scsi_cmnd *scsi_cmd) { struct pmcraid_instance *pinstance; struct pmcraid_cmd *cmd; struct pmcraid_resource_entry *res; unsigned long host_lock_flags; unsigned long pending_lock_flags; struct pmcraid_cmd *cancel_cmd = NULL; int cmd_found = 0; int rc = FAILED; pinstance = (struct pmcraid_instance *)scsi_cmd->device->host->hostdata; scmd_printk(KERN_INFO, scsi_cmd, "I/O command timed out, aborting it.\n"); res = scsi_cmd->device->hostdata; if (res == NULL) return rc; /* If we are currently going through reset/reload, return failed. * This will force the mid-layer to eventually call * pmcraid_eh_host_reset which will then go to sleep and wait for the * reset to complete */ spin_lock_irqsave(pinstance->host->host_lock, host_lock_flags); if (pinstance->ioa_reset_in_progress || pinstance->ioa_state == IOA_STATE_DEAD) { spin_unlock_irqrestore(pinstance->host->host_lock, host_lock_flags); return rc; } /* loop over pending cmd list to find cmd corresponding to this * scsi_cmd. Note that this command might not have been completed * already. locking: all pending commands are protected with * pending_pool_lock. */ spin_lock_irqsave(&pinstance->pending_pool_lock, pending_lock_flags); list_for_each_entry(cmd, &pinstance->pending_cmd_pool, free_list) { if (cmd->scsi_cmd == scsi_cmd) { cmd_found = 1; break; } } spin_unlock_irqrestore(&pinstance->pending_pool_lock, pending_lock_flags); /* If the command to be aborted was given to IOA and still pending with * it, send ABORT_TASK to abort this and wait for its completion */ if (cmd_found) cancel_cmd = pmcraid_abort_cmd(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, host_lock_flags); if (cancel_cmd) { cancel_cmd->res = cmd->scsi_cmd->device->hostdata; rc = pmcraid_abort_complete(cancel_cmd); } return cmd_found ? rc : SUCCESS; } /** * pmcraid_eh_xxxx_reset_handler - bus/target/device reset handler callbacks * * @scmd: pointer to scsi_cmd that was sent to the resource to be reset. * * All these routines invokve pmcraid_reset_device with appropriate parameters. * Since these are called from mid-layer EH thread, no other IO will be queued * to the resource being reset. However, control path (IOCTL) may be active so * it is necessary to synchronize IOARRIN writes which pmcraid_reset_device * takes care by locking/unlocking host_lock. * * Return value * SUCCESS or FAILED */ static int pmcraid_eh_device_reset_handler(struct scsi_cmnd *scmd) { scmd_printk(KERN_INFO, scmd, "resetting device due to an I/O command timeout.\n"); return pmcraid_reset_device(scmd, PMCRAID_INTERNAL_TIMEOUT, RESET_DEVICE_LUN); } static int pmcraid_eh_bus_reset_handler(struct scsi_cmnd *scmd) { scmd_printk(KERN_INFO, scmd, "Doing bus reset due to an I/O command timeout.\n"); return pmcraid_reset_device(scmd, PMCRAID_RESET_BUS_TIMEOUT, RESET_DEVICE_BUS); } static int pmcraid_eh_target_reset_handler(struct scsi_cmnd *scmd) { scmd_printk(KERN_INFO, scmd, "Doing target reset due to an I/O command timeout.\n"); return pmcraid_reset_device(scmd, PMCRAID_INTERNAL_TIMEOUT, RESET_DEVICE_TARGET); } /** * pmcraid_eh_host_reset_handler - adapter reset handler callback * * @scmd: pointer to scsi_cmd that was sent to a resource of adapter * * Initiates adapter reset to bring it up to operational state * * Return value * SUCCESS or FAILED */ static int pmcraid_eh_host_reset_handler(struct scsi_cmnd *scmd) { unsigned long interval = 10000; /* 10 seconds interval */ int waits = jiffies_to_msecs(PMCRAID_RESET_HOST_TIMEOUT) / interval; struct pmcraid_instance *pinstance = (struct pmcraid_instance *)(scmd->device->host->hostdata); /* wait for an additional 150 seconds just in case firmware could come * up and if it could complete all the pending commands excluding the * two HCAM (CCN and LDN). */ while (waits--) { if (atomic_read(&pinstance->outstanding_cmds) <= PMCRAID_MAX_HCAM_CMD) return SUCCESS; msleep(interval); } dev_err(&pinstance->pdev->dev, "Adapter being reset due to an I/O command timeout.\n"); return pmcraid_reset_bringup(pinstance) == 0 ? SUCCESS : FAILED; } /** * pmcraid_task_attributes - Translate SPI Q-Tags to task attributes * @scsi_cmd: scsi command struct * * Return value * number of tags or 0 if the task is not tagged */ static u8 pmcraid_task_attributes(struct scsi_cmnd *scsi_cmd) { char tag[2]; u8 rc = 0; if (scsi_populate_tag_msg(scsi_cmd, tag)) { switch (tag[0]) { case MSG_SIMPLE_TAG: rc = TASK_TAG_SIMPLE; break; case MSG_HEAD_TAG: rc = TASK_TAG_QUEUE_HEAD; break; case MSG_ORDERED_TAG: rc = TASK_TAG_ORDERED; break; }; } return rc; } /** * pmcraid_init_ioadls - initializes IOADL related fields in IOARCB * @cmd: pmcraid command struct * @sgcount: count of scatter-gather elements * * Return value * returns pointer pmcraid_ioadl_desc, initialized to point to internal * or external IOADLs */ struct pmcraid_ioadl_desc * pmcraid_init_ioadls(struct pmcraid_cmd *cmd, int sgcount) { struct pmcraid_ioadl_desc *ioadl; struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; int ioadl_count = 0; if (ioarcb->add_cmd_param_length) ioadl_count = DIV_ROUND_UP(ioarcb->add_cmd_param_length, 16); ioarcb->ioadl_length = sizeof(struct pmcraid_ioadl_desc) * sgcount; if ((sgcount + ioadl_count) > (ARRAY_SIZE(ioarcb->add_data.u.ioadl))) { /* external ioadls start at offset 0x80 from control_block * structure, re-using 24 out of 27 ioadls part of IOARCB. * It is necessary to indicate to firmware that driver is * using ioadls to be treated as external to IOARCB. */ ioarcb->ioarcb_bus_addr &= ~(0x1FULL); ioarcb->ioadl_bus_addr = cpu_to_le64((cmd->ioa_cb_bus_addr) + offsetof(struct pmcraid_ioarcb, add_data.u.ioadl[3])); ioadl = &ioarcb->add_data.u.ioadl[3]; } else { ioarcb->ioadl_bus_addr = cpu_to_le64((cmd->ioa_cb_bus_addr) + offsetof(struct pmcraid_ioarcb, add_data.u.ioadl[ioadl_count])); ioadl = &ioarcb->add_data.u.ioadl[ioadl_count]; ioarcb->ioarcb_bus_addr |= DIV_ROUND_CLOSEST(sgcount + ioadl_count, 8); } return ioadl; } /** * pmcraid_build_ioadl - Build a scatter/gather list and map the buffer * @pinstance: pointer to adapter instance structure * @cmd: pmcraid command struct * * This function is invoked by queuecommand entry point while sending a command * to firmware. This builds ioadl descriptors and sets up ioarcb fields. * * Return value: * 0 on success or -1 on failure */ static int pmcraid_build_ioadl( struct pmcraid_instance *pinstance, struct pmcraid_cmd *cmd ) { int i, nseg; struct scatterlist *sglist; struct scsi_cmnd *scsi_cmd = cmd->scsi_cmd; struct pmcraid_ioarcb *ioarcb = &(cmd->ioa_cb->ioarcb); struct pmcraid_ioadl_desc *ioadl = ioarcb->add_data.u.ioadl; u32 length = scsi_bufflen(scsi_cmd); if (!length) return 0; nseg = scsi_dma_map(scsi_cmd); if (nseg < 0) { scmd_printk(KERN_ERR, scsi_cmd, "scsi_map_dma failed!\n"); return -1; } else if (nseg > PMCRAID_MAX_IOADLS) { scsi_dma_unmap(scsi_cmd); scmd_printk(KERN_ERR, scsi_cmd, "sg count is (%d) more than allowed!\n", nseg); return -1; } /* Initialize IOARCB data transfer length fields */ if (scsi_cmd->sc_data_direction == DMA_TO_DEVICE) ioarcb->request_flags0 |= TRANSFER_DIR_WRITE; ioarcb->request_flags0 |= NO_LINK_DESCS; ioarcb->data_transfer_length = cpu_to_le32(length); ioadl = pmcraid_init_ioadls(cmd, nseg); /* Initialize IOADL descriptor addresses */ scsi_for_each_sg(scsi_cmd, sglist, nseg, i) { ioadl[i].data_len = cpu_to_le32(sg_dma_len(sglist)); ioadl[i].address = cpu_to_le64(sg_dma_address(sglist)); ioadl[i].flags = 0; } /* setup last descriptor */ ioadl[i - 1].flags = IOADL_FLAGS_LAST_DESC; return 0; } /** * pmcraid_free_sglist - Frees an allocated SG buffer list * @sglist: scatter/gather list pointer * * Free a DMA'able memory previously allocated with pmcraid_alloc_sglist * * Return value: * none */ static void pmcraid_free_sglist(struct pmcraid_sglist *sglist) { int i; for (i = 0; i < sglist->num_sg; i++) __free_pages(sg_page(&(sglist->scatterlist[i])), sglist->order); kfree(sglist); } /** * pmcraid_alloc_sglist - Allocates memory for a SG list * @buflen: buffer length * * Allocates a DMA'able buffer in chunks and assembles a scatter/gather * list. * * Return value * pointer to sglist / NULL on failure */ static struct pmcraid_sglist *pmcraid_alloc_sglist(int buflen) { struct pmcraid_sglist *sglist; struct scatterlist *scatterlist; struct page *page; int num_elem, i, j; int sg_size; int order; int bsize_elem; sg_size = buflen / (PMCRAID_MAX_IOADLS - 1); order = (sg_size > 0) ? get_order(sg_size) : 0; bsize_elem = PAGE_SIZE * (1 << order); /* Determine the actual number of sg entries needed */ if (buflen % bsize_elem) num_elem = (buflen / bsize_elem) + 1; else num_elem = buflen / bsize_elem; /* Allocate a scatter/gather list for the DMA */ sglist = kzalloc(sizeof(struct pmcraid_sglist) + (sizeof(struct scatterlist) * (num_elem - 1)), GFP_KERNEL); if (sglist == NULL) return NULL; scatterlist = sglist->scatterlist; sg_init_table(scatterlist, num_elem); sglist->order = order; sglist->num_sg = num_elem; sg_size = buflen; for (i = 0; i < num_elem; i++) { page = alloc_pages(GFP_KERNEL|GFP_DMA|__GFP_ZERO, order); if (!page) { for (j = i - 1; j >= 0; j--) __free_pages(sg_page(&scatterlist[j]), order); kfree(sglist); return NULL; } sg_set_page(&scatterlist[i], page, sg_size < bsize_elem ? sg_size : bsize_elem, 0); sg_size -= bsize_elem; } return sglist; } /** * pmcraid_copy_sglist - Copy user buffer to kernel buffer's SG list * @sglist: scatter/gather list pointer * @buffer: buffer pointer * @len: buffer length * @direction: data transfer direction * * Copy a user buffer into a buffer allocated by pmcraid_alloc_sglist * * Return value: * 0 on success / other on failure */ static int pmcraid_copy_sglist( struct pmcraid_sglist *sglist, unsigned long buffer, u32 len, int direction ) { struct scatterlist *scatterlist; void *kaddr; int bsize_elem; int i; int rc = 0; /* Determine the actual number of bytes per element */ bsize_elem = PAGE_SIZE * (1 << sglist->order); scatterlist = sglist->scatterlist; for (i = 0; i < (len / bsize_elem); i++, buffer += bsize_elem) { struct page *page = sg_page(&scatterlist[i]); kaddr = kmap(page); if (direction == DMA_TO_DEVICE) rc = __copy_from_user(kaddr, (void *)buffer, bsize_elem); else rc = __copy_to_user((void *)buffer, kaddr, bsize_elem); kunmap(page); if (rc) { pmcraid_err("failed to copy user data into sg list\n"); return -EFAULT; } scatterlist[i].length = bsize_elem; } if (len % bsize_elem) { struct page *page = sg_page(&scatterlist[i]); kaddr = kmap(page); if (direction == DMA_TO_DEVICE) rc = __copy_from_user(kaddr, (void *)buffer, len % bsize_elem); else rc = __copy_to_user((void *)buffer, kaddr, len % bsize_elem); kunmap(page); scatterlist[i].length = len % bsize_elem; } if (rc) { pmcraid_err("failed to copy user data into sg list\n"); rc = -EFAULT; } return rc; } /** * pmcraid_queuecommand - Queue a mid-layer request * @scsi_cmd: scsi command struct * @done: done function * * This function queues a request generated by the mid-layer. Midlayer calls * this routine within host->lock. Some of the functions called by queuecommand * would use cmd block queue locks (free_pool_lock and pending_pool_lock) * * Return value: * 0 on success * SCSI_MLQUEUE_DEVICE_BUSY if device is busy * SCSI_MLQUEUE_HOST_BUSY if host is busy */ static int pmcraid_queuecommand_lck( struct scsi_cmnd *scsi_cmd, void (*done) (struct scsi_cmnd *) ) { struct pmcraid_instance *pinstance; struct pmcraid_resource_entry *res; struct pmcraid_ioarcb *ioarcb; struct pmcraid_cmd *cmd; u32 fw_version; int rc = 0; pinstance = (struct pmcraid_instance *)scsi_cmd->device->host->hostdata; fw_version = be16_to_cpu(pinstance->inq_data->fw_version); scsi_cmd->scsi_done = done; res = scsi_cmd->device->hostdata; scsi_cmd->result = (DID_OK << 16); /* if adapter is marked as dead, set result to DID_NO_CONNECT complete * the command */ if (pinstance->ioa_state == IOA_STATE_DEAD) { pmcraid_info("IOA is dead, but queuecommand is scheduled\n"); scsi_cmd->result = (DID_NO_CONNECT << 16); scsi_cmd->scsi_done(scsi_cmd); return 0; } /* If IOA reset is in progress, can't queue the commands */ if (pinstance->ioa_reset_in_progress) return SCSI_MLQUEUE_HOST_BUSY; /* Firmware doesn't support SYNCHRONIZE_CACHE command (0x35), complete * the command here itself with success return */ if (scsi_cmd->cmnd[0] == SYNCHRONIZE_CACHE) { pmcraid_info("SYNC_CACHE(0x35), completing in driver itself\n"); scsi_cmd->scsi_done(scsi_cmd); return 0; } /* initialize the command and IOARCB to be sent to IOA */ cmd = pmcraid_get_free_cmd(pinstance); if (cmd == NULL) { pmcraid_err("free command block is not available\n"); return SCSI_MLQUEUE_HOST_BUSY; } cmd->scsi_cmd = scsi_cmd; ioarcb = &(cmd->ioa_cb->ioarcb); memcpy(ioarcb->cdb, scsi_cmd->cmnd, scsi_cmd->cmd_len); ioarcb->resource_handle = res->cfg_entry.resource_handle; ioarcb->request_type = REQ_TYPE_SCSI; /* set hrrq number where the IOA should respond to. Note that all cmds * generated internally uses hrrq_id 0, exception to this is the cmd * block of scsi_cmd which is re-used (e.g. cancel/abort), which uses * hrrq_id assigned here in queuecommand */ ioarcb->hrrq_id = atomic_add_return(1, &(pinstance->last_message_id)) % pinstance->num_hrrq; cmd->cmd_done = pmcraid_io_done; if (RES_IS_GSCSI(res->cfg_entry) || RES_IS_VSET(res->cfg_entry)) { if (scsi_cmd->underflow == 0) ioarcb->request_flags0 |= INHIBIT_UL_CHECK; if (res->sync_reqd) { ioarcb->request_flags0 |= SYNC_COMPLETE; res->sync_reqd = 0; } ioarcb->request_flags0 |= NO_LINK_DESCS; ioarcb->request_flags1 |= pmcraid_task_attributes(scsi_cmd); if (RES_IS_GSCSI(res->cfg_entry)) ioarcb->request_flags1 |= DELAY_AFTER_RESET; } rc = pmcraid_build_ioadl(pinstance, cmd); pmcraid_info("command (%d) CDB[0] = %x for %x:%x:%x:%x\n", le32_to_cpu(ioarcb->response_handle) >> 2, scsi_cmd->cmnd[0], pinstance->host->unique_id, RES_IS_VSET(res->cfg_entry) ? PMCRAID_VSET_BUS_ID : PMCRAID_PHYS_BUS_ID, RES_IS_VSET(res->cfg_entry) ? (fw_version <= PMCRAID_FW_VERSION_1 ? res->cfg_entry.unique_flags1 : res->cfg_entry.array_id & 0xFF) : RES_TARGET(res->cfg_entry.resource_address), RES_LUN(res->cfg_entry.resource_address)); if (likely(rc == 0)) { _pmcraid_fire_command(cmd); } else { pmcraid_err("queuecommand could not build ioadl\n"); pmcraid_return_cmd(cmd); rc = SCSI_MLQUEUE_HOST_BUSY; } return rc; } static DEF_SCSI_QCMD(pmcraid_queuecommand) /** * pmcraid_open -char node "open" entry, allowed only users with admin access */ static int pmcraid_chr_open(struct inode *inode, struct file *filep) { struct pmcraid_instance *pinstance; if (!capable(CAP_SYS_ADMIN)) return -EACCES; /* Populate adapter instance * pointer for use by ioctl */ pinstance = container_of(inode->i_cdev, struct pmcraid_instance, cdev); filep->private_data = pinstance; return 0; } /** * pmcraid_release - char node "release" entry point */ static int pmcraid_chr_release(struct inode *inode, struct file *filep) { struct pmcraid_instance *pinstance = filep->private_data; filep->private_data = NULL; fasync_helper(-1, filep, 0, &pinstance->aen_queue); return 0; } /** * pmcraid_fasync - Async notifier registration from applications * * This function adds the calling process to a driver global queue. When an * event occurs, SIGIO will be sent to all processes in this queue. */ static int pmcraid_chr_fasync(int fd, struct file *filep, int mode) { struct pmcraid_instance *pinstance; int rc; pinstance = filep->private_data; mutex_lock(&pinstance->aen_queue_lock); rc = fasync_helper(fd, filep, mode, &pinstance->aen_queue); mutex_unlock(&pinstance->aen_queue_lock); return rc; } /** * pmcraid_build_passthrough_ioadls - builds SG elements for passthrough * commands sent over IOCTL interface * * @cmd : pointer to struct pmcraid_cmd * @buflen : length of the request buffer * @direction : data transfer direction * * Return value * 0 on success, non-zero error code on failure */ static int pmcraid_build_passthrough_ioadls( struct pmcraid_cmd *cmd, int buflen, int direction ) { struct pmcraid_sglist *sglist = NULL; struct scatterlist *sg = NULL; struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; struct pmcraid_ioadl_desc *ioadl; int i; sglist = pmcraid_alloc_sglist(buflen); if (!sglist) { pmcraid_err("can't allocate memory for passthrough SGls\n"); return -ENOMEM; } sglist->num_dma_sg = pci_map_sg(cmd->drv_inst->pdev, sglist->scatterlist, sglist->num_sg, direction); if (!sglist->num_dma_sg || sglist->num_dma_sg > PMCRAID_MAX_IOADLS) { dev_err(&cmd->drv_inst->pdev->dev, "Failed to map passthrough buffer!\n"); pmcraid_free_sglist(sglist); return -EIO; } cmd->sglist = sglist; ioarcb->request_flags0 |= NO_LINK_DESCS; ioadl = pmcraid_init_ioadls(cmd, sglist->num_dma_sg); /* Initialize IOADL descriptor addresses */ for_each_sg(sglist->scatterlist, sg, sglist->num_dma_sg, i) { ioadl[i].data_len = cpu_to_le32(sg_dma_len(sg)); ioadl[i].address = cpu_to_le64(sg_dma_address(sg)); ioadl[i].flags = 0; } /* setup the last descriptor */ ioadl[i - 1].flags = IOADL_FLAGS_LAST_DESC; return 0; } /** * pmcraid_release_passthrough_ioadls - release passthrough ioadls * * @cmd: pointer to struct pmcraid_cmd for which ioadls were allocated * @buflen: size of the request buffer * @direction: data transfer direction * * Return value * 0 on success, non-zero error code on failure */ static void pmcraid_release_passthrough_ioadls( struct pmcraid_cmd *cmd, int buflen, int direction ) { struct pmcraid_sglist *sglist = cmd->sglist; if (buflen > 0) { pci_unmap_sg(cmd->drv_inst->pdev, sglist->scatterlist, sglist->num_sg, direction); pmcraid_free_sglist(sglist); cmd->sglist = NULL; } } /** * pmcraid_ioctl_passthrough - handling passthrough IOCTL commands * * @pinstance: pointer to adapter instance structure * @cmd: ioctl code * @arg: pointer to pmcraid_passthrough_buffer user buffer * * Return value * 0 on success, non-zero error code on failure */ static long pmcraid_ioctl_passthrough( struct pmcraid_instance *pinstance, unsigned int ioctl_cmd, unsigned int buflen, unsigned long arg ) { struct pmcraid_passthrough_ioctl_buffer *buffer; struct pmcraid_ioarcb *ioarcb; struct pmcraid_cmd *cmd; struct pmcraid_cmd *cancel_cmd; unsigned long request_buffer; unsigned long request_offset; unsigned long lock_flags; void *ioasa; u32 ioasc; int request_size; int buffer_size; u8 access, direction; int rc = 0; /* If IOA reset is in progress, wait 10 secs for reset to complete */ if (pinstance->ioa_reset_in_progress) { rc = wait_event_interruptible_timeout( pinstance->reset_wait_q, !pinstance->ioa_reset_in_progress, msecs_to_jiffies(10000)); if (!rc) return -ETIMEDOUT; else if (rc < 0) return -ERESTARTSYS; } /* If adapter is not in operational state, return error */ if (pinstance->ioa_state != IOA_STATE_OPERATIONAL) { pmcraid_err("IOA is not operational\n"); return -ENOTTY; } buffer_size = sizeof(struct pmcraid_passthrough_ioctl_buffer); buffer = kmalloc(buffer_size, GFP_KERNEL); if (!buffer) { pmcraid_err("no memory for passthrough buffer\n"); return -ENOMEM; } request_offset = offsetof(struct pmcraid_passthrough_ioctl_buffer, request_buffer); request_buffer = arg + request_offset; rc = __copy_from_user(buffer, (struct pmcraid_passthrough_ioctl_buffer *) arg, sizeof(struct pmcraid_passthrough_ioctl_buffer)); ioasa = (void *)(arg + offsetof(struct pmcraid_passthrough_ioctl_buffer, ioasa)); if (rc) { pmcraid_err("ioctl: can't copy passthrough buffer\n"); rc = -EFAULT; goto out_free_buffer; } request_size = buffer->ioarcb.data_transfer_length; if (buffer->ioarcb.request_flags0 & TRANSFER_DIR_WRITE) { access = VERIFY_READ; direction = DMA_TO_DEVICE; } else { access = VERIFY_WRITE; direction = DMA_FROM_DEVICE; } if (request_size > 0) { rc = access_ok(access, arg, request_offset + request_size); if (!rc) { rc = -EFAULT; goto out_free_buffer; } } else if (request_size < 0) { rc = -EINVAL; goto out_free_buffer; } /* check if we have any additional command parameters */ if (buffer->ioarcb.add_cmd_param_length > PMCRAID_ADD_CMD_PARAM_LEN) { rc = -EINVAL; goto out_free_buffer; } cmd = pmcraid_get_free_cmd(pinstance); if (!cmd) { pmcraid_err("free command block is not available\n"); rc = -ENOMEM; goto out_free_buffer; } cmd->scsi_cmd = NULL; ioarcb = &(cmd->ioa_cb->ioarcb); /* Copy the user-provided IOARCB stuff field by field */ ioarcb->resource_handle = buffer->ioarcb.resource_handle; ioarcb->data_transfer_length = buffer->ioarcb.data_transfer_length; ioarcb->cmd_timeout = buffer->ioarcb.cmd_timeout; ioarcb->request_type = buffer->ioarcb.request_type; ioarcb->request_flags0 = buffer->ioarcb.request_flags0; ioarcb->request_flags1 = buffer->ioarcb.request_flags1; memcpy(ioarcb->cdb, buffer->ioarcb.cdb, PMCRAID_MAX_CDB_LEN); if (buffer->ioarcb.add_cmd_param_length) { ioarcb->add_cmd_param_length = buffer->ioarcb.add_cmd_param_length; ioarcb->add_cmd_param_offset = buffer->ioarcb.add_cmd_param_offset; memcpy(ioarcb->add_data.u.add_cmd_params, buffer->ioarcb.add_data.u.add_cmd_params, buffer->ioarcb.add_cmd_param_length); } /* set hrrq number where the IOA should respond to. Note that all cmds * generated internally uses hrrq_id 0, exception to this is the cmd * block of scsi_cmd which is re-used (e.g. cancel/abort), which uses * hrrq_id assigned here in queuecommand */ ioarcb->hrrq_id = atomic_add_return(1, &(pinstance->last_message_id)) % pinstance->num_hrrq; if (request_size) { rc = pmcraid_build_passthrough_ioadls(cmd, request_size, direction); if (rc) { pmcraid_err("couldn't build passthrough ioadls\n"); goto out_free_buffer; } } else if (request_size < 0) { rc = -EINVAL; goto out_free_buffer; } /* If data is being written into the device, copy the data from user * buffers */ if (direction == DMA_TO_DEVICE && request_size > 0) { rc = pmcraid_copy_sglist(cmd->sglist, request_buffer, request_size, direction); if (rc) { pmcraid_err("failed to copy user buffer\n"); goto out_free_sglist; } } /* passthrough ioctl is a blocking command so, put the user to sleep * until timeout. Note that a timeout value of 0 means, do timeout. */ cmd->cmd_done = pmcraid_internal_done; init_completion(&cmd->wait_for_completion); cmd->completion_req = 1; pmcraid_info("command(%d) (CDB[0] = %x) for %x\n", le32_to_cpu(cmd->ioa_cb->ioarcb.response_handle) >> 2, cmd->ioa_cb->ioarcb.cdb[0], le32_to_cpu(cmd->ioa_cb->ioarcb.resource_handle)); spin_lock_irqsave(pinstance->host->host_lock, lock_flags); _pmcraid_fire_command(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); /* NOTE ! Remove the below line once abort_task is implemented * in firmware. This line disables ioctl command timeout handling logic * similar to IO command timeout handling, making ioctl commands to wait * until the command completion regardless of timeout value specified in * ioarcb */ buffer->ioarcb.cmd_timeout = 0; /* If command timeout is specified put caller to wait till that time, * otherwise it would be blocking wait. If command gets timed out, it * will be aborted. */ if (buffer->ioarcb.cmd_timeout == 0) { wait_for_completion(&cmd->wait_for_completion); } else if (!wait_for_completion_timeout( &cmd->wait_for_completion, msecs_to_jiffies(buffer->ioarcb.cmd_timeout * 1000))) { pmcraid_info("aborting cmd %d (CDB[0] = %x) due to timeout\n", le32_to_cpu(cmd->ioa_cb->ioarcb.response_handle >> 2), cmd->ioa_cb->ioarcb.cdb[0]); spin_lock_irqsave(pinstance->host->host_lock, lock_flags); cancel_cmd = pmcraid_abort_cmd(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); if (cancel_cmd) { wait_for_completion(&cancel_cmd->wait_for_completion); ioasc = cancel_cmd->ioa_cb->ioasa.ioasc; pmcraid_return_cmd(cancel_cmd); /* if abort task couldn't find the command i.e it got * completed prior to aborting, return good completion. * if command got aborted successfully or there was IOA * reset due to abort task itself getting timedout then * return -ETIMEDOUT */ if (ioasc == PMCRAID_IOASC_IOA_WAS_RESET || PMCRAID_IOASC_SENSE_KEY(ioasc) == 0x00) { if (ioasc != PMCRAID_IOASC_GC_IOARCB_NOTFOUND) rc = -ETIMEDOUT; goto out_handle_response; } } /* no command block for abort task or abort task failed to abort * the IOARCB, then wait for 150 more seconds and initiate reset * sequence after timeout */ if (!wait_for_completion_timeout( &cmd->wait_for_completion, msecs_to_jiffies(150 * 1000))) { pmcraid_reset_bringup(cmd->drv_inst); rc = -ETIMEDOUT; } } out_handle_response: /* copy entire IOASA buffer and return IOCTL success. * If copying IOASA to user-buffer fails, return * EFAULT */ if (copy_to_user(ioasa, &cmd->ioa_cb->ioasa, sizeof(struct pmcraid_ioasa))) { pmcraid_err("failed to copy ioasa buffer to user\n"); rc = -EFAULT; } /* If the data transfer was from device, copy the data onto user * buffers */ else if (direction == DMA_FROM_DEVICE && request_size > 0) { rc = pmcraid_copy_sglist(cmd->sglist, request_buffer, request_size, direction); if (rc) { pmcraid_err("failed to copy user buffer\n"); rc = -EFAULT; } } out_free_sglist: pmcraid_release_passthrough_ioadls(cmd, request_size, direction); pmcraid_return_cmd(cmd); out_free_buffer: kfree(buffer); return rc; } /** * pmcraid_ioctl_driver - ioctl handler for commands handled by driver itself * * @pinstance: pointer to adapter instance structure * @cmd: ioctl command passed in * @buflen: length of user_buffer * @user_buffer: user buffer pointer * * Return Value * 0 in case of success, otherwise appropriate error code */ static long pmcraid_ioctl_driver( struct pmcraid_instance *pinstance, unsigned int cmd, unsigned int buflen, void __user *user_buffer ) { int rc = -ENOSYS; if (!access_ok(VERIFY_READ, user_buffer, _IOC_SIZE(cmd))) { pmcraid_err("ioctl_driver: access fault in request buffer\n"); return -EFAULT; } switch (cmd) { case PMCRAID_IOCTL_RESET_ADAPTER: pmcraid_reset_bringup(pinstance); rc = 0; break; default: break; } return rc; } /** * pmcraid_check_ioctl_buffer - check for proper access to user buffer * * @cmd: ioctl command * @arg: user buffer * @hdr: pointer to kernel memory for pmcraid_ioctl_header * * Return Value * negetive error code if there are access issues, otherwise zero. * Upon success, returns ioctl header copied out of user buffer. */ static int pmcraid_check_ioctl_buffer( int cmd, void __user *arg, struct pmcraid_ioctl_header *hdr ) { int rc = 0; int access = VERIFY_READ; if (copy_from_user(hdr, arg, sizeof(struct pmcraid_ioctl_header))) { pmcraid_err("couldn't copy ioctl header from user buffer\n"); return -EFAULT; } /* check for valid driver signature */ rc = memcmp(hdr->signature, PMCRAID_IOCTL_SIGNATURE, sizeof(hdr->signature)); if (rc) { pmcraid_err("signature verification failed\n"); return -EINVAL; } /* check for appropriate buffer access */ if ((_IOC_DIR(cmd) & _IOC_READ) == _IOC_READ) access = VERIFY_WRITE; rc = access_ok(access, (arg + sizeof(struct pmcraid_ioctl_header)), hdr->buffer_length); if (!rc) { pmcraid_err("access failed for user buffer of size %d\n", hdr->buffer_length); return -EFAULT; } return 0; } /** * pmcraid_ioctl - char node ioctl entry point */ static long pmcraid_chr_ioctl( struct file *filep, unsigned int cmd, unsigned long arg ) { struct pmcraid_instance *pinstance = NULL; struct pmcraid_ioctl_header *hdr = NULL; int retval = -ENOTTY; hdr = kmalloc(sizeof(struct pmcraid_ioctl_header), GFP_KERNEL); if (!hdr) { pmcraid_err("failed to allocate memory for ioctl header\n"); return -ENOMEM; } retval = pmcraid_check_ioctl_buffer(cmd, (void *)arg, hdr); if (retval) { pmcraid_info("chr_ioctl: header check failed\n"); kfree(hdr); return retval; } pinstance = filep->private_data; if (!pinstance) { pmcraid_info("adapter instance is not found\n"); kfree(hdr); return -ENOTTY; } switch (_IOC_TYPE(cmd)) { case PMCRAID_PASSTHROUGH_IOCTL: /* If ioctl code is to download microcode, we need to block * mid-layer requests. */ if (cmd == PMCRAID_IOCTL_DOWNLOAD_MICROCODE) scsi_block_requests(pinstance->host); retval = pmcraid_ioctl_passthrough(pinstance, cmd, hdr->buffer_length, arg); if (cmd == PMCRAID_IOCTL_DOWNLOAD_MICROCODE) scsi_unblock_requests(pinstance->host); break; case PMCRAID_DRIVER_IOCTL: arg += sizeof(struct pmcraid_ioctl_header); retval = pmcraid_ioctl_driver(pinstance, cmd, hdr->buffer_length, (void __user *)arg); break; default: retval = -ENOTTY; break; } kfree(hdr); return retval; } /** * File operations structure for management interface */ static const struct file_operations pmcraid_fops = { .owner = THIS_MODULE, .open = pmcraid_chr_open, .release = pmcraid_chr_release, .fasync = pmcraid_chr_fasync, .unlocked_ioctl = pmcraid_chr_ioctl, #ifdef CONFIG_COMPAT .compat_ioctl = pmcraid_chr_ioctl, #endif .llseek = noop_llseek, }; /** * pmcraid_show_log_level - Display adapter's error logging level * @dev: class device struct * @buf: buffer * * Return value: * number of bytes printed to buffer */ static ssize_t pmcraid_show_log_level( struct device *dev, struct device_attribute *attr, char *buf) { struct Scsi_Host *shost = class_to_shost(dev); struct pmcraid_instance *pinstance = (struct pmcraid_instance *)shost->hostdata; return snprintf(buf, PAGE_SIZE, "%d\n", pinstance->current_log_level); } /** * pmcraid_store_log_level - Change the adapter's error logging level * @dev: class device struct * @buf: buffer * @count: not used * * Return value: * number of bytes printed to buffer */ static ssize_t pmcraid_store_log_level( struct device *dev, struct device_attribute *attr, const char *buf, size_t count ) { struct Scsi_Host *shost; struct pmcraid_instance *pinstance; unsigned long val; if (strict_strtoul(buf, 10, &val)) return -EINVAL; /* log-level should be from 0 to 2 */ if (val > 2) return -EINVAL; shost = class_to_shost(dev); pinstance = (struct pmcraid_instance *)shost->hostdata; pinstance->current_log_level = val; return strlen(buf); } static struct device_attribute pmcraid_log_level_attr = { .attr = { .name = "log_level", .mode = S_IRUGO | S_IWUSR, }, .show = pmcraid_show_log_level, .store = pmcraid_store_log_level, }; /** * pmcraid_show_drv_version - Display driver version * @dev: class device struct * @buf: buffer * * Return value: * number of bytes printed to buffer */ static ssize_t pmcraid_show_drv_version( struct device *dev, struct device_attribute *attr, char *buf ) { return snprintf(buf, PAGE_SIZE, "version: %s\n", PMCRAID_DRIVER_VERSION); } static struct device_attribute pmcraid_driver_version_attr = { .attr = { .name = "drv_version", .mode = S_IRUGO, }, .show = pmcraid_show_drv_version, }; /** * pmcraid_show_io_adapter_id - Display driver assigned adapter id * @dev: class device struct * @buf: buffer * * Return value: * number of bytes printed to buffer */ static ssize_t pmcraid_show_adapter_id( struct device *dev, struct device_attribute *attr, char *buf ) { struct Scsi_Host *shost = class_to_shost(dev); struct pmcraid_instance *pinstance = (struct pmcraid_instance *)shost->hostdata; u32 adapter_id = (pinstance->pdev->bus->number << 8) | pinstance->pdev->devfn; u32 aen_group = pmcraid_event_family.id; return snprintf(buf, PAGE_SIZE, "adapter id: %d\nminor: %d\naen group: %d\n", adapter_id, MINOR(pinstance->cdev.dev), aen_group); } static struct device_attribute pmcraid_adapter_id_attr = { .attr = { .name = "adapter_id", .mode = S_IRUGO | S_IWUSR, }, .show = pmcraid_show_adapter_id, }; static struct device_attribute *pmcraid_host_attrs[] = { &pmcraid_log_level_attr, &pmcraid_driver_version_attr, &pmcraid_adapter_id_attr, NULL, }; /* host template structure for pmcraid driver */ static struct scsi_host_template pmcraid_host_template = { .module = THIS_MODULE, .name = PMCRAID_DRIVER_NAME, .queuecommand = pmcraid_queuecommand, .eh_abort_handler = pmcraid_eh_abort_handler, .eh_bus_reset_handler = pmcraid_eh_bus_reset_handler, .eh_target_reset_handler = pmcraid_eh_target_reset_handler, .eh_device_reset_handler = pmcraid_eh_device_reset_handler, .eh_host_reset_handler = pmcraid_eh_host_reset_handler, .slave_alloc = pmcraid_slave_alloc, .slave_configure = pmcraid_slave_configure, .slave_destroy = pmcraid_slave_destroy, .change_queue_depth = pmcraid_change_queue_depth, .change_queue_type = pmcraid_change_queue_type, .can_queue = PMCRAID_MAX_IO_CMD, .this_id = -1, .sg_tablesize = PMCRAID_MAX_IOADLS, .max_sectors = PMCRAID_IOA_MAX_SECTORS, .cmd_per_lun = PMCRAID_MAX_CMD_PER_LUN, .use_clustering = ENABLE_CLUSTERING, .shost_attrs = pmcraid_host_attrs, .proc_name = PMCRAID_DRIVER_NAME }; /* * pmcraid_isr_msix - implements MSI-X interrupt handling routine * @irq: interrupt vector number * @dev_id: pointer hrrq_vector * * Return Value * IRQ_HANDLED if interrupt is handled or IRQ_NONE if ignored */ static irqreturn_t pmcraid_isr_msix(int irq, void *dev_id) { struct pmcraid_isr_param *hrrq_vector; struct pmcraid_instance *pinstance; unsigned long lock_flags; u32 intrs_val; int hrrq_id; hrrq_vector = (struct pmcraid_isr_param *)dev_id; hrrq_id = hrrq_vector->hrrq_id; pinstance = hrrq_vector->drv_inst; if (!hrrq_id) { /* Read the interrupt */ intrs_val = pmcraid_read_interrupts(pinstance); if (intrs_val && ((ioread32(pinstance->int_regs.host_ioa_interrupt_reg) & DOORBELL_INTR_MSIX_CLR) == 0)) { /* Any error interrupts including unit_check, * initiate IOA reset.In case of unit check indicate * to reset_sequence that IOA unit checked and prepare * for a dump during reset sequence */ if (intrs_val & PMCRAID_ERROR_INTERRUPTS) { if (intrs_val & INTRS_IOA_UNIT_CHECK) pinstance->ioa_unit_check = 1; pmcraid_err("ISR: error interrupts: %x \ initiating reset\n", intrs_val); spin_lock_irqsave(pinstance->host->host_lock, lock_flags); pmcraid_initiate_reset(pinstance); spin_unlock_irqrestore( pinstance->host->host_lock, lock_flags); } /* If interrupt was as part of the ioa initialization, * clear it. Delete the timer and wakeup the * reset engine to proceed with reset sequence */ if (intrs_val & INTRS_TRANSITION_TO_OPERATIONAL) pmcraid_clr_trans_op(pinstance); /* Clear the interrupt register by writing * to host to ioa doorbell. Once done * FW will clear the interrupt. */ iowrite32(DOORBELL_INTR_MSIX_CLR, pinstance->int_regs.host_ioa_interrupt_reg); ioread32(pinstance->int_regs.host_ioa_interrupt_reg); } } tasklet_schedule(&(pinstance->isr_tasklet[hrrq_id])); return IRQ_HANDLED; } /** * pmcraid_isr - implements legacy interrupt handling routine * * @irq: interrupt vector number * @dev_id: pointer hrrq_vector * * Return Value * IRQ_HANDLED if interrupt is handled or IRQ_NONE if ignored */ static irqreturn_t pmcraid_isr(int irq, void *dev_id) { struct pmcraid_isr_param *hrrq_vector; struct pmcraid_instance *pinstance; u32 intrs; unsigned long lock_flags; int hrrq_id = 0; /* In case of legacy interrupt mode where interrupts are shared across * isrs, it may be possible that the current interrupt is not from IOA */ if (!dev_id) { printk(KERN_INFO "%s(): NULL host pointer\n", __func__); return IRQ_NONE; } hrrq_vector = (struct pmcraid_isr_param *)dev_id; pinstance = hrrq_vector->drv_inst; intrs = pmcraid_read_interrupts(pinstance); if (unlikely((intrs & PMCRAID_PCI_INTERRUPTS) == 0)) return IRQ_NONE; /* Any error interrupts including unit_check, initiate IOA reset. * In case of unit check indicate to reset_sequence that IOA unit * checked and prepare for a dump during reset sequence */ if (intrs & PMCRAID_ERROR_INTERRUPTS) { if (intrs & INTRS_IOA_UNIT_CHECK) pinstance->ioa_unit_check = 1; iowrite32(intrs, pinstance->int_regs.ioa_host_interrupt_clr_reg); pmcraid_err("ISR: error interrupts: %x initiating reset\n", intrs); intrs = ioread32( pinstance->int_regs.ioa_host_interrupt_clr_reg); spin_lock_irqsave(pinstance->host->host_lock, lock_flags); pmcraid_initiate_reset(pinstance); spin_unlock_irqrestore(pinstance->host->host_lock, lock_flags); } else { /* If interrupt was as part of the ioa initialization, * clear. Delete the timer and wakeup the * reset engine to proceed with reset sequence */ if (intrs & INTRS_TRANSITION_TO_OPERATIONAL) { pmcraid_clr_trans_op(pinstance); } else { iowrite32(intrs, pinstance->int_regs.ioa_host_interrupt_clr_reg); ioread32( pinstance->int_regs.ioa_host_interrupt_clr_reg); tasklet_schedule( &(pinstance->isr_tasklet[hrrq_id])); } } return IRQ_HANDLED; } /** * pmcraid_worker_function - worker thread function * * @workp: pointer to struct work queue * * Return Value * None */ static void pmcraid_worker_function(struct work_struct *workp) { struct pmcraid_instance *pinstance; struct pmcraid_resource_entry *res; struct pmcraid_resource_entry *temp; struct scsi_device *sdev; unsigned long lock_flags; unsigned long host_lock_flags; u16 fw_version; u8 bus, target, lun; pinstance = container_of(workp, struct pmcraid_instance, worker_q); /* add resources only after host is added into system */ if (!atomic_read(&pinstance->expose_resources)) return; fw_version = be16_to_cpu(pinstance->inq_data->fw_version); spin_lock_irqsave(&pinstance->resource_lock, lock_flags); list_for_each_entry_safe(res, temp, &pinstance->used_res_q, queue) { if (res->change_detected == RES_CHANGE_DEL && res->scsi_dev) { sdev = res->scsi_dev; /* host_lock must be held before calling * scsi_device_get */ spin_lock_irqsave(pinstance->host->host_lock, host_lock_flags); if (!scsi_device_get(sdev)) { spin_unlock_irqrestore( pinstance->host->host_lock, host_lock_flags); pmcraid_info("deleting %x from midlayer\n", res->cfg_entry.resource_address); list_move_tail(&res->queue, &pinstance->free_res_q); spin_unlock_irqrestore( &pinstance->resource_lock, lock_flags); scsi_remove_device(sdev); scsi_device_put(sdev); spin_lock_irqsave(&pinstance->resource_lock, lock_flags); res->change_detected = 0; } else { spin_unlock_irqrestore( pinstance->host->host_lock, host_lock_flags); } } } list_for_each_entry(res, &pinstance->used_res_q, queue) { if (res->change_detected == RES_CHANGE_ADD) { if (!pmcraid_expose_resource(fw_version, &res->cfg_entry)) continue; if (RES_IS_VSET(res->cfg_entry)) { bus = PMCRAID_VSET_BUS_ID; if (fw_version <= PMCRAID_FW_VERSION_1) target = res->cfg_entry.unique_flags1; else target = res->cfg_entry.array_id & 0xFF; lun = PMCRAID_VSET_LUN_ID; } else { bus = PMCRAID_PHYS_BUS_ID; target = RES_TARGET( res->cfg_entry.resource_address); lun = RES_LUN(res->cfg_entry.resource_address); } res->change_detected = 0; spin_unlock_irqrestore(&pinstance->resource_lock, lock_flags); scsi_add_device(pinstance->host, bus, target, lun); spin_lock_irqsave(&pinstance->resource_lock, lock_flags); } } spin_unlock_irqrestore(&pinstance->resource_lock, lock_flags); } /** * pmcraid_tasklet_function - Tasklet function * * @instance: pointer to msix param structure * * Return Value * None */ static void pmcraid_tasklet_function(unsigned long instance) { struct pmcraid_isr_param *hrrq_vector; struct pmcraid_instance *pinstance; unsigned long hrrq_lock_flags; unsigned long pending_lock_flags; unsigned long host_lock_flags; spinlock_t *lockp; /* hrrq buffer lock */ int id; __le32 resp; hrrq_vector = (struct pmcraid_isr_param *)instance; pinstance = hrrq_vector->drv_inst; id = hrrq_vector->hrrq_id; lockp = &(pinstance->hrrq_lock[id]); /* loop through each of the commands responded by IOA. Each HRRQ buf is * protected by its own lock. Traversals must be done within this lock * as there may be multiple tasklets running on multiple CPUs. Note * that the lock is held just for picking up the response handle and * manipulating hrrq_curr/toggle_bit values. */ spin_lock_irqsave(lockp, hrrq_lock_flags); resp = le32_to_cpu(*(pinstance->hrrq_curr[id])); while ((resp & HRRQ_TOGGLE_BIT) == pinstance->host_toggle_bit[id]) { int cmd_index = resp >> 2; struct pmcraid_cmd *cmd = NULL; if (pinstance->hrrq_curr[id] < pinstance->hrrq_end[id]) { pinstance->hrrq_curr[id]++; } else { pinstance->hrrq_curr[id] = pinstance->hrrq_start[id]; pinstance->host_toggle_bit[id] ^= 1u; } if (cmd_index >= PMCRAID_MAX_CMD) { /* In case of invalid response handle, log message */ pmcraid_err("Invalid response handle %d\n", cmd_index); resp = le32_to_cpu(*(pinstance->hrrq_curr[id])); continue; } cmd = pinstance->cmd_list[cmd_index]; spin_unlock_irqrestore(lockp, hrrq_lock_flags); spin_lock_irqsave(&pinstance->pending_pool_lock, pending_lock_flags); list_del(&cmd->free_list); spin_unlock_irqrestore(&pinstance->pending_pool_lock, pending_lock_flags); del_timer(&cmd->timer); atomic_dec(&pinstance->outstanding_cmds); if (cmd->cmd_done == pmcraid_ioa_reset) { spin_lock_irqsave(pinstance->host->host_lock, host_lock_flags); cmd->cmd_done(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, host_lock_flags); } else if (cmd->cmd_done != NULL) { cmd->cmd_done(cmd); } /* loop over until we are done with all responses */ spin_lock_irqsave(lockp, hrrq_lock_flags); resp = le32_to_cpu(*(pinstance->hrrq_curr[id])); } spin_unlock_irqrestore(lockp, hrrq_lock_flags); } /** * pmcraid_unregister_interrupt_handler - de-register interrupts handlers * @pinstance: pointer to adapter instance structure * * This routine un-registers registered interrupt handler and * also frees irqs/vectors. * * Retun Value * None */ static void pmcraid_unregister_interrupt_handler(struct pmcraid_instance *pinstance) { int i; for (i = 0; i < pinstance->num_hrrq; i++) free_irq(pinstance->hrrq_vector[i].vector, &(pinstance->hrrq_vector[i])); if (pinstance->interrupt_mode) { pci_disable_msix(pinstance->pdev); pinstance->interrupt_mode = 0; } } /** * pmcraid_register_interrupt_handler - registers interrupt handler * @pinstance: pointer to per-adapter instance structure * * Return Value * 0 on success, non-zero error code otherwise. */ static int pmcraid_register_interrupt_handler(struct pmcraid_instance *pinstance) { int rc; struct pci_dev *pdev = pinstance->pdev; if ((pmcraid_enable_msix) && (pci_find_capability(pdev, PCI_CAP_ID_MSIX))) { int num_hrrq = PMCRAID_NUM_MSIX_VECTORS; struct msix_entry entries[PMCRAID_NUM_MSIX_VECTORS]; int i; for (i = 0; i < PMCRAID_NUM_MSIX_VECTORS; i++) entries[i].entry = i; rc = pci_enable_msix(pdev, entries, num_hrrq); if (rc < 0) goto pmcraid_isr_legacy; /* Check how many MSIX vectors are allocated and register * msi-x handlers for each of them giving appropriate buffer */ if (rc > 0) { num_hrrq = rc; if (pci_enable_msix(pdev, entries, num_hrrq)) goto pmcraid_isr_legacy; } for (i = 0; i < num_hrrq; i++) { pinstance->hrrq_vector[i].hrrq_id = i; pinstance->hrrq_vector[i].drv_inst = pinstance; pinstance->hrrq_vector[i].vector = entries[i].vector; rc = request_irq(pinstance->hrrq_vector[i].vector, pmcraid_isr_msix, 0, PMCRAID_DRIVER_NAME, &(pinstance->hrrq_vector[i])); if (rc) { int j; for (j = 0; j < i; j++) free_irq(entries[j].vector, &(pinstance->hrrq_vector[j])); pci_disable_msix(pdev); goto pmcraid_isr_legacy; } } pinstance->num_hrrq = num_hrrq; pinstance->interrupt_mode = 1; iowrite32(DOORBELL_INTR_MODE_MSIX, pinstance->int_regs.host_ioa_interrupt_reg); ioread32(pinstance->int_regs.host_ioa_interrupt_reg); goto pmcraid_isr_out; } pmcraid_isr_legacy: /* If MSI-X registration failed fallback to legacy mode, where * only one hrrq entry will be used */ pinstance->hrrq_vector[0].hrrq_id = 0; pinstance->hrrq_vector[0].drv_inst = pinstance; pinstance->hrrq_vector[0].vector = pdev->irq; pinstance->num_hrrq = 1; rc = 0; rc = request_irq(pdev->irq, pmcraid_isr, IRQF_SHARED, PMCRAID_DRIVER_NAME, &pinstance->hrrq_vector[0]); pmcraid_isr_out: return rc; } /** * pmcraid_release_cmd_blocks - release buufers allocated for command blocks * @pinstance: per adapter instance structure pointer * @max_index: number of buffer blocks to release * * Return Value * None */ static void pmcraid_release_cmd_blocks(struct pmcraid_instance *pinstance, int max_index) { int i; for (i = 0; i < max_index; i++) { kmem_cache_free(pinstance->cmd_cachep, pinstance->cmd_list[i]); pinstance->cmd_list[i] = NULL; } kmem_cache_destroy(pinstance->cmd_cachep); pinstance->cmd_cachep = NULL; } /** * pmcraid_release_control_blocks - releases buffers alloced for control blocks * @pinstance: pointer to per adapter instance structure * @max_index: number of buffers (from 0 onwards) to release * * This function assumes that the command blocks for which control blocks are * linked are not released. * * Return Value * None */ static void pmcraid_release_control_blocks( struct pmcraid_instance *pinstance, int max_index ) { int i; if (pinstance->control_pool == NULL) return; for (i = 0; i < max_index; i++) { pci_pool_free(pinstance->control_pool, pinstance->cmd_list[i]->ioa_cb, pinstance->cmd_list[i]->ioa_cb_bus_addr); pinstance->cmd_list[i]->ioa_cb = NULL; pinstance->cmd_list[i]->ioa_cb_bus_addr = 0; } pci_pool_destroy(pinstance->control_pool); pinstance->control_pool = NULL; } /** * pmcraid_allocate_cmd_blocks - allocate memory for cmd block structures * @pinstance - pointer to per adapter instance structure * * Allocates memory for command blocks using kernel slab allocator. * * Return Value * 0 in case of success; -ENOMEM in case of failure */ static int __devinit pmcraid_allocate_cmd_blocks(struct pmcraid_instance *pinstance) { int i; sprintf(pinstance->cmd_pool_name, "pmcraid_cmd_pool_%d", pinstance->host->unique_id); pinstance->cmd_cachep = kmem_cache_create( pinstance->cmd_pool_name, sizeof(struct pmcraid_cmd), 0, SLAB_HWCACHE_ALIGN, NULL); if (!pinstance->cmd_cachep) return -ENOMEM; for (i = 0; i < PMCRAID_MAX_CMD; i++) { pinstance->cmd_list[i] = kmem_cache_alloc(pinstance->cmd_cachep, GFP_KERNEL); if (!pinstance->cmd_list[i]) { pmcraid_release_cmd_blocks(pinstance, i); return -ENOMEM; } } return 0; } /** * pmcraid_allocate_control_blocks - allocates memory control blocks * @pinstance : pointer to per adapter instance structure * * This function allocates PCI memory for DMAable buffers like IOARCB, IOADLs * and IOASAs. This is called after command blocks are already allocated. * * Return Value * 0 in case it can allocate all control blocks, otherwise -ENOMEM */ static int __devinit pmcraid_allocate_control_blocks(struct pmcraid_instance *pinstance) { int i; sprintf(pinstance->ctl_pool_name, "pmcraid_control_pool_%d", pinstance->host->unique_id); pinstance->control_pool = pci_pool_create(pinstance->ctl_pool_name, pinstance->pdev, sizeof(struct pmcraid_control_block), PMCRAID_IOARCB_ALIGNMENT, 0); if (!pinstance->control_pool) return -ENOMEM; for (i = 0; i < PMCRAID_MAX_CMD; i++) { pinstance->cmd_list[i]->ioa_cb = pci_pool_alloc( pinstance->control_pool, GFP_KERNEL, &(pinstance->cmd_list[i]->ioa_cb_bus_addr)); if (!pinstance->cmd_list[i]->ioa_cb) { pmcraid_release_control_blocks(pinstance, i); return -ENOMEM; } memset(pinstance->cmd_list[i]->ioa_cb, 0, sizeof(struct pmcraid_control_block)); } return 0; } /** * pmcraid_release_host_rrqs - release memory allocated for hrrq buffer(s) * @pinstance: pointer to per adapter instance structure * @maxindex: size of hrrq buffer pointer array * * Return Value * None */ static void pmcraid_release_host_rrqs(struct pmcraid_instance *pinstance, int maxindex) { int i; for (i = 0; i < maxindex; i++) { pci_free_consistent(pinstance->pdev, HRRQ_ENTRY_SIZE * PMCRAID_MAX_CMD, pinstance->hrrq_start[i], pinstance->hrrq_start_bus_addr[i]); /* reset pointers and toggle bit to zeros */ pinstance->hrrq_start[i] = NULL; pinstance->hrrq_start_bus_addr[i] = 0; pinstance->host_toggle_bit[i] = 0; } } /** * pmcraid_allocate_host_rrqs - Allocate and initialize host RRQ buffers * @pinstance: pointer to per adapter instance structure * * Return value * 0 hrrq buffers are allocated, -ENOMEM otherwise. */ static int __devinit pmcraid_allocate_host_rrqs(struct pmcraid_instance *pinstance) { int i, buffer_size; buffer_size = HRRQ_ENTRY_SIZE * PMCRAID_MAX_CMD; for (i = 0; i < pinstance->num_hrrq; i++) { pinstance->hrrq_start[i] = pci_alloc_consistent( pinstance->pdev, buffer_size, &(pinstance->hrrq_start_bus_addr[i])); if (pinstance->hrrq_start[i] == 0) { pmcraid_err("pci_alloc failed for hrrq vector : %d\n", i); pmcraid_release_host_rrqs(pinstance, i); return -ENOMEM; } memset(pinstance->hrrq_start[i], 0, buffer_size); pinstance->hrrq_curr[i] = pinstance->hrrq_start[i]; pinstance->hrrq_end[i] = pinstance->hrrq_start[i] + PMCRAID_MAX_CMD - 1; pinstance->host_toggle_bit[i] = 1; spin_lock_init(&pinstance->hrrq_lock[i]); } return 0; } /** * pmcraid_release_hcams - release HCAM buffers * * @pinstance: pointer to per adapter instance structure * * Return value * none */ static void pmcraid_release_hcams(struct pmcraid_instance *pinstance) { if (pinstance->ccn.msg != NULL) { pci_free_consistent(pinstance->pdev, PMCRAID_AEN_HDR_SIZE + sizeof(struct pmcraid_hcam_ccn_ext), pinstance->ccn.msg, pinstance->ccn.baddr); pinstance->ccn.msg = NULL; pinstance->ccn.hcam = NULL; pinstance->ccn.baddr = 0; } if (pinstance->ldn.msg != NULL) { pci_free_consistent(pinstance->pdev, PMCRAID_AEN_HDR_SIZE + sizeof(struct pmcraid_hcam_ldn), pinstance->ldn.msg, pinstance->ldn.baddr); pinstance->ldn.msg = NULL; pinstance->ldn.hcam = NULL; pinstance->ldn.baddr = 0; } } /** * pmcraid_allocate_hcams - allocates HCAM buffers * @pinstance : pointer to per adapter instance structure * * Return Value: * 0 in case of successful allocation, non-zero otherwise */ static int pmcraid_allocate_hcams(struct pmcraid_instance *pinstance) { pinstance->ccn.msg = pci_alloc_consistent( pinstance->pdev, PMCRAID_AEN_HDR_SIZE + sizeof(struct pmcraid_hcam_ccn_ext), &(pinstance->ccn.baddr)); pinstance->ldn.msg = pci_alloc_consistent( pinstance->pdev, PMCRAID_AEN_HDR_SIZE + sizeof(struct pmcraid_hcam_ldn), &(pinstance->ldn.baddr)); if (pinstance->ldn.msg == NULL || pinstance->ccn.msg == NULL) { pmcraid_release_hcams(pinstance); } else { pinstance->ccn.hcam = (void *)pinstance->ccn.msg + PMCRAID_AEN_HDR_SIZE; pinstance->ldn.hcam = (void *)pinstance->ldn.msg + PMCRAID_AEN_HDR_SIZE; atomic_set(&pinstance->ccn.ignore, 0); atomic_set(&pinstance->ldn.ignore, 0); } return (pinstance->ldn.msg == NULL) ? -ENOMEM : 0; } /** * pmcraid_release_config_buffers - release config.table buffers * @pinstance: pointer to per adapter instance structure * * Return Value * none */ static void pmcraid_release_config_buffers(struct pmcraid_instance *pinstance) { if (pinstance->cfg_table != NULL && pinstance->cfg_table_bus_addr != 0) { pci_free_consistent(pinstance->pdev, sizeof(struct pmcraid_config_table), pinstance->cfg_table, pinstance->cfg_table_bus_addr); pinstance->cfg_table = NULL; pinstance->cfg_table_bus_addr = 0; } if (pinstance->res_entries != NULL) { int i; for (i = 0; i < PMCRAID_MAX_RESOURCES; i++) list_del(&pinstance->res_entries[i].queue); kfree(pinstance->res_entries); pinstance->res_entries = NULL; } pmcraid_release_hcams(pinstance); } /** * pmcraid_allocate_config_buffers - allocates DMAable memory for config table * @pinstance : pointer to per adapter instance structure * * Return Value * 0 for successful allocation, -ENOMEM for any failure */ static int __devinit pmcraid_allocate_config_buffers(struct pmcraid_instance *pinstance) { int i; pinstance->res_entries = kzalloc(sizeof(struct pmcraid_resource_entry) * PMCRAID_MAX_RESOURCES, GFP_KERNEL); if (NULL == pinstance->res_entries) { pmcraid_err("failed to allocate memory for resource table\n"); return -ENOMEM; } for (i = 0; i < PMCRAID_MAX_RESOURCES; i++) list_add_tail(&pinstance->res_entries[i].queue, &pinstance->free_res_q); pinstance->cfg_table = pci_alloc_consistent(pinstance->pdev, sizeof(struct pmcraid_config_table), &pinstance->cfg_table_bus_addr); if (NULL == pinstance->cfg_table) { pmcraid_err("couldn't alloc DMA memory for config table\n"); pmcraid_release_config_buffers(pinstance); return -ENOMEM; } if (pmcraid_allocate_hcams(pinstance)) { pmcraid_err("could not alloc DMA memory for HCAMS\n"); pmcraid_release_config_buffers(pinstance); return -ENOMEM; } return 0; } /** * pmcraid_init_tasklets - registers tasklets for response handling * * @pinstance: pointer adapter instance structure * * Return value * none */ static void pmcraid_init_tasklets(struct pmcraid_instance *pinstance) { int i; for (i = 0; i < pinstance->num_hrrq; i++) tasklet_init(&pinstance->isr_tasklet[i], pmcraid_tasklet_function, (unsigned long)&pinstance->hrrq_vector[i]); } /** * pmcraid_kill_tasklets - destroys tasklets registered for response handling * * @pinstance: pointer to adapter instance structure * * Return value * none */ static void pmcraid_kill_tasklets(struct pmcraid_instance *pinstance) { int i; for (i = 0; i < pinstance->num_hrrq; i++) tasklet_kill(&pinstance->isr_tasklet[i]); } /** * pmcraid_release_buffers - release per-adapter buffers allocated * * @pinstance: pointer to adapter soft state * * Return Value * none */ static void pmcraid_release_buffers(struct pmcraid_instance *pinstance) { pmcraid_release_config_buffers(pinstance); pmcraid_release_control_blocks(pinstance, PMCRAID_MAX_CMD); pmcraid_release_cmd_blocks(pinstance, PMCRAID_MAX_CMD); pmcraid_release_host_rrqs(pinstance, pinstance->num_hrrq); if (pinstance->inq_data != NULL) { pci_free_consistent(pinstance->pdev, sizeof(struct pmcraid_inquiry_data), pinstance->inq_data, pinstance->inq_data_baddr); pinstance->inq_data = NULL; pinstance->inq_data_baddr = 0; } if (pinstance->timestamp_data != NULL) { pci_free_consistent(pinstance->pdev, sizeof(struct pmcraid_timestamp_data), pinstance->timestamp_data, pinstance->timestamp_data_baddr); pinstance->timestamp_data = NULL; pinstance->timestamp_data_baddr = 0; } } /** * pmcraid_init_buffers - allocates memory and initializes various structures * @pinstance: pointer to per adapter instance structure * * This routine pre-allocates memory based on the type of block as below: * cmdblocks(PMCRAID_MAX_CMD): kernel memory using kernel's slab_allocator, * IOARCBs(PMCRAID_MAX_CMD) : DMAable memory, using pci pool allocator * config-table entries : DMAable memory using pci_alloc_consistent * HostRRQs : DMAable memory, using pci_alloc_consistent * * Return Value * 0 in case all of the blocks are allocated, -ENOMEM otherwise. */ static int __devinit pmcraid_init_buffers(struct pmcraid_instance *pinstance) { int i; if (pmcraid_allocate_host_rrqs(pinstance)) { pmcraid_err("couldn't allocate memory for %d host rrqs\n", pinstance->num_hrrq); return -ENOMEM; } if (pmcraid_allocate_config_buffers(pinstance)) { pmcraid_err("couldn't allocate memory for config buffers\n"); pmcraid_release_host_rrqs(pinstance, pinstance->num_hrrq); return -ENOMEM; } if (pmcraid_allocate_cmd_blocks(pinstance)) { pmcraid_err("couldn't allocate memory for cmd blocks\n"); pmcraid_release_config_buffers(pinstance); pmcraid_release_host_rrqs(pinstance, pinstance->num_hrrq); return -ENOMEM; } if (pmcraid_allocate_control_blocks(pinstance)) { pmcraid_err("couldn't allocate memory control blocks\n"); pmcraid_release_config_buffers(pinstance); pmcraid_release_cmd_blocks(pinstance, PMCRAID_MAX_CMD); pmcraid_release_host_rrqs(pinstance, pinstance->num_hrrq); return -ENOMEM; } /* allocate DMAable memory for page D0 INQUIRY buffer */ pinstance->inq_data = pci_alloc_consistent( pinstance->pdev, sizeof(struct pmcraid_inquiry_data), &pinstance->inq_data_baddr); if (pinstance->inq_data == NULL) { pmcraid_err("couldn't allocate DMA memory for INQUIRY\n"); pmcraid_release_buffers(pinstance); return -ENOMEM; } /* allocate DMAable memory for set timestamp data buffer */ pinstance->timestamp_data = pci_alloc_consistent( pinstance->pdev, sizeof(struct pmcraid_timestamp_data), &pinstance->timestamp_data_baddr); if (pinstance->timestamp_data == NULL) { pmcraid_err("couldn't allocate DMA memory for \ set time_stamp \n"); pmcraid_release_buffers(pinstance); return -ENOMEM; } /* Initialize all the command blocks and add them to free pool. No * need to lock (free_pool_lock) as this is done in initialization * itself */ for (i = 0; i < PMCRAID_MAX_CMD; i++) { struct pmcraid_cmd *cmdp = pinstance->cmd_list[i]; pmcraid_init_cmdblk(cmdp, i); cmdp->drv_inst = pinstance; list_add_tail(&cmdp->free_list, &pinstance->free_cmd_pool); } return 0; } /** * pmcraid_reinit_buffers - resets various buffer pointers * @pinstance: pointer to adapter instance * Return value * none */ static void pmcraid_reinit_buffers(struct pmcraid_instance *pinstance) { int i; int buffer_size = HRRQ_ENTRY_SIZE * PMCRAID_MAX_CMD; for (i = 0; i < pinstance->num_hrrq; i++) { memset(pinstance->hrrq_start[i], 0, buffer_size); pinstance->hrrq_curr[i] = pinstance->hrrq_start[i]; pinstance->hrrq_end[i] = pinstance->hrrq_start[i] + PMCRAID_MAX_CMD - 1; pinstance->host_toggle_bit[i] = 1; } } /** * pmcraid_init_instance - initialize per instance data structure * @pdev: pointer to pci device structure * @host: pointer to Scsi_Host structure * @mapped_pci_addr: memory mapped IOA configuration registers * * Return Value * 0 on success, non-zero in case of any failure */ static int __devinit pmcraid_init_instance( struct pci_dev *pdev, struct Scsi_Host *host, void __iomem *mapped_pci_addr ) { struct pmcraid_instance *pinstance = (struct pmcraid_instance *)host->hostdata; pinstance->host = host; pinstance->pdev = pdev; /* Initialize register addresses */ pinstance->mapped_dma_addr = mapped_pci_addr; /* Initialize chip-specific details */ { struct pmcraid_chip_details *chip_cfg = pinstance->chip_cfg; struct pmcraid_interrupts *pint_regs = &pinstance->int_regs; pinstance->ioarrin = mapped_pci_addr + chip_cfg->ioarrin; pint_regs->ioa_host_interrupt_reg = mapped_pci_addr + chip_cfg->ioa_host_intr; pint_regs->ioa_host_interrupt_clr_reg = mapped_pci_addr + chip_cfg->ioa_host_intr_clr; pint_regs->ioa_host_msix_interrupt_reg = mapped_pci_addr + chip_cfg->ioa_host_msix_intr; pint_regs->host_ioa_interrupt_reg = mapped_pci_addr + chip_cfg->host_ioa_intr; pint_regs->host_ioa_interrupt_clr_reg = mapped_pci_addr + chip_cfg->host_ioa_intr_clr; /* Current version of firmware exposes interrupt mask set * and mask clr registers through memory mapped bar0. */ pinstance->mailbox = mapped_pci_addr + chip_cfg->mailbox; pinstance->ioa_status = mapped_pci_addr + chip_cfg->ioastatus; pint_regs->ioa_host_interrupt_mask_reg = mapped_pci_addr + chip_cfg->ioa_host_mask; pint_regs->ioa_host_interrupt_mask_clr_reg = mapped_pci_addr + chip_cfg->ioa_host_mask_clr; pint_regs->global_interrupt_mask_reg = mapped_pci_addr + chip_cfg->global_intr_mask; }; pinstance->ioa_reset_attempts = 0; init_waitqueue_head(&pinstance->reset_wait_q); atomic_set(&pinstance->outstanding_cmds, 0); atomic_set(&pinstance->last_message_id, 0); atomic_set(&pinstance->expose_resources, 0); INIT_LIST_HEAD(&pinstance->free_res_q); INIT_LIST_HEAD(&pinstance->used_res_q); INIT_LIST_HEAD(&pinstance->free_cmd_pool); INIT_LIST_HEAD(&pinstance->pending_cmd_pool); spin_lock_init(&pinstance->free_pool_lock); spin_lock_init(&pinstance->pending_pool_lock); spin_lock_init(&pinstance->resource_lock); mutex_init(&pinstance->aen_queue_lock); /* Work-queue (Shared) for deferred processing error handling */ INIT_WORK(&pinstance->worker_q, pmcraid_worker_function); /* Initialize the default log_level */ pinstance->current_log_level = pmcraid_log_level; /* Setup variables required for reset engine */ pinstance->ioa_state = IOA_STATE_UNKNOWN; pinstance->reset_cmd = NULL; return 0; } /** * pmcraid_shutdown - shutdown adapter controller. * @pdev: pci device struct * * Issues an adapter shutdown to the card waits for its completion * * Return value * none */ static void pmcraid_shutdown(struct pci_dev *pdev) { struct pmcraid_instance *pinstance = pci_get_drvdata(pdev); pmcraid_reset_bringdown(pinstance); } /** * pmcraid_get_minor - returns unused minor number from minor number bitmap */ static unsigned short pmcraid_get_minor(void) { int minor; minor = find_first_zero_bit(pmcraid_minor, sizeof(pmcraid_minor)); __set_bit(minor, pmcraid_minor); return minor; } /** * pmcraid_release_minor - releases given minor back to minor number bitmap */ static void pmcraid_release_minor(unsigned short minor) { __clear_bit(minor, pmcraid_minor); } /** * pmcraid_setup_chrdev - allocates a minor number and registers a char device * * @pinstance: pointer to adapter instance for which to register device * * Return value * 0 in case of success, otherwise non-zero */ static int pmcraid_setup_chrdev(struct pmcraid_instance *pinstance) { int minor; int error; minor = pmcraid_get_minor(); cdev_init(&pinstance->cdev, &pmcraid_fops); pinstance->cdev.owner = THIS_MODULE; error = cdev_add(&pinstance->cdev, MKDEV(pmcraid_major, minor), 1); if (error) pmcraid_release_minor(minor); else device_create(pmcraid_class, NULL, MKDEV(pmcraid_major, minor), NULL, "%s%u", PMCRAID_DEVFILE, minor); return error; } /** * pmcraid_release_chrdev - unregisters per-adapter management interface * * @pinstance: pointer to adapter instance structure * * Return value * none */ static void pmcraid_release_chrdev(struct pmcraid_instance *pinstance) { pmcraid_release_minor(MINOR(pinstance->cdev.dev)); device_destroy(pmcraid_class, MKDEV(pmcraid_major, MINOR(pinstance->cdev.dev))); cdev_del(&pinstance->cdev); } /** * pmcraid_remove - IOA hot plug remove entry point * @pdev: pci device struct * * Return value * none */ static void __devexit pmcraid_remove(struct pci_dev *pdev) { struct pmcraid_instance *pinstance = pci_get_drvdata(pdev); /* remove the management interface (/dev file) for this device */ pmcraid_release_chrdev(pinstance); /* remove host template from scsi midlayer */ scsi_remove_host(pinstance->host); /* block requests from mid-layer */ scsi_block_requests(pinstance->host); /* initiate shutdown adapter */ pmcraid_shutdown(pdev); pmcraid_disable_interrupts(pinstance, ~0); flush_work(&pinstance->worker_q); pmcraid_kill_tasklets(pinstance); pmcraid_unregister_interrupt_handler(pinstance); pmcraid_release_buffers(pinstance); iounmap(pinstance->mapped_dma_addr); pci_release_regions(pdev); scsi_host_put(pinstance->host); pci_disable_device(pdev); return; } #ifdef CONFIG_PM /** * pmcraid_suspend - driver suspend entry point for power management * @pdev: PCI device structure * @state: PCI power state to suspend routine * * Return Value - 0 always */ static int pmcraid_suspend(struct pci_dev *pdev, pm_message_t state) { struct pmcraid_instance *pinstance = pci_get_drvdata(pdev); pmcraid_shutdown(pdev); pmcraid_disable_interrupts(pinstance, ~0); pmcraid_kill_tasklets(pinstance); pci_set_drvdata(pinstance->pdev, pinstance); pmcraid_unregister_interrupt_handler(pinstance); pci_save_state(pdev); pci_disable_device(pdev); pci_set_power_state(pdev, pci_choose_state(pdev, state)); return 0; } /** * pmcraid_resume - driver resume entry point PCI power management * @pdev: PCI device structure * * Return Value - 0 in case of success. Error code in case of any failure */ static int pmcraid_resume(struct pci_dev *pdev) { struct pmcraid_instance *pinstance = pci_get_drvdata(pdev); struct Scsi_Host *host = pinstance->host; int rc; pci_set_power_state(pdev, PCI_D0); pci_enable_wake(pdev, PCI_D0, 0); pci_restore_state(pdev); rc = pci_enable_device(pdev); if (rc) { dev_err(&pdev->dev, "resume: Enable device failed\n"); return rc; } pci_set_master(pdev); if ((sizeof(dma_addr_t) == 4) || pci_set_dma_mask(pdev, DMA_BIT_MASK(64))) rc = pci_set_dma_mask(pdev, DMA_BIT_MASK(32)); if (rc == 0) rc = pci_set_consistent_dma_mask(pdev, DMA_BIT_MASK(32)); if (rc != 0) { dev_err(&pdev->dev, "resume: Failed to set PCI DMA mask\n"); goto disable_device; } pmcraid_disable_interrupts(pinstance, ~0); atomic_set(&pinstance->outstanding_cmds, 0); rc = pmcraid_register_interrupt_handler(pinstance); if (rc) { dev_err(&pdev->dev, "resume: couldn't register interrupt handlers\n"); rc = -ENODEV; goto release_host; } pmcraid_init_tasklets(pinstance); pmcraid_enable_interrupts(pinstance, PMCRAID_PCI_INTERRUPTS); /* Start with hard reset sequence which brings up IOA to operational * state as well as completes the reset sequence. */ pinstance->ioa_hard_reset = 1; /* Start IOA firmware initialization and bring card to Operational * state. */ if (pmcraid_reset_bringup(pinstance)) { dev_err(&pdev->dev, "couldn't initialize IOA\n"); rc = -ENODEV; goto release_tasklets; } return 0; release_tasklets: pmcraid_disable_interrupts(pinstance, ~0); pmcraid_kill_tasklets(pinstance); pmcraid_unregister_interrupt_handler(pinstance); release_host: scsi_host_put(host); disable_device: pci_disable_device(pdev); return rc; } #else #define pmcraid_suspend NULL #define pmcraid_resume NULL #endif /* CONFIG_PM */ /** * pmcraid_complete_ioa_reset - Called by either timer or tasklet during * completion of the ioa reset * @cmd: pointer to reset command block */ static void pmcraid_complete_ioa_reset(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; unsigned long flags; spin_lock_irqsave(pinstance->host->host_lock, flags); pmcraid_ioa_reset(cmd); spin_unlock_irqrestore(pinstance->host->host_lock, flags); scsi_unblock_requests(pinstance->host); schedule_work(&pinstance->worker_q); } /** * pmcraid_set_supported_devs - sends SET SUPPORTED DEVICES to IOAFP * * @cmd: pointer to pmcraid_cmd structure * * Return Value * 0 for success or non-zero for failure cases */ static void pmcraid_set_supported_devs(struct pmcraid_cmd *cmd) { struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; void (*cmd_done) (struct pmcraid_cmd *) = pmcraid_complete_ioa_reset; pmcraid_reinit_cmdblk(cmd); ioarcb->resource_handle = cpu_to_le32(PMCRAID_IOA_RES_HANDLE); ioarcb->request_type = REQ_TYPE_IOACMD; ioarcb->cdb[0] = PMCRAID_SET_SUPPORTED_DEVICES; ioarcb->cdb[1] = ALL_DEVICES_SUPPORTED; /* If this was called as part of resource table reinitialization due to * lost CCN, it is enough to return the command block back to free pool * as part of set_supported_devs completion function. */ if (cmd->drv_inst->reinit_cfg_table) { cmd->drv_inst->reinit_cfg_table = 0; cmd->release = 1; cmd_done = pmcraid_reinit_cfgtable_done; } /* we will be done with the reset sequence after set supported devices, * setup the done function to return the command block back to free * pool */ pmcraid_send_cmd(cmd, cmd_done, PMCRAID_SET_SUP_DEV_TIMEOUT, pmcraid_timeout_handler); return; } /** * pmcraid_set_timestamp - set the timestamp to IOAFP * * @cmd: pointer to pmcraid_cmd structure * * Return Value * 0 for success or non-zero for failure cases */ static void pmcraid_set_timestamp(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; __be32 time_stamp_len = cpu_to_be32(PMCRAID_TIMESTAMP_LEN); struct pmcraid_ioadl_desc *ioadl = ioarcb->add_data.u.ioadl; struct timeval tv; __le64 timestamp; do_gettimeofday(&tv); timestamp = tv.tv_sec * 1000; pinstance->timestamp_data->timestamp[0] = (__u8)(timestamp); pinstance->timestamp_data->timestamp[1] = (__u8)((timestamp) >> 8); pinstance->timestamp_data->timestamp[2] = (__u8)((timestamp) >> 16); pinstance->timestamp_data->timestamp[3] = (__u8)((timestamp) >> 24); pinstance->timestamp_data->timestamp[4] = (__u8)((timestamp) >> 32); pinstance->timestamp_data->timestamp[5] = (__u8)((timestamp) >> 40); pmcraid_reinit_cmdblk(cmd); ioarcb->request_type = REQ_TYPE_SCSI; ioarcb->resource_handle = cpu_to_le32(PMCRAID_IOA_RES_HANDLE); ioarcb->cdb[0] = PMCRAID_SCSI_SET_TIMESTAMP; ioarcb->cdb[1] = PMCRAID_SCSI_SERVICE_ACTION; memcpy(&(ioarcb->cdb[6]), &time_stamp_len, sizeof(time_stamp_len)); ioarcb->ioadl_bus_addr = cpu_to_le64((cmd->ioa_cb_bus_addr) + offsetof(struct pmcraid_ioarcb, add_data.u.ioadl[0])); ioarcb->ioadl_length = cpu_to_le32(sizeof(struct pmcraid_ioadl_desc)); ioarcb->ioarcb_bus_addr &= ~(0x1FULL); ioarcb->request_flags0 |= NO_LINK_DESCS; ioarcb->request_flags0 |= TRANSFER_DIR_WRITE; ioarcb->data_transfer_length = cpu_to_le32(sizeof(struct pmcraid_timestamp_data)); ioadl = &(ioarcb->add_data.u.ioadl[0]); ioadl->flags = IOADL_FLAGS_LAST_DESC; ioadl->address = cpu_to_le64(pinstance->timestamp_data_baddr); ioadl->data_len = cpu_to_le32(sizeof(struct pmcraid_timestamp_data)); if (!pinstance->timestamp_error) { pinstance->timestamp_error = 0; pmcraid_send_cmd(cmd, pmcraid_set_supported_devs, PMCRAID_INTERNAL_TIMEOUT, pmcraid_timeout_handler); } else { pmcraid_send_cmd(cmd, pmcraid_return_cmd, PMCRAID_INTERNAL_TIMEOUT, pmcraid_timeout_handler); return; } } /** * pmcraid_init_res_table - Initialize the resource table * @cmd: pointer to pmcraid command struct * * This function looks through the existing resource table, comparing * it with the config table. This function will take care of old/new * devices and schedule adding/removing them from the mid-layer * as appropriate. * * Return value * None */ static void pmcraid_init_res_table(struct pmcraid_cmd *cmd) { struct pmcraid_instance *pinstance = cmd->drv_inst; struct pmcraid_resource_entry *res, *temp; struct pmcraid_config_table_entry *cfgte; unsigned long lock_flags; int found, rc, i; u16 fw_version; LIST_HEAD(old_res); if (pinstance->cfg_table->flags & MICROCODE_UPDATE_REQUIRED) pmcraid_err("IOA requires microcode download\n"); fw_version = be16_to_cpu(pinstance->inq_data->fw_version); /* resource list is protected by pinstance->resource_lock. * init_res_table can be called from probe (user-thread) or runtime * reset (timer/tasklet) */ spin_lock_irqsave(&pinstance->resource_lock, lock_flags); list_for_each_entry_safe(res, temp, &pinstance->used_res_q, queue) list_move_tail(&res->queue, &old_res); for (i = 0; i < pinstance->cfg_table->num_entries; i++) { if (be16_to_cpu(pinstance->inq_data->fw_version) <= PMCRAID_FW_VERSION_1) cfgte = &pinstance->cfg_table->entries[i]; else cfgte = (struct pmcraid_config_table_entry *) &pinstance->cfg_table->entries_ext[i]; if (!pmcraid_expose_resource(fw_version, cfgte)) continue; found = 0; /* If this entry was already detected and initialized */ list_for_each_entry_safe(res, temp, &old_res, queue) { rc = memcmp(&res->cfg_entry.resource_address, &cfgte->resource_address, sizeof(cfgte->resource_address)); if (!rc) { list_move_tail(&res->queue, &pinstance->used_res_q); found = 1; break; } } /* If this is new entry, initialize it and add it the queue */ if (!found) { if (list_empty(&pinstance->free_res_q)) { pmcraid_err("Too many devices attached\n"); break; } found = 1; res = list_entry(pinstance->free_res_q.next, struct pmcraid_resource_entry, queue); res->scsi_dev = NULL; res->change_detected = RES_CHANGE_ADD; res->reset_progress = 0; list_move_tail(&res->queue, &pinstance->used_res_q); } /* copy new configuration table entry details into driver * maintained resource entry */ if (found) { memcpy(&res->cfg_entry, cfgte, pinstance->config_table_entry_size); pmcraid_info("New res type:%x, vset:%x, addr:%x:\n", res->cfg_entry.resource_type, (fw_version <= PMCRAID_FW_VERSION_1 ? res->cfg_entry.unique_flags1 : res->cfg_entry.array_id & 0xFF), le32_to_cpu(res->cfg_entry.resource_address)); } } /* Detect any deleted entries, mark them for deletion from mid-layer */ list_for_each_entry_safe(res, temp, &old_res, queue) { if (res->scsi_dev) { res->change_detected = RES_CHANGE_DEL; res->cfg_entry.resource_handle = PMCRAID_INVALID_RES_HANDLE; list_move_tail(&res->queue, &pinstance->used_res_q); } else { list_move_tail(&res->queue, &pinstance->free_res_q); } } /* release the resource list lock */ spin_unlock_irqrestore(&pinstance->resource_lock, lock_flags); pmcraid_set_timestamp(cmd); } /** * pmcraid_querycfg - Send a Query IOA Config to the adapter. * @cmd: pointer pmcraid_cmd struct * * This function sends a Query IOA Configuration command to the adapter to * retrieve the IOA configuration table. * * Return value: * none */ static void pmcraid_querycfg(struct pmcraid_cmd *cmd) { struct pmcraid_ioarcb *ioarcb = &cmd->ioa_cb->ioarcb; struct pmcraid_ioadl_desc *ioadl = ioarcb->add_data.u.ioadl; struct pmcraid_instance *pinstance = cmd->drv_inst; int cfg_table_size = cpu_to_be32(sizeof(struct pmcraid_config_table)); if (be16_to_cpu(pinstance->inq_data->fw_version) <= PMCRAID_FW_VERSION_1) pinstance->config_table_entry_size = sizeof(struct pmcraid_config_table_entry); else pinstance->config_table_entry_size = sizeof(struct pmcraid_config_table_entry_ext); ioarcb->request_type = REQ_TYPE_IOACMD; ioarcb->resource_handle = cpu_to_le32(PMCRAID_IOA_RES_HANDLE); ioarcb->cdb[0] = PMCRAID_QUERY_IOA_CONFIG; /* firmware requires 4-byte length field, specified in B.E format */ memcpy(&(ioarcb->cdb[10]), &cfg_table_size, sizeof(cfg_table_size)); /* Since entire config table can be described by single IOADL, it can * be part of IOARCB itself */ ioarcb->ioadl_bus_addr = cpu_to_le64((cmd->ioa_cb_bus_addr) + offsetof(struct pmcraid_ioarcb, add_data.u.ioadl[0])); ioarcb->ioadl_length = cpu_to_le32(sizeof(struct pmcraid_ioadl_desc)); ioarcb->ioarcb_bus_addr &= ~(0x1FULL); ioarcb->request_flags0 |= NO_LINK_DESCS; ioarcb->data_transfer_length = cpu_to_le32(sizeof(struct pmcraid_config_table)); ioadl = &(ioarcb->add_data.u.ioadl[0]); ioadl->flags = IOADL_FLAGS_LAST_DESC; ioadl->address = cpu_to_le64(pinstance->cfg_table_bus_addr); ioadl->data_len = cpu_to_le32(sizeof(struct pmcraid_config_table)); pmcraid_send_cmd(cmd, pmcraid_init_res_table, PMCRAID_INTERNAL_TIMEOUT, pmcraid_timeout_handler); } /** * pmcraid_probe - PCI probe entry pointer for PMC MaxRAID controller driver * @pdev: pointer to pci device structure * @dev_id: pointer to device ids structure * * Return Value * returns 0 if the device is claimed and successfully configured. * returns non-zero error code in case of any failure */ static int __devinit pmcraid_probe( struct pci_dev *pdev, const struct pci_device_id *dev_id ) { struct pmcraid_instance *pinstance; struct Scsi_Host *host; void __iomem *mapped_pci_addr; int rc = PCIBIOS_SUCCESSFUL; if (atomic_read(&pmcraid_adapter_count) >= PMCRAID_MAX_ADAPTERS) { pmcraid_err ("maximum number(%d) of supported adapters reached\n", atomic_read(&pmcraid_adapter_count)); return -ENOMEM; } atomic_inc(&pmcraid_adapter_count); rc = pci_enable_device(pdev); if (rc) { dev_err(&pdev->dev, "Cannot enable adapter\n"); atomic_dec(&pmcraid_adapter_count); return rc; } dev_info(&pdev->dev, "Found new IOA(%x:%x), Total IOA count: %d\n", pdev->vendor, pdev->device, atomic_read(&pmcraid_adapter_count)); rc = pci_request_regions(pdev, PMCRAID_DRIVER_NAME); if (rc < 0) { dev_err(&pdev->dev, "Couldn't register memory range of registers\n"); goto out_disable_device; } mapped_pci_addr = pci_iomap(pdev, 0, 0); if (!mapped_pci_addr) { dev_err(&pdev->dev, "Couldn't map PCI registers memory\n"); rc = -ENOMEM; goto out_release_regions; } pci_set_master(pdev); /* Firmware requires the system bus address of IOARCB to be within * 32-bit addressable range though it has 64-bit IOARRIN register. * However, firmware supports 64-bit streaming DMA buffers, whereas * coherent buffers are to be 32-bit. Since pci_alloc_consistent always * returns memory within 4GB (if not, change this logic), coherent * buffers are within firmware acceptable address ranges. */ if ((sizeof(dma_addr_t) == 4) || pci_set_dma_mask(pdev, DMA_BIT_MASK(64))) rc = pci_set_dma_mask(pdev, DMA_BIT_MASK(32)); /* firmware expects 32-bit DMA addresses for IOARRIN register; set 32 * bit mask for pci_alloc_consistent to return addresses within 4GB */ if (rc == 0) rc = pci_set_consistent_dma_mask(pdev, DMA_BIT_MASK(32)); if (rc != 0) { dev_err(&pdev->dev, "Failed to set PCI DMA mask\n"); goto cleanup_nomem; } host = scsi_host_alloc(&pmcraid_host_template, sizeof(struct pmcraid_instance)); if (!host) { dev_err(&pdev->dev, "scsi_host_alloc failed!\n"); rc = -ENOMEM; goto cleanup_nomem; } host->max_id = PMCRAID_MAX_NUM_TARGETS_PER_BUS; host->max_lun = PMCRAID_MAX_NUM_LUNS_PER_TARGET; host->unique_id = host->host_no; host->max_channel = PMCRAID_MAX_BUS_TO_SCAN; host->max_cmd_len = PMCRAID_MAX_CDB_LEN; /* zero out entire instance structure */ pinstance = (struct pmcraid_instance *)host->hostdata; memset(pinstance, 0, sizeof(*pinstance)); pinstance->chip_cfg = (struct pmcraid_chip_details *)(dev_id->driver_data); rc = pmcraid_init_instance(pdev, host, mapped_pci_addr); if (rc < 0) { dev_err(&pdev->dev, "failed to initialize adapter instance\n"); goto out_scsi_host_put; } pci_set_drvdata(pdev, pinstance); /* Save PCI config-space for use following the reset */ rc = pci_save_state(pinstance->pdev); if (rc != 0) { dev_err(&pdev->dev, "Failed to save PCI config space\n"); goto out_scsi_host_put; } pmcraid_disable_interrupts(pinstance, ~0); rc = pmcraid_register_interrupt_handler(pinstance); if (rc) { dev_err(&pdev->dev, "couldn't register interrupt handler\n"); goto out_scsi_host_put; } pmcraid_init_tasklets(pinstance); /* allocate verious buffers used by LLD.*/ rc = pmcraid_init_buffers(pinstance); if (rc) { pmcraid_err("couldn't allocate memory blocks\n"); goto out_unregister_isr; } /* check the reset type required */ pmcraid_reset_type(pinstance); pmcraid_enable_interrupts(pinstance, PMCRAID_PCI_INTERRUPTS); /* Start IOA firmware initialization and bring card to Operational * state. */ pmcraid_info("starting IOA initialization sequence\n"); if (pmcraid_reset_bringup(pinstance)) { dev_err(&pdev->dev, "couldn't initialize IOA\n"); rc = 1; goto out_release_bufs; } /* Add adapter instance into mid-layer list */ rc = scsi_add_host(pinstance->host, &pdev->dev); if (rc != 0) { pmcraid_err("couldn't add host into mid-layer: %d\n", rc); goto out_release_bufs; } scsi_scan_host(pinstance->host); rc = pmcraid_setup_chrdev(pinstance); if (rc != 0) { pmcraid_err("couldn't create mgmt interface, error: %x\n", rc); goto out_remove_host; } /* Schedule worker thread to handle CCN and take care of adding and * removing devices to OS */ atomic_set(&pinstance->expose_resources, 1); schedule_work(&pinstance->worker_q); return rc; out_remove_host: scsi_remove_host(host); out_release_bufs: pmcraid_release_buffers(pinstance); out_unregister_isr: pmcraid_kill_tasklets(pinstance); pmcraid_unregister_interrupt_handler(pinstance); out_scsi_host_put: scsi_host_put(host); cleanup_nomem: iounmap(mapped_pci_addr); out_release_regions: pci_release_regions(pdev); out_disable_device: atomic_dec(&pmcraid_adapter_count); pci_set_drvdata(pdev, NULL); pci_disable_device(pdev); return -ENODEV; } /* * PCI driver structure of pcmraid driver */ static struct pci_driver pmcraid_driver = { .name = PMCRAID_DRIVER_NAME, .id_table = pmcraid_pci_table, .probe = pmcraid_probe, .remove = pmcraid_remove, .suspend = pmcraid_suspend, .resume = pmcraid_resume, .shutdown = pmcraid_shutdown }; /** * pmcraid_init - module load entry point */ static int __init pmcraid_init(void) { dev_t dev; int error; pmcraid_info("%s Device Driver version: %s\n", PMCRAID_DRIVER_NAME, PMCRAID_DRIVER_VERSION); error = alloc_chrdev_region(&dev, 0, PMCRAID_MAX_ADAPTERS, PMCRAID_DEVFILE); if (error) { pmcraid_err("failed to get a major number for adapters\n"); goto out_init; } pmcraid_major = MAJOR(dev); pmcraid_class = class_create(THIS_MODULE, PMCRAID_DEVFILE); if (IS_ERR(pmcraid_class)) { error = PTR_ERR(pmcraid_class); pmcraid_err("failed to register with with sysfs, error = %x\n", error); goto out_unreg_chrdev; } error = pmcraid_netlink_init(); if (error) goto out_unreg_chrdev; error = pci_register_driver(&pmcraid_driver); if (error == 0) goto out_init; pmcraid_err("failed to register pmcraid driver, error = %x\n", error); class_destroy(pmcraid_class); pmcraid_netlink_release(); out_unreg_chrdev: unregister_chrdev_region(MKDEV(pmcraid_major, 0), PMCRAID_MAX_ADAPTERS); out_init: return error; } /** * pmcraid_exit - module unload entry point */ static void __exit pmcraid_exit(void) { pmcraid_netlink_release(); unregister_chrdev_region(MKDEV(pmcraid_major, 0), PMCRAID_MAX_ADAPTERS); pci_unregister_driver(&pmcraid_driver); class_destroy(pmcraid_class); } module_init(pmcraid_init); module_exit(pmcraid_exit);