Merge branch 'master' of master.kernel.org:/pub/scm/linux/kernel/git/torvalds/linux-2.6
[linux-2.6] / drivers / scsi / lpfc / lpfc_els.c
1 /*******************************************************************
2  * This file is part of the Emulex Linux Device Driver for         *
3  * Fibre Channel Host Bus Adapters.                                *
4  * Copyright (C) 2004-2008 Emulex.  All rights reserved.           *
5  * EMULEX and SLI are trademarks of Emulex.                        *
6  * www.emulex.com                                                  *
7  * Portions Copyright (C) 2004-2005 Christoph Hellwig              *
8  *                                                                 *
9  * This program is free software; you can redistribute it and/or   *
10  * modify it under the terms of version 2 of the GNU General       *
11  * Public License as published by the Free Software Foundation.    *
12  * This program is distributed in the hope that it will be useful. *
13  * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND          *
14  * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY,  *
15  * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE      *
16  * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD *
17  * TO BE LEGALLY INVALID.  See the GNU General Public License for  *
18  * more details, a copy of which can be found in the file COPYING  *
19  * included with this package.                                     *
20  *******************************************************************/
21 /* See Fibre Channel protocol T11 FC-LS for details */
22 #include <linux/blkdev.h>
23 #include <linux/pci.h>
24 #include <linux/interrupt.h>
25
26 #include <scsi/scsi.h>
27 #include <scsi/scsi_device.h>
28 #include <scsi/scsi_host.h>
29 #include <scsi/scsi_transport_fc.h>
30
31 #include "lpfc_hw.h"
32 #include "lpfc_sli.h"
33 #include "lpfc_nl.h"
34 #include "lpfc_disc.h"
35 #include "lpfc_scsi.h"
36 #include "lpfc.h"
37 #include "lpfc_logmsg.h"
38 #include "lpfc_crtn.h"
39 #include "lpfc_vport.h"
40 #include "lpfc_debugfs.h"
41
42 static int lpfc_els_retry(struct lpfc_hba *, struct lpfc_iocbq *,
43                           struct lpfc_iocbq *);
44 static void lpfc_cmpl_fabric_iocb(struct lpfc_hba *, struct lpfc_iocbq *,
45                         struct lpfc_iocbq *);
46 static void lpfc_fabric_abort_vport(struct lpfc_vport *vport);
47 static int lpfc_issue_els_fdisc(struct lpfc_vport *vport,
48                                 struct lpfc_nodelist *ndlp, uint8_t retry);
49 static int lpfc_issue_fabric_iocb(struct lpfc_hba *phba,
50                                   struct lpfc_iocbq *iocb);
51 static void lpfc_register_new_vport(struct lpfc_hba *phba,
52                                     struct lpfc_vport *vport,
53                                     struct lpfc_nodelist *ndlp);
54
55 static int lpfc_max_els_tries = 3;
56
57 /**
58  * lpfc_els_chk_latt: Check host link attention event for a vport.
59  * @vport: pointer to a host virtual N_Port data structure.
60  *
61  * This routine checks whether there is an outstanding host link
62  * attention event during the discovery process with the @vport. It is done
63  * by reading the HBA's Host Attention (HA) register. If there is any host
64  * link attention events during this @vport's discovery process, the @vport
65  * shall be marked as FC_ABORT_DISCOVERY, a host link attention clear shall
66  * be issued if the link state is not already in host link cleared state,
67  * and a return code shall indicate whether the host link attention event
68  * had happened.
69  *
70  * Note that, if either the host link is in state LPFC_LINK_DOWN or @vport
71  * state in LPFC_VPORT_READY, the request for checking host link attention
72  * event will be ignored and a return code shall indicate no host link
73  * attention event had happened.
74  *
75  * Return codes
76  *   0 - no host link attention event happened
77  *   1 - host link attention event happened
78  **/
79 int
80 lpfc_els_chk_latt(struct lpfc_vport *vport)
81 {
82         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
83         struct lpfc_hba  *phba = vport->phba;
84         uint32_t ha_copy;
85
86         if (vport->port_state >= LPFC_VPORT_READY ||
87             phba->link_state == LPFC_LINK_DOWN)
88                 return 0;
89
90         /* Read the HBA Host Attention Register */
91         ha_copy = readl(phba->HAregaddr);
92
93         if (!(ha_copy & HA_LATT))
94                 return 0;
95
96         /* Pending Link Event during Discovery */
97         lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
98                          "0237 Pending Link Event during "
99                          "Discovery: State x%x\n",
100                          phba->pport->port_state);
101
102         /* CLEAR_LA should re-enable link attention events and
103          * we should then imediately take a LATT event. The
104          * LATT processing should call lpfc_linkdown() which
105          * will cleanup any left over in-progress discovery
106          * events.
107          */
108         spin_lock_irq(shost->host_lock);
109         vport->fc_flag |= FC_ABORT_DISCOVERY;
110         spin_unlock_irq(shost->host_lock);
111
112         if (phba->link_state != LPFC_CLEAR_LA)
113                 lpfc_issue_clear_la(phba, vport);
114
115         return 1;
116 }
117
118 /**
119  * lpfc_prep_els_iocb: Allocate and prepare a lpfc iocb data structure.
120  * @vport: pointer to a host virtual N_Port data structure.
121  * @expectRsp: flag indicating whether response is expected.
122  * @cmdSize: size of the ELS command.
123  * @retry: number of retries to the command IOCB when it fails.
124  * @ndlp: pointer to a node-list data structure.
125  * @did: destination identifier.
126  * @elscmd: the ELS command code.
127  *
128  * This routine is used for allocating a lpfc-IOCB data structure from
129  * the driver lpfc-IOCB free-list and prepare the IOCB with the parameters
130  * passed into the routine for discovery state machine to issue an Extended
131  * Link Service (ELS) commands. It is a generic lpfc-IOCB allocation
132  * and preparation routine that is used by all the discovery state machine
133  * routines and the ELS command-specific fields will be later set up by
134  * the individual discovery machine routines after calling this routine
135  * allocating and preparing a generic IOCB data structure. It fills in the
136  * Buffer Descriptor Entries (BDEs), allocates buffers for both command
137  * payload and response payload (if expected). The reference count on the
138  * ndlp is incremented by 1 and the reference to the ndlp is put into
139  * context1 of the IOCB data structure for this IOCB to hold the ndlp
140  * reference for the command's callback function to access later.
141  *
142  * Return code
143  *   Pointer to the newly allocated/prepared els iocb data structure
144  *   NULL - when els iocb data structure allocation/preparation failed
145  **/
146 static struct lpfc_iocbq *
147 lpfc_prep_els_iocb(struct lpfc_vport *vport, uint8_t expectRsp,
148                    uint16_t cmdSize, uint8_t retry,
149                    struct lpfc_nodelist *ndlp, uint32_t did,
150                    uint32_t elscmd)
151 {
152         struct lpfc_hba  *phba = vport->phba;
153         struct lpfc_iocbq *elsiocb;
154         struct lpfc_dmabuf *pcmd, *prsp, *pbuflist;
155         struct ulp_bde64 *bpl;
156         IOCB_t *icmd;
157
158
159         if (!lpfc_is_link_up(phba))
160                 return NULL;
161
162         /* Allocate buffer for  command iocb */
163         elsiocb = lpfc_sli_get_iocbq(phba);
164
165         if (elsiocb == NULL)
166                 return NULL;
167
168         icmd = &elsiocb->iocb;
169
170         /* fill in BDEs for command */
171         /* Allocate buffer for command payload */
172         pcmd = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
173         if (pcmd)
174                 pcmd->virt = lpfc_mbuf_alloc(phba, MEM_PRI, &pcmd->phys);
175         if (!pcmd || !pcmd->virt)
176                 goto els_iocb_free_pcmb_exit;
177
178         INIT_LIST_HEAD(&pcmd->list);
179
180         /* Allocate buffer for response payload */
181         if (expectRsp) {
182                 prsp = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
183                 if (prsp)
184                         prsp->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
185                                                      &prsp->phys);
186                 if (!prsp || !prsp->virt)
187                         goto els_iocb_free_prsp_exit;
188                 INIT_LIST_HEAD(&prsp->list);
189         } else
190                 prsp = NULL;
191
192         /* Allocate buffer for Buffer ptr list */
193         pbuflist = kmalloc(sizeof(struct lpfc_dmabuf), GFP_KERNEL);
194         if (pbuflist)
195                 pbuflist->virt = lpfc_mbuf_alloc(phba, MEM_PRI,
196                                                  &pbuflist->phys);
197         if (!pbuflist || !pbuflist->virt)
198                 goto els_iocb_free_pbuf_exit;
199
200         INIT_LIST_HEAD(&pbuflist->list);
201
202         icmd->un.elsreq64.bdl.addrHigh = putPaddrHigh(pbuflist->phys);
203         icmd->un.elsreq64.bdl.addrLow = putPaddrLow(pbuflist->phys);
204         icmd->un.elsreq64.bdl.bdeFlags = BUFF_TYPE_BLP_64;
205         icmd->un.elsreq64.remoteID = did;       /* DID */
206         if (expectRsp) {
207                 icmd->un.elsreq64.bdl.bdeSize = (2 * sizeof(struct ulp_bde64));
208                 icmd->ulpCommand = CMD_ELS_REQUEST64_CR;
209                 icmd->ulpTimeout = phba->fc_ratov * 2;
210         } else {
211                 icmd->un.elsreq64.bdl.bdeSize = sizeof(struct ulp_bde64);
212                 icmd->ulpCommand = CMD_XMIT_ELS_RSP64_CX;
213         }
214         icmd->ulpBdeCount = 1;
215         icmd->ulpLe = 1;
216         icmd->ulpClass = CLASS3;
217
218         if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) {
219                 icmd->un.elsreq64.myID = vport->fc_myDID;
220
221                 /* For ELS_REQUEST64_CR, use the VPI by default */
222                 icmd->ulpContext = vport->vpi;
223                 icmd->ulpCt_h = 0;
224                 icmd->ulpCt_l = 1;
225         }
226
227         bpl = (struct ulp_bde64 *) pbuflist->virt;
228         bpl->addrLow = le32_to_cpu(putPaddrLow(pcmd->phys));
229         bpl->addrHigh = le32_to_cpu(putPaddrHigh(pcmd->phys));
230         bpl->tus.f.bdeSize = cmdSize;
231         bpl->tus.f.bdeFlags = 0;
232         bpl->tus.w = le32_to_cpu(bpl->tus.w);
233
234         if (expectRsp) {
235                 bpl++;
236                 bpl->addrLow = le32_to_cpu(putPaddrLow(prsp->phys));
237                 bpl->addrHigh = le32_to_cpu(putPaddrHigh(prsp->phys));
238                 bpl->tus.f.bdeSize = FCELSSIZE;
239                 bpl->tus.f.bdeFlags = BUFF_TYPE_BDE_64;
240                 bpl->tus.w = le32_to_cpu(bpl->tus.w);
241         }
242
243         /* prevent preparing iocb with NULL ndlp reference */
244         elsiocb->context1 = lpfc_nlp_get(ndlp);
245         if (!elsiocb->context1)
246                 goto els_iocb_free_pbuf_exit;
247         elsiocb->context2 = pcmd;
248         elsiocb->context3 = pbuflist;
249         elsiocb->retry = retry;
250         elsiocb->vport = vport;
251         elsiocb->drvrTimeout = (phba->fc_ratov << 1) + LPFC_DRVR_TIMEOUT;
252
253         if (prsp) {
254                 list_add(&prsp->list, &pcmd->list);
255         }
256         if (expectRsp) {
257                 /* Xmit ELS command <elsCmd> to remote NPORT <did> */
258                 lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
259                                  "0116 Xmit ELS command x%x to remote "
260                                  "NPORT x%x I/O tag: x%x, port state: x%x\n",
261                                  elscmd, did, elsiocb->iotag,
262                                  vport->port_state);
263         } else {
264                 /* Xmit ELS response <elsCmd> to remote NPORT <did> */
265                 lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
266                                  "0117 Xmit ELS response x%x to remote "
267                                  "NPORT x%x I/O tag: x%x, size: x%x\n",
268                                  elscmd, ndlp->nlp_DID, elsiocb->iotag,
269                                  cmdSize);
270         }
271         return elsiocb;
272
273 els_iocb_free_pbuf_exit:
274         lpfc_mbuf_free(phba, prsp->virt, prsp->phys);
275         kfree(pbuflist);
276
277 els_iocb_free_prsp_exit:
278         lpfc_mbuf_free(phba, pcmd->virt, pcmd->phys);
279         kfree(prsp);
280
281 els_iocb_free_pcmb_exit:
282         kfree(pcmd);
283         lpfc_sli_release_iocbq(phba, elsiocb);
284         return NULL;
285 }
286
287 /**
288  * lpfc_issue_fabric_reglogin: Issue fabric registration login for a vport.
289  * @vport: pointer to a host virtual N_Port data structure.
290  *
291  * This routine issues a fabric registration login for a @vport. An
292  * active ndlp node with Fabric_DID must already exist for this @vport.
293  * The routine invokes two mailbox commands to carry out fabric registration
294  * login through the HBA firmware: the first mailbox command requests the
295  * HBA to perform link configuration for the @vport; and the second mailbox
296  * command requests the HBA to perform the actual fabric registration login
297  * with the @vport.
298  *
299  * Return code
300  *   0 - successfully issued fabric registration login for @vport
301  *   -ENXIO -- failed to issue fabric registration login for @vport
302  **/
303 static int
304 lpfc_issue_fabric_reglogin(struct lpfc_vport *vport)
305 {
306         struct lpfc_hba  *phba = vport->phba;
307         LPFC_MBOXQ_t *mbox;
308         struct lpfc_dmabuf *mp;
309         struct lpfc_nodelist *ndlp;
310         struct serv_parm *sp;
311         int rc;
312         int err = 0;
313
314         sp = &phba->fc_fabparam;
315         ndlp = lpfc_findnode_did(vport, Fabric_DID);
316         if (!ndlp || !NLP_CHK_NODE_ACT(ndlp)) {
317                 err = 1;
318                 goto fail;
319         }
320
321         mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
322         if (!mbox) {
323                 err = 2;
324                 goto fail;
325         }
326
327         vport->port_state = LPFC_FABRIC_CFG_LINK;
328         lpfc_config_link(phba, mbox);
329         mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
330         mbox->vport = vport;
331
332         rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
333         if (rc == MBX_NOT_FINISHED) {
334                 err = 3;
335                 goto fail_free_mbox;
336         }
337
338         mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
339         if (!mbox) {
340                 err = 4;
341                 goto fail;
342         }
343         rc = lpfc_reg_login(phba, vport->vpi, Fabric_DID, (uint8_t *)sp, mbox,
344                             0);
345         if (rc) {
346                 err = 5;
347                 goto fail_free_mbox;
348         }
349
350         mbox->mbox_cmpl = lpfc_mbx_cmpl_fabric_reg_login;
351         mbox->vport = vport;
352         /* increment the reference count on ndlp to hold reference
353          * for the callback routine.
354          */
355         mbox->context2 = lpfc_nlp_get(ndlp);
356
357         rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
358         if (rc == MBX_NOT_FINISHED) {
359                 err = 6;
360                 goto fail_issue_reg_login;
361         }
362
363         return 0;
364
365 fail_issue_reg_login:
366         /* decrement the reference count on ndlp just incremented
367          * for the failed mbox command.
368          */
369         lpfc_nlp_put(ndlp);
370         mp = (struct lpfc_dmabuf *) mbox->context1;
371         lpfc_mbuf_free(phba, mp->virt, mp->phys);
372         kfree(mp);
373 fail_free_mbox:
374         mempool_free(mbox, phba->mbox_mem_pool);
375
376 fail:
377         lpfc_vport_set_state(vport, FC_VPORT_FAILED);
378         lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
379                 "0249 Cannot issue Register Fabric login: Err %d\n", err);
380         return -ENXIO;
381 }
382
383 /**
384  * lpfc_cmpl_els_flogi_fabric: Completion function for flogi to a fabric port.
385  * @vport: pointer to a host virtual N_Port data structure.
386  * @ndlp: pointer to a node-list data structure.
387  * @sp: pointer to service parameter data structure.
388  * @irsp: pointer to the IOCB within the lpfc response IOCB.
389  *
390  * This routine is invoked by the lpfc_cmpl_els_flogi() completion callback
391  * function to handle the completion of a Fabric Login (FLOGI) into a fabric
392  * port in a fabric topology. It properly sets up the parameters to the @ndlp
393  * from the IOCB response. It also check the newly assigned N_Port ID to the
394  * @vport against the previously assigned N_Port ID. If it is different from
395  * the previously assigned Destination ID (DID), the lpfc_unreg_rpi() routine
396  * is invoked on all the remaining nodes with the @vport to unregister the
397  * Remote Port Indicators (RPIs). Finally, the lpfc_issue_fabric_reglogin()
398  * is invoked to register login to the fabric.
399  *
400  * Return code
401  *   0 - Success (currently, always return 0)
402  **/
403 static int
404 lpfc_cmpl_els_flogi_fabric(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
405                            struct serv_parm *sp, IOCB_t *irsp)
406 {
407         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
408         struct lpfc_hba  *phba = vport->phba;
409         struct lpfc_nodelist *np;
410         struct lpfc_nodelist *next_np;
411
412         spin_lock_irq(shost->host_lock);
413         vport->fc_flag |= FC_FABRIC;
414         spin_unlock_irq(shost->host_lock);
415
416         phba->fc_edtov = be32_to_cpu(sp->cmn.e_d_tov);
417         if (sp->cmn.edtovResolution)    /* E_D_TOV ticks are in nanoseconds */
418                 phba->fc_edtov = (phba->fc_edtov + 999999) / 1000000;
419
420         phba->fc_ratov = (be32_to_cpu(sp->cmn.w2.r_a_tov) + 999) / 1000;
421
422         if (phba->fc_topology == TOPOLOGY_LOOP) {
423                 spin_lock_irq(shost->host_lock);
424                 vport->fc_flag |= FC_PUBLIC_LOOP;
425                 spin_unlock_irq(shost->host_lock);
426         } else {
427                 /*
428                  * If we are a N-port connected to a Fabric, fixup sparam's so
429                  * logins to devices on remote loops work.
430                  */
431                 vport->fc_sparam.cmn.altBbCredit = 1;
432         }
433
434         vport->fc_myDID = irsp->un.ulpWord[4] & Mask_DID;
435         memcpy(&ndlp->nlp_portname, &sp->portName, sizeof(struct lpfc_name));
436         memcpy(&ndlp->nlp_nodename, &sp->nodeName, sizeof(struct lpfc_name));
437         ndlp->nlp_class_sup = 0;
438         if (sp->cls1.classValid)
439                 ndlp->nlp_class_sup |= FC_COS_CLASS1;
440         if (sp->cls2.classValid)
441                 ndlp->nlp_class_sup |= FC_COS_CLASS2;
442         if (sp->cls3.classValid)
443                 ndlp->nlp_class_sup |= FC_COS_CLASS3;
444         if (sp->cls4.classValid)
445                 ndlp->nlp_class_sup |= FC_COS_CLASS4;
446         ndlp->nlp_maxframe = ((sp->cmn.bbRcvSizeMsb & 0x0F) << 8) |
447                                 sp->cmn.bbRcvSizeLsb;
448         memcpy(&phba->fc_fabparam, sp, sizeof(struct serv_parm));
449
450         if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) {
451                 if (sp->cmn.response_multiple_NPort) {
452                         lpfc_printf_vlog(vport, KERN_WARNING,
453                                          LOG_ELS | LOG_VPORT,
454                                          "1816 FLOGI NPIV supported, "
455                                          "response data 0x%x\n",
456                                          sp->cmn.response_multiple_NPort);
457                         phba->link_flag |= LS_NPIV_FAB_SUPPORTED;
458                 } else {
459                         /* Because we asked f/w for NPIV it still expects us
460                         to call reg_vnpid atleast for the physcial host */
461                         lpfc_printf_vlog(vport, KERN_WARNING,
462                                          LOG_ELS | LOG_VPORT,
463                                          "1817 Fabric does not support NPIV "
464                                          "- configuring single port mode.\n");
465                         phba->link_flag &= ~LS_NPIV_FAB_SUPPORTED;
466                 }
467         }
468
469         if ((vport->fc_prevDID != vport->fc_myDID) &&
470                 !(vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)) {
471
472                 /* If our NportID changed, we need to ensure all
473                  * remaining NPORTs get unreg_login'ed.
474                  */
475                 list_for_each_entry_safe(np, next_np,
476                                         &vport->fc_nodes, nlp_listp) {
477                         if (!NLP_CHK_NODE_ACT(np))
478                                 continue;
479                         if ((np->nlp_state != NLP_STE_NPR_NODE) ||
480                                    !(np->nlp_flag & NLP_NPR_ADISC))
481                                 continue;
482                         spin_lock_irq(shost->host_lock);
483                         np->nlp_flag &= ~NLP_NPR_ADISC;
484                         spin_unlock_irq(shost->host_lock);
485                         lpfc_unreg_rpi(vport, np);
486                 }
487                 if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) {
488                         lpfc_mbx_unreg_vpi(vport);
489                         spin_lock_irq(shost->host_lock);
490                         vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
491                         spin_unlock_irq(shost->host_lock);
492                 }
493         }
494
495         lpfc_nlp_set_state(vport, ndlp, NLP_STE_REG_LOGIN_ISSUE);
496
497         if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED &&
498             vport->fc_flag & FC_VPORT_NEEDS_REG_VPI) {
499                 lpfc_register_new_vport(phba, vport, ndlp);
500                 return 0;
501         }
502         lpfc_issue_fabric_reglogin(vport);
503         return 0;
504 }
505
506 /**
507  * lpfc_cmpl_els_flogi_nport: Completion function for flogi to an N_Port.
508  * @vport: pointer to a host virtual N_Port data structure.
509  * @ndlp: pointer to a node-list data structure.
510  * @sp: pointer to service parameter data structure.
511  *
512  * This routine is invoked by the lpfc_cmpl_els_flogi() completion callback
513  * function to handle the completion of a Fabric Login (FLOGI) into an N_Port
514  * in a point-to-point topology. First, the @vport's N_Port Name is compared
515  * with the received N_Port Name: if the @vport's N_Port Name is greater than
516  * the received N_Port Name lexicographically, this node shall assign local
517  * N_Port ID (PT2PT_LocalID: 1) and remote N_Port ID (PT2PT_RemoteID: 2) and
518  * will send out Port Login (PLOGI) with the N_Port IDs assigned. Otherwise,
519  * this node shall just wait for the remote node to issue PLOGI and assign
520  * N_Port IDs.
521  *
522  * Return code
523  *   0 - Success
524  *   -ENXIO - Fail
525  **/
526 static int
527 lpfc_cmpl_els_flogi_nport(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
528                           struct serv_parm *sp)
529 {
530         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
531         struct lpfc_hba  *phba = vport->phba;
532         LPFC_MBOXQ_t *mbox;
533         int rc;
534
535         spin_lock_irq(shost->host_lock);
536         vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
537         spin_unlock_irq(shost->host_lock);
538
539         phba->fc_edtov = FF_DEF_EDTOV;
540         phba->fc_ratov = FF_DEF_RATOV;
541         rc = memcmp(&vport->fc_portname, &sp->portName,
542                     sizeof(vport->fc_portname));
543         if (rc >= 0) {
544                 /* This side will initiate the PLOGI */
545                 spin_lock_irq(shost->host_lock);
546                 vport->fc_flag |= FC_PT2PT_PLOGI;
547                 spin_unlock_irq(shost->host_lock);
548
549                 /*
550                  * N_Port ID cannot be 0, set our to LocalID the other
551                  * side will be RemoteID.
552                  */
553
554                 /* not equal */
555                 if (rc)
556                         vport->fc_myDID = PT2PT_LocalID;
557
558                 mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
559                 if (!mbox)
560                         goto fail;
561
562                 lpfc_config_link(phba, mbox);
563
564                 mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
565                 mbox->vport = vport;
566                 rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
567                 if (rc == MBX_NOT_FINISHED) {
568                         mempool_free(mbox, phba->mbox_mem_pool);
569                         goto fail;
570                 }
571                 /* Decrement ndlp reference count indicating that ndlp can be
572                  * safely released when other references to it are done.
573                  */
574                 lpfc_nlp_put(ndlp);
575
576                 ndlp = lpfc_findnode_did(vport, PT2PT_RemoteID);
577                 if (!ndlp) {
578                         /*
579                          * Cannot find existing Fabric ndlp, so allocate a
580                          * new one
581                          */
582                         ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_KERNEL);
583                         if (!ndlp)
584                                 goto fail;
585                         lpfc_nlp_init(vport, ndlp, PT2PT_RemoteID);
586                 } else if (!NLP_CHK_NODE_ACT(ndlp)) {
587                         ndlp = lpfc_enable_node(vport, ndlp,
588                                                 NLP_STE_UNUSED_NODE);
589                         if(!ndlp)
590                                 goto fail;
591                 }
592
593                 memcpy(&ndlp->nlp_portname, &sp->portName,
594                        sizeof(struct lpfc_name));
595                 memcpy(&ndlp->nlp_nodename, &sp->nodeName,
596                        sizeof(struct lpfc_name));
597                 /* Set state will put ndlp onto node list if not already done */
598                 lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
599                 spin_lock_irq(shost->host_lock);
600                 ndlp->nlp_flag |= NLP_NPR_2B_DISC;
601                 spin_unlock_irq(shost->host_lock);
602         } else
603                 /* This side will wait for the PLOGI, decrement ndlp reference
604                  * count indicating that ndlp can be released when other
605                  * references to it are done.
606                  */
607                 lpfc_nlp_put(ndlp);
608
609         /* If we are pt2pt with another NPort, force NPIV off! */
610         phba->sli3_options &= ~LPFC_SLI3_NPIV_ENABLED;
611
612         spin_lock_irq(shost->host_lock);
613         vport->fc_flag |= FC_PT2PT;
614         spin_unlock_irq(shost->host_lock);
615
616         /* Start discovery - this should just do CLEAR_LA */
617         lpfc_disc_start(vport);
618         return 0;
619 fail:
620         return -ENXIO;
621 }
622
623 /**
624  * lpfc_cmpl_els_flogi: Completion callback function for flogi.
625  * @phba: pointer to lpfc hba data structure.
626  * @cmdiocb: pointer to lpfc command iocb data structure.
627  * @rspiocb: pointer to lpfc response iocb data structure.
628  *
629  * This routine is the top-level completion callback function for issuing
630  * a Fabric Login (FLOGI) command. If the response IOCB reported error,
631  * the lpfc_els_retry() routine shall be invoked to retry the FLOGI. If
632  * retry has been made (either immediately or delayed with lpfc_els_retry()
633  * returning 1), the command IOCB will be released and function returned.
634  * If the retry attempt has been given up (possibly reach the maximum
635  * number of retries), one additional decrement of ndlp reference shall be
636  * invoked before going out after releasing the command IOCB. This will
637  * actually release the remote node (Note, lpfc_els_free_iocb() will also
638  * invoke one decrement of ndlp reference count). If no error reported in
639  * the IOCB status, the command Port ID field is used to determine whether
640  * this is a point-to-point topology or a fabric topology: if the Port ID
641  * field is assigned, it is a fabric topology; otherwise, it is a
642  * point-to-point topology. The routine lpfc_cmpl_els_flogi_fabric() or
643  * lpfc_cmpl_els_flogi_nport() shall be invoked accordingly to handle the
644  * specific topology completion conditions.
645  **/
646 static void
647 lpfc_cmpl_els_flogi(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
648                     struct lpfc_iocbq *rspiocb)
649 {
650         struct lpfc_vport *vport = cmdiocb->vport;
651         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
652         IOCB_t *irsp = &rspiocb->iocb;
653         struct lpfc_nodelist *ndlp = cmdiocb->context1;
654         struct lpfc_dmabuf *pcmd = cmdiocb->context2, *prsp;
655         struct serv_parm *sp;
656         int rc;
657
658         /* Check to see if link went down during discovery */
659         if (lpfc_els_chk_latt(vport)) {
660                 /* One additional decrement on node reference count to
661                  * trigger the release of the node
662                  */
663                 lpfc_nlp_put(ndlp);
664                 goto out;
665         }
666
667         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
668                 "FLOGI cmpl:      status:x%x/x%x state:x%x",
669                 irsp->ulpStatus, irsp->un.ulpWord[4],
670                 vport->port_state);
671
672         if (irsp->ulpStatus) {
673                 /* Check for retry */
674                 if (lpfc_els_retry(phba, cmdiocb, rspiocb))
675                         goto out;
676
677                 /* FLOGI failed, so there is no fabric */
678                 spin_lock_irq(shost->host_lock);
679                 vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
680                 spin_unlock_irq(shost->host_lock);
681
682                 /* If private loop, then allow max outstanding els to be
683                  * LPFC_MAX_DISC_THREADS (32). Scanning in the case of no
684                  * alpa map would take too long otherwise.
685                  */
686                 if (phba->alpa_map[0] == 0) {
687                         vport->cfg_discovery_threads = LPFC_MAX_DISC_THREADS;
688                 }
689
690                 /* FLOGI failure */
691                 lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
692                                  "0100 FLOGI failure Data: x%x x%x "
693                                  "x%x\n",
694                                  irsp->ulpStatus, irsp->un.ulpWord[4],
695                                  irsp->ulpTimeout);
696                 goto flogifail;
697         }
698
699         /*
700          * The FLogI succeeded.  Sync the data for the CPU before
701          * accessing it.
702          */
703         prsp = list_get_first(&pcmd->list, struct lpfc_dmabuf, list);
704
705         sp = prsp->virt + sizeof(uint32_t);
706
707         /* FLOGI completes successfully */
708         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
709                          "0101 FLOGI completes sucessfully "
710                          "Data: x%x x%x x%x x%x\n",
711                          irsp->un.ulpWord[4], sp->cmn.e_d_tov,
712                          sp->cmn.w2.r_a_tov, sp->cmn.edtovResolution);
713
714         if (vport->port_state == LPFC_FLOGI) {
715                 /*
716                  * If Common Service Parameters indicate Nport
717                  * we are point to point, if Fport we are Fabric.
718                  */
719                 if (sp->cmn.fPort)
720                         rc = lpfc_cmpl_els_flogi_fabric(vport, ndlp, sp, irsp);
721                 else
722                         rc = lpfc_cmpl_els_flogi_nport(vport, ndlp, sp);
723
724                 if (!rc)
725                         goto out;
726         }
727
728 flogifail:
729         lpfc_nlp_put(ndlp);
730
731         if (!lpfc_error_lost_link(irsp)) {
732                 /* FLOGI failed, so just use loop map to make discovery list */
733                 lpfc_disc_list_loopmap(vport);
734
735                 /* Start discovery */
736                 lpfc_disc_start(vport);
737         } else if (((irsp->ulpStatus != IOSTAT_LOCAL_REJECT) ||
738                         ((irsp->un.ulpWord[4] != IOERR_SLI_ABORTED) &&
739                         (irsp->un.ulpWord[4] != IOERR_SLI_DOWN))) &&
740                         (phba->link_state != LPFC_CLEAR_LA)) {
741                 /* If FLOGI failed enable link interrupt. */
742                 lpfc_issue_clear_la(phba, vport);
743         }
744 out:
745         lpfc_els_free_iocb(phba, cmdiocb);
746 }
747
748 /**
749  * lpfc_issue_els_flogi: Issue an flogi iocb command for a vport.
750  * @vport: pointer to a host virtual N_Port data structure.
751  * @ndlp: pointer to a node-list data structure.
752  * @retry: number of retries to the command IOCB.
753  *
754  * This routine issues a Fabric Login (FLOGI) Request ELS command
755  * for a @vport. The initiator service parameters are put into the payload
756  * of the FLOGI Request IOCB and the top-level callback function pointer
757  * to lpfc_cmpl_els_flogi() routine is put to the IOCB completion callback
758  * function field. The lpfc_issue_fabric_iocb routine is invoked to send
759  * out FLOGI ELS command with one outstanding fabric IOCB at a time.
760  *
761  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
762  * will be incremented by 1 for holding the ndlp and the reference to ndlp
763  * will be stored into the context1 field of the IOCB for the completion
764  * callback function to the FLOGI ELS command.
765  *
766  * Return code
767  *   0 - successfully issued flogi iocb for @vport
768  *   1 - failed to issue flogi iocb for @vport
769  **/
770 static int
771 lpfc_issue_els_flogi(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
772                      uint8_t retry)
773 {
774         struct lpfc_hba  *phba = vport->phba;
775         struct serv_parm *sp;
776         IOCB_t *icmd;
777         struct lpfc_iocbq *elsiocb;
778         struct lpfc_sli_ring *pring;
779         uint8_t *pcmd;
780         uint16_t cmdsize;
781         uint32_t tmo;
782         int rc;
783
784         pring = &phba->sli.ring[LPFC_ELS_RING];
785
786         cmdsize = (sizeof(uint32_t) + sizeof(struct serv_parm));
787         elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
788                                      ndlp->nlp_DID, ELS_CMD_FLOGI);
789
790         if (!elsiocb)
791                 return 1;
792
793         icmd = &elsiocb->iocb;
794         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
795
796         /* For FLOGI request, remainder of payload is service parameters */
797         *((uint32_t *) (pcmd)) = ELS_CMD_FLOGI;
798         pcmd += sizeof(uint32_t);
799         memcpy(pcmd, &vport->fc_sparam, sizeof(struct serv_parm));
800         sp = (struct serv_parm *) pcmd;
801
802         /* Setup CSPs accordingly for Fabric */
803         sp->cmn.e_d_tov = 0;
804         sp->cmn.w2.r_a_tov = 0;
805         sp->cls1.classValid = 0;
806         sp->cls2.seqDelivery = 1;
807         sp->cls3.seqDelivery = 1;
808         if (sp->cmn.fcphLow < FC_PH3)
809                 sp->cmn.fcphLow = FC_PH3;
810         if (sp->cmn.fcphHigh < FC_PH3)
811                 sp->cmn.fcphHigh = FC_PH3;
812
813         if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) {
814                 sp->cmn.request_multiple_Nport = 1;
815
816                 /* For FLOGI, Let FLOGI rsp set the NPortID for VPI 0 */
817                 icmd->ulpCt_h = 1;
818                 icmd->ulpCt_l = 0;
819         }
820
821         if (phba->fc_topology != TOPOLOGY_LOOP) {
822                 icmd->un.elsreq64.myID = 0;
823                 icmd->un.elsreq64.fl = 1;
824         }
825
826         tmo = phba->fc_ratov;
827         phba->fc_ratov = LPFC_DISC_FLOGI_TMO;
828         lpfc_set_disctmo(vport);
829         phba->fc_ratov = tmo;
830
831         phba->fc_stat.elsXmitFLOGI++;
832         elsiocb->iocb_cmpl = lpfc_cmpl_els_flogi;
833
834         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
835                 "Issue FLOGI:     opt:x%x",
836                 phba->sli3_options, 0, 0);
837
838         rc = lpfc_issue_fabric_iocb(phba, elsiocb);
839         if (rc == IOCB_ERROR) {
840                 lpfc_els_free_iocb(phba, elsiocb);
841                 return 1;
842         }
843         return 0;
844 }
845
846 /**
847  * lpfc_els_abort_flogi: Abort all outstanding flogi iocbs.
848  * @phba: pointer to lpfc hba data structure.
849  *
850  * This routine aborts all the outstanding Fabric Login (FLOGI) IOCBs
851  * with a @phba. This routine walks all the outstanding IOCBs on the txcmplq
852  * list and issues an abort IOCB commond on each outstanding IOCB that
853  * contains a active Fabric_DID ndlp. Note that this function is to issue
854  * the abort IOCB command on all the outstanding IOCBs, thus when this
855  * function returns, it does not guarantee all the IOCBs are actually aborted.
856  *
857  * Return code
858  *   0 - Sucessfully issued abort iocb on all outstanding flogis (Always 0)
859  **/
860 int
861 lpfc_els_abort_flogi(struct lpfc_hba *phba)
862 {
863         struct lpfc_sli_ring *pring;
864         struct lpfc_iocbq *iocb, *next_iocb;
865         struct lpfc_nodelist *ndlp;
866         IOCB_t *icmd;
867
868         /* Abort outstanding I/O on NPort <nlp_DID> */
869         lpfc_printf_log(phba, KERN_INFO, LOG_DISCOVERY,
870                         "0201 Abort outstanding I/O on NPort x%x\n",
871                         Fabric_DID);
872
873         pring = &phba->sli.ring[LPFC_ELS_RING];
874
875         /*
876          * Check the txcmplq for an iocb that matches the nport the driver is
877          * searching for.
878          */
879         spin_lock_irq(&phba->hbalock);
880         list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq, list) {
881                 icmd = &iocb->iocb;
882                 if (icmd->ulpCommand == CMD_ELS_REQUEST64_CR &&
883                     icmd->un.elsreq64.bdl.ulpIoTag32) {
884                         ndlp = (struct lpfc_nodelist *)(iocb->context1);
885                         if (ndlp && NLP_CHK_NODE_ACT(ndlp) &&
886                             (ndlp->nlp_DID == Fabric_DID))
887                                 lpfc_sli_issue_abort_iotag(phba, pring, iocb);
888                 }
889         }
890         spin_unlock_irq(&phba->hbalock);
891
892         return 0;
893 }
894
895 /**
896  * lpfc_initial_flogi: Issue an initial fabric login for a vport.
897  * @vport: pointer to a host virtual N_Port data structure.
898  *
899  * This routine issues an initial Fabric Login (FLOGI) for the @vport
900  * specified. It first searches the ndlp with the Fabric_DID (0xfffffe) from
901  * the @vport's ndlp list. If no such ndlp found, it will create an ndlp and
902  * put it into the @vport's ndlp list. If an inactive ndlp found on the list,
903  * it will just be enabled and made active. The lpfc_issue_els_flogi() routine
904  * is then invoked with the @vport and the ndlp to perform the FLOGI for the
905  * @vport.
906  *
907  * Return code
908  *   0 - failed to issue initial flogi for @vport
909  *   1 - successfully issued initial flogi for @vport
910  **/
911 int
912 lpfc_initial_flogi(struct lpfc_vport *vport)
913 {
914         struct lpfc_hba *phba = vport->phba;
915         struct lpfc_nodelist *ndlp;
916
917         vport->port_state = LPFC_FLOGI;
918         lpfc_set_disctmo(vport);
919
920         /* First look for the Fabric ndlp */
921         ndlp = lpfc_findnode_did(vport, Fabric_DID);
922         if (!ndlp) {
923                 /* Cannot find existing Fabric ndlp, so allocate a new one */
924                 ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_KERNEL);
925                 if (!ndlp)
926                         return 0;
927                 lpfc_nlp_init(vport, ndlp, Fabric_DID);
928                 /* Put ndlp onto node list */
929                 lpfc_enqueue_node(vport, ndlp);
930         } else if (!NLP_CHK_NODE_ACT(ndlp)) {
931                 /* re-setup ndlp without removing from node list */
932                 ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
933                 if (!ndlp)
934                         return 0;
935         }
936
937         if (lpfc_issue_els_flogi(vport, ndlp, 0))
938                 /* This decrement of reference count to node shall kick off
939                  * the release of the node.
940                  */
941                 lpfc_nlp_put(ndlp);
942
943         return 1;
944 }
945
946 /**
947  * lpfc_initial_fdisc: Issue an initial fabric discovery for a vport.
948  * @vport: pointer to a host virtual N_Port data structure.
949  *
950  * This routine issues an initial Fabric Discover (FDISC) for the @vport
951  * specified. It first searches the ndlp with the Fabric_DID (0xfffffe) from
952  * the @vport's ndlp list. If no such ndlp found, it will create an ndlp and
953  * put it into the @vport's ndlp list. If an inactive ndlp found on the list,
954  * it will just be enabled and made active. The lpfc_issue_els_fdisc() routine
955  * is then invoked with the @vport and the ndlp to perform the FDISC for the
956  * @vport.
957  *
958  * Return code
959  *   0 - failed to issue initial fdisc for @vport
960  *   1 - successfully issued initial fdisc for @vport
961  **/
962 int
963 lpfc_initial_fdisc(struct lpfc_vport *vport)
964 {
965         struct lpfc_hba *phba = vport->phba;
966         struct lpfc_nodelist *ndlp;
967
968         /* First look for the Fabric ndlp */
969         ndlp = lpfc_findnode_did(vport, Fabric_DID);
970         if (!ndlp) {
971                 /* Cannot find existing Fabric ndlp, so allocate a new one */
972                 ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_KERNEL);
973                 if (!ndlp)
974                         return 0;
975                 lpfc_nlp_init(vport, ndlp, Fabric_DID);
976                 /* Put ndlp onto node list */
977                 lpfc_enqueue_node(vport, ndlp);
978         } else if (!NLP_CHK_NODE_ACT(ndlp)) {
979                 /* re-setup ndlp without removing from node list */
980                 ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
981                 if (!ndlp)
982                         return 0;
983         }
984
985         if (lpfc_issue_els_fdisc(vport, ndlp, 0)) {
986                 /* decrement node reference count to trigger the release of
987                  * the node.
988                  */
989                 lpfc_nlp_put(ndlp);
990                 return 0;
991         }
992         return 1;
993 }
994
995 /**
996  * lpfc_more_plogi: Check and issue remaining plogis for a vport.
997  * @vport: pointer to a host virtual N_Port data structure.
998  *
999  * This routine checks whether there are more remaining Port Logins
1000  * (PLOGI) to be issued for the @vport. If so, it will invoke the routine
1001  * lpfc_els_disc_plogi() to go through the Node Port Recovery (NPR) nodes
1002  * to issue ELS PLOGIs up to the configured discover threads with the
1003  * @vport (@vport->cfg_discovery_threads). The function also decrement
1004  * the @vport's num_disc_node by 1 if it is not already 0.
1005  **/
1006 void
1007 lpfc_more_plogi(struct lpfc_vport *vport)
1008 {
1009         int sentplogi;
1010
1011         if (vport->num_disc_nodes)
1012                 vport->num_disc_nodes--;
1013
1014         /* Continue discovery with <num_disc_nodes> PLOGIs to go */
1015         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
1016                          "0232 Continue discovery with %d PLOGIs to go "
1017                          "Data: x%x x%x x%x\n",
1018                          vport->num_disc_nodes, vport->fc_plogi_cnt,
1019                          vport->fc_flag, vport->port_state);
1020         /* Check to see if there are more PLOGIs to be sent */
1021         if (vport->fc_flag & FC_NLP_MORE)
1022                 /* go thru NPR nodes and issue any remaining ELS PLOGIs */
1023                 sentplogi = lpfc_els_disc_plogi(vport);
1024
1025         return;
1026 }
1027
1028 /**
1029  * lpfc_plogi_confirm_nport: Confirm pologi wwpn matches stored ndlp.
1030  * @phba: pointer to lpfc hba data structure.
1031  * @prsp: pointer to response IOCB payload.
1032  * @ndlp: pointer to a node-list data structure.
1033  *
1034  * This routine checks and indicates whether the WWPN of an N_Port, retrieved
1035  * from a PLOGI, matches the WWPN that is stored in the @ndlp for that N_POrt.
1036  * The following cases are considered N_Port confirmed:
1037  * 1) The N_Port is a Fabric ndlp; 2) The @ndlp is on vport list and matches
1038  * the WWPN of the N_Port logged into; 3) The @ndlp is not on vport list but
1039  * it does not have WWPN assigned either. If the WWPN is confirmed, the
1040  * pointer to the @ndlp will be returned. If the WWPN is not confirmed:
1041  * 1) if there is a node on vport list other than the @ndlp with the same
1042  * WWPN of the N_Port PLOGI logged into, the lpfc_unreg_rpi() will be invoked
1043  * on that node to release the RPI associated with the node; 2) if there is
1044  * no node found on vport list with the same WWPN of the N_Port PLOGI logged
1045  * into, a new node shall be allocated (or activated). In either case, the
1046  * parameters of the @ndlp shall be copied to the new_ndlp, the @ndlp shall
1047  * be released and the new_ndlp shall be put on to the vport node list and
1048  * its pointer returned as the confirmed node.
1049  *
1050  * Note that before the @ndlp got "released", the keepDID from not-matching
1051  * or inactive "new_ndlp" on the vport node list is assigned to the nlp_DID
1052  * of the @ndlp. This is because the release of @ndlp is actually to put it
1053  * into an inactive state on the vport node list and the vport node list
1054  * management algorithm does not allow two node with a same DID.
1055  *
1056  * Return code
1057  *   pointer to the PLOGI N_Port @ndlp
1058  **/
1059 static struct lpfc_nodelist *
1060 lpfc_plogi_confirm_nport(struct lpfc_hba *phba, uint32_t *prsp,
1061                          struct lpfc_nodelist *ndlp)
1062 {
1063         struct lpfc_vport    *vport = ndlp->vport;
1064         struct lpfc_nodelist *new_ndlp;
1065         struct lpfc_rport_data *rdata;
1066         struct fc_rport *rport;
1067         struct serv_parm *sp;
1068         uint8_t  name[sizeof(struct lpfc_name)];
1069         uint32_t rc, keepDID = 0;
1070
1071         /* Fabric nodes can have the same WWPN so we don't bother searching
1072          * by WWPN.  Just return the ndlp that was given to us.
1073          */
1074         if (ndlp->nlp_type & NLP_FABRIC)
1075                 return ndlp;
1076
1077         sp = (struct serv_parm *) ((uint8_t *) prsp + sizeof(uint32_t));
1078         memset(name, 0, sizeof(struct lpfc_name));
1079
1080         /* Now we find out if the NPort we are logging into, matches the WWPN
1081          * we have for that ndlp. If not, we have some work to do.
1082          */
1083         new_ndlp = lpfc_findnode_wwpn(vport, &sp->portName);
1084
1085         if (new_ndlp == ndlp && NLP_CHK_NODE_ACT(new_ndlp))
1086                 return ndlp;
1087
1088         if (!new_ndlp) {
1089                 rc = memcmp(&ndlp->nlp_portname, name,
1090                             sizeof(struct lpfc_name));
1091                 if (!rc)
1092                         return ndlp;
1093                 new_ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_ATOMIC);
1094                 if (!new_ndlp)
1095                         return ndlp;
1096                 lpfc_nlp_init(vport, new_ndlp, ndlp->nlp_DID);
1097         } else if (!NLP_CHK_NODE_ACT(new_ndlp)) {
1098                 rc = memcmp(&ndlp->nlp_portname, name,
1099                             sizeof(struct lpfc_name));
1100                 if (!rc)
1101                         return ndlp;
1102                 new_ndlp = lpfc_enable_node(vport, new_ndlp,
1103                                                 NLP_STE_UNUSED_NODE);
1104                 if (!new_ndlp)
1105                         return ndlp;
1106                 keepDID = new_ndlp->nlp_DID;
1107         } else
1108                 keepDID = new_ndlp->nlp_DID;
1109
1110         lpfc_unreg_rpi(vport, new_ndlp);
1111         new_ndlp->nlp_DID = ndlp->nlp_DID;
1112         new_ndlp->nlp_prev_state = ndlp->nlp_prev_state;
1113
1114         if (ndlp->nlp_flag & NLP_NPR_2B_DISC)
1115                 new_ndlp->nlp_flag |= NLP_NPR_2B_DISC;
1116         ndlp->nlp_flag &= ~NLP_NPR_2B_DISC;
1117
1118         /* Set state will put new_ndlp on to node list if not already done */
1119         lpfc_nlp_set_state(vport, new_ndlp, ndlp->nlp_state);
1120
1121         /* Move this back to NPR state */
1122         if (memcmp(&ndlp->nlp_portname, name, sizeof(struct lpfc_name)) == 0) {
1123                 /* The new_ndlp is replacing ndlp totally, so we need
1124                  * to put ndlp on UNUSED list and try to free it.
1125                  */
1126
1127                 /* Fix up the rport accordingly */
1128                 rport =  ndlp->rport;
1129                 if (rport) {
1130                         rdata = rport->dd_data;
1131                         if (rdata->pnode == ndlp) {
1132                                 lpfc_nlp_put(ndlp);
1133                                 ndlp->rport = NULL;
1134                                 rdata->pnode = lpfc_nlp_get(new_ndlp);
1135                                 new_ndlp->rport = rport;
1136                         }
1137                         new_ndlp->nlp_type = ndlp->nlp_type;
1138                 }
1139                 /* We shall actually free the ndlp with both nlp_DID and
1140                  * nlp_portname fields equals 0 to avoid any ndlp on the
1141                  * nodelist never to be used.
1142                  */
1143                 if (ndlp->nlp_DID == 0) {
1144                         spin_lock_irq(&phba->ndlp_lock);
1145                         NLP_SET_FREE_REQ(ndlp);
1146                         spin_unlock_irq(&phba->ndlp_lock);
1147                 }
1148
1149                 /* Two ndlps cannot have the same did on the nodelist */
1150                 ndlp->nlp_DID = keepDID;
1151                 lpfc_drop_node(vport, ndlp);
1152         }
1153         else {
1154                 lpfc_unreg_rpi(vport, ndlp);
1155                 /* Two ndlps cannot have the same did */
1156                 ndlp->nlp_DID = keepDID;
1157                 lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
1158         }
1159         return new_ndlp;
1160 }
1161
1162 /**
1163  * lpfc_end_rscn: Check and handle more rscn for a vport.
1164  * @vport: pointer to a host virtual N_Port data structure.
1165  *
1166  * This routine checks whether more Registration State Change
1167  * Notifications (RSCNs) came in while the discovery state machine was in
1168  * the FC_RSCN_MODE. If so, the lpfc_els_handle_rscn() routine will be
1169  * invoked to handle the additional RSCNs for the @vport. Otherwise, the
1170  * FC_RSCN_MODE bit will be cleared with the @vport to mark as the end of
1171  * handling the RSCNs.
1172  **/
1173 void
1174 lpfc_end_rscn(struct lpfc_vport *vport)
1175 {
1176         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1177
1178         if (vport->fc_flag & FC_RSCN_MODE) {
1179                 /*
1180                  * Check to see if more RSCNs came in while we were
1181                  * processing this one.
1182                  */
1183                 if (vport->fc_rscn_id_cnt ||
1184                     (vport->fc_flag & FC_RSCN_DISCOVERY) != 0)
1185                         lpfc_els_handle_rscn(vport);
1186                 else {
1187                         spin_lock_irq(shost->host_lock);
1188                         vport->fc_flag &= ~FC_RSCN_MODE;
1189                         spin_unlock_irq(shost->host_lock);
1190                 }
1191         }
1192 }
1193
1194 /**
1195  * lpfc_cmpl_els_plogi: Completion callback function for plogi.
1196  * @phba: pointer to lpfc hba data structure.
1197  * @cmdiocb: pointer to lpfc command iocb data structure.
1198  * @rspiocb: pointer to lpfc response iocb data structure.
1199  *
1200  * This routine is the completion callback function for issuing the Port
1201  * Login (PLOGI) command. For PLOGI completion, there must be an active
1202  * ndlp on the vport node list that matches the remote node ID from the
1203  * PLOGI reponse IOCB. If such ndlp does not exist, the PLOGI is simply
1204  * ignored and command IOCB released. The PLOGI response IOCB status is
1205  * checked for error conditons. If there is error status reported, PLOGI
1206  * retry shall be attempted by invoking the lpfc_els_retry() routine.
1207  * Otherwise, the lpfc_plogi_confirm_nport() routine shall be invoked on
1208  * the ndlp and the NLP_EVT_CMPL_PLOGI state to the Discover State Machine
1209  * (DSM) is set for this PLOGI completion. Finally, it checks whether
1210  * there are additional N_Port nodes with the vport that need to perform
1211  * PLOGI. If so, the lpfc_more_plogi() routine is invoked to issue addition
1212  * PLOGIs.
1213  **/
1214 static void
1215 lpfc_cmpl_els_plogi(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
1216                     struct lpfc_iocbq *rspiocb)
1217 {
1218         struct lpfc_vport *vport = cmdiocb->vport;
1219         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
1220         IOCB_t *irsp;
1221         struct lpfc_nodelist *ndlp;
1222         struct lpfc_dmabuf *prsp;
1223         int disc, rc, did, type;
1224
1225         /* we pass cmdiocb to state machine which needs rspiocb as well */
1226         cmdiocb->context_un.rsp_iocb = rspiocb;
1227
1228         irsp = &rspiocb->iocb;
1229         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1230                 "PLOGI cmpl:      status:x%x/x%x did:x%x",
1231                 irsp->ulpStatus, irsp->un.ulpWord[4],
1232                 irsp->un.elsreq64.remoteID);
1233
1234         ndlp = lpfc_findnode_did(vport, irsp->un.elsreq64.remoteID);
1235         if (!ndlp || !NLP_CHK_NODE_ACT(ndlp)) {
1236                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
1237                                  "0136 PLOGI completes to NPort x%x "
1238                                  "with no ndlp. Data: x%x x%x x%x\n",
1239                                  irsp->un.elsreq64.remoteID,
1240                                  irsp->ulpStatus, irsp->un.ulpWord[4],
1241                                  irsp->ulpIoTag);
1242                 goto out;
1243         }
1244
1245         /* Since ndlp can be freed in the disc state machine, note if this node
1246          * is being used during discovery.
1247          */
1248         spin_lock_irq(shost->host_lock);
1249         disc = (ndlp->nlp_flag & NLP_NPR_2B_DISC);
1250         ndlp->nlp_flag &= ~NLP_NPR_2B_DISC;
1251         spin_unlock_irq(shost->host_lock);
1252         rc   = 0;
1253
1254         /* PLOGI completes to NPort <nlp_DID> */
1255         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
1256                          "0102 PLOGI completes to NPort x%x "
1257                          "Data: x%x x%x x%x x%x x%x\n",
1258                          ndlp->nlp_DID, irsp->ulpStatus, irsp->un.ulpWord[4],
1259                          irsp->ulpTimeout, disc, vport->num_disc_nodes);
1260         /* Check to see if link went down during discovery */
1261         if (lpfc_els_chk_latt(vport)) {
1262                 spin_lock_irq(shost->host_lock);
1263                 ndlp->nlp_flag |= NLP_NPR_2B_DISC;
1264                 spin_unlock_irq(shost->host_lock);
1265                 goto out;
1266         }
1267
1268         /* ndlp could be freed in DSM, save these values now */
1269         type = ndlp->nlp_type;
1270         did = ndlp->nlp_DID;
1271
1272         if (irsp->ulpStatus) {
1273                 /* Check for retry */
1274                 if (lpfc_els_retry(phba, cmdiocb, rspiocb)) {
1275                         /* ELS command is being retried */
1276                         if (disc) {
1277                                 spin_lock_irq(shost->host_lock);
1278                                 ndlp->nlp_flag |= NLP_NPR_2B_DISC;
1279                                 spin_unlock_irq(shost->host_lock);
1280                         }
1281                         goto out;
1282                 }
1283                 /* PLOGI failed */
1284                 /* Do not call DSM for lpfc_els_abort'ed ELS cmds */
1285                 if (lpfc_error_lost_link(irsp))
1286                         rc = NLP_STE_FREED_NODE;
1287                 else
1288                         rc = lpfc_disc_state_machine(vport, ndlp, cmdiocb,
1289                                                      NLP_EVT_CMPL_PLOGI);
1290         } else {
1291                 /* Good status, call state machine */
1292                 prsp = list_entry(((struct lpfc_dmabuf *)
1293                                    cmdiocb->context2)->list.next,
1294                                   struct lpfc_dmabuf, list);
1295                 ndlp = lpfc_plogi_confirm_nport(phba, prsp->virt, ndlp);
1296                 rc = lpfc_disc_state_machine(vport, ndlp, cmdiocb,
1297                                              NLP_EVT_CMPL_PLOGI);
1298         }
1299
1300         if (disc && vport->num_disc_nodes) {
1301                 /* Check to see if there are more PLOGIs to be sent */
1302                 lpfc_more_plogi(vport);
1303
1304                 if (vport->num_disc_nodes == 0) {
1305                         spin_lock_irq(shost->host_lock);
1306                         vport->fc_flag &= ~FC_NDISC_ACTIVE;
1307                         spin_unlock_irq(shost->host_lock);
1308
1309                         lpfc_can_disctmo(vport);
1310                         lpfc_end_rscn(vport);
1311                 }
1312         }
1313
1314 out:
1315         lpfc_els_free_iocb(phba, cmdiocb);
1316         return;
1317 }
1318
1319 /**
1320  * lpfc_issue_els_plogi: Issue an plogi iocb command for a vport.
1321  * @vport: pointer to a host virtual N_Port data structure.
1322  * @did: destination port identifier.
1323  * @retry: number of retries to the command IOCB.
1324  *
1325  * This routine issues a Port Login (PLOGI) command to a remote N_Port
1326  * (with the @did) for a @vport. Before issuing a PLOGI to a remote N_Port,
1327  * the ndlp with the remote N_Port DID must exist on the @vport's ndlp list.
1328  * This routine constructs the proper feilds of the PLOGI IOCB and invokes
1329  * the lpfc_sli_issue_iocb() routine to send out PLOGI ELS command.
1330  *
1331  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
1332  * will be incremented by 1 for holding the ndlp and the reference to ndlp
1333  * will be stored into the context1 field of the IOCB for the completion
1334  * callback function to the PLOGI ELS command.
1335  *
1336  * Return code
1337  *   0 - Successfully issued a plogi for @vport
1338  *   1 - failed to issue a plogi for @vport
1339  **/
1340 int
1341 lpfc_issue_els_plogi(struct lpfc_vport *vport, uint32_t did, uint8_t retry)
1342 {
1343         struct lpfc_hba  *phba = vport->phba;
1344         struct serv_parm *sp;
1345         IOCB_t *icmd;
1346         struct lpfc_nodelist *ndlp;
1347         struct lpfc_iocbq *elsiocb;
1348         struct lpfc_sli_ring *pring;
1349         struct lpfc_sli *psli;
1350         uint8_t *pcmd;
1351         uint16_t cmdsize;
1352         int ret;
1353
1354         psli = &phba->sli;
1355         pring = &psli->ring[LPFC_ELS_RING];     /* ELS ring */
1356
1357         ndlp = lpfc_findnode_did(vport, did);
1358         if (ndlp && !NLP_CHK_NODE_ACT(ndlp))
1359                 ndlp = NULL;
1360
1361         /* If ndlp is not NULL, we will bump the reference count on it */
1362         cmdsize = (sizeof(uint32_t) + sizeof(struct serv_parm));
1363         elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp, did,
1364                                      ELS_CMD_PLOGI);
1365         if (!elsiocb)
1366                 return 1;
1367
1368         icmd = &elsiocb->iocb;
1369         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
1370
1371         /* For PLOGI request, remainder of payload is service parameters */
1372         *((uint32_t *) (pcmd)) = ELS_CMD_PLOGI;
1373         pcmd += sizeof(uint32_t);
1374         memcpy(pcmd, &vport->fc_sparam, sizeof(struct serv_parm));
1375         sp = (struct serv_parm *) pcmd;
1376
1377         if (sp->cmn.fcphLow < FC_PH_4_3)
1378                 sp->cmn.fcphLow = FC_PH_4_3;
1379
1380         if (sp->cmn.fcphHigh < FC_PH3)
1381                 sp->cmn.fcphHigh = FC_PH3;
1382
1383         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1384                 "Issue PLOGI:     did:x%x",
1385                 did, 0, 0);
1386
1387         phba->fc_stat.elsXmitPLOGI++;
1388         elsiocb->iocb_cmpl = lpfc_cmpl_els_plogi;
1389         ret = lpfc_sli_issue_iocb(phba, pring, elsiocb, 0);
1390
1391         if (ret == IOCB_ERROR) {
1392                 lpfc_els_free_iocb(phba, elsiocb);
1393                 return 1;
1394         }
1395         return 0;
1396 }
1397
1398 /**
1399  * lpfc_cmpl_els_prli: Completion callback function for prli.
1400  * @phba: pointer to lpfc hba data structure.
1401  * @cmdiocb: pointer to lpfc command iocb data structure.
1402  * @rspiocb: pointer to lpfc response iocb data structure.
1403  *
1404  * This routine is the completion callback function for a Process Login
1405  * (PRLI) ELS command. The PRLI response IOCB status is checked for error
1406  * status. If there is error status reported, PRLI retry shall be attempted
1407  * by invoking the lpfc_els_retry() routine. Otherwise, the state
1408  * NLP_EVT_CMPL_PRLI is sent to the Discover State Machine (DSM) for this
1409  * ndlp to mark the PRLI completion.
1410  **/
1411 static void
1412 lpfc_cmpl_els_prli(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
1413                    struct lpfc_iocbq *rspiocb)
1414 {
1415         struct lpfc_vport *vport = cmdiocb->vport;
1416         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
1417         IOCB_t *irsp;
1418         struct lpfc_sli *psli;
1419         struct lpfc_nodelist *ndlp;
1420
1421         psli = &phba->sli;
1422         /* we pass cmdiocb to state machine which needs rspiocb as well */
1423         cmdiocb->context_un.rsp_iocb = rspiocb;
1424
1425         irsp = &(rspiocb->iocb);
1426         ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
1427         spin_lock_irq(shost->host_lock);
1428         ndlp->nlp_flag &= ~NLP_PRLI_SND;
1429         spin_unlock_irq(shost->host_lock);
1430
1431         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1432                 "PRLI cmpl:       status:x%x/x%x did:x%x",
1433                 irsp->ulpStatus, irsp->un.ulpWord[4],
1434                 ndlp->nlp_DID);
1435         /* PRLI completes to NPort <nlp_DID> */
1436         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
1437                          "0103 PRLI completes to NPort x%x "
1438                          "Data: x%x x%x x%x x%x\n",
1439                          ndlp->nlp_DID, irsp->ulpStatus, irsp->un.ulpWord[4],
1440                          irsp->ulpTimeout, vport->num_disc_nodes);
1441
1442         vport->fc_prli_sent--;
1443         /* Check to see if link went down during discovery */
1444         if (lpfc_els_chk_latt(vport))
1445                 goto out;
1446
1447         if (irsp->ulpStatus) {
1448                 /* Check for retry */
1449                 if (lpfc_els_retry(phba, cmdiocb, rspiocb)) {
1450                         /* ELS command is being retried */
1451                         goto out;
1452                 }
1453                 /* PRLI failed */
1454                 /* Do not call DSM for lpfc_els_abort'ed ELS cmds */
1455                 if (lpfc_error_lost_link(irsp))
1456                         goto out;
1457                 else
1458                         lpfc_disc_state_machine(vport, ndlp, cmdiocb,
1459                                                 NLP_EVT_CMPL_PRLI);
1460         } else
1461                 /* Good status, call state machine */
1462                 lpfc_disc_state_machine(vport, ndlp, cmdiocb,
1463                                         NLP_EVT_CMPL_PRLI);
1464 out:
1465         lpfc_els_free_iocb(phba, cmdiocb);
1466         return;
1467 }
1468
1469 /**
1470  * lpfc_issue_els_prli: Issue a prli iocb command for a vport.
1471  * @vport: pointer to a host virtual N_Port data structure.
1472  * @ndlp: pointer to a node-list data structure.
1473  * @retry: number of retries to the command IOCB.
1474  *
1475  * This routine issues a Process Login (PRLI) ELS command for the
1476  * @vport. The PRLI service parameters are set up in the payload of the
1477  * PRLI Request command and the pointer to lpfc_cmpl_els_prli() routine
1478  * is put to the IOCB completion callback func field before invoking the
1479  * routine lpfc_sli_issue_iocb() to send out PRLI command.
1480  *
1481  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
1482  * will be incremented by 1 for holding the ndlp and the reference to ndlp
1483  * will be stored into the context1 field of the IOCB for the completion
1484  * callback function to the PRLI ELS command.
1485  *
1486  * Return code
1487  *   0 - successfully issued prli iocb command for @vport
1488  *   1 - failed to issue prli iocb command for @vport
1489  **/
1490 int
1491 lpfc_issue_els_prli(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
1492                     uint8_t retry)
1493 {
1494         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1495         struct lpfc_hba *phba = vport->phba;
1496         PRLI *npr;
1497         IOCB_t *icmd;
1498         struct lpfc_iocbq *elsiocb;
1499         struct lpfc_sli_ring *pring;
1500         struct lpfc_sli *psli;
1501         uint8_t *pcmd;
1502         uint16_t cmdsize;
1503
1504         psli = &phba->sli;
1505         pring = &psli->ring[LPFC_ELS_RING];     /* ELS ring */
1506
1507         cmdsize = (sizeof(uint32_t) + sizeof(PRLI));
1508         elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
1509                                      ndlp->nlp_DID, ELS_CMD_PRLI);
1510         if (!elsiocb)
1511                 return 1;
1512
1513         icmd = &elsiocb->iocb;
1514         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
1515
1516         /* For PRLI request, remainder of payload is service parameters */
1517         memset(pcmd, 0, (sizeof(PRLI) + sizeof(uint32_t)));
1518         *((uint32_t *) (pcmd)) = ELS_CMD_PRLI;
1519         pcmd += sizeof(uint32_t);
1520
1521         /* For PRLI, remainder of payload is PRLI parameter page */
1522         npr = (PRLI *) pcmd;
1523         /*
1524          * If our firmware version is 3.20 or later,
1525          * set the following bits for FC-TAPE support.
1526          */
1527         if (phba->vpd.rev.feaLevelHigh >= 0x02) {
1528                 npr->ConfmComplAllowed = 1;
1529                 npr->Retry = 1;
1530                 npr->TaskRetryIdReq = 1;
1531         }
1532         npr->estabImagePair = 1;
1533         npr->readXferRdyDis = 1;
1534
1535         /* For FCP support */
1536         npr->prliType = PRLI_FCP_TYPE;
1537         npr->initiatorFunc = 1;
1538
1539         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1540                 "Issue PRLI:      did:x%x",
1541                 ndlp->nlp_DID, 0, 0);
1542
1543         phba->fc_stat.elsXmitPRLI++;
1544         elsiocb->iocb_cmpl = lpfc_cmpl_els_prli;
1545         spin_lock_irq(shost->host_lock);
1546         ndlp->nlp_flag |= NLP_PRLI_SND;
1547         spin_unlock_irq(shost->host_lock);
1548         if (lpfc_sli_issue_iocb(phba, pring, elsiocb, 0) == IOCB_ERROR) {
1549                 spin_lock_irq(shost->host_lock);
1550                 ndlp->nlp_flag &= ~NLP_PRLI_SND;
1551                 spin_unlock_irq(shost->host_lock);
1552                 lpfc_els_free_iocb(phba, elsiocb);
1553                 return 1;
1554         }
1555         vport->fc_prli_sent++;
1556         return 0;
1557 }
1558
1559 /**
1560  * lpfc_rscn_disc: Perform rscn discovery for a vport.
1561  * @vport: pointer to a host virtual N_Port data structure.
1562  *
1563  * This routine performs Registration State Change Notification (RSCN)
1564  * discovery for a @vport. If the @vport's node port recovery count is not
1565  * zero, it will invoke the lpfc_els_disc_plogi() to perform PLOGI for all
1566  * the nodes that need recovery. If none of the PLOGI were needed through
1567  * the lpfc_els_disc_plogi() routine, the lpfc_end_rscn() routine shall be
1568  * invoked to check and handle possible more RSCN came in during the period
1569  * of processing the current ones.
1570  **/
1571 static void
1572 lpfc_rscn_disc(struct lpfc_vport *vport)
1573 {
1574         lpfc_can_disctmo(vport);
1575
1576         /* RSCN discovery */
1577         /* go thru NPR nodes and issue ELS PLOGIs */
1578         if (vport->fc_npr_cnt)
1579                 if (lpfc_els_disc_plogi(vport))
1580                         return;
1581
1582         lpfc_end_rscn(vport);
1583 }
1584
1585 /**
1586  * lpfc_adisc_done: Complete the adisc phase of discovery.
1587  * @vport: pointer to lpfc_vport hba data structure that finished all ADISCs.
1588  *
1589  * This function is called when the final ADISC is completed during discovery.
1590  * This function handles clearing link attention or issuing reg_vpi depending
1591  * on whether npiv is enabled. This function also kicks off the PLOGI phase of
1592  * discovery.
1593  * This function is called with no locks held.
1594  **/
1595 static void
1596 lpfc_adisc_done(struct lpfc_vport *vport)
1597 {
1598         struct Scsi_Host   *shost = lpfc_shost_from_vport(vport);
1599         struct lpfc_hba   *phba = vport->phba;
1600
1601         /*
1602          * For NPIV, cmpl_reg_vpi will set port_state to READY,
1603          * and continue discovery.
1604          */
1605         if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
1606             !(vport->fc_flag & FC_RSCN_MODE)) {
1607                 lpfc_issue_reg_vpi(phba, vport);
1608                 return;
1609         }
1610         /*
1611         * For SLI2, we need to set port_state to READY
1612         * and continue discovery.
1613         */
1614         if (vport->port_state < LPFC_VPORT_READY) {
1615                 /* If we get here, there is nothing to ADISC */
1616                 if (vport->port_type == LPFC_PHYSICAL_PORT)
1617                         lpfc_issue_clear_la(phba, vport);
1618                 if (!(vport->fc_flag & FC_ABORT_DISCOVERY)) {
1619                         vport->num_disc_nodes = 0;
1620                         /* go thru NPR list, issue ELS PLOGIs */
1621                         if (vport->fc_npr_cnt)
1622                                 lpfc_els_disc_plogi(vport);
1623                         if (!vport->num_disc_nodes) {
1624                                 spin_lock_irq(shost->host_lock);
1625                                 vport->fc_flag &= ~FC_NDISC_ACTIVE;
1626                                 spin_unlock_irq(shost->host_lock);
1627                                 lpfc_can_disctmo(vport);
1628                                 lpfc_end_rscn(vport);
1629                         }
1630                 }
1631                 vport->port_state = LPFC_VPORT_READY;
1632         } else
1633                 lpfc_rscn_disc(vport);
1634 }
1635
1636 /**
1637  * lpfc_more_adisc: Issue more adisc as needed.
1638  * @vport: pointer to a host virtual N_Port data structure.
1639  *
1640  * This routine determines whether there are more ndlps on a @vport
1641  * node list need to have Address Discover (ADISC) issued. If so, it will
1642  * invoke the lpfc_els_disc_adisc() routine to issue ADISC on the @vport's
1643  * remaining nodes which need to have ADISC sent.
1644  **/
1645 void
1646 lpfc_more_adisc(struct lpfc_vport *vport)
1647 {
1648         int sentadisc;
1649
1650         if (vport->num_disc_nodes)
1651                 vport->num_disc_nodes--;
1652         /* Continue discovery with <num_disc_nodes> ADISCs to go */
1653         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
1654                          "0210 Continue discovery with %d ADISCs to go "
1655                          "Data: x%x x%x x%x\n",
1656                          vport->num_disc_nodes, vport->fc_adisc_cnt,
1657                          vport->fc_flag, vport->port_state);
1658         /* Check to see if there are more ADISCs to be sent */
1659         if (vport->fc_flag & FC_NLP_MORE) {
1660                 lpfc_set_disctmo(vport);
1661                 /* go thru NPR nodes and issue any remaining ELS ADISCs */
1662                 sentadisc = lpfc_els_disc_adisc(vport);
1663         }
1664         if (!vport->num_disc_nodes)
1665                 lpfc_adisc_done(vport);
1666         return;
1667 }
1668
1669 /**
1670  * lpfc_cmpl_els_adisc: Completion callback function for adisc.
1671  * @phba: pointer to lpfc hba data structure.
1672  * @cmdiocb: pointer to lpfc command iocb data structure.
1673  * @rspiocb: pointer to lpfc response iocb data structure.
1674  *
1675  * This routine is the completion function for issuing the Address Discover
1676  * (ADISC) command. It first checks to see whether link went down during
1677  * the discovery process. If so, the node will be marked as node port
1678  * recovery for issuing discover IOCB by the link attention handler and
1679  * exit. Otherwise, the response status is checked. If error was reported
1680  * in the response status, the ADISC command shall be retried by invoking
1681  * the lpfc_els_retry() routine. Otherwise, if no error was reported in
1682  * the response status, the state machine is invoked to set transition
1683  * with respect to NLP_EVT_CMPL_ADISC event.
1684  **/
1685 static void
1686 lpfc_cmpl_els_adisc(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
1687                     struct lpfc_iocbq *rspiocb)
1688 {
1689         struct lpfc_vport *vport = cmdiocb->vport;
1690         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
1691         IOCB_t *irsp;
1692         struct lpfc_nodelist *ndlp;
1693         int  disc;
1694
1695         /* we pass cmdiocb to state machine which needs rspiocb as well */
1696         cmdiocb->context_un.rsp_iocb = rspiocb;
1697
1698         irsp = &(rspiocb->iocb);
1699         ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
1700
1701         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1702                 "ADISC cmpl:      status:x%x/x%x did:x%x",
1703                 irsp->ulpStatus, irsp->un.ulpWord[4],
1704                 ndlp->nlp_DID);
1705
1706         /* Since ndlp can be freed in the disc state machine, note if this node
1707          * is being used during discovery.
1708          */
1709         spin_lock_irq(shost->host_lock);
1710         disc = (ndlp->nlp_flag & NLP_NPR_2B_DISC);
1711         ndlp->nlp_flag &= ~(NLP_ADISC_SND | NLP_NPR_2B_DISC);
1712         spin_unlock_irq(shost->host_lock);
1713         /* ADISC completes to NPort <nlp_DID> */
1714         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
1715                          "0104 ADISC completes to NPort x%x "
1716                          "Data: x%x x%x x%x x%x x%x\n",
1717                          ndlp->nlp_DID, irsp->ulpStatus, irsp->un.ulpWord[4],
1718                          irsp->ulpTimeout, disc, vport->num_disc_nodes);
1719         /* Check to see if link went down during discovery */
1720         if (lpfc_els_chk_latt(vport)) {
1721                 spin_lock_irq(shost->host_lock);
1722                 ndlp->nlp_flag |= NLP_NPR_2B_DISC;
1723                 spin_unlock_irq(shost->host_lock);
1724                 goto out;
1725         }
1726
1727         if (irsp->ulpStatus) {
1728                 /* Check for retry */
1729                 if (lpfc_els_retry(phba, cmdiocb, rspiocb)) {
1730                         /* ELS command is being retried */
1731                         if (disc) {
1732                                 spin_lock_irq(shost->host_lock);
1733                                 ndlp->nlp_flag |= NLP_NPR_2B_DISC;
1734                                 spin_unlock_irq(shost->host_lock);
1735                                 lpfc_set_disctmo(vport);
1736                         }
1737                         goto out;
1738                 }
1739                 /* ADISC failed */
1740                 /* Do not call DSM for lpfc_els_abort'ed ELS cmds */
1741                 if (!lpfc_error_lost_link(irsp))
1742                         lpfc_disc_state_machine(vport, ndlp, cmdiocb,
1743                                                 NLP_EVT_CMPL_ADISC);
1744         } else
1745                 /* Good status, call state machine */
1746                 lpfc_disc_state_machine(vport, ndlp, cmdiocb,
1747                                         NLP_EVT_CMPL_ADISC);
1748
1749         /* Check to see if there are more ADISCs to be sent */
1750         if (disc && vport->num_disc_nodes)
1751                 lpfc_more_adisc(vport);
1752 out:
1753         lpfc_els_free_iocb(phba, cmdiocb);
1754         return;
1755 }
1756
1757 /**
1758  * lpfc_issue_els_adisc: Issue an address discover iocb to an node on a vport.
1759  * @vport: pointer to a virtual N_Port data structure.
1760  * @ndlp: pointer to a node-list data structure.
1761  * @retry: number of retries to the command IOCB.
1762  *
1763  * This routine issues an Address Discover (ADISC) for an @ndlp on a
1764  * @vport. It prepares the payload of the ADISC ELS command, updates the
1765  * and states of the ndlp, and invokes the lpfc_sli_issue_iocb() routine
1766  * to issue the ADISC ELS command.
1767  *
1768  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
1769  * will be incremented by 1 for holding the ndlp and the reference to ndlp
1770  * will be stored into the context1 field of the IOCB for the completion
1771  * callback function to the ADISC ELS command.
1772  *
1773  * Return code
1774  *   0 - successfully issued adisc
1775  *   1 - failed to issue adisc
1776  **/
1777 int
1778 lpfc_issue_els_adisc(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
1779                      uint8_t retry)
1780 {
1781         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1782         struct lpfc_hba  *phba = vport->phba;
1783         ADISC *ap;
1784         IOCB_t *icmd;
1785         struct lpfc_iocbq *elsiocb;
1786         struct lpfc_sli *psli = &phba->sli;
1787         struct lpfc_sli_ring *pring = &psli->ring[LPFC_ELS_RING];
1788         uint8_t *pcmd;
1789         uint16_t cmdsize;
1790
1791         cmdsize = (sizeof(uint32_t) + sizeof(ADISC));
1792         elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
1793                                      ndlp->nlp_DID, ELS_CMD_ADISC);
1794         if (!elsiocb)
1795                 return 1;
1796
1797         icmd = &elsiocb->iocb;
1798         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
1799
1800         /* For ADISC request, remainder of payload is service parameters */
1801         *((uint32_t *) (pcmd)) = ELS_CMD_ADISC;
1802         pcmd += sizeof(uint32_t);
1803
1804         /* Fill in ADISC payload */
1805         ap = (ADISC *) pcmd;
1806         ap->hardAL_PA = phba->fc_pref_ALPA;
1807         memcpy(&ap->portName, &vport->fc_portname, sizeof(struct lpfc_name));
1808         memcpy(&ap->nodeName, &vport->fc_nodename, sizeof(struct lpfc_name));
1809         ap->DID = be32_to_cpu(vport->fc_myDID);
1810
1811         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1812                 "Issue ADISC:     did:x%x",
1813                 ndlp->nlp_DID, 0, 0);
1814
1815         phba->fc_stat.elsXmitADISC++;
1816         elsiocb->iocb_cmpl = lpfc_cmpl_els_adisc;
1817         spin_lock_irq(shost->host_lock);
1818         ndlp->nlp_flag |= NLP_ADISC_SND;
1819         spin_unlock_irq(shost->host_lock);
1820         if (lpfc_sli_issue_iocb(phba, pring, elsiocb, 0) == IOCB_ERROR) {
1821                 spin_lock_irq(shost->host_lock);
1822                 ndlp->nlp_flag &= ~NLP_ADISC_SND;
1823                 spin_unlock_irq(shost->host_lock);
1824                 lpfc_els_free_iocb(phba, elsiocb);
1825                 return 1;
1826         }
1827         return 0;
1828 }
1829
1830 /**
1831  * lpfc_cmpl_els_logo: Completion callback function for logo.
1832  * @phba: pointer to lpfc hba data structure.
1833  * @cmdiocb: pointer to lpfc command iocb data structure.
1834  * @rspiocb: pointer to lpfc response iocb data structure.
1835  *
1836  * This routine is the completion function for issuing the ELS Logout (LOGO)
1837  * command. If no error status was reported from the LOGO response, the
1838  * state machine of the associated ndlp shall be invoked for transition with
1839  * respect to NLP_EVT_CMPL_LOGO event. Otherwise, if error status was reported,
1840  * the lpfc_els_retry() routine will be invoked to retry the LOGO command.
1841  **/
1842 static void
1843 lpfc_cmpl_els_logo(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
1844                    struct lpfc_iocbq *rspiocb)
1845 {
1846         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
1847         struct lpfc_vport *vport = ndlp->vport;
1848         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
1849         IOCB_t *irsp;
1850         struct lpfc_sli *psli;
1851
1852         psli = &phba->sli;
1853         /* we pass cmdiocb to state machine which needs rspiocb as well */
1854         cmdiocb->context_un.rsp_iocb = rspiocb;
1855
1856         irsp = &(rspiocb->iocb);
1857         spin_lock_irq(shost->host_lock);
1858         ndlp->nlp_flag &= ~NLP_LOGO_SND;
1859         spin_unlock_irq(shost->host_lock);
1860
1861         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1862                 "LOGO cmpl:       status:x%x/x%x did:x%x",
1863                 irsp->ulpStatus, irsp->un.ulpWord[4],
1864                 ndlp->nlp_DID);
1865         /* LOGO completes to NPort <nlp_DID> */
1866         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
1867                          "0105 LOGO completes to NPort x%x "
1868                          "Data: x%x x%x x%x x%x\n",
1869                          ndlp->nlp_DID, irsp->ulpStatus, irsp->un.ulpWord[4],
1870                          irsp->ulpTimeout, vport->num_disc_nodes);
1871         /* Check to see if link went down during discovery */
1872         if (lpfc_els_chk_latt(vport))
1873                 goto out;
1874
1875         if (ndlp->nlp_flag & NLP_TARGET_REMOVE) {
1876                 /* NLP_EVT_DEVICE_RM should unregister the RPI
1877                  * which should abort all outstanding IOs.
1878                  */
1879                 lpfc_disc_state_machine(vport, ndlp, cmdiocb,
1880                                         NLP_EVT_DEVICE_RM);
1881                 goto out;
1882         }
1883
1884         if (irsp->ulpStatus) {
1885                 /* Check for retry */
1886                 if (lpfc_els_retry(phba, cmdiocb, rspiocb))
1887                         /* ELS command is being retried */
1888                         goto out;
1889                 /* LOGO failed */
1890                 /* Do not call DSM for lpfc_els_abort'ed ELS cmds */
1891                 if (lpfc_error_lost_link(irsp))
1892                         goto out;
1893                 else
1894                         lpfc_disc_state_machine(vport, ndlp, cmdiocb,
1895                                                 NLP_EVT_CMPL_LOGO);
1896         } else
1897                 /* Good status, call state machine.
1898                  * This will unregister the rpi if needed.
1899                  */
1900                 lpfc_disc_state_machine(vport, ndlp, cmdiocb,
1901                                         NLP_EVT_CMPL_LOGO);
1902 out:
1903         lpfc_els_free_iocb(phba, cmdiocb);
1904         return;
1905 }
1906
1907 /**
1908  * lpfc_issue_els_logo: Issue a logo to an node on a vport.
1909  * @vport: pointer to a virtual N_Port data structure.
1910  * @ndlp: pointer to a node-list data structure.
1911  * @retry: number of retries to the command IOCB.
1912  *
1913  * This routine constructs and issues an ELS Logout (LOGO) iocb command
1914  * to a remote node, referred by an @ndlp on a @vport. It constructs the
1915  * payload of the IOCB, properly sets up the @ndlp state, and invokes the
1916  * lpfc_sli_issue_iocb() routine to send out the LOGO ELS command.
1917  *
1918  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
1919  * will be incremented by 1 for holding the ndlp and the reference to ndlp
1920  * will be stored into the context1 field of the IOCB for the completion
1921  * callback function to the LOGO ELS command.
1922  *
1923  * Return code
1924  *   0 - successfully issued logo
1925  *   1 - failed to issue logo
1926  **/
1927 int
1928 lpfc_issue_els_logo(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
1929                     uint8_t retry)
1930 {
1931         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1932         struct lpfc_hba  *phba = vport->phba;
1933         IOCB_t *icmd;
1934         struct lpfc_iocbq *elsiocb;
1935         struct lpfc_sli_ring *pring;
1936         struct lpfc_sli *psli;
1937         uint8_t *pcmd;
1938         uint16_t cmdsize;
1939         int rc;
1940
1941         psli = &phba->sli;
1942         pring = &psli->ring[LPFC_ELS_RING];
1943
1944         spin_lock_irq(shost->host_lock);
1945         if (ndlp->nlp_flag & NLP_LOGO_SND) {
1946                 spin_unlock_irq(shost->host_lock);
1947                 return 0;
1948         }
1949         spin_unlock_irq(shost->host_lock);
1950
1951         cmdsize = (2 * sizeof(uint32_t)) + sizeof(struct lpfc_name);
1952         elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
1953                                      ndlp->nlp_DID, ELS_CMD_LOGO);
1954         if (!elsiocb)
1955                 return 1;
1956
1957         icmd = &elsiocb->iocb;
1958         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
1959         *((uint32_t *) (pcmd)) = ELS_CMD_LOGO;
1960         pcmd += sizeof(uint32_t);
1961
1962         /* Fill in LOGO payload */
1963         *((uint32_t *) (pcmd)) = be32_to_cpu(vport->fc_myDID);
1964         pcmd += sizeof(uint32_t);
1965         memcpy(pcmd, &vport->fc_portname, sizeof(struct lpfc_name));
1966
1967         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1968                 "Issue LOGO:      did:x%x",
1969                 ndlp->nlp_DID, 0, 0);
1970
1971         phba->fc_stat.elsXmitLOGO++;
1972         elsiocb->iocb_cmpl = lpfc_cmpl_els_logo;
1973         spin_lock_irq(shost->host_lock);
1974         ndlp->nlp_flag |= NLP_LOGO_SND;
1975         spin_unlock_irq(shost->host_lock);
1976         rc = lpfc_sli_issue_iocb(phba, pring, elsiocb, 0);
1977
1978         if (rc == IOCB_ERROR) {
1979                 spin_lock_irq(shost->host_lock);
1980                 ndlp->nlp_flag &= ~NLP_LOGO_SND;
1981                 spin_unlock_irq(shost->host_lock);
1982                 lpfc_els_free_iocb(phba, elsiocb);
1983                 return 1;
1984         }
1985         return 0;
1986 }
1987
1988 /**
1989  * lpfc_cmpl_els_cmd: Completion callback function for generic els command.
1990  * @phba: pointer to lpfc hba data structure.
1991  * @cmdiocb: pointer to lpfc command iocb data structure.
1992  * @rspiocb: pointer to lpfc response iocb data structure.
1993  *
1994  * This routine is a generic completion callback function for ELS commands.
1995  * Specifically, it is the callback function which does not need to perform
1996  * any command specific operations. It is currently used by the ELS command
1997  * issuing routines for the ELS State Change  Request (SCR),
1998  * lpfc_issue_els_scr(), and the ELS Fibre Channel Address Resolution
1999  * Protocol Response (FARPR) routine, lpfc_issue_els_farpr(). Other than
2000  * certain debug loggings, this callback function simply invokes the
2001  * lpfc_els_chk_latt() routine to check whether link went down during the
2002  * discovery process.
2003  **/
2004 static void
2005 lpfc_cmpl_els_cmd(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
2006                   struct lpfc_iocbq *rspiocb)
2007 {
2008         struct lpfc_vport *vport = cmdiocb->vport;
2009         IOCB_t *irsp;
2010
2011         irsp = &rspiocb->iocb;
2012
2013         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
2014                 "ELS cmd cmpl:    status:x%x/x%x did:x%x",
2015                 irsp->ulpStatus, irsp->un.ulpWord[4],
2016                 irsp->un.elsreq64.remoteID);
2017         /* ELS cmd tag <ulpIoTag> completes */
2018         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
2019                          "0106 ELS cmd tag x%x completes Data: x%x x%x x%x\n",
2020                          irsp->ulpIoTag, irsp->ulpStatus,
2021                          irsp->un.ulpWord[4], irsp->ulpTimeout);
2022         /* Check to see if link went down during discovery */
2023         lpfc_els_chk_latt(vport);
2024         lpfc_els_free_iocb(phba, cmdiocb);
2025         return;
2026 }
2027
2028 /**
2029  * lpfc_issue_els_scr: Issue a scr to an node on a vport.
2030  * @vport: pointer to a host virtual N_Port data structure.
2031  * @nportid: N_Port identifier to the remote node.
2032  * @retry: number of retries to the command IOCB.
2033  *
2034  * This routine issues a State Change Request (SCR) to a fabric node
2035  * on a @vport. The remote node @nportid is passed into the function. It
2036  * first search the @vport node list to find the matching ndlp. If no such
2037  * ndlp is found, a new ndlp shall be created for this (SCR) purpose. An
2038  * IOCB is allocated, payload prepared, and the lpfc_sli_issue_iocb()
2039  * routine is invoked to send the SCR IOCB.
2040  *
2041  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
2042  * will be incremented by 1 for holding the ndlp and the reference to ndlp
2043  * will be stored into the context1 field of the IOCB for the completion
2044  * callback function to the SCR ELS command.
2045  *
2046  * Return code
2047  *   0 - Successfully issued scr command
2048  *   1 - Failed to issue scr command
2049  **/
2050 int
2051 lpfc_issue_els_scr(struct lpfc_vport *vport, uint32_t nportid, uint8_t retry)
2052 {
2053         struct lpfc_hba  *phba = vport->phba;
2054         IOCB_t *icmd;
2055         struct lpfc_iocbq *elsiocb;
2056         struct lpfc_sli_ring *pring;
2057         struct lpfc_sli *psli;
2058         uint8_t *pcmd;
2059         uint16_t cmdsize;
2060         struct lpfc_nodelist *ndlp;
2061
2062         psli = &phba->sli;
2063         pring = &psli->ring[LPFC_ELS_RING];     /* ELS ring */
2064         cmdsize = (sizeof(uint32_t) + sizeof(SCR));
2065
2066         ndlp = lpfc_findnode_did(vport, nportid);
2067         if (!ndlp) {
2068                 ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_KERNEL);
2069                 if (!ndlp)
2070                         return 1;
2071                 lpfc_nlp_init(vport, ndlp, nportid);
2072                 lpfc_enqueue_node(vport, ndlp);
2073         } else if (!NLP_CHK_NODE_ACT(ndlp)) {
2074                 ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
2075                 if (!ndlp)
2076                         return 1;
2077         }
2078
2079         elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
2080                                      ndlp->nlp_DID, ELS_CMD_SCR);
2081
2082         if (!elsiocb) {
2083                 /* This will trigger the release of the node just
2084                  * allocated
2085                  */
2086                 lpfc_nlp_put(ndlp);
2087                 return 1;
2088         }
2089
2090         icmd = &elsiocb->iocb;
2091         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
2092
2093         *((uint32_t *) (pcmd)) = ELS_CMD_SCR;
2094         pcmd += sizeof(uint32_t);
2095
2096         /* For SCR, remainder of payload is SCR parameter page */
2097         memset(pcmd, 0, sizeof(SCR));
2098         ((SCR *) pcmd)->Function = SCR_FUNC_FULL;
2099
2100         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
2101                 "Issue SCR:       did:x%x",
2102                 ndlp->nlp_DID, 0, 0);
2103
2104         phba->fc_stat.elsXmitSCR++;
2105         elsiocb->iocb_cmpl = lpfc_cmpl_els_cmd;
2106         if (lpfc_sli_issue_iocb(phba, pring, elsiocb, 0) == IOCB_ERROR) {
2107                 /* The additional lpfc_nlp_put will cause the following
2108                  * lpfc_els_free_iocb routine to trigger the rlease of
2109                  * the node.
2110                  */
2111                 lpfc_nlp_put(ndlp);
2112                 lpfc_els_free_iocb(phba, elsiocb);
2113                 return 1;
2114         }
2115         /* This will cause the callback-function lpfc_cmpl_els_cmd to
2116          * trigger the release of node.
2117          */
2118         lpfc_nlp_put(ndlp);
2119         return 0;
2120 }
2121
2122 /**
2123  * lpfc_issue_els_farpr: Issue a farp to an node on a vport.
2124  * @vport: pointer to a host virtual N_Port data structure.
2125  * @nportid: N_Port identifier to the remote node.
2126  * @retry: number of retries to the command IOCB.
2127  *
2128  * This routine issues a Fibre Channel Address Resolution Response
2129  * (FARPR) to a node on a vport. The remote node N_Port identifier (@nportid)
2130  * is passed into the function. It first search the @vport node list to find
2131  * the matching ndlp. If no such ndlp is found, a new ndlp shall be created
2132  * for this (FARPR) purpose. An IOCB is allocated, payload prepared, and the
2133  * lpfc_sli_issue_iocb() routine is invoked to send the FARPR ELS command.
2134  *
2135  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
2136  * will be incremented by 1 for holding the ndlp and the reference to ndlp
2137  * will be stored into the context1 field of the IOCB for the completion
2138  * callback function to the PARPR ELS command.
2139  *
2140  * Return code
2141  *   0 - Successfully issued farpr command
2142  *   1 - Failed to issue farpr command
2143  **/
2144 static int
2145 lpfc_issue_els_farpr(struct lpfc_vport *vport, uint32_t nportid, uint8_t retry)
2146 {
2147         struct lpfc_hba  *phba = vport->phba;
2148         IOCB_t *icmd;
2149         struct lpfc_iocbq *elsiocb;
2150         struct lpfc_sli_ring *pring;
2151         struct lpfc_sli *psli;
2152         FARP *fp;
2153         uint8_t *pcmd;
2154         uint32_t *lp;
2155         uint16_t cmdsize;
2156         struct lpfc_nodelist *ondlp;
2157         struct lpfc_nodelist *ndlp;
2158
2159         psli = &phba->sli;
2160         pring = &psli->ring[LPFC_ELS_RING];     /* ELS ring */
2161         cmdsize = (sizeof(uint32_t) + sizeof(FARP));
2162
2163         ndlp = lpfc_findnode_did(vport, nportid);
2164         if (!ndlp) {
2165                 ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_KERNEL);
2166                 if (!ndlp)
2167                         return 1;
2168                 lpfc_nlp_init(vport, ndlp, nportid);
2169                 lpfc_enqueue_node(vport, ndlp);
2170         } else if (!NLP_CHK_NODE_ACT(ndlp)) {
2171                 ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
2172                 if (!ndlp)
2173                         return 1;
2174         }
2175
2176         elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp,
2177                                      ndlp->nlp_DID, ELS_CMD_RNID);
2178         if (!elsiocb) {
2179                 /* This will trigger the release of the node just
2180                  * allocated
2181                  */
2182                 lpfc_nlp_put(ndlp);
2183                 return 1;
2184         }
2185
2186         icmd = &elsiocb->iocb;
2187         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
2188
2189         *((uint32_t *) (pcmd)) = ELS_CMD_FARPR;
2190         pcmd += sizeof(uint32_t);
2191
2192         /* Fill in FARPR payload */
2193         fp = (FARP *) (pcmd);
2194         memset(fp, 0, sizeof(FARP));
2195         lp = (uint32_t *) pcmd;
2196         *lp++ = be32_to_cpu(nportid);
2197         *lp++ = be32_to_cpu(vport->fc_myDID);
2198         fp->Rflags = 0;
2199         fp->Mflags = (FARP_MATCH_PORT | FARP_MATCH_NODE);
2200
2201         memcpy(&fp->RportName, &vport->fc_portname, sizeof(struct lpfc_name));
2202         memcpy(&fp->RnodeName, &vport->fc_nodename, sizeof(struct lpfc_name));
2203         ondlp = lpfc_findnode_did(vport, nportid);
2204         if (ondlp && NLP_CHK_NODE_ACT(ondlp)) {
2205                 memcpy(&fp->OportName, &ondlp->nlp_portname,
2206                        sizeof(struct lpfc_name));
2207                 memcpy(&fp->OnodeName, &ondlp->nlp_nodename,
2208                        sizeof(struct lpfc_name));
2209         }
2210
2211         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
2212                 "Issue FARPR:     did:x%x",
2213                 ndlp->nlp_DID, 0, 0);
2214
2215         phba->fc_stat.elsXmitFARPR++;
2216         elsiocb->iocb_cmpl = lpfc_cmpl_els_cmd;
2217         if (lpfc_sli_issue_iocb(phba, pring, elsiocb, 0) == IOCB_ERROR) {
2218                 /* The additional lpfc_nlp_put will cause the following
2219                  * lpfc_els_free_iocb routine to trigger the release of
2220                  * the node.
2221                  */
2222                 lpfc_nlp_put(ndlp);
2223                 lpfc_els_free_iocb(phba, elsiocb);
2224                 return 1;
2225         }
2226         /* This will cause the callback-function lpfc_cmpl_els_cmd to
2227          * trigger the release of the node.
2228          */
2229         lpfc_nlp_put(ndlp);
2230         return 0;
2231 }
2232
2233 /**
2234  * lpfc_cancel_retry_delay_tmo: Cancel the timer with delayed iocb-cmd retry.
2235  * @vport: pointer to a host virtual N_Port data structure.
2236  * @nlp: pointer to a node-list data structure.
2237  *
2238  * This routine cancels the timer with a delayed IOCB-command retry for
2239  * a @vport's @ndlp. It stops the timer for the delayed function retrial and
2240  * removes the ELS retry event if it presents. In addition, if the
2241  * NLP_NPR_2B_DISC bit is set in the @nlp's nlp_flag bitmap, ADISC IOCB
2242  * commands are sent for the @vport's nodes that require issuing discovery
2243  * ADISC.
2244  **/
2245 void
2246 lpfc_cancel_retry_delay_tmo(struct lpfc_vport *vport, struct lpfc_nodelist *nlp)
2247 {
2248         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
2249         struct lpfc_work_evt *evtp;
2250
2251         if (!(nlp->nlp_flag & NLP_DELAY_TMO))
2252                 return;
2253         spin_lock_irq(shost->host_lock);
2254         nlp->nlp_flag &= ~NLP_DELAY_TMO;
2255         spin_unlock_irq(shost->host_lock);
2256         del_timer_sync(&nlp->nlp_delayfunc);
2257         nlp->nlp_last_elscmd = 0;
2258         if (!list_empty(&nlp->els_retry_evt.evt_listp)) {
2259                 list_del_init(&nlp->els_retry_evt.evt_listp);
2260                 /* Decrement nlp reference count held for the delayed retry */
2261                 evtp = &nlp->els_retry_evt;
2262                 lpfc_nlp_put((struct lpfc_nodelist *)evtp->evt_arg1);
2263         }
2264         if (nlp->nlp_flag & NLP_NPR_2B_DISC) {
2265                 spin_lock_irq(shost->host_lock);
2266                 nlp->nlp_flag &= ~NLP_NPR_2B_DISC;
2267                 spin_unlock_irq(shost->host_lock);
2268                 if (vport->num_disc_nodes) {
2269                         if (vport->port_state < LPFC_VPORT_READY) {
2270                                 /* Check if there are more ADISCs to be sent */
2271                                 lpfc_more_adisc(vport);
2272                         } else {
2273                                 /* Check if there are more PLOGIs to be sent */
2274                                 lpfc_more_plogi(vport);
2275                                 if (vport->num_disc_nodes == 0) {
2276                                         spin_lock_irq(shost->host_lock);
2277                                         vport->fc_flag &= ~FC_NDISC_ACTIVE;
2278                                         spin_unlock_irq(shost->host_lock);
2279                                         lpfc_can_disctmo(vport);
2280                                         lpfc_end_rscn(vport);
2281                                 }
2282                         }
2283                 }
2284         }
2285         return;
2286 }
2287
2288 /**
2289  * lpfc_els_retry_delay: Timer function with a ndlp delayed function timer.
2290  * @ptr: holder for the pointer to the timer function associated data (ndlp).
2291  *
2292  * This routine is invoked by the ndlp delayed-function timer to check
2293  * whether there is any pending ELS retry event(s) with the node. If not, it
2294  * simply returns. Otherwise, if there is at least one ELS delayed event, it
2295  * adds the delayed events to the HBA work list and invokes the
2296  * lpfc_worker_wake_up() routine to wake up worker thread to process the
2297  * event. Note that lpfc_nlp_get() is called before posting the event to
2298  * the work list to hold reference count of ndlp so that it guarantees the
2299  * reference to ndlp will still be available when the worker thread gets
2300  * to the event associated with the ndlp.
2301  **/
2302 void
2303 lpfc_els_retry_delay(unsigned long ptr)
2304 {
2305         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) ptr;
2306         struct lpfc_vport *vport = ndlp->vport;
2307         struct lpfc_hba   *phba = vport->phba;
2308         unsigned long flags;
2309         struct lpfc_work_evt  *evtp = &ndlp->els_retry_evt;
2310
2311         spin_lock_irqsave(&phba->hbalock, flags);
2312         if (!list_empty(&evtp->evt_listp)) {
2313                 spin_unlock_irqrestore(&phba->hbalock, flags);
2314                 return;
2315         }
2316
2317         /* We need to hold the node by incrementing the reference
2318          * count until the queued work is done
2319          */
2320         evtp->evt_arg1  = lpfc_nlp_get(ndlp);
2321         if (evtp->evt_arg1) {
2322                 evtp->evt = LPFC_EVT_ELS_RETRY;
2323                 list_add_tail(&evtp->evt_listp, &phba->work_list);
2324                 lpfc_worker_wake_up(phba);
2325         }
2326         spin_unlock_irqrestore(&phba->hbalock, flags);
2327         return;
2328 }
2329
2330 /**
2331  * lpfc_els_retry_delay_handler: Work thread handler for ndlp delayed function.
2332  * @ndlp: pointer to a node-list data structure.
2333  *
2334  * This routine is the worker-thread handler for processing the @ndlp delayed
2335  * event(s), posted by the lpfc_els_retry_delay() routine. It simply retrieves
2336  * the last ELS command from the associated ndlp and invokes the proper ELS
2337  * function according to the delayed ELS command to retry the command.
2338  **/
2339 void
2340 lpfc_els_retry_delay_handler(struct lpfc_nodelist *ndlp)
2341 {
2342         struct lpfc_vport *vport = ndlp->vport;
2343         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
2344         uint32_t cmd, did, retry;
2345
2346         spin_lock_irq(shost->host_lock);
2347         did = ndlp->nlp_DID;
2348         cmd = ndlp->nlp_last_elscmd;
2349         ndlp->nlp_last_elscmd = 0;
2350
2351         if (!(ndlp->nlp_flag & NLP_DELAY_TMO)) {
2352                 spin_unlock_irq(shost->host_lock);
2353                 return;
2354         }
2355
2356         ndlp->nlp_flag &= ~NLP_DELAY_TMO;
2357         spin_unlock_irq(shost->host_lock);
2358         /*
2359          * If a discovery event readded nlp_delayfunc after timer
2360          * firing and before processing the timer, cancel the
2361          * nlp_delayfunc.
2362          */
2363         del_timer_sync(&ndlp->nlp_delayfunc);
2364         retry = ndlp->nlp_retry;
2365
2366         switch (cmd) {
2367         case ELS_CMD_FLOGI:
2368                 lpfc_issue_els_flogi(vport, ndlp, retry);
2369                 break;
2370         case ELS_CMD_PLOGI:
2371                 if (!lpfc_issue_els_plogi(vport, ndlp->nlp_DID, retry)) {
2372                         ndlp->nlp_prev_state = ndlp->nlp_state;
2373                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_PLOGI_ISSUE);
2374                 }
2375                 break;
2376         case ELS_CMD_ADISC:
2377                 if (!lpfc_issue_els_adisc(vport, ndlp, retry)) {
2378                         ndlp->nlp_prev_state = ndlp->nlp_state;
2379                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_ADISC_ISSUE);
2380                 }
2381                 break;
2382         case ELS_CMD_PRLI:
2383                 if (!lpfc_issue_els_prli(vport, ndlp, retry)) {
2384                         ndlp->nlp_prev_state = ndlp->nlp_state;
2385                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_PRLI_ISSUE);
2386                 }
2387                 break;
2388         case ELS_CMD_LOGO:
2389                 if (!lpfc_issue_els_logo(vport, ndlp, retry)) {
2390                         ndlp->nlp_prev_state = ndlp->nlp_state;
2391                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
2392                 }
2393                 break;
2394         case ELS_CMD_FDISC:
2395                 lpfc_issue_els_fdisc(vport, ndlp, retry);
2396                 break;
2397         }
2398         return;
2399 }
2400
2401 /**
2402  * lpfc_els_retry: Make retry decision on an els command iocb.
2403  * @phba: pointer to lpfc hba data structure.
2404  * @cmdiocb: pointer to lpfc command iocb data structure.
2405  * @rspiocb: pointer to lpfc response iocb data structure.
2406  *
2407  * This routine makes a retry decision on an ELS command IOCB, which has
2408  * failed. The following ELS IOCBs use this function for retrying the command
2409  * when previously issued command responsed with error status: FLOGI, PLOGI,
2410  * PRLI, ADISC, LOGO, and FDISC. Based on the ELS command type and the
2411  * returned error status, it makes the decision whether a retry shall be
2412  * issued for the command, and whether a retry shall be made immediately or
2413  * delayed. In the former case, the corresponding ELS command issuing-function
2414  * is called to retry the command. In the later case, the ELS command shall
2415  * be posted to the ndlp delayed event and delayed function timer set to the
2416  * ndlp for the delayed command issusing.
2417  *
2418  * Return code
2419  *   0 - No retry of els command is made
2420  *   1 - Immediate or delayed retry of els command is made
2421  **/
2422 static int
2423 lpfc_els_retry(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
2424                struct lpfc_iocbq *rspiocb)
2425 {
2426         struct lpfc_vport *vport = cmdiocb->vport;
2427         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
2428         IOCB_t *irsp = &rspiocb->iocb;
2429         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
2430         struct lpfc_dmabuf *pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
2431         uint32_t *elscmd;
2432         struct ls_rjt stat;
2433         int retry = 0, maxretry = lpfc_max_els_tries, delay = 0;
2434         int logerr = 0;
2435         uint32_t cmd = 0;
2436         uint32_t did;
2437
2438
2439         /* Note: context2 may be 0 for internal driver abort
2440          * of delays ELS command.
2441          */
2442
2443         if (pcmd && pcmd->virt) {
2444                 elscmd = (uint32_t *) (pcmd->virt);
2445                 cmd = *elscmd++;
2446         }
2447
2448         if (ndlp && NLP_CHK_NODE_ACT(ndlp))
2449                 did = ndlp->nlp_DID;
2450         else {
2451                 /* We should only hit this case for retrying PLOGI */
2452                 did = irsp->un.elsreq64.remoteID;
2453                 ndlp = lpfc_findnode_did(vport, did);
2454                 if ((!ndlp || !NLP_CHK_NODE_ACT(ndlp))
2455                     && (cmd != ELS_CMD_PLOGI))
2456                         return 1;
2457         }
2458
2459         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
2460                 "Retry ELS:       wd7:x%x wd4:x%x did:x%x",
2461                 *(((uint32_t *) irsp) + 7), irsp->un.ulpWord[4], ndlp->nlp_DID);
2462
2463         switch (irsp->ulpStatus) {
2464         case IOSTAT_FCP_RSP_ERROR:
2465         case IOSTAT_REMOTE_STOP:
2466                 break;
2467
2468         case IOSTAT_LOCAL_REJECT:
2469                 switch ((irsp->un.ulpWord[4] & 0xff)) {
2470                 case IOERR_LOOP_OPEN_FAILURE:
2471                         if (cmd == ELS_CMD_PLOGI && cmdiocb->retry == 0)
2472                                 delay = 1000;
2473                         retry = 1;
2474                         break;
2475
2476                 case IOERR_ILLEGAL_COMMAND:
2477                         lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
2478                                          "0124 Retry illegal cmd x%x "
2479                                          "retry:x%x delay:x%x\n",
2480                                          cmd, cmdiocb->retry, delay);
2481                         retry = 1;
2482                         /* All command's retry policy */
2483                         maxretry = 8;
2484                         if (cmdiocb->retry > 2)
2485                                 delay = 1000;
2486                         break;
2487
2488                 case IOERR_NO_RESOURCES:
2489                         logerr = 1; /* HBA out of resources */
2490                         retry = 1;
2491                         if (cmdiocb->retry > 100)
2492                                 delay = 100;
2493                         maxretry = 250;
2494                         break;
2495
2496                 case IOERR_ILLEGAL_FRAME:
2497                         delay = 100;
2498                         retry = 1;
2499                         break;
2500
2501                 case IOERR_SEQUENCE_TIMEOUT:
2502                 case IOERR_INVALID_RPI:
2503                         retry = 1;
2504                         break;
2505                 }
2506                 break;
2507
2508         case IOSTAT_NPORT_RJT:
2509         case IOSTAT_FABRIC_RJT:
2510                 if (irsp->un.ulpWord[4] & RJT_UNAVAIL_TEMP) {
2511                         retry = 1;
2512                         break;
2513                 }
2514                 break;
2515
2516         case IOSTAT_NPORT_BSY:
2517         case IOSTAT_FABRIC_BSY:
2518                 logerr = 1; /* Fabric / Remote NPort out of resources */
2519                 retry = 1;
2520                 break;
2521
2522         case IOSTAT_LS_RJT:
2523                 stat.un.lsRjtError = be32_to_cpu(irsp->un.ulpWord[4]);
2524                 /* Added for Vendor specifc support
2525                  * Just keep retrying for these Rsn / Exp codes
2526                  */
2527                 switch (stat.un.b.lsRjtRsnCode) {
2528                 case LSRJT_UNABLE_TPC:
2529                         if (stat.un.b.lsRjtRsnCodeExp ==
2530                             LSEXP_CMD_IN_PROGRESS) {
2531                                 if (cmd == ELS_CMD_PLOGI) {
2532                                         delay = 1000;
2533                                         maxretry = 48;
2534                                 }
2535                                 retry = 1;
2536                                 break;
2537                         }
2538                         if (cmd == ELS_CMD_PLOGI) {
2539                                 delay = 1000;
2540                                 maxretry = lpfc_max_els_tries + 1;
2541                                 retry = 1;
2542                                 break;
2543                         }
2544                         if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
2545                           (cmd == ELS_CMD_FDISC) &&
2546                           (stat.un.b.lsRjtRsnCodeExp == LSEXP_OUT_OF_RESOURCE)){
2547                                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
2548                                                  "0125 FDISC Failed (x%x). "
2549                                                  "Fabric out of resources\n",
2550                                                  stat.un.lsRjtError);
2551                                 lpfc_vport_set_state(vport,
2552                                                      FC_VPORT_NO_FABRIC_RSCS);
2553                         }
2554                         break;
2555
2556                 case LSRJT_LOGICAL_BSY:
2557                         if ((cmd == ELS_CMD_PLOGI) ||
2558                             (cmd == ELS_CMD_PRLI)) {
2559                                 delay = 1000;
2560                                 maxretry = 48;
2561                         } else if (cmd == ELS_CMD_FDISC) {
2562                                 /* FDISC retry policy */
2563                                 maxretry = 48;
2564                                 if (cmdiocb->retry >= 32)
2565                                         delay = 1000;
2566                         }
2567                         retry = 1;
2568                         break;
2569
2570                 case LSRJT_LOGICAL_ERR:
2571                         /* There are some cases where switches return this
2572                          * error when they are not ready and should be returning
2573                          * Logical Busy. We should delay every time.
2574                          */
2575                         if (cmd == ELS_CMD_FDISC &&
2576                             stat.un.b.lsRjtRsnCodeExp == LSEXP_PORT_LOGIN_REQ) {
2577                                 maxretry = 3;
2578                                 delay = 1000;
2579                                 retry = 1;
2580                                 break;
2581                         }
2582                 case LSRJT_PROTOCOL_ERR:
2583                         if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
2584                           (cmd == ELS_CMD_FDISC) &&
2585                           ((stat.un.b.lsRjtRsnCodeExp == LSEXP_INVALID_PNAME) ||
2586                           (stat.un.b.lsRjtRsnCodeExp == LSEXP_INVALID_NPORT_ID))
2587                           ) {
2588                                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
2589                                                  "0122 FDISC Failed (x%x). "
2590                                                  "Fabric Detected Bad WWN\n",
2591                                                  stat.un.lsRjtError);
2592                                 lpfc_vport_set_state(vport,
2593                                                      FC_VPORT_FABRIC_REJ_WWN);
2594                         }
2595                         break;
2596                 }
2597                 break;
2598
2599         case IOSTAT_INTERMED_RSP:
2600         case IOSTAT_BA_RJT:
2601                 break;
2602
2603         default:
2604                 break;
2605         }
2606
2607         if (did == FDMI_DID)
2608                 retry = 1;
2609
2610         if ((cmd == ELS_CMD_FLOGI) &&
2611             (phba->fc_topology != TOPOLOGY_LOOP) &&
2612             !lpfc_error_lost_link(irsp)) {
2613                 /* FLOGI retry policy */
2614                 retry = 1;
2615                 maxretry = 48;
2616                 if (cmdiocb->retry >= 32)
2617                         delay = 1000;
2618         }
2619
2620         if ((++cmdiocb->retry) >= maxretry) {
2621                 phba->fc_stat.elsRetryExceeded++;
2622                 retry = 0;
2623         }
2624
2625         if ((vport->load_flag & FC_UNLOADING) != 0)
2626                 retry = 0;
2627
2628         if (retry) {
2629
2630                 /* Retry ELS command <elsCmd> to remote NPORT <did> */
2631                 lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
2632                                  "0107 Retry ELS command x%x to remote "
2633                                  "NPORT x%x Data: x%x x%x\n",
2634                                  cmd, did, cmdiocb->retry, delay);
2635
2636                 if (((cmd == ELS_CMD_PLOGI) || (cmd == ELS_CMD_ADISC)) &&
2637                         ((irsp->ulpStatus != IOSTAT_LOCAL_REJECT) ||
2638                         ((irsp->un.ulpWord[4] & 0xff) != IOERR_NO_RESOURCES))) {
2639                         /* Don't reset timer for no resources */
2640
2641                         /* If discovery / RSCN timer is running, reset it */
2642                         if (timer_pending(&vport->fc_disctmo) ||
2643                             (vport->fc_flag & FC_RSCN_MODE))
2644                                 lpfc_set_disctmo(vport);
2645                 }
2646
2647                 phba->fc_stat.elsXmitRetry++;
2648                 if (ndlp && NLP_CHK_NODE_ACT(ndlp) && delay) {
2649                         phba->fc_stat.elsDelayRetry++;
2650                         ndlp->nlp_retry = cmdiocb->retry;
2651
2652                         /* delay is specified in milliseconds */
2653                         mod_timer(&ndlp->nlp_delayfunc,
2654                                 jiffies + msecs_to_jiffies(delay));
2655                         spin_lock_irq(shost->host_lock);
2656                         ndlp->nlp_flag |= NLP_DELAY_TMO;
2657                         spin_unlock_irq(shost->host_lock);
2658
2659                         ndlp->nlp_prev_state = ndlp->nlp_state;
2660                         if (cmd == ELS_CMD_PRLI)
2661                                 lpfc_nlp_set_state(vport, ndlp,
2662                                         NLP_STE_REG_LOGIN_ISSUE);
2663                         else
2664                                 lpfc_nlp_set_state(vport, ndlp,
2665                                         NLP_STE_NPR_NODE);
2666                         ndlp->nlp_last_elscmd = cmd;
2667
2668                         return 1;
2669                 }
2670                 switch (cmd) {
2671                 case ELS_CMD_FLOGI:
2672                         lpfc_issue_els_flogi(vport, ndlp, cmdiocb->retry);
2673                         return 1;
2674                 case ELS_CMD_FDISC:
2675                         lpfc_issue_els_fdisc(vport, ndlp, cmdiocb->retry);
2676                         return 1;
2677                 case ELS_CMD_PLOGI:
2678                         if (ndlp && NLP_CHK_NODE_ACT(ndlp)) {
2679                                 ndlp->nlp_prev_state = ndlp->nlp_state;
2680                                 lpfc_nlp_set_state(vport, ndlp,
2681                                                    NLP_STE_PLOGI_ISSUE);
2682                         }
2683                         lpfc_issue_els_plogi(vport, did, cmdiocb->retry);
2684                         return 1;
2685                 case ELS_CMD_ADISC:
2686                         ndlp->nlp_prev_state = ndlp->nlp_state;
2687                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_ADISC_ISSUE);
2688                         lpfc_issue_els_adisc(vport, ndlp, cmdiocb->retry);
2689                         return 1;
2690                 case ELS_CMD_PRLI:
2691                         ndlp->nlp_prev_state = ndlp->nlp_state;
2692                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_PRLI_ISSUE);
2693                         lpfc_issue_els_prli(vport, ndlp, cmdiocb->retry);
2694                         return 1;
2695                 case ELS_CMD_LOGO:
2696                         ndlp->nlp_prev_state = ndlp->nlp_state;
2697                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
2698                         lpfc_issue_els_logo(vport, ndlp, cmdiocb->retry);
2699                         return 1;
2700                 }
2701         }
2702         /* No retry ELS command <elsCmd> to remote NPORT <did> */
2703         if (logerr) {
2704                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
2705                          "0137 No retry ELS command x%x to remote "
2706                          "NPORT x%x: Out of Resources: Error:x%x/%x\n",
2707                          cmd, did, irsp->ulpStatus,
2708                          irsp->un.ulpWord[4]);
2709         }
2710         else {
2711                 lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
2712                          "0108 No retry ELS command x%x to remote "
2713                          "NPORT x%x Retried:%d Error:x%x/%x\n",
2714                          cmd, did, cmdiocb->retry, irsp->ulpStatus,
2715                          irsp->un.ulpWord[4]);
2716         }
2717         return 0;
2718 }
2719
2720 /**
2721  * lpfc_els_free_data: Free lpfc dma buffer and data structure with an iocb.
2722  * @phba: pointer to lpfc hba data structure.
2723  * @buf_ptr1: pointer to the lpfc DMA buffer data structure.
2724  *
2725  * This routine releases the lpfc DMA (Direct Memory Access) buffer(s)
2726  * associated with a command IOCB back to the lpfc DMA buffer pool. It first
2727  * checks to see whether there is a lpfc DMA buffer associated with the
2728  * response of the command IOCB. If so, it will be released before releasing
2729  * the lpfc DMA buffer associated with the IOCB itself.
2730  *
2731  * Return code
2732  *   0 - Successfully released lpfc DMA buffer (currently, always return 0)
2733  **/
2734 static int
2735 lpfc_els_free_data(struct lpfc_hba *phba, struct lpfc_dmabuf *buf_ptr1)
2736 {
2737         struct lpfc_dmabuf *buf_ptr;
2738
2739         /* Free the response before processing the command. */
2740         if (!list_empty(&buf_ptr1->list)) {
2741                 list_remove_head(&buf_ptr1->list, buf_ptr,
2742                                  struct lpfc_dmabuf,
2743                                  list);
2744                 lpfc_mbuf_free(phba, buf_ptr->virt, buf_ptr->phys);
2745                 kfree(buf_ptr);
2746         }
2747         lpfc_mbuf_free(phba, buf_ptr1->virt, buf_ptr1->phys);
2748         kfree(buf_ptr1);
2749         return 0;
2750 }
2751
2752 /**
2753  * lpfc_els_free_bpl: Free lpfc dma buffer and data structure with bpl.
2754  * @phba: pointer to lpfc hba data structure.
2755  * @buf_ptr: pointer to the lpfc dma buffer data structure.
2756  *
2757  * This routine releases the lpfc Direct Memory Access (DMA) buffer
2758  * associated with a Buffer Pointer List (BPL) back to the lpfc DMA buffer
2759  * pool.
2760  *
2761  * Return code
2762  *   0 - Successfully released lpfc DMA buffer (currently, always return 0)
2763  **/
2764 static int
2765 lpfc_els_free_bpl(struct lpfc_hba *phba, struct lpfc_dmabuf *buf_ptr)
2766 {
2767         lpfc_mbuf_free(phba, buf_ptr->virt, buf_ptr->phys);
2768         kfree(buf_ptr);
2769         return 0;
2770 }
2771
2772 /**
2773  * lpfc_els_free_iocb: Free a command iocb and its associated resources.
2774  * @phba: pointer to lpfc hba data structure.
2775  * @elsiocb: pointer to lpfc els command iocb data structure.
2776  *
2777  * This routine frees a command IOCB and its associated resources. The
2778  * command IOCB data structure contains the reference to various associated
2779  * resources, these fields must be set to NULL if the associated reference
2780  * not present:
2781  *   context1 - reference to ndlp
2782  *   context2 - reference to cmd
2783  *   context2->next - reference to rsp
2784  *   context3 - reference to bpl
2785  *
2786  * It first properly decrements the reference count held on ndlp for the
2787  * IOCB completion callback function. If LPFC_DELAY_MEM_FREE flag is not
2788  * set, it invokes the lpfc_els_free_data() routine to release the Direct
2789  * Memory Access (DMA) buffers associated with the IOCB. Otherwise, it
2790  * adds the DMA buffer the @phba data structure for the delayed release.
2791  * If reference to the Buffer Pointer List (BPL) is present, the
2792  * lpfc_els_free_bpl() routine is invoked to release the DMA memory
2793  * associated with BPL. Finally, the lpfc_sli_release_iocbq() routine is
2794  * invoked to release the IOCB data structure back to @phba IOCBQ list.
2795  *
2796  * Return code
2797  *   0 - Success (currently, always return 0)
2798  **/
2799 int
2800 lpfc_els_free_iocb(struct lpfc_hba *phba, struct lpfc_iocbq *elsiocb)
2801 {
2802         struct lpfc_dmabuf *buf_ptr, *buf_ptr1;
2803         struct lpfc_nodelist *ndlp;
2804
2805         ndlp = (struct lpfc_nodelist *)elsiocb->context1;
2806         if (ndlp) {
2807                 if (ndlp->nlp_flag & NLP_DEFER_RM) {
2808                         lpfc_nlp_put(ndlp);
2809
2810                         /* If the ndlp is not being used by another discovery
2811                          * thread, free it.
2812                          */
2813                         if (!lpfc_nlp_not_used(ndlp)) {
2814                                 /* If ndlp is being used by another discovery
2815                                  * thread, just clear NLP_DEFER_RM
2816                                  */
2817                                 ndlp->nlp_flag &= ~NLP_DEFER_RM;
2818                         }
2819                 }
2820                 else
2821                         lpfc_nlp_put(ndlp);
2822                 elsiocb->context1 = NULL;
2823         }
2824         /* context2  = cmd,  context2->next = rsp, context3 = bpl */
2825         if (elsiocb->context2) {
2826                 if (elsiocb->iocb_flag & LPFC_DELAY_MEM_FREE) {
2827                         /* Firmware could still be in progress of DMAing
2828                          * payload, so don't free data buffer till after
2829                          * a hbeat.
2830                          */
2831                         elsiocb->iocb_flag &= ~LPFC_DELAY_MEM_FREE;
2832                         buf_ptr = elsiocb->context2;
2833                         elsiocb->context2 = NULL;
2834                         if (buf_ptr) {
2835                                 buf_ptr1 = NULL;
2836                                 spin_lock_irq(&phba->hbalock);
2837                                 if (!list_empty(&buf_ptr->list)) {
2838                                         list_remove_head(&buf_ptr->list,
2839                                                 buf_ptr1, struct lpfc_dmabuf,
2840                                                 list);
2841                                         INIT_LIST_HEAD(&buf_ptr1->list);
2842                                         list_add_tail(&buf_ptr1->list,
2843                                                 &phba->elsbuf);
2844                                         phba->elsbuf_cnt++;
2845                                 }
2846                                 INIT_LIST_HEAD(&buf_ptr->list);
2847                                 list_add_tail(&buf_ptr->list, &phba->elsbuf);
2848                                 phba->elsbuf_cnt++;
2849                                 spin_unlock_irq(&phba->hbalock);
2850                         }
2851                 } else {
2852                         buf_ptr1 = (struct lpfc_dmabuf *) elsiocb->context2;
2853                         lpfc_els_free_data(phba, buf_ptr1);
2854                 }
2855         }
2856
2857         if (elsiocb->context3) {
2858                 buf_ptr = (struct lpfc_dmabuf *) elsiocb->context3;
2859                 lpfc_els_free_bpl(phba, buf_ptr);
2860         }
2861         lpfc_sli_release_iocbq(phba, elsiocb);
2862         return 0;
2863 }
2864
2865 /**
2866  * lpfc_cmpl_els_logo_acc: Completion callback function to logo acc response.
2867  * @phba: pointer to lpfc hba data structure.
2868  * @cmdiocb: pointer to lpfc command iocb data structure.
2869  * @rspiocb: pointer to lpfc response iocb data structure.
2870  *
2871  * This routine is the completion callback function to the Logout (LOGO)
2872  * Accept (ACC) Response ELS command. This routine is invoked to indicate
2873  * the completion of the LOGO process. It invokes the lpfc_nlp_not_used() to
2874  * release the ndlp if it has the last reference remaining (reference count
2875  * is 1). If succeeded (meaning ndlp released), it sets the IOCB context1
2876  * field to NULL to inform the following lpfc_els_free_iocb() routine no
2877  * ndlp reference count needs to be decremented. Otherwise, the ndlp
2878  * reference use-count shall be decremented by the lpfc_els_free_iocb()
2879  * routine. Finally, the lpfc_els_free_iocb() is invoked to release the
2880  * IOCB data structure.
2881  **/
2882 static void
2883 lpfc_cmpl_els_logo_acc(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
2884                        struct lpfc_iocbq *rspiocb)
2885 {
2886         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
2887         struct lpfc_vport *vport = cmdiocb->vport;
2888         IOCB_t *irsp;
2889
2890         irsp = &rspiocb->iocb;
2891         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
2892                 "ACC LOGO cmpl:   status:x%x/x%x did:x%x",
2893                 irsp->ulpStatus, irsp->un.ulpWord[4], ndlp->nlp_DID);
2894         /* ACC to LOGO completes to NPort <nlp_DID> */
2895         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
2896                          "0109 ACC to LOGO completes to NPort x%x "
2897                          "Data: x%x x%x x%x\n",
2898                          ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
2899                          ndlp->nlp_rpi);
2900
2901         if (ndlp->nlp_state == NLP_STE_NPR_NODE) {
2902                 /* NPort Recovery mode or node is just allocated */
2903                 if (!lpfc_nlp_not_used(ndlp)) {
2904                         /* If the ndlp is being used by another discovery
2905                          * thread, just unregister the RPI.
2906                          */
2907                         lpfc_unreg_rpi(vport, ndlp);
2908                 } else {
2909                         /* Indicate the node has already released, should
2910                          * not reference to it from within lpfc_els_free_iocb.
2911                          */
2912                         cmdiocb->context1 = NULL;
2913                 }
2914         }
2915         lpfc_els_free_iocb(phba, cmdiocb);
2916         return;
2917 }
2918
2919 /**
2920  * lpfc_mbx_cmpl_dflt_rpi: Completion callbk func for unreg dflt rpi mbox cmd.
2921  * @phba: pointer to lpfc hba data structure.
2922  * @pmb: pointer to the driver internal queue element for mailbox command.
2923  *
2924  * This routine is the completion callback function for unregister default
2925  * RPI (Remote Port Index) mailbox command to the @phba. It simply releases
2926  * the associated lpfc Direct Memory Access (DMA) buffer back to the pool and
2927  * decrements the ndlp reference count held for this completion callback
2928  * function. After that, it invokes the lpfc_nlp_not_used() to check
2929  * whether there is only one reference left on the ndlp. If so, it will
2930  * perform one more decrement and trigger the release of the ndlp.
2931  **/
2932 void
2933 lpfc_mbx_cmpl_dflt_rpi(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
2934 {
2935         struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) (pmb->context1);
2936         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) pmb->context2;
2937
2938         pmb->context1 = NULL;
2939         lpfc_mbuf_free(phba, mp->virt, mp->phys);
2940         kfree(mp);
2941         mempool_free(pmb, phba->mbox_mem_pool);
2942         if (ndlp && NLP_CHK_NODE_ACT(ndlp)) {
2943                 lpfc_nlp_put(ndlp);
2944                 /* This is the end of the default RPI cleanup logic for this
2945                  * ndlp. If no other discovery threads are using this ndlp.
2946                  * we should free all resources associated with it.
2947                  */
2948                 lpfc_nlp_not_used(ndlp);
2949         }
2950         return;
2951 }
2952
2953 /**
2954  * lpfc_cmpl_els_rsp: Completion callback function for els response iocb cmd.
2955  * @phba: pointer to lpfc hba data structure.
2956  * @cmdiocb: pointer to lpfc command iocb data structure.
2957  * @rspiocb: pointer to lpfc response iocb data structure.
2958  *
2959  * This routine is the completion callback function for ELS Response IOCB
2960  * command. In normal case, this callback function just properly sets the
2961  * nlp_flag bitmap in the ndlp data structure, if the mbox command reference
2962  * field in the command IOCB is not NULL, the referred mailbox command will
2963  * be send out, and then invokes the lpfc_els_free_iocb() routine to release
2964  * the IOCB. Under error conditions, such as when a LS_RJT is returned or a
2965  * link down event occurred during the discovery, the lpfc_nlp_not_used()
2966  * routine shall be invoked trying to release the ndlp if no other threads
2967  * are currently referring it.
2968  **/
2969 static void
2970 lpfc_cmpl_els_rsp(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
2971                   struct lpfc_iocbq *rspiocb)
2972 {
2973         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
2974         struct lpfc_vport *vport = ndlp ? ndlp->vport : NULL;
2975         struct Scsi_Host  *shost = vport ? lpfc_shost_from_vport(vport) : NULL;
2976         IOCB_t  *irsp;
2977         uint8_t *pcmd;
2978         LPFC_MBOXQ_t *mbox = NULL;
2979         struct lpfc_dmabuf *mp = NULL;
2980         uint32_t ls_rjt = 0;
2981
2982         irsp = &rspiocb->iocb;
2983
2984         if (cmdiocb->context_un.mbox)
2985                 mbox = cmdiocb->context_un.mbox;
2986
2987         /* First determine if this is a LS_RJT cmpl. Note, this callback
2988          * function can have cmdiocb->contest1 (ndlp) field set to NULL.
2989          */
2990         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) cmdiocb->context2)->virt);
2991         if (ndlp && NLP_CHK_NODE_ACT(ndlp) &&
2992             (*((uint32_t *) (pcmd)) == ELS_CMD_LS_RJT)) {
2993                 /* A LS_RJT associated with Default RPI cleanup has its own
2994                  * seperate code path.
2995                  */
2996                 if (!(ndlp->nlp_flag & NLP_RM_DFLT_RPI))
2997                         ls_rjt = 1;
2998         }
2999
3000         /* Check to see if link went down during discovery */
3001         if (!ndlp || !NLP_CHK_NODE_ACT(ndlp) || lpfc_els_chk_latt(vport)) {
3002                 if (mbox) {
3003                         mp = (struct lpfc_dmabuf *) mbox->context1;
3004                         if (mp) {
3005                                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
3006                                 kfree(mp);
3007                         }
3008                         mempool_free(mbox, phba->mbox_mem_pool);
3009                 }
3010                 if (ndlp && NLP_CHK_NODE_ACT(ndlp) &&
3011                     (ndlp->nlp_flag & NLP_RM_DFLT_RPI))
3012                         if (lpfc_nlp_not_used(ndlp)) {
3013                                 ndlp = NULL;
3014                                 /* Indicate the node has already released,
3015                                  * should not reference to it from within
3016                                  * the routine lpfc_els_free_iocb.
3017                                  */
3018                                 cmdiocb->context1 = NULL;
3019                         }
3020                 goto out;
3021         }
3022
3023         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
3024                 "ELS rsp cmpl:    status:x%x/x%x did:x%x",
3025                 irsp->ulpStatus, irsp->un.ulpWord[4],
3026                 cmdiocb->iocb.un.elsreq64.remoteID);
3027         /* ELS response tag <ulpIoTag> completes */
3028         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
3029                          "0110 ELS response tag x%x completes "
3030                          "Data: x%x x%x x%x x%x x%x x%x x%x\n",
3031                          cmdiocb->iocb.ulpIoTag, rspiocb->iocb.ulpStatus,
3032                          rspiocb->iocb.un.ulpWord[4], rspiocb->iocb.ulpTimeout,
3033                          ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
3034                          ndlp->nlp_rpi);
3035         if (mbox) {
3036                 if ((rspiocb->iocb.ulpStatus == 0)
3037                     && (ndlp->nlp_flag & NLP_ACC_REGLOGIN)) {
3038                         lpfc_unreg_rpi(vport, ndlp);
3039                         /* Increment reference count to ndlp to hold the
3040                          * reference to ndlp for the callback function.
3041                          */
3042                         mbox->context2 = lpfc_nlp_get(ndlp);
3043                         mbox->vport = vport;
3044                         if (ndlp->nlp_flag & NLP_RM_DFLT_RPI) {
3045                                 mbox->mbox_flag |= LPFC_MBX_IMED_UNREG;
3046                                 mbox->mbox_cmpl = lpfc_mbx_cmpl_dflt_rpi;
3047                         }
3048                         else {
3049                                 mbox->mbox_cmpl = lpfc_mbx_cmpl_reg_login;
3050                                 ndlp->nlp_prev_state = ndlp->nlp_state;
3051                                 lpfc_nlp_set_state(vport, ndlp,
3052                                            NLP_STE_REG_LOGIN_ISSUE);
3053                         }
3054                         if (lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT)
3055                             != MBX_NOT_FINISHED)
3056                                 goto out;
3057                         else
3058                                 /* Decrement the ndlp reference count we
3059                                  * set for this failed mailbox command.
3060                                  */
3061                                 lpfc_nlp_put(ndlp);
3062
3063                         /* ELS rsp: Cannot issue reg_login for <NPortid> */
3064                         lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
3065                                 "0138 ELS rsp: Cannot issue reg_login for x%x "
3066                                 "Data: x%x x%x x%x\n",
3067                                 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
3068                                 ndlp->nlp_rpi);
3069
3070                         if (lpfc_nlp_not_used(ndlp)) {
3071                                 ndlp = NULL;
3072                                 /* Indicate node has already been released,
3073                                  * should not reference to it from within
3074                                  * the routine lpfc_els_free_iocb.
3075                                  */
3076                                 cmdiocb->context1 = NULL;
3077                         }
3078                 } else {
3079                         /* Do not drop node for lpfc_els_abort'ed ELS cmds */
3080                         if (!lpfc_error_lost_link(irsp) &&
3081                             ndlp->nlp_flag & NLP_ACC_REGLOGIN) {
3082                                 if (lpfc_nlp_not_used(ndlp)) {
3083                                         ndlp = NULL;
3084                                         /* Indicate node has already been
3085                                          * released, should not reference
3086                                          * to it from within the routine
3087                                          * lpfc_els_free_iocb.
3088                                          */
3089                                         cmdiocb->context1 = NULL;
3090                                 }
3091                         }
3092                 }
3093                 mp = (struct lpfc_dmabuf *) mbox->context1;
3094                 if (mp) {
3095                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
3096                         kfree(mp);
3097                 }
3098                 mempool_free(mbox, phba->mbox_mem_pool);
3099         }
3100 out:
3101         if (ndlp && NLP_CHK_NODE_ACT(ndlp)) {
3102                 spin_lock_irq(shost->host_lock);
3103                 ndlp->nlp_flag &= ~(NLP_ACC_REGLOGIN | NLP_RM_DFLT_RPI);
3104                 spin_unlock_irq(shost->host_lock);
3105
3106                 /* If the node is not being used by another discovery thread,
3107                  * and we are sending a reject, we are done with it.
3108                  * Release driver reference count here and free associated
3109                  * resources.
3110                  */
3111                 if (ls_rjt)
3112                         if (lpfc_nlp_not_used(ndlp))
3113                                 /* Indicate node has already been released,
3114                                  * should not reference to it from within
3115                                  * the routine lpfc_els_free_iocb.
3116                                  */
3117                                 cmdiocb->context1 = NULL;
3118         }
3119
3120         lpfc_els_free_iocb(phba, cmdiocb);
3121         return;
3122 }
3123
3124 /**
3125  * lpfc_els_rsp_acc: Prepare and issue an acc response iocb command.
3126  * @vport: pointer to a host virtual N_Port data structure.
3127  * @flag: the els command code to be accepted.
3128  * @oldiocb: pointer to the original lpfc command iocb data structure.
3129  * @ndlp: pointer to a node-list data structure.
3130  * @mbox: pointer to the driver internal queue element for mailbox command.
3131  *
3132  * This routine prepares and issues an Accept (ACC) response IOCB
3133  * command. It uses the @flag to properly set up the IOCB field for the
3134  * specific ACC response command to be issued and invokes the
3135  * lpfc_sli_issue_iocb() routine to send out ACC response IOCB. If a
3136  * @mbox pointer is passed in, it will be put into the context_un.mbox
3137  * field of the IOCB for the completion callback function to issue the
3138  * mailbox command to the HBA later when callback is invoked.
3139  *
3140  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
3141  * will be incremented by 1 for holding the ndlp and the reference to ndlp
3142  * will be stored into the context1 field of the IOCB for the completion
3143  * callback function to the corresponding response ELS IOCB command.
3144  *
3145  * Return code
3146  *   0 - Successfully issued acc response
3147  *   1 - Failed to issue acc response
3148  **/
3149 int
3150 lpfc_els_rsp_acc(struct lpfc_vport *vport, uint32_t flag,
3151                  struct lpfc_iocbq *oldiocb, struct lpfc_nodelist *ndlp,
3152                  LPFC_MBOXQ_t *mbox)
3153 {
3154         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
3155         struct lpfc_hba  *phba = vport->phba;
3156         IOCB_t *icmd;
3157         IOCB_t *oldcmd;
3158         struct lpfc_iocbq *elsiocb;
3159         struct lpfc_sli_ring *pring;
3160         struct lpfc_sli *psli;
3161         uint8_t *pcmd;
3162         uint16_t cmdsize;
3163         int rc;
3164         ELS_PKT *els_pkt_ptr;
3165
3166         psli = &phba->sli;
3167         pring = &psli->ring[LPFC_ELS_RING];     /* ELS ring */
3168         oldcmd = &oldiocb->iocb;
3169
3170         switch (flag) {
3171         case ELS_CMD_ACC:
3172                 cmdsize = sizeof(uint32_t);
3173                 elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry,
3174                                              ndlp, ndlp->nlp_DID, ELS_CMD_ACC);
3175                 if (!elsiocb) {
3176                         spin_lock_irq(shost->host_lock);
3177                         ndlp->nlp_flag &= ~NLP_LOGO_ACC;
3178                         spin_unlock_irq(shost->host_lock);
3179                         return 1;
3180                 }
3181
3182                 icmd = &elsiocb->iocb;
3183                 icmd->ulpContext = oldcmd->ulpContext;  /* Xri */
3184                 pcmd = (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
3185                 *((uint32_t *) (pcmd)) = ELS_CMD_ACC;
3186                 pcmd += sizeof(uint32_t);
3187
3188                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
3189                         "Issue ACC:       did:x%x flg:x%x",
3190                         ndlp->nlp_DID, ndlp->nlp_flag, 0);
3191                 break;
3192         case ELS_CMD_PLOGI:
3193                 cmdsize = (sizeof(struct serv_parm) + sizeof(uint32_t));
3194                 elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry,
3195                                              ndlp, ndlp->nlp_DID, ELS_CMD_ACC);
3196                 if (!elsiocb)
3197                         return 1;
3198
3199                 icmd = &elsiocb->iocb;
3200                 icmd->ulpContext = oldcmd->ulpContext;  /* Xri */
3201                 pcmd = (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
3202
3203                 if (mbox)
3204                         elsiocb->context_un.mbox = mbox;
3205
3206                 *((uint32_t *) (pcmd)) = ELS_CMD_ACC;
3207                 pcmd += sizeof(uint32_t);
3208                 memcpy(pcmd, &vport->fc_sparam, sizeof(struct serv_parm));
3209
3210                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
3211                         "Issue ACC PLOGI: did:x%x flg:x%x",
3212                         ndlp->nlp_DID, ndlp->nlp_flag, 0);
3213                 break;
3214         case ELS_CMD_PRLO:
3215                 cmdsize = sizeof(uint32_t) + sizeof(PRLO);
3216                 elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry,
3217                                              ndlp, ndlp->nlp_DID, ELS_CMD_PRLO);
3218                 if (!elsiocb)
3219                         return 1;
3220
3221                 icmd = &elsiocb->iocb;
3222                 icmd->ulpContext = oldcmd->ulpContext; /* Xri */
3223                 pcmd = (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
3224
3225                 memcpy(pcmd, ((struct lpfc_dmabuf *) oldiocb->context2)->virt,
3226                        sizeof(uint32_t) + sizeof(PRLO));
3227                 *((uint32_t *) (pcmd)) = ELS_CMD_PRLO_ACC;
3228                 els_pkt_ptr = (ELS_PKT *) pcmd;
3229                 els_pkt_ptr->un.prlo.acceptRspCode = PRLO_REQ_EXECUTED;
3230
3231                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
3232                         "Issue ACC PRLO:  did:x%x flg:x%x",
3233                         ndlp->nlp_DID, ndlp->nlp_flag, 0);
3234                 break;
3235         default:
3236                 return 1;
3237         }
3238         /* Xmit ELS ACC response tag <ulpIoTag> */
3239         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
3240                          "0128 Xmit ELS ACC response tag x%x, XRI: x%x, "
3241                          "DID: x%x, nlp_flag: x%x nlp_state: x%x RPI: x%x\n",
3242                          elsiocb->iotag, elsiocb->iocb.ulpContext,
3243                          ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
3244                          ndlp->nlp_rpi);
3245         if (ndlp->nlp_flag & NLP_LOGO_ACC) {
3246                 spin_lock_irq(shost->host_lock);
3247                 ndlp->nlp_flag &= ~NLP_LOGO_ACC;
3248                 spin_unlock_irq(shost->host_lock);
3249                 elsiocb->iocb_cmpl = lpfc_cmpl_els_logo_acc;
3250         } else {
3251                 elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
3252         }
3253
3254         phba->fc_stat.elsXmitACC++;
3255         rc = lpfc_sli_issue_iocb(phba, pring, elsiocb, 0);
3256         if (rc == IOCB_ERROR) {
3257                 lpfc_els_free_iocb(phba, elsiocb);
3258                 return 1;
3259         }
3260         return 0;
3261 }
3262
3263 /**
3264  * lpfc_els_rsp_reject: Propare and issue a rjt response iocb command.
3265  * @vport: pointer to a virtual N_Port data structure.
3266  * @rejectError:
3267  * @oldiocb: pointer to the original lpfc command iocb data structure.
3268  * @ndlp: pointer to a node-list data structure.
3269  * @mbox: pointer to the driver internal queue element for mailbox command.
3270  *
3271  * This routine prepares and issue an Reject (RJT) response IOCB
3272  * command. If a @mbox pointer is passed in, it will be put into the
3273  * context_un.mbox field of the IOCB for the completion callback function
3274  * to issue to the HBA later.
3275  *
3276  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
3277  * will be incremented by 1 for holding the ndlp and the reference to ndlp
3278  * will be stored into the context1 field of the IOCB for the completion
3279  * callback function to the reject response ELS IOCB command.
3280  *
3281  * Return code
3282  *   0 - Successfully issued reject response
3283  *   1 - Failed to issue reject response
3284  **/
3285 int
3286 lpfc_els_rsp_reject(struct lpfc_vport *vport, uint32_t rejectError,
3287                     struct lpfc_iocbq *oldiocb, struct lpfc_nodelist *ndlp,
3288                     LPFC_MBOXQ_t *mbox)
3289 {
3290         struct lpfc_hba  *phba = vport->phba;
3291         IOCB_t *icmd;
3292         IOCB_t *oldcmd;
3293         struct lpfc_iocbq *elsiocb;
3294         struct lpfc_sli_ring *pring;
3295         struct lpfc_sli *psli;
3296         uint8_t *pcmd;
3297         uint16_t cmdsize;
3298         int rc;
3299
3300         psli = &phba->sli;
3301         pring = &psli->ring[LPFC_ELS_RING];     /* ELS ring */
3302
3303         cmdsize = 2 * sizeof(uint32_t);
3304         elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
3305                                      ndlp->nlp_DID, ELS_CMD_LS_RJT);
3306         if (!elsiocb)
3307                 return 1;
3308
3309         icmd = &elsiocb->iocb;
3310         oldcmd = &oldiocb->iocb;
3311         icmd->ulpContext = oldcmd->ulpContext;  /* Xri */
3312         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
3313
3314         *((uint32_t *) (pcmd)) = ELS_CMD_LS_RJT;
3315         pcmd += sizeof(uint32_t);
3316         *((uint32_t *) (pcmd)) = rejectError;
3317
3318         if (mbox)
3319                 elsiocb->context_un.mbox = mbox;
3320
3321         /* Xmit ELS RJT <err> response tag <ulpIoTag> */
3322         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
3323                          "0129 Xmit ELS RJT x%x response tag x%x "
3324                          "xri x%x, did x%x, nlp_flag x%x, nlp_state x%x, "
3325                          "rpi x%x\n",
3326                          rejectError, elsiocb->iotag,
3327                          elsiocb->iocb.ulpContext, ndlp->nlp_DID,
3328                          ndlp->nlp_flag, ndlp->nlp_state, ndlp->nlp_rpi);
3329         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
3330                 "Issue LS_RJT:    did:x%x flg:x%x err:x%x",
3331                 ndlp->nlp_DID, ndlp->nlp_flag, rejectError);
3332
3333         phba->fc_stat.elsXmitLSRJT++;
3334         elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
3335         rc = lpfc_sli_issue_iocb(phba, pring, elsiocb, 0);
3336
3337         if (rc == IOCB_ERROR) {
3338                 lpfc_els_free_iocb(phba, elsiocb);
3339                 return 1;
3340         }
3341         return 0;
3342 }
3343
3344 /**
3345  * lpfc_els_rsp_adisc_acc: Prepare and issue acc response to adisc iocb cmd.
3346  * @vport: pointer to a virtual N_Port data structure.
3347  * @oldiocb: pointer to the original lpfc command iocb data structure.
3348  * @ndlp: pointer to a node-list data structure.
3349  *
3350  * This routine prepares and issues an Accept (ACC) response to Address
3351  * Discover (ADISC) ELS command. It simply prepares the payload of the IOCB
3352  * and invokes the lpfc_sli_issue_iocb() routine to send out the command.
3353  *
3354  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
3355  * will be incremented by 1 for holding the ndlp and the reference to ndlp
3356  * will be stored into the context1 field of the IOCB for the completion
3357  * callback function to the ADISC Accept response ELS IOCB command.
3358  *
3359  * Return code
3360  *   0 - Successfully issued acc adisc response
3361  *   1 - Failed to issue adisc acc response
3362  **/
3363 int
3364 lpfc_els_rsp_adisc_acc(struct lpfc_vport *vport, struct lpfc_iocbq *oldiocb,
3365                        struct lpfc_nodelist *ndlp)
3366 {
3367         struct lpfc_hba  *phba = vport->phba;
3368         struct lpfc_sli  *psli = &phba->sli;
3369         struct lpfc_sli_ring *pring = &psli->ring[LPFC_ELS_RING];
3370         ADISC *ap;
3371         IOCB_t *icmd, *oldcmd;
3372         struct lpfc_iocbq *elsiocb;
3373         uint8_t *pcmd;
3374         uint16_t cmdsize;
3375         int rc;
3376
3377         cmdsize = sizeof(uint32_t) + sizeof(ADISC);
3378         elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
3379                                      ndlp->nlp_DID, ELS_CMD_ACC);
3380         if (!elsiocb)
3381                 return 1;
3382
3383         icmd = &elsiocb->iocb;
3384         oldcmd = &oldiocb->iocb;
3385         icmd->ulpContext = oldcmd->ulpContext;  /* Xri */
3386
3387         /* Xmit ADISC ACC response tag <ulpIoTag> */
3388         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
3389                          "0130 Xmit ADISC ACC response iotag x%x xri: "
3390                          "x%x, did x%x, nlp_flag x%x, nlp_state x%x rpi x%x\n",
3391                          elsiocb->iotag, elsiocb->iocb.ulpContext,
3392                          ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
3393                          ndlp->nlp_rpi);
3394         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
3395
3396         *((uint32_t *) (pcmd)) = ELS_CMD_ACC;
3397         pcmd += sizeof(uint32_t);
3398
3399         ap = (ADISC *) (pcmd);
3400         ap->hardAL_PA = phba->fc_pref_ALPA;
3401         memcpy(&ap->portName, &vport->fc_portname, sizeof(struct lpfc_name));
3402         memcpy(&ap->nodeName, &vport->fc_nodename, sizeof(struct lpfc_name));
3403         ap->DID = be32_to_cpu(vport->fc_myDID);
3404
3405         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
3406                 "Issue ACC ADISC: did:x%x flg:x%x",
3407                 ndlp->nlp_DID, ndlp->nlp_flag, 0);
3408
3409         phba->fc_stat.elsXmitACC++;
3410         elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
3411         rc = lpfc_sli_issue_iocb(phba, pring, elsiocb, 0);
3412         if (rc == IOCB_ERROR) {
3413                 lpfc_els_free_iocb(phba, elsiocb);
3414                 return 1;
3415         }
3416         return 0;
3417 }
3418
3419 /**
3420  * lpfc_els_rsp_prli_acc: Prepare and issue acc response to prli iocb cmd.
3421  * @vport: pointer to a virtual N_Port data structure.
3422  * @oldiocb: pointer to the original lpfc command iocb data structure.
3423  * @ndlp: pointer to a node-list data structure.
3424  *
3425  * This routine prepares and issues an Accept (ACC) response to Process
3426  * Login (PRLI) ELS command. It simply prepares the payload of the IOCB
3427  * and invokes the lpfc_sli_issue_iocb() routine to send out the command.
3428  *
3429  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
3430  * will be incremented by 1 for holding the ndlp and the reference to ndlp
3431  * will be stored into the context1 field of the IOCB for the completion
3432  * callback function to the PRLI Accept response ELS IOCB command.
3433  *
3434  * Return code
3435  *   0 - Successfully issued acc prli response
3436  *   1 - Failed to issue acc prli response
3437  **/
3438 int
3439 lpfc_els_rsp_prli_acc(struct lpfc_vport *vport, struct lpfc_iocbq *oldiocb,
3440                       struct lpfc_nodelist *ndlp)
3441 {
3442         struct lpfc_hba  *phba = vport->phba;
3443         PRLI *npr;
3444         lpfc_vpd_t *vpd;
3445         IOCB_t *icmd;
3446         IOCB_t *oldcmd;
3447         struct lpfc_iocbq *elsiocb;
3448         struct lpfc_sli_ring *pring;
3449         struct lpfc_sli *psli;
3450         uint8_t *pcmd;
3451         uint16_t cmdsize;
3452         int rc;
3453
3454         psli = &phba->sli;
3455         pring = &psli->ring[LPFC_ELS_RING];     /* ELS ring */
3456
3457         cmdsize = sizeof(uint32_t) + sizeof(PRLI);
3458         elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
3459                 ndlp->nlp_DID, (ELS_CMD_ACC | (ELS_CMD_PRLI & ~ELS_RSP_MASK)));
3460         if (!elsiocb)
3461                 return 1;
3462
3463         icmd = &elsiocb->iocb;
3464         oldcmd = &oldiocb->iocb;
3465         icmd->ulpContext = oldcmd->ulpContext;  /* Xri */
3466         /* Xmit PRLI ACC response tag <ulpIoTag> */
3467         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
3468                          "0131 Xmit PRLI ACC response tag x%x xri x%x, "
3469                          "did x%x, nlp_flag x%x, nlp_state x%x, rpi x%x\n",
3470                          elsiocb->iotag, elsiocb->iocb.ulpContext,
3471                          ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
3472                          ndlp->nlp_rpi);
3473         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
3474
3475         *((uint32_t *) (pcmd)) = (ELS_CMD_ACC | (ELS_CMD_PRLI & ~ELS_RSP_MASK));
3476         pcmd += sizeof(uint32_t);
3477
3478         /* For PRLI, remainder of payload is PRLI parameter page */
3479         memset(pcmd, 0, sizeof(PRLI));
3480
3481         npr = (PRLI *) pcmd;
3482         vpd = &phba->vpd;
3483         /*
3484          * If the remote port is a target and our firmware version is 3.20 or
3485          * later, set the following bits for FC-TAPE support.
3486          */
3487         if ((ndlp->nlp_type & NLP_FCP_TARGET) &&
3488             (vpd->rev.feaLevelHigh >= 0x02)) {
3489                 npr->ConfmComplAllowed = 1;
3490                 npr->Retry = 1;
3491                 npr->TaskRetryIdReq = 1;
3492         }
3493
3494         npr->acceptRspCode = PRLI_REQ_EXECUTED;
3495         npr->estabImagePair = 1;
3496         npr->readXferRdyDis = 1;
3497         npr->ConfmComplAllowed = 1;
3498
3499         npr->prliType = PRLI_FCP_TYPE;
3500         npr->initiatorFunc = 1;
3501
3502         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
3503                 "Issue ACC PRLI:  did:x%x flg:x%x",
3504                 ndlp->nlp_DID, ndlp->nlp_flag, 0);
3505
3506         phba->fc_stat.elsXmitACC++;
3507         elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
3508
3509         rc = lpfc_sli_issue_iocb(phba, pring, elsiocb, 0);
3510         if (rc == IOCB_ERROR) {
3511                 lpfc_els_free_iocb(phba, elsiocb);
3512                 return 1;
3513         }
3514         return 0;
3515 }
3516
3517 /**
3518  * lpfc_els_rsp_rnid_acc: Issue rnid acc response iocb command.
3519  * @vport: pointer to a virtual N_Port data structure.
3520  * @format: rnid command format.
3521  * @oldiocb: pointer to the original lpfc command iocb data structure.
3522  * @ndlp: pointer to a node-list data structure.
3523  *
3524  * This routine issues a Request Node Identification Data (RNID) Accept
3525  * (ACC) response. It constructs the RNID ACC response command according to
3526  * the proper @format and then calls the lpfc_sli_issue_iocb() routine to
3527  * issue the response. Note that this command does not need to hold the ndlp
3528  * reference count for the callback. So, the ndlp reference count taken by
3529  * the lpfc_prep_els_iocb() routine is put back and the context1 field of
3530  * IOCB is set to NULL to indicate to the lpfc_els_free_iocb() routine that
3531  * there is no ndlp reference available.
3532  *
3533  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
3534  * will be incremented by 1 for holding the ndlp and the reference to ndlp
3535  * will be stored into the context1 field of the IOCB for the completion
3536  * callback function. However, for the RNID Accept Response ELS command,
3537  * this is undone later by this routine after the IOCB is allocated.
3538  *
3539  * Return code
3540  *   0 - Successfully issued acc rnid response
3541  *   1 - Failed to issue acc rnid response
3542  **/
3543 static int
3544 lpfc_els_rsp_rnid_acc(struct lpfc_vport *vport, uint8_t format,
3545                       struct lpfc_iocbq *oldiocb, struct lpfc_nodelist *ndlp)
3546 {
3547         struct lpfc_hba  *phba = vport->phba;
3548         RNID *rn;
3549         IOCB_t *icmd, *oldcmd;
3550         struct lpfc_iocbq *elsiocb;
3551         struct lpfc_sli_ring *pring;
3552         struct lpfc_sli *psli;
3553         uint8_t *pcmd;
3554         uint16_t cmdsize;
3555         int rc;
3556
3557         psli = &phba->sli;
3558         pring = &psli->ring[LPFC_ELS_RING];
3559
3560         cmdsize = sizeof(uint32_t) + sizeof(uint32_t)
3561                                         + (2 * sizeof(struct lpfc_name));
3562         if (format)
3563                 cmdsize += sizeof(RNID_TOP_DISC);
3564
3565         elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
3566                                      ndlp->nlp_DID, ELS_CMD_ACC);
3567         if (!elsiocb)
3568                 return 1;
3569
3570         icmd = &elsiocb->iocb;
3571         oldcmd = &oldiocb->iocb;
3572         icmd->ulpContext = oldcmd->ulpContext;  /* Xri */
3573         /* Xmit RNID ACC response tag <ulpIoTag> */
3574         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
3575                          "0132 Xmit RNID ACC response tag x%x xri x%x\n",
3576                          elsiocb->iotag, elsiocb->iocb.ulpContext);
3577         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
3578         *((uint32_t *) (pcmd)) = ELS_CMD_ACC;
3579         pcmd += sizeof(uint32_t);
3580
3581         memset(pcmd, 0, sizeof(RNID));
3582         rn = (RNID *) (pcmd);
3583         rn->Format = format;
3584         rn->CommonLen = (2 * sizeof(struct lpfc_name));
3585         memcpy(&rn->portName, &vport->fc_portname, sizeof(struct lpfc_name));
3586         memcpy(&rn->nodeName, &vport->fc_nodename, sizeof(struct lpfc_name));
3587         switch (format) {
3588         case 0:
3589                 rn->SpecificLen = 0;
3590                 break;
3591         case RNID_TOPOLOGY_DISC:
3592                 rn->SpecificLen = sizeof(RNID_TOP_DISC);
3593                 memcpy(&rn->un.topologyDisc.portName,
3594                        &vport->fc_portname, sizeof(struct lpfc_name));
3595                 rn->un.topologyDisc.unitType = RNID_HBA;
3596                 rn->un.topologyDisc.physPort = 0;
3597                 rn->un.topologyDisc.attachedNodes = 0;
3598                 break;
3599         default:
3600                 rn->CommonLen = 0;
3601                 rn->SpecificLen = 0;
3602                 break;
3603         }
3604
3605         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_RSP,
3606                 "Issue ACC RNID:  did:x%x flg:x%x",
3607                 ndlp->nlp_DID, ndlp->nlp_flag, 0);
3608
3609         phba->fc_stat.elsXmitACC++;
3610         elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
3611         lpfc_nlp_put(ndlp);
3612         elsiocb->context1 = NULL;  /* Don't need ndlp for cmpl,
3613                                     * it could be freed */
3614
3615         rc = lpfc_sli_issue_iocb(phba, pring, elsiocb, 0);
3616         if (rc == IOCB_ERROR) {
3617                 lpfc_els_free_iocb(phba, elsiocb);
3618                 return 1;
3619         }
3620         return 0;
3621 }
3622
3623 /**
3624  * lpfc_els_disc_adisc: Issue remaining adisc iocbs to npr nodes of a vport.
3625  * @vport: pointer to a host virtual N_Port data structure.
3626  *
3627  * This routine issues Address Discover (ADISC) ELS commands to those
3628  * N_Ports which are in node port recovery state and ADISC has not been issued
3629  * for the @vport. Each time an ELS ADISC IOCB is issued by invoking the
3630  * lpfc_issue_els_adisc() routine, the per @vport number of discover count
3631  * (num_disc_nodes) shall be incremented. If the num_disc_nodes reaches a
3632  * pre-configured threshold (cfg_discovery_threads), the @vport fc_flag will
3633  * be marked with FC_NLP_MORE bit and the process of issuing remaining ADISC
3634  * IOCBs quit for later pick up. On the other hand, after walking through
3635  * all the ndlps with the @vport and there is none ADISC IOCB issued, the
3636  * @vport fc_flag shall be cleared with FC_NLP_MORE bit indicating there is
3637  * no more ADISC need to be sent.
3638  *
3639  * Return code
3640  *    The number of N_Ports with adisc issued.
3641  **/
3642 int
3643 lpfc_els_disc_adisc(struct lpfc_vport *vport)
3644 {
3645         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
3646         struct lpfc_nodelist *ndlp, *next_ndlp;
3647         int sentadisc = 0;
3648
3649         /* go thru NPR nodes and issue any remaining ELS ADISCs */
3650         list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes, nlp_listp) {
3651                 if (!NLP_CHK_NODE_ACT(ndlp))
3652                         continue;
3653                 if (ndlp->nlp_state == NLP_STE_NPR_NODE &&
3654                     (ndlp->nlp_flag & NLP_NPR_2B_DISC) != 0 &&
3655                     (ndlp->nlp_flag & NLP_NPR_ADISC) != 0) {
3656                         spin_lock_irq(shost->host_lock);
3657                         ndlp->nlp_flag &= ~NLP_NPR_ADISC;
3658                         spin_unlock_irq(shost->host_lock);
3659                         ndlp->nlp_prev_state = ndlp->nlp_state;
3660                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_ADISC_ISSUE);
3661                         lpfc_issue_els_adisc(vport, ndlp, 0);
3662                         sentadisc++;
3663                         vport->num_disc_nodes++;
3664                         if (vport->num_disc_nodes >=
3665                             vport->cfg_discovery_threads) {
3666                                 spin_lock_irq(shost->host_lock);
3667                                 vport->fc_flag |= FC_NLP_MORE;
3668                                 spin_unlock_irq(shost->host_lock);
3669                                 break;
3670                         }
3671                 }
3672         }
3673         if (sentadisc == 0) {
3674                 spin_lock_irq(shost->host_lock);
3675                 vport->fc_flag &= ~FC_NLP_MORE;
3676                 spin_unlock_irq(shost->host_lock);
3677         }
3678         return sentadisc;
3679 }
3680
3681 /**
3682  * lpfc_els_disc_plogi: Issue plogi for all npr nodes of a vport before adisc.
3683  * @vport: pointer to a host virtual N_Port data structure.
3684  *
3685  * This routine issues Port Login (PLOGI) ELS commands to all the N_Ports
3686  * which are in node port recovery state, with a @vport. Each time an ELS
3687  * ADISC PLOGI IOCB is issued by invoking the lpfc_issue_els_plogi() routine,
3688  * the per @vport number of discover count (num_disc_nodes) shall be
3689  * incremented. If the num_disc_nodes reaches a pre-configured threshold
3690  * (cfg_discovery_threads), the @vport fc_flag will be marked with FC_NLP_MORE
3691  * bit set and quit the process of issuing remaining ADISC PLOGIN IOCBs for
3692  * later pick up. On the other hand, after walking through all the ndlps with
3693  * the @vport and there is none ADISC PLOGI IOCB issued, the @vport fc_flag
3694  * shall be cleared with the FC_NLP_MORE bit indicating there is no more ADISC
3695  * PLOGI need to be sent.
3696  *
3697  * Return code
3698  *   The number of N_Ports with plogi issued.
3699  **/
3700 int
3701 lpfc_els_disc_plogi(struct lpfc_vport *vport)
3702 {
3703         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
3704         struct lpfc_nodelist *ndlp, *next_ndlp;
3705         int sentplogi = 0;
3706
3707         /* go thru NPR nodes and issue any remaining ELS PLOGIs */
3708         list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes, nlp_listp) {
3709                 if (!NLP_CHK_NODE_ACT(ndlp))
3710                         continue;
3711                 if (ndlp->nlp_state == NLP_STE_NPR_NODE &&
3712                     (ndlp->nlp_flag & NLP_NPR_2B_DISC) != 0 &&
3713                     (ndlp->nlp_flag & NLP_DELAY_TMO) == 0 &&
3714                     (ndlp->nlp_flag & NLP_NPR_ADISC) == 0) {
3715                         ndlp->nlp_prev_state = ndlp->nlp_state;
3716                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_PLOGI_ISSUE);
3717                         lpfc_issue_els_plogi(vport, ndlp->nlp_DID, 0);
3718                         sentplogi++;
3719                         vport->num_disc_nodes++;
3720                         if (vport->num_disc_nodes >=
3721                             vport->cfg_discovery_threads) {
3722                                 spin_lock_irq(shost->host_lock);
3723                                 vport->fc_flag |= FC_NLP_MORE;
3724                                 spin_unlock_irq(shost->host_lock);
3725                                 break;
3726                         }
3727                 }
3728         }
3729         if (sentplogi) {
3730                 lpfc_set_disctmo(vport);
3731         }
3732         else {
3733                 spin_lock_irq(shost->host_lock);
3734                 vport->fc_flag &= ~FC_NLP_MORE;
3735                 spin_unlock_irq(shost->host_lock);
3736         }
3737         return sentplogi;
3738 }
3739
3740 /**
3741  * lpfc_els_flush_rscn: Clean up any rscn activities with a vport.
3742  * @vport: pointer to a host virtual N_Port data structure.
3743  *
3744  * This routine cleans up any Registration State Change Notification
3745  * (RSCN) activity with a @vport. Note that the fc_rscn_flush flag of the
3746  * @vport together with the host_lock is used to prevent multiple thread
3747  * trying to access the RSCN array on a same @vport at the same time.
3748  **/
3749 void
3750 lpfc_els_flush_rscn(struct lpfc_vport *vport)
3751 {
3752         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
3753         struct lpfc_hba  *phba = vport->phba;
3754         int i;
3755
3756         spin_lock_irq(shost->host_lock);
3757         if (vport->fc_rscn_flush) {
3758                 /* Another thread is walking fc_rscn_id_list on this vport */
3759                 spin_unlock_irq(shost->host_lock);
3760                 return;
3761         }
3762         /* Indicate we are walking lpfc_els_flush_rscn on this vport */
3763         vport->fc_rscn_flush = 1;
3764         spin_unlock_irq(shost->host_lock);
3765
3766         for (i = 0; i < vport->fc_rscn_id_cnt; i++) {
3767                 lpfc_in_buf_free(phba, vport->fc_rscn_id_list[i]);
3768                 vport->fc_rscn_id_list[i] = NULL;
3769         }
3770         spin_lock_irq(shost->host_lock);
3771         vport->fc_rscn_id_cnt = 0;
3772         vport->fc_flag &= ~(FC_RSCN_MODE | FC_RSCN_DISCOVERY);
3773         spin_unlock_irq(shost->host_lock);
3774         lpfc_can_disctmo(vport);
3775         /* Indicate we are done walking this fc_rscn_id_list */
3776         vport->fc_rscn_flush = 0;
3777 }
3778
3779 /**
3780  * lpfc_rscn_payload_check: Check whether there is a pending rscn to a did.
3781  * @vport: pointer to a host virtual N_Port data structure.
3782  * @did: remote destination port identifier.
3783  *
3784  * This routine checks whether there is any pending Registration State
3785  * Configuration Notification (RSCN) to a @did on @vport.
3786  *
3787  * Return code
3788  *   None zero - The @did matched with a pending rscn
3789  *   0 - not able to match @did with a pending rscn
3790  **/
3791 int
3792 lpfc_rscn_payload_check(struct lpfc_vport *vport, uint32_t did)
3793 {
3794         D_ID ns_did;
3795         D_ID rscn_did;
3796         uint32_t *lp;
3797         uint32_t payload_len, i;
3798         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
3799
3800         ns_did.un.word = did;
3801
3802         /* Never match fabric nodes for RSCNs */
3803         if ((did & Fabric_DID_MASK) == Fabric_DID_MASK)
3804                 return 0;
3805
3806         /* If we are doing a FULL RSCN rediscovery, match everything */
3807         if (vport->fc_flag & FC_RSCN_DISCOVERY)
3808                 return did;
3809
3810         spin_lock_irq(shost->host_lock);
3811         if (vport->fc_rscn_flush) {
3812                 /* Another thread is walking fc_rscn_id_list on this vport */
3813                 spin_unlock_irq(shost->host_lock);
3814                 return 0;
3815         }
3816         /* Indicate we are walking fc_rscn_id_list on this vport */
3817         vport->fc_rscn_flush = 1;
3818         spin_unlock_irq(shost->host_lock);
3819         for (i = 0; i < vport->fc_rscn_id_cnt; i++) {
3820                 lp = vport->fc_rscn_id_list[i]->virt;
3821                 payload_len = be32_to_cpu(*lp++ & ~ELS_CMD_MASK);
3822                 payload_len -= sizeof(uint32_t);        /* take off word 0 */
3823                 while (payload_len) {
3824                         rscn_did.un.word = be32_to_cpu(*lp++);
3825                         payload_len -= sizeof(uint32_t);
3826                         switch (rscn_did.un.b.resv) {
3827                         case 0: /* Single N_Port ID effected */
3828                                 if (ns_did.un.word == rscn_did.un.word)
3829                                         goto return_did_out;
3830                                 break;
3831                         case 1: /* Whole N_Port Area effected */
3832                                 if ((ns_did.un.b.domain == rscn_did.un.b.domain)
3833                                     && (ns_did.un.b.area == rscn_did.un.b.area))
3834                                         goto return_did_out;
3835                                 break;
3836                         case 2: /* Whole N_Port Domain effected */
3837                                 if (ns_did.un.b.domain == rscn_did.un.b.domain)
3838                                         goto return_did_out;
3839                                 break;
3840                         default:
3841                                 /* Unknown Identifier in RSCN node */
3842                                 lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
3843                                                  "0217 Unknown Identifier in "
3844                                                  "RSCN payload Data: x%x\n",
3845                                                  rscn_did.un.word);
3846                         case 3: /* Whole Fabric effected */
3847                                 goto return_did_out;
3848                         }
3849                 }
3850         }
3851         /* Indicate we are done with walking fc_rscn_id_list on this vport */
3852         vport->fc_rscn_flush = 0;
3853         return 0;
3854 return_did_out:
3855         /* Indicate we are done with walking fc_rscn_id_list on this vport */
3856         vport->fc_rscn_flush = 0;
3857         return did;
3858 }
3859
3860 /**
3861  * lpfc_rscn_recovery_check: Send recovery event to vport nodes matching rscn
3862  * @vport: pointer to a host virtual N_Port data structure.
3863  *
3864  * This routine sends recovery (NLP_EVT_DEVICE_RECOVERY) event to the
3865  * state machine for a @vport's nodes that are with pending RSCN (Registration
3866  * State Change Notification).
3867  *
3868  * Return code
3869  *   0 - Successful (currently alway return 0)
3870  **/
3871 static int
3872 lpfc_rscn_recovery_check(struct lpfc_vport *vport)
3873 {
3874         struct lpfc_nodelist *ndlp = NULL;
3875
3876         /* Move all affected nodes by pending RSCNs to NPR state. */
3877         list_for_each_entry(ndlp, &vport->fc_nodes, nlp_listp) {
3878                 if (!NLP_CHK_NODE_ACT(ndlp) ||
3879                     (ndlp->nlp_state == NLP_STE_UNUSED_NODE) ||
3880                     !lpfc_rscn_payload_check(vport, ndlp->nlp_DID))
3881                         continue;
3882                 lpfc_disc_state_machine(vport, ndlp, NULL,
3883                                         NLP_EVT_DEVICE_RECOVERY);
3884                 lpfc_cancel_retry_delay_tmo(vport, ndlp);
3885         }
3886         return 0;
3887 }
3888
3889 /**
3890  * lpfc_els_rcv_rscn: Process an unsolicited rscn iocb.
3891  * @vport: pointer to a host virtual N_Port data structure.
3892  * @cmdiocb: pointer to lpfc command iocb data structure.
3893  * @ndlp: pointer to a node-list data structure.
3894  *
3895  * This routine processes an unsolicited RSCN (Registration State Change
3896  * Notification) IOCB. First, the payload of the unsolicited RSCN is walked
3897  * to invoke fc_host_post_event() routine to the FC transport layer. If the
3898  * discover state machine is about to begin discovery, it just accepts the
3899  * RSCN and the discovery process will satisfy the RSCN. If this RSCN only
3900  * contains N_Port IDs for other vports on this HBA, it just accepts the
3901  * RSCN and ignore processing it. If the state machine is in the recovery
3902  * state, the fc_rscn_id_list of this @vport is walked and the
3903  * lpfc_rscn_recovery_check() routine is invoked to send recovery event for
3904  * all nodes that match RSCN payload. Otherwise, the lpfc_els_handle_rscn()
3905  * routine is invoked to handle the RSCN event.
3906  *
3907  * Return code
3908  *   0 - Just sent the acc response
3909  *   1 - Sent the acc response and waited for name server completion
3910  **/
3911 static int
3912 lpfc_els_rcv_rscn(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
3913                   struct lpfc_nodelist *ndlp)
3914 {
3915         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
3916         struct lpfc_hba  *phba = vport->phba;
3917         struct lpfc_dmabuf *pcmd;
3918         uint32_t *lp, *datap;
3919         IOCB_t *icmd;
3920         uint32_t payload_len, length, nportid, *cmd;
3921         int rscn_cnt;
3922         int rscn_id = 0, hba_id = 0;
3923         int i;
3924
3925         icmd = &cmdiocb->iocb;
3926         pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
3927         lp = (uint32_t *) pcmd->virt;
3928
3929         payload_len = be32_to_cpu(*lp++ & ~ELS_CMD_MASK);
3930         payload_len -= sizeof(uint32_t);        /* take off word 0 */
3931         /* RSCN received */
3932         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
3933                          "0214 RSCN received Data: x%x x%x x%x x%x\n",
3934                          vport->fc_flag, payload_len, *lp,
3935                          vport->fc_rscn_id_cnt);
3936         for (i = 0; i < payload_len/sizeof(uint32_t); i++)
3937                 fc_host_post_event(shost, fc_get_event_number(),
3938                         FCH_EVT_RSCN, lp[i]);
3939
3940         /* If we are about to begin discovery, just ACC the RSCN.
3941          * Discovery processing will satisfy it.
3942          */
3943         if (vport->port_state <= LPFC_NS_QRY) {
3944                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
3945                         "RCV RSCN ignore: did:x%x/ste:x%x flg:x%x",
3946                         ndlp->nlp_DID, vport->port_state, ndlp->nlp_flag);
3947
3948                 lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
3949                 return 0;
3950         }
3951
3952         /* If this RSCN just contains NPortIDs for other vports on this HBA,
3953          * just ACC and ignore it.
3954          */
3955         if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
3956                 !(vport->cfg_peer_port_login)) {
3957                 i = payload_len;
3958                 datap = lp;
3959                 while (i > 0) {
3960                         nportid = *datap++;
3961                         nportid = ((be32_to_cpu(nportid)) & Mask_DID);
3962                         i -= sizeof(uint32_t);
3963                         rscn_id++;
3964                         if (lpfc_find_vport_by_did(phba, nportid))
3965                                 hba_id++;
3966                 }
3967                 if (rscn_id == hba_id) {
3968                         /* ALL NPortIDs in RSCN are on HBA */
3969                         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
3970                                          "0219 Ignore RSCN "
3971                                          "Data: x%x x%x x%x x%x\n",
3972                                          vport->fc_flag, payload_len,
3973                                          *lp, vport->fc_rscn_id_cnt);
3974                         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
3975                                 "RCV RSCN vport:  did:x%x/ste:x%x flg:x%x",
3976                                 ndlp->nlp_DID, vport->port_state,
3977                                 ndlp->nlp_flag);
3978
3979                         lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb,
3980                                 ndlp, NULL);
3981                         return 0;
3982                 }
3983         }
3984
3985         spin_lock_irq(shost->host_lock);
3986         if (vport->fc_rscn_flush) {
3987                 /* Another thread is walking fc_rscn_id_list on this vport */
3988                 spin_unlock_irq(shost->host_lock);
3989                 vport->fc_flag |= FC_RSCN_DISCOVERY;
3990                 /* Send back ACC */
3991                 lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
3992                 return 0;
3993         }
3994         /* Indicate we are walking fc_rscn_id_list on this vport */
3995         vport->fc_rscn_flush = 1;
3996         spin_unlock_irq(shost->host_lock);
3997         /* Get the array count after sucessfully have the token */
3998         rscn_cnt = vport->fc_rscn_id_cnt;
3999         /* If we are already processing an RSCN, save the received
4000          * RSCN payload buffer, cmdiocb->context2 to process later.
4001          */
4002         if (vport->fc_flag & (FC_RSCN_MODE | FC_NDISC_ACTIVE)) {
4003                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
4004                         "RCV RSCN defer:  did:x%x/ste:x%x flg:x%x",
4005                         ndlp->nlp_DID, vport->port_state, ndlp->nlp_flag);
4006
4007                 spin_lock_irq(shost->host_lock);
4008                 vport->fc_flag |= FC_RSCN_DEFERRED;
4009                 if ((rscn_cnt < FC_MAX_HOLD_RSCN) &&
4010                     !(vport->fc_flag & FC_RSCN_DISCOVERY)) {
4011                         vport->fc_flag |= FC_RSCN_MODE;
4012                         spin_unlock_irq(shost->host_lock);
4013                         if (rscn_cnt) {
4014                                 cmd = vport->fc_rscn_id_list[rscn_cnt-1]->virt;
4015                                 length = be32_to_cpu(*cmd & ~ELS_CMD_MASK);
4016                         }
4017                         if ((rscn_cnt) &&
4018                             (payload_len + length <= LPFC_BPL_SIZE)) {
4019                                 *cmd &= ELS_CMD_MASK;
4020                                 *cmd |= cpu_to_be32(payload_len + length);
4021                                 memcpy(((uint8_t *)cmd) + length, lp,
4022                                        payload_len);
4023                         } else {
4024                                 vport->fc_rscn_id_list[rscn_cnt] = pcmd;
4025                                 vport->fc_rscn_id_cnt++;
4026                                 /* If we zero, cmdiocb->context2, the calling
4027                                  * routine will not try to free it.
4028                                  */
4029                                 cmdiocb->context2 = NULL;
4030                         }
4031                         /* Deferred RSCN */
4032                         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
4033                                          "0235 Deferred RSCN "
4034                                          "Data: x%x x%x x%x\n",
4035                                          vport->fc_rscn_id_cnt, vport->fc_flag,
4036                                          vport->port_state);
4037                 } else {
4038                         vport->fc_flag |= FC_RSCN_DISCOVERY;
4039                         spin_unlock_irq(shost->host_lock);
4040                         /* ReDiscovery RSCN */
4041                         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
4042                                          "0234 ReDiscovery RSCN "
4043                                          "Data: x%x x%x x%x\n",
4044                                          vport->fc_rscn_id_cnt, vport->fc_flag,
4045                                          vport->port_state);
4046                 }
4047                 /* Indicate we are done walking fc_rscn_id_list on this vport */
4048                 vport->fc_rscn_flush = 0;
4049                 /* Send back ACC */
4050                 lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
4051                 /* send RECOVERY event for ALL nodes that match RSCN payload */
4052                 lpfc_rscn_recovery_check(vport);
4053                 spin_lock_irq(shost->host_lock);
4054                 vport->fc_flag &= ~FC_RSCN_DEFERRED;
4055                 spin_unlock_irq(shost->host_lock);
4056                 return 0;
4057         }
4058         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
4059                 "RCV RSCN:        did:x%x/ste:x%x flg:x%x",
4060                 ndlp->nlp_DID, vport->port_state, ndlp->nlp_flag);
4061
4062         spin_lock_irq(shost->host_lock);
4063         vport->fc_flag |= FC_RSCN_MODE;
4064         spin_unlock_irq(shost->host_lock);
4065         vport->fc_rscn_id_list[vport->fc_rscn_id_cnt++] = pcmd;
4066         /* Indicate we are done walking fc_rscn_id_list on this vport */
4067         vport->fc_rscn_flush = 0;
4068         /*
4069          * If we zero, cmdiocb->context2, the calling routine will
4070          * not try to free it.
4071          */
4072         cmdiocb->context2 = NULL;
4073         lpfc_set_disctmo(vport);
4074         /* Send back ACC */
4075         lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
4076         /* send RECOVERY event for ALL nodes that match RSCN payload */
4077         lpfc_rscn_recovery_check(vport);
4078         return lpfc_els_handle_rscn(vport);
4079 }
4080
4081 /**
4082  * lpfc_els_handle_rscn: Handle rscn for a vport.
4083  * @vport: pointer to a host virtual N_Port data structure.
4084  *
4085  * This routine handles the Registration State Configuration Notification
4086  * (RSCN) for a @vport. If login to NameServer does not exist, a new ndlp shall
4087  * be created and a Port Login (PLOGI) to the NameServer is issued. Otherwise,
4088  * if the ndlp to NameServer exists, a Common Transport (CT) command to the
4089  * NameServer shall be issued. If CT command to the NameServer fails to be
4090  * issued, the lpfc_els_flush_rscn() routine shall be invoked to clean up any
4091  * RSCN activities with the @vport.
4092  *
4093  * Return code
4094  *   0 - Cleaned up rscn on the @vport
4095  *   1 - Wait for plogi to name server before proceed
4096  **/
4097 int
4098 lpfc_els_handle_rscn(struct lpfc_vport *vport)
4099 {
4100         struct lpfc_nodelist *ndlp;
4101         struct lpfc_hba *phba = vport->phba;
4102
4103         /* Ignore RSCN if the port is being torn down. */
4104         if (vport->load_flag & FC_UNLOADING) {
4105                 lpfc_els_flush_rscn(vport);
4106                 return 0;
4107         }
4108
4109         /* Start timer for RSCN processing */
4110         lpfc_set_disctmo(vport);
4111
4112         /* RSCN processed */
4113         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
4114                          "0215 RSCN processed Data: x%x x%x x%x x%x\n",
4115                          vport->fc_flag, 0, vport->fc_rscn_id_cnt,
4116                          vport->port_state);
4117
4118         /* To process RSCN, first compare RSCN data with NameServer */
4119         vport->fc_ns_retry = 0;
4120         vport->num_disc_nodes = 0;
4121
4122         ndlp = lpfc_findnode_did(vport, NameServer_DID);
4123         if (ndlp && NLP_CHK_NODE_ACT(ndlp)
4124             && ndlp->nlp_state == NLP_STE_UNMAPPED_NODE) {
4125                 /* Good ndlp, issue CT Request to NameServer */
4126                 if (lpfc_ns_cmd(vport, SLI_CTNS_GID_FT, 0, 0) == 0)
4127                         /* Wait for NameServer query cmpl before we can
4128                            continue */
4129                         return 1;
4130         } else {
4131                 /* If login to NameServer does not exist, issue one */
4132                 /* Good status, issue PLOGI to NameServer */
4133                 ndlp = lpfc_findnode_did(vport, NameServer_DID);
4134                 if (ndlp && NLP_CHK_NODE_ACT(ndlp))
4135                         /* Wait for NameServer login cmpl before we can
4136                            continue */
4137                         return 1;
4138
4139                 if (ndlp) {
4140                         ndlp = lpfc_enable_node(vport, ndlp,
4141                                                 NLP_STE_PLOGI_ISSUE);
4142                         if (!ndlp) {
4143                                 lpfc_els_flush_rscn(vport);
4144                                 return 0;
4145                         }
4146                         ndlp->nlp_prev_state = NLP_STE_UNUSED_NODE;
4147                 } else {
4148                         ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_KERNEL);
4149                         if (!ndlp) {
4150                                 lpfc_els_flush_rscn(vport);
4151                                 return 0;
4152                         }
4153                         lpfc_nlp_init(vport, ndlp, NameServer_DID);
4154                         ndlp->nlp_prev_state = ndlp->nlp_state;
4155                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_PLOGI_ISSUE);
4156                 }
4157                 ndlp->nlp_type |= NLP_FABRIC;
4158                 lpfc_issue_els_plogi(vport, NameServer_DID, 0);
4159                 /* Wait for NameServer login cmpl before we can
4160                  * continue
4161                  */
4162                 return 1;
4163         }
4164
4165         lpfc_els_flush_rscn(vport);
4166         return 0;
4167 }
4168
4169 /**
4170  * lpfc_els_rcv_flogi: Process an unsolicited flogi iocb.
4171  * @vport: pointer to a host virtual N_Port data structure.
4172  * @cmdiocb: pointer to lpfc command iocb data structure.
4173  * @ndlp: pointer to a node-list data structure.
4174  *
4175  * This routine processes Fabric Login (FLOGI) IOCB received as an ELS
4176  * unsolicited event. An unsolicited FLOGI can be received in a point-to-
4177  * point topology. As an unsolicited FLOGI should not be received in a loop
4178  * mode, any unsolicited FLOGI received in loop mode shall be ignored. The
4179  * lpfc_check_sparm() routine is invoked to check the parameters in the
4180  * unsolicited FLOGI. If parameters validation failed, the routine
4181  * lpfc_els_rsp_reject() shall be called with reject reason code set to
4182  * LSEXP_SPARM_OPTIONS to reject the FLOGI. Otherwise, the Port WWN in the
4183  * FLOGI shall be compared with the Port WWN of the @vport to determine who
4184  * will initiate PLOGI. The higher lexicographical value party shall has
4185  * higher priority (as the winning port) and will initiate PLOGI and
4186  * communicate Port_IDs (Addresses) for both nodes in PLOGI. The result
4187  * of this will be marked in the @vport fc_flag field with FC_PT2PT_PLOGI
4188  * and then the lpfc_els_rsp_acc() routine is invoked to accept the FLOGI.
4189  *
4190  * Return code
4191  *   0 - Successfully processed the unsolicited flogi
4192  *   1 - Failed to process the unsolicited flogi
4193  **/
4194 static int
4195 lpfc_els_rcv_flogi(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
4196                    struct lpfc_nodelist *ndlp)
4197 {
4198         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4199         struct lpfc_hba  *phba = vport->phba;
4200         struct lpfc_dmabuf *pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
4201         uint32_t *lp = (uint32_t *) pcmd->virt;
4202         IOCB_t *icmd = &cmdiocb->iocb;
4203         struct serv_parm *sp;
4204         LPFC_MBOXQ_t *mbox;
4205         struct ls_rjt stat;
4206         uint32_t cmd, did;
4207         int rc;
4208
4209         cmd = *lp++;
4210         sp = (struct serv_parm *) lp;
4211
4212         /* FLOGI received */
4213
4214         lpfc_set_disctmo(vport);
4215
4216         if (phba->fc_topology == TOPOLOGY_LOOP) {
4217                 /* We should never receive a FLOGI in loop mode, ignore it */
4218                 did = icmd->un.elsreq64.remoteID;
4219
4220                 /* An FLOGI ELS command <elsCmd> was received from DID <did> in
4221                    Loop Mode */
4222                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
4223                                  "0113 An FLOGI ELS command x%x was "
4224                                  "received from DID x%x in Loop Mode\n",
4225                                  cmd, did);
4226                 return 1;
4227         }
4228
4229         did = Fabric_DID;
4230
4231         if ((lpfc_check_sparm(vport, ndlp, sp, CLASS3))) {
4232                 /* For a FLOGI we accept, then if our portname is greater
4233                  * then the remote portname we initiate Nport login.
4234                  */
4235
4236                 rc = memcmp(&vport->fc_portname, &sp->portName,
4237                             sizeof(struct lpfc_name));
4238
4239                 if (!rc) {
4240                         mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
4241                         if (!mbox)
4242                                 return 1;
4243
4244                         lpfc_linkdown(phba);
4245                         lpfc_init_link(phba, mbox,
4246                                        phba->cfg_topology,
4247                                        phba->cfg_link_speed);
4248                         mbox->mb.un.varInitLnk.lipsr_AL_PA = 0;
4249                         mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
4250                         mbox->vport = vport;
4251                         rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
4252                         lpfc_set_loopback_flag(phba);
4253                         if (rc == MBX_NOT_FINISHED) {
4254                                 mempool_free(mbox, phba->mbox_mem_pool);
4255                         }
4256                         return 1;
4257                 } else if (rc > 0) {    /* greater than */
4258                         spin_lock_irq(shost->host_lock);
4259                         vport->fc_flag |= FC_PT2PT_PLOGI;
4260                         spin_unlock_irq(shost->host_lock);
4261                 }
4262                 spin_lock_irq(shost->host_lock);
4263                 vport->fc_flag |= FC_PT2PT;
4264                 vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
4265                 spin_unlock_irq(shost->host_lock);
4266         } else {
4267                 /* Reject this request because invalid parameters */
4268                 stat.un.b.lsRjtRsvd0 = 0;
4269                 stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
4270                 stat.un.b.lsRjtRsnCodeExp = LSEXP_SPARM_OPTIONS;
4271                 stat.un.b.vendorUnique = 0;
4272                 lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp,
4273                         NULL);
4274                 return 1;
4275         }
4276
4277         /* Send back ACC */
4278         lpfc_els_rsp_acc(vport, ELS_CMD_PLOGI, cmdiocb, ndlp, NULL);
4279
4280         return 0;
4281 }
4282
4283 /**
4284  * lpfc_els_rcv_rnid: Process an unsolicited rnid iocb.
4285  * @vport: pointer to a host virtual N_Port data structure.
4286  * @cmdiocb: pointer to lpfc command iocb data structure.
4287  * @ndlp: pointer to a node-list data structure.
4288  *
4289  * This routine processes Request Node Identification Data (RNID) IOCB
4290  * received as an ELS unsolicited event. Only when the RNID specified format
4291  * 0x0 or 0xDF (Topology Discovery Specific Node Identification Data)
4292  * present, this routine will invoke the lpfc_els_rsp_rnid_acc() routine to
4293  * Accept (ACC) the RNID ELS command. All the other RNID formats are
4294  * rejected by invoking the lpfc_els_rsp_reject() routine.
4295  *
4296  * Return code
4297  *   0 - Successfully processed rnid iocb (currently always return 0)
4298  **/
4299 static int
4300 lpfc_els_rcv_rnid(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
4301                   struct lpfc_nodelist *ndlp)
4302 {
4303         struct lpfc_dmabuf *pcmd;
4304         uint32_t *lp;
4305         IOCB_t *icmd;
4306         RNID *rn;
4307         struct ls_rjt stat;
4308         uint32_t cmd, did;
4309
4310         icmd = &cmdiocb->iocb;
4311         did = icmd->un.elsreq64.remoteID;
4312         pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
4313         lp = (uint32_t *) pcmd->virt;
4314
4315         cmd = *lp++;
4316         rn = (RNID *) lp;
4317
4318         /* RNID received */
4319
4320         switch (rn->Format) {
4321         case 0:
4322         case RNID_TOPOLOGY_DISC:
4323                 /* Send back ACC */
4324                 lpfc_els_rsp_rnid_acc(vport, rn->Format, cmdiocb, ndlp);
4325                 break;
4326         default:
4327                 /* Reject this request because format not supported */
4328                 stat.un.b.lsRjtRsvd0 = 0;
4329                 stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
4330                 stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
4331                 stat.un.b.vendorUnique = 0;
4332                 lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp,
4333                         NULL);
4334         }
4335         return 0;
4336 }
4337
4338 /**
4339  * lpfc_els_rcv_lirr: Process an unsolicited lirr iocb.
4340  * @vport: pointer to a host virtual N_Port data structure.
4341  * @cmdiocb: pointer to lpfc command iocb data structure.
4342  * @ndlp: pointer to a node-list data structure.
4343  *
4344  * This routine processes a Link Incident Report Registration(LIRR) IOCB
4345  * received as an ELS unsolicited event. Currently, this function just invokes
4346  * the lpfc_els_rsp_reject() routine to reject the LIRR IOCB unconditionally.
4347  *
4348  * Return code
4349  *   0 - Successfully processed lirr iocb (currently always return 0)
4350  **/
4351 static int
4352 lpfc_els_rcv_lirr(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
4353                   struct lpfc_nodelist *ndlp)
4354 {
4355         struct ls_rjt stat;
4356
4357         /* For now, unconditionally reject this command */
4358         stat.un.b.lsRjtRsvd0 = 0;
4359         stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
4360         stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
4361         stat.un.b.vendorUnique = 0;
4362         lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp, NULL);
4363         return 0;
4364 }
4365
4366 /**
4367  * lpfc_els_rsp_rps_acc: Completion callbk func for MBX_READ_LNK_STAT mbox cmd.
4368  * @phba: pointer to lpfc hba data structure.
4369  * @pmb: pointer to the driver internal queue element for mailbox command.
4370  *
4371  * This routine is the completion callback function for the MBX_READ_LNK_STAT
4372  * mailbox command. This callback function is to actually send the Accept
4373  * (ACC) response to a Read Port Status (RPS) unsolicited IOCB event. It
4374  * collects the link statistics from the completion of the MBX_READ_LNK_STAT
4375  * mailbox command, constructs the RPS response with the link statistics
4376  * collected, and then invokes the lpfc_sli_issue_iocb() routine to send ACC
4377  * response to the RPS.
4378  *
4379  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
4380  * will be incremented by 1 for holding the ndlp and the reference to ndlp
4381  * will be stored into the context1 field of the IOCB for the completion
4382  * callback function to the RPS Accept Response ELS IOCB command.
4383  *
4384  **/
4385 static void
4386 lpfc_els_rsp_rps_acc(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
4387 {
4388         struct lpfc_sli *psli = &phba->sli;
4389         struct lpfc_sli_ring *pring = &psli->ring[LPFC_ELS_RING];
4390         MAILBOX_t *mb;
4391         IOCB_t *icmd;
4392         RPS_RSP *rps_rsp;
4393         uint8_t *pcmd;
4394         struct lpfc_iocbq *elsiocb;
4395         struct lpfc_nodelist *ndlp;
4396         uint16_t xri, status;
4397         uint32_t cmdsize;
4398
4399         mb = &pmb->mb;
4400
4401         ndlp = (struct lpfc_nodelist *) pmb->context2;
4402         xri = (uint16_t) ((unsigned long)(pmb->context1));
4403         pmb->context1 = NULL;
4404         pmb->context2 = NULL;
4405
4406         if (mb->mbxStatus) {
4407                 mempool_free(pmb, phba->mbox_mem_pool);
4408                 return;
4409         }
4410
4411         cmdsize = sizeof(RPS_RSP) + sizeof(uint32_t);
4412         mempool_free(pmb, phba->mbox_mem_pool);
4413         elsiocb = lpfc_prep_els_iocb(phba->pport, 0, cmdsize,
4414                                      lpfc_max_els_tries, ndlp,
4415                                      ndlp->nlp_DID, ELS_CMD_ACC);
4416
4417         /* Decrement the ndlp reference count from previous mbox command */
4418         lpfc_nlp_put(ndlp);
4419
4420         if (!elsiocb)
4421                 return;
4422
4423         icmd = &elsiocb->iocb;
4424         icmd->ulpContext = xri;
4425
4426         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
4427         *((uint32_t *) (pcmd)) = ELS_CMD_ACC;
4428         pcmd += sizeof(uint32_t); /* Skip past command */
4429         rps_rsp = (RPS_RSP *)pcmd;
4430
4431         if (phba->fc_topology != TOPOLOGY_LOOP)
4432                 status = 0x10;
4433         else
4434                 status = 0x8;
4435         if (phba->pport->fc_flag & FC_FABRIC)
4436                 status |= 0x4;
4437
4438         rps_rsp->rsvd1 = 0;
4439         rps_rsp->portStatus = cpu_to_be16(status);
4440         rps_rsp->linkFailureCnt = cpu_to_be32(mb->un.varRdLnk.linkFailureCnt);
4441         rps_rsp->lossSyncCnt = cpu_to_be32(mb->un.varRdLnk.lossSyncCnt);
4442         rps_rsp->lossSignalCnt = cpu_to_be32(mb->un.varRdLnk.lossSignalCnt);
4443         rps_rsp->primSeqErrCnt = cpu_to_be32(mb->un.varRdLnk.primSeqErrCnt);
4444         rps_rsp->invalidXmitWord = cpu_to_be32(mb->un.varRdLnk.invalidXmitWord);
4445         rps_rsp->crcCnt = cpu_to_be32(mb->un.varRdLnk.crcCnt);
4446         /* Xmit ELS RPS ACC response tag <ulpIoTag> */
4447         lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_ELS,
4448                          "0118 Xmit ELS RPS ACC response tag x%x xri x%x, "
4449                          "did x%x, nlp_flag x%x, nlp_state x%x, rpi x%x\n",
4450                          elsiocb->iotag, elsiocb->iocb.ulpContext,
4451                          ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
4452                          ndlp->nlp_rpi);
4453         elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
4454         phba->fc_stat.elsXmitACC++;
4455         if (lpfc_sli_issue_iocb(phba, pring, elsiocb, 0) == IOCB_ERROR)
4456                 lpfc_els_free_iocb(phba, elsiocb);
4457         return;
4458 }
4459
4460 /**
4461  * lpfc_els_rcv_rps: Process an unsolicited rps iocb.
4462  * @vport: pointer to a host virtual N_Port data structure.
4463  * @cmdiocb: pointer to lpfc command iocb data structure.
4464  * @ndlp: pointer to a node-list data structure.
4465  *
4466  * This routine processes Read Port Status (RPS) IOCB received as an
4467  * ELS unsolicited event. It first checks the remote port state. If the
4468  * remote port is not in NLP_STE_UNMAPPED_NODE state or NLP_STE_MAPPED_NODE
4469  * state, it invokes the lpfc_els_rsp_reject() routine to send the reject
4470  * response. Otherwise, it issue the MBX_READ_LNK_STAT mailbox command
4471  * for reading the HBA link statistics. It is for the callback function,
4472  * lpfc_els_rsp_rps_acc(), set to the MBX_READ_LNK_STAT mailbox command
4473  * to actually sending out RPS Accept (ACC) response.
4474  *
4475  * Return codes
4476  *   0 - Successfully processed rps iocb (currently always return 0)
4477  **/
4478 static int
4479 lpfc_els_rcv_rps(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
4480                  struct lpfc_nodelist *ndlp)
4481 {
4482         struct lpfc_hba *phba = vport->phba;
4483         uint32_t *lp;
4484         uint8_t flag;
4485         LPFC_MBOXQ_t *mbox;
4486         struct lpfc_dmabuf *pcmd;
4487         RPS *rps;
4488         struct ls_rjt stat;
4489
4490         if ((ndlp->nlp_state != NLP_STE_UNMAPPED_NODE) &&
4491             (ndlp->nlp_state != NLP_STE_MAPPED_NODE))
4492                 /* reject the unsolicited RPS request and done with it */
4493                 goto reject_out;
4494
4495         pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
4496         lp = (uint32_t *) pcmd->virt;
4497         flag = (be32_to_cpu(*lp++) & 0xf);
4498         rps = (RPS *) lp;
4499
4500         if ((flag == 0) ||
4501             ((flag == 1) && (be32_to_cpu(rps->un.portNum) == 0)) ||
4502             ((flag == 2) && (memcmp(&rps->un.portName, &vport->fc_portname,
4503                                     sizeof(struct lpfc_name)) == 0))) {
4504
4505                 printk("Fix me....\n");
4506                 dump_stack();
4507                 mbox = mempool_alloc(phba->mbox_mem_pool, GFP_ATOMIC);
4508                 if (mbox) {
4509                         lpfc_read_lnk_stat(phba, mbox);
4510                         mbox->context1 =
4511                             (void *)((unsigned long) cmdiocb->iocb.ulpContext);
4512                         mbox->context2 = lpfc_nlp_get(ndlp);
4513                         mbox->vport = vport;
4514                         mbox->mbox_cmpl = lpfc_els_rsp_rps_acc;
4515                         if (lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT)
4516                                 != MBX_NOT_FINISHED)
4517                                 /* Mbox completion will send ELS Response */
4518                                 return 0;
4519                         /* Decrement reference count used for the failed mbox
4520                          * command.
4521                          */
4522                         lpfc_nlp_put(ndlp);
4523                         mempool_free(mbox, phba->mbox_mem_pool);
4524                 }
4525         }
4526
4527 reject_out:
4528         /* issue rejection response */
4529         stat.un.b.lsRjtRsvd0 = 0;
4530         stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
4531         stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
4532         stat.un.b.vendorUnique = 0;
4533         lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp, NULL);
4534         return 0;
4535 }
4536
4537 /**
4538  * lpfc_els_rsp_rpl_acc: Issue an accept rpl els command.
4539  * @vport: pointer to a host virtual N_Port data structure.
4540  * @cmdsize: size of the ELS command.
4541  * @oldiocb: pointer to the original lpfc command iocb data structure.
4542  * @ndlp: pointer to a node-list data structure.
4543  *
4544  * This routine issuees an Accept (ACC) Read Port List (RPL) ELS command.
4545  * It is to be called by the lpfc_els_rcv_rpl() routine to accept the RPL.
4546  *
4547  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
4548  * will be incremented by 1 for holding the ndlp and the reference to ndlp
4549  * will be stored into the context1 field of the IOCB for the completion
4550  * callback function to the RPL Accept Response ELS command.
4551  *
4552  * Return code
4553  *   0 - Successfully issued ACC RPL ELS command
4554  *   1 - Failed to issue ACC RPL ELS command
4555  **/
4556 static int
4557 lpfc_els_rsp_rpl_acc(struct lpfc_vport *vport, uint16_t cmdsize,
4558                      struct lpfc_iocbq *oldiocb, struct lpfc_nodelist *ndlp)
4559 {
4560         struct lpfc_hba *phba = vport->phba;
4561         IOCB_t *icmd, *oldcmd;
4562         RPL_RSP rpl_rsp;
4563         struct lpfc_iocbq *elsiocb;
4564         struct lpfc_sli *psli = &phba->sli;
4565         struct lpfc_sli_ring *pring = &psli->ring[LPFC_ELS_RING];
4566         uint8_t *pcmd;
4567
4568         elsiocb = lpfc_prep_els_iocb(vport, 0, cmdsize, oldiocb->retry, ndlp,
4569                                      ndlp->nlp_DID, ELS_CMD_ACC);
4570
4571         if (!elsiocb)
4572                 return 1;
4573
4574         icmd = &elsiocb->iocb;
4575         oldcmd = &oldiocb->iocb;
4576         icmd->ulpContext = oldcmd->ulpContext;  /* Xri */
4577
4578         pcmd = (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
4579         *((uint32_t *) (pcmd)) = ELS_CMD_ACC;
4580         pcmd += sizeof(uint16_t);
4581         *((uint16_t *)(pcmd)) = be16_to_cpu(cmdsize);
4582         pcmd += sizeof(uint16_t);
4583
4584         /* Setup the RPL ACC payload */
4585         rpl_rsp.listLen = be32_to_cpu(1);
4586         rpl_rsp.index = 0;
4587         rpl_rsp.port_num_blk.portNum = 0;
4588         rpl_rsp.port_num_blk.portID = be32_to_cpu(vport->fc_myDID);
4589         memcpy(&rpl_rsp.port_num_blk.portName, &vport->fc_portname,
4590             sizeof(struct lpfc_name));
4591         memcpy(pcmd, &rpl_rsp, cmdsize - sizeof(uint32_t));
4592         /* Xmit ELS RPL ACC response tag <ulpIoTag> */
4593         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
4594                          "0120 Xmit ELS RPL ACC response tag x%x "
4595                          "xri x%x, did x%x, nlp_flag x%x, nlp_state x%x, "
4596                          "rpi x%x\n",
4597                          elsiocb->iotag, elsiocb->iocb.ulpContext,
4598                          ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_state,
4599                          ndlp->nlp_rpi);
4600         elsiocb->iocb_cmpl = lpfc_cmpl_els_rsp;
4601         phba->fc_stat.elsXmitACC++;
4602         if (lpfc_sli_issue_iocb(phba, pring, elsiocb, 0) == IOCB_ERROR) {
4603                 lpfc_els_free_iocb(phba, elsiocb);
4604                 return 1;
4605         }
4606         return 0;
4607 }
4608
4609 /**
4610  * lpfc_els_rcv_rpl: Process an unsolicited rpl iocb.
4611  * @vport: pointer to a host virtual N_Port data structure.
4612  * @cmdiocb: pointer to lpfc command iocb data structure.
4613  * @ndlp: pointer to a node-list data structure.
4614  *
4615  * This routine processes Read Port List (RPL) IOCB received as an ELS
4616  * unsolicited event. It first checks the remote port state. If the remote
4617  * port is not in NLP_STE_UNMAPPED_NODE and NLP_STE_MAPPED_NODE states, it
4618  * invokes the lpfc_els_rsp_reject() routine to send reject response.
4619  * Otherwise, this routine then invokes the lpfc_els_rsp_rpl_acc() routine
4620  * to accept the RPL.
4621  *
4622  * Return code
4623  *   0 - Successfully processed rpl iocb (currently always return 0)
4624  **/
4625 static int
4626 lpfc_els_rcv_rpl(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
4627                  struct lpfc_nodelist *ndlp)
4628 {
4629         struct lpfc_dmabuf *pcmd;
4630         uint32_t *lp;
4631         uint32_t maxsize;
4632         uint16_t cmdsize;
4633         RPL *rpl;
4634         struct ls_rjt stat;
4635
4636         if ((ndlp->nlp_state != NLP_STE_UNMAPPED_NODE) &&
4637             (ndlp->nlp_state != NLP_STE_MAPPED_NODE)) {
4638                 /* issue rejection response */
4639                 stat.un.b.lsRjtRsvd0 = 0;
4640                 stat.un.b.lsRjtRsnCode = LSRJT_UNABLE_TPC;
4641                 stat.un.b.lsRjtRsnCodeExp = LSEXP_CANT_GIVE_DATA;
4642                 stat.un.b.vendorUnique = 0;
4643                 lpfc_els_rsp_reject(vport, stat.un.lsRjtError, cmdiocb, ndlp,
4644                         NULL);
4645                 /* rejected the unsolicited RPL request and done with it */
4646                 return 0;
4647         }
4648
4649         pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
4650         lp = (uint32_t *) pcmd->virt;
4651         rpl = (RPL *) (lp + 1);
4652
4653         maxsize = be32_to_cpu(rpl->maxsize);
4654
4655         /* We support only one port */
4656         if ((rpl->index == 0) &&
4657             ((maxsize == 0) ||
4658              ((maxsize * sizeof(uint32_t)) >= sizeof(RPL_RSP)))) {
4659                 cmdsize = sizeof(uint32_t) + sizeof(RPL_RSP);
4660         } else {
4661                 cmdsize = sizeof(uint32_t) + maxsize * sizeof(uint32_t);
4662         }
4663         lpfc_els_rsp_rpl_acc(vport, cmdsize, cmdiocb, ndlp);
4664
4665         return 0;
4666 }
4667
4668 /**
4669  * lpfc_els_rcv_farp: Process an unsolicited farp request els command.
4670  * @vport: pointer to a virtual N_Port data structure.
4671  * @cmdiocb: pointer to lpfc command iocb data structure.
4672  * @ndlp: pointer to a node-list data structure.
4673  *
4674  * This routine processes Fibre Channel Address Resolution Protocol
4675  * (FARP) Request IOCB received as an ELS unsolicited event. Currently,
4676  * the lpfc driver only supports matching on WWPN or WWNN for FARP. As such,
4677  * FARP_MATCH_PORT flag and FARP_MATCH_NODE flag are checked against the
4678  * Match Flag in the FARP request IOCB: if FARP_MATCH_PORT flag is set, the
4679  * remote PortName is compared against the FC PortName stored in the @vport
4680  * data structure; if FARP_MATCH_NODE flag is set, the remote NodeName is
4681  * compared against the FC NodeName stored in the @vport data structure.
4682  * If any of these matches and the FARP_REQUEST_FARPR flag is set in the
4683  * FARP request IOCB Response Flag, the lpfc_issue_els_farpr() routine is
4684  * invoked to send out FARP Response to the remote node. Before sending the
4685  * FARP Response, however, the FARP_REQUEST_PLOGI flag is check in the FARP
4686  * request IOCB Response Flag and, if it is set, the lpfc_issue_els_plogi()
4687  * routine is invoked to log into the remote port first.
4688  *
4689  * Return code
4690  *   0 - Either the FARP Match Mode not supported or successfully processed
4691  **/
4692 static int
4693 lpfc_els_rcv_farp(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
4694                   struct lpfc_nodelist *ndlp)
4695 {
4696         struct lpfc_dmabuf *pcmd;
4697         uint32_t *lp;
4698         IOCB_t *icmd;
4699         FARP *fp;
4700         uint32_t cmd, cnt, did;
4701
4702         icmd = &cmdiocb->iocb;
4703         did = icmd->un.elsreq64.remoteID;
4704         pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
4705         lp = (uint32_t *) pcmd->virt;
4706
4707         cmd = *lp++;
4708         fp = (FARP *) lp;
4709         /* FARP-REQ received from DID <did> */
4710         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
4711                          "0601 FARP-REQ received from DID x%x\n", did);
4712         /* We will only support match on WWPN or WWNN */
4713         if (fp->Mflags & ~(FARP_MATCH_NODE | FARP_MATCH_PORT)) {
4714                 return 0;
4715         }
4716
4717         cnt = 0;
4718         /* If this FARP command is searching for my portname */
4719         if (fp->Mflags & FARP_MATCH_PORT) {
4720                 if (memcmp(&fp->RportName, &vport->fc_portname,
4721                            sizeof(struct lpfc_name)) == 0)
4722                         cnt = 1;
4723         }
4724
4725         /* If this FARP command is searching for my nodename */
4726         if (fp->Mflags & FARP_MATCH_NODE) {
4727                 if (memcmp(&fp->RnodeName, &vport->fc_nodename,
4728                            sizeof(struct lpfc_name)) == 0)
4729                         cnt = 1;
4730         }
4731
4732         if (cnt) {
4733                 if ((ndlp->nlp_state == NLP_STE_UNMAPPED_NODE) ||
4734                    (ndlp->nlp_state == NLP_STE_MAPPED_NODE)) {
4735                         /* Log back into the node before sending the FARP. */
4736                         if (fp->Rflags & FARP_REQUEST_PLOGI) {
4737                                 ndlp->nlp_prev_state = ndlp->nlp_state;
4738                                 lpfc_nlp_set_state(vport, ndlp,
4739                                                    NLP_STE_PLOGI_ISSUE);
4740                                 lpfc_issue_els_plogi(vport, ndlp->nlp_DID, 0);
4741                         }
4742
4743                         /* Send a FARP response to that node */
4744                         if (fp->Rflags & FARP_REQUEST_FARPR)
4745                                 lpfc_issue_els_farpr(vport, did, 0);
4746                 }
4747         }
4748         return 0;
4749 }
4750
4751 /**
4752  * lpfc_els_rcv_farpr: Process an unsolicited farp response iocb.
4753  * @vport: pointer to a host virtual N_Port data structure.
4754  * @cmdiocb: pointer to lpfc command iocb data structure.
4755  * @ndlp: pointer to a node-list data structure.
4756  *
4757  * This routine processes Fibre Channel Address Resolution Protocol
4758  * Response (FARPR) IOCB received as an ELS unsolicited event. It simply
4759  * invokes the lpfc_els_rsp_acc() routine to the remote node to accept
4760  * the FARP response request.
4761  *
4762  * Return code
4763  *   0 - Successfully processed FARPR IOCB (currently always return 0)
4764  **/
4765 static int
4766 lpfc_els_rcv_farpr(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
4767                    struct lpfc_nodelist  *ndlp)
4768 {
4769         struct lpfc_dmabuf *pcmd;
4770         uint32_t *lp;
4771         IOCB_t *icmd;
4772         uint32_t cmd, did;
4773
4774         icmd = &cmdiocb->iocb;
4775         did = icmd->un.elsreq64.remoteID;
4776         pcmd = (struct lpfc_dmabuf *) cmdiocb->context2;
4777         lp = (uint32_t *) pcmd->virt;
4778
4779         cmd = *lp++;
4780         /* FARP-RSP received from DID <did> */
4781         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
4782                          "0600 FARP-RSP received from DID x%x\n", did);
4783         /* ACCEPT the Farp resp request */
4784         lpfc_els_rsp_acc(vport, ELS_CMD_ACC, cmdiocb, ndlp, NULL);
4785
4786         return 0;
4787 }
4788
4789 /**
4790  * lpfc_els_rcv_fan: Process an unsolicited fan iocb command.
4791  * @vport: pointer to a host virtual N_Port data structure.
4792  * @cmdiocb: pointer to lpfc command iocb data structure.
4793  * @fan_ndlp: pointer to a node-list data structure.
4794  *
4795  * This routine processes a Fabric Address Notification (FAN) IOCB
4796  * command received as an ELS unsolicited event. The FAN ELS command will
4797  * only be processed on a physical port (i.e., the @vport represents the
4798  * physical port). The fabric NodeName and PortName from the FAN IOCB are
4799  * compared against those in the phba data structure. If any of those is
4800  * different, the lpfc_initial_flogi() routine is invoked to initialize
4801  * Fabric Login (FLOGI) to the fabric to start the discover over. Otherwise,
4802  * if both of those are identical, the lpfc_issue_fabric_reglogin() routine
4803  * is invoked to register login to the fabric.
4804  *
4805  * Return code
4806  *   0 - Successfully processed fan iocb (currently always return 0).
4807  **/
4808 static int
4809 lpfc_els_rcv_fan(struct lpfc_vport *vport, struct lpfc_iocbq *cmdiocb,
4810                  struct lpfc_nodelist *fan_ndlp)
4811 {
4812         struct lpfc_hba *phba = vport->phba;
4813         uint32_t *lp;
4814         FAN *fp;
4815
4816         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS, "0265 FAN received\n");
4817         lp = (uint32_t *)((struct lpfc_dmabuf *)cmdiocb->context2)->virt;
4818         fp = (FAN *) ++lp;
4819         /* FAN received; Fan does not have a reply sequence */
4820         if ((vport == phba->pport) &&
4821             (vport->port_state == LPFC_LOCAL_CFG_LINK)) {
4822                 if ((memcmp(&phba->fc_fabparam.nodeName, &fp->FnodeName,
4823                             sizeof(struct lpfc_name))) ||
4824                     (memcmp(&phba->fc_fabparam.portName, &fp->FportName,
4825                             sizeof(struct lpfc_name)))) {
4826                         /* This port has switched fabrics. FLOGI is required */
4827                         lpfc_initial_flogi(vport);
4828                 } else {
4829                         /* FAN verified - skip FLOGI */
4830                         vport->fc_myDID = vport->fc_prevDID;
4831                         lpfc_issue_fabric_reglogin(vport);
4832                 }
4833         }
4834         return 0;
4835 }
4836
4837 /**
4838  * lpfc_els_timeout: Handler funciton to the els timer.
4839  * @ptr: holder for the timer function associated data.
4840  *
4841  * This routine is invoked by the ELS timer after timeout. It posts the ELS
4842  * timer timeout event by setting the WORKER_ELS_TMO bit to the work port
4843  * event bitmap and then invokes the lpfc_worker_wake_up() routine to wake
4844  * up the worker thread. It is for the worker thread to invoke the routine
4845  * lpfc_els_timeout_handler() to work on the posted event WORKER_ELS_TMO.
4846  **/
4847 void
4848 lpfc_els_timeout(unsigned long ptr)
4849 {
4850         struct lpfc_vport *vport = (struct lpfc_vport *) ptr;
4851         struct lpfc_hba   *phba = vport->phba;
4852         uint32_t tmo_posted;
4853         unsigned long iflag;
4854
4855         spin_lock_irqsave(&vport->work_port_lock, iflag);
4856         tmo_posted = vport->work_port_events & WORKER_ELS_TMO;
4857         if (!tmo_posted)
4858                 vport->work_port_events |= WORKER_ELS_TMO;
4859         spin_unlock_irqrestore(&vport->work_port_lock, iflag);
4860
4861         if (!tmo_posted)
4862                 lpfc_worker_wake_up(phba);
4863         return;
4864 }
4865
4866 /**
4867  * lpfc_els_timeout_handler: Process an els timeout event.
4868  * @vport: pointer to a virtual N_Port data structure.
4869  *
4870  * This routine is the actual handler function that processes an ELS timeout
4871  * event. It walks the ELS ring to get and abort all the IOCBs (except the
4872  * ABORT/CLOSE/FARP/FARPR/FDISC), which are associated with the @vport by
4873  * invoking the lpfc_sli_issue_abort_iotag() routine.
4874  **/
4875 void
4876 lpfc_els_timeout_handler(struct lpfc_vport *vport)
4877 {
4878         struct lpfc_hba  *phba = vport->phba;
4879         struct lpfc_sli_ring *pring;
4880         struct lpfc_iocbq *tmp_iocb, *piocb;
4881         IOCB_t *cmd = NULL;
4882         struct lpfc_dmabuf *pcmd;
4883         uint32_t els_command = 0;
4884         uint32_t timeout;
4885         uint32_t remote_ID = 0xffffffff;
4886
4887         /* If the timer is already canceled do nothing */
4888         if ((vport->work_port_events & WORKER_ELS_TMO) == 0) {
4889                 return;
4890         }
4891         spin_lock_irq(&phba->hbalock);
4892         timeout = (uint32_t)(phba->fc_ratov << 1);
4893
4894         pring = &phba->sli.ring[LPFC_ELS_RING];
4895
4896         list_for_each_entry_safe(piocb, tmp_iocb, &pring->txcmplq, list) {
4897                 cmd = &piocb->iocb;
4898
4899                 if ((piocb->iocb_flag & LPFC_IO_LIBDFC) != 0 ||
4900                     piocb->iocb.ulpCommand == CMD_ABORT_XRI_CN ||
4901                     piocb->iocb.ulpCommand == CMD_CLOSE_XRI_CN)
4902                         continue;
4903
4904                 if (piocb->vport != vport)
4905                         continue;
4906
4907                 pcmd = (struct lpfc_dmabuf *) piocb->context2;
4908                 if (pcmd)
4909                         els_command = *(uint32_t *) (pcmd->virt);
4910
4911                 if (els_command == ELS_CMD_FARP ||
4912                     els_command == ELS_CMD_FARPR ||
4913                     els_command == ELS_CMD_FDISC)
4914                         continue;
4915
4916                 if (piocb->drvrTimeout > 0) {
4917                         if (piocb->drvrTimeout >= timeout)
4918                                 piocb->drvrTimeout -= timeout;
4919                         else
4920                                 piocb->drvrTimeout = 0;
4921                         continue;
4922                 }
4923
4924                 remote_ID = 0xffffffff;
4925                 if (cmd->ulpCommand != CMD_GEN_REQUEST64_CR)
4926                         remote_ID = cmd->un.elsreq64.remoteID;
4927                 else {
4928                         struct lpfc_nodelist *ndlp;
4929                         ndlp = __lpfc_findnode_rpi(vport, cmd->ulpContext);
4930                         if (ndlp && NLP_CHK_NODE_ACT(ndlp))
4931                                 remote_ID = ndlp->nlp_DID;
4932                 }
4933                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
4934                                  "0127 ELS timeout Data: x%x x%x x%x "
4935                                  "x%x\n", els_command,
4936                                  remote_ID, cmd->ulpCommand, cmd->ulpIoTag);
4937                 lpfc_sli_issue_abort_iotag(phba, pring, piocb);
4938         }
4939         spin_unlock_irq(&phba->hbalock);
4940
4941         if (phba->sli.ring[LPFC_ELS_RING].txcmplq_cnt)
4942                 mod_timer(&vport->els_tmofunc, jiffies + HZ * timeout);
4943 }
4944
4945 /**
4946  * lpfc_els_flush_cmd: Clean up the outstanding els commands to a vport.
4947  * @vport: pointer to a host virtual N_Port data structure.
4948  *
4949  * This routine is used to clean up all the outstanding ELS commands on a
4950  * @vport. It first aborts the @vport by invoking lpfc_fabric_abort_vport()
4951  * routine. After that, it walks the ELS transmit queue to remove all the
4952  * IOCBs with the @vport other than the QUE_RING and ABORT/CLOSE IOCBs. For
4953  * the IOCBs with a non-NULL completion callback function, the callback
4954  * function will be invoked with the status set to IOSTAT_LOCAL_REJECT and
4955  * un.ulpWord[4] set to IOERR_SLI_ABORTED. For IOCBs with a NULL completion
4956  * callback function, the IOCB will simply be released. Finally, it walks
4957  * the ELS transmit completion queue to issue an abort IOCB to any transmit
4958  * completion queue IOCB that is associated with the @vport and is not
4959  * an IOCB from libdfc (i.e., the management plane IOCBs that are not
4960  * part of the discovery state machine) out to HBA by invoking the
4961  * lpfc_sli_issue_abort_iotag() routine. Note that this function issues the
4962  * abort IOCB to any transmit completion queueed IOCB, it does not guarantee
4963  * the IOCBs are aborted when this function returns.
4964  **/
4965 void
4966 lpfc_els_flush_cmd(struct lpfc_vport *vport)
4967 {
4968         LIST_HEAD(completions);
4969         struct lpfc_hba  *phba = vport->phba;
4970         struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
4971         struct lpfc_iocbq *tmp_iocb, *piocb;
4972         IOCB_t *cmd = NULL;
4973
4974         lpfc_fabric_abort_vport(vport);
4975
4976         spin_lock_irq(&phba->hbalock);
4977         list_for_each_entry_safe(piocb, tmp_iocb, &pring->txq, list) {
4978                 cmd = &piocb->iocb;
4979
4980                 if (piocb->iocb_flag & LPFC_IO_LIBDFC) {
4981                         continue;
4982                 }
4983
4984                 /* Do not flush out the QUE_RING and ABORT/CLOSE iocbs */
4985                 if (cmd->ulpCommand == CMD_QUE_RING_BUF_CN ||
4986                     cmd->ulpCommand == CMD_QUE_RING_BUF64_CN ||
4987                     cmd->ulpCommand == CMD_CLOSE_XRI_CN ||
4988                     cmd->ulpCommand == CMD_ABORT_XRI_CN)
4989                         continue;
4990
4991                 if (piocb->vport != vport)
4992                         continue;
4993
4994                 list_move_tail(&piocb->list, &completions);
4995                 pring->txq_cnt--;
4996         }
4997
4998         list_for_each_entry_safe(piocb, tmp_iocb, &pring->txcmplq, list) {
4999                 if (piocb->iocb_flag & LPFC_IO_LIBDFC) {
5000                         continue;
5001                 }
5002
5003                 if (piocb->vport != vport)
5004                         continue;
5005
5006                 lpfc_sli_issue_abort_iotag(phba, pring, piocb);
5007         }
5008         spin_unlock_irq(&phba->hbalock);
5009
5010         while (!list_empty(&completions)) {
5011                 piocb = list_get_first(&completions, struct lpfc_iocbq, list);
5012                 cmd = &piocb->iocb;
5013                 list_del_init(&piocb->list);
5014
5015                 if (!piocb->iocb_cmpl)
5016                         lpfc_sli_release_iocbq(phba, piocb);
5017                 else {
5018                         cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
5019                         cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
5020                         (piocb->iocb_cmpl) (phba, piocb, piocb);
5021                 }
5022         }
5023
5024         return;
5025 }
5026
5027 /**
5028  * lpfc_els_flush_all_cmd: Clean up all the outstanding els commands to a HBA.
5029  * @phba: pointer to lpfc hba data structure.
5030  *
5031  * This routine is used to clean up all the outstanding ELS commands on a
5032  * @phba. It first aborts the @phba by invoking the lpfc_fabric_abort_hba()
5033  * routine. After that, it walks the ELS transmit queue to remove all the
5034  * IOCBs to the @phba other than the QUE_RING and ABORT/CLOSE IOCBs. For
5035  * the IOCBs with the completion callback function associated, the callback
5036  * function will be invoked with the status set to IOSTAT_LOCAL_REJECT and
5037  * un.ulpWord[4] set to IOERR_SLI_ABORTED. For IOCBs without the completion
5038  * callback function associated, the IOCB will simply be released. Finally,
5039  * it walks the ELS transmit completion queue to issue an abort IOCB to any
5040  * transmit completion queue IOCB that is not an IOCB from libdfc (i.e., the
5041  * management plane IOCBs that are not part of the discovery state machine)
5042  * out to HBA by invoking the lpfc_sli_issue_abort_iotag() routine.
5043  **/
5044 void
5045 lpfc_els_flush_all_cmd(struct lpfc_hba  *phba)
5046 {
5047         LIST_HEAD(completions);
5048         struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
5049         struct lpfc_iocbq *tmp_iocb, *piocb;
5050         IOCB_t *cmd = NULL;
5051
5052         lpfc_fabric_abort_hba(phba);
5053         spin_lock_irq(&phba->hbalock);
5054         list_for_each_entry_safe(piocb, tmp_iocb, &pring->txq, list) {
5055                 cmd = &piocb->iocb;
5056                 if (piocb->iocb_flag & LPFC_IO_LIBDFC)
5057                         continue;
5058                 /* Do not flush out the QUE_RING and ABORT/CLOSE iocbs */
5059                 if (cmd->ulpCommand == CMD_QUE_RING_BUF_CN ||
5060                     cmd->ulpCommand == CMD_QUE_RING_BUF64_CN ||
5061                     cmd->ulpCommand == CMD_CLOSE_XRI_CN ||
5062                     cmd->ulpCommand == CMD_ABORT_XRI_CN)
5063                         continue;
5064                 list_move_tail(&piocb->list, &completions);
5065                 pring->txq_cnt--;
5066         }
5067         list_for_each_entry_safe(piocb, tmp_iocb, &pring->txcmplq, list) {
5068                 if (piocb->iocb_flag & LPFC_IO_LIBDFC)
5069                         continue;
5070                 lpfc_sli_issue_abort_iotag(phba, pring, piocb);
5071         }
5072         spin_unlock_irq(&phba->hbalock);
5073         while (!list_empty(&completions)) {
5074                 piocb = list_get_first(&completions, struct lpfc_iocbq, list);
5075                 cmd = &piocb->iocb;
5076                 list_del_init(&piocb->list);
5077                 if (!piocb->iocb_cmpl)
5078                         lpfc_sli_release_iocbq(phba, piocb);
5079                 else {
5080                         cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
5081                         cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
5082                         (piocb->iocb_cmpl) (phba, piocb, piocb);
5083                 }
5084         }
5085         return;
5086 }
5087
5088 /**
5089  * lpfc_send_els_failure_event: Posts an ELS command failure event.
5090  * @phba: Pointer to hba context object.
5091  * @cmdiocbp: Pointer to command iocb which reported error.
5092  * @rspiocbp: Pointer to response iocb which reported error.
5093  *
5094  * This function sends an event when there is an ELS command
5095  * failure.
5096  **/
5097 void
5098 lpfc_send_els_failure_event(struct lpfc_hba *phba,
5099                         struct lpfc_iocbq *cmdiocbp,
5100                         struct lpfc_iocbq *rspiocbp)
5101 {
5102         struct lpfc_vport *vport = cmdiocbp->vport;
5103         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
5104         struct lpfc_lsrjt_event lsrjt_event;
5105         struct lpfc_fabric_event_header fabric_event;
5106         struct ls_rjt stat;
5107         struct lpfc_nodelist *ndlp;
5108         uint32_t *pcmd;
5109
5110         ndlp = cmdiocbp->context1;
5111         if (!ndlp || !NLP_CHK_NODE_ACT(ndlp))
5112                 return;
5113
5114         if (rspiocbp->iocb.ulpStatus == IOSTAT_LS_RJT) {
5115                 lsrjt_event.header.event_type = FC_REG_ELS_EVENT;
5116                 lsrjt_event.header.subcategory = LPFC_EVENT_LSRJT_RCV;
5117                 memcpy(lsrjt_event.header.wwpn, &ndlp->nlp_portname,
5118                         sizeof(struct lpfc_name));
5119                 memcpy(lsrjt_event.header.wwnn, &ndlp->nlp_nodename,
5120                         sizeof(struct lpfc_name));
5121                 pcmd = (uint32_t *) (((struct lpfc_dmabuf *)
5122                         cmdiocbp->context2)->virt);
5123                 lsrjt_event.command = *pcmd;
5124                 stat.un.lsRjtError = be32_to_cpu(rspiocbp->iocb.un.ulpWord[4]);
5125                 lsrjt_event.reason_code = stat.un.b.lsRjtRsnCode;
5126                 lsrjt_event.explanation = stat.un.b.lsRjtRsnCodeExp;
5127                 fc_host_post_vendor_event(shost,
5128                         fc_get_event_number(),
5129                         sizeof(lsrjt_event),
5130                         (char *)&lsrjt_event,
5131                         SCSI_NL_VID_TYPE_PCI | PCI_VENDOR_ID_EMULEX);
5132                 return;
5133         }
5134         if ((rspiocbp->iocb.ulpStatus == IOSTAT_NPORT_BSY) ||
5135                 (rspiocbp->iocb.ulpStatus == IOSTAT_FABRIC_BSY)) {
5136                 fabric_event.event_type = FC_REG_FABRIC_EVENT;
5137                 if (rspiocbp->iocb.ulpStatus == IOSTAT_NPORT_BSY)
5138                         fabric_event.subcategory = LPFC_EVENT_PORT_BUSY;
5139                 else
5140                         fabric_event.subcategory = LPFC_EVENT_FABRIC_BUSY;
5141                 memcpy(fabric_event.wwpn, &ndlp->nlp_portname,
5142                         sizeof(struct lpfc_name));
5143                 memcpy(fabric_event.wwnn, &ndlp->nlp_nodename,
5144                         sizeof(struct lpfc_name));
5145                 fc_host_post_vendor_event(shost,
5146                         fc_get_event_number(),
5147                         sizeof(fabric_event),
5148                         (char *)&fabric_event,
5149                         SCSI_NL_VID_TYPE_PCI | PCI_VENDOR_ID_EMULEX);
5150                 return;
5151         }
5152
5153 }
5154
5155 /**
5156  * lpfc_send_els_event: Posts unsolicited els event.
5157  * @vport: Pointer to vport object.
5158  * @ndlp: Pointer FC node object.
5159  * @cmd: ELS command code.
5160  *
5161  * This function posts an event when there is an incoming
5162  * unsolicited ELS command.
5163  **/
5164 static void
5165 lpfc_send_els_event(struct lpfc_vport *vport,
5166                     struct lpfc_nodelist *ndlp,
5167                     uint32_t cmd)
5168 {
5169         struct lpfc_els_event_header els_data;
5170         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
5171
5172         els_data.event_type = FC_REG_ELS_EVENT;
5173         switch (cmd) {
5174         case ELS_CMD_PLOGI:
5175                 els_data.subcategory = LPFC_EVENT_PLOGI_RCV;
5176                 break;
5177         case ELS_CMD_PRLO:
5178                 els_data.subcategory = LPFC_EVENT_PRLO_RCV;
5179                 break;
5180         case ELS_CMD_ADISC:
5181                 els_data.subcategory = LPFC_EVENT_ADISC_RCV;
5182                 break;
5183         default:
5184                 return;
5185         }
5186         memcpy(els_data.wwpn, &ndlp->nlp_portname, sizeof(struct lpfc_name));
5187         memcpy(els_data.wwnn, &ndlp->nlp_nodename, sizeof(struct lpfc_name));
5188         fc_host_post_vendor_event(shost,
5189                 fc_get_event_number(),
5190                 sizeof(els_data),
5191                 (char *)&els_data,
5192                 SCSI_NL_VID_TYPE_PCI | PCI_VENDOR_ID_EMULEX);
5193
5194         return;
5195 }
5196
5197
5198 /**
5199  * lpfc_els_unsol_buffer: Process an unsolicited event data buffer.
5200  * @phba: pointer to lpfc hba data structure.
5201  * @pring: pointer to a SLI ring.
5202  * @vport: pointer to a host virtual N_Port data structure.
5203  * @elsiocb: pointer to lpfc els command iocb data structure.
5204  *
5205  * This routine is used for processing the IOCB associated with a unsolicited
5206  * event. It first determines whether there is an existing ndlp that matches
5207  * the DID from the unsolicited IOCB. If not, it will create a new one with
5208  * the DID from the unsolicited IOCB. The ELS command from the unsolicited
5209  * IOCB is then used to invoke the proper routine and to set up proper state
5210  * of the discovery state machine.
5211  **/
5212 static void
5213 lpfc_els_unsol_buffer(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
5214                       struct lpfc_vport *vport, struct lpfc_iocbq *elsiocb)
5215 {
5216         struct Scsi_Host  *shost;
5217         struct lpfc_nodelist *ndlp;
5218         struct ls_rjt stat;
5219         uint32_t *payload;
5220         uint32_t cmd, did, newnode, rjt_err = 0;
5221         IOCB_t *icmd = &elsiocb->iocb;
5222
5223         if (!vport || !(elsiocb->context2))
5224                 goto dropit;
5225
5226         newnode = 0;
5227         payload = ((struct lpfc_dmabuf *)elsiocb->context2)->virt;
5228         cmd = *payload;
5229         if ((phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) == 0)
5230                 lpfc_post_buffer(phba, pring, 1);
5231
5232         did = icmd->un.rcvels.remoteID;
5233         if (icmd->ulpStatus) {
5234                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5235                         "RCV Unsol ELS:  status:x%x/x%x did:x%x",
5236                         icmd->ulpStatus, icmd->un.ulpWord[4], did);
5237                 goto dropit;
5238         }
5239
5240         /* Check to see if link went down during discovery */
5241         if (lpfc_els_chk_latt(vport))
5242                 goto dropit;
5243
5244         /* Ignore traffic recevied during vport shutdown. */
5245         if (vport->load_flag & FC_UNLOADING)
5246                 goto dropit;
5247
5248         ndlp = lpfc_findnode_did(vport, did);
5249         if (!ndlp) {
5250                 /* Cannot find existing Fabric ndlp, so allocate a new one */
5251                 ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_KERNEL);
5252                 if (!ndlp)
5253                         goto dropit;
5254
5255                 lpfc_nlp_init(vport, ndlp, did);
5256                 lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
5257                 newnode = 1;
5258                 if ((did & Fabric_DID_MASK) == Fabric_DID_MASK)
5259                         ndlp->nlp_type |= NLP_FABRIC;
5260         } else if (!NLP_CHK_NODE_ACT(ndlp)) {
5261                 ndlp = lpfc_enable_node(vport, ndlp,
5262                                         NLP_STE_UNUSED_NODE);
5263                 if (!ndlp)
5264                         goto dropit;
5265                 lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
5266                 newnode = 1;
5267                 if ((did & Fabric_DID_MASK) == Fabric_DID_MASK)
5268                         ndlp->nlp_type |= NLP_FABRIC;
5269         } else if (ndlp->nlp_state == NLP_STE_UNUSED_NODE) {
5270                 /* This is similar to the new node path */
5271                 ndlp = lpfc_nlp_get(ndlp);
5272                 if (!ndlp)
5273                         goto dropit;
5274                 lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
5275                 newnode = 1;
5276         }
5277
5278         phba->fc_stat.elsRcvFrame++;
5279
5280         elsiocb->context1 = lpfc_nlp_get(ndlp);
5281         elsiocb->vport = vport;
5282
5283         if ((cmd & ELS_CMD_MASK) == ELS_CMD_RSCN) {
5284                 cmd &= ELS_CMD_MASK;
5285         }
5286         /* ELS command <elsCmd> received from NPORT <did> */
5287         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
5288                          "0112 ELS command x%x received from NPORT x%x "
5289                          "Data: x%x\n", cmd, did, vport->port_state);
5290         switch (cmd) {
5291         case ELS_CMD_PLOGI:
5292                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5293                         "RCV PLOGI:       did:x%x/ste:x%x flg:x%x",
5294                         did, vport->port_state, ndlp->nlp_flag);
5295
5296                 phba->fc_stat.elsRcvPLOGI++;
5297                 ndlp = lpfc_plogi_confirm_nport(phba, payload, ndlp);
5298
5299                 lpfc_send_els_event(vport, ndlp, cmd);
5300                 if (vport->port_state < LPFC_DISC_AUTH) {
5301                         if (!(phba->pport->fc_flag & FC_PT2PT) ||
5302                                 (phba->pport->fc_flag & FC_PT2PT_PLOGI)) {
5303                                 rjt_err = LSRJT_UNABLE_TPC;
5304                                 break;
5305                         }
5306                         /* We get here, and drop thru, if we are PT2PT with
5307                          * another NPort and the other side has initiated
5308                          * the PLOGI before responding to our FLOGI.
5309                          */
5310                 }
5311
5312                 shost = lpfc_shost_from_vport(vport);
5313                 spin_lock_irq(shost->host_lock);
5314                 ndlp->nlp_flag &= ~NLP_TARGET_REMOVE;
5315                 spin_unlock_irq(shost->host_lock);
5316
5317                 lpfc_disc_state_machine(vport, ndlp, elsiocb,
5318                                         NLP_EVT_RCV_PLOGI);
5319
5320                 break;
5321         case ELS_CMD_FLOGI:
5322                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5323                         "RCV FLOGI:       did:x%x/ste:x%x flg:x%x",
5324                         did, vport->port_state, ndlp->nlp_flag);
5325
5326                 phba->fc_stat.elsRcvFLOGI++;
5327                 lpfc_els_rcv_flogi(vport, elsiocb, ndlp);
5328                 if (newnode)
5329                         lpfc_nlp_put(ndlp);
5330                 break;
5331         case ELS_CMD_LOGO:
5332                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5333                         "RCV LOGO:        did:x%x/ste:x%x flg:x%x",
5334                         did, vport->port_state, ndlp->nlp_flag);
5335
5336                 phba->fc_stat.elsRcvLOGO++;
5337                 if (vport->port_state < LPFC_DISC_AUTH) {
5338                         rjt_err = LSRJT_UNABLE_TPC;
5339                         break;
5340                 }
5341                 lpfc_disc_state_machine(vport, ndlp, elsiocb, NLP_EVT_RCV_LOGO);
5342                 break;
5343         case ELS_CMD_PRLO:
5344                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5345                         "RCV PRLO:        did:x%x/ste:x%x flg:x%x",
5346                         did, vport->port_state, ndlp->nlp_flag);
5347
5348                 phba->fc_stat.elsRcvPRLO++;
5349                 lpfc_send_els_event(vport, ndlp, cmd);
5350                 if (vport->port_state < LPFC_DISC_AUTH) {
5351                         rjt_err = LSRJT_UNABLE_TPC;
5352                         break;
5353                 }
5354                 lpfc_disc_state_machine(vport, ndlp, elsiocb, NLP_EVT_RCV_PRLO);
5355                 break;
5356         case ELS_CMD_RSCN:
5357                 phba->fc_stat.elsRcvRSCN++;
5358                 lpfc_els_rcv_rscn(vport, elsiocb, ndlp);
5359                 if (newnode)
5360                         lpfc_nlp_put(ndlp);
5361                 break;
5362         case ELS_CMD_ADISC:
5363                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5364                         "RCV ADISC:       did:x%x/ste:x%x flg:x%x",
5365                         did, vport->port_state, ndlp->nlp_flag);
5366
5367                 lpfc_send_els_event(vport, ndlp, cmd);
5368                 phba->fc_stat.elsRcvADISC++;
5369                 if (vport->port_state < LPFC_DISC_AUTH) {
5370                         rjt_err = LSRJT_UNABLE_TPC;
5371                         break;
5372                 }
5373                 lpfc_disc_state_machine(vport, ndlp, elsiocb,
5374                                         NLP_EVT_RCV_ADISC);
5375                 break;
5376         case ELS_CMD_PDISC:
5377                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5378                         "RCV PDISC:       did:x%x/ste:x%x flg:x%x",
5379                         did, vport->port_state, ndlp->nlp_flag);
5380
5381                 phba->fc_stat.elsRcvPDISC++;
5382                 if (vport->port_state < LPFC_DISC_AUTH) {
5383                         rjt_err = LSRJT_UNABLE_TPC;
5384                         break;
5385                 }
5386                 lpfc_disc_state_machine(vport, ndlp, elsiocb,
5387                                         NLP_EVT_RCV_PDISC);
5388                 break;
5389         case ELS_CMD_FARPR:
5390                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5391                         "RCV FARPR:       did:x%x/ste:x%x flg:x%x",
5392                         did, vport->port_state, ndlp->nlp_flag);
5393
5394                 phba->fc_stat.elsRcvFARPR++;
5395                 lpfc_els_rcv_farpr(vport, elsiocb, ndlp);
5396                 break;
5397         case ELS_CMD_FARP:
5398                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5399                         "RCV FARP:        did:x%x/ste:x%x flg:x%x",
5400                         did, vport->port_state, ndlp->nlp_flag);
5401
5402                 phba->fc_stat.elsRcvFARP++;
5403                 lpfc_els_rcv_farp(vport, elsiocb, ndlp);
5404                 break;
5405         case ELS_CMD_FAN:
5406                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5407                         "RCV FAN:         did:x%x/ste:x%x flg:x%x",
5408                         did, vport->port_state, ndlp->nlp_flag);
5409
5410                 phba->fc_stat.elsRcvFAN++;
5411                 lpfc_els_rcv_fan(vport, elsiocb, ndlp);
5412                 break;
5413         case ELS_CMD_PRLI:
5414                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5415                         "RCV PRLI:        did:x%x/ste:x%x flg:x%x",
5416                         did, vport->port_state, ndlp->nlp_flag);
5417
5418                 phba->fc_stat.elsRcvPRLI++;
5419                 if (vport->port_state < LPFC_DISC_AUTH) {
5420                         rjt_err = LSRJT_UNABLE_TPC;
5421                         break;
5422                 }
5423                 lpfc_disc_state_machine(vport, ndlp, elsiocb, NLP_EVT_RCV_PRLI);
5424                 break;
5425         case ELS_CMD_LIRR:
5426                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5427                         "RCV LIRR:        did:x%x/ste:x%x flg:x%x",
5428                         did, vport->port_state, ndlp->nlp_flag);
5429
5430                 phba->fc_stat.elsRcvLIRR++;
5431                 lpfc_els_rcv_lirr(vport, elsiocb, ndlp);
5432                 if (newnode)
5433                         lpfc_nlp_put(ndlp);
5434                 break;
5435         case ELS_CMD_RPS:
5436                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5437                         "RCV RPS:         did:x%x/ste:x%x flg:x%x",
5438                         did, vport->port_state, ndlp->nlp_flag);
5439
5440                 phba->fc_stat.elsRcvRPS++;
5441                 lpfc_els_rcv_rps(vport, elsiocb, ndlp);
5442                 if (newnode)
5443                         lpfc_nlp_put(ndlp);
5444                 break;
5445         case ELS_CMD_RPL:
5446                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5447                         "RCV RPL:         did:x%x/ste:x%x flg:x%x",
5448                         did, vport->port_state, ndlp->nlp_flag);
5449
5450                 phba->fc_stat.elsRcvRPL++;
5451                 lpfc_els_rcv_rpl(vport, elsiocb, ndlp);
5452                 if (newnode)
5453                         lpfc_nlp_put(ndlp);
5454                 break;
5455         case ELS_CMD_RNID:
5456                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5457                         "RCV RNID:        did:x%x/ste:x%x flg:x%x",
5458                         did, vport->port_state, ndlp->nlp_flag);
5459
5460                 phba->fc_stat.elsRcvRNID++;
5461                 lpfc_els_rcv_rnid(vport, elsiocb, ndlp);
5462                 if (newnode)
5463                         lpfc_nlp_put(ndlp);
5464                 break;
5465         default:
5466                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_UNSOL,
5467                         "RCV ELS cmd:     cmd:x%x did:x%x/ste:x%x",
5468                         cmd, did, vport->port_state);
5469
5470                 /* Unsupported ELS command, reject */
5471                 rjt_err = LSRJT_INVALID_CMD;
5472
5473                 /* Unknown ELS command <elsCmd> received from NPORT <did> */
5474                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
5475                                  "0115 Unknown ELS command x%x "
5476                                  "received from NPORT x%x\n", cmd, did);
5477                 if (newnode)
5478                         lpfc_nlp_put(ndlp);
5479                 break;
5480         }
5481
5482         /* check if need to LS_RJT received ELS cmd */
5483         if (rjt_err) {
5484                 memset(&stat, 0, sizeof(stat));
5485                 stat.un.b.lsRjtRsnCode = rjt_err;
5486                 stat.un.b.lsRjtRsnCodeExp = LSEXP_NOTHING_MORE;
5487                 lpfc_els_rsp_reject(vport, stat.un.lsRjtError, elsiocb, ndlp,
5488                         NULL);
5489         }
5490
5491         lpfc_nlp_put(elsiocb->context1);
5492         elsiocb->context1 = NULL;
5493         return;
5494
5495 dropit:
5496         if (vport && !(vport->load_flag & FC_UNLOADING))
5497                 lpfc_printf_log(phba, KERN_ERR, LOG_ELS,
5498                         "(%d):0111 Dropping received ELS cmd "
5499                         "Data: x%x x%x x%x\n",
5500                         vport->vpi, icmd->ulpStatus,
5501                         icmd->un.ulpWord[4], icmd->ulpTimeout);
5502         phba->fc_stat.elsRcvDrop++;
5503 }
5504
5505 /**
5506  * lpfc_find_vport_by_vpid: Find a vport on a HBA through vport identifier.
5507  * @phba: pointer to lpfc hba data structure.
5508  * @vpi: host virtual N_Port identifier.
5509  *
5510  * This routine finds a vport on a HBA (referred by @phba) through a
5511  * @vpi. The function walks the HBA's vport list and returns the address
5512  * of the vport with the matching @vpi.
5513  *
5514  * Return code
5515  *    NULL - No vport with the matching @vpi found
5516  *    Otherwise - Address to the vport with the matching @vpi.
5517  **/
5518 static struct lpfc_vport *
5519 lpfc_find_vport_by_vpid(struct lpfc_hba *phba, uint16_t vpi)
5520 {
5521         struct lpfc_vport *vport;
5522         unsigned long flags;
5523
5524         spin_lock_irqsave(&phba->hbalock, flags);
5525         list_for_each_entry(vport, &phba->port_list, listentry) {
5526                 if (vport->vpi == vpi) {
5527                         spin_unlock_irqrestore(&phba->hbalock, flags);
5528                         return vport;
5529                 }
5530         }
5531         spin_unlock_irqrestore(&phba->hbalock, flags);
5532         return NULL;
5533 }
5534
5535 /**
5536  * lpfc_els_unsol_event: Process an unsolicited event from an els sli ring.
5537  * @phba: pointer to lpfc hba data structure.
5538  * @pring: pointer to a SLI ring.
5539  * @elsiocb: pointer to lpfc els iocb data structure.
5540  *
5541  * This routine is used to process an unsolicited event received from a SLI
5542  * (Service Level Interface) ring. The actual processing of the data buffer
5543  * associated with the unsolicited event is done by invoking the routine
5544  * lpfc_els_unsol_buffer() after properly set up the iocb buffer from the
5545  * SLI ring on which the unsolicited event was received.
5546  **/
5547 void
5548 lpfc_els_unsol_event(struct lpfc_hba *phba, struct lpfc_sli_ring *pring,
5549                      struct lpfc_iocbq *elsiocb)
5550 {
5551         struct lpfc_vport *vport = phba->pport;
5552         IOCB_t *icmd = &elsiocb->iocb;
5553         dma_addr_t paddr;
5554         struct lpfc_dmabuf *bdeBuf1 = elsiocb->context2;
5555         struct lpfc_dmabuf *bdeBuf2 = elsiocb->context3;
5556
5557         elsiocb->context1 = NULL;
5558         elsiocb->context2 = NULL;
5559         elsiocb->context3 = NULL;
5560
5561         if (icmd->ulpStatus == IOSTAT_NEED_BUFFER) {
5562                 lpfc_sli_hbqbuf_add_hbqs(phba, LPFC_ELS_HBQ);
5563         } else if (icmd->ulpStatus == IOSTAT_LOCAL_REJECT &&
5564             (icmd->un.ulpWord[4] & 0xff) == IOERR_RCV_BUFFER_WAITING) {
5565                 phba->fc_stat.NoRcvBuf++;
5566                 /* Not enough posted buffers; Try posting more buffers */
5567                 if (!(phba->sli3_options & LPFC_SLI3_HBQ_ENABLED))
5568                         lpfc_post_buffer(phba, pring, 0);
5569                 return;
5570         }
5571
5572         if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
5573             (icmd->ulpCommand == CMD_IOCB_RCV_ELS64_CX ||
5574              icmd->ulpCommand == CMD_IOCB_RCV_SEQ64_CX)) {
5575                 if (icmd->unsli3.rcvsli3.vpi == 0xffff)
5576                         vport = phba->pport;
5577                 else {
5578                         uint16_t vpi = icmd->unsli3.rcvsli3.vpi;
5579                         vport = lpfc_find_vport_by_vpid(phba, vpi);
5580                 }
5581         }
5582         /* If there are no BDEs associated
5583          * with this IOCB, there is nothing to do.
5584          */
5585         if (icmd->ulpBdeCount == 0)
5586                 return;
5587
5588         /* type of ELS cmd is first 32bit word
5589          * in packet
5590          */
5591         if (phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) {
5592                 elsiocb->context2 = bdeBuf1;
5593         } else {
5594                 paddr = getPaddr(icmd->un.cont64[0].addrHigh,
5595                                  icmd->un.cont64[0].addrLow);
5596                 elsiocb->context2 = lpfc_sli_ringpostbuf_get(phba, pring,
5597                                                              paddr);
5598         }
5599
5600         lpfc_els_unsol_buffer(phba, pring, vport, elsiocb);
5601         /*
5602          * The different unsolicited event handlers would tell us
5603          * if they are done with "mp" by setting context2 to NULL.
5604          */
5605         if (elsiocb->context2) {
5606                 lpfc_in_buf_free(phba, (struct lpfc_dmabuf *)elsiocb->context2);
5607                 elsiocb->context2 = NULL;
5608         }
5609
5610         /* RCV_ELS64_CX provide for 2 BDEs - process 2nd if included */
5611         if ((phba->sli3_options & LPFC_SLI3_HBQ_ENABLED) &&
5612             icmd->ulpBdeCount == 2) {
5613                 elsiocb->context2 = bdeBuf2;
5614                 lpfc_els_unsol_buffer(phba, pring, vport, elsiocb);
5615                 /* free mp if we are done with it */
5616                 if (elsiocb->context2) {
5617                         lpfc_in_buf_free(phba, elsiocb->context2);
5618                         elsiocb->context2 = NULL;
5619                 }
5620         }
5621 }
5622
5623 /**
5624  * lpfc_do_scr_ns_plogi: Issue a plogi to the name server for scr.
5625  * @phba: pointer to lpfc hba data structure.
5626  * @vport: pointer to a virtual N_Port data structure.
5627  *
5628  * This routine issues a Port Login (PLOGI) to the Name Server with
5629  * State Change Request (SCR) for a @vport. This routine will create an
5630  * ndlp for the Name Server associated to the @vport if such node does
5631  * not already exist. The PLOGI to Name Server is issued by invoking the
5632  * lpfc_issue_els_plogi() routine. If Fabric-Device Management Interface
5633  * (FDMI) is configured to the @vport, a FDMI node will be created and
5634  * the PLOGI to FDMI is issued by invoking lpfc_issue_els_plogi() routine.
5635  **/
5636 void
5637 lpfc_do_scr_ns_plogi(struct lpfc_hba *phba, struct lpfc_vport *vport)
5638 {
5639         struct lpfc_nodelist *ndlp, *ndlp_fdmi;
5640
5641         ndlp = lpfc_findnode_did(vport, NameServer_DID);
5642         if (!ndlp) {
5643                 ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_KERNEL);
5644                 if (!ndlp) {
5645                         if (phba->fc_topology == TOPOLOGY_LOOP) {
5646                                 lpfc_disc_start(vport);
5647                                 return;
5648                         }
5649                         lpfc_vport_set_state(vport, FC_VPORT_FAILED);
5650                         lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
5651                                          "0251 NameServer login: no memory\n");
5652                         return;
5653                 }
5654                 lpfc_nlp_init(vport, ndlp, NameServer_DID);
5655         } else if (!NLP_CHK_NODE_ACT(ndlp)) {
5656                 ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_UNUSED_NODE);
5657                 if (!ndlp) {
5658                         if (phba->fc_topology == TOPOLOGY_LOOP) {
5659                                 lpfc_disc_start(vport);
5660                                 return;
5661                         }
5662                         lpfc_vport_set_state(vport, FC_VPORT_FAILED);
5663                         lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
5664                                         "0348 NameServer login: node freed\n");
5665                         return;
5666                 }
5667         }
5668         ndlp->nlp_type |= NLP_FABRIC;
5669
5670         lpfc_nlp_set_state(vport, ndlp, NLP_STE_PLOGI_ISSUE);
5671
5672         if (lpfc_issue_els_plogi(vport, ndlp->nlp_DID, 0)) {
5673                 lpfc_vport_set_state(vport, FC_VPORT_FAILED);
5674                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
5675                                  "0252 Cannot issue NameServer login\n");
5676                 return;
5677         }
5678
5679         if (vport->cfg_fdmi_on) {
5680                 ndlp_fdmi = mempool_alloc(phba->nlp_mem_pool,
5681                                           GFP_KERNEL);
5682                 if (ndlp_fdmi) {
5683                         lpfc_nlp_init(vport, ndlp_fdmi, FDMI_DID);
5684                         ndlp_fdmi->nlp_type |= NLP_FABRIC;
5685                         lpfc_nlp_set_state(vport, ndlp_fdmi,
5686                                 NLP_STE_PLOGI_ISSUE);
5687                         lpfc_issue_els_plogi(vport, ndlp_fdmi->nlp_DID,
5688                                              0);
5689                 }
5690         }
5691         return;
5692 }
5693
5694 /**
5695  * lpfc_cmpl_reg_new_vport: Completion callback function to register new vport.
5696  * @phba: pointer to lpfc hba data structure.
5697  * @pmb: pointer to the driver internal queue element for mailbox command.
5698  *
5699  * This routine is the completion callback function to register new vport
5700  * mailbox command. If the new vport mailbox command completes successfully,
5701  * the fabric registration login shall be performed on physical port (the
5702  * new vport created is actually a physical port, with VPI 0) or the port
5703  * login to Name Server for State Change Request (SCR) will be performed
5704  * on virtual port (real virtual port, with VPI greater than 0).
5705  **/
5706 static void
5707 lpfc_cmpl_reg_new_vport(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
5708 {
5709         struct lpfc_vport *vport = pmb->vport;
5710         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
5711         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) pmb->context2;
5712         MAILBOX_t *mb = &pmb->mb;
5713
5714         spin_lock_irq(shost->host_lock);
5715         vport->fc_flag &= ~FC_VPORT_NEEDS_REG_VPI;
5716         spin_unlock_irq(shost->host_lock);
5717
5718         if (mb->mbxStatus) {
5719                 lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
5720                                  "0915 Register VPI failed: 0x%x\n",
5721                                  mb->mbxStatus);
5722
5723                 switch (mb->mbxStatus) {
5724                 case 0x11:      /* unsupported feature */
5725                 case 0x9603:    /* max_vpi exceeded */
5726                 case 0x9602:    /* Link event since CLEAR_LA */
5727                         /* giving up on vport registration */
5728                         lpfc_vport_set_state(vport, FC_VPORT_FAILED);
5729                         spin_lock_irq(shost->host_lock);
5730                         vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
5731                         spin_unlock_irq(shost->host_lock);
5732                         lpfc_can_disctmo(vport);
5733                         break;
5734                 default:
5735                         /* Try to recover from this error */
5736                         lpfc_mbx_unreg_vpi(vport);
5737                         spin_lock_irq(shost->host_lock);
5738                         vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
5739                         spin_unlock_irq(shost->host_lock);
5740                         if (vport->port_type == LPFC_PHYSICAL_PORT)
5741                                 lpfc_initial_flogi(vport);
5742                         else
5743                                 lpfc_initial_fdisc(vport);
5744                         break;
5745                 }
5746
5747         } else {
5748                 if (vport == phba->pport)
5749                         lpfc_issue_fabric_reglogin(vport);
5750                 else
5751                         lpfc_do_scr_ns_plogi(phba, vport);
5752         }
5753
5754         /* Now, we decrement the ndlp reference count held for this
5755          * callback function
5756          */
5757         lpfc_nlp_put(ndlp);
5758
5759         mempool_free(pmb, phba->mbox_mem_pool);
5760         return;
5761 }
5762
5763 /**
5764  * lpfc_register_new_vport: Register a new vport with a HBA.
5765  * @phba: pointer to lpfc hba data structure.
5766  * @vport: pointer to a host virtual N_Port data structure.
5767  * @ndlp: pointer to a node-list data structure.
5768  *
5769  * This routine registers the @vport as a new virtual port with a HBA.
5770  * It is done through a registering vpi mailbox command.
5771  **/
5772 static void
5773 lpfc_register_new_vport(struct lpfc_hba *phba, struct lpfc_vport *vport,
5774                         struct lpfc_nodelist *ndlp)
5775 {
5776         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
5777         LPFC_MBOXQ_t *mbox;
5778
5779         mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
5780         if (mbox) {
5781                 lpfc_reg_vpi(phba, vport->vpi, vport->fc_myDID, mbox);
5782                 mbox->vport = vport;
5783                 mbox->context2 = lpfc_nlp_get(ndlp);
5784                 mbox->mbox_cmpl = lpfc_cmpl_reg_new_vport;
5785                 if (lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT)
5786                     == MBX_NOT_FINISHED) {
5787                         /* mailbox command not success, decrement ndlp
5788                          * reference count for this command
5789                          */
5790                         lpfc_nlp_put(ndlp);
5791                         mempool_free(mbox, phba->mbox_mem_pool);
5792
5793                         lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
5794                                 "0253 Register VPI: Can't send mbox\n");
5795                         goto mbox_err_exit;
5796                 }
5797         } else {
5798                 lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
5799                                  "0254 Register VPI: no memory\n");
5800                 goto mbox_err_exit;
5801         }
5802         return;
5803
5804 mbox_err_exit:
5805         lpfc_vport_set_state(vport, FC_VPORT_FAILED);
5806         spin_lock_irq(shost->host_lock);
5807         vport->fc_flag &= ~FC_VPORT_NEEDS_REG_VPI;
5808         spin_unlock_irq(shost->host_lock);
5809         return;
5810 }
5811
5812 /**
5813  * lpfc_cmpl_els_fdisc: Completion function for fdisc iocb command.
5814  * @phba: pointer to lpfc hba data structure.
5815  * @cmdiocb: pointer to lpfc command iocb data structure.
5816  * @rspiocb: pointer to lpfc response iocb data structure.
5817  *
5818  * This routine is the completion callback function to a Fabric Discover
5819  * (FDISC) ELS command. Since all the FDISC ELS commands are issued
5820  * single threaded, each FDISC completion callback function will reset
5821  * the discovery timer for all vports such that the timers will not get
5822  * unnecessary timeout. The function checks the FDISC IOCB status. If error
5823  * detected, the vport will be set to FC_VPORT_FAILED state. Otherwise,the
5824  * vport will set to FC_VPORT_ACTIVE state. It then checks whether the DID
5825  * assigned to the vport has been changed with the completion of the FDISC
5826  * command. If so, both RPI (Remote Port Index) and VPI (Virtual Port Index)
5827  * are unregistered from the HBA, and then the lpfc_register_new_vport()
5828  * routine is invoked to register new vport with the HBA. Otherwise, the
5829  * lpfc_do_scr_ns_plogi() routine is invoked to issue a PLOGI to the Name
5830  * Server for State Change Request (SCR).
5831  **/
5832 static void
5833 lpfc_cmpl_els_fdisc(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
5834                     struct lpfc_iocbq *rspiocb)
5835 {
5836         struct lpfc_vport *vport = cmdiocb->vport;
5837         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
5838         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) cmdiocb->context1;
5839         struct lpfc_nodelist *np;
5840         struct lpfc_nodelist *next_np;
5841         IOCB_t *irsp = &rspiocb->iocb;
5842         struct lpfc_iocbq *piocb;
5843
5844         lpfc_printf_vlog(vport, KERN_INFO, LOG_ELS,
5845                          "0123 FDISC completes. x%x/x%x prevDID: x%x\n",
5846                          irsp->ulpStatus, irsp->un.ulpWord[4],
5847                          vport->fc_prevDID);
5848         /* Since all FDISCs are being single threaded, we
5849          * must reset the discovery timer for ALL vports
5850          * waiting to send FDISC when one completes.
5851          */
5852         list_for_each_entry(piocb, &phba->fabric_iocb_list, list) {
5853                 lpfc_set_disctmo(piocb->vport);
5854         }
5855
5856         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
5857                 "FDISC cmpl:      status:x%x/x%x prevdid:x%x",
5858                 irsp->ulpStatus, irsp->un.ulpWord[4], vport->fc_prevDID);
5859
5860         if (irsp->ulpStatus) {
5861                 /* Check for retry */
5862                 if (lpfc_els_retry(phba, cmdiocb, rspiocb))
5863                         goto out;
5864                 /* FDISC failed */
5865                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
5866                                  "0126 FDISC failed. (%d/%d)\n",
5867                                  irsp->ulpStatus, irsp->un.ulpWord[4]);
5868                 goto fdisc_failed;
5869         }
5870                 if (vport->fc_vport->vport_state == FC_VPORT_INITIALIZING)
5871                         lpfc_vport_set_state(vport, FC_VPORT_FAILED);
5872                 lpfc_nlp_put(ndlp);
5873                 /* giving up on FDISC. Cancel discovery timer */
5874                 lpfc_can_disctmo(vport);
5875         spin_lock_irq(shost->host_lock);
5876         vport->fc_flag |= FC_FABRIC;
5877         if (vport->phba->fc_topology == TOPOLOGY_LOOP)
5878                 vport->fc_flag |=  FC_PUBLIC_LOOP;
5879         spin_unlock_irq(shost->host_lock);
5880
5881         vport->fc_myDID = irsp->un.ulpWord[4] & Mask_DID;
5882         lpfc_vport_set_state(vport, FC_VPORT_ACTIVE);
5883         if ((vport->fc_prevDID != vport->fc_myDID) &&
5884                 !(vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)) {
5885                 /* If our NportID changed, we need to ensure all
5886                  * remaining NPORTs get unreg_login'ed so we can
5887                  * issue unreg_vpi.
5888                  */
5889                 list_for_each_entry_safe(np, next_np,
5890                         &vport->fc_nodes, nlp_listp) {
5891                         if (!NLP_CHK_NODE_ACT(ndlp) ||
5892                             (np->nlp_state != NLP_STE_NPR_NODE) ||
5893                             !(np->nlp_flag & NLP_NPR_ADISC))
5894                                 continue;
5895                         spin_lock_irq(shost->host_lock);
5896                         np->nlp_flag &= ~NLP_NPR_ADISC;
5897                         spin_unlock_irq(shost->host_lock);
5898                         lpfc_unreg_rpi(vport, np);
5899                 }
5900                 lpfc_mbx_unreg_vpi(vport);
5901                 spin_lock_irq(shost->host_lock);
5902                 vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
5903                 spin_unlock_irq(shost->host_lock);
5904         }
5905
5906         if (vport->fc_flag & FC_VPORT_NEEDS_REG_VPI)
5907                 lpfc_register_new_vport(phba, vport, ndlp);
5908         else
5909                 lpfc_do_scr_ns_plogi(phba, vport);
5910         goto out;
5911 fdisc_failed:
5912         lpfc_vport_set_state(vport, FC_VPORT_FAILED);
5913         /* Cancel discovery timer */
5914         lpfc_can_disctmo(vport);
5915         lpfc_nlp_put(ndlp);
5916 out:
5917         lpfc_els_free_iocb(phba, cmdiocb);
5918 }
5919
5920 /**
5921  * lpfc_issue_els_fdisc: Issue a fdisc iocb command.
5922  * @vport: pointer to a virtual N_Port data structure.
5923  * @ndlp: pointer to a node-list data structure.
5924  * @retry: number of retries to the command IOCB.
5925  *
5926  * This routine prepares and issues a Fabric Discover (FDISC) IOCB to
5927  * a remote node (@ndlp) off a @vport. It uses the lpfc_issue_fabric_iocb()
5928  * routine to issue the IOCB, which makes sure only one outstanding fabric
5929  * IOCB will be sent off HBA at any given time.
5930  *
5931  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
5932  * will be incremented by 1 for holding the ndlp and the reference to ndlp
5933  * will be stored into the context1 field of the IOCB for the completion
5934  * callback function to the FDISC ELS command.
5935  *
5936  * Return code
5937  *   0 - Successfully issued fdisc iocb command
5938  *   1 - Failed to issue fdisc iocb command
5939  **/
5940 static int
5941 lpfc_issue_els_fdisc(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
5942                      uint8_t retry)
5943 {
5944         struct lpfc_hba *phba = vport->phba;
5945         IOCB_t *icmd;
5946         struct lpfc_iocbq *elsiocb;
5947         struct serv_parm *sp;
5948         uint8_t *pcmd;
5949         uint16_t cmdsize;
5950         int did = ndlp->nlp_DID;
5951         int rc;
5952
5953         cmdsize = (sizeof(uint32_t) + sizeof(struct serv_parm));
5954         elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, retry, ndlp, did,
5955                                      ELS_CMD_FDISC);
5956         if (!elsiocb) {
5957                 lpfc_vport_set_state(vport, FC_VPORT_FAILED);
5958                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
5959                                  "0255 Issue FDISC: no IOCB\n");
5960                 return 1;
5961         }
5962
5963         icmd = &elsiocb->iocb;
5964         icmd->un.elsreq64.myID = 0;
5965         icmd->un.elsreq64.fl = 1;
5966
5967         /* For FDISC, Let FDISC rsp set the NPortID for this VPI */
5968         icmd->ulpCt_h = 1;
5969         icmd->ulpCt_l = 0;
5970
5971         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
5972         *((uint32_t *) (pcmd)) = ELS_CMD_FDISC;
5973         pcmd += sizeof(uint32_t); /* CSP Word 1 */
5974         memcpy(pcmd, &vport->phba->pport->fc_sparam, sizeof(struct serv_parm));
5975         sp = (struct serv_parm *) pcmd;
5976         /* Setup CSPs accordingly for Fabric */
5977         sp->cmn.e_d_tov = 0;
5978         sp->cmn.w2.r_a_tov = 0;
5979         sp->cls1.classValid = 0;
5980         sp->cls2.seqDelivery = 1;
5981         sp->cls3.seqDelivery = 1;
5982
5983         pcmd += sizeof(uint32_t); /* CSP Word 2 */
5984         pcmd += sizeof(uint32_t); /* CSP Word 3 */
5985         pcmd += sizeof(uint32_t); /* CSP Word 4 */
5986         pcmd += sizeof(uint32_t); /* Port Name */
5987         memcpy(pcmd, &vport->fc_portname, 8);
5988         pcmd += sizeof(uint32_t); /* Node Name */
5989         pcmd += sizeof(uint32_t); /* Node Name */
5990         memcpy(pcmd, &vport->fc_nodename, 8);
5991
5992         lpfc_set_disctmo(vport);
5993
5994         phba->fc_stat.elsXmitFDISC++;
5995         elsiocb->iocb_cmpl = lpfc_cmpl_els_fdisc;
5996
5997         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
5998                 "Issue FDISC:     did:x%x",
5999                 did, 0, 0);
6000
6001         rc = lpfc_issue_fabric_iocb(phba, elsiocb);
6002         if (rc == IOCB_ERROR) {
6003                 lpfc_els_free_iocb(phba, elsiocb);
6004                 lpfc_vport_set_state(vport, FC_VPORT_FAILED);
6005                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
6006                                  "0256 Issue FDISC: Cannot send IOCB\n");
6007                 return 1;
6008         }
6009         lpfc_vport_set_state(vport, FC_VPORT_INITIALIZING);
6010         vport->port_state = LPFC_FDISC;
6011         return 0;
6012 }
6013
6014 /**
6015  * lpfc_cmpl_els_npiv_logo: Completion function with vport logo.
6016  * @phba: pointer to lpfc hba data structure.
6017  * @cmdiocb: pointer to lpfc command iocb data structure.
6018  * @rspiocb: pointer to lpfc response iocb data structure.
6019  *
6020  * This routine is the completion callback function to the issuing of a LOGO
6021  * ELS command off a vport. It frees the command IOCB and then decrement the
6022  * reference count held on ndlp for this completion function, indicating that
6023  * the reference to the ndlp is no long needed. Note that the
6024  * lpfc_els_free_iocb() routine decrements the ndlp reference held for this
6025  * callback function and an additional explicit ndlp reference decrementation
6026  * will trigger the actual release of the ndlp.
6027  **/
6028 static void
6029 lpfc_cmpl_els_npiv_logo(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
6030                         struct lpfc_iocbq *rspiocb)
6031 {
6032         struct lpfc_vport *vport = cmdiocb->vport;
6033         IOCB_t *irsp;
6034         struct lpfc_nodelist *ndlp;
6035         ndlp = (struct lpfc_nodelist *)cmdiocb->context1;
6036
6037         irsp = &rspiocb->iocb;
6038         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
6039                 "LOGO npiv cmpl:  status:x%x/x%x did:x%x",
6040                 irsp->ulpStatus, irsp->un.ulpWord[4], irsp->un.rcvels.remoteID);
6041
6042         lpfc_els_free_iocb(phba, cmdiocb);
6043         vport->unreg_vpi_cmpl = VPORT_ERROR;
6044
6045         /* Trigger the release of the ndlp after logo */
6046         lpfc_nlp_put(ndlp);
6047 }
6048
6049 /**
6050  * lpfc_issue_els_npiv_logo: Issue a logo off a vport.
6051  * @vport: pointer to a virtual N_Port data structure.
6052  * @ndlp: pointer to a node-list data structure.
6053  *
6054  * This routine issues a LOGO ELS command to an @ndlp off a @vport.
6055  *
6056  * Note that, in lpfc_prep_els_iocb() routine, the reference count of ndlp
6057  * will be incremented by 1 for holding the ndlp and the reference to ndlp
6058  * will be stored into the context1 field of the IOCB for the completion
6059  * callback function to the LOGO ELS command.
6060  *
6061  * Return codes
6062  *   0 - Successfully issued logo off the @vport
6063  *   1 - Failed to issue logo off the @vport
6064  **/
6065 int
6066 lpfc_issue_els_npiv_logo(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
6067 {
6068         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
6069         struct lpfc_hba  *phba = vport->phba;
6070         struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
6071         IOCB_t *icmd;
6072         struct lpfc_iocbq *elsiocb;
6073         uint8_t *pcmd;
6074         uint16_t cmdsize;
6075
6076         cmdsize = 2 * sizeof(uint32_t) + sizeof(struct lpfc_name);
6077         elsiocb = lpfc_prep_els_iocb(vport, 1, cmdsize, 0, ndlp, ndlp->nlp_DID,
6078                                      ELS_CMD_LOGO);
6079         if (!elsiocb)
6080                 return 1;
6081
6082         icmd = &elsiocb->iocb;
6083         pcmd = (uint8_t *) (((struct lpfc_dmabuf *) elsiocb->context2)->virt);
6084         *((uint32_t *) (pcmd)) = ELS_CMD_LOGO;
6085         pcmd += sizeof(uint32_t);
6086
6087         /* Fill in LOGO payload */
6088         *((uint32_t *) (pcmd)) = be32_to_cpu(vport->fc_myDID);
6089         pcmd += sizeof(uint32_t);
6090         memcpy(pcmd, &vport->fc_portname, sizeof(struct lpfc_name));
6091
6092         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
6093                 "Issue LOGO npiv  did:x%x flg:x%x",
6094                 ndlp->nlp_DID, ndlp->nlp_flag, 0);
6095
6096         elsiocb->iocb_cmpl = lpfc_cmpl_els_npiv_logo;
6097         spin_lock_irq(shost->host_lock);
6098         ndlp->nlp_flag |= NLP_LOGO_SND;
6099         spin_unlock_irq(shost->host_lock);
6100         if (lpfc_sli_issue_iocb(phba, pring, elsiocb, 0) == IOCB_ERROR) {
6101                 spin_lock_irq(shost->host_lock);
6102                 ndlp->nlp_flag &= ~NLP_LOGO_SND;
6103                 spin_unlock_irq(shost->host_lock);
6104                 lpfc_els_free_iocb(phba, elsiocb);
6105                 return 1;
6106         }
6107         return 0;
6108 }
6109
6110 /**
6111  * lpfc_fabric_block_timeout: Handler function to the fabric block timer.
6112  * @ptr: holder for the timer function associated data.
6113  *
6114  * This routine is invoked by the fabric iocb block timer after
6115  * timeout. It posts the fabric iocb block timeout event by setting the
6116  * WORKER_FABRIC_BLOCK_TMO bit to work port event bitmap and then invokes
6117  * lpfc_worker_wake_up() routine to wake up the worker thread. It is for
6118  * the worker thread to invoke the lpfc_unblock_fabric_iocbs() on the
6119  * posted event WORKER_FABRIC_BLOCK_TMO.
6120  **/
6121 void
6122 lpfc_fabric_block_timeout(unsigned long ptr)
6123 {
6124         struct lpfc_hba  *phba = (struct lpfc_hba *) ptr;
6125         unsigned long iflags;
6126         uint32_t tmo_posted;
6127
6128         spin_lock_irqsave(&phba->pport->work_port_lock, iflags);
6129         tmo_posted = phba->pport->work_port_events & WORKER_FABRIC_BLOCK_TMO;
6130         if (!tmo_posted)
6131                 phba->pport->work_port_events |= WORKER_FABRIC_BLOCK_TMO;
6132         spin_unlock_irqrestore(&phba->pport->work_port_lock, iflags);
6133
6134         if (!tmo_posted)
6135                 lpfc_worker_wake_up(phba);
6136         return;
6137 }
6138
6139 /**
6140  * lpfc_resume_fabric_iocbs: Issue a fabric iocb from driver internal list.
6141  * @phba: pointer to lpfc hba data structure.
6142  *
6143  * This routine issues one fabric iocb from the driver internal list to
6144  * the HBA. It first checks whether it's ready to issue one fabric iocb to
6145  * the HBA (whether there is no outstanding fabric iocb). If so, it shall
6146  * remove one pending fabric iocb from the driver internal list and invokes
6147  * lpfc_sli_issue_iocb() routine to send the fabric iocb to the HBA.
6148  **/
6149 static void
6150 lpfc_resume_fabric_iocbs(struct lpfc_hba *phba)
6151 {
6152         struct lpfc_iocbq *iocb;
6153         unsigned long iflags;
6154         int ret;
6155         struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
6156         IOCB_t *cmd;
6157
6158 repeat:
6159         iocb = NULL;
6160         spin_lock_irqsave(&phba->hbalock, iflags);
6161         /* Post any pending iocb to the SLI layer */
6162         if (atomic_read(&phba->fabric_iocb_count) == 0) {
6163                 list_remove_head(&phba->fabric_iocb_list, iocb, typeof(*iocb),
6164                                  list);
6165                 if (iocb)
6166                         /* Increment fabric iocb count to hold the position */
6167                         atomic_inc(&phba->fabric_iocb_count);
6168         }
6169         spin_unlock_irqrestore(&phba->hbalock, iflags);
6170         if (iocb) {
6171                 iocb->fabric_iocb_cmpl = iocb->iocb_cmpl;
6172                 iocb->iocb_cmpl = lpfc_cmpl_fabric_iocb;
6173                 iocb->iocb_flag |= LPFC_IO_FABRIC;
6174
6175                 lpfc_debugfs_disc_trc(iocb->vport, LPFC_DISC_TRC_ELS_CMD,
6176                         "Fabric sched1:   ste:x%x",
6177                         iocb->vport->port_state, 0, 0);
6178
6179                 ret = lpfc_sli_issue_iocb(phba, pring, iocb, 0);
6180
6181                 if (ret == IOCB_ERROR) {
6182                         iocb->iocb_cmpl = iocb->fabric_iocb_cmpl;
6183                         iocb->fabric_iocb_cmpl = NULL;
6184                         iocb->iocb_flag &= ~LPFC_IO_FABRIC;
6185                         cmd = &iocb->iocb;
6186                         cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
6187                         cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
6188                         iocb->iocb_cmpl(phba, iocb, iocb);
6189
6190                         atomic_dec(&phba->fabric_iocb_count);
6191                         goto repeat;
6192                 }
6193         }
6194
6195         return;
6196 }
6197
6198 /**
6199  * lpfc_unblock_fabric_iocbs: Unblock issuing fabric iocb command.
6200  * @phba: pointer to lpfc hba data structure.
6201  *
6202  * This routine unblocks the  issuing fabric iocb command. The function
6203  * will clear the fabric iocb block bit and then invoke the routine
6204  * lpfc_resume_fabric_iocbs() to issue one of the pending fabric iocb
6205  * from the driver internal fabric iocb list.
6206  **/
6207 void
6208 lpfc_unblock_fabric_iocbs(struct lpfc_hba *phba)
6209 {
6210         clear_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags);
6211
6212         lpfc_resume_fabric_iocbs(phba);
6213         return;
6214 }
6215
6216 /**
6217  * lpfc_block_fabric_iocbs: Block issuing fabric iocb command.
6218  * @phba: pointer to lpfc hba data structure.
6219  *
6220  * This routine blocks the issuing fabric iocb for a specified amount of
6221  * time (currently 100 ms). This is done by set the fabric iocb block bit
6222  * and set up a timeout timer for 100ms. When the block bit is set, no more
6223  * fabric iocb will be issued out of the HBA.
6224  **/
6225 static void
6226 lpfc_block_fabric_iocbs(struct lpfc_hba *phba)
6227 {
6228         int blocked;
6229
6230         blocked = test_and_set_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags);
6231         /* Start a timer to unblock fabric iocbs after 100ms */
6232         if (!blocked)
6233                 mod_timer(&phba->fabric_block_timer, jiffies + HZ/10 );
6234
6235         return;
6236 }
6237
6238 /**
6239  * lpfc_cmpl_fabric_iocb: Completion callback function for fabric iocb.
6240  * @phba: pointer to lpfc hba data structure.
6241  * @cmdiocb: pointer to lpfc command iocb data structure.
6242  * @rspiocb: pointer to lpfc response iocb data structure.
6243  *
6244  * This routine is the callback function that is put to the fabric iocb's
6245  * callback function pointer (iocb->iocb_cmpl). The original iocb's callback
6246  * function pointer has been stored in iocb->fabric_iocb_cmpl. This callback
6247  * function first restores and invokes the original iocb's callback function
6248  * and then invokes the lpfc_resume_fabric_iocbs() routine to issue the next
6249  * fabric bound iocb from the driver internal fabric iocb list onto the wire.
6250  **/
6251 static void
6252 lpfc_cmpl_fabric_iocb(struct lpfc_hba *phba, struct lpfc_iocbq *cmdiocb,
6253         struct lpfc_iocbq *rspiocb)
6254 {
6255         struct ls_rjt stat;
6256
6257         if ((cmdiocb->iocb_flag & LPFC_IO_FABRIC) != LPFC_IO_FABRIC)
6258                 BUG();
6259
6260         switch (rspiocb->iocb.ulpStatus) {
6261                 case IOSTAT_NPORT_RJT:
6262                 case IOSTAT_FABRIC_RJT:
6263                         if (rspiocb->iocb.un.ulpWord[4] & RJT_UNAVAIL_TEMP) {
6264                                 lpfc_block_fabric_iocbs(phba);
6265                         }
6266                         break;
6267
6268                 case IOSTAT_NPORT_BSY:
6269                 case IOSTAT_FABRIC_BSY:
6270                         lpfc_block_fabric_iocbs(phba);
6271                         break;
6272
6273                 case IOSTAT_LS_RJT:
6274                         stat.un.lsRjtError =
6275                                 be32_to_cpu(rspiocb->iocb.un.ulpWord[4]);
6276                         if ((stat.un.b.lsRjtRsnCode == LSRJT_UNABLE_TPC) ||
6277                                 (stat.un.b.lsRjtRsnCode == LSRJT_LOGICAL_BSY))
6278                                 lpfc_block_fabric_iocbs(phba);
6279                         break;
6280         }
6281
6282         if (atomic_read(&phba->fabric_iocb_count) == 0)
6283                 BUG();
6284
6285         cmdiocb->iocb_cmpl = cmdiocb->fabric_iocb_cmpl;
6286         cmdiocb->fabric_iocb_cmpl = NULL;
6287         cmdiocb->iocb_flag &= ~LPFC_IO_FABRIC;
6288         cmdiocb->iocb_cmpl(phba, cmdiocb, rspiocb);
6289
6290         atomic_dec(&phba->fabric_iocb_count);
6291         if (!test_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags)) {
6292                 /* Post any pending iocbs to HBA */
6293                 lpfc_resume_fabric_iocbs(phba);
6294         }
6295 }
6296
6297 /**
6298  * lpfc_issue_fabric_iocb: Issue a fabric iocb command.
6299  * @phba: pointer to lpfc hba data structure.
6300  * @iocb: pointer to lpfc command iocb data structure.
6301  *
6302  * This routine is used as the top-level API for issuing a fabric iocb command
6303  * such as FLOGI and FDISC. To accommodate certain switch fabric, this driver
6304  * function makes sure that only one fabric bound iocb will be outstanding at
6305  * any given time. As such, this function will first check to see whether there
6306  * is already an outstanding fabric iocb on the wire. If so, it will put the
6307  * newly issued iocb onto the driver internal fabric iocb list, waiting to be
6308  * issued later. Otherwise, it will issue the iocb on the wire and update the
6309  * fabric iocb count it indicate that there is one fabric iocb on the wire.
6310  *
6311  * Note, this implementation has a potential sending out fabric IOCBs out of
6312  * order. The problem is caused by the construction of the "ready" boolen does
6313  * not include the condition that the internal fabric IOCB list is empty. As
6314  * such, it is possible a fabric IOCB issued by this routine might be "jump"
6315  * ahead of the fabric IOCBs in the internal list.
6316  *
6317  * Return code
6318  *   IOCB_SUCCESS - either fabric iocb put on the list or issued successfully
6319  *   IOCB_ERROR - failed to issue fabric iocb
6320  **/
6321 static int
6322 lpfc_issue_fabric_iocb(struct lpfc_hba *phba, struct lpfc_iocbq *iocb)
6323 {
6324         unsigned long iflags;
6325         struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
6326         int ready;
6327         int ret;
6328
6329         if (atomic_read(&phba->fabric_iocb_count) > 1)
6330                 BUG();
6331
6332         spin_lock_irqsave(&phba->hbalock, iflags);
6333         ready = atomic_read(&phba->fabric_iocb_count) == 0 &&
6334                 !test_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags);
6335
6336         if (ready)
6337                 /* Increment fabric iocb count to hold the position */
6338                 atomic_inc(&phba->fabric_iocb_count);
6339         spin_unlock_irqrestore(&phba->hbalock, iflags);
6340         if (ready) {
6341                 iocb->fabric_iocb_cmpl = iocb->iocb_cmpl;
6342                 iocb->iocb_cmpl = lpfc_cmpl_fabric_iocb;
6343                 iocb->iocb_flag |= LPFC_IO_FABRIC;
6344
6345                 lpfc_debugfs_disc_trc(iocb->vport, LPFC_DISC_TRC_ELS_CMD,
6346                         "Fabric sched2:   ste:x%x",
6347                         iocb->vport->port_state, 0, 0);
6348
6349                 ret = lpfc_sli_issue_iocb(phba, pring, iocb, 0);
6350
6351                 if (ret == IOCB_ERROR) {
6352                         iocb->iocb_cmpl = iocb->fabric_iocb_cmpl;
6353                         iocb->fabric_iocb_cmpl = NULL;
6354                         iocb->iocb_flag &= ~LPFC_IO_FABRIC;
6355                         atomic_dec(&phba->fabric_iocb_count);
6356                 }
6357         } else {
6358                 spin_lock_irqsave(&phba->hbalock, iflags);
6359                 list_add_tail(&iocb->list, &phba->fabric_iocb_list);
6360                 spin_unlock_irqrestore(&phba->hbalock, iflags);
6361                 ret = IOCB_SUCCESS;
6362         }
6363         return ret;
6364 }
6365
6366 /**
6367  * lpfc_fabric_abort_vport: Abort a vport's iocbs from driver fabric iocb list.
6368  * @vport: pointer to a virtual N_Port data structure.
6369  *
6370  * This routine aborts all the IOCBs associated with a @vport from the
6371  * driver internal fabric IOCB list. The list contains fabric IOCBs to be
6372  * issued to the ELS IOCB ring. This abort function walks the fabric IOCB
6373  * list, removes each IOCB associated with the @vport off the list, set the
6374  * status feild to IOSTAT_LOCAL_REJECT, and invokes the callback function
6375  * associated with the IOCB.
6376  **/
6377 static void lpfc_fabric_abort_vport(struct lpfc_vport *vport)
6378 {
6379         LIST_HEAD(completions);
6380         struct lpfc_hba  *phba = vport->phba;
6381         struct lpfc_iocbq *tmp_iocb, *piocb;
6382         IOCB_t *cmd;
6383
6384         spin_lock_irq(&phba->hbalock);
6385         list_for_each_entry_safe(piocb, tmp_iocb, &phba->fabric_iocb_list,
6386                                  list) {
6387
6388                 if (piocb->vport != vport)
6389                         continue;
6390
6391                 list_move_tail(&piocb->list, &completions);
6392         }
6393         spin_unlock_irq(&phba->hbalock);
6394
6395         while (!list_empty(&completions)) {
6396                 piocb = list_get_first(&completions, struct lpfc_iocbq, list);
6397                 list_del_init(&piocb->list);
6398
6399                 cmd = &piocb->iocb;
6400                 cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
6401                 cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
6402                 (piocb->iocb_cmpl) (phba, piocb, piocb);
6403         }
6404 }
6405
6406 /**
6407  * lpfc_fabric_abort_nport: Abort a ndlp's iocbs from driver fabric iocb list.
6408  * @ndlp: pointer to a node-list data structure.
6409  *
6410  * This routine aborts all the IOCBs associated with an @ndlp from the
6411  * driver internal fabric IOCB list. The list contains fabric IOCBs to be
6412  * issued to the ELS IOCB ring. This abort function walks the fabric IOCB
6413  * list, removes each IOCB associated with the @ndlp off the list, set the
6414  * status feild to IOSTAT_LOCAL_REJECT, and invokes the callback function
6415  * associated with the IOCB.
6416  **/
6417 void lpfc_fabric_abort_nport(struct lpfc_nodelist *ndlp)
6418 {
6419         LIST_HEAD(completions);
6420         struct lpfc_hba  *phba = ndlp->vport->phba;
6421         struct lpfc_iocbq *tmp_iocb, *piocb;
6422         struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
6423         IOCB_t *cmd;
6424
6425         spin_lock_irq(&phba->hbalock);
6426         list_for_each_entry_safe(piocb, tmp_iocb, &phba->fabric_iocb_list,
6427                                  list) {
6428                 if ((lpfc_check_sli_ndlp(phba, pring, piocb, ndlp))) {
6429
6430                         list_move_tail(&piocb->list, &completions);
6431                 }
6432         }
6433         spin_unlock_irq(&phba->hbalock);
6434
6435         while (!list_empty(&completions)) {
6436                 piocb = list_get_first(&completions, struct lpfc_iocbq, list);
6437                 list_del_init(&piocb->list);
6438
6439                 cmd = &piocb->iocb;
6440                 cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
6441                 cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
6442                 (piocb->iocb_cmpl) (phba, piocb, piocb);
6443         }
6444 }
6445
6446 /**
6447  * lpfc_fabric_abort_hba: Abort all iocbs on driver fabric iocb list.
6448  * @phba: pointer to lpfc hba data structure.
6449  *
6450  * This routine aborts all the IOCBs currently on the driver internal
6451  * fabric IOCB list. The list contains fabric IOCBs to be issued to the ELS
6452  * IOCB ring. This function takes the entire IOCB list off the fabric IOCB
6453  * list, removes IOCBs off the list, set the status feild to
6454  * IOSTAT_LOCAL_REJECT, and invokes the callback function associated with
6455  * the IOCB.
6456  **/
6457 void lpfc_fabric_abort_hba(struct lpfc_hba *phba)
6458 {
6459         LIST_HEAD(completions);
6460         struct lpfc_iocbq *piocb;
6461         IOCB_t *cmd;
6462
6463         spin_lock_irq(&phba->hbalock);
6464         list_splice_init(&phba->fabric_iocb_list, &completions);
6465         spin_unlock_irq(&phba->hbalock);
6466
6467         while (!list_empty(&completions)) {
6468                 piocb = list_get_first(&completions, struct lpfc_iocbq, list);
6469                 list_del_init(&piocb->list);
6470
6471                 cmd = &piocb->iocb;
6472                 cmd->ulpStatus = IOSTAT_LOCAL_REJECT;
6473                 cmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
6474                 (piocb->iocb_cmpl) (phba, piocb, piocb);
6475         }
6476 }