xref: /openbmc/linux/drivers/scsi/lpfc/lpfc_hbadisc.c (revision f42b3800)
1 /*******************************************************************
2  * This file is part of the Emulex Linux Device Driver for         *
3  * Fibre Channel Host Bus Adapters.                                *
4  * Copyright (C) 2004-2008 Emulex.  All rights reserved.           *
5  * EMULEX and SLI are trademarks of Emulex.                        *
6  * www.emulex.com                                                  *
7  * Portions Copyright (C) 2004-2005 Christoph Hellwig              *
8  *                                                                 *
9  * This program is free software; you can redistribute it and/or   *
10  * modify it under the terms of version 2 of the GNU General       *
11  * Public License as published by the Free Software Foundation.    *
12  * This program is distributed in the hope that it will be useful. *
13  * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND          *
14  * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY,  *
15  * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE      *
16  * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD *
17  * TO BE LEGALLY INVALID.  See the GNU General Public License for  *
18  * more details, a copy of which can be found in the file COPYING  *
19  * included with this package.                                     *
20  *******************************************************************/
21 
22 #include <linux/blkdev.h>
23 #include <linux/pci.h>
24 #include <linux/kthread.h>
25 #include <linux/interrupt.h>
26 
27 #include <scsi/scsi.h>
28 #include <scsi/scsi_device.h>
29 #include <scsi/scsi_host.h>
30 #include <scsi/scsi_transport_fc.h>
31 
32 #include "lpfc_hw.h"
33 #include "lpfc_disc.h"
34 #include "lpfc_sli.h"
35 #include "lpfc_scsi.h"
36 #include "lpfc.h"
37 #include "lpfc_logmsg.h"
38 #include "lpfc_crtn.h"
39 #include "lpfc_vport.h"
40 #include "lpfc_debugfs.h"
41 
42 /* AlpaArray for assignment of scsid for scan-down and bind_method */
43 static uint8_t lpfcAlpaArray[] = {
44 	0xEF, 0xE8, 0xE4, 0xE2, 0xE1, 0xE0, 0xDC, 0xDA, 0xD9, 0xD6,
45 	0xD5, 0xD4, 0xD3, 0xD2, 0xD1, 0xCE, 0xCD, 0xCC, 0xCB, 0xCA,
46 	0xC9, 0xC7, 0xC6, 0xC5, 0xC3, 0xBC, 0xBA, 0xB9, 0xB6, 0xB5,
47 	0xB4, 0xB3, 0xB2, 0xB1, 0xAE, 0xAD, 0xAC, 0xAB, 0xAA, 0xA9,
48 	0xA7, 0xA6, 0xA5, 0xA3, 0x9F, 0x9E, 0x9D, 0x9B, 0x98, 0x97,
49 	0x90, 0x8F, 0x88, 0x84, 0x82, 0x81, 0x80, 0x7C, 0x7A, 0x79,
50 	0x76, 0x75, 0x74, 0x73, 0x72, 0x71, 0x6E, 0x6D, 0x6C, 0x6B,
51 	0x6A, 0x69, 0x67, 0x66, 0x65, 0x63, 0x5C, 0x5A, 0x59, 0x56,
52 	0x55, 0x54, 0x53, 0x52, 0x51, 0x4E, 0x4D, 0x4C, 0x4B, 0x4A,
53 	0x49, 0x47, 0x46, 0x45, 0x43, 0x3C, 0x3A, 0x39, 0x36, 0x35,
54 	0x34, 0x33, 0x32, 0x31, 0x2E, 0x2D, 0x2C, 0x2B, 0x2A, 0x29,
55 	0x27, 0x26, 0x25, 0x23, 0x1F, 0x1E, 0x1D, 0x1B, 0x18, 0x17,
56 	0x10, 0x0F, 0x08, 0x04, 0x02, 0x01
57 };
58 
59 static void lpfc_disc_timeout_handler(struct lpfc_vport *);
60 static void lpfc_disc_flush_list(struct lpfc_vport *vport);
61 
62 void
63 lpfc_terminate_rport_io(struct fc_rport *rport)
64 {
65 	struct lpfc_rport_data *rdata;
66 	struct lpfc_nodelist * ndlp;
67 	struct lpfc_hba *phba;
68 
69 	rdata = rport->dd_data;
70 	ndlp = rdata->pnode;
71 
72 	if (!ndlp || !NLP_CHK_NODE_ACT(ndlp)) {
73 		if (rport->roles & FC_RPORT_ROLE_FCP_TARGET)
74 			printk(KERN_ERR "Cannot find remote node"
75 			" to terminate I/O Data x%x\n",
76 			rport->port_id);
77 		return;
78 	}
79 
80 	phba  = ndlp->vport->phba;
81 
82 	lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_RPORT,
83 		"rport terminate: sid:x%x did:x%x flg:x%x",
84 		ndlp->nlp_sid, ndlp->nlp_DID, ndlp->nlp_flag);
85 
86 	if (ndlp->nlp_sid != NLP_NO_SID) {
87 		lpfc_sli_abort_iocb(ndlp->vport,
88 			&phba->sli.ring[phba->sli.fcp_ring],
89 			ndlp->nlp_sid, 0, LPFC_CTX_TGT);
90 	}
91 
92 	/*
93 	 * A device is normally blocked for rediscovery and unblocked when
94 	 * devloss timeout happens.  In case a vport is removed or driver
95 	 * unloaded before devloss timeout happens, we need to unblock here.
96 	 */
97 	scsi_target_unblock(&rport->dev);
98 	return;
99 }
100 
101 /*
102  * This function will be called when dev_loss_tmo fire.
103  */
104 void
105 lpfc_dev_loss_tmo_callbk(struct fc_rport *rport)
106 {
107 	struct lpfc_rport_data *rdata;
108 	struct lpfc_nodelist * ndlp;
109 	struct lpfc_vport *vport;
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 	/* Don't defer this if we are in the process of deleting the vport
128 	 * or unloading the driver. The unload will cleanup the node
129 	 * appropriately we just need to cleanup the ndlp rport info here.
130 	 */
131 	if (vport->load_flag & FC_UNLOADING) {
132 		put_node = rdata->pnode != NULL;
133 		put_rport = ndlp->rport != NULL;
134 		rdata->pnode = NULL;
135 		ndlp->rport = NULL;
136 		if (put_node)
137 			lpfc_nlp_put(ndlp);
138 		if (put_rport)
139 			put_device(&rport->dev);
140 		return;
141 	}
142 
143 	if (ndlp->nlp_state == NLP_STE_MAPPED_NODE)
144 		return;
145 
146 	evtp = &ndlp->dev_loss_evt;
147 
148 	if (!list_empty(&evtp->evt_listp))
149 		return;
150 
151 	spin_lock_irq(&phba->hbalock);
152 	/* We need to hold the node by incrementing the reference
153 	 * count until this queued work is done
154 	 */
155 	evtp->evt_arg1  = lpfc_nlp_get(ndlp);
156 	evtp->evt       = LPFC_EVT_DEV_LOSS;
157 	list_add_tail(&evtp->evt_listp, &phba->work_list);
158 	if (phba->work_wait)
159 		wake_up(phba->work_wait);
160 
161 	spin_unlock_irq(&phba->hbalock);
162 
163 	return;
164 }
165 
166 /*
167  * This function is called from the worker thread when dev_loss_tmo
168  * expire.
169  */
170 static void
171 lpfc_dev_loss_tmo_handler(struct lpfc_nodelist *ndlp)
172 {
173 	struct lpfc_rport_data *rdata;
174 	struct fc_rport   *rport;
175 	struct lpfc_vport *vport;
176 	struct lpfc_hba   *phba;
177 	uint8_t *name;
178 	int  put_node;
179 	int  put_rport;
180 	int warn_on = 0;
181 
182 	rport = ndlp->rport;
183 
184 	if (!rport)
185 		return;
186 
187 	rdata = rport->dd_data;
188 	name = (uint8_t *) &ndlp->nlp_portname;
189 	vport = ndlp->vport;
190 	phba  = vport->phba;
191 
192 	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_RPORT,
193 		"rport devlosstmo:did:x%x type:x%x id:x%x",
194 		ndlp->nlp_DID, ndlp->nlp_type, rport->scsi_target_id);
195 
196 	/* Don't defer this if we are in the process of deleting the vport
197 	 * or unloading the driver. The unload will cleanup the node
198 	 * appropriately we just need to cleanup the ndlp rport info here.
199 	 */
200 	if (vport->load_flag & FC_UNLOADING) {
201 		if (ndlp->nlp_sid != NLP_NO_SID) {
202 			/* flush the target */
203 			lpfc_sli_abort_iocb(vport,
204 					&phba->sli.ring[phba->sli.fcp_ring],
205 					ndlp->nlp_sid, 0, LPFC_CTX_TGT);
206 		}
207 		put_node = rdata->pnode != NULL;
208 		put_rport = ndlp->rport != NULL;
209 		rdata->pnode = NULL;
210 		ndlp->rport = NULL;
211 		if (put_node)
212 			lpfc_nlp_put(ndlp);
213 		if (put_rport)
214 			put_device(&rport->dev);
215 		return;
216 	}
217 
218 	if (ndlp->nlp_state == NLP_STE_MAPPED_NODE)
219 		return;
220 
221 	if (ndlp->nlp_type & NLP_FABRIC) {
222 		/* We will clean up these Nodes in linkup */
223 		put_node = rdata->pnode != NULL;
224 		put_rport = ndlp->rport != NULL;
225 		rdata->pnode = NULL;
226 		ndlp->rport = NULL;
227 		if (put_node)
228 			lpfc_nlp_put(ndlp);
229 		if (put_rport)
230 			put_device(&rport->dev);
231 		return;
232 	}
233 
234 	if (ndlp->nlp_sid != NLP_NO_SID) {
235 		warn_on = 1;
236 		/* flush the target */
237 		lpfc_sli_abort_iocb(vport, &phba->sli.ring[phba->sli.fcp_ring],
238 				    ndlp->nlp_sid, 0, LPFC_CTX_TGT);
239 	}
240 	if (vport->load_flag & FC_UNLOADING)
241 		warn_on = 0;
242 
243 	if (warn_on) {
244 		lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
245 				 "0203 Devloss timeout on "
246 				 "WWPN %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x "
247 				 "NPort x%06x Data: x%x x%x x%x\n",
248 				 *name, *(name+1), *(name+2), *(name+3),
249 				 *(name+4), *(name+5), *(name+6), *(name+7),
250 				 ndlp->nlp_DID, ndlp->nlp_flag,
251 				 ndlp->nlp_state, ndlp->nlp_rpi);
252 	} else {
253 		lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
254 				 "0204 Devloss timeout on "
255 				 "WWPN %02x:%02x:%02x:%02x:%02x:%02x:%02x:%02x "
256 				 "NPort x%06x Data: x%x x%x x%x\n",
257 				 *name, *(name+1), *(name+2), *(name+3),
258 				 *(name+4), *(name+5), *(name+6), *(name+7),
259 				 ndlp->nlp_DID, ndlp->nlp_flag,
260 				 ndlp->nlp_state, ndlp->nlp_rpi);
261 	}
262 
263 	put_node = rdata->pnode != NULL;
264 	put_rport = ndlp->rport != NULL;
265 	rdata->pnode = NULL;
266 	ndlp->rport = NULL;
267 	if (put_node)
268 		lpfc_nlp_put(ndlp);
269 	if (put_rport)
270 		put_device(&rport->dev);
271 
272 	if (!(vport->load_flag & FC_UNLOADING) &&
273 	    !(ndlp->nlp_flag & NLP_DELAY_TMO) &&
274 	    !(ndlp->nlp_flag & NLP_NPR_2B_DISC) &&
275 	    (ndlp->nlp_state != NLP_STE_UNMAPPED_NODE))
276 		lpfc_disc_state_machine(vport, ndlp, NULL, NLP_EVT_DEVICE_RM);
277 }
278 
279 
280 void
281 lpfc_worker_wake_up(struct lpfc_hba *phba)
282 {
283 	wake_up(phba->work_wait);
284 	return;
285 }
286 
287 static void
288 lpfc_work_list_done(struct lpfc_hba *phba)
289 {
290 	struct lpfc_work_evt  *evtp = NULL;
291 	struct lpfc_nodelist  *ndlp;
292 	int free_evt;
293 
294 	spin_lock_irq(&phba->hbalock);
295 	while (!list_empty(&phba->work_list)) {
296 		list_remove_head((&phba->work_list), evtp, typeof(*evtp),
297 				 evt_listp);
298 		spin_unlock_irq(&phba->hbalock);
299 		free_evt = 1;
300 		switch (evtp->evt) {
301 		case LPFC_EVT_ELS_RETRY:
302 			ndlp = (struct lpfc_nodelist *) (evtp->evt_arg1);
303 			lpfc_els_retry_delay_handler(ndlp);
304 			free_evt = 0; /* evt is part of ndlp */
305 			/* decrement the node reference count held
306 			 * for this queued work
307 			 */
308 			lpfc_nlp_put(ndlp);
309 			break;
310 		case LPFC_EVT_DEV_LOSS:
311 			ndlp = (struct lpfc_nodelist *)(evtp->evt_arg1);
312 			lpfc_dev_loss_tmo_handler(ndlp);
313 			free_evt = 0;
314 			/* decrement the node reference count held for
315 			 * this queued work
316 			 */
317 			lpfc_nlp_put(ndlp);
318 			break;
319 		case LPFC_EVT_ONLINE:
320 			if (phba->link_state < LPFC_LINK_DOWN)
321 				*(int *) (evtp->evt_arg1) = lpfc_online(phba);
322 			else
323 				*(int *) (evtp->evt_arg1) = 0;
324 			complete((struct completion *)(evtp->evt_arg2));
325 			break;
326 		case LPFC_EVT_OFFLINE_PREP:
327 			if (phba->link_state >= LPFC_LINK_DOWN)
328 				lpfc_offline_prep(phba);
329 			*(int *)(evtp->evt_arg1) = 0;
330 			complete((struct completion *)(evtp->evt_arg2));
331 			break;
332 		case LPFC_EVT_OFFLINE:
333 			lpfc_offline(phba);
334 			lpfc_sli_brdrestart(phba);
335 			*(int *)(evtp->evt_arg1) =
336 				lpfc_sli_brdready(phba, HS_FFRDY | HS_MBRDY);
337 			lpfc_unblock_mgmt_io(phba);
338 			complete((struct completion *)(evtp->evt_arg2));
339 			break;
340 		case LPFC_EVT_WARM_START:
341 			lpfc_offline(phba);
342 			lpfc_reset_barrier(phba);
343 			lpfc_sli_brdreset(phba);
344 			lpfc_hba_down_post(phba);
345 			*(int *)(evtp->evt_arg1) =
346 				lpfc_sli_brdready(phba, HS_MBRDY);
347 			lpfc_unblock_mgmt_io(phba);
348 			complete((struct completion *)(evtp->evt_arg2));
349 			break;
350 		case LPFC_EVT_KILL:
351 			lpfc_offline(phba);
352 			*(int *)(evtp->evt_arg1)
353 				= (phba->pport->stopped)
354 				        ? 0 : lpfc_sli_brdkill(phba);
355 			lpfc_unblock_mgmt_io(phba);
356 			complete((struct completion *)(evtp->evt_arg2));
357 			break;
358 		}
359 		if (free_evt)
360 			kfree(evtp);
361 		spin_lock_irq(&phba->hbalock);
362 	}
363 	spin_unlock_irq(&phba->hbalock);
364 
365 }
366 
367 static void
368 lpfc_work_done(struct lpfc_hba *phba)
369 {
370 	struct lpfc_sli_ring *pring;
371 	uint32_t ha_copy, status, control, work_port_events;
372 	struct lpfc_vport **vports;
373 	struct lpfc_vport *vport;
374 	int i;
375 
376 	spin_lock_irq(&phba->hbalock);
377 	ha_copy = phba->work_ha;
378 	phba->work_ha = 0;
379 	spin_unlock_irq(&phba->hbalock);
380 
381 	if (ha_copy & HA_ERATT)
382 		lpfc_handle_eratt(phba);
383 
384 	if (ha_copy & HA_MBATT)
385 		lpfc_sli_handle_mb_event(phba);
386 
387 	if (ha_copy & HA_LATT)
388 		lpfc_handle_latt(phba);
389 	vports = lpfc_create_vport_work_array(phba);
390 	if (vports != NULL)
391 		for(i = 0; i <= phba->max_vpi; i++) {
392 			/*
393 			 * We could have no vports in array if unloading, so if
394 			 * this happens then just use the pport
395 			 */
396 			if (vports[i] == NULL && i == 0)
397 				vport = phba->pport;
398 			else
399 				vport = vports[i];
400 			if (vport == NULL)
401 				break;
402 			spin_lock_irq(&vport->work_port_lock);
403 			work_port_events = vport->work_port_events;
404 			vport->work_port_events &= ~work_port_events;
405 			spin_unlock_irq(&vport->work_port_lock);
406 			if (work_port_events & WORKER_DISC_TMO)
407 				lpfc_disc_timeout_handler(vport);
408 			if (work_port_events & WORKER_ELS_TMO)
409 				lpfc_els_timeout_handler(vport);
410 			if (work_port_events & WORKER_HB_TMO)
411 				lpfc_hb_timeout_handler(phba);
412 			if (work_port_events & WORKER_MBOX_TMO)
413 				lpfc_mbox_timeout_handler(phba);
414 			if (work_port_events & WORKER_FABRIC_BLOCK_TMO)
415 				lpfc_unblock_fabric_iocbs(phba);
416 			if (work_port_events & WORKER_FDMI_TMO)
417 				lpfc_fdmi_timeout_handler(vport);
418 			if (work_port_events & WORKER_RAMP_DOWN_QUEUE)
419 				lpfc_ramp_down_queue_handler(phba);
420 			if (work_port_events & WORKER_RAMP_UP_QUEUE)
421 				lpfc_ramp_up_queue_handler(phba);
422 		}
423 	lpfc_destroy_vport_work_array(phba, vports);
424 
425 	pring = &phba->sli.ring[LPFC_ELS_RING];
426 	status = (ha_copy & (HA_RXMASK  << (4*LPFC_ELS_RING)));
427 	status >>= (4*LPFC_ELS_RING);
428 	if ((status & HA_RXMASK)
429 		|| (pring->flag & LPFC_DEFERRED_RING_EVENT)) {
430 		if (pring->flag & LPFC_STOP_IOCB_EVENT) {
431 			pring->flag |= LPFC_DEFERRED_RING_EVENT;
432 		} else {
433 			pring->flag &= ~LPFC_DEFERRED_RING_EVENT;
434 			lpfc_sli_handle_slow_ring_event(phba, pring,
435 							(status &
436 							 HA_RXMASK));
437 		}
438 		/*
439 		 * Turn on Ring interrupts
440 		 */
441 		spin_lock_irq(&phba->hbalock);
442 		control = readl(phba->HCregaddr);
443 		if (!(control & (HC_R0INT_ENA << LPFC_ELS_RING))) {
444 			lpfc_debugfs_slow_ring_trc(phba,
445 				"WRK Enable ring: cntl:x%x hacopy:x%x",
446 				control, ha_copy, 0);
447 
448 			control |= (HC_R0INT_ENA << LPFC_ELS_RING);
449 			writel(control, phba->HCregaddr);
450 			readl(phba->HCregaddr); /* flush */
451 		}
452 		else {
453 			lpfc_debugfs_slow_ring_trc(phba,
454 				"WRK Ring ok:     cntl:x%x hacopy:x%x",
455 				control, ha_copy, 0);
456 		}
457 		spin_unlock_irq(&phba->hbalock);
458 	}
459 	lpfc_work_list_done(phba);
460 }
461 
462 static int
463 check_work_wait_done(struct lpfc_hba *phba)
464 {
465 	struct lpfc_vport *vport;
466 	struct lpfc_sli_ring *pring = &phba->sli.ring[LPFC_ELS_RING];
467 	int rc = 0;
468 
469 	spin_lock_irq(&phba->hbalock);
470 	list_for_each_entry(vport, &phba->port_list, listentry) {
471 		if (vport->work_port_events) {
472 			rc = 1;
473 			break;
474 		}
475 	}
476 	if (rc || phba->work_ha || (!list_empty(&phba->work_list)) ||
477 	    kthread_should_stop() || pring->flag & LPFC_DEFERRED_RING_EVENT) {
478 		rc = 1;
479 		phba->work_found++;
480 	} else
481 		phba->work_found = 0;
482 	spin_unlock_irq(&phba->hbalock);
483 	return rc;
484 }
485 
486 
487 int
488 lpfc_do_work(void *p)
489 {
490 	struct lpfc_hba *phba = p;
491 	int rc;
492 	DECLARE_WAIT_QUEUE_HEAD_ONSTACK(work_waitq);
493 
494 	set_user_nice(current, -20);
495 	phba->work_wait = &work_waitq;
496 	phba->work_found = 0;
497 
498 	while (1) {
499 
500 		rc = wait_event_interruptible(work_waitq,
501 					      check_work_wait_done(phba));
502 
503 		BUG_ON(rc);
504 
505 		if (kthread_should_stop())
506 			break;
507 
508 		lpfc_work_done(phba);
509 
510 		/* If there is alot of slow ring work, like during link up
511 		 * check_work_wait_done() may cause this thread to not give
512 		 * up the CPU for very long periods of time. This may cause
513 		 * soft lockups or other problems. To avoid these situations
514 		 * give up the CPU here after LPFC_MAX_WORKER_ITERATION
515 		 * consecutive iterations.
516 		 */
517 		if (phba->work_found >= LPFC_MAX_WORKER_ITERATION) {
518 			phba->work_found = 0;
519 			schedule();
520 		}
521 	}
522 	spin_lock_irq(&phba->hbalock);
523 	phba->work_wait = NULL;
524 	spin_unlock_irq(&phba->hbalock);
525 	return 0;
526 }
527 
528 /*
529  * This is only called to handle FC worker events. Since this a rare
530  * occurance, we allocate a struct lpfc_work_evt structure here instead of
531  * embedding it in the IOCB.
532  */
533 int
534 lpfc_workq_post_event(struct lpfc_hba *phba, void *arg1, void *arg2,
535 		      uint32_t evt)
536 {
537 	struct lpfc_work_evt  *evtp;
538 	unsigned long flags;
539 
540 	/*
541 	 * All Mailbox completions and LPFC_ELS_RING rcv ring IOCB events will
542 	 * be queued to worker thread for processing
543 	 */
544 	evtp = kmalloc(sizeof(struct lpfc_work_evt), GFP_ATOMIC);
545 	if (!evtp)
546 		return 0;
547 
548 	evtp->evt_arg1  = arg1;
549 	evtp->evt_arg2  = arg2;
550 	evtp->evt       = evt;
551 
552 	spin_lock_irqsave(&phba->hbalock, flags);
553 	list_add_tail(&evtp->evt_listp, &phba->work_list);
554 	if (phba->work_wait)
555 		lpfc_worker_wake_up(phba);
556 	spin_unlock_irqrestore(&phba->hbalock, flags);
557 
558 	return 1;
559 }
560 
561 void
562 lpfc_cleanup_rpis(struct lpfc_vport *vport, int remove)
563 {
564 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
565 	struct lpfc_hba  *phba = vport->phba;
566 	struct lpfc_nodelist *ndlp, *next_ndlp;
567 	int  rc;
568 
569 	list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes, nlp_listp) {
570 		if (!NLP_CHK_NODE_ACT(ndlp))
571 			continue;
572 		if (ndlp->nlp_state == NLP_STE_UNUSED_NODE)
573 			continue;
574 		if ((phba->sli3_options & LPFC_SLI3_VPORT_TEARDOWN) ||
575 			((vport->port_type == LPFC_NPIV_PORT) &&
576 			(ndlp->nlp_DID == NameServer_DID)))
577 			lpfc_unreg_rpi(vport, ndlp);
578 
579 		/* Leave Fabric nodes alone on link down */
580 		if (!remove && ndlp->nlp_type & NLP_FABRIC)
581 			continue;
582 		rc = lpfc_disc_state_machine(vport, ndlp, NULL,
583 					     remove
584 					     ? NLP_EVT_DEVICE_RM
585 					     : NLP_EVT_DEVICE_RECOVERY);
586 	}
587 	if (phba->sli3_options & LPFC_SLI3_VPORT_TEARDOWN) {
588 		lpfc_mbx_unreg_vpi(vport);
589 		spin_lock_irq(shost->host_lock);
590 		vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
591 		spin_unlock_irq(shost->host_lock);
592 	}
593 }
594 
595 void
596 lpfc_port_link_failure(struct lpfc_vport *vport)
597 {
598 	/* Cleanup any outstanding RSCN activity */
599 	lpfc_els_flush_rscn(vport);
600 
601 	/* Cleanup any outstanding ELS commands */
602 	lpfc_els_flush_cmd(vport);
603 
604 	lpfc_cleanup_rpis(vport, 0);
605 
606 	/* Turn off discovery timer if its running */
607 	lpfc_can_disctmo(vport);
608 }
609 
610 static void
611 lpfc_linkdown_port(struct lpfc_vport *vport)
612 {
613 	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
614 
615 	fc_host_post_event(shost, fc_get_event_number(), FCH_EVT_LINKDOWN, 0);
616 
617 	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
618 		"Link Down:       state:x%x rtry:x%x flg:x%x",
619 		vport->port_state, vport->fc_ns_retry, vport->fc_flag);
620 
621 	lpfc_port_link_failure(vport);
622 
623 }
624 
625 int
626 lpfc_linkdown(struct lpfc_hba *phba)
627 {
628 	struct lpfc_vport *vport = phba->pport;
629 	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
630 	struct lpfc_vport **vports;
631 	LPFC_MBOXQ_t          *mb;
632 	int i;
633 
634 	if (phba->link_state == LPFC_LINK_DOWN)
635 		return 0;
636 	spin_lock_irq(&phba->hbalock);
637 	if (phba->link_state > LPFC_LINK_DOWN) {
638 		phba->link_state = LPFC_LINK_DOWN;
639 		phba->pport->fc_flag &= ~FC_LBIT;
640 	}
641 	spin_unlock_irq(&phba->hbalock);
642 	vports = lpfc_create_vport_work_array(phba);
643 	if (vports != NULL)
644 		for(i = 0; i <= phba->max_vpi && vports[i] != NULL; i++) {
645 			/* Issue a LINK DOWN event to all nodes */
646 			lpfc_linkdown_port(vports[i]);
647 		}
648 	lpfc_destroy_vport_work_array(phba, vports);
649 	/* Clean up any firmware default rpi's */
650 	mb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
651 	if (mb) {
652 		lpfc_unreg_did(phba, 0xffff, 0xffffffff, mb);
653 		mb->vport = vport;
654 		mb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
655 		if (lpfc_sli_issue_mbox(phba, mb, MBX_NOWAIT)
656 		    == MBX_NOT_FINISHED) {
657 			mempool_free(mb, phba->mbox_mem_pool);
658 		}
659 	}
660 
661 	/* Setup myDID for link up if we are in pt2pt mode */
662 	if (phba->pport->fc_flag & FC_PT2PT) {
663 		phba->pport->fc_myDID = 0;
664 		mb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
665 		if (mb) {
666 			lpfc_config_link(phba, mb);
667 			mb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
668 			mb->vport = vport;
669 			if (lpfc_sli_issue_mbox(phba, mb, MBX_NOWAIT)
670 			    == MBX_NOT_FINISHED) {
671 				mempool_free(mb, phba->mbox_mem_pool);
672 			}
673 		}
674 		spin_lock_irq(shost->host_lock);
675 		phba->pport->fc_flag &= ~(FC_PT2PT | FC_PT2PT_PLOGI);
676 		spin_unlock_irq(shost->host_lock);
677 	}
678 
679 	return 0;
680 }
681 
682 static void
683 lpfc_linkup_cleanup_nodes(struct lpfc_vport *vport)
684 {
685 	struct lpfc_nodelist *ndlp;
686 
687 	list_for_each_entry(ndlp, &vport->fc_nodes, nlp_listp) {
688 		if (!NLP_CHK_NODE_ACT(ndlp))
689 			continue;
690 		if (ndlp->nlp_state == NLP_STE_UNUSED_NODE)
691 			continue;
692 		if (ndlp->nlp_type & NLP_FABRIC) {
693 			/* On Linkup its safe to clean up the ndlp
694 			 * from Fabric connections.
695 			 */
696 			if (ndlp->nlp_DID != Fabric_DID)
697 				lpfc_unreg_rpi(vport, ndlp);
698 			lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
699 		} else if (!(ndlp->nlp_flag & NLP_NPR_ADISC)) {
700 			/* Fail outstanding IO now since device is
701 			 * marked for PLOGI.
702 			 */
703 			lpfc_unreg_rpi(vport, ndlp);
704 		}
705 	}
706 }
707 
708 static void
709 lpfc_linkup_port(struct lpfc_vport *vport)
710 {
711 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
712 	struct lpfc_hba  *phba = vport->phba;
713 
714 	if ((vport->load_flag & FC_UNLOADING) != 0)
715 		return;
716 
717 	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
718 		"Link Up:         top:x%x speed:x%x flg:x%x",
719 		phba->fc_topology, phba->fc_linkspeed, phba->link_flag);
720 
721 	/* If NPIV is not enabled, only bring the physical port up */
722 	if (!(phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
723 		(vport != phba->pport))
724 		return;
725 
726 	fc_host_post_event(shost, fc_get_event_number(), FCH_EVT_LINKUP, 0);
727 
728 	spin_lock_irq(shost->host_lock);
729 	vport->fc_flag &= ~(FC_PT2PT | FC_PT2PT_PLOGI | FC_ABORT_DISCOVERY |
730 			    FC_RSCN_MODE | FC_NLP_MORE | FC_RSCN_DISCOVERY);
731 	vport->fc_flag |= FC_NDISC_ACTIVE;
732 	vport->fc_ns_retry = 0;
733 	spin_unlock_irq(shost->host_lock);
734 
735 	if (vport->fc_flag & FC_LBIT)
736 		lpfc_linkup_cleanup_nodes(vport);
737 
738 }
739 
740 static int
741 lpfc_linkup(struct lpfc_hba *phba)
742 {
743 	struct lpfc_vport **vports;
744 	int i;
745 
746 	phba->link_state = LPFC_LINK_UP;
747 
748 	/* Unblock fabric iocbs if they are blocked */
749 	clear_bit(FABRIC_COMANDS_BLOCKED, &phba->bit_flags);
750 	del_timer_sync(&phba->fabric_block_timer);
751 
752 	vports = lpfc_create_vport_work_array(phba);
753 	if (vports != NULL)
754 		for(i = 0; i <= phba->max_vpi && vports[i] != NULL; i++)
755 			lpfc_linkup_port(vports[i]);
756 	lpfc_destroy_vport_work_array(phba, vports);
757 	if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED)
758 		lpfc_issue_clear_la(phba, phba->pport);
759 
760 	return 0;
761 }
762 
763 /*
764  * This routine handles processing a CLEAR_LA mailbox
765  * command upon completion. It is setup in the LPFC_MBOXQ
766  * as the completion routine when the command is
767  * handed off to the SLI layer.
768  */
769 static void
770 lpfc_mbx_cmpl_clear_la(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
771 {
772 	struct lpfc_vport *vport = pmb->vport;
773 	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
774 	struct lpfc_sli   *psli = &phba->sli;
775 	MAILBOX_t *mb = &pmb->mb;
776 	uint32_t control;
777 
778 	/* Since we don't do discovery right now, turn these off here */
779 	psli->ring[psli->extra_ring].flag &= ~LPFC_STOP_IOCB_EVENT;
780 	psli->ring[psli->fcp_ring].flag &= ~LPFC_STOP_IOCB_EVENT;
781 	psli->ring[psli->next_ring].flag &= ~LPFC_STOP_IOCB_EVENT;
782 
783 	/* Check for error */
784 	if ((mb->mbxStatus) && (mb->mbxStatus != 0x1601)) {
785 		/* CLEAR_LA mbox error <mbxStatus> state <hba_state> */
786 		lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
787 				 "0320 CLEAR_LA mbxStatus error x%x hba "
788 				 "state x%x\n",
789 				 mb->mbxStatus, vport->port_state);
790 		phba->link_state = LPFC_HBA_ERROR;
791 		goto out;
792 	}
793 
794 	if (vport->port_type == LPFC_PHYSICAL_PORT)
795 		phba->link_state = LPFC_HBA_READY;
796 
797 	spin_lock_irq(&phba->hbalock);
798 	psli->sli_flag |= LPFC_PROCESS_LA;
799 	control = readl(phba->HCregaddr);
800 	control |= HC_LAINT_ENA;
801 	writel(control, phba->HCregaddr);
802 	readl(phba->HCregaddr); /* flush */
803 	spin_unlock_irq(&phba->hbalock);
804 	mempool_free(pmb, phba->mbox_mem_pool);
805 	return;
806 
807 out:
808 	/* Device Discovery completes */
809 	lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
810 			 "0225 Device Discovery completes\n");
811 	mempool_free(pmb, phba->mbox_mem_pool);
812 
813 	spin_lock_irq(shost->host_lock);
814 	vport->fc_flag &= ~FC_ABORT_DISCOVERY;
815 	spin_unlock_irq(shost->host_lock);
816 
817 	lpfc_can_disctmo(vport);
818 
819 	/* turn on Link Attention interrupts */
820 
821 	spin_lock_irq(&phba->hbalock);
822 	psli->sli_flag |= LPFC_PROCESS_LA;
823 	control = readl(phba->HCregaddr);
824 	control |= HC_LAINT_ENA;
825 	writel(control, phba->HCregaddr);
826 	readl(phba->HCregaddr); /* flush */
827 	spin_unlock_irq(&phba->hbalock);
828 
829 	return;
830 }
831 
832 
833 static void
834 lpfc_mbx_cmpl_local_config_link(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
835 {
836 	struct lpfc_vport *vport = pmb->vport;
837 
838 	if (pmb->mb.mbxStatus)
839 		goto out;
840 
841 	mempool_free(pmb, phba->mbox_mem_pool);
842 
843 	if (phba->fc_topology == TOPOLOGY_LOOP &&
844 	    vport->fc_flag & FC_PUBLIC_LOOP &&
845 	    !(vport->fc_flag & FC_LBIT)) {
846 			/* Need to wait for FAN - use discovery timer
847 			 * for timeout.  port_state is identically
848 			 * LPFC_LOCAL_CFG_LINK while waiting for FAN
849 			 */
850 			lpfc_set_disctmo(vport);
851 			return;
852 	}
853 
854 	/* Start discovery by sending a FLOGI. port_state is identically
855 	 * LPFC_FLOGI while waiting for FLOGI cmpl
856 	 */
857 	if (vport->port_state != LPFC_FLOGI) {
858 		lpfc_initial_flogi(vport);
859 	}
860 	return;
861 
862 out:
863 	lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
864 			 "0306 CONFIG_LINK mbxStatus error x%x "
865 			 "HBA state x%x\n",
866 			 pmb->mb.mbxStatus, vport->port_state);
867 	mempool_free(pmb, phba->mbox_mem_pool);
868 
869 	lpfc_linkdown(phba);
870 
871 	lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
872 			 "0200 CONFIG_LINK bad hba state x%x\n",
873 			 vport->port_state);
874 
875 	lpfc_issue_clear_la(phba, vport);
876 	return;
877 }
878 
879 static void
880 lpfc_mbx_cmpl_read_sparam(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
881 {
882 	MAILBOX_t *mb = &pmb->mb;
883 	struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) pmb->context1;
884 	struct lpfc_vport  *vport = pmb->vport;
885 
886 
887 	/* Check for error */
888 	if (mb->mbxStatus) {
889 		/* READ_SPARAM mbox error <mbxStatus> state <hba_state> */
890 		lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
891 				 "0319 READ_SPARAM mbxStatus error x%x "
892 				 "hba state x%x>\n",
893 				 mb->mbxStatus, vport->port_state);
894 		lpfc_linkdown(phba);
895 		goto out;
896 	}
897 
898 	memcpy((uint8_t *) &vport->fc_sparam, (uint8_t *) mp->virt,
899 	       sizeof (struct serv_parm));
900 	if (phba->cfg_soft_wwnn)
901 		u64_to_wwn(phba->cfg_soft_wwnn,
902 			   vport->fc_sparam.nodeName.u.wwn);
903 	if (phba->cfg_soft_wwpn)
904 		u64_to_wwn(phba->cfg_soft_wwpn,
905 			   vport->fc_sparam.portName.u.wwn);
906 	memcpy(&vport->fc_nodename, &vport->fc_sparam.nodeName,
907 	       sizeof(vport->fc_nodename));
908 	memcpy(&vport->fc_portname, &vport->fc_sparam.portName,
909 	       sizeof(vport->fc_portname));
910 	if (vport->port_type == LPFC_PHYSICAL_PORT) {
911 		memcpy(&phba->wwnn, &vport->fc_nodename, sizeof(phba->wwnn));
912 		memcpy(&phba->wwpn, &vport->fc_portname, sizeof(phba->wwnn));
913 	}
914 
915 	lpfc_mbuf_free(phba, mp->virt, mp->phys);
916 	kfree(mp);
917 	mempool_free(pmb, phba->mbox_mem_pool);
918 	return;
919 
920 out:
921 	pmb->context1 = NULL;
922 	lpfc_mbuf_free(phba, mp->virt, mp->phys);
923 	kfree(mp);
924 	lpfc_issue_clear_la(phba, vport);
925 	mempool_free(pmb, phba->mbox_mem_pool);
926 	return;
927 }
928 
929 static void
930 lpfc_mbx_process_link_up(struct lpfc_hba *phba, READ_LA_VAR *la)
931 {
932 	struct lpfc_vport *vport = phba->pport;
933 	LPFC_MBOXQ_t *sparam_mbox, *cfglink_mbox;
934 	int i;
935 	struct lpfc_dmabuf *mp;
936 	int rc;
937 
938 	sparam_mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
939 	cfglink_mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
940 
941 	spin_lock_irq(&phba->hbalock);
942 	switch (la->UlnkSpeed) {
943 	case LA_1GHZ_LINK:
944 		phba->fc_linkspeed = LA_1GHZ_LINK;
945 		break;
946 	case LA_2GHZ_LINK:
947 		phba->fc_linkspeed = LA_2GHZ_LINK;
948 		break;
949 	case LA_4GHZ_LINK:
950 		phba->fc_linkspeed = LA_4GHZ_LINK;
951 		break;
952 	case LA_8GHZ_LINK:
953 		phba->fc_linkspeed = LA_8GHZ_LINK;
954 		break;
955 	default:
956 		phba->fc_linkspeed = LA_UNKNW_LINK;
957 		break;
958 	}
959 
960 	phba->fc_topology = la->topology;
961 	phba->link_flag &= ~LS_NPIV_FAB_SUPPORTED;
962 
963 	if (phba->fc_topology == TOPOLOGY_LOOP) {
964 		phba->sli3_options &= ~LPFC_SLI3_NPIV_ENABLED;
965 
966 				/* Get Loop Map information */
967 		if (la->il)
968 			vport->fc_flag |= FC_LBIT;
969 
970 		vport->fc_myDID = la->granted_AL_PA;
971 		i = la->un.lilpBde64.tus.f.bdeSize;
972 
973 		if (i == 0) {
974 			phba->alpa_map[0] = 0;
975 		} else {
976 			if (vport->cfg_log_verbose & LOG_LINK_EVENT) {
977 				int numalpa, j, k;
978 				union {
979 					uint8_t pamap[16];
980 					struct {
981 						uint32_t wd1;
982 						uint32_t wd2;
983 						uint32_t wd3;
984 						uint32_t wd4;
985 					} pa;
986 				} un;
987 				numalpa = phba->alpa_map[0];
988 				j = 0;
989 				while (j < numalpa) {
990 					memset(un.pamap, 0, 16);
991 					for (k = 1; j < numalpa; k++) {
992 						un.pamap[k - 1] =
993 							phba->alpa_map[j + 1];
994 						j++;
995 						if (k == 16)
996 							break;
997 					}
998 					/* Link Up Event ALPA map */
999 					lpfc_printf_log(phba,
1000 							KERN_WARNING,
1001 							LOG_LINK_EVENT,
1002 							"1304 Link Up Event "
1003 							"ALPA map Data: x%x "
1004 							"x%x x%x x%x\n",
1005 							un.pa.wd1, un.pa.wd2,
1006 							un.pa.wd3, un.pa.wd4);
1007 				}
1008 			}
1009 		}
1010 	} else {
1011 		if (!(phba->sli3_options & LPFC_SLI3_NPIV_ENABLED)) {
1012 			if (phba->max_vpi && phba->cfg_enable_npiv &&
1013 			   (phba->sli_rev == 3))
1014 				phba->sli3_options |= LPFC_SLI3_NPIV_ENABLED;
1015 		}
1016 		vport->fc_myDID = phba->fc_pref_DID;
1017 		vport->fc_flag |= FC_LBIT;
1018 	}
1019 	spin_unlock_irq(&phba->hbalock);
1020 
1021 	lpfc_linkup(phba);
1022 	if (sparam_mbox) {
1023 		lpfc_read_sparam(phba, sparam_mbox, 0);
1024 		sparam_mbox->vport = vport;
1025 		sparam_mbox->mbox_cmpl = lpfc_mbx_cmpl_read_sparam;
1026 		rc = lpfc_sli_issue_mbox(phba, sparam_mbox, MBX_NOWAIT);
1027 		if (rc == MBX_NOT_FINISHED) {
1028 			mp = (struct lpfc_dmabuf *) sparam_mbox->context1;
1029 			lpfc_mbuf_free(phba, mp->virt, mp->phys);
1030 			kfree(mp);
1031 			mempool_free(sparam_mbox, phba->mbox_mem_pool);
1032 			if (cfglink_mbox)
1033 				mempool_free(cfglink_mbox, phba->mbox_mem_pool);
1034 			goto out;
1035 		}
1036 	}
1037 
1038 	if (cfglink_mbox) {
1039 		vport->port_state = LPFC_LOCAL_CFG_LINK;
1040 		lpfc_config_link(phba, cfglink_mbox);
1041 		cfglink_mbox->vport = vport;
1042 		cfglink_mbox->mbox_cmpl = lpfc_mbx_cmpl_local_config_link;
1043 		rc = lpfc_sli_issue_mbox(phba, cfglink_mbox, MBX_NOWAIT);
1044 		if (rc != MBX_NOT_FINISHED)
1045 			return;
1046 		mempool_free(cfglink_mbox, phba->mbox_mem_pool);
1047 	}
1048 out:
1049 	lpfc_vport_set_state(vport, FC_VPORT_FAILED);
1050 	lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
1051 			 "0263 Discovery Mailbox error: state: 0x%x : %p %p\n",
1052 			 vport->port_state, sparam_mbox, cfglink_mbox);
1053 	lpfc_issue_clear_la(phba, vport);
1054 	return;
1055 }
1056 
1057 static void
1058 lpfc_mbx_issue_link_down(struct lpfc_hba *phba)
1059 {
1060 	uint32_t control;
1061 	struct lpfc_sli *psli = &phba->sli;
1062 
1063 	lpfc_linkdown(phba);
1064 
1065 	/* turn on Link Attention interrupts - no CLEAR_LA needed */
1066 	spin_lock_irq(&phba->hbalock);
1067 	psli->sli_flag |= LPFC_PROCESS_LA;
1068 	control = readl(phba->HCregaddr);
1069 	control |= HC_LAINT_ENA;
1070 	writel(control, phba->HCregaddr);
1071 	readl(phba->HCregaddr); /* flush */
1072 	spin_unlock_irq(&phba->hbalock);
1073 }
1074 
1075 /*
1076  * This routine handles processing a READ_LA mailbox
1077  * command upon completion. It is setup in the LPFC_MBOXQ
1078  * as the completion routine when the command is
1079  * handed off to the SLI layer.
1080  */
1081 void
1082 lpfc_mbx_cmpl_read_la(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1083 {
1084 	struct lpfc_vport *vport = pmb->vport;
1085 	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
1086 	READ_LA_VAR *la;
1087 	MAILBOX_t *mb = &pmb->mb;
1088 	struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) (pmb->context1);
1089 
1090 	/* Check for error */
1091 	if (mb->mbxStatus) {
1092 		lpfc_printf_log(phba, KERN_INFO, LOG_LINK_EVENT,
1093 				"1307 READ_LA mbox error x%x state x%x\n",
1094 				mb->mbxStatus, vport->port_state);
1095 		lpfc_mbx_issue_link_down(phba);
1096 		phba->link_state = LPFC_HBA_ERROR;
1097 		goto lpfc_mbx_cmpl_read_la_free_mbuf;
1098 	}
1099 
1100 	la = (READ_LA_VAR *) & pmb->mb.un.varReadLA;
1101 
1102 	memcpy(&phba->alpa_map[0], mp->virt, 128);
1103 
1104 	spin_lock_irq(shost->host_lock);
1105 	if (la->pb)
1106 		vport->fc_flag |= FC_BYPASSED_MODE;
1107 	else
1108 		vport->fc_flag &= ~FC_BYPASSED_MODE;
1109 	spin_unlock_irq(shost->host_lock);
1110 
1111 	if (((phba->fc_eventTag + 1) < la->eventTag) ||
1112 	    (phba->fc_eventTag == la->eventTag)) {
1113 		phba->fc_stat.LinkMultiEvent++;
1114 		if (la->attType == AT_LINK_UP)
1115 			if (phba->fc_eventTag != 0)
1116 				lpfc_linkdown(phba);
1117 	}
1118 
1119 	phba->fc_eventTag = la->eventTag;
1120 
1121 	if (la->attType == AT_LINK_UP) {
1122 		phba->fc_stat.LinkUp++;
1123 		if (phba->link_flag & LS_LOOPBACK_MODE) {
1124 			lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
1125 					"1306 Link Up Event in loop back mode "
1126 					"x%x received Data: x%x x%x x%x x%x\n",
1127 					la->eventTag, phba->fc_eventTag,
1128 					la->granted_AL_PA, la->UlnkSpeed,
1129 					phba->alpa_map[0]);
1130 		} else {
1131 			lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
1132 					"1303 Link Up Event x%x received "
1133 					"Data: x%x x%x x%x x%x\n",
1134 					la->eventTag, phba->fc_eventTag,
1135 					la->granted_AL_PA, la->UlnkSpeed,
1136 					phba->alpa_map[0]);
1137 		}
1138 		lpfc_mbx_process_link_up(phba, la);
1139 	} else {
1140 		phba->fc_stat.LinkDown++;
1141 		if (phba->link_flag & LS_LOOPBACK_MODE) {
1142 			lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
1143 				"1308 Link Down Event in loop back mode "
1144 				"x%x received "
1145 				"Data: x%x x%x x%x\n",
1146 				la->eventTag, phba->fc_eventTag,
1147 				phba->pport->port_state, vport->fc_flag);
1148 		}
1149 		else {
1150 			lpfc_printf_log(phba, KERN_ERR, LOG_LINK_EVENT,
1151 				"1305 Link Down Event x%x received "
1152 				"Data: x%x x%x x%x\n",
1153 				la->eventTag, phba->fc_eventTag,
1154 				phba->pport->port_state, vport->fc_flag);
1155 		}
1156 		lpfc_mbx_issue_link_down(phba);
1157 	}
1158 
1159 lpfc_mbx_cmpl_read_la_free_mbuf:
1160 	lpfc_mbuf_free(phba, mp->virt, mp->phys);
1161 	kfree(mp);
1162 	mempool_free(pmb, phba->mbox_mem_pool);
1163 	return;
1164 }
1165 
1166 /*
1167  * This routine handles processing a REG_LOGIN mailbox
1168  * command upon completion. It is setup in the LPFC_MBOXQ
1169  * as the completion routine when the command is
1170  * handed off to the SLI layer.
1171  */
1172 void
1173 lpfc_mbx_cmpl_reg_login(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1174 {
1175 	struct lpfc_vport  *vport = pmb->vport;
1176 	struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) (pmb->context1);
1177 	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) pmb->context2;
1178 
1179 	pmb->context1 = NULL;
1180 
1181 	/* Good status, call state machine */
1182 	lpfc_disc_state_machine(vport, ndlp, pmb, NLP_EVT_CMPL_REG_LOGIN);
1183 	lpfc_mbuf_free(phba, mp->virt, mp->phys);
1184 	kfree(mp);
1185 	mempool_free(pmb, phba->mbox_mem_pool);
1186 	/* decrement the node reference count held for this callback
1187 	 * function.
1188 	 */
1189 	lpfc_nlp_put(ndlp);
1190 
1191 	return;
1192 }
1193 
1194 static void
1195 lpfc_mbx_cmpl_unreg_vpi(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1196 {
1197 	MAILBOX_t *mb = &pmb->mb;
1198 	struct lpfc_vport *vport = pmb->vport;
1199 	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
1200 
1201 	switch (mb->mbxStatus) {
1202 	case 0x0011:
1203 	case 0x0020:
1204 	case 0x9700:
1205 		lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
1206 				 "0911 cmpl_unreg_vpi, mb status = 0x%x\n",
1207 				 mb->mbxStatus);
1208 		break;
1209 	}
1210 	vport->unreg_vpi_cmpl = VPORT_OK;
1211 	mempool_free(pmb, phba->mbox_mem_pool);
1212 	/*
1213 	 * This shost reference might have been taken at the beginning of
1214 	 * lpfc_vport_delete()
1215 	 */
1216 	if (vport->load_flag & FC_UNLOADING)
1217 		scsi_host_put(shost);
1218 }
1219 
1220 void
1221 lpfc_mbx_unreg_vpi(struct lpfc_vport *vport)
1222 {
1223 	struct lpfc_hba  *phba = vport->phba;
1224 	LPFC_MBOXQ_t *mbox;
1225 	int rc;
1226 
1227 	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
1228 	if (!mbox)
1229 		return;
1230 
1231 	lpfc_unreg_vpi(phba, vport->vpi, mbox);
1232 	mbox->vport = vport;
1233 	mbox->mbox_cmpl = lpfc_mbx_cmpl_unreg_vpi;
1234 	rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
1235 	if (rc == MBX_NOT_FINISHED) {
1236 		lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX | LOG_VPORT,
1237 				 "1800 Could not issue unreg_vpi\n");
1238 		mempool_free(mbox, phba->mbox_mem_pool);
1239 		vport->unreg_vpi_cmpl = VPORT_ERROR;
1240 	}
1241 }
1242 
1243 static void
1244 lpfc_mbx_cmpl_reg_vpi(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1245 {
1246 	struct lpfc_vport *vport = pmb->vport;
1247 	struct Scsi_Host  *shost = lpfc_shost_from_vport(vport);
1248 	MAILBOX_t *mb = &pmb->mb;
1249 
1250 	switch (mb->mbxStatus) {
1251 	case 0x0011:
1252 	case 0x9601:
1253 	case 0x9602:
1254 		lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
1255 				 "0912 cmpl_reg_vpi, mb status = 0x%x\n",
1256 				 mb->mbxStatus);
1257 		lpfc_vport_set_state(vport, FC_VPORT_FAILED);
1258 		spin_lock_irq(shost->host_lock);
1259 		vport->fc_flag &= ~(FC_FABRIC | FC_PUBLIC_LOOP);
1260 		spin_unlock_irq(shost->host_lock);
1261 		vport->fc_myDID = 0;
1262 		goto out;
1263 	}
1264 
1265 	vport->num_disc_nodes = 0;
1266 	/* go thru NPR list and issue ELS PLOGIs */
1267 	if (vport->fc_npr_cnt)
1268 		lpfc_els_disc_plogi(vport);
1269 
1270 	if (!vport->num_disc_nodes) {
1271 		spin_lock_irq(shost->host_lock);
1272 		vport->fc_flag &= ~FC_NDISC_ACTIVE;
1273 		spin_unlock_irq(shost->host_lock);
1274 		lpfc_can_disctmo(vport);
1275 	}
1276 	vport->port_state = LPFC_VPORT_READY;
1277 
1278 out:
1279 	mempool_free(pmb, phba->mbox_mem_pool);
1280 	return;
1281 }
1282 
1283 /*
1284  * This routine handles processing a Fabric REG_LOGIN mailbox
1285  * command upon completion. It is setup in the LPFC_MBOXQ
1286  * as the completion routine when the command is
1287  * handed off to the SLI layer.
1288  */
1289 void
1290 lpfc_mbx_cmpl_fabric_reg_login(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1291 {
1292 	struct lpfc_vport *vport = pmb->vport;
1293 	MAILBOX_t *mb = &pmb->mb;
1294 	struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) (pmb->context1);
1295 	struct lpfc_nodelist *ndlp;
1296 	struct lpfc_vport **vports;
1297 	int i;
1298 
1299 	ndlp = (struct lpfc_nodelist *) pmb->context2;
1300 	pmb->context1 = NULL;
1301 	pmb->context2 = NULL;
1302 	if (mb->mbxStatus) {
1303 		lpfc_mbuf_free(phba, mp->virt, mp->phys);
1304 		kfree(mp);
1305 		mempool_free(pmb, phba->mbox_mem_pool);
1306 
1307 		if (phba->fc_topology == TOPOLOGY_LOOP) {
1308 			/* FLOGI failed, use loop map to make discovery list */
1309 			lpfc_disc_list_loopmap(vport);
1310 
1311 			/* Start discovery */
1312 			lpfc_disc_start(vport);
1313 			/* Decrement the reference count to ndlp after the
1314 			 * reference to the ndlp are done.
1315 			 */
1316 			lpfc_nlp_put(ndlp);
1317 			return;
1318 		}
1319 
1320 		lpfc_vport_set_state(vport, FC_VPORT_FAILED);
1321 		lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX,
1322 				 "0258 Register Fabric login error: 0x%x\n",
1323 				 mb->mbxStatus);
1324 		/* Decrement the reference count to ndlp after the reference
1325 		 * to the ndlp are done.
1326 		 */
1327 		lpfc_nlp_put(ndlp);
1328 		return;
1329 	}
1330 
1331 	ndlp->nlp_rpi = mb->un.varWords[0];
1332 	ndlp->nlp_type |= NLP_FABRIC;
1333 	lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
1334 
1335 	if (vport->port_state == LPFC_FABRIC_CFG_LINK) {
1336 		vports = lpfc_create_vport_work_array(phba);
1337 		if (vports != NULL)
1338 			for(i = 0;
1339 			    i <= phba->max_vpi && vports[i] != NULL;
1340 			    i++) {
1341 				if (vports[i]->port_type == LPFC_PHYSICAL_PORT)
1342 					continue;
1343 				if (phba->fc_topology == TOPOLOGY_LOOP) {
1344 					lpfc_vport_set_state(vports[i],
1345 							FC_VPORT_LINKDOWN);
1346 					continue;
1347 				}
1348 				if (phba->link_flag & LS_NPIV_FAB_SUPPORTED)
1349 					lpfc_initial_fdisc(vports[i]);
1350 				else {
1351 					lpfc_vport_set_state(vports[i],
1352 						FC_VPORT_NO_FABRIC_SUPP);
1353 					lpfc_printf_vlog(vport, KERN_ERR,
1354 							 LOG_ELS,
1355 							"0259 No NPIV "
1356 							"Fabric support\n");
1357 				}
1358 			}
1359 		lpfc_destroy_vport_work_array(phba, vports);
1360 		lpfc_do_scr_ns_plogi(phba, vport);
1361 	}
1362 
1363 	lpfc_mbuf_free(phba, mp->virt, mp->phys);
1364 	kfree(mp);
1365 	mempool_free(pmb, phba->mbox_mem_pool);
1366 
1367 	/* Drop the reference count from the mbox at the end after
1368 	 * all the current reference to the ndlp have been done.
1369 	 */
1370 	lpfc_nlp_put(ndlp);
1371 	return;
1372 }
1373 
1374 /*
1375  * This routine handles processing a NameServer REG_LOGIN mailbox
1376  * command upon completion. It is setup in the LPFC_MBOXQ
1377  * as the completion routine when the command is
1378  * handed off to the SLI layer.
1379  */
1380 void
1381 lpfc_mbx_cmpl_ns_reg_login(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
1382 {
1383 	MAILBOX_t *mb = &pmb->mb;
1384 	struct lpfc_dmabuf *mp = (struct lpfc_dmabuf *) (pmb->context1);
1385 	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) pmb->context2;
1386 	struct lpfc_vport *vport = pmb->vport;
1387 
1388 	if (mb->mbxStatus) {
1389 out:
1390 		/* decrement the node reference count held for this
1391 		 * callback function.
1392 		 */
1393 		lpfc_nlp_put(ndlp);
1394 		lpfc_mbuf_free(phba, mp->virt, mp->phys);
1395 		kfree(mp);
1396 		mempool_free(pmb, phba->mbox_mem_pool);
1397 
1398 		/* If no other thread is using the ndlp, free it */
1399 		lpfc_nlp_not_used(ndlp);
1400 
1401 		if (phba->fc_topology == TOPOLOGY_LOOP) {
1402 			/*
1403 			 * RegLogin failed, use loop map to make discovery
1404 			 * list
1405 			 */
1406 			lpfc_disc_list_loopmap(vport);
1407 
1408 			/* Start discovery */
1409 			lpfc_disc_start(vport);
1410 			return;
1411 		}
1412 		lpfc_vport_set_state(vport, FC_VPORT_FAILED);
1413 		lpfc_printf_vlog(vport, KERN_ERR, LOG_ELS,
1414 				 "0260 Register NameServer error: 0x%x\n",
1415 				 mb->mbxStatus);
1416 		return;
1417 	}
1418 
1419 	pmb->context1 = NULL;
1420 
1421 	ndlp->nlp_rpi = mb->un.varWords[0];
1422 	ndlp->nlp_type |= NLP_FABRIC;
1423 	lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
1424 
1425 	if (vport->port_state < LPFC_VPORT_READY) {
1426 		/* Link up discovery requires Fabric registration. */
1427 		lpfc_ns_cmd(vport, SLI_CTNS_RFF_ID, 0, 0); /* Do this first! */
1428 		lpfc_ns_cmd(vport, SLI_CTNS_RNN_ID, 0, 0);
1429 		lpfc_ns_cmd(vport, SLI_CTNS_RSNN_NN, 0, 0);
1430 		lpfc_ns_cmd(vport, SLI_CTNS_RSPN_ID, 0, 0);
1431 		lpfc_ns_cmd(vport, SLI_CTNS_RFT_ID, 0, 0);
1432 
1433 		/* Issue SCR just before NameServer GID_FT Query */
1434 		lpfc_issue_els_scr(vport, SCR_DID, 0);
1435 	}
1436 
1437 	vport->fc_ns_retry = 0;
1438 	/* Good status, issue CT Request to NameServer */
1439 	if (lpfc_ns_cmd(vport, SLI_CTNS_GID_FT, 0, 0)) {
1440 		/* Cannot issue NameServer Query, so finish up discovery */
1441 		goto out;
1442 	}
1443 
1444 	/* decrement the node reference count held for this
1445 	 * callback function.
1446 	 */
1447 	lpfc_nlp_put(ndlp);
1448 	lpfc_mbuf_free(phba, mp->virt, mp->phys);
1449 	kfree(mp);
1450 	mempool_free(pmb, phba->mbox_mem_pool);
1451 
1452 	return;
1453 }
1454 
1455 static void
1456 lpfc_register_remote_port(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
1457 {
1458 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1459 	struct fc_rport  *rport;
1460 	struct lpfc_rport_data *rdata;
1461 	struct fc_rport_identifiers rport_ids;
1462 	struct lpfc_hba  *phba = vport->phba;
1463 
1464 	/* Remote port has reappeared. Re-register w/ FC transport */
1465 	rport_ids.node_name = wwn_to_u64(ndlp->nlp_nodename.u.wwn);
1466 	rport_ids.port_name = wwn_to_u64(ndlp->nlp_portname.u.wwn);
1467 	rport_ids.port_id = ndlp->nlp_DID;
1468 	rport_ids.roles = FC_RPORT_ROLE_UNKNOWN;
1469 
1470 	/*
1471 	 * We leave our node pointer in rport->dd_data when we unregister a
1472 	 * FCP target port.  But fc_remote_port_add zeros the space to which
1473 	 * rport->dd_data points.  So, if we're reusing a previously
1474 	 * registered port, drop the reference that we took the last time we
1475 	 * registered the port.
1476 	 */
1477 	if (ndlp->rport && ndlp->rport->dd_data &&
1478 	    ((struct lpfc_rport_data *) ndlp->rport->dd_data)->pnode == ndlp)
1479 		lpfc_nlp_put(ndlp);
1480 
1481 	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_RPORT,
1482 		"rport add:       did:x%x flg:x%x type x%x",
1483 		ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_type);
1484 
1485 	ndlp->rport = rport = fc_remote_port_add(shost, 0, &rport_ids);
1486 	if (!rport || !get_device(&rport->dev)) {
1487 		dev_printk(KERN_WARNING, &phba->pcidev->dev,
1488 			   "Warning: fc_remote_port_add failed\n");
1489 		return;
1490 	}
1491 
1492 	/* initialize static port data */
1493 	rport->maxframe_size = ndlp->nlp_maxframe;
1494 	rport->supported_classes = ndlp->nlp_class_sup;
1495 	rdata = rport->dd_data;
1496 	rdata->pnode = lpfc_nlp_get(ndlp);
1497 
1498 	if (ndlp->nlp_type & NLP_FCP_TARGET)
1499 		rport_ids.roles |= FC_RPORT_ROLE_FCP_TARGET;
1500 	if (ndlp->nlp_type & NLP_FCP_INITIATOR)
1501 		rport_ids.roles |= FC_RPORT_ROLE_FCP_INITIATOR;
1502 
1503 
1504 	if (rport_ids.roles !=  FC_RPORT_ROLE_UNKNOWN)
1505 		fc_remote_port_rolechg(rport, rport_ids.roles);
1506 
1507 	if ((rport->scsi_target_id != -1) &&
1508 	    (rport->scsi_target_id < LPFC_MAX_TARGET)) {
1509 		ndlp->nlp_sid = rport->scsi_target_id;
1510 	}
1511 	return;
1512 }
1513 
1514 static void
1515 lpfc_unregister_remote_port(struct lpfc_nodelist *ndlp)
1516 {
1517 	struct fc_rport *rport = ndlp->rport;
1518 
1519 	lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_RPORT,
1520 		"rport delete:    did:x%x flg:x%x type x%x",
1521 		ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_type);
1522 
1523 	fc_remote_port_delete(rport);
1524 
1525 	return;
1526 }
1527 
1528 static void
1529 lpfc_nlp_counters(struct lpfc_vport *vport, int state, int count)
1530 {
1531 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1532 
1533 	spin_lock_irq(shost->host_lock);
1534 	switch (state) {
1535 	case NLP_STE_UNUSED_NODE:
1536 		vport->fc_unused_cnt += count;
1537 		break;
1538 	case NLP_STE_PLOGI_ISSUE:
1539 		vport->fc_plogi_cnt += count;
1540 		break;
1541 	case NLP_STE_ADISC_ISSUE:
1542 		vport->fc_adisc_cnt += count;
1543 		break;
1544 	case NLP_STE_REG_LOGIN_ISSUE:
1545 		vport->fc_reglogin_cnt += count;
1546 		break;
1547 	case NLP_STE_PRLI_ISSUE:
1548 		vport->fc_prli_cnt += count;
1549 		break;
1550 	case NLP_STE_UNMAPPED_NODE:
1551 		vport->fc_unmap_cnt += count;
1552 		break;
1553 	case NLP_STE_MAPPED_NODE:
1554 		vport->fc_map_cnt += count;
1555 		break;
1556 	case NLP_STE_NPR_NODE:
1557 		vport->fc_npr_cnt += count;
1558 		break;
1559 	}
1560 	spin_unlock_irq(shost->host_lock);
1561 }
1562 
1563 static void
1564 lpfc_nlp_state_cleanup(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
1565 		       int old_state, int new_state)
1566 {
1567 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1568 
1569 	if (new_state == NLP_STE_UNMAPPED_NODE) {
1570 		ndlp->nlp_type &= ~(NLP_FCP_TARGET | NLP_FCP_INITIATOR);
1571 		ndlp->nlp_flag &= ~NLP_NODEV_REMOVE;
1572 		ndlp->nlp_type |= NLP_FC_NODE;
1573 	}
1574 	if (new_state == NLP_STE_MAPPED_NODE)
1575 		ndlp->nlp_flag &= ~NLP_NODEV_REMOVE;
1576 	if (new_state == NLP_STE_NPR_NODE)
1577 		ndlp->nlp_flag &= ~NLP_RCV_PLOGI;
1578 
1579 	/* Transport interface */
1580 	if (ndlp->rport && (old_state == NLP_STE_MAPPED_NODE ||
1581 			    old_state == NLP_STE_UNMAPPED_NODE)) {
1582 		vport->phba->nport_event_cnt++;
1583 		lpfc_unregister_remote_port(ndlp);
1584 	}
1585 
1586 	if (new_state ==  NLP_STE_MAPPED_NODE ||
1587 	    new_state == NLP_STE_UNMAPPED_NODE) {
1588 		vport->phba->nport_event_cnt++;
1589 		/*
1590 		 * Tell the fc transport about the port, if we haven't
1591 		 * already. If we have, and it's a scsi entity, be
1592 		 * sure to unblock any attached scsi devices
1593 		 */
1594 		lpfc_register_remote_port(vport, ndlp);
1595 	}
1596 	/*
1597 	 * if we added to Mapped list, but the remote port
1598 	 * registration failed or assigned a target id outside
1599 	 * our presentable range - move the node to the
1600 	 * Unmapped List
1601 	 */
1602 	if (new_state == NLP_STE_MAPPED_NODE &&
1603 	    (!ndlp->rport ||
1604 	     ndlp->rport->scsi_target_id == -1 ||
1605 	     ndlp->rport->scsi_target_id >= LPFC_MAX_TARGET)) {
1606 		spin_lock_irq(shost->host_lock);
1607 		ndlp->nlp_flag |= NLP_TGT_NO_SCSIID;
1608 		spin_unlock_irq(shost->host_lock);
1609 		lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
1610 	}
1611 }
1612 
1613 static char *
1614 lpfc_nlp_state_name(char *buffer, size_t size, int state)
1615 {
1616 	static char *states[] = {
1617 		[NLP_STE_UNUSED_NODE] = "UNUSED",
1618 		[NLP_STE_PLOGI_ISSUE] = "PLOGI",
1619 		[NLP_STE_ADISC_ISSUE] = "ADISC",
1620 		[NLP_STE_REG_LOGIN_ISSUE] = "REGLOGIN",
1621 		[NLP_STE_PRLI_ISSUE] = "PRLI",
1622 		[NLP_STE_UNMAPPED_NODE] = "UNMAPPED",
1623 		[NLP_STE_MAPPED_NODE] = "MAPPED",
1624 		[NLP_STE_NPR_NODE] = "NPR",
1625 	};
1626 
1627 	if (state < NLP_STE_MAX_STATE && states[state])
1628 		strlcpy(buffer, states[state], size);
1629 	else
1630 		snprintf(buffer, size, "unknown (%d)", state);
1631 	return buffer;
1632 }
1633 
1634 void
1635 lpfc_nlp_set_state(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
1636 		   int state)
1637 {
1638 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1639 	int  old_state = ndlp->nlp_state;
1640 	char name1[16], name2[16];
1641 
1642 	lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
1643 			 "0904 NPort state transition x%06x, %s -> %s\n",
1644 			 ndlp->nlp_DID,
1645 			 lpfc_nlp_state_name(name1, sizeof(name1), old_state),
1646 			 lpfc_nlp_state_name(name2, sizeof(name2), state));
1647 
1648 	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_NODE,
1649 		"node statechg    did:x%x old:%d ste:%d",
1650 		ndlp->nlp_DID, old_state, state);
1651 
1652 	if (old_state == NLP_STE_NPR_NODE &&
1653 	    (ndlp->nlp_flag & NLP_DELAY_TMO) != 0 &&
1654 	    state != NLP_STE_NPR_NODE)
1655 		lpfc_cancel_retry_delay_tmo(vport, ndlp);
1656 	if (old_state == NLP_STE_UNMAPPED_NODE) {
1657 		ndlp->nlp_flag &= ~NLP_TGT_NO_SCSIID;
1658 		ndlp->nlp_type &= ~NLP_FC_NODE;
1659 	}
1660 
1661 	if (list_empty(&ndlp->nlp_listp)) {
1662 		spin_lock_irq(shost->host_lock);
1663 		list_add_tail(&ndlp->nlp_listp, &vport->fc_nodes);
1664 		spin_unlock_irq(shost->host_lock);
1665 	} else if (old_state)
1666 		lpfc_nlp_counters(vport, old_state, -1);
1667 
1668 	ndlp->nlp_state = state;
1669 	lpfc_nlp_counters(vport, state, 1);
1670 	lpfc_nlp_state_cleanup(vport, ndlp, old_state, state);
1671 }
1672 
1673 void
1674 lpfc_enqueue_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
1675 {
1676 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1677 
1678 	if (list_empty(&ndlp->nlp_listp)) {
1679 		spin_lock_irq(shost->host_lock);
1680 		list_add_tail(&ndlp->nlp_listp, &vport->fc_nodes);
1681 		spin_unlock_irq(shost->host_lock);
1682 	}
1683 }
1684 
1685 void
1686 lpfc_dequeue_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
1687 {
1688 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1689 
1690 	if ((ndlp->nlp_flag & NLP_DELAY_TMO) != 0)
1691 		lpfc_cancel_retry_delay_tmo(vport, ndlp);
1692 	if (ndlp->nlp_state && !list_empty(&ndlp->nlp_listp))
1693 		lpfc_nlp_counters(vport, ndlp->nlp_state, -1);
1694 	spin_lock_irq(shost->host_lock);
1695 	list_del_init(&ndlp->nlp_listp);
1696 	spin_unlock_irq(shost->host_lock);
1697 	lpfc_nlp_state_cleanup(vport, ndlp, ndlp->nlp_state,
1698 				NLP_STE_UNUSED_NODE);
1699 }
1700 
1701 static void
1702 lpfc_disable_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
1703 {
1704 	if ((ndlp->nlp_flag & NLP_DELAY_TMO) != 0)
1705 		lpfc_cancel_retry_delay_tmo(vport, ndlp);
1706 	if (ndlp->nlp_state && !list_empty(&ndlp->nlp_listp))
1707 		lpfc_nlp_counters(vport, ndlp->nlp_state, -1);
1708 	lpfc_nlp_state_cleanup(vport, ndlp, ndlp->nlp_state,
1709 				NLP_STE_UNUSED_NODE);
1710 }
1711 
1712 struct lpfc_nodelist *
1713 lpfc_enable_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
1714 		 int state)
1715 {
1716 	struct lpfc_hba *phba = vport->phba;
1717 	uint32_t did;
1718 	unsigned long flags;
1719 
1720 	if (!ndlp)
1721 		return NULL;
1722 
1723 	spin_lock_irqsave(&phba->ndlp_lock, flags);
1724 	/* The ndlp should not be in memory free mode */
1725 	if (NLP_CHK_FREE_REQ(ndlp)) {
1726 		spin_unlock_irqrestore(&phba->ndlp_lock, flags);
1727 		lpfc_printf_vlog(vport, KERN_WARNING, LOG_NODE,
1728 				"0277 lpfc_enable_node: ndlp:x%p "
1729 				"usgmap:x%x refcnt:%d\n",
1730 				(void *)ndlp, ndlp->nlp_usg_map,
1731 				atomic_read(&ndlp->kref.refcount));
1732 		return NULL;
1733 	}
1734 	/* The ndlp should not already be in active mode */
1735 	if (NLP_CHK_NODE_ACT(ndlp)) {
1736 		spin_unlock_irqrestore(&phba->ndlp_lock, flags);
1737 		lpfc_printf_vlog(vport, KERN_WARNING, LOG_NODE,
1738 				"0278 lpfc_enable_node: ndlp:x%p "
1739 				"usgmap:x%x refcnt:%d\n",
1740 				(void *)ndlp, ndlp->nlp_usg_map,
1741 				atomic_read(&ndlp->kref.refcount));
1742 		return NULL;
1743 	}
1744 
1745 	/* Keep the original DID */
1746 	did = ndlp->nlp_DID;
1747 
1748 	/* re-initialize ndlp except of ndlp linked list pointer */
1749 	memset((((char *)ndlp) + sizeof (struct list_head)), 0,
1750 		sizeof (struct lpfc_nodelist) - sizeof (struct list_head));
1751 	INIT_LIST_HEAD(&ndlp->els_retry_evt.evt_listp);
1752 	INIT_LIST_HEAD(&ndlp->dev_loss_evt.evt_listp);
1753 	init_timer(&ndlp->nlp_delayfunc);
1754 	ndlp->nlp_delayfunc.function = lpfc_els_retry_delay;
1755 	ndlp->nlp_delayfunc.data = (unsigned long)ndlp;
1756 	ndlp->nlp_DID = did;
1757 	ndlp->vport = vport;
1758 	ndlp->nlp_sid = NLP_NO_SID;
1759 	/* ndlp management re-initialize */
1760 	kref_init(&ndlp->kref);
1761 	NLP_INT_NODE_ACT(ndlp);
1762 
1763 	spin_unlock_irqrestore(&phba->ndlp_lock, flags);
1764 
1765 	if (state != NLP_STE_UNUSED_NODE)
1766 		lpfc_nlp_set_state(vport, ndlp, state);
1767 
1768 	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_NODE,
1769 		"node enable:       did:x%x",
1770 		ndlp->nlp_DID, 0, 0);
1771 	return ndlp;
1772 }
1773 
1774 void
1775 lpfc_drop_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
1776 {
1777 	/*
1778 	 * Use of lpfc_drop_node and UNUSED list: lpfc_drop_node should
1779 	 * be used if we wish to issue the "last" lpfc_nlp_put() to remove
1780 	 * the ndlp from the vport. The ndlp marked as UNUSED on the list
1781 	 * until ALL other outstanding threads have completed. We check
1782 	 * that the ndlp not already in the UNUSED state before we proceed.
1783 	 */
1784 	if (ndlp->nlp_state == NLP_STE_UNUSED_NODE)
1785 		return;
1786 	lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNUSED_NODE);
1787 	lpfc_nlp_put(ndlp);
1788 	return;
1789 }
1790 
1791 /*
1792  * Start / ReStart rescue timer for Discovery / RSCN handling
1793  */
1794 void
1795 lpfc_set_disctmo(struct lpfc_vport *vport)
1796 {
1797 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1798 	struct lpfc_hba  *phba = vport->phba;
1799 	uint32_t tmo;
1800 
1801 	if (vport->port_state == LPFC_LOCAL_CFG_LINK) {
1802 		/* For FAN, timeout should be greater then edtov */
1803 		tmo = (((phba->fc_edtov + 999) / 1000) + 1);
1804 	} else {
1805 		/* Normal discovery timeout should be > then ELS/CT timeout
1806 		 * FC spec states we need 3 * ratov for CT requests
1807 		 */
1808 		tmo = ((phba->fc_ratov * 3) + 3);
1809 	}
1810 
1811 
1812 	if (!timer_pending(&vport->fc_disctmo)) {
1813 		lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1814 			"set disc timer:  tmo:x%x state:x%x flg:x%x",
1815 			tmo, vport->port_state, vport->fc_flag);
1816 	}
1817 
1818 	mod_timer(&vport->fc_disctmo, jiffies + HZ * tmo);
1819 	spin_lock_irq(shost->host_lock);
1820 	vport->fc_flag |= FC_DISC_TMO;
1821 	spin_unlock_irq(shost->host_lock);
1822 
1823 	/* Start Discovery Timer state <hba_state> */
1824 	lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
1825 			 "0247 Start Discovery Timer state x%x "
1826 			 "Data: x%x x%lx x%x x%x\n",
1827 			 vport->port_state, tmo,
1828 			 (unsigned long)&vport->fc_disctmo, vport->fc_plogi_cnt,
1829 			 vport->fc_adisc_cnt);
1830 
1831 	return;
1832 }
1833 
1834 /*
1835  * Cancel rescue timer for Discovery / RSCN handling
1836  */
1837 int
1838 lpfc_can_disctmo(struct lpfc_vport *vport)
1839 {
1840 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
1841 	unsigned long iflags;
1842 
1843 	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
1844 		"can disc timer:  state:x%x rtry:x%x flg:x%x",
1845 		vport->port_state, vport->fc_ns_retry, vport->fc_flag);
1846 
1847 	/* Turn off discovery timer if its running */
1848 	if (vport->fc_flag & FC_DISC_TMO) {
1849 		spin_lock_irqsave(shost->host_lock, iflags);
1850 		vport->fc_flag &= ~FC_DISC_TMO;
1851 		spin_unlock_irqrestore(shost->host_lock, iflags);
1852 		del_timer_sync(&vport->fc_disctmo);
1853 		spin_lock_irqsave(&vport->work_port_lock, iflags);
1854 		vport->work_port_events &= ~WORKER_DISC_TMO;
1855 		spin_unlock_irqrestore(&vport->work_port_lock, iflags);
1856 	}
1857 
1858 	/* Cancel Discovery Timer state <hba_state> */
1859 	lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
1860 			 "0248 Cancel Discovery Timer state x%x "
1861 			 "Data: x%x x%x x%x\n",
1862 			 vport->port_state, vport->fc_flag,
1863 			 vport->fc_plogi_cnt, vport->fc_adisc_cnt);
1864 	return 0;
1865 }
1866 
1867 /*
1868  * Check specified ring for outstanding IOCB on the SLI queue
1869  * Return true if iocb matches the specified nport
1870  */
1871 int
1872 lpfc_check_sli_ndlp(struct lpfc_hba *phba,
1873 		    struct lpfc_sli_ring *pring,
1874 		    struct lpfc_iocbq *iocb,
1875 		    struct lpfc_nodelist *ndlp)
1876 {
1877 	struct lpfc_sli *psli = &phba->sli;
1878 	IOCB_t *icmd = &iocb->iocb;
1879 	struct lpfc_vport    *vport = ndlp->vport;
1880 
1881 	if (iocb->vport != vport)
1882 		return 0;
1883 
1884 	if (pring->ringno == LPFC_ELS_RING) {
1885 		switch (icmd->ulpCommand) {
1886 		case CMD_GEN_REQUEST64_CR:
1887 			if (icmd->ulpContext == (volatile ushort)ndlp->nlp_rpi)
1888 				return 1;
1889 		case CMD_ELS_REQUEST64_CR:
1890 			if (icmd->un.elsreq64.remoteID == ndlp->nlp_DID)
1891 				return 1;
1892 		case CMD_XMIT_ELS_RSP64_CX:
1893 			if (iocb->context1 == (uint8_t *) ndlp)
1894 				return 1;
1895 		}
1896 	} else if (pring->ringno == psli->extra_ring) {
1897 
1898 	} else if (pring->ringno == psli->fcp_ring) {
1899 		/* Skip match check if waiting to relogin to FCP target */
1900 		if ((ndlp->nlp_type & NLP_FCP_TARGET) &&
1901 		    (ndlp->nlp_flag & NLP_DELAY_TMO)) {
1902 			return 0;
1903 		}
1904 		if (icmd->ulpContext == (volatile ushort)ndlp->nlp_rpi) {
1905 			return 1;
1906 		}
1907 	} else if (pring->ringno == psli->next_ring) {
1908 
1909 	}
1910 	return 0;
1911 }
1912 
1913 /*
1914  * Free resources / clean up outstanding I/Os
1915  * associated with nlp_rpi in the LPFC_NODELIST entry.
1916  */
1917 static int
1918 lpfc_no_rpi(struct lpfc_hba *phba, struct lpfc_nodelist *ndlp)
1919 {
1920 	LIST_HEAD(completions);
1921 	struct lpfc_sli *psli;
1922 	struct lpfc_sli_ring *pring;
1923 	struct lpfc_iocbq *iocb, *next_iocb;
1924 	IOCB_t *icmd;
1925 	uint32_t rpi, i;
1926 
1927 	lpfc_fabric_abort_nport(ndlp);
1928 
1929 	/*
1930 	 * Everything that matches on txcmplq will be returned
1931 	 * by firmware with a no rpi error.
1932 	 */
1933 	psli = &phba->sli;
1934 	rpi = ndlp->nlp_rpi;
1935 	if (rpi) {
1936 		/* Now process each ring */
1937 		for (i = 0; i < psli->num_rings; i++) {
1938 			pring = &psli->ring[i];
1939 
1940 			spin_lock_irq(&phba->hbalock);
1941 			list_for_each_entry_safe(iocb, next_iocb, &pring->txq,
1942 						 list) {
1943 				/*
1944 				 * Check to see if iocb matches the nport we are
1945 				 * looking for
1946 				 */
1947 				if ((lpfc_check_sli_ndlp(phba, pring, iocb,
1948 							 ndlp))) {
1949 					/* It matches, so deque and call compl
1950 					   with an error */
1951 					list_move_tail(&iocb->list,
1952 						       &completions);
1953 					pring->txq_cnt--;
1954 				}
1955 			}
1956 			spin_unlock_irq(&phba->hbalock);
1957 		}
1958 	}
1959 
1960 	while (!list_empty(&completions)) {
1961 		iocb = list_get_first(&completions, struct lpfc_iocbq, list);
1962 		list_del_init(&iocb->list);
1963 
1964 		if (!iocb->iocb_cmpl)
1965 			lpfc_sli_release_iocbq(phba, iocb);
1966 		else {
1967 			icmd = &iocb->iocb;
1968 			icmd->ulpStatus = IOSTAT_LOCAL_REJECT;
1969 			icmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
1970 			(iocb->iocb_cmpl)(phba, iocb, iocb);
1971 		}
1972 	}
1973 
1974 	return 0;
1975 }
1976 
1977 /*
1978  * Free rpi associated with LPFC_NODELIST entry.
1979  * This routine is called from lpfc_freenode(), when we are removing
1980  * a LPFC_NODELIST entry. It is also called if the driver initiates a
1981  * LOGO that completes successfully, and we are waiting to PLOGI back
1982  * to the remote NPort. In addition, it is called after we receive
1983  * and unsolicated ELS cmd, send back a rsp, the rsp completes and
1984  * we are waiting to PLOGI back to the remote NPort.
1985  */
1986 int
1987 lpfc_unreg_rpi(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
1988 {
1989 	struct lpfc_hba *phba = vport->phba;
1990 	LPFC_MBOXQ_t    *mbox;
1991 	int rc;
1992 
1993 	if (ndlp->nlp_rpi) {
1994 		mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
1995 		if (mbox) {
1996 			lpfc_unreg_login(phba, vport->vpi, ndlp->nlp_rpi, mbox);
1997 			mbox->vport = vport;
1998 			mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
1999 			rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
2000 			if (rc == MBX_NOT_FINISHED)
2001 				mempool_free(mbox, phba->mbox_mem_pool);
2002 		}
2003 		lpfc_no_rpi(phba, ndlp);
2004 		ndlp->nlp_rpi = 0;
2005 		return 1;
2006 	}
2007 	return 0;
2008 }
2009 
2010 void
2011 lpfc_unreg_all_rpis(struct lpfc_vport *vport)
2012 {
2013 	struct lpfc_hba  *phba  = vport->phba;
2014 	LPFC_MBOXQ_t     *mbox;
2015 	int rc;
2016 
2017 	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
2018 	if (mbox) {
2019 		lpfc_unreg_login(phba, vport->vpi, 0xffff, mbox);
2020 		mbox->vport = vport;
2021 		mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
2022 		mbox->context1 = NULL;
2023 		rc = lpfc_sli_issue_mbox_wait(phba, mbox, LPFC_MBOX_TMO);
2024 		if (rc == MBX_NOT_FINISHED) {
2025 			mempool_free(mbox, phba->mbox_mem_pool);
2026 		}
2027 	}
2028 }
2029 
2030 void
2031 lpfc_unreg_default_rpis(struct lpfc_vport *vport)
2032 {
2033 	struct lpfc_hba  *phba  = vport->phba;
2034 	LPFC_MBOXQ_t     *mbox;
2035 	int rc;
2036 
2037 	mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
2038 	if (mbox) {
2039 		lpfc_unreg_did(phba, vport->vpi, 0xffffffff, mbox);
2040 		mbox->vport = vport;
2041 		mbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
2042 		mbox->context1 = NULL;
2043 		rc = lpfc_sli_issue_mbox_wait(phba, mbox, LPFC_MBOX_TMO);
2044 		if (rc == MBX_NOT_FINISHED) {
2045 			lpfc_printf_vlog(vport, KERN_ERR, LOG_MBOX | LOG_VPORT,
2046 					 "1815 Could not issue "
2047 					 "unreg_did (default rpis)\n");
2048 			mempool_free(mbox, phba->mbox_mem_pool);
2049 		}
2050 	}
2051 }
2052 
2053 /*
2054  * Free resources associated with LPFC_NODELIST entry
2055  * so it can be freed.
2056  */
2057 static int
2058 lpfc_cleanup_node(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
2059 {
2060 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
2061 	struct lpfc_hba  *phba = vport->phba;
2062 	LPFC_MBOXQ_t *mb, *nextmb;
2063 	struct lpfc_dmabuf *mp;
2064 
2065 	/* Cleanup node for NPort <nlp_DID> */
2066 	lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
2067 			 "0900 Cleanup node for NPort x%x "
2068 			 "Data: x%x x%x x%x\n",
2069 			 ndlp->nlp_DID, ndlp->nlp_flag,
2070 			 ndlp->nlp_state, ndlp->nlp_rpi);
2071 	if (NLP_CHK_FREE_REQ(ndlp)) {
2072 		lpfc_printf_vlog(vport, KERN_WARNING, LOG_NODE,
2073 				"0280 lpfc_cleanup_node: ndlp:x%p "
2074 				"usgmap:x%x refcnt:%d\n",
2075 				(void *)ndlp, ndlp->nlp_usg_map,
2076 				atomic_read(&ndlp->kref.refcount));
2077 		lpfc_dequeue_node(vport, ndlp);
2078 	} else {
2079 		lpfc_printf_vlog(vport, KERN_WARNING, LOG_NODE,
2080 				"0281 lpfc_cleanup_node: ndlp:x%p "
2081 				"usgmap:x%x refcnt:%d\n",
2082 				(void *)ndlp, ndlp->nlp_usg_map,
2083 				atomic_read(&ndlp->kref.refcount));
2084 		lpfc_disable_node(vport, ndlp);
2085 	}
2086 
2087 	/* cleanup any ndlp on mbox q waiting for reglogin cmpl */
2088 	if ((mb = phba->sli.mbox_active)) {
2089 		if ((mb->mb.mbxCommand == MBX_REG_LOGIN64) &&
2090 		   (ndlp == (struct lpfc_nodelist *) mb->context2)) {
2091 			mb->context2 = NULL;
2092 			mb->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
2093 		}
2094 	}
2095 
2096 	spin_lock_irq(&phba->hbalock);
2097 	list_for_each_entry_safe(mb, nextmb, &phba->sli.mboxq, list) {
2098 		if ((mb->mb.mbxCommand == MBX_REG_LOGIN64) &&
2099 		    (ndlp == (struct lpfc_nodelist *) mb->context2)) {
2100 			mp = (struct lpfc_dmabuf *) (mb->context1);
2101 			if (mp) {
2102 				__lpfc_mbuf_free(phba, mp->virt, mp->phys);
2103 				kfree(mp);
2104 			}
2105 			list_del(&mb->list);
2106 			mempool_free(mb, phba->mbox_mem_pool);
2107 			/* We shall not invoke the lpfc_nlp_put to decrement
2108 			 * the ndlp reference count as we are in the process
2109 			 * of lpfc_nlp_release.
2110 			 */
2111 		}
2112 	}
2113 	spin_unlock_irq(&phba->hbalock);
2114 
2115 	lpfc_els_abort(phba, ndlp);
2116 
2117 	spin_lock_irq(shost->host_lock);
2118 	ndlp->nlp_flag &= ~NLP_DELAY_TMO;
2119 	spin_unlock_irq(shost->host_lock);
2120 
2121 	ndlp->nlp_last_elscmd = 0;
2122 	del_timer_sync(&ndlp->nlp_delayfunc);
2123 
2124 	if (!list_empty(&ndlp->els_retry_evt.evt_listp))
2125 		list_del_init(&ndlp->els_retry_evt.evt_listp);
2126 	if (!list_empty(&ndlp->dev_loss_evt.evt_listp))
2127 		list_del_init(&ndlp->dev_loss_evt.evt_listp);
2128 
2129 	lpfc_unreg_rpi(vport, ndlp);
2130 
2131 	return 0;
2132 }
2133 
2134 /*
2135  * Check to see if we can free the nlp back to the freelist.
2136  * If we are in the middle of using the nlp in the discovery state
2137  * machine, defer the free till we reach the end of the state machine.
2138  */
2139 static void
2140 lpfc_nlp_remove(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp)
2141 {
2142 	struct lpfc_hba  *phba = vport->phba;
2143 	struct lpfc_rport_data *rdata;
2144 	LPFC_MBOXQ_t *mbox;
2145 	int rc;
2146 
2147 	if (ndlp->nlp_flag & NLP_DELAY_TMO) {
2148 		lpfc_cancel_retry_delay_tmo(vport, ndlp);
2149 	}
2150 
2151 	if (ndlp->nlp_flag & NLP_DEFER_RM && !ndlp->nlp_rpi) {
2152 		/* For this case we need to cleanup the default rpi
2153 		 * allocated by the firmware.
2154 		 */
2155 		if ((mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL))
2156 			!= NULL) {
2157 			rc = lpfc_reg_login(phba, vport->vpi, ndlp->nlp_DID,
2158 			    (uint8_t *) &vport->fc_sparam, mbox, 0);
2159 			if (rc) {
2160 				mempool_free(mbox, phba->mbox_mem_pool);
2161 			}
2162 			else {
2163 				mbox->mbox_flag |= LPFC_MBX_IMED_UNREG;
2164 				mbox->mbox_cmpl = lpfc_mbx_cmpl_dflt_rpi;
2165 				mbox->vport = vport;
2166 				mbox->context2 = NULL;
2167 				rc =lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
2168 				if (rc == MBX_NOT_FINISHED) {
2169 					mempool_free(mbox, phba->mbox_mem_pool);
2170 				}
2171 			}
2172 		}
2173 	}
2174 	lpfc_cleanup_node(vport, ndlp);
2175 
2176 	/*
2177 	 * We can get here with a non-NULL ndlp->rport because when we
2178 	 * unregister a rport we don't break the rport/node linkage.  So if we
2179 	 * do, make sure we don't leaving any dangling pointers behind.
2180 	 */
2181 	if (ndlp->rport) {
2182 		rdata = ndlp->rport->dd_data;
2183 		rdata->pnode = NULL;
2184 		ndlp->rport = NULL;
2185 	}
2186 }
2187 
2188 static int
2189 lpfc_matchdid(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
2190 	      uint32_t did)
2191 {
2192 	D_ID mydid, ndlpdid, matchdid;
2193 
2194 	if (did == Bcast_DID)
2195 		return 0;
2196 
2197 	/* First check for Direct match */
2198 	if (ndlp->nlp_DID == did)
2199 		return 1;
2200 
2201 	/* Next check for area/domain identically equals 0 match */
2202 	mydid.un.word = vport->fc_myDID;
2203 	if ((mydid.un.b.domain == 0) && (mydid.un.b.area == 0)) {
2204 		return 0;
2205 	}
2206 
2207 	matchdid.un.word = did;
2208 	ndlpdid.un.word = ndlp->nlp_DID;
2209 	if (matchdid.un.b.id == ndlpdid.un.b.id) {
2210 		if ((mydid.un.b.domain == matchdid.un.b.domain) &&
2211 		    (mydid.un.b.area == matchdid.un.b.area)) {
2212 			if ((ndlpdid.un.b.domain == 0) &&
2213 			    (ndlpdid.un.b.area == 0)) {
2214 				if (ndlpdid.un.b.id)
2215 					return 1;
2216 			}
2217 			return 0;
2218 		}
2219 
2220 		matchdid.un.word = ndlp->nlp_DID;
2221 		if ((mydid.un.b.domain == ndlpdid.un.b.domain) &&
2222 		    (mydid.un.b.area == ndlpdid.un.b.area)) {
2223 			if ((matchdid.un.b.domain == 0) &&
2224 			    (matchdid.un.b.area == 0)) {
2225 				if (matchdid.un.b.id)
2226 					return 1;
2227 			}
2228 		}
2229 	}
2230 	return 0;
2231 }
2232 
2233 /* Search for a nodelist entry */
2234 static struct lpfc_nodelist *
2235 __lpfc_findnode_did(struct lpfc_vport *vport, uint32_t did)
2236 {
2237 	struct lpfc_nodelist *ndlp;
2238 	uint32_t data1;
2239 
2240 	list_for_each_entry(ndlp, &vport->fc_nodes, nlp_listp) {
2241 		if (lpfc_matchdid(vport, ndlp, did)) {
2242 			data1 = (((uint32_t) ndlp->nlp_state << 24) |
2243 				 ((uint32_t) ndlp->nlp_xri << 16) |
2244 				 ((uint32_t) ndlp->nlp_type << 8) |
2245 				 ((uint32_t) ndlp->nlp_rpi & 0xff));
2246 			lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
2247 					 "0929 FIND node DID "
2248 					 "Data: x%p x%x x%x x%x\n",
2249 					 ndlp, ndlp->nlp_DID,
2250 					 ndlp->nlp_flag, data1);
2251 			return ndlp;
2252 		}
2253 	}
2254 
2255 	/* FIND node did <did> NOT FOUND */
2256 	lpfc_printf_vlog(vport, KERN_INFO, LOG_NODE,
2257 			 "0932 FIND node did x%x NOT FOUND.\n", did);
2258 	return NULL;
2259 }
2260 
2261 struct lpfc_nodelist *
2262 lpfc_findnode_did(struct lpfc_vport *vport, uint32_t did)
2263 {
2264 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
2265 	struct lpfc_nodelist *ndlp;
2266 
2267 	spin_lock_irq(shost->host_lock);
2268 	ndlp = __lpfc_findnode_did(vport, did);
2269 	spin_unlock_irq(shost->host_lock);
2270 	return ndlp;
2271 }
2272 
2273 struct lpfc_nodelist *
2274 lpfc_setup_disc_node(struct lpfc_vport *vport, uint32_t did)
2275 {
2276 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
2277 	struct lpfc_nodelist *ndlp;
2278 
2279 	ndlp = lpfc_findnode_did(vport, did);
2280 	if (!ndlp) {
2281 		if ((vport->fc_flag & FC_RSCN_MODE) != 0 &&
2282 		    lpfc_rscn_payload_check(vport, did) == 0)
2283 			return NULL;
2284 		ndlp = (struct lpfc_nodelist *)
2285 		     mempool_alloc(vport->phba->nlp_mem_pool, GFP_KERNEL);
2286 		if (!ndlp)
2287 			return NULL;
2288 		lpfc_nlp_init(vport, ndlp, did);
2289 		lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
2290 		spin_lock_irq(shost->host_lock);
2291 		ndlp->nlp_flag |= NLP_NPR_2B_DISC;
2292 		spin_unlock_irq(shost->host_lock);
2293 		return ndlp;
2294 	} else if (!NLP_CHK_NODE_ACT(ndlp)) {
2295 		ndlp = lpfc_enable_node(vport, ndlp, NLP_STE_NPR_NODE);
2296 		if (!ndlp)
2297 			return NULL;
2298 		spin_lock_irq(shost->host_lock);
2299 		ndlp->nlp_flag |= NLP_NPR_2B_DISC;
2300 		spin_unlock_irq(shost->host_lock);
2301 		return ndlp;
2302 	}
2303 
2304 	if ((vport->fc_flag & FC_RSCN_MODE) &&
2305 	    !(vport->fc_flag & FC_NDISC_ACTIVE)) {
2306 		if (lpfc_rscn_payload_check(vport, did)) {
2307 			/* If we've already recieved a PLOGI from this NPort
2308 			 * we don't need to try to discover it again.
2309 			 */
2310 			if (ndlp->nlp_flag & NLP_RCV_PLOGI)
2311 				return NULL;
2312 
2313 			spin_lock_irq(shost->host_lock);
2314 			ndlp->nlp_flag |= NLP_NPR_2B_DISC;
2315 			spin_unlock_irq(shost->host_lock);
2316 
2317 			/* Since this node is marked for discovery,
2318 			 * delay timeout is not needed.
2319 			 */
2320 			if (ndlp->nlp_flag & NLP_DELAY_TMO)
2321 				lpfc_cancel_retry_delay_tmo(vport, ndlp);
2322 		} else
2323 			ndlp = NULL;
2324 	} else {
2325 		/* If we've already recieved a PLOGI from this NPort,
2326 		 * or we are already in the process of discovery on it,
2327 		 * we don't need to try to discover it again.
2328 		 */
2329 		if (ndlp->nlp_state == NLP_STE_ADISC_ISSUE ||
2330 		    ndlp->nlp_state == NLP_STE_PLOGI_ISSUE ||
2331 		    ndlp->nlp_flag & NLP_RCV_PLOGI)
2332 			return NULL;
2333 		lpfc_nlp_set_state(vport, ndlp, NLP_STE_NPR_NODE);
2334 		spin_lock_irq(shost->host_lock);
2335 		ndlp->nlp_flag |= NLP_NPR_2B_DISC;
2336 		spin_unlock_irq(shost->host_lock);
2337 	}
2338 	return ndlp;
2339 }
2340 
2341 /* Build a list of nodes to discover based on the loopmap */
2342 void
2343 lpfc_disc_list_loopmap(struct lpfc_vport *vport)
2344 {
2345 	struct lpfc_hba  *phba = vport->phba;
2346 	int j;
2347 	uint32_t alpa, index;
2348 
2349 	if (!lpfc_is_link_up(phba))
2350 		return;
2351 
2352 	if (phba->fc_topology != TOPOLOGY_LOOP)
2353 		return;
2354 
2355 	/* Check for loop map present or not */
2356 	if (phba->alpa_map[0]) {
2357 		for (j = 1; j <= phba->alpa_map[0]; j++) {
2358 			alpa = phba->alpa_map[j];
2359 			if (((vport->fc_myDID & 0xff) == alpa) || (alpa == 0))
2360 				continue;
2361 			lpfc_setup_disc_node(vport, alpa);
2362 		}
2363 	} else {
2364 		/* No alpamap, so try all alpa's */
2365 		for (j = 0; j < FC_MAXLOOP; j++) {
2366 			/* If cfg_scan_down is set, start from highest
2367 			 * ALPA (0xef) to lowest (0x1).
2368 			 */
2369 			if (vport->cfg_scan_down)
2370 				index = j;
2371 			else
2372 				index = FC_MAXLOOP - j - 1;
2373 			alpa = lpfcAlpaArray[index];
2374 			if ((vport->fc_myDID & 0xff) == alpa)
2375 				continue;
2376 			lpfc_setup_disc_node(vport, alpa);
2377 		}
2378 	}
2379 	return;
2380 }
2381 
2382 void
2383 lpfc_issue_clear_la(struct lpfc_hba *phba, struct lpfc_vport *vport)
2384 {
2385 	LPFC_MBOXQ_t *mbox;
2386 	struct lpfc_sli *psli = &phba->sli;
2387 	struct lpfc_sli_ring *extra_ring = &psli->ring[psli->extra_ring];
2388 	struct lpfc_sli_ring *fcp_ring   = &psli->ring[psli->fcp_ring];
2389 	struct lpfc_sli_ring *next_ring  = &psli->ring[psli->next_ring];
2390 	int  rc;
2391 
2392 	/*
2393 	 * if it's not a physical port or if we already send
2394 	 * clear_la then don't send it.
2395 	 */
2396 	if ((phba->link_state >= LPFC_CLEAR_LA) ||
2397 	    (vport->port_type != LPFC_PHYSICAL_PORT))
2398 		return;
2399 
2400 			/* Link up discovery */
2401 	if ((mbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL)) != NULL) {
2402 		phba->link_state = LPFC_CLEAR_LA;
2403 		lpfc_clear_la(phba, mbox);
2404 		mbox->mbox_cmpl = lpfc_mbx_cmpl_clear_la;
2405 		mbox->vport = vport;
2406 		rc = lpfc_sli_issue_mbox(phba, mbox, MBX_NOWAIT);
2407 		if (rc == MBX_NOT_FINISHED) {
2408 			mempool_free(mbox, phba->mbox_mem_pool);
2409 			lpfc_disc_flush_list(vport);
2410 			extra_ring->flag &= ~LPFC_STOP_IOCB_EVENT;
2411 			fcp_ring->flag &= ~LPFC_STOP_IOCB_EVENT;
2412 			next_ring->flag &= ~LPFC_STOP_IOCB_EVENT;
2413 			phba->link_state = LPFC_HBA_ERROR;
2414 		}
2415 	}
2416 }
2417 
2418 /* Reg_vpi to tell firmware to resume normal operations */
2419 void
2420 lpfc_issue_reg_vpi(struct lpfc_hba *phba, struct lpfc_vport *vport)
2421 {
2422 	LPFC_MBOXQ_t *regvpimbox;
2423 
2424 	regvpimbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
2425 	if (regvpimbox) {
2426 		lpfc_reg_vpi(phba, vport->vpi, vport->fc_myDID, regvpimbox);
2427 		regvpimbox->mbox_cmpl = lpfc_mbx_cmpl_reg_vpi;
2428 		regvpimbox->vport = vport;
2429 		if (lpfc_sli_issue_mbox(phba, regvpimbox, MBX_NOWAIT)
2430 					== MBX_NOT_FINISHED) {
2431 			mempool_free(regvpimbox, phba->mbox_mem_pool);
2432 		}
2433 	}
2434 }
2435 
2436 /* Start Link up / RSCN discovery on NPR nodes */
2437 void
2438 lpfc_disc_start(struct lpfc_vport *vport)
2439 {
2440 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
2441 	struct lpfc_hba  *phba = vport->phba;
2442 	uint32_t num_sent;
2443 	uint32_t clear_la_pending;
2444 	int did_changed;
2445 
2446 	if (!lpfc_is_link_up(phba))
2447 		return;
2448 
2449 	if (phba->link_state == LPFC_CLEAR_LA)
2450 		clear_la_pending = 1;
2451 	else
2452 		clear_la_pending = 0;
2453 
2454 	if (vport->port_state < LPFC_VPORT_READY)
2455 		vport->port_state = LPFC_DISC_AUTH;
2456 
2457 	lpfc_set_disctmo(vport);
2458 
2459 	if (vport->fc_prevDID == vport->fc_myDID)
2460 		did_changed = 0;
2461 	else
2462 		did_changed = 1;
2463 
2464 	vport->fc_prevDID = vport->fc_myDID;
2465 	vport->num_disc_nodes = 0;
2466 
2467 	/* Start Discovery state <hba_state> */
2468 	lpfc_printf_vlog(vport, KERN_INFO, LOG_DISCOVERY,
2469 			 "0202 Start Discovery hba state x%x "
2470 			 "Data: x%x x%x x%x\n",
2471 			 vport->port_state, vport->fc_flag, vport->fc_plogi_cnt,
2472 			 vport->fc_adisc_cnt);
2473 
2474 	/* First do ADISCs - if any */
2475 	num_sent = lpfc_els_disc_adisc(vport);
2476 
2477 	if (num_sent)
2478 		return;
2479 
2480 	/*
2481 	 * For SLI3, cmpl_reg_vpi will set port_state to READY, and
2482 	 * continue discovery.
2483 	 */
2484 	if ((phba->sli3_options & LPFC_SLI3_NPIV_ENABLED) &&
2485 	    !(vport->fc_flag & FC_PT2PT) &&
2486 	    !(vport->fc_flag & FC_RSCN_MODE)) {
2487 		lpfc_issue_reg_vpi(phba, vport);
2488 		return;
2489 	}
2490 
2491 	/*
2492 	 * For SLI2, we need to set port_state to READY and continue
2493 	 * discovery.
2494 	 */
2495 	if (vport->port_state < LPFC_VPORT_READY && !clear_la_pending) {
2496 		/* If we get here, there is nothing to ADISC */
2497 		if (vport->port_type == LPFC_PHYSICAL_PORT)
2498 			lpfc_issue_clear_la(phba, vport);
2499 
2500 		if (!(vport->fc_flag & FC_ABORT_DISCOVERY)) {
2501 			vport->num_disc_nodes = 0;
2502 			/* go thru NPR nodes and issue ELS PLOGIs */
2503 			if (vport->fc_npr_cnt)
2504 				lpfc_els_disc_plogi(vport);
2505 
2506 			if (!vport->num_disc_nodes) {
2507 				spin_lock_irq(shost->host_lock);
2508 				vport->fc_flag &= ~FC_NDISC_ACTIVE;
2509 				spin_unlock_irq(shost->host_lock);
2510 				lpfc_can_disctmo(vport);
2511 			}
2512 		}
2513 		vport->port_state = LPFC_VPORT_READY;
2514 	} else {
2515 		/* Next do PLOGIs - if any */
2516 		num_sent = lpfc_els_disc_plogi(vport);
2517 
2518 		if (num_sent)
2519 			return;
2520 
2521 		if (vport->fc_flag & FC_RSCN_MODE) {
2522 			/* Check to see if more RSCNs came in while we
2523 			 * were processing this one.
2524 			 */
2525 			if ((vport->fc_rscn_id_cnt == 0) &&
2526 			    (!(vport->fc_flag & FC_RSCN_DISCOVERY))) {
2527 				spin_lock_irq(shost->host_lock);
2528 				vport->fc_flag &= ~FC_RSCN_MODE;
2529 				spin_unlock_irq(shost->host_lock);
2530 				lpfc_can_disctmo(vport);
2531 			} else
2532 				lpfc_els_handle_rscn(vport);
2533 		}
2534 	}
2535 	return;
2536 }
2537 
2538 /*
2539  *  Ignore completion for all IOCBs on tx and txcmpl queue for ELS
2540  *  ring the match the sppecified nodelist.
2541  */
2542 static void
2543 lpfc_free_tx(struct lpfc_hba *phba, struct lpfc_nodelist *ndlp)
2544 {
2545 	LIST_HEAD(completions);
2546 	struct lpfc_sli *psli;
2547 	IOCB_t     *icmd;
2548 	struct lpfc_iocbq    *iocb, *next_iocb;
2549 	struct lpfc_sli_ring *pring;
2550 
2551 	psli = &phba->sli;
2552 	pring = &psli->ring[LPFC_ELS_RING];
2553 
2554 	/* Error matching iocb on txq or txcmplq
2555 	 * First check the txq.
2556 	 */
2557 	spin_lock_irq(&phba->hbalock);
2558 	list_for_each_entry_safe(iocb, next_iocb, &pring->txq, list) {
2559 		if (iocb->context1 != ndlp) {
2560 			continue;
2561 		}
2562 		icmd = &iocb->iocb;
2563 		if ((icmd->ulpCommand == CMD_ELS_REQUEST64_CR) ||
2564 		    (icmd->ulpCommand == CMD_XMIT_ELS_RSP64_CX)) {
2565 
2566 			list_move_tail(&iocb->list, &completions);
2567 			pring->txq_cnt--;
2568 		}
2569 	}
2570 
2571 	/* Next check the txcmplq */
2572 	list_for_each_entry_safe(iocb, next_iocb, &pring->txcmplq, list) {
2573 		if (iocb->context1 != ndlp) {
2574 			continue;
2575 		}
2576 		icmd = &iocb->iocb;
2577 		if (icmd->ulpCommand == CMD_ELS_REQUEST64_CR ||
2578 		    icmd->ulpCommand == CMD_XMIT_ELS_RSP64_CX) {
2579 			lpfc_sli_issue_abort_iotag(phba, pring, iocb);
2580 		}
2581 	}
2582 	spin_unlock_irq(&phba->hbalock);
2583 
2584 	while (!list_empty(&completions)) {
2585 		iocb = list_get_first(&completions, struct lpfc_iocbq, list);
2586 		list_del_init(&iocb->list);
2587 
2588 		if (!iocb->iocb_cmpl)
2589 			lpfc_sli_release_iocbq(phba, iocb);
2590 		else {
2591 			icmd = &iocb->iocb;
2592 			icmd->ulpStatus = IOSTAT_LOCAL_REJECT;
2593 			icmd->un.ulpWord[4] = IOERR_SLI_ABORTED;
2594 			(iocb->iocb_cmpl) (phba, iocb, iocb);
2595 		}
2596 	}
2597 }
2598 
2599 static void
2600 lpfc_disc_flush_list(struct lpfc_vport *vport)
2601 {
2602 	struct lpfc_nodelist *ndlp, *next_ndlp;
2603 	struct lpfc_hba *phba = vport->phba;
2604 
2605 	if (vport->fc_plogi_cnt || vport->fc_adisc_cnt) {
2606 		list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes,
2607 					 nlp_listp) {
2608 			if (!NLP_CHK_NODE_ACT(ndlp))
2609 				continue;
2610 			if (ndlp->nlp_state == NLP_STE_PLOGI_ISSUE ||
2611 			    ndlp->nlp_state == NLP_STE_ADISC_ISSUE) {
2612 				lpfc_free_tx(phba, ndlp);
2613 			}
2614 		}
2615 	}
2616 }
2617 
2618 void
2619 lpfc_cleanup_discovery_resources(struct lpfc_vport *vport)
2620 {
2621 	lpfc_els_flush_rscn(vport);
2622 	lpfc_els_flush_cmd(vport);
2623 	lpfc_disc_flush_list(vport);
2624 }
2625 
2626 /*****************************************************************************/
2627 /*
2628  * NAME:     lpfc_disc_timeout
2629  *
2630  * FUNCTION: Fibre Channel driver discovery timeout routine.
2631  *
2632  * EXECUTION ENVIRONMENT: interrupt only
2633  *
2634  * CALLED FROM:
2635  *      Timer function
2636  *
2637  * RETURNS:
2638  *      none
2639  */
2640 /*****************************************************************************/
2641 void
2642 lpfc_disc_timeout(unsigned long ptr)
2643 {
2644 	struct lpfc_vport *vport = (struct lpfc_vport *) ptr;
2645 	struct lpfc_hba   *phba = vport->phba;
2646 	unsigned long flags = 0;
2647 
2648 	if (unlikely(!phba))
2649 		return;
2650 
2651 	if ((vport->work_port_events & WORKER_DISC_TMO) == 0) {
2652 		spin_lock_irqsave(&vport->work_port_lock, flags);
2653 		vport->work_port_events |= WORKER_DISC_TMO;
2654 		spin_unlock_irqrestore(&vport->work_port_lock, flags);
2655 
2656 		spin_lock_irqsave(&phba->hbalock, flags);
2657 		if (phba->work_wait)
2658 			lpfc_worker_wake_up(phba);
2659 		spin_unlock_irqrestore(&phba->hbalock, flags);
2660 	}
2661 	return;
2662 }
2663 
2664 static void
2665 lpfc_disc_timeout_handler(struct lpfc_vport *vport)
2666 {
2667 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
2668 	struct lpfc_hba  *phba = vport->phba;
2669 	struct lpfc_sli  *psli = &phba->sli;
2670 	struct lpfc_nodelist *ndlp, *next_ndlp;
2671 	LPFC_MBOXQ_t *initlinkmbox;
2672 	int rc, clrlaerr = 0;
2673 
2674 	if (!(vport->fc_flag & FC_DISC_TMO))
2675 		return;
2676 
2677 	spin_lock_irq(shost->host_lock);
2678 	vport->fc_flag &= ~FC_DISC_TMO;
2679 	spin_unlock_irq(shost->host_lock);
2680 
2681 	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_ELS_CMD,
2682 		"disc timeout:    state:x%x rtry:x%x flg:x%x",
2683 		vport->port_state, vport->fc_ns_retry, vport->fc_flag);
2684 
2685 	switch (vport->port_state) {
2686 
2687 	case LPFC_LOCAL_CFG_LINK:
2688 	/* port_state is identically  LPFC_LOCAL_CFG_LINK while waiting for
2689 	 * FAN
2690 	 */
2691 				/* FAN timeout */
2692 		lpfc_printf_vlog(vport, KERN_WARNING, LOG_DISCOVERY,
2693 				 "0221 FAN timeout\n");
2694 		/* Start discovery by sending FLOGI, clean up old rpis */
2695 		list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes,
2696 					 nlp_listp) {
2697 			if (!NLP_CHK_NODE_ACT(ndlp))
2698 				continue;
2699 			if (ndlp->nlp_state != NLP_STE_NPR_NODE)
2700 				continue;
2701 			if (ndlp->nlp_type & NLP_FABRIC) {
2702 				/* Clean up the ndlp on Fabric connections */
2703 				lpfc_drop_node(vport, ndlp);
2704 
2705 			} else if (!(ndlp->nlp_flag & NLP_NPR_ADISC)) {
2706 				/* Fail outstanding IO now since device
2707 				 * is marked for PLOGI.
2708 				 */
2709 				lpfc_unreg_rpi(vport, ndlp);
2710 			}
2711 		}
2712 		if (vport->port_state != LPFC_FLOGI) {
2713 			lpfc_initial_flogi(vport);
2714 			return;
2715 		}
2716 		break;
2717 
2718 	case LPFC_FDISC:
2719 	case LPFC_FLOGI:
2720 	/* port_state is identically LPFC_FLOGI while waiting for FLOGI cmpl */
2721 		/* Initial FLOGI timeout */
2722 		lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
2723 				 "0222 Initial %s timeout\n",
2724 				 vport->vpi ? "FDISC" : "FLOGI");
2725 
2726 		/* Assume no Fabric and go on with discovery.
2727 		 * Check for outstanding ELS FLOGI to abort.
2728 		 */
2729 
2730 		/* FLOGI failed, so just use loop map to make discovery list */
2731 		lpfc_disc_list_loopmap(vport);
2732 
2733 		/* Start discovery */
2734 		lpfc_disc_start(vport);
2735 		break;
2736 
2737 	case LPFC_FABRIC_CFG_LINK:
2738 	/* hba_state is identically LPFC_FABRIC_CFG_LINK while waiting for
2739 	   NameServer login */
2740 		lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
2741 				 "0223 Timeout while waiting for "
2742 				 "NameServer login\n");
2743 		/* Next look for NameServer ndlp */
2744 		ndlp = lpfc_findnode_did(vport, NameServer_DID);
2745 		if (ndlp && NLP_CHK_NODE_ACT(ndlp))
2746 			lpfc_els_abort(phba, ndlp);
2747 
2748 		/* ReStart discovery */
2749 		goto restart_disc;
2750 
2751 	case LPFC_NS_QRY:
2752 	/* Check for wait for NameServer Rsp timeout */
2753 		lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
2754 				 "0224 NameServer Query timeout "
2755 				 "Data: x%x x%x\n",
2756 				 vport->fc_ns_retry, LPFC_MAX_NS_RETRY);
2757 
2758 		if (vport->fc_ns_retry < LPFC_MAX_NS_RETRY) {
2759 			/* Try it one more time */
2760 			vport->fc_ns_retry++;
2761 			rc = lpfc_ns_cmd(vport, SLI_CTNS_GID_FT,
2762 					 vport->fc_ns_retry, 0);
2763 			if (rc == 0)
2764 				break;
2765 		}
2766 		vport->fc_ns_retry = 0;
2767 
2768 restart_disc:
2769 		/*
2770 		 * Discovery is over.
2771 		 * set port_state to PORT_READY if SLI2.
2772 		 * cmpl_reg_vpi will set port_state to READY for SLI3.
2773 		 */
2774 		if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED)
2775 			lpfc_issue_reg_vpi(phba, vport);
2776 		else  {	/* NPIV Not enabled */
2777 			lpfc_issue_clear_la(phba, vport);
2778 			vport->port_state = LPFC_VPORT_READY;
2779 		}
2780 
2781 		/* Setup and issue mailbox INITIALIZE LINK command */
2782 		initlinkmbox = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
2783 		if (!initlinkmbox) {
2784 			lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
2785 					 "0206 Device Discovery "
2786 					 "completion error\n");
2787 			phba->link_state = LPFC_HBA_ERROR;
2788 			break;
2789 		}
2790 
2791 		lpfc_linkdown(phba);
2792 		lpfc_init_link(phba, initlinkmbox, phba->cfg_topology,
2793 			       phba->cfg_link_speed);
2794 		initlinkmbox->mb.un.varInitLnk.lipsr_AL_PA = 0;
2795 		initlinkmbox->vport = vport;
2796 		initlinkmbox->mbox_cmpl = lpfc_sli_def_mbox_cmpl;
2797 		rc = lpfc_sli_issue_mbox(phba, initlinkmbox, MBX_NOWAIT);
2798 		lpfc_set_loopback_flag(phba);
2799 		if (rc == MBX_NOT_FINISHED)
2800 			mempool_free(initlinkmbox, phba->mbox_mem_pool);
2801 
2802 		break;
2803 
2804 	case LPFC_DISC_AUTH:
2805 	/* Node Authentication timeout */
2806 		lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
2807 				 "0227 Node Authentication timeout\n");
2808 		lpfc_disc_flush_list(vport);
2809 
2810 		/*
2811 		 * set port_state to PORT_READY if SLI2.
2812 		 * cmpl_reg_vpi will set port_state to READY for SLI3.
2813 		 */
2814 		if (phba->sli3_options & LPFC_SLI3_NPIV_ENABLED)
2815 			lpfc_issue_reg_vpi(phba, vport);
2816 		else {	/* NPIV Not enabled */
2817 			lpfc_issue_clear_la(phba, vport);
2818 			vport->port_state = LPFC_VPORT_READY;
2819 		}
2820 		break;
2821 
2822 	case LPFC_VPORT_READY:
2823 		if (vport->fc_flag & FC_RSCN_MODE) {
2824 			lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
2825 					 "0231 RSCN timeout Data: x%x "
2826 					 "x%x\n",
2827 					 vport->fc_ns_retry, LPFC_MAX_NS_RETRY);
2828 
2829 			/* Cleanup any outstanding ELS commands */
2830 			lpfc_els_flush_cmd(vport);
2831 
2832 			lpfc_els_flush_rscn(vport);
2833 			lpfc_disc_flush_list(vport);
2834 		}
2835 		break;
2836 
2837 	default:
2838 		lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
2839 				 "0229 Unexpected discovery timeout, "
2840 				 "vport State x%x\n", vport->port_state);
2841 		break;
2842 	}
2843 
2844 	switch (phba->link_state) {
2845 	case LPFC_CLEAR_LA:
2846 				/* CLEAR LA timeout */
2847 		lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
2848 				 "0228 CLEAR LA timeout\n");
2849 		clrlaerr = 1;
2850 		break;
2851 
2852 	case LPFC_LINK_UP:
2853 		lpfc_issue_clear_la(phba, vport);
2854 		/* Drop thru */
2855 	case LPFC_LINK_UNKNOWN:
2856 	case LPFC_WARM_START:
2857 	case LPFC_INIT_START:
2858 	case LPFC_INIT_MBX_CMDS:
2859 	case LPFC_LINK_DOWN:
2860 	case LPFC_HBA_ERROR:
2861 		lpfc_printf_vlog(vport, KERN_ERR, LOG_DISCOVERY,
2862 				 "0230 Unexpected timeout, hba link "
2863 				 "state x%x\n", phba->link_state);
2864 		clrlaerr = 1;
2865 		break;
2866 
2867 	case LPFC_HBA_READY:
2868 		break;
2869 	}
2870 
2871 	if (clrlaerr) {
2872 		lpfc_disc_flush_list(vport);
2873 		psli->ring[(psli->extra_ring)].flag &= ~LPFC_STOP_IOCB_EVENT;
2874 		psli->ring[(psli->fcp_ring)].flag &= ~LPFC_STOP_IOCB_EVENT;
2875 		psli->ring[(psli->next_ring)].flag &= ~LPFC_STOP_IOCB_EVENT;
2876 		vport->port_state = LPFC_VPORT_READY;
2877 	}
2878 
2879 	return;
2880 }
2881 
2882 /*
2883  * This routine handles processing a NameServer REG_LOGIN mailbox
2884  * command upon completion. It is setup in the LPFC_MBOXQ
2885  * as the completion routine when the command is
2886  * handed off to the SLI layer.
2887  */
2888 void
2889 lpfc_mbx_cmpl_fdmi_reg_login(struct lpfc_hba *phba, LPFC_MBOXQ_t *pmb)
2890 {
2891 	MAILBOX_t *mb = &pmb->mb;
2892 	struct lpfc_dmabuf   *mp = (struct lpfc_dmabuf *) (pmb->context1);
2893 	struct lpfc_nodelist *ndlp = (struct lpfc_nodelist *) pmb->context2;
2894 	struct lpfc_vport    *vport = pmb->vport;
2895 
2896 	pmb->context1 = NULL;
2897 
2898 	ndlp->nlp_rpi = mb->un.varWords[0];
2899 	ndlp->nlp_type |= NLP_FABRIC;
2900 	lpfc_nlp_set_state(vport, ndlp, NLP_STE_UNMAPPED_NODE);
2901 
2902 	/*
2903 	 * Start issuing Fabric-Device Management Interface (FDMI) command to
2904 	 * 0xfffffa (FDMI well known port) or Delay issuing FDMI command if
2905 	 * fdmi-on=2 (supporting RPA/hostnmae)
2906 	 */
2907 
2908 	if (vport->cfg_fdmi_on == 1)
2909 		lpfc_fdmi_cmd(vport, ndlp, SLI_MGMT_DHBA);
2910 	else
2911 		mod_timer(&vport->fc_fdmitmo, jiffies + HZ * 60);
2912 
2913 	/* decrement the node reference count held for this callback
2914 	 * function.
2915 	 */
2916 	lpfc_nlp_put(ndlp);
2917 	lpfc_mbuf_free(phba, mp->virt, mp->phys);
2918 	kfree(mp);
2919 	mempool_free(pmb, phba->mbox_mem_pool);
2920 
2921 	return;
2922 }
2923 
2924 static int
2925 lpfc_filter_by_rpi(struct lpfc_nodelist *ndlp, void *param)
2926 {
2927 	uint16_t *rpi = param;
2928 
2929 	return ndlp->nlp_rpi == *rpi;
2930 }
2931 
2932 static int
2933 lpfc_filter_by_wwpn(struct lpfc_nodelist *ndlp, void *param)
2934 {
2935 	return memcmp(&ndlp->nlp_portname, param,
2936 		      sizeof(ndlp->nlp_portname)) == 0;
2937 }
2938 
2939 static struct lpfc_nodelist *
2940 __lpfc_find_node(struct lpfc_vport *vport, node_filter filter, void *param)
2941 {
2942 	struct lpfc_nodelist *ndlp;
2943 
2944 	list_for_each_entry(ndlp, &vport->fc_nodes, nlp_listp) {
2945 		if (filter(ndlp, param))
2946 			return ndlp;
2947 	}
2948 	return NULL;
2949 }
2950 
2951 /*
2952  * This routine looks up the ndlp lists for the given RPI. If rpi found it
2953  * returns the node list element pointer else return NULL.
2954  */
2955 struct lpfc_nodelist *
2956 __lpfc_findnode_rpi(struct lpfc_vport *vport, uint16_t rpi)
2957 {
2958 	return __lpfc_find_node(vport, lpfc_filter_by_rpi, &rpi);
2959 }
2960 
2961 /*
2962  * This routine looks up the ndlp lists for the given WWPN. If WWPN found it
2963  * returns the node element list pointer else return NULL.
2964  */
2965 struct lpfc_nodelist *
2966 lpfc_findnode_wwpn(struct lpfc_vport *vport, struct lpfc_name *wwpn)
2967 {
2968 	struct Scsi_Host *shost = lpfc_shost_from_vport(vport);
2969 	struct lpfc_nodelist *ndlp;
2970 
2971 	spin_lock_irq(shost->host_lock);
2972 	ndlp = __lpfc_find_node(vport, lpfc_filter_by_wwpn, wwpn);
2973 	spin_unlock_irq(shost->host_lock);
2974 	return ndlp;
2975 }
2976 
2977 void
2978 lpfc_nlp_init(struct lpfc_vport *vport, struct lpfc_nodelist *ndlp,
2979 	      uint32_t did)
2980 {
2981 	memset(ndlp, 0, sizeof (struct lpfc_nodelist));
2982 	INIT_LIST_HEAD(&ndlp->els_retry_evt.evt_listp);
2983 	INIT_LIST_HEAD(&ndlp->dev_loss_evt.evt_listp);
2984 	init_timer(&ndlp->nlp_delayfunc);
2985 	ndlp->nlp_delayfunc.function = lpfc_els_retry_delay;
2986 	ndlp->nlp_delayfunc.data = (unsigned long)ndlp;
2987 	ndlp->nlp_DID = did;
2988 	ndlp->vport = vport;
2989 	ndlp->nlp_sid = NLP_NO_SID;
2990 	INIT_LIST_HEAD(&ndlp->nlp_listp);
2991 	kref_init(&ndlp->kref);
2992 	NLP_INT_NODE_ACT(ndlp);
2993 
2994 	lpfc_debugfs_disc_trc(vport, LPFC_DISC_TRC_NODE,
2995 		"node init:       did:x%x",
2996 		ndlp->nlp_DID, 0, 0);
2997 
2998 	return;
2999 }
3000 
3001 /* This routine releases all resources associated with a specifc NPort's ndlp
3002  * and mempool_free's the nodelist.
3003  */
3004 static void
3005 lpfc_nlp_release(struct kref *kref)
3006 {
3007 	struct lpfc_hba *phba;
3008 	unsigned long flags;
3009 	struct lpfc_nodelist *ndlp = container_of(kref, struct lpfc_nodelist,
3010 						  kref);
3011 
3012 	lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_NODE,
3013 		"node release:    did:x%x flg:x%x type:x%x",
3014 		ndlp->nlp_DID, ndlp->nlp_flag, ndlp->nlp_type);
3015 
3016 	lpfc_printf_vlog(ndlp->vport, KERN_INFO, LOG_NODE,
3017 			"0279 lpfc_nlp_release: ndlp:x%p "
3018 			"usgmap:x%x refcnt:%d\n",
3019 			(void *)ndlp, ndlp->nlp_usg_map,
3020 			atomic_read(&ndlp->kref.refcount));
3021 
3022 	/* remove ndlp from action. */
3023 	lpfc_nlp_remove(ndlp->vport, ndlp);
3024 
3025 	/* clear the ndlp active flag for all release cases */
3026 	phba = ndlp->vport->phba;
3027 	spin_lock_irqsave(&phba->ndlp_lock, flags);
3028 	NLP_CLR_NODE_ACT(ndlp);
3029 	spin_unlock_irqrestore(&phba->ndlp_lock, flags);
3030 
3031 	/* free ndlp memory for final ndlp release */
3032 	if (NLP_CHK_FREE_REQ(ndlp))
3033 		mempool_free(ndlp, ndlp->vport->phba->nlp_mem_pool);
3034 }
3035 
3036 /* This routine bumps the reference count for a ndlp structure to ensure
3037  * that one discovery thread won't free a ndlp while another discovery thread
3038  * is using it.
3039  */
3040 struct lpfc_nodelist *
3041 lpfc_nlp_get(struct lpfc_nodelist *ndlp)
3042 {
3043 	struct lpfc_hba *phba;
3044 	unsigned long flags;
3045 
3046 	if (ndlp) {
3047 		lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_NODE,
3048 			"node get:        did:x%x flg:x%x refcnt:x%x",
3049 			ndlp->nlp_DID, ndlp->nlp_flag,
3050 			atomic_read(&ndlp->kref.refcount));
3051 		/* The check of ndlp usage to prevent incrementing the
3052 		 * ndlp reference count that is in the process of being
3053 		 * released.
3054 		 */
3055 		phba = ndlp->vport->phba;
3056 		spin_lock_irqsave(&phba->ndlp_lock, flags);
3057 		if (!NLP_CHK_NODE_ACT(ndlp) || NLP_CHK_FREE_ACK(ndlp)) {
3058 			spin_unlock_irqrestore(&phba->ndlp_lock, flags);
3059 			lpfc_printf_vlog(ndlp->vport, KERN_WARNING, LOG_NODE,
3060 				"0276 lpfc_nlp_get: ndlp:x%p "
3061 				"usgmap:x%x refcnt:%d\n",
3062 				(void *)ndlp, ndlp->nlp_usg_map,
3063 				atomic_read(&ndlp->kref.refcount));
3064 			return NULL;
3065 		} else
3066 			kref_get(&ndlp->kref);
3067 		spin_unlock_irqrestore(&phba->ndlp_lock, flags);
3068 	}
3069 	return ndlp;
3070 }
3071 
3072 /* This routine decrements the reference count for a ndlp structure. If the
3073  * count goes to 0, this indicates the the associated nodelist should be
3074  * freed. Returning 1 indicates the ndlp resource has been released; on the
3075  * other hand, returning 0 indicates the ndlp resource has not been released
3076  * yet.
3077  */
3078 int
3079 lpfc_nlp_put(struct lpfc_nodelist *ndlp)
3080 {
3081 	struct lpfc_hba *phba;
3082 	unsigned long flags;
3083 
3084 	if (!ndlp)
3085 		return 1;
3086 
3087 	lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_NODE,
3088 	"node put:        did:x%x flg:x%x refcnt:x%x",
3089 		ndlp->nlp_DID, ndlp->nlp_flag,
3090 		atomic_read(&ndlp->kref.refcount));
3091 	phba = ndlp->vport->phba;
3092 	spin_lock_irqsave(&phba->ndlp_lock, flags);
3093 	/* Check the ndlp memory free acknowledge flag to avoid the
3094 	 * possible race condition that kref_put got invoked again
3095 	 * after previous one has done ndlp memory free.
3096 	 */
3097 	if (NLP_CHK_FREE_ACK(ndlp)) {
3098 		spin_unlock_irqrestore(&phba->ndlp_lock, flags);
3099 		lpfc_printf_vlog(ndlp->vport, KERN_WARNING, LOG_NODE,
3100 				"0274 lpfc_nlp_put: ndlp:x%p "
3101 				"usgmap:x%x refcnt:%d\n",
3102 				(void *)ndlp, ndlp->nlp_usg_map,
3103 				atomic_read(&ndlp->kref.refcount));
3104 		return 1;
3105 	}
3106 	/* Check the ndlp inactivate log flag to avoid the possible
3107 	 * race condition that kref_put got invoked again after ndlp
3108 	 * is already in inactivating state.
3109 	 */
3110 	if (NLP_CHK_IACT_REQ(ndlp)) {
3111 		spin_unlock_irqrestore(&phba->ndlp_lock, flags);
3112 		lpfc_printf_vlog(ndlp->vport, KERN_WARNING, LOG_NODE,
3113 				"0275 lpfc_nlp_put: ndlp:x%p "
3114 				"usgmap:x%x refcnt:%d\n",
3115 				(void *)ndlp, ndlp->nlp_usg_map,
3116 				atomic_read(&ndlp->kref.refcount));
3117 		return 1;
3118 	}
3119 	/* For last put, mark the ndlp usage flags to make sure no
3120 	 * other kref_get and kref_put on the same ndlp shall get
3121 	 * in between the process when the final kref_put has been
3122 	 * invoked on this ndlp.
3123 	 */
3124 	if (atomic_read(&ndlp->kref.refcount) == 1) {
3125 		/* Indicate ndlp is put to inactive state. */
3126 		NLP_SET_IACT_REQ(ndlp);
3127 		/* Acknowledge ndlp memory free has been seen. */
3128 		if (NLP_CHK_FREE_REQ(ndlp))
3129 			NLP_SET_FREE_ACK(ndlp);
3130 	}
3131 	spin_unlock_irqrestore(&phba->ndlp_lock, flags);
3132 	/* Note, the kref_put returns 1 when decrementing a reference
3133 	 * count that was 1, it invokes the release callback function,
3134 	 * but it still left the reference count as 1 (not actually
3135 	 * performs the last decrementation). Otherwise, it actually
3136 	 * decrements the reference count and returns 0.
3137 	 */
3138 	return kref_put(&ndlp->kref, lpfc_nlp_release);
3139 }
3140 
3141 /* This routine free's the specified nodelist if it is not in use
3142  * by any other discovery thread. This routine returns 1 if the
3143  * ndlp has been freed. A return value of 0 indicates the ndlp is
3144  * not yet been released.
3145  */
3146 int
3147 lpfc_nlp_not_used(struct lpfc_nodelist *ndlp)
3148 {
3149 	lpfc_debugfs_disc_trc(ndlp->vport, LPFC_DISC_TRC_NODE,
3150 		"node not used:   did:x%x flg:x%x refcnt:x%x",
3151 		ndlp->nlp_DID, ndlp->nlp_flag,
3152 		atomic_read(&ndlp->kref.refcount));
3153 	if (atomic_read(&ndlp->kref.refcount) == 1)
3154 		if (lpfc_nlp_put(ndlp))
3155 			return 1;
3156 	return 0;
3157 }
3158