Merge tag 'for-linus-20150909' of git://git.infradead.org/linux-mtd
[firefly-linux-kernel-4.4.55.git] / drivers / scsi / lpfc / lpfc_hbadisc.c
1 /*******************************************************************
2  * This file is part of the Emulex Linux Device Driver for         *
3  * Fibre Channel Host Bus Adapters.                                *
4  * Copyright (C) 2004-2015 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
22 #include <linux/blkdev.h>
23 #include <linux/delay.h>
24 #include <linux/slab.h>
25 #include <linux/pci.h>
26 #include <linux/kthread.h>
27 #include <linux/interrupt.h>
28
29 #include <scsi/scsi.h>
30 #include <scsi/scsi_device.h>
31 #include <scsi/scsi_host.h>
32 #include <scsi/scsi_transport_fc.h>
33
34 #include "lpfc_hw4.h"
35 #include "lpfc_hw.h"
36 #include "lpfc_nl.h"
37 #include "lpfc_disc.h"
38 #include "lpfc_sli.h"
39 #include "lpfc_sli4.h"
40 #include "lpfc_scsi.h"
41 #include "lpfc.h"
42 #include "lpfc_logmsg.h"
43 #include "lpfc_crtn.h"
44 #include "lpfc_vport.h"
45 #include "lpfc_debugfs.h"
46
47 /* AlpaArray for assignment of scsid for scan-down and bind_method */
48 static uint8_t lpfcAlpaArray[] = {
49         0xEF, 0xE8, 0xE4, 0xE2, 0xE1, 0xE0, 0xDC, 0xDA, 0xD9, 0xD6,
50         0xD5, 0xD4, 0xD3, 0xD2, 0xD1, 0xCE, 0xCD, 0xCC, 0xCB, 0xCA,
51         0xC9, 0xC7, 0xC6, 0xC5, 0xC3, 0xBC, 0xBA, 0xB9, 0xB6, 0xB5,
52         0xB4, 0xB3, 0xB2, 0xB1, 0xAE, 0xAD, 0xAC, 0xAB, 0xAA, 0xA9,
53         0xA7, 0xA6, 0xA5, 0xA3, 0x9F, 0x9E, 0x9D, 0x9B, 0x98, 0x97,
54         0x90, 0x8F, 0x88, 0x84, 0x82, 0x81, 0x80, 0x7C, 0x7A, 0x79,
55         0x76, 0x75, 0x74, 0x73, 0x72, 0x71, 0x6E, 0x6D, 0x6C, 0x6B,
56         0x6A, 0x69, 0x67, 0x66, 0x65, 0x63, 0x5C, 0x5A, 0x59, 0x56,
57         0x55, 0x54, 0x53, 0x52, 0x51, 0x4E, 0x4D, 0x4C, 0x4B, 0x4A,
58         0x49, 0x47, 0x46, 0x45, 0x43, 0x3C, 0x3A, 0x39, 0x36, 0x35,
59         0x34, 0x33, 0x32, 0x31, 0x2E, 0x2D, 0x2C, 0x2B, 0x2A, 0x29,
60         0x27, 0x26, 0x25, 0x23, 0x1F, 0x1E, 0x1D, 0x1B, 0x18, 0x17,
61         0x10, 0x0F, 0x08, 0x04, 0x02, 0x01
62 };
63
64 static void lpfc_disc_timeout_handler(struct lpfc_vport *);
65 static void lpfc_disc_flush_list(struct lpfc_vport *vport);
66 static void lpfc_unregister_fcfi_cmpl(struct lpfc_hba *, LPFC_MBOXQ_t *);
67 static int lpfc_fcf_inuse(struct lpfc_hba *);
68
69 void
70 lpfc_terminate_rport_io(struct fc_rport *rport)
71 {
72         struct lpfc_rport_data *rdata;
73         struct lpfc_nodelist * ndlp;
74         struct lpfc_hba *phba;
75
76         rdata = rport->dd_data;
77         ndlp = rdata->pnode;
78
79         if (!ndlp || !NLP_CHK_NODE_ACT(ndlp)) {
80                 if (rport->roles & FC_RPORT_ROLE_FCP_TARGET)
81                         printk(KERN_ERR "Cannot find remote node"
82                         " to terminate I/O Data x%x\n",
83                         rport->port_id);
84                 return;
85         }
86
87         phba  = ndlp->phba;
88
89         lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_RPORT,
90                 "rport terminate: sid:x%x did:x%x flg:x%x",
91                 ndlp->nlp_sid, ndlp->nlp_DID, ndlp->nlp_flag);
92
93         if (ndlp->nlp_sid != NLP_NO_SID) {
94                 lpfc_sli_abort_iocb(ndlp->vport,
95                         &phba->sli.ring[phba->sli.fcp_ring],
96                         ndlp->nlp_sid, 0, LPFC_CTX_TGT);
97         }
98 }
99
100 /*
101  * This function will be called when dev_loss_tmo fire.
102  */
103 void
104 lpfc_dev_loss_tmo_callbk(struct fc_rport *rport)
105 {
106         struct lpfc_rport_data *rdata;
107         struct lpfc_nodelist * ndlp;
108         struct lpfc_vport *vport;
109         struct Scsi_Host *shost;
110         struct lpfc_hba   *phba;
111         struct lpfc_work_evt *evtp;
112         int  put_node;
113         int  put_rport;
114
115         rdata = rport->dd_data;
116         ndlp = rdata->pnode;
117         if (!ndlp || !NLP_CHK_NODE_ACT(ndlp))
118                 return;
119
120         vport = ndlp->vport;
121         phba  = vport->phba;
122
123         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_RPORT,
124                 "rport devlosscb: sid:x%x did:x%x flg:x%x",
125                 ndlp->nlp_sid, ndlp->nlp_DID, ndlp->nlp_flag);
126
127         lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_NODE,
128                          "3181 dev_loss_callbk x%06x, rport %p flg x%x\n",
129                          ndlp->nlp_DID, ndlp->rport, ndlp->nlp_flag);
130
131         /* Don't defer this if we are in the process of deleting the vport
132          * or unloading the driver. The unload will cleanup the node
133          * appropriately we just need to cleanup the ndlp rport info here.
134          */
135         if (vport->load_flag & FC_UNLOADING) {
136                 put_node = rdata->pnode != NULL;
137                 put_rport = ndlp->rport != NULL;
138                 rdata->pnode = NULL;
139                 ndlp->rport = NULL;
140                 if (put_node)
141                         lpfc_nlp_put(ndlp);
142                 if (put_rport)
143                         put_device(&rport->dev);
144                 return;
145         }
146
147         if (ndlp->nlp_state == NLP_STE_MAPPED_NODE)
148                 return;
149
150         if (rport->port_name != wwn_to_u64(ndlp->nlp_portname.u.wwn))
151                 lpfc_printf_vlog(vport, KERN_ERR, LOG_NODE,
152                                 "6789 rport name %llx != node port name %llx",
153                                 rport->port_name,
154                                 wwn_to_u64(ndlp->nlp_portname.u.wwn));
155
156         evtp = &ndlp->dev_loss_evt;
157
158         if (!list_empty(&evtp->evt_listp)) {
159                 lpfc_printf_vlog(vport, KERN_ERR, LOG_NODE,
160                                 "6790 rport name %llx dev_loss_evt pending",
161                                 rport->port_name);
162                 return;
163         }
164
165         shost = lpfc_shost_from_vport(vport);
166         spin_lock_irq(shost->host_lock);
167         ndlp->nlp_flag |= NLP_IN_DEV_LOSS;
168         spin_unlock_irq(shost->host_lock);
169
170         /* We need to hold the node by incrementing the reference
171          * count until this queued work is done
172          */
173         evtp->evt_arg1  = lpfc_nlp_get(ndlp);
174
175         spin_lock_irq(&phba->hbalock);
176         if (evtp->evt_arg1) {
177                 evtp->evt = LPFC_EVT_DEV_LOSS;
178                 list_add_tail(&evtp->evt_listp, &phba->work_list);
179                 lpfc_worker_wake_up(phba);
180         }
181         spin_unlock_irq(&phba->hbalock);
182
183         return;
184 }
185
186 /**
187  * lpfc_dev_loss_tmo_handler - Remote node devloss timeout handler
188  * @ndlp: Pointer to remote node object.
189  *
190  * This function is called from the worker thread when devloss timeout timer
191  * expires. For SLI4 host, this routine shall return 1 when at lease one
192  * remote node, including this @ndlp, is still in use of FCF; otherwise, this
193  * routine shall return 0 when there is no remote node is still in use of FCF
194  * when devloss timeout happened to this @ndlp.
195  **/
196 static int
197 lpfc_dev_loss_tmo_handler(struct lpfc_nodelist *ndlp)
198 {
199         struct lpfc_rport_data *rdata;
200         struct fc_rport   *rport;
201         struct lpfc_vport *vport;
202         struct lpfc_hba   *phba;
203         struct Scsi_Host  *shost;
204         uint8_t *name;
205         int  put_node;
206         int warn_on = 0;
207         int fcf_inuse = 0;
208
209         rport = ndlp->rport;
210         vport = ndlp->vport;
211         shost = lpfc_shost_from_vport(vport);
212
213         spin_lock_irq(shost->host_lock);
214         ndlp->nlp_flag &= ~NLP_IN_DEV_LOSS;
215         spin_unlock_irq(shost->host_lock);
216
217         if (!rport)
218                 return fcf_inuse;
219
220         name = (uint8_t *) &ndlp->nlp_portname;
221         phba  = vport->phba;
222
223         if (phba->sli_rev == LPFC_SLI_REV4)
224                 fcf_inuse = lpfc_fcf_inuse(phba);
225
226         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_RPORT,
227                 "rport devlosstmo:did:x%x type:x%x id:x%x",
228                 ndlp->nlp_DID, ndlp->nlp_type, rport->scsi_target_id);
229
230         lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_NODE,
231                          "3182 dev_loss_tmo_handler x%06x, rport %p flg x%x\n",
232                          ndlp->nlp_DID, ndlp->rport, ndlp->nlp_flag);
233
234         /*
235          * lpfc_nlp_remove if reached with dangling rport drops the
236          * reference. To make sure that does not happen clear rport
237          * pointer in ndlp before lpfc_nlp_put.
238          */
239         rdata = rport->dd_data;
240
241         /* Don't defer this if we are in the process of deleting the vport
242          * or unloading the driver. The unload will cleanup the node
243          * appropriately we just need to cleanup the ndlp rport info here.
244          */
245         if (vport->load_flag & FC_UNLOADING) {
246                 if (ndlp->nlp_sid != NLP_NO_SID) {
247                         /* flush the target */
248                         lpfc_sli_abort_iocb(vport,
249                                         &phba->sli.ring[phba->sli.fcp_ring],
250                                         ndlp->nlp_sid, 0, LPFC_CTX_TGT);
251                 }
252                 put_node = rdata->pnode != NULL;
253                 rdata->pnode = NULL;
254                 ndlp->rport = NULL;
255                 if (put_node)
256                         lpfc_nlp_put(ndlp);
257                 put_device(&rport->dev);
258
259                 return fcf_inuse;
260         }
261
262         if (ndlp->nlp_state == NLP_STE_MAPPED_NODE) {
263                 lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
264                                  "0284 Devloss timeout Ignored on "
265                                  "WWPN %x:%x:%x:%x:%x:%x:%x:%x "
266                                  "NPort x%x\n",
267                                  *name, *(name+1), *(name+2), *(name+3),
268                                  *(name+4), *(name+5), *(name+6), *(name+7),
269                                  ndlp->nlp_DID);
270                 return fcf_inuse;
271         }
272
273         put_node = rdata->pnode != NULL;
274         rdata->pnode = NULL;
275         ndlp->rport = NULL;
276         if (put_node)
277                 lpfc_nlp_put(ndlp);
278         put_device(&rport->dev);
279
280         if (ndlp->nlp_type & NLP_FABRIC)
281                 return fcf_inuse;
282
283         if (ndlp->nlp_sid != NLP_NO_SID) {
284                 warn_on = 1;
285                 lpfc_sli_abort_iocb(vport, &phba->sli.ring[phba->sli.fcp_ring],
286                                     ndlp->nlp_sid, 0, LPFC_CTX_TGT);
287         }
288
289         if (warn_on) {
290                 lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
291                                  "0203 Devloss timeout on "
292                                  "WWPN %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x "
293                                  "NPort x%06x Data: x%x x%x x%x\n",
294                                  *name, *(name+1), *(name+2), *(name+3),
295                                  *(name+4), *(name+5), *(name+6), *(name+7),
296                                  ndlp->nlp_DID, ndlp->nlp_flag,
297                                  ndlp->nlp_state, ndlp->nlp_rpi);
298         } else {
299                 lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
300                                  "0204 Devloss timeout on "
301                                  "WWPN %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x "
302                                  "NPort x%06x Data: x%x x%x x%x\n",
303                                  *name, *(name+1), *(name+2), *(name+3),
304                                  *(name+4), *(name+5), *(name+6), *(name+7),
305                                  ndlp->nlp_DID, ndlp->nlp_flag,
306                                  ndlp->nlp_state, ndlp->nlp_rpi);
307         }
308
309         if (!(vport->load_flag & FC_UNLOADING) &&
310             !(ndlp->nlp_flag & NLP_DELAY_TMO) &&
311             !(ndlp->nlp_flag & NLP_NPR_2B_DISC) &&
312             (ndlp->nlp_state != NLP_STE_UNMAPPED_NODE) &&
313             (ndlp->nlp_state != NLP_STE_REG_LOGIN_ISSUE) &&
314             (ndlp->nlp_state != NLP_STE_PRLI_ISSUE))
315                 lpfc_disc_state_machine(vport, ndlp, NULL, NLP_EVT_DEVICE_RM);
316
317         return fcf_inuse;
318 }
319
320 /**
321  * lpfc_sli4_post_dev_loss_tmo_handler - SLI4 post devloss timeout handler
322  * @phba: Pointer to hba context object.
323  * @fcf_inuse: SLI4 FCF in-use state reported from devloss timeout handler.
324  * @nlp_did: remote node identifer with devloss timeout.
325  *
326  * This function is called from the worker thread after invoking devloss
327  * timeout handler and releasing the reference count for the ndlp with
328  * which the devloss timeout was handled for SLI4 host. For the devloss
329  * timeout of the last remote node which had been in use of FCF, when this
330  * routine is invoked, it shall be guaranteed that none of the remote are
331  * in-use of FCF. When devloss timeout to the last remote using the FCF,
332  * if the FIP engine is neither in FCF table scan process nor roundrobin
333  * failover process, the in-use FCF shall be unregistered. If the FIP
334  * engine is in FCF discovery process, the devloss timeout state shall
335  * be set for either the FCF table scan process or roundrobin failover
336  * process to unregister the in-use FCF.
337  **/
338 static void
339 lpfc_sli4_post_dev_loss_tmo_handler(struct lpfc_hba *phba, int fcf_inuse,
340                                     uint32_t nlp_did)
341 {
342         /* If devloss timeout happened to a remote node when FCF had no
343          * longer been in-use, do nothing.
344          */
345         if (!fcf_inuse)
346                 return;
347
348         if ((phba->hba_flag & HBA_FIP_SUPPORT) && !lpfc_fcf_inuse(phba)) {
349                 spin_lock_irq(&phba->hbalock);
350                 if (phba->fcf.fcf_flag & FCF_DISCOVERY) {
351                         if (phba->hba_flag & HBA_DEVLOSS_TMO) {
352                                 spin_unlock_irq(&phba->hbalock);
353                                 return;
354                         }
355                         phba->hba_flag |= HBA_DEVLOSS_TMO;
356                         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
357                                         "2847 Last remote node (x%x) using "
358                                         "FCF devloss tmo\n", nlp_did);
359                 }
360                 if (phba->fcf.fcf_flag & FCF_REDISC_PROG) {
361                         spin_unlock_irq(&phba->hbalock);
362                         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
363                                         "2868 Devloss tmo to FCF rediscovery "
364                                         "in progress\n");
365                         return;
366                 }
367                 if (!(phba->hba_flag & (FCF_TS_INPROG | FCF_RR_INPROG))) {
368                         spin_unlock_irq(&phba->hbalock);
369                         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
370                                         "2869 Devloss tmo to idle FIP engine, "
371                                         "unreg in-use FCF and rescan.\n");
372                         /* Unregister in-use FCF and rescan */
373                         lpfc_unregister_fcf_rescan(phba);
374                         return;
375                 }
376                 spin_unlock_irq(&phba->hbalock);
377                 if (phba->hba_flag & FCF_TS_INPROG)
378                         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
379                                         "2870 FCF table scan in progress\n");
380                 if (phba->hba_flag & FCF_RR_INPROG)
381                         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
382                                         "2871 FLOGI roundrobin FCF failover "
383                                         "in progress\n");
384         }
385         lpfc_unregister_unused_fcf(phba);
386 }
387
388 /**
389  * lpfc_alloc_fast_evt - Allocates data structure for posting event
390  * @phba: Pointer to hba context object.
391  *
392  * This function is called from the functions which need to post
393  * events from interrupt context. This function allocates data
394  * structure required for posting event. It also keeps track of
395  * number of events pending and prevent event storm when there are
396  * too many events.
397  **/
398 struct lpfc_fast_path_event *
399 lpfc_alloc_fast_evt(struct lpfc_hba *phba) {
400         struct lpfc_fast_path_event *ret;
401
402         /* If there are lot of fast event do not exhaust memory due to this */
403         if (atomic_read(&phba->fast_event_count) > LPFC_MAX_EVT_COUNT)
404                 return NULL;
405
406         ret = kzalloc(sizeof(struct lpfc_fast_path_event),
407                         GFP_ATOMIC);
408         if (ret) {
409                 atomic_inc(&phba->fast_event_count);
410                 INIT_LIST_HEAD(&ret->work_evt.evt_listp);
411                 ret->work_evt.evt = LPFC_EVT_FASTPATH_MGMT_EVT;
412         }
413         return ret;
414 }
415
416 /**
417  * lpfc_free_fast_evt - Frees event data structure
418  * @phba: Pointer to hba context object.
419  * @evt:  Event object which need to be freed.
420  *
421  * This function frees the data structure required for posting
422  * events.
423  **/
424 void
425 lpfc_free_fast_evt(struct lpfc_hba *phba,
426                 struct lpfc_fast_path_event *evt) {
427
428         atomic_dec(&phba->fast_event_count);
429         kfree(evt);
430 }
431
432 /**
433  * lpfc_send_fastpath_evt - Posts events generated from fast path
434  * @phba: Pointer to hba context object.
435  * @evtp: Event data structure.
436  *
437  * This function is called from worker thread, when the interrupt
438  * context need to post an event. This function posts the event
439  * to fc transport netlink interface.
440  **/
441 static void
442 lpfc_send_fastpath_evt(struct lpfc_hba *phba,
443                 struct lpfc_work_evt *evtp)
444 {
445         unsigned long evt_category, evt_sub_category;
446         struct lpfc_fast_path_event *fast_evt_data;
447         char *evt_data;
448         uint32_t evt_data_size;
449         struct Scsi_Host *shost;
450
451         fast_evt_data = container_of(evtp, struct lpfc_fast_path_event,
452                 work_evt);
453
454         evt_category = (unsigned long) fast_evt_data->un.fabric_evt.event_type;
455         evt_sub_category = (unsigned long) fast_evt_data->un.
456                         fabric_evt.subcategory;
457         shost = lpfc_shost_from_vport(fast_evt_data->vport);
458         if (evt_category == FC_REG_FABRIC_EVENT) {
459                 if (evt_sub_category == LPFC_EVENT_FCPRDCHKERR) {
460                         evt_data = (char *) &fast_evt_data->un.read_check_error;
461                         evt_data_size = sizeof(fast_evt_data->un.
462                                 read_check_error);
463                 } else if ((evt_sub_category == LPFC_EVENT_FABRIC_BUSY) ||
464                         (evt_sub_category == LPFC_EVENT_PORT_BUSY)) {
465                         evt_data = (char *) &fast_evt_data->un.fabric_evt;
466                         evt_data_size = sizeof(fast_evt_data->un.fabric_evt);
467                 } else {
468                         lpfc_free_fast_evt(phba, fast_evt_data);
469                         return;
470                 }
471         } else if (evt_category == FC_REG_SCSI_EVENT) {
472                 switch (evt_sub_category) {
473                 case LPFC_EVENT_QFULL:
474                 case LPFC_EVENT_DEVBSY:
475                         evt_data = (char *) &fast_evt_data->un.scsi_evt;
476                         evt_data_size = sizeof(fast_evt_data->un.scsi_evt);
477                         break;
478                 case LPFC_EVENT_CHECK_COND:
479                         evt_data = (char *) &fast_evt_data->un.check_cond_evt;
480                         evt_data_size =  sizeof(fast_evt_data->un.
481                                 check_cond_evt);
482                         break;
483                 case LPFC_EVENT_VARQUEDEPTH:
484                         evt_data = (char *) &fast_evt_data->un.queue_depth_evt;
485                         evt_data_size = sizeof(fast_evt_data->un.
486                                 queue_depth_evt);
487                         break;
488                 default:
489                         lpfc_free_fast_evt(phba, fast_evt_data);
490                         return;
491                 }
492         } else {
493                 lpfc_free_fast_evt(phba, fast_evt_data);
494                 return;
495         }
496
497         fc_host_post_vendor_event(shost,
498                 fc_get_event_number(),
499                 evt_data_size,
500                 evt_data,
501                 LPFC_NL_VENDOR_ID);
502
503         lpfc_free_fast_evt(phba, fast_evt_data);
504         return;
505 }
506
507 static void
508 lpfc_work_list_done(struct lpfc_hba *phba)
509 {
510         struct lpfc_work_evt  *evtp = NULL;
511         struct lpfc_nodelist  *ndlp;
512         int free_evt;
513         int fcf_inuse;
514         uint32_t nlp_did;
515
516         spin_lock_irq(&phba->hbalock);
517         while (!list_empty(&phba->work_list)) {
518                 list_remove_head((&phba->work_list), evtp, typeof(*evtp),
519                                  evt_listp);
520                 spin_unlock_irq(&phba->hbalock);
521                 free_evt = 1;
522                 switch (evtp->evt) {
523                 case LPFC_EVT_ELS_RETRY:
524                         ndlp = (struct lpfc_nodelist *) (evtp->evt_arg1);
525                         lpfc_els_retry_delay_handler(ndlp);
526                         free_evt = 0; /* evt is part of ndlp */
527                         /* decrement the node reference count held
528                          * for this queued work
529                          */
530                         lpfc_nlp_put(ndlp);
531                         break;
532                 case LPFC_EVT_DEV_LOSS:
533                         ndlp = (struct lpfc_nodelist *)(evtp->evt_arg1);
534                         fcf_inuse = lpfc_dev_loss_tmo_handler(ndlp);
535                         free_evt = 0;
536                         /* decrement the node reference count held for
537                          * this queued work
538                          */
539                         nlp_did = ndlp->nlp_DID;
540                         lpfc_nlp_put(ndlp);
541                         if (phba->sli_rev == LPFC_SLI_REV4)
542                                 lpfc_sli4_post_dev_loss_tmo_handler(phba,
543                                                                     fcf_inuse,
544                                                                     nlp_did);
545                         break;
546                 case LPFC_EVT_ONLINE:
547                         if (phba->link_state < LPFC_LINK_DOWN)
548                                 *(int *) (evtp->evt_arg1) = lpfc_online(phba);
549                         else
550                                 *(int *) (evtp->evt_arg1) = 0;
551                         complete((struct completion *)(evtp->evt_arg2));
552                         break;
553                 case LPFC_EVT_OFFLINE_PREP:
554                         if (phba->link_state >= LPFC_LINK_DOWN)
555                                 lpfc_offline_prep(phba, LPFC_MBX_WAIT);
556                         *(int *)(evtp->evt_arg1) = 0;
557                         complete((struct completion *)(evtp->evt_arg2));
558                         break;
559                 case LPFC_EVT_OFFLINE:
560                         lpfc_offline(phba);
561                         lpfc_sli_brdrestart(phba);
562                         *(int *)(evtp->evt_arg1) =
563                                 lpfc_sli_brdready(phba, HS_FFRDY | HS_MBRDY);
564                         lpfc_unblock_mgmt_io(phba);
565                         complete((struct completion *)(evtp->evt_arg2));
566                         break;
567                 case LPFC_EVT_WARM_START:
568                         lpfc_offline(phba);
569                         lpfc_reset_barrier(phba);
570                         lpfc_sli_brdreset(phba);
571                         lpfc_hba_down_post(phba);
572                         *(int *)(evtp->evt_arg1) =
573                                 lpfc_sli_brdready(phba, HS_MBRDY);
574                         lpfc_unblock_mgmt_io(phba);
575                         complete((struct completion *)(evtp->evt_arg2));
576                         break;
577                 case LPFC_EVT_KILL:
578                         lpfc_offline(phba);
579                         *(int *)(evtp->evt_arg1)
580                                 = (phba->pport->stopped)
581                                         ? 0 : lpfc_sli_brdkill(phba);
582                         lpfc_unblock_mgmt_io(phba);
583                         complete((struct completion *)(evtp->evt_arg2));
584                         break;
585                 case LPFC_EVT_FASTPATH_MGMT_EVT:
586                         lpfc_send_fastpath_evt(phba, evtp);
587                         free_evt = 0;
588                         break;
589                 case LPFC_EVT_RESET_HBA:
590                         if (!(phba->pport->load_flag & FC_UNLOADING))
591                                 lpfc_reset_hba(phba);
592                         break;
593                 }
594                 if (free_evt)
595                         kfree(evtp);
596                 spin_lock_irq(&phba->hbalock);
597         }
598         spin_unlock_irq(&phba->hbalock);
599
600 }
601
602 static void
603 lpfc_work_done(struct lpfc_hba *phba)
604 {
605         struct lpfc_sli_ring *pring;
606         uint32_t ha_copy, status, control, work_port_events;
607         struct lpfc_vport **vports;
608         struct lpfc_vport *vport;
609         int i;
610
611         spin_lock_irq(&phba->hbalock);
612         ha_copy = phba->work_ha;
613         phba->work_ha = 0;
614         spin_unlock_irq(&phba->hbalock);
615
616         /* First, try to post the next mailbox command to SLI4 device */
617         if (phba->pci_dev_grp == LPFC_PCI_DEV_OC)
618                 lpfc_sli4_post_async_mbox(phba);
619
620         if (ha_copy & HA_ERATT)
621                 /* Handle the error attention event */
622                 lpfc_handle_eratt(phba);
623
624         if (ha_copy & HA_MBATT)
625                 lpfc_sli_handle_mb_event(phba);
626
627         if (ha_copy & HA_LATT)
628                 lpfc_handle_latt(phba);
629
630         /* Process SLI4 events */
631         if (phba->pci_dev_grp == LPFC_PCI_DEV_OC) {
632                 if (phba->hba_flag & HBA_RRQ_ACTIVE)
633                         lpfc_handle_rrq_active(phba);
634                 if (phba->hba_flag & FCP_XRI_ABORT_EVENT)
635                         lpfc_sli4_fcp_xri_abort_event_proc(phba);
636                 if (phba->hba_flag & ELS_XRI_ABORT_EVENT)
637                         lpfc_sli4_els_xri_abort_event_proc(phba);
638                 if (phba->hba_flag & ASYNC_EVENT)
639                         lpfc_sli4_async_event_proc(phba);
640                 if (phba->hba_flag & HBA_POST_RECEIVE_BUFFER) {
641                         spin_lock_irq(&phba->hbalock);
642                         phba->hba_flag &= ~HBA_POST_RECEIVE_BUFFER;
643                         spin_unlock_irq(&phba->hbalock);
644                         lpfc_sli_hbqbuf_add_hbqs(phba, LPFC_ELS_HBQ);
645                 }
646                 if (phba->fcf.fcf_flag & FCF_REDISC_EVT)
647                         lpfc_sli4_fcf_redisc_event_proc(phba);
648         }
649
650         vports = lpfc_create_vport_work_array(phba);
651         if (vports != NULL)
652                 for (i = 0; i <= phba->max_vports; i++) {
653                         /*
654                          * We could have no vports in array if unloading, so if
655                          * this happens then just use the pport
656                          */
657                         if (vports[i] == NULL && i == 0)
658                                 vport = phba->pport;
659                         else
660                                 vport = vports[i];
661                         if (vport == NULL)
662                                 break;
663                         spin_lock_irq(&vport->work_port_lock);
664                         work_port_events = vport->work_port_events;
665                         vport->work_port_events &= ~work_port_events;
666                         spin_unlock_irq(&vport->work_port_lock);
667                         if (work_port_events & WORKER_DISC_TMO)
668                                 lpfc_disc_timeout_handler(vport);
669                         if (work_port_events & WORKER_ELS_TMO)
670                                 lpfc_els_timeout_handler(vport);
671                         if (work_port_events & WORKER_HB_TMO)
672                                 lpfc_hb_timeout_handler(phba);
673                         if (work_port_events & WORKER_MBOX_TMO)
674                                 lpfc_mbox_timeout_handler(phba);
675                         if (work_port_events & WORKER_FABRIC_BLOCK_TMO)
676                                 lpfc_unblock_fabric_iocbs(phba);
677                         if (work_port_events & WORKER_FDMI_TMO)
678                                 lpfc_fdmi_timeout_handler(vport);
679                         if (work_port_events & WORKER_RAMP_DOWN_QUEUE)
680                                 lpfc_ramp_down_queue_handler(phba);
681                         if (work_port_events & WORKER_DELAYED_DISC_TMO)
682                                 lpfc_delayed_disc_timeout_handler(vport);
683                 }
684         lpfc_destroy_vport_work_array(phba, vports);
685
686         pring = &phba->sli.ring[LPFC_ELS_RING];
687         status = (ha_copy & (HA_RXMASK  << (4*LPFC_ELS_RING)));
688         status >>= (4*LPFC_ELS_RING);
689         if ((status & HA_RXMASK) ||
690             (pring->flag & LPFC_DEFERRED_RING_EVENT) ||
691             (phba->hba_flag & HBA_SP_QUEUE_EVT)) {
692                 if (pring->flag & LPFC_STOP_IOCB_EVENT) {
693                         pring->flag |= LPFC_DEFERRED_RING_EVENT;
694                         /* Set the lpfc data pending flag */
695                         set_bit(LPFC_DATA_READY, &phba->data_flags);
696                 } else {
697                         if (phba->link_state >= LPFC_LINK_UP) {
698                                 pring->flag &= ~LPFC_DEFERRED_RING_EVENT;
699                                 lpfc_sli_handle_slow_ring_event(phba, pring,
700                                                                 (status &
701                                                                 HA_RXMASK));
702                         }
703                 }
704                 if ((phba->sli_rev == LPFC_SLI_REV4) &&
705                                  (!list_empty(&pring->txq)))
706                         lpfc_drain_txq(phba);
707                 /*
708                  * Turn on Ring interrupts
709                  */
710                 if (phba->sli_rev <= LPFC_SLI_REV3) {
711                         spin_lock_irq(&phba->hbalock);
712                         control = readl(phba->HCregaddr);
713                         if (!(control & (HC_R0INT_ENA << LPFC_ELS_RING))) {
714                                 lpfc_debugfs_slow_ring_trc(phba,
715                                         "WRK Enable ring: cntl:x%x hacopy:x%x",
716                                         control, ha_copy, 0);
717
718                                 control |= (HC_R0INT_ENA << LPFC_ELS_RING);
719                                 writel(control, phba->HCregaddr);
720                                 readl(phba->HCregaddr); /* flush */
721                         } else {
722                                 lpfc_debugfs_slow_ring_trc(phba,
723                                         "WRK Ring ok:     cntl:x%x hacopy:x%x",
724                                         control, ha_copy, 0);
725                         }
726                         spin_unlock_irq(&phba->hbalock);
727                 }
728         }
729         lpfc_work_list_done(phba);
730 }
731
732 int
733 lpfc_do_work(void *p)
734 {
735         struct lpfc_hba *phba = p;
736         int rc;
737
738         set_user_nice(current, MIN_NICE);
739         current->flags |= PF_NOFREEZE;
740         phba->data_flags = 0;
741
742         while (!kthread_should_stop()) {
743                 /* wait and check worker queue activities */
744                 rc = wait_event_interruptible(phba->work_waitq,
745                                         (test_and_clear_bit(LPFC_DATA_READY,
746                                                             &phba->data_flags)
747                                          || kthread_should_stop()));
748                 /* Signal wakeup shall terminate the worker thread */
749                 if (rc) {
750                         lpfc_printf_log(phba, KERN_ERR, LOG_ELS,
751                                         "0433 Wakeup on signal: rc=x%x\n", rc);
752                         break;
753                 }
754
755                 /* Attend pending lpfc data processing */
756                 lpfc_work_done(phba);
757         }
758         phba->worker_thread = NULL;
759         lpfc_printf_log(phba, KERN_INFO, LOG_ELS,
760                         "0432 Worker thread stopped.\n");
761         return 0;
762 }
763
764 /*
765  * This is only called to handle FC worker events. Since this a rare
766  * occurrence, we allocate a struct lpfc_work_evt structure here instead of
767  * embedding it in the IOCB.
768  */
769 int
770 lpfc_workq_post_event(struct lpfc_hba *phba, void *arg1, void *arg2,
771                       uint32_t evt)
772 {
773         struct lpfc_work_evt  *evtp;
774         unsigned long flags;
775
776         /*
777          * All Mailbox completions and LPFC_ELS_RING rcv ring IOCB events will
778          * be queued to worker thread for processing
779          */
780         evtp = kmalloc(sizeof(struct lpfc_work_evt), GFP_ATOMIC);
781         if (!evtp)
782                 return 0;
783
784         evtp->evt_arg1  = arg1;
785         evtp->evt_arg2  = arg2;
786         evtp->evt       = evt;
787
788         spin_lock_irqsave(&phba->hbalock, flags);
789         list_add_tail(&evtp->evt_listp, &phba->work_list);
790         spin_unlock_irqrestore(&phba->hbalock, flags);
791
792         lpfc_worker_wake_up(phba);
793
794         return 1;
795 }
796
797 void
798 lpfc_cleanup_rpis(struct lpfc_vport *vport, int remove)
799 {
800         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
801         struct lpfc_hba  *phba = vport->phba;
802         struct lpfc_nodelist *ndlp, *next_ndlp;
803         int  rc;
804
805         list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes, nlp_listp) {
806                 if (!NLP_CHK_NODE_ACT(ndlp))
807                         continue;
808                 if (ndlp->nlp_state == NLP_STE_UNUSED_NODE)
809                         continue;
810                 if ((phba->sli3_options & LPFC_SLI3_VPORT_TEARDOWN) ||
811                         ((vport->port_type == LPFC_NPIV_PORT) &&
812                         (ndlp->nlp_DID == NameServer_DID)))
813                         lpfc_unreg_rpi(vport, ndlp);
814
815                 /* Leave Fabric nodes alone on link down */
816                 if ((phba->sli_rev < LPFC_SLI_REV4) &&
817                     (!remove && ndlp->nlp_type & NLP_FABRIC))
818                         continue;
819                 rc = lpfc_disc_state_machine(vport, ndlp, NULL,
820                                              remove
821                                              ? NLP_EVT_DEVICE_RM
822                                              : NLP_EVT_DEVICE_RECOVERY);
823         }
824         if (phba->sli3_options & LPFC_SLI3_VPORT_TEARDOWN) {
825                 if (phba->sli_rev == LPFC_SLI_REV4)
826                         lpfc_sli4_unreg_all_rpis(vport);
827                 lpfc_mbx_unreg_vpi(vport);
828                 spin_lock_irq(shost->host_lock);
829                 vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
830                 spin_unlock_irq(shost->host_lock);
831         }
832 }
833
834 void
835 lpfc_port_link_failure(struct lpfc_vport *vport)
836 {
837         lpfc_vport_set_state(vport, FC_VPORT_LINKDOWN);
838
839         /* Cleanup any outstanding received buffers */
840         lpfc_cleanup_rcv_buffers(vport);
841
842         /* Cleanup any outstanding RSCN activity */
843         lpfc_els_flush_rscn(vport);
844
845         /* Cleanup any outstanding ELS commands */
846         lpfc_els_flush_cmd(vport);
847
848         lpfc_cleanup_rpis(vport, 0);
849
850         /* Turn off discovery timer if its running */
851         lpfc_can_disctmo(vport);
852 }
853
854 void
855 lpfc_linkdown_port(struct lpfc_vport *vport)
856 {
857         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
858
859         fc_host_post_event(shost, fc_get_event_number(), FCH_EVT_LINKDOWN, 0);
860
861         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
862                 "Link Down:       state:x%x rtry:x%x flg:x%x",
863                 vport->port_state, vport->fc_ns_retry, vport->fc_flag);
864
865         lpfc_port_link_failure(vport);
866
867         /* Stop delayed Nport discovery */
868         spin_lock_irq(shost->host_lock);
869         vport->fc_flag &= ~FC_DISC_DELAYED;
870         spin_unlock_irq(shost->host_lock);
871         del_timer_sync(&vport->delayed_disc_tmo);
872 }
873
874 int
875 lpfc_linkdown(struct lpfc_hba *phba)
876 {
877         struct lpfc_vport *vport = phba->pport;
878         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
879         struct lpfc_vport **vports;
880         LPFC_MBOXQ_t          *mb;
881         int i;
882
883         if (phba->link_state == LPFC_LINK_DOWN)
884                 return 0;
885
886         /* Block all SCSI stack I/Os */
887         lpfc_scsi_dev_block(phba);
888
889         spin_lock_irq(&phba->hbalock);
890         phba->fcf.fcf_flag &= ~(FCF_AVAILABLE | FCF_SCAN_DONE);
891         spin_unlock_irq(&phba->hbalock);
892         if (phba->link_state > LPFC_LINK_DOWN) {
893                 phba->link_state = LPFC_LINK_DOWN;
894                 spin_lock_irq(shost->host_lock);
895                 phba->pport->fc_flag &= ~FC_LBIT;
896                 spin_unlock_irq(shost->host_lock);
897         }
898         vports = lpfc_create_vport_work_array(phba);
899         if (vports != NULL)
900                 for (i = 0; i <= phba->max_vports && vports[i] != NULL; i++) {
901                         /* Issue a LINK DOWN event to all nodes */
902                         lpfc_linkdown_port(vports[i]);
903                 }
904         lpfc_destroy_vport_work_array(phba, vports);
905         /* Clean up any firmware default rpi's */
906         mb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
907         if (mb) {
908                 lpfc_unreg_did(phba, 0xffff, LPFC_UNREG_ALL_DFLT_RPIS, mb);
909                 mb->vport = vport;
910                 mb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
911                 if (lpfc_sli_issue_mbox(phba, mb, MBX_NOWAIT)
912                     == MBX_NOT_FINISHED) {
913                         mempool_free(mb, phba->mbox_mem_pool);
914                 }
915         }
916
917         /* Setup myDID for link up if we are in pt2pt mode */
918         if (phba->pport->fc_flag & FC_PT2PT) {
919                 phba->pport->fc_myDID = 0;
920                 mb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
921                 if (mb) {
922                         lpfc_config_link(phba, mb);
923                         mb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
924                         mb->vport = vport;
925                         if (lpfc_sli_issue_mbox(phba, mb, MBX_NOWAIT)
926                             == MBX_NOT_FINISHED) {
927                                 mempool_free(mb, phba->mbox_mem_pool);
928                         }
929                 }
930                 spin_lock_irq(shost->host_lock);
931                 phba->pport->fc_flag &= ~(FC_PT2PT | FC_PT2PT_PLOGI);
932                 spin_unlock_irq(shost->host_lock);
933         }
934
935         return 0;
936 }
937
938 static void
939 lpfc_linkup_cleanup_nodes(struct lpfc_vport *vport)
940 {
941         struct lpfc_nodelist *ndlp;
942
943         list_for_each_entry(ndlp, &vport->fc_nodes, nlp_listp) {
944                 if (!NLP_CHK_NODE_ACT(ndlp))
945                         continue;
946                 if (ndlp->nlp_state == NLP_STE_UNUSED_NODE)
947                         continue;
948                 if (ndlp->nlp_type & NLP_FABRIC) {
949                         /* On Linkup its safe to clean up the ndlp
950                          * from Fabric connections.
951                          */
952                         if (ndlp->nlp_DID != Fabric_DID)
953                                 lpfc_unreg_rpi(vport, ndlp);
954                         lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
955                 } else if (!(ndlp->nlp_flag & NLP_NPR_ADISC)) {
956                         /* Fail outstanding IO now since device is
957                          * marked for PLOGI.
958                          */
959                         lpfc_unreg_rpi(vport, ndlp);
960                 }
961         }
962 }
963
964 static void
965 lpfc_linkup_port(struct lpfc_vport *vport)
966 {
967         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
968         struct lpfc_hba  *phba = vport->phba;
969
970         if ((vport->load_flag & FC_UNLOADING) != 0)
971                 return;
972
973         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
974                 "Link Up:         top:x%x speed:x%x flg:x%x",
975                 phba->fc_topology, phba->fc_linkspeed, phba->link_flag);
976
977         /* If NPIV is not enabled, only bring the physical port up */
978         if (!(phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
979                 (vport != phba->pport))
980                 return;
981
982         fc_host_post_event(shost, fc_get_event_number(), FCH_EVT_LINKUP, 0);
983
984         spin_lock_irq(shost->host_lock);
985         vport->fc_flag &= ~(FC_PT2PT | FC_PT2PT_PLOGI | FC_ABORT_DISCOVERY |
986                             FC_RSCN_MODE | FC_NLP_MORE | FC_RSCN_DISCOVERY);
987         vport->fc_flag |= FC_NDISC_ACTIVE;
988         vport->fc_ns_retry = 0;
989         spin_unlock_irq(shost->host_lock);
990
991         if (vport->fc_flag & FC_LBIT)
992                 lpfc_linkup_cleanup_nodes(vport);
993
994 }
995
996 static int
997 lpfc_linkup(struct lpfc_hba *phba)
998 {
999         struct lpfc_vport **vports;
1000         int i;
1001
1002         phba->link_state = LPFC_LINK_UP;
1003
1004         /* Unblock fabric iocbs if they are blocked */
1005         clear_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags);
1006         del_timer_sync(&phba->fabric_block_timer);
1007
1008         vports = lpfc_create_vport_work_array(phba);
1009         if (vports != NULL)
1010                 for (i = 0; i <= phba->max_vports && vports[i] != NULL; i++)
1011                         lpfc_linkup_port(vports[i]);
1012         lpfc_destroy_vport_work_array(phba, vports);
1013
1014         return 0;
1015 }
1016
1017 /*
1018  * This routine handles processing a CLEAR_LA mailbox
1019  * command upon completion. It is setup in the LPFC_MBOXQ
1020  * as the completion routine when the command is
1021  * handed off to the SLI layer.
1022  */
1023 static void
1024 lpfc_mbx_cmpl_clear_la(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1025 {
1026         struct lpfc_vport *vport = pmb->vport;
1027         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
1028         struct lpfc_sli   *psli = &phba->sli;
1029         MAILBOX_t *mb = &pmb->u.mb;
1030         uint32_t control;
1031
1032         /* Since we don't do discovery right now, turn these off here */
1033         psli->ring[psli->extra_ring].flag &= ~LPFC_STOP_IOCB_EVENT;
1034         psli->ring[psli->fcp_ring].flag &= ~LPFC_STOP_IOCB_EVENT;
1035         psli->ring[psli->next_ring].flag &= ~LPFC_STOP_IOCB_EVENT;
1036
1037         /* Check for error */
1038         if ((mb->mbxStatus) && (mb->mbxStatus != 0x1601)) {
1039                 /* CLEAR_LA mbox error <mbxStatus> state <hba_state> */
1040                 lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
1041                                  "0320 CLEAR_LA mbxStatus error x%x hba "
1042                                  "state x%x\n",
1043                                  mb->mbxStatus, vport->port_state);
1044                 phba->link_state = LPFC_HBA_ERROR;
1045                 goto out;
1046         }
1047
1048         if (vport->port_type == LPFC_PHYSICAL_PORT)
1049                 phba->link_state = LPFC_HBA_READY;
1050
1051         spin_lock_irq(&phba->hbalock);
1052         psli->sli_flag |= LPFC_PROCESS_LA;
1053         control = readl(phba->HCregaddr);
1054         control |= HC_LAINT_ENA;
1055         writel(control, phba->HCregaddr);
1056         readl(phba->HCregaddr); /* flush */
1057         spin_unlock_irq(&phba->hbalock);
1058         mempool_free(pmb, phba->mbox_mem_pool);
1059         return;
1060
1061 out:
1062         /* Device Discovery completes */
1063         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
1064                          "0225 Device Discovery completes\n");
1065         mempool_free(pmb, phba->mbox_mem_pool);
1066
1067         spin_lock_irq(shost->host_lock);
1068         vport->fc_flag &= ~FC_ABORT_DISCOVERY;
1069         spin_unlock_irq(shost->host_lock);
1070
1071         lpfc_can_disctmo(vport);
1072
1073         /* turn on Link Attention interrupts */
1074
1075         spin_lock_irq(&phba->hbalock);
1076         psli->sli_flag |= LPFC_PROCESS_LA;
1077         control = readl(phba->HCregaddr);
1078         control |= HC_LAINT_ENA;
1079         writel(control, phba->HCregaddr);
1080         readl(phba->HCregaddr); /* flush */
1081         spin_unlock_irq(&phba->hbalock);
1082
1083         return;
1084 }
1085
1086
1087 static void
1088 lpfc_mbx_cmpl_local_config_link(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1089 {
1090         struct lpfc_vport *vport = pmb->vport;
1091
1092         if (pmb->u.mb.mbxStatus)
1093                 goto out;
1094
1095         mempool_free(pmb, phba->mbox_mem_pool);
1096
1097         /* don't perform discovery for SLI4 loopback diagnostic test */
1098         if ((phba->sli_rev == LPFC_SLI_REV4) &&
1099             !(phba->hba_flag & HBA_FCOE_MODE) &&
1100             (phba->link_flag & LS_LOOPBACK_MODE))
1101                 return;
1102
1103         if (phba->fc_topology == LPFC_TOPOLOGY_LOOP &&
1104             vport->fc_flag & FC_PUBLIC_LOOP &&
1105             !(vport->fc_flag & FC_LBIT)) {
1106                         /* Need to wait for FAN - use discovery timer
1107                          * for timeout.  port_state is identically
1108                          * LPFC_LOCAL_CFG_LINK while waiting for FAN
1109                          */
1110                         lpfc_set_disctmo(vport);
1111                         return;
1112         }
1113
1114         /* Start discovery by sending a FLOGI. port_state is identically
1115          * LPFC_FLOGI while waiting for FLOGI cmpl
1116          */
1117         if (vport->port_state != LPFC_FLOGI || vport->fc_flag & FC_PT2PT_PLOGI)
1118                 lpfc_initial_flogi(vport);
1119         return;
1120
1121 out:
1122         lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
1123                          "0306 CONFIG_LINK mbxStatus error x%x "
1124                          "HBA state x%x\n",
1125                          pmb->u.mb.mbxStatus, vport->port_state);
1126         mempool_free(pmb, phba->mbox_mem_pool);
1127
1128         lpfc_linkdown(phba);
1129
1130         lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
1131                          "0200 CONFIG_LINK bad hba state x%x\n",
1132                          vport->port_state);
1133
1134         lpfc_issue_clear_la(phba, vport);
1135         return;
1136 }
1137
1138 /**
1139  * lpfc_sli4_clear_fcf_rr_bmask
1140  * @phba pointer to the struct lpfc_hba for this port.
1141  * This fucnction resets the round robin bit mask and clears the
1142  * fcf priority list. The list deletions are done while holding the
1143  * hbalock. The ON_LIST flag and the FLOGI_FAILED flags are cleared
1144  * from the lpfc_fcf_pri record.
1145  **/
1146 void
1147 lpfc_sli4_clear_fcf_rr_bmask(struct lpfc_hba *phba)
1148 {
1149         struct lpfc_fcf_pri *fcf_pri;
1150         struct lpfc_fcf_pri *next_fcf_pri;
1151         memset(phba->fcf.fcf_rr_bmask, 0, sizeof(*phba->fcf.fcf_rr_bmask));
1152         spin_lock_irq(&phba->hbalock);
1153         list_for_each_entry_safe(fcf_pri, next_fcf_pri,
1154                                 &phba->fcf.fcf_pri_list, list) {
1155                 list_del_init(&fcf_pri->list);
1156                 fcf_pri->fcf_rec.flag = 0;
1157         }
1158         spin_unlock_irq(&phba->hbalock);
1159 }
1160 static void
1161 lpfc_mbx_cmpl_reg_fcfi(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq)
1162 {
1163         struct lpfc_vport *vport = mboxq->vport;
1164
1165         if (mboxq->u.mb.mbxStatus) {
1166                 lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
1167                          "2017 REG_FCFI mbxStatus error x%x "
1168                          "HBA state x%x\n",
1169                          mboxq->u.mb.mbxStatus, vport->port_state);
1170                 goto fail_out;
1171         }
1172
1173         /* Start FCoE discovery by sending a FLOGI. */
1174         phba->fcf.fcfi = bf_get(lpfc_reg_fcfi_fcfi, &mboxq->u.mqe.un.reg_fcfi);
1175         /* Set the FCFI registered flag */
1176         spin_lock_irq(&phba->hbalock);
1177         phba->fcf.fcf_flag |= FCF_REGISTERED;
1178         spin_unlock_irq(&phba->hbalock);
1179
1180         /* If there is a pending FCoE event, restart FCF table scan. */
1181         if ((!(phba->hba_flag & FCF_RR_INPROG)) &&
1182                 lpfc_check_pending_fcoe_event(phba, LPFC_UNREG_FCF))
1183                 goto fail_out;
1184
1185         /* Mark successful completion of FCF table scan */
1186         spin_lock_irq(&phba->hbalock);
1187         phba->fcf.fcf_flag |= (FCF_SCAN_DONE | FCF_IN_USE);
1188         phba->hba_flag &= ~FCF_TS_INPROG;
1189         if (vport->port_state != LPFC_FLOGI) {
1190                 phba->hba_flag |= FCF_RR_INPROG;
1191                 spin_unlock_irq(&phba->hbalock);
1192                 lpfc_issue_init_vfi(vport);
1193                 goto out;
1194         }
1195         spin_unlock_irq(&phba->hbalock);
1196         goto out;
1197
1198 fail_out:
1199         spin_lock_irq(&phba->hbalock);
1200         phba->hba_flag &= ~FCF_RR_INPROG;
1201         spin_unlock_irq(&phba->hbalock);
1202 out:
1203         mempool_free(mboxq, phba->mbox_mem_pool);
1204 }
1205
1206 /**
1207  * lpfc_fab_name_match - Check if the fcf fabric name match.
1208  * @fab_name: pointer to fabric name.
1209  * @new_fcf_record: pointer to fcf record.
1210  *
1211  * This routine compare the fcf record's fabric name with provided
1212  * fabric name. If the fabric name are identical this function
1213  * returns 1 else return 0.
1214  **/
1215 static uint32_t
1216 lpfc_fab_name_match(uint8_t *fab_name, struct fcf_record *new_fcf_record)
1217 {
1218         if (fab_name[0] != bf_get(lpfc_fcf_record_fab_name_0, new_fcf_record))
1219                 return 0;
1220         if (fab_name[1] != bf_get(lpfc_fcf_record_fab_name_1, new_fcf_record))
1221                 return 0;
1222         if (fab_name[2] != bf_get(lpfc_fcf_record_fab_name_2, new_fcf_record))
1223                 return 0;
1224         if (fab_name[3] != bf_get(lpfc_fcf_record_fab_name_3, new_fcf_record))
1225                 return 0;
1226         if (fab_name[4] != bf_get(lpfc_fcf_record_fab_name_4, new_fcf_record))
1227                 return 0;
1228         if (fab_name[5] != bf_get(lpfc_fcf_record_fab_name_5, new_fcf_record))
1229                 return 0;
1230         if (fab_name[6] != bf_get(lpfc_fcf_record_fab_name_6, new_fcf_record))
1231                 return 0;
1232         if (fab_name[7] != bf_get(lpfc_fcf_record_fab_name_7, new_fcf_record))
1233                 return 0;
1234         return 1;
1235 }
1236
1237 /**
1238  * lpfc_sw_name_match - Check if the fcf switch name match.
1239  * @fab_name: pointer to fabric name.
1240  * @new_fcf_record: pointer to fcf record.
1241  *
1242  * This routine compare the fcf record's switch name with provided
1243  * switch name. If the switch name are identical this function
1244  * returns 1 else return 0.
1245  **/
1246 static uint32_t
1247 lpfc_sw_name_match(uint8_t *sw_name, struct fcf_record *new_fcf_record)
1248 {
1249         if (sw_name[0] != bf_get(lpfc_fcf_record_switch_name_0, new_fcf_record))
1250                 return 0;
1251         if (sw_name[1] != bf_get(lpfc_fcf_record_switch_name_1, new_fcf_record))
1252                 return 0;
1253         if (sw_name[2] != bf_get(lpfc_fcf_record_switch_name_2, new_fcf_record))
1254                 return 0;
1255         if (sw_name[3] != bf_get(lpfc_fcf_record_switch_name_3, new_fcf_record))
1256                 return 0;
1257         if (sw_name[4] != bf_get(lpfc_fcf_record_switch_name_4, new_fcf_record))
1258                 return 0;
1259         if (sw_name[5] != bf_get(lpfc_fcf_record_switch_name_5, new_fcf_record))
1260                 return 0;
1261         if (sw_name[6] != bf_get(lpfc_fcf_record_switch_name_6, new_fcf_record))
1262                 return 0;
1263         if (sw_name[7] != bf_get(lpfc_fcf_record_switch_name_7, new_fcf_record))
1264                 return 0;
1265         return 1;
1266 }
1267
1268 /**
1269  * lpfc_mac_addr_match - Check if the fcf mac address match.
1270  * @mac_addr: pointer to mac address.
1271  * @new_fcf_record: pointer to fcf record.
1272  *
1273  * This routine compare the fcf record's mac address with HBA's
1274  * FCF mac address. If the mac addresses are identical this function
1275  * returns 1 else return 0.
1276  **/
1277 static uint32_t
1278 lpfc_mac_addr_match(uint8_t *mac_addr, struct fcf_record *new_fcf_record)
1279 {
1280         if (mac_addr[0] != bf_get(lpfc_fcf_record_mac_0, new_fcf_record))
1281                 return 0;
1282         if (mac_addr[1] != bf_get(lpfc_fcf_record_mac_1, new_fcf_record))
1283                 return 0;
1284         if (mac_addr[2] != bf_get(lpfc_fcf_record_mac_2, new_fcf_record))
1285                 return 0;
1286         if (mac_addr[3] != bf_get(lpfc_fcf_record_mac_3, new_fcf_record))
1287                 return 0;
1288         if (mac_addr[4] != bf_get(lpfc_fcf_record_mac_4, new_fcf_record))
1289                 return 0;
1290         if (mac_addr[5] != bf_get(lpfc_fcf_record_mac_5, new_fcf_record))
1291                 return 0;
1292         return 1;
1293 }
1294
1295 static bool
1296 lpfc_vlan_id_match(uint16_t curr_vlan_id, uint16_t new_vlan_id)
1297 {
1298         return (curr_vlan_id == new_vlan_id);
1299 }
1300
1301 /**
1302  * lpfc_update_fcf_record - Update driver fcf record
1303  * __lpfc_update_fcf_record_pri - update the lpfc_fcf_pri record.
1304  * @phba: pointer to lpfc hba data structure.
1305  * @fcf_index: Index for the lpfc_fcf_record.
1306  * @new_fcf_record: pointer to hba fcf record.
1307  *
1308  * This routine updates the driver FCF priority record from the new HBA FCF
1309  * record. This routine is called with the host lock held.
1310  **/
1311 static void
1312 __lpfc_update_fcf_record_pri(struct lpfc_hba *phba, uint16_t fcf_index,
1313                                  struct fcf_record *new_fcf_record
1314                                  )
1315 {
1316         struct lpfc_fcf_pri *fcf_pri;
1317
1318         fcf_pri = &phba->fcf.fcf_pri[fcf_index];
1319         fcf_pri->fcf_rec.fcf_index = fcf_index;
1320         /* FCF record priority */
1321         fcf_pri->fcf_rec.priority = new_fcf_record->fip_priority;
1322
1323 }
1324
1325 /**
1326  * lpfc_copy_fcf_record - Copy fcf information to lpfc_hba.
1327  * @fcf: pointer to driver fcf record.
1328  * @new_fcf_record: pointer to fcf record.
1329  *
1330  * This routine copies the FCF information from the FCF
1331  * record to lpfc_hba data structure.
1332  **/
1333 static void
1334 lpfc_copy_fcf_record(struct lpfc_fcf_rec *fcf_rec,
1335                      struct fcf_record *new_fcf_record)
1336 {
1337         /* Fabric name */
1338         fcf_rec->fabric_name[0] =
1339                 bf_get(lpfc_fcf_record_fab_name_0, new_fcf_record);
1340         fcf_rec->fabric_name[1] =
1341                 bf_get(lpfc_fcf_record_fab_name_1, new_fcf_record);
1342         fcf_rec->fabric_name[2] =
1343                 bf_get(lpfc_fcf_record_fab_name_2, new_fcf_record);
1344         fcf_rec->fabric_name[3] =
1345                 bf_get(lpfc_fcf_record_fab_name_3, new_fcf_record);
1346         fcf_rec->fabric_name[4] =
1347                 bf_get(lpfc_fcf_record_fab_name_4, new_fcf_record);
1348         fcf_rec->fabric_name[5] =
1349                 bf_get(lpfc_fcf_record_fab_name_5, new_fcf_record);
1350         fcf_rec->fabric_name[6] =
1351                 bf_get(lpfc_fcf_record_fab_name_6, new_fcf_record);
1352         fcf_rec->fabric_name[7] =
1353                 bf_get(lpfc_fcf_record_fab_name_7, new_fcf_record);
1354         /* Mac address */
1355         fcf_rec->mac_addr[0] = bf_get(lpfc_fcf_record_mac_0, new_fcf_record);
1356         fcf_rec->mac_addr[1] = bf_get(lpfc_fcf_record_mac_1, new_fcf_record);
1357         fcf_rec->mac_addr[2] = bf_get(lpfc_fcf_record_mac_2, new_fcf_record);
1358         fcf_rec->mac_addr[3] = bf_get(lpfc_fcf_record_mac_3, new_fcf_record);
1359         fcf_rec->mac_addr[4] = bf_get(lpfc_fcf_record_mac_4, new_fcf_record);
1360         fcf_rec->mac_addr[5] = bf_get(lpfc_fcf_record_mac_5, new_fcf_record);
1361         /* FCF record index */
1362         fcf_rec->fcf_indx = bf_get(lpfc_fcf_record_fcf_index, new_fcf_record);
1363         /* FCF record priority */
1364         fcf_rec->priority = new_fcf_record->fip_priority;
1365         /* Switch name */
1366         fcf_rec->switch_name[0] =
1367                 bf_get(lpfc_fcf_record_switch_name_0, new_fcf_record);
1368         fcf_rec->switch_name[1] =
1369                 bf_get(lpfc_fcf_record_switch_name_1, new_fcf_record);
1370         fcf_rec->switch_name[2] =
1371                 bf_get(lpfc_fcf_record_switch_name_2, new_fcf_record);
1372         fcf_rec->switch_name[3] =
1373                 bf_get(lpfc_fcf_record_switch_name_3, new_fcf_record);
1374         fcf_rec->switch_name[4] =
1375                 bf_get(lpfc_fcf_record_switch_name_4, new_fcf_record);
1376         fcf_rec->switch_name[5] =
1377                 bf_get(lpfc_fcf_record_switch_name_5, new_fcf_record);
1378         fcf_rec->switch_name[6] =
1379                 bf_get(lpfc_fcf_record_switch_name_6, new_fcf_record);
1380         fcf_rec->switch_name[7] =
1381                 bf_get(lpfc_fcf_record_switch_name_7, new_fcf_record);
1382 }
1383
1384 /**
1385  * lpfc_update_fcf_record - Update driver fcf record
1386  * @phba: pointer to lpfc hba data structure.
1387  * @fcf_rec: pointer to driver fcf record.
1388  * @new_fcf_record: pointer to hba fcf record.
1389  * @addr_mode: address mode to be set to the driver fcf record.
1390  * @vlan_id: vlan tag to be set to the driver fcf record.
1391  * @flag: flag bits to be set to the driver fcf record.
1392  *
1393  * This routine updates the driver FCF record from the new HBA FCF record
1394  * together with the address mode, vlan_id, and other informations. This
1395  * routine is called with the host lock held.
1396  **/
1397 static void
1398 __lpfc_update_fcf_record(struct lpfc_hba *phba, struct lpfc_fcf_rec *fcf_rec,
1399                        struct fcf_record *new_fcf_record, uint32_t addr_mode,
1400                        uint16_t vlan_id, uint32_t flag)
1401 {
1402         /* Copy the fields from the HBA's FCF record */
1403         lpfc_copy_fcf_record(fcf_rec, new_fcf_record);
1404         /* Update other fields of driver FCF record */
1405         fcf_rec->addr_mode = addr_mode;
1406         fcf_rec->vlan_id = vlan_id;
1407         fcf_rec->flag |= (flag | RECORD_VALID);
1408         __lpfc_update_fcf_record_pri(phba,
1409                 bf_get(lpfc_fcf_record_fcf_index, new_fcf_record),
1410                                  new_fcf_record);
1411 }
1412
1413 /**
1414  * lpfc_register_fcf - Register the FCF with hba.
1415  * @phba: pointer to lpfc hba data structure.
1416  *
1417  * This routine issues a register fcfi mailbox command to register
1418  * the fcf with HBA.
1419  **/
1420 static void
1421 lpfc_register_fcf(struct lpfc_hba *phba)
1422 {
1423         LPFC_MBOXQ_t *fcf_mbxq;
1424         int rc;
1425
1426         spin_lock_irq(&phba->hbalock);
1427         /* If the FCF is not available do nothing. */
1428         if (!(phba->fcf.fcf_flag & FCF_AVAILABLE)) {
1429                 phba->hba_flag &= ~(FCF_TS_INPROG | FCF_RR_INPROG);
1430                 spin_unlock_irq(&phba->hbalock);
1431                 return;
1432         }
1433
1434         /* The FCF is already registered, start discovery */
1435         if (phba->fcf.fcf_flag & FCF_REGISTERED) {
1436                 phba->fcf.fcf_flag |= (FCF_SCAN_DONE | FCF_IN_USE);
1437                 phba->hba_flag &= ~FCF_TS_INPROG;
1438                 if (phba->pport->port_state != LPFC_FLOGI &&
1439                     phba->pport->fc_flag & FC_FABRIC) {
1440                         phba->hba_flag |= FCF_RR_INPROG;
1441                         spin_unlock_irq(&phba->hbalock);
1442                         lpfc_initial_flogi(phba->pport);
1443                         return;
1444                 }
1445                 spin_unlock_irq(&phba->hbalock);
1446                 return;
1447         }
1448         spin_unlock_irq(&phba->hbalock);
1449
1450         fcf_mbxq = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
1451         if (!fcf_mbxq) {
1452                 spin_lock_irq(&phba->hbalock);
1453                 phba->hba_flag &= ~(FCF_TS_INPROG | FCF_RR_INPROG);
1454                 spin_unlock_irq(&phba->hbalock);
1455                 return;
1456         }
1457
1458         lpfc_reg_fcfi(phba, fcf_mbxq);
1459         fcf_mbxq->vport = phba->pport;
1460         fcf_mbxq->mbox_cmpl = lpfc_mbx_cmpl_reg_fcfi;
1461         rc = lpfc_sli_issue_mbox(phba, fcf_mbxq, MBX_NOWAIT);
1462         if (rc == MBX_NOT_FINISHED) {
1463                 spin_lock_irq(&phba->hbalock);
1464                 phba->hba_flag &= ~(FCF_TS_INPROG | FCF_RR_INPROG);
1465                 spin_unlock_irq(&phba->hbalock);
1466                 mempool_free(fcf_mbxq, phba->mbox_mem_pool);
1467         }
1468
1469         return;
1470 }
1471
1472 /**
1473  * lpfc_match_fcf_conn_list - Check if the FCF record can be used for discovery.
1474  * @phba: pointer to lpfc hba data structure.
1475  * @new_fcf_record: pointer to fcf record.
1476  * @boot_flag: Indicates if this record used by boot bios.
1477  * @addr_mode: The address mode to be used by this FCF
1478  * @vlan_id: The vlan id to be used as vlan tagging by this FCF.
1479  *
1480  * This routine compare the fcf record with connect list obtained from the
1481  * config region to decide if this FCF can be used for SAN discovery. It returns
1482  * 1 if this record can be used for SAN discovery else return zero. If this FCF
1483  * record can be used for SAN discovery, the boot_flag will indicate if this FCF
1484  * is used by boot bios and addr_mode will indicate the addressing mode to be
1485  * used for this FCF when the function returns.
1486  * If the FCF record need to be used with a particular vlan id, the vlan is
1487  * set in the vlan_id on return of the function. If not VLAN tagging need to
1488  * be used with the FCF vlan_id will be set to LPFC_FCOE_NULL_VID;
1489  **/
1490 static int
1491 lpfc_match_fcf_conn_list(struct lpfc_hba *phba,
1492                         struct fcf_record *new_fcf_record,
1493                         uint32_t *boot_flag, uint32_t *addr_mode,
1494                         uint16_t *vlan_id)
1495 {
1496         struct lpfc_fcf_conn_entry *conn_entry;
1497         int i, j, fcf_vlan_id = 0;
1498
1499         /* Find the lowest VLAN id in the FCF record */
1500         for (i = 0; i < 512; i++) {
1501                 if (new_fcf_record->vlan_bitmap[i]) {
1502                         fcf_vlan_id = i * 8;
1503                         j = 0;
1504                         while (!((new_fcf_record->vlan_bitmap[i] >> j) & 1)) {
1505                                 j++;
1506                                 fcf_vlan_id++;
1507                         }
1508                         break;
1509                 }
1510         }
1511
1512         /* FCF not valid/available or solicitation in progress */
1513         if (!bf_get(lpfc_fcf_record_fcf_avail, new_fcf_record) ||
1514             !bf_get(lpfc_fcf_record_fcf_valid, new_fcf_record) ||
1515             bf_get(lpfc_fcf_record_fcf_sol, new_fcf_record))
1516                 return 0;
1517
1518         if (!(phba->hba_flag & HBA_FIP_SUPPORT)) {
1519                 *boot_flag = 0;
1520                 *addr_mode = bf_get(lpfc_fcf_record_mac_addr_prov,
1521                                 new_fcf_record);
1522                 if (phba->valid_vlan)
1523                         *vlan_id = phba->vlan_id;
1524                 else
1525                         *vlan_id = LPFC_FCOE_NULL_VID;
1526                 return 1;
1527         }
1528
1529         /*
1530          * If there are no FCF connection table entry, driver connect to all
1531          * FCFs.
1532          */
1533         if (list_empty(&phba->fcf_conn_rec_list)) {
1534                 *boot_flag = 0;
1535                 *addr_mode = bf_get(lpfc_fcf_record_mac_addr_prov,
1536                         new_fcf_record);
1537
1538                 /*
1539                  * When there are no FCF connect entries, use driver's default
1540                  * addressing mode - FPMA.
1541                  */
1542                 if (*addr_mode & LPFC_FCF_FPMA)
1543                         *addr_mode = LPFC_FCF_FPMA;
1544
1545                 /* If FCF record report a vlan id use that vlan id */
1546                 if (fcf_vlan_id)
1547                         *vlan_id = fcf_vlan_id;
1548                 else
1549                         *vlan_id = LPFC_FCOE_NULL_VID;
1550                 return 1;
1551         }
1552
1553         list_for_each_entry(conn_entry,
1554                             &phba->fcf_conn_rec_list, list) {
1555                 if (!(conn_entry->conn_rec.flags & FCFCNCT_VALID))
1556                         continue;
1557
1558                 if ((conn_entry->conn_rec.flags & FCFCNCT_FBNM_VALID) &&
1559                         !lpfc_fab_name_match(conn_entry->conn_rec.fabric_name,
1560                                              new_fcf_record))
1561                         continue;
1562                 if ((conn_entry->conn_rec.flags & FCFCNCT_SWNM_VALID) &&
1563                         !lpfc_sw_name_match(conn_entry->conn_rec.switch_name,
1564                                             new_fcf_record))
1565                         continue;
1566                 if (conn_entry->conn_rec.flags & FCFCNCT_VLAN_VALID) {
1567                         /*
1568                          * If the vlan bit map does not have the bit set for the
1569                          * vlan id to be used, then it is not a match.
1570                          */
1571                         if (!(new_fcf_record->vlan_bitmap
1572                                 [conn_entry->conn_rec.vlan_tag / 8] &
1573                                 (1 << (conn_entry->conn_rec.vlan_tag % 8))))
1574                                 continue;
1575                 }
1576
1577                 /*
1578                  * If connection record does not support any addressing mode,
1579                  * skip the FCF record.
1580                  */
1581                 if (!(bf_get(lpfc_fcf_record_mac_addr_prov, new_fcf_record)
1582                         & (LPFC_FCF_FPMA | LPFC_FCF_SPMA)))
1583                         continue;
1584
1585                 /*
1586                  * Check if the connection record specifies a required
1587                  * addressing mode.
1588                  */
1589                 if ((conn_entry->conn_rec.flags & FCFCNCT_AM_VALID) &&
1590                         !(conn_entry->conn_rec.flags & FCFCNCT_AM_PREFERRED)) {
1591
1592                         /*
1593                          * If SPMA required but FCF not support this continue.
1594                          */
1595                         if ((conn_entry->conn_rec.flags & FCFCNCT_AM_SPMA) &&
1596                                 !(bf_get(lpfc_fcf_record_mac_addr_prov,
1597                                         new_fcf_record) & LPFC_FCF_SPMA))
1598                                 continue;
1599
1600                         /*
1601                          * If FPMA required but FCF not support this continue.
1602                          */
1603                         if (!(conn_entry->conn_rec.flags & FCFCNCT_AM_SPMA) &&
1604                                 !(bf_get(lpfc_fcf_record_mac_addr_prov,
1605                                 new_fcf_record) & LPFC_FCF_FPMA))
1606                                 continue;
1607                 }
1608
1609                 /*
1610                  * This fcf record matches filtering criteria.
1611                  */
1612                 if (conn_entry->conn_rec.flags & FCFCNCT_BOOT)
1613                         *boot_flag = 1;
1614                 else
1615                         *boot_flag = 0;
1616
1617                 /*
1618                  * If user did not specify any addressing mode, or if the
1619                  * preferred addressing mode specified by user is not supported
1620                  * by FCF, allow fabric to pick the addressing mode.
1621                  */
1622                 *addr_mode = bf_get(lpfc_fcf_record_mac_addr_prov,
1623                                 new_fcf_record);
1624                 /*
1625                  * If the user specified a required address mode, assign that
1626                  * address mode
1627                  */
1628                 if ((conn_entry->conn_rec.flags & FCFCNCT_AM_VALID) &&
1629                         (!(conn_entry->conn_rec.flags & FCFCNCT_AM_PREFERRED)))
1630                         *addr_mode = (conn_entry->conn_rec.flags &
1631                                 FCFCNCT_AM_SPMA) ?
1632                                 LPFC_FCF_SPMA : LPFC_FCF_FPMA;
1633                 /*
1634                  * If the user specified a preferred address mode, use the
1635                  * addr mode only if FCF support the addr_mode.
1636                  */
1637                 else if ((conn_entry->conn_rec.flags & FCFCNCT_AM_VALID) &&
1638                         (conn_entry->conn_rec.flags & FCFCNCT_AM_PREFERRED) &&
1639                         (conn_entry->conn_rec.flags & FCFCNCT_AM_SPMA) &&
1640                         (*addr_mode & LPFC_FCF_SPMA))
1641                                 *addr_mode = LPFC_FCF_SPMA;
1642                 else if ((conn_entry->conn_rec.flags & FCFCNCT_AM_VALID) &&
1643                         (conn_entry->conn_rec.flags & FCFCNCT_AM_PREFERRED) &&
1644                         !(conn_entry->conn_rec.flags & FCFCNCT_AM_SPMA) &&
1645                         (*addr_mode & LPFC_FCF_FPMA))
1646                                 *addr_mode = LPFC_FCF_FPMA;
1647
1648                 /* If matching connect list has a vlan id, use it */
1649                 if (conn_entry->conn_rec.flags & FCFCNCT_VLAN_VALID)
1650                         *vlan_id = conn_entry->conn_rec.vlan_tag;
1651                 /*
1652                  * If no vlan id is specified in connect list, use the vlan id
1653                  * in the FCF record
1654                  */
1655                 else if (fcf_vlan_id)
1656                         *vlan_id = fcf_vlan_id;
1657                 else
1658                         *vlan_id = LPFC_FCOE_NULL_VID;
1659
1660                 return 1;
1661         }
1662
1663         return 0;
1664 }
1665
1666 /**
1667  * lpfc_check_pending_fcoe_event - Check if there is pending fcoe event.
1668  * @phba: pointer to lpfc hba data structure.
1669  * @unreg_fcf: Unregister FCF if FCF table need to be re-scaned.
1670  *
1671  * This function check if there is any fcoe event pending while driver
1672  * scan FCF entries. If there is any pending event, it will restart the
1673  * FCF saning and return 1 else return 0.
1674  */
1675 int
1676 lpfc_check_pending_fcoe_event(struct lpfc_hba *phba, uint8_t unreg_fcf)
1677 {
1678         /*
1679          * If the Link is up and no FCoE events while in the
1680          * FCF discovery, no need to restart FCF discovery.
1681          */
1682         if ((phba->link_state  >= LPFC_LINK_UP) &&
1683             (phba->fcoe_eventtag == phba->fcoe_eventtag_at_fcf_scan))
1684                 return 0;
1685
1686         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
1687                         "2768 Pending link or FCF event during current "
1688                         "handling of the previous event: link_state:x%x, "
1689                         "evt_tag_at_scan:x%x, evt_tag_current:x%x\n",
1690                         phba->link_state, phba->fcoe_eventtag_at_fcf_scan,
1691                         phba->fcoe_eventtag);
1692
1693         spin_lock_irq(&phba->hbalock);
1694         phba->fcf.fcf_flag &= ~FCF_AVAILABLE;
1695         spin_unlock_irq(&phba->hbalock);
1696
1697         if (phba->link_state >= LPFC_LINK_UP) {
1698                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP | LOG_DISCOVERY,
1699                                 "2780 Restart FCF table scan due to "
1700                                 "pending FCF event:evt_tag_at_scan:x%x, "
1701                                 "evt_tag_current:x%x\n",
1702                                 phba->fcoe_eventtag_at_fcf_scan,
1703                                 phba->fcoe_eventtag);
1704                 lpfc_sli4_fcf_scan_read_fcf_rec(phba, LPFC_FCOE_FCF_GET_FIRST);
1705         } else {
1706                 /*
1707                  * Do not continue FCF discovery and clear FCF_TS_INPROG
1708                  * flag
1709                  */
1710                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP | LOG_DISCOVERY,
1711                                 "2833 Stop FCF discovery process due to link "
1712                                 "state change (x%x)\n", phba->link_state);
1713                 spin_lock_irq(&phba->hbalock);
1714                 phba->hba_flag &= ~(FCF_TS_INPROG | FCF_RR_INPROG);
1715                 phba->fcf.fcf_flag &= ~(FCF_REDISC_FOV | FCF_DISCOVERY);
1716                 spin_unlock_irq(&phba->hbalock);
1717         }
1718
1719         /* Unregister the currently registered FCF if required */
1720         if (unreg_fcf) {
1721                 spin_lock_irq(&phba->hbalock);
1722                 phba->fcf.fcf_flag &= ~FCF_REGISTERED;
1723                 spin_unlock_irq(&phba->hbalock);
1724                 lpfc_sli4_unregister_fcf(phba);
1725         }
1726         return 1;
1727 }
1728
1729 /**
1730  * lpfc_sli4_new_fcf_random_select - Randomly select an eligible new fcf record
1731  * @phba: pointer to lpfc hba data structure.
1732  * @fcf_cnt: number of eligible fcf record seen so far.
1733  *
1734  * This function makes an running random selection decision on FCF record to
1735  * use through a sequence of @fcf_cnt eligible FCF records with equal
1736  * probability. To perform integer manunipulation of random numbers with
1737  * size unit32_t, the lower 16 bits of the 32-bit random number returned
1738  * from prandom_u32() are taken as the random random number generated.
1739  *
1740  * Returns true when outcome is for the newly read FCF record should be
1741  * chosen; otherwise, return false when outcome is for keeping the previously
1742  * chosen FCF record.
1743  **/
1744 static bool
1745 lpfc_sli4_new_fcf_random_select(struct lpfc_hba *phba, uint32_t fcf_cnt)
1746 {
1747         uint32_t rand_num;
1748
1749         /* Get 16-bit uniform random number */
1750         rand_num = 0xFFFF & prandom_u32();
1751
1752         /* Decision with probability 1/fcf_cnt */
1753         if ((fcf_cnt * rand_num) < 0xFFFF)
1754                 return true;
1755         else
1756                 return false;
1757 }
1758
1759 /**
1760  * lpfc_sli4_fcf_rec_mbox_parse - Parse read_fcf mbox command.
1761  * @phba: pointer to lpfc hba data structure.
1762  * @mboxq: pointer to mailbox object.
1763  * @next_fcf_index: pointer to holder of next fcf index.
1764  *
1765  * This routine parses the non-embedded fcf mailbox command by performing the
1766  * necessarily error checking, non-embedded read FCF record mailbox command
1767  * SGE parsing, and endianness swapping.
1768  *
1769  * Returns the pointer to the new FCF record in the non-embedded mailbox
1770  * command DMA memory if successfully, other NULL.
1771  */
1772 static struct fcf_record *
1773 lpfc_sli4_fcf_rec_mbox_parse(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq,
1774                              uint16_t *next_fcf_index)
1775 {
1776         void *virt_addr;
1777         dma_addr_t phys_addr;
1778         struct lpfc_mbx_sge sge;
1779         struct lpfc_mbx_read_fcf_tbl *read_fcf;
1780         uint32_t shdr_status, shdr_add_status, if_type;
1781         union lpfc_sli4_cfg_shdr *shdr;
1782         struct fcf_record *new_fcf_record;
1783
1784         /* Get the first SGE entry from the non-embedded DMA memory. This
1785          * routine only uses a single SGE.
1786          */
1787         lpfc_sli4_mbx_sge_get(mboxq, 0, &sge);
1788         phys_addr = getPaddr(sge.pa_hi, sge.pa_lo);
1789         if (unlikely(!mboxq->sge_array)) {
1790                 lpfc_printf_log(phba, KERN_ERR, LOG_MBOX,
1791                                 "2524 Failed to get the non-embedded SGE "
1792                                 "virtual address\n");
1793                 return NULL;
1794         }
1795         virt_addr = mboxq->sge_array->addr[0];
1796
1797         shdr = (union lpfc_sli4_cfg_shdr *)virt_addr;
1798         lpfc_sli_pcimem_bcopy(shdr, shdr,
1799                               sizeof(union lpfc_sli4_cfg_shdr));
1800         shdr_status = bf_get(lpfc_mbox_hdr_status, &shdr->response);
1801         if_type = bf_get(lpfc_sli_intf_if_type, &phba->sli4_hba.sli_intf);
1802         shdr_add_status = bf_get(lpfc_mbox_hdr_add_status, &shdr->response);
1803         if (shdr_status || shdr_add_status) {
1804                 if (shdr_status == STATUS_FCF_TABLE_EMPTY ||
1805                                         if_type == LPFC_SLI_INTF_IF_TYPE_2)
1806                         lpfc_printf_log(phba, KERN_ERR, LOG_FIP,
1807                                         "2726 READ_FCF_RECORD Indicates empty "
1808                                         "FCF table.\n");
1809                 else
1810                         lpfc_printf_log(phba, KERN_ERR, LOG_FIP,
1811                                         "2521 READ_FCF_RECORD mailbox failed "
1812                                         "with status x%x add_status x%x, "
1813                                         "mbx\n", shdr_status, shdr_add_status);
1814                 return NULL;
1815         }
1816
1817         /* Interpreting the returned information of the FCF record */
1818         read_fcf = (struct lpfc_mbx_read_fcf_tbl *)virt_addr;
1819         lpfc_sli_pcimem_bcopy(read_fcf, read_fcf,
1820                               sizeof(struct lpfc_mbx_read_fcf_tbl));
1821         *next_fcf_index = bf_get(lpfc_mbx_read_fcf_tbl_nxt_vindx, read_fcf);
1822         new_fcf_record = (struct fcf_record *)(virt_addr +
1823                           sizeof(struct lpfc_mbx_read_fcf_tbl));
1824         lpfc_sli_pcimem_bcopy(new_fcf_record, new_fcf_record,
1825                                 offsetof(struct fcf_record, vlan_bitmap));
1826         new_fcf_record->word137 = le32_to_cpu(new_fcf_record->word137);
1827         new_fcf_record->word138 = le32_to_cpu(new_fcf_record->word138);
1828
1829         return new_fcf_record;
1830 }
1831
1832 /**
1833  * lpfc_sli4_log_fcf_record_info - Log the information of a fcf record
1834  * @phba: pointer to lpfc hba data structure.
1835  * @fcf_record: pointer to the fcf record.
1836  * @vlan_id: the lowest vlan identifier associated to this fcf record.
1837  * @next_fcf_index: the index to the next fcf record in hba's fcf table.
1838  *
1839  * This routine logs the detailed FCF record if the LOG_FIP loggin is
1840  * enabled.
1841  **/
1842 static void
1843 lpfc_sli4_log_fcf_record_info(struct lpfc_hba *phba,
1844                               struct fcf_record *fcf_record,
1845                               uint16_t vlan_id,
1846                               uint16_t next_fcf_index)
1847 {
1848         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
1849                         "2764 READ_FCF_RECORD:\n"
1850                         "\tFCF_Index     : x%x\n"
1851                         "\tFCF_Avail     : x%x\n"
1852                         "\tFCF_Valid     : x%x\n"
1853                         "\tFCF_SOL       : x%x\n"
1854                         "\tFIP_Priority  : x%x\n"
1855                         "\tMAC_Provider  : x%x\n"
1856                         "\tLowest VLANID : x%x\n"
1857                         "\tFCF_MAC Addr  : x%x:%x:%x:%x:%x:%x\n"
1858                         "\tFabric_Name   : x%x:%x:%x:%x:%x:%x:%x:%x\n"
1859                         "\tSwitch_Name   : x%x:%x:%x:%x:%x:%x:%x:%x\n"
1860                         "\tNext_FCF_Index: x%x\n",
1861                         bf_get(lpfc_fcf_record_fcf_index, fcf_record),
1862                         bf_get(lpfc_fcf_record_fcf_avail, fcf_record),
1863                         bf_get(lpfc_fcf_record_fcf_valid, fcf_record),
1864                         bf_get(lpfc_fcf_record_fcf_sol, fcf_record),
1865                         fcf_record->fip_priority,
1866                         bf_get(lpfc_fcf_record_mac_addr_prov, fcf_record),
1867                         vlan_id,
1868                         bf_get(lpfc_fcf_record_mac_0, fcf_record),
1869                         bf_get(lpfc_fcf_record_mac_1, fcf_record),
1870                         bf_get(lpfc_fcf_record_mac_2, fcf_record),
1871                         bf_get(lpfc_fcf_record_mac_3, fcf_record),
1872                         bf_get(lpfc_fcf_record_mac_4, fcf_record),
1873                         bf_get(lpfc_fcf_record_mac_5, fcf_record),
1874                         bf_get(lpfc_fcf_record_fab_name_0, fcf_record),
1875                         bf_get(lpfc_fcf_record_fab_name_1, fcf_record),
1876                         bf_get(lpfc_fcf_record_fab_name_2, fcf_record),
1877                         bf_get(lpfc_fcf_record_fab_name_3, fcf_record),
1878                         bf_get(lpfc_fcf_record_fab_name_4, fcf_record),
1879                         bf_get(lpfc_fcf_record_fab_name_5, fcf_record),
1880                         bf_get(lpfc_fcf_record_fab_name_6, fcf_record),
1881                         bf_get(lpfc_fcf_record_fab_name_7, fcf_record),
1882                         bf_get(lpfc_fcf_record_switch_name_0, fcf_record),
1883                         bf_get(lpfc_fcf_record_switch_name_1, fcf_record),
1884                         bf_get(lpfc_fcf_record_switch_name_2, fcf_record),
1885                         bf_get(lpfc_fcf_record_switch_name_3, fcf_record),
1886                         bf_get(lpfc_fcf_record_switch_name_4, fcf_record),
1887                         bf_get(lpfc_fcf_record_switch_name_5, fcf_record),
1888                         bf_get(lpfc_fcf_record_switch_name_6, fcf_record),
1889                         bf_get(lpfc_fcf_record_switch_name_7, fcf_record),
1890                         next_fcf_index);
1891 }
1892
1893 /**
1894  lpfc_sli4_fcf_record_match - testing new FCF record for matching existing FCF
1895  * @phba: pointer to lpfc hba data structure.
1896  * @fcf_rec: pointer to an existing FCF record.
1897  * @new_fcf_record: pointer to a new FCF record.
1898  * @new_vlan_id: vlan id from the new FCF record.
1899  *
1900  * This function performs matching test of a new FCF record against an existing
1901  * FCF record. If the new_vlan_id passed in is LPFC_FCOE_IGNORE_VID, vlan id
1902  * will not be used as part of the FCF record matching criteria.
1903  *
1904  * Returns true if all the fields matching, otherwise returns false.
1905  */
1906 static bool
1907 lpfc_sli4_fcf_record_match(struct lpfc_hba *phba,
1908                            struct lpfc_fcf_rec *fcf_rec,
1909                            struct fcf_record *new_fcf_record,
1910                            uint16_t new_vlan_id)
1911 {
1912         if (new_vlan_id != LPFC_FCOE_IGNORE_VID)
1913                 if (!lpfc_vlan_id_match(fcf_rec->vlan_id, new_vlan_id))
1914                         return false;
1915         if (!lpfc_mac_addr_match(fcf_rec->mac_addr, new_fcf_record))
1916                 return false;
1917         if (!lpfc_sw_name_match(fcf_rec->switch_name, new_fcf_record))
1918                 return false;
1919         if (!lpfc_fab_name_match(fcf_rec->fabric_name, new_fcf_record))
1920                 return false;
1921         if (fcf_rec->priority != new_fcf_record->fip_priority)
1922                 return false;
1923         return true;
1924 }
1925
1926 /**
1927  * lpfc_sli4_fcf_rr_next_proc - processing next roundrobin fcf
1928  * @vport: Pointer to vport object.
1929  * @fcf_index: index to next fcf.
1930  *
1931  * This function processing the roundrobin fcf failover to next fcf index.
1932  * When this function is invoked, there will be a current fcf registered
1933  * for flogi.
1934  * Return: 0 for continue retrying flogi on currently registered fcf;
1935  *         1 for stop flogi on currently registered fcf;
1936  */
1937 int lpfc_sli4_fcf_rr_next_proc(struct lpfc_vport *vport, uint16_t fcf_index)
1938 {
1939         struct lpfc_hba *phba = vport->phba;
1940         int rc;
1941
1942         if (fcf_index == LPFC_FCOE_FCF_NEXT_NONE) {
1943                 spin_lock_irq(&phba->hbalock);
1944                 if (phba->hba_flag & HBA_DEVLOSS_TMO) {
1945                         spin_unlock_irq(&phba->hbalock);
1946                         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
1947                                         "2872 Devloss tmo with no eligible "
1948                                         "FCF, unregister in-use FCF (x%x) "
1949                                         "and rescan FCF table\n",
1950                                         phba->fcf.current_rec.fcf_indx);
1951                         lpfc_unregister_fcf_rescan(phba);
1952                         goto stop_flogi_current_fcf;
1953                 }
1954                 /* Mark the end to FLOGI roundrobin failover */
1955                 phba->hba_flag &= ~FCF_RR_INPROG;
1956                 /* Allow action to new fcf asynchronous event */
1957                 phba->fcf.fcf_flag &= ~(FCF_AVAILABLE | FCF_SCAN_DONE);
1958                 spin_unlock_irq(&phba->hbalock);
1959                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
1960                                 "2865 No FCF available, stop roundrobin FCF "
1961                                 "failover and change port state:x%x/x%x\n",
1962                                 phba->pport->port_state, LPFC_VPORT_UNKNOWN);
1963                 phba->pport->port_state = LPFC_VPORT_UNKNOWN;
1964                 goto stop_flogi_current_fcf;
1965         } else {
1966                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP | LOG_ELS,
1967                                 "2794 Try FLOGI roundrobin FCF failover to "
1968                                 "(x%x)\n", fcf_index);
1969                 rc = lpfc_sli4_fcf_rr_read_fcf_rec(phba, fcf_index);
1970                 if (rc)
1971                         lpfc_printf_log(phba, KERN_WARNING, LOG_FIP | LOG_ELS,
1972                                         "2761 FLOGI roundrobin FCF failover "
1973                                         "failed (rc:x%x) to read FCF (x%x)\n",
1974                                         rc, phba->fcf.current_rec.fcf_indx);
1975                 else
1976                         goto stop_flogi_current_fcf;
1977         }
1978         return 0;
1979
1980 stop_flogi_current_fcf:
1981         lpfc_can_disctmo(vport);
1982         return 1;
1983 }
1984
1985 /**
1986  * lpfc_sli4_fcf_pri_list_del
1987  * @phba: pointer to lpfc hba data structure.
1988  * @fcf_index the index of the fcf record to delete
1989  * This routine checks the on list flag of the fcf_index to be deleted.
1990  * If it is one the list then it is removed from the list, and the flag
1991  * is cleared. This routine grab the hbalock before removing the fcf
1992  * record from the list.
1993  **/
1994 static void lpfc_sli4_fcf_pri_list_del(struct lpfc_hba *phba,
1995                         uint16_t fcf_index)
1996 {
1997         struct lpfc_fcf_pri *new_fcf_pri;
1998
1999         new_fcf_pri = &phba->fcf.fcf_pri[fcf_index];
2000         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2001                 "3058 deleting idx x%x pri x%x flg x%x\n",
2002                 fcf_index, new_fcf_pri->fcf_rec.priority,
2003                  new_fcf_pri->fcf_rec.flag);
2004         spin_lock_irq(&phba->hbalock);
2005         if (new_fcf_pri->fcf_rec.flag & LPFC_FCF_ON_PRI_LIST) {
2006                 if (phba->fcf.current_rec.priority ==
2007                                 new_fcf_pri->fcf_rec.priority)
2008                         phba->fcf.eligible_fcf_cnt--;
2009                 list_del_init(&new_fcf_pri->list);
2010                 new_fcf_pri->fcf_rec.flag &= ~LPFC_FCF_ON_PRI_LIST;
2011         }
2012         spin_unlock_irq(&phba->hbalock);
2013 }
2014
2015 /**
2016  * lpfc_sli4_set_fcf_flogi_fail
2017  * @phba: pointer to lpfc hba data structure.
2018  * @fcf_index the index of the fcf record to update
2019  * This routine acquires the hbalock and then set the LPFC_FCF_FLOGI_FAILED
2020  * flag so the the round robin slection for the particular priority level
2021  * will try a different fcf record that does not have this bit set.
2022  * If the fcf record is re-read for any reason this flag is cleared brfore
2023  * adding it to the priority list.
2024  **/
2025 void
2026 lpfc_sli4_set_fcf_flogi_fail(struct lpfc_hba *phba, uint16_t fcf_index)
2027 {
2028         struct lpfc_fcf_pri *new_fcf_pri;
2029         new_fcf_pri = &phba->fcf.fcf_pri[fcf_index];
2030         spin_lock_irq(&phba->hbalock);
2031         new_fcf_pri->fcf_rec.flag |= LPFC_FCF_FLOGI_FAILED;
2032         spin_unlock_irq(&phba->hbalock);
2033 }
2034
2035 /**
2036  * lpfc_sli4_fcf_pri_list_add
2037  * @phba: pointer to lpfc hba data structure.
2038  * @fcf_index the index of the fcf record to add
2039  * This routine checks the priority of the fcf_index to be added.
2040  * If it is a lower priority than the current head of the fcf_pri list
2041  * then it is added to the list in the right order.
2042  * If it is the same priority as the current head of the list then it
2043  * is added to the head of the list and its bit in the rr_bmask is set.
2044  * If the fcf_index to be added is of a higher priority than the current
2045  * head of the list then the rr_bmask is cleared, its bit is set in the
2046  * rr_bmask and it is added to the head of the list.
2047  * returns:
2048  * 0=success 1=failure
2049  **/
2050 static int lpfc_sli4_fcf_pri_list_add(struct lpfc_hba *phba,
2051         uint16_t fcf_index,
2052         struct fcf_record *new_fcf_record)
2053 {
2054         uint16_t current_fcf_pri;
2055         uint16_t last_index;
2056         struct lpfc_fcf_pri *fcf_pri;
2057         struct lpfc_fcf_pri *next_fcf_pri;
2058         struct lpfc_fcf_pri *new_fcf_pri;
2059         int ret;
2060
2061         new_fcf_pri = &phba->fcf.fcf_pri[fcf_index];
2062         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2063                 "3059 adding idx x%x pri x%x flg x%x\n",
2064                 fcf_index, new_fcf_record->fip_priority,
2065                  new_fcf_pri->fcf_rec.flag);
2066         spin_lock_irq(&phba->hbalock);
2067         if (new_fcf_pri->fcf_rec.flag & LPFC_FCF_ON_PRI_LIST)
2068                 list_del_init(&new_fcf_pri->list);
2069         new_fcf_pri->fcf_rec.fcf_index = fcf_index;
2070         new_fcf_pri->fcf_rec.priority = new_fcf_record->fip_priority;
2071         if (list_empty(&phba->fcf.fcf_pri_list)) {
2072                 list_add(&new_fcf_pri->list, &phba->fcf.fcf_pri_list);
2073                 ret = lpfc_sli4_fcf_rr_index_set(phba,
2074                                 new_fcf_pri->fcf_rec.fcf_index);
2075                 goto out;
2076         }
2077
2078         last_index = find_first_bit(phba->fcf.fcf_rr_bmask,
2079                                 LPFC_SLI4_FCF_TBL_INDX_MAX);
2080         if (last_index >= LPFC_SLI4_FCF_TBL_INDX_MAX) {
2081                 ret = 0; /* Empty rr list */
2082                 goto out;
2083         }
2084         current_fcf_pri = phba->fcf.fcf_pri[last_index].fcf_rec.priority;
2085         if (new_fcf_pri->fcf_rec.priority <=  current_fcf_pri) {
2086                 list_add(&new_fcf_pri->list, &phba->fcf.fcf_pri_list);
2087                 if (new_fcf_pri->fcf_rec.priority <  current_fcf_pri) {
2088                         memset(phba->fcf.fcf_rr_bmask, 0,
2089                                 sizeof(*phba->fcf.fcf_rr_bmask));
2090                         /* fcfs_at_this_priority_level = 1; */
2091                         phba->fcf.eligible_fcf_cnt = 1;
2092                 } else
2093                         /* fcfs_at_this_priority_level++; */
2094                         phba->fcf.eligible_fcf_cnt++;
2095                 ret = lpfc_sli4_fcf_rr_index_set(phba,
2096                                 new_fcf_pri->fcf_rec.fcf_index);
2097                 goto out;
2098         }
2099
2100         list_for_each_entry_safe(fcf_pri, next_fcf_pri,
2101                                 &phba->fcf.fcf_pri_list, list) {
2102                 if (new_fcf_pri->fcf_rec.priority <=
2103                                 fcf_pri->fcf_rec.priority) {
2104                         if (fcf_pri->list.prev == &phba->fcf.fcf_pri_list)
2105                                 list_add(&new_fcf_pri->list,
2106                                                 &phba->fcf.fcf_pri_list);
2107                         else
2108                                 list_add(&new_fcf_pri->list,
2109                                          &((struct lpfc_fcf_pri *)
2110                                         fcf_pri->list.prev)->list);
2111                         ret = 0;
2112                         goto out;
2113                 } else if (fcf_pri->list.next == &phba->fcf.fcf_pri_list
2114                         || new_fcf_pri->fcf_rec.priority <
2115                                 next_fcf_pri->fcf_rec.priority) {
2116                         list_add(&new_fcf_pri->list, &fcf_pri->list);
2117                         ret = 0;
2118                         goto out;
2119                 }
2120                 if (new_fcf_pri->fcf_rec.priority > fcf_pri->fcf_rec.priority)
2121                         continue;
2122
2123         }
2124         ret = 1;
2125 out:
2126         /* we use = instead of |= to clear the FLOGI_FAILED flag. */
2127         new_fcf_pri->fcf_rec.flag = LPFC_FCF_ON_PRI_LIST;
2128         spin_unlock_irq(&phba->hbalock);
2129         return ret;
2130 }
2131
2132 /**
2133  * lpfc_mbx_cmpl_fcf_scan_read_fcf_rec - fcf scan read_fcf mbox cmpl handler.
2134  * @phba: pointer to lpfc hba data structure.
2135  * @mboxq: pointer to mailbox object.
2136  *
2137  * This function iterates through all the fcf records available in
2138  * HBA and chooses the optimal FCF record for discovery. After finding
2139  * the FCF for discovery it registers the FCF record and kicks start
2140  * discovery.
2141  * If FCF_IN_USE flag is set in currently used FCF, the routine tries to
2142  * use an FCF record which matches fabric name and mac address of the
2143  * currently used FCF record.
2144  * If the driver supports only one FCF, it will try to use the FCF record
2145  * used by BOOT_BIOS.
2146  */
2147 void
2148 lpfc_mbx_cmpl_fcf_scan_read_fcf_rec(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq)
2149 {
2150         struct fcf_record *new_fcf_record;
2151         uint32_t boot_flag, addr_mode;
2152         uint16_t fcf_index, next_fcf_index;
2153         struct lpfc_fcf_rec *fcf_rec = NULL;
2154         uint16_t vlan_id;
2155         bool select_new_fcf;
2156         int rc;
2157
2158         /* If there is pending FCoE event restart FCF table scan */
2159         if (lpfc_check_pending_fcoe_event(phba, LPFC_SKIP_UNREG_FCF)) {
2160                 lpfc_sli4_mbox_cmd_free(phba, mboxq);
2161                 return;
2162         }
2163
2164         /* Parse the FCF record from the non-embedded mailbox command */
2165         new_fcf_record = lpfc_sli4_fcf_rec_mbox_parse(phba, mboxq,
2166                                                       &next_fcf_index);
2167         if (!new_fcf_record) {
2168                 lpfc_printf_log(phba, KERN_ERR, LOG_FIP,
2169                                 "2765 Mailbox command READ_FCF_RECORD "
2170                                 "failed to retrieve a FCF record.\n");
2171                 /* Let next new FCF event trigger fast failover */
2172                 spin_lock_irq(&phba->hbalock);
2173                 phba->hba_flag &= ~FCF_TS_INPROG;
2174                 spin_unlock_irq(&phba->hbalock);
2175                 lpfc_sli4_mbox_cmd_free(phba, mboxq);
2176                 return;
2177         }
2178
2179         /* Check the FCF record against the connection list */
2180         rc = lpfc_match_fcf_conn_list(phba, new_fcf_record, &boot_flag,
2181                                       &addr_mode, &vlan_id);
2182
2183         /* Log the FCF record information if turned on */
2184         lpfc_sli4_log_fcf_record_info(phba, new_fcf_record, vlan_id,
2185                                       next_fcf_index);
2186
2187         /*
2188          * If the fcf record does not match with connect list entries
2189          * read the next entry; otherwise, this is an eligible FCF
2190          * record for roundrobin FCF failover.
2191          */
2192         if (!rc) {
2193                 lpfc_sli4_fcf_pri_list_del(phba,
2194                                         bf_get(lpfc_fcf_record_fcf_index,
2195                                                new_fcf_record));
2196                 lpfc_printf_log(phba, KERN_WARNING, LOG_FIP,
2197                                 "2781 FCF (x%x) failed connection "
2198                                 "list check: (x%x/x%x/%x)\n",
2199                                 bf_get(lpfc_fcf_record_fcf_index,
2200                                        new_fcf_record),
2201                                 bf_get(lpfc_fcf_record_fcf_avail,
2202                                        new_fcf_record),
2203                                 bf_get(lpfc_fcf_record_fcf_valid,
2204                                        new_fcf_record),
2205                                 bf_get(lpfc_fcf_record_fcf_sol,
2206                                        new_fcf_record));
2207                 if ((phba->fcf.fcf_flag & FCF_IN_USE) &&
2208                     lpfc_sli4_fcf_record_match(phba, &phba->fcf.current_rec,
2209                     new_fcf_record, LPFC_FCOE_IGNORE_VID)) {
2210                         if (bf_get(lpfc_fcf_record_fcf_index, new_fcf_record) !=
2211                             phba->fcf.current_rec.fcf_indx) {
2212                                 lpfc_printf_log(phba, KERN_ERR, LOG_FIP,
2213                                         "2862 FCF (x%x) matches property "
2214                                         "of in-use FCF (x%x)\n",
2215                                         bf_get(lpfc_fcf_record_fcf_index,
2216                                                new_fcf_record),
2217                                         phba->fcf.current_rec.fcf_indx);
2218                                 goto read_next_fcf;
2219                         }
2220                         /*
2221                          * In case the current in-use FCF record becomes
2222                          * invalid/unavailable during FCF discovery that
2223                          * was not triggered by fast FCF failover process,
2224                          * treat it as fast FCF failover.
2225                          */
2226                         if (!(phba->fcf.fcf_flag & FCF_REDISC_PEND) &&
2227                             !(phba->fcf.fcf_flag & FCF_REDISC_FOV)) {
2228                                 lpfc_printf_log(phba, KERN_WARNING, LOG_FIP,
2229                                                 "2835 Invalid in-use FCF "
2230                                                 "(x%x), enter FCF failover "
2231                                                 "table scan.\n",
2232                                                 phba->fcf.current_rec.fcf_indx);
2233                                 spin_lock_irq(&phba->hbalock);
2234                                 phba->fcf.fcf_flag |= FCF_REDISC_FOV;
2235                                 spin_unlock_irq(&phba->hbalock);
2236                                 lpfc_sli4_mbox_cmd_free(phba, mboxq);
2237                                 lpfc_sli4_fcf_scan_read_fcf_rec(phba,
2238                                                 LPFC_FCOE_FCF_GET_FIRST);
2239                                 return;
2240                         }
2241                 }
2242                 goto read_next_fcf;
2243         } else {
2244                 fcf_index = bf_get(lpfc_fcf_record_fcf_index, new_fcf_record);
2245                 rc = lpfc_sli4_fcf_pri_list_add(phba, fcf_index,
2246                                                         new_fcf_record);
2247                 if (rc)
2248                         goto read_next_fcf;
2249         }
2250
2251         /*
2252          * If this is not the first FCF discovery of the HBA, use last
2253          * FCF record for the discovery. The condition that a rescan
2254          * matches the in-use FCF record: fabric name, switch name, mac
2255          * address, and vlan_id.
2256          */
2257         spin_lock_irq(&phba->hbalock);
2258         if (phba->fcf.fcf_flag & FCF_IN_USE) {
2259                 if (phba->cfg_fcf_failover_policy == LPFC_FCF_FOV &&
2260                         lpfc_sli4_fcf_record_match(phba, &phba->fcf.current_rec,
2261                     new_fcf_record, vlan_id)) {
2262                         if (bf_get(lpfc_fcf_record_fcf_index, new_fcf_record) ==
2263                             phba->fcf.current_rec.fcf_indx) {
2264                                 phba->fcf.fcf_flag |= FCF_AVAILABLE;
2265                                 if (phba->fcf.fcf_flag & FCF_REDISC_PEND)
2266                                         /* Stop FCF redisc wait timer */
2267                                         __lpfc_sli4_stop_fcf_redisc_wait_timer(
2268                                                                         phba);
2269                                 else if (phba->fcf.fcf_flag & FCF_REDISC_FOV)
2270                                         /* Fast failover, mark completed */
2271                                         phba->fcf.fcf_flag &= ~FCF_REDISC_FOV;
2272                                 spin_unlock_irq(&phba->hbalock);
2273                                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2274                                                 "2836 New FCF matches in-use "
2275                                                 "FCF (x%x), port_state:x%x, "
2276                                                 "fc_flag:x%x\n",
2277                                                 phba->fcf.current_rec.fcf_indx,
2278                                                 phba->pport->port_state,
2279                                                 phba->pport->fc_flag);
2280                                 goto out;
2281                         } else
2282                                 lpfc_printf_log(phba, KERN_ERR, LOG_FIP,
2283                                         "2863 New FCF (x%x) matches "
2284                                         "property of in-use FCF (x%x)\n",
2285                                         bf_get(lpfc_fcf_record_fcf_index,
2286                                                new_fcf_record),
2287                                         phba->fcf.current_rec.fcf_indx);
2288                 }
2289                 /*
2290                  * Read next FCF record from HBA searching for the matching
2291                  * with in-use record only if not during the fast failover
2292                  * period. In case of fast failover period, it shall try to
2293                  * determine whether the FCF record just read should be the
2294                  * next candidate.
2295                  */
2296                 if (!(phba->fcf.fcf_flag & FCF_REDISC_FOV)) {
2297                         spin_unlock_irq(&phba->hbalock);
2298                         goto read_next_fcf;
2299                 }
2300         }
2301         /*
2302          * Update on failover FCF record only if it's in FCF fast-failover
2303          * period; otherwise, update on current FCF record.
2304          */
2305         if (phba->fcf.fcf_flag & FCF_REDISC_FOV)
2306                 fcf_rec = &phba->fcf.failover_rec;
2307         else
2308                 fcf_rec = &phba->fcf.current_rec;
2309
2310         if (phba->fcf.fcf_flag & FCF_AVAILABLE) {
2311                 /*
2312                  * If the driver FCF record does not have boot flag
2313                  * set and new hba fcf record has boot flag set, use
2314                  * the new hba fcf record.
2315                  */
2316                 if (boot_flag && !(fcf_rec->flag & BOOT_ENABLE)) {
2317                         /* Choose this FCF record */
2318                         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2319                                         "2837 Update current FCF record "
2320                                         "(x%x) with new FCF record (x%x)\n",
2321                                         fcf_rec->fcf_indx,
2322                                         bf_get(lpfc_fcf_record_fcf_index,
2323                                         new_fcf_record));
2324                         __lpfc_update_fcf_record(phba, fcf_rec, new_fcf_record,
2325                                         addr_mode, vlan_id, BOOT_ENABLE);
2326                         spin_unlock_irq(&phba->hbalock);
2327                         goto read_next_fcf;
2328                 }
2329                 /*
2330                  * If the driver FCF record has boot flag set and the
2331                  * new hba FCF record does not have boot flag, read
2332                  * the next FCF record.
2333                  */
2334                 if (!boot_flag && (fcf_rec->flag & BOOT_ENABLE)) {
2335                         spin_unlock_irq(&phba->hbalock);
2336                         goto read_next_fcf;
2337                 }
2338                 /*
2339                  * If the new hba FCF record has lower priority value
2340                  * than the driver FCF record, use the new record.
2341                  */
2342                 if (new_fcf_record->fip_priority < fcf_rec->priority) {
2343                         /* Choose the new FCF record with lower priority */
2344                         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2345                                         "2838 Update current FCF record "
2346                                         "(x%x) with new FCF record (x%x)\n",
2347                                         fcf_rec->fcf_indx,
2348                                         bf_get(lpfc_fcf_record_fcf_index,
2349                                                new_fcf_record));
2350                         __lpfc_update_fcf_record(phba, fcf_rec, new_fcf_record,
2351                                         addr_mode, vlan_id, 0);
2352                         /* Reset running random FCF selection count */
2353                         phba->fcf.eligible_fcf_cnt = 1;
2354                 } else if (new_fcf_record->fip_priority == fcf_rec->priority) {
2355                         /* Update running random FCF selection count */
2356                         phba->fcf.eligible_fcf_cnt++;
2357                         select_new_fcf = lpfc_sli4_new_fcf_random_select(phba,
2358                                                 phba->fcf.eligible_fcf_cnt);
2359                         if (select_new_fcf) {
2360                                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2361                                         "2839 Update current FCF record "
2362                                         "(x%x) with new FCF record (x%x)\n",
2363                                         fcf_rec->fcf_indx,
2364                                         bf_get(lpfc_fcf_record_fcf_index,
2365                                                new_fcf_record));
2366                                 /* Choose the new FCF by random selection */
2367                                 __lpfc_update_fcf_record(phba, fcf_rec,
2368                                                          new_fcf_record,
2369                                                          addr_mode, vlan_id, 0);
2370                         }
2371                 }
2372                 spin_unlock_irq(&phba->hbalock);
2373                 goto read_next_fcf;
2374         }
2375         /*
2376          * This is the first suitable FCF record, choose this record for
2377          * initial best-fit FCF.
2378          */
2379         if (fcf_rec) {
2380                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2381                                 "2840 Update initial FCF candidate "
2382                                 "with FCF (x%x)\n",
2383                                 bf_get(lpfc_fcf_record_fcf_index,
2384                                        new_fcf_record));
2385                 __lpfc_update_fcf_record(phba, fcf_rec, new_fcf_record,
2386                                          addr_mode, vlan_id, (boot_flag ?
2387                                          BOOT_ENABLE : 0));
2388                 phba->fcf.fcf_flag |= FCF_AVAILABLE;
2389                 /* Setup initial running random FCF selection count */
2390                 phba->fcf.eligible_fcf_cnt = 1;
2391         }
2392         spin_unlock_irq(&phba->hbalock);
2393         goto read_next_fcf;
2394
2395 read_next_fcf:
2396         lpfc_sli4_mbox_cmd_free(phba, mboxq);
2397         if (next_fcf_index == LPFC_FCOE_FCF_NEXT_NONE || next_fcf_index == 0) {
2398                 if (phba->fcf.fcf_flag & FCF_REDISC_FOV) {
2399                         /*
2400                          * Case of FCF fast failover scan
2401                          */
2402
2403                         /*
2404                          * It has not found any suitable FCF record, cancel
2405                          * FCF scan inprogress, and do nothing
2406                          */
2407                         if (!(phba->fcf.failover_rec.flag & RECORD_VALID)) {
2408                                 lpfc_printf_log(phba, KERN_WARNING, LOG_FIP,
2409                                                "2782 No suitable FCF found: "
2410                                                "(x%x/x%x)\n",
2411                                                phba->fcoe_eventtag_at_fcf_scan,
2412                                                bf_get(lpfc_fcf_record_fcf_index,
2413                                                       new_fcf_record));
2414                                 spin_lock_irq(&phba->hbalock);
2415                                 if (phba->hba_flag & HBA_DEVLOSS_TMO) {
2416                                         phba->hba_flag &= ~FCF_TS_INPROG;
2417                                         spin_unlock_irq(&phba->hbalock);
2418                                         /* Unregister in-use FCF and rescan */
2419                                         lpfc_printf_log(phba, KERN_INFO,
2420                                                         LOG_FIP,
2421                                                         "2864 On devloss tmo "
2422                                                         "unreg in-use FCF and "
2423                                                         "rescan FCF table\n");
2424                                         lpfc_unregister_fcf_rescan(phba);
2425                                         return;
2426                                 }
2427                                 /*
2428                                  * Let next new FCF event trigger fast failover
2429                                  */
2430                                 phba->hba_flag &= ~FCF_TS_INPROG;
2431                                 spin_unlock_irq(&phba->hbalock);
2432                                 return;
2433                         }
2434                         /*
2435                          * It has found a suitable FCF record that is not
2436                          * the same as in-use FCF record, unregister the
2437                          * in-use FCF record, replace the in-use FCF record
2438                          * with the new FCF record, mark FCF fast failover
2439                          * completed, and then start register the new FCF
2440                          * record.
2441                          */
2442
2443                         /* Unregister the current in-use FCF record */
2444                         lpfc_unregister_fcf(phba);
2445
2446                         /* Replace in-use record with the new record */
2447                         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2448                                         "2842 Replace in-use FCF (x%x) "
2449                                         "with failover FCF (x%x)\n",
2450                                         phba->fcf.current_rec.fcf_indx,
2451                                         phba->fcf.failover_rec.fcf_indx);
2452                         memcpy(&phba->fcf.current_rec,
2453                                &phba->fcf.failover_rec,
2454                                sizeof(struct lpfc_fcf_rec));
2455                         /*
2456                          * Mark the fast FCF failover rediscovery completed
2457                          * and the start of the first round of the roundrobin
2458                          * FCF failover.
2459                          */
2460                         spin_lock_irq(&phba->hbalock);
2461                         phba->fcf.fcf_flag &= ~FCF_REDISC_FOV;
2462                         spin_unlock_irq(&phba->hbalock);
2463                         /* Register to the new FCF record */
2464                         lpfc_register_fcf(phba);
2465                 } else {
2466                         /*
2467                          * In case of transaction period to fast FCF failover,
2468                          * do nothing when search to the end of the FCF table.
2469                          */
2470                         if ((phba->fcf.fcf_flag & FCF_REDISC_EVT) ||
2471                             (phba->fcf.fcf_flag & FCF_REDISC_PEND))
2472                                 return;
2473
2474                         if (phba->cfg_fcf_failover_policy == LPFC_FCF_FOV &&
2475                                 phba->fcf.fcf_flag & FCF_IN_USE) {
2476                                 /*
2477                                  * In case the current in-use FCF record no
2478                                  * longer existed during FCF discovery that
2479                                  * was not triggered by fast FCF failover
2480                                  * process, treat it as fast FCF failover.
2481                                  */
2482                                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2483                                                 "2841 In-use FCF record (x%x) "
2484                                                 "not reported, entering fast "
2485                                                 "FCF failover mode scanning.\n",
2486                                                 phba->fcf.current_rec.fcf_indx);
2487                                 spin_lock_irq(&phba->hbalock);
2488                                 phba->fcf.fcf_flag |= FCF_REDISC_FOV;
2489                                 spin_unlock_irq(&phba->hbalock);
2490                                 lpfc_sli4_fcf_scan_read_fcf_rec(phba,
2491                                                 LPFC_FCOE_FCF_GET_FIRST);
2492                                 return;
2493                         }
2494                         /* Register to the new FCF record */
2495                         lpfc_register_fcf(phba);
2496                 }
2497         } else
2498                 lpfc_sli4_fcf_scan_read_fcf_rec(phba, next_fcf_index);
2499         return;
2500
2501 out:
2502         lpfc_sli4_mbox_cmd_free(phba, mboxq);
2503         lpfc_register_fcf(phba);
2504
2505         return;
2506 }
2507
2508 /**
2509  * lpfc_mbx_cmpl_fcf_rr_read_fcf_rec - fcf roundrobin read_fcf mbox cmpl hdler
2510  * @phba: pointer to lpfc hba data structure.
2511  * @mboxq: pointer to mailbox object.
2512  *
2513  * This is the callback function for FLOGI failure roundrobin FCF failover
2514  * read FCF record mailbox command from the eligible FCF record bmask for
2515  * performing the failover. If the FCF read back is not valid/available, it
2516  * fails through to retrying FLOGI to the currently registered FCF again.
2517  * Otherwise, if the FCF read back is valid and available, it will set the
2518  * newly read FCF record to the failover FCF record, unregister currently
2519  * registered FCF record, copy the failover FCF record to the current
2520  * FCF record, and then register the current FCF record before proceeding
2521  * to trying FLOGI on the new failover FCF.
2522  */
2523 void
2524 lpfc_mbx_cmpl_fcf_rr_read_fcf_rec(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq)
2525 {
2526         struct fcf_record *new_fcf_record;
2527         uint32_t boot_flag, addr_mode;
2528         uint16_t next_fcf_index, fcf_index;
2529         uint16_t current_fcf_index;
2530         uint16_t vlan_id;
2531         int rc;
2532
2533         /* If link state is not up, stop the roundrobin failover process */
2534         if (phba->link_state < LPFC_LINK_UP) {
2535                 spin_lock_irq(&phba->hbalock);
2536                 phba->fcf.fcf_flag &= ~FCF_DISCOVERY;
2537                 phba->hba_flag &= ~FCF_RR_INPROG;
2538                 spin_unlock_irq(&phba->hbalock);
2539                 goto out;
2540         }
2541
2542         /* Parse the FCF record from the non-embedded mailbox command */
2543         new_fcf_record = lpfc_sli4_fcf_rec_mbox_parse(phba, mboxq,
2544                                                       &next_fcf_index);
2545         if (!new_fcf_record) {
2546                 lpfc_printf_log(phba, KERN_WARNING, LOG_FIP,
2547                                 "2766 Mailbox command READ_FCF_RECORD "
2548                                 "failed to retrieve a FCF record. "
2549                                 "hba_flg x%x fcf_flg x%x\n", phba->hba_flag,
2550                                 phba->fcf.fcf_flag);
2551                 lpfc_unregister_fcf_rescan(phba);
2552                 goto out;
2553         }
2554
2555         /* Get the needed parameters from FCF record */
2556         rc = lpfc_match_fcf_conn_list(phba, new_fcf_record, &boot_flag,
2557                                       &addr_mode, &vlan_id);
2558
2559         /* Log the FCF record information if turned on */
2560         lpfc_sli4_log_fcf_record_info(phba, new_fcf_record, vlan_id,
2561                                       next_fcf_index);
2562
2563         fcf_index = bf_get(lpfc_fcf_record_fcf_index, new_fcf_record);
2564         if (!rc) {
2565                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2566                                 "2848 Remove ineligible FCF (x%x) from "
2567                                 "from roundrobin bmask\n", fcf_index);
2568                 /* Clear roundrobin bmask bit for ineligible FCF */
2569                 lpfc_sli4_fcf_rr_index_clear(phba, fcf_index);
2570                 /* Perform next round of roundrobin FCF failover */
2571                 fcf_index = lpfc_sli4_fcf_rr_next_index_get(phba);
2572                 rc = lpfc_sli4_fcf_rr_next_proc(phba->pport, fcf_index);
2573                 if (rc)
2574                         goto out;
2575                 goto error_out;
2576         }
2577
2578         if (fcf_index == phba->fcf.current_rec.fcf_indx) {
2579                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2580                                 "2760 Perform FLOGI roundrobin FCF failover: "
2581                                 "FCF (x%x) back to FCF (x%x)\n",
2582                                 phba->fcf.current_rec.fcf_indx, fcf_index);
2583                 /* Wait 500 ms before retrying FLOGI to current FCF */
2584                 msleep(500);
2585                 lpfc_issue_init_vfi(phba->pport);
2586                 goto out;
2587         }
2588
2589         /* Upload new FCF record to the failover FCF record */
2590         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2591                         "2834 Update current FCF (x%x) with new FCF (x%x)\n",
2592                         phba->fcf.failover_rec.fcf_indx, fcf_index);
2593         spin_lock_irq(&phba->hbalock);
2594         __lpfc_update_fcf_record(phba, &phba->fcf.failover_rec,
2595                                  new_fcf_record, addr_mode, vlan_id,
2596                                  (boot_flag ? BOOT_ENABLE : 0));
2597         spin_unlock_irq(&phba->hbalock);
2598
2599         current_fcf_index = phba->fcf.current_rec.fcf_indx;
2600
2601         /* Unregister the current in-use FCF record */
2602         lpfc_unregister_fcf(phba);
2603
2604         /* Replace in-use record with the new record */
2605         memcpy(&phba->fcf.current_rec, &phba->fcf.failover_rec,
2606                sizeof(struct lpfc_fcf_rec));
2607
2608         lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2609                         "2783 Perform FLOGI roundrobin FCF failover: FCF "
2610                         "(x%x) to FCF (x%x)\n", current_fcf_index, fcf_index);
2611
2612 error_out:
2613         lpfc_register_fcf(phba);
2614 out:
2615         lpfc_sli4_mbox_cmd_free(phba, mboxq);
2616 }
2617
2618 /**
2619  * lpfc_mbx_cmpl_read_fcf_rec - read fcf completion handler.
2620  * @phba: pointer to lpfc hba data structure.
2621  * @mboxq: pointer to mailbox object.
2622  *
2623  * This is the callback function of read FCF record mailbox command for
2624  * updating the eligible FCF bmask for FLOGI failure roundrobin FCF
2625  * failover when a new FCF event happened. If the FCF read back is
2626  * valid/available and it passes the connection list check, it updates
2627  * the bmask for the eligible FCF record for roundrobin failover.
2628  */
2629 void
2630 lpfc_mbx_cmpl_read_fcf_rec(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq)
2631 {
2632         struct fcf_record *new_fcf_record;
2633         uint32_t boot_flag, addr_mode;
2634         uint16_t fcf_index, next_fcf_index;
2635         uint16_t vlan_id;
2636         int rc;
2637
2638         /* If link state is not up, no need to proceed */
2639         if (phba->link_state < LPFC_LINK_UP)
2640                 goto out;
2641
2642         /* If FCF discovery period is over, no need to proceed */
2643         if (!(phba->fcf.fcf_flag & FCF_DISCOVERY))
2644                 goto out;
2645
2646         /* Parse the FCF record from the non-embedded mailbox command */
2647         new_fcf_record = lpfc_sli4_fcf_rec_mbox_parse(phba, mboxq,
2648                                                       &next_fcf_index);
2649         if (!new_fcf_record) {
2650                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP,
2651                                 "2767 Mailbox command READ_FCF_RECORD "
2652                                 "failed to retrieve a FCF record.\n");
2653                 goto out;
2654         }
2655
2656         /* Check the connection list for eligibility */
2657         rc = lpfc_match_fcf_conn_list(phba, new_fcf_record, &boot_flag,
2658                                       &addr_mode, &vlan_id);
2659
2660         /* Log the FCF record information if turned on */
2661         lpfc_sli4_log_fcf_record_info(phba, new_fcf_record, vlan_id,
2662                                       next_fcf_index);
2663
2664         if (!rc)
2665                 goto out;
2666
2667         /* Update the eligible FCF record index bmask */
2668         fcf_index = bf_get(lpfc_fcf_record_fcf_index, new_fcf_record);
2669
2670         rc = lpfc_sli4_fcf_pri_list_add(phba, fcf_index, new_fcf_record);
2671
2672 out:
2673         lpfc_sli4_mbox_cmd_free(phba, mboxq);
2674 }
2675
2676 /**
2677  * lpfc_init_vfi_cmpl - Completion handler for init_vfi mbox command.
2678  * @phba: pointer to lpfc hba data structure.
2679  * @mboxq: pointer to mailbox data structure.
2680  *
2681  * This function handles completion of init vfi mailbox command.
2682  */
2683 static void
2684 lpfc_init_vfi_cmpl(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq)
2685 {
2686         struct lpfc_vport *vport = mboxq->vport;
2687
2688         /*
2689          * VFI not supported on interface type 0, just do the flogi
2690          * Also continue if the VFI is in use - just use the same one.
2691          */
2692         if (mboxq->u.mb.mbxStatus &&
2693             (bf_get(lpfc_sli_intf_if_type, &phba->sli4_hba.sli_intf) !=
2694                         LPFC_SLI_INTF_IF_TYPE_0) &&
2695             mboxq->u.mb.mbxStatus != MBX_VFI_IN_USE) {
2696                 lpfc_printf_vlog(vport, KERN_ERR,
2697                                 LOG_MBOX,
2698                                 "2891 Init VFI mailbox failed 0x%x\n",
2699                                 mboxq->u.mb.mbxStatus);
2700                 mempool_free(mboxq, phba->mbox_mem_pool);
2701                 lpfc_vport_set_state(vport, FC_VPORT_FAILED);
2702                 return;
2703         }
2704
2705         lpfc_initial_flogi(vport);
2706         mempool_free(mboxq, phba->mbox_mem_pool);
2707         return;
2708 }
2709
2710 /**
2711  * lpfc_issue_init_vfi - Issue init_vfi mailbox command.
2712  * @vport: pointer to lpfc_vport data structure.
2713  *
2714  * This function issue a init_vfi mailbox command to initialize the VFI and
2715  * VPI for the physical port.
2716  */
2717 void
2718 lpfc_issue_init_vfi(struct lpfc_vport *vport)
2719 {
2720         LPFC_MBOXQ_t *mboxq;
2721         int rc;
2722         struct lpfc_hba *phba = vport->phba;
2723
2724         mboxq = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
2725         if (!mboxq) {
2726                 lpfc_printf_vlog(vport, KERN_ERR,
2727                         LOG_MBOX, "2892 Failed to allocate "
2728                         "init_vfi mailbox\n");
2729                 return;
2730         }
2731         lpfc_init_vfi(mboxq, vport);
2732         mboxq->mbox_cmpl = lpfc_init_vfi_cmpl;
2733         rc = lpfc_sli_issue_mbox(phba, mboxq, MBX_NOWAIT);
2734         if (rc == MBX_NOT_FINISHED) {
2735                 lpfc_printf_vlog(vport, KERN_ERR,
2736                         LOG_MBOX, "2893 Failed to issue init_vfi mailbox\n");
2737                 mempool_free(mboxq, vport->phba->mbox_mem_pool);
2738         }
2739 }
2740
2741 /**
2742  * lpfc_init_vpi_cmpl - Completion handler for init_vpi mbox command.
2743  * @phba: pointer to lpfc hba data structure.
2744  * @mboxq: pointer to mailbox data structure.
2745  *
2746  * This function handles completion of init vpi mailbox command.
2747  */
2748 void
2749 lpfc_init_vpi_cmpl(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq)
2750 {
2751         struct lpfc_vport *vport = mboxq->vport;
2752         struct lpfc_nodelist *ndlp;
2753         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
2754
2755         if (mboxq->u.mb.mbxStatus) {
2756                 lpfc_printf_vlog(vport, KERN_ERR,
2757                                 LOG_MBOX,
2758                                 "2609 Init VPI mailbox failed 0x%x\n",
2759                                 mboxq->u.mb.mbxStatus);
2760                 mempool_free(mboxq, phba->mbox_mem_pool);
2761                 lpfc_vport_set_state(vport, FC_VPORT_FAILED);
2762                 return;
2763         }
2764         spin_lock_irq(shost->host_lock);
2765         vport->fc_flag &= ~FC_VPORT_NEEDS_INIT_VPI;
2766         spin_unlock_irq(shost->host_lock);
2767
2768         /* If this port is physical port or FDISC is done, do reg_vpi */
2769         if ((phba->pport == vport) || (vport->port_state == LPFC_FDISC)) {
2770                         ndlp = lpfc_findnode_did(vport, Fabric_DID);
2771                         if (!ndlp)
2772                                 lpfc_printf_vlog(vport, KERN_ERR,
2773                                         LOG_DISCOVERY,
2774                                         "2731 Cannot find fabric "
2775                                         "controller node\n");
2776                         else
2777                                 lpfc_register_new_vport(phba, vport, ndlp);
2778                         mempool_free(mboxq, phba->mbox_mem_pool);
2779                         return;
2780         }
2781
2782         if (phba->link_flag & LS_NPIV_FAB_SUPPORTED)
2783                 lpfc_initial_fdisc(vport);
2784         else {
2785                 lpfc_vport_set_state(vport, FC_VPORT_NO_FABRIC_SUPP);
2786                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
2787                                  "2606 No NPIV Fabric support\n");
2788         }
2789         mempool_free(mboxq, phba->mbox_mem_pool);
2790         return;
2791 }
2792
2793 /**
2794  * lpfc_issue_init_vpi - Issue init_vpi mailbox command.
2795  * @vport: pointer to lpfc_vport data structure.
2796  *
2797  * This function issue a init_vpi mailbox command to initialize
2798  * VPI for the vport.
2799  */
2800 void
2801 lpfc_issue_init_vpi(struct lpfc_vport *vport)
2802 {
2803         LPFC_MBOXQ_t *mboxq;
2804         int rc, vpi;
2805
2806         if ((vport->port_type != LPFC_PHYSICAL_PORT) && (!vport->vpi)) {
2807                 vpi = lpfc_alloc_vpi(vport->phba);
2808                 if (!vpi) {
2809                         lpfc_printf_vlog(vport, KERN_ERR,
2810                                          LOG_MBOX,
2811                                          "3303 Failed to obtain vport vpi\n");
2812                         lpfc_vport_set_state(vport, FC_VPORT_FAILED);
2813                         return;
2814                 }
2815                 vport->vpi = vpi;
2816         }
2817
2818         mboxq = mempool_alloc(vport->phba->mbox_mem_pool, GFP_KERNEL);
2819         if (!mboxq) {
2820                 lpfc_printf_vlog(vport, KERN_ERR,
2821                         LOG_MBOX, "2607 Failed to allocate "
2822                         "init_vpi mailbox\n");
2823                 return;
2824         }
2825         lpfc_init_vpi(vport->phba, mboxq, vport->vpi);
2826         mboxq->vport = vport;
2827         mboxq->mbox_cmpl = lpfc_init_vpi_cmpl;
2828         rc = lpfc_sli_issue_mbox(vport->phba, mboxq, MBX_NOWAIT);
2829         if (rc == MBX_NOT_FINISHED) {
2830                 lpfc_printf_vlog(vport, KERN_ERR,
2831                         LOG_MBOX, "2608 Failed to issue init_vpi mailbox\n");
2832                 mempool_free(mboxq, vport->phba->mbox_mem_pool);
2833         }
2834 }
2835
2836 /**
2837  * lpfc_start_fdiscs - send fdiscs for each vports on this port.
2838  * @phba: pointer to lpfc hba data structure.
2839  *
2840  * This function loops through the list of vports on the @phba and issues an
2841  * FDISC if possible.
2842  */
2843 void
2844 lpfc_start_fdiscs(struct lpfc_hba *phba)
2845 {
2846         struct lpfc_vport **vports;
2847         int i;
2848
2849         vports = lpfc_create_vport_work_array(phba);
2850         if (vports != NULL) {
2851                 for (i = 0; i <= phba->max_vports && vports[i] != NULL; i++) {
2852                         if (vports[i]->port_type == LPFC_PHYSICAL_PORT)
2853                                 continue;
2854                         /* There are no vpi for this vport */
2855                         if (vports[i]->vpi > phba->max_vpi) {
2856                                 lpfc_vport_set_state(vports[i],
2857                                                      FC_VPORT_FAILED);
2858                                 continue;
2859                         }
2860                         if (phba->fc_topology == LPFC_TOPOLOGY_LOOP) {
2861                                 lpfc_vport_set_state(vports[i],
2862                                                      FC_VPORT_LINKDOWN);
2863                                 continue;
2864                         }
2865                         if (vports[i]->fc_flag & FC_VPORT_NEEDS_INIT_VPI) {
2866                                 lpfc_issue_init_vpi(vports[i]);
2867                                 continue;
2868                         }
2869                         if (phba->link_flag & LS_NPIV_FAB_SUPPORTED)
2870                                 lpfc_initial_fdisc(vports[i]);
2871                         else {
2872                                 lpfc_vport_set_state(vports[i],
2873                                                      FC_VPORT_NO_FABRIC_SUPP);
2874                                 lpfc_printf_vlog(vports[i], KERN_ERR,
2875                                                  LOG_ELS,
2876                                                  "0259 No NPIV "
2877                                                  "Fabric support\n");
2878                         }
2879                 }
2880         }
2881         lpfc_destroy_vport_work_array(phba, vports);
2882 }
2883
2884 void
2885 lpfc_mbx_cmpl_reg_vfi(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq)
2886 {
2887         struct lpfc_dmabuf *dmabuf = mboxq->context1;
2888         struct lpfc_vport *vport = mboxq->vport;
2889         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
2890
2891         /*
2892          * VFI not supported for interface type 0, so ignore any mailbox
2893          * error (except VFI in use) and continue with the discovery.
2894          */
2895         if (mboxq->u.mb.mbxStatus &&
2896             (bf_get(lpfc_sli_intf_if_type, &phba->sli4_hba.sli_intf) !=
2897                         LPFC_SLI_INTF_IF_TYPE_0) &&
2898             mboxq->u.mb.mbxStatus != MBX_VFI_IN_USE) {
2899                 lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
2900                          "2018 REG_VFI mbxStatus error x%x "
2901                          "HBA state x%x\n",
2902                          mboxq->u.mb.mbxStatus, vport->port_state);
2903                 if (phba->fc_topology == LPFC_TOPOLOGY_LOOP) {
2904                         /* FLOGI failed, use loop map to make discovery list */
2905                         lpfc_disc_list_loopmap(vport);
2906                         /* Start discovery */
2907                         lpfc_disc_start(vport);
2908                         goto out_free_mem;
2909                 }
2910                 lpfc_vport_set_state(vport, FC_VPORT_FAILED);
2911                 goto out_free_mem;
2912         }
2913
2914         /* If the VFI is already registered, there is nothing else to do
2915          * Unless this was a VFI update and we are in PT2PT mode, then
2916          * we should drop through to set the port state to ready.
2917          */
2918         if (vport->fc_flag & FC_VFI_REGISTERED)
2919                 if (!(phba->sli_rev == LPFC_SLI_REV4 &&
2920                       vport->fc_flag & FC_PT2PT))
2921                         goto out_free_mem;
2922
2923         /* The VPI is implicitly registered when the VFI is registered */
2924         spin_lock_irq(shost->host_lock);
2925         vport->vpi_state |= LPFC_VPI_REGISTERED;
2926         vport->fc_flag |= FC_VFI_REGISTERED;
2927         vport->fc_flag &= ~FC_VPORT_NEEDS_REG_VPI;
2928         vport->fc_flag &= ~FC_VPORT_NEEDS_INIT_VPI;
2929         spin_unlock_irq(shost->host_lock);
2930
2931         /* In case SLI4 FC loopback test, we are ready */
2932         if ((phba->sli_rev == LPFC_SLI_REV4) &&
2933             (phba->link_flag & LS_LOOPBACK_MODE)) {
2934                 phba->link_state = LPFC_HBA_READY;
2935                 goto out_free_mem;
2936         }
2937
2938         lpfc_printf_vlog(vport, KERN_INFO, LOG_SLI,
2939                          "3313 cmpl reg vfi  port_state:%x fc_flag:%x myDid:%x "
2940                          "alpacnt:%d LinkState:%x topology:%x\n",
2941                          vport->port_state, vport->fc_flag, vport->fc_myDID,
2942                          vport->phba->alpa_map[0],
2943                          phba->link_state, phba->fc_topology);
2944
2945         if (vport->port_state == LPFC_FABRIC_CFG_LINK) {
2946                 /*
2947                  * For private loop or for NPort pt2pt,
2948                  * just start discovery and we are done.
2949                  */
2950                 if ((vport->fc_flag & FC_PT2PT) ||
2951                     ((phba->fc_topology == LPFC_TOPOLOGY_LOOP) &&
2952                     !(vport->fc_flag & FC_PUBLIC_LOOP))) {
2953
2954                         /* Use loop map to make discovery list */
2955                         lpfc_disc_list_loopmap(vport);
2956                         /* Start discovery */
2957                         if (vport->fc_flag & FC_PT2PT)
2958                                 vport->port_state = LPFC_VPORT_READY;
2959                         else
2960                                 lpfc_disc_start(vport);
2961                 } else {
2962                         lpfc_start_fdiscs(phba);
2963                         lpfc_do_scr_ns_plogi(phba, vport);
2964                 }
2965         }
2966
2967 out_free_mem:
2968         mempool_free(mboxq, phba->mbox_mem_pool);
2969         lpfc_mbuf_free(phba, dmabuf->virt, dmabuf->phys);
2970         kfree(dmabuf);
2971         return;
2972 }
2973
2974 static void
2975 lpfc_mbx_cmpl_read_sparam(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
2976 {
2977         MAILBOX_t *mb = &pmb->u.mb;
2978         struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) pmb->context1;
2979         struct lpfc_vport  *vport = pmb->vport;
2980
2981
2982         /* Check for error */
2983         if (mb->mbxStatus) {
2984                 /* READ_SPARAM mbox error <mbxStatus> state <hba_state> */
2985                 lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
2986                                  "0319 READ_SPARAM mbxStatus error x%x "
2987                                  "hba state x%x>\n",
2988                                  mb->mbxStatus, vport->port_state);
2989                 lpfc_linkdown(phba);
2990                 goto out;
2991         }
2992
2993         memcpy((uint8_t *) &vport->fc_sparam, (uint8_t *) mp->virt,
2994                sizeof (struct serv_parm));
2995         lpfc_update_vport_wwn(vport);
2996         if (vport->port_type == LPFC_PHYSICAL_PORT) {
2997                 memcpy(&phba->wwnn, &vport->fc_nodename, sizeof(phba->wwnn));
2998                 memcpy(&phba->wwpn, &vport->fc_portname, sizeof(phba->wwnn));
2999         }
3000
3001         lpfc_mbuf_free(phba, mp->virt, mp->phys);
3002         kfree(mp);
3003         mempool_free(pmb, phba->mbox_mem_pool);
3004         return;
3005
3006 out:
3007         pmb->context1 = NULL;
3008         lpfc_mbuf_free(phba, mp->virt, mp->phys);
3009         kfree(mp);
3010         lpfc_issue_clear_la(phba, vport);
3011         mempool_free(pmb, phba->mbox_mem_pool);
3012         return;
3013 }
3014
3015 static void
3016 lpfc_mbx_process_link_up(struct lpfc_hba *phba, struct lpfc_mbx_read_top *la)
3017 {
3018         struct lpfc_vport *vport = phba->pport;
3019         LPFC_MBOXQ_t *sparam_mbox, *cfglink_mbox = NULL;
3020         struct Scsi_Host *shost;
3021         int i;
3022         struct lpfc_dmabuf *mp;
3023         int rc;
3024         struct fcf_record *fcf_record;
3025         uint32_t fc_flags = 0;
3026
3027         spin_lock_irq(&phba->hbalock);
3028         switch (bf_get(lpfc_mbx_read_top_link_spd, la)) {
3029         case LPFC_LINK_SPEED_1GHZ:
3030         case LPFC_LINK_SPEED_2GHZ:
3031         case LPFC_LINK_SPEED_4GHZ:
3032         case LPFC_LINK_SPEED_8GHZ:
3033         case LPFC_LINK_SPEED_10GHZ:
3034         case LPFC_LINK_SPEED_16GHZ:
3035                 phba->fc_linkspeed = bf_get(lpfc_mbx_read_top_link_spd, la);
3036                 break;
3037         default:
3038                 phba->fc_linkspeed = LPFC_LINK_SPEED_UNKNOWN;
3039                 break;
3040         }
3041
3042         if (phba->fc_topology &&
3043             phba->fc_topology != bf_get(lpfc_mbx_read_top_topology, la)) {
3044                 lpfc_printf_log(phba, KERN_WARNING, LOG_SLI,
3045                                 "3314 Toplogy changed was 0x%x is 0x%x\n",
3046                                 phba->fc_topology,
3047                                 bf_get(lpfc_mbx_read_top_topology, la));
3048                 phba->fc_topology_changed = 1;
3049         }
3050
3051         phba->fc_topology = bf_get(lpfc_mbx_read_top_topology, la);
3052         phba->link_flag &= ~LS_NPIV_FAB_SUPPORTED;
3053
3054         shost = lpfc_shost_from_vport(vport);
3055         if (phba->fc_topology == LPFC_TOPOLOGY_LOOP) {
3056                 phba->sli3_options &= ~LPFC_SLI3_NPIV_ENABLED;
3057
3058                 /* if npiv is enabled and this adapter supports npiv log
3059                  * a message that npiv is not supported in this topology
3060                  */
3061                 if (phba->cfg_enable_npiv && phba->max_vpi)
3062                         lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
3063                                 "1309 Link Up Event npiv not supported in loop "
3064                                 "topology\n");
3065                                 /* Get Loop Map information */
3066                 if (bf_get(lpfc_mbx_read_top_il, la))
3067                         fc_flags |= FC_LBIT;
3068
3069                 vport->fc_myDID = bf_get(lpfc_mbx_read_top_alpa_granted, la);
3070                 i = la->lilpBde64.tus.f.bdeSize;
3071
3072                 if (i == 0) {
3073                         phba->alpa_map[0] = 0;
3074                 } else {
3075                         if (vport->cfg_log_verbose & LOG_LINK_EVENT) {
3076                                 int numalpa, j, k;
3077                                 union {
3078                                         uint8_t pamap[16];
3079                                         struct {
3080                                                 uint32_t wd1;
3081                                                 uint32_t wd2;
3082                                                 uint32_t wd3;
3083                                                 uint32_t wd4;
3084                                         } pa;
3085                                 } un;
3086                                 numalpa = phba->alpa_map[0];
3087                                 j = 0;
3088                                 while (j < numalpa) {
3089                                         memset(un.pamap, 0, 16);
3090                                         for (k = 1; j < numalpa; k++) {
3091                                                 un.pamap[k - 1] =
3092                                                         phba->alpa_map[j + 1];
3093                                                 j++;
3094                                                 if (k == 16)
3095                                                         break;
3096                                         }
3097                                         /* Link Up Event ALPA map */
3098                                         lpfc_printf_log(phba,
3099                                                         KERN_WARNING,
3100                                                         LOG_LINK_EVENT,
3101                                                         "1304 Link Up Event "
3102                                                         "ALPA map Data: x%x "
3103                                                         "x%x x%x x%x\n",
3104                                                         un.pa.wd1, un.pa.wd2,
3105                                                         un.pa.wd3, un.pa.wd4);
3106                                 }
3107                         }
3108                 }
3109         } else {
3110                 if (!(phba->sli3_options & LPFC_SLI3_NPIV_ENABLED)) {
3111                         if (phba->max_vpi && phba->cfg_enable_npiv &&
3112                            (phba->sli_rev >= LPFC_SLI_REV3))
3113                                 phba->sli3_options |= LPFC_SLI3_NPIV_ENABLED;
3114                 }
3115                 vport->fc_myDID = phba->fc_pref_DID;
3116                 fc_flags |= FC_LBIT;
3117         }
3118         spin_unlock_irq(&phba->hbalock);
3119
3120         if (fc_flags) {
3121                 spin_lock_irq(shost->host_lock);
3122                 vport->fc_flag |= fc_flags;
3123                 spin_unlock_irq(shost->host_lock);
3124         }
3125
3126         lpfc_linkup(phba);
3127         sparam_mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
3128         if (!sparam_mbox)
3129                 goto out;
3130
3131         rc = lpfc_read_sparam(phba, sparam_mbox, 0);
3132         if (rc) {
3133                 mempool_free(sparam_mbox, phba->mbox_mem_pool);
3134                 goto out;
3135         }
3136         sparam_mbox->vport = vport;
3137         sparam_mbox->mbox_cmpl = lpfc_mbx_cmpl_read_sparam;
3138         rc = lpfc_sli_issue_mbox(phba, sparam_mbox, MBX_NOWAIT);
3139         if (rc == MBX_NOT_FINISHED) {
3140                 mp = (struct lpfc_dmabuf *) sparam_mbox->context1;
3141                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
3142                 kfree(mp);
3143                 mempool_free(sparam_mbox, phba->mbox_mem_pool);
3144                 goto out;
3145         }
3146
3147         if (!(phba->hba_flag & HBA_FCOE_MODE)) {
3148                 cfglink_mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
3149                 if (!cfglink_mbox)
3150                         goto out;
3151                 vport->port_state = LPFC_LOCAL_CFG_LINK;
3152                 lpfc_config_link(phba, cfglink_mbox);
3153                 cfglink_mbox->vport = vport;
3154                 cfglink_mbox->mbox_cmpl = lpfc_mbx_cmpl_local_config_link;
3155                 rc = lpfc_sli_issue_mbox(phba, cfglink_mbox, MBX_NOWAIT);
3156                 if (rc == MBX_NOT_FINISHED) {
3157                         mempool_free(cfglink_mbox, phba->mbox_mem_pool);
3158                         goto out;
3159                 }
3160         } else {
3161                 vport->port_state = LPFC_VPORT_UNKNOWN;
3162                 /*
3163                  * Add the driver's default FCF record at FCF index 0 now. This
3164                  * is phase 1 implementation that support FCF index 0 and driver
3165                  * defaults.
3166                  */
3167                 if (!(phba->hba_flag & HBA_FIP_SUPPORT)) {
3168                         fcf_record = kzalloc(sizeof(struct fcf_record),
3169                                         GFP_KERNEL);
3170                         if (unlikely(!fcf_record)) {
3171                                 lpfc_printf_log(phba, KERN_ERR,
3172                                         LOG_MBOX | LOG_SLI,
3173                                         "2554 Could not allocate memory for "
3174                                         "fcf record\n");
3175                                 rc = -ENODEV;
3176                                 goto out;
3177                         }
3178
3179                         lpfc_sli4_build_dflt_fcf_record(phba, fcf_record,
3180                                                 LPFC_FCOE_FCF_DEF_INDEX);
3181                         rc = lpfc_sli4_add_fcf_record(phba, fcf_record);
3182                         if (unlikely(rc)) {
3183                                 lpfc_printf_log(phba, KERN_ERR,
3184                                         LOG_MBOX | LOG_SLI,
3185                                         "2013 Could not manually add FCF "
3186                                         "record 0, status %d\n", rc);
3187                                 rc = -ENODEV;
3188                                 kfree(fcf_record);
3189                                 goto out;
3190                         }
3191                         kfree(fcf_record);
3192                 }
3193                 /*
3194                  * The driver is expected to do FIP/FCF. Call the port
3195                  * and get the FCF Table.
3196                  */
3197                 spin_lock_irq(&phba->hbalock);
3198                 if (phba->hba_flag & FCF_TS_INPROG) {
3199                         spin_unlock_irq(&phba->hbalock);
3200                         return;
3201                 }
3202                 /* This is the initial FCF discovery scan */
3203                 phba->fcf.fcf_flag |= FCF_INIT_DISC;
3204                 spin_unlock_irq(&phba->hbalock);
3205                 lpfc_printf_log(phba, KERN_INFO, LOG_FIP | LOG_DISCOVERY,
3206                                 "2778 Start FCF table scan at linkup\n");
3207                 rc = lpfc_sli4_fcf_scan_read_fcf_rec(phba,
3208                                                      LPFC_FCOE_FCF_GET_FIRST);
3209                 if (rc) {
3210                         spin_lock_irq(&phba->hbalock);
3211                         phba->fcf.fcf_flag &= ~FCF_INIT_DISC;
3212                         spin_unlock_irq(&phba->hbalock);
3213                         goto out;
3214                 }
3215                 /* Reset FCF roundrobin bmask for new discovery */
3216                 lpfc_sli4_clear_fcf_rr_bmask(phba);
3217         }
3218
3219         return;
3220 out:
3221         lpfc_vport_set_state(vport, FC_VPORT_FAILED);
3222         lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
3223                          "0263 Discovery Mailbox error: state: 0x%x : %p %p\n",
3224                          vport->port_state, sparam_mbox, cfglink_mbox);
3225         lpfc_issue_clear_la(phba, vport);
3226         return;
3227 }
3228
3229 static void
3230 lpfc_enable_la(struct lpfc_hba *phba)
3231 {
3232         uint32_t control;
3233         struct lpfc_sli *psli = &phba->sli;
3234         spin_lock_irq(&phba->hbalock);
3235         psli->sli_flag |= LPFC_PROCESS_LA;
3236         if (phba->sli_rev <= LPFC_SLI_REV3) {
3237                 control = readl(phba->HCregaddr);
3238                 control |= HC_LAINT_ENA;
3239                 writel(control, phba->HCregaddr);
3240                 readl(phba->HCregaddr); /* flush */
3241         }
3242         spin_unlock_irq(&phba->hbalock);
3243 }
3244
3245 static void
3246 lpfc_mbx_issue_link_down(struct lpfc_hba *phba)
3247 {
3248         lpfc_linkdown(phba);
3249         lpfc_enable_la(phba);
3250         lpfc_unregister_unused_fcf(phba);
3251         /* turn on Link Attention interrupts - no CLEAR_LA needed */
3252 }
3253
3254
3255 /*
3256  * This routine handles processing a READ_TOPOLOGY mailbox
3257  * command upon completion. It is setup in the LPFC_MBOXQ
3258  * as the completion routine when the command is
3259  * handed off to the SLI layer.
3260  */
3261 void
3262 lpfc_mbx_cmpl_read_topology(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
3263 {
3264         struct lpfc_vport *vport = pmb->vport;
3265         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
3266         struct lpfc_mbx_read_top *la;
3267         MAILBOX_t *mb = &pmb->u.mb;
3268         struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) (pmb->context1);
3269
3270         /* Unblock ELS traffic */
3271         phba->sli.ring[LPFC_ELS_RING].flag &= ~LPFC_STOP_IOCB_EVENT;
3272         /* Check for error */
3273         if (mb->mbxStatus) {
3274                 lpfc_printf_log(phba, KERN_INFO, LOG_LINK_EVENT,
3275                                 "1307 READ_LA mbox error x%x state x%x\n",
3276                                 mb->mbxStatus, vport->port_state);
3277                 lpfc_mbx_issue_link_down(phba);
3278                 phba->link_state = LPFC_HBA_ERROR;
3279                 goto lpfc_mbx_cmpl_read_topology_free_mbuf;
3280         }
3281
3282         la = (struct lpfc_mbx_read_top *) &pmb->u.mb.un.varReadTop;
3283
3284         memcpy(&phba->alpa_map[0], mp->virt, 128);
3285
3286         spin_lock_irq(shost->host_lock);
3287         if (bf_get(lpfc_mbx_read_top_pb, la))
3288                 vport->fc_flag |= FC_BYPASSED_MODE;
3289         else
3290                 vport->fc_flag &= ~FC_BYPASSED_MODE;
3291         spin_unlock_irq(shost->host_lock);
3292
3293         if (phba->fc_eventTag <= la->eventTag) {
3294                 phba->fc_stat.LinkMultiEvent++;
3295                 if (bf_get(lpfc_mbx_read_top_att_type, la) == LPFC_ATT_LINK_UP)
3296                         if (phba->fc_eventTag != 0)
3297                                 lpfc_linkdown(phba);
3298         }
3299
3300         phba->fc_eventTag = la->eventTag;
3301         if (phba->sli_rev < LPFC_SLI_REV4) {
3302                 spin_lock_irq(&phba->hbalock);
3303                 if (bf_get(lpfc_mbx_read_top_mm, la))
3304                         phba->sli.sli_flag |= LPFC_MENLO_MAINT;
3305                 else
3306                         phba->sli.sli_flag &= ~LPFC_MENLO_MAINT;
3307                 spin_unlock_irq(&phba->hbalock);
3308         }
3309
3310         phba->link_events++;
3311         if ((bf_get(lpfc_mbx_read_top_att_type, la) == LPFC_ATT_LINK_UP) &&
3312             !(phba->sli.sli_flag & LPFC_MENLO_MAINT)) {
3313                 phba->fc_stat.LinkUp++;
3314                 if (phba->link_flag & LS_LOOPBACK_MODE) {
3315                         lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
3316                                         "1306 Link Up Event in loop back mode "
3317                                         "x%x received Data: x%x x%x x%x x%x\n",
3318                                         la->eventTag, phba->fc_eventTag,
3319                                         bf_get(lpfc_mbx_read_top_alpa_granted,
3320                                                la),
3321                                         bf_get(lpfc_mbx_read_top_link_spd, la),
3322                                         phba->alpa_map[0]);
3323                 } else {
3324                         lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
3325                                         "1303 Link Up Event x%x received "
3326                                         "Data: x%x x%x x%x x%x x%x x%x %d\n",
3327                                         la->eventTag, phba->fc_eventTag,
3328                                         bf_get(lpfc_mbx_read_top_alpa_granted,
3329                                                la),
3330                                         bf_get(lpfc_mbx_read_top_link_spd, la),
3331                                         phba->alpa_map[0],
3332                                         bf_get(lpfc_mbx_read_top_mm, la),
3333                                         bf_get(lpfc_mbx_read_top_fa, la),
3334                                         phba->wait_4_mlo_maint_flg);
3335                 }
3336                 lpfc_mbx_process_link_up(phba, la);
3337         } else if (bf_get(lpfc_mbx_read_top_att_type, la) ==
3338                    LPFC_ATT_LINK_DOWN) {
3339                 phba->fc_stat.LinkDown++;
3340                 if (phba->link_flag & LS_LOOPBACK_MODE)
3341                         lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
3342                                 "1308 Link Down Event in loop back mode "
3343                                 "x%x received "
3344                                 "Data: x%x x%x x%x\n",
3345                                 la->eventTag, phba->fc_eventTag,
3346                                 phba->pport->port_state, vport->fc_flag);
3347                 else
3348                         lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
3349                                 "1305 Link Down Event x%x received "
3350                                 "Data: x%x x%x x%x x%x x%x\n",
3351                                 la->eventTag, phba->fc_eventTag,
3352                                 phba->pport->port_state, vport->fc_flag,
3353                                 bf_get(lpfc_mbx_read_top_mm, la),
3354                                 bf_get(lpfc_mbx_read_top_fa, la));
3355                 lpfc_mbx_issue_link_down(phba);
3356         }
3357         if ((phba->sli.sli_flag & LPFC_MENLO_MAINT) &&
3358             ((bf_get(lpfc_mbx_read_top_att_type, la) == LPFC_ATT_LINK_UP))) {
3359                 if (phba->link_state != LPFC_LINK_DOWN) {
3360                         phba->fc_stat.LinkDown++;
3361                         lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
3362                                 "1312 Link Down Event x%x received "
3363                                 "Data: x%x x%x x%x\n",
3364                                 la->eventTag, phba->fc_eventTag,
3365                                 phba->pport->port_state, vport->fc_flag);
3366                         lpfc_mbx_issue_link_down(phba);
3367                 } else
3368                         lpfc_enable_la(phba);
3369
3370                 lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
3371                                 "1310 Menlo Maint Mode Link up Event x%x rcvd "
3372                                 "Data: x%x x%x x%x\n",
3373                                 la->eventTag, phba->fc_eventTag,
3374                                 phba->pport->port_state, vport->fc_flag);
3375                 /*
3376                  * The cmnd that triggered this will be waiting for this
3377                  * signal.
3378                  */
3379                 /* WAKEUP for MENLO_SET_MODE or MENLO_RESET command. */
3380                 if (phba->wait_4_mlo_maint_flg) {
3381                         phba->wait_4_mlo_maint_flg = 0;
3382                         wake_up_interruptible(&phba->wait_4_mlo_m_q);
3383                 }
3384         }
3385
3386         if ((phba->sli_rev < LPFC_SLI_REV4) &&
3387             bf_get(lpfc_mbx_read_top_fa, la)) {
3388                 if (phba->sli.sli_flag & LPFC_MENLO_MAINT)
3389                         lpfc_issue_clear_la(phba, vport);
3390                 lpfc_printf_log(phba, KERN_INFO, LOG_LINK_EVENT,
3391                                 "1311 fa %d\n",
3392                                 bf_get(lpfc_mbx_read_top_fa, la));
3393         }
3394
3395 lpfc_mbx_cmpl_read_topology_free_mbuf:
3396         lpfc_mbuf_free(phba, mp->virt, mp->phys);
3397         kfree(mp);
3398         mempool_free(pmb, phba->mbox_mem_pool);
3399         return;
3400 }
3401
3402 /*
3403  * This routine handles processing a REG_LOGIN mailbox
3404  * command upon completion. It is setup in the LPFC_MBOXQ
3405  * as the completion routine when the command is
3406  * handed off to the SLI layer.
3407  */
3408 void
3409 lpfc_mbx_cmpl_reg_login(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
3410 {
3411         struct lpfc_vport  *vport = pmb->vport;
3412         struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) (pmb->context1);
3413         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) pmb->context2;
3414         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
3415
3416         pmb->context1 = NULL;
3417         pmb->context2 = NULL;
3418
3419         lpfc_printf_vlog(vport, KERN_INFO, LOG_SLI,
3420                          "0002 rpi:%x DID:%x flg:%x %d map:%x %p\n",
3421                          ndlp->nlp_rpi, ndlp->nlp_DID, ndlp->nlp_flag,
3422                          atomic_read(&ndlp->kref.refcount),
3423                          ndlp->nlp_usg_map, ndlp);
3424         if (ndlp->nlp_flag & NLP_REG_LOGIN_SEND)
3425                 ndlp->nlp_flag &= ~NLP_REG_LOGIN_SEND;
3426
3427         if (ndlp->nlp_flag & NLP_IGNR_REG_CMPL ||
3428             ndlp->nlp_state != NLP_STE_REG_LOGIN_ISSUE) {
3429                 /* We rcvd a rscn after issuing this
3430                  * mbox reg login, we may have cycled
3431                  * back through the state and be
3432                  * back at reg login state so this
3433                  * mbox needs to be ignored becase
3434                  * there is another reg login in
3435                  * process.
3436                  */
3437                 spin_lock_irq(shost->host_lock);
3438                 ndlp->nlp_flag &= ~NLP_IGNR_REG_CMPL;
3439                 spin_unlock_irq(shost->host_lock);
3440         } else
3441                 /* Good status, call state machine */
3442                 lpfc_disc_state_machine(vport, ndlp, pmb,
3443                                 NLP_EVT_CMPL_REG_LOGIN);
3444
3445         lpfc_mbuf_free(phba, mp->virt, mp->phys);
3446         kfree(mp);
3447         mempool_free(pmb, phba->mbox_mem_pool);
3448         /* decrement the node reference count held for this callback
3449          * function.
3450          */
3451         lpfc_nlp_put(ndlp);
3452
3453         return;
3454 }
3455
3456 static void
3457 lpfc_mbx_cmpl_unreg_vpi(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
3458 {
3459         MAILBOX_t *mb = &pmb->u.mb;
3460         struct lpfc_vport *vport = pmb->vport;
3461         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
3462
3463         switch (mb->mbxStatus) {
3464         case 0x0011:
3465         case 0x0020:
3466                 lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
3467                                  "0911 cmpl_unreg_vpi, mb status = 0x%x\n",
3468                                  mb->mbxStatus);
3469                 break;
3470         /* If VPI is busy, reset the HBA */
3471         case 0x9700:
3472                 lpfc_printf_vlog(vport, KERN_ERR, LOG_NODE,
3473                         "2798 Unreg_vpi failed vpi 0x%x, mb status = 0x%x\n",
3474                         vport->vpi, mb->mbxStatus);
3475                 if (!(phba->pport->load_flag & FC_UNLOADING))
3476                         lpfc_workq_post_event(phba, NULL, NULL,
3477                                 LPFC_EVT_RESET_HBA);
3478         }
3479         spin_lock_irq(shost->host_lock);
3480         vport->vpi_state &= ~LPFC_VPI_REGISTERED;
3481         vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
3482         spin_unlock_irq(shost->host_lock);
3483         vport->unreg_vpi_cmpl = VPORT_OK;
3484         mempool_free(pmb, phba->mbox_mem_pool);
3485         lpfc_cleanup_vports_rrqs(vport, NULL);
3486         /*
3487          * This shost reference might have been taken at the beginning of
3488          * lpfc_vport_delete()
3489          */
3490         if ((vport->load_flag & FC_UNLOADING) && (vport != phba->pport))
3491                 scsi_host_put(shost);
3492 }
3493
3494 int
3495 lpfc_mbx_unreg_vpi(struct lpfc_vport *vport)
3496 {
3497         struct lpfc_hba  *phba = vport->phba;
3498         LPFC_MBOXQ_t *mbox;
3499         int rc;
3500
3501         mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
3502         if (!mbox)
3503                 return 1;
3504
3505         lpfc_unreg_vpi(phba, vport->vpi, mbox);
3506         mbox->vport = vport;
3507         mbox->mbox_cmpl = lpfc_mbx_cmpl_unreg_vpi;
3508         rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
3509         if (rc == MBX_NOT_FINISHED) {
3510                 lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX | LOG_VPORT,
3511                                  "1800 Could not issue unreg_vpi\n");
3512                 mempool_free(mbox, phba->mbox_mem_pool);
3513                 vport->unreg_vpi_cmpl = VPORT_ERROR;
3514                 return rc;
3515         }
3516         return 0;
3517 }
3518
3519 static void
3520 lpfc_mbx_cmpl_reg_vpi(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
3521 {
3522         struct lpfc_vport *vport = pmb->vport;
3523         struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
3524         MAILBOX_t *mb = &pmb->u.mb;
3525
3526         switch (mb->mbxStatus) {
3527         case 0x0011:
3528         case 0x9601:
3529         case 0x9602:
3530                 lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
3531                                  "0912 cmpl_reg_vpi, mb status = 0x%x\n",
3532                                  mb->mbxStatus);
3533                 lpfc_vport_set_state(vport, FC_VPORT_FAILED);
3534                 spin_lock_irq(shost->host_lock);
3535                 vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
3536                 spin_unlock_irq(shost->host_lock);
3537                 vport->fc_myDID = 0;
3538                 goto out;
3539         }
3540
3541         spin_lock_irq(shost->host_lock);
3542         vport->vpi_state |= LPFC_VPI_REGISTERED;
3543         vport->fc_flag &= ~FC_VPORT_NEEDS_REG_VPI;
3544         spin_unlock_irq(shost->host_lock);
3545         vport->num_disc_nodes = 0;
3546         /* go thru NPR list and issue ELS PLOGIs */
3547         if (vport->fc_npr_cnt)
3548                 lpfc_els_disc_plogi(vport);
3549
3550         if (!vport->num_disc_nodes) {
3551                 spin_lock_irq(shost->host_lock);
3552                 vport->fc_flag &= ~FC_NDISC_ACTIVE;
3553                 spin_unlock_irq(shost->host_lock);
3554                 lpfc_can_disctmo(vport);
3555         }
3556         vport->port_state = LPFC_VPORT_READY;
3557
3558 out:
3559         mempool_free(pmb, phba->mbox_mem_pool);
3560         return;
3561 }
3562
3563 /**
3564  * lpfc_create_static_vport - Read HBA config region to create static vports.
3565  * @phba: pointer to lpfc hba data structure.
3566  *
3567  * This routine issue a DUMP mailbox command for config region 22 to get
3568  * the list of static vports to be created. The function create vports
3569  * based on the information returned from the HBA.
3570  **/
3571 void
3572 lpfc_create_static_vport(struct lpfc_hba *phba)
3573 {
3574         LPFC_MBOXQ_t *pmb = NULL;
3575         MAILBOX_t *mb;
3576         struct static_vport_info *vport_info;
3577         int mbx_wait_rc = 0, i;
3578         struct fc_vport_identifiers vport_id;
3579         struct fc_vport *new_fc_vport;
3580         struct Scsi_Host *shost;
3581         struct lpfc_vport *vport;
3582         uint16_t offset = 0;
3583         uint8_t *vport_buff;
3584         struct lpfc_dmabuf *mp;
3585         uint32_t byte_count = 0;
3586
3587         pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
3588         if (!pmb) {
3589                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
3590                                 "0542 lpfc_create_static_vport failed to"
3591                                 " allocate mailbox memory\n");
3592                 return;
3593         }
3594         memset(pmb, 0, sizeof(LPFC_MBOXQ_t));
3595         mb = &pmb->u.mb;
3596
3597         vport_info = kzalloc(sizeof(struct static_vport_info), GFP_KERNEL);
3598         if (!vport_info) {
3599                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
3600                                 "0543 lpfc_create_static_vport failed to"
3601                                 " allocate vport_info\n");
3602                 mempool_free(pmb, phba->mbox_mem_pool);
3603                 return;
3604         }
3605
3606         vport_buff = (uint8_t *) vport_info;
3607         do {
3608                 /* free dma buffer from previous round */
3609                 if (pmb->context1) {
3610                         mp = (struct lpfc_dmabuf *)pmb->context1;
3611                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
3612                         kfree(mp);
3613                 }
3614                 if (lpfc_dump_static_vport(phba, pmb, offset))
3615                         goto out;
3616
3617                 pmb->vport = phba->pport;
3618                 mbx_wait_rc = lpfc_sli_issue_mbox_wait(phba, pmb,
3619                                                         LPFC_MBOX_TMO);
3620
3621                 if ((mbx_wait_rc != MBX_SUCCESS) || mb->mbxStatus) {
3622                         lpfc_printf_log(phba, KERN_WARNING, LOG_INIT,
3623                                 "0544 lpfc_create_static_vport failed to"
3624                                 " issue dump mailbox command ret 0x%x "
3625                                 "status 0x%x\n",
3626                                 mbx_wait_rc, mb->mbxStatus);
3627                         goto out;
3628                 }
3629
3630                 if (phba->sli_rev == LPFC_SLI_REV4) {
3631                         byte_count = pmb->u.mqe.un.mb_words[5];
3632                         mp = (struct lpfc_dmabuf *)pmb->context1;
3633                         if (byte_count > sizeof(struct static_vport_info) -
3634                                         offset)
3635                                 byte_count = sizeof(struct static_vport_info)
3636                                         - offset;
3637                         memcpy(vport_buff + offset, mp->virt, byte_count);
3638                         offset += byte_count;
3639                 } else {
3640                         if (mb->un.varDmp.word_cnt >
3641                                 sizeof(struct static_vport_info) - offset)
3642                                 mb->un.varDmp.word_cnt =
3643                                         sizeof(struct static_vport_info)
3644                                                 - offset;
3645                         byte_count = mb->un.varDmp.word_cnt;
3646                         lpfc_sli_pcimem_bcopy(((uint8_t *)mb) + DMP_RSP_OFFSET,
3647                                 vport_buff + offset,
3648                                 byte_count);
3649
3650                         offset += byte_count;
3651                 }
3652
3653         } while (byte_count &&
3654                 offset < sizeof(struct static_vport_info));
3655
3656
3657         if ((le32_to_cpu(vport_info->signature) != VPORT_INFO_SIG) ||
3658                 ((le32_to_cpu(vport_info->rev) & VPORT_INFO_REV_MASK)
3659                         != VPORT_INFO_REV)) {
3660                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
3661                         "0545 lpfc_create_static_vport bad"
3662                         " information header 0x%x 0x%x\n",
3663                         le32_to_cpu(vport_info->signature),
3664                         le32_to_cpu(vport_info->rev) & VPORT_INFO_REV_MASK);
3665
3666                 goto out;
3667         }
3668
3669         shost = lpfc_shost_from_vport(phba->pport);
3670
3671         for (i = 0; i < MAX_STATIC_VPORT_COUNT; i++) {
3672                 memset(&vport_id, 0, sizeof(vport_id));
3673                 vport_id.port_name = wwn_to_u64(vport_info->vport_list[i].wwpn);
3674                 vport_id.node_name = wwn_to_u64(vport_info->vport_list[i].wwnn);
3675                 if (!vport_id.port_name || !vport_id.node_name)
3676                         continue;
3677
3678                 vport_id.roles = FC_PORT_ROLE_FCP_INITIATOR;
3679                 vport_id.vport_type = FC_PORTTYPE_NPIV;
3680                 vport_id.disable = false;
3681                 new_fc_vport = fc_vport_create(shost, 0, &vport_id);
3682
3683                 if (!new_fc_vport) {
3684                         lpfc_printf_log(phba, KERN_WARNING, LOG_INIT,
3685                                 "0546 lpfc_create_static_vport failed to"
3686                                 " create vport\n");
3687                         continue;
3688                 }
3689
3690                 vport = *(struct lpfc_vport **)new_fc_vport->dd_data;
3691                 vport->vport_flag |= STATIC_VPORT;
3692         }
3693
3694 out:
3695         kfree(vport_info);
3696         if (mbx_wait_rc != MBX_TIMEOUT) {
3697                 if (pmb->context1) {
3698                         mp = (struct lpfc_dmabuf *)pmb->context1;
3699                         lpfc_mbuf_free(phba, mp->virt, mp->phys);
3700                         kfree(mp);
3701                 }
3702                 mempool_free(pmb, phba->mbox_mem_pool);
3703         }
3704
3705         return;
3706 }
3707
3708 /*
3709  * This routine handles processing a Fabric REG_LOGIN mailbox
3710  * command upon completion. It is setup in the LPFC_MBOXQ
3711  * as the completion routine when the command is
3712  * handed off to the SLI layer.
3713  */
3714 void
3715 lpfc_mbx_cmpl_fabric_reg_login(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
3716 {
3717         struct lpfc_vport *vport = pmb->vport;
3718         MAILBOX_t *mb = &pmb->u.mb;
3719         struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) (pmb->context1);
3720         struct lpfc_nodelist *ndlp;
3721         struct Scsi_Host *shost;
3722
3723         ndlp = (struct lpfc_nodelist *) pmb->context2;
3724         pmb->context1 = NULL;
3725         pmb->context2 = NULL;
3726
3727         if (mb->mbxStatus) {
3728                 lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
3729                                  "0258 Register Fabric login error: 0x%x\n",
3730                                  mb->mbxStatus);
3731                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
3732                 kfree(mp);
3733                 mempool_free(pmb, phba->mbox_mem_pool);
3734
3735                 if (phba->fc_topology == LPFC_TOPOLOGY_LOOP) {
3736                         /* FLOGI failed, use loop map to make discovery list */
3737                         lpfc_disc_list_loopmap(vport);
3738
3739                         /* Start discovery */
3740                         lpfc_disc_start(vport);
3741                         /* Decrement the reference count to ndlp after the
3742                          * reference to the ndlp are done.
3743                          */
3744                         lpfc_nlp_put(ndlp);
3745                         return;
3746                 }
3747
3748                 lpfc_vport_set_state(vport, FC_VPORT_FAILED);
3749                 /* Decrement the reference count to ndlp after the reference
3750                  * to the ndlp are done.
3751                  */
3752                 lpfc_nlp_put(ndlp);
3753                 return;
3754         }
3755
3756         if (phba->sli_rev < LPFC_SLI_REV4)
3757                 ndlp->nlp_rpi = mb->un.varWords[0];
3758         ndlp->nlp_flag |= NLP_RPI_REGISTERED;
3759         ndlp->nlp_type |= NLP_FABRIC;
3760         lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
3761
3762         if (vport->port_state == LPFC_FABRIC_CFG_LINK) {
3763                 /* when physical port receive logo donot start
3764                  * vport discovery */
3765                 if (!(vport->fc_flag & FC_LOGO_RCVD_DID_CHNG))
3766                         lpfc_start_fdiscs(phba);
3767                 else {
3768                         shost = lpfc_shost_from_vport(vport);
3769                         spin_lock_irq(shost->host_lock);
3770                         vport->fc_flag &= ~FC_LOGO_RCVD_DID_CHNG ;
3771                         spin_unlock_irq(shost->host_lock);
3772                 }
3773                 lpfc_do_scr_ns_plogi(phba, vport);
3774         }
3775
3776         lpfc_mbuf_free(phba, mp->virt, mp->phys);
3777         kfree(mp);
3778         mempool_free(pmb, phba->mbox_mem_pool);
3779
3780         /* Drop the reference count from the mbox at the end after
3781          * all the current reference to the ndlp have been done.
3782          */
3783         lpfc_nlp_put(ndlp);
3784         return;
3785 }
3786
3787 /*
3788  * This routine handles processing a NameServer REG_LOGIN mailbox
3789  * command upon completion. It is setup in the LPFC_MBOXQ
3790  * as the completion routine when the command is
3791  * handed off to the SLI layer.
3792  */
3793 void
3794 lpfc_mbx_cmpl_ns_reg_login(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
3795 {
3796         MAILBOX_t *mb = &pmb->u.mb;
3797         struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) (pmb->context1);
3798         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) pmb->context2;
3799         struct lpfc_vport *vport = pmb->vport;
3800
3801         pmb->context1 = NULL;
3802         pmb->context2 = NULL;
3803
3804         if (mb->mbxStatus) {
3805 out:
3806                 lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
3807                                  "0260 Register NameServer error: 0x%x\n",
3808                                  mb->mbxStatus);
3809                 /* decrement the node reference count held for this
3810                  * callback function.
3811                  */
3812                 lpfc_nlp_put(ndlp);
3813                 lpfc_mbuf_free(phba, mp->virt, mp->phys);
3814                 kfree(mp);
3815                 mempool_free(pmb, phba->mbox_mem_pool);
3816
3817                 /* If no other thread is using the ndlp, free it */
3818                 lpfc_nlp_not_used(ndlp);
3819
3820                 if (phba->fc_topology == LPFC_TOPOLOGY_LOOP) {
3821                         /*
3822                          * RegLogin failed, use loop map to make discovery
3823                          * list
3824                          */
3825                         lpfc_disc_list_loopmap(vport);
3826
3827                         /* Start discovery */
3828                         lpfc_disc_start(vport);
3829                         return;
3830                 }
3831                 lpfc_vport_set_state(vport, FC_VPORT_FAILED);
3832                 return;
3833         }
3834
3835         if (phba->sli_rev < LPFC_SLI_REV4)
3836                 ndlp->nlp_rpi = mb->un.varWords[0];
3837         ndlp->nlp_flag |= NLP_RPI_REGISTERED;
3838         ndlp->nlp_type |= NLP_FABRIC;
3839         lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
3840         lpfc_printf_vlog(vport, KERN_INFO, LOG_SLI,
3841                          "0003 rpi:%x DID:%x flg:%x %d map%x %p\n",
3842                          ndlp->nlp_rpi, ndlp->nlp_DID, ndlp->nlp_flag,
3843                          atomic_read(&ndlp->kref.refcount),
3844                          ndlp->nlp_usg_map, ndlp);
3845
3846         if (vport->port_state < LPFC_VPORT_READY) {
3847                 /* Link up discovery requires Fabric registration. */
3848                 lpfc_ns_cmd(vport, SLI_CTNS_RNN_ID, 0, 0);
3849                 lpfc_ns_cmd(vport, SLI_CTNS_RSNN_NN, 0, 0);
3850                 lpfc_ns_cmd(vport, SLI_CTNS_RSPN_ID, 0, 0);
3851                 lpfc_ns_cmd(vport, SLI_CTNS_RFT_ID, 0, 0);
3852                 lpfc_ns_cmd(vport, SLI_CTNS_RFF_ID, 0, 0);
3853
3854                 /* Issue SCR just before NameServer GID_FT Query */
3855                 lpfc_issue_els_scr(vport, SCR_DID, 0);
3856         }
3857
3858         vport->fc_ns_retry = 0;
3859         /* Good status, issue CT Request to NameServer */
3860         if (lpfc_ns_cmd(vport, SLI_CTNS_GID_FT, 0, 0)) {
3861                 /* Cannot issue NameServer Query, so finish up discovery */
3862                 goto out;
3863         }
3864
3865         /* decrement the node reference count held for this
3866          * callback function.
3867          */
3868         lpfc_nlp_put(ndlp);
3869         lpfc_mbuf_free(phba, mp->virt, mp->phys);
3870         kfree(mp);
3871         mempool_free(pmb, phba->mbox_mem_pool);
3872
3873         return;
3874 }
3875
3876 static void
3877 lpfc_register_remote_port(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
3878 {
3879         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
3880         struct fc_rport  *rport;
3881         struct lpfc_rport_data *rdata;
3882         struct fc_rport_identifiers rport_ids;
3883         struct lpfc_hba  *phba = vport->phba;
3884
3885         /* Remote port has reappeared. Re-register w/ FC transport */
3886         rport_ids.node_name = wwn_to_u64(ndlp->nlp_nodename.u.wwn);
3887         rport_ids.port_name = wwn_to_u64(ndlp->nlp_portname.u.wwn);
3888         rport_ids.port_id = ndlp->nlp_DID;
3889         rport_ids.roles = FC_RPORT_ROLE_UNKNOWN;
3890
3891         /*
3892          * We leave our node pointer in rport->dd_data when we unregister a
3893          * FCP target port.  But fc_remote_port_add zeros the space to which
3894          * rport->dd_data points.  So, if we're reusing a previously
3895          * registered port, drop the reference that we took the last time we
3896          * registered the port.
3897          */
3898         rport = ndlp->rport;
3899         if (rport) {
3900                 rdata = rport->dd_data;
3901                 /* break the link before dropping the ref */
3902                 ndlp->rport = NULL;
3903                 if (rdata && rdata->pnode == ndlp)
3904                         lpfc_nlp_put(ndlp);
3905                 rdata->pnode = NULL;
3906                 /* drop reference for earlier registeration */
3907                 put_device(&rport->dev);
3908         }
3909
3910         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_RPORT,
3911                 "rport add:       did:x%x flg:x%x type x%x",
3912                 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_type);
3913
3914         /* Don't add the remote port if unloading. */
3915         if (vport->load_flag & FC_UNLOADING)
3916                 return;
3917
3918         ndlp->rport = rport = fc_remote_port_add(shost, 0, &rport_ids);
3919         if (!rport || !get_device(&rport->dev)) {
3920                 dev_printk(KERN_WARNING, &phba->pcidev->dev,
3921                            "Warning: fc_remote_port_add failed\n");
3922                 return;
3923         }
3924
3925         /* initialize static port data */
3926         rport->maxframe_size = ndlp->nlp_maxframe;
3927         rport->supported_classes = ndlp->nlp_class_sup;
3928         rdata = rport->dd_data;
3929         rdata->pnode = lpfc_nlp_get(ndlp);
3930
3931         if (ndlp->nlp_type & NLP_FCP_TARGET)
3932                 rport_ids.roles |= FC_RPORT_ROLE_FCP_TARGET;
3933         if (ndlp->nlp_type & NLP_FCP_INITIATOR)
3934                 rport_ids.roles |= FC_RPORT_ROLE_FCP_INITIATOR;
3935
3936         if (rport_ids.roles !=  FC_RPORT_ROLE_UNKNOWN)
3937                 fc_remote_port_rolechg(rport, rport_ids.roles);
3938
3939         lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_NODE,
3940                          "3183 rport register x%06x, rport %p role x%x\n",
3941                          ndlp->nlp_DID, rport, rport_ids.roles);
3942
3943         if ((rport->scsi_target_id != -1) &&
3944             (rport->scsi_target_id < LPFC_MAX_TARGET)) {
3945                 ndlp->nlp_sid = rport->scsi_target_id;
3946         }
3947         return;
3948 }
3949
3950 static void
3951 lpfc_unregister_remote_port(struct lpfc_nodelist *ndlp)
3952 {
3953         struct fc_rport *rport = ndlp->rport;
3954
3955         lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_RPORT,
3956                 "rport delete:    did:x%x flg:x%x type x%x",
3957                 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_type);
3958
3959         lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_NODE,
3960                          "3184 rport unregister x%06x, rport %p\n",
3961                          ndlp->nlp_DID, rport);
3962
3963         fc_remote_port_delete(rport);
3964
3965         return;
3966 }
3967
3968 static void
3969 lpfc_nlp_counters(struct lpfc_vport *vport, int state, int count)
3970 {
3971         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
3972
3973         spin_lock_irq(shost->host_lock);
3974         switch (state) {
3975         case NLP_STE_UNUSED_NODE:
3976                 vport->fc_unused_cnt += count;
3977                 break;
3978         case NLP_STE_PLOGI_ISSUE:
3979                 vport->fc_plogi_cnt += count;
3980                 break;
3981         case NLP_STE_ADISC_ISSUE:
3982                 vport->fc_adisc_cnt += count;
3983                 break;
3984         case NLP_STE_REG_LOGIN_ISSUE:
3985                 vport->fc_reglogin_cnt += count;
3986                 break;
3987         case NLP_STE_PRLI_ISSUE:
3988                 vport->fc_prli_cnt += count;
3989                 break;
3990         case NLP_STE_UNMAPPED_NODE:
3991                 vport->fc_unmap_cnt += count;
3992                 break;
3993         case NLP_STE_MAPPED_NODE:
3994                 vport->fc_map_cnt += count;
3995                 break;
3996         case NLP_STE_NPR_NODE:
3997                 if (vport->fc_npr_cnt == 0 && count == -1)
3998                         vport->fc_npr_cnt = 0;
3999                 else
4000                         vport->fc_npr_cnt += count;
4001                 break;
4002         }
4003         spin_unlock_irq(shost->host_lock);
4004 }
4005
4006 static void
4007 lpfc_nlp_state_cleanup(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
4008                        int old_state, int new_state)
4009 {
4010         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4011
4012         if (new_state == NLP_STE_UNMAPPED_NODE) {
4013                 ndlp->nlp_flag &= ~NLP_NODEV_REMOVE;
4014                 ndlp->nlp_type |= NLP_FC_NODE;
4015         }
4016         if (new_state == NLP_STE_MAPPED_NODE)
4017                 ndlp->nlp_flag &= ~NLP_NODEV_REMOVE;
4018         if (new_state == NLP_STE_NPR_NODE)
4019                 ndlp->nlp_flag &= ~NLP_RCV_PLOGI;
4020
4021         /* Transport interface */
4022         if (ndlp->rport && (old_state == NLP_STE_MAPPED_NODE ||
4023                             old_state == NLP_STE_UNMAPPED_NODE)) {
4024                 vport->phba->nport_event_cnt++;
4025                 lpfc_unregister_remote_port(ndlp);
4026         }
4027
4028         if (new_state ==  NLP_STE_MAPPED_NODE ||
4029             new_state == NLP_STE_UNMAPPED_NODE) {
4030                 vport->phba->nport_event_cnt++;
4031                 /*
4032                  * Tell the fc transport about the port, if we haven't
4033                  * already. If we have, and it's a scsi entity, be
4034                  * sure to unblock any attached scsi devices
4035                  */
4036                 lpfc_register_remote_port(vport, ndlp);
4037         }
4038         if ((new_state ==  NLP_STE_MAPPED_NODE) &&
4039                 (vport->stat_data_enabled)) {
4040                 /*
4041                  * A new target is discovered, if there is no buffer for
4042                  * statistical data collection allocate buffer.
4043                  */
4044                 ndlp->lat_data = kcalloc(LPFC_MAX_BUCKET_COUNT,
4045                                          sizeof(struct lpfc_scsicmd_bkt),
4046                                          GFP_KERNEL);
4047
4048                 if (!ndlp->lat_data)
4049                         lpfc_printf_vlog(vport, KERN_ERR, LOG_NODE,
4050                                 "0286 lpfc_nlp_state_cleanup failed to "
4051                                 "allocate statistical data buffer DID "
4052                                 "0x%x\n", ndlp->nlp_DID);
4053         }
4054         /*
4055          * if we added to Mapped list, but the remote port
4056          * registration failed or assigned a target id outside
4057          * our presentable range - move the node to the
4058          * Unmapped List
4059          */
4060         if (new_state == NLP_STE_MAPPED_NODE &&
4061             (!ndlp->rport ||
4062              ndlp->rport->scsi_target_id == -1 ||
4063              ndlp->rport->scsi_target_id >= LPFC_MAX_TARGET)) {
4064                 spin_lock_irq(shost->host_lock);
4065                 ndlp->nlp_flag |= NLP_TGT_NO_SCSIID;
4066                 spin_unlock_irq(shost->host_lock);
4067                 lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
4068         }
4069 }
4070
4071 static char *
4072 lpfc_nlp_state_name(char *buffer, size_t size, int state)
4073 {
4074         static char *states[] = {
4075                 [NLP_STE_UNUSED_NODE] = "UNUSED",
4076                 [NLP_STE_PLOGI_ISSUE] = "PLOGI",
4077                 [NLP_STE_ADISC_ISSUE] = "ADISC",
4078                 [NLP_STE_REG_LOGIN_ISSUE] = "REGLOGIN",
4079                 [NLP_STE_PRLI_ISSUE] = "PRLI",
4080                 [NLP_STE_LOGO_ISSUE] = "LOGO",
4081                 [NLP_STE_UNMAPPED_NODE] = "UNMAPPED",
4082                 [NLP_STE_MAPPED_NODE] = "MAPPED",
4083                 [NLP_STE_NPR_NODE] = "NPR",
4084         };
4085
4086         if (state < NLP_STE_MAX_STATE && states[state])
4087                 strlcpy(buffer, states[state], size);
4088         else
4089                 snprintf(buffer, size, "unknown (%d)", state);
4090         return buffer;
4091 }
4092
4093 void
4094 lpfc_nlp_set_state(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
4095                    int state)
4096 {
4097         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4098         int  old_state = ndlp->nlp_state;
4099         char name1[16], name2[16];
4100
4101         lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
4102                          "0904 NPort state transition x%06x, %s -> %s\n",
4103                          ndlp->nlp_DID,
4104                          lpfc_nlp_state_name(name1, sizeof(name1), old_state),
4105                          lpfc_nlp_state_name(name2, sizeof(name2), state));
4106
4107         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_NODE,
4108                 "node statechg    did:x%x old:%d ste:%d",
4109                 ndlp->nlp_DID, old_state, state);
4110
4111         if (old_state == NLP_STE_NPR_NODE &&
4112             state != NLP_STE_NPR_NODE)
4113                 lpfc_cancel_retry_delay_tmo(vport, ndlp);
4114         if (old_state == NLP_STE_UNMAPPED_NODE) {
4115                 ndlp->nlp_flag &= ~NLP_TGT_NO_SCSIID;
4116                 ndlp->nlp_type &= ~NLP_FC_NODE;
4117         }
4118
4119         if (list_empty(&ndlp->nlp_listp)) {
4120                 spin_lock_irq(shost->host_lock);
4121                 list_add_tail(&ndlp->nlp_listp, &vport->fc_nodes);
4122                 spin_unlock_irq(shost->host_lock);
4123         } else if (old_state)
4124                 lpfc_nlp_counters(vport, old_state, -1);
4125
4126         ndlp->nlp_state = state;
4127         lpfc_nlp_counters(vport, state, 1);
4128         lpfc_nlp_state_cleanup(vport, ndlp, old_state, state);
4129 }
4130
4131 void
4132 lpfc_enqueue_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
4133 {
4134         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4135
4136         if (list_empty(&ndlp->nlp_listp)) {
4137                 spin_lock_irq(shost->host_lock);
4138                 list_add_tail(&ndlp->nlp_listp, &vport->fc_nodes);
4139                 spin_unlock_irq(shost->host_lock);
4140         }
4141 }
4142
4143 void
4144 lpfc_dequeue_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
4145 {
4146         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4147
4148         lpfc_cancel_retry_delay_tmo(vport, ndlp);
4149         if (ndlp->nlp_state && !list_empty(&ndlp->nlp_listp))
4150                 lpfc_nlp_counters(vport, ndlp->nlp_state, -1);
4151         spin_lock_irq(shost->host_lock);
4152         list_del_init(&ndlp->nlp_listp);
4153         spin_unlock_irq(shost->host_lock);
4154         lpfc_nlp_state_cleanup(vport, ndlp, ndlp->nlp_state,
4155                                 NLP_STE_UNUSED_NODE);
4156 }
4157
4158 static void
4159 lpfc_disable_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
4160 {
4161         lpfc_cancel_retry_delay_tmo(vport, ndlp);
4162         if (ndlp->nlp_state && !list_empty(&ndlp->nlp_listp))
4163                 lpfc_nlp_counters(vport, ndlp->nlp_state, -1);
4164         lpfc_nlp_state_cleanup(vport, ndlp, ndlp->nlp_state,
4165                                 NLP_STE_UNUSED_NODE);
4166 }
4167 /**
4168  * lpfc_initialize_node - Initialize all fields of node object
4169  * @vport: Pointer to Virtual Port object.
4170  * @ndlp: Pointer to FC node object.
4171  * @did: FC_ID of the node.
4172  *
4173  * This function is always called when node object need to be initialized.
4174  * It initializes all the fields of the node object. Although the reference
4175  * to phba from @ndlp can be obtained indirectly through it's reference to
4176  * @vport, a direct reference to phba is taken here by @ndlp. This is due
4177  * to the life-span of the @ndlp might go beyond the existence of @vport as
4178  * the final release of ndlp is determined by its reference count. And, the
4179  * operation on @ndlp needs the reference to phba.
4180  **/
4181 static inline void
4182 lpfc_initialize_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
4183         uint32_t did)
4184 {
4185         INIT_LIST_HEAD(&ndlp->els_retry_evt.evt_listp);
4186         INIT_LIST_HEAD(&ndlp->dev_loss_evt.evt_listp);
4187         init_timer(&ndlp->nlp_delayfunc);
4188         ndlp->nlp_delayfunc.function = lpfc_els_retry_delay;
4189         ndlp->nlp_delayfunc.data = (unsigned long)ndlp;
4190         ndlp->nlp_DID = did;
4191         ndlp->vport = vport;
4192         ndlp->phba = vport->phba;
4193         ndlp->nlp_sid = NLP_NO_SID;
4194         kref_init(&ndlp->kref);
4195         NLP_INT_NODE_ACT(ndlp);
4196         atomic_set(&ndlp->cmd_pending, 0);
4197         ndlp->cmd_qdepth = vport->cfg_tgt_queue_depth;
4198 }
4199
4200 struct lpfc_nodelist *
4201 lpfc_enable_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
4202                  int state)
4203 {
4204         struct lpfc_hba *phba = vport->phba;
4205         uint32_t did;
4206         unsigned long flags;
4207         unsigned long *active_rrqs_xri_bitmap = NULL;
4208
4209         if (!ndlp)
4210                 return NULL;
4211
4212         spin_lock_irqsave(&phba->ndlp_lock, flags);
4213         /* The ndlp should not be in memory free mode */
4214         if (NLP_CHK_FREE_REQ(ndlp)) {
4215                 spin_unlock_irqrestore(&phba->ndlp_lock, flags);
4216                 lpfc_printf_vlog(vport, KERN_WARNING, LOG_NODE,
4217                                 "0277 lpfc_enable_node: ndlp:x%p "
4218                                 "usgmap:x%x refcnt:%d\n",
4219                                 (void *)ndlp, ndlp->nlp_usg_map,
4220                                 atomic_read(&ndlp->kref.refcount));
4221                 return NULL;
4222         }
4223         /* The ndlp should not already be in active mode */
4224         if (NLP_CHK_NODE_ACT(ndlp)) {
4225                 spin_unlock_irqrestore(&phba->ndlp_lock, flags);
4226                 lpfc_printf_vlog(vport, KERN_WARNING, LOG_NODE,
4227                                 "0278 lpfc_enable_node: ndlp:x%p "
4228                                 "usgmap:x%x refcnt:%d\n",
4229                                 (void *)ndlp, ndlp->nlp_usg_map,
4230                                 atomic_read(&ndlp->kref.refcount));
4231                 return NULL;
4232         }
4233
4234         /* Keep the original DID */
4235         did = ndlp->nlp_DID;
4236         if (phba->sli_rev == LPFC_SLI_REV4)
4237                 active_rrqs_xri_bitmap = ndlp->active_rrqs_xri_bitmap;
4238
4239         /* re-initialize ndlp except of ndlp linked list pointer */
4240         memset((((char *)ndlp) + sizeof (struct list_head)), 0,
4241                 sizeof (struct lpfc_nodelist) - sizeof (struct list_head));
4242         lpfc_initialize_node(vport, ndlp, did);
4243
4244         if (phba->sli_rev == LPFC_SLI_REV4)
4245                 ndlp->active_rrqs_xri_bitmap = active_rrqs_xri_bitmap;
4246
4247         spin_unlock_irqrestore(&phba->ndlp_lock, flags);
4248         if (vport->phba->sli_rev == LPFC_SLI_REV4) {
4249                 ndlp->nlp_rpi = lpfc_sli4_alloc_rpi(vport->phba);
4250                 lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
4251                                  "0008 rpi:%x DID:%x flg:%x refcnt:%d "
4252                                  "map:%x %p\n", ndlp->nlp_rpi, ndlp->nlp_DID,
4253                                  ndlp->nlp_flag,
4254                                  atomic_read(&ndlp->kref.refcount),
4255                                  ndlp->nlp_usg_map, ndlp);
4256         }
4257
4258
4259         if (state != NLP_STE_UNUSED_NODE)
4260                 lpfc_nlp_set_state(vport, ndlp, state);
4261
4262         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_NODE,
4263                 "node enable:       did:x%x",
4264                 ndlp->nlp_DID, 0, 0);
4265         return ndlp;
4266 }
4267
4268 void
4269 lpfc_drop_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
4270 {
4271         /*
4272          * Use of lpfc_drop_node and UNUSED list: lpfc_drop_node should
4273          * be used if we wish to issue the "last" lpfc_nlp_put() to remove
4274          * the ndlp from the vport. The ndlp marked as UNUSED on the list
4275          * until ALL other outstanding threads have completed. We check
4276          * that the ndlp not already in the UNUSED state before we proceed.
4277          */
4278         if (ndlp->nlp_state == NLP_STE_UNUSED_NODE)
4279                 return;
4280         lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNUSED_NODE);
4281         if (vport->phba->sli_rev == LPFC_SLI_REV4) {
4282                 lpfc_cleanup_vports_rrqs(vport, ndlp);
4283                 lpfc_unreg_rpi(vport, ndlp);
4284         }
4285
4286         lpfc_nlp_put(ndlp);
4287         return;
4288 }
4289
4290 /*
4291  * Start / ReStart rescue timer for Discovery / RSCN handling
4292  */
4293 void
4294 lpfc_set_disctmo(struct lpfc_vport *vport)
4295 {
4296         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4297         struct lpfc_hba  *phba = vport->phba;
4298         uint32_t tmo;
4299
4300         if (vport->port_state == LPFC_LOCAL_CFG_LINK) {
4301                 /* For FAN, timeout should be greater than edtov */
4302                 tmo = (((phba->fc_edtov + 999) / 1000) + 1);
4303         } else {
4304                 /* Normal discovery timeout should be > than ELS/CT timeout
4305                  * FC spec states we need 3 * ratov for CT requests
4306                  */
4307                 tmo = ((phba->fc_ratov * 3) + 3);
4308         }
4309
4310
4311         if (!timer_pending(&vport->fc_disctmo)) {
4312                 lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
4313                         "set disc timer:  tmo:x%x state:x%x flg:x%x",
4314                         tmo, vport->port_state, vport->fc_flag);
4315         }
4316
4317         mod_timer(&vport->fc_disctmo, jiffies + msecs_to_jiffies(1000 * tmo));
4318         spin_lock_irq(shost->host_lock);
4319         vport->fc_flag |= FC_DISC_TMO;
4320         spin_unlock_irq(shost->host_lock);
4321
4322         /* Start Discovery Timer state <hba_state> */
4323         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
4324                          "0247 Start Discovery Timer state x%x "
4325                          "Data: x%x x%lx x%x x%x\n",
4326                          vport->port_state, tmo,
4327                          (unsigned long)&vport->fc_disctmo, vport->fc_plogi_cnt,
4328                          vport->fc_adisc_cnt);
4329
4330         return;
4331 }
4332
4333 /*
4334  * Cancel rescue timer for Discovery / RSCN handling
4335  */
4336 int
4337 lpfc_can_disctmo(struct lpfc_vport *vport)
4338 {
4339         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4340         unsigned long iflags;
4341
4342         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
4343                 "can disc timer:  state:x%x rtry:x%x flg:x%x",
4344                 vport->port_state, vport->fc_ns_retry, vport->fc_flag);
4345
4346         /* Turn off discovery timer if its running */
4347         if (vport->fc_flag & FC_DISC_TMO) {
4348                 spin_lock_irqsave(shost->host_lock, iflags);
4349                 vport->fc_flag &= ~FC_DISC_TMO;
4350                 spin_unlock_irqrestore(shost->host_lock, iflags);
4351                 del_timer_sync(&vport->fc_disctmo);
4352                 spin_lock_irqsave(&vport->work_port_lock, iflags);
4353                 vport->work_port_events &= ~WORKER_DISC_TMO;
4354                 spin_unlock_irqrestore(&vport->work_port_lock, iflags);
4355         }
4356
4357         /* Cancel Discovery Timer state <hba_state> */
4358         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
4359                          "0248 Cancel Discovery Timer state x%x "
4360                          "Data: x%x x%x x%x\n",
4361                          vport->port_state, vport->fc_flag,
4362                          vport->fc_plogi_cnt, vport->fc_adisc_cnt);
4363         return 0;
4364 }
4365
4366 /*
4367  * Check specified ring for outstanding IOCB on the SLI queue
4368  * Return true if iocb matches the specified nport
4369  */
4370 int
4371 lpfc_check_sli_ndlp(struct lpfc_hba *phba,
4372                     struct lpfc_sli_ring *pring,
4373                     struct lpfc_iocbq *iocb,
4374                     struct lpfc_nodelist *ndlp)
4375 {
4376         struct lpfc_sli *psli = &phba->sli;
4377         IOCB_t *icmd = &iocb->iocb;
4378         struct lpfc_vport    *vport = ndlp->vport;
4379
4380         if (iocb->vport != vport)
4381                 return 0;
4382
4383         if (pring->ringno == LPFC_ELS_RING) {
4384                 switch (icmd->ulpCommand) {
4385                 case CMD_GEN_REQUEST64_CR:
4386                         if (iocb->context_un.ndlp == ndlp)
4387                                 return 1;
4388                 case CMD_ELS_REQUEST64_CR:
4389                         if (icmd->un.elsreq64.remoteID == ndlp->nlp_DID)
4390                                 return 1;
4391                 case CMD_XMIT_ELS_RSP64_CX:
4392                         if (iocb->context1 == (uint8_t *) ndlp)
4393                                 return 1;
4394                 }
4395         } else if (pring->ringno == psli->extra_ring) {
4396
4397         } else if (pring->ringno == psli->fcp_ring) {
4398                 /* Skip match check if waiting to relogin to FCP target */
4399                 if ((ndlp->nlp_type & NLP_FCP_TARGET) &&
4400                     (ndlp->nlp_flag & NLP_DELAY_TMO)) {
4401                         return 0;
4402                 }
4403                 if (icmd->ulpContext == (volatile ushort)ndlp->nlp_rpi) {
4404                         return 1;
4405                 }
4406         } else if (pring->ringno == psli->next_ring) {
4407
4408         }
4409         return 0;
4410 }
4411
4412 /*
4413  * Free resources / clean up outstanding I/Os
4414  * associated with nlp_rpi in the LPFC_NODELIST entry.
4415  */
4416 static int
4417 lpfc_no_rpi(struct lpfc_hba *phba, struct lpfc_nodelist *ndlp)
4418 {
4419         LIST_HEAD(completions);
4420         struct lpfc_sli *psli;
4421         struct lpfc_sli_ring *pring;
4422         struct lpfc_iocbq *iocb, *next_iocb;
4423         uint32_t i;
4424
4425         lpfc_fabric_abort_nport(ndlp);
4426
4427         /*
4428          * Everything that matches on txcmplq will be returned
4429          * by firmware with a no rpi error.
4430          */
4431         psli = &phba->sli;
4432         if (ndlp->nlp_flag & NLP_RPI_REGISTERED) {
4433                 /* Now process each ring */
4434                 for (i = 0; i < psli->num_rings; i++) {
4435                         pring = &psli->ring[i];
4436
4437                         spin_lock_irq(&phba->hbalock);
4438                         list_for_each_entry_safe(iocb, next_iocb, &pring->txq,
4439                                                  list) {
4440                                 /*
4441                                  * Check to see if iocb matches the nport we are
4442                                  * looking for
4443                                  */
4444                                 if ((lpfc_check_sli_ndlp(phba, pring, iocb,
4445                                                          ndlp))) {
4446                                         /* It matches, so deque and call compl
4447                                            with an error */
4448                                         list_move_tail(&iocb->list,
4449                                                        &completions);
4450                                 }
4451                         }
4452                         spin_unlock_irq(&phba->hbalock);
4453                 }
4454         }
4455
4456         /* Cancel all the IOCBs from the completions list */
4457         lpfc_sli_cancel_iocbs(phba, &completions, IOSTAT_LOCAL_REJECT,
4458                               IOERR_SLI_ABORTED);
4459
4460         return 0;
4461 }
4462
4463 /**
4464  * lpfc_nlp_logo_unreg - Unreg mailbox completion handler before LOGO
4465  * @phba: Pointer to HBA context object.
4466  * @pmb: Pointer to mailbox object.
4467  *
4468  * This function will issue an ELS LOGO command after completing
4469  * the UNREG_RPI.
4470  **/
4471 static void
4472 lpfc_nlp_logo_unreg(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
4473 {
4474         struct lpfc_vport  *vport = pmb->vport;
4475         struct lpfc_nodelist *ndlp;
4476
4477         ndlp = (struct lpfc_nodelist *)(pmb->context1);
4478         if (!ndlp)
4479                 return;
4480         lpfc_issue_els_logo(vport, ndlp, 0);
4481         mempool_free(pmb, phba->mbox_mem_pool);
4482 }
4483
4484 /*
4485  * Free rpi associated with LPFC_NODELIST entry.
4486  * This routine is called from lpfc_freenode(), when we are removing
4487  * a LPFC_NODELIST entry. It is also called if the driver initiates a
4488  * LOGO that completes successfully, and we are waiting to PLOGI back
4489  * to the remote NPort. In addition, it is called after we receive
4490  * and unsolicated ELS cmd, send back a rsp, the rsp completes and
4491  * we are waiting to PLOGI back to the remote NPort.
4492  */
4493 int
4494 lpfc_unreg_rpi(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
4495 {
4496         struct lpfc_hba *phba = vport->phba;
4497         LPFC_MBOXQ_t    *mbox;
4498         int rc, acc_plogi = 1;
4499         uint16_t rpi;
4500
4501         if (ndlp->nlp_flag & NLP_RPI_REGISTERED ||
4502             ndlp->nlp_flag & NLP_REG_LOGIN_SEND) {
4503                 if (ndlp->nlp_flag & NLP_REG_LOGIN_SEND)
4504                         lpfc_printf_vlog(vport, KERN_INFO, LOG_SLI,
4505                                          "3366 RPI x%x needs to be "
4506                                          "unregistered nlp_flag x%x "
4507                                          "did x%x\n",
4508                                          ndlp->nlp_rpi, ndlp->nlp_flag,
4509                                          ndlp->nlp_DID);
4510                 mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
4511                 if (mbox) {
4512                         /* SLI4 ports require the physical rpi value. */
4513                         rpi = ndlp->nlp_rpi;
4514                         if (phba->sli_rev == LPFC_SLI_REV4)
4515                                 rpi = phba->sli4_hba.rpi_ids[ndlp->nlp_rpi];
4516
4517                         lpfc_unreg_login(phba, vport->vpi, rpi, mbox);
4518                         mbox->vport = vport;
4519                         if (ndlp->nlp_flag & NLP_ISSUE_LOGO) {
4520                                 mbox->context1 = ndlp;
4521                                 mbox->mbox_cmpl = lpfc_nlp_logo_unreg;
4522                         } else {
4523                                 if (phba->sli_rev == LPFC_SLI_REV4 &&
4524                                     (!(vport->load_flag & FC_UNLOADING)) &&
4525                                     (bf_get(lpfc_sli_intf_if_type,
4526                                      &phba->sli4_hba.sli_intf) ==
4527                                       LPFC_SLI_INTF_IF_TYPE_2)) {
4528                                         mbox->context1 = lpfc_nlp_get(ndlp);
4529                                         mbox->mbox_cmpl =
4530                                                 lpfc_sli4_unreg_rpi_cmpl_clr;
4531                                         /*
4532                                          * accept PLOGIs after unreg_rpi_cmpl
4533                                          */
4534                                         acc_plogi = 0;
4535                                 } else
4536                                         mbox->mbox_cmpl =
4537                                                 lpfc_sli_def_mbox_cmpl;
4538                         }
4539
4540                         rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
4541                         if (rc == MBX_NOT_FINISHED) {
4542                                 mempool_free(mbox, phba->mbox_mem_pool);
4543                                 acc_plogi = 1;
4544                         }
4545                 }
4546                 lpfc_no_rpi(phba, ndlp);
4547
4548                 if (phba->sli_rev != LPFC_SLI_REV4)
4549                         ndlp->nlp_rpi = 0;
4550                 ndlp->nlp_flag &= ~NLP_RPI_REGISTERED;
4551                 ndlp->nlp_flag &= ~NLP_NPR_ADISC;
4552                 if (acc_plogi)
4553                         ndlp->nlp_flag &= ~NLP_LOGO_ACC;
4554                 return 1;
4555         }
4556         ndlp->nlp_flag &= ~NLP_LOGO_ACC;
4557         return 0;
4558 }
4559
4560 /**
4561  * lpfc_unreg_hba_rpis - Unregister rpis registered to the hba.
4562  * @phba: pointer to lpfc hba data structure.
4563  *
4564  * This routine is invoked to unregister all the currently registered RPIs
4565  * to the HBA.
4566  **/
4567 void
4568 lpfc_unreg_hba_rpis(struct lpfc_hba *phba)
4569 {
4570         struct lpfc_vport **vports;
4571         struct lpfc_nodelist *ndlp;
4572         struct Scsi_Host *shost;
4573         int i;
4574
4575         vports = lpfc_create_vport_work_array(phba);
4576         if (!vports) {
4577                 lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY,
4578                         "2884 Vport array allocation failed \n");
4579                 return;
4580         }
4581         for (i = 0; i <= phba->max_vports && vports[i] != NULL; i++) {
4582                 shost = lpfc_shost_from_vport(vports[i]);
4583                 spin_lock_irq(shost->host_lock);
4584                 list_for_each_entry(ndlp, &vports[i]->fc_nodes, nlp_listp) {
4585                         if (ndlp->nlp_flag & NLP_RPI_REGISTERED) {
4586                                 /* The mempool_alloc might sleep */
4587                                 spin_unlock_irq(shost->host_lock);
4588                                 lpfc_unreg_rpi(vports[i], ndlp);
4589                                 spin_lock_irq(shost->host_lock);
4590                         }
4591                 }
4592                 spin_unlock_irq(shost->host_lock);
4593         }
4594         lpfc_destroy_vport_work_array(phba, vports);
4595 }
4596
4597 void
4598 lpfc_unreg_all_rpis(struct lpfc_vport *vport)
4599 {
4600         struct lpfc_hba  *phba  = vport->phba;
4601         LPFC_MBOXQ_t     *mbox;
4602         int rc;
4603
4604         if (phba->sli_rev == LPFC_SLI_REV4) {
4605                 lpfc_sli4_unreg_all_rpis(vport);
4606                 return;
4607         }
4608
4609         mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
4610         if (mbox) {
4611                 lpfc_unreg_login(phba, vport->vpi, LPFC_UNREG_ALL_RPIS_VPORT,
4612                                  mbox);
4613                 mbox->vport = vport;
4614                 mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
4615                 mbox->context1 = NULL;
4616                 rc = lpfc_sli_issue_mbox_wait(phba, mbox, LPFC_MBOX_TMO);
4617                 if (rc != MBX_TIMEOUT)
4618                         mempool_free(mbox, phba->mbox_mem_pool);
4619
4620                 if ((rc == MBX_TIMEOUT) || (rc == MBX_NOT_FINISHED))
4621                         lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX | LOG_VPORT,
4622                                 "1836 Could not issue "
4623                                 "unreg_login(all_rpis) status %d\n", rc);
4624         }
4625 }
4626
4627 void
4628 lpfc_unreg_default_rpis(struct lpfc_vport *vport)
4629 {
4630         struct lpfc_hba  *phba  = vport->phba;
4631         LPFC_MBOXQ_t     *mbox;
4632         int rc;
4633
4634         mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
4635         if (mbox) {
4636                 lpfc_unreg_did(phba, vport->vpi, LPFC_UNREG_ALL_DFLT_RPIS,
4637                                mbox);
4638                 mbox->vport = vport;
4639                 mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
4640                 mbox->context1 = NULL;
4641                 rc = lpfc_sli_issue_mbox_wait(phba, mbox, LPFC_MBOX_TMO);
4642                 if (rc != MBX_TIMEOUT)
4643                         mempool_free(mbox, phba->mbox_mem_pool);
4644
4645                 if ((rc == MBX_TIMEOUT) || (rc == MBX_NOT_FINISHED))
4646                         lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX | LOG_VPORT,
4647                                          "1815 Could not issue "
4648                                          "unreg_did (default rpis) status %d\n",
4649                                          rc);
4650         }
4651 }
4652
4653 /*
4654  * Free resources associated with LPFC_NODELIST entry
4655  * so it can be freed.
4656  */
4657 static int
4658 lpfc_cleanup_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
4659 {
4660         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4661         struct lpfc_hba  *phba = vport->phba;
4662         LPFC_MBOXQ_t *mb, *nextmb;
4663         struct lpfc_dmabuf *mp;
4664
4665         /* Cleanup node for NPort <nlp_DID> */
4666         lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
4667                          "0900 Cleanup node for NPort x%x "
4668                          "Data: x%x x%x x%x\n",
4669                          ndlp->nlp_DID, ndlp->nlp_flag,
4670                          ndlp->nlp_state, ndlp->nlp_rpi);
4671         if (NLP_CHK_FREE_REQ(ndlp)) {
4672                 lpfc_printf_vlog(vport, KERN_WARNING, LOG_NODE,
4673                                 "0280 lpfc_cleanup_node: ndlp:x%p "
4674                                 "usgmap:x%x refcnt:%d\n",
4675                                 (void *)ndlp, ndlp->nlp_usg_map,
4676                                 atomic_read(&ndlp->kref.refcount));
4677                 lpfc_dequeue_node(vport, ndlp);
4678         } else {
4679                 lpfc_printf_vlog(vport, KERN_WARNING, LOG_NODE,
4680                                 "0281 lpfc_cleanup_node: ndlp:x%p "
4681                                 "usgmap:x%x refcnt:%d\n",
4682                                 (void *)ndlp, ndlp->nlp_usg_map,
4683                                 atomic_read(&ndlp->kref.refcount));
4684                 lpfc_disable_node(vport, ndlp);
4685         }
4686
4687
4688         /* Don't need to clean up REG_LOGIN64 cmds for Default RPI cleanup */
4689
4690         /* cleanup any ndlp on mbox q waiting for reglogin cmpl */
4691         if ((mb = phba->sli.mbox_active)) {
4692                 if ((mb->u.mb.mbxCommand == MBX_REG_LOGIN64) &&
4693                    !(mb->mbox_flag & LPFC_MBX_IMED_UNREG) &&
4694                    (ndlp == (struct lpfc_nodelist *) mb->context2)) {
4695                         mb->context2 = NULL;
4696                         mb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
4697                 }
4698         }
4699
4700         spin_lock_irq(&phba->hbalock);
4701         /* Cleanup REG_LOGIN completions which are not yet processed */
4702         list_for_each_entry(mb, &phba->sli.mboxq_cmpl, list) {
4703                 if ((mb->u.mb.mbxCommand != MBX_REG_LOGIN64) ||
4704                         (mb->mbox_flag & LPFC_MBX_IMED_UNREG) ||
4705                         (ndlp != (struct lpfc_nodelist *) mb->context2))
4706                         continue;
4707
4708                 mb->context2 = NULL;
4709                 mb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
4710         }
4711
4712         list_for_each_entry_safe(mb, nextmb, &phba->sli.mboxq, list) {
4713                 if ((mb->u.mb.mbxCommand == MBX_REG_LOGIN64) &&
4714                    !(mb->mbox_flag & LPFC_MBX_IMED_UNREG) &&
4715                     (ndlp == (struct lpfc_nodelist *) mb->context2)) {
4716                         mp = (struct lpfc_dmabuf *) (mb->context1);
4717                         if (mp) {
4718                                 __lpfc_mbuf_free(phba, mp->virt, mp->phys);
4719                                 kfree(mp);
4720                         }
4721                         list_del(&mb->list);
4722                         mempool_free(mb, phba->mbox_mem_pool);
4723                         /* We shall not invoke the lpfc_nlp_put to decrement
4724                          * the ndlp reference count as we are in the process
4725                          * of lpfc_nlp_release.
4726                          */
4727                 }
4728         }
4729         spin_unlock_irq(&phba->hbalock);
4730
4731         lpfc_els_abort(phba, ndlp);
4732
4733         spin_lock_irq(shost->host_lock);
4734         ndlp->nlp_flag &= ~NLP_DELAY_TMO;
4735         spin_unlock_irq(shost->host_lock);
4736
4737         ndlp->nlp_last_elscmd = 0;
4738         del_timer_sync(&ndlp->nlp_delayfunc);
4739
4740         list_del_init(&ndlp->els_retry_evt.evt_listp);
4741         list_del_init(&ndlp->dev_loss_evt.evt_listp);
4742         lpfc_cleanup_vports_rrqs(vport, ndlp);
4743         lpfc_unreg_rpi(vport, ndlp);
4744
4745         return 0;
4746 }
4747
4748 /*
4749  * Check to see if we can free the nlp back to the freelist.
4750  * If we are in the middle of using the nlp in the discovery state
4751  * machine, defer the free till we reach the end of the state machine.
4752  */
4753 static void
4754 lpfc_nlp_remove(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
4755 {
4756         struct lpfc_hba  *phba = vport->phba;
4757         struct lpfc_rport_data *rdata;
4758         struct fc_rport *rport;
4759         LPFC_MBOXQ_t *mbox;
4760         int rc;
4761
4762         lpfc_cancel_retry_delay_tmo(vport, ndlp);
4763         if ((ndlp->nlp_flag & NLP_DEFER_RM) &&
4764             !(ndlp->nlp_flag & NLP_REG_LOGIN_SEND) &&
4765             !(ndlp->nlp_flag & NLP_RPI_REGISTERED)) {
4766                 /* For this case we need to cleanup the default rpi
4767                  * allocated by the firmware.
4768                  */
4769                 lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
4770                                  "0005 rpi:%x DID:%x flg:%x %d map:%x %p\n",
4771                                  ndlp->nlp_rpi, ndlp->nlp_DID, ndlp->nlp_flag,
4772                                  atomic_read(&ndlp->kref.refcount),
4773                                  ndlp->nlp_usg_map, ndlp);
4774                 if ((mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL))
4775                         != NULL) {
4776                         rc = lpfc_reg_rpi(phba, vport->vpi, ndlp->nlp_DID,
4777                             (uint8_t *) &vport->fc_sparam, mbox, ndlp->nlp_rpi);
4778                         if (rc) {
4779                                 mempool_free(mbox, phba->mbox_mem_pool);
4780                         }
4781                         else {
4782                                 mbox->mbox_flag |= LPFC_MBX_IMED_UNREG;
4783                                 mbox->mbox_cmpl = lpfc_mbx_cmpl_dflt_rpi;
4784                                 mbox->vport = vport;
4785                                 mbox->context2 = ndlp;
4786                                 rc =lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
4787                                 if (rc == MBX_NOT_FINISHED) {
4788                                         mempool_free(mbox, phba->mbox_mem_pool);
4789                                 }
4790                         }
4791                 }
4792         }
4793         lpfc_cleanup_node(vport, ndlp);
4794
4795         /*
4796          * ndlp->rport must be set to NULL before it reaches here
4797          * i.e. break rport/node link before doing lpfc_nlp_put for
4798          * registered rport and then drop the reference of rport.
4799          */
4800         if (ndlp->rport) {
4801                 /*
4802                  * extra lpfc_nlp_put dropped the reference of ndlp
4803                  * for registered rport so need to cleanup rport
4804                  */
4805                 lpfc_printf_vlog(vport, KERN_WARNING, LOG_NODE,
4806                                 "0940 removed node x%p DID x%x "
4807                                 " rport not null %p\n",
4808                                 ndlp, ndlp->nlp_DID, ndlp->rport);
4809                 rport = ndlp->rport;
4810                 rdata = rport->dd_data;
4811                 rdata->pnode = NULL;
4812                 ndlp->rport = NULL;
4813                 put_device(&rport->dev);
4814         }
4815 }
4816
4817 static int
4818 lpfc_matchdid(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
4819               uint32_t did)
4820 {
4821         D_ID mydid, ndlpdid, matchdid;
4822
4823         if (did == Bcast_DID)
4824                 return 0;
4825
4826         /* First check for Direct match */
4827         if (ndlp->nlp_DID == did)
4828                 return 1;
4829
4830         /* Next check for area/domain identically equals 0 match */
4831         mydid.un.word = vport->fc_myDID;
4832         if ((mydid.un.b.domain == 0) && (mydid.un.b.area == 0)) {
4833                 return 0;
4834         }
4835
4836         matchdid.un.word = did;
4837         ndlpdid.un.word = ndlp->nlp_DID;
4838         if (matchdid.un.b.id == ndlpdid.un.b.id) {
4839                 if ((mydid.un.b.domain == matchdid.un.b.domain) &&
4840                     (mydid.un.b.area == matchdid.un.b.area)) {
4841                         /* This code is supposed to match the ID
4842                          * for a private loop device that is
4843                          * connect to fl_port. But we need to
4844                          * check that the port did not just go
4845                          * from pt2pt to fabric or we could end
4846                          * up matching ndlp->nlp_DID 000001 to
4847                          * fabric DID 0x20101
4848                          */
4849                         if ((ndlpdid.un.b.domain == 0) &&
4850                             (ndlpdid.un.b.area == 0)) {
4851                                 if (ndlpdid.un.b.id &&
4852                                     vport->phba->fc_topology ==
4853                                     LPFC_TOPOLOGY_LOOP)
4854                                         return 1;
4855                         }
4856                         return 0;
4857                 }
4858
4859                 matchdid.un.word = ndlp->nlp_DID;
4860                 if ((mydid.un.b.domain == ndlpdid.un.b.domain) &&
4861                     (mydid.un.b.area == ndlpdid.un.b.area)) {
4862                         if ((matchdid.un.b.domain == 0) &&
4863                             (matchdid.un.b.area == 0)) {
4864                                 if (matchdid.un.b.id)
4865                                         return 1;
4866                         }
4867                 }
4868         }
4869         return 0;
4870 }
4871
4872 /* Search for a nodelist entry */
4873 static struct lpfc_nodelist *
4874 __lpfc_findnode_did(struct lpfc_vport *vport, uint32_t did)
4875 {
4876         struct lpfc_nodelist *ndlp;
4877         uint32_t data1;
4878
4879         list_for_each_entry(ndlp, &vport->fc_nodes, nlp_listp) {
4880                 if (lpfc_matchdid(vport, ndlp, did)) {
4881                         data1 = (((uint32_t) ndlp->nlp_state << 24) |
4882                                  ((uint32_t) ndlp->nlp_xri << 16) |
4883                                  ((uint32_t) ndlp->nlp_type << 8) |
4884                                  ((uint32_t) ndlp->nlp_rpi & 0xff));
4885                         lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
4886                                          "0929 FIND node DID "
4887                                          "Data: x%p x%x x%x x%x %p\n",
4888                                          ndlp, ndlp->nlp_DID,
4889                                          ndlp->nlp_flag, data1,
4890                                          ndlp->active_rrqs_xri_bitmap);
4891                         return ndlp;
4892                 }
4893         }
4894
4895         /* FIND node did <did> NOT FOUND */
4896         lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
4897                          "0932 FIND node did x%x NOT FOUND.\n", did);
4898         return NULL;
4899 }
4900
4901 struct lpfc_nodelist *
4902 lpfc_findnode_did(struct lpfc_vport *vport, uint32_t did)
4903 {
4904         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4905         struct lpfc_nodelist *ndlp;
4906         unsigned long iflags;
4907
4908         spin_lock_irqsave(shost->host_lock, iflags);
4909         ndlp = __lpfc_findnode_did(vport, did);
4910         spin_unlock_irqrestore(shost->host_lock, iflags);
4911         return ndlp;
4912 }
4913
4914 struct lpfc_nodelist *
4915 lpfc_setup_disc_node(struct lpfc_vport *vport, uint32_t did)
4916 {
4917         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
4918         struct lpfc_nodelist *ndlp;
4919
4920         ndlp = lpfc_findnode_did(vport, did);
4921         if (!ndlp) {
4922                 if ((vport->fc_flag & FC_RSCN_MODE) != 0 &&
4923                     lpfc_rscn_payload_check(vport, did) == 0)
4924                         return NULL;
4925                 ndlp = (struct lpfc_nodelist *)
4926                      mempool_alloc(vport->phba->nlp_mem_pool, GFP_KERNEL);
4927                 if (!ndlp)
4928                         return NULL;
4929                 lpfc_nlp_init(vport, ndlp, did);
4930                 lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
4931                 spin_lock_irq(shost->host_lock);
4932                 ndlp->nlp_flag |= NLP_NPR_2B_DISC;
4933                 spin_unlock_irq(shost->host_lock);
4934                 return ndlp;
4935         } else if (!NLP_CHK_NODE_ACT(ndlp)) {
4936                 ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_NPR_NODE);
4937                 if (!ndlp)
4938                         return NULL;
4939                 spin_lock_irq(shost->host_lock);
4940                 ndlp->nlp_flag |= NLP_NPR_2B_DISC;
4941                 spin_unlock_irq(shost->host_lock);
4942                 return ndlp;
4943         }
4944
4945         if ((vport->fc_flag & FC_RSCN_MODE) &&
4946             !(vport->fc_flag & FC_NDISC_ACTIVE)) {
4947                 if (lpfc_rscn_payload_check(vport, did)) {
4948                         /* If we've already received a PLOGI from this NPort
4949                          * we don't need to try to discover it again.
4950                          */
4951                         if (ndlp->nlp_flag & NLP_RCV_PLOGI)
4952                                 return NULL;
4953
4954                         /* Since this node is marked for discovery,
4955                          * delay timeout is not needed.
4956                          */
4957                         lpfc_cancel_retry_delay_tmo(vport, ndlp);
4958                         spin_lock_irq(shost->host_lock);
4959                         ndlp->nlp_flag |= NLP_NPR_2B_DISC;
4960                         spin_unlock_irq(shost->host_lock);
4961                 } else
4962                         ndlp = NULL;
4963         } else {
4964                 /* If we've already received a PLOGI from this NPort,
4965                  * or we are already in the process of discovery on it,
4966                  * we don't need to try to discover it again.
4967                  */
4968                 if (ndlp->nlp_state == NLP_STE_ADISC_ISSUE ||
4969                     ndlp->nlp_state == NLP_STE_PLOGI_ISSUE ||
4970                     ndlp->nlp_flag & NLP_RCV_PLOGI)
4971                         return NULL;
4972                 lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
4973                 spin_lock_irq(shost->host_lock);
4974                 ndlp->nlp_flag |= NLP_NPR_2B_DISC;
4975                 spin_unlock_irq(shost->host_lock);
4976         }
4977         return ndlp;
4978 }
4979
4980 /* Build a list of nodes to discover based on the loopmap */
4981 void
4982 lpfc_disc_list_loopmap(struct lpfc_vport *vport)
4983 {
4984         struct lpfc_hba  *phba = vport->phba;
4985         int j;
4986         uint32_t alpa, index;
4987
4988         if (!lpfc_is_link_up(phba))
4989                 return;
4990
4991         if (phba->fc_topology != LPFC_TOPOLOGY_LOOP)
4992                 return;
4993
4994         /* Check for loop map present or not */
4995         if (phba->alpa_map[0]) {
4996                 for (j = 1; j <= phba->alpa_map[0]; j++) {
4997                         alpa = phba->alpa_map[j];
4998                         if (((vport->fc_myDID & 0xff) == alpa) || (alpa == 0))
4999                                 continue;
5000                         lpfc_setup_disc_node(vport, alpa);
5001                 }
5002         } else {
5003                 /* No alpamap, so try all alpa's */
5004                 for (j = 0; j < FC_MAXLOOP; j++) {
5005                         /* If cfg_scan_down is set, start from highest
5006                          * ALPA (0xef) to lowest (0x1).
5007                          */
5008                         if (vport->cfg_scan_down)
5009                                 index = j;
5010                         else
5011                                 index = FC_MAXLOOP - j - 1;
5012                         alpa = lpfcAlpaArray[index];
5013                         if ((vport->fc_myDID & 0xff) == alpa)
5014                                 continue;
5015                         lpfc_setup_disc_node(vport, alpa);
5016                 }
5017         }
5018         return;
5019 }
5020
5021 void
5022 lpfc_issue_clear_la(struct lpfc_hba *phba, struct lpfc_vport *vport)
5023 {
5024         LPFC_MBOXQ_t *mbox;
5025         struct lpfc_sli *psli = &phba->sli;
5026         struct lpfc_sli_ring *extra_ring = &psli->ring[psli->extra_ring];
5027         struct lpfc_sli_ring *fcp_ring   = &psli->ring[psli->fcp_ring];
5028         struct lpfc_sli_ring *next_ring  = &psli->ring[psli->next_ring];
5029         int  rc;
5030
5031         /*
5032          * if it's not a physical port or if we already send
5033          * clear_la then don't send it.
5034          */
5035         if ((phba->link_state >= LPFC_CLEAR_LA) ||
5036             (vport->port_type != LPFC_PHYSICAL_PORT) ||
5037                 (phba->sli_rev == LPFC_SLI_REV4))
5038                 return;
5039
5040                         /* Link up discovery */
5041         if ((mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL)) != NULL) {
5042                 phba->link_state = LPFC_CLEAR_LA;
5043                 lpfc_clear_la(phba, mbox);
5044                 mbox->mbox_cmpl = lpfc_mbx_cmpl_clear_la;
5045                 mbox->vport = vport;
5046                 rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
5047                 if (rc == MBX_NOT_FINISHED) {
5048                         mempool_free(mbox, phba->mbox_mem_pool);
5049                         lpfc_disc_flush_list(vport);
5050                         extra_ring->flag &= ~LPFC_STOP_IOCB_EVENT;
5051                         fcp_ring->flag &= ~LPFC_STOP_IOCB_EVENT;
5052                         next_ring->flag &= ~LPFC_STOP_IOCB_EVENT;
5053                         phba->link_state = LPFC_HBA_ERROR;
5054                 }
5055         }
5056 }
5057
5058 /* Reg_vpi to tell firmware to resume normal operations */
5059 void
5060 lpfc_issue_reg_vpi(struct lpfc_hba *phba, struct lpfc_vport *vport)
5061 {
5062         LPFC_MBOXQ_t *regvpimbox;
5063
5064         regvpimbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
5065         if (regvpimbox) {
5066                 lpfc_reg_vpi(vport, regvpimbox);
5067                 regvpimbox->mbox_cmpl = lpfc_mbx_cmpl_reg_vpi;
5068                 regvpimbox->vport = vport;
5069                 if (lpfc_sli_issue_mbox(phba, regvpimbox, MBX_NOWAIT)
5070                                         == MBX_NOT_FINISHED) {
5071                         mempool_free(regvpimbox, phba->mbox_mem_pool);
5072                 }
5073         }
5074 }
5075
5076 /* Start Link up / RSCN discovery on NPR nodes */
5077 void
5078 lpfc_disc_start(struct lpfc_vport *vport)
5079 {
5080         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
5081         struct lpfc_hba  *phba = vport->phba;
5082         uint32_t num_sent;
5083         uint32_t clear_la_pending;
5084
5085         if (!lpfc_is_link_up(phba)) {
5086                 lpfc_printf_vlog(vport, KERN_INFO, LOG_SLI,
5087                                  "3315 Link is not up %x\n",
5088                                  phba->link_state);
5089                 return;
5090         }
5091
5092         if (phba->link_state == LPFC_CLEAR_LA)
5093                 clear_la_pending = 1;
5094         else
5095                 clear_la_pending = 0;
5096
5097         if (vport->port_state < LPFC_VPORT_READY)
5098                 vport->port_state = LPFC_DISC_AUTH;
5099
5100         lpfc_set_disctmo(vport);
5101
5102         vport->fc_prevDID = vport->fc_myDID;
5103         vport->num_disc_nodes = 0;
5104
5105         /* Start Discovery state <hba_state> */
5106         lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
5107                          "0202 Start Discovery hba state x%x "
5108                          "Data: x%x x%x x%x\n",
5109                          vport->port_state, vport->fc_flag, vport->fc_plogi_cnt,
5110                          vport->fc_adisc_cnt);
5111
5112         /* First do ADISCs - if any */
5113         num_sent = lpfc_els_disc_adisc(vport);
5114
5115         if (num_sent)
5116                 return;
5117
5118         /* Register the VPI for SLI3, NPIV only. */
5119         if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
5120             !(vport->fc_flag & FC_PT2PT) &&
5121             !(vport->fc_flag & FC_RSCN_MODE) &&
5122             (phba->sli_rev < LPFC_SLI_REV4)) {
5123                 lpfc_issue_clear_la(phba, vport);
5124                 lpfc_issue_reg_vpi(phba, vport);
5125                 return;
5126         }
5127
5128         /*
5129          * For SLI2, we need to set port_state to READY and continue
5130          * discovery.
5131          */
5132         if (vport->port_state < LPFC_VPORT_READY && !clear_la_pending) {
5133                 /* If we get here, there is nothing to ADISC */
5134                 lpfc_issue_clear_la(phba, vport);
5135
5136                 if (!(vport->fc_flag & FC_ABORT_DISCOVERY)) {
5137                         vport->num_disc_nodes = 0;
5138                         /* go thru NPR nodes and issue ELS PLOGIs */
5139                         if (vport->fc_npr_cnt)
5140                                 lpfc_els_disc_plogi(vport);
5141
5142                         if (!vport->num_disc_nodes) {
5143                                 spin_lock_irq(shost->host_lock);
5144                                 vport->fc_flag &= ~FC_NDISC_ACTIVE;
5145                                 spin_unlock_irq(shost->host_lock);
5146                                 lpfc_can_disctmo(vport);
5147                         }
5148                 }
5149                 vport->port_state = LPFC_VPORT_READY;
5150         } else {
5151                 /* Next do PLOGIs - if any */
5152                 num_sent = lpfc_els_disc_plogi(vport);
5153
5154                 if (num_sent)
5155                         return;
5156
5157                 if (vport->fc_flag & FC_RSCN_MODE) {
5158                         /* Check to see if more RSCNs came in while we
5159                          * were processing this one.
5160                          */
5161                         if ((vport->fc_rscn_id_cnt == 0) &&
5162                             (!(vport->fc_flag & FC_RSCN_DISCOVERY))) {
5163                                 spin_lock_irq(shost->host_lock);
5164                                 vport->fc_flag &= ~FC_RSCN_MODE;
5165                                 spin_unlock_irq(shost->host_lock);
5166                                 lpfc_can_disctmo(vport);
5167                         } else
5168                                 lpfc_els_handle_rscn(vport);
5169                 }
5170         }
5171         return;
5172 }
5173
5174 /*
5175  *  Ignore completion for all IOCBs on tx and txcmpl queue for ELS
5176  *  ring the match the sppecified nodelist.
5177  */
5178 static void
5179 lpfc_free_tx(struct lpfc_hba *phba, struct lpfc_nodelist *ndlp)
5180 {
5181         LIST_HEAD(completions);
5182         struct lpfc_sli *psli;
5183         IOCB_t     *icmd;
5184         struct lpfc_iocbq    *iocb, *next_iocb;
5185         struct lpfc_sli_ring *pring;
5186
5187         psli = &phba->sli;
5188         pring = &psli->ring[LPFC_ELS_RING];
5189
5190         /* Error matching iocb on txq or txcmplq
5191          * First check the txq.
5192          */
5193         spin_lock_irq(&phba->hbalock);
5194         list_for_each_entry_safe(iocb, next_iocb, &pring->txq, list) {
5195                 if (iocb->context1 != ndlp) {
5196                         continue;
5197                 }
5198                 icmd = &iocb->iocb;
5199                 if ((icmd->ulpCommand == CMD_ELS_REQUEST64_CR) ||
5200                     (icmd->ulpCommand == CMD_XMIT_ELS_RSP64_CX)) {
5201
5202                         list_move_tail(&iocb->list, &completions);
5203                 }
5204         }
5205
5206         /* Next check the txcmplq */
5207         list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq, list) {
5208                 if (iocb->context1 != ndlp) {
5209                         continue;
5210                 }
5211                 icmd = &iocb->iocb;
5212                 if (icmd->ulpCommand == CMD_ELS_REQUEST64_CR ||
5213                     icmd->ulpCommand == CMD_XMIT_ELS_RSP64_CX) {
5214                         lpfc_sli_issue_abort_iotag(phba, pring, iocb);
5215                 }
5216         }
5217         spin_unlock_irq(&phba->hbalock);
5218
5219         /* Cancel all the IOCBs from the completions list */
5220         lpfc_sli_cancel_iocbs(phba, &completions, IOSTAT_LOCAL_REJECT,
5221                               IOERR_SLI_ABORTED);
5222 }
5223
5224 static void
5225 lpfc_disc_flush_list(struct lpfc_vport *vport)
5226 {
5227         struct lpfc_nodelist *ndlp, *next_ndlp;
5228         struct lpfc_hba *phba = vport->phba;
5229
5230         if (vport->fc_plogi_cnt || vport->fc_adisc_cnt) {
5231                 list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes,
5232                                          nlp_listp) {
5233                         if (!NLP_CHK_NODE_ACT(ndlp))
5234                                 continue;
5235                         if (ndlp->nlp_state == NLP_STE_PLOGI_ISSUE ||
5236                             ndlp->nlp_state == NLP_STE_ADISC_ISSUE) {
5237                                 lpfc_free_tx(phba, ndlp);
5238                         }
5239                 }
5240         }
5241 }
5242
5243 void
5244 lpfc_cleanup_discovery_resources(struct lpfc_vport *vport)
5245 {
5246         lpfc_els_flush_rscn(vport);
5247         lpfc_els_flush_cmd(vport);
5248         lpfc_disc_flush_list(vport);
5249 }
5250
5251 /*****************************************************************************/
5252 /*
5253  * NAME:     lpfc_disc_timeout
5254  *
5255  * FUNCTION: Fibre Channel driver discovery timeout routine.
5256  *
5257  * EXECUTION ENVIRONMENT: interrupt only
5258  *
5259  * CALLED FROM:
5260  *      Timer function
5261  *
5262  * RETURNS:
5263  *      none
5264  */
5265 /*****************************************************************************/
5266 void
5267 lpfc_disc_timeout(unsigned long ptr)
5268 {
5269         struct lpfc_vport *vport = (struct lpfc_vport *) ptr;
5270         struct lpfc_hba   *phba = vport->phba;
5271         uint32_t tmo_posted;
5272         unsigned long flags = 0;
5273
5274         if (unlikely(!phba))
5275                 return;
5276
5277         spin_lock_irqsave(&vport->work_port_lock, flags);
5278         tmo_posted = vport->work_port_events & WORKER_DISC_TMO;
5279         if (!tmo_posted)
5280                 vport->work_port_events |= WORKER_DISC_TMO;
5281         spin_unlock_irqrestore(&vport->work_port_lock, flags);
5282
5283         if (!tmo_posted)
5284                 lpfc_worker_wake_up(phba);
5285         return;
5286 }
5287
5288 static void
5289 lpfc_disc_timeout_handler(struct lpfc_vport *vport)
5290 {
5291         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
5292         struct lpfc_hba  *phba = vport->phba;
5293         struct lpfc_sli  *psli = &phba->sli;
5294         struct lpfc_nodelist *ndlp, *next_ndlp;
5295         LPFC_MBOXQ_t *initlinkmbox;
5296         int rc, clrlaerr = 0;
5297
5298         if (!(vport->fc_flag & FC_DISC_TMO))
5299                 return;
5300
5301         spin_lock_irq(shost->host_lock);
5302         vport->fc_flag &= ~FC_DISC_TMO;
5303         spin_unlock_irq(shost->host_lock);
5304
5305         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
5306                 "disc timeout:    state:x%x rtry:x%x flg:x%x",
5307                 vport->port_state, vport->fc_ns_retry, vport->fc_flag);
5308
5309         switch (vport->port_state) {
5310
5311         case LPFC_LOCAL_CFG_LINK:
5312         /* port_state is identically  LPFC_LOCAL_CFG_LINK while waiting for
5313          * FAN
5314          */
5315                                 /* FAN timeout */
5316                 lpfc_printf_vlog(vport, KERN_WARNING, LOG_DISCOVERY,
5317                                  "0221 FAN timeout\n");
5318                 /* Start discovery by sending FLOGI, clean up old rpis */
5319                 list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes,
5320                                          nlp_listp) {
5321                         if (!NLP_CHK_NODE_ACT(ndlp))
5322                                 continue;
5323                         if (ndlp->nlp_state != NLP_STE_NPR_NODE)
5324                                 continue;
5325                         if (ndlp->nlp_type & NLP_FABRIC) {
5326                                 /* Clean up the ndlp on Fabric connections */
5327                                 lpfc_drop_node(vport, ndlp);
5328
5329                         } else if (!(ndlp->nlp_flag & NLP_NPR_ADISC)) {
5330                                 /* Fail outstanding IO now since device
5331                                  * is marked for PLOGI.
5332                                  */
5333                                 lpfc_unreg_rpi(vport, ndlp);
5334                         }
5335                 }
5336                 if (vport->port_state != LPFC_FLOGI) {
5337                         if (phba->sli_rev <= LPFC_SLI_REV3)
5338                                 lpfc_initial_flogi(vport);
5339                         else
5340                                 lpfc_issue_init_vfi(vport);
5341                         return;
5342                 }
5343                 break;
5344
5345         case LPFC_FDISC:
5346         case LPFC_FLOGI:
5347         /* port_state is identically LPFC_FLOGI while waiting for FLOGI cmpl */
5348                 /* Initial FLOGI timeout */
5349                 lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
5350                                  "0222 Initial %s timeout\n",
5351                                  vport->vpi ? "FDISC" : "FLOGI");
5352
5353                 /* Assume no Fabric and go on with discovery.
5354                  * Check for outstanding ELS FLOGI to abort.
5355                  */
5356
5357                 /* FLOGI failed, so just use loop map to make discovery list */
5358                 lpfc_disc_list_loopmap(vport);
5359
5360                 /* Start discovery */
5361                 lpfc_disc_start(vport);
5362                 break;
5363
5364         case LPFC_FABRIC_CFG_LINK:
5365         /* hba_state is identically LPFC_FABRIC_CFG_LINK while waiting for
5366            NameServer login */
5367                 lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
5368                                  "0223 Timeout while waiting for "
5369                                  "NameServer login\n");
5370                 /* Next look for NameServer ndlp */
5371                 ndlp = lpfc_findnode_did(vport, NameServer_DID);
5372                 if (ndlp && NLP_CHK_NODE_ACT(ndlp))
5373                         lpfc_els_abort(phba, ndlp);
5374
5375                 /* ReStart discovery */
5376                 goto restart_disc;
5377
5378         case LPFC_NS_QRY:
5379         /* Check for wait for NameServer Rsp timeout */
5380                 lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
5381                                  "0224 NameServer Query timeout "
5382                                  "Data: x%x x%x\n",
5383                                  vport->fc_ns_retry, LPFC_MAX_NS_RETRY);
5384
5385                 if (vport->fc_ns_retry < LPFC_MAX_NS_RETRY) {
5386                         /* Try it one more time */
5387                         vport->fc_ns_retry++;
5388                         rc = lpfc_ns_cmd(vport, SLI_CTNS_GID_FT,
5389                                          vport->fc_ns_retry, 0);
5390                         if (rc == 0)
5391                                 break;
5392                 }
5393                 vport->fc_ns_retry = 0;
5394
5395 restart_disc:
5396                 /*
5397                  * Discovery is over.
5398                  * set port_state to PORT_READY if SLI2.
5399                  * cmpl_reg_vpi will set port_state to READY for SLI3.
5400                  */
5401                 if (phba->sli_rev < LPFC_SLI_REV4) {
5402                         if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED)
5403                                 lpfc_issue_reg_vpi(phba, vport);
5404                         else  {
5405                                 lpfc_issue_clear_la(phba, vport);
5406                                 vport->port_state = LPFC_VPORT_READY;
5407                         }
5408                 }
5409
5410                 /* Setup and issue mailbox INITIALIZE LINK command */
5411                 initlinkmbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
5412                 if (!initlinkmbox) {
5413                         lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
5414                                          "0206 Device Discovery "
5415                                          "completion error\n");
5416                         phba->link_state = LPFC_HBA_ERROR;
5417                         break;
5418                 }
5419
5420                 lpfc_linkdown(phba);
5421                 lpfc_init_link(phba, initlinkmbox, phba->cfg_topology,
5422                                phba->cfg_link_speed);
5423                 initlinkmbox->u.mb.un.varInitLnk.lipsr_AL_PA = 0;
5424                 initlinkmbox->vport = vport;
5425                 initlinkmbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
5426                 rc = lpfc_sli_issue_mbox(phba, initlinkmbox, MBX_NOWAIT);
5427                 lpfc_set_loopback_flag(phba);
5428                 if (rc == MBX_NOT_FINISHED)
5429                         mempool_free(initlinkmbox, phba->mbox_mem_pool);
5430
5431                 break;
5432
5433         case LPFC_DISC_AUTH:
5434         /* Node Authentication timeout */
5435                 lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
5436                                  "0227 Node Authentication timeout\n");
5437                 lpfc_disc_flush_list(vport);
5438
5439                 /*
5440                  * set port_state to PORT_READY if SLI2.
5441                  * cmpl_reg_vpi will set port_state to READY for SLI3.
5442                  */
5443                 if (phba->sli_rev < LPFC_SLI_REV4) {
5444                         if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED)
5445                                 lpfc_issue_reg_vpi(phba, vport);
5446                         else  { /* NPIV Not enabled */
5447                                 lpfc_issue_clear_la(phba, vport);
5448                                 vport->port_state = LPFC_VPORT_READY;
5449                         }
5450                 }
5451                 break;
5452
5453         case LPFC_VPORT_READY:
5454                 if (vport->fc_flag & FC_RSCN_MODE) {
5455                         lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
5456                                          "0231 RSCN timeout Data: x%x "
5457                                          "x%x\n",
5458                                          vport->fc_ns_retry, LPFC_MAX_NS_RETRY);
5459
5460                         /* Cleanup any outstanding ELS commands */
5461                         lpfc_els_flush_cmd(vport);
5462
5463                         lpfc_els_flush_rscn(vport);
5464                         lpfc_disc_flush_list(vport);
5465                 }
5466                 break;
5467
5468         default:
5469                 lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
5470                                  "0273 Unexpected discovery timeout, "
5471                                  "vport State x%x\n", vport->port_state);
5472                 break;
5473         }
5474
5475         switch (phba->link_state) {
5476         case LPFC_CLEAR_LA:
5477                                 /* CLEAR LA timeout */
5478                 lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
5479                                  "0228 CLEAR LA timeout\n");
5480                 clrlaerr = 1;
5481                 break;
5482
5483         case LPFC_LINK_UP:
5484                 lpfc_issue_clear_la(phba, vport);
5485                 /* Drop thru */
5486         case LPFC_LINK_UNKNOWN:
5487         case LPFC_WARM_START:
5488         case LPFC_INIT_START:
5489         case LPFC_INIT_MBX_CMDS:
5490         case LPFC_LINK_DOWN:
5491         case LPFC_HBA_ERROR:
5492                 lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
5493                                  "0230 Unexpected timeout, hba link "
5494                                  "state x%x\n", phba->link_state);
5495                 clrlaerr = 1;
5496                 break;
5497
5498         case LPFC_HBA_READY:
5499                 break;
5500         }
5501
5502         if (clrlaerr) {
5503                 lpfc_disc_flush_list(vport);
5504                 psli->ring[(psli->extra_ring)].flag &= ~LPFC_STOP_IOCB_EVENT;
5505                 psli->ring[(psli->fcp_ring)].flag &= ~LPFC_STOP_IOCB_EVENT;
5506                 psli->ring[(psli->next_ring)].flag &= ~LPFC_STOP_IOCB_EVENT;
5507                 vport->port_state = LPFC_VPORT_READY;
5508         }
5509
5510         return;
5511 }
5512
5513 /*
5514  * This routine handles processing a NameServer REG_LOGIN mailbox
5515  * command upon completion. It is setup in the LPFC_MBOXQ
5516  * as the completion routine when the command is
5517  * handed off to the SLI layer.
5518  */
5519 void
5520 lpfc_mbx_cmpl_fdmi_reg_login(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
5521 {
5522         MAILBOX_t *mb = &pmb->u.mb;
5523         struct lpfc_dmabuf   *mp = (struct lpfc_dmabuf *) (pmb->context1);
5524         struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) pmb->context2;
5525         struct lpfc_vport    *vport = pmb->vport;
5526
5527         pmb->context1 = NULL;
5528         pmb->context2 = NULL;
5529
5530         if (phba->sli_rev < LPFC_SLI_REV4)
5531                 ndlp->nlp_rpi = mb->un.varWords[0];
5532         ndlp->nlp_flag |= NLP_RPI_REGISTERED;
5533         ndlp->nlp_type |= NLP_FABRIC;
5534         lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
5535         lpfc_printf_vlog(vport, KERN_INFO, LOG_SLI,
5536                          "0004 rpi:%x DID:%x flg:%x %d map:%x %p\n",
5537                          ndlp->nlp_rpi, ndlp->nlp_DID, ndlp->nlp_flag,
5538                          atomic_read(&ndlp->kref.refcount),
5539                          ndlp->nlp_usg_map, ndlp);
5540         /*
5541          * Start issuing Fabric-Device Management Interface (FDMI) command to
5542          * 0xfffffa (FDMI well known port) or Delay issuing FDMI command if
5543          * fdmi-on=2 (supporting RPA/hostnmae)
5544          */
5545
5546         if (vport->cfg_fdmi_on & LPFC_FDMI_REG_DELAY)
5547                 mod_timer(&vport->fc_fdmitmo,
5548                           jiffies + msecs_to_jiffies(1000 * 60));
5549         else
5550                 lpfc_fdmi_cmd(vport, ndlp, SLI_MGMT_DHBA);
5551
5552         /* decrement the node reference count held for this callback
5553          * function.
5554          */
5555         lpfc_nlp_put(ndlp);
5556         lpfc_mbuf_free(phba, mp->virt, mp->phys);
5557         kfree(mp);
5558         mempool_free(pmb, phba->mbox_mem_pool);
5559
5560         return;
5561 }
5562
5563 static int
5564 lpfc_filter_by_rpi(struct lpfc_nodelist *ndlp, void *param)
5565 {
5566         uint16_t *rpi = param;
5567
5568         /* check for active node */
5569         if (!NLP_CHK_NODE_ACT(ndlp))
5570                 return 0;
5571
5572         return ndlp->nlp_rpi == *rpi;
5573 }
5574
5575 static int
5576 lpfc_filter_by_wwpn(struct lpfc_nodelist *ndlp, void *param)
5577 {
5578         return memcmp(&ndlp->nlp_portname, param,
5579                       sizeof(ndlp->nlp_portname)) == 0;
5580 }
5581
5582 static struct lpfc_nodelist *
5583 __lpfc_find_node(struct lpfc_vport *vport, node_filter filter, void *param)
5584 {
5585         struct lpfc_nodelist *ndlp;
5586
5587         list_for_each_entry(ndlp, &vport->fc_nodes, nlp_listp) {
5588                 if (filter(ndlp, param)) {
5589                         lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
5590                                          "3185 FIND node filter %p DID "
5591                                          "Data: x%p x%x x%x\n",
5592                                          filter, ndlp, ndlp->nlp_DID,
5593                                          ndlp->nlp_flag);
5594                         return ndlp;
5595                 }
5596         }
5597         lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
5598                          "3186 FIND node filter %p NOT FOUND.\n", filter);
5599         return NULL;
5600 }
5601
5602 /*
5603  * This routine looks up the ndlp lists for the given RPI. If rpi found it
5604  * returns the node list element pointer else return NULL.
5605  */
5606 struct lpfc_nodelist *
5607 __lpfc_findnode_rpi(struct lpfc_vport *vport, uint16_t rpi)
5608 {
5609         return __lpfc_find_node(vport, lpfc_filter_by_rpi, &rpi);
5610 }
5611
5612 /*
5613  * This routine looks up the ndlp lists for the given WWPN. If WWPN found it
5614  * returns the node element list pointer else return NULL.
5615  */
5616 struct lpfc_nodelist *
5617 lpfc_findnode_wwpn(struct lpfc_vport *vport, struct lpfc_name *wwpn)
5618 {
5619         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
5620         struct lpfc_nodelist *ndlp;
5621
5622         spin_lock_irq(shost->host_lock);
5623         ndlp = __lpfc_find_node(vport, lpfc_filter_by_wwpn, wwpn);
5624         spin_unlock_irq(shost->host_lock);
5625         return ndlp;
5626 }
5627
5628 /*
5629  * This routine looks up the ndlp lists for the given RPI. If the rpi
5630  * is found, the routine returns the node element list pointer else
5631  * return NULL.
5632  */
5633 struct lpfc_nodelist *
5634 lpfc_findnode_rpi(struct lpfc_vport *vport, uint16_t rpi)
5635 {
5636         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
5637         struct lpfc_nodelist *ndlp;
5638
5639         spin_lock_irq(shost->host_lock);
5640         ndlp = __lpfc_findnode_rpi(vport, rpi);
5641         spin_unlock_irq(shost->host_lock);
5642         return ndlp;
5643 }
5644
5645 /**
5646  * lpfc_find_vport_by_vpid - Find a vport on a HBA through vport identifier
5647  * @phba: pointer to lpfc hba data structure.
5648  * @vpi: the physical host virtual N_Port identifier.
5649  *
5650  * This routine finds a vport on a HBA (referred by @phba) through a
5651  * @vpi. The function walks the HBA's vport list and returns the address
5652  * of the vport with the matching @vpi.
5653  *
5654  * Return code
5655  *    NULL - No vport with the matching @vpi found
5656  *    Otherwise - Address to the vport with the matching @vpi.
5657  **/
5658 struct lpfc_vport *
5659 lpfc_find_vport_by_vpid(struct lpfc_hba *phba, uint16_t vpi)
5660 {
5661         struct lpfc_vport *vport;
5662         unsigned long flags;
5663         int i = 0;
5664
5665         /* The physical ports are always vpi 0 - translate is unnecessary. */
5666         if (vpi > 0) {
5667                 /*
5668                  * Translate the physical vpi to the logical vpi.  The
5669                  * vport stores the logical vpi.
5670                  */
5671                 for (i = 0; i < phba->max_vpi; i++) {
5672                         if (vpi == phba->vpi_ids[i])
5673                                 break;
5674                 }
5675
5676                 if (i >= phba->max_vpi) {
5677                         lpfc_printf_log(phba, KERN_ERR, LOG_ELS,
5678                                          "2936 Could not find Vport mapped "
5679                                          "to vpi %d\n", vpi);
5680                         return NULL;
5681                 }
5682         }
5683
5684         spin_lock_irqsave(&phba->hbalock, flags);
5685         list_for_each_entry(vport, &phba->port_list, listentry) {
5686                 if (vport->vpi == i) {
5687                         spin_unlock_irqrestore(&phba->hbalock, flags);
5688                         return vport;
5689                 }
5690         }
5691         spin_unlock_irqrestore(&phba->hbalock, flags);
5692         return NULL;
5693 }
5694
5695 void
5696 lpfc_nlp_init(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
5697               uint32_t did)
5698 {
5699         memset(ndlp, 0, sizeof (struct lpfc_nodelist));
5700
5701         lpfc_initialize_node(vport, ndlp, did);
5702         INIT_LIST_HEAD(&ndlp->nlp_listp);
5703         if (vport->phba->sli_rev == LPFC_SLI_REV4) {
5704                 ndlp->nlp_rpi = lpfc_sli4_alloc_rpi(vport->phba);
5705                 lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
5706                                  "0007 rpi:%x DID:%x flg:%x refcnt:%d "
5707                                  "map:%x %p\n", ndlp->nlp_rpi, ndlp->nlp_DID,
5708                                  ndlp->nlp_flag,
5709                                  atomic_read(&ndlp->kref.refcount),
5710                                  ndlp->nlp_usg_map, ndlp);
5711
5712                 ndlp->active_rrqs_xri_bitmap =
5713                                 mempool_alloc(vport->phba->active_rrq_pool,
5714                                               GFP_KERNEL);
5715                 if (ndlp->active_rrqs_xri_bitmap)
5716                         memset(ndlp->active_rrqs_xri_bitmap, 0,
5717                                ndlp->phba->cfg_rrq_xri_bitmap_sz);
5718         }
5719
5720
5721
5722         lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_NODE,
5723                 "node init:       did:x%x",
5724                 ndlp->nlp_DID, 0, 0);
5725
5726         return;
5727 }
5728
5729 /* This routine releases all resources associated with a specifc NPort's ndlp
5730  * and mempool_free's the nodelist.
5731  */
5732 static void
5733 lpfc_nlp_release(struct kref *kref)
5734 {
5735         struct lpfc_hba *phba;
5736         unsigned long flags;
5737         struct lpfc_nodelist *ndlp = container_of(kref, struct lpfc_nodelist,
5738                                                   kref);
5739
5740         lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_NODE,
5741                 "node release:    did:x%x flg:x%x type:x%x",
5742                 ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_type);
5743
5744         lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_NODE,
5745                         "0279 lpfc_nlp_release: ndlp:x%p did %x "
5746                         "usgmap:x%x refcnt:%d rpi:%x\n",
5747                         (void *)ndlp, ndlp->nlp_DID, ndlp->nlp_usg_map,
5748                         atomic_read(&ndlp->kref.refcount), ndlp->nlp_rpi);
5749
5750         /* remove ndlp from action. */
5751         lpfc_nlp_remove(ndlp->vport, ndlp);
5752
5753         /* clear the ndlp active flag for all release cases */
5754         phba = ndlp->phba;
5755         spin_lock_irqsave(&phba->ndlp_lock, flags);
5756         NLP_CLR_NODE_ACT(ndlp);
5757         spin_unlock_irqrestore(&phba->ndlp_lock, flags);
5758         if (phba->sli_rev == LPFC_SLI_REV4)
5759                 lpfc_sli4_free_rpi(phba, ndlp->nlp_rpi);
5760
5761         /* free ndlp memory for final ndlp release */
5762         if (NLP_CHK_FREE_REQ(ndlp)) {
5763                 kfree(ndlp->lat_data);
5764                 if (phba->sli_rev == LPFC_SLI_REV4)
5765                         mempool_free(ndlp->active_rrqs_xri_bitmap,
5766                                      ndlp->phba->active_rrq_pool);
5767                 mempool_free(ndlp, ndlp->phba->nlp_mem_pool);
5768         }
5769 }
5770
5771 /* This routine bumps the reference count for a ndlp structure to ensure
5772  * that one discovery thread won't free a ndlp while another discovery thread
5773  * is using it.
5774  */
5775 struct lpfc_nodelist *
5776 lpfc_nlp_get(struct lpfc_nodelist *ndlp)
5777 {
5778         struct lpfc_hba *phba;
5779         unsigned long flags;
5780
5781         if (ndlp) {
5782                 lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_NODE,
5783                         "node get:        did:x%x flg:x%x refcnt:x%x",
5784                         ndlp->nlp_DID, ndlp->nlp_flag,
5785                         atomic_read(&ndlp->kref.refcount));
5786                 /* The check of ndlp usage to prevent incrementing the
5787                  * ndlp reference count that is in the process of being
5788                  * released.
5789                  */
5790                 phba = ndlp->phba;
5791                 spin_lock_irqsave(&phba->ndlp_lock, flags);
5792                 if (!NLP_CHK_NODE_ACT(ndlp) || NLP_CHK_FREE_ACK(ndlp)) {
5793                         spin_unlock_irqrestore(&phba->ndlp_lock, flags);
5794                         lpfc_printf_vlog(ndlp->vport, KERN_WARNING, LOG_NODE,
5795                                 "0276 lpfc_nlp_get: ndlp:x%p "
5796                                 "usgmap:x%x refcnt:%d\n",
5797                                 (void *)ndlp, ndlp->nlp_usg_map,
5798                                 atomic_read(&ndlp->kref.refcount));
5799                         return NULL;
5800                 } else
5801                         kref_get(&ndlp->kref);
5802                 spin_unlock_irqrestore(&phba->ndlp_lock, flags);
5803         }
5804         return ndlp;
5805 }
5806
5807 /* This routine decrements the reference count for a ndlp structure. If the
5808  * count goes to 0, this indicates the the associated nodelist should be
5809  * freed. Returning 1 indicates the ndlp resource has been released; on the
5810  * other hand, returning 0 indicates the ndlp resource has not been released
5811  * yet.
5812  */
5813 int
5814 lpfc_nlp_put(struct lpfc_nodelist *ndlp)
5815 {
5816         struct lpfc_hba *phba;
5817         unsigned long flags;
5818
5819         if (!ndlp)
5820                 return 1;
5821
5822         lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_NODE,
5823         "node put:        did:x%x flg:x%x refcnt:x%x",
5824                 ndlp->nlp_DID, ndlp->nlp_flag,
5825                 atomic_read(&ndlp->kref.refcount));
5826         phba = ndlp->phba;
5827         spin_lock_irqsave(&phba->ndlp_lock, flags);
5828         /* Check the ndlp memory free acknowledge flag to avoid the
5829          * possible race condition that kref_put got invoked again
5830          * after previous one has done ndlp memory free.
5831          */
5832         if (NLP_CHK_FREE_ACK(ndlp)) {
5833                 spin_unlock_irqrestore(&phba->ndlp_lock, flags);
5834                 lpfc_printf_vlog(ndlp->vport, KERN_WARNING, LOG_NODE,
5835                                 "0274 lpfc_nlp_put: ndlp:x%p "
5836                                 "usgmap:x%x refcnt:%d\n",
5837                                 (void *)ndlp, ndlp->nlp_usg_map,
5838                                 atomic_read(&ndlp->kref.refcount));
5839                 return 1;
5840         }
5841         /* Check the ndlp inactivate log flag to avoid the possible
5842          * race condition that kref_put got invoked again after ndlp
5843          * is already in inactivating state.
5844          */
5845         if (NLP_CHK_IACT_REQ(ndlp)) {
5846                 spin_unlock_irqrestore(&phba->ndlp_lock, flags);
5847                 lpfc_printf_vlog(ndlp->vport, KERN_WARNING, LOG_NODE,
5848                                 "0275 lpfc_nlp_put: ndlp:x%p "
5849                                 "usgmap:x%x refcnt:%d\n",
5850                                 (void *)ndlp, ndlp->nlp_usg_map,
5851                                 atomic_read(&ndlp->kref.refcount));
5852                 return 1;
5853         }
5854         /* For last put, mark the ndlp usage flags to make sure no
5855          * other kref_get and kref_put on the same ndlp shall get
5856          * in between the process when the final kref_put has been
5857          * invoked on this ndlp.
5858          */
5859         if (atomic_read(&ndlp->kref.refcount) == 1) {
5860                 /* Indicate ndlp is put to inactive state. */
5861                 NLP_SET_IACT_REQ(ndlp);
5862                 /* Acknowledge ndlp memory free has been seen. */
5863                 if (NLP_CHK_FREE_REQ(ndlp))
5864                         NLP_SET_FREE_ACK(ndlp);
5865         }
5866         spin_unlock_irqrestore(&phba->ndlp_lock, flags);
5867         /* Note, the kref_put returns 1 when decrementing a reference
5868          * count that was 1, it invokes the release callback function,
5869          * but it still left the reference count as 1 (not actually
5870          * performs the last decrementation). Otherwise, it actually
5871          * decrements the reference count and returns 0.
5872          */
5873         return kref_put(&ndlp->kref, lpfc_nlp_release);
5874 }
5875
5876 /* This routine free's the specified nodelist if it is not in use
5877  * by any other discovery thread. This routine returns 1 if the
5878  * ndlp has been freed. A return value of 0 indicates the ndlp is
5879  * not yet been released.
5880  */
5881 int
5882 lpfc_nlp_not_used(struct lpfc_nodelist *ndlp)
5883 {
5884         lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_NODE,
5885                 "node not used:   did:x%x flg:x%x refcnt:x%x",
5886                 ndlp->nlp_DID, ndlp->nlp_flag,
5887                 atomic_read(&ndlp->kref.refcount));
5888         if (atomic_read(&ndlp->kref.refcount) == 1)
5889                 if (lpfc_nlp_put(ndlp))
5890                         return 1;
5891         return 0;
5892 }
5893
5894 /**
5895  * lpfc_fcf_inuse - Check if FCF can be unregistered.
5896  * @phba: Pointer to hba context object.
5897  *
5898  * This function iterate through all FC nodes associated
5899  * will all vports to check if there is any node with
5900  * fc_rports associated with it. If there is an fc_rport
5901  * associated with the node, then the node is either in
5902  * discovered state or its devloss_timer is pending.
5903  */
5904 static int
5905 lpfc_fcf_inuse(struct lpfc_hba *phba)
5906 {
5907         struct lpfc_vport **vports;
5908         int i, ret = 0;
5909         struct lpfc_nodelist *ndlp;
5910         struct Scsi_Host  *shost;
5911
5912         vports = lpfc_create_vport_work_array(phba);
5913
5914         /* If driver cannot allocate memory, indicate fcf is in use */
5915         if (!vports)
5916                 return 1;
5917
5918         for (i = 0; i <= phba->max_vports && vports[i] != NULL; i++) {
5919                 shost = lpfc_shost_from_vport(vports[i]);
5920                 spin_lock_irq(shost->host_lock);
5921                 /*
5922                  * IF the CVL_RCVD bit is not set then we have sent the
5923                  * flogi.
5924                  * If dev_loss fires while we are waiting we do not want to
5925                  * unreg the fcf.
5926                  */
5927                 if (!(vports[i]->fc_flag & FC_VPORT_CVL_RCVD)) {
5928                         spin_unlock_irq(shost->host_lock);
5929                         ret =  1;
5930                         goto out;
5931                 }
5932                 list_for_each_entry(ndlp, &vports[i]->fc_nodes, nlp_listp) {
5933                         if (NLP_CHK_NODE_ACT(ndlp) && ndlp->rport &&
5934                           (ndlp->rport->roles & FC_RPORT_ROLE_FCP_TARGET)) {
5935                                 ret = 1;
5936                                 spin_unlock_irq(shost->host_lock);
5937                                 goto out;
5938                         } else if (ndlp->nlp_flag & NLP_RPI_REGISTERED) {
5939                                 ret = 1;
5940                                 lpfc_printf_log(phba, KERN_INFO, LOG_ELS,
5941                                                 "2624 RPI %x DID %x flag %x "
5942                                                 "still logged in\n",
5943                                                 ndlp->nlp_rpi, ndlp->nlp_DID,
5944                                                 ndlp->nlp_flag);
5945                         }
5946                 }
5947                 spin_unlock_irq(shost->host_lock);
5948         }
5949 out:
5950         lpfc_destroy_vport_work_array(phba, vports);
5951         return ret;
5952 }
5953
5954 /**
5955  * lpfc_unregister_vfi_cmpl - Completion handler for unreg vfi.
5956  * @phba: Pointer to hba context object.
5957  * @mboxq: Pointer to mailbox object.
5958  *
5959  * This function frees memory associated with the mailbox command.
5960  */
5961 void
5962 lpfc_unregister_vfi_cmpl(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq)
5963 {
5964         struct lpfc_vport *vport = mboxq->vport;
5965         struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
5966
5967         if (mboxq->u.mb.mbxStatus) {
5968                 lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY|LOG_MBOX,
5969                         "2555 UNREG_VFI mbxStatus error x%x "
5970                         "HBA state x%x\n",
5971                         mboxq->u.mb.mbxStatus, vport->port_state);
5972         }
5973         spin_lock_irq(shost->host_lock);
5974         phba->pport->fc_flag &= ~FC_VFI_REGISTERED;
5975         spin_unlock_irq(shost->host_lock);
5976         mempool_free(mboxq, phba->mbox_mem_pool);
5977         return;
5978 }
5979
5980 /**
5981  * lpfc_unregister_fcfi_cmpl - Completion handler for unreg fcfi.
5982  * @phba: Pointer to hba context object.
5983  * @mboxq: Pointer to mailbox object.
5984  *
5985  * This function frees memory associated with the mailbox command.
5986  */
5987 static void
5988 lpfc_unregister_fcfi_cmpl(struct lpfc_hba *phba, LPFC_MBOXQ_t *mboxq)
5989 {
5990         struct lpfc_vport *vport = mboxq->vport;
5991
5992         if (mboxq->u.mb.mbxStatus) {
5993                 lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY|LOG_MBOX,
5994                         "2550 UNREG_FCFI mbxStatus error x%x "
5995                         "HBA state x%x\n",
5996                         mboxq->u.mb.mbxStatus, vport->port_state);
5997         }
5998         mempool_free(mboxq, phba->mbox_mem_pool);
5999         return;
6000 }
6001
6002 /**
6003  * lpfc_unregister_fcf_prep - Unregister fcf record preparation
6004  * @phba: Pointer to hba context object.
6005  *
6006  * This function prepare the HBA for unregistering the currently registered
6007  * FCF from the HBA. It performs unregistering, in order, RPIs, VPIs, and
6008  * VFIs.
6009  */
6010 int
6011 lpfc_unregister_fcf_prep(struct lpfc_hba *phba)
6012 {
6013         struct lpfc_vport **vports;
6014         struct lpfc_nodelist *ndlp;
6015         struct Scsi_Host *shost;
6016         int i = 0, rc;
6017
6018         /* Unregister RPIs */
6019         if (lpfc_fcf_inuse(phba))
6020                 lpfc_unreg_hba_rpis(phba);
6021
6022         /* At this point, all discovery is aborted */
6023         phba->pport->port_state = LPFC_VPORT_UNKNOWN;
6024
6025         /* Unregister VPIs */
6026         vports = lpfc_create_vport_work_array(phba);
6027         if (vports && (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED))
6028                 for (i = 0; i <= phba->max_vports && vports[i] != NULL; i++) {
6029                         /* Stop FLOGI/FDISC retries */
6030                         ndlp = lpfc_findnode_did(vports[i], Fabric_DID);
6031                         if (ndlp)
6032                                 lpfc_cancel_retry_delay_tmo(vports[i], ndlp);
6033                         lpfc_cleanup_pending_mbox(vports[i]);
6034                         if (phba->sli_rev == LPFC_SLI_REV4)
6035                                 lpfc_sli4_unreg_all_rpis(vports[i]);
6036                         lpfc_mbx_unreg_vpi(vports[i]);
6037                         shost = lpfc_shost_from_vport(vports[i]);
6038                         spin_lock_irq(shost->host_lock);
6039                         vports[i]->fc_flag |= FC_VPORT_NEEDS_INIT_VPI;
6040                         vports[i]->vpi_state &= ~LPFC_VPI_REGISTERED;
6041                         spin_unlock_irq(shost->host_lock);
6042                 }
6043         lpfc_destroy_vport_work_array(phba, vports);
6044         if (i == 0 && (!(phba->sli3_options & LPFC_SLI3_NPIV_ENABLED))) {
6045                 ndlp = lpfc_findnode_did(phba->pport, Fabric_DID);
6046                 if (ndlp)
6047                         lpfc_cancel_retry_delay_tmo(phba->pport, ndlp);
6048                 lpfc_cleanup_pending_mbox(phba->pport);
6049                 if (phba->sli_rev == LPFC_SLI_REV4)
6050                         lpfc_sli4_unreg_all_rpis(phba->pport);
6051                 lpfc_mbx_unreg_vpi(phba->pport);
6052                 shost = lpfc_shost_from_vport(phba->pport);
6053                 spin_lock_irq(shost->host_lock);
6054                 phba->pport->fc_flag |= FC_VPORT_NEEDS_INIT_VPI;
6055                 phba->pport->vpi_state &= ~LPFC_VPI_REGISTERED;
6056                 spin_unlock_irq(shost->host_lock);
6057         }
6058
6059         /* Cleanup any outstanding ELS commands */
6060         lpfc_els_flush_all_cmd(phba);
6061
6062         /* Unregister the physical port VFI */
6063         rc = lpfc_issue_unreg_vfi(phba->pport);
6064         return rc;
6065 }
6066
6067 /**
6068  * lpfc_sli4_unregister_fcf - Unregister currently registered FCF record
6069  * @phba: Pointer to hba context object.
6070  *
6071  * This function issues synchronous unregister FCF mailbox command to HBA to
6072  * unregister the currently registered FCF record. The driver does not reset
6073  * the driver FCF usage state flags.
6074  *
6075  * Return 0 if successfully issued, none-zero otherwise.
6076  */
6077 int
6078 lpfc_sli4_unregister_fcf(struct lpfc_hba *phba)
6079 {
6080         LPFC_MBOXQ_t *mbox;
6081         int rc;
6082
6083         mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
6084         if (!mbox) {
6085                 lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY|LOG_MBOX,
6086                                 "2551 UNREG_FCFI mbox allocation failed"
6087                                 "HBA state x%x\n", phba->pport->port_state);
6088                 return -ENOMEM;
6089         }
6090         lpfc_unreg_fcfi(mbox, phba->fcf.fcfi);
6091         mbox->vport = phba->pport;
6092         mbox->mbox_cmpl = lpfc_unregister_fcfi_cmpl;
6093         rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
6094
6095         if (rc == MBX_NOT_FINISHED) {
6096                 lpfc_printf_log(phba, KERN_ERR, LOG_SLI,
6097                                 "2552 Unregister FCFI command failed rc x%x "
6098                                 "HBA state x%x\n",
6099                                 rc, phba->pport->port_state);
6100                 return -EINVAL;
6101         }
6102         return 0;
6103 }
6104
6105 /**
6106  * lpfc_unregister_fcf_rescan - Unregister currently registered fcf and rescan
6107  * @phba: Pointer to hba context object.
6108  *
6109  * This function unregisters the currently reigstered FCF. This function
6110  * also tries to find another FCF for discovery by rescan the HBA FCF table.
6111  */
6112 void
6113 lpfc_unregister_fcf_rescan(struct lpfc_hba *phba)
6114 {
6115         int rc;
6116
6117         /* Preparation for unregistering fcf */
6118         rc = lpfc_unregister_fcf_prep(phba);
6119         if (rc) {
6120                 lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY,
6121                                 "2748 Failed to prepare for unregistering "
6122                                 "HBA's FCF record: rc=%d\n", rc);
6123                 return;
6124         }
6125
6126         /* Now, unregister FCF record and reset HBA FCF state */
6127         rc = lpfc_sli4_unregister_fcf(phba);
6128         if (rc)
6129                 return;
6130         /* Reset HBA FCF states after successful unregister FCF */
6131         phba->fcf.fcf_flag = 0;
6132         phba->fcf.current_rec.flag = 0;
6133
6134         /*
6135          * If driver is not unloading, check if there is any other
6136          * FCF record that can be used for discovery.
6137          */
6138         if ((phba->pport->load_flag & FC_UNLOADING) ||
6139             (phba->link_state < LPFC_LINK_UP))
6140                 return;
6141
6142         /* This is considered as the initial FCF discovery scan */
6143         spin_lock_irq(&phba->hbalock);
6144         phba->fcf.fcf_flag |= FCF_INIT_DISC;
6145         spin_unlock_irq(&phba->hbalock);
6146
6147         /* Reset FCF roundrobin bmask for new discovery */
6148         lpfc_sli4_clear_fcf_rr_bmask(phba);
6149
6150         rc = lpfc_sli4_fcf_scan_read_fcf_rec(phba, LPFC_FCOE_FCF_GET_FIRST);
6151
6152         if (rc) {
6153                 spin_lock_irq(&phba->hbalock);
6154                 phba->fcf.fcf_flag &= ~FCF_INIT_DISC;
6155                 spin_unlock_irq(&phba->hbalock);
6156                 lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY|LOG_MBOX,
6157                                 "2553 lpfc_unregister_unused_fcf failed "
6158                                 "to read FCF record HBA state x%x\n",
6159                                 phba->pport->port_state);
6160         }
6161 }
6162
6163 /**
6164  * lpfc_unregister_fcf - Unregister the currently registered fcf record
6165  * @phba: Pointer to hba context object.
6166  *
6167  * This function just unregisters the currently reigstered FCF. It does not
6168  * try to find another FCF for discovery.
6169  */
6170 void
6171 lpfc_unregister_fcf(struct lpfc_hba *phba)
6172 {
6173         int rc;
6174
6175         /* Preparation for unregistering fcf */
6176         rc = lpfc_unregister_fcf_prep(phba);
6177         if (rc) {
6178                 lpfc_printf_log(phba, KERN_ERR, LOG_DISCOVERY,
6179                                 "2749 Failed to prepare for unregistering "
6180                                 "HBA's FCF record: rc=%d\n", rc);
6181                 return;
6182         }
6183
6184         /* Now, unregister FCF record and reset HBA FCF state */
6185         rc = lpfc_sli4_unregister_fcf(phba);
6186         if (rc)
6187                 return;
6188         /* Set proper HBA FCF states after successful unregister FCF */
6189         spin_lock_irq(&phba->hbalock);
6190         phba->fcf.fcf_flag &= ~FCF_REGISTERED;
6191         spin_unlock_irq(&phba->hbalock);
6192 }
6193
6194 /**
6195  * lpfc_unregister_unused_fcf - Unregister FCF if all devices are disconnected.
6196  * @phba: Pointer to hba context object.
6197  *
6198  * This function check if there are any connected remote port for the FCF and
6199  * if all the devices are disconnected, this function unregister FCFI.
6200  * This function also tries to use another FCF for discovery.
6201  */
6202 void
6203 lpfc_unregister_unused_fcf(struct lpfc_hba *phba)
6204 {
6205         /*
6206          * If HBA is not running in FIP mode, if HBA does not support
6207          * FCoE, if FCF discovery is ongoing, or if FCF has not been
6208          * registered, do nothing.
6209          */
6210         spin_lock_irq(&phba->hbalock);
6211         if (!(phba->hba_flag & HBA_FCOE_MODE) ||
6212             !(phba->fcf.fcf_flag & FCF_REGISTERED) ||
6213             !(phba->hba_flag & HBA_FIP_SUPPORT) ||
6214             (phba->fcf.fcf_flag & FCF_DISCOVERY) ||
6215             (phba->pport->port_state == LPFC_FLOGI)) {
6216                 spin_unlock_irq(&phba->hbalock);
6217                 return;
6218         }
6219         spin_unlock_irq(&phba->hbalock);
6220
6221         if (lpfc_fcf_inuse(phba))
6222                 return;
6223
6224         lpfc_unregister_fcf_rescan(phba);
6225 }
6226
6227 /**
6228  * lpfc_read_fcf_conn_tbl - Create driver FCF connection table.
6229  * @phba: Pointer to hba context object.
6230  * @buff: Buffer containing the FCF connection table as in the config
6231  *         region.
6232  * This function create driver data structure for the FCF connection
6233  * record table read from config region 23.
6234  */
6235 static void
6236 lpfc_read_fcf_conn_tbl(struct lpfc_hba *phba,
6237         uint8_t *buff)
6238 {
6239         struct lpfc_fcf_conn_entry *conn_entry, *next_conn_entry;
6240         struct lpfc_fcf_conn_hdr *conn_hdr;
6241         struct lpfc_fcf_conn_rec *conn_rec;
6242         uint32_t record_count;
6243         int i;
6244
6245         /* Free the current connect table */
6246         list_for_each_entry_safe(conn_entry, next_conn_entry,
6247                 &phba->fcf_conn_rec_list, list) {
6248                 list_del_init(&conn_entry->list);
6249                 kfree(conn_entry);
6250         }
6251
6252         conn_hdr = (struct lpfc_fcf_conn_hdr *) buff;
6253         record_count = conn_hdr->length * sizeof(uint32_t)/
6254                 sizeof(struct lpfc_fcf_conn_rec);
6255
6256         conn_rec = (struct lpfc_fcf_conn_rec *)
6257                 (buff + sizeof(struct lpfc_fcf_conn_hdr));
6258
6259         for (i = 0; i < record_count; i++) {
6260                 if (!(conn_rec[i].flags & FCFCNCT_VALID))
6261                         continue;
6262                 conn_entry = kzalloc(sizeof(struct lpfc_fcf_conn_entry),
6263                         GFP_KERNEL);
6264                 if (!conn_entry) {
6265                         lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
6266                                 "2566 Failed to allocate connection"
6267                                 " table entry\n");
6268                         return;
6269                 }
6270
6271                 memcpy(&conn_entry->conn_rec, &conn_rec[i],
6272                         sizeof(struct lpfc_fcf_conn_rec));
6273                 list_add_tail(&conn_entry->list,
6274                         &phba->fcf_conn_rec_list);
6275         }
6276
6277         if (!list_empty(&phba->fcf_conn_rec_list)) {
6278                 i = 0;
6279                 list_for_each_entry(conn_entry, &phba->fcf_conn_rec_list,
6280                                     list) {
6281                         conn_rec = &conn_entry->conn_rec;
6282                         lpfc_printf_log(phba, KERN_INFO, LOG_INIT,
6283                                         "3345 FCF connection list rec[%02d]: "
6284                                         "flags:x%04x, vtag:x%04x, "
6285                                         "fabric_name:x%02x:%02x:%02x:%02x:"
6286                                         "%02x:%02x:%02x:%02x, "
6287                                         "switch_name:x%02x:%02x:%02x:%02x:"
6288                                         "%02x:%02x:%02x:%02x\n", i++,
6289                                         conn_rec->flags, conn_rec->vlan_tag,
6290                                         conn_rec->fabric_name[0],
6291                                         conn_rec->fabric_name[1],
6292                                         conn_rec->fabric_name[2],
6293                                         conn_rec->fabric_name[3],
6294                                         conn_rec->fabric_name[4],
6295                                         conn_rec->fabric_name[5],
6296                                         conn_rec->fabric_name[6],
6297                                         conn_rec->fabric_name[7],
6298                                         conn_rec->switch_name[0],
6299                                         conn_rec->switch_name[1],
6300                                         conn_rec->switch_name[2],
6301                                         conn_rec->switch_name[3],
6302                                         conn_rec->switch_name[4],
6303                                         conn_rec->switch_name[5],
6304                                         conn_rec->switch_name[6],
6305                                         conn_rec->switch_name[7]);
6306                 }
6307         }
6308 }
6309
6310 /**
6311  * lpfc_read_fcoe_param - Read FCoe parameters from conf region..
6312  * @phba: Pointer to hba context object.
6313  * @buff: Buffer containing the FCoE parameter data structure.
6314  *
6315  *  This function update driver data structure with config
6316  *  parameters read from config region 23.
6317  */
6318 static void
6319 lpfc_read_fcoe_param(struct lpfc_hba *phba,
6320                         uint8_t *buff)
6321 {
6322         struct lpfc_fip_param_hdr *fcoe_param_hdr;
6323         struct lpfc_fcoe_params *fcoe_param;
6324
6325         fcoe_param_hdr = (struct lpfc_fip_param_hdr *)
6326                 buff;
6327         fcoe_param = (struct lpfc_fcoe_params *)
6328                 (buff + sizeof(struct lpfc_fip_param_hdr));
6329
6330         if ((fcoe_param_hdr->parm_version != FIPP_VERSION) ||
6331                 (fcoe_param_hdr->length != FCOE_PARAM_LENGTH))
6332                 return;
6333
6334         if (fcoe_param_hdr->parm_flags & FIPP_VLAN_VALID) {
6335                 phba->valid_vlan = 1;
6336                 phba->vlan_id = le16_to_cpu(fcoe_param->vlan_tag) &
6337                         0xFFF;
6338         }
6339
6340         phba->fc_map[0] = fcoe_param->fc_map[0];
6341         phba->fc_map[1] = fcoe_param->fc_map[1];
6342         phba->fc_map[2] = fcoe_param->fc_map[2];
6343         return;
6344 }
6345
6346 /**
6347  * lpfc_get_rec_conf23 - Get a record type in config region data.
6348  * @buff: Buffer containing config region 23 data.
6349  * @size: Size of the data buffer.
6350  * @rec_type: Record type to be searched.
6351  *
6352  * This function searches config region data to find the beginning
6353  * of the record specified by record_type. If record found, this
6354  * function return pointer to the record else return NULL.
6355  */
6356 static uint8_t *
6357 lpfc_get_rec_conf23(uint8_t *buff, uint32_t size, uint8_t rec_type)
6358 {
6359         uint32_t offset = 0, rec_length;
6360
6361         if ((buff[0] == LPFC_REGION23_LAST_REC) ||
6362                 (size < sizeof(uint32_t)))
6363                 return NULL;
6364
6365         rec_length = buff[offset + 1];
6366
6367         /*
6368          * One TLV record has one word header and number of data words
6369          * specified in the rec_length field of the record header.
6370          */
6371         while ((offset + rec_length * sizeof(uint32_t) + sizeof(uint32_t))
6372                 <= size) {
6373                 if (buff[offset] == rec_type)
6374                         return &buff[offset];
6375
6376                 if (buff[offset] == LPFC_REGION23_LAST_REC)
6377                         return NULL;
6378
6379                 offset += rec_length * sizeof(uint32_t) + sizeof(uint32_t);
6380                 rec_length = buff[offset + 1];
6381         }
6382         return NULL;
6383 }
6384
6385 /**
6386  * lpfc_parse_fcoe_conf - Parse FCoE config data read from config region 23.
6387  * @phba: Pointer to lpfc_hba data structure.
6388  * @buff: Buffer containing config region 23 data.
6389  * @size: Size of the data buffer.
6390  *
6391  * This function parses the FCoE config parameters in config region 23 and
6392  * populate driver data structure with the parameters.
6393  */
6394 void
6395 lpfc_parse_fcoe_conf(struct lpfc_hba *phba,
6396                 uint8_t *buff,
6397                 uint32_t size)
6398 {
6399         uint32_t offset = 0;
6400         uint8_t *rec_ptr;
6401
6402         /*
6403          * If data size is less than 2 words signature and version cannot be
6404          * verified.
6405          */
6406         if (size < 2*sizeof(uint32_t))
6407                 return;
6408
6409         /* Check the region signature first */
6410         if (memcmp(buff, LPFC_REGION23_SIGNATURE, 4)) {
6411                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
6412                         "2567 Config region 23 has bad signature\n");
6413                 return;
6414         }
6415
6416         offset += 4;
6417
6418         /* Check the data structure version */
6419         if (buff[offset] != LPFC_REGION23_VERSION) {
6420                 lpfc_printf_log(phba, KERN_ERR, LOG_INIT,
6421                         "2568 Config region 23 has bad version\n");
6422                 return;
6423         }
6424         offset += 4;
6425
6426         /* Read FCoE param record */
6427         rec_ptr = lpfc_get_rec_conf23(&buff[offset],
6428                         size - offset, FCOE_PARAM_TYPE);
6429         if (rec_ptr)
6430                 lpfc_read_fcoe_param(phba, rec_ptr);
6431
6432         /* Read FCF connection table */
6433         rec_ptr = lpfc_get_rec_conf23(&buff[offset],
6434                 size - offset, FCOE_CONN_TBL_TYPE);
6435         if (rec_ptr)
6436                 lpfc_read_fcf_conn_tbl(phba, rec_ptr);
6437
6438 }