/*
 * QLogic iSCSI HBA Driver
 * Copyright (c)  2003-2010 QLogic Corporation
 *
 * See LICENSE.qla4xxx for copyright and licensing details.
 */

#include <scsi/iscsi_if.h>
#include "ql4_def.h"
#include "ql4_glbl.h"
#include "ql4_dbg.h"
#include "ql4_inline.h"

static struct ddb_entry *qla4xxx_alloc_ddb(struct scsi_qla_host *ha,
                                           uint32_t fw_ddb_index);

static void ql4xxx_set_mac_number(struct scsi_qla_host *ha)
{
        uint32_t value;
        uint8_t func_number;
        unsigned long flags;

        /* Get the function number */
        spin_lock_irqsave(&ha->hardware_lock, flags);
        value = readw(&ha->reg->ctrl_status);
        spin_unlock_irqrestore(&ha->hardware_lock, flags);

        func_number = (uint8_t) ((value >> 4) & 0x30);
        switch (value & ISP_CONTROL_FN_MASK) {
        case ISP_CONTROL_FN0_SCSI:
                ha->mac_index = 1;
                break;
        case ISP_CONTROL_FN1_SCSI:
                ha->mac_index = 3;
                break;
        default:
                DEBUG2(printk("scsi%ld: %s: Invalid function number, "
                              "ispControlStatus = 0x%x\n", ha->host_no,
                              __func__, value));
                break;
        }
        DEBUG2(printk("scsi%ld: %s: mac_index %d.\n", ha->host_no, __func__,
                      ha->mac_index));
}

/**
 * qla4xxx_free_ddb - deallocate ddb
 * @ha: pointer to host adapter structure.
 * @ddb_entry: pointer to device database entry
 *
 * This routine deallocates and unlinks the specified ddb_entry from the
 * adapter's
 **/
void qla4xxx_free_ddb(struct scsi_qla_host *ha,
    struct ddb_entry *ddb_entry)
{
        /* Remove device entry from list */
        list_del_init(&ddb_entry->list);

        /* Remove device pointer from index mapping arrays */
        ha->fw_ddb_index_map[ddb_entry->fw_ddb_index] =
                (struct ddb_entry *) INVALID_ENTRY;
        ha->tot_ddbs--;

        /* Free memory and scsi-ml struct for device entry */
        qla4xxx_destroy_sess(ddb_entry);
}

/**
 * qla4xxx_free_ddb_list - deallocate all ddbs
 * @ha: pointer to host adapter structure.
 *
 * This routine deallocates and removes all devices on the sppecified adapter.
 **/
void qla4xxx_free_ddb_list(struct scsi_qla_host *ha)
{
        struct list_head *ptr;
        struct ddb_entry *ddb_entry;

        while (!list_empty(&ha->ddb_list)) {
                ptr = ha->ddb_list.next;
                /* Free memory for device entry and remove */
                ddb_entry = list_entry(ptr, struct ddb_entry, list);
                qla4xxx_free_ddb(ha, ddb_entry);
        }
}

/**
 * qla4xxx_init_response_q_entries() - Initializes response queue entries.
 * @ha: HA context
 *
 * Beginning of request ring has initialization control block already built
 * by nvram config routine.
 **/
static void qla4xxx_init_response_q_entries(struct scsi_qla_host *ha)
{
        uint16_t cnt;
        struct response *pkt;

        pkt = (struct response *)ha->response_ptr;
        for (cnt = 0; cnt < RESPONSE_QUEUE_DEPTH; cnt++) {
                pkt->signature = RESPONSE_PROCESSED;
                pkt++;
        }
}

/**
 * qla4xxx_init_rings - initialize hw queues
 * @ha: pointer to host adapter structure.
 *
 * This routine initializes the internal queues for the specified adapter.
 * The QLA4010 requires us to restart the queues at index 0.
 * The QLA4000 doesn't care, so just default to QLA4010's requirement.
 **/
int qla4xxx_init_rings(struct scsi_qla_host *ha)
{
        unsigned long flags = 0;

        /* Initialize request queue. */
        spin_lock_irqsave(&ha->hardware_lock, flags);
        ha->request_out = 0;
        ha->request_in = 0;
        ha->request_ptr = &ha->request_ring[ha->request_in];
        ha->req_q_count = REQUEST_QUEUE_DEPTH;

        /* Initialize response queue. */
        ha->response_in = 0;
        ha->response_out = 0;
        ha->response_ptr = &ha->response_ring[ha->response_out];

        if (is_qla8022(ha)) {
                writel(0,
                    (unsigned long  __iomem *)&ha->qla4_8xxx_reg->req_q_out);
                writel(0,
                    (unsigned long  __iomem *)&ha->qla4_8xxx_reg->rsp_q_in);
                writel(0,
                    (unsigned long  __iomem *)&ha->qla4_8xxx_reg->rsp_q_out);
        } else {
                /*
                 * Initialize DMA Shadow registers.  The firmware is really
                 * supposed to take care of this, but on some uniprocessor
                 * systems, the shadow registers aren't cleared-- causing
                 * the interrupt_handler to think there are responses to be
                 * processed when there aren't.
                 */
                ha->shadow_regs->req_q_out = __constant_cpu_to_le32(0);
                ha->shadow_regs->rsp_q_in = __constant_cpu_to_le32(0);
                wmb();

                writel(0, &ha->reg->req_q_in);
                writel(0, &ha->reg->rsp_q_out);
                readl(&ha->reg->rsp_q_out);
        }

        qla4xxx_init_response_q_entries(ha);

        spin_unlock_irqrestore(&ha->hardware_lock, flags);

        return QLA_SUCCESS;
}

/**
 * qla4xxx_get_sys_info - validate adapter MAC address(es)
 * @ha: pointer to host adapter structure.
 *
 **/
int qla4xxx_get_sys_info(struct scsi_qla_host *ha)
{
        struct flash_sys_info *sys_info;
        dma_addr_t sys_info_dma;
        int status = QLA_ERROR;

        sys_info = dma_alloc_coherent(&ha->pdev->dev, sizeof(*sys_info),
                                      &sys_info_dma, GFP_KERNEL);
        if (sys_info == NULL) {
                DEBUG2(printk("scsi%ld: %s: Unable to allocate dma buffer.\n",
                              ha->host_no, __func__));

                goto exit_get_sys_info_no_free;
        }
        memset(sys_info, 0, sizeof(*sys_info));

        /* Get flash sys info */
        if (qla4xxx_get_flash(ha, sys_info_dma, FLASH_OFFSET_SYS_INFO,
                              sizeof(*sys_info)) != QLA_SUCCESS) {
                DEBUG2(printk("scsi%ld: %s: get_flash FLASH_OFFSET_SYS_INFO "
                              "failed\n", ha->host_no, __func__));

                goto exit_get_sys_info;
        }

        /* Save M.A.C. address & serial_number */
        memcpy(ha->my_mac, &sys_info->physAddr[0].address[0],
               min(sizeof(ha->my_mac),
                   sizeof(sys_info->physAddr[0].address)));
        memcpy(ha->serial_number, &sys_info->acSerialNumber,
               min(sizeof(ha->serial_number),
                   sizeof(sys_info->acSerialNumber)));

        status = QLA_SUCCESS;

exit_get_sys_info:
        dma_free_coherent(&ha->pdev->dev, sizeof(*sys_info), sys_info,
                          sys_info_dma);

exit_get_sys_info_no_free:
        return status;
}

/**
 * qla4xxx_init_local_data - initialize adapter specific local data
 * @ha: pointer to host adapter structure.
 *
 **/
static int qla4xxx_init_local_data(struct scsi_qla_host *ha)
{
        /* Initialize aen queue */
        ha->aen_q_count = MAX_AEN_ENTRIES;

        return qla4xxx_get_firmware_status(ha);
}

static uint8_t
qla4xxx_wait_for_ip_config(struct scsi_qla_host *ha)
{
        uint8_t ipv4_wait = 0;
        uint8_t ipv6_wait = 0;
        int8_t ip_address[IPv6_ADDR_LEN] = {0} ;

        /* If both IPv4 & IPv6 are enabled, possibly only one
         * IP address may be acquired, so check to see if we
         * need to wait for another */
        if (is_ipv4_enabled(ha) && is_ipv6_enabled(ha)) {
                if (((ha->addl_fw_state & FW_ADDSTATE_DHCPv4_ENABLED) != 0) &&
                    ((ha->addl_fw_state &
                                    FW_ADDSTATE_DHCPv4_LEASE_ACQUIRED) == 0)) {
                        ipv4_wait = 1;
                }
                if (((ha->ipv6_addl_options &
                            IPV6_ADDOPT_NEIGHBOR_DISCOVERY_ADDR_ENABLE) != 0) &&
                    ((ha->ipv6_link_local_state == IP_ADDRSTATE_ACQUIRING) ||
                     (ha->ipv6_addr0_state == IP_ADDRSTATE_ACQUIRING) ||
                     (ha->ipv6_addr1_state == IP_ADDRSTATE_ACQUIRING))) {

                        ipv6_wait = 1;

                        if ((ha->ipv6_link_local_state ==
                                                     IP_ADDRSTATE_PREFERRED) ||
                            (ha->ipv6_addr0_state == IP_ADDRSTATE_PREFERRED) ||
                            (ha->ipv6_addr1_state == IP_ADDRSTATE_PREFERRED)) {
                                DEBUG2(printk(KERN_INFO "scsi%ld: %s: "
                                              "Preferred IP configured."
                                              " Don't wait!\n", ha->host_no,
                                              __func__));
                                ipv6_wait = 0;
                        }
                        if (memcmp(&ha->ipv6_default_router_addr, ip_address,
                                IPv6_ADDR_LEN) == 0) {
                                DEBUG2(printk(KERN_INFO "scsi%ld: %s: "
                                              "No Router configured. "
                                              "Don't wait!\n", ha->host_no,
                                              __func__));
                                ipv6_wait = 0;
                        }
                        if ((ha->ipv6_default_router_state ==
                                                IPV6_RTRSTATE_MANUAL) &&
                            (ha->ipv6_link_local_state ==
                                                IP_ADDRSTATE_TENTATIVE) &&
                            (memcmp(&ha->ipv6_link_local_addr,
                                    &ha->ipv6_default_router_addr, 4) == 0)) {
                                DEBUG2(printk("scsi%ld: %s: LinkLocal Router & "
                                        "IP configured. Don't wait!\n",
                                        ha->host_no, __func__));
                                ipv6_wait = 0;
                        }
                }
                if (ipv4_wait || ipv6_wait) {
                        DEBUG2(printk("scsi%ld: %s: Wait for additional "
                                      "IP(s) \"", ha->host_no, __func__));
                        if (ipv4_wait)
                                DEBUG2(printk("IPv4 "));
                        if (ha->ipv6_link_local_state == IP_ADDRSTATE_ACQUIRING)
                                DEBUG2(printk("IPv6LinkLocal "));
                        if (ha->ipv6_addr0_state == IP_ADDRSTATE_ACQUIRING)
                                DEBUG2(printk("IPv6Addr0 "));
                        if (ha->ipv6_addr1_state == IP_ADDRSTATE_ACQUIRING)
                                DEBUG2(printk("IPv6Addr1 "));
                        DEBUG2(printk("\"\n"));
                }
        }

        return ipv4_wait|ipv6_wait;
}

static int qla4xxx_fw_ready(struct scsi_qla_host *ha)
{
        uint32_t timeout_count;
        int ready = 0;

        DEBUG2(ql4_printk(KERN_INFO, ha, "Waiting for Firmware Ready..\n"));
        for (timeout_count = ADAPTER_INIT_TOV; timeout_count > 0;
             timeout_count--) {
                if (test_and_clear_bit(DPC_GET_DHCP_IP_ADDR, &ha->dpc_flags))
                        qla4xxx_get_dhcp_ip_address(ha);

                /* Get firmware state. */
                if (qla4xxx_get_firmware_state(ha) != QLA_SUCCESS) {
                        DEBUG2(printk("scsi%ld: %s: unable to get firmware "
                                      "state\n", ha->host_no, __func__));
                        break;
                }

                if (ha->firmware_state & FW_STATE_ERROR) {
                        DEBUG2(printk("scsi%ld: %s: an unrecoverable error has"
                                      " occurred\n", ha->host_no, __func__));
                        break;

                }
                if (ha->firmware_state & FW_STATE_CONFIG_WAIT) {
                        /*
                         * The firmware has not yet been issued an Initialize
                         * Firmware command, so issue it now.
                         */
                        if (qla4xxx_initialize_fw_cb(ha) == QLA_ERROR)
                                break;

                        /* Go back and test for ready state - no wait. */
                        continue;
                }

                if (ha->firmware_state & FW_STATE_WAIT_AUTOCONNECT) {
                        DEBUG2(printk(KERN_INFO "scsi%ld: %s: fwstate:"
                                      "AUTOCONNECT in progress\n",
                                      ha->host_no, __func__));
                }

                if (ha->firmware_state & FW_STATE_CONFIGURING_IP) {
                        DEBUG2(printk(KERN_INFO "scsi%ld: %s: fwstate:"
                                      " CONFIGURING IP\n",
                                      ha->host_no, __func__));
                        /*
                         * Check for link state after 15 secs and if link is
                         * still DOWN then, cable is unplugged. Ignore "DHCP
                         * in Progress/CONFIGURING IP" bit to check if firmware
                         * is in ready state or not after 15 secs.
                         * This is applicable for both 2.x & 3.x firmware
                         */
                        if (timeout_count <= (ADAPTER_INIT_TOV - 15)) {
                                if (ha->addl_fw_state & FW_ADDSTATE_LINK_UP) {
                                        DEBUG2(printk(KERN_INFO "scsi%ld: %s:"
                                                  " LINK UP (Cable plugged)\n",
                                                  ha->host_no, __func__));
                                } else if (ha->firmware_state &
                                          (FW_STATE_CONFIGURING_IP |
                                                             FW_STATE_READY)) {
                                        DEBUG2(printk(KERN_INFO "scsi%ld: %s: "
                                                "LINK DOWN (Cable unplugged)\n",
                                                ha->host_no, __func__));
                                        ha->firmware_state = FW_STATE_READY;
                                }
                        }
                }

                if (ha->firmware_state == FW_STATE_READY) {
                        /* If DHCP IP Addr is available, retrieve it now. */
                        if (test_and_clear_bit(DPC_GET_DHCP_IP_ADDR,
                                                                &ha->dpc_flags))
                                qla4xxx_get_dhcp_ip_address(ha);

                        if (!qla4xxx_wait_for_ip_config(ha) ||
                                                        timeout_count == 1) {
                                DEBUG2(ql4_printk(KERN_INFO, ha,
                                    "Firmware Ready..\n"));
                                /* The firmware is ready to process SCSI
                                   commands. */
                                DEBUG2(ql4_printk(KERN_INFO, ha,
                                        "scsi%ld: %s: MEDIA TYPE"
                                        " - %s\n", ha->host_no,
                                        __func__, (ha->addl_fw_state &
                                        FW_ADDSTATE_OPTICAL_MEDIA)
                                        != 0 ? "OPTICAL" : "COPPER"));
                                DEBUG2(ql4_printk(KERN_INFO, ha,
                                        "scsi%ld: %s: DHCPv4 STATE"
                                        " Enabled %s\n", ha->host_no,
                                         __func__, (ha->addl_fw_state &
                                         FW_ADDSTATE_DHCPv4_ENABLED) != 0 ?
                                        "YES" : "NO"));
                                DEBUG2(ql4_printk(KERN_INFO, ha,
                                        "scsi%ld: %s: LINK %s\n",
                                        ha->host_no, __func__,
                                        (ha->addl_fw_state &
                                         FW_ADDSTATE_LINK_UP) != 0 ?
                                        "UP" : "DOWN"));
                                DEBUG2(ql4_printk(KERN_INFO, ha,
                                        "scsi%ld: %s: iSNS Service "
                                        "Started %s\n",
                                        ha->host_no, __func__,
                                        (ha->addl_fw_state &
                                         FW_ADDSTATE_ISNS_SVC_ENABLED) != 0 ?
                                        "YES" : "NO"));

                                ready = 1;
                                break;
                        }
                }
                DEBUG2(printk("scsi%ld: %s: waiting on fw, state=%x:%x - "
                              "seconds expired= %d\n", ha->host_no, __func__,
                              ha->firmware_state, ha->addl_fw_state,
                              timeout_count));
                if (is_qla4032(ha) &&
                        !(ha->addl_fw_state & FW_ADDSTATE_LINK_UP) &&
                        (timeout_count < ADAPTER_INIT_TOV - 5)) {
                        break;
                }

                msleep(1000);
        }                       /* end of for */

        if (timeout_count <= 0)
                DEBUG2(printk("scsi%ld: %s: FW Initialization timed out!\n",
                              ha->host_no, __func__));

        if (ha->firmware_state & FW_STATE_CONFIGURING_IP) {
                DEBUG2(printk("scsi%ld: %s: FW initialized, but is reporting "
                              "it's waiting to configure an IP address\n",
                               ha->host_no, __func__));
                ready = 1;
        } else if (ha->firmware_state & FW_STATE_WAIT_AUTOCONNECT) {
                DEBUG2(printk("scsi%ld: %s: FW initialized, but "
                              "auto-discovery still in process\n",
                               ha->host_no, __func__));
                ready = 1;
        }

        return ready;
}

/**
 * qla4xxx_init_firmware - initializes the firmware.
 * @ha: pointer to host adapter structure.
 *
 **/
static int qla4xxx_init_firmware(struct scsi_qla_host *ha)
{
        int status = QLA_ERROR;

        if (is_aer_supported(ha) &&
            test_bit(AF_PCI_CHANNEL_IO_PERM_FAILURE, &ha->flags))
                return status;

        /* For 82xx, stop firmware before initializing because if BIOS
         * has previously initialized firmware, then driver's initialize
         * firmware will fail. */
        if (is_qla8022(ha))
                qla4_8xxx_stop_firmware(ha);

        ql4_printk(KERN_INFO, ha, "Initializing firmware..\n");
        if (qla4xxx_initialize_fw_cb(ha) == QLA_ERROR) {
                DEBUG2(printk("scsi%ld: %s: Failed to initialize firmware "
                              "control block\n", ha->host_no, __func__));
                return status;
        }
        if (!qla4xxx_fw_ready(ha))
                return status;

        return qla4xxx_get_firmware_status(ha);
}

static struct ddb_entry* qla4xxx_get_ddb_entry(struct scsi_qla_host *ha,
                                                uint32_t fw_ddb_index,
                                                uint32_t *new_tgt)
{
        struct dev_db_entry *fw_ddb_entry = NULL;
        dma_addr_t fw_ddb_entry_dma;
        struct ddb_entry *ddb_entry = NULL;
        int found = 0;
        uint32_t device_state;

        *new_tgt = 0;
        /* Make sure the dma buffer is valid */
        fw_ddb_entry = dma_alloc_coherent(&ha->pdev->dev,
                                          sizeof(*fw_ddb_entry),
                                          &fw_ddb_entry_dma, GFP_KERNEL);
        if (fw_ddb_entry == NULL) {
                DEBUG2(printk("scsi%ld: %s: Unable to allocate dma buffer.\n",
                              ha->host_no, __func__));
                goto exit_get_ddb_entry_no_free;
        }

        if (qla4xxx_get_fwddb_entry(ha, fw_ddb_index, fw_ddb_entry,
                                    fw_ddb_entry_dma, NULL, NULL,
                                    &device_state, NULL, NULL, NULL) ==
                                    QLA_ERROR) {
                DEBUG2(printk("scsi%ld: %s: failed get_ddb_entry for "
                              "fw_ddb_index %d\n", ha->host_no, __func__,
                              fw_ddb_index));
                goto exit_get_ddb_entry;
        }

        /* Allocate DDB if not already allocated. */
        DEBUG2(printk("scsi%ld: %s: Looking for ddb[%d]\n", ha->host_no,
                      __func__, fw_ddb_index));
        list_for_each_entry(ddb_entry, &ha->ddb_list, list) {
                if ((memcmp(ddb_entry->iscsi_name, fw_ddb_entry->iscsi_name,
                           ISCSI_NAME_SIZE) == 0) &&
                        (ddb_entry->tpgt ==
                                le32_to_cpu(fw_ddb_entry->tgt_portal_grp)) &&
                        (memcmp(ddb_entry->isid, fw_ddb_entry->isid,
                                sizeof(ddb_entry->isid)) == 0)) {
                        found++;
                        break;
                }
        }

        /* if not found allocate new ddb */
        if (!found) {
                DEBUG2(printk("scsi%ld: %s: ddb[%d] not found - allocating "
                              "new ddb\n", ha->host_no, __func__,
                              fw_ddb_index));
                *new_tgt = 1;
                ddb_entry = qla4xxx_alloc_ddb(ha, fw_ddb_index);
        }

exit_get_ddb_entry:
        dma_free_coherent(&ha->pdev->dev, sizeof(*fw_ddb_entry), fw_ddb_entry,
                          fw_ddb_entry_dma);

exit_get_ddb_entry_no_free:
        return ddb_entry;
}

/**
 * qla4xxx_update_ddb_entry - update driver's internal ddb
 * @ha: pointer to host adapter structure.
 * @ddb_entry: pointer to device database structure to be filled
 * @fw_ddb_index: index of the ddb entry in fw ddb table
 *
 * This routine updates the driver's internal device database entry
 * with information retrieved from the firmware's device database
 * entry for the specified device. The ddb_entry->fw_ddb_index field
 * must be initialized prior to calling this routine
 *
 **/
static int qla4xxx_update_ddb_entry(struct scsi_qla_host *ha,
                                    struct ddb_entry *ddb_entry,
                                    uint32_t fw_ddb_index)
{
        struct dev_db_entry *fw_ddb_entry = NULL;
        dma_addr_t fw_ddb_entry_dma;
        int status = QLA_ERROR;
        uint32_t conn_err;

        if (ddb_entry == NULL) {
                DEBUG2(printk("scsi%ld: %s: ddb_entry is NULL\n", ha->host_no,
                              __func__));

                goto exit_update_ddb_no_free;
        }

        /* Make sure the dma buffer is valid */
        fw_ddb_entry = dma_alloc_coherent(&ha->pdev->dev,
                                          sizeof(*fw_ddb_entry),
                                          &fw_ddb_entry_dma, GFP_KERNEL);
        if (fw_ddb_entry == NULL) {
                DEBUG2(printk("scsi%ld: %s: Unable to allocate dma buffer.\n",
                              ha->host_no, __func__));

                goto exit_update_ddb_no_free;
        }

        if (qla4xxx_get_fwddb_entry(ha, fw_ddb_index, fw_ddb_entry,
                                    fw_ddb_entry_dma, NULL, NULL,
                                    &ddb_entry->fw_ddb_device_state, &conn_err,
                                    &ddb_entry->tcp_source_port_num,
                                    &ddb_entry->connection_id) ==
                                    QLA_ERROR) {
                DEBUG2(printk("scsi%ld: %s: failed get_ddb_entry for "
                              "fw_ddb_index %d\n", ha->host_no, __func__,
                              fw_ddb_index));

                goto exit_update_ddb;
        }

        status = QLA_SUCCESS;
        ddb_entry->options = le16_to_cpu(fw_ddb_entry->options);
        ddb_entry->target_session_id = le16_to_cpu(fw_ddb_entry->tsid);
        ddb_entry->task_mgmt_timeout =
                le16_to_cpu(fw_ddb_entry->def_timeout);
        ddb_entry->CmdSn = 0;
        ddb_entry->exe_throttle = le16_to_cpu(fw_ddb_entry->exec_throttle);
        ddb_entry->default_relogin_timeout =
                le16_to_cpu(fw_ddb_entry->def_timeout);
        ddb_entry->default_time2wait = le16_to_cpu(fw_ddb_entry->iscsi_def_time2wait);

        /* Update index in case it changed */
        ddb_entry->fw_ddb_index = fw_ddb_index;
        ha->fw_ddb_index_map[fw_ddb_index] = ddb_entry;

        ddb_entry->port = le16_to_cpu(fw_ddb_entry->port);
        ddb_entry->tpgt = le32_to_cpu(fw_ddb_entry->tgt_portal_grp);
        memcpy(ddb_entry->isid, fw_ddb_entry->isid, sizeof(ddb_entry->isid));

        memcpy(&ddb_entry->iscsi_name[0], &fw_ddb_entry->iscsi_name[0],
               min(sizeof(ddb_entry->iscsi_name),
                   sizeof(fw_ddb_entry->iscsi_name)));
        memcpy(&ddb_entry->iscsi_alias[0], &fw_ddb_entry->iscsi_alias[0],
               min(sizeof(ddb_entry->iscsi_alias),
                   sizeof(fw_ddb_entry->iscsi_alias)));
        memcpy(&ddb_entry->ip_addr[0], &fw_ddb_entry->ip_addr[0],
               min(sizeof(ddb_entry->ip_addr), sizeof(fw_ddb_entry->ip_addr)));

        ddb_entry->iscsi_max_burst_len = fw_ddb_entry->iscsi_max_burst_len;
        ddb_entry->iscsi_max_outsnd_r2t = fw_ddb_entry->iscsi_max_outsnd_r2t;
        ddb_entry->iscsi_first_burst_len = fw_ddb_entry->iscsi_first_burst_len;
        ddb_entry->iscsi_max_rcv_data_seg_len =
                                fw_ddb_entry->iscsi_max_rcv_data_seg_len;
        ddb_entry->iscsi_max_snd_data_seg_len =
                                fw_ddb_entry->iscsi_max_snd_data_seg_len;

        if (ddb_entry->options & DDB_OPT_IPV6_DEVICE) {
                memcpy(&ddb_entry->remote_ipv6_addr,
                        fw_ddb_entry->ip_addr,
                        min(sizeof(ddb_entry->remote_ipv6_addr),
                        sizeof(fw_ddb_entry->ip_addr)));
                memcpy(&ddb_entry->link_local_ipv6_addr,
                        fw_ddb_entry->link_local_ipv6_addr,
                        min(sizeof(ddb_entry->link_local_ipv6_addr),
                        sizeof(fw_ddb_entry->link_local_ipv6_addr)));

                DEBUG2(ql4_printk(KERN_INFO, ha, "%s: DDB[%d] State %04x"
                                        " ConnErr %08x IP %pI6 "
                                        ":%04d \"%s\"\n",
                                        __func__, fw_ddb_index,
                                        ddb_entry->fw_ddb_device_state,
                                        conn_err, fw_ddb_entry->ip_addr,
                                        le16_to_cpu(fw_ddb_entry->port),
                                        fw_ddb_entry->iscsi_name));
        } else
                DEBUG2(ql4_printk(KERN_INFO, ha, "%s: DDB[%d] State %04x"
                                        " ConnErr %08x IP %pI4 "
                                        ":%04d \"%s\"\n",
                                        __func__, fw_ddb_index,
                                        ddb_entry->fw_ddb_device_state,
                                        conn_err, fw_ddb_entry->ip_addr,
                                        le16_to_cpu(fw_ddb_entry->port),
                                        fw_ddb_entry->iscsi_name));
exit_update_ddb:
        if (fw_ddb_entry)
                dma_free_coherent(&ha->pdev->dev, sizeof(*fw_ddb_entry),
                                  fw_ddb_entry, fw_ddb_entry_dma);

exit_update_ddb_no_free:
        return status;
}

/**
 * qla4xxx_alloc_ddb - allocate device database entry
 * @ha: Pointer to host adapter structure.
 * @fw_ddb_index: Firmware's device database index
 *
 * This routine allocates a ddb_entry, ititializes some values, and
 * inserts it into the ddb list.
 **/
static struct ddb_entry * qla4xxx_alloc_ddb(struct scsi_qla_host *ha,
                                            uint32_t fw_ddb_index)
{
        struct ddb_entry *ddb_entry;

        DEBUG2(printk("scsi%ld: %s: fw_ddb_index [%d]\n", ha->host_no,
                      __func__, fw_ddb_index));

        ddb_entry = qla4xxx_alloc_sess(ha);
        if (ddb_entry == NULL) {
                DEBUG2(printk("scsi%ld: %s: Unable to allocate memory "
                              "to add fw_ddb_index [%d]\n",
                              ha->host_no, __func__, fw_ddb_index));
                return ddb_entry;
        }

        ddb_entry->fw_ddb_index = fw_ddb_index;
        atomic_set(&ddb_entry->retry_relogin_timer, INVALID_ENTRY);
        atomic_set(&ddb_entry->relogin_timer, 0);
        atomic_set(&ddb_entry->relogin_retry_count, 0);
        atomic_set(&ddb_entry->state, DDB_STATE_ONLINE);
        list_add_tail(&ddb_entry->list, &ha->ddb_list);
        ha->fw_ddb_index_map[fw_ddb_index] = ddb_entry;
        ha->tot_ddbs++;

        return ddb_entry;
}

/**
 * qla4_is_relogin_allowed - Are we allowed to login?
 * @ha: Pointer to host adapter structure.
 * @conn_err: Last connection error associated with the ddb
 *
 * This routine tests the given connection error to determine if
 * we are allowed to login.
 **/
int qla4_is_relogin_allowed(struct scsi_qla_host *ha, uint32_t conn_err)
{
        uint32_t err_code, login_rsp_sts_class;
        int relogin = 1;

        err_code = ((conn_err & 0x00ff0000) >> 16);
        login_rsp_sts_class = ((conn_err & 0x0000ff00) >> 8);
        if (err_code == 0x1c || err_code == 0x06) {
                DEBUG2(ql4_printk(KERN_INFO, ha,
                    ": conn_err=0x%08x, send target completed"
                    " or access denied failure\n", conn_err));
                relogin = 0;
        }
        if ((err_code == 0x08) && (login_rsp_sts_class == 0x02)) {
                /* Login Response PDU returned an error.
                   Login Response Status in Error Code Detail
                   indicates login should not be retried.*/
                DEBUG2(ql4_printk(KERN_INFO, ha,
                    ": conn_err=0x%08x, do not retry relogin\n",
                    conn_err));
                relogin = 0;
        }

        return relogin;
}

/**
 * qla4xxx_configure_ddbs - builds driver ddb list
 * @ha: Pointer to host adapter structure.
 *
 * This routine searches for all valid firmware ddb entries and builds
 * an internal ddb list. Ddbs that are considered valid are those with
 * a device state of SESSION_ACTIVE.
 **/
static int qla4xxx_build_ddb_list(struct scsi_qla_host *ha)
{
        int status = QLA_ERROR;
        uint32_t fw_ddb_index = 0;
        uint32_t next_fw_ddb_index = 0;
        uint32_t ddb_state;
        uint32_t conn_err;
        struct ddb_entry *ddb_entry;
        struct dev_db_entry *fw_ddb_entry = NULL;
        dma_addr_t fw_ddb_entry_dma;
        uint32_t ipv6_device;
        uint32_t new_tgt;

        fw_ddb_entry = dma_alloc_coherent(&ha->pdev->dev, sizeof(*fw_ddb_entry),
                        &fw_ddb_entry_dma, GFP_KERNEL);
        if (fw_ddb_entry == NULL) {
                DEBUG2(ql4_printk(KERN_INFO, ha, "%s: DMA alloc failed\n",
                                __func__));

                goto exit_build_ddb_list_no_free;
        }

        ql4_printk(KERN_INFO, ha, "Initializing DDBs ...\n");
        for (fw_ddb_index = 0; fw_ddb_index < MAX_DDB_ENTRIES;
             fw_ddb_index = next_fw_ddb_index) {
                /* First, let's see if a device exists here */
                if (qla4xxx_get_fwddb_entry(ha, fw_ddb_index, fw_ddb_entry,
                                            0, NULL, &next_fw_ddb_index,
                                            &ddb_state, &conn_err,
                                            NULL, NULL) ==
                                            QLA_ERROR) {
                        DEBUG2(printk("scsi%ld: %s: get_ddb_entry, "
                                      "fw_ddb_index %d failed", ha->host_no,
                                      __func__, fw_ddb_index));
                        goto exit_build_ddb_list;
                }

                DEBUG2(printk("scsi%ld: %s: Getting DDB[%d] ddbstate=0x%x, "
                              "next_fw_ddb_index=%d.\n", ha->host_no, __func__,
                              fw_ddb_index, ddb_state, next_fw_ddb_index));

                /* Issue relogin, if necessary. */
                if (ddb_state == DDB_DS_SESSION_FAILED ||
                    ddb_state == DDB_DS_NO_CONNECTION_ACTIVE) {
                        /* Try and login to device */
                        DEBUG2(printk("scsi%ld: %s: Login to DDB[%d]\n",
                                      ha->host_no, __func__, fw_ddb_index));
                        ipv6_device = le16_to_cpu(fw_ddb_entry->options) &
                                        DDB_OPT_IPV6_DEVICE;
                        if (qla4_is_relogin_allowed(ha, conn_err) &&
                                        ((!ipv6_device &&
                                          *((uint32_t *)fw_ddb_entry->ip_addr))
                                         || ipv6_device)) {
                                qla4xxx_set_ddb_entry(ha, fw_ddb_index, 0);
                                if (qla4xxx_get_fwddb_entry(ha, fw_ddb_index,
                                                        NULL, 0, NULL,
                                                        &next_fw_ddb_index,
                                                        &ddb_state, &conn_err,
                                                        NULL, NULL)
                                                == QLA_ERROR) {
                                        DEBUG2(printk("scsi%ld: %s:"
                                                "get_ddb_entry %d failed\n",
                                                ha->host_no,
                                                __func__, fw_ddb_index));
                                        goto exit_build_ddb_list;
                                }
                        }
                }

                if (ddb_state != DDB_DS_SESSION_ACTIVE)
                        goto next_one;
                /*
                 * if fw_ddb with session active state found,
                 * add to ddb_list
                 */
                DEBUG2(printk("scsi%ld: %s: DDB[%d] added to list\n",
                              ha->host_no, __func__, fw_ddb_index));

                /* Add DDB to internal our ddb list. */
                ddb_entry = qla4xxx_get_ddb_entry(ha, fw_ddb_index, &new_tgt);
                if (ddb_entry == NULL) {
                        DEBUG2(printk("scsi%ld: %s: Unable to allocate memory "
                                      "for device at fw_ddb_index %d\n",
                                      ha->host_no, __func__, fw_ddb_index));
                        goto exit_build_ddb_list;
                }
                /* Fill in the device structure */
                if (qla4xxx_update_ddb_entry(ha, ddb_entry, fw_ddb_index) ==
                    QLA_ERROR) {
                        ha->fw_ddb_index_map[fw_ddb_index] =
                                (struct ddb_entry *)INVALID_ENTRY;

                        DEBUG2(printk("scsi%ld: %s: update_ddb_entry failed "
                                      "for fw_ddb_index %d.\n",
                                      ha->host_no, __func__, fw_ddb_index));
                        goto exit_build_ddb_list;
                }

next_one:
                /* We know we've reached the last device when
                 * next_fw_ddb_index is 0 */
                if (next_fw_ddb_index == 0)
                        break;
        }

        status = QLA_SUCCESS;
        ql4_printk(KERN_INFO, ha, "DDB list done..\n");

exit_build_ddb_list:
        dma_free_coherent(&ha->pdev->dev, sizeof(*fw_ddb_entry), fw_ddb_entry,
                fw_ddb_entry_dma);

exit_build_ddb_list_no_free:
        return status;
}

struct qla4_relog_scan {
        int halt_wait;
        uint32_t conn_err;
        uint32_t fw_ddb_index;
        uint32_t next_fw_ddb_index;
        uint32_t fw_ddb_device_state;
};

static int qla4_test_rdy(struct scsi_qla_host *ha, struct qla4_relog_scan *rs)
{
        struct ddb_entry *ddb_entry;

        if (qla4_is_relogin_allowed(ha, rs->conn_err)) {
                /* We either have a device that is in
                 * the process of relogging in or a
                 * device that is waiting to be
                 * relogged in */
                rs->halt_wait = 0;

                ddb_entry = qla4xxx_lookup_ddb_by_fw_index(ha,
                                                           rs->fw_ddb_index);
                if (ddb_entry == NULL)
                        return QLA_ERROR;

                if (ddb_entry->dev_scan_wait_to_start_relogin != 0
                    && time_after_eq(jiffies,
                                     ddb_entry->
                                     dev_scan_wait_to_start_relogin))
                {
                        ddb_entry->dev_scan_wait_to_start_relogin = 0;
                        qla4xxx_set_ddb_entry(ha, rs->fw_ddb_index, 0);
                }
        }
        return QLA_SUCCESS;
}

static int qla4_scan_for_relogin(struct scsi_qla_host *ha,
                                 struct qla4_relog_scan *rs)
{
        int error;

        /* scan for relogins
         * ----------------- */
        for (rs->fw_ddb_index = 0; rs->fw_ddb_index < MAX_DDB_ENTRIES;
             rs->fw_ddb_index = rs->next_fw_ddb_index) {
                if (qla4xxx_get_fwddb_entry(ha, rs->fw_ddb_index, NULL, 0,
                                            NULL, &rs->next_fw_ddb_index,
                                            &rs->fw_ddb_device_state,
                                            &rs->conn_err, NULL, NULL)
                    == QLA_ERROR)
                        return QLA_ERROR;

                if (rs->fw_ddb_device_state == DDB_DS_LOGIN_IN_PROCESS)
                        rs->halt_wait = 0;

                if (rs->fw_ddb_device_state == DDB_DS_SESSION_FAILED ||
                    rs->fw_ddb_device_state == DDB_DS_NO_CONNECTION_ACTIVE) {
                        error = qla4_test_rdy(ha, rs);
                        if (error)
                                return error;
                }

                /* We know we've reached the last device when
                 * next_fw_ddb_index is 0 */
                if (rs->next_fw_ddb_index == 0)
                        break;
        }
        return QLA_SUCCESS;
}

/**
 * qla4xxx_devices_ready - wait for target devices to be logged in
 * @ha: pointer to adapter structure
 *
 * This routine waits up to ql4xdiscoverywait seconds
 * F/W database during driver load time.
 **/
static int qla4xxx_devices_ready(struct scsi_qla_host *ha)
{
        int error;
        unsigned long discovery_wtime;
        struct qla4_relog_scan rs;

        discovery_wtime = jiffies + (ql4xdiscoverywait * HZ);

        DEBUG(printk("Waiting (%d) for devices ...\n", ql4xdiscoverywait));
        do {
                /* poll for AEN. */
                qla4xxx_get_firmware_state(ha);
                if (test_and_clear_bit(DPC_AEN, &ha->dpc_flags)) {
                        /* Set time-between-relogin timer */
                        qla4xxx_process_aen(ha, RELOGIN_DDB_CHANGED_AENS);
                }

                /* if no relogins active or needed, halt discvery wait */
                rs.halt_wait = 1;

                error = qla4_scan_for_relogin(ha, &rs);

                if (rs.halt_wait) {
                        DEBUG2(printk("scsi%ld: %s: Delay halted.  Devices "
                                      "Ready.\n", ha->host_no, __func__));
                        return QLA_SUCCESS;
                }

                msleep(2000);
        } while (!time_after_eq(jiffies, discovery_wtime));

        DEBUG3(qla4xxx_get_conn_event_log(ha));

        return QLA_SUCCESS;
}

static void qla4xxx_flush_AENS(struct scsi_qla_host *ha)
{
        unsigned long wtime;

        /* Flush the 0x8014 AEN from the firmware as a result of
         * Auto connect. We are basically doing get_firmware_ddb()
         * to determine whether we need to log back in or not.
         *  Trying to do a set ddb before we have processed 0x8014
         *  will result in another set_ddb() for the same ddb. In other
         *  words there will be stale entries in the aen_q.
         */
        wtime = jiffies + (2 * HZ);
        do {
                if (qla4xxx_get_firmware_state(ha) == QLA_SUCCESS)
                        if (ha->firmware_state & (BIT_2 | BIT_0))
                                return;

                if (test_and_clear_bit(DPC_AEN, &ha->dpc_flags))
                        qla4xxx_process_aen(ha, FLUSH_DDB_CHANGED_AENS);

                msleep(1000);
        } while (!time_after_eq(jiffies, wtime));

}

static int qla4xxx_initialize_ddb_list(struct scsi_qla_host *ha)
{
        uint16_t fw_ddb_index;
        int status = QLA_SUCCESS;

        /* free the ddb list if is not empty */
        if (!list_empty(&ha->ddb_list))
                qla4xxx_free_ddb_list(ha);

        for (fw_ddb_index = 0; fw_ddb_index < MAX_DDB_ENTRIES; fw_ddb_index++)
                ha->fw_ddb_index_map[fw_ddb_index] =
                        (struct ddb_entry *)INVALID_ENTRY;

        ha->tot_ddbs = 0;

        qla4xxx_flush_AENS(ha);

        /* Wait for an AEN */
        qla4xxx_devices_ready(ha);

        /*
         * First perform device discovery for active
         * fw ddb indexes and build
         * ddb list.
         */
        if ((status = qla4xxx_build_ddb_list(ha)) == QLA_ERROR)
                return status;

        /*
         * Targets can come online after the inital discovery, so processing
         * the aens here will catch them.
         */
        if (test_and_clear_bit(DPC_AEN, &ha->dpc_flags))
                qla4xxx_process_aen(ha, PROCESS_ALL_AENS);

        return status;
}

/**
 * qla4xxx_reinitialize_ddb_list - update the driver ddb list
 * @ha: pointer to host adapter structure.
 *
 * This routine obtains device information from the F/W database after
 * firmware or adapter resets.  The device table is preserved.
 **/
int qla4xxx_reinitialize_ddb_list(struct scsi_qla_host *ha)
{
        int status = QLA_SUCCESS;
        struct ddb_entry *ddb_entry, *detemp;

        /* Update the device information for all devices. */
        list_for_each_entry_safe(ddb_entry, detemp, &ha->ddb_list, list) {
                qla4xxx_update_ddb_entry(ha, ddb_entry,
                                         ddb_entry->fw_ddb_index);
                if (ddb_entry->fw_ddb_device_state == DDB_DS_SESSION_ACTIVE) {
                        atomic_set(&ddb_entry->state, DDB_STATE_ONLINE);
                        DEBUG2(printk ("scsi%ld: %s: ddb index [%d] marked "
                                       "ONLINE\n", ha->host_no, __func__,
                                       ddb_entry->fw_ddb_index));
                        iscsi_unblock_session(ddb_entry->sess);
                } else if (atomic_read(&ddb_entry->state) == DDB_STATE_ONLINE)
                        qla4xxx_mark_device_missing(ha, ddb_entry);
        }
        return status;
}

/**
 * qla4xxx_relogin_device - re-establish session
 * @ha: Pointer to host adapter structure.
 * @ddb_entry: Pointer to device database entry
 *
 * This routine does a session relogin with the specified device.
 * The ddb entry must be assigned prior to making this call.
 **/
int qla4xxx_relogin_device(struct scsi_qla_host *ha,
                           struct ddb_entry * ddb_entry)
{
        uint16_t relogin_timer;

        relogin_timer = max(ddb_entry->default_relogin_timeout,
                            (uint16_t)RELOGIN_TOV);
        atomic_set(&ddb_entry->relogin_timer, relogin_timer);

        DEBUG2(printk("scsi%ld: Relogin ddb [%d]. TOV=%d\n", ha->host_no,
                      ddb_entry->fw_ddb_index, relogin_timer));

        qla4xxx_set_ddb_entry(ha, ddb_entry->fw_ddb_index, 0);

        return QLA_SUCCESS;
}

static int qla4xxx_config_nvram(struct scsi_qla_host *ha)
{
        unsigned long flags;
        union external_hw_config_reg extHwConfig;

        DEBUG2(printk("scsi%ld: %s: Get EEProm parameters \n", ha->host_no,
                      __func__));
        if (ql4xxx_lock_flash(ha) != QLA_SUCCESS)
                return QLA_ERROR;
        if (ql4xxx_lock_nvram(ha) != QLA_SUCCESS) {
                ql4xxx_unlock_flash(ha);
                return QLA_ERROR;
        }

        /* Get EEPRom Parameters from NVRAM and validate */
        ql4_printk(KERN_INFO, ha, "Configuring NVRAM ...\n");
        if (qla4xxx_is_nvram_configuration_valid(ha) == QLA_SUCCESS) {
                spin_lock_irqsave(&ha->hardware_lock, flags);
                extHwConfig.Asuint32_t =
                        rd_nvram_word(ha, eeprom_ext_hw_conf_offset(ha));
                spin_unlock_irqrestore(&ha->hardware_lock, flags);
        } else {
                ql4_printk(KERN_WARNING, ha,
                    "scsi%ld: %s: EEProm checksum invalid.  "
                    "Please update your EEPROM\n", ha->host_no,
                    __func__);

                /* Attempt to set defaults */
                if (is_qla4010(ha))
                        extHwConfig.Asuint32_t = 0x1912;
                else if (is_qla4022(ha) | is_qla4032(ha))
                        extHwConfig.Asuint32_t = 0x0023;
                else
                        return QLA_ERROR;
        }
        DEBUG(printk("scsi%ld: %s: Setting extHwConfig to 0xFFFF%04x\n",
                     ha->host_no, __func__, extHwConfig.Asuint32_t));

        spin_lock_irqsave(&ha->hardware_lock, flags);
        writel((0xFFFF << 16) | extHwConfig.Asuint32_t, isp_ext_hw_conf(ha));
        readl(isp_ext_hw_conf(ha));
        spin_unlock_irqrestore(&ha->hardware_lock, flags);

        ql4xxx_unlock_nvram(ha);
        ql4xxx_unlock_flash(ha);

        return QLA_SUCCESS;
}

/**
 * qla4_8xxx_pci_config() - Setup ISP82xx PCI configuration registers.
 * @ha: HA context
 */
void qla4_8xxx_pci_config(struct scsi_qla_host *ha)
{
        pci_set_master(ha->pdev);
}

void qla4xxx_pci_config(struct scsi_qla_host *ha)
{
        uint16_t w;
        int status;

        ql4_printk(KERN_INFO, ha, "Configuring PCI space...\n");

        pci_set_master(ha->pdev);
        status = pci_set_mwi(ha->pdev);
        /*
         * We want to respect framework's setting of PCI configuration space
         * command register and also want to make sure that all bits of
         * interest to us are properly set in command register.
         */
        pci_read_config_word(ha->pdev, PCI_COMMAND, &w);
        w |= PCI_COMMAND_PARITY | PCI_COMMAND_SERR;
        w &= ~PCI_COMMAND_INTX_DISABLE;
        pci_write_config_word(ha->pdev, PCI_COMMAND, w);
}

static int qla4xxx_start_firmware_from_flash(struct scsi_qla_host *ha)
{
        int status = QLA_ERROR;
        unsigned long max_wait_time;
        unsigned long flags;
        uint32_t mbox_status;

        ql4_printk(KERN_INFO, ha, "Starting firmware ...\n");

        /*
         * Start firmware from flash ROM
         *
         * WORKAROUND: Stuff a non-constant value that the firmware can
         * use as a seed for a random number generator in MB7 prior to
         * setting BOOT_ENABLE.  Fixes problem where the TCP
         * connections use the same TCP ports after each reboot,
         * causing some connections to not get re-established.
         */
        DEBUG(printk("scsi%d: %s: Start firmware from flash ROM\n",
                     ha->host_no, __func__));

        spin_lock_irqsave(&ha->hardware_lock, flags);
        writel(jiffies, &ha->reg->mailbox[7]);
        if (is_qla4022(ha) | is_qla4032(ha))
                writel(set_rmask(NVR_WRITE_ENABLE),
                       &ha->reg->u1.isp4022.nvram);

        writel(2, &ha->reg->mailbox[6]);
        readl(&ha->reg->mailbox[6]);

        writel(set_rmask(CSR_BOOT_ENABLE), &ha->reg->ctrl_status);
        readl(&ha->reg->ctrl_status);
        spin_unlock_irqrestore(&ha->hardware_lock, flags);

        /* Wait for firmware to come UP. */
        DEBUG2(printk(KERN_INFO "scsi%ld: %s: Wait up to %d seconds for "
                      "boot firmware to complete...\n",
                      ha->host_no, __func__, FIRMWARE_UP_TOV));
        max_wait_time = jiffies + (FIRMWARE_UP_TOV * HZ);
        do {
                uint32_t ctrl_status;

                spin_lock_irqsave(&ha->hardware_lock, flags);
                ctrl_status = readw(&ha->reg->ctrl_status);
                mbox_status = readw(&ha->reg->mailbox[0]);
                spin_unlock_irqrestore(&ha->hardware_lock, flags);

                if (ctrl_status & set_rmask(CSR_SCSI_PROCESSOR_INTR))
                        break;
                if (mbox_status == MBOX_STS_COMMAND_COMPLETE)
                        break;

                DEBUG2(printk(KERN_INFO "scsi%ld: %s: Waiting for boot "
                    "firmware to complete... ctrl_sts=0x%x, remaining=%ld\n",
                    ha->host_no, __func__, ctrl_status, max_wait_time));

                msleep_interruptible(250);
        } while (!time_after_eq(jiffies, max_wait_time));

        if (mbox_status == MBOX_STS_COMMAND_COMPLETE) {
                DEBUG(printk(KERN_INFO "scsi%ld: %s: Firmware has started\n",
                             ha->host_no, __func__));

                spin_lock_irqsave(&ha->hardware_lock, flags);
                writel(set_rmask(CSR_SCSI_PROCESSOR_INTR),
                       &ha->reg->ctrl_status);
                readl(&ha->reg->ctrl_status);
                spin_unlock_irqrestore(&ha->hardware_lock, flags);

                status = QLA_SUCCESS;
        } else {
                printk(KERN_INFO "scsi%ld: %s: Boot firmware failed "
                       "-  mbox status 0x%x\n", ha->host_no, __func__,
                       mbox_status);
                status = QLA_ERROR;
        }
        return status;
}

int ql4xxx_lock_drvr_wait(struct scsi_qla_host *a)
{
#define QL4_LOCK_DRVR_WAIT      60
#define QL4_LOCK_DRVR_SLEEP     1

        int drvr_wait = QL4_LOCK_DRVR_WAIT;
        while (drvr_wait) {
                if (ql4xxx_lock_drvr(a) == 0) {
                        ssleep(QL4_LOCK_DRVR_SLEEP);
                        if (drvr_wait) {
                                DEBUG2(printk("scsi%ld: %s: Waiting for "
                                              "Global Init Semaphore(%d)...\n",
                                              a->host_no,
                                              __func__, drvr_wait));
                        }
                        drvr_wait -= QL4_LOCK_DRVR_SLEEP;
                } else {
                        DEBUG2(printk("scsi%ld: %s: Global Init Semaphore "
                                      "acquired\n", a->host_no, __func__));
                        return QLA_SUCCESS;
                }
        }
        return QLA_ERROR;
}

/**
 * qla4xxx_start_firmware - starts qla4xxx firmware
 * @ha: Pointer to host adapter structure.
 *
 * This routine performs the necessary steps to start the firmware for
 * the QLA4010 adapter.
 **/
int qla4xxx_start_firmware(struct scsi_qla_host *ha)
{
        unsigned long flags = 0;
        uint32_t mbox_status;
        int status = QLA_ERROR;
        int soft_reset = 1;
        int config_chip = 0;

        if (is_qla4022(ha) | is_qla4032(ha))
                ql4xxx_set_mac_number(ha);

        if (ql4xxx_lock_drvr_wait(ha) != QLA_SUCCESS)
                return QLA_ERROR;

        spin_lock_irqsave(&ha->hardware_lock, flags);

        DEBUG2(printk("scsi%ld: %s: port_ctrl   = 0x%08X\n", ha->host_no,
                      __func__, readw(isp_port_ctrl(ha))));
        DEBUG(printk("scsi%ld: %s: port_status = 0x%08X\n", ha->host_no,
                     __func__, readw(isp_port_status(ha))));

        /* Is Hardware already initialized? */
        if ((readw(isp_port_ctrl(ha)) & 0x8000) != 0) {
                DEBUG(printk("scsi%ld: %s: Hardware has already been "
                             "initialized\n", ha->host_no, __func__));

                /* Receive firmware boot acknowledgement */
                mbox_status = readw(&ha->reg->mailbox[0]);

                DEBUG2(printk("scsi%ld: %s: H/W Config complete - mbox[0]= "
                              "0x%x\n", ha->host_no, __func__, mbox_status));

                /* Is firmware already booted? */
                if (mbox_status == 0) {
                        /* F/W not running, must be config by net driver */
                        config_chip = 1;
                        soft_reset = 0;
                } else {
                        writel(set_rmask(CSR_SCSI_PROCESSOR_INTR),
                               &ha->reg->ctrl_status);
                        readl(&ha->reg->ctrl_status);
                        spin_unlock_irqrestore(&ha->hardware_lock, flags);
                        if (qla4xxx_get_firmware_state(ha) == QLA_SUCCESS) {
                                DEBUG2(printk("scsi%ld: %s: Get firmware "
                                              "state -- state = 0x%x\n",
                                              ha->host_no,
                                              __func__, ha->firmware_state));
                                /* F/W is running */
                                if (ha->firmware_state &
                                    FW_STATE_CONFIG_WAIT) {
                                        DEBUG2(printk("scsi%ld: %s: Firmware "
                                                      "in known state -- "
                                                      "config and "
                                                      "boot, state = 0x%x\n",
                                                      ha->host_no, __func__,
                                                      ha->firmware_state));
                                        config_chip = 1;
                                        soft_reset = 0;
                                }
                        } else {
                                DEBUG2(printk("scsi%ld: %s: Firmware in "
                                              "unknown state -- resetting,"
                                              " state = "
                                              "0x%x\n", ha->host_no, __func__,
                                              ha->firmware_state));
                        }
                        spin_lock_irqsave(&ha->hardware_lock, flags);
                }
        } else {
                DEBUG(printk("scsi%ld: %s: H/W initialization hasn't been "
                             "started - resetting\n", ha->host_no, __func__));
        }
        spin_unlock_irqrestore(&ha->hardware_lock, flags);

        DEBUG(printk("scsi%ld: %s: Flags soft_rest=%d, config= %d\n ",
                     ha->host_no, __func__, soft_reset, config_chip));
        if (soft_reset) {
                DEBUG(printk("scsi%ld: %s: Issue Soft Reset\n", ha->host_no,
                             __func__));
                status = qla4xxx_soft_reset(ha);        /* NOTE: acquires drvr
                                                         * lock again, but ok */
                if (status == QLA_ERROR) {
                        DEBUG(printk("scsi%d: %s: Soft Reset failed!\n",
                                     ha->host_no, __func__));
                        ql4xxx_unlock_drvr(ha);
                        return QLA_ERROR;
                }
                config_chip = 1;

                /* Reset clears the semaphore, so acquire again */
                if (ql4xxx_lock_drvr_wait(ha) != QLA_SUCCESS)
                        return QLA_ERROR;
        }

        if (config_chip) {
                if ((status = qla4xxx_config_nvram(ha)) == QLA_SUCCESS)
                        status = qla4xxx_start_firmware_from_flash(ha);
        }

        ql4xxx_unlock_drvr(ha);
        if (status == QLA_SUCCESS) {
                if (test_and_clear_bit(AF_GET_CRASH_RECORD, &ha->flags))
                        qla4xxx_get_crash_record(ha);
        } else {
                DEBUG(printk("scsi%ld: %s: Firmware has NOT started\n",
                             ha->host_no, __func__));
        }
        return status;
}


/**
 * qla4xxx_initialize_adapter - initiailizes hba
 * @ha: Pointer to host adapter structure.
 * @renew_ddb_list: Indicates what to do with the adapter's ddb list
 *      after adapter recovery has completed.
 *      0=preserve ddb list, 1=destroy and rebuild ddb list
 *
 * This routine parforms all of the steps necessary to initialize the adapter.
 *
 **/
int qla4xxx_initialize_adapter(struct scsi_qla_host *ha,
                               uint8_t renew_ddb_list)
{
        int status = QLA_ERROR;
        int8_t ip_address[IP_ADDR_LEN] = {0} ;

        ha->eeprom_cmd_data = 0;

        ql4_printk(KERN_INFO, ha, "Configuring PCI space...\n");
        ha->isp_ops->pci_config(ha);

        ha->isp_ops->disable_intrs(ha);

        /* Initialize the Host adapter request/response queues and firmware */
        if (ha->isp_ops->start_firmware(ha) == QLA_ERROR)
                goto exit_init_hba;

        if (qla4xxx_get_fw_version(ha) == QLA_ERROR)
                goto exit_init_hba;

        if (ha->isp_ops->get_sys_info(ha) == QLA_ERROR)
                goto exit_init_hba;

        if (qla4xxx_init_local_data(ha) == QLA_ERROR)
                goto exit_init_hba;

        status = qla4xxx_init_firmware(ha);
        if (status == QLA_ERROR)
                goto exit_init_hba;

        /*
         * FW is waiting to get an IP address from DHCP server: Skip building
         * the ddb_list and wait for DHCP lease acquired aen to come in
         * followed by 0x8014 aen" to trigger the tgt discovery process.
         */
        if (ha->firmware_state & FW_STATE_CONFIGURING_IP)
                goto exit_init_online;

        /* Skip device discovery if ip and subnet is zero */
        if (memcmp(ha->ip_address, ip_address, IP_ADDR_LEN) == 0 ||
            memcmp(ha->subnet_mask, ip_address, IP_ADDR_LEN) == 0)
                goto exit_init_online;

        if (renew_ddb_list == PRESERVE_DDB_LIST) {
                /*
                 * We want to preserve lun states (i.e. suspended, etc.)
                 * for recovery initiated by the driver.  So just update
                 * the device states for the existing ddb_list.
                 */
                qla4xxx_reinitialize_ddb_list(ha);
        } else if (renew_ddb_list == REBUILD_DDB_LIST) {
                /*
                 * We want to build the ddb_list from scratch during
                 * driver initialization and recovery initiated by the
                 * INT_HBA_RESET IOCTL.
                 */
                status = qla4xxx_initialize_ddb_list(ha);
                if (status == QLA_ERROR) {
                        DEBUG2(printk("%s(%ld) Error occurred during build"
                                      "ddb list\n", __func__, ha->host_no));
                        goto exit_init_hba;
                }

        }
        if (!ha->tot_ddbs) {
                DEBUG2(printk("scsi%ld: Failed to initialize devices or none "
                              "present in Firmware device database\n",
                              ha->host_no));
        }

exit_init_online:
        set_bit(AF_ONLINE, &ha->flags);
exit_init_hba:
        if (is_qla8022(ha) && (status == QLA_ERROR)) {
                /* Since interrupts are registered in start_firmware for
                 * 82xx, release them here if initialize_adapter fails */
                qla4xxx_free_irqs(ha);
        }

        DEBUG2(printk("scsi%ld: initialize adapter: %s\n", ha->host_no,
            status == QLA_ERROR ? "FAILED" : "SUCCEDED"));
        return status;
}

/**
 * qla4xxx_add_device_dynamically - ddb addition due to an AEN
 * @ha:  Pointer to host adapter structure.
 * @fw_ddb_index:  Firmware's device database index
 *
 * This routine processes adds a device as a result of an 8014h AEN.
 **/
static void qla4xxx_add_device_dynamically(struct scsi_qla_host *ha,
                                           uint32_t fw_ddb_index)
{
        struct ddb_entry * ddb_entry;
        uint32_t new_tgt;

        /* First allocate a device structure */
        ddb_entry = qla4xxx_get_ddb_entry(ha, fw_ddb_index, &new_tgt);
        if (ddb_entry == NULL) {
                DEBUG2(printk(KERN_WARNING
                              "scsi%ld: Unable to allocate memory to add "
                              "fw_ddb_index %d\n", ha->host_no, fw_ddb_index));
                return;
        }

        if (!new_tgt && (ddb_entry->fw_ddb_index != fw_ddb_index)) {
                /* Target has been bound to a new fw_ddb_index */
                qla4xxx_free_ddb(ha, ddb_entry);
                ddb_entry = qla4xxx_alloc_ddb(ha, fw_ddb_index);
                if (ddb_entry == NULL) {
                        DEBUG2(printk(KERN_WARNING
                                "scsi%ld: Unable to allocate memory"
                                " to add fw_ddb_index %d\n",
                                ha->host_no, fw_ddb_index));
                        return;
                }
        }
        if (qla4xxx_update_ddb_entry(ha, ddb_entry, fw_ddb_index) ==
                                    QLA_ERROR) {
                ha->fw_ddb_index_map[fw_ddb_index] =
                                        (struct ddb_entry *)INVALID_ENTRY;
                DEBUG2(printk(KERN_WARNING
                              "scsi%ld: failed to add new device at index "
                              "[%d]\n Unable to retrieve fw ddb entry\n",
                              ha->host_no, fw_ddb_index));
                qla4xxx_free_ddb(ha, ddb_entry);
                return;
        }

        if (qla4xxx_add_sess(ddb_entry)) {
                DEBUG2(printk(KERN_WARNING
                              "scsi%ld: failed to add new device at index "
                              "[%d]\n Unable to add connection and session\n",
                              ha->host_no, fw_ddb_index));
                qla4xxx_free_ddb(ha, ddb_entry);
        }
}

/**
 * qla4xxx_process_ddb_changed - process ddb state change
 * @ha - Pointer to host adapter structure.
 * @fw_ddb_index - Firmware's device database index
 * @state - Device state
 *
 * This routine processes a Decive Database Changed AEN Event.
 **/
int qla4xxx_process_ddb_changed(struct scsi_qla_host *ha, uint32_t fw_ddb_index,
                uint32_t state, uint32_t conn_err)
{
        struct ddb_entry * ddb_entry;
        uint32_t old_fw_ddb_device_state;

        /* check for out of range index */
        if (fw_ddb_index >= MAX_DDB_ENTRIES)
                return QLA_ERROR;

        /* Get the corresponging ddb entry */
        ddb_entry = qla4xxx_lookup_ddb_by_fw_index(ha, fw_ddb_index);
        /* Device does not currently exist in our database. */
        if (ddb_entry == NULL) {
                if (state == DDB_DS_SESSION_ACTIVE)
                        qla4xxx_add_device_dynamically(ha, fw_ddb_index);
                return QLA_SUCCESS;
        }

        /* Device already exists in our database. */
        old_fw_ddb_device_state = ddb_entry->fw_ddb_device_state;
        DEBUG2(printk("scsi%ld: %s DDB - old state= 0x%x, new state=0x%x for "
                      "index [%d]\n", ha->host_no, __func__,
                      ddb_entry->fw_ddb_device_state, state, fw_ddb_index));
        if (old_fw_ddb_device_state == state &&
            state == DDB_DS_SESSION_ACTIVE) {
                if (atomic_read(&ddb_entry->state) != DDB_STATE_ONLINE) {
                        atomic_set(&ddb_entry->state, DDB_STATE_ONLINE);
                        iscsi_unblock_session(ddb_entry->sess);
                }
                return QLA_SUCCESS;
        }

        ddb_entry->fw_ddb_device_state = state;
        /* Device is back online. */
        if (ddb_entry->fw_ddb_device_state == DDB_DS_SESSION_ACTIVE) {
                atomic_set(&ddb_entry->state, DDB_STATE_ONLINE);
                atomic_set(&ddb_entry->relogin_retry_count, 0);
                atomic_set(&ddb_entry->relogin_timer, 0);
                clear_bit(DF_RELOGIN, &ddb_entry->flags);
                clear_bit(DF_NO_RELOGIN, &ddb_entry->flags);
                iscsi_unblock_session(ddb_entry->sess);
                iscsi_session_event(ddb_entry->sess,
                                    ISCSI_KEVENT_CREATE_SESSION);
                /*
                 * Change the lun state to READY in case the lun TIMEOUT before
                 * the device came back.
                 */
        } else {
                /* Device went away, mark device missing */
                if (atomic_read(&ddb_entry->state) == DDB_STATE_ONLINE) {
                        DEBUG2(ql4_printk(KERN_INFO, ha, "%s mark missing "
                                        "ddb_entry 0x%p sess 0x%p conn 0x%p\n",
                                        __func__, ddb_entry,
                                        ddb_entry->sess, ddb_entry->conn));
                        qla4xxx_mark_device_missing(ha, ddb_entry);
                }

                /*
                 * Relogin if device state changed to a not active state.
                 * However, do not relogin if a RELOGIN is in process, or
                 * we are not allowed to relogin to this DDB.
                 */
                if (ddb_entry->fw_ddb_device_state == DDB_DS_SESSION_FAILED &&
                    !test_bit(DF_RELOGIN, &ddb_entry->flags) &&
                    !test_bit(DF_NO_RELOGIN, &ddb_entry->flags) &&
                    qla4_is_relogin_allowed(ha, conn_err)) {
                        /*
                         * This triggers a relogin.  After the relogin_timer
                         * expires, the relogin gets scheduled.  We must wait a
                         * minimum amount of time since receiving an 0x8014 AEN
                         * with failed device_state or a logout response before
                         * we can issue another relogin.
                         */
                        /* Firmware pads this timeout: (time2wait +1).
                         * Driver retry to login should be longer than F/W.
                         * Otherwise F/W will fail
                         * set_ddb() mbx cmd with 0x4005 since it still
                         * counting down its time2wait.
                         */
                        atomic_set(&ddb_entry->relogin_timer, 0);
                        atomic_set(&ddb_entry->retry_relogin_timer,
                                   ddb_entry->default_time2wait + 4);
                        DEBUG(printk("scsi%ld: %s: ddb[%d] "
                            "initiate relogin after %d seconds\n",
                            ha->host_no, __func__,
                            ddb_entry->fw_ddb_index,
                            ddb_entry->default_time2wait + 4));
                } else {
                        DEBUG(printk("scsi%ld: %s: ddb[%d] "
                            "relogin not initiated, state = %d, "
                            "ddb_entry->flags = 0x%lx\n",
                            ha->host_no, __func__,
                            ddb_entry->fw_ddb_index,
                            ddb_entry->fw_ddb_device_state,
                            ddb_entry->flags));
                }
        }
        return QLA_SUCCESS;
}