text: /*******************************************************************
   * This file is part of the Emulex Linux Device Driver for         *
   * Fibre Channel Host Bus Adapters.                                *
   * Copyright (C) 2017-2019 Broadcom. All Rights Reserved. The term *
   * “Broadcom” refers to Broadcom Inc. and/or its subsidiaries.     *
   * Copyright (C) 2004-2016 Emulex.  All rights reserved.           *
   * EMULEX and SLI are trademarks of Emulex.                        *
   * www.broadcom.com                                                *
   * Portions Copyright (C) 2004-2005 Christoph Hellwig              *
   *                                                                 *
   * This program is free software; you can redistribute it and/or   *
   * modify it under the terms of version 2 of the GNU General       *
   * Public License as published by the Free Software Foundation.    *
   * This program is distributed in the hope that it will be useful. *
   * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND          *
   * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY,  *
   * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE      *
   * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD *
   * TO BE LEGALLY INVALID.  See the GNU General Public License for  *
   * more details, a copy of which can be found in the file COPYING  *
   * included with this package.                                     *
   *******************************************************************/
  /* See Fibre Channel protocol T11 FC-LS for details */
  #include <linux/blkdev.h>
  #include <linux/pci.h>
  #include <linux/slab.h>
  #include <linux/interrupt.h>
  
  #include <scsi/scsi.h>
  #include <scsi/scsi_device.h>
  #include <scsi/scsi_host.h>
  #include <scsi/scsi_transport_fc.h>
  #include <uapi/scsi/fc/fc_fs.h>
  #include <uapi/scsi/fc/fc_els.h>
  
  #include "lpfc_hw4.h"
  #include "lpfc_hw.h"
  #include "lpfc_sli.h"
  #include "lpfc_sli4.h"
  #include "lpfc_nl.h"
  #include "lpfc_disc.h"
  #include "lpfc_scsi.h"
  #include "lpfc.h"
  #include "lpfc_logmsg.h"
  #include "lpfc_crtn.h"
  #include "lpfc_vport.h"
  #include "lpfc_debugfs.h"
  
  static int lpfc_els_retry(struct lpfc_hba *, struct lpfc_iocbq *,
  			  struct lpfc_iocbq *);
  static void lpfc_cmpl_fabric_iocb(struct lpfc_hba *, struct lpfc_iocbq *,
  			struct lpfc_iocbq *);
  static void lpfc_fabric_abort_vport(struct lpfc_vport *vport);
  static int lpfc_issue_els_fdisc(struct lpfc_vport *vport,
  				struct lpfc_nodelist *ndlp, uint8_t retry);
  static int lpfc_issue_fabric_iocb(struct lpfc_hba *phba,
  				  struct lpfc_iocbq *iocb);
  
  static int lpfc_max_els_tries = 3;
  
  /**
   * lpfc_els_chk_latt - Check host link attention event for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine checks whether there is an outstanding host link
   * attention event during the discovery process with the @vport. It is done
   * by reading the HBA's Host Attention (HA) register. If there is any host
   * link attention events during this @vport's discovery process, the @vport
   * shall be marked as FC_ABORT_DISCOVERY, a host link attention clear shall
   * be issued if the link state is not already in host link cleared state,
   * and a return code shall indicate whether the host link attention event
   * had happened.
   *
   * Note that, if either the host link is in state LPFC_LINK_DOWN or @vport
   * state in LPFC_VPORT_READY, the request for checking host link attention
   * event will be ignored and a return code shall indicate no host link
   * attention event had happened.
   *
   * Return codes
   *   0 - no host link attention event happened
   *   1 - host link attention event happened
   **/
  int
  lpfc_els_chk_latt(struct lpfc_vport *vport)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	uint32_t ha_copy;
  
  	if (vport->port_state >= LPFC_VPORT_READY ||
  	    phba->link_state == LPFC_LINK_DOWN ||
  	    phba->sli_rev > LPFC_SLI_REV3)
  		return 0;
  
  	/* Read the HBA Host Attention Register */
  	if (lpfc_readl(phba->HAregaddr, &ha_copy))
  		return 1;
  
  	if (!(ha_copy & HA_LATT))
  		return 0;
  
  	/* Pending Link Event during Discovery */
  	lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
  			 "0237 Pending Link Event during "
  			 "Discovery: State x%x\n",
  			 phba->pport->port_state);
  
  	/* CLEAR_LA should re-enable link attention events and
  	 * we should then immediately take a LATT event. The
  	 * LATT processing should call lpfc_linkdown() which
  	 * will cleanup any left over in-progress discovery
  	 * events.
  	 */
  	spin_lock_irq(shost->host_lock);
  	vport->fc_flag |= FC_ABORT_DISCOVERY;
  	spin_unlock_irq(shost->host_lock);
  
  	if (phba->link_state != LPFC_CLEAR_LA)
  		lpfc_issue_clear_la(phba, vport);
  
  	return 1;
  }
  
  /**
   * lpfc_prep_els_iocb - Allocate and prepare a lpfc iocb data structure
   * @vport: pointer to a host virtual N_Port data structure.
   * @expectRsp: flag indicating whether response is expected.
   * @cmdSize: size of the ELS command.
   * @retry: number of retries to the command IOCB when it fails.
   * @ndlp: pointer to a node-list data structure.
   * @did: destination identifier.
   * @elscmd: the ELS command code.
   *
   * This routine is used for allocating a lpfc-IOCB data structure from
   * the driver lpfc-IOCB free-list and prepare the IOCB with the parameters
   * passed into the routine for discovery state machine to issue an Extended
   * Link Service (ELS) commands. It is a generic lpfc-IOCB allocation
   * and preparation routine that is used by all the discovery state machine
   * routines and the ELS command-specific fields will be later set up by
   * the individual discovery machine routines after calling this routine
   * allocating and preparing a generic IOCB data structure. It fills in the
   * Buffer Descriptor Entries (BDEs), allocates buffers for both command
   * payload and response payload (if expected). The reference count on the
   * ndlp is incremented by 1 and the reference to the ndlp is put into
   * context1 of the IOCB data structure for this IOCB to hold the ndlp
   * reference for the command's callback function to access later.
   *
   * Return code
   *   Pointer to the newly allocated/prepared els iocb data structure
   *   NULL - when els iocb data structure allocation/preparation failed
   **/
  struct lpfc_iocbq *
  lpfc_prep_els_iocb(struct lpfc_vport *vport, uint8_t expectRsp,
  		   uint16_t cmdSize, uint8_t retry,
  		   struct lpfc_nodelist *ndlp, uint32_t did,
  		   uint32_t elscmd)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_iocbq *elsiocb;
  	struct lpfc_dmabuf *pcmd, *prsp, *pbuflist;
  	struct ulp_bde64 *bpl;
  	IOCB_t *icmd;
  
  
  	if (!lpfc_is_link_up(phba))
  		return NULL;
  
  	/* Allocate buffer for  command iocb */
  	elsiocb = lpfc_sli_get_iocbq(phba);
  
  	if (elsiocb == NULL)
  		return NULL;
  
  	/*
  	 * If this command is for fabric controller and HBA running
  	 * in FIP mode send FLOGI, FDISC and LOGO as FIP frames.
  	 */
  	if ((did == Fabric_DID) &&
  		(phba->hba_flag & HBA_FIP_SUPPORT) &&
  		((elscmd == ELS_CMD_FLOGI) ||
  		 (elscmd == ELS_CMD_FDISC) ||
  		 (elscmd == ELS_CMD_LOGO)))
  		switch (elscmd) {
  		case ELS_CMD_FLOGI:
  		elsiocb->iocb_flag |=
  			((LPFC_ELS_ID_FLOGI << LPFC_FIP_ELS_ID_SHIFT)
  					& LPFC_FIP_ELS_ID_MASK);
  		break;
  		case ELS_CMD_FDISC:
  		elsiocb->iocb_flag |=
  			((LPFC_ELS_ID_FDISC << LPFC_FIP_ELS_ID_SHIFT)
  					& LPFC_FIP_ELS_ID_MASK);
  		break;
  		case ELS_CMD_LOGO:
  		elsiocb->iocb_flag |=
  			((LPFC_ELS_ID_LOGO << LPFC_FIP_ELS_ID_SHIFT)
  					& LPFC_FIP_ELS_ID_MASK);
  		break;
  		}
  	else
  		elsiocb->iocb_flag &= ~LPFC_FIP_ELS_ID_MASK;
  
  	icmd = &elsiocb->iocb;
  
  	/* fill in BDEs for command */
  	/* Allocate buffer for command payload */
  	pcmd = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
  	if (pcmd)
  		pcmd->virt = lpfc_mbuf_alloc(phba, MEM_PRI, &pcmd->phys);
  	if (!pcmd || !pcmd->virt)
  		goto els_iocb_free_pcmb_exit;
  
  	INIT_LIST_HEAD(&pcmd->list);
  
  	/* Allocate buffer for response payload */
  	if (expectRsp) {
  		prsp = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
  		if (prsp)
  			prsp->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
  						     &prsp->phys);
  		if (!prsp || !prsp->virt)
  			goto els_iocb_free_prsp_exit;
  		INIT_LIST_HEAD(&prsp->list);
  	} else
  		prsp = NULL;
  
  	/* Allocate buffer for Buffer ptr list */
  	pbuflist = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
  	if (pbuflist)
  		pbuflist->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
  						 &pbuflist->phys);
  	if (!pbuflist || !pbuflist->virt)
  		goto els_iocb_free_pbuf_exit;
  
  	INIT_LIST_HEAD(&pbuflist->list);
  
  	if (expectRsp) {
  		icmd->un.elsreq64.bdl.addrHigh = putPaddrHigh(pbuflist->phys);
  		icmd->un.elsreq64.bdl.addrLow = putPaddrLow(pbuflist->phys);
  		icmd->un.elsreq64.bdl.bdeFlags = BUFF_TYPE_BLP_64;
  		icmd->un.elsreq64.bdl.bdeSize = (2 * sizeof(struct ulp_bde64));
  
  		icmd->un.elsreq64.remoteID = did;		/* DID */
  		icmd->ulpCommand = CMD_ELS_REQUEST64_CR;
  		if (elscmd == ELS_CMD_FLOGI)
  			icmd->ulpTimeout = FF_DEF_RATOV * 2;
  		else if (elscmd == ELS_CMD_LOGO)
  			icmd->ulpTimeout = phba->fc_ratov;
  		else
  			icmd->ulpTimeout = phba->fc_ratov * 2;
  	} else {
  		icmd->un.xseq64.bdl.addrHigh = putPaddrHigh(pbuflist->phys);
  		icmd->un.xseq64.bdl.addrLow = putPaddrLow(pbuflist->phys);
  		icmd->un.xseq64.bdl.bdeFlags = BUFF_TYPE_BLP_64;
  		icmd->un.xseq64.bdl.bdeSize = sizeof(struct ulp_bde64);
  		icmd->un.xseq64.xmit_els_remoteID = did;	/* DID */
  		icmd->ulpCommand = CMD_XMIT_ELS_RSP64_CX;
  	}
  	icmd->ulpBdeCount = 1;
  	icmd->ulpLe = 1;
  	icmd->ulpClass = CLASS3;
  
  	/*
  	 * If we have NPIV enabled, we want to send ELS traffic by VPI.
  	 * For SLI4, since the driver controls VPIs we also want to include
  	 * all ELS pt2pt protocol traffic as well.
  	 */
  	if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) ||
  		((phba->sli_rev == LPFC_SLI_REV4) &&
  		    (vport->fc_flag & FC_PT2PT))) {
  
  		if (expectRsp) {
  			icmd->un.elsreq64.myID = vport->fc_myDID;
  
  			/* For ELS_REQUEST64_CR, use the VPI by default */
  			icmd->ulpContext = phba->vpi_ids[vport->vpi];
  		}
  
  		icmd->ulpCt_h = 0;
  		/* The CT field must be 0=INVALID_RPI for the ECHO cmd */
  		if (elscmd == ELS_CMD_ECHO)
  			icmd->ulpCt_l = 0; /* context = invalid RPI */
  		else
  			icmd->ulpCt_l = 1; /* context = VPI */
  	}
  
  	bpl = (struct ulp_bde64 *) pbuflist->virt;
  	bpl->addrLow = le32_to_cpu(putPaddrLow(pcmd->phys));
  	bpl->addrHigh = le32_to_cpu(putPaddrHigh(pcmd->phys));
  	bpl->tus.f.bdeSize = cmdSize;
  	bpl->tus.f.bdeFlags = 0;
  	bpl->tus.w = le32_to_cpu(bpl->tus.w);
  
  	if (expectRsp) {
  		bpl++;
  		bpl->addrLow = le32_to_cpu(putPaddrLow(prsp->phys));
  		bpl->addrHigh = le32_to_cpu(putPaddrHigh(prsp->phys));
  		bpl->tus.f.bdeSize = FCELSSIZE;
  		bpl->tus.f.bdeFlags = BUFF_TYPE_BDE_64;
  		bpl->tus.w = le32_to_cpu(bpl->tus.w);
  	}
  
  	/* prevent preparing iocb with NULL ndlp reference */
  	elsiocb->context1 = lpfc_nlp_get(ndlp);
  	if (!elsiocb->context1)
  		goto els_iocb_free_pbuf_exit;
  	elsiocb->context2 = pcmd;
  	elsiocb->context3 = pbuflist;
  	elsiocb->retry = retry;
  	elsiocb->vport = vport;
  	elsiocb->drvrTimeout = (phba->fc_ratov << 1) + LPFC_DRVR_TIMEOUT;
  
  	if (prsp) {
  		list_add(&prsp->list, &pcmd->list);
  	}
  	if (expectRsp) {
  		/* Xmit ELS command <elsCmd> to remote NPORT <did> */
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  				 "0116 Xmit ELS command x%x to remote "
  				 "NPORT x%x I/O tag: x%x, port state:x%x "
  				 "rpi x%x fc_flag:x%x\n",
  				 elscmd, did, elsiocb->iotag,
  				 vport->port_state, ndlp->nlp_rpi,
  				 vport->fc_flag);
  	} else {
  		/* Xmit ELS response <elsCmd> to remote NPORT <did> */
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  				 "0117 Xmit ELS response x%x to remote "
  				 "NPORT x%x I/O tag: x%x, size: x%x "
  				 "port_state x%x  rpi x%x fc_flag x%x\n",
  				 elscmd, ndlp->nlp_DID, elsiocb->iotag,
  				 cmdSize, vport->port_state,
  				 ndlp->nlp_rpi, vport->fc_flag);
  	}
  	return elsiocb;
  
  els_iocb_free_pbuf_exit:
  	if (expectRsp)
  		lpfc_mbuf_free(phba, prsp->virt, prsp->phys);
  	kfree(pbuflist);
  
  els_iocb_free_prsp_exit:
  	lpfc_mbuf_free(phba, pcmd->virt, pcmd->phys);
  	kfree(prsp);
  
  els_iocb_free_pcmb_exit:
  	kfree(pcmd);
  	lpfc_sli_release_iocbq(phba, elsiocb);
  	return NULL;
  }
  
  /**
   * lpfc_issue_fabric_reglogin - Issue fabric registration login for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine issues a fabric registration login for a @vport. An
   * active ndlp node with Fabric_DID must already exist for this @vport.
   * The routine invokes two mailbox commands to carry out fabric registration
   * login through the HBA firmware: the first mailbox command requests the
   * HBA to perform link configuration for the @vport; and the second mailbox
   * command requests the HBA to perform the actual fabric registration login
   * with the @vport.
   *
   * Return code
   *   0 - successfully issued fabric registration login for @vport
   *   -ENXIO -- failed to issue fabric registration login for @vport
   **/
  int
  lpfc_issue_fabric_reglogin(struct lpfc_vport *vport)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	LPFC_MBOXQ_t *mbox;
  	struct lpfc_dmabuf *mp;
  	struct lpfc_nodelist *ndlp;
  	struct serv_parm *sp;
  	int rc;
  	int err = 0;
  
  	sp = &phba->fc_fabparam;
  	ndlp = lpfc_findnode_did(vport, Fabric_DID);
  	if (!ndlp || !NLP_CHK_NODE_ACT(ndlp)) {
  		err = 1;
  		goto fail;
  	}
  
  	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  	if (!mbox) {
  		err = 2;
  		goto fail;
  	}
  
  	vport->port_state = LPFC_FABRIC_CFG_LINK;
  	lpfc_config_link(phba, mbox);
  	mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
  	mbox->vport = vport;
  
  	rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
  	if (rc == MBX_NOT_FINISHED) {
  		err = 3;
  		goto fail_free_mbox;
  	}
  
  	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  	if (!mbox) {
  		err = 4;
  		goto fail;
  	}
  	rc = lpfc_reg_rpi(phba, vport->vpi, Fabric_DID, (uint8_t *)sp, mbox,
  			  ndlp->nlp_rpi);
  	if (rc) {
  		err = 5;
  		goto fail_free_mbox;
  	}
  
  	mbox->mbox_cmpl = lpfc_mbx_cmpl_fabric_reg_login;
  	mbox->vport = vport;
  	/* increment the reference count on ndlp to hold reference
  	 * for the callback routine.
  	 */
  	mbox->ctx_ndlp = lpfc_nlp_get(ndlp);
  
  	rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
  	if (rc == MBX_NOT_FINISHED) {
  		err = 6;
  		goto fail_issue_reg_login;
  	}
  
  	return 0;
  
  fail_issue_reg_login:
  	/* decrement the reference count on ndlp just incremented
  	 * for the failed mbox command.
  	 */
  	lpfc_nlp_put(ndlp);
  	mp = (struct lpfc_dmabuf *)mbox->ctx_buf;
  	lpfc_mbuf_free(phba, mp->virt, mp->phys);
  	kfree(mp);
  fail_free_mbox:
  	mempool_free(mbox, phba->mbox_mem_pool);
  
  fail:
  	lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  	lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  		"0249 Cannot issue Register Fabric login: Err %d\n", err);
  	return -ENXIO;
  }
  
  /**
   * lpfc_issue_reg_vfi - Register VFI for this vport's fabric login
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine issues a REG_VFI mailbox for the vfi, vpi, fcfi triplet for
   * the @vport. This mailbox command is necessary for SLI4 port only.
   *
   * Return code
   *   0 - successfully issued REG_VFI for @vport
   *   A failure code otherwise.
   **/
  int
  lpfc_issue_reg_vfi(struct lpfc_vport *vport)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	LPFC_MBOXQ_t *mboxq = NULL;
  	struct lpfc_nodelist *ndlp;
  	struct lpfc_dmabuf *dmabuf = NULL;
  	int rc = 0;
  
  	/* move forward in case of SLI4 FC port loopback test and pt2pt mode */
  	if ((phba->sli_rev == LPFC_SLI_REV4) &&
  	    !(phba->link_flag & LS_LOOPBACK_MODE) &&
  	    !(vport->fc_flag & FC_PT2PT)) {
  		ndlp = lpfc_findnode_did(vport, Fabric_DID);
  		if (!ndlp || !NLP_CHK_NODE_ACT(ndlp)) {
  			rc = -ENODEV;
  			goto fail;
  		}
  	}
  
  	mboxq = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  	if (!mboxq) {
  		rc = -ENOMEM;
  		goto fail;
  	}
  
  	/* Supply CSP's only if we are fabric connect or pt-to-pt connect */
  	if ((vport->fc_flag & FC_FABRIC) || (vport->fc_flag & FC_PT2PT)) {
  		dmabuf = kzalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
  		if (!dmabuf) {
  			rc = -ENOMEM;
  			goto fail;
  		}
  		dmabuf->virt = lpfc_mbuf_alloc(phba, MEM_PRI, &dmabuf->phys);
  		if (!dmabuf->virt) {
  			rc = -ENOMEM;
  			goto fail;
  		}
  		memcpy(dmabuf->virt, &phba->fc_fabparam,
  		       sizeof(struct serv_parm));
  	}
  
  	vport->port_state = LPFC_FABRIC_CFG_LINK;
  	if (dmabuf)
  		lpfc_reg_vfi(mboxq, vport, dmabuf->phys);
  	else
  		lpfc_reg_vfi(mboxq, vport, 0);
  
  	mboxq->mbox_cmpl = lpfc_mbx_cmpl_reg_vfi;
  	mboxq->vport = vport;
  	mboxq->ctx_buf = dmabuf;
  	rc = lpfc_sli_issue_mbox(phba, mboxq, MBX_NOWAIT);
  	if (rc == MBX_NOT_FINISHED) {
  		rc = -ENXIO;
  		goto fail;
  	}
  	return 0;
  
  fail:
  	if (mboxq)
  		mempool_free(mboxq, phba->mbox_mem_pool);
  	if (dmabuf) {
  		if (dmabuf->virt)
  			lpfc_mbuf_free(phba, dmabuf->virt, dmabuf->phys);
  		kfree(dmabuf);
  	}
  
  	lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  	lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  		"0289 Issue Register VFI failed: Err %d\n", rc);
  	return rc;
  }
  
  /**
   * lpfc_issue_unreg_vfi - Unregister VFI for this vport's fabric login
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine issues a UNREG_VFI mailbox with the vfi, vpi, fcfi triplet for
   * the @vport. This mailbox command is necessary for SLI4 port only.
   *
   * Return code
   *   0 - successfully issued REG_VFI for @vport
   *   A failure code otherwise.
   **/
  int
  lpfc_issue_unreg_vfi(struct lpfc_vport *vport)
  {
  	struct lpfc_hba *phba = vport->phba;
  	struct Scsi_Host *shost;
  	LPFC_MBOXQ_t *mboxq;
  	int rc;
  
  	mboxq = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  	if (!mboxq) {
  		lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY|LOG_MBOX,
  				"2556 UNREG_VFI mbox allocation failed"
  				"HBA state x%x\n", phba->pport->port_state);
  		return -ENOMEM;
  	}
  
  	lpfc_unreg_vfi(mboxq, vport);
  	mboxq->vport = vport;
  	mboxq->mbox_cmpl = lpfc_unregister_vfi_cmpl;
  
  	rc = lpfc_sli_issue_mbox(phba, mboxq, MBX_NOWAIT);
  	if (rc == MBX_NOT_FINISHED) {
  		lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY|LOG_MBOX,
  				"2557 UNREG_VFI issue mbox failed rc x%x "
  				"HBA state x%x\n",
  				rc, phba->pport->port_state);
  		mempool_free(mboxq, phba->mbox_mem_pool);
  		return -EIO;
  	}
  
  	shost = lpfc_shost_from_vport(vport);
  	spin_lock_irq(shost->host_lock);
  	vport->fc_flag &= ~FC_VFI_REGISTERED;
  	spin_unlock_irq(shost->host_lock);
  	return 0;
  }
  
  /**
   * lpfc_check_clean_addr_bit - Check whether assigned FCID is clean.
   * @vport: pointer to a host virtual N_Port data structure.
   * @sp: pointer to service parameter data structure.
   *
   * This routine is called from FLOGI/FDISC completion handler functions.
   * lpfc_check_clean_addr_bit return 1 when FCID/Fabric portname/ Fabric
   * node nodename is changed in the completion service parameter else return
   * 0. This function also set flag in the vport data structure to delay
   * NP_Port discovery after the FLOGI/FDISC completion if Clean address bit
   * in FLOGI/FDISC response is cleared and FCID/Fabric portname/ Fabric
   * node nodename is changed in the completion service parameter.
   *
   * Return code
   *   0 - FCID and Fabric Nodename and Fabric portname is not changed.
   *   1 - FCID or Fabric Nodename or Fabric portname is changed.
   *
   **/
  static uint8_t
  lpfc_check_clean_addr_bit(struct lpfc_vport *vport,
  		struct serv_parm *sp)
  {
  	struct lpfc_hba *phba = vport->phba;
  	uint8_t fabric_param_changed = 0;
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  
  	if ((vport->fc_prevDID != vport->fc_myDID) ||
  		memcmp(&vport->fabric_portname, &sp->portName,
  			sizeof(struct lpfc_name)) ||
  		memcmp(&vport->fabric_nodename, &sp->nodeName,
  			sizeof(struct lpfc_name)) ||
  		(vport->vport_flag & FAWWPN_PARAM_CHG)) {
  		fabric_param_changed = 1;
  		vport->vport_flag &= ~FAWWPN_PARAM_CHG;
  	}
  	/*
  	 * Word 1 Bit 31 in common service parameter is overloaded.
  	 * Word 1 Bit 31 in FLOGI request is multiple NPort request
  	 * Word 1 Bit 31 in FLOGI response is clean address bit
  	 *
  	 * If fabric parameter is changed and clean address bit is
  	 * cleared delay nport discovery if
  	 * - vport->fc_prevDID != 0 (not initial discovery) OR
  	 * - lpfc_delay_discovery module parameter is set.
  	 */
  	if (fabric_param_changed && !sp->cmn.clean_address_bit &&
  	    (vport->fc_prevDID || phba->cfg_delay_discovery)) {
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag |= FC_DISC_DELAYED;
  		spin_unlock_irq(shost->host_lock);
  	}
  
  	return fabric_param_changed;
  }
  
  
  /**
   * lpfc_cmpl_els_flogi_fabric - Completion function for flogi to a fabric port
   * @vport: pointer to a host virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   * @sp: pointer to service parameter data structure.
   * @irsp: pointer to the IOCB within the lpfc response IOCB.
   *
   * This routine is invoked by the lpfc_cmpl_els_flogi() completion callback
   * function to handle the completion of a Fabric Login (FLOGI) into a fabric
   * port in a fabric topology. It properly sets up the parameters to the @ndlp
   * from the IOCB response. It also check the newly assigned N_Port ID to the
   * @vport against the previously assigned N_Port ID. If it is different from
   * the previously assigned Destination ID (DID), the lpfc_unreg_rpi() routine
   * is invoked on all the remaining nodes with the @vport to unregister the
   * Remote Port Indicators (RPIs). Finally, the lpfc_issue_fabric_reglogin()
   * is invoked to register login to the fabric.
   *
   * Return code
   *   0 - Success (currently, always return 0)
   **/
  static int
  lpfc_cmpl_els_flogi_fabric(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
  			   struct serv_parm *sp, IOCB_t *irsp)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_nodelist *np;
  	struct lpfc_nodelist *next_np;
  	uint8_t fabric_param_changed;
  
  	spin_lock_irq(shost->host_lock);
  	vport->fc_flag |= FC_FABRIC;
  	spin_unlock_irq(shost->host_lock);
  
  	phba->fc_edtov = be32_to_cpu(sp->cmn.e_d_tov);
  	if (sp->cmn.edtovResolution)	/* E_D_TOV ticks are in nanoseconds */
  		phba->fc_edtov = (phba->fc_edtov + 999999) / 1000000;
  
  	phba->fc_edtovResol = sp->cmn.edtovResolution;
  	phba->fc_ratov = (be32_to_cpu(sp->cmn.w2.r_a_tov) + 999) / 1000;
  
  	if (phba->fc_topology == LPFC_TOPOLOGY_LOOP) {
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag |= FC_PUBLIC_LOOP;
  		spin_unlock_irq(shost->host_lock);
  	}
  
  	vport->fc_myDID = irsp->un.ulpWord[4] & Mask_DID;
  	memcpy(&ndlp->nlp_portname, &sp->portName, sizeof(struct lpfc_name));
  	memcpy(&ndlp->nlp_nodename, &sp->nodeName, sizeof(struct lpfc_name));
  	ndlp->nlp_class_sup = 0;
  	if (sp->cls1.classValid)
  		ndlp->nlp_class_sup |= FC_COS_CLASS1;
  	if (sp->cls2.classValid)
  		ndlp->nlp_class_sup |= FC_COS_CLASS2;
  	if (sp->cls3.classValid)
  		ndlp->nlp_class_sup |= FC_COS_CLASS3;
  	if (sp->cls4.classValid)
  		ndlp->nlp_class_sup |= FC_COS_CLASS4;
  	ndlp->nlp_maxframe = ((sp->cmn.bbRcvSizeMsb & 0x0F) << 8) |
  				sp->cmn.bbRcvSizeLsb;
  
  	fabric_param_changed = lpfc_check_clean_addr_bit(vport, sp);
  	if (fabric_param_changed) {
  		/* Reset FDMI attribute masks based on config parameter */
  		if (phba->cfg_enable_SmartSAN ||
  		    (phba->cfg_fdmi_on == LPFC_FDMI_SUPPORT)) {
  			/* Setup appropriate attribute masks */
  			vport->fdmi_hba_mask = LPFC_FDMI2_HBA_ATTR;
  			if (phba->cfg_enable_SmartSAN)
  				vport->fdmi_port_mask = LPFC_FDMI2_SMART_ATTR;
  			else
  				vport->fdmi_port_mask = LPFC_FDMI2_PORT_ATTR;
  		} else {
  			vport->fdmi_hba_mask = 0;
  			vport->fdmi_port_mask = 0;
  		}
  
  	}
  	memcpy(&vport->fabric_portname, &sp->portName,
  			sizeof(struct lpfc_name));
  	memcpy(&vport->fabric_nodename, &sp->nodeName,
  			sizeof(struct lpfc_name));
  	memcpy(&phba->fc_fabparam, sp, sizeof(struct serv_parm));
  
  	if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) {
  		if (sp->cmn.response_multiple_NPort) {
  			lpfc_printf_vlog(vport, KERN_WARNING,
  					 LOG_ELS | LOG_VPORT,
  					 "1816 FLOGI NPIV supported, "
  					 "response data 0x%x\n",
  					 sp->cmn.response_multiple_NPort);
  			spin_lock_irq(&phba->hbalock);
  			phba->link_flag |= LS_NPIV_FAB_SUPPORTED;
  			spin_unlock_irq(&phba->hbalock);
  		} else {
  			/* Because we asked f/w for NPIV it still expects us
  			to call reg_vnpid atleast for the physcial host */
  			lpfc_printf_vlog(vport, KERN_WARNING,
  					 LOG_ELS | LOG_VPORT,
  					 "1817 Fabric does not support NPIV "
  					 "- configuring single port mode.\n");
  			spin_lock_irq(&phba->hbalock);
  			phba->link_flag &= ~LS_NPIV_FAB_SUPPORTED;
  			spin_unlock_irq(&phba->hbalock);
  		}
  	}
  
  	/*
  	 * For FC we need to do some special processing because of the SLI
  	 * Port's default settings of the Common Service Parameters.
  	 */
  	if ((phba->sli_rev == LPFC_SLI_REV4) &&
  	    (phba->sli4_hba.lnk_info.lnk_tp == LPFC_LNK_TYPE_FC)) {
  		/* If physical FC port changed, unreg VFI and ALL VPIs / RPIs */
  		if (fabric_param_changed)
  			lpfc_unregister_fcf_prep(phba);
  
  		/* This should just update the VFI CSPs*/
  		if (vport->fc_flag & FC_VFI_REGISTERED)
  			lpfc_issue_reg_vfi(vport);
  	}
  
  	if (fabric_param_changed &&
  		!(vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)) {
  
  		/* If our NportID changed, we need to ensure all
  		 * remaining NPORTs get unreg_login'ed.
  		 */
  		list_for_each_entry_safe(np, next_np,
  					&vport->fc_nodes, nlp_listp) {
  			if (!NLP_CHK_NODE_ACT(np))
  				continue;
  			if ((np->nlp_state != NLP_STE_NPR_NODE) ||
  				   !(np->nlp_flag & NLP_NPR_ADISC))
  				continue;
  			spin_lock_irq(shost->host_lock);
  			np->nlp_flag &= ~NLP_NPR_ADISC;
  			spin_unlock_irq(shost->host_lock);
  			lpfc_unreg_rpi(vport, np);
  		}
  		lpfc_cleanup_pending_mbox(vport);
  
  		if (phba->sli_rev == LPFC_SLI_REV4) {
  			lpfc_sli4_unreg_all_rpis(vport);
  			lpfc_mbx_unreg_vpi(vport);
  			spin_lock_irq(shost->host_lock);
  			vport->fc_flag |= FC_VPORT_NEEDS_INIT_VPI;
  			spin_unlock_irq(shost->host_lock);
  		}
  
  		/*
  		 * For SLI3 and SLI4, the VPI needs to be reregistered in
  		 * response to this fabric parameter change event.
  		 */
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
  		spin_unlock_irq(shost->host_lock);
  	} else if ((phba->sli_rev == LPFC_SLI_REV4) &&
  		!(vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)) {
  			/*
  			 * Driver needs to re-reg VPI in order for f/w
  			 * to update the MAC address.
  			 */
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
  			lpfc_register_new_vport(phba, vport, ndlp);
  			return 0;
  	}
  
  	if (phba->sli_rev < LPFC_SLI_REV4) {
  		lpfc_nlp_set_state(vport, ndlp, NLP_STE_REG_LOGIN_ISSUE);
  		if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED &&
  		    vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)
  			lpfc_register_new_vport(phba, vport, ndlp);
  		else
  			lpfc_issue_fabric_reglogin(vport);
  	} else {
  		ndlp->nlp_type |= NLP_FABRIC;
  		lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
  		if ((!(vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)) &&
  			(vport->vpi_state & LPFC_VPI_REGISTERED)) {
  			lpfc_start_fdiscs(phba);
  			lpfc_do_scr_ns_plogi(phba, vport);
  		} else if (vport->fc_flag & FC_VFI_REGISTERED)
  			lpfc_issue_init_vpi(vport);
  		else {
  			lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  					"3135 Need register VFI: (x%x/%x)\n",
  					vport->fc_prevDID, vport->fc_myDID);
  			lpfc_issue_reg_vfi(vport);
  		}
  	}
  	return 0;
  }
  
  /**
   * lpfc_cmpl_els_flogi_nport - Completion function for flogi to an N_Port
   * @vport: pointer to a host virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   * @sp: pointer to service parameter data structure.
   *
   * This routine is invoked by the lpfc_cmpl_els_flogi() completion callback
   * function to handle the completion of a Fabric Login (FLOGI) into an N_Port
   * in a point-to-point topology. First, the @vport's N_Port Name is compared
   * with the received N_Port Name: if the @vport's N_Port Name is greater than
   * the received N_Port Name lexicographically, this node shall assign local
   * N_Port ID (PT2PT_LocalID: 1) and remote N_Port ID (PT2PT_RemoteID: 2) and
   * will send out Port Login (PLOGI) with the N_Port IDs assigned. Otherwise,
   * this node shall just wait for the remote node to issue PLOGI and assign
   * N_Port IDs.
   *
   * Return code
   *   0 - Success
   *   -ENXIO - Fail
   **/
  static int
  lpfc_cmpl_els_flogi_nport(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
  			  struct serv_parm *sp)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	LPFC_MBOXQ_t *mbox;
  	int rc;
  
  	spin_lock_irq(shost->host_lock);
  	vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
  	vport->fc_flag |= FC_PT2PT;
  	spin_unlock_irq(shost->host_lock);
  
  	/* If we are pt2pt with another NPort, force NPIV off! */
  	phba->sli3_options &= ~LPFC_SLI3_NPIV_ENABLED;
  
  	/* If physical FC port changed, unreg VFI and ALL VPIs / RPIs */
  	if ((phba->sli_rev == LPFC_SLI_REV4) && phba->fc_topology_changed) {
  		lpfc_unregister_fcf_prep(phba);
  
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag &= ~FC_VFI_REGISTERED;
  		spin_unlock_irq(shost->host_lock);
  		phba->fc_topology_changed = 0;
  	}
  
  	rc = memcmp(&vport->fc_portname, &sp->portName,
  		    sizeof(vport->fc_portname));
  
  	if (rc >= 0) {
  		/* This side will initiate the PLOGI */
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag |= FC_PT2PT_PLOGI;
  		spin_unlock_irq(shost->host_lock);
  
  		/*
  		 * N_Port ID cannot be 0, set our Id to LocalID
  		 * the other side will be RemoteID.
  		 */
  
  		/* not equal */
  		if (rc)
  			vport->fc_myDID = PT2PT_LocalID;
  
  		/* Decrement ndlp reference count indicating that ndlp can be
  		 * safely released when other references to it are done.
  		 */
  		lpfc_nlp_put(ndlp);
  
  		ndlp = lpfc_findnode_did(vport, PT2PT_RemoteID);
  		if (!ndlp) {
  			/*
  			 * Cannot find existing Fabric ndlp, so allocate a
  			 * new one
  			 */
  			ndlp = lpfc_nlp_init(vport, PT2PT_RemoteID);
  			if (!ndlp)
  				goto fail;
  		} else if (!NLP_CHK_NODE_ACT(ndlp)) {
  			ndlp = lpfc_enable_node(vport, ndlp,
  						NLP_STE_UNUSED_NODE);
  			if(!ndlp)
  				goto fail;
  		}
  
  		memcpy(&ndlp->nlp_portname, &sp->portName,
  		       sizeof(struct lpfc_name));
  		memcpy(&ndlp->nlp_nodename, &sp->nodeName,
  		       sizeof(struct lpfc_name));
  		/* Set state will put ndlp onto node list if not already done */
  		lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
  		spin_lock_irq(shost->host_lock);
  		ndlp->nlp_flag |= NLP_NPR_2B_DISC;
  		spin_unlock_irq(shost->host_lock);
  
  		mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  		if (!mbox)
  			goto fail;
  
  		lpfc_config_link(phba, mbox);
  
  		mbox->mbox_cmpl = lpfc_mbx_cmpl_local_config_link;
  		mbox->vport = vport;
  		rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
  		if (rc == MBX_NOT_FINISHED) {
  			mempool_free(mbox, phba->mbox_mem_pool);
  			goto fail;
  		}
  	} else {
  		/* This side will wait for the PLOGI, decrement ndlp reference
  		 * count indicating that ndlp can be released when other
  		 * references to it are done.
  		 */
  		lpfc_nlp_put(ndlp);
  
  		/* Start discovery - this should just do CLEAR_LA */
  		lpfc_disc_start(vport);
  	}
  
  	return 0;
  fail:
  	return -ENXIO;
  }
  
  /**
   * lpfc_cmpl_els_flogi - Completion callback function for flogi
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the top-level completion callback function for issuing
   * a Fabric Login (FLOGI) command. If the response IOCB reported error,
   * the lpfc_els_retry() routine shall be invoked to retry the FLOGI. If
   * retry has been made (either immediately or delayed with lpfc_els_retry()
   * returning 1), the command IOCB will be released and function returned.
   * If the retry attempt has been given up (possibly reach the maximum
   * number of retries), one additional decrement of ndlp reference shall be
   * invoked before going out after releasing the command IOCB. This will
   * actually release the remote node (Note, lpfc_els_free_iocb() will also
   * invoke one decrement of ndlp reference count). If no error reported in
   * the IOCB status, the command Port ID field is used to determine whether
   * this is a point-to-point topology or a fabric topology: if the Port ID
   * field is assigned, it is a fabric topology; otherwise, it is a
   * point-to-point topology. The routine lpfc_cmpl_els_flogi_fabric() or
   * lpfc_cmpl_els_flogi_nport() shall be invoked accordingly to handle the
   * specific topology completion conditions.
   **/
  static void
  lpfc_cmpl_els_flogi(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		    struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_vport *vport = cmdiocb->vport;
  	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
  	IOCB_t *irsp = &rspiocb->iocb;
  	struct lpfc_nodelist *ndlp = cmdiocb->context1;
  	struct lpfc_dmabuf *pcmd = cmdiocb->context2, *prsp;
  	struct serv_parm *sp;
  	uint16_t fcf_index;
  	int rc;
  
  	/* Check to see if link went down during discovery */
  	if (lpfc_els_chk_latt(vport)) {
  		/* One additional decrement on node reference count to
  		 * trigger the release of the node
  		 */
  		lpfc_nlp_put(ndlp);
  		goto out;
  	}
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"FLOGI cmpl:      status:x%x/x%x state:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4],
  		vport->port_state);
  
  	if (irsp->ulpStatus) {
  		/*
  		 * In case of FIP mode, perform roundrobin FCF failover
  		 * due to new FCF discovery
  		 */
  		if ((phba->hba_flag & HBA_FIP_SUPPORT) &&
  		    (phba->fcf.fcf_flag & FCF_DISCOVERY)) {
  			if (phba->link_state < LPFC_LINK_UP)
  				goto stop_rr_fcf_flogi;
  			if ((phba->fcoe_cvl_eventtag_attn ==
  			     phba->fcoe_cvl_eventtag) &&
  			    (irsp->ulpStatus == IOSTAT_LOCAL_REJECT) &&
  			    ((irsp->un.ulpWord[4] & IOERR_PARAM_MASK) ==
  			    IOERR_SLI_ABORTED))
  				goto stop_rr_fcf_flogi;
  			else
  				phba->fcoe_cvl_eventtag_attn =
  					phba->fcoe_cvl_eventtag;
  			lpfc_printf_log(phba, KERN_WARNING, LOG_FIP | LOG_ELS,
  					"2611 FLOGI failed on FCF (x%x), "
  					"status:x%x/x%x, tmo:x%x, perform "
  					"roundrobin FCF failover\n",
  					phba->fcf.current_rec.fcf_indx,
  					irsp->ulpStatus, irsp->un.ulpWord[4],
  					irsp->ulpTimeout);
  			lpfc_sli4_set_fcf_flogi_fail(phba,
  					phba->fcf.current_rec.fcf_indx);
  			fcf_index = lpfc_sli4_fcf_rr_next_index_get(phba);
  			rc = lpfc_sli4_fcf_rr_next_proc(vport, fcf_index);
  			if (rc)
  				goto out;
  		}
  
  stop_rr_fcf_flogi:
  		/* FLOGI failure */
  		if (!(irsp->ulpStatus == IOSTAT_LOCAL_REJECT &&
  		      ((irsp->un.ulpWord[4] & IOERR_PARAM_MASK) ==
  					IOERR_LOOP_OPEN_FAILURE)))
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  					"2858 FLOGI failure Status:x%x/x%x "
  					"TMO:x%x Data x%x x%x\n",
  					irsp->ulpStatus, irsp->un.ulpWord[4],
  					irsp->ulpTimeout, phba->hba_flag,
  					phba->fcf.fcf_flag);
  
  		/* Check for retry */
  		if (lpfc_els_retry(phba, cmdiocb, rspiocb))
  			goto out;
  
  		lpfc_printf_vlog(vport, KERN_WARNING, LOG_ELS,
  				 "0150 FLOGI failure Status:x%x/x%x "
  				 "xri x%x TMO:x%x\n",
  				 irsp->ulpStatus, irsp->un.ulpWord[4],
  				 cmdiocb->sli4_xritag, irsp->ulpTimeout);
  
  		/* If this is not a loop open failure, bail out */
  		if (!(irsp->ulpStatus == IOSTAT_LOCAL_REJECT &&
  		      ((irsp->un.ulpWord[4] & IOERR_PARAM_MASK) ==
  					IOERR_LOOP_OPEN_FAILURE)))
  			goto flogifail;
  
  		/* FLOGI failed, so there is no fabric */
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
  		spin_unlock_irq(shost->host_lock);
  
  		/* If private loop, then allow max outstanding els to be
  		 * LPFC_MAX_DISC_THREADS (32). Scanning in the case of no
  		 * alpa map would take too long otherwise.
  		 */
  		if (phba->alpa_map[0] == 0)
  			vport->cfg_discovery_threads = LPFC_MAX_DISC_THREADS;
  		if ((phba->sli_rev == LPFC_SLI_REV4) &&
  		    (!(vport->fc_flag & FC_VFI_REGISTERED) ||
  		     (vport->fc_prevDID != vport->fc_myDID) ||
  			phba->fc_topology_changed)) {
  			if (vport->fc_flag & FC_VFI_REGISTERED) {
  				if (phba->fc_topology_changed) {
  					lpfc_unregister_fcf_prep(phba);
  					spin_lock_irq(shost->host_lock);
  					vport->fc_flag &= ~FC_VFI_REGISTERED;
  					spin_unlock_irq(shost->host_lock);
  					phba->fc_topology_changed = 0;
  				} else {
  					lpfc_sli4_unreg_all_rpis(vport);
  				}
  			}
  
  			/* Do not register VFI if the driver aborted FLOGI */
  			if (!lpfc_error_lost_link(irsp))
  				lpfc_issue_reg_vfi(vport);
  			lpfc_nlp_put(ndlp);
  			goto out;
  		}
  		goto flogifail;
  	}
  	spin_lock_irq(shost->host_lock);
  	vport->fc_flag &= ~FC_VPORT_CVL_RCVD;
  	vport->fc_flag &= ~FC_VPORT_LOGO_RCVD;
  	spin_unlock_irq(shost->host_lock);
  
  	/*
  	 * The FLogI succeeded.  Sync the data for the CPU before
  	 * accessing it.
  	 */
  	prsp = list_get_first(&pcmd->list, struct lpfc_dmabuf, list);
  	if (!prsp)
  		goto out;
  	sp = prsp->virt + sizeof(uint32_t);
  
  	/* FLOGI completes successfully */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0101 FLOGI completes successfully, I/O tag:x%x, "
  			 "xri x%x Data: x%x x%x x%x x%x x%x %x\n",
  			 cmdiocb->iotag, cmdiocb->sli4_xritag,
  			 irsp->un.ulpWord[4], sp->cmn.e_d_tov,
  			 sp->cmn.w2.r_a_tov, sp->cmn.edtovResolution,
  			 vport->port_state, vport->fc_flag);
  
  	if (vport->port_state == LPFC_FLOGI) {
  		/*
  		 * If Common Service Parameters indicate Nport
  		 * we are point to point, if Fport we are Fabric.
  		 */
  		if (sp->cmn.fPort)
  			rc = lpfc_cmpl_els_flogi_fabric(vport, ndlp, sp, irsp);
  		else if (!(phba->hba_flag & HBA_FCOE_MODE))
  			rc = lpfc_cmpl_els_flogi_nport(vport, ndlp, sp);
  		else {
  			lpfc_printf_vlog(vport, KERN_ERR,
  				LOG_FIP | LOG_ELS,
  				"2831 FLOGI response with cleared Fabric "
  				"bit fcf_index 0x%x "
  				"Switch Name %02x%02x%02x%02x%02x%02x%02x%02x "
  				"Fabric Name "
  				"%02x%02x%02x%02x%02x%02x%02x%02x\n",
  				phba->fcf.current_rec.fcf_indx,
  				phba->fcf.current_rec.switch_name[0],
  				phba->fcf.current_rec.switch_name[1],
  				phba->fcf.current_rec.switch_name[2],
  				phba->fcf.current_rec.switch_name[3],
  				phba->fcf.current_rec.switch_name[4],
  				phba->fcf.current_rec.switch_name[5],
  				phba->fcf.current_rec.switch_name[6],
  				phba->fcf.current_rec.switch_name[7],
  				phba->fcf.current_rec.fabric_name[0],
  				phba->fcf.current_rec.fabric_name[1],
  				phba->fcf.current_rec.fabric_name[2],
  				phba->fcf.current_rec.fabric_name[3],
  				phba->fcf.current_rec.fabric_name[4],
  				phba->fcf.current_rec.fabric_name[5],
  				phba->fcf.current_rec.fabric_name[6],
  				phba->fcf.current_rec.fabric_name[7]);
  			lpfc_nlp_put(ndlp);
  			spin_lock_irq(&phba->hbalock);
  			phba->fcf.fcf_flag &= ~FCF_DISCOVERY;
  			phba->hba_flag &= ~(FCF_RR_INPROG | HBA_DEVLOSS_TMO);
  			spin_unlock_irq(&phba->hbalock);
  			phba->fcf.fcf_redisc_attempted = 0; /* reset */
  			goto out;
  		}
  		if (!rc) {
  			/* Mark the FCF discovery process done */
  			if (phba->hba_flag & HBA_FIP_SUPPORT)
  				lpfc_printf_vlog(vport, KERN_INFO, LOG_FIP |
  						LOG_ELS,
  						"2769 FLOGI to FCF (x%x) "
  						"completed successfully\n",
  						phba->fcf.current_rec.fcf_indx);
  			spin_lock_irq(&phba->hbalock);
  			phba->fcf.fcf_flag &= ~FCF_DISCOVERY;
  			phba->hba_flag &= ~(FCF_RR_INPROG | HBA_DEVLOSS_TMO);
  			spin_unlock_irq(&phba->hbalock);
  			phba->fcf.fcf_redisc_attempted = 0; /* reset */
  			goto out;
  		}
  	}
  
  flogifail:
  	spin_lock_irq(&phba->hbalock);
  	phba->fcf.fcf_flag &= ~FCF_DISCOVERY;
  	spin_unlock_irq(&phba->hbalock);
  
  	lpfc_nlp_put(ndlp);
  
  	if (!lpfc_error_lost_link(irsp)) {
  		/* FLOGI failed, so just use loop map to make discovery list */
  		lpfc_disc_list_loopmap(vport);
  
  		/* Start discovery */
  		lpfc_disc_start(vport);
  	} else if (((irsp->ulpStatus != IOSTAT_LOCAL_REJECT) ||
  			(((irsp->un.ulpWord[4] & IOERR_PARAM_MASK) !=
  			 IOERR_SLI_ABORTED) &&
  			((irsp->un.ulpWord[4] & IOERR_PARAM_MASK) !=
  			 IOERR_SLI_DOWN))) &&
  			(phba->link_state != LPFC_CLEAR_LA)) {
  		/* If FLOGI failed enable link interrupt. */
  		lpfc_issue_clear_la(phba, vport);
  	}
  out:
  	lpfc_els_free_iocb(phba, cmdiocb);
  }
  
  /**
   * lpfc_cmpl_els_link_down - Completion callback function for ELS command
   *                           aborted during a link down
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   */
  static void
  lpfc_cmpl_els_link_down(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  			struct lpfc_iocbq *rspiocb)
  {
  	IOCB_t *irsp;
  	uint32_t *pcmd;
  	uint32_t cmd;
  
  	pcmd = (uint32_t *)(((struct lpfc_dmabuf *)cmdiocb->context2)->virt);
  	cmd = *pcmd;
  	irsp = &rspiocb->iocb;
  
  	lpfc_printf_log(phba, KERN_INFO, LOG_ELS,
  			"6445 ELS completes after LINK_DOWN: "
  			" Status %x/%x cmd x%x flg x%x\n",
  			irsp->ulpStatus, irsp->un.ulpWord[4], cmd,
  			cmdiocb->iocb_flag);
  
  	if (cmdiocb->iocb_flag & LPFC_IO_FABRIC) {
  		cmdiocb->iocb_flag &= ~LPFC_IO_FABRIC;
  		atomic_dec(&phba->fabric_iocb_count);
  	}
  	lpfc_els_free_iocb(phba, cmdiocb);
  }
  
  /**
   * lpfc_issue_els_flogi - Issue an flogi iocb command for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   * @retry: number of retries to the command IOCB.
   *
   * This routine issues a Fabric Login (FLOGI) Request ELS command
   * for a @vport. The initiator service parameters are put into the payload
   * of the FLOGI Request IOCB and the top-level callback function pointer
   * to lpfc_cmpl_els_flogi() routine is put to the IOCB completion callback
   * function field. The lpfc_issue_fabric_iocb routine is invoked to send
   * out FLOGI ELS command with one outstanding fabric IOCB at a time.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the FLOGI ELS command.
   *
   * Return code
   *   0 - successfully issued flogi iocb for @vport
   *   1 - failed to issue flogi iocb for @vport
   **/
  static int
  lpfc_issue_els_flogi(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
  		     uint8_t retry)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	struct serv_parm *sp;
  	IOCB_t *icmd;
  	struct lpfc_iocbq *elsiocb;
  	struct lpfc_iocbq defer_flogi_acc;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	uint32_t tmo, did;
  	int rc;
  
  	cmdsize = (sizeof(uint32_t) + sizeof(struct serv_parm));
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_FLOGI);
  
  	if (!elsiocb)
  		return 1;
  
  	icmd = &elsiocb->iocb;
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	/* For FLOGI request, remainder of payload is service parameters */
  	*((uint32_t *) (pcmd)) = ELS_CMD_FLOGI;
  	pcmd += sizeof(uint32_t);
  	memcpy(pcmd, &vport->fc_sparam, sizeof(struct serv_parm));
  	sp = (struct serv_parm *) pcmd;
  
  	/* Setup CSPs accordingly for Fabric */
  	sp->cmn.e_d_tov = 0;
  	sp->cmn.w2.r_a_tov = 0;
  	sp->cmn.virtual_fabric_support = 0;
  	sp->cls1.classValid = 0;
  	if (sp->cmn.fcphLow < FC_PH3)
  		sp->cmn.fcphLow = FC_PH3;
  	if (sp->cmn.fcphHigh < FC_PH3)
  		sp->cmn.fcphHigh = FC_PH3;
  
  	if  (phba->sli_rev == LPFC_SLI_REV4) {
  		if (bf_get(lpfc_sli_intf_if_type, &phba->sli4_hba.sli_intf) ==
  		    LPFC_SLI_INTF_IF_TYPE_0) {
  			elsiocb->iocb.ulpCt_h = ((SLI4_CT_FCFI >> 1) & 1);
  			elsiocb->iocb.ulpCt_l = (SLI4_CT_FCFI & 1);
  			/* FLOGI needs to be 3 for WQE FCFI */
  			/* Set the fcfi to the fcfi we registered with */
  			elsiocb->iocb.ulpContext = phba->fcf.fcfi;
  		}
  		/* Can't do SLI4 class2 without support sequence coalescing */
  		sp->cls2.classValid = 0;
  		sp->cls2.seqDelivery = 0;
  	} else {
  		/* Historical, setting sequential-delivery bit for SLI3 */
  		sp->cls2.seqDelivery = (sp->cls2.classValid) ? 1 : 0;
  		sp->cls3.seqDelivery = (sp->cls3.classValid) ? 1 : 0;
  		if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) {
  			sp->cmn.request_multiple_Nport = 1;
  			/* For FLOGI, Let FLOGI rsp set the NPortID for VPI 0 */
  			icmd->ulpCt_h = 1;
  			icmd->ulpCt_l = 0;
  		} else
  			sp->cmn.request_multiple_Nport = 0;
  	}
  
  	if (phba->fc_topology != LPFC_TOPOLOGY_LOOP) {
  		icmd->un.elsreq64.myID = 0;
  		icmd->un.elsreq64.fl = 1;
  	}
  
  	tmo = phba->fc_ratov;
  	phba->fc_ratov = LPFC_DISC_FLOGI_TMO;
  	lpfc_set_disctmo(vport);
  	phba->fc_ratov = tmo;
  
  	phba->fc_stat.elsXmitFLOGI++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_flogi;
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue FLOGI:     opt:x%x",
  		phba->sli3_options, 0, 0);
  
  	rc = lpfc_issue_fabric_iocb(phba, elsiocb);
  
  	phba->hba_flag |= HBA_FLOGI_ISSUED;
  
  	/* Check for a deferred FLOGI ACC condition */
  	if (phba->defer_flogi_acc_flag) {
  		did = vport->fc_myDID;
  		vport->fc_myDID = Fabric_DID;
  
  		memset(&defer_flogi_acc, 0, sizeof(struct lpfc_iocbq));
  
  		defer_flogi_acc.iocb.ulpContext = phba->defer_flogi_acc_rx_id;
  		defer_flogi_acc.iocb.unsli3.rcvsli3.ox_id =
  						phba->defer_flogi_acc_ox_id;
  
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  				 "3354 Xmit deferred FLOGI ACC: rx_id: x%x,"
  				 " ox_id: x%x, hba_flag x%x\n",
  				 phba->defer_flogi_acc_rx_id,
  				 phba->defer_flogi_acc_ox_id, phba->hba_flag);
  
  		/* Send deferred FLOGI ACC */
  		lpfc_els_rsp_acc(vport, ELS_CMD_FLOGI, &defer_flogi_acc,
  				 ndlp, NULL);
  
  		phba->defer_flogi_acc_flag = false;
  
  		vport->fc_myDID = did;
  	}
  
  	if (rc == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_abort_flogi - Abort all outstanding flogi iocbs
   * @phba: pointer to lpfc hba data structure.
   *
   * This routine aborts all the outstanding Fabric Login (FLOGI) IOCBs
   * with a @phba. This routine walks all the outstanding IOCBs on the txcmplq
   * list and issues an abort IOCB commond on each outstanding IOCB that
   * contains a active Fabric_DID ndlp. Note that this function is to issue
   * the abort IOCB command on all the outstanding IOCBs, thus when this
   * function returns, it does not guarantee all the IOCBs are actually aborted.
   *
   * Return code
   *   0 - Successfully issued abort iocb on all outstanding flogis (Always 0)
   **/
  int
  lpfc_els_abort_flogi(struct lpfc_hba *phba)
  {
  	struct lpfc_sli_ring *pring;
  	struct lpfc_iocbq *iocb, *next_iocb;
  	struct lpfc_nodelist *ndlp;
  	IOCB_t *icmd;
  
  	/* Abort outstanding I/O on NPort <nlp_DID> */
  	lpfc_printf_log(phba, KERN_INFO, LOG_DISCOVERY,
  			"0201 Abort outstanding I/O on NPort x%x\n",
  			Fabric_DID);
  
  	pring = lpfc_phba_elsring(phba);
  	if (unlikely(!pring))
  		return -EIO;
  
  	/*
  	 * Check the txcmplq for an iocb that matches the nport the driver is
  	 * searching for.
  	 */
  	spin_lock_irq(&phba->hbalock);
  	list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq, list) {
  		icmd = &iocb->iocb;
  		if (icmd->ulpCommand == CMD_ELS_REQUEST64_CR) {
  			ndlp = (struct lpfc_nodelist *)(iocb->context1);
  			if (ndlp && NLP_CHK_NODE_ACT(ndlp) &&
  			    (ndlp->nlp_DID == Fabric_DID))
  				lpfc_sli_issue_abort_iotag(phba, pring, iocb);
  		}
  	}
  	spin_unlock_irq(&phba->hbalock);
  
  	return 0;
  }
  
  /**
   * lpfc_initial_flogi - Issue an initial fabric login for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine issues an initial Fabric Login (FLOGI) for the @vport
   * specified. It first searches the ndlp with the Fabric_DID (0xfffffe) from
   * the @vport's ndlp list. If no such ndlp found, it will create an ndlp and
   * put it into the @vport's ndlp list. If an inactive ndlp found on the list,
   * it will just be enabled and made active. The lpfc_issue_els_flogi() routine
   * is then invoked with the @vport and the ndlp to perform the FLOGI for the
   * @vport.
   *
   * Return code
   *   0 - failed to issue initial flogi for @vport
   *   1 - successfully issued initial flogi for @vport
   **/
  int
  lpfc_initial_flogi(struct lpfc_vport *vport)
  {
  	struct lpfc_nodelist *ndlp;
  
  	vport->port_state = LPFC_FLOGI;
  	lpfc_set_disctmo(vport);
  
  	/* First look for the Fabric ndlp */
  	ndlp = lpfc_findnode_did(vport, Fabric_DID);
  	if (!ndlp) {
  		/* Cannot find existing Fabric ndlp, so allocate a new one */
  		ndlp = lpfc_nlp_init(vport, Fabric_DID);
  		if (!ndlp)
  			return 0;
  		/* Set the node type */
  		ndlp->nlp_type |= NLP_FABRIC;
  		/* Put ndlp onto node list */
  		lpfc_enqueue_node(vport, ndlp);
  	} else if (!NLP_CHK_NODE_ACT(ndlp)) {
  		/* re-setup ndlp without removing from node list */
  		ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
  		if (!ndlp)
  			return 0;
  	}
  
  	if (lpfc_issue_els_flogi(vport, ndlp, 0)) {
  		/* This decrement of reference count to node shall kick off
  		 * the release of the node.
  		 */
  		lpfc_nlp_put(ndlp);
  		return 0;
  	}
  	return 1;
  }
  
  /**
   * lpfc_initial_fdisc - Issue an initial fabric discovery for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine issues an initial Fabric Discover (FDISC) for the @vport
   * specified. It first searches the ndlp with the Fabric_DID (0xfffffe) from
   * the @vport's ndlp list. If no such ndlp found, it will create an ndlp and
   * put it into the @vport's ndlp list. If an inactive ndlp found on the list,
   * it will just be enabled and made active. The lpfc_issue_els_fdisc() routine
   * is then invoked with the @vport and the ndlp to perform the FDISC for the
   * @vport.
   *
   * Return code
   *   0 - failed to issue initial fdisc for @vport
   *   1 - successfully issued initial fdisc for @vport
   **/
  int
  lpfc_initial_fdisc(struct lpfc_vport *vport)
  {
  	struct lpfc_nodelist *ndlp;
  
  	/* First look for the Fabric ndlp */
  	ndlp = lpfc_findnode_did(vport, Fabric_DID);
  	if (!ndlp) {
  		/* Cannot find existing Fabric ndlp, so allocate a new one */
  		ndlp = lpfc_nlp_init(vport, Fabric_DID);
  		if (!ndlp)
  			return 0;
  		/* Put ndlp onto node list */
  		lpfc_enqueue_node(vport, ndlp);
  	} else if (!NLP_CHK_NODE_ACT(ndlp)) {
  		/* re-setup ndlp without removing from node list */
  		ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
  		if (!ndlp)
  			return 0;
  	}
  
  	if (lpfc_issue_els_fdisc(vport, ndlp, 0)) {
  		/* decrement node reference count to trigger the release of
  		 * the node.
  		 */
  		lpfc_nlp_put(ndlp);
  		return 0;
  	}
  	return 1;
  }
  
  /**
   * lpfc_more_plogi - Check and issue remaining plogis for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine checks whether there are more remaining Port Logins
   * (PLOGI) to be issued for the @vport. If so, it will invoke the routine
   * lpfc_els_disc_plogi() to go through the Node Port Recovery (NPR) nodes
   * to issue ELS PLOGIs up to the configured discover threads with the
   * @vport (@vport->cfg_discovery_threads). The function also decrement
   * the @vport's num_disc_node by 1 if it is not already 0.
   **/
  void
  lpfc_more_plogi(struct lpfc_vport *vport)
  {
  	if (vport->num_disc_nodes)
  		vport->num_disc_nodes--;
  
  	/* Continue discovery with <num_disc_nodes> PLOGIs to go */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  			 "0232 Continue discovery with %d PLOGIs to go "
  			 "Data: x%x x%x x%x\n",
  			 vport->num_disc_nodes, vport->fc_plogi_cnt,
  			 vport->fc_flag, vport->port_state);
  	/* Check to see if there are more PLOGIs to be sent */
  	if (vport->fc_flag & FC_NLP_MORE)
  		/* go thru NPR nodes and issue any remaining ELS PLOGIs */
  		lpfc_els_disc_plogi(vport);
  
  	return;
  }
  
  /**
   * lpfc_plogi_confirm_nport - Confirm pologi wwpn matches stored ndlp
   * @phba: pointer to lpfc hba data structure.
   * @prsp: pointer to response IOCB payload.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine checks and indicates whether the WWPN of an N_Port, retrieved
   * from a PLOGI, matches the WWPN that is stored in the @ndlp for that N_POrt.
   * The following cases are considered N_Port confirmed:
   * 1) The N_Port is a Fabric ndlp; 2) The @ndlp is on vport list and matches
   * the WWPN of the N_Port logged into; 3) The @ndlp is not on vport list but
   * it does not have WWPN assigned either. If the WWPN is confirmed, the
   * pointer to the @ndlp will be returned. If the WWPN is not confirmed:
   * 1) if there is a node on vport list other than the @ndlp with the same
   * WWPN of the N_Port PLOGI logged into, the lpfc_unreg_rpi() will be invoked
   * on that node to release the RPI associated with the node; 2) if there is
   * no node found on vport list with the same WWPN of the N_Port PLOGI logged
   * into, a new node shall be allocated (or activated). In either case, the
   * parameters of the @ndlp shall be copied to the new_ndlp, the @ndlp shall
   * be released and the new_ndlp shall be put on to the vport node list and
   * its pointer returned as the confirmed node.
   *
   * Note that before the @ndlp got "released", the keepDID from not-matching
   * or inactive "new_ndlp" on the vport node list is assigned to the nlp_DID
   * of the @ndlp. This is because the release of @ndlp is actually to put it
   * into an inactive state on the vport node list and the vport node list
   * management algorithm does not allow two node with a same DID.
   *
   * Return code
   *   pointer to the PLOGI N_Port @ndlp
   **/
  static struct lpfc_nodelist *
  lpfc_plogi_confirm_nport(struct lpfc_hba *phba, uint32_t *prsp,
  			 struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_vport *vport = ndlp->vport;
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_nodelist *new_ndlp;
  	struct lpfc_rport_data *rdata;
  	struct fc_rport *rport;
  	struct serv_parm *sp;
  	uint8_t  name[sizeof(struct lpfc_name)];
  	uint32_t rc, keepDID = 0, keep_nlp_flag = 0;
  	uint32_t keep_new_nlp_flag = 0;
  	uint16_t keep_nlp_state;
  	u32 keep_nlp_fc4_type = 0;
  	struct lpfc_nvme_rport *keep_nrport = NULL;
  	int  put_node;
  	int  put_rport;
  	unsigned long *active_rrqs_xri_bitmap = NULL;
  
  	/* Fabric nodes can have the same WWPN so we don't bother searching
  	 * by WWPN.  Just return the ndlp that was given to us.
  	 */
  	if (ndlp->nlp_type & NLP_FABRIC)
  		return ndlp;
  
  	sp = (struct serv_parm *) ((uint8_t *) prsp + sizeof(uint32_t));
  	memset(name, 0, sizeof(struct lpfc_name));
  
  	/* Now we find out if the NPort we are logging into, matches the WWPN
  	 * we have for that ndlp. If not, we have some work to do.
  	 */
  	new_ndlp = lpfc_findnode_wwpn(vport, &sp->portName);
  
  	/* return immediately if the WWPN matches ndlp */
  	if (new_ndlp == ndlp && NLP_CHK_NODE_ACT(new_ndlp))
  		return ndlp;
  
  	if (phba->sli_rev == LPFC_SLI_REV4) {
  		active_rrqs_xri_bitmap = mempool_alloc(phba->active_rrq_pool,
  						       GFP_KERNEL);
  		if (active_rrqs_xri_bitmap)
  			memset(active_rrqs_xri_bitmap, 0,
  			       phba->cfg_rrq_xri_bitmap_sz);
  	}
  
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS | LOG_NODE,
  			 "3178 PLOGI confirm: ndlp x%x x%x x%x: "
  			 "new_ndlp x%x x%x x%x\n",
  			 ndlp->nlp_DID, ndlp->nlp_flag,  ndlp->nlp_fc4_type,
  			 (new_ndlp ? new_ndlp->nlp_DID : 0),
  			 (new_ndlp ? new_ndlp->nlp_flag : 0),
  			 (new_ndlp ? new_ndlp->nlp_fc4_type : 0));
  
  	if (!new_ndlp) {
  		rc = memcmp(&ndlp->nlp_portname, name,
  			    sizeof(struct lpfc_name));
  		if (!rc) {
  			if (active_rrqs_xri_bitmap)
  				mempool_free(active_rrqs_xri_bitmap,
  					     phba->active_rrq_pool);
  			return ndlp;
  		}
  		new_ndlp = lpfc_nlp_init(vport, ndlp->nlp_DID);
  		if (!new_ndlp) {
  			if (active_rrqs_xri_bitmap)
  				mempool_free(active_rrqs_xri_bitmap,
  					     phba->active_rrq_pool);
  			return ndlp;
  		}
  	} else if (!NLP_CHK_NODE_ACT(new_ndlp)) {
  		rc = memcmp(&ndlp->nlp_portname, name,
  			    sizeof(struct lpfc_name));
  		if (!rc) {
  			if (active_rrqs_xri_bitmap)
  				mempool_free(active_rrqs_xri_bitmap,
  					     phba->active_rrq_pool);
  			return ndlp;
  		}
  		new_ndlp = lpfc_enable_node(vport, new_ndlp,
  						NLP_STE_UNUSED_NODE);
  		if (!new_ndlp) {
  			if (active_rrqs_xri_bitmap)
  				mempool_free(active_rrqs_xri_bitmap,
  					     phba->active_rrq_pool);
  			return ndlp;
  		}
  		keepDID = new_ndlp->nlp_DID;
  		if ((phba->sli_rev == LPFC_SLI_REV4) && active_rrqs_xri_bitmap)
  			memcpy(active_rrqs_xri_bitmap,
  			       new_ndlp->active_rrqs_xri_bitmap,
  			       phba->cfg_rrq_xri_bitmap_sz);
  	} else {
  		keepDID = new_ndlp->nlp_DID;
  		if (phba->sli_rev == LPFC_SLI_REV4 &&
  		    active_rrqs_xri_bitmap)
  			memcpy(active_rrqs_xri_bitmap,
  			       new_ndlp->active_rrqs_xri_bitmap,
  			       phba->cfg_rrq_xri_bitmap_sz);
  	}
  
  	/* At this point in this routine, we know new_ndlp will be
  	 * returned. however, any previous GID_FTs that were done
  	 * would have updated nlp_fc4_type in ndlp, so we must ensure
  	 * new_ndlp has the right value.
  	 */
  	if (vport->fc_flag & FC_FABRIC) {
  		keep_nlp_fc4_type = new_ndlp->nlp_fc4_type;
  		new_ndlp->nlp_fc4_type = ndlp->nlp_fc4_type;
  	}
  
  	lpfc_unreg_rpi(vport, new_ndlp);
  	new_ndlp->nlp_DID = ndlp->nlp_DID;
  	new_ndlp->nlp_prev_state = ndlp->nlp_prev_state;
  	if (phba->sli_rev == LPFC_SLI_REV4)
  		memcpy(new_ndlp->active_rrqs_xri_bitmap,
  		       ndlp->active_rrqs_xri_bitmap,
  		       phba->cfg_rrq_xri_bitmap_sz);
  
  	spin_lock_irq(shost->host_lock);
  	keep_new_nlp_flag = new_ndlp->nlp_flag;
  	keep_nlp_flag = ndlp->nlp_flag;
  	new_ndlp->nlp_flag = ndlp->nlp_flag;
  
  	/* if new_ndlp had NLP_UNREG_INP set, keep it */
  	if (keep_new_nlp_flag & NLP_UNREG_INP)
  		new_ndlp->nlp_flag |= NLP_UNREG_INP;
  	else
  		new_ndlp->nlp_flag &= ~NLP_UNREG_INP;
  
  	/* if new_ndlp had NLP_RPI_REGISTERED set, keep it */
  	if (keep_new_nlp_flag & NLP_RPI_REGISTERED)
  		new_ndlp->nlp_flag |= NLP_RPI_REGISTERED;
  	else
  		new_ndlp->nlp_flag &= ~NLP_RPI_REGISTERED;
  
  	ndlp->nlp_flag = keep_new_nlp_flag;
  
  	/* if ndlp had NLP_UNREG_INP set, keep it */
  	if (keep_nlp_flag & NLP_UNREG_INP)
  		ndlp->nlp_flag |= NLP_UNREG_INP;
  	else
  		ndlp->nlp_flag &= ~NLP_UNREG_INP;
  
  	/* if ndlp had NLP_RPI_REGISTERED set, keep it */
  	if (keep_nlp_flag & NLP_RPI_REGISTERED)
  		ndlp->nlp_flag |= NLP_RPI_REGISTERED;
  	else
  		ndlp->nlp_flag &= ~NLP_RPI_REGISTERED;
  
  	spin_unlock_irq(shost->host_lock);
  
  	/* Set nlp_states accordingly */
  	keep_nlp_state = new_ndlp->nlp_state;
  	lpfc_nlp_set_state(vport, new_ndlp, ndlp->nlp_state);
  
  	/* interchange the nvme remoteport structs */
  	keep_nrport = new_ndlp->nrport;
  	new_ndlp->nrport = ndlp->nrport;
  
  	/* Move this back to NPR state */
  	if (memcmp(&ndlp->nlp_portname, name, sizeof(struct lpfc_name)) == 0) {
  		/* The new_ndlp is replacing ndlp totally, so we need
  		 * to put ndlp on UNUSED list and try to free it.
  		 */
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "3179 PLOGI confirm NEW: %x %x\n",
  			 new_ndlp->nlp_DID, keepDID);
  
  		/* Fix up the rport accordingly */
  		rport =  ndlp->rport;
  		if (rport) {
  			rdata = rport->dd_data;
  			if (rdata->pnode == ndlp) {
  				/* break the link before dropping the ref */
  				ndlp->rport = NULL;
  				lpfc_nlp_put(ndlp);
  				rdata->pnode = lpfc_nlp_get(new_ndlp);
  				new_ndlp->rport = rport;
  			}
  			new_ndlp->nlp_type = ndlp->nlp_type;
  		}
  
  		/* Fix up the nvme rport */
  		if (ndlp->nrport) {
  			ndlp->nrport = NULL;
  			lpfc_nlp_put(ndlp);
  		}
  
  		/* We shall actually free the ndlp with both nlp_DID and
  		 * nlp_portname fields equals 0 to avoid any ndlp on the
  		 * nodelist never to be used.
  		 */
  		if (ndlp->nlp_DID == 0) {
  			spin_lock_irq(&phba->ndlp_lock);
  			NLP_SET_FREE_REQ(ndlp);
  			spin_unlock_irq(&phba->ndlp_lock);
  		}
  
  		/* Two ndlps cannot have the same did on the nodelist.
  		 * Note: for this case, ndlp has a NULL WWPN so setting
  		 * the nlp_fc4_type isn't required.
  		 */
  		ndlp->nlp_DID = keepDID;
  		lpfc_nlp_set_state(vport, ndlp, keep_nlp_state);
  		if (phba->sli_rev == LPFC_SLI_REV4 &&
  		    active_rrqs_xri_bitmap)
  			memcpy(ndlp->active_rrqs_xri_bitmap,
  			       active_rrqs_xri_bitmap,
  			       phba->cfg_rrq_xri_bitmap_sz);
  
  		if (!NLP_CHK_NODE_ACT(ndlp))
  			lpfc_drop_node(vport, ndlp);
  	}
  	else {
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "3180 PLOGI confirm SWAP: %x %x\n",
  			 new_ndlp->nlp_DID, keepDID);
  
  		lpfc_unreg_rpi(vport, ndlp);
  
  		/* Two ndlps cannot have the same did and the fc4
  		 * type must be transferred because the ndlp is in
  		 * flight.
  		 */
  		ndlp->nlp_DID = keepDID;
  		ndlp->nlp_fc4_type = keep_nlp_fc4_type;
  
  		if (phba->sli_rev == LPFC_SLI_REV4 &&
  		    active_rrqs_xri_bitmap)
  			memcpy(ndlp->active_rrqs_xri_bitmap,
  			       active_rrqs_xri_bitmap,
  			       phba->cfg_rrq_xri_bitmap_sz);
  
  		/* Since we are switching over to the new_ndlp,
  		 * reset the old ndlp state
  		 */
  		if ((ndlp->nlp_state == NLP_STE_UNMAPPED_NODE) ||
  		    (ndlp->nlp_state == NLP_STE_MAPPED_NODE))
  			keep_nlp_state = NLP_STE_NPR_NODE;
  		lpfc_nlp_set_state(vport, ndlp, keep_nlp_state);
  
  		/* Previous ndlp no longer active with nvme host transport.
  		 * Remove reference from earlier registration unless the
  		 * nvme host took care of it.
  		 */
  		if (ndlp->nrport)
  			lpfc_nlp_put(ndlp);
  		ndlp->nrport = keep_nrport;
  
  		/* Fix up the rport accordingly */
  		rport = ndlp->rport;
  		if (rport) {
  			rdata = rport->dd_data;
  			put_node = rdata->pnode != NULL;
  			put_rport = ndlp->rport != NULL;
  			rdata->pnode = NULL;
  			ndlp->rport = NULL;
  			if (put_node)
  				lpfc_nlp_put(ndlp);
  			if (put_rport)
  				put_device(&rport->dev);
  		}
  	}
  	if (phba->sli_rev == LPFC_SLI_REV4 &&
  	    active_rrqs_xri_bitmap)
  		mempool_free(active_rrqs_xri_bitmap,
  			     phba->active_rrq_pool);
  
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS | LOG_NODE,
  			 "3173 PLOGI confirm exit: new_ndlp x%x x%x x%x\n",
  			 new_ndlp->nlp_DID, new_ndlp->nlp_flag,
  			 new_ndlp->nlp_fc4_type);
  
  	return new_ndlp;
  }
  
  /**
   * lpfc_end_rscn - Check and handle more rscn for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine checks whether more Registration State Change
   * Notifications (RSCNs) came in while the discovery state machine was in
   * the FC_RSCN_MODE. If so, the lpfc_els_handle_rscn() routine will be
   * invoked to handle the additional RSCNs for the @vport. Otherwise, the
   * FC_RSCN_MODE bit will be cleared with the @vport to mark as the end of
   * handling the RSCNs.
   **/
  void
  lpfc_end_rscn(struct lpfc_vport *vport)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  
  	if (vport->fc_flag & FC_RSCN_MODE) {
  		/*
  		 * Check to see if more RSCNs came in while we were
  		 * processing this one.
  		 */
  		if (vport->fc_rscn_id_cnt ||
  		    (vport->fc_flag & FC_RSCN_DISCOVERY) != 0)
  			lpfc_els_handle_rscn(vport);
  		else {
  			spin_lock_irq(shost->host_lock);
  			vport->fc_flag &= ~FC_RSCN_MODE;
  			spin_unlock_irq(shost->host_lock);
  		}
  	}
  }
  
  /**
   * lpfc_cmpl_els_rrq - Completion handled for els RRQs.
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine will call the clear rrq function to free the rrq and
   * clear the xri's bit in the ndlp's xri_bitmap. If the ndlp does not
   * exist then the clear_rrq is still called because the rrq needs to
   * be freed.
   **/
  
  static void
  lpfc_cmpl_els_rrq(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		    struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_vport *vport = cmdiocb->vport;
  	IOCB_t *irsp;
  	struct lpfc_nodelist *ndlp;
  	struct lpfc_node_rrq *rrq;
  
  	/* we pass cmdiocb to state machine which needs rspiocb as well */
  	rrq = cmdiocb->context_un.rrq;
  	cmdiocb->context_un.rsp_iocb = rspiocb;
  
  	irsp = &rspiocb->iocb;
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"RRQ cmpl:      status:x%x/x%x did:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4],
  		irsp->un.elsreq64.remoteID);
  
  	ndlp = lpfc_findnode_did(vport, irsp->un.elsreq64.remoteID);
  	if (!ndlp || !NLP_CHK_NODE_ACT(ndlp) || ndlp != rrq->ndlp) {
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "2882 RRQ completes to NPort x%x "
  				 "with no ndlp. Data: x%x x%x x%x\n",
  				 irsp->un.elsreq64.remoteID,
  				 irsp->ulpStatus, irsp->un.ulpWord[4],
  				 irsp->ulpIoTag);
  		goto out;
  	}
  
  	/* rrq completes to NPort <nlp_DID> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "2880 RRQ completes to NPort x%x "
  			 "Data: x%x x%x x%x x%x x%x\n",
  			 ndlp->nlp_DID, irsp->ulpStatus, irsp->un.ulpWord[4],
  			 irsp->ulpTimeout, rrq->xritag, rrq->rxid);
  
  	if (irsp->ulpStatus) {
  		/* Check for retry */
  		/* RRQ failed Don't print the vport to vport rjts */
  		if (irsp->ulpStatus != IOSTAT_LS_RJT ||
  			(((irsp->un.ulpWord[4]) >> 16 != LSRJT_INVALID_CMD) &&
  			((irsp->un.ulpWord[4]) >> 16 != LSRJT_UNABLE_TPC)) ||
  			(phba)->pport->cfg_log_verbose & LOG_ELS)
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "2881 RRQ failure DID:%06X Status:x%x/x%x\n",
  				 ndlp->nlp_DID, irsp->ulpStatus,
  				 irsp->un.ulpWord[4]);
  	}
  out:
  	if (rrq)
  		lpfc_clr_rrq_active(phba, rrq->xritag, rrq);
  	lpfc_els_free_iocb(phba, cmdiocb);
  	return;
  }
  /**
   * lpfc_cmpl_els_plogi - Completion callback function for plogi
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the completion callback function for issuing the Port
   * Login (PLOGI) command. For PLOGI completion, there must be an active
   * ndlp on the vport node list that matches the remote node ID from the
   * PLOGI response IOCB. If such ndlp does not exist, the PLOGI is simply
   * ignored and command IOCB released. The PLOGI response IOCB status is
   * checked for error conditons. If there is error status reported, PLOGI
   * retry shall be attempted by invoking the lpfc_els_retry() routine.
   * Otherwise, the lpfc_plogi_confirm_nport() routine shall be invoked on
   * the ndlp and the NLP_EVT_CMPL_PLOGI state to the Discover State Machine
   * (DSM) is set for this PLOGI completion. Finally, it checks whether
   * there are additional N_Port nodes with the vport that need to perform
   * PLOGI. If so, the lpfc_more_plogi() routine is invoked to issue addition
   * PLOGIs.
   **/
  static void
  lpfc_cmpl_els_plogi(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		    struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_vport *vport = cmdiocb->vport;
  	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
  	IOCB_t *irsp;
  	struct lpfc_nodelist *ndlp;
  	struct lpfc_dmabuf *prsp;
  	int disc;
  
  	/* we pass cmdiocb to state machine which needs rspiocb as well */
  	cmdiocb->context_un.rsp_iocb = rspiocb;
  
  	irsp = &rspiocb->iocb;
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"PLOGI cmpl:      status:x%x/x%x did:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4],
  		irsp->un.elsreq64.remoteID);
  
  	ndlp = lpfc_findnode_did(vport, irsp->un.elsreq64.remoteID);
  	if (!ndlp || !NLP_CHK_NODE_ACT(ndlp)) {
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "0136 PLOGI completes to NPort x%x "
  				 "with no ndlp. Data: x%x x%x x%x\n",
  				 irsp->un.elsreq64.remoteID,
  				 irsp->ulpStatus, irsp->un.ulpWord[4],
  				 irsp->ulpIoTag);
  		goto out;
  	}
  
  	/* Since ndlp can be freed in the disc state machine, note if this node
  	 * is being used during discovery.
  	 */
  	spin_lock_irq(shost->host_lock);
  	disc = (ndlp->nlp_flag & NLP_NPR_2B_DISC);
  	ndlp->nlp_flag &= ~NLP_NPR_2B_DISC;
  	spin_unlock_irq(shost->host_lock);
  
  	/* PLOGI completes to NPort <nlp_DID> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0102 PLOGI completes to NPort x%06x "
  			 "Data: x%x x%x x%x x%x x%x\n",
  			 ndlp->nlp_DID, ndlp->nlp_fc4_type,
  			 irsp->ulpStatus, irsp->un.ulpWord[4],
  			 disc, vport->num_disc_nodes);
  
  	/* Check to see if link went down during discovery */
  	if (lpfc_els_chk_latt(vport)) {
  		spin_lock_irq(shost->host_lock);
  		ndlp->nlp_flag |= NLP_NPR_2B_DISC;
  		spin_unlock_irq(shost->host_lock);
  		goto out;
  	}
  
  	if (irsp->ulpStatus) {
  		/* Check for retry */
  		if (lpfc_els_retry(phba, cmdiocb, rspiocb)) {
  			/* ELS command is being retried */
  			if (disc) {
  				spin_lock_irq(shost->host_lock);
  				ndlp->nlp_flag |= NLP_NPR_2B_DISC;
  				spin_unlock_irq(shost->host_lock);
  			}
  			goto out;
  		}
  		/* PLOGI failed Don't print the vport to vport rjts */
  		if (irsp->ulpStatus != IOSTAT_LS_RJT ||
  			(((irsp->un.ulpWord[4]) >> 16 != LSRJT_INVALID_CMD) &&
  			((irsp->un.ulpWord[4]) >> 16 != LSRJT_UNABLE_TPC)) ||
  			(phba)->pport->cfg_log_verbose & LOG_ELS)
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "2753 PLOGI failure DID:%06X Status:x%x/x%x\n",
  				 ndlp->nlp_DID, irsp->ulpStatus,
  				 irsp->un.ulpWord[4]);
  		/* Do not call DSM for lpfc_els_abort'ed ELS cmds */
  		if (!lpfc_error_lost_link(irsp))
  			lpfc_disc_state_machine(vport, ndlp, cmdiocb,
  						NLP_EVT_CMPL_PLOGI);
  	} else {
  		/* Good status, call state machine */
  		prsp = list_entry(((struct lpfc_dmabuf *)
  				   cmdiocb->context2)->list.next,
  				  struct lpfc_dmabuf, list);
  		ndlp = lpfc_plogi_confirm_nport(phba, prsp->virt, ndlp);
  		lpfc_disc_state_machine(vport, ndlp, cmdiocb,
  					     NLP_EVT_CMPL_PLOGI);
  	}
  
  	if (disc && vport->num_disc_nodes) {
  		/* Check to see if there are more PLOGIs to be sent */
  		lpfc_more_plogi(vport);
  
  		if (vport->num_disc_nodes == 0) {
  			spin_lock_irq(shost->host_lock);
  			vport->fc_flag &= ~FC_NDISC_ACTIVE;
  			spin_unlock_irq(shost->host_lock);
  
  			lpfc_can_disctmo(vport);
  			lpfc_end_rscn(vport);
  		}
  	}
  
  out:
  	lpfc_els_free_iocb(phba, cmdiocb);
  	return;
  }
  
  /**
   * lpfc_issue_els_plogi - Issue an plogi iocb command for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   * @did: destination port identifier.
   * @retry: number of retries to the command IOCB.
   *
   * This routine issues a Port Login (PLOGI) command to a remote N_Port
   * (with the @did) for a @vport. Before issuing a PLOGI to a remote N_Port,
   * the ndlp with the remote N_Port DID must exist on the @vport's ndlp list.
   * This routine constructs the proper feilds of the PLOGI IOCB and invokes
   * the lpfc_sli_issue_iocb() routine to send out PLOGI ELS command.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the PLOGI ELS command.
   *
   * Return code
   *   0 - Successfully issued a plogi for @vport
   *   1 - failed to issue a plogi for @vport
   **/
  int
  lpfc_issue_els_plogi(struct lpfc_vport *vport, uint32_t did, uint8_t retry)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	struct Scsi_Host *shost;
  	struct serv_parm *sp;
  	struct lpfc_nodelist *ndlp;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	int ret;
  
  	ndlp = lpfc_findnode_did(vport, did);
  
  	if (ndlp) {
  		/* Defer the processing of the issue PLOGI until after the
  		 * outstanding UNREG_RPI mbox command completes, unless we
  		 * are going offline. This logic does not apply for Fabric DIDs
  		 */
  		if ((ndlp->nlp_flag & NLP_UNREG_INP) &&
  		    ((ndlp->nlp_DID & Fabric_DID_MASK) != Fabric_DID_MASK) &&
  		    !(vport->fc_flag & FC_OFFLINE_MODE)) {
  			lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  					 "4110 Issue PLOGI x%x deferred "
  					 "on NPort x%x rpi x%x Data: x%px\n",
  					 ndlp->nlp_defer_did, ndlp->nlp_DID,
  					 ndlp->nlp_rpi, ndlp);
  
  			/* We can only defer 1st PLOGI */
  			if (ndlp->nlp_defer_did == NLP_EVT_NOTHING_PENDING)
  				ndlp->nlp_defer_did = did;
  			return 0;
  		}
  		if (!NLP_CHK_NODE_ACT(ndlp))
  			ndlp = NULL;
  	}
  
  	/* If ndlp is not NULL, we will bump the reference count on it */
  	cmdsize = (sizeof(uint32_t) + sizeof(struct serv_parm));
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp, did,
  				     ELS_CMD_PLOGI);
  	if (!elsiocb)
  		return 1;
  
  	shost = lpfc_shost_from_vport(vport);
  	spin_lock_irq(shost->host_lock);
  	ndlp->nlp_flag &= ~NLP_FCP_PRLI_RJT;
  	spin_unlock_irq(shost->host_lock);
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	/* For PLOGI request, remainder of payload is service parameters */
  	*((uint32_t *) (pcmd)) = ELS_CMD_PLOGI;
  	pcmd += sizeof(uint32_t);
  	memcpy(pcmd, &vport->fc_sparam, sizeof(struct serv_parm));
  	sp = (struct serv_parm *) pcmd;
  
  	/*
  	 * If we are a N-port connected to a Fabric, fix-up paramm's so logins
  	 * to device on remote loops work.
  	 */
  	if ((vport->fc_flag & FC_FABRIC) && !(vport->fc_flag & FC_PUBLIC_LOOP))
  		sp->cmn.altBbCredit = 1;
  
  	if (sp->cmn.fcphLow < FC_PH_4_3)
  		sp->cmn.fcphLow = FC_PH_4_3;
  
  	if (sp->cmn.fcphHigh < FC_PH3)
  		sp->cmn.fcphHigh = FC_PH3;
  
  	sp->cmn.valid_vendor_ver_level = 0;
  	memset(sp->un.vendorVersion, 0, sizeof(sp->un.vendorVersion));
  	sp->cmn.bbRcvSizeMsb &= 0xF;
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue PLOGI:     did:x%x",
  		did, 0, 0);
  
  	/* If our firmware supports this feature, convey that
  	 * information to the target using the vendor specific field.
  	 */
  	if (phba->sli.sli_flag & LPFC_SLI_SUPPRESS_RSP) {
  		sp->cmn.valid_vendor_ver_level = 1;
  		sp->un.vv.vid = cpu_to_be32(LPFC_VV_EMLX_ID);
  		sp->un.vv.flags = cpu_to_be32(LPFC_VV_SUPPRESS_RSP);
  	}
  
  	phba->fc_stat.elsXmitPLOGI++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_plogi;
  	ret = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  
  	if (ret == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_cmpl_els_prli - Completion callback function for prli
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the completion callback function for a Process Login
   * (PRLI) ELS command. The PRLI response IOCB status is checked for error
   * status. If there is error status reported, PRLI retry shall be attempted
   * by invoking the lpfc_els_retry() routine. Otherwise, the state
   * NLP_EVT_CMPL_PRLI is sent to the Discover State Machine (DSM) for this
   * ndlp to mark the PRLI completion.
   **/
  static void
  lpfc_cmpl_els_prli(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		   struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_vport *vport = cmdiocb->vport;
  	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
  	IOCB_t *irsp;
  	struct lpfc_nodelist *ndlp;
  	char *mode;
  
  	/* we pass cmdiocb to state machine which needs rspiocb as well */
  	cmdiocb->context_un.rsp_iocb = rspiocb;
  
  	irsp = &(rspiocb->iocb);
  	ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
  	spin_lock_irq(shost->host_lock);
  	ndlp->nlp_flag &= ~NLP_PRLI_SND;
  
  	/* Driver supports multiple FC4 types.  Counters matter. */
  	vport->fc_prli_sent--;
  	ndlp->fc4_prli_sent--;
  	spin_unlock_irq(shost->host_lock);
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"PRLI cmpl:       status:x%x/x%x did:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4],
  		ndlp->nlp_DID);
  
  	/* PRLI completes to NPort <nlp_DID> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0103 PRLI completes to NPort x%06x "
  			 "Data: x%x x%x x%x x%x\n",
  			 ndlp->nlp_DID, irsp->ulpStatus, irsp->un.ulpWord[4],
  			 vport->num_disc_nodes, ndlp->fc4_prli_sent);
  
  	/* Check to see if link went down during discovery */
  	if (lpfc_els_chk_latt(vport))
  		goto out;
  
  	if (irsp->ulpStatus) {
  		/* Check for retry */
  		if (lpfc_els_retry(phba, cmdiocb, rspiocb)) {
  			/* ELS command is being retried */
  			goto out;
  		}
  
  		/* If we don't send GFT_ID to Fabric, a PRLI error
  		 * could be expected.
  		 */
  		if ((vport->fc_flag & FC_FABRIC) ||
  		    (vport->cfg_enable_fc4_type != LPFC_ENABLE_BOTH))
  			mode = KERN_ERR;
  		else
  			mode = KERN_INFO;
  
  		/* PRLI failed */
  		lpfc_printf_vlog(vport, mode, LOG_ELS,
  				 "2754 PRLI failure DID:%06X Status:x%x/x%x, "
  				 "data: x%x\n",
  				 ndlp->nlp_DID, irsp->ulpStatus,
  				 irsp->un.ulpWord[4], ndlp->fc4_prli_sent);
  
  		/* Do not call DSM for lpfc_els_abort'ed ELS cmds */
  		if (lpfc_error_lost_link(irsp))
  			goto out;
  		else
  			lpfc_disc_state_machine(vport, ndlp, cmdiocb,
  						NLP_EVT_CMPL_PRLI);
  	} else {
  		/* Good status, call state machine.  However, if another
  		 * PRLI is outstanding, don't call the state machine
  		 * because final disposition to Mapped or Unmapped is
  		 * completed there.
  		 */
  		lpfc_disc_state_machine(vport, ndlp, cmdiocb,
  					NLP_EVT_CMPL_PRLI);
  	}
  
  out:
  	lpfc_els_free_iocb(phba, cmdiocb);
  	return;
  }
  
  /**
   * lpfc_issue_els_prli - Issue a prli iocb command for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   * @retry: number of retries to the command IOCB.
   *
   * This routine issues a Process Login (PRLI) ELS command for the
   * @vport. The PRLI service parameters are set up in the payload of the
   * PRLI Request command and the pointer to lpfc_cmpl_els_prli() routine
   * is put to the IOCB completion callback func field before invoking the
   * routine lpfc_sli_issue_iocb() to send out PRLI command.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the PRLI ELS command.
   *
   * Return code
   *   0 - successfully issued prli iocb command for @vport
   *   1 - failed to issue prli iocb command for @vport
   **/
  int
  lpfc_issue_els_prli(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
  		    uint8_t retry)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba *phba = vport->phba;
  	PRLI *npr;
  	struct lpfc_nvme_prli *npr_nvme;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	u32 local_nlp_type, elscmd;
  
  	/*
  	 * If we are in RSCN mode, the FC4 types supported from a
  	 * previous GFT_ID command may not be accurate. So, if we
  	 * are a NVME Initiator, always look for the possibility of
  	 * the remote NPort beng a NVME Target.
  	 */
  	if (phba->sli_rev == LPFC_SLI_REV4 &&
  	    vport->fc_flag & FC_RSCN_MODE &&
  	    vport->nvmei_support)
  		ndlp->nlp_fc4_type |= NLP_FC4_NVME;
  	local_nlp_type = ndlp->nlp_fc4_type;
  
  	/* This routine will issue 1 or 2 PRLIs, so zero all the ndlp
  	 * fields here before any of them can complete.
  	 */
  	ndlp->nlp_type &= ~(NLP_FCP_TARGET | NLP_FCP_INITIATOR);
  	ndlp->nlp_type &= ~(NLP_NVME_TARGET | NLP_NVME_INITIATOR);
  	ndlp->nlp_fcp_info &= ~NLP_FCP_2_DEVICE;
  	ndlp->nlp_flag &= ~(NLP_FIRSTBURST | NLP_NPR_2B_DISC);
  	ndlp->nvme_fb_size = 0;
  
   send_next_prli:
  	if (local_nlp_type & NLP_FC4_FCP) {
  		/* Payload is 4 + 16 = 20 x14 bytes. */
  		cmdsize = (sizeof(uint32_t) + sizeof(PRLI));
  		elscmd = ELS_CMD_PRLI;
  	} else if (local_nlp_type & NLP_FC4_NVME) {
  		/* Payload is 4 + 20 = 24 x18 bytes. */
  		cmdsize = (sizeof(uint32_t) + sizeof(struct lpfc_nvme_prli));
  		elscmd = ELS_CMD_NVMEPRLI;
  	} else {
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  				 "3083 Unknown FC_TYPE x%x ndlp x%06x\n",
  				 ndlp->nlp_fc4_type, ndlp->nlp_DID);
  		return 1;
  	}
  
  	/* SLI3 ports don't support NVME.  If this rport is a strict NVME
  	 * FC4 type, implicitly LOGO.
  	 */
  	if (phba->sli_rev == LPFC_SLI_REV3 &&
  	    ndlp->nlp_fc4_type == NLP_FC4_NVME) {
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  				 "3088 Rport fc4 type 0x%x not supported by SLI3 adapter\n",
  				 ndlp->nlp_type);
  		lpfc_disc_state_machine(vport, ndlp, NULL, NLP_EVT_DEVICE_RM);
  		return 1;
  	}
  
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
  				     ndlp->nlp_DID, elscmd);
  	if (!elsiocb)
  		return 1;
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	/* For PRLI request, remainder of payload is service parameters */
  	memset(pcmd, 0, cmdsize);
  
  	if (local_nlp_type & NLP_FC4_FCP) {
  		/* Remainder of payload is FCP PRLI parameter page.
  		 * Note: this data structure is defined as
  		 * BE/LE in the structure definition so no
  		 * byte swap call is made.
  		 */
  		*((uint32_t *)(pcmd)) = ELS_CMD_PRLI;
  		pcmd += sizeof(uint32_t);
  		npr = (PRLI *)pcmd;
  
  		/*
  		 * If our firmware version is 3.20 or later,
  		 * set the following bits for FC-TAPE support.
  		 */
  		if (phba->vpd.rev.feaLevelHigh >= 0x02) {
  			npr->ConfmComplAllowed = 1;
  			npr->Retry = 1;
  			npr->TaskRetryIdReq = 1;
  		}
  		npr->estabImagePair = 1;
  		npr->readXferRdyDis = 1;
  		if (vport->cfg_first_burst_size)
  			npr->writeXferRdyDis = 1;
  
  		/* For FCP support */
  		npr->prliType = PRLI_FCP_TYPE;
  		npr->initiatorFunc = 1;
  		elsiocb->iocb_flag |= LPFC_PRLI_FCP_REQ;
  
  		/* Remove FCP type - processed. */
  		local_nlp_type &= ~NLP_FC4_FCP;
  	} else if (local_nlp_type & NLP_FC4_NVME) {
  		/* Remainder of payload is NVME PRLI parameter page.
  		 * This data structure is the newer definition that
  		 * uses bf macros so a byte swap is required.
  		 */
  		*((uint32_t *)(pcmd)) = ELS_CMD_NVMEPRLI;
  		pcmd += sizeof(uint32_t);
  		npr_nvme = (struct lpfc_nvme_prli *)pcmd;
  		bf_set(prli_type_code, npr_nvme, PRLI_NVME_TYPE);
  		bf_set(prli_estabImagePair, npr_nvme, 0);  /* Should be 0 */
  		if (phba->nsler) {
  			bf_set(prli_nsler, npr_nvme, 1);
  			bf_set(prli_conf, npr_nvme, 1);
  		}
  
  		/* Only initiators request first burst. */
  		if ((phba->cfg_nvme_enable_fb) &&
  		    !phba->nvmet_support)
  			bf_set(prli_fba, npr_nvme, 1);
  
  		if (phba->nvmet_support) {
  			bf_set(prli_tgt, npr_nvme, 1);
  			bf_set(prli_disc, npr_nvme, 1);
  		} else {
  			bf_set(prli_init, npr_nvme, 1);
  			bf_set(prli_conf, npr_nvme, 1);
  		}
  
  		npr_nvme->word1 = cpu_to_be32(npr_nvme->word1);
  		npr_nvme->word4 = cpu_to_be32(npr_nvme->word4);
  		elsiocb->iocb_flag |= LPFC_PRLI_NVME_REQ;
  
  		/* Remove NVME type - processed. */
  		local_nlp_type &= ~NLP_FC4_NVME;
  	}
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue PRLI:      did:x%x",
  		ndlp->nlp_DID, 0, 0);
  
  	phba->fc_stat.elsXmitPRLI++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_prli;
  	spin_lock_irq(shost->host_lock);
  	ndlp->nlp_flag |= NLP_PRLI_SND;
  
  	/* The vport counters are used for lpfc_scan_finished, but
  	 * the ndlp is used to track outstanding PRLIs for different
  	 * FC4 types.
  	 */
  	vport->fc_prli_sent++;
  	ndlp->fc4_prli_sent++;
  	spin_unlock_irq(shost->host_lock);
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) ==
  	    IOCB_ERROR) {
  		spin_lock_irq(shost->host_lock);
  		ndlp->nlp_flag &= ~NLP_PRLI_SND;
  		spin_unlock_irq(shost->host_lock);
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  
  
  	/* The driver supports 2 FC4 types.  Make sure
  	 * a PRLI is issued for all types before exiting.
  	 */
  	if (phba->sli_rev == LPFC_SLI_REV4 &&
  	    local_nlp_type & (NLP_FC4_FCP | NLP_FC4_NVME))
  		goto send_next_prli;
  
  	return 0;
  }
  
  /**
   * lpfc_rscn_disc - Perform rscn discovery for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine performs Registration State Change Notification (RSCN)
   * discovery for a @vport. If the @vport's node port recovery count is not
   * zero, it will invoke the lpfc_els_disc_plogi() to perform PLOGI for all
   * the nodes that need recovery. If none of the PLOGI were needed through
   * the lpfc_els_disc_plogi() routine, the lpfc_end_rscn() routine shall be
   * invoked to check and handle possible more RSCN came in during the period
   * of processing the current ones.
   **/
  static void
  lpfc_rscn_disc(struct lpfc_vport *vport)
  {
  	lpfc_can_disctmo(vport);
  
  	/* RSCN discovery */
  	/* go thru NPR nodes and issue ELS PLOGIs */
  	if (vport->fc_npr_cnt)
  		if (lpfc_els_disc_plogi(vport))
  			return;
  
  	lpfc_end_rscn(vport);
  }
  
  /**
   * lpfc_adisc_done - Complete the adisc phase of discovery
   * @vport: pointer to lpfc_vport hba data structure that finished all ADISCs.
   *
   * This function is called when the final ADISC is completed during discovery.
   * This function handles clearing link attention or issuing reg_vpi depending
   * on whether npiv is enabled. This function also kicks off the PLOGI phase of
   * discovery.
   * This function is called with no locks held.
   **/
  static void
  lpfc_adisc_done(struct lpfc_vport *vport)
  {
  	struct Scsi_Host   *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba   *phba = vport->phba;
  
  	/*
  	 * For NPIV, cmpl_reg_vpi will set port_state to READY,
  	 * and continue discovery.
  	 */
  	if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
  	    !(vport->fc_flag & FC_RSCN_MODE) &&
  	    (phba->sli_rev < LPFC_SLI_REV4)) {
  		/* The ADISCs are complete.  Doesn't matter if they
  		 * succeeded or failed because the ADISC completion
  		 * routine guarantees to call the state machine and
  		 * the RPI is either unregistered (failed ADISC response)
  		 * or the RPI is still valid and the node is marked
  		 * mapped for a target.  The exchanges should be in the
  		 * correct state. This code is specific to SLI3.
  		 */
  		lpfc_issue_clear_la(phba, vport);
  		lpfc_issue_reg_vpi(phba, vport);
  		return;
  	}
  	/*
  	* For SLI2, we need to set port_state to READY
  	* and continue discovery.
  	*/
  	if (vport->port_state < LPFC_VPORT_READY) {
  		/* If we get here, there is nothing to ADISC */
  		lpfc_issue_clear_la(phba, vport);
  		if (!(vport->fc_flag & FC_ABORT_DISCOVERY)) {
  			vport->num_disc_nodes = 0;
  			/* go thru NPR list, issue ELS PLOGIs */
  			if (vport->fc_npr_cnt)
  				lpfc_els_disc_plogi(vport);
  			if (!vport->num_disc_nodes) {
  				spin_lock_irq(shost->host_lock);
  				vport->fc_flag &= ~FC_NDISC_ACTIVE;
  				spin_unlock_irq(shost->host_lock);
  				lpfc_can_disctmo(vport);
  				lpfc_end_rscn(vport);
  			}
  		}
  		vport->port_state = LPFC_VPORT_READY;
  	} else
  		lpfc_rscn_disc(vport);
  }
  
  /**
   * lpfc_more_adisc - Issue more adisc as needed
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine determines whether there are more ndlps on a @vport
   * node list need to have Address Discover (ADISC) issued. If so, it will
   * invoke the lpfc_els_disc_adisc() routine to issue ADISC on the @vport's
   * remaining nodes which need to have ADISC sent.
   **/
  void
  lpfc_more_adisc(struct lpfc_vport *vport)
  {
  	if (vport->num_disc_nodes)
  		vport->num_disc_nodes--;
  	/* Continue discovery with <num_disc_nodes> ADISCs to go */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  			 "0210 Continue discovery with %d ADISCs to go "
  			 "Data: x%x x%x x%x\n",
  			 vport->num_disc_nodes, vport->fc_adisc_cnt,
  			 vport->fc_flag, vport->port_state);
  	/* Check to see if there are more ADISCs to be sent */
  	if (vport->fc_flag & FC_NLP_MORE) {
  		lpfc_set_disctmo(vport);
  		/* go thru NPR nodes and issue any remaining ELS ADISCs */
  		lpfc_els_disc_adisc(vport);
  	}
  	if (!vport->num_disc_nodes)
  		lpfc_adisc_done(vport);
  	return;
  }
  
  /**
   * lpfc_cmpl_els_adisc - Completion callback function for adisc
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the completion function for issuing the Address Discover
   * (ADISC) command. It first checks to see whether link went down during
   * the discovery process. If so, the node will be marked as node port
   * recovery for issuing discover IOCB by the link attention handler and
   * exit. Otherwise, the response status is checked. If error was reported
   * in the response status, the ADISC command shall be retried by invoking
   * the lpfc_els_retry() routine. Otherwise, if no error was reported in
   * the response status, the state machine is invoked to set transition
   * with respect to NLP_EVT_CMPL_ADISC event.
   **/
  static void
  lpfc_cmpl_els_adisc(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		    struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_vport *vport = cmdiocb->vport;
  	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
  	IOCB_t *irsp;
  	struct lpfc_nodelist *ndlp;
  	int  disc;
  
  	/* we pass cmdiocb to state machine which needs rspiocb as well */
  	cmdiocb->context_un.rsp_iocb = rspiocb;
  
  	irsp = &(rspiocb->iocb);
  	ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"ADISC cmpl:      status:x%x/x%x did:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4],
  		ndlp->nlp_DID);
  
  	/* Since ndlp can be freed in the disc state machine, note if this node
  	 * is being used during discovery.
  	 */
  	spin_lock_irq(shost->host_lock);
  	disc = (ndlp->nlp_flag & NLP_NPR_2B_DISC);
  	ndlp->nlp_flag &= ~(NLP_ADISC_SND | NLP_NPR_2B_DISC);
  	spin_unlock_irq(shost->host_lock);
  	/* ADISC completes to NPort <nlp_DID> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0104 ADISC completes to NPort x%x "
  			 "Data: x%x x%x x%x x%x x%x\n",
  			 ndlp->nlp_DID, irsp->ulpStatus, irsp->un.ulpWord[4],
  			 irsp->ulpTimeout, disc, vport->num_disc_nodes);
  	/* Check to see if link went down during discovery */
  	if (lpfc_els_chk_latt(vport)) {
  		spin_lock_irq(shost->host_lock);
  		ndlp->nlp_flag |= NLP_NPR_2B_DISC;
  		spin_unlock_irq(shost->host_lock);
  		goto out;
  	}
  
  	if (irsp->ulpStatus) {
  		/* Check for retry */
  		if (lpfc_els_retry(phba, cmdiocb, rspiocb)) {
  			/* ELS command is being retried */
  			if (disc) {
  				spin_lock_irq(shost->host_lock);
  				ndlp->nlp_flag |= NLP_NPR_2B_DISC;
  				spin_unlock_irq(shost->host_lock);
  				lpfc_set_disctmo(vport);
  			}
  			goto out;
  		}
  		/* ADISC failed */
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "2755 ADISC failure DID:%06X Status:x%x/x%x\n",
  				 ndlp->nlp_DID, irsp->ulpStatus,
  				 irsp->un.ulpWord[4]);
  		/* Do not call DSM for lpfc_els_abort'ed ELS cmds */
  		if (!lpfc_error_lost_link(irsp))
  			lpfc_disc_state_machine(vport, ndlp, cmdiocb,
  						NLP_EVT_CMPL_ADISC);
  	} else
  		/* Good status, call state machine */
  		lpfc_disc_state_machine(vport, ndlp, cmdiocb,
  					NLP_EVT_CMPL_ADISC);
  
  	/* Check to see if there are more ADISCs to be sent */
  	if (disc && vport->num_disc_nodes)
  		lpfc_more_adisc(vport);
  out:
  	lpfc_els_free_iocb(phba, cmdiocb);
  	return;
  }
  
  /**
   * lpfc_issue_els_adisc - Issue an address discover iocb to an node on a vport
   * @vport: pointer to a virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   * @retry: number of retries to the command IOCB.
   *
   * This routine issues an Address Discover (ADISC) for an @ndlp on a
   * @vport. It prepares the payload of the ADISC ELS command, updates the
   * and states of the ndlp, and invokes the lpfc_sli_issue_iocb() routine
   * to issue the ADISC ELS command.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the ADISC ELS command.
   *
   * Return code
   *   0 - successfully issued adisc
   *   1 - failed to issue adisc
   **/
  int
  lpfc_issue_els_adisc(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
  		     uint8_t retry)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	ADISC *ap;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  
  	cmdsize = (sizeof(uint32_t) + sizeof(ADISC));
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_ADISC);
  	if (!elsiocb)
  		return 1;
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	/* For ADISC request, remainder of payload is service parameters */
  	*((uint32_t *) (pcmd)) = ELS_CMD_ADISC;
  	pcmd += sizeof(uint32_t);
  
  	/* Fill in ADISC payload */
  	ap = (ADISC *) pcmd;
  	ap->hardAL_PA = phba->fc_pref_ALPA;
  	memcpy(&ap->portName, &vport->fc_portname, sizeof(struct lpfc_name));
  	memcpy(&ap->nodeName, &vport->fc_nodename, sizeof(struct lpfc_name));
  	ap->DID = be32_to_cpu(vport->fc_myDID);
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue ADISC:     did:x%x",
  		ndlp->nlp_DID, 0, 0);
  
  	phba->fc_stat.elsXmitADISC++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_adisc;
  	spin_lock_irq(shost->host_lock);
  	ndlp->nlp_flag |= NLP_ADISC_SND;
  	spin_unlock_irq(shost->host_lock);
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) ==
  	    IOCB_ERROR) {
  		spin_lock_irq(shost->host_lock);
  		ndlp->nlp_flag &= ~NLP_ADISC_SND;
  		spin_unlock_irq(shost->host_lock);
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_cmpl_els_logo - Completion callback function for logo
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the completion function for issuing the ELS Logout (LOGO)
   * command. If no error status was reported from the LOGO response, the
   * state machine of the associated ndlp shall be invoked for transition with
   * respect to NLP_EVT_CMPL_LOGO event. Otherwise, if error status was reported,
   * the lpfc_els_retry() routine will be invoked to retry the LOGO command.
   **/
  static void
  lpfc_cmpl_els_logo(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		   struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
  	struct lpfc_vport *vport = ndlp->vport;
  	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
  	IOCB_t *irsp;
  	struct lpfcMboxq *mbox;
  	unsigned long flags;
  	uint32_t skip_recovery = 0;
  
  	/* we pass cmdiocb to state machine which needs rspiocb as well */
  	cmdiocb->context_un.rsp_iocb = rspiocb;
  
  	irsp = &(rspiocb->iocb);
  	spin_lock_irq(shost->host_lock);
  	ndlp->nlp_flag &= ~NLP_LOGO_SND;
  	spin_unlock_irq(shost->host_lock);
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"LOGO cmpl:       status:x%x/x%x did:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4],
  		ndlp->nlp_DID);
  
  	/* LOGO completes to NPort <nlp_DID> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0105 LOGO completes to NPort x%x "
  			 "Data: x%x x%x x%x x%x\n",
  			 ndlp->nlp_DID, irsp->ulpStatus, irsp->un.ulpWord[4],
  			 irsp->ulpTimeout, vport->num_disc_nodes);
  
  	if (lpfc_els_chk_latt(vport)) {
  		skip_recovery = 1;
  		goto out;
  	}
  
  	/* Check to see if link went down during discovery */
  	if (ndlp->nlp_flag & NLP_TARGET_REMOVE) {
  	        /* NLP_EVT_DEVICE_RM should unregister the RPI
  		 * which should abort all outstanding IOs.
  		 */
  		lpfc_disc_state_machine(vport, ndlp, cmdiocb,
  					NLP_EVT_DEVICE_RM);
  		skip_recovery = 1;
  		goto out;
  	}
  
  	/* The LOGO will not be retried on failure.  A LOGO was
  	 * issued to the remote rport and a ACC or RJT or no Answer are
  	 * all acceptable.  Note the failure and move forward with
  	 * discovery.  The PLOGI will retry.
  	 */
  	if (irsp->ulpStatus) {
  		/* LOGO failed */
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "2756 LOGO failure, No Retry DID:%06X Status:x%x/x%x\n",
  				 ndlp->nlp_DID, irsp->ulpStatus,
  				 irsp->un.ulpWord[4]);
  		/* Do not call DSM for lpfc_els_abort'ed ELS cmds */
  		if (lpfc_error_lost_link(irsp)) {
  			skip_recovery = 1;
  			goto out;
  		}
  	}
  
  	/* Call state machine. This will unregister the rpi if needed. */
  	lpfc_disc_state_machine(vport, ndlp, cmdiocb, NLP_EVT_CMPL_LOGO);
  
  out:
  	lpfc_els_free_iocb(phba, cmdiocb);
  	/* If we are in pt2pt mode, we could rcv new S_ID on PLOGI */
  	if ((vport->fc_flag & FC_PT2PT) &&
  		!(vport->fc_flag & FC_PT2PT_PLOGI)) {
  		phba->pport->fc_myDID = 0;
  
  		if ((vport->cfg_enable_fc4_type == LPFC_ENABLE_BOTH) ||
  		    (vport->cfg_enable_fc4_type == LPFC_ENABLE_NVME)) {
  			if (phba->nvmet_support)
  				lpfc_nvmet_update_targetport(phba);
  			else
  				lpfc_nvme_update_localport(phba->pport);
  		}
  
  		mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  		if (mbox) {
  			lpfc_config_link(phba, mbox);
  			mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
  			mbox->vport = vport;
  			if (lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT) ==
  				MBX_NOT_FINISHED) {
  				mempool_free(mbox, phba->mbox_mem_pool);
  				skip_recovery = 1;
  			}
  		}
  	}
  
  	/*
  	 * If the node is a target, the handling attempts to recover the port.
  	 * For any other port type, the rpi is unregistered as an implicit
  	 * LOGO.
  	 */
  	if (ndlp->nlp_type & (NLP_FCP_TARGET | NLP_NVME_TARGET) &&
  	    skip_recovery == 0) {
  		lpfc_cancel_retry_delay_tmo(vport, ndlp);
  		spin_lock_irqsave(shost->host_lock, flags);
  		ndlp->nlp_flag |= NLP_NPR_2B_DISC;
  		spin_unlock_irqrestore(shost->host_lock, flags);
  
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  				 "3187 LOGO completes to NPort x%x: Start "
  				 "Recovery Data: x%x x%x x%x x%x\n",
  				 ndlp->nlp_DID, irsp->ulpStatus,
  				 irsp->un.ulpWord[4], irsp->ulpTimeout,
  				 vport->num_disc_nodes);
  		lpfc_disc_start(vport);
  	}
  	return;
  }
  
  /**
   * lpfc_issue_els_logo - Issue a logo to an node on a vport
   * @vport: pointer to a virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   * @retry: number of retries to the command IOCB.
   *
   * This routine constructs and issues an ELS Logout (LOGO) iocb command
   * to a remote node, referred by an @ndlp on a @vport. It constructs the
   * payload of the IOCB, properly sets up the @ndlp state, and invokes the
   * lpfc_sli_issue_iocb() routine to send out the LOGO ELS command.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the LOGO ELS command.
   *
   * Callers of this routine are expected to unregister the RPI first
   *
   * Return code
   *   0 - successfully issued logo
   *   1 - failed to issue logo
   **/
  int
  lpfc_issue_els_logo(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
  		    uint8_t retry)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	int rc;
  
  	spin_lock_irq(shost->host_lock);
  	if (ndlp->nlp_flag & NLP_LOGO_SND) {
  		spin_unlock_irq(shost->host_lock);
  		return 0;
  	}
  	spin_unlock_irq(shost->host_lock);
  
  	cmdsize = (2 * sizeof(uint32_t)) + sizeof(struct lpfc_name);
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_LOGO);
  	if (!elsiocb)
  		return 1;
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	*((uint32_t *) (pcmd)) = ELS_CMD_LOGO;
  	pcmd += sizeof(uint32_t);
  
  	/* Fill in LOGO payload */
  	*((uint32_t *) (pcmd)) = be32_to_cpu(vport->fc_myDID);
  	pcmd += sizeof(uint32_t);
  	memcpy(pcmd, &vport->fc_portname, sizeof(struct lpfc_name));
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue LOGO:      did:x%x",
  		ndlp->nlp_DID, 0, 0);
  
  	phba->fc_stat.elsXmitLOGO++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_logo;
  	spin_lock_irq(shost->host_lock);
  	ndlp->nlp_flag |= NLP_LOGO_SND;
  	ndlp->nlp_flag &= ~NLP_ISSUE_LOGO;
  	spin_unlock_irq(shost->host_lock);
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  	if (rc == IOCB_ERROR) {
  		spin_lock_irq(shost->host_lock);
  		ndlp->nlp_flag &= ~NLP_LOGO_SND;
  		spin_unlock_irq(shost->host_lock);
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  
  	spin_lock_irq(shost->host_lock);
  	ndlp->nlp_prev_state = ndlp->nlp_state;
  	spin_unlock_irq(shost->host_lock);
  	lpfc_nlp_set_state(vport, ndlp, NLP_STE_LOGO_ISSUE);
  	return 0;
  }
  
  /**
   * lpfc_cmpl_els_cmd - Completion callback function for generic els command
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is a generic completion callback function for ELS commands.
   * Specifically, it is the callback function which does not need to perform
   * any command specific operations. It is currently used by the ELS command
   * issuing routines for the ELS State Change  Request (SCR),
   * lpfc_issue_els_scr(), and the ELS Fibre Channel Address Resolution
   * Protocol Response (FARPR) routine, lpfc_issue_els_farpr(). Other than
   * certain debug loggings, this callback function simply invokes the
   * lpfc_els_chk_latt() routine to check whether link went down during the
   * discovery process.
   **/
  static void
  lpfc_cmpl_els_cmd(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		  struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_vport *vport = cmdiocb->vport;
  	IOCB_t *irsp;
  
  	irsp = &rspiocb->iocb;
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"ELS cmd cmpl:    status:x%x/x%x did:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4],
  		irsp->un.elsreq64.remoteID);
  	/* ELS cmd tag <ulpIoTag> completes */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0106 ELS cmd tag x%x completes Data: x%x x%x x%x\n",
  			 irsp->ulpIoTag, irsp->ulpStatus,
  			 irsp->un.ulpWord[4], irsp->ulpTimeout);
  	/* Check to see if link went down during discovery */
  	lpfc_els_chk_latt(vport);
  	lpfc_els_free_iocb(phba, cmdiocb);
  	return;
  }
  
  /**
   * lpfc_issue_els_scr - Issue a scr to an node on a vport
   * @vport: pointer to a host virtual N_Port data structure.
   * @nportid: N_Port identifier to the remote node.
   * @retry: number of retries to the command IOCB.
   *
   * This routine issues a State Change Request (SCR) to a fabric node
   * on a @vport. The remote node @nportid is passed into the function. It
   * first search the @vport node list to find the matching ndlp. If no such
   * ndlp is found, a new ndlp shall be created for this (SCR) purpose. An
   * IOCB is allocated, payload prepared, and the lpfc_sli_issue_iocb()
   * routine is invoked to send the SCR IOCB.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the SCR ELS command.
   *
   * Return code
   *   0 - Successfully issued scr command
   *   1 - Failed to issue scr command
   **/
  int
  lpfc_issue_els_scr(struct lpfc_vport *vport, uint32_t nportid, uint8_t retry)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	struct lpfc_nodelist *ndlp;
  
  	cmdsize = (sizeof(uint32_t) + sizeof(SCR));
  
  	ndlp = lpfc_findnode_did(vport, nportid);
  	if (!ndlp) {
  		ndlp = lpfc_nlp_init(vport, nportid);
  		if (!ndlp)
  			return 1;
  		lpfc_enqueue_node(vport, ndlp);
  	} else if (!NLP_CHK_NODE_ACT(ndlp)) {
  		ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
  		if (!ndlp)
  			return 1;
  	}
  
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_SCR);
  
  	if (!elsiocb) {
  		/* This will trigger the release of the node just
  		 * allocated
  		 */
  		lpfc_nlp_put(ndlp);
  		return 1;
  	}
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	*((uint32_t *) (pcmd)) = ELS_CMD_SCR;
  	pcmd += sizeof(uint32_t);
  
  	/* For SCR, remainder of payload is SCR parameter page */
  	memset(pcmd, 0, sizeof(SCR));
  	((SCR *) pcmd)->Function = SCR_FUNC_FULL;
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue SCR:       did:x%x",
  		ndlp->nlp_DID, 0, 0);
  
  	phba->fc_stat.elsXmitSCR++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_cmd;
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) ==
  	    IOCB_ERROR) {
  		/* The additional lpfc_nlp_put will cause the following
  		 * lpfc_els_free_iocb routine to trigger the rlease of
  		 * the node.
  		 */
  		lpfc_nlp_put(ndlp);
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	/* This will cause the callback-function lpfc_cmpl_els_cmd to
  	 * trigger the release of node.
  	 */
  	if (!(vport->fc_flag & FC_PT2PT))
  		lpfc_nlp_put(ndlp);
  	return 0;
  }
  
  /**
   * lpfc_issue_els_rscn - Issue an RSCN to the Fabric Controller (Fabric)
   *   or the other nport (pt2pt).
   * @vport: pointer to a host virtual N_Port data structure.
   * @retry: number of retries to the command IOCB.
   *
   * This routine issues a RSCN to the Fabric Controller (DID 0xFFFFFD)
   *  when connected to a fabric, or to the remote port when connected
   *  in point-to-point mode. When sent to the Fabric Controller, it will
   *  replay the RSCN to registered recipients.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the RSCN ELS command.
   *
   * Return code
   *   0 - Successfully issued RSCN command
   *   1 - Failed to issue RSCN command
   **/
  int
  lpfc_issue_els_rscn(struct lpfc_vport *vport, uint8_t retry)
  {
  	struct lpfc_hba *phba = vport->phba;
  	struct lpfc_iocbq *elsiocb;
  	struct lpfc_nodelist *ndlp;
  	struct {
  		struct fc_els_rscn rscn;
  		struct fc_els_rscn_page portid;
  	} *event;
  	uint32_t nportid;
  	uint16_t cmdsize = sizeof(*event);
  
  	/* Not supported for private loop */
  	if (phba->fc_topology == LPFC_TOPOLOGY_LOOP &&
  	    !(vport->fc_flag & FC_PUBLIC_LOOP))
  		return 1;
  
  	if (vport->fc_flag & FC_PT2PT) {
  		/* find any mapped nport - that would be the other nport */
  		ndlp = lpfc_findnode_mapped(vport);
  		if (!ndlp)
  			return 1;
  	} else {
  		nportid = FC_FID_FCTRL;
  		/* find the fabric controller node */
  		ndlp = lpfc_findnode_did(vport, nportid);
  		if (!ndlp) {
  			/* if one didn't exist, make one */
  			ndlp = lpfc_nlp_init(vport, nportid);
  			if (!ndlp)
  				return 1;
  			lpfc_enqueue_node(vport, ndlp);
  		} else if (!NLP_CHK_NODE_ACT(ndlp)) {
  			ndlp = lpfc_enable_node(vport, ndlp,
  						NLP_STE_UNUSED_NODE);
  			if (!ndlp)
  				return 1;
  		}
  	}
  
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_RSCN_XMT);
  
  	if (!elsiocb) {
  		/* This will trigger the release of the node just
  		 * allocated
  		 */
  		lpfc_nlp_put(ndlp);
  		return 1;
  	}
  
  	event = ((struct lpfc_dmabuf *)elsiocb->context2)->virt;
  
  	event->rscn.rscn_cmd = ELS_RSCN;
  	event->rscn.rscn_page_len = sizeof(struct fc_els_rscn_page);
  	event->rscn.rscn_plen = cpu_to_be16(cmdsize);
  
  	nportid = vport->fc_myDID;
  	/* appears that page flags must be 0 for fabric to broadcast RSCN */
  	event->portid.rscn_page_flags = 0;
  	event->portid.rscn_fid[0] = (nportid & 0x00FF0000) >> 16;
  	event->portid.rscn_fid[1] = (nportid & 0x0000FF00) >> 8;
  	event->portid.rscn_fid[2] = nportid & 0x000000FF;
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  			      "Issue RSCN:       did:x%x",
  			      ndlp->nlp_DID, 0, 0);
  
  	phba->fc_stat.elsXmitRSCN++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_cmd;
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) ==
  	    IOCB_ERROR) {
  		/* The additional lpfc_nlp_put will cause the following
  		 * lpfc_els_free_iocb routine to trigger the rlease of
  		 * the node.
  		 */
  		lpfc_nlp_put(ndlp);
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	/* This will cause the callback-function lpfc_cmpl_els_cmd to
  	 * trigger the release of node.
  	 */
  	if (!(vport->fc_flag & FC_PT2PT))
  		lpfc_nlp_put(ndlp);
  
  	return 0;
  }
  
  /**
   * lpfc_issue_els_farpr - Issue a farp to an node on a vport
   * @vport: pointer to a host virtual N_Port data structure.
   * @nportid: N_Port identifier to the remote node.
   * @retry: number of retries to the command IOCB.
   *
   * This routine issues a Fibre Channel Address Resolution Response
   * (FARPR) to a node on a vport. The remote node N_Port identifier (@nportid)
   * is passed into the function. It first search the @vport node list to find
   * the matching ndlp. If no such ndlp is found, a new ndlp shall be created
   * for this (FARPR) purpose. An IOCB is allocated, payload prepared, and the
   * lpfc_sli_issue_iocb() routine is invoked to send the FARPR ELS command.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the PARPR ELS command.
   *
   * Return code
   *   0 - Successfully issued farpr command
   *   1 - Failed to issue farpr command
   **/
  static int
  lpfc_issue_els_farpr(struct lpfc_vport *vport, uint32_t nportid, uint8_t retry)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_iocbq *elsiocb;
  	FARP *fp;
  	uint8_t *pcmd;
  	uint32_t *lp;
  	uint16_t cmdsize;
  	struct lpfc_nodelist *ondlp;
  	struct lpfc_nodelist *ndlp;
  
  	cmdsize = (sizeof(uint32_t) + sizeof(FARP));
  
  	ndlp = lpfc_findnode_did(vport, nportid);
  	if (!ndlp) {
  		ndlp = lpfc_nlp_init(vport, nportid);
  		if (!ndlp)
  			return 1;
  		lpfc_enqueue_node(vport, ndlp);
  	} else if (!NLP_CHK_NODE_ACT(ndlp)) {
  		ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
  		if (!ndlp)
  			return 1;
  	}
  
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_RNID);
  	if (!elsiocb) {
  		/* This will trigger the release of the node just
  		 * allocated
  		 */
  		lpfc_nlp_put(ndlp);
  		return 1;
  	}
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	*((uint32_t *) (pcmd)) = ELS_CMD_FARPR;
  	pcmd += sizeof(uint32_t);
  
  	/* Fill in FARPR payload */
  	fp = (FARP *) (pcmd);
  	memset(fp, 0, sizeof(FARP));
  	lp = (uint32_t *) pcmd;
  	*lp++ = be32_to_cpu(nportid);
  	*lp++ = be32_to_cpu(vport->fc_myDID);
  	fp->Rflags = 0;
  	fp->Mflags = (FARP_MATCH_PORT | FARP_MATCH_NODE);
  
  	memcpy(&fp->RportName, &vport->fc_portname, sizeof(struct lpfc_name));
  	memcpy(&fp->RnodeName, &vport->fc_nodename, sizeof(struct lpfc_name));
  	ondlp = lpfc_findnode_did(vport, nportid);
  	if (ondlp && NLP_CHK_NODE_ACT(ondlp)) {
  		memcpy(&fp->OportName, &ondlp->nlp_portname,
  		       sizeof(struct lpfc_name));
  		memcpy(&fp->OnodeName, &ondlp->nlp_nodename,
  		       sizeof(struct lpfc_name));
  	}
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue FARPR:     did:x%x",
  		ndlp->nlp_DID, 0, 0);
  
  	phba->fc_stat.elsXmitFARPR++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_cmd;
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) ==
  	    IOCB_ERROR) {
  		/* The additional lpfc_nlp_put will cause the following
  		 * lpfc_els_free_iocb routine to trigger the release of
  		 * the node.
  		 */
  		lpfc_nlp_put(ndlp);
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	/* This will cause the callback-function lpfc_cmpl_els_cmd to
  	 * trigger the release of the node.
  	 */
  	lpfc_nlp_put(ndlp);
  	return 0;
  }
  
  /**
   * lpfc_cancel_retry_delay_tmo - Cancel the timer with delayed iocb-cmd retry
   * @vport: pointer to a host virtual N_Port data structure.
   * @nlp: pointer to a node-list data structure.
   *
   * This routine cancels the timer with a delayed IOCB-command retry for
   * a @vport's @ndlp. It stops the timer for the delayed function retrial and
   * removes the ELS retry event if it presents. In addition, if the
   * NLP_NPR_2B_DISC bit is set in the @nlp's nlp_flag bitmap, ADISC IOCB
   * commands are sent for the @vport's nodes that require issuing discovery
   * ADISC.
   **/
  void
  lpfc_cancel_retry_delay_tmo(struct lpfc_vport *vport, struct lpfc_nodelist *nlp)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_work_evt *evtp;
  
  	if (!(nlp->nlp_flag & NLP_DELAY_TMO))
  		return;
  	spin_lock_irq(shost->host_lock);
  	nlp->nlp_flag &= ~NLP_DELAY_TMO;
  	spin_unlock_irq(shost->host_lock);
  	del_timer_sync(&nlp->nlp_delayfunc);
  	nlp->nlp_last_elscmd = 0;
  	if (!list_empty(&nlp->els_retry_evt.evt_listp)) {
  		list_del_init(&nlp->els_retry_evt.evt_listp);
  		/* Decrement nlp reference count held for the delayed retry */
  		evtp = &nlp->els_retry_evt;
  		lpfc_nlp_put((struct lpfc_nodelist *)evtp->evt_arg1);
  	}
  	if (nlp->nlp_flag & NLP_NPR_2B_DISC) {
  		spin_lock_irq(shost->host_lock);
  		nlp->nlp_flag &= ~NLP_NPR_2B_DISC;
  		spin_unlock_irq(shost->host_lock);
  		if (vport->num_disc_nodes) {
  			if (vport->port_state < LPFC_VPORT_READY) {
  				/* Check if there are more ADISCs to be sent */
  				lpfc_more_adisc(vport);
  			} else {
  				/* Check if there are more PLOGIs to be sent */
  				lpfc_more_plogi(vport);
  				if (vport->num_disc_nodes == 0) {
  					spin_lock_irq(shost->host_lock);
  					vport->fc_flag &= ~FC_NDISC_ACTIVE;
  					spin_unlock_irq(shost->host_lock);
  					lpfc_can_disctmo(vport);
  					lpfc_end_rscn(vport);
  				}
  			}
  		}
  	}
  	return;
  }
  
  /**
   * lpfc_els_retry_delay - Timer function with a ndlp delayed function timer
   * @ptr: holder for the pointer to the timer function associated data (ndlp).
   *
   * This routine is invoked by the ndlp delayed-function timer to check
   * whether there is any pending ELS retry event(s) with the node. If not, it
   * simply returns. Otherwise, if there is at least one ELS delayed event, it
   * adds the delayed events to the HBA work list and invokes the
   * lpfc_worker_wake_up() routine to wake up worker thread to process the
   * event. Note that lpfc_nlp_get() is called before posting the event to
   * the work list to hold reference count of ndlp so that it guarantees the
   * reference to ndlp will still be available when the worker thread gets
   * to the event associated with the ndlp.
   **/
  void
  lpfc_els_retry_delay(struct timer_list *t)
  {
  	struct lpfc_nodelist *ndlp = from_timer(ndlp, t, nlp_delayfunc);
  	struct lpfc_vport *vport = ndlp->vport;
  	struct lpfc_hba   *phba = vport->phba;
  	unsigned long flags;
  	struct lpfc_work_evt  *evtp = &ndlp->els_retry_evt;
  
  	spin_lock_irqsave(&phba->hbalock, flags);
  	if (!list_empty(&evtp->evt_listp)) {
  		spin_unlock_irqrestore(&phba->hbalock, flags);
  		return;
  	}
  
  	/* We need to hold the node by incrementing the reference
  	 * count until the queued work is done
  	 */
  	evtp->evt_arg1  = lpfc_nlp_get(ndlp);
  	if (evtp->evt_arg1) {
  		evtp->evt = LPFC_EVT_ELS_RETRY;
  		list_add_tail(&evtp->evt_listp, &phba->work_list);
  		lpfc_worker_wake_up(phba);
  	}
  	spin_unlock_irqrestore(&phba->hbalock, flags);
  	return;
  }
  
  /**
   * lpfc_els_retry_delay_handler - Work thread handler for ndlp delayed function
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine is the worker-thread handler for processing the @ndlp delayed
   * event(s), posted by the lpfc_els_retry_delay() routine. It simply retrieves
   * the last ELS command from the associated ndlp and invokes the proper ELS
   * function according to the delayed ELS command to retry the command.
   **/
  void
  lpfc_els_retry_delay_handler(struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_vport *vport = ndlp->vport;
  	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
  	uint32_t cmd, retry;
  
  	spin_lock_irq(shost->host_lock);
  	cmd = ndlp->nlp_last_elscmd;
  	ndlp->nlp_last_elscmd = 0;
  
  	if (!(ndlp->nlp_flag & NLP_DELAY_TMO)) {
  		spin_unlock_irq(shost->host_lock);
  		return;
  	}
  
  	ndlp->nlp_flag &= ~NLP_DELAY_TMO;
  	spin_unlock_irq(shost->host_lock);
  	/*
  	 * If a discovery event readded nlp_delayfunc after timer
  	 * firing and before processing the timer, cancel the
  	 * nlp_delayfunc.
  	 */
  	del_timer_sync(&ndlp->nlp_delayfunc);
  	retry = ndlp->nlp_retry;
  	ndlp->nlp_retry = 0;
  
  	switch (cmd) {
  	case ELS_CMD_FLOGI:
  		lpfc_issue_els_flogi(vport, ndlp, retry);
  		break;
  	case ELS_CMD_PLOGI:
  		if (!lpfc_issue_els_plogi(vport, ndlp->nlp_DID, retry)) {
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_PLOGI_ISSUE);
  		}
  		break;
  	case ELS_CMD_ADISC:
  		if (!lpfc_issue_els_adisc(vport, ndlp, retry)) {
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_ADISC_ISSUE);
  		}
  		break;
  	case ELS_CMD_PRLI:
  	case ELS_CMD_NVMEPRLI:
  		if (!lpfc_issue_els_prli(vport, ndlp, retry)) {
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_PRLI_ISSUE);
  		}
  		break;
  	case ELS_CMD_LOGO:
  		if (!lpfc_issue_els_logo(vport, ndlp, retry)) {
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_LOGO_ISSUE);
  		}
  		break;
  	case ELS_CMD_FDISC:
  		if (!(vport->fc_flag & FC_VPORT_NEEDS_INIT_VPI))
  			lpfc_issue_els_fdisc(vport, ndlp, retry);
  		break;
  	}
  	return;
  }
  
  /**
   * lpfc_link_reset - Issue link reset
   * @vport: pointer to a virtual N_Port data structure.
   *
   * This routine performs link reset by sending INIT_LINK mailbox command.
   * For SLI-3 adapter, link attention interrupt is enabled before issuing
   * INIT_LINK mailbox command.
   *
   * Return code
   *   0 - Link reset initiated successfully
   *   1 - Failed to initiate link reset
   **/
  int
  lpfc_link_reset(struct lpfc_vport *vport)
  {
  	struct lpfc_hba *phba = vport->phba;
  	LPFC_MBOXQ_t *mbox;
  	uint32_t control;
  	int rc;
  
  	lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  			 "2851 Attempt link reset\n");
  	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  	if (!mbox) {
  		lpfc_printf_log(phba, KERN_ERR, LOG_MBOX,
  				"2852 Failed to allocate mbox memory");
  		return 1;
  	}
  
  	/* Enable Link attention interrupts */
  	if (phba->sli_rev <= LPFC_SLI_REV3) {
  		spin_lock_irq(&phba->hbalock);
  		phba->sli.sli_flag |= LPFC_PROCESS_LA;
  		control = readl(phba->HCregaddr);
  		control |= HC_LAINT_ENA;
  		writel(control, phba->HCregaddr);
  		readl(phba->HCregaddr); /* flush */
  		spin_unlock_irq(&phba->hbalock);
  	}
  
  	lpfc_init_link(phba, mbox, phba->cfg_topology,
  		       phba->cfg_link_speed);
  	mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
  	mbox->vport = vport;
  	rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
  	if ((rc != MBX_BUSY) && (rc != MBX_SUCCESS)) {
  		lpfc_printf_log(phba, KERN_ERR, LOG_MBOX,
  				"2853 Failed to issue INIT_LINK "
  				"mbox command, rc:x%x\n", rc);
  		mempool_free(mbox, phba->mbox_mem_pool);
  		return 1;
  	}
  
  	return 0;
  }
  
  /**
   * lpfc_els_retry - Make retry decision on an els command iocb
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine makes a retry decision on an ELS command IOCB, which has
   * failed. The following ELS IOCBs use this function for retrying the command
   * when previously issued command responsed with error status: FLOGI, PLOGI,
   * PRLI, ADISC, LOGO, and FDISC. Based on the ELS command type and the
   * returned error status, it makes the decision whether a retry shall be
   * issued for the command, and whether a retry shall be made immediately or
   * delayed. In the former case, the corresponding ELS command issuing-function
   * is called to retry the command. In the later case, the ELS command shall
   * be posted to the ndlp delayed event and delayed function timer set to the
   * ndlp for the delayed command issusing.
   *
   * Return code
   *   0 - No retry of els command is made
   *   1 - Immediate or delayed retry of els command is made
   **/
  static int
  lpfc_els_retry(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  	       struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_vport *vport = cmdiocb->vport;
  	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
  	IOCB_t *irsp = &rspiocb->iocb;
  	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
  	struct lpfc_dmabuf *pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	uint32_t *elscmd;
  	struct ls_rjt stat;
  	int retry = 0, maxretry = lpfc_max_els_tries, delay = 0;
  	int logerr = 0;
  	uint32_t cmd = 0;
  	uint32_t did;
  	int link_reset = 0, rc;
  
  
  	/* Note: context2 may be 0 for internal driver abort
  	 * of delays ELS command.
  	 */
  
  	if (pcmd && pcmd->virt) {
  		elscmd = (uint32_t *) (pcmd->virt);
  		cmd = *elscmd++;
  	}
  
  	if (ndlp && NLP_CHK_NODE_ACT(ndlp))
  		did = ndlp->nlp_DID;
  	else {
  		/* We should only hit this case for retrying PLOGI */
  		did = irsp->un.elsreq64.remoteID;
  		ndlp = lpfc_findnode_did(vport, did);
  		if ((!ndlp || !NLP_CHK_NODE_ACT(ndlp))
  		    && (cmd != ELS_CMD_PLOGI))
  			return 1;
  	}
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Retry ELS:       wd7:x%x wd4:x%x did:x%x",
  		*(((uint32_t *) irsp) + 7), irsp->un.ulpWord[4], ndlp->nlp_DID);
  
  	switch (irsp->ulpStatus) {
  	case IOSTAT_FCP_RSP_ERROR:
  		break;
  	case IOSTAT_REMOTE_STOP:
  		if (phba->sli_rev == LPFC_SLI_REV4) {
  			/* This IO was aborted by the target, we don't
  			 * know the rxid and because we did not send the
  			 * ABTS we cannot generate and RRQ.
  			 */
  			lpfc_set_rrq_active(phba, ndlp,
  					 cmdiocb->sli4_lxritag, 0, 0);
  		}
  		break;
  	case IOSTAT_LOCAL_REJECT:
  		switch ((irsp->un.ulpWord[4] & IOERR_PARAM_MASK)) {
  		case IOERR_LOOP_OPEN_FAILURE:
  			if (cmd == ELS_CMD_FLOGI) {
  				if (PCI_DEVICE_ID_HORNET ==
  					phba->pcidev->device) {
  					phba->fc_topology = LPFC_TOPOLOGY_LOOP;
  					phba->pport->fc_myDID = 0;
  					phba->alpa_map[0] = 0;
  					phba->alpa_map[1] = 0;
  				}
  			}
  			if (cmd == ELS_CMD_PLOGI && cmdiocb->retry == 0)
  				delay = 1000;
  			retry = 1;
  			break;
  
  		case IOERR_ILLEGAL_COMMAND:
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  					 "0124 Retry illegal cmd x%x "
  					 "retry:x%x delay:x%x\n",
  					 cmd, cmdiocb->retry, delay);
  			retry = 1;
  			/* All command's retry policy */
  			maxretry = 8;
  			if (cmdiocb->retry > 2)
  				delay = 1000;
  			break;
  
  		case IOERR_NO_RESOURCES:
  			logerr = 1; /* HBA out of resources */
  			retry = 1;
  			if (cmdiocb->retry > 100)
  				delay = 100;
  			maxretry = 250;
  			break;
  
  		case IOERR_ILLEGAL_FRAME:
  			delay = 100;
  			retry = 1;
  			break;
  
  		case IOERR_INVALID_RPI:
  			if (cmd == ELS_CMD_PLOGI &&
  			    did == NameServer_DID) {
  				/* Continue forever if plogi to */
  				/* the nameserver fails */
  				maxretry = 0;
  				delay = 100;
  			}
  			retry = 1;
  			break;
  
  		case IOERR_SEQUENCE_TIMEOUT:
  			if (cmd == ELS_CMD_PLOGI &&
  			    did == NameServer_DID &&
  			    (cmdiocb->retry + 1) == maxretry) {
  				/* Reset the Link */
  				link_reset = 1;
  				break;
  			}
  			retry = 1;
  			delay = 100;
  			break;
  		}
  		break;
  
  	case IOSTAT_NPORT_RJT:
  	case IOSTAT_FABRIC_RJT:
  		if (irsp->un.ulpWord[4] & RJT_UNAVAIL_TEMP) {
  			retry = 1;
  			break;
  		}
  		break;
  
  	case IOSTAT_NPORT_BSY:
  	case IOSTAT_FABRIC_BSY:
  		logerr = 1; /* Fabric / Remote NPort out of resources */
  		retry = 1;
  		break;
  
  	case IOSTAT_LS_RJT:
  		stat.un.lsRjtError = be32_to_cpu(irsp->un.ulpWord[4]);
  		/* Added for Vendor specifc support
  		 * Just keep retrying for these Rsn / Exp codes
  		 */
  		switch (stat.un.b.lsRjtRsnCode) {
  		case LSRJT_UNABLE_TPC:
  			/* The driver has a VALID PLOGI but the rport has
  			 * rejected the PRLI - can't do it now.  Delay
  			 * for 1 second and try again - don't care about
  			 * the explanation.
  			 */
  			if (cmd == ELS_CMD_PRLI || cmd == ELS_CMD_NVMEPRLI) {
  				delay = 1000;
  				maxretry = lpfc_max_els_tries + 1;
  				retry = 1;
  				break;
  			}
  
  			/* Legacy bug fix code for targets with PLOGI delays. */
  			if (stat.un.b.lsRjtRsnCodeExp ==
  			    LSEXP_CMD_IN_PROGRESS) {
  				if (cmd == ELS_CMD_PLOGI) {
  					delay = 1000;
  					maxretry = 48;
  				}
  				retry = 1;
  				break;
  			}
  			if (stat.un.b.lsRjtRsnCodeExp ==
  			    LSEXP_CANT_GIVE_DATA) {
  				if (cmd == ELS_CMD_PLOGI) {
  					delay = 1000;
  					maxretry = 48;
  				}
  				retry = 1;
  				break;
  			}
  			if (cmd == ELS_CMD_PLOGI) {
  				delay = 1000;
  				maxretry = lpfc_max_els_tries + 1;
  				retry = 1;
  				break;
  			}
  			if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
  			  (cmd == ELS_CMD_FDISC) &&
  			  (stat.un.b.lsRjtRsnCodeExp == LSEXP_OUT_OF_RESOURCE)){
  				lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  						 "0125 FDISC Failed (x%x). "
  						 "Fabric out of resources\n",
  						 stat.un.lsRjtError);
  				lpfc_vport_set_state(vport,
  						     FC_VPORT_NO_FABRIC_RSCS);
  			}
  			break;
  
  		case LSRJT_LOGICAL_BSY:
  			if ((cmd == ELS_CMD_PLOGI) ||
  			    (cmd == ELS_CMD_PRLI) ||
  			    (cmd == ELS_CMD_NVMEPRLI)) {
  				delay = 1000;
  				maxretry = 48;
  			} else if (cmd == ELS_CMD_FDISC) {
  				/* FDISC retry policy */
  				maxretry = 48;
  				if (cmdiocb->retry >= 32)
  					delay = 1000;
  			}
  			retry = 1;
  			break;
  
  		case LSRJT_LOGICAL_ERR:
  			/* There are some cases where switches return this
  			 * error when they are not ready and should be returning
  			 * Logical Busy. We should delay every time.
  			 */
  			if (cmd == ELS_CMD_FDISC &&
  			    stat.un.b.lsRjtRsnCodeExp == LSEXP_PORT_LOGIN_REQ) {
  				maxretry = 3;
  				delay = 1000;
  				retry = 1;
  			} else if (cmd == ELS_CMD_FLOGI &&
  				   stat.un.b.lsRjtRsnCodeExp ==
  						LSEXP_NOTHING_MORE) {
  				vport->fc_sparam.cmn.bbRcvSizeMsb &= 0xf;
  				retry = 1;
  				lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  						 "0820 FLOGI Failed (x%x). "
  						 "BBCredit Not Supported\n",
  						 stat.un.lsRjtError);
  			}
  			break;
  
  		case LSRJT_PROTOCOL_ERR:
  			if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
  			  (cmd == ELS_CMD_FDISC) &&
  			  ((stat.un.b.lsRjtRsnCodeExp == LSEXP_INVALID_PNAME) ||
  			  (stat.un.b.lsRjtRsnCodeExp == LSEXP_INVALID_NPORT_ID))
  			  ) {
  				lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  						 "0122 FDISC Failed (x%x). "
  						 "Fabric Detected Bad WWN\n",
  						 stat.un.lsRjtError);
  				lpfc_vport_set_state(vport,
  						     FC_VPORT_FABRIC_REJ_WWN);
  			}
  			break;
  		case LSRJT_VENDOR_UNIQUE:
  			if ((stat.un.b.vendorUnique == 0x45) &&
  			    (cmd == ELS_CMD_FLOGI)) {
  				goto out_retry;
  			}
  			break;
  		case LSRJT_CMD_UNSUPPORTED:
  			/* lpfc nvmet returns this type of LS_RJT when it
  			 * receives an FCP PRLI because lpfc nvmet only
  			 * support NVME.  ELS request is terminated for FCP4
  			 * on this rport.
  			 */
  			if (stat.un.b.lsRjtRsnCodeExp ==
  			    LSEXP_REQ_UNSUPPORTED && cmd == ELS_CMD_PRLI) {
  				spin_lock_irq(shost->host_lock);
  				ndlp->nlp_flag |= NLP_FCP_PRLI_RJT;
  				spin_unlock_irq(shost->host_lock);
  				retry = 0;
  				goto out_retry;
  			}
  			break;
  		}
  		break;
  
  	case IOSTAT_INTERMED_RSP:
  	case IOSTAT_BA_RJT:
  		break;
  
  	default:
  		break;
  	}
  
  	if (link_reset) {
  		rc = lpfc_link_reset(vport);
  		if (rc) {
  			/* Do not give up. Retry PLOGI one more time and attempt
  			 * link reset if PLOGI fails again.
  			 */
  			retry = 1;
  			delay = 100;
  			goto out_retry;
  		}
  		return 1;
  	}
  
  	if (did == FDMI_DID)
  		retry = 1;
  
  	if ((cmd == ELS_CMD_FLOGI) &&
  	    (phba->fc_topology != LPFC_TOPOLOGY_LOOP) &&
  	    !lpfc_error_lost_link(irsp)) {
  		/* FLOGI retry policy */
  		retry = 1;
  		/* retry FLOGI forever */
  		if (phba->link_flag != LS_LOOPBACK_MODE)
  			maxretry = 0;
  		else
  			maxretry = 2;
  
  		if (cmdiocb->retry >= 100)
  			delay = 5000;
  		else if (cmdiocb->retry >= 32)
  			delay = 1000;
  	} else if ((cmd == ELS_CMD_FDISC) && !lpfc_error_lost_link(irsp)) {
  		/* retry FDISCs every second up to devloss */
  		retry = 1;
  		maxretry = vport->cfg_devloss_tmo;
  		delay = 1000;
  	}
  
  	cmdiocb->retry++;
  	if (maxretry && (cmdiocb->retry >= maxretry)) {
  		phba->fc_stat.elsRetryExceeded++;
  		retry = 0;
  	}
  
  	if ((vport->load_flag & FC_UNLOADING) != 0)
  		retry = 0;
  
  out_retry:
  	if (retry) {
  		if ((cmd == ELS_CMD_PLOGI) || (cmd == ELS_CMD_FDISC)) {
  			/* Stop retrying PLOGI and FDISC if in FCF discovery */
  			if (phba->fcf.fcf_flag & FCF_DISCOVERY) {
  				lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  						 "2849 Stop retry ELS command "
  						 "x%x to remote NPORT x%x, "
  						 "Data: x%x x%x\n", cmd, did,
  						 cmdiocb->retry, delay);
  				return 0;
  			}
  		}
  
  		/* Retry ELS command <elsCmd> to remote NPORT <did> */
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  				 "0107 Retry ELS command x%x to remote "
  				 "NPORT x%x Data: x%x x%x\n",
  				 cmd, did, cmdiocb->retry, delay);
  
  		if (((cmd == ELS_CMD_PLOGI) || (cmd == ELS_CMD_ADISC)) &&
  			((irsp->ulpStatus != IOSTAT_LOCAL_REJECT) ||
  			((irsp->un.ulpWord[4] & IOERR_PARAM_MASK) !=
  			IOERR_NO_RESOURCES))) {
  			/* Don't reset timer for no resources */
  
  			/* If discovery / RSCN timer is running, reset it */
  			if (timer_pending(&vport->fc_disctmo) ||
  			    (vport->fc_flag & FC_RSCN_MODE))
  				lpfc_set_disctmo(vport);
  		}
  
  		phba->fc_stat.elsXmitRetry++;
  		if (ndlp && NLP_CHK_NODE_ACT(ndlp) && delay) {
  			phba->fc_stat.elsDelayRetry++;
  			ndlp->nlp_retry = cmdiocb->retry;
  
  			/* delay is specified in milliseconds */
  			mod_timer(&ndlp->nlp_delayfunc,
  				jiffies + msecs_to_jiffies(delay));
  			spin_lock_irq(shost->host_lock);
  			ndlp->nlp_flag |= NLP_DELAY_TMO;
  			spin_unlock_irq(shost->host_lock);
  
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			if ((cmd == ELS_CMD_PRLI) ||
  			    (cmd == ELS_CMD_NVMEPRLI))
  				lpfc_nlp_set_state(vport, ndlp,
  					NLP_STE_PRLI_ISSUE);
  			else
  				lpfc_nlp_set_state(vport, ndlp,
  					NLP_STE_NPR_NODE);
  			ndlp->nlp_last_elscmd = cmd;
  
  			return 1;
  		}
  		switch (cmd) {
  		case ELS_CMD_FLOGI:
  			lpfc_issue_els_flogi(vport, ndlp, cmdiocb->retry);
  			return 1;
  		case ELS_CMD_FDISC:
  			lpfc_issue_els_fdisc(vport, ndlp, cmdiocb->retry);
  			return 1;
  		case ELS_CMD_PLOGI:
  			if (ndlp && NLP_CHK_NODE_ACT(ndlp)) {
  				ndlp->nlp_prev_state = ndlp->nlp_state;
  				lpfc_nlp_set_state(vport, ndlp,
  						   NLP_STE_PLOGI_ISSUE);
  			}
  			lpfc_issue_els_plogi(vport, did, cmdiocb->retry);
  			return 1;
  		case ELS_CMD_ADISC:
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_ADISC_ISSUE);
  			lpfc_issue_els_adisc(vport, ndlp, cmdiocb->retry);
  			return 1;
  		case ELS_CMD_PRLI:
  		case ELS_CMD_NVMEPRLI:
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_PRLI_ISSUE);
  			lpfc_issue_els_prli(vport, ndlp, cmdiocb->retry);
  			return 1;
  		case ELS_CMD_LOGO:
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_LOGO_ISSUE);
  			lpfc_issue_els_logo(vport, ndlp, cmdiocb->retry);
  			return 1;
  		}
  	}
  	/* No retry ELS command <elsCmd> to remote NPORT <did> */
  	if (logerr) {
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  			 "0137 No retry ELS command x%x to remote "
  			 "NPORT x%x: Out of Resources: Error:x%x/%x\n",
  			 cmd, did, irsp->ulpStatus,
  			 irsp->un.ulpWord[4]);
  	}
  	else {
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0108 No retry ELS command x%x to remote "
  			 "NPORT x%x Retried:%d Error:x%x/%x\n",
  			 cmd, did, cmdiocb->retry, irsp->ulpStatus,
  			 irsp->un.ulpWord[4]);
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_free_data - Free lpfc dma buffer and data structure with an iocb
   * @phba: pointer to lpfc hba data structure.
   * @buf_ptr1: pointer to the lpfc DMA buffer data structure.
   *
   * This routine releases the lpfc DMA (Direct Memory Access) buffer(s)
   * associated with a command IOCB back to the lpfc DMA buffer pool. It first
   * checks to see whether there is a lpfc DMA buffer associated with the
   * response of the command IOCB. If so, it will be released before releasing
   * the lpfc DMA buffer associated with the IOCB itself.
   *
   * Return code
   *   0 - Successfully released lpfc DMA buffer (currently, always return 0)
   **/
  static int
  lpfc_els_free_data(struct lpfc_hba *phba, struct lpfc_dmabuf *buf_ptr1)
  {
  	struct lpfc_dmabuf *buf_ptr;
  
  	/* Free the response before processing the command. */
  	if (!list_empty(&buf_ptr1->list)) {
  		list_remove_head(&buf_ptr1->list, buf_ptr,
  				 struct lpfc_dmabuf,
  				 list);
  		lpfc_mbuf_free(phba, buf_ptr->virt, buf_ptr->phys);
  		kfree(buf_ptr);
  	}
  	lpfc_mbuf_free(phba, buf_ptr1->virt, buf_ptr1->phys);
  	kfree(buf_ptr1);
  	return 0;
  }
  
  /**
   * lpfc_els_free_bpl - Free lpfc dma buffer and data structure with bpl
   * @phba: pointer to lpfc hba data structure.
   * @buf_ptr: pointer to the lpfc dma buffer data structure.
   *
   * This routine releases the lpfc Direct Memory Access (DMA) buffer
   * associated with a Buffer Pointer List (BPL) back to the lpfc DMA buffer
   * pool.
   *
   * Return code
   *   0 - Successfully released lpfc DMA buffer (currently, always return 0)
   **/
  static int
  lpfc_els_free_bpl(struct lpfc_hba *phba, struct lpfc_dmabuf *buf_ptr)
  {
  	lpfc_mbuf_free(phba, buf_ptr->virt, buf_ptr->phys);
  	kfree(buf_ptr);
  	return 0;
  }
  
  /**
   * lpfc_els_free_iocb - Free a command iocb and its associated resources
   * @phba: pointer to lpfc hba data structure.
   * @elsiocb: pointer to lpfc els command iocb data structure.
   *
   * This routine frees a command IOCB and its associated resources. The
   * command IOCB data structure contains the reference to various associated
   * resources, these fields must be set to NULL if the associated reference
   * not present:
   *   context1 - reference to ndlp
   *   context2 - reference to cmd
   *   context2->next - reference to rsp
   *   context3 - reference to bpl
   *
   * It first properly decrements the reference count held on ndlp for the
   * IOCB completion callback function. If LPFC_DELAY_MEM_FREE flag is not
   * set, it invokes the lpfc_els_free_data() routine to release the Direct
   * Memory Access (DMA) buffers associated with the IOCB. Otherwise, it
   * adds the DMA buffer the @phba data structure for the delayed release.
   * If reference to the Buffer Pointer List (BPL) is present, the
   * lpfc_els_free_bpl() routine is invoked to release the DMA memory
   * associated with BPL. Finally, the lpfc_sli_release_iocbq() routine is
   * invoked to release the IOCB data structure back to @phba IOCBQ list.
   *
   * Return code
   *   0 - Success (currently, always return 0)
   **/
  int
  lpfc_els_free_iocb(struct lpfc_hba *phba, struct lpfc_iocbq *elsiocb)
  {
  	struct lpfc_dmabuf *buf_ptr, *buf_ptr1;
  	struct lpfc_nodelist *ndlp;
  
  	ndlp = (struct lpfc_nodelist *)elsiocb->context1;
  	if (ndlp) {
  		if (ndlp->nlp_flag & NLP_DEFER_RM) {
  			lpfc_nlp_put(ndlp);
  
  			/* If the ndlp is not being used by another discovery
  			 * thread, free it.
  			 */
  			if (!lpfc_nlp_not_used(ndlp)) {
  				/* If ndlp is being used by another discovery
  				 * thread, just clear NLP_DEFER_RM
  				 */
  				ndlp->nlp_flag &= ~NLP_DEFER_RM;
  			}
  		}
  		else
  			lpfc_nlp_put(ndlp);
  		elsiocb->context1 = NULL;
  	}
  	/* context2  = cmd,  context2->next = rsp, context3 = bpl */
  	if (elsiocb->context2) {
  		if (elsiocb->iocb_flag & LPFC_DELAY_MEM_FREE) {
  			/* Firmware could still be in progress of DMAing
  			 * payload, so don't free data buffer till after
  			 * a hbeat.
  			 */
  			elsiocb->iocb_flag &= ~LPFC_DELAY_MEM_FREE;
  			buf_ptr = elsiocb->context2;
  			elsiocb->context2 = NULL;
  			if (buf_ptr) {
  				buf_ptr1 = NULL;
  				spin_lock_irq(&phba->hbalock);
  				if (!list_empty(&buf_ptr->list)) {
  					list_remove_head(&buf_ptr->list,
  						buf_ptr1, struct lpfc_dmabuf,
  						list);
  					INIT_LIST_HEAD(&buf_ptr1->list);
  					list_add_tail(&buf_ptr1->list,
  						&phba->elsbuf);
  					phba->elsbuf_cnt++;
  				}
  				INIT_LIST_HEAD(&buf_ptr->list);
  				list_add_tail(&buf_ptr->list, &phba->elsbuf);
  				phba->elsbuf_cnt++;
  				spin_unlock_irq(&phba->hbalock);
  			}
  		} else {
  			buf_ptr1 = (struct lpfc_dmabuf *) elsiocb->context2;
  			lpfc_els_free_data(phba, buf_ptr1);
  			elsiocb->context2 = NULL;
  		}
  	}
  
  	if (elsiocb->context3) {
  		buf_ptr = (struct lpfc_dmabuf *) elsiocb->context3;
  		lpfc_els_free_bpl(phba, buf_ptr);
  		elsiocb->context3 = NULL;
  	}
  	lpfc_sli_release_iocbq(phba, elsiocb);
  	return 0;
  }
  
  /**
   * lpfc_cmpl_els_logo_acc - Completion callback function to logo acc response
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the completion callback function to the Logout (LOGO)
   * Accept (ACC) Response ELS command. This routine is invoked to indicate
   * the completion of the LOGO process. It invokes the lpfc_nlp_not_used() to
   * release the ndlp if it has the last reference remaining (reference count
   * is 1). If succeeded (meaning ndlp released), it sets the IOCB context1
   * field to NULL to inform the following lpfc_els_free_iocb() routine no
   * ndlp reference count needs to be decremented. Otherwise, the ndlp
   * reference use-count shall be decremented by the lpfc_els_free_iocb()
   * routine. Finally, the lpfc_els_free_iocb() is invoked to release the
   * IOCB data structure.
   **/
  static void
  lpfc_cmpl_els_logo_acc(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		       struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
  	struct lpfc_vport *vport = cmdiocb->vport;
  	IOCB_t *irsp;
  
  	irsp = &rspiocb->iocb;
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  		"ACC LOGO cmpl:   status:x%x/x%x did:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4], ndlp->nlp_DID);
  	/* ACC to LOGO completes to NPort <nlp_DID> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0109 ACC to LOGO completes to NPort x%x "
  			 "Data: x%x x%x x%x\n",
  			 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			 ndlp->nlp_rpi);
  
  	if (ndlp->nlp_state == NLP_STE_NPR_NODE) {
  		/* NPort Recovery mode or node is just allocated */
  		if (!lpfc_nlp_not_used(ndlp)) {
  			/* If the ndlp is being used by another discovery
  			 * thread, just unregister the RPI.
  			 */
  			lpfc_unreg_rpi(vport, ndlp);
  		} else {
  			/* Indicate the node has already released, should
  			 * not reference to it from within lpfc_els_free_iocb.
  			 */
  			cmdiocb->context1 = NULL;
  		}
  	}
  
  	/*
  	 * The driver received a LOGO from the rport and has ACK'd it.
  	 * At this point, the driver is done so release the IOCB
  	 */
  	lpfc_els_free_iocb(phba, cmdiocb);
  }
  
  /**
   * lpfc_mbx_cmpl_dflt_rpi - Completion callbk func for unreg dflt rpi mbox cmd
   * @phba: pointer to lpfc hba data structure.
   * @pmb: pointer to the driver internal queue element for mailbox command.
   *
   * This routine is the completion callback function for unregister default
   * RPI (Remote Port Index) mailbox command to the @phba. It simply releases
   * the associated lpfc Direct Memory Access (DMA) buffer back to the pool and
   * decrements the ndlp reference count held for this completion callback
   * function. After that, it invokes the lpfc_nlp_not_used() to check
   * whether there is only one reference left on the ndlp. If so, it will
   * perform one more decrement and trigger the release of the ndlp.
   **/
  void
  lpfc_mbx_cmpl_dflt_rpi(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
  {
  	struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *)(pmb->ctx_buf);
  	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *)pmb->ctx_ndlp;
  
  	pmb->ctx_buf = NULL;
  	pmb->ctx_ndlp = NULL;
  
  	lpfc_mbuf_free(phba, mp->virt, mp->phys);
  	kfree(mp);
  	mempool_free(pmb, phba->mbox_mem_pool);
  	if (ndlp) {
  		lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_NODE,
  				 "0006 rpi%x DID:%x flg:%x %d map:%x x%px\n",
  				 ndlp->nlp_rpi, ndlp->nlp_DID, ndlp->nlp_flag,
  				 kref_read(&ndlp->kref),
  				 ndlp->nlp_usg_map, ndlp);
  		if (NLP_CHK_NODE_ACT(ndlp)) {
  			lpfc_nlp_put(ndlp);
  			/* This is the end of the default RPI cleanup logic for
  			 * this ndlp. If no other discovery threads are using
  			 * this ndlp, free all resources associated with it.
  			 */
  			lpfc_nlp_not_used(ndlp);
  		} else {
  			lpfc_drop_node(ndlp->vport, ndlp);
  		}
  	}
  
  	return;
  }
  
  /**
   * lpfc_cmpl_els_rsp - Completion callback function for els response iocb cmd
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the completion callback function for ELS Response IOCB
   * command. In normal case, this callback function just properly sets the
   * nlp_flag bitmap in the ndlp data structure, if the mbox command reference
   * field in the command IOCB is not NULL, the referred mailbox command will
   * be send out, and then invokes the lpfc_els_free_iocb() routine to release
   * the IOCB. Under error conditions, such as when a LS_RJT is returned or a
   * link down event occurred during the discovery, the lpfc_nlp_not_used()
   * routine shall be invoked trying to release the ndlp if no other threads
   * are currently referring it.
   **/
  static void
  lpfc_cmpl_els_rsp(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		  struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
  	struct lpfc_vport *vport = ndlp ? ndlp->vport : NULL;
  	struct Scsi_Host  *shost = vport ? lpfc_shost_from_vport(vport) : NULL;
  	IOCB_t  *irsp;
  	uint8_t *pcmd;
  	LPFC_MBOXQ_t *mbox = NULL;
  	struct lpfc_dmabuf *mp = NULL;
  	uint32_t ls_rjt = 0;
  
  	irsp = &rspiocb->iocb;
  
  	if (cmdiocb->context_un.mbox)
  		mbox = cmdiocb->context_un.mbox;
  
  	/* First determine if this is a LS_RJT cmpl. Note, this callback
  	 * function can have cmdiocb->contest1 (ndlp) field set to NULL.
  	 */
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) cmdiocb->context2)->virt);
  	if (ndlp && NLP_CHK_NODE_ACT(ndlp) &&
  	    (*((uint32_t *) (pcmd)) == ELS_CMD_LS_RJT)) {
  		/* A LS_RJT associated with Default RPI cleanup has its own
  		 * separate code path.
  		 */
  		if (!(ndlp->nlp_flag & NLP_RM_DFLT_RPI))
  			ls_rjt = 1;
  	}
  
  	/* Check to see if link went down during discovery */
  	if (!ndlp || !NLP_CHK_NODE_ACT(ndlp) || lpfc_els_chk_latt(vport)) {
  		if (mbox) {
  			mp = (struct lpfc_dmabuf *)mbox->ctx_buf;
  			if (mp) {
  				lpfc_mbuf_free(phba, mp->virt, mp->phys);
  				kfree(mp);
  			}
  			mempool_free(mbox, phba->mbox_mem_pool);
  		}
  		if (ndlp && NLP_CHK_NODE_ACT(ndlp) &&
  		    (ndlp->nlp_flag & NLP_RM_DFLT_RPI))
  			if (lpfc_nlp_not_used(ndlp)) {
  				ndlp = NULL;
  				/* Indicate the node has already released,
  				 * should not reference to it from within
  				 * the routine lpfc_els_free_iocb.
  				 */
  				cmdiocb->context1 = NULL;
  			}
  		goto out;
  	}
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  		"ELS rsp cmpl:    status:x%x/x%x did:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4],
  		cmdiocb->iocb.un.elsreq64.remoteID);
  	/* ELS response tag <ulpIoTag> completes */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0110 ELS response tag x%x completes "
  			 "Data: x%x x%x x%x x%x x%x x%x x%x\n",
  			 cmdiocb->iocb.ulpIoTag, rspiocb->iocb.ulpStatus,
  			 rspiocb->iocb.un.ulpWord[4], rspiocb->iocb.ulpTimeout,
  			 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			 ndlp->nlp_rpi);
  	if (mbox) {
  		if ((rspiocb->iocb.ulpStatus == 0)
  		    && (ndlp->nlp_flag & NLP_ACC_REGLOGIN)) {
  			if (!lpfc_unreg_rpi(vport, ndlp) &&
  			    (!(vport->fc_flag & FC_PT2PT)) &&
  			    (ndlp->nlp_state ==  NLP_STE_PLOGI_ISSUE ||
  			     ndlp->nlp_state == NLP_STE_REG_LOGIN_ISSUE)) {
  				lpfc_printf_vlog(vport, KERN_INFO,
  					LOG_DISCOVERY,
  					"0314 PLOGI recov DID x%x "
  					"Data: x%x x%x x%x\n",
  					ndlp->nlp_DID, ndlp->nlp_state,
  					ndlp->nlp_rpi, ndlp->nlp_flag);
  				mp = mbox->ctx_buf;
  				if (mp) {
  					lpfc_mbuf_free(phba, mp->virt,
  						       mp->phys);
  					kfree(mp);
  				}
  				mempool_free(mbox, phba->mbox_mem_pool);
  				goto out;
  			}
  
  			/* Increment reference count to ndlp to hold the
  			 * reference to ndlp for the callback function.
  			 */
  			mbox->ctx_ndlp = lpfc_nlp_get(ndlp);
  			mbox->vport = vport;
  			if (ndlp->nlp_flag & NLP_RM_DFLT_RPI) {
  				mbox->mbox_flag |= LPFC_MBX_IMED_UNREG;
  				mbox->mbox_cmpl = lpfc_mbx_cmpl_dflt_rpi;
  			}
  			else {
  				mbox->mbox_cmpl = lpfc_mbx_cmpl_reg_login;
  				ndlp->nlp_prev_state = ndlp->nlp_state;
  				lpfc_nlp_set_state(vport, ndlp,
  					   NLP_STE_REG_LOGIN_ISSUE);
  			}
  
  			ndlp->nlp_flag |= NLP_REG_LOGIN_SEND;
  			if (lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT)
  			    != MBX_NOT_FINISHED)
  				goto out;
  
  			/* Decrement the ndlp reference count we
  			 * set for this failed mailbox command.
  			 */
  			lpfc_nlp_put(ndlp);
  			ndlp->nlp_flag &= ~NLP_REG_LOGIN_SEND;
  
  			/* ELS rsp: Cannot issue reg_login for <NPortid> */
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				"0138 ELS rsp: Cannot issue reg_login for x%x "
  				"Data: x%x x%x x%x\n",
  				ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  				ndlp->nlp_rpi);
  
  			if (lpfc_nlp_not_used(ndlp)) {
  				ndlp = NULL;
  				/* Indicate node has already been released,
  				 * should not reference to it from within
  				 * the routine lpfc_els_free_iocb.
  				 */
  				cmdiocb->context1 = NULL;
  			}
  		} else {
  			/* Do not drop node for lpfc_els_abort'ed ELS cmds */
  			if (!lpfc_error_lost_link(irsp) &&
  			    ndlp->nlp_flag & NLP_ACC_REGLOGIN) {
  				if (lpfc_nlp_not_used(ndlp)) {
  					ndlp = NULL;
  					/* Indicate node has already been
  					 * released, should not reference
  					 * to it from within the routine
  					 * lpfc_els_free_iocb.
  					 */
  					cmdiocb->context1 = NULL;
  				}
  			}
  		}
  		mp = (struct lpfc_dmabuf *)mbox->ctx_buf;
  		if (mp) {
  			lpfc_mbuf_free(phba, mp->virt, mp->phys);
  			kfree(mp);
  		}
  		mempool_free(mbox, phba->mbox_mem_pool);
  	}
  out:
  	if (ndlp && NLP_CHK_NODE_ACT(ndlp) && shost) {
  		spin_lock_irq(shost->host_lock);
  		ndlp->nlp_flag &= ~(NLP_ACC_REGLOGIN | NLP_RM_DFLT_RPI);
  		spin_unlock_irq(shost->host_lock);
  
  		/* If the node is not being used by another discovery thread,
  		 * and we are sending a reject, we are done with it.
  		 * Release driver reference count here and free associated
  		 * resources.
  		 */
  		if (ls_rjt)
  			if (lpfc_nlp_not_used(ndlp))
  				/* Indicate node has already been released,
  				 * should not reference to it from within
  				 * the routine lpfc_els_free_iocb.
  				 */
  				cmdiocb->context1 = NULL;
  
  	}
  
  	lpfc_els_free_iocb(phba, cmdiocb);
  	return;
  }
  
  /**
   * lpfc_els_rsp_acc - Prepare and issue an acc response iocb command
   * @vport: pointer to a host virtual N_Port data structure.
   * @flag: the els command code to be accepted.
   * @oldiocb: pointer to the original lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   * @mbox: pointer to the driver internal queue element for mailbox command.
   *
   * This routine prepares and issues an Accept (ACC) response IOCB
   * command. It uses the @flag to properly set up the IOCB field for the
   * specific ACC response command to be issued and invokes the
   * lpfc_sli_issue_iocb() routine to send out ACC response IOCB. If a
   * @mbox pointer is passed in, it will be put into the context_un.mbox
   * field of the IOCB for the completion callback function to issue the
   * mailbox command to the HBA later when callback is invoked.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the corresponding response ELS IOCB command.
   *
   * Return code
   *   0 - Successfully issued acc response
   *   1 - Failed to issue acc response
   **/
  int
  lpfc_els_rsp_acc(struct lpfc_vport *vport, uint32_t flag,
  		 struct lpfc_iocbq *oldiocb, struct lpfc_nodelist *ndlp,
  		 LPFC_MBOXQ_t *mbox)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	IOCB_t *icmd;
  	IOCB_t *oldcmd;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	struct serv_parm *sp;
  	uint16_t cmdsize;
  	int rc;
  	ELS_PKT *els_pkt_ptr;
  
  	oldcmd = &oldiocb->iocb;
  
  	switch (flag) {
  	case ELS_CMD_ACC:
  		cmdsize = sizeof(uint32_t);
  		elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry,
  					     ndlp, ndlp->nlp_DID, ELS_CMD_ACC);
  		if (!elsiocb) {
  			spin_lock_irq(shost->host_lock);
  			ndlp->nlp_flag &= ~NLP_LOGO_ACC;
  			spin_unlock_irq(shost->host_lock);
  			return 1;
  		}
  
  		icmd = &elsiocb->iocb;
  		icmd->ulpContext = oldcmd->ulpContext;	/* Xri / rx_id */
  		icmd->unsli3.rcvsli3.ox_id = oldcmd->unsli3.rcvsli3.ox_id;
  		pcmd = (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  		*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  		pcmd += sizeof(uint32_t);
  
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  			"Issue ACC:       did:x%x flg:x%x",
  			ndlp->nlp_DID, ndlp->nlp_flag, 0);
  		break;
  	case ELS_CMD_FLOGI:
  	case ELS_CMD_PLOGI:
  		cmdsize = (sizeof(struct serv_parm) + sizeof(uint32_t));
  		elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry,
  					     ndlp, ndlp->nlp_DID, ELS_CMD_ACC);
  		if (!elsiocb)
  			return 1;
  
  		icmd = &elsiocb->iocb;
  		icmd->ulpContext = oldcmd->ulpContext;	/* Xri / rx_id */
  		icmd->unsli3.rcvsli3.ox_id = oldcmd->unsli3.rcvsli3.ox_id;
  		pcmd = (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  		if (mbox)
  			elsiocb->context_un.mbox = mbox;
  
  		*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  		pcmd += sizeof(uint32_t);
  		sp = (struct serv_parm *)pcmd;
  
  		if (flag == ELS_CMD_FLOGI) {
  			/* Copy the received service parameters back */
  			memcpy(sp, &phba->fc_fabparam,
  			       sizeof(struct serv_parm));
  
  			/* Clear the F_Port bit */
  			sp->cmn.fPort = 0;
  
  			/* Mark all class service parameters as invalid */
  			sp->cls1.classValid = 0;
  			sp->cls2.classValid = 0;
  			sp->cls3.classValid = 0;
  			sp->cls4.classValid = 0;
  
  			/* Copy our worldwide names */
  			memcpy(&sp->portName, &vport->fc_sparam.portName,
  			       sizeof(struct lpfc_name));
  			memcpy(&sp->nodeName, &vport->fc_sparam.nodeName,
  			       sizeof(struct lpfc_name));
  		} else {
  			memcpy(pcmd, &vport->fc_sparam,
  			       sizeof(struct serv_parm));
  
  			sp->cmn.valid_vendor_ver_level = 0;
  			memset(sp->un.vendorVersion, 0,
  			       sizeof(sp->un.vendorVersion));
  			sp->cmn.bbRcvSizeMsb &= 0xF;
  
  			/* If our firmware supports this feature, convey that
  			 * info to the target using the vendor specific field.
  			 */
  			if (phba->sli.sli_flag & LPFC_SLI_SUPPRESS_RSP) {
  				sp->cmn.valid_vendor_ver_level = 1;
  				sp->un.vv.vid = cpu_to_be32(LPFC_VV_EMLX_ID);
  				sp->un.vv.flags =
  					cpu_to_be32(LPFC_VV_SUPPRESS_RSP);
  			}
  		}
  
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  			"Issue ACC FLOGI/PLOGI: did:x%x flg:x%x",
  			ndlp->nlp_DID, ndlp->nlp_flag, 0);
  		break;
  	case ELS_CMD_PRLO:
  		cmdsize = sizeof(uint32_t) + sizeof(PRLO);
  		elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry,
  					     ndlp, ndlp->nlp_DID, ELS_CMD_PRLO);
  		if (!elsiocb)
  			return 1;
  
  		icmd = &elsiocb->iocb;
  		icmd->ulpContext = oldcmd->ulpContext;	/* Xri / rx_id */
  		icmd->unsli3.rcvsli3.ox_id = oldcmd->unsli3.rcvsli3.ox_id;
  		pcmd = (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  		memcpy(pcmd, ((struct lpfc_dmabuf *) oldiocb->context2)->virt,
  		       sizeof(uint32_t) + sizeof(PRLO));
  		*((uint32_t *) (pcmd)) = ELS_CMD_PRLO_ACC;
  		els_pkt_ptr = (ELS_PKT *) pcmd;
  		els_pkt_ptr->un.prlo.acceptRspCode = PRLO_REQ_EXECUTED;
  
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  			"Issue ACC PRLO:  did:x%x flg:x%x",
  			ndlp->nlp_DID, ndlp->nlp_flag, 0);
  		break;
  	default:
  		return 1;
  	}
  	if (ndlp->nlp_flag & NLP_LOGO_ACC) {
  		spin_lock_irq(shost->host_lock);
  		if (!(ndlp->nlp_flag & NLP_RPI_REGISTERED ||
  			ndlp->nlp_flag & NLP_REG_LOGIN_SEND))
  			ndlp->nlp_flag &= ~NLP_LOGO_ACC;
  		spin_unlock_irq(shost->host_lock);
  		elsiocb->iocb_cmpl = lpfc_cmpl_els_logo_acc;
  	} else {
  		elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	}
  
  	phba->fc_stat.elsXmitACC++;
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  	if (rc == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_rsp_reject - Propare and issue a rjt response iocb command
   * @vport: pointer to a virtual N_Port data structure.
   * @rejectError:
   * @oldiocb: pointer to the original lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   * @mbox: pointer to the driver internal queue element for mailbox command.
   *
   * This routine prepares and issue an Reject (RJT) response IOCB
   * command. If a @mbox pointer is passed in, it will be put into the
   * context_un.mbox field of the IOCB for the completion callback function
   * to issue to the HBA later.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the reject response ELS IOCB command.
   *
   * Return code
   *   0 - Successfully issued reject response
   *   1 - Failed to issue reject response
   **/
  int
  lpfc_els_rsp_reject(struct lpfc_vport *vport, uint32_t rejectError,
  		    struct lpfc_iocbq *oldiocb, struct lpfc_nodelist *ndlp,
  		    LPFC_MBOXQ_t *mbox)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	IOCB_t *icmd;
  	IOCB_t *oldcmd;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	int rc;
  
  	cmdsize = 2 * sizeof(uint32_t);
  	elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_LS_RJT);
  	if (!elsiocb)
  		return 1;
  
  	icmd = &elsiocb->iocb;
  	oldcmd = &oldiocb->iocb;
  	icmd->ulpContext = oldcmd->ulpContext;	/* Xri / rx_id */
  	icmd->unsli3.rcvsli3.ox_id = oldcmd->unsli3.rcvsli3.ox_id;
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	*((uint32_t *) (pcmd)) = ELS_CMD_LS_RJT;
  	pcmd += sizeof(uint32_t);
  	*((uint32_t *) (pcmd)) = rejectError;
  
  	if (mbox)
  		elsiocb->context_un.mbox = mbox;
  
  	/* Xmit ELS RJT <err> response tag <ulpIoTag> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0129 Xmit ELS RJT x%x response tag x%x "
  			 "xri x%x, did x%x, nlp_flag x%x, nlp_state x%x, "
  			 "rpi x%x\n",
  			 rejectError, elsiocb->iotag,
  			 elsiocb->iocb.ulpContext, ndlp->nlp_DID,
  			 ndlp->nlp_flag, ndlp->nlp_state, ndlp->nlp_rpi);
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  		"Issue LS_RJT:    did:x%x flg:x%x err:x%x",
  		ndlp->nlp_DID, ndlp->nlp_flag, rejectError);
  
  	phba->fc_stat.elsXmitLSRJT++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  
  	if (rc == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_rsp_adisc_acc - Prepare and issue acc response to adisc iocb cmd
   * @vport: pointer to a virtual N_Port data structure.
   * @oldiocb: pointer to the original lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine prepares and issues an Accept (ACC) response to Address
   * Discover (ADISC) ELS command. It simply prepares the payload of the IOCB
   * and invokes the lpfc_sli_issue_iocb() routine to send out the command.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the ADISC Accept response ELS IOCB command.
   *
   * Return code
   *   0 - Successfully issued acc adisc response
   *   1 - Failed to issue adisc acc response
   **/
  int
  lpfc_els_rsp_adisc_acc(struct lpfc_vport *vport, struct lpfc_iocbq *oldiocb,
  		       struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	ADISC *ap;
  	IOCB_t *icmd, *oldcmd;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	int rc;
  
  	cmdsize = sizeof(uint32_t) + sizeof(ADISC);
  	elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_ACC);
  	if (!elsiocb)
  		return 1;
  
  	icmd = &elsiocb->iocb;
  	oldcmd = &oldiocb->iocb;
  	icmd->ulpContext = oldcmd->ulpContext;	/* Xri / rx_id */
  	icmd->unsli3.rcvsli3.ox_id = oldcmd->unsli3.rcvsli3.ox_id;
  
  	/* Xmit ADISC ACC response tag <ulpIoTag> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0130 Xmit ADISC ACC response iotag x%x xri: "
  			 "x%x, did x%x, nlp_flag x%x, nlp_state x%x rpi x%x\n",
  			 elsiocb->iotag, elsiocb->iocb.ulpContext,
  			 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			 ndlp->nlp_rpi);
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  	pcmd += sizeof(uint32_t);
  
  	ap = (ADISC *) (pcmd);
  	ap->hardAL_PA = phba->fc_pref_ALPA;
  	memcpy(&ap->portName, &vport->fc_portname, sizeof(struct lpfc_name));
  	memcpy(&ap->nodeName, &vport->fc_nodename, sizeof(struct lpfc_name));
  	ap->DID = be32_to_cpu(vport->fc_myDID);
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  		"Issue ACC ADISC: did:x%x flg:x%x",
  		ndlp->nlp_DID, ndlp->nlp_flag, 0);
  
  	phba->fc_stat.elsXmitACC++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  	if (rc == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  
  	/* Xmit ELS ACC response tag <ulpIoTag> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0128 Xmit ELS ACC response Status: x%x, IoTag: x%x, "
  			 "XRI: x%x, DID: x%x, nlp_flag: x%x nlp_state: x%x "
  			 "RPI: x%x, fc_flag x%x\n",
  			 rc, elsiocb->iotag, elsiocb->sli4_xritag,
  			 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			 ndlp->nlp_rpi, vport->fc_flag);
  	return 0;
  }
  
  /**
   * lpfc_els_rsp_prli_acc - Prepare and issue acc response to prli iocb cmd
   * @vport: pointer to a virtual N_Port data structure.
   * @oldiocb: pointer to the original lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine prepares and issues an Accept (ACC) response to Process
   * Login (PRLI) ELS command. It simply prepares the payload of the IOCB
   * and invokes the lpfc_sli_issue_iocb() routine to send out the command.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the PRLI Accept response ELS IOCB command.
   *
   * Return code
   *   0 - Successfully issued acc prli response
   *   1 - Failed to issue acc prli response
   **/
  int
  lpfc_els_rsp_prli_acc(struct lpfc_vport *vport, struct lpfc_iocbq *oldiocb,
  		      struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	PRLI *npr;
  	struct lpfc_nvme_prli *npr_nvme;
  	lpfc_vpd_t *vpd;
  	IOCB_t *icmd;
  	IOCB_t *oldcmd;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	uint32_t prli_fc4_req, *req_payload;
  	struct lpfc_dmabuf *req_buf;
  	int rc;
  	u32 elsrspcmd;
  
  	/* Need the incoming PRLI payload to determine if the ACC is for an
  	 * FC4 or NVME PRLI type.  The PRLI type is at word 1.
  	 */
  	req_buf = (struct lpfc_dmabuf *)oldiocb->context2;
  	req_payload = (((uint32_t *)req_buf->virt) + 1);
  
  	/* PRLI type payload is at byte 3 for FCP or NVME. */
  	prli_fc4_req = be32_to_cpu(*req_payload);
  	prli_fc4_req = (prli_fc4_req >> 24) & 0xff;
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "6127 PRLI_ACC:  Req Type x%x, Word1 x%08x\n",
  			 prli_fc4_req, *((uint32_t *)req_payload));
  
  	if (prli_fc4_req == PRLI_FCP_TYPE) {
  		cmdsize = sizeof(uint32_t) + sizeof(PRLI);
  		elsrspcmd = (ELS_CMD_ACC | (ELS_CMD_PRLI & ~ELS_RSP_MASK));
  	} else if (prli_fc4_req & PRLI_NVME_TYPE) {
  		cmdsize = sizeof(uint32_t) + sizeof(struct lpfc_nvme_prli);
  		elsrspcmd = (ELS_CMD_ACC | (ELS_CMD_NVMEPRLI & ~ELS_RSP_MASK));
  	} else {
  		return 1;
  	}
  
  	elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
  		ndlp->nlp_DID, elsrspcmd);
  	if (!elsiocb)
  		return 1;
  
  	icmd = &elsiocb->iocb;
  	oldcmd = &oldiocb->iocb;
  	icmd->ulpContext = oldcmd->ulpContext;	/* Xri / rx_id */
  	icmd->unsli3.rcvsli3.ox_id = oldcmd->unsli3.rcvsli3.ox_id;
  
  	/* Xmit PRLI ACC response tag <ulpIoTag> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0131 Xmit PRLI ACC response tag x%x xri x%x, "
  			 "did x%x, nlp_flag x%x, nlp_state x%x, rpi x%x\n",
  			 elsiocb->iotag, elsiocb->iocb.ulpContext,
  			 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			 ndlp->nlp_rpi);
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	memset(pcmd, 0, cmdsize);
  
  	*((uint32_t *)(pcmd)) = elsrspcmd;
  	pcmd += sizeof(uint32_t);
  
  	/* For PRLI, remainder of payload is PRLI parameter page */
  	vpd = &phba->vpd;
  
  	if (prli_fc4_req == PRLI_FCP_TYPE) {
  		/*
  		 * If the remote port is a target and our firmware version
  		 * is 3.20 or later, set the following bits for FC-TAPE
  		 * support.
  		 */
  		npr = (PRLI *) pcmd;
  		if ((ndlp->nlp_type & NLP_FCP_TARGET) &&
  		    (vpd->rev.feaLevelHigh >= 0x02)) {
  			npr->ConfmComplAllowed = 1;
  			npr->Retry = 1;
  			npr->TaskRetryIdReq = 1;
  		}
  		npr->acceptRspCode = PRLI_REQ_EXECUTED;
  		npr->estabImagePair = 1;
  		npr->readXferRdyDis = 1;
  		npr->ConfmComplAllowed = 1;
  		npr->prliType = PRLI_FCP_TYPE;
  		npr->initiatorFunc = 1;
  	} else if (prli_fc4_req & PRLI_NVME_TYPE) {
  		/* Respond with an NVME PRLI Type */
  		npr_nvme = (struct lpfc_nvme_prli *) pcmd;
  		bf_set(prli_type_code, npr_nvme, PRLI_NVME_TYPE);
  		bf_set(prli_estabImagePair, npr_nvme, 0);  /* Should be 0 */
  		bf_set(prli_acc_rsp_code, npr_nvme, PRLI_REQ_EXECUTED);
  		if (phba->nvmet_support) {
  			bf_set(prli_tgt, npr_nvme, 1);
  			bf_set(prli_disc, npr_nvme, 1);
  			if (phba->cfg_nvme_enable_fb) {
  				bf_set(prli_fba, npr_nvme, 1);
  
  				/* TBD.  Target mode needs to post buffers
  				 * that support the configured first burst
  				 * byte size.
  				 */
  				bf_set(prli_fb_sz, npr_nvme,
  				       phba->cfg_nvmet_fb_size);
  			}
  		} else {
  			bf_set(prli_init, npr_nvme, 1);
  		}
  
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_NVME_DISC,
  				 "6015 NVME issue PRLI ACC word1 x%08x "
  				 "word4 x%08x word5 x%08x flag x%x, "
  				 "fcp_info x%x nlp_type x%x\n",
  				 npr_nvme->word1, npr_nvme->word4,
  				 npr_nvme->word5, ndlp->nlp_flag,
  				 ndlp->nlp_fcp_info, ndlp->nlp_type);
  		npr_nvme->word1 = cpu_to_be32(npr_nvme->word1);
  		npr_nvme->word4 = cpu_to_be32(npr_nvme->word4);
  		npr_nvme->word5 = cpu_to_be32(npr_nvme->word5);
  	} else
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  				 "6128 Unknown FC_TYPE x%x x%x ndlp x%06x\n",
  				 prli_fc4_req, ndlp->nlp_fc4_type,
  				 ndlp->nlp_DID);
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  		"Issue ACC PRLI:  did:x%x flg:x%x",
  		ndlp->nlp_DID, ndlp->nlp_flag, 0);
  
  	phba->fc_stat.elsXmitACC++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  	if (rc == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_rsp_rnid_acc - Issue rnid acc response iocb command
   * @vport: pointer to a virtual N_Port data structure.
   * @format: rnid command format.
   * @oldiocb: pointer to the original lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine issues a Request Node Identification Data (RNID) Accept
   * (ACC) response. It constructs the RNID ACC response command according to
   * the proper @format and then calls the lpfc_sli_issue_iocb() routine to
   * issue the response. Note that this command does not need to hold the ndlp
   * reference count for the callback. So, the ndlp reference count taken by
   * the lpfc_prep_els_iocb() routine is put back and the context1 field of
   * IOCB is set to NULL to indicate to the lpfc_els_free_iocb() routine that
   * there is no ndlp reference available.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function. However, for the RNID Accept Response ELS command,
   * this is undone later by this routine after the IOCB is allocated.
   *
   * Return code
   *   0 - Successfully issued acc rnid response
   *   1 - Failed to issue acc rnid response
   **/
  static int
  lpfc_els_rsp_rnid_acc(struct lpfc_vport *vport, uint8_t format,
  		      struct lpfc_iocbq *oldiocb, struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	RNID *rn;
  	IOCB_t *icmd, *oldcmd;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	int rc;
  
  	cmdsize = sizeof(uint32_t) + sizeof(uint32_t)
  					+ (2 * sizeof(struct lpfc_name));
  	if (format)
  		cmdsize += sizeof(RNID_TOP_DISC);
  
  	elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_ACC);
  	if (!elsiocb)
  		return 1;
  
  	icmd = &elsiocb->iocb;
  	oldcmd = &oldiocb->iocb;
  	icmd->ulpContext = oldcmd->ulpContext;	/* Xri / rx_id */
  	icmd->unsli3.rcvsli3.ox_id = oldcmd->unsli3.rcvsli3.ox_id;
  
  	/* Xmit RNID ACC response tag <ulpIoTag> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0132 Xmit RNID ACC response tag x%x xri x%x\n",
  			 elsiocb->iotag, elsiocb->iocb.ulpContext);
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  	pcmd += sizeof(uint32_t);
  
  	memset(pcmd, 0, sizeof(RNID));
  	rn = (RNID *) (pcmd);
  	rn->Format = format;
  	rn->CommonLen = (2 * sizeof(struct lpfc_name));
  	memcpy(&rn->portName, &vport->fc_portname, sizeof(struct lpfc_name));
  	memcpy(&rn->nodeName, &vport->fc_nodename, sizeof(struct lpfc_name));
  	switch (format) {
  	case 0:
  		rn->SpecificLen = 0;
  		break;
  	case RNID_TOPOLOGY_DISC:
  		rn->SpecificLen = sizeof(RNID_TOP_DISC);
  		memcpy(&rn->un.topologyDisc.portName,
  		       &vport->fc_portname, sizeof(struct lpfc_name));
  		rn->un.topologyDisc.unitType = RNID_HBA;
  		rn->un.topologyDisc.physPort = 0;
  		rn->un.topologyDisc.attachedNodes = 0;
  		break;
  	default:
  		rn->CommonLen = 0;
  		rn->SpecificLen = 0;
  		break;
  	}
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  		"Issue ACC RNID:  did:x%x flg:x%x",
  		ndlp->nlp_DID, ndlp->nlp_flag, 0);
  
  	phba->fc_stat.elsXmitACC++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  	if (rc == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_clear_rrq - Clear the rq that this rrq describes.
   * @vport: pointer to a virtual N_Port data structure.
   * @iocb: pointer to the lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * Return
   **/
  static void
  lpfc_els_clear_rrq(struct lpfc_vport *vport,
  		   struct lpfc_iocbq *iocb, struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	uint8_t *pcmd;
  	struct RRQ *rrq;
  	uint16_t rxid;
  	uint16_t xri;
  	struct lpfc_node_rrq *prrq;
  
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) iocb->context2)->virt);
  	pcmd += sizeof(uint32_t);
  	rrq = (struct RRQ *)pcmd;
  	rrq->rrq_exchg = be32_to_cpu(rrq->rrq_exchg);
  	rxid = bf_get(rrq_rxid, rrq);
  
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			"2883 Clear RRQ for SID:x%x OXID:x%x RXID:x%x"
  			" x%x x%x\n",
  			be32_to_cpu(bf_get(rrq_did, rrq)),
  			bf_get(rrq_oxid, rrq),
  			rxid,
  			iocb->iotag, iocb->iocb.ulpContext);
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  		"Clear RRQ:  did:x%x flg:x%x exchg:x%.08x",
  		ndlp->nlp_DID, ndlp->nlp_flag, rrq->rrq_exchg);
  	if (vport->fc_myDID == be32_to_cpu(bf_get(rrq_did, rrq)))
  		xri = bf_get(rrq_oxid, rrq);
  	else
  		xri = rxid;
  	prrq = lpfc_get_active_rrq(vport, xri, ndlp->nlp_DID);
  	if (prrq)
  		lpfc_clr_rrq_active(phba, xri, prrq);
  	return;
  }
  
  /**
   * lpfc_els_rsp_echo_acc - Issue echo acc response
   * @vport: pointer to a virtual N_Port data structure.
   * @data: pointer to echo data to return in the accept.
   * @oldiocb: pointer to the original lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * Return code
   *   0 - Successfully issued acc echo response
   *   1 - Failed to issue acc echo response
   **/
  static int
  lpfc_els_rsp_echo_acc(struct lpfc_vport *vport, uint8_t *data,
  		      struct lpfc_iocbq *oldiocb, struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	int rc;
  
  	cmdsize = oldiocb->iocb.unsli3.rcvsli3.acc_len;
  
  	/* The accumulated length can exceed the BPL_SIZE.  For
  	 * now, use this as the limit
  	 */
  	if (cmdsize > LPFC_BPL_SIZE)
  		cmdsize = LPFC_BPL_SIZE;
  	elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_ACC);
  	if (!elsiocb)
  		return 1;
  
  	elsiocb->iocb.ulpContext = oldiocb->iocb.ulpContext;  /* Xri / rx_id */
  	elsiocb->iocb.unsli3.rcvsli3.ox_id = oldiocb->iocb.unsli3.rcvsli3.ox_id;
  
  	/* Xmit ECHO ACC response tag <ulpIoTag> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "2876 Xmit ECHO ACC response tag x%x xri x%x\n",
  			 elsiocb->iotag, elsiocb->iocb.ulpContext);
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  	pcmd += sizeof(uint32_t);
  	memcpy(pcmd, data, cmdsize - sizeof(uint32_t));
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
  		"Issue ACC ECHO:  did:x%x flg:x%x",
  		ndlp->nlp_DID, ndlp->nlp_flag, 0);
  
  	phba->fc_stat.elsXmitACC++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  	if (rc == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_disc_adisc - Issue remaining adisc iocbs to npr nodes of a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine issues Address Discover (ADISC) ELS commands to those
   * N_Ports which are in node port recovery state and ADISC has not been issued
   * for the @vport. Each time an ELS ADISC IOCB is issued by invoking the
   * lpfc_issue_els_adisc() routine, the per @vport number of discover count
   * (num_disc_nodes) shall be incremented. If the num_disc_nodes reaches a
   * pre-configured threshold (cfg_discovery_threads), the @vport fc_flag will
   * be marked with FC_NLP_MORE bit and the process of issuing remaining ADISC
   * IOCBs quit for later pick up. On the other hand, after walking through
   * all the ndlps with the @vport and there is none ADISC IOCB issued, the
   * @vport fc_flag shall be cleared with FC_NLP_MORE bit indicating there is
   * no more ADISC need to be sent.
   *
   * Return code
   *    The number of N_Ports with adisc issued.
   **/
  int
  lpfc_els_disc_adisc(struct lpfc_vport *vport)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_nodelist *ndlp, *next_ndlp;
  	int sentadisc = 0;
  
  	/* go thru NPR nodes and issue any remaining ELS ADISCs */
  	list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes, nlp_listp) {
  		if (!NLP_CHK_NODE_ACT(ndlp))
  			continue;
  		if (ndlp->nlp_state == NLP_STE_NPR_NODE &&
  		    (ndlp->nlp_flag & NLP_NPR_2B_DISC) != 0 &&
  		    (ndlp->nlp_flag & NLP_NPR_ADISC) != 0) {
  			spin_lock_irq(shost->host_lock);
  			ndlp->nlp_flag &= ~NLP_NPR_ADISC;
  			spin_unlock_irq(shost->host_lock);
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_ADISC_ISSUE);
  			lpfc_issue_els_adisc(vport, ndlp, 0);
  			sentadisc++;
  			vport->num_disc_nodes++;
  			if (vport->num_disc_nodes >=
  			    vport->cfg_discovery_threads) {
  				spin_lock_irq(shost->host_lock);
  				vport->fc_flag |= FC_NLP_MORE;
  				spin_unlock_irq(shost->host_lock);
  				break;
  			}
  		}
  	}
  	if (sentadisc == 0) {
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag &= ~FC_NLP_MORE;
  		spin_unlock_irq(shost->host_lock);
  	}
  	return sentadisc;
  }
  
  /**
   * lpfc_els_disc_plogi - Issue plogi for all npr nodes of a vport before adisc
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine issues Port Login (PLOGI) ELS commands to all the N_Ports
   * which are in node port recovery state, with a @vport. Each time an ELS
   * ADISC PLOGI IOCB is issued by invoking the lpfc_issue_els_plogi() routine,
   * the per @vport number of discover count (num_disc_nodes) shall be
   * incremented. If the num_disc_nodes reaches a pre-configured threshold
   * (cfg_discovery_threads), the @vport fc_flag will be marked with FC_NLP_MORE
   * bit set and quit the process of issuing remaining ADISC PLOGIN IOCBs for
   * later pick up. On the other hand, after walking through all the ndlps with
   * the @vport and there is none ADISC PLOGI IOCB issued, the @vport fc_flag
   * shall be cleared with the FC_NLP_MORE bit indicating there is no more ADISC
   * PLOGI need to be sent.
   *
   * Return code
   *   The number of N_Ports with plogi issued.
   **/
  int
  lpfc_els_disc_plogi(struct lpfc_vport *vport)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_nodelist *ndlp, *next_ndlp;
  	int sentplogi = 0;
  
  	/* go thru NPR nodes and issue any remaining ELS PLOGIs */
  	list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes, nlp_listp) {
  		if (!NLP_CHK_NODE_ACT(ndlp))
  			continue;
  		if (ndlp->nlp_state == NLP_STE_NPR_NODE &&
  				(ndlp->nlp_flag & NLP_NPR_2B_DISC) != 0 &&
  				(ndlp->nlp_flag & NLP_DELAY_TMO) == 0 &&
  				(ndlp->nlp_flag & NLP_NPR_ADISC) == 0) {
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_PLOGI_ISSUE);
  			lpfc_issue_els_plogi(vport, ndlp->nlp_DID, 0);
  			sentplogi++;
  			vport->num_disc_nodes++;
  			if (vport->num_disc_nodes >=
  					vport->cfg_discovery_threads) {
  				spin_lock_irq(shost->host_lock);
  				vport->fc_flag |= FC_NLP_MORE;
  				spin_unlock_irq(shost->host_lock);
  				break;
  			}
  		}
  	}
  	if (sentplogi) {
  		lpfc_set_disctmo(vport);
  	}
  	else {
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag &= ~FC_NLP_MORE;
  		spin_unlock_irq(shost->host_lock);
  	}
  	return sentplogi;
  }
  
  static uint32_t
  lpfc_rdp_res_link_service(struct fc_rdp_link_service_desc *desc,
  		uint32_t word0)
  {
  
  	desc->tag = cpu_to_be32(RDP_LINK_SERVICE_DESC_TAG);
  	desc->payload.els_req = word0;
  	desc->length = cpu_to_be32(sizeof(desc->payload));
  
  	return sizeof(struct fc_rdp_link_service_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_sfp_desc(struct fc_rdp_sfp_desc *desc,
  		uint8_t *page_a0, uint8_t *page_a2)
  {
  	uint16_t wavelength;
  	uint16_t temperature;
  	uint16_t rx_power;
  	uint16_t tx_bias;
  	uint16_t tx_power;
  	uint16_t vcc;
  	uint16_t flag = 0;
  	struct sff_trasnceiver_codes_byte4 *trasn_code_byte4;
  	struct sff_trasnceiver_codes_byte5 *trasn_code_byte5;
  
  	desc->tag = cpu_to_be32(RDP_SFP_DESC_TAG);
  
  	trasn_code_byte4 = (struct sff_trasnceiver_codes_byte4 *)
  			&page_a0[SSF_TRANSCEIVER_CODE_B4];
  	trasn_code_byte5 = (struct sff_trasnceiver_codes_byte5 *)
  			&page_a0[SSF_TRANSCEIVER_CODE_B5];
  
  	if ((trasn_code_byte4->fc_sw_laser) ||
  	    (trasn_code_byte5->fc_sw_laser_sl) ||
  	    (trasn_code_byte5->fc_sw_laser_sn)) {  /* check if its short WL */
  		flag |= (SFP_FLAG_PT_SWLASER << SFP_FLAG_PT_SHIFT);
  	} else if (trasn_code_byte4->fc_lw_laser) {
  		wavelength = (page_a0[SSF_WAVELENGTH_B1] << 8) |
  			page_a0[SSF_WAVELENGTH_B0];
  		if (wavelength == SFP_WAVELENGTH_LC1310)
  			flag |= SFP_FLAG_PT_LWLASER_LC1310 << SFP_FLAG_PT_SHIFT;
  		if (wavelength == SFP_WAVELENGTH_LL1550)
  			flag |= SFP_FLAG_PT_LWLASER_LL1550 << SFP_FLAG_PT_SHIFT;
  	}
  	/* check if its SFP+ */
  	flag |= ((page_a0[SSF_IDENTIFIER] == SFF_PG0_IDENT_SFP) ?
  			SFP_FLAG_CT_SFP_PLUS : SFP_FLAG_CT_UNKNOWN)
  					<< SFP_FLAG_CT_SHIFT;
  
  	/* check if its OPTICAL */
  	flag |= ((page_a0[SSF_CONNECTOR] == SFF_PG0_CONNECTOR_LC) ?
  			SFP_FLAG_IS_OPTICAL_PORT : 0)
  					<< SFP_FLAG_IS_OPTICAL_SHIFT;
  
  	temperature = (page_a2[SFF_TEMPERATURE_B1] << 8 |
  		page_a2[SFF_TEMPERATURE_B0]);
  	vcc = (page_a2[SFF_VCC_B1] << 8 |
  		page_a2[SFF_VCC_B0]);
  	tx_power = (page_a2[SFF_TXPOWER_B1] << 8 |
  		page_a2[SFF_TXPOWER_B0]);
  	tx_bias = (page_a2[SFF_TX_BIAS_CURRENT_B1] << 8 |
  		page_a2[SFF_TX_BIAS_CURRENT_B0]);
  	rx_power = (page_a2[SFF_RXPOWER_B1] << 8 |
  		page_a2[SFF_RXPOWER_B0]);
  	desc->sfp_info.temperature = cpu_to_be16(temperature);
  	desc->sfp_info.rx_power = cpu_to_be16(rx_power);
  	desc->sfp_info.tx_bias = cpu_to_be16(tx_bias);
  	desc->sfp_info.tx_power = cpu_to_be16(tx_power);
  	desc->sfp_info.vcc = cpu_to_be16(vcc);
  
  	desc->sfp_info.flags = cpu_to_be16(flag);
  	desc->length = cpu_to_be32(sizeof(desc->sfp_info));
  
  	return sizeof(struct fc_rdp_sfp_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_link_error(struct fc_rdp_link_error_status_desc *desc,
  		READ_LNK_VAR *stat)
  {
  	uint32_t type;
  
  	desc->tag = cpu_to_be32(RDP_LINK_ERROR_STATUS_DESC_TAG);
  
  	type = VN_PT_PHY_PF_PORT << VN_PT_PHY_SHIFT;
  
  	desc->info.port_type = cpu_to_be32(type);
  
  	desc->info.link_status.link_failure_cnt =
  		cpu_to_be32(stat->linkFailureCnt);
  	desc->info.link_status.loss_of_synch_cnt =
  		cpu_to_be32(stat->lossSyncCnt);
  	desc->info.link_status.loss_of_signal_cnt =
  		cpu_to_be32(stat->lossSignalCnt);
  	desc->info.link_status.primitive_seq_proto_err =
  		cpu_to_be32(stat->primSeqErrCnt);
  	desc->info.link_status.invalid_trans_word =
  		cpu_to_be32(stat->invalidXmitWord);
  	desc->info.link_status.invalid_crc_cnt = cpu_to_be32(stat->crcCnt);
  
  	desc->length = cpu_to_be32(sizeof(desc->info));
  
  	return sizeof(struct fc_rdp_link_error_status_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_bbc_desc(struct fc_rdp_bbc_desc *desc, READ_LNK_VAR *stat,
  		      struct lpfc_vport *vport)
  {
  	uint32_t bbCredit;
  
  	desc->tag = cpu_to_be32(RDP_BBC_DESC_TAG);
  
  	bbCredit = vport->fc_sparam.cmn.bbCreditLsb |
  			(vport->fc_sparam.cmn.bbCreditMsb << 8);
  	desc->bbc_info.port_bbc = cpu_to_be32(bbCredit);
  	if (vport->phba->fc_topology != LPFC_TOPOLOGY_LOOP) {
  		bbCredit = vport->phba->fc_fabparam.cmn.bbCreditLsb |
  			(vport->phba->fc_fabparam.cmn.bbCreditMsb << 8);
  		desc->bbc_info.attached_port_bbc = cpu_to_be32(bbCredit);
  	} else {
  		desc->bbc_info.attached_port_bbc = 0;
  	}
  
  	desc->bbc_info.rtt = 0;
  	desc->length = cpu_to_be32(sizeof(desc->bbc_info));
  
  	return sizeof(struct fc_rdp_bbc_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_oed_temp_desc(struct lpfc_hba *phba,
  			   struct fc_rdp_oed_sfp_desc *desc, uint8_t *page_a2)
  {
  	uint32_t flags = 0;
  
  	desc->tag = cpu_to_be32(RDP_OED_DESC_TAG);
  
  	desc->oed_info.hi_alarm = page_a2[SSF_TEMP_HIGH_ALARM];
  	desc->oed_info.lo_alarm = page_a2[SSF_TEMP_LOW_ALARM];
  	desc->oed_info.hi_warning = page_a2[SSF_TEMP_HIGH_WARNING];
  	desc->oed_info.lo_warning = page_a2[SSF_TEMP_LOW_WARNING];
  
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_HIGH_TEMPERATURE)
  		flags |= RDP_OET_HIGH_ALARM;
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_LOW_TEMPERATURE)
  		flags |= RDP_OET_LOW_ALARM;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_HIGH_TEMPERATURE)
  		flags |= RDP_OET_HIGH_WARNING;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_LOW_TEMPERATURE)
  		flags |= RDP_OET_LOW_WARNING;
  
  	flags |= ((0xf & RDP_OED_TEMPERATURE) << RDP_OED_TYPE_SHIFT);
  	desc->oed_info.function_flags = cpu_to_be32(flags);
  	desc->length = cpu_to_be32(sizeof(desc->oed_info));
  	return sizeof(struct fc_rdp_oed_sfp_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_oed_voltage_desc(struct lpfc_hba *phba,
  			      struct fc_rdp_oed_sfp_desc *desc,
  			      uint8_t *page_a2)
  {
  	uint32_t flags = 0;
  
  	desc->tag = cpu_to_be32(RDP_OED_DESC_TAG);
  
  	desc->oed_info.hi_alarm = page_a2[SSF_VOLTAGE_HIGH_ALARM];
  	desc->oed_info.lo_alarm = page_a2[SSF_VOLTAGE_LOW_ALARM];
  	desc->oed_info.hi_warning = page_a2[SSF_VOLTAGE_HIGH_WARNING];
  	desc->oed_info.lo_warning = page_a2[SSF_VOLTAGE_LOW_WARNING];
  
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_HIGH_VOLTAGE)
  		flags |= RDP_OET_HIGH_ALARM;
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_LOW_VOLTAGE)
  		flags |= RDP_OET_LOW_ALARM;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_HIGH_VOLTAGE)
  		flags |= RDP_OET_HIGH_WARNING;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_LOW_VOLTAGE)
  		flags |= RDP_OET_LOW_WARNING;
  
  	flags |= ((0xf & RDP_OED_VOLTAGE) << RDP_OED_TYPE_SHIFT);
  	desc->oed_info.function_flags = cpu_to_be32(flags);
  	desc->length = cpu_to_be32(sizeof(desc->oed_info));
  	return sizeof(struct fc_rdp_oed_sfp_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_oed_txbias_desc(struct lpfc_hba *phba,
  			     struct fc_rdp_oed_sfp_desc *desc,
  			     uint8_t *page_a2)
  {
  	uint32_t flags = 0;
  
  	desc->tag = cpu_to_be32(RDP_OED_DESC_TAG);
  
  	desc->oed_info.hi_alarm = page_a2[SSF_BIAS_HIGH_ALARM];
  	desc->oed_info.lo_alarm = page_a2[SSF_BIAS_LOW_ALARM];
  	desc->oed_info.hi_warning = page_a2[SSF_BIAS_HIGH_WARNING];
  	desc->oed_info.lo_warning = page_a2[SSF_BIAS_LOW_WARNING];
  
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_HIGH_TXBIAS)
  		flags |= RDP_OET_HIGH_ALARM;
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_LOW_TXBIAS)
  		flags |= RDP_OET_LOW_ALARM;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_HIGH_TXBIAS)
  		flags |= RDP_OET_HIGH_WARNING;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_LOW_TXBIAS)
  		flags |= RDP_OET_LOW_WARNING;
  
  	flags |= ((0xf & RDP_OED_TXBIAS) << RDP_OED_TYPE_SHIFT);
  	desc->oed_info.function_flags = cpu_to_be32(flags);
  	desc->length = cpu_to_be32(sizeof(desc->oed_info));
  	return sizeof(struct fc_rdp_oed_sfp_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_oed_txpower_desc(struct lpfc_hba *phba,
  			      struct fc_rdp_oed_sfp_desc *desc,
  			      uint8_t *page_a2)
  {
  	uint32_t flags = 0;
  
  	desc->tag = cpu_to_be32(RDP_OED_DESC_TAG);
  
  	desc->oed_info.hi_alarm = page_a2[SSF_TXPOWER_HIGH_ALARM];
  	desc->oed_info.lo_alarm = page_a2[SSF_TXPOWER_LOW_ALARM];
  	desc->oed_info.hi_warning = page_a2[SSF_TXPOWER_HIGH_WARNING];
  	desc->oed_info.lo_warning = page_a2[SSF_TXPOWER_LOW_WARNING];
  
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_HIGH_TXPOWER)
  		flags |= RDP_OET_HIGH_ALARM;
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_LOW_TXPOWER)
  		flags |= RDP_OET_LOW_ALARM;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_HIGH_TXPOWER)
  		flags |= RDP_OET_HIGH_WARNING;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_LOW_TXPOWER)
  		flags |= RDP_OET_LOW_WARNING;
  
  	flags |= ((0xf & RDP_OED_TXPOWER) << RDP_OED_TYPE_SHIFT);
  	desc->oed_info.function_flags = cpu_to_be32(flags);
  	desc->length = cpu_to_be32(sizeof(desc->oed_info));
  	return sizeof(struct fc_rdp_oed_sfp_desc);
  }
  
  
  static uint32_t
  lpfc_rdp_res_oed_rxpower_desc(struct lpfc_hba *phba,
  			      struct fc_rdp_oed_sfp_desc *desc,
  			      uint8_t *page_a2)
  {
  	uint32_t flags = 0;
  
  	desc->tag = cpu_to_be32(RDP_OED_DESC_TAG);
  
  	desc->oed_info.hi_alarm = page_a2[SSF_RXPOWER_HIGH_ALARM];
  	desc->oed_info.lo_alarm = page_a2[SSF_RXPOWER_LOW_ALARM];
  	desc->oed_info.hi_warning = page_a2[SSF_RXPOWER_HIGH_WARNING];
  	desc->oed_info.lo_warning = page_a2[SSF_RXPOWER_LOW_WARNING];
  
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_HIGH_RXPOWER)
  		flags |= RDP_OET_HIGH_ALARM;
  	if (phba->sfp_alarm & LPFC_TRANSGRESSION_LOW_RXPOWER)
  		flags |= RDP_OET_LOW_ALARM;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_HIGH_RXPOWER)
  		flags |= RDP_OET_HIGH_WARNING;
  	if (phba->sfp_warning & LPFC_TRANSGRESSION_LOW_RXPOWER)
  		flags |= RDP_OET_LOW_WARNING;
  
  	flags |= ((0xf & RDP_OED_RXPOWER) << RDP_OED_TYPE_SHIFT);
  	desc->oed_info.function_flags = cpu_to_be32(flags);
  	desc->length = cpu_to_be32(sizeof(desc->oed_info));
  	return sizeof(struct fc_rdp_oed_sfp_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_opd_desc(struct fc_rdp_opd_sfp_desc *desc,
  		      uint8_t *page_a0, struct lpfc_vport *vport)
  {
  	desc->tag = cpu_to_be32(RDP_OPD_DESC_TAG);
  	memcpy(desc->opd_info.vendor_name, &page_a0[SSF_VENDOR_NAME], 16);
  	memcpy(desc->opd_info.model_number, &page_a0[SSF_VENDOR_PN], 16);
  	memcpy(desc->opd_info.serial_number, &page_a0[SSF_VENDOR_SN], 16);
  	memcpy(desc->opd_info.revision, &page_a0[SSF_VENDOR_REV], 4);
  	memcpy(desc->opd_info.date, &page_a0[SSF_DATE_CODE], 8);
  	desc->length = cpu_to_be32(sizeof(desc->opd_info));
  	return sizeof(struct fc_rdp_opd_sfp_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_fec_desc(struct fc_fec_rdp_desc *desc, READ_LNK_VAR *stat)
  {
  	if (bf_get(lpfc_read_link_stat_gec2, stat) == 0)
  		return 0;
  	desc->tag = cpu_to_be32(RDP_FEC_DESC_TAG);
  
  	desc->info.CorrectedBlocks =
  		cpu_to_be32(stat->fecCorrBlkCount);
  	desc->info.UncorrectableBlocks =
  		cpu_to_be32(stat->fecUncorrBlkCount);
  
  	desc->length = cpu_to_be32(sizeof(desc->info));
  
  	return sizeof(struct fc_fec_rdp_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_speed(struct fc_rdp_port_speed_desc *desc, struct lpfc_hba *phba)
  {
  	uint16_t rdp_cap = 0;
  	uint16_t rdp_speed;
  
  	desc->tag = cpu_to_be32(RDP_PORT_SPEED_DESC_TAG);
  
  	switch (phba->fc_linkspeed) {
  	case LPFC_LINK_SPEED_1GHZ:
  		rdp_speed = RDP_PS_1GB;
  		break;
  	case LPFC_LINK_SPEED_2GHZ:
  		rdp_speed = RDP_PS_2GB;
  		break;
  	case LPFC_LINK_SPEED_4GHZ:
  		rdp_speed = RDP_PS_4GB;
  		break;
  	case LPFC_LINK_SPEED_8GHZ:
  		rdp_speed = RDP_PS_8GB;
  		break;
  	case LPFC_LINK_SPEED_10GHZ:
  		rdp_speed = RDP_PS_10GB;
  		break;
  	case LPFC_LINK_SPEED_16GHZ:
  		rdp_speed = RDP_PS_16GB;
  		break;
  	case LPFC_LINK_SPEED_32GHZ:
  		rdp_speed = RDP_PS_32GB;
  		break;
  	case LPFC_LINK_SPEED_64GHZ:
  		rdp_speed = RDP_PS_64GB;
  		break;
  	default:
  		rdp_speed = RDP_PS_UNKNOWN;
  		break;
  	}
  
  	desc->info.port_speed.speed = cpu_to_be16(rdp_speed);
  
  	if (phba->lmt & LMT_128Gb)
  		rdp_cap |= RDP_PS_128GB;
  	if (phba->lmt & LMT_64Gb)
  		rdp_cap |= RDP_PS_64GB;
  	if (phba->lmt & LMT_32Gb)
  		rdp_cap |= RDP_PS_32GB;
  	if (phba->lmt & LMT_16Gb)
  		rdp_cap |= RDP_PS_16GB;
  	if (phba->lmt & LMT_10Gb)
  		rdp_cap |= RDP_PS_10GB;
  	if (phba->lmt & LMT_8Gb)
  		rdp_cap |= RDP_PS_8GB;
  	if (phba->lmt & LMT_4Gb)
  		rdp_cap |= RDP_PS_4GB;
  	if (phba->lmt & LMT_2Gb)
  		rdp_cap |= RDP_PS_2GB;
  	if (phba->lmt & LMT_1Gb)
  		rdp_cap |= RDP_PS_1GB;
  
  	if (rdp_cap == 0)
  		rdp_cap = RDP_CAP_UNKNOWN;
  	if (phba->cfg_link_speed != LPFC_USER_LINK_SPEED_AUTO)
  		rdp_cap |= RDP_CAP_USER_CONFIGURED;
  
  	desc->info.port_speed.capabilities = cpu_to_be16(rdp_cap);
  	desc->length = cpu_to_be32(sizeof(desc->info));
  	return sizeof(struct fc_rdp_port_speed_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_diag_port_names(struct fc_rdp_port_name_desc *desc,
  		struct lpfc_vport *vport)
  {
  
  	desc->tag = cpu_to_be32(RDP_PORT_NAMES_DESC_TAG);
  
  	memcpy(desc->port_names.wwnn, &vport->fc_nodename,
  			sizeof(desc->port_names.wwnn));
  
  	memcpy(desc->port_names.wwpn, &vport->fc_portname,
  			sizeof(desc->port_names.wwpn));
  
  	desc->length = cpu_to_be32(sizeof(desc->port_names));
  	return sizeof(struct fc_rdp_port_name_desc);
  }
  
  static uint32_t
  lpfc_rdp_res_attach_port_names(struct fc_rdp_port_name_desc *desc,
  		struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
  {
  
  	desc->tag = cpu_to_be32(RDP_PORT_NAMES_DESC_TAG);
  	if (vport->fc_flag & FC_FABRIC) {
  		memcpy(desc->port_names.wwnn, &vport->fabric_nodename,
  		       sizeof(desc->port_names.wwnn));
  
  		memcpy(desc->port_names.wwpn, &vport->fabric_portname,
  		       sizeof(desc->port_names.wwpn));
  	} else {  /* Point to Point */
  		memcpy(desc->port_names.wwnn, &ndlp->nlp_nodename,
  		       sizeof(desc->port_names.wwnn));
  
  		memcpy(desc->port_names.wwpn, &ndlp->nlp_portname,
  		       sizeof(desc->port_names.wwpn));
  	}
  
  	desc->length = cpu_to_be32(sizeof(desc->port_names));
  	return sizeof(struct fc_rdp_port_name_desc);
  }
  
  static void
  lpfc_els_rdp_cmpl(struct lpfc_hba *phba, struct lpfc_rdp_context *rdp_context,
  		int status)
  {
  	struct lpfc_nodelist *ndlp = rdp_context->ndlp;
  	struct lpfc_vport *vport = ndlp->vport;
  	struct lpfc_iocbq *elsiocb;
  	struct ulp_bde64 *bpl;
  	IOCB_t *icmd;
  	uint8_t *pcmd;
  	struct ls_rjt *stat;
  	struct fc_rdp_res_frame *rdp_res;
  	uint32_t cmdsize, len;
  	uint16_t *flag_ptr;
  	int rc;
  
  	if (status != SUCCESS)
  		goto error;
  
  	/* This will change once we know the true size of the RDP payload */
  	cmdsize = sizeof(struct fc_rdp_res_frame);
  
  	elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize,
  			lpfc_max_els_tries, rdp_context->ndlp,
  			rdp_context->ndlp->nlp_DID, ELS_CMD_ACC);
  	lpfc_nlp_put(ndlp);
  	if (!elsiocb)
  		goto free_rdp_context;
  
  	icmd = &elsiocb->iocb;
  	icmd->ulpContext = rdp_context->rx_id;
  	icmd->unsli3.rcvsli3.ox_id = rdp_context->ox_id;
  
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			"2171 Xmit RDP response tag x%x xri x%x, "
  			"did x%x, nlp_flag x%x, nlp_state x%x, rpi x%x",
  			elsiocb->iotag, elsiocb->iocb.ulpContext,
  			ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			ndlp->nlp_rpi);
  	rdp_res = (struct fc_rdp_res_frame *)
  		(((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	memset(pcmd, 0, sizeof(struct fc_rdp_res_frame));
  	*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  
  	/* Update Alarm and Warning */
  	flag_ptr = (uint16_t *)(rdp_context->page_a2 + SSF_ALARM_FLAGS);
  	phba->sfp_alarm |= *flag_ptr;
  	flag_ptr = (uint16_t *)(rdp_context->page_a2 + SSF_WARNING_FLAGS);
  	phba->sfp_warning |= *flag_ptr;
  
  	/* For RDP payload */
  	len = 8;
  	len += lpfc_rdp_res_link_service((struct fc_rdp_link_service_desc *)
  					 (len + pcmd), ELS_CMD_RDP);
  
  	len += lpfc_rdp_res_sfp_desc((struct fc_rdp_sfp_desc *)(len + pcmd),
  			rdp_context->page_a0, rdp_context->page_a2);
  	len += lpfc_rdp_res_speed((struct fc_rdp_port_speed_desc *)(len + pcmd),
  				  phba);
  	len += lpfc_rdp_res_link_error((struct fc_rdp_link_error_status_desc *)
  				       (len + pcmd), &rdp_context->link_stat);
  	len += lpfc_rdp_res_diag_port_names((struct fc_rdp_port_name_desc *)
  					     (len + pcmd), vport);
  	len += lpfc_rdp_res_attach_port_names((struct fc_rdp_port_name_desc *)
  					(len + pcmd), vport, ndlp);
  	len += lpfc_rdp_res_fec_desc((struct fc_fec_rdp_desc *)(len + pcmd),
  			&rdp_context->link_stat);
  	len += lpfc_rdp_res_bbc_desc((struct fc_rdp_bbc_desc *)(len + pcmd),
  				     &rdp_context->link_stat, vport);
  	len += lpfc_rdp_res_oed_temp_desc(phba,
  				(struct fc_rdp_oed_sfp_desc *)(len + pcmd),
  				rdp_context->page_a2);
  	len += lpfc_rdp_res_oed_voltage_desc(phba,
  				(struct fc_rdp_oed_sfp_desc *)(len + pcmd),
  				rdp_context->page_a2);
  	len += lpfc_rdp_res_oed_txbias_desc(phba,
  				(struct fc_rdp_oed_sfp_desc *)(len + pcmd),
  				rdp_context->page_a2);
  	len += lpfc_rdp_res_oed_txpower_desc(phba,
  				(struct fc_rdp_oed_sfp_desc *)(len + pcmd),
  				rdp_context->page_a2);
  	len += lpfc_rdp_res_oed_rxpower_desc(phba,
  				(struct fc_rdp_oed_sfp_desc *)(len + pcmd),
  				rdp_context->page_a2);
  	len += lpfc_rdp_res_opd_desc((struct fc_rdp_opd_sfp_desc *)(len + pcmd),
  				     rdp_context->page_a0, vport);
  
  	rdp_res->length = cpu_to_be32(len - 8);
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  
  	/* Now that we know the true size of the payload, update the BPL */
  	bpl = (struct ulp_bde64 *)
  		(((struct lpfc_dmabuf *)(elsiocb->context3))->virt);
  	bpl->tus.f.bdeSize = len;
  	bpl->tus.f.bdeFlags = 0;
  	bpl->tus.w = le32_to_cpu(bpl->tus.w);
  
  	phba->fc_stat.elsXmitACC++;
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  	if (rc == IOCB_ERROR)
  		lpfc_els_free_iocb(phba, elsiocb);
  
  	kfree(rdp_context);
  
  	return;
  error:
  	cmdsize = 2 * sizeof(uint32_t);
  	elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, lpfc_max_els_tries,
  			ndlp, ndlp->nlp_DID, ELS_CMD_LS_RJT);
  	lpfc_nlp_put(ndlp);
  	if (!elsiocb)
  		goto free_rdp_context;
  
  	icmd = &elsiocb->iocb;
  	icmd->ulpContext = rdp_context->rx_id;
  	icmd->unsli3.rcvsli3.ox_id = rdp_context->ox_id;
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	*((uint32_t *) (pcmd)) = ELS_CMD_LS_RJT;
  	stat = (struct ls_rjt *)(pcmd + sizeof(uint32_t));
  	stat->un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
  
  	phba->fc_stat.elsXmitLSRJT++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  
  	if (rc == IOCB_ERROR)
  		lpfc_els_free_iocb(phba, elsiocb);
  free_rdp_context:
  	kfree(rdp_context);
  }
  
  static int
  lpfc_get_rdp_info(struct lpfc_hba *phba, struct lpfc_rdp_context *rdp_context)
  {
  	LPFC_MBOXQ_t *mbox = NULL;
  	int rc;
  
  	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  	if (!mbox) {
  		lpfc_printf_log(phba, KERN_WARNING, LOG_MBOX | LOG_ELS,
  				"7105 failed to allocate mailbox memory");
  		return 1;
  	}
  
  	if (lpfc_sli4_dump_page_a0(phba, mbox))
  		goto prep_mbox_fail;
  	mbox->vport = rdp_context->ndlp->vport;
  	mbox->mbox_cmpl = lpfc_mbx_cmpl_rdp_page_a0;
  	mbox->ctx_ndlp = (struct lpfc_rdp_context *)rdp_context;
  	rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
  	if (rc == MBX_NOT_FINISHED)
  		goto issue_mbox_fail;
  
  	return 0;
  
  prep_mbox_fail:
  issue_mbox_fail:
  	mempool_free(mbox, phba->mbox_mem_pool);
  	return 1;
  }
  
  /*
   * lpfc_els_rcv_rdp - Process an unsolicited RDP ELS.
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes an unsolicited RDP(Read Diagnostic Parameters)
   * IOCB. First, the payload of the unsolicited RDP is checked.
   * Then it will (1) send MBX_DUMP_MEMORY, Embedded DMP_LMSD sub command TYPE-3
   * for Page A0, (2) send MBX_DUMP_MEMORY, DMP_LMSD for Page A2,
   * (3) send MBX_READ_LNK_STAT to get link stat, (4) Call lpfc_els_rdp_cmpl
   * gather all data and send RDP response.
   *
   * Return code
   *   0 - Sent the acc response
   *   1 - Sent the reject response.
   */
  static int
  lpfc_els_rcv_rdp(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba *phba = vport->phba;
  	struct lpfc_dmabuf *pcmd;
  	uint8_t rjt_err, rjt_expl = LSEXP_NOTHING_MORE;
  	struct fc_rdp_req_frame *rdp_req;
  	struct lpfc_rdp_context *rdp_context;
  	IOCB_t *cmd = NULL;
  	struct ls_rjt stat;
  
  	if (phba->sli_rev < LPFC_SLI_REV4 ||
  	    bf_get(lpfc_sli_intf_if_type, &phba->sli4_hba.sli_intf) <
  						LPFC_SLI_INTF_IF_TYPE_2) {
  		rjt_err = LSRJT_UNABLE_TPC;
  		rjt_expl = LSEXP_REQ_UNSUPPORTED;
  		goto error;
  	}
  
  	if (phba->sli_rev < LPFC_SLI_REV4 || (phba->hba_flag & HBA_FCOE_MODE)) {
  		rjt_err = LSRJT_UNABLE_TPC;
  		rjt_expl = LSEXP_REQ_UNSUPPORTED;
  		goto error;
  	}
  
  	pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	rdp_req = (struct fc_rdp_req_frame *) pcmd->virt;
  
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "2422 ELS RDP Request "
  			 "dec len %d tag x%x port_id %d len %d\n",
  			 be32_to_cpu(rdp_req->rdp_des_length),
  			 be32_to_cpu(rdp_req->nport_id_desc.tag),
  			 be32_to_cpu(rdp_req->nport_id_desc.nport_id),
  			 be32_to_cpu(rdp_req->nport_id_desc.length));
  
  	if (sizeof(struct fc_rdp_nport_desc) !=
  			be32_to_cpu(rdp_req->rdp_des_length))
  		goto rjt_logerr;
  	if (RDP_N_PORT_DESC_TAG != be32_to_cpu(rdp_req->nport_id_desc.tag))
  		goto rjt_logerr;
  	if (RDP_NPORT_ID_SIZE !=
  			be32_to_cpu(rdp_req->nport_id_desc.length))
  		goto rjt_logerr;
  	rdp_context = kzalloc(sizeof(struct lpfc_rdp_context), GFP_KERNEL);
  	if (!rdp_context) {
  		rjt_err = LSRJT_UNABLE_TPC;
  		goto error;
  	}
  
  	cmd = &cmdiocb->iocb;
  	rdp_context->ndlp = lpfc_nlp_get(ndlp);
  	rdp_context->ox_id = cmd->unsli3.rcvsli3.ox_id;
  	rdp_context->rx_id = cmd->ulpContext;
  	rdp_context->cmpl = lpfc_els_rdp_cmpl;
  	if (lpfc_get_rdp_info(phba, rdp_context)) {
  		lpfc_printf_vlog(ndlp->vport, KERN_WARNING, LOG_ELS,
  				 "2423 Unable to send mailbox");
  		kfree(rdp_context);
  		rjt_err = LSRJT_UNABLE_TPC;
  		lpfc_nlp_put(ndlp);
  		goto error;
  	}
  
  	return 0;
  
  rjt_logerr:
  	rjt_err = LSRJT_LOGICAL_ERR;
  
  error:
  	memset(&stat, 0, sizeof(stat));
  	stat.un.b.lsRjtRsnCode = rjt_err;
  	stat.un.b.lsRjtRsnCodeExp = rjt_expl;
  	lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp, NULL);
  	return 1;
  }
  
  
  static void
  lpfc_els_lcb_rsp(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
  {
  	MAILBOX_t *mb;
  	IOCB_t *icmd;
  	uint8_t *pcmd;
  	struct lpfc_iocbq *elsiocb;
  	struct lpfc_nodelist *ndlp;
  	struct ls_rjt *stat;
  	union lpfc_sli4_cfg_shdr *shdr;
  	struct lpfc_lcb_context *lcb_context;
  	struct fc_lcb_res_frame *lcb_res;
  	uint32_t cmdsize, shdr_status, shdr_add_status;
  	int rc;
  
  	mb = &pmb->u.mb;
  	lcb_context = (struct lpfc_lcb_context *)pmb->ctx_ndlp;
  	ndlp = lcb_context->ndlp;
  	pmb->ctx_ndlp = NULL;
  	pmb->ctx_buf = NULL;
  
  	shdr = (union lpfc_sli4_cfg_shdr *)
  			&pmb->u.mqe.un.beacon_config.header.cfg_shdr;
  	shdr_status = bf_get(lpfc_mbox_hdr_status, &shdr->response);
  	shdr_add_status = bf_get(lpfc_mbox_hdr_add_status, &shdr->response);
  
  	lpfc_printf_log(phba, KERN_INFO, LOG_MBOX,
  				"0194 SET_BEACON_CONFIG mailbox "
  				"completed with status x%x add_status x%x,"
  				" mbx status x%x\n",
  				shdr_status, shdr_add_status, mb->mbxStatus);
  
  	if ((mb->mbxStatus != MBX_SUCCESS) || shdr_status ||
  	    (shdr_add_status == ADD_STATUS_OPERATION_ALREADY_ACTIVE) ||
  	    (shdr_add_status == ADD_STATUS_INVALID_REQUEST)) {
  		mempool_free(pmb, phba->mbox_mem_pool);
  		goto error;
  	}
  
  	mempool_free(pmb, phba->mbox_mem_pool);
  	cmdsize = sizeof(struct fc_lcb_res_frame);
  	elsiocb = lpfc_prep_els_iocb(phba->pport, 0, cmdsize,
  			lpfc_max_els_tries, ndlp,
  			ndlp->nlp_DID, ELS_CMD_ACC);
  
  	/* Decrement the ndlp reference count from previous mbox command */
  	lpfc_nlp_put(ndlp);
  
  	if (!elsiocb)
  		goto free_lcb_context;
  
  	lcb_res = (struct fc_lcb_res_frame *)
  		(((struct lpfc_dmabuf *)elsiocb->context2)->virt);
  
  	memset(lcb_res, 0, sizeof(struct fc_lcb_res_frame));
  	icmd = &elsiocb->iocb;
  	icmd->ulpContext = lcb_context->rx_id;
  	icmd->unsli3.rcvsli3.ox_id = lcb_context->ox_id;
  
  	pcmd = (uint8_t *)(((struct lpfc_dmabuf *)elsiocb->context2)->virt);
  	*((uint32_t *)(pcmd)) = ELS_CMD_ACC;
  	lcb_res->lcb_sub_command = lcb_context->sub_command;
  	lcb_res->lcb_type = lcb_context->type;
  	lcb_res->capability = lcb_context->capability;
  	lcb_res->lcb_frequency = lcb_context->frequency;
  	lcb_res->lcb_duration = lcb_context->duration;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	phba->fc_stat.elsXmitACC++;
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  	if (rc == IOCB_ERROR)
  		lpfc_els_free_iocb(phba, elsiocb);
  
  	kfree(lcb_context);
  	return;
  
  error:
  	cmdsize = sizeof(struct fc_lcb_res_frame);
  	elsiocb = lpfc_prep_els_iocb(phba->pport, 0, cmdsize,
  			lpfc_max_els_tries, ndlp,
  			ndlp->nlp_DID, ELS_CMD_LS_RJT);
  	lpfc_nlp_put(ndlp);
  	if (!elsiocb)
  		goto free_lcb_context;
  
  	icmd = &elsiocb->iocb;
  	icmd->ulpContext = lcb_context->rx_id;
  	icmd->unsli3.rcvsli3.ox_id = lcb_context->ox_id;
  	pcmd = (uint8_t *)(((struct lpfc_dmabuf *)elsiocb->context2)->virt);
  
  	*((uint32_t *)(pcmd)) = ELS_CMD_LS_RJT;
  	stat = (struct ls_rjt *)(pcmd + sizeof(uint32_t));
  	stat->un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
  
  	if (shdr_add_status == ADD_STATUS_OPERATION_ALREADY_ACTIVE)
  		stat->un.b.lsRjtRsnCodeExp = LSEXP_CMD_IN_PROGRESS;
  
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	phba->fc_stat.elsXmitLSRJT++;
  	rc = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  	if (rc == IOCB_ERROR)
  		lpfc_els_free_iocb(phba, elsiocb);
  free_lcb_context:
  	kfree(lcb_context);
  }
  
  static int
  lpfc_sli4_set_beacon(struct lpfc_vport *vport,
  		     struct lpfc_lcb_context *lcb_context,
  		     uint32_t beacon_state)
  {
  	struct lpfc_hba *phba = vport->phba;
  	union lpfc_sli4_cfg_shdr *cfg_shdr;
  	LPFC_MBOXQ_t *mbox = NULL;
  	uint32_t len;
  	int rc;
  
  	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  	if (!mbox)
  		return 1;
  
  	cfg_shdr = &mbox->u.mqe.un.sli4_config.header.cfg_shdr;
  	len = sizeof(struct lpfc_mbx_set_beacon_config) -
  		sizeof(struct lpfc_sli4_cfg_mhdr);
  	lpfc_sli4_config(phba, mbox, LPFC_MBOX_SUBSYSTEM_COMMON,
  			 LPFC_MBOX_OPCODE_SET_BEACON_CONFIG, len,
  			 LPFC_SLI4_MBX_EMBED);
  	mbox->ctx_ndlp = (void *)lcb_context;
  	mbox->vport = phba->pport;
  	mbox->mbox_cmpl = lpfc_els_lcb_rsp;
  	bf_set(lpfc_mbx_set_beacon_port_num, &mbox->u.mqe.un.beacon_config,
  	       phba->sli4_hba.physical_port);
  	bf_set(lpfc_mbx_set_beacon_state, &mbox->u.mqe.un.beacon_config,
  	       beacon_state);
  	mbox->u.mqe.un.beacon_config.word5 = 0;		/* Reserved */
  
  	/*
  	 *	Check bv1s bit before issuing the mailbox
  	 *	if bv1s == 1, LCB V1 supported
  	 *	else, LCB V0 supported
  	 */
  
  	if (phba->sli4_hba.pc_sli4_params.bv1s) {
  		/* COMMON_SET_BEACON_CONFIG_V1 */
  		cfg_shdr->request.word9 = BEACON_VERSION_V1;
  		lcb_context->capability |= LCB_CAPABILITY_DURATION;
  		bf_set(lpfc_mbx_set_beacon_port_type,
  		       &mbox->u.mqe.un.beacon_config, 0);
  		bf_set(lpfc_mbx_set_beacon_duration_v1,
  		       &mbox->u.mqe.un.beacon_config,
  		       be16_to_cpu(lcb_context->duration));
  	} else {
  		/* COMMON_SET_BEACON_CONFIG_V0 */
  		if (be16_to_cpu(lcb_context->duration) != 0) {
  			mempool_free(mbox, phba->mbox_mem_pool);
  			return 1;
  		}
  		cfg_shdr->request.word9 = BEACON_VERSION_V0;
  		lcb_context->capability &=  ~(LCB_CAPABILITY_DURATION);
  		bf_set(lpfc_mbx_set_beacon_state,
  		       &mbox->u.mqe.un.beacon_config, beacon_state);
  		bf_set(lpfc_mbx_set_beacon_port_type,
  		       &mbox->u.mqe.un.beacon_config, 1);
  		bf_set(lpfc_mbx_set_beacon_duration,
  		       &mbox->u.mqe.un.beacon_config,
  		       be16_to_cpu(lcb_context->duration));
  	}
  
  	rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
  	if (rc == MBX_NOT_FINISHED) {
  		mempool_free(mbox, phba->mbox_mem_pool);
  		return 1;
  	}
  
  	return 0;
  }
  
  
  /**
   * lpfc_els_rcv_lcb - Process an unsolicited LCB
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes an unsolicited LCB(LINK CABLE BEACON) IOCB.
   * First, the payload of the unsolicited LCB is checked.
   * Then based on Subcommand beacon will either turn on or off.
   *
   * Return code
   * 0 - Sent the acc response
   * 1 - Sent the reject response.
   **/
  static int
  lpfc_els_rcv_lcb(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		 struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba *phba = vport->phba;
  	struct lpfc_dmabuf *pcmd;
  	uint8_t *lp;
  	struct fc_lcb_request_frame *beacon;
  	struct lpfc_lcb_context *lcb_context;
  	uint8_t state, rjt_err;
  	struct ls_rjt stat;
  
  	pcmd = (struct lpfc_dmabuf *)cmdiocb->context2;
  	lp = (uint8_t *)pcmd->virt;
  	beacon = (struct fc_lcb_request_frame *)pcmd->virt;
  
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			"0192 ELS LCB Data x%x x%x x%x x%x sub x%x "
  			"type x%x frequency %x duration x%x\n",
  			lp[0], lp[1], lp[2],
  			beacon->lcb_command,
  			beacon->lcb_sub_command,
  			beacon->lcb_type,
  			beacon->lcb_frequency,
  			be16_to_cpu(beacon->lcb_duration));
  
  	if (beacon->lcb_sub_command != LPFC_LCB_ON &&
  	    beacon->lcb_sub_command != LPFC_LCB_OFF) {
  		rjt_err = LSRJT_CMD_UNSUPPORTED;
  		goto rjt;
  	}
  
  	if (phba->sli_rev < LPFC_SLI_REV4  ||
  	    phba->hba_flag & HBA_FCOE_MODE ||
  	    (bf_get(lpfc_sli_intf_if_type, &phba->sli4_hba.sli_intf) <
  	    LPFC_SLI_INTF_IF_TYPE_2)) {
  		rjt_err = LSRJT_CMD_UNSUPPORTED;
  		goto rjt;
  	}
  
  	lcb_context = kmalloc(sizeof(*lcb_context), GFP_KERNEL);
  	if (!lcb_context) {
  		rjt_err = LSRJT_UNABLE_TPC;
  		goto rjt;
  	}
  
  	state = (beacon->lcb_sub_command == LPFC_LCB_ON) ? 1 : 0;
  	lcb_context->sub_command = beacon->lcb_sub_command;
  	lcb_context->capability	= 0;
  	lcb_context->type = beacon->lcb_type;
  	lcb_context->frequency = beacon->lcb_frequency;
  	lcb_context->duration = beacon->lcb_duration;
  	lcb_context->ox_id = cmdiocb->iocb.unsli3.rcvsli3.ox_id;
  	lcb_context->rx_id = cmdiocb->iocb.ulpContext;
  	lcb_context->ndlp = lpfc_nlp_get(ndlp);
  	if (lpfc_sli4_set_beacon(vport, lcb_context, state)) {
  		lpfc_printf_vlog(ndlp->vport, KERN_ERR,
  				 LOG_ELS, "0193 failed to send mail box");
  		kfree(lcb_context);
  		lpfc_nlp_put(ndlp);
  		rjt_err = LSRJT_UNABLE_TPC;
  		goto rjt;
  	}
  	return 0;
  rjt:
  	memset(&stat, 0, sizeof(stat));
  	stat.un.b.lsRjtRsnCode = rjt_err;
  	lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp, NULL);
  	return 1;
  }
  
  
  /**
   * lpfc_els_flush_rscn - Clean up any rscn activities with a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine cleans up any Registration State Change Notification
   * (RSCN) activity with a @vport. Note that the fc_rscn_flush flag of the
   * @vport together with the host_lock is used to prevent multiple thread
   * trying to access the RSCN array on a same @vport at the same time.
   **/
  void
  lpfc_els_flush_rscn(struct lpfc_vport *vport)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	int i;
  
  	spin_lock_irq(shost->host_lock);
  	if (vport->fc_rscn_flush) {
  		/* Another thread is walking fc_rscn_id_list on this vport */
  		spin_unlock_irq(shost->host_lock);
  		return;
  	}
  	/* Indicate we are walking lpfc_els_flush_rscn on this vport */
  	vport->fc_rscn_flush = 1;
  	spin_unlock_irq(shost->host_lock);
  
  	for (i = 0; i < vport->fc_rscn_id_cnt; i++) {
  		lpfc_in_buf_free(phba, vport->fc_rscn_id_list[i]);
  		vport->fc_rscn_id_list[i] = NULL;
  	}
  	spin_lock_irq(shost->host_lock);
  	vport->fc_rscn_id_cnt = 0;
  	vport->fc_flag &= ~(FC_RSCN_MODE | FC_RSCN_DISCOVERY);
  	spin_unlock_irq(shost->host_lock);
  	lpfc_can_disctmo(vport);
  	/* Indicate we are done walking this fc_rscn_id_list */
  	vport->fc_rscn_flush = 0;
  }
  
  /**
   * lpfc_rscn_payload_check - Check whether there is a pending rscn to a did
   * @vport: pointer to a host virtual N_Port data structure.
   * @did: remote destination port identifier.
   *
   * This routine checks whether there is any pending Registration State
   * Configuration Notification (RSCN) to a @did on @vport.
   *
   * Return code
   *   None zero - The @did matched with a pending rscn
   *   0 - not able to match @did with a pending rscn
   **/
  int
  lpfc_rscn_payload_check(struct lpfc_vport *vport, uint32_t did)
  {
  	D_ID ns_did;
  	D_ID rscn_did;
  	uint32_t *lp;
  	uint32_t payload_len, i;
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  
  	ns_did.un.word = did;
  
  	/* Never match fabric nodes for RSCNs */
  	if ((did & Fabric_DID_MASK) == Fabric_DID_MASK)
  		return 0;
  
  	/* If we are doing a FULL RSCN rediscovery, match everything */
  	if (vport->fc_flag & FC_RSCN_DISCOVERY)
  		return did;
  
  	spin_lock_irq(shost->host_lock);
  	if (vport->fc_rscn_flush) {
  		/* Another thread is walking fc_rscn_id_list on this vport */
  		spin_unlock_irq(shost->host_lock);
  		return 0;
  	}
  	/* Indicate we are walking fc_rscn_id_list on this vport */
  	vport->fc_rscn_flush = 1;
  	spin_unlock_irq(shost->host_lock);
  	for (i = 0; i < vport->fc_rscn_id_cnt; i++) {
  		lp = vport->fc_rscn_id_list[i]->virt;
  		payload_len = be32_to_cpu(*lp++ & ~ELS_CMD_MASK);
  		payload_len -= sizeof(uint32_t);	/* take off word 0 */
  		while (payload_len) {
  			rscn_did.un.word = be32_to_cpu(*lp++);
  			payload_len -= sizeof(uint32_t);
  			switch (rscn_did.un.b.resv & RSCN_ADDRESS_FORMAT_MASK) {
  			case RSCN_ADDRESS_FORMAT_PORT:
  				if ((ns_did.un.b.domain == rscn_did.un.b.domain)
  				    && (ns_did.un.b.area == rscn_did.un.b.area)
  				    && (ns_did.un.b.id == rscn_did.un.b.id))
  					goto return_did_out;
  				break;
  			case RSCN_ADDRESS_FORMAT_AREA:
  				if ((ns_did.un.b.domain == rscn_did.un.b.domain)
  				    && (ns_did.un.b.area == rscn_did.un.b.area))
  					goto return_did_out;
  				break;
  			case RSCN_ADDRESS_FORMAT_DOMAIN:
  				if (ns_did.un.b.domain == rscn_did.un.b.domain)
  					goto return_did_out;
  				break;
  			case RSCN_ADDRESS_FORMAT_FABRIC:
  				goto return_did_out;
  			}
  		}
  	}
  	/* Indicate we are done with walking fc_rscn_id_list on this vport */
  	vport->fc_rscn_flush = 0;
  	return 0;
  return_did_out:
  	/* Indicate we are done with walking fc_rscn_id_list on this vport */
  	vport->fc_rscn_flush = 0;
  	return did;
  }
  
  /**
   * lpfc_rscn_recovery_check - Send recovery event to vport nodes matching rscn
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine sends recovery (NLP_EVT_DEVICE_RECOVERY) event to the
   * state machine for a @vport's nodes that are with pending RSCN (Registration
   * State Change Notification).
   *
   * Return code
   *   0 - Successful (currently alway return 0)
   **/
  static int
  lpfc_rscn_recovery_check(struct lpfc_vport *vport)
  {
  	struct lpfc_nodelist *ndlp = NULL;
  
  	/* Move all affected nodes by pending RSCNs to NPR state. */
  	list_for_each_entry(ndlp, &vport->fc_nodes, nlp_listp) {
  		if (!NLP_CHK_NODE_ACT(ndlp) ||
  		    (ndlp->nlp_state == NLP_STE_UNUSED_NODE) ||
  		    !lpfc_rscn_payload_check(vport, ndlp->nlp_DID))
  			continue;
  
  		/* NVME Target mode does not do RSCN Recovery. */
  		if (vport->phba->nvmet_support)
  			continue;
  
  		/* If we are in the process of doing discovery on this
  		 * NPort, let it continue on its own.
  		 */
  		switch (ndlp->nlp_state) {
  		case  NLP_STE_PLOGI_ISSUE:
  		case  NLP_STE_ADISC_ISSUE:
  		case  NLP_STE_REG_LOGIN_ISSUE:
  		case  NLP_STE_PRLI_ISSUE:
  		case  NLP_STE_LOGO_ISSUE:
  			continue;
  		}
  
  		/* Check to see if we need to NVME rescan this target
  		 * remoteport.
  		 */
  		if (ndlp->nlp_fc4_type & NLP_FC4_NVME &&
  		    ndlp->nlp_type & (NLP_NVME_TARGET | NLP_NVME_DISCOVERY))
  			lpfc_nvme_rescan_port(vport, ndlp);
  
  		lpfc_disc_state_machine(vport, ndlp, NULL,
  					NLP_EVT_DEVICE_RECOVERY);
  		lpfc_cancel_retry_delay_tmo(vport, ndlp);
  	}
  	return 0;
  }
  
  /**
   * lpfc_send_rscn_event - Send an RSCN event to management application
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   *
   * lpfc_send_rscn_event sends an RSCN netlink event to management
   * applications.
   */
  static void
  lpfc_send_rscn_event(struct lpfc_vport *vport,
  		struct lpfc_iocbq *cmdiocb)
  {
  	struct lpfc_dmabuf *pcmd;
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	uint32_t *payload_ptr;
  	uint32_t payload_len;
  	struct lpfc_rscn_event_header *rscn_event_data;
  
  	pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	payload_ptr = (uint32_t *) pcmd->virt;
  	payload_len = be32_to_cpu(*payload_ptr & ~ELS_CMD_MASK);
  
  	rscn_event_data = kmalloc(sizeof(struct lpfc_rscn_event_header) +
  		payload_len, GFP_KERNEL);
  	if (!rscn_event_data) {
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  			"0147 Failed to allocate memory for RSCN event\n");
  		return;
  	}
  	rscn_event_data->event_type = FC_REG_RSCN_EVENT;
  	rscn_event_data->payload_length = payload_len;
  	memcpy(rscn_event_data->rscn_payload, payload_ptr,
  		payload_len);
  
  	fc_host_post_vendor_event(shost,
  		fc_get_event_number(),
  		sizeof(struct lpfc_rscn_event_header) + payload_len,
  		(char *)rscn_event_data,
  		LPFC_NL_VENDOR_ID);
  
  	kfree(rscn_event_data);
  }
  
  /**
   * lpfc_els_rcv_rscn - Process an unsolicited rscn iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes an unsolicited RSCN (Registration State Change
   * Notification) IOCB. First, the payload of the unsolicited RSCN is walked
   * to invoke fc_host_post_event() routine to the FC transport layer. If the
   * discover state machine is about to begin discovery, it just accepts the
   * RSCN and the discovery process will satisfy the RSCN. If this RSCN only
   * contains N_Port IDs for other vports on this HBA, it just accepts the
   * RSCN and ignore processing it. If the state machine is in the recovery
   * state, the fc_rscn_id_list of this @vport is walked and the
   * lpfc_rscn_recovery_check() routine is invoked to send recovery event for
   * all nodes that match RSCN payload. Otherwise, the lpfc_els_handle_rscn()
   * routine is invoked to handle the RSCN event.
   *
   * Return code
   *   0 - Just sent the acc response
   *   1 - Sent the acc response and waited for name server completion
   **/
  static int
  lpfc_els_rcv_rscn(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		  struct lpfc_nodelist *ndlp)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_dmabuf *pcmd;
  	uint32_t *lp, *datap;
  	uint32_t payload_len, length, nportid, *cmd;
  	int rscn_cnt;
  	int rscn_id = 0, hba_id = 0;
  	int i, tmo;
  
  	pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	lp = (uint32_t *) pcmd->virt;
  
  	payload_len = be32_to_cpu(*lp++ & ~ELS_CMD_MASK);
  	payload_len -= sizeof(uint32_t);	/* take off word 0 */
  	/* RSCN received */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  			 "0214 RSCN received Data: x%x x%x x%x x%x\n",
  			 vport->fc_flag, payload_len, *lp,
  			 vport->fc_rscn_id_cnt);
  
  	/* Send an RSCN event to the management application */
  	lpfc_send_rscn_event(vport, cmdiocb);
  
  	for (i = 0; i < payload_len/sizeof(uint32_t); i++)
  		fc_host_post_event(shost, fc_get_event_number(),
  			FCH_EVT_RSCN, lp[i]);
  
  	/* Check if RSCN is coming from a direct-connected remote NPort */
  	if (vport->fc_flag & FC_PT2PT) {
  		/* If so, just ACC it, no other action needed for now */
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  				 "2024 pt2pt RSCN %08x Data: x%x x%x\n",
  				 *lp, vport->fc_flag, payload_len);
  		lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
  
  		/* Check to see if we need to NVME rescan this target
  		 * remoteport.
  		 */
  		if (ndlp->nlp_fc4_type & NLP_FC4_NVME &&
  		    ndlp->nlp_type & (NLP_NVME_TARGET | NLP_NVME_DISCOVERY))
  			lpfc_nvme_rescan_port(vport, ndlp);
  		return 0;
  	}
  
  	/* If we are about to begin discovery, just ACC the RSCN.
  	 * Discovery processing will satisfy it.
  	 */
  	if (vport->port_state <= LPFC_NS_QRY) {
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV RSCN ignore: did:x%x/ste:x%x flg:x%x",
  			ndlp->nlp_DID, vport->port_state, ndlp->nlp_flag);
  
  		lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
  		return 0;
  	}
  
  	/* If this RSCN just contains NPortIDs for other vports on this HBA,
  	 * just ACC and ignore it.
  	 */
  	if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
  		!(vport->cfg_peer_port_login)) {
  		i = payload_len;
  		datap = lp;
  		while (i > 0) {
  			nportid = *datap++;
  			nportid = ((be32_to_cpu(nportid)) & Mask_DID);
  			i -= sizeof(uint32_t);
  			rscn_id++;
  			if (lpfc_find_vport_by_did(phba, nportid))
  				hba_id++;
  		}
  		if (rscn_id == hba_id) {
  			/* ALL NPortIDs in RSCN are on HBA */
  			lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  					 "0219 Ignore RSCN "
  					 "Data: x%x x%x x%x x%x\n",
  					 vport->fc_flag, payload_len,
  					 *lp, vport->fc_rscn_id_cnt);
  			lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  				"RCV RSCN vport:  did:x%x/ste:x%x flg:x%x",
  				ndlp->nlp_DID, vport->port_state,
  				ndlp->nlp_flag);
  
  			lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb,
  				ndlp, NULL);
  			return 0;
  		}
  	}
  
  	spin_lock_irq(shost->host_lock);
  	if (vport->fc_rscn_flush) {
  		/* Another thread is walking fc_rscn_id_list on this vport */
  		vport->fc_flag |= FC_RSCN_DISCOVERY;
  		spin_unlock_irq(shost->host_lock);
  		/* Send back ACC */
  		lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
  		return 0;
  	}
  	/* Indicate we are walking fc_rscn_id_list on this vport */
  	vport->fc_rscn_flush = 1;
  	spin_unlock_irq(shost->host_lock);
  	/* Get the array count after successfully have the token */
  	rscn_cnt = vport->fc_rscn_id_cnt;
  	/* If we are already processing an RSCN, save the received
  	 * RSCN payload buffer, cmdiocb->context2 to process later.
  	 */
  	if (vport->fc_flag & (FC_RSCN_MODE | FC_NDISC_ACTIVE)) {
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV RSCN defer:  did:x%x/ste:x%x flg:x%x",
  			ndlp->nlp_DID, vport->port_state, ndlp->nlp_flag);
  
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag |= FC_RSCN_DEFERRED;
  
  		/* Restart disctmo if its already running */
  		if (vport->fc_flag & FC_DISC_TMO) {
  			tmo = ((phba->fc_ratov * 3) + 3);
  			mod_timer(&vport->fc_disctmo,
  				  jiffies + msecs_to_jiffies(1000 * tmo));
  		}
  		if ((rscn_cnt < FC_MAX_HOLD_RSCN) &&
  		    !(vport->fc_flag & FC_RSCN_DISCOVERY)) {
  			vport->fc_flag |= FC_RSCN_MODE;
  			spin_unlock_irq(shost->host_lock);
  			if (rscn_cnt) {
  				cmd = vport->fc_rscn_id_list[rscn_cnt-1]->virt;
  				length = be32_to_cpu(*cmd & ~ELS_CMD_MASK);
  			}
  			if ((rscn_cnt) &&
  			    (payload_len + length <= LPFC_BPL_SIZE)) {
  				*cmd &= ELS_CMD_MASK;
  				*cmd |= cpu_to_be32(payload_len + length);
  				memcpy(((uint8_t *)cmd) + length, lp,
  				       payload_len);
  			} else {
  				vport->fc_rscn_id_list[rscn_cnt] = pcmd;
  				vport->fc_rscn_id_cnt++;
  				/* If we zero, cmdiocb->context2, the calling
  				 * routine will not try to free it.
  				 */
  				cmdiocb->context2 = NULL;
  			}
  			/* Deferred RSCN */
  			lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  					 "0235 Deferred RSCN "
  					 "Data: x%x x%x x%x\n",
  					 vport->fc_rscn_id_cnt, vport->fc_flag,
  					 vport->port_state);
  		} else {
  			vport->fc_flag |= FC_RSCN_DISCOVERY;
  			spin_unlock_irq(shost->host_lock);
  			/* ReDiscovery RSCN */
  			lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  					 "0234 ReDiscovery RSCN "
  					 "Data: x%x x%x x%x\n",
  					 vport->fc_rscn_id_cnt, vport->fc_flag,
  					 vport->port_state);
  		}
  		/* Indicate we are done walking fc_rscn_id_list on this vport */
  		vport->fc_rscn_flush = 0;
  		/* Send back ACC */
  		lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
  		/* send RECOVERY event for ALL nodes that match RSCN payload */
  		lpfc_rscn_recovery_check(vport);
  		return 0;
  	}
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  		"RCV RSCN:        did:x%x/ste:x%x flg:x%x",
  		ndlp->nlp_DID, vport->port_state, ndlp->nlp_flag);
  
  	spin_lock_irq(shost->host_lock);
  	vport->fc_flag |= FC_RSCN_MODE;
  	spin_unlock_irq(shost->host_lock);
  	vport->fc_rscn_id_list[vport->fc_rscn_id_cnt++] = pcmd;
  	/* Indicate we are done walking fc_rscn_id_list on this vport */
  	vport->fc_rscn_flush = 0;
  	/*
  	 * If we zero, cmdiocb->context2, the calling routine will
  	 * not try to free it.
  	 */
  	cmdiocb->context2 = NULL;
  	lpfc_set_disctmo(vport);
  	/* Send back ACC */
  	lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
  	/* send RECOVERY event for ALL nodes that match RSCN payload */
  	lpfc_rscn_recovery_check(vport);
  	return lpfc_els_handle_rscn(vport);
  }
  
  /**
   * lpfc_els_handle_rscn - Handle rscn for a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine handles the Registration State Configuration Notification
   * (RSCN) for a @vport. If login to NameServer does not exist, a new ndlp shall
   * be created and a Port Login (PLOGI) to the NameServer is issued. Otherwise,
   * if the ndlp to NameServer exists, a Common Transport (CT) command to the
   * NameServer shall be issued. If CT command to the NameServer fails to be
   * issued, the lpfc_els_flush_rscn() routine shall be invoked to clean up any
   * RSCN activities with the @vport.
   *
   * Return code
   *   0 - Cleaned up rscn on the @vport
   *   1 - Wait for plogi to name server before proceed
   **/
  int
  lpfc_els_handle_rscn(struct lpfc_vport *vport)
  {
  	struct lpfc_nodelist *ndlp;
  	struct lpfc_hba  *phba = vport->phba;
  
  	/* Ignore RSCN if the port is being torn down. */
  	if (vport->load_flag & FC_UNLOADING) {
  		lpfc_els_flush_rscn(vport);
  		return 0;
  	}
  
  	/* Start timer for RSCN processing */
  	lpfc_set_disctmo(vport);
  
  	/* RSCN processed */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
  			 "0215 RSCN processed Data: x%x x%x x%x x%x\n",
  			 vport->fc_flag, 0, vport->fc_rscn_id_cnt,
  			 vport->port_state);
  
  	/* To process RSCN, first compare RSCN data with NameServer */
  	vport->fc_ns_retry = 0;
  	vport->num_disc_nodes = 0;
  
  	ndlp = lpfc_findnode_did(vport, NameServer_DID);
  	if (ndlp && NLP_CHK_NODE_ACT(ndlp)
  	    && ndlp->nlp_state == NLP_STE_UNMAPPED_NODE) {
  		/* Good ndlp, issue CT Request to NameServer.  Need to
  		 * know how many gidfts were issued.  If none, then just
  		 * flush the RSCN.  Otherwise, the outstanding requests
  		 * need to complete.
  		 */
  		if (phba->cfg_ns_query == LPFC_NS_QUERY_GID_FT) {
  			if (lpfc_issue_gidft(vport) > 0)
  				return 1;
  		} else if (phba->cfg_ns_query == LPFC_NS_QUERY_GID_PT) {
  			if (lpfc_issue_gidpt(vport) > 0)
  				return 1;
  		} else {
  			return 1;
  		}
  	} else {
  		/* Nameserver login in question.  Revalidate. */
  		if (ndlp) {
  			ndlp = lpfc_enable_node(vport, ndlp,
  						NLP_STE_PLOGI_ISSUE);
  			if (!ndlp) {
  				lpfc_els_flush_rscn(vport);
  				return 0;
  			}
  			ndlp->nlp_prev_state = NLP_STE_UNUSED_NODE;
  		} else {
  			ndlp = lpfc_nlp_init(vport, NameServer_DID);
  			if (!ndlp) {
  				lpfc_els_flush_rscn(vport);
  				return 0;
  			}
  			ndlp->nlp_prev_state = ndlp->nlp_state;
  			lpfc_nlp_set_state(vport, ndlp, NLP_STE_PLOGI_ISSUE);
  		}
  		ndlp->nlp_type |= NLP_FABRIC;
  		lpfc_issue_els_plogi(vport, NameServer_DID, 0);
  		/* Wait for NameServer login cmpl before we can
  		 * continue
  		 */
  		return 1;
  	}
  
  	lpfc_els_flush_rscn(vport);
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_flogi - Process an unsolicited flogi iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes Fabric Login (FLOGI) IOCB received as an ELS
   * unsolicited event. An unsolicited FLOGI can be received in a point-to-
   * point topology. As an unsolicited FLOGI should not be received in a loop
   * mode, any unsolicited FLOGI received in loop mode shall be ignored. The
   * lpfc_check_sparm() routine is invoked to check the parameters in the
   * unsolicited FLOGI. If parameters validation failed, the routine
   * lpfc_els_rsp_reject() shall be called with reject reason code set to
   * LSEXP_SPARM_OPTIONS to reject the FLOGI. Otherwise, the Port WWN in the
   * FLOGI shall be compared with the Port WWN of the @vport to determine who
   * will initiate PLOGI. The higher lexicographical value party shall has
   * higher priority (as the winning port) and will initiate PLOGI and
   * communicate Port_IDs (Addresses) for both nodes in PLOGI. The result
   * of this will be marked in the @vport fc_flag field with FC_PT2PT_PLOGI
   * and then the lpfc_els_rsp_acc() routine is invoked to accept the FLOGI.
   *
   * Return code
   *   0 - Successfully processed the unsolicited flogi
   *   1 - Failed to process the unsolicited flogi
   **/
  static int
  lpfc_els_rcv_flogi(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		   struct lpfc_nodelist *ndlp)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_dmabuf *pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	uint32_t *lp = (uint32_t *) pcmd->virt;
  	IOCB_t *icmd = &cmdiocb->iocb;
  	struct serv_parm *sp;
  	LPFC_MBOXQ_t *mbox;
  	uint32_t cmd, did;
  	int rc;
  	uint32_t fc_flag = 0;
  	uint32_t port_state = 0;
  
  	cmd = *lp++;
  	sp = (struct serv_parm *) lp;
  
  	/* FLOGI received */
  
  	lpfc_set_disctmo(vport);
  
  	if (phba->fc_topology == LPFC_TOPOLOGY_LOOP) {
  		/* We should never receive a FLOGI in loop mode, ignore it */
  		did = icmd->un.elsreq64.remoteID;
  
  		/* An FLOGI ELS command <elsCmd> was received from DID <did> in
  		   Loop Mode */
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "0113 An FLOGI ELS command x%x was "
  				 "received from DID x%x in Loop Mode\n",
  				 cmd, did);
  		return 1;
  	}
  
  	(void) lpfc_check_sparm(vport, ndlp, sp, CLASS3, 1);
  
  	/*
  	 * If our portname is greater than the remote portname,
  	 * then we initiate Nport login.
  	 */
  
  	rc = memcmp(&vport->fc_portname, &sp->portName,
  		    sizeof(struct lpfc_name));
  
  	if (!rc) {
  		if (phba->sli_rev < LPFC_SLI_REV4) {
  			mbox = mempool_alloc(phba->mbox_mem_pool,
  					     GFP_KERNEL);
  			if (!mbox)
  				return 1;
  			lpfc_linkdown(phba);
  			lpfc_init_link(phba, mbox,
  				       phba->cfg_topology,
  				       phba->cfg_link_speed);
  			mbox->u.mb.un.varInitLnk.lipsr_AL_PA = 0;
  			mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
  			mbox->vport = vport;
  			rc = lpfc_sli_issue_mbox(phba, mbox,
  						 MBX_NOWAIT);
  			lpfc_set_loopback_flag(phba);
  			if (rc == MBX_NOT_FINISHED)
  				mempool_free(mbox, phba->mbox_mem_pool);
  			return 1;
  		}
  
  		/* abort the flogi coming back to ourselves
  		 * due to external loopback on the port.
  		 */
  		lpfc_els_abort_flogi(phba);
  		return 0;
  
  	} else if (rc > 0) {	/* greater than */
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag |= FC_PT2PT_PLOGI;
  		spin_unlock_irq(shost->host_lock);
  
  		/* If we have the high WWPN we can assign our own
  		 * myDID; otherwise, we have to WAIT for a PLOGI
  		 * from the remote NPort to find out what it
  		 * will be.
  		 */
  		vport->fc_myDID = PT2PT_LocalID;
  	} else {
  		vport->fc_myDID = PT2PT_RemoteID;
  	}
  
  	/*
  	 * The vport state should go to LPFC_FLOGI only
  	 * AFTER we issue a FLOGI, not receive one.
  	 */
  	spin_lock_irq(shost->host_lock);
  	fc_flag = vport->fc_flag;
  	port_state = vport->port_state;
  	vport->fc_flag |= FC_PT2PT;
  	vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
  
  	/* Acking an unsol FLOGI.  Count 1 for link bounce
  	 * work-around.
  	 */
  	vport->rcv_flogi_cnt++;
  	spin_unlock_irq(shost->host_lock);
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "3311 Rcv Flogi PS x%x new PS x%x "
  			 "fc_flag x%x new fc_flag x%x\n",
  			 port_state, vport->port_state,
  			 fc_flag, vport->fc_flag);
  
  	/*
  	 * We temporarily set fc_myDID to make it look like we are
  	 * a Fabric. This is done just so we end up with the right
  	 * did / sid on the FLOGI ACC rsp.
  	 */
  	did = vport->fc_myDID;
  	vport->fc_myDID = Fabric_DID;
  
  	memcpy(&phba->fc_fabparam, sp, sizeof(struct serv_parm));
  
  	/* Defer ACC response until AFTER we issue a FLOGI */
  	if (!(phba->hba_flag & HBA_FLOGI_ISSUED)) {
  		phba->defer_flogi_acc_rx_id = cmdiocb->iocb.ulpContext;
  		phba->defer_flogi_acc_ox_id =
  					cmdiocb->iocb.unsli3.rcvsli3.ox_id;
  
  		vport->fc_myDID = did;
  
  		lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  				 "3344 Deferring FLOGI ACC: rx_id: x%x,"
  				 " ox_id: x%x, hba_flag x%x\n",
  				 phba->defer_flogi_acc_rx_id,
  				 phba->defer_flogi_acc_ox_id, phba->hba_flag);
  
  		phba->defer_flogi_acc_flag = true;
  
  		return 0;
  	}
  
  	/* Send back ACC */
  	lpfc_els_rsp_acc(vport, ELS_CMD_FLOGI, cmdiocb, ndlp, NULL);
  
  	/* Now lets put fc_myDID back to what its supposed to be */
  	vport->fc_myDID = did;
  
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_rnid - Process an unsolicited rnid iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes Request Node Identification Data (RNID) IOCB
   * received as an ELS unsolicited event. Only when the RNID specified format
   * 0x0 or 0xDF (Topology Discovery Specific Node Identification Data)
   * present, this routine will invoke the lpfc_els_rsp_rnid_acc() routine to
   * Accept (ACC) the RNID ELS command. All the other RNID formats are
   * rejected by invoking the lpfc_els_rsp_reject() routine.
   *
   * Return code
   *   0 - Successfully processed rnid iocb (currently always return 0)
   **/
  static int
  lpfc_els_rcv_rnid(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		  struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_dmabuf *pcmd;
  	uint32_t *lp;
  	RNID *rn;
  	struct ls_rjt stat;
  
  	pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	lp = (uint32_t *) pcmd->virt;
  
  	lp++;
  	rn = (RNID *) lp;
  
  	/* RNID received */
  
  	switch (rn->Format) {
  	case 0:
  	case RNID_TOPOLOGY_DISC:
  		/* Send back ACC */
  		lpfc_els_rsp_rnid_acc(vport, rn->Format, cmdiocb, ndlp);
  		break;
  	default:
  		/* Reject this request because format not supported */
  		stat.un.b.lsRjtRsvd0 = 0;
  		stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
  		stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
  		stat.un.b.vendorUnique = 0;
  		lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp,
  			NULL);
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_echo - Process an unsolicited echo iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * Return code
   *   0 - Successfully processed echo iocb (currently always return 0)
   **/
  static int
  lpfc_els_rcv_echo(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		  struct lpfc_nodelist *ndlp)
  {
  	uint8_t *pcmd;
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) cmdiocb->context2)->virt);
  
  	/* skip over first word of echo command to find echo data */
  	pcmd += sizeof(uint32_t);
  
  	lpfc_els_rsp_echo_acc(vport, pcmd, cmdiocb, ndlp);
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_lirr - Process an unsolicited lirr iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes a Link Incident Report Registration(LIRR) IOCB
   * received as an ELS unsolicited event. Currently, this function just invokes
   * the lpfc_els_rsp_reject() routine to reject the LIRR IOCB unconditionally.
   *
   * Return code
   *   0 - Successfully processed lirr iocb (currently always return 0)
   **/
  static int
  lpfc_els_rcv_lirr(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		  struct lpfc_nodelist *ndlp)
  {
  	struct ls_rjt stat;
  
  	/* For now, unconditionally reject this command */
  	stat.un.b.lsRjtRsvd0 = 0;
  	stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
  	stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
  	stat.un.b.vendorUnique = 0;
  	lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp, NULL);
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_rrq - Process an unsolicited rrq iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes a Reinstate Recovery Qualifier (RRQ) IOCB
   * received as an ELS unsolicited event. A request to RRQ shall only
   * be accepted if the Originator Nx_Port N_Port_ID or the Responder
   * Nx_Port N_Port_ID of the target Exchange is the same as the
   * N_Port_ID of the Nx_Port that makes the request. If the RRQ is
   * not accepted, an LS_RJT with reason code "Unable to perform
   * command request" and reason code explanation "Invalid Originator
   * S_ID" shall be returned. For now, we just unconditionally accept
   * RRQ from the target.
   **/
  static void
  lpfc_els_rcv_rrq(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		 struct lpfc_nodelist *ndlp)
  {
  	lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
  	if (vport->phba->sli_rev == LPFC_SLI_REV4)
  		lpfc_els_clear_rrq(vport, cmdiocb, ndlp);
  }
  
  /**
   * lpfc_els_rsp_rls_acc - Completion callbk func for MBX_READ_LNK_STAT mbox cmd
   * @phba: pointer to lpfc hba data structure.
   * @pmb: pointer to the driver internal queue element for mailbox command.
   *
   * This routine is the completion callback function for the MBX_READ_LNK_STAT
   * mailbox command. This callback function is to actually send the Accept
   * (ACC) response to a Read Port Status (RPS) unsolicited IOCB event. It
   * collects the link statistics from the completion of the MBX_READ_LNK_STAT
   * mailbox command, constructs the RPS response with the link statistics
   * collected, and then invokes the lpfc_sli_issue_iocb() routine to send ACC
   * response to the RPS.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the RPS Accept Response ELS IOCB command.
   *
   **/
  static void
  lpfc_els_rsp_rls_acc(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
  {
  	MAILBOX_t *mb;
  	IOCB_t *icmd;
  	struct RLS_RSP *rls_rsp;
  	uint8_t *pcmd;
  	struct lpfc_iocbq *elsiocb;
  	struct lpfc_nodelist *ndlp;
  	uint16_t oxid;
  	uint16_t rxid;
  	uint32_t cmdsize;
  
  	mb = &pmb->u.mb;
  
  	ndlp = (struct lpfc_nodelist *)pmb->ctx_ndlp;
  	rxid = (uint16_t)((unsigned long)(pmb->ctx_buf) & 0xffff);
  	oxid = (uint16_t)(((unsigned long)(pmb->ctx_buf) >> 16) & 0xffff);
  	pmb->ctx_buf = NULL;
  	pmb->ctx_ndlp = NULL;
  
  	if (mb->mbxStatus) {
  		mempool_free(pmb, phba->mbox_mem_pool);
  		return;
  	}
  
  	cmdsize = sizeof(struct RLS_RSP) + sizeof(uint32_t);
  	elsiocb = lpfc_prep_els_iocb(phba->pport, 0, cmdsize,
  				     lpfc_max_els_tries, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_ACC);
  
  	/* Decrement the ndlp reference count from previous mbox command */
  	lpfc_nlp_put(ndlp);
  
  	if (!elsiocb) {
  		mempool_free(pmb, phba->mbox_mem_pool);
  		return;
  	}
  
  	icmd = &elsiocb->iocb;
  	icmd->ulpContext = rxid;
  	icmd->unsli3.rcvsli3.ox_id = oxid;
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  	pcmd += sizeof(uint32_t); /* Skip past command */
  	rls_rsp = (struct RLS_RSP *)pcmd;
  
  	rls_rsp->linkFailureCnt = cpu_to_be32(mb->un.varRdLnk.linkFailureCnt);
  	rls_rsp->lossSyncCnt = cpu_to_be32(mb->un.varRdLnk.lossSyncCnt);
  	rls_rsp->lossSignalCnt = cpu_to_be32(mb->un.varRdLnk.lossSignalCnt);
  	rls_rsp->primSeqErrCnt = cpu_to_be32(mb->un.varRdLnk.primSeqErrCnt);
  	rls_rsp->invalidXmitWord = cpu_to_be32(mb->un.varRdLnk.invalidXmitWord);
  	rls_rsp->crcCnt = cpu_to_be32(mb->un.varRdLnk.crcCnt);
  	mempool_free(pmb, phba->mbox_mem_pool);
  	/* Xmit ELS RLS ACC response tag <ulpIoTag> */
  	lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_ELS,
  			 "2874 Xmit ELS RLS ACC response tag x%x xri x%x, "
  			 "did x%x, nlp_flag x%x, nlp_state x%x, rpi x%x\n",
  			 elsiocb->iotag, elsiocb->iocb.ulpContext,
  			 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			 ndlp->nlp_rpi);
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	phba->fc_stat.elsXmitACC++;
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) == IOCB_ERROR)
  		lpfc_els_free_iocb(phba, elsiocb);
  }
  
  /**
   * lpfc_els_rsp_rps_acc - Completion callbk func for MBX_READ_LNK_STAT mbox cmd
   * @phba: pointer to lpfc hba data structure.
   * @pmb: pointer to the driver internal queue element for mailbox command.
   *
   * This routine is the completion callback function for the MBX_READ_LNK_STAT
   * mailbox command. This callback function is to actually send the Accept
   * (ACC) response to a Read Port Status (RPS) unsolicited IOCB event. It
   * collects the link statistics from the completion of the MBX_READ_LNK_STAT
   * mailbox command, constructs the RPS response with the link statistics
   * collected, and then invokes the lpfc_sli_issue_iocb() routine to send ACC
   * response to the RPS.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the RPS Accept Response ELS IOCB command.
   *
   **/
  static void
  lpfc_els_rsp_rps_acc(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
  {
  	MAILBOX_t *mb;
  	IOCB_t *icmd;
  	RPS_RSP *rps_rsp;
  	uint8_t *pcmd;
  	struct lpfc_iocbq *elsiocb;
  	struct lpfc_nodelist *ndlp;
  	uint16_t status;
  	uint16_t oxid;
  	uint16_t rxid;
  	uint32_t cmdsize;
  
  	mb = &pmb->u.mb;
  
  	ndlp = (struct lpfc_nodelist *)pmb->ctx_ndlp;
  	rxid = (uint16_t)((unsigned long)(pmb->ctx_buf) & 0xffff);
  	oxid = (uint16_t)(((unsigned long)(pmb->ctx_buf) >> 16) & 0xffff);
  	pmb->ctx_ndlp = NULL;
  	pmb->ctx_buf = NULL;
  
  	if (mb->mbxStatus) {
  		mempool_free(pmb, phba->mbox_mem_pool);
  		return;
  	}
  
  	cmdsize = sizeof(RPS_RSP) + sizeof(uint32_t);
  	mempool_free(pmb, phba->mbox_mem_pool);
  	elsiocb = lpfc_prep_els_iocb(phba->pport, 0, cmdsize,
  				     lpfc_max_els_tries, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_ACC);
  
  	/* Decrement the ndlp reference count from previous mbox command */
  	lpfc_nlp_put(ndlp);
  
  	if (!elsiocb)
  		return;
  
  	icmd = &elsiocb->iocb;
  	icmd->ulpContext = rxid;
  	icmd->unsli3.rcvsli3.ox_id = oxid;
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  	pcmd += sizeof(uint32_t); /* Skip past command */
  	rps_rsp = (RPS_RSP *)pcmd;
  
  	if (phba->fc_topology != LPFC_TOPOLOGY_LOOP)
  		status = 0x10;
  	else
  		status = 0x8;
  	if (phba->pport->fc_flag & FC_FABRIC)
  		status |= 0x4;
  
  	rps_rsp->rsvd1 = 0;
  	rps_rsp->portStatus = cpu_to_be16(status);
  	rps_rsp->linkFailureCnt = cpu_to_be32(mb->un.varRdLnk.linkFailureCnt);
  	rps_rsp->lossSyncCnt = cpu_to_be32(mb->un.varRdLnk.lossSyncCnt);
  	rps_rsp->lossSignalCnt = cpu_to_be32(mb->un.varRdLnk.lossSignalCnt);
  	rps_rsp->primSeqErrCnt = cpu_to_be32(mb->un.varRdLnk.primSeqErrCnt);
  	rps_rsp->invalidXmitWord = cpu_to_be32(mb->un.varRdLnk.invalidXmitWord);
  	rps_rsp->crcCnt = cpu_to_be32(mb->un.varRdLnk.crcCnt);
  	/* Xmit ELS RPS ACC response tag <ulpIoTag> */
  	lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_ELS,
  			 "0118 Xmit ELS RPS ACC response tag x%x xri x%x, "
  			 "did x%x, nlp_flag x%x, nlp_state x%x, rpi x%x\n",
  			 elsiocb->iotag, elsiocb->iocb.ulpContext,
  			 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			 ndlp->nlp_rpi);
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	phba->fc_stat.elsXmitACC++;
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) == IOCB_ERROR)
  		lpfc_els_free_iocb(phba, elsiocb);
  	return;
  }
  
  /**
   * lpfc_els_rcv_rls - Process an unsolicited rls iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes Read Port Status (RPL) IOCB received as an
   * ELS unsolicited event. It first checks the remote port state. If the
   * remote port is not in NLP_STE_UNMAPPED_NODE state or NLP_STE_MAPPED_NODE
   * state, it invokes the lpfc_els_rsl_reject() routine to send the reject
   * response. Otherwise, it issue the MBX_READ_LNK_STAT mailbox command
   * for reading the HBA link statistics. It is for the callback function,
   * lpfc_els_rsp_rls_acc(), set to the MBX_READ_LNK_STAT mailbox command
   * to actually sending out RPL Accept (ACC) response.
   *
   * Return codes
   *   0 - Successfully processed rls iocb (currently always return 0)
   **/
  static int
  lpfc_els_rcv_rls(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		 struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba *phba = vport->phba;
  	LPFC_MBOXQ_t *mbox;
  	struct ls_rjt stat;
  
  	if ((ndlp->nlp_state != NLP_STE_UNMAPPED_NODE) &&
  	    (ndlp->nlp_state != NLP_STE_MAPPED_NODE))
  		/* reject the unsolicited RPS request and done with it */
  		goto reject_out;
  
  	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_ATOMIC);
  	if (mbox) {
  		lpfc_read_lnk_stat(phba, mbox);
  		mbox->ctx_buf = (void *)((unsigned long)
  			((cmdiocb->iocb.unsli3.rcvsli3.ox_id << 16) |
  			cmdiocb->iocb.ulpContext)); /* rx_id */
  		mbox->ctx_ndlp = lpfc_nlp_get(ndlp);
  		mbox->vport = vport;
  		mbox->mbox_cmpl = lpfc_els_rsp_rls_acc;
  		if (lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT)
  			!= MBX_NOT_FINISHED)
  			/* Mbox completion will send ELS Response */
  			return 0;
  		/* Decrement reference count used for the failed mbox
  		 * command.
  		 */
  		lpfc_nlp_put(ndlp);
  		mempool_free(mbox, phba->mbox_mem_pool);
  	}
  reject_out:
  	/* issue rejection response */
  	stat.un.b.lsRjtRsvd0 = 0;
  	stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
  	stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
  	stat.un.b.vendorUnique = 0;
  	lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp, NULL);
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_rtv - Process an unsolicited rtv iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes Read Timout Value (RTV) IOCB received as an
   * ELS unsolicited event. It first checks the remote port state. If the
   * remote port is not in NLP_STE_UNMAPPED_NODE state or NLP_STE_MAPPED_NODE
   * state, it invokes the lpfc_els_rsl_reject() routine to send the reject
   * response. Otherwise, it sends the Accept(ACC) response to a Read Timeout
   * Value (RTV) unsolicited IOCB event.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the RPS Accept Response ELS IOCB command.
   *
   * Return codes
   *   0 - Successfully processed rtv iocb (currently always return 0)
   **/
  static int
  lpfc_els_rcv_rtv(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		 struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba *phba = vport->phba;
  	struct ls_rjt stat;
  	struct RTV_RSP *rtv_rsp;
  	uint8_t *pcmd;
  	struct lpfc_iocbq *elsiocb;
  	uint32_t cmdsize;
  
  
  	if ((ndlp->nlp_state != NLP_STE_UNMAPPED_NODE) &&
  	    (ndlp->nlp_state != NLP_STE_MAPPED_NODE))
  		/* reject the unsolicited RPS request and done with it */
  		goto reject_out;
  
  	cmdsize = sizeof(struct RTV_RSP) + sizeof(uint32_t);
  	elsiocb = lpfc_prep_els_iocb(phba->pport, 0, cmdsize,
  				     lpfc_max_els_tries, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_ACC);
  
  	if (!elsiocb)
  		return 1;
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  	pcmd += sizeof(uint32_t); /* Skip past command */
  
  	/* use the command's xri in the response */
  	elsiocb->iocb.ulpContext = cmdiocb->iocb.ulpContext;  /* Xri / rx_id */
  	elsiocb->iocb.unsli3.rcvsli3.ox_id = cmdiocb->iocb.unsli3.rcvsli3.ox_id;
  
  	rtv_rsp = (struct RTV_RSP *)pcmd;
  
  	/* populate RTV payload */
  	rtv_rsp->ratov = cpu_to_be32(phba->fc_ratov * 1000); /* report msecs */
  	rtv_rsp->edtov = cpu_to_be32(phba->fc_edtov);
  	bf_set(qtov_edtovres, rtv_rsp, phba->fc_edtovResol ? 1 : 0);
  	bf_set(qtov_rttov, rtv_rsp, 0); /* Field is for FC ONLY */
  	rtv_rsp->qtov = cpu_to_be32(rtv_rsp->qtov);
  
  	/* Xmit ELS RLS ACC response tag <ulpIoTag> */
  	lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_ELS,
  			 "2875 Xmit ELS RTV ACC response tag x%x xri x%x, "
  			 "did x%x, nlp_flag x%x, nlp_state x%x, rpi x%x, "
  			 "Data: x%x x%x x%x\n",
  			 elsiocb->iotag, elsiocb->iocb.ulpContext,
  			 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			 ndlp->nlp_rpi,
  			rtv_rsp->ratov, rtv_rsp->edtov, rtv_rsp->qtov);
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	phba->fc_stat.elsXmitACC++;
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) == IOCB_ERROR)
  		lpfc_els_free_iocb(phba, elsiocb);
  	return 0;
  
  reject_out:
  	/* issue rejection response */
  	stat.un.b.lsRjtRsvd0 = 0;
  	stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
  	stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
  	stat.un.b.vendorUnique = 0;
  	lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp, NULL);
  	return 0;
  }
  
  /* lpfc_els_rcv_rps - Process an unsolicited rps iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes Read Port Status (RPS) IOCB received as an
   * ELS unsolicited event. It first checks the remote port state. If the
   * remote port is not in NLP_STE_UNMAPPED_NODE state or NLP_STE_MAPPED_NODE
   * state, it invokes the lpfc_els_rsp_reject() routine to send the reject
   * response. Otherwise, it issue the MBX_READ_LNK_STAT mailbox command
   * for reading the HBA link statistics. It is for the callback function,
   * lpfc_els_rsp_rps_acc(), set to the MBX_READ_LNK_STAT mailbox command
   * to actually sending out RPS Accept (ACC) response.
   *
   * Return codes
   *   0 - Successfully processed rps iocb (currently always return 0)
   **/
  static int
  lpfc_els_rcv_rps(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		 struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba *phba = vport->phba;
  	uint32_t *lp;
  	uint8_t flag;
  	LPFC_MBOXQ_t *mbox;
  	struct lpfc_dmabuf *pcmd;
  	RPS *rps;
  	struct ls_rjt stat;
  
  	if ((ndlp->nlp_state != NLP_STE_UNMAPPED_NODE) &&
  	    (ndlp->nlp_state != NLP_STE_MAPPED_NODE))
  		/* reject the unsolicited RPS request and done with it */
  		goto reject_out;
  
  	pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	lp = (uint32_t *) pcmd->virt;
  	flag = (be32_to_cpu(*lp++) & 0xf);
  	rps = (RPS *) lp;
  
  	if ((flag == 0) ||
  	    ((flag == 1) && (be32_to_cpu(rps->un.portNum) == 0)) ||
  	    ((flag == 2) && (memcmp(&rps->un.portName, &vport->fc_portname,
  				    sizeof(struct lpfc_name)) == 0))) {
  
  		printk("Fix me....\n");
  		dump_stack();
  		mbox = mempool_alloc(phba->mbox_mem_pool, GFP_ATOMIC);
  		if (mbox) {
  			lpfc_read_lnk_stat(phba, mbox);
  			mbox->ctx_buf = (void *)((unsigned long)
  				((cmdiocb->iocb.unsli3.rcvsli3.ox_id << 16) |
  				cmdiocb->iocb.ulpContext)); /* rx_id */
  			mbox->ctx_ndlp = lpfc_nlp_get(ndlp);
  			mbox->vport = vport;
  			mbox->mbox_cmpl = lpfc_els_rsp_rps_acc;
  			if (lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT)
  				!= MBX_NOT_FINISHED)
  				/* Mbox completion will send ELS Response */
  				return 0;
  			/* Decrement reference count used for the failed mbox
  			 * command.
  			 */
  			lpfc_nlp_put(ndlp);
  			mempool_free(mbox, phba->mbox_mem_pool);
  		}
  	}
  
  reject_out:
  	/* issue rejection response */
  	stat.un.b.lsRjtRsvd0 = 0;
  	stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
  	stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
  	stat.un.b.vendorUnique = 0;
  	lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp, NULL);
  	return 0;
  }
  
  /* lpfc_issue_els_rrq - Process an unsolicited rps iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   * @did: DID of the target.
   * @rrq: Pointer to the rrq struct.
   *
   * Build a ELS RRQ command and send it to the target. If the issue_iocb is
   * Successful the the completion handler will clear the RRQ.
   *
   * Return codes
   *   0 - Successfully sent rrq els iocb.
   *   1 - Failed to send rrq els iocb.
   **/
  static int
  lpfc_issue_els_rrq(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
  			uint32_t did, struct lpfc_node_rrq *rrq)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	struct RRQ *els_rrq;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	int ret;
  
  
  	if (ndlp != rrq->ndlp)
  		ndlp = rrq->ndlp;
  	if (!ndlp || !NLP_CHK_NODE_ACT(ndlp))
  		return 1;
  
  	/* If ndlp is not NULL, we will bump the reference count on it */
  	cmdsize = (sizeof(uint32_t) + sizeof(struct RRQ));
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, 0, ndlp, did,
  				     ELS_CMD_RRQ);
  	if (!elsiocb)
  		return 1;
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  
  	/* For RRQ request, remainder of payload is Exchange IDs */
  	*((uint32_t *) (pcmd)) = ELS_CMD_RRQ;
  	pcmd += sizeof(uint32_t);
  	els_rrq = (struct RRQ *) pcmd;
  
  	bf_set(rrq_oxid, els_rrq, phba->sli4_hba.xri_ids[rrq->xritag]);
  	bf_set(rrq_rxid, els_rrq, rrq->rxid);
  	bf_set(rrq_did, els_rrq, vport->fc_myDID);
  	els_rrq->rrq = cpu_to_be32(els_rrq->rrq);
  	els_rrq->rrq_exchg = cpu_to_be32(els_rrq->rrq_exchg);
  
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue RRQ:     did:x%x",
  		did, rrq->xritag, rrq->rxid);
  	elsiocb->context_un.rrq = rrq;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rrq;
  	ret = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0);
  
  	if (ret == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_send_rrq - Sends ELS RRQ if needed.
   * @phba: pointer to lpfc hba data structure.
   * @rrq: pointer to the active rrq.
   *
   * This routine will call the lpfc_issue_els_rrq if the rrq is
   * still active for the xri. If this function returns a failure then
   * the caller needs to clean up the RRQ by calling lpfc_clr_active_rrq.
   *
   * Returns 0 Success.
   *         1 Failure.
   **/
  int
  lpfc_send_rrq(struct lpfc_hba *phba, struct lpfc_node_rrq *rrq)
  {
  	struct lpfc_nodelist *ndlp = lpfc_findnode_did(rrq->vport,
  						       rrq->nlp_DID);
  	if (!ndlp)
  		return 1;
  
  	if (lpfc_test_rrq_active(phba, ndlp, rrq->xritag))
  		return lpfc_issue_els_rrq(rrq->vport, ndlp,
  					 rrq->nlp_DID, rrq);
  	else
  		return 1;
  }
  
  /**
   * lpfc_els_rsp_rpl_acc - Issue an accept rpl els command
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdsize: size of the ELS command.
   * @oldiocb: pointer to the original lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine issuees an Accept (ACC) Read Port List (RPL) ELS command.
   * It is to be called by the lpfc_els_rcv_rpl() routine to accept the RPL.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the RPL Accept Response ELS command.
   *
   * Return code
   *   0 - Successfully issued ACC RPL ELS command
   *   1 - Failed to issue ACC RPL ELS command
   **/
  static int
  lpfc_els_rsp_rpl_acc(struct lpfc_vport *vport, uint16_t cmdsize,
  		     struct lpfc_iocbq *oldiocb, struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_hba *phba = vport->phba;
  	IOCB_t *icmd, *oldcmd;
  	RPL_RSP rpl_rsp;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  
  	elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
  				     ndlp->nlp_DID, ELS_CMD_ACC);
  
  	if (!elsiocb)
  		return 1;
  
  	icmd = &elsiocb->iocb;
  	oldcmd = &oldiocb->iocb;
  	icmd->ulpContext = oldcmd->ulpContext;	/* Xri / rx_id */
  	icmd->unsli3.rcvsli3.ox_id = oldcmd->unsli3.rcvsli3.ox_id;
  
  	pcmd = (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	*((uint32_t *) (pcmd)) = ELS_CMD_ACC;
  	pcmd += sizeof(uint16_t);
  	*((uint16_t *)(pcmd)) = be16_to_cpu(cmdsize);
  	pcmd += sizeof(uint16_t);
  
  	/* Setup the RPL ACC payload */
  	rpl_rsp.listLen = be32_to_cpu(1);
  	rpl_rsp.index = 0;
  	rpl_rsp.port_num_blk.portNum = 0;
  	rpl_rsp.port_num_blk.portID = be32_to_cpu(vport->fc_myDID);
  	memcpy(&rpl_rsp.port_num_blk.portName, &vport->fc_portname,
  	    sizeof(struct lpfc_name));
  	memcpy(pcmd, &rpl_rsp, cmdsize - sizeof(uint32_t));
  	/* Xmit ELS RPL ACC response tag <ulpIoTag> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0120 Xmit ELS RPL ACC response tag x%x "
  			 "xri x%x, did x%x, nlp_flag x%x, nlp_state x%x, "
  			 "rpi x%x\n",
  			 elsiocb->iotag, elsiocb->iocb.ulpContext,
  			 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
  			 ndlp->nlp_rpi);
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
  	phba->fc_stat.elsXmitACC++;
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) ==
  	    IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_rpl - Process an unsolicited rpl iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes Read Port List (RPL) IOCB received as an ELS
   * unsolicited event. It first checks the remote port state. If the remote
   * port is not in NLP_STE_UNMAPPED_NODE and NLP_STE_MAPPED_NODE states, it
   * invokes the lpfc_els_rsp_reject() routine to send reject response.
   * Otherwise, this routine then invokes the lpfc_els_rsp_rpl_acc() routine
   * to accept the RPL.
   *
   * Return code
   *   0 - Successfully processed rpl iocb (currently always return 0)
   **/
  static int
  lpfc_els_rcv_rpl(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		 struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_dmabuf *pcmd;
  	uint32_t *lp;
  	uint32_t maxsize;
  	uint16_t cmdsize;
  	RPL *rpl;
  	struct ls_rjt stat;
  
  	if ((ndlp->nlp_state != NLP_STE_UNMAPPED_NODE) &&
  	    (ndlp->nlp_state != NLP_STE_MAPPED_NODE)) {
  		/* issue rejection response */
  		stat.un.b.lsRjtRsvd0 = 0;
  		stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
  		stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
  		stat.un.b.vendorUnique = 0;
  		lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp,
  			NULL);
  		/* rejected the unsolicited RPL request and done with it */
  		return 0;
  	}
  
  	pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	lp = (uint32_t *) pcmd->virt;
  	rpl = (RPL *) (lp + 1);
  	maxsize = be32_to_cpu(rpl->maxsize);
  
  	/* We support only one port */
  	if ((rpl->index == 0) &&
  	    ((maxsize == 0) ||
  	     ((maxsize * sizeof(uint32_t)) >= sizeof(RPL_RSP)))) {
  		cmdsize = sizeof(uint32_t) + sizeof(RPL_RSP);
  	} else {
  		cmdsize = sizeof(uint32_t) + maxsize * sizeof(uint32_t);
  	}
  	lpfc_els_rsp_rpl_acc(vport, cmdsize, cmdiocb, ndlp);
  
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_farp - Process an unsolicited farp request els command
   * @vport: pointer to a virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes Fibre Channel Address Resolution Protocol
   * (FARP) Request IOCB received as an ELS unsolicited event. Currently,
   * the lpfc driver only supports matching on WWPN or WWNN for FARP. As such,
   * FARP_MATCH_PORT flag and FARP_MATCH_NODE flag are checked against the
   * Match Flag in the FARP request IOCB: if FARP_MATCH_PORT flag is set, the
   * remote PortName is compared against the FC PortName stored in the @vport
   * data structure; if FARP_MATCH_NODE flag is set, the remote NodeName is
   * compared against the FC NodeName stored in the @vport data structure.
   * If any of these matches and the FARP_REQUEST_FARPR flag is set in the
   * FARP request IOCB Response Flag, the lpfc_issue_els_farpr() routine is
   * invoked to send out FARP Response to the remote node. Before sending the
   * FARP Response, however, the FARP_REQUEST_PLOGI flag is check in the FARP
   * request IOCB Response Flag and, if it is set, the lpfc_issue_els_plogi()
   * routine is invoked to log into the remote port first.
   *
   * Return code
   *   0 - Either the FARP Match Mode not supported or successfully processed
   **/
  static int
  lpfc_els_rcv_farp(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		  struct lpfc_nodelist *ndlp)
  {
  	struct lpfc_dmabuf *pcmd;
  	uint32_t *lp;
  	IOCB_t *icmd;
  	FARP *fp;
  	uint32_t cnt, did;
  
  	icmd = &cmdiocb->iocb;
  	did = icmd->un.elsreq64.remoteID;
  	pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	lp = (uint32_t *) pcmd->virt;
  
  	lp++;
  	fp = (FARP *) lp;
  	/* FARP-REQ received from DID <did> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0601 FARP-REQ received from DID x%x\n", did);
  	/* We will only support match on WWPN or WWNN */
  	if (fp->Mflags & ~(FARP_MATCH_NODE | FARP_MATCH_PORT)) {
  		return 0;
  	}
  
  	cnt = 0;
  	/* If this FARP command is searching for my portname */
  	if (fp->Mflags & FARP_MATCH_PORT) {
  		if (memcmp(&fp->RportName, &vport->fc_portname,
  			   sizeof(struct lpfc_name)) == 0)
  			cnt = 1;
  	}
  
  	/* If this FARP command is searching for my nodename */
  	if (fp->Mflags & FARP_MATCH_NODE) {
  		if (memcmp(&fp->RnodeName, &vport->fc_nodename,
  			   sizeof(struct lpfc_name)) == 0)
  			cnt = 1;
  	}
  
  	if (cnt) {
  		if ((ndlp->nlp_state == NLP_STE_UNMAPPED_NODE) ||
  		   (ndlp->nlp_state == NLP_STE_MAPPED_NODE)) {
  			/* Log back into the node before sending the FARP. */
  			if (fp->Rflags & FARP_REQUEST_PLOGI) {
  				ndlp->nlp_prev_state = ndlp->nlp_state;
  				lpfc_nlp_set_state(vport, ndlp,
  						   NLP_STE_PLOGI_ISSUE);
  				lpfc_issue_els_plogi(vport, ndlp->nlp_DID, 0);
  			}
  
  			/* Send a FARP response to that node */
  			if (fp->Rflags & FARP_REQUEST_FARPR)
  				lpfc_issue_els_farpr(vport, did, 0);
  		}
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_farpr - Process an unsolicited farp response iocb
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine processes Fibre Channel Address Resolution Protocol
   * Response (FARPR) IOCB received as an ELS unsolicited event. It simply
   * invokes the lpfc_els_rsp_acc() routine to the remote node to accept
   * the FARP response request.
   *
   * Return code
   *   0 - Successfully processed FARPR IOCB (currently always return 0)
   **/
  static int
  lpfc_els_rcv_farpr(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		   struct lpfc_nodelist  *ndlp)
  {
  	struct lpfc_dmabuf *pcmd;
  	uint32_t *lp;
  	IOCB_t *icmd;
  	uint32_t did;
  
  	icmd = &cmdiocb->iocb;
  	did = icmd->un.elsreq64.remoteID;
  	pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
  	lp = (uint32_t *) pcmd->virt;
  
  	lp++;
  	/* FARP-RSP received from DID <did> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0600 FARP-RSP received from DID x%x\n", did);
  	/* ACCEPT the Farp resp request */
  	lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
  
  	return 0;
  }
  
  /**
   * lpfc_els_rcv_fan - Process an unsolicited fan iocb command
   * @vport: pointer to a host virtual N_Port data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @fan_ndlp: pointer to a node-list data structure.
   *
   * This routine processes a Fabric Address Notification (FAN) IOCB
   * command received as an ELS unsolicited event. The FAN ELS command will
   * only be processed on a physical port (i.e., the @vport represents the
   * physical port). The fabric NodeName and PortName from the FAN IOCB are
   * compared against those in the phba data structure. If any of those is
   * different, the lpfc_initial_flogi() routine is invoked to initialize
   * Fabric Login (FLOGI) to the fabric to start the discover over. Otherwise,
   * if both of those are identical, the lpfc_issue_fabric_reglogin() routine
   * is invoked to register login to the fabric.
   *
   * Return code
   *   0 - Successfully processed fan iocb (currently always return 0).
   **/
  static int
  lpfc_els_rcv_fan(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
  		 struct lpfc_nodelist *fan_ndlp)
  {
  	struct lpfc_hba *phba = vport->phba;
  	uint32_t *lp;
  	FAN *fp;
  
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS, "0265 FAN received\n");
  	lp = (uint32_t *)((struct lpfc_dmabuf *)cmdiocb->context2)->virt;
  	fp = (FAN *) ++lp;
  	/* FAN received; Fan does not have a reply sequence */
  	if ((vport == phba->pport) &&
  	    (vport->port_state == LPFC_LOCAL_CFG_LINK)) {
  		if ((memcmp(&phba->fc_fabparam.nodeName, &fp->FnodeName,
  			    sizeof(struct lpfc_name))) ||
  		    (memcmp(&phba->fc_fabparam.portName, &fp->FportName,
  			    sizeof(struct lpfc_name)))) {
  			/* This port has switched fabrics. FLOGI is required */
  			lpfc_issue_init_vfi(vport);
  		} else {
  			/* FAN verified - skip FLOGI */
  			vport->fc_myDID = vport->fc_prevDID;
  			if (phba->sli_rev < LPFC_SLI_REV4)
  				lpfc_issue_fabric_reglogin(vport);
  			else {
  				lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  					"3138 Need register VFI: (x%x/%x)\n",
  					vport->fc_prevDID, vport->fc_myDID);
  				lpfc_issue_reg_vfi(vport);
  			}
  		}
  	}
  	return 0;
  }
  
  /**
   * lpfc_els_timeout - Handler funciton to the els timer
   * @ptr: holder for the timer function associated data.
   *
   * This routine is invoked by the ELS timer after timeout. It posts the ELS
   * timer timeout event by setting the WORKER_ELS_TMO bit to the work port
   * event bitmap and then invokes the lpfc_worker_wake_up() routine to wake
   * up the worker thread. It is for the worker thread to invoke the routine
   * lpfc_els_timeout_handler() to work on the posted event WORKER_ELS_TMO.
   **/
  void
  lpfc_els_timeout(struct timer_list *t)
  {
  	struct lpfc_vport *vport = from_timer(vport, t, els_tmofunc);
  	struct lpfc_hba   *phba = vport->phba;
  	uint32_t tmo_posted;
  	unsigned long iflag;
  
  	spin_lock_irqsave(&vport->work_port_lock, iflag);
  	tmo_posted = vport->work_port_events & WORKER_ELS_TMO;
  	if ((!tmo_posted) && (!(vport->load_flag & FC_UNLOADING)))
  		vport->work_port_events |= WORKER_ELS_TMO;
  	spin_unlock_irqrestore(&vport->work_port_lock, iflag);
  
  	if ((!tmo_posted) && (!(vport->load_flag & FC_UNLOADING)))
  		lpfc_worker_wake_up(phba);
  	return;
  }
  
  
  /**
   * lpfc_els_timeout_handler - Process an els timeout event
   * @vport: pointer to a virtual N_Port data structure.
   *
   * This routine is the actual handler function that processes an ELS timeout
   * event. It walks the ELS ring to get and abort all the IOCBs (except the
   * ABORT/CLOSE/FARP/FARPR/FDISC), which are associated with the @vport by
   * invoking the lpfc_sli_issue_abort_iotag() routine.
   **/
  void
  lpfc_els_timeout_handler(struct lpfc_vport *vport)
  {
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_sli_ring *pring;
  	struct lpfc_iocbq *tmp_iocb, *piocb;
  	IOCB_t *cmd = NULL;
  	struct lpfc_dmabuf *pcmd;
  	uint32_t els_command = 0;
  	uint32_t timeout;
  	uint32_t remote_ID = 0xffffffff;
  	LIST_HEAD(abort_list);
  
  
  	timeout = (uint32_t)(phba->fc_ratov << 1);
  
  	pring = lpfc_phba_elsring(phba);
  	if (unlikely(!pring))
  		return;
  
  	if ((phba->pport->load_flag & FC_UNLOADING))
  		return;
  	spin_lock_irq(&phba->hbalock);
  	if (phba->sli_rev == LPFC_SLI_REV4)
  		spin_lock(&pring->ring_lock);
  
  	if ((phba->pport->load_flag & FC_UNLOADING)) {
  		if (phba->sli_rev == LPFC_SLI_REV4)
  			spin_unlock(&pring->ring_lock);
  		spin_unlock_irq(&phba->hbalock);
  		return;
  	}
  
  	list_for_each_entry_safe(piocb, tmp_iocb, &pring->txcmplq, list) {
  		cmd = &piocb->iocb;
  
  		if ((piocb->iocb_flag & LPFC_IO_LIBDFC) != 0 ||
  		    piocb->iocb.ulpCommand == CMD_ABORT_XRI_CN ||
  		    piocb->iocb.ulpCommand == CMD_CLOSE_XRI_CN)
  			continue;
  
  		if (piocb->vport != vport)
  			continue;
  
  		pcmd = (struct lpfc_dmabuf *) piocb->context2;
  		if (pcmd)
  			els_command = *(uint32_t *) (pcmd->virt);
  
  		if (els_command == ELS_CMD_FARP ||
  		    els_command == ELS_CMD_FARPR ||
  		    els_command == ELS_CMD_FDISC)
  			continue;
  
  		if (piocb->drvrTimeout > 0) {
  			if (piocb->drvrTimeout >= timeout)
  				piocb->drvrTimeout -= timeout;
  			else
  				piocb->drvrTimeout = 0;
  			continue;
  		}
  
  		remote_ID = 0xffffffff;
  		if (cmd->ulpCommand != CMD_GEN_REQUEST64_CR)
  			remote_ID = cmd->un.elsreq64.remoteID;
  		else {
  			struct lpfc_nodelist *ndlp;
  			ndlp = __lpfc_findnode_rpi(vport, cmd->ulpContext);
  			if (ndlp && NLP_CHK_NODE_ACT(ndlp))
  				remote_ID = ndlp->nlp_DID;
  		}
  		list_add_tail(&piocb->dlist, &abort_list);
  	}
  	if (phba->sli_rev == LPFC_SLI_REV4)
  		spin_unlock(&pring->ring_lock);
  	spin_unlock_irq(&phba->hbalock);
  
  	list_for_each_entry_safe(piocb, tmp_iocb, &abort_list, dlist) {
  		cmd = &piocb->iocb;
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  			 "0127 ELS timeout Data: x%x x%x x%x "
  			 "x%x\n", els_command,
  			 remote_ID, cmd->ulpCommand, cmd->ulpIoTag);
  		spin_lock_irq(&phba->hbalock);
  		list_del_init(&piocb->dlist);
  		lpfc_sli_issue_abort_iotag(phba, pring, piocb);
  		spin_unlock_irq(&phba->hbalock);
  	}
  
  	if (!list_empty(&pring->txcmplq))
  		if (!(phba->pport->load_flag & FC_UNLOADING))
  			mod_timer(&vport->els_tmofunc,
  				  jiffies + msecs_to_jiffies(1000 * timeout));
  }
  
  /**
   * lpfc_els_flush_cmd - Clean up the outstanding els commands to a vport
   * @vport: pointer to a host virtual N_Port data structure.
   *
   * This routine is used to clean up all the outstanding ELS commands on a
   * @vport. It first aborts the @vport by invoking lpfc_fabric_abort_vport()
   * routine. After that, it walks the ELS transmit queue to remove all the
   * IOCBs with the @vport other than the QUE_RING and ABORT/CLOSE IOCBs. For
   * the IOCBs with a non-NULL completion callback function, the callback
   * function will be invoked with the status set to IOSTAT_LOCAL_REJECT and
   * un.ulpWord[4] set to IOERR_SLI_ABORTED. For IOCBs with a NULL completion
   * callback function, the IOCB will simply be released. Finally, it walks
   * the ELS transmit completion queue to issue an abort IOCB to any transmit
   * completion queue IOCB that is associated with the @vport and is not
   * an IOCB from libdfc (i.e., the management plane IOCBs that are not
   * part of the discovery state machine) out to HBA by invoking the
   * lpfc_sli_issue_abort_iotag() routine. Note that this function issues the
   * abort IOCB to any transmit completion queueed IOCB, it does not guarantee
   * the IOCBs are aborted when this function returns.
   **/
  void
  lpfc_els_flush_cmd(struct lpfc_vport *vport)
  {
  	LIST_HEAD(abort_list);
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_sli_ring *pring;
  	struct lpfc_iocbq *tmp_iocb, *piocb;
  	IOCB_t *cmd = NULL;
  	unsigned long iflags = 0;
  
  	lpfc_fabric_abort_vport(vport);
  
  	/*
  	 * For SLI3, only the hbalock is required.  But SLI4 needs to coordinate
  	 * with the ring insert operation.  Because lpfc_sli_issue_abort_iotag
  	 * ultimately grabs the ring_lock, the driver must splice the list into
  	 * a working list and release the locks before calling the abort.
  	 */
  	spin_lock_irqsave(&phba->hbalock, iflags);
  	pring = lpfc_phba_elsring(phba);
  
  	/* Bail out if we've no ELS wq, like in PCI error recovery case. */
  	if (unlikely(!pring)) {
  		spin_unlock_irqrestore(&phba->hbalock, iflags);
  		return;
  	}
  
  	if (phba->sli_rev == LPFC_SLI_REV4)
  		spin_lock(&pring->ring_lock);
  
  	/* First we need to issue aborts to outstanding cmds on txcmpl */
  	list_for_each_entry_safe(piocb, tmp_iocb, &pring->txcmplq, list) {
  		if (piocb->iocb_flag & LPFC_IO_LIBDFC)
  			continue;
  
  		if (piocb->vport != vport)
  			continue;
  
  		if (piocb->iocb_flag & LPFC_DRIVER_ABORTED)
  			continue;
  
  		/* On the ELS ring we can have ELS_REQUESTs or
  		 * GEN_REQUESTs waiting for a response.
  		 */
  		cmd = &piocb->iocb;
  		if (cmd->ulpCommand == CMD_ELS_REQUEST64_CR) {
  			list_add_tail(&piocb->dlist, &abort_list);
  
  			/* If the link is down when flushing ELS commands
  			 * the firmware will not complete them till after
  			 * the link comes back up. This may confuse
  			 * discovery for the new link up, so we need to
  			 * change the compl routine to just clean up the iocb
  			 * and avoid any retry logic.
  			 */
  			if (phba->link_state == LPFC_LINK_DOWN)
  				piocb->iocb_cmpl = lpfc_cmpl_els_link_down;
  		}
  		if (cmd->ulpCommand == CMD_GEN_REQUEST64_CR)
  			list_add_tail(&piocb->dlist, &abort_list);
  	}
  
  	if (phba->sli_rev == LPFC_SLI_REV4)
  		spin_unlock(&pring->ring_lock);
  	spin_unlock_irqrestore(&phba->hbalock, iflags);
  
  	/* Abort each txcmpl iocb on aborted list and remove the dlist links. */
  	list_for_each_entry_safe(piocb, tmp_iocb, &abort_list, dlist) {
  		spin_lock_irqsave(&phba->hbalock, iflags);
  		list_del_init(&piocb->dlist);
  		lpfc_sli_issue_abort_iotag(phba, pring, piocb);
  		spin_unlock_irqrestore(&phba->hbalock, iflags);
  	}
  	if (!list_empty(&abort_list))
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "3387 abort list for txq not empty\n");
  	INIT_LIST_HEAD(&abort_list);
  
  	spin_lock_irqsave(&phba->hbalock, iflags);
  	if (phba->sli_rev == LPFC_SLI_REV4)
  		spin_lock(&pring->ring_lock);
  
  	/* No need to abort the txq list,
  	 * just queue them up for lpfc_sli_cancel_iocbs
  	 */
  	list_for_each_entry_safe(piocb, tmp_iocb, &pring->txq, list) {
  		cmd = &piocb->iocb;
  
  		if (piocb->iocb_flag & LPFC_IO_LIBDFC) {
  			continue;
  		}
  
  		/* Do not flush out the QUE_RING and ABORT/CLOSE iocbs */
  		if (cmd->ulpCommand == CMD_QUE_RING_BUF_CN ||
  		    cmd->ulpCommand == CMD_QUE_RING_BUF64_CN ||
  		    cmd->ulpCommand == CMD_CLOSE_XRI_CN ||
  		    cmd->ulpCommand == CMD_ABORT_XRI_CN)
  			continue;
  
  		if (piocb->vport != vport)
  			continue;
  
  		list_del_init(&piocb->list);
  		list_add_tail(&piocb->list, &abort_list);
  	}
  
  	/* The same holds true for any FLOGI/FDISC on the fabric_iocb_list */
  	if (vport == phba->pport) {
  		list_for_each_entry_safe(piocb, tmp_iocb,
  					 &phba->fabric_iocb_list, list) {
  			cmd = &piocb->iocb;
  			list_del_init(&piocb->list);
  			list_add_tail(&piocb->list, &abort_list);
  		}
  	}
  
  	if (phba->sli_rev == LPFC_SLI_REV4)
  		spin_unlock(&pring->ring_lock);
  	spin_unlock_irqrestore(&phba->hbalock, iflags);
  
  	/* Cancel all the IOCBs from the completions list */
  	lpfc_sli_cancel_iocbs(phba, &abort_list,
  			      IOSTAT_LOCAL_REJECT, IOERR_SLI_ABORTED);
  
  	return;
  }
  
  /**
   * lpfc_els_flush_all_cmd - Clean up all the outstanding els commands to a HBA
   * @phba: pointer to lpfc hba data structure.
   *
   * This routine is used to clean up all the outstanding ELS commands on a
   * @phba. It first aborts the @phba by invoking the lpfc_fabric_abort_hba()
   * routine. After that, it walks the ELS transmit queue to remove all the
   * IOCBs to the @phba other than the QUE_RING and ABORT/CLOSE IOCBs. For
   * the IOCBs with the completion callback function associated, the callback
   * function will be invoked with the status set to IOSTAT_LOCAL_REJECT and
   * un.ulpWord[4] set to IOERR_SLI_ABORTED. For IOCBs without the completion
   * callback function associated, the IOCB will simply be released. Finally,
   * it walks the ELS transmit completion queue to issue an abort IOCB to any
   * transmit completion queue IOCB that is not an IOCB from libdfc (i.e., the
   * management plane IOCBs that are not part of the discovery state machine)
   * out to HBA by invoking the lpfc_sli_issue_abort_iotag() routine.
   **/
  void
  lpfc_els_flush_all_cmd(struct lpfc_hba  *phba)
  {
  	struct lpfc_vport *vport;
  
  	spin_lock_irq(&phba->port_list_lock);
  	list_for_each_entry(vport, &phba->port_list, listentry)
  		lpfc_els_flush_cmd(vport);
  	spin_unlock_irq(&phba->port_list_lock);
  
  	return;
  }
  
  /**
   * lpfc_send_els_failure_event - Posts an ELS command failure event
   * @phba: Pointer to hba context object.
   * @cmdiocbp: Pointer to command iocb which reported error.
   * @rspiocbp: Pointer to response iocb which reported error.
   *
   * This function sends an event when there is an ELS command
   * failure.
   **/
  void
  lpfc_send_els_failure_event(struct lpfc_hba *phba,
  			struct lpfc_iocbq *cmdiocbp,
  			struct lpfc_iocbq *rspiocbp)
  {
  	struct lpfc_vport *vport = cmdiocbp->vport;
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_lsrjt_event lsrjt_event;
  	struct lpfc_fabric_event_header fabric_event;
  	struct ls_rjt stat;
  	struct lpfc_nodelist *ndlp;
  	uint32_t *pcmd;
  
  	ndlp = cmdiocbp->context1;
  	if (!ndlp || !NLP_CHK_NODE_ACT(ndlp))
  		return;
  
  	if (rspiocbp->iocb.ulpStatus == IOSTAT_LS_RJT) {
  		lsrjt_event.header.event_type = FC_REG_ELS_EVENT;
  		lsrjt_event.header.subcategory = LPFC_EVENT_LSRJT_RCV;
  		memcpy(lsrjt_event.header.wwpn, &ndlp->nlp_portname,
  			sizeof(struct lpfc_name));
  		memcpy(lsrjt_event.header.wwnn, &ndlp->nlp_nodename,
  			sizeof(struct lpfc_name));
  		pcmd = (uint32_t *) (((struct lpfc_dmabuf *)
  			cmdiocbp->context2)->virt);
  		lsrjt_event.command = (pcmd != NULL) ? *pcmd : 0;
  		stat.un.lsRjtError = be32_to_cpu(rspiocbp->iocb.un.ulpWord[4]);
  		lsrjt_event.reason_code = stat.un.b.lsRjtRsnCode;
  		lsrjt_event.explanation = stat.un.b.lsRjtRsnCodeExp;
  		fc_host_post_vendor_event(shost,
  			fc_get_event_number(),
  			sizeof(lsrjt_event),
  			(char *)&lsrjt_event,
  			LPFC_NL_VENDOR_ID);
  		return;
  	}
  	if ((rspiocbp->iocb.ulpStatus == IOSTAT_NPORT_BSY) ||
  		(rspiocbp->iocb.ulpStatus == IOSTAT_FABRIC_BSY)) {
  		fabric_event.event_type = FC_REG_FABRIC_EVENT;
  		if (rspiocbp->iocb.ulpStatus == IOSTAT_NPORT_BSY)
  			fabric_event.subcategory = LPFC_EVENT_PORT_BUSY;
  		else
  			fabric_event.subcategory = LPFC_EVENT_FABRIC_BUSY;
  		memcpy(fabric_event.wwpn, &ndlp->nlp_portname,
  			sizeof(struct lpfc_name));
  		memcpy(fabric_event.wwnn, &ndlp->nlp_nodename,
  			sizeof(struct lpfc_name));
  		fc_host_post_vendor_event(shost,
  			fc_get_event_number(),
  			sizeof(fabric_event),
  			(char *)&fabric_event,
  			LPFC_NL_VENDOR_ID);
  		return;
  	}
  
  }
  
  /**
   * lpfc_send_els_event - Posts unsolicited els event
   * @vport: Pointer to vport object.
   * @ndlp: Pointer FC node object.
   * @cmd: ELS command code.
   *
   * This function posts an event when there is an incoming
   * unsolicited ELS command.
   **/
  static void
  lpfc_send_els_event(struct lpfc_vport *vport,
  		    struct lpfc_nodelist *ndlp,
  		    uint32_t *payload)
  {
  	struct lpfc_els_event_header *els_data = NULL;
  	struct lpfc_logo_event *logo_data = NULL;
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  
  	if (*payload == ELS_CMD_LOGO) {
  		logo_data = kmalloc(sizeof(struct lpfc_logo_event), GFP_KERNEL);
  		if (!logo_data) {
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				"0148 Failed to allocate memory "
  				"for LOGO event\n");
  			return;
  		}
  		els_data = &logo_data->header;
  	} else {
  		els_data = kmalloc(sizeof(struct lpfc_els_event_header),
  			GFP_KERNEL);
  		if (!els_data) {
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				"0149 Failed to allocate memory "
  				"for ELS event\n");
  			return;
  		}
  	}
  	els_data->event_type = FC_REG_ELS_EVENT;
  	switch (*payload) {
  	case ELS_CMD_PLOGI:
  		els_data->subcategory = LPFC_EVENT_PLOGI_RCV;
  		break;
  	case ELS_CMD_PRLO:
  		els_data->subcategory = LPFC_EVENT_PRLO_RCV;
  		break;
  	case ELS_CMD_ADISC:
  		els_data->subcategory = LPFC_EVENT_ADISC_RCV;
  		break;
  	case ELS_CMD_LOGO:
  		els_data->subcategory = LPFC_EVENT_LOGO_RCV;
  		/* Copy the WWPN in the LOGO payload */
  		memcpy(logo_data->logo_wwpn, &payload[2],
  			sizeof(struct lpfc_name));
  		break;
  	default:
  		kfree(els_data);
  		return;
  	}
  	memcpy(els_data->wwpn, &ndlp->nlp_portname, sizeof(struct lpfc_name));
  	memcpy(els_data->wwnn, &ndlp->nlp_nodename, sizeof(struct lpfc_name));
  	if (*payload == ELS_CMD_LOGO) {
  		fc_host_post_vendor_event(shost,
  			fc_get_event_number(),
  			sizeof(struct lpfc_logo_event),
  			(char *)logo_data,
  			LPFC_NL_VENDOR_ID);
  		kfree(logo_data);
  	} else {
  		fc_host_post_vendor_event(shost,
  			fc_get_event_number(),
  			sizeof(struct lpfc_els_event_header),
  			(char *)els_data,
  			LPFC_NL_VENDOR_ID);
  		kfree(els_data);
  	}
  
  	return;
  }
  
  
  /**
   * lpfc_els_unsol_buffer - Process an unsolicited event data buffer
   * @phba: pointer to lpfc hba data structure.
   * @pring: pointer to a SLI ring.
   * @vport: pointer to a host virtual N_Port data structure.
   * @elsiocb: pointer to lpfc els command iocb data structure.
   *
   * This routine is used for processing the IOCB associated with a unsolicited
   * event. It first determines whether there is an existing ndlp that matches
   * the DID from the unsolicited IOCB. If not, it will create a new one with
   * the DID from the unsolicited IOCB. The ELS command from the unsolicited
   * IOCB is then used to invoke the proper routine and to set up proper state
   * of the discovery state machine.
   **/
  static void
  lpfc_els_unsol_buffer(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
  		      struct lpfc_vport *vport, struct lpfc_iocbq *elsiocb)
  {
  	struct Scsi_Host  *shost;
  	struct lpfc_nodelist *ndlp;
  	struct ls_rjt stat;
  	uint32_t *payload;
  	uint32_t cmd, did, newnode;
  	uint8_t rjt_exp, rjt_err = 0, init_link = 0;
  	IOCB_t *icmd = &elsiocb->iocb;
  	LPFC_MBOXQ_t *mbox;
  
  	if (!vport || !(elsiocb->context2))
  		goto dropit;
  
  	newnode = 0;
  	payload = ((struct lpfc_dmabuf *)elsiocb->context2)->virt;
  	cmd = *payload;
  	if ((phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) == 0)
  		lpfc_post_buffer(phba, pring, 1);
  
  	did = icmd->un.rcvels.remoteID;
  	if (icmd->ulpStatus) {
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV Unsol ELS:  status:x%x/x%x did:x%x",
  			icmd->ulpStatus, icmd->un.ulpWord[4], did);
  		goto dropit;
  	}
  
  	/* Check to see if link went down during discovery */
  	if (lpfc_els_chk_latt(vport))
  		goto dropit;
  
  	/* Ignore traffic received during vport shutdown. */
  	if (vport->load_flag & FC_UNLOADING)
  		goto dropit;
  
  	/* If NPort discovery is delayed drop incoming ELS */
  	if ((vport->fc_flag & FC_DISC_DELAYED) &&
  			(cmd != ELS_CMD_PLOGI))
  		goto dropit;
  
  	ndlp = lpfc_findnode_did(vport, did);
  	if (!ndlp) {
  		/* Cannot find existing Fabric ndlp, so allocate a new one */
  		ndlp = lpfc_nlp_init(vport, did);
  		if (!ndlp)
  			goto dropit;
  		lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
  		newnode = 1;
  		if ((did & Fabric_DID_MASK) == Fabric_DID_MASK)
  			ndlp->nlp_type |= NLP_FABRIC;
  	} else if (!NLP_CHK_NODE_ACT(ndlp)) {
  		ndlp = lpfc_enable_node(vport, ndlp,
  					NLP_STE_UNUSED_NODE);
  		if (!ndlp)
  			goto dropit;
  		lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
  		newnode = 1;
  		if ((did & Fabric_DID_MASK) == Fabric_DID_MASK)
  			ndlp->nlp_type |= NLP_FABRIC;
  	} else if (ndlp->nlp_state == NLP_STE_UNUSED_NODE) {
  		/* This is similar to the new node path */
  		ndlp = lpfc_nlp_get(ndlp);
  		if (!ndlp)
  			goto dropit;
  		lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
  		newnode = 1;
  	}
  
  	phba->fc_stat.elsRcvFrame++;
  
  	/*
  	 * Do not process any unsolicited ELS commands
  	 * if the ndlp is in DEV_LOSS
  	 */
  	shost = lpfc_shost_from_vport(vport);
  	spin_lock_irq(shost->host_lock);
  	if (ndlp->nlp_flag & NLP_IN_DEV_LOSS) {
  		spin_unlock_irq(shost->host_lock);
  		goto dropit;
  	}
  	spin_unlock_irq(shost->host_lock);
  
  	elsiocb->context1 = lpfc_nlp_get(ndlp);
  	elsiocb->vport = vport;
  
  	if ((cmd & ELS_CMD_MASK) == ELS_CMD_RSCN) {
  		cmd &= ELS_CMD_MASK;
  	}
  	/* ELS command <elsCmd> received from NPORT <did> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0112 ELS command x%x received from NPORT x%x "
  			 "Data: x%x x%x x%x x%x\n",
  			cmd, did, vport->port_state, vport->fc_flag,
  			vport->fc_myDID, vport->fc_prevDID);
  
  	/* reject till our FLOGI completes or PLOGI assigned DID via PT2PT */
  	if ((vport->port_state < LPFC_FABRIC_CFG_LINK) &&
  	    (cmd != ELS_CMD_FLOGI) &&
  	    !((cmd == ELS_CMD_PLOGI) && (vport->fc_flag & FC_PT2PT))) {
  		rjt_err = LSRJT_LOGICAL_BSY;
  		rjt_exp = LSEXP_NOTHING_MORE;
  		goto lsrjt;
  	}
  
  	switch (cmd) {
  	case ELS_CMD_PLOGI:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV PLOGI:       did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvPLOGI++;
  		ndlp = lpfc_plogi_confirm_nport(phba, payload, ndlp);
  		if (phba->sli_rev == LPFC_SLI_REV4 &&
  		    (phba->pport->fc_flag & FC_PT2PT)) {
  			vport->fc_prevDID = vport->fc_myDID;
  			/* Our DID needs to be updated before registering
  			 * the vfi. This is done in lpfc_rcv_plogi but
  			 * that is called after the reg_vfi.
  			 */
  			vport->fc_myDID = elsiocb->iocb.un.rcvels.parmRo;
  			lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  					 "3312 Remote port assigned DID x%x "
  					 "%x\n", vport->fc_myDID,
  					 vport->fc_prevDID);
  		}
  
  		lpfc_send_els_event(vport, ndlp, payload);
  
  		/* If Nport discovery is delayed, reject PLOGIs */
  		if (vport->fc_flag & FC_DISC_DELAYED) {
  			rjt_err = LSRJT_UNABLE_TPC;
  			rjt_exp = LSEXP_NOTHING_MORE;
  			break;
  		}
  
  		if (vport->port_state < LPFC_DISC_AUTH) {
  			if (!(phba->pport->fc_flag & FC_PT2PT) ||
  				(phba->pport->fc_flag & FC_PT2PT_PLOGI)) {
  				rjt_err = LSRJT_UNABLE_TPC;
  				rjt_exp = LSEXP_NOTHING_MORE;
  				break;
  			}
  		}
  
  		spin_lock_irq(shost->host_lock);
  		ndlp->nlp_flag &= ~NLP_TARGET_REMOVE;
  		spin_unlock_irq(shost->host_lock);
  
  		lpfc_disc_state_machine(vport, ndlp, elsiocb,
  					NLP_EVT_RCV_PLOGI);
  
  		break;
  	case ELS_CMD_FLOGI:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV FLOGI:       did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvFLOGI++;
  
  		/* If the driver believes fabric discovery is done and is ready,
  		 * bounce the link.  There is some descrepancy.
  		 */
  		if (vport->port_state >= LPFC_LOCAL_CFG_LINK &&
  		    vport->fc_flag & FC_PT2PT &&
  		    vport->rcv_flogi_cnt >= 1) {
  			rjt_err = LSRJT_LOGICAL_BSY;
  			rjt_exp = LSEXP_NOTHING_MORE;
  			init_link++;
  			goto lsrjt;
  		}
  
  		lpfc_els_rcv_flogi(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_LOGO:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV LOGO:        did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvLOGO++;
  		lpfc_send_els_event(vport, ndlp, payload);
  		if (vport->port_state < LPFC_DISC_AUTH) {
  			rjt_err = LSRJT_UNABLE_TPC;
  			rjt_exp = LSEXP_NOTHING_MORE;
  			break;
  		}
  		lpfc_disc_state_machine(vport, ndlp, elsiocb, NLP_EVT_RCV_LOGO);
  		break;
  	case ELS_CMD_PRLO:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV PRLO:        did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvPRLO++;
  		lpfc_send_els_event(vport, ndlp, payload);
  		if (vport->port_state < LPFC_DISC_AUTH) {
  			rjt_err = LSRJT_UNABLE_TPC;
  			rjt_exp = LSEXP_NOTHING_MORE;
  			break;
  		}
  		lpfc_disc_state_machine(vport, ndlp, elsiocb, NLP_EVT_RCV_PRLO);
  		break;
  	case ELS_CMD_LCB:
  		phba->fc_stat.elsRcvLCB++;
  		lpfc_els_rcv_lcb(vport, elsiocb, ndlp);
  		break;
  	case ELS_CMD_RDP:
  		phba->fc_stat.elsRcvRDP++;
  		lpfc_els_rcv_rdp(vport, elsiocb, ndlp);
  		break;
  	case ELS_CMD_RSCN:
  		phba->fc_stat.elsRcvRSCN++;
  		lpfc_els_rcv_rscn(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_ADISC:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV ADISC:       did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		lpfc_send_els_event(vport, ndlp, payload);
  		phba->fc_stat.elsRcvADISC++;
  		if (vport->port_state < LPFC_DISC_AUTH) {
  			rjt_err = LSRJT_UNABLE_TPC;
  			rjt_exp = LSEXP_NOTHING_MORE;
  			break;
  		}
  		lpfc_disc_state_machine(vport, ndlp, elsiocb,
  					NLP_EVT_RCV_ADISC);
  		break;
  	case ELS_CMD_PDISC:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV PDISC:       did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvPDISC++;
  		if (vport->port_state < LPFC_DISC_AUTH) {
  			rjt_err = LSRJT_UNABLE_TPC;
  			rjt_exp = LSEXP_NOTHING_MORE;
  			break;
  		}
  		lpfc_disc_state_machine(vport, ndlp, elsiocb,
  					NLP_EVT_RCV_PDISC);
  		break;
  	case ELS_CMD_FARPR:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV FARPR:       did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvFARPR++;
  		lpfc_els_rcv_farpr(vport, elsiocb, ndlp);
  		break;
  	case ELS_CMD_FARP:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV FARP:        did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvFARP++;
  		lpfc_els_rcv_farp(vport, elsiocb, ndlp);
  		break;
  	case ELS_CMD_FAN:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV FAN:         did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvFAN++;
  		lpfc_els_rcv_fan(vport, elsiocb, ndlp);
  		break;
  	case ELS_CMD_PRLI:
  	case ELS_CMD_NVMEPRLI:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV PRLI:        did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvPRLI++;
  		if ((vport->port_state < LPFC_DISC_AUTH) &&
  		    (vport->fc_flag & FC_FABRIC)) {
  			rjt_err = LSRJT_UNABLE_TPC;
  			rjt_exp = LSEXP_NOTHING_MORE;
  			break;
  		}
  		lpfc_disc_state_machine(vport, ndlp, elsiocb, NLP_EVT_RCV_PRLI);
  		break;
  	case ELS_CMD_LIRR:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV LIRR:        did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvLIRR++;
  		lpfc_els_rcv_lirr(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_RLS:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV RLS:         did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvRLS++;
  		lpfc_els_rcv_rls(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_RPS:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV RPS:         did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvRPS++;
  		lpfc_els_rcv_rps(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_RPL:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV RPL:         did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvRPL++;
  		lpfc_els_rcv_rpl(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_RNID:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV RNID:        did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvRNID++;
  		lpfc_els_rcv_rnid(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_RTV:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV RTV:        did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  		phba->fc_stat.elsRcvRTV++;
  		lpfc_els_rcv_rtv(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_RRQ:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV RRQ:         did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvRRQ++;
  		lpfc_els_rcv_rrq(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_ECHO:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV ECHO:        did:x%x/ste:x%x flg:x%x",
  			did, vport->port_state, ndlp->nlp_flag);
  
  		phba->fc_stat.elsRcvECHO++;
  		lpfc_els_rcv_echo(vport, elsiocb, ndlp);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	case ELS_CMD_REC:
  		/* receive this due to exchange closed */
  		rjt_err = LSRJT_UNABLE_TPC;
  		rjt_exp = LSEXP_INVALID_OX_RX;
  		break;
  	case ELS_CMD_FPIN:
  		/*
  		 * Received FPIN from fabric - pass it to the
  		 * transport FPIN handler.
  		 */
  		fc_host_fpin_rcv(shost, elsiocb->iocb.unsli3.rcvsli3.acc_len,
  				(char *)payload);
  		break;
  	default:
  		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
  			"RCV ELS cmd:     cmd:x%x did:x%x/ste:x%x",
  			cmd, did, vport->port_state);
  
  		/* Unsupported ELS command, reject */
  		rjt_err = LSRJT_CMD_UNSUPPORTED;
  		rjt_exp = LSEXP_NOTHING_MORE;
  
  		/* Unknown ELS command <elsCmd> received from NPORT <did> */
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "0115 Unknown ELS command x%x "
  				 "received from NPORT x%x\n", cmd, did);
  		if (newnode)
  			lpfc_nlp_put(ndlp);
  		break;
  	}
  
  lsrjt:
  	/* check if need to LS_RJT received ELS cmd */
  	if (rjt_err) {
  		memset(&stat, 0, sizeof(stat));
  		stat.un.b.lsRjtRsnCode = rjt_err;
  		stat.un.b.lsRjtRsnCodeExp = rjt_exp;
  		lpfc_els_rsp_reject(vport, stat.un.lsRjtError, elsiocb, ndlp,
  			NULL);
  	}
  
  	lpfc_nlp_put(elsiocb->context1);
  	elsiocb->context1 = NULL;
  
  	/* Special case.  Driver received an unsolicited command that
  	 * unsupportable given the driver's current state.  Reset the
  	 * link and start over.
  	 */
  	if (init_link) {
  		mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  		if (!mbox)
  			return;
  		lpfc_linkdown(phba);
  		lpfc_init_link(phba, mbox,
  			       phba->cfg_topology,
  			       phba->cfg_link_speed);
  		mbox->u.mb.un.varInitLnk.lipsr_AL_PA = 0;
  		mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
  		mbox->vport = vport;
  		if (lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT) ==
  		    MBX_NOT_FINISHED)
  			mempool_free(mbox, phba->mbox_mem_pool);
  	}
  
  	return;
  
  dropit:
  	if (vport && !(vport->load_flag & FC_UNLOADING))
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  			"0111 Dropping received ELS cmd "
  			"Data: x%x x%x x%x\n",
  			icmd->ulpStatus, icmd->un.ulpWord[4], icmd->ulpTimeout);
  	phba->fc_stat.elsRcvDrop++;
  }
  
  /**
   * lpfc_els_unsol_event - Process an unsolicited event from an els sli ring
   * @phba: pointer to lpfc hba data structure.
   * @pring: pointer to a SLI ring.
   * @elsiocb: pointer to lpfc els iocb data structure.
   *
   * This routine is used to process an unsolicited event received from a SLI
   * (Service Level Interface) ring. The actual processing of the data buffer
   * associated with the unsolicited event is done by invoking the routine
   * lpfc_els_unsol_buffer() after properly set up the iocb buffer from the
   * SLI ring on which the unsolicited event was received.
   **/
  void
  lpfc_els_unsol_event(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
  		     struct lpfc_iocbq *elsiocb)
  {
  	struct lpfc_vport *vport = phba->pport;
  	IOCB_t *icmd = &elsiocb->iocb;
  	dma_addr_t paddr;
  	struct lpfc_dmabuf *bdeBuf1 = elsiocb->context2;
  	struct lpfc_dmabuf *bdeBuf2 = elsiocb->context3;
  
  	elsiocb->context1 = NULL;
  	elsiocb->context2 = NULL;
  	elsiocb->context3 = NULL;
  
  	if (icmd->ulpStatus == IOSTAT_NEED_BUFFER) {
  		lpfc_sli_hbqbuf_add_hbqs(phba, LPFC_ELS_HBQ);
  	} else if (icmd->ulpStatus == IOSTAT_LOCAL_REJECT &&
  		   (icmd->un.ulpWord[4] & IOERR_PARAM_MASK) ==
  		   IOERR_RCV_BUFFER_WAITING) {
  		phba->fc_stat.NoRcvBuf++;
  		/* Not enough posted buffers; Try posting more buffers */
  		if (!(phba->sli3_options & LPFC_SLI3_HBQ_ENABLED))
  			lpfc_post_buffer(phba, pring, 0);
  		return;
  	}
  
  	if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
  	    (icmd->ulpCommand == CMD_IOCB_RCV_ELS64_CX ||
  	     icmd->ulpCommand == CMD_IOCB_RCV_SEQ64_CX)) {
  		if (icmd->unsli3.rcvsli3.vpi == 0xffff)
  			vport = phba->pport;
  		else
  			vport = lpfc_find_vport_by_vpid(phba,
  						icmd->unsli3.rcvsli3.vpi);
  	}
  
  	/* If there are no BDEs associated
  	 * with this IOCB, there is nothing to do.
  	 */
  	if (icmd->ulpBdeCount == 0)
  		return;
  
  	/* type of ELS cmd is first 32bit word
  	 * in packet
  	 */
  	if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
  		elsiocb->context2 = bdeBuf1;
  	} else {
  		paddr = getPaddr(icmd->un.cont64[0].addrHigh,
  				 icmd->un.cont64[0].addrLow);
  		elsiocb->context2 = lpfc_sli_ringpostbuf_get(phba, pring,
  							     paddr);
  	}
  
  	lpfc_els_unsol_buffer(phba, pring, vport, elsiocb);
  	/*
  	 * The different unsolicited event handlers would tell us
  	 * if they are done with "mp" by setting context2 to NULL.
  	 */
  	if (elsiocb->context2) {
  		lpfc_in_buf_free(phba, (struct lpfc_dmabuf *)elsiocb->context2);
  		elsiocb->context2 = NULL;
  	}
  
  	/* RCV_ELS64_CX provide for 2 BDEs - process 2nd if included */
  	if ((phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) &&
  	    icmd->ulpBdeCount == 2) {
  		elsiocb->context2 = bdeBuf2;
  		lpfc_els_unsol_buffer(phba, pring, vport, elsiocb);
  		/* free mp if we are done with it */
  		if (elsiocb->context2) {
  			lpfc_in_buf_free(phba, elsiocb->context2);
  			elsiocb->context2 = NULL;
  		}
  	}
  }
  
  static void
  lpfc_start_fdmi(struct lpfc_vport *vport)
  {
  	struct lpfc_nodelist *ndlp;
  
  	/* If this is the first time, allocate an ndlp and initialize
  	 * it. Otherwise, make sure the node is enabled and then do the
  	 * login.
  	 */
  	ndlp = lpfc_findnode_did(vport, FDMI_DID);
  	if (!ndlp) {
  		ndlp = lpfc_nlp_init(vport, FDMI_DID);
  		if (ndlp) {
  			ndlp->nlp_type |= NLP_FABRIC;
  		} else {
  			return;
  		}
  	}
  	if (!NLP_CHK_NODE_ACT(ndlp))
  		ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_NPR_NODE);
  
  	if (ndlp) {
  		lpfc_nlp_set_state(vport, ndlp, NLP_STE_PLOGI_ISSUE);
  		lpfc_issue_els_plogi(vport, ndlp->nlp_DID, 0);
  	}
  }
  
  /**
   * lpfc_do_scr_ns_plogi - Issue a plogi to the name server for scr
   * @phba: pointer to lpfc hba data structure.
   * @vport: pointer to a virtual N_Port data structure.
   *
   * This routine issues a Port Login (PLOGI) to the Name Server with
   * State Change Request (SCR) for a @vport. This routine will create an
   * ndlp for the Name Server associated to the @vport if such node does
   * not already exist. The PLOGI to Name Server is issued by invoking the
   * lpfc_issue_els_plogi() routine. If Fabric-Device Management Interface
   * (FDMI) is configured to the @vport, a FDMI node will be created and
   * the PLOGI to FDMI is issued by invoking lpfc_issue_els_plogi() routine.
   **/
  void
  lpfc_do_scr_ns_plogi(struct lpfc_hba *phba, struct lpfc_vport *vport)
  {
  	struct lpfc_nodelist *ndlp;
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  
  	/*
  	 * If lpfc_delay_discovery parameter is set and the clean address
  	 * bit is cleared and fc fabric parameters chenged, delay FC NPort
  	 * discovery.
  	 */
  	spin_lock_irq(shost->host_lock);
  	if (vport->fc_flag & FC_DISC_DELAYED) {
  		spin_unlock_irq(shost->host_lock);
  		lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY,
  				"3334 Delay fc port discovery for %d seconds\n",
  				phba->fc_ratov);
  		mod_timer(&vport->delayed_disc_tmo,
  			jiffies + msecs_to_jiffies(1000 * phba->fc_ratov));
  		return;
  	}
  	spin_unlock_irq(shost->host_lock);
  
  	ndlp = lpfc_findnode_did(vport, NameServer_DID);
  	if (!ndlp) {
  		ndlp = lpfc_nlp_init(vport, NameServer_DID);
  		if (!ndlp) {
  			if (phba->fc_topology == LPFC_TOPOLOGY_LOOP) {
  				lpfc_disc_start(vport);
  				return;
  			}
  			lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  					 "0251 NameServer login: no memory\n");
  			return;
  		}
  	} else if (!NLP_CHK_NODE_ACT(ndlp)) {
  		ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
  		if (!ndlp) {
  			if (phba->fc_topology == LPFC_TOPOLOGY_LOOP) {
  				lpfc_disc_start(vport);
  				return;
  			}
  			lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  					"0348 NameServer login: node freed\n");
  			return;
  		}
  	}
  	ndlp->nlp_type |= NLP_FABRIC;
  
  	lpfc_nlp_set_state(vport, ndlp, NLP_STE_PLOGI_ISSUE);
  
  	if (lpfc_issue_els_plogi(vport, ndlp->nlp_DID, 0)) {
  		lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "0252 Cannot issue NameServer login\n");
  		return;
  	}
  
  	if ((phba->cfg_enable_SmartSAN ||
  	     (phba->cfg_fdmi_on == LPFC_FDMI_SUPPORT)) &&
  	     (vport->load_flag & FC_ALLOW_FDMI))
  		lpfc_start_fdmi(vport);
  }
  
  /**
   * lpfc_cmpl_reg_new_vport - Completion callback function to register new vport
   * @phba: pointer to lpfc hba data structure.
   * @pmb: pointer to the driver internal queue element for mailbox command.
   *
   * This routine is the completion callback function to register new vport
   * mailbox command. If the new vport mailbox command completes successfully,
   * the fabric registration login shall be performed on physical port (the
   * new vport created is actually a physical port, with VPI 0) or the port
   * login to Name Server for State Change Request (SCR) will be performed
   * on virtual port (real virtual port, with VPI greater than 0).
   **/
  static void
  lpfc_cmpl_reg_new_vport(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
  {
  	struct lpfc_vport *vport = pmb->vport;
  	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *)pmb->ctx_ndlp;
  	MAILBOX_t *mb = &pmb->u.mb;
  	int rc;
  
  	spin_lock_irq(shost->host_lock);
  	vport->fc_flag &= ~FC_VPORT_NEEDS_REG_VPI;
  	spin_unlock_irq(shost->host_lock);
  
  	if (mb->mbxStatus) {
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
  				"0915 Register VPI failed : Status: x%x"
  				" upd bit: x%x \n", mb->mbxStatus,
  				 mb->un.varRegVpi.upd);
  		if (phba->sli_rev == LPFC_SLI_REV4 &&
  			mb->un.varRegVpi.upd)
  			goto mbox_err_exit ;
  
  		switch (mb->mbxStatus) {
  		case 0x11:	/* unsupported feature */
  		case 0x9603:	/* max_vpi exceeded */
  		case 0x9602:	/* Link event since CLEAR_LA */
  			/* giving up on vport registration */
  			lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  			spin_lock_irq(shost->host_lock);
  			vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
  			spin_unlock_irq(shost->host_lock);
  			lpfc_can_disctmo(vport);
  			break;
  		/* If reg_vpi fail with invalid VPI status, re-init VPI */
  		case 0x20:
  			spin_lock_irq(shost->host_lock);
  			vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
  			spin_unlock_irq(shost->host_lock);
  			lpfc_init_vpi(phba, pmb, vport->vpi);
  			pmb->vport = vport;
  			pmb->mbox_cmpl = lpfc_init_vpi_cmpl;
  			rc = lpfc_sli_issue_mbox(phba, pmb,
  				MBX_NOWAIT);
  			if (rc == MBX_NOT_FINISHED) {
  				lpfc_printf_vlog(vport,
  					KERN_ERR, LOG_MBOX,
  					"2732 Failed to issue INIT_VPI"
  					" mailbox command\n");
  			} else {
  				lpfc_nlp_put(ndlp);
  				return;
  			}
  			/* fall through */
  		default:
  			/* Try to recover from this error */
  			if (phba->sli_rev == LPFC_SLI_REV4)
  				lpfc_sli4_unreg_all_rpis(vport);
  			lpfc_mbx_unreg_vpi(vport);
  			spin_lock_irq(shost->host_lock);
  			vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
  			spin_unlock_irq(shost->host_lock);
  			if (mb->mbxStatus == MBX_NOT_FINISHED)
  				break;
  			if ((vport->port_type == LPFC_PHYSICAL_PORT) &&
  			    !(vport->fc_flag & FC_LOGO_RCVD_DID_CHNG)) {
  				if (phba->sli_rev == LPFC_SLI_REV4)
  					lpfc_issue_init_vfi(vport);
  				else
  					lpfc_initial_flogi(vport);
  			} else {
  				lpfc_initial_fdisc(vport);
  			}
  			break;
  		}
  	} else {
  		spin_lock_irq(shost->host_lock);
  		vport->vpi_state |= LPFC_VPI_REGISTERED;
  		spin_unlock_irq(shost->host_lock);
  		if (vport == phba->pport) {
  			if (phba->sli_rev < LPFC_SLI_REV4)
  				lpfc_issue_fabric_reglogin(vport);
  			else {
  				/*
  				 * If the physical port is instantiated using
  				 * FDISC, do not start vport discovery.
  				 */
  				if (vport->port_state != LPFC_FDISC)
  					lpfc_start_fdiscs(phba);
  				lpfc_do_scr_ns_plogi(phba, vport);
  			}
  		} else
  			lpfc_do_scr_ns_plogi(phba, vport);
  	}
  mbox_err_exit:
  	/* Now, we decrement the ndlp reference count held for this
  	 * callback function
  	 */
  	lpfc_nlp_put(ndlp);
  
  	mempool_free(pmb, phba->mbox_mem_pool);
  	return;
  }
  
  /**
   * lpfc_register_new_vport - Register a new vport with a HBA
   * @phba: pointer to lpfc hba data structure.
   * @vport: pointer to a host virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine registers the @vport as a new virtual port with a HBA.
   * It is done through a registering vpi mailbox command.
   **/
  void
  lpfc_register_new_vport(struct lpfc_hba *phba, struct lpfc_vport *vport,
  			struct lpfc_nodelist *ndlp)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	LPFC_MBOXQ_t *mbox;
  
  	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
  	if (mbox) {
  		lpfc_reg_vpi(vport, mbox);
  		mbox->vport = vport;
  		mbox->ctx_ndlp = lpfc_nlp_get(ndlp);
  		mbox->mbox_cmpl = lpfc_cmpl_reg_new_vport;
  		if (lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT)
  		    == MBX_NOT_FINISHED) {
  			/* mailbox command not success, decrement ndlp
  			 * reference count for this command
  			 */
  			lpfc_nlp_put(ndlp);
  			mempool_free(mbox, phba->mbox_mem_pool);
  
  			lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
  				"0253 Register VPI: Can't send mbox\n");
  			goto mbox_err_exit;
  		}
  	} else {
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
  				 "0254 Register VPI: no memory\n");
  		goto mbox_err_exit;
  	}
  	return;
  
  mbox_err_exit:
  	lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  	spin_lock_irq(shost->host_lock);
  	vport->fc_flag &= ~FC_VPORT_NEEDS_REG_VPI;
  	spin_unlock_irq(shost->host_lock);
  	return;
  }
  
  /**
   * lpfc_cancel_all_vport_retry_delay_timer - Cancel all vport retry delay timer
   * @phba: pointer to lpfc hba data structure.
   *
   * This routine cancels the retry delay timers to all the vports.
   **/
  void
  lpfc_cancel_all_vport_retry_delay_timer(struct lpfc_hba *phba)
  {
  	struct lpfc_vport **vports;
  	struct lpfc_nodelist *ndlp;
  	uint32_t link_state;
  	int i;
  
  	/* Treat this failure as linkdown for all vports */
  	link_state = phba->link_state;
  	lpfc_linkdown(phba);
  	phba->link_state = link_state;
  
  	vports = lpfc_create_vport_work_array(phba);
  
  	if (vports) {
  		for (i = 0; i <= phba->max_vports && vports[i] != NULL; i++) {
  			ndlp = lpfc_findnode_did(vports[i], Fabric_DID);
  			if (ndlp)
  				lpfc_cancel_retry_delay_tmo(vports[i], ndlp);
  			lpfc_els_flush_cmd(vports[i]);
  		}
  		lpfc_destroy_vport_work_array(phba, vports);
  	}
  }
  
  /**
   * lpfc_retry_pport_discovery - Start timer to retry FLOGI.
   * @phba: pointer to lpfc hba data structure.
   *
   * This routine abort all pending discovery commands and
   * start a timer to retry FLOGI for the physical port
   * discovery.
   **/
  void
  lpfc_retry_pport_discovery(struct lpfc_hba *phba)
  {
  	struct lpfc_nodelist *ndlp;
  	struct Scsi_Host  *shost;
  
  	/* Cancel the all vports retry delay retry timers */
  	lpfc_cancel_all_vport_retry_delay_timer(phba);
  
  	/* If fabric require FLOGI, then re-instantiate physical login */
  	ndlp = lpfc_findnode_did(phba->pport, Fabric_DID);
  	if (!ndlp)
  		return;
  
  	shost = lpfc_shost_from_vport(phba->pport);
  	mod_timer(&ndlp->nlp_delayfunc, jiffies + msecs_to_jiffies(1000));
  	spin_lock_irq(shost->host_lock);
  	ndlp->nlp_flag |= NLP_DELAY_TMO;
  	spin_unlock_irq(shost->host_lock);
  	ndlp->nlp_last_elscmd = ELS_CMD_FLOGI;
  	phba->pport->port_state = LPFC_FLOGI;
  	return;
  }
  
  /**
   * lpfc_fabric_login_reqd - Check if FLOGI required.
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to FDISC command iocb.
   * @rspiocb: pointer to FDISC response iocb.
   *
   * This routine checks if a FLOGI is reguired for FDISC
   * to succeed.
   **/
  static int
  lpfc_fabric_login_reqd(struct lpfc_hba *phba,
  		struct lpfc_iocbq *cmdiocb,
  		struct lpfc_iocbq *rspiocb)
  {
  
  	if ((rspiocb->iocb.ulpStatus != IOSTAT_FABRIC_RJT) ||
  		(rspiocb->iocb.un.ulpWord[4] != RJT_LOGIN_REQUIRED))
  		return 0;
  	else
  		return 1;
  }
  
  /**
   * lpfc_cmpl_els_fdisc - Completion function for fdisc iocb command
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the completion callback function to a Fabric Discover
   * (FDISC) ELS command. Since all the FDISC ELS commands are issued
   * single threaded, each FDISC completion callback function will reset
   * the discovery timer for all vports such that the timers will not get
   * unnecessary timeout. The function checks the FDISC IOCB status. If error
   * detected, the vport will be set to FC_VPORT_FAILED state. Otherwise,the
   * vport will set to FC_VPORT_ACTIVE state. It then checks whether the DID
   * assigned to the vport has been changed with the completion of the FDISC
   * command. If so, both RPI (Remote Port Index) and VPI (Virtual Port Index)
   * are unregistered from the HBA, and then the lpfc_register_new_vport()
   * routine is invoked to register new vport with the HBA. Otherwise, the
   * lpfc_do_scr_ns_plogi() routine is invoked to issue a PLOGI to the Name
   * Server for State Change Request (SCR).
   **/
  static void
  lpfc_cmpl_els_fdisc(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  		    struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_vport *vport = cmdiocb->vport;
  	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
  	struct lpfc_nodelist *np;
  	struct lpfc_nodelist *next_np;
  	IOCB_t *irsp = &rspiocb->iocb;
  	struct lpfc_iocbq *piocb;
  	struct lpfc_dmabuf *pcmd = cmdiocb->context2, *prsp;
  	struct serv_parm *sp;
  	uint8_t fabric_param_changed;
  
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "0123 FDISC completes. x%x/x%x prevDID: x%x\n",
  			 irsp->ulpStatus, irsp->un.ulpWord[4],
  			 vport->fc_prevDID);
  	/* Since all FDISCs are being single threaded, we
  	 * must reset the discovery timer for ALL vports
  	 * waiting to send FDISC when one completes.
  	 */
  	list_for_each_entry(piocb, &phba->fabric_iocb_list, list) {
  		lpfc_set_disctmo(piocb->vport);
  	}
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"FDISC cmpl:      status:x%x/x%x prevdid:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4], vport->fc_prevDID);
  
  	if (irsp->ulpStatus) {
  
  		if (lpfc_fabric_login_reqd(phba, cmdiocb, rspiocb)) {
  			lpfc_retry_pport_discovery(phba);
  			goto out;
  		}
  
  		/* Check for retry */
  		if (lpfc_els_retry(phba, cmdiocb, rspiocb))
  			goto out;
  		/* FDISC failed */
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "0126 FDISC failed. (x%x/x%x)\n",
  				 irsp->ulpStatus, irsp->un.ulpWord[4]);
  		goto fdisc_failed;
  	}
  	spin_lock_irq(shost->host_lock);
  	vport->fc_flag &= ~FC_VPORT_CVL_RCVD;
  	vport->fc_flag &= ~FC_VPORT_LOGO_RCVD;
  	vport->fc_flag |= FC_FABRIC;
  	if (vport->phba->fc_topology == LPFC_TOPOLOGY_LOOP)
  		vport->fc_flag |=  FC_PUBLIC_LOOP;
  	spin_unlock_irq(shost->host_lock);
  
  	vport->fc_myDID = irsp->un.ulpWord[4] & Mask_DID;
  	lpfc_vport_set_state(vport, FC_VPORT_ACTIVE);
  	prsp = list_get_first(&pcmd->list, struct lpfc_dmabuf, list);
  	if (!prsp)
  		goto out;
  	sp = prsp->virt + sizeof(uint32_t);
  	fabric_param_changed = lpfc_check_clean_addr_bit(vport, sp);
  	memcpy(&vport->fabric_portname, &sp->portName,
  		sizeof(struct lpfc_name));
  	memcpy(&vport->fabric_nodename, &sp->nodeName,
  		sizeof(struct lpfc_name));
  	if (fabric_param_changed &&
  		!(vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)) {
  		/* If our NportID changed, we need to ensure all
  		 * remaining NPORTs get unreg_login'ed so we can
  		 * issue unreg_vpi.
  		 */
  		list_for_each_entry_safe(np, next_np,
  			&vport->fc_nodes, nlp_listp) {
  			if (!NLP_CHK_NODE_ACT(ndlp) ||
  			    (np->nlp_state != NLP_STE_NPR_NODE) ||
  			    !(np->nlp_flag & NLP_NPR_ADISC))
  				continue;
  			spin_lock_irq(shost->host_lock);
  			np->nlp_flag &= ~NLP_NPR_ADISC;
  			spin_unlock_irq(shost->host_lock);
  			lpfc_unreg_rpi(vport, np);
  		}
  		lpfc_cleanup_pending_mbox(vport);
  
  		if (phba->sli_rev == LPFC_SLI_REV4)
  			lpfc_sli4_unreg_all_rpis(vport);
  
  		lpfc_mbx_unreg_vpi(vport);
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
  		if (phba->sli_rev == LPFC_SLI_REV4)
  			vport->fc_flag |= FC_VPORT_NEEDS_INIT_VPI;
  		else
  			vport->fc_flag |= FC_LOGO_RCVD_DID_CHNG;
  		spin_unlock_irq(shost->host_lock);
  	} else if ((phba->sli_rev == LPFC_SLI_REV4) &&
  		!(vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)) {
  		/*
  		 * Driver needs to re-reg VPI in order for f/w
  		 * to update the MAC address.
  		 */
  		lpfc_register_new_vport(phba, vport, ndlp);
  		goto out;
  	}
  
  	if (vport->fc_flag & FC_VPORT_NEEDS_INIT_VPI)
  		lpfc_issue_init_vpi(vport);
  	else if (vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)
  		lpfc_register_new_vport(phba, vport, ndlp);
  	else
  		lpfc_do_scr_ns_plogi(phba, vport);
  	goto out;
  fdisc_failed:
  	if (vport->fc_vport &&
  	    (vport->fc_vport->vport_state != FC_VPORT_NO_FABRIC_RSCS))
  		lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  	/* Cancel discovery timer */
  	lpfc_can_disctmo(vport);
  	lpfc_nlp_put(ndlp);
  out:
  	lpfc_els_free_iocb(phba, cmdiocb);
  }
  
  /**
   * lpfc_issue_els_fdisc - Issue a fdisc iocb command
   * @vport: pointer to a virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   * @retry: number of retries to the command IOCB.
   *
   * This routine prepares and issues a Fabric Discover (FDISC) IOCB to
   * a remote node (@ndlp) off a @vport. It uses the lpfc_issue_fabric_iocb()
   * routine to issue the IOCB, which makes sure only one outstanding fabric
   * IOCB will be sent off HBA at any given time.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the FDISC ELS command.
   *
   * Return code
   *   0 - Successfully issued fdisc iocb command
   *   1 - Failed to issue fdisc iocb command
   **/
  static int
  lpfc_issue_els_fdisc(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
  		     uint8_t retry)
  {
  	struct lpfc_hba *phba = vport->phba;
  	IOCB_t *icmd;
  	struct lpfc_iocbq *elsiocb;
  	struct serv_parm *sp;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  	int did = ndlp->nlp_DID;
  	int rc;
  
  	vport->port_state = LPFC_FDISC;
  	vport->fc_myDID = 0;
  	cmdsize = (sizeof(uint32_t) + sizeof(struct serv_parm));
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp, did,
  				     ELS_CMD_FDISC);
  	if (!elsiocb) {
  		lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "0255 Issue FDISC: no IOCB\n");
  		return 1;
  	}
  
  	icmd = &elsiocb->iocb;
  	icmd->un.elsreq64.myID = 0;
  	icmd->un.elsreq64.fl = 1;
  
  	/*
  	 * SLI3 ports require a different context type value than SLI4.
  	 * Catch SLI3 ports here and override the prep.
  	 */
  	if (phba->sli_rev == LPFC_SLI_REV3) {
  		icmd->ulpCt_h = 1;
  		icmd->ulpCt_l = 0;
  	}
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	*((uint32_t *) (pcmd)) = ELS_CMD_FDISC;
  	pcmd += sizeof(uint32_t); /* CSP Word 1 */
  	memcpy(pcmd, &vport->phba->pport->fc_sparam, sizeof(struct serv_parm));
  	sp = (struct serv_parm *) pcmd;
  	/* Setup CSPs accordingly for Fabric */
  	sp->cmn.e_d_tov = 0;
  	sp->cmn.w2.r_a_tov = 0;
  	sp->cmn.virtual_fabric_support = 0;
  	sp->cls1.classValid = 0;
  	sp->cls2.seqDelivery = 1;
  	sp->cls3.seqDelivery = 1;
  
  	pcmd += sizeof(uint32_t); /* CSP Word 2 */
  	pcmd += sizeof(uint32_t); /* CSP Word 3 */
  	pcmd += sizeof(uint32_t); /* CSP Word 4 */
  	pcmd += sizeof(uint32_t); /* Port Name */
  	memcpy(pcmd, &vport->fc_portname, 8);
  	pcmd += sizeof(uint32_t); /* Node Name */
  	pcmd += sizeof(uint32_t); /* Node Name */
  	memcpy(pcmd, &vport->fc_nodename, 8);
  	sp->cmn.valid_vendor_ver_level = 0;
  	memset(sp->un.vendorVersion, 0, sizeof(sp->un.vendorVersion));
  	lpfc_set_disctmo(vport);
  
  	phba->fc_stat.elsXmitFDISC++;
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_fdisc;
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue FDISC:     did:x%x",
  		did, 0, 0);
  
  	rc = lpfc_issue_fabric_iocb(phba, elsiocb);
  	if (rc == IOCB_ERROR) {
  		lpfc_els_free_iocb(phba, elsiocb);
  		lpfc_vport_set_state(vport, FC_VPORT_FAILED);
  		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
  				 "0256 Issue FDISC: Cannot send IOCB\n");
  		return 1;
  	}
  	lpfc_vport_set_state(vport, FC_VPORT_INITIALIZING);
  	return 0;
  }
  
  /**
   * lpfc_cmpl_els_npiv_logo - Completion function with vport logo
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the completion callback function to the issuing of a LOGO
   * ELS command off a vport. It frees the command IOCB and then decrement the
   * reference count held on ndlp for this completion function, indicating that
   * the reference to the ndlp is no long needed. Note that the
   * lpfc_els_free_iocb() routine decrements the ndlp reference held for this
   * callback function and an additional explicit ndlp reference decrementation
   * will trigger the actual release of the ndlp.
   **/
  static void
  lpfc_cmpl_els_npiv_logo(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  			struct lpfc_iocbq *rspiocb)
  {
  	struct lpfc_vport *vport = cmdiocb->vport;
  	IOCB_t *irsp;
  	struct lpfc_nodelist *ndlp;
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  
  	ndlp = (struct lpfc_nodelist *)cmdiocb->context1;
  	irsp = &rspiocb->iocb;
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"LOGO npiv cmpl:  status:x%x/x%x did:x%x",
  		irsp->ulpStatus, irsp->un.ulpWord[4], irsp->un.rcvels.remoteID);
  
  	lpfc_els_free_iocb(phba, cmdiocb);
  	vport->unreg_vpi_cmpl = VPORT_ERROR;
  
  	/* Trigger the release of the ndlp after logo */
  	lpfc_nlp_put(ndlp);
  
  	/* NPIV LOGO completes to NPort <nlp_DID> */
  	lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
  			 "2928 NPIV LOGO completes to NPort x%x "
  			 "Data: x%x x%x x%x x%x\n",
  			 ndlp->nlp_DID, irsp->ulpStatus, irsp->un.ulpWord[4],
  			 irsp->ulpTimeout, vport->num_disc_nodes);
  
  	if (irsp->ulpStatus == IOSTAT_SUCCESS) {
  		spin_lock_irq(shost->host_lock);
  		vport->fc_flag &= ~FC_NDISC_ACTIVE;
  		vport->fc_flag &= ~FC_FABRIC;
  		spin_unlock_irq(shost->host_lock);
  		lpfc_can_disctmo(vport);
  	}
  }
  
  /**
   * lpfc_issue_els_npiv_logo - Issue a logo off a vport
   * @vport: pointer to a virtual N_Port data structure.
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine issues a LOGO ELS command to an @ndlp off a @vport.
   *
   * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
   * will be incremented by 1 for holding the ndlp and the reference to ndlp
   * will be stored into the context1 field of the IOCB for the completion
   * callback function to the LOGO ELS command.
   *
   * Return codes
   *   0 - Successfully issued logo off the @vport
   *   1 - Failed to issue logo off the @vport
   **/
  int
  lpfc_issue_els_npiv_logo(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
  {
  	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_iocbq *elsiocb;
  	uint8_t *pcmd;
  	uint16_t cmdsize;
  
  	cmdsize = 2 * sizeof(uint32_t) + sizeof(struct lpfc_name);
  	elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, 0, ndlp, ndlp->nlp_DID,
  				     ELS_CMD_LOGO);
  	if (!elsiocb)
  		return 1;
  
  	pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
  	*((uint32_t *) (pcmd)) = ELS_CMD_LOGO;
  	pcmd += sizeof(uint32_t);
  
  	/* Fill in LOGO payload */
  	*((uint32_t *) (pcmd)) = be32_to_cpu(vport->fc_myDID);
  	pcmd += sizeof(uint32_t);
  	memcpy(pcmd, &vport->fc_portname, sizeof(struct lpfc_name));
  
  	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
  		"Issue LOGO npiv  did:x%x flg:x%x",
  		ndlp->nlp_DID, ndlp->nlp_flag, 0);
  
  	elsiocb->iocb_cmpl = lpfc_cmpl_els_npiv_logo;
  	spin_lock_irq(shost->host_lock);
  	ndlp->nlp_flag |= NLP_LOGO_SND;
  	spin_unlock_irq(shost->host_lock);
  	if (lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, elsiocb, 0) ==
  	    IOCB_ERROR) {
  		spin_lock_irq(shost->host_lock);
  		ndlp->nlp_flag &= ~NLP_LOGO_SND;
  		spin_unlock_irq(shost->host_lock);
  		lpfc_els_free_iocb(phba, elsiocb);
  		return 1;
  	}
  	return 0;
  }
  
  /**
   * lpfc_fabric_block_timeout - Handler function to the fabric block timer
   * @ptr: holder for the timer function associated data.
   *
   * This routine is invoked by the fabric iocb block timer after
   * timeout. It posts the fabric iocb block timeout event by setting the
   * WORKER_FABRIC_BLOCK_TMO bit to work port event bitmap and then invokes
   * lpfc_worker_wake_up() routine to wake up the worker thread. It is for
   * the worker thread to invoke the lpfc_unblock_fabric_iocbs() on the
   * posted event WORKER_FABRIC_BLOCK_TMO.
   **/
  void
  lpfc_fabric_block_timeout(struct timer_list *t)
  {
  	struct lpfc_hba  *phba = from_timer(phba, t, fabric_block_timer);
  	unsigned long iflags;
  	uint32_t tmo_posted;
  
  	spin_lock_irqsave(&phba->pport->work_port_lock, iflags);
  	tmo_posted = phba->pport->work_port_events & WORKER_FABRIC_BLOCK_TMO;
  	if (!tmo_posted)
  		phba->pport->work_port_events |= WORKER_FABRIC_BLOCK_TMO;
  	spin_unlock_irqrestore(&phba->pport->work_port_lock, iflags);
  
  	if (!tmo_posted)
  		lpfc_worker_wake_up(phba);
  	return;
  }
  
  /**
   * lpfc_resume_fabric_iocbs - Issue a fabric iocb from driver internal list
   * @phba: pointer to lpfc hba data structure.
   *
   * This routine issues one fabric iocb from the driver internal list to
   * the HBA. It first checks whether it's ready to issue one fabric iocb to
   * the HBA (whether there is no outstanding fabric iocb). If so, it shall
   * remove one pending fabric iocb from the driver internal list and invokes
   * lpfc_sli_issue_iocb() routine to send the fabric iocb to the HBA.
   **/
  static void
  lpfc_resume_fabric_iocbs(struct lpfc_hba *phba)
  {
  	struct lpfc_iocbq *iocb;
  	unsigned long iflags;
  	int ret;
  	IOCB_t *cmd;
  
  repeat:
  	iocb = NULL;
  	spin_lock_irqsave(&phba->hbalock, iflags);
  	/* Post any pending iocb to the SLI layer */
  	if (atomic_read(&phba->fabric_iocb_count) == 0) {
  		list_remove_head(&phba->fabric_iocb_list, iocb, typeof(*iocb),
  				 list);
  		if (iocb)
  			/* Increment fabric iocb count to hold the position */
  			atomic_inc(&phba->fabric_iocb_count);
  	}
  	spin_unlock_irqrestore(&phba->hbalock, iflags);
  	if (iocb) {
  		iocb->fabric_iocb_cmpl = iocb->iocb_cmpl;
  		iocb->iocb_cmpl = lpfc_cmpl_fabric_iocb;
  		iocb->iocb_flag |= LPFC_IO_FABRIC;
  
  		lpfc_debugfs_disc_trc(iocb->vport, LPFC_DISC_TRC_ELS_CMD,
  			"Fabric sched1:   ste:x%x",
  			iocb->vport->port_state, 0, 0);
  
  		ret = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, iocb, 0);
  
  		if (ret == IOCB_ERROR) {
  			iocb->iocb_cmpl = iocb->fabric_iocb_cmpl;
  			iocb->fabric_iocb_cmpl = NULL;
  			iocb->iocb_flag &= ~LPFC_IO_FABRIC;
  			cmd = &iocb->iocb;
  			cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
  			cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
  			iocb->iocb_cmpl(phba, iocb, iocb);
  
  			atomic_dec(&phba->fabric_iocb_count);
  			goto repeat;
  		}
  	}
  
  	return;
  }
  
  /**
   * lpfc_unblock_fabric_iocbs - Unblock issuing fabric iocb command
   * @phba: pointer to lpfc hba data structure.
   *
   * This routine unblocks the  issuing fabric iocb command. The function
   * will clear the fabric iocb block bit and then invoke the routine
   * lpfc_resume_fabric_iocbs() to issue one of the pending fabric iocb
   * from the driver internal fabric iocb list.
   **/
  void
  lpfc_unblock_fabric_iocbs(struct lpfc_hba *phba)
  {
  	clear_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags);
  
  	lpfc_resume_fabric_iocbs(phba);
  	return;
  }
  
  /**
   * lpfc_block_fabric_iocbs - Block issuing fabric iocb command
   * @phba: pointer to lpfc hba data structure.
   *
   * This routine blocks the issuing fabric iocb for a specified amount of
   * time (currently 100 ms). This is done by set the fabric iocb block bit
   * and set up a timeout timer for 100ms. When the block bit is set, no more
   * fabric iocb will be issued out of the HBA.
   **/
  static void
  lpfc_block_fabric_iocbs(struct lpfc_hba *phba)
  {
  	int blocked;
  
  	blocked = test_and_set_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags);
  	/* Start a timer to unblock fabric iocbs after 100ms */
  	if (!blocked)
  		mod_timer(&phba->fabric_block_timer,
  			  jiffies + msecs_to_jiffies(100));
  
  	return;
  }
  
  /**
   * lpfc_cmpl_fabric_iocb - Completion callback function for fabric iocb
   * @phba: pointer to lpfc hba data structure.
   * @cmdiocb: pointer to lpfc command iocb data structure.
   * @rspiocb: pointer to lpfc response iocb data structure.
   *
   * This routine is the callback function that is put to the fabric iocb's
   * callback function pointer (iocb->iocb_cmpl). The original iocb's callback
   * function pointer has been stored in iocb->fabric_iocb_cmpl. This callback
   * function first restores and invokes the original iocb's callback function
   * and then invokes the lpfc_resume_fabric_iocbs() routine to issue the next
   * fabric bound iocb from the driver internal fabric iocb list onto the wire.
   **/
  static void
  lpfc_cmpl_fabric_iocb(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
  	struct lpfc_iocbq *rspiocb)
  {
  	struct ls_rjt stat;
  
  	BUG_ON((cmdiocb->iocb_flag & LPFC_IO_FABRIC) != LPFC_IO_FABRIC);
  
  	switch (rspiocb->iocb.ulpStatus) {
  		case IOSTAT_NPORT_RJT:
  		case IOSTAT_FABRIC_RJT:
  			if (rspiocb->iocb.un.ulpWord[4] & RJT_UNAVAIL_TEMP) {
  				lpfc_block_fabric_iocbs(phba);
  			}
  			break;
  
  		case IOSTAT_NPORT_BSY:
  		case IOSTAT_FABRIC_BSY:
  			lpfc_block_fabric_iocbs(phba);
  			break;
  
  		case IOSTAT_LS_RJT:
  			stat.un.lsRjtError =
  				be32_to_cpu(rspiocb->iocb.un.ulpWord[4]);
  			if ((stat.un.b.lsRjtRsnCode == LSRJT_UNABLE_TPC) ||
  				(stat.un.b.lsRjtRsnCode == LSRJT_LOGICAL_BSY))
  				lpfc_block_fabric_iocbs(phba);
  			break;
  	}
  
  	BUG_ON(atomic_read(&phba->fabric_iocb_count) == 0);
  
  	cmdiocb->iocb_cmpl = cmdiocb->fabric_iocb_cmpl;
  	cmdiocb->fabric_iocb_cmpl = NULL;
  	cmdiocb->iocb_flag &= ~LPFC_IO_FABRIC;
  	cmdiocb->iocb_cmpl(phba, cmdiocb, rspiocb);
  
  	atomic_dec(&phba->fabric_iocb_count);
  	if (!test_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags)) {
  		/* Post any pending iocbs to HBA */
  		lpfc_resume_fabric_iocbs(phba);
  	}
  }
  
  /**
   * lpfc_issue_fabric_iocb - Issue a fabric iocb command
   * @phba: pointer to lpfc hba data structure.
   * @iocb: pointer to lpfc command iocb data structure.
   *
   * This routine is used as the top-level API for issuing a fabric iocb command
   * such as FLOGI and FDISC. To accommodate certain switch fabric, this driver
   * function makes sure that only one fabric bound iocb will be outstanding at
   * any given time. As such, this function will first check to see whether there
   * is already an outstanding fabric iocb on the wire. If so, it will put the
   * newly issued iocb onto the driver internal fabric iocb list, waiting to be
   * issued later. Otherwise, it will issue the iocb on the wire and update the
   * fabric iocb count it indicate that there is one fabric iocb on the wire.
   *
   * Note, this implementation has a potential sending out fabric IOCBs out of
   * order. The problem is caused by the construction of the "ready" boolen does
   * not include the condition that the internal fabric IOCB list is empty. As
   * such, it is possible a fabric IOCB issued by this routine might be "jump"
   * ahead of the fabric IOCBs in the internal list.
   *
   * Return code
   *   IOCB_SUCCESS - either fabric iocb put on the list or issued successfully
   *   IOCB_ERROR - failed to issue fabric iocb
   **/
  static int
  lpfc_issue_fabric_iocb(struct lpfc_hba *phba, struct lpfc_iocbq *iocb)
  {
  	unsigned long iflags;
  	int ready;
  	int ret;
  
  	BUG_ON(atomic_read(&phba->fabric_iocb_count) > 1);
  
  	spin_lock_irqsave(&phba->hbalock, iflags);
  	ready = atomic_read(&phba->fabric_iocb_count) == 0 &&
  		!test_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags);
  
  	if (ready)
  		/* Increment fabric iocb count to hold the position */
  		atomic_inc(&phba->fabric_iocb_count);
  	spin_unlock_irqrestore(&phba->hbalock, iflags);
  	if (ready) {
  		iocb->fabric_iocb_cmpl = iocb->iocb_cmpl;
  		iocb->iocb_cmpl = lpfc_cmpl_fabric_iocb;
  		iocb->iocb_flag |= LPFC_IO_FABRIC;
  
  		lpfc_debugfs_disc_trc(iocb->vport, LPFC_DISC_TRC_ELS_CMD,
  			"Fabric sched2:   ste:x%x",
  			iocb->vport->port_state, 0, 0);
  
  		ret = lpfc_sli_issue_iocb(phba, LPFC_ELS_RING, iocb, 0);
  
  		if (ret == IOCB_ERROR) {
  			iocb->iocb_cmpl = iocb->fabric_iocb_cmpl;
  			iocb->fabric_iocb_cmpl = NULL;
  			iocb->iocb_flag &= ~LPFC_IO_FABRIC;
  			atomic_dec(&phba->fabric_iocb_count);
  		}
  	} else {
  		spin_lock_irqsave(&phba->hbalock, iflags);
  		list_add_tail(&iocb->list, &phba->fabric_iocb_list);
  		spin_unlock_irqrestore(&phba->hbalock, iflags);
  		ret = IOCB_SUCCESS;
  	}
  	return ret;
  }
  
  /**
   * lpfc_fabric_abort_vport - Abort a vport's iocbs from driver fabric iocb list
   * @vport: pointer to a virtual N_Port data structure.
   *
   * This routine aborts all the IOCBs associated with a @vport from the
   * driver internal fabric IOCB list. The list contains fabric IOCBs to be
   * issued to the ELS IOCB ring. This abort function walks the fabric IOCB
   * list, removes each IOCB associated with the @vport off the list, set the
   * status feild to IOSTAT_LOCAL_REJECT, and invokes the callback function
   * associated with the IOCB.
   **/
  static void lpfc_fabric_abort_vport(struct lpfc_vport *vport)
  {
  	LIST_HEAD(completions);
  	struct lpfc_hba  *phba = vport->phba;
  	struct lpfc_iocbq *tmp_iocb, *piocb;
  
  	spin_lock_irq(&phba->hbalock);
  	list_for_each_entry_safe(piocb, tmp_iocb, &phba->fabric_iocb_list,
  				 list) {
  
  		if (piocb->vport != vport)
  			continue;
  
  		list_move_tail(&piocb->list, &completions);
  	}
  	spin_unlock_irq(&phba->hbalock);
  
  	/* Cancel all the IOCBs from the completions list */
  	lpfc_sli_cancel_iocbs(phba, &completions, IOSTAT_LOCAL_REJECT,
  			      IOERR_SLI_ABORTED);
  }
  
  /**
   * lpfc_fabric_abort_nport - Abort a ndlp's iocbs from driver fabric iocb list
   * @ndlp: pointer to a node-list data structure.
   *
   * This routine aborts all the IOCBs associated with an @ndlp from the
   * driver internal fabric IOCB list. The list contains fabric IOCBs to be
   * issued to the ELS IOCB ring. This abort function walks the fabric IOCB
   * list, removes each IOCB associated with the @ndlp off the list, set the
   * status feild to IOSTAT_LOCAL_REJECT, and invokes the callback function
   * associated with the IOCB.
   **/
  void lpfc_fabric_abort_nport(struct lpfc_nodelist *ndlp)
  {
  	LIST_HEAD(completions);
  	struct lpfc_hba  *phba = ndlp->phba;
  	struct lpfc_iocbq *tmp_iocb, *piocb;
  	struct lpfc_sli_ring *pring;
  
  	pring = lpfc_phba_elsring(phba);
  
  	if (unlikely(!pring))
  		return;
  
  	spin_lock_irq(&phba->hbalock);
  	list_for_each_entry_safe(piocb, tmp_iocb, &phba->fabric_iocb_list,
  				 list) {
  		if ((lpfc_check_sli_ndlp(phba, pring, piocb, ndlp))) {
  
  			list_move_tail(&piocb->list, &completions);
  		}
  	}
  	spin_unlock_irq(&phba->hbalock);
  
  	/* Cancel all the IOCBs from the completions list */
  	lpfc_sli_cancel_iocbs(phba, &completions, IOSTAT_LOCAL_REJECT,
  			      IOERR_SLI_ABORTED);
  }
  
  /**
   * lpfc_fabric_abort_hba - Abort all iocbs on driver fabric iocb list
   * @phba: pointer to lpfc hba data structure.
   *
   * This routine aborts all the IOCBs currently on the driver internal
   * fabric IOCB list. The list contains fabric IOCBs to be issued to the ELS
   * IOCB ring. This function takes the entire IOCB list off the fabric IOCB
   * list, removes IOCBs off the list, set the status feild to
   * IOSTAT_LOCAL_REJECT, and invokes the callback function associated with
   * the IOCB.
   **/
  void lpfc_fabric_abort_hba(struct lpfc_hba *phba)
  {
  	LIST_HEAD(completions);
  
  	spin_lock_irq(&phba->hbalock);
  	list_splice_init(&phba->fabric_iocb_list, &completions);
  	spin_unlock_irq(&phba->hbalock);
  
  	/* Cancel all the IOCBs from the completions list */
  	lpfc_sli_cancel_iocbs(phba, &completions, IOSTAT_LOCAL_REJECT,
  			      IOERR_SLI_ABORTED);
  }
  
  /**
   * lpfc_sli4_vport_delete_els_xri_aborted -Remove all ndlp references for vport
   * @vport: pointer to lpfc vport data structure.
   *
   * This routine is invoked by the vport cleanup for deletions and the cleanup
   * for an ndlp on removal.
   **/
  void
  lpfc_sli4_vport_delete_els_xri_aborted(struct lpfc_vport *vport)
  {
  	struct lpfc_hba *phba = vport->phba;
  	struct lpfc_sglq *sglq_entry = NULL, *sglq_next = NULL;
  	unsigned long iflag = 0;
  
  	spin_lock_irqsave(&phba->hbalock, iflag);
  	spin_lock(&phba->sli4_hba.sgl_list_lock);
  	list_for_each_entry_safe(sglq_entry, sglq_next,
  			&phba->sli4_hba.lpfc_abts_els_sgl_list, list) {
  		if (sglq_entry->ndlp && sglq_entry->ndlp->vport == vport)
  			sglq_entry->ndlp = NULL;
  	}
  	spin_unlock(&phba->sli4_hba.sgl_list_lock);
  	spin_unlock_irqrestore(&phba->hbalock, iflag);
  	return;
  }
  
  /**
   * lpfc_sli4_els_xri_aborted - Slow-path process of els xri abort
   * @phba: pointer to lpfc hba data structure.
   * @axri: pointer to the els xri abort wcqe structure.
   *
   * This routine is invoked by the worker thread to process a SLI4 slow-path
   * ELS aborted xri.
   **/
  void
  lpfc_sli4_els_xri_aborted(struct lpfc_hba *phba,
  			  struct sli4_wcqe_xri_aborted *axri)
  {
  	uint16_t xri = bf_get(lpfc_wcqe_xa_xri, axri);
  	uint16_t rxid = bf_get(lpfc_wcqe_xa_remote_xid, axri);
  	uint16_t lxri = 0;
  
  	struct lpfc_sglq *sglq_entry = NULL, *sglq_next = NULL;
  	unsigned long iflag = 0;
  	struct lpfc_nodelist *ndlp;
  	struct lpfc_sli_ring *pring;
  
  	pring = lpfc_phba_elsring(phba);
  
  	spin_lock_irqsave(&phba->hbalock, iflag);
  	spin_lock(&phba->sli4_hba.sgl_list_lock);
  	list_for_each_entry_safe(sglq_entry, sglq_next,
  			&phba->sli4_hba.lpfc_abts_els_sgl_list, list) {
  		if (sglq_entry->sli4_xritag == xri) {
  			list_del(&sglq_entry->list);
  			ndlp = sglq_entry->ndlp;
  			sglq_entry->ndlp = NULL;
  			list_add_tail(&sglq_entry->list,
  				&phba->sli4_hba.lpfc_els_sgl_list);
  			sglq_entry->state = SGL_FREED;
  			spin_unlock(&phba->sli4_hba.sgl_list_lock);
  			spin_unlock_irqrestore(&phba->hbalock, iflag);
  			lpfc_set_rrq_active(phba, ndlp,
  				sglq_entry->sli4_lxritag,
  				rxid, 1);
  
  			/* Check if TXQ queue needs to be serviced */
  			if (pring && !list_empty(&pring->txq))
  				lpfc_worker_wake_up(phba);
  			return;
  		}
  	}
  	spin_unlock(&phba->sli4_hba.sgl_list_lock);
  	lxri = lpfc_sli4_xri_inrange(phba, xri);
  	if (lxri == NO_XRI) {
  		spin_unlock_irqrestore(&phba->hbalock, iflag);
  		return;
  	}
  	spin_lock(&phba->sli4_hba.sgl_list_lock);
  	sglq_entry = __lpfc_get_active_sglq(phba, lxri);
  	if (!sglq_entry || (sglq_entry->sli4_xritag != xri)) {
  		spin_unlock(&phba->sli4_hba.sgl_list_lock);
  		spin_unlock_irqrestore(&phba->hbalock, iflag);
  		return;
  	}
  	sglq_entry->state = SGL_XRI_ABORTED;
  	spin_unlock(&phba->sli4_hba.sgl_list_lock);
  	spin_unlock_irqrestore(&phba->hbalock, iflag);
  	return;
  }
  
  /* lpfc_sli_abts_recover_port - Recover a port that failed a BLS_ABORT req.
   * @vport: pointer to virtual port object.
   * @ndlp: nodelist pointer for the impacted node.
   *
   * The driver calls this routine in response to an SLI4 XRI ABORT CQE
   * or an SLI3 ASYNC_STATUS_CN event from the port.  For either event,
   * the driver is required to send a LOGO to the remote node before it
   * attempts to recover its login to the remote node.
   */
  void
  lpfc_sli_abts_recover_port(struct lpfc_vport *vport,
  			   struct lpfc_nodelist *ndlp)
  {
  	struct Scsi_Host *shost;
  	struct lpfc_hba *phba;
  	unsigned long flags = 0;
  
  	shost = lpfc_shost_from_vport(vport);
  	phba = vport->phba;
  	if (ndlp->nlp_state != NLP_STE_MAPPED_NODE) {
  		lpfc_printf_log(phba, KERN_INFO,
  				LOG_SLI, "3093 No rport recovery needed. "
  				"rport in state 0x%x\n", ndlp->nlp_state);
  		return;
  	}
  	lpfc_printf_log(phba, KERN_ERR,
  			LOG_ELS | LOG_FCP_ERROR | LOG_NVME_IOERR,
  			"3094 Start rport recovery on shost id 0x%x "
  			"fc_id 0x%06x vpi 0x%x rpi 0x%x state 0x%x "
  			"flags 0x%x\n",
  			shost->host_no, ndlp->nlp_DID,
  			vport->vpi, ndlp->nlp_rpi, ndlp->nlp_state,
  			ndlp->nlp_flag);
  	/*
  	 * The rport is not responding.  Remove the FCP-2 flag to prevent
  	 * an ADISC in the follow-up recovery code.
  	 */
  	spin_lock_irqsave(shost->host_lock, flags);
  	ndlp->nlp_fcp_info &= ~NLP_FCP_2_DEVICE;
  	ndlp->nlp_flag |= NLP_ISSUE_LOGO;
  	spin_unlock_irqrestore(shost->host_lock, flags);
  	lpfc_unreg_rpi(vport, ndlp);
  }
  
  