xref: /openbmc/linux/drivers/scsi/lpfc/lpfc_vport.c (revision c21b37f6)
1 /*******************************************************************
2  * This file is part of the Emulex Linux Device Driver for         *
3  * Fibre Channel Host Bus Adapters.                                *
4  * Copyright (C) 2004-2006 Emulex.  All rights reserved.           *
5  * EMULEX and SLI are trademarks of Emulex.                        *
6  * www.emulex.com                                                  *
7  * Portions Copyright (C) 2004-2005 Christoph Hellwig              *
8  *                                                                 *
9  * This program is free software; you can redistribute it and/or   *
10  * modify it under the terms of version 2 of the GNU General       *
11  * Public License as published by the Free Software Foundation.    *
12  * This program is distributed in the hope that it will be useful. *
13  * ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND          *
14  * WARRANTIES, INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY,  *
15  * FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT, ARE      *
16  * DISCLAIMED, EXCEPT TO THE EXTENT THAT SUCH DISCLAIMERS ARE HELD *
17  * TO BE LEGALLY INVALID.  See the GNU General Public License for  *
18  * more details, a copy of which can be found in the file COPYING  *
19  * included with this package.                                     *
20  *******************************************************************/
21 
22 #include <linux/blkdev.h>
23 #include <linux/delay.h>
24 #include <linux/dma-mapping.h>
25 #include <linux/idr.h>
26 #include <linux/interrupt.h>
27 #include <linux/kthread.h>
28 #include <linux/pci.h>
29 #include <linux/spinlock.h>
30 
31 #include <scsi/scsi.h>
32 #include <scsi/scsi_device.h>
33 #include <scsi/scsi_host.h>
34 #include <scsi/scsi_transport_fc.h>
35 #include "lpfc_hw.h"
36 #include "lpfc_sli.h"
37 #include "lpfc_disc.h"
38 #include "lpfc_scsi.h"
39 #include "lpfc.h"
40 #include "lpfc_logmsg.h"
41 #include "lpfc_crtn.h"
42 #include "lpfc_version.h"
43 #include "lpfc_vport.h"
44 
45 inline void lpfc_vport_set_state(struct lpfc_vport *vport,
46 				 enum fc_vport_state new_state)
47 {
48 	struct fc_vport *fc_vport = vport->fc_vport;
49 
50 	if (fc_vport) {
51 		/*
52 		 * When the transport defines fc_vport_set state we will replace
53 		 * this code with the following line
54 		 */
55 		/* fc_vport_set_state(fc_vport, new_state); */
56 		if (new_state != FC_VPORT_INITIALIZING)
57 			fc_vport->vport_last_state = fc_vport->vport_state;
58 		fc_vport->vport_state = new_state;
59 	}
60 
61 	/* for all the error states we will set the invternal state to FAILED */
62 	switch (new_state) {
63 	case FC_VPORT_NO_FABRIC_SUPP:
64 	case FC_VPORT_NO_FABRIC_RSCS:
65 	case FC_VPORT_FABRIC_LOGOUT:
66 	case FC_VPORT_FABRIC_REJ_WWN:
67 	case FC_VPORT_FAILED:
68 		vport->port_state = LPFC_VPORT_FAILED;
69 		break;
70 	case FC_VPORT_LINKDOWN:
71 		vport->port_state = LPFC_VPORT_UNKNOWN;
72 		break;
73 	default:
74 		/* do nothing */
75 		break;
76 	}
77 }
78 
79 static int
80 lpfc_alloc_vpi(struct lpfc_hba *phba)
81 {
82 	int  vpi;
83 
84 	spin_lock_irq(&phba->hbalock);
85 	/* Start at bit 1 because vpi zero is reserved for the physical port */
86 	vpi = find_next_zero_bit(phba->vpi_bmask, (phba->max_vpi + 1), 1);
87 	if (vpi > phba->max_vpi)
88 		vpi = 0;
89 	else
90 		set_bit(vpi, phba->vpi_bmask);
91 	spin_unlock_irq(&phba->hbalock);
92 	return vpi;
93 }
94 
95 static void
96 lpfc_free_vpi(struct lpfc_hba *phba, int vpi)
97 {
98 	spin_lock_irq(&phba->hbalock);
99 	clear_bit(vpi, phba->vpi_bmask);
100 	spin_unlock_irq(&phba->hbalock);
101 }
102 
103 static int
104 lpfc_vport_sparm(struct lpfc_hba *phba, struct lpfc_vport *vport)
105 {
106 	LPFC_MBOXQ_t *pmb;
107 	MAILBOX_t *mb;
108 	struct lpfc_dmabuf *mp;
109 	int  rc;
110 
111 	pmb = mempool_alloc(phba->mbox_mem_pool, GFP_KERNEL);
112 	if (!pmb) {
113 		return -ENOMEM;
114 	}
115 	mb = &pmb->mb;
116 
117 	lpfc_read_sparam(phba, pmb, vport->vpi);
118 	/*
119 	 * Grab buffer pointer and clear context1 so we can use
120 	 * lpfc_sli_issue_box_wait
121 	 */
122 	mp = (struct lpfc_dmabuf *) pmb->context1;
123 	pmb->context1 = NULL;
124 
125 	pmb->vport = vport;
126 	rc = lpfc_sli_issue_mbox_wait(phba, pmb, phba->fc_ratov * 2);
127 	if (rc != MBX_SUCCESS) {
128 		lpfc_printf_log(phba, KERN_ERR, LOG_INIT | LOG_VPORT,
129 				"%d (%d):1818 VPort failed init, mbxCmd x%x "
130 				"READ_SPARM mbxStatus x%x, rc = x%x\n",
131 				phba->brd_no, vport->vpi,
132 				mb->mbxCommand, mb->mbxStatus, rc);
133 		lpfc_mbuf_free(phba, mp->virt, mp->phys);
134 		kfree(mp);
135 		if (rc != MBX_TIMEOUT)
136 			mempool_free(pmb, phba->mbox_mem_pool);
137 		return -EIO;
138 	}
139 
140 	memcpy(&vport->fc_sparam, mp->virt, sizeof (struct serv_parm));
141 	memcpy(&vport->fc_nodename, &vport->fc_sparam.nodeName,
142 	       sizeof (struct lpfc_name));
143 	memcpy(&vport->fc_portname, &vport->fc_sparam.portName,
144 	       sizeof (struct lpfc_name));
145 
146 	lpfc_mbuf_free(phba, mp->virt, mp->phys);
147 	kfree(mp);
148 	mempool_free(pmb, phba->mbox_mem_pool);
149 
150 	return 0;
151 }
152 
153 static int
154 lpfc_valid_wwn_format(struct lpfc_hba *phba, struct lpfc_name *wwn,
155 		      const char *name_type)
156 {
157 				/* ensure that IEEE format 1 addresses
158 				 * contain zeros in bits 59-48
159 				 */
160 	if (!((wwn->u.wwn[0] >> 4) == 1 &&
161 	      ((wwn->u.wwn[0] & 0xf) != 0 || (wwn->u.wwn[1] & 0xf) != 0)))
162 		return 1;
163 
164 	lpfc_printf_log(phba, KERN_ERR, LOG_VPORT,
165 			"%d:1822 Invalid %s: %02x:%02x:%02x:%02x:"
166 			"%02x:%02x:%02x:%02x\n",
167 			phba->brd_no, name_type,
168 			wwn->u.wwn[0], wwn->u.wwn[1],
169 			wwn->u.wwn[2], wwn->u.wwn[3],
170 			wwn->u.wwn[4], wwn->u.wwn[5],
171 			wwn->u.wwn[6], wwn->u.wwn[7]);
172 	return 0;
173 }
174 
175 static int
176 lpfc_unique_wwpn(struct lpfc_hba *phba, struct lpfc_vport *new_vport)
177 {
178 	struct lpfc_vport *vport;
179 
180 	list_for_each_entry(vport, &phba->port_list, listentry) {
181 		if (vport == new_vport)
182 			continue;
183 		/* If they match, return not unique */
184 		if (memcmp(&vport->fc_sparam.portName,
185 			&new_vport->fc_sparam.portName,
186 			sizeof(struct lpfc_name)) == 0)
187 			return 0;
188 	}
189 	return 1;
190 }
191 
192 int
193 lpfc_vport_create(struct fc_vport *fc_vport, bool disable)
194 {
195 	struct lpfc_nodelist *ndlp;
196 	struct lpfc_vport *pport =
197 		(struct lpfc_vport *) fc_vport->shost->hostdata;
198 	struct lpfc_hba   *phba = pport->phba;
199 	struct lpfc_vport *vport = NULL;
200 	int instance;
201 	int vpi;
202 	int rc = VPORT_ERROR;
203 
204 	if ((phba->sli_rev < 3) ||
205 		!(phba->sli3_options & LPFC_SLI3_NPIV_ENABLED)) {
206 		lpfc_printf_log(phba, KERN_ERR, LOG_VPORT,
207 				"%d:1808 Create VPORT failed: "
208 				"NPIV is not enabled: SLImode:%d\n",
209 				phba->brd_no, phba->sli_rev);
210 		rc = VPORT_INVAL;
211 		goto error_out;
212 	}
213 
214 	vpi = lpfc_alloc_vpi(phba);
215 	if (vpi == 0) {
216 		lpfc_printf_log(phba, KERN_ERR, LOG_VPORT,
217 				"%d:1809 Create VPORT failed: "
218 				"Max VPORTs (%d) exceeded\n",
219 				phba->brd_no, phba->max_vpi);
220 		rc = VPORT_NORESOURCES;
221 		goto error_out;
222 	}
223 
224 
225 	/* Assign an unused board number */
226 	if ((instance = lpfc_get_instance()) < 0) {
227 		lpfc_printf_log(phba, KERN_ERR, LOG_VPORT,
228 				"%d:1810 Create VPORT failed: Cannot get "
229 				"instance number\n", phba->brd_no);
230 		lpfc_free_vpi(phba, vpi);
231 		rc = VPORT_NORESOURCES;
232 		goto error_out;
233 	}
234 
235 	vport = lpfc_create_port(phba, instance, fc_vport);
236 	if (!vport) {
237 		lpfc_printf_log(phba, KERN_ERR, LOG_VPORT,
238 				"%d:1811 Create VPORT failed: vpi x%x\n",
239 				phba->brd_no, vpi);
240 		lpfc_free_vpi(phba, vpi);
241 		rc = VPORT_NORESOURCES;
242 		goto error_out;
243 	}
244 
245 	vport->vpi = vpi;
246 	lpfc_debugfs_initialize(vport);
247 
248 	if (lpfc_vport_sparm(phba, vport)) {
249 		lpfc_printf_log(phba, KERN_ERR, LOG_VPORT,
250 				"%d:1813 Create VPORT failed: vpi:%d "
251 				"Cannot get sparam\n",
252 				phba->brd_no, vpi);
253 		lpfc_free_vpi(phba, vpi);
254 		destroy_port(vport);
255 		rc = VPORT_NORESOURCES;
256 		goto error_out;
257 	}
258 
259 	memcpy(vport->fc_portname.u.wwn, vport->fc_sparam.portName.u.wwn, 8);
260 	memcpy(vport->fc_nodename.u.wwn, vport->fc_sparam.nodeName.u.wwn, 8);
261 
262 	if (fc_vport->node_name != 0)
263 		u64_to_wwn(fc_vport->node_name, vport->fc_nodename.u.wwn);
264 	if (fc_vport->port_name != 0)
265 		u64_to_wwn(fc_vport->port_name, vport->fc_portname.u.wwn);
266 
267 	memcpy(&vport->fc_sparam.portName, vport->fc_portname.u.wwn, 8);
268 	memcpy(&vport->fc_sparam.nodeName, vport->fc_nodename.u.wwn, 8);
269 
270 	if (!lpfc_valid_wwn_format(phba, &vport->fc_sparam.nodeName, "WWNN") ||
271 	    !lpfc_valid_wwn_format(phba, &vport->fc_sparam.portName, "WWPN")) {
272 		lpfc_printf_log(phba, KERN_ERR, LOG_VPORT,
273 				"%d:1821 Create VPORT failed: vpi:%d "
274 				"Invalid WWN format\n",
275 				phba->brd_no, vpi);
276 		lpfc_free_vpi(phba, vpi);
277 		destroy_port(vport);
278 		rc = VPORT_INVAL;
279 		goto error_out;
280 	}
281 
282 	if (!lpfc_unique_wwpn(phba, vport)) {
283 		lpfc_printf_log(phba, KERN_ERR, LOG_VPORT,
284 				"%d:1823 Create VPORT failed: vpi:%d "
285 				"Duplicate WWN on HBA\n",
286 				phba->brd_no, vpi);
287 		lpfc_free_vpi(phba, vpi);
288 		destroy_port(vport);
289 		rc = VPORT_INVAL;
290 		goto error_out;
291 	}
292 
293 	*(struct lpfc_vport **)fc_vport->dd_data = vport;
294 	vport->fc_vport = fc_vport;
295 
296 	if ((phba->link_state < LPFC_LINK_UP) ||
297 	    (phba->fc_topology == TOPOLOGY_LOOP)) {
298 		lpfc_vport_set_state(vport, FC_VPORT_LINKDOWN);
299 		rc = VPORT_OK;
300 		goto out;
301 	}
302 
303 	if (disable) {
304 		rc = VPORT_OK;
305 		goto out;
306 	}
307 
308 	/* Use the Physical nodes Fabric NDLP to determine if the link is
309 	 * up and ready to FDISC.
310 	 */
311 	ndlp = lpfc_findnode_did(phba->pport, Fabric_DID);
312 	if (ndlp && ndlp->nlp_state == NLP_STE_UNMAPPED_NODE) {
313 		if (phba->link_flag & LS_NPIV_FAB_SUPPORTED) {
314 			lpfc_set_disctmo(vport);
315 			lpfc_initial_fdisc(vport);
316 		} else {
317 			lpfc_vport_set_state(vport, FC_VPORT_NO_FABRIC_SUPP);
318 			lpfc_printf_log(phba, KERN_ERR, LOG_ELS,
319 					"%d (%d):0262 No NPIV Fabric "
320 					"support\n",
321 					phba->brd_no, vport->vpi);
322 		}
323 	} else {
324 		lpfc_vport_set_state(vport, FC_VPORT_FAILED);
325 	}
326 	rc = VPORT_OK;
327 
328 out:
329 	lpfc_host_attrib_init(lpfc_shost_from_vport(vport));
330 error_out:
331 	return rc;
332 }
333 
334 int
335 disable_vport(struct fc_vport *fc_vport)
336 {
337 	struct lpfc_vport *vport = *(struct lpfc_vport **)fc_vport->dd_data;
338 	struct lpfc_hba   *phba = vport->phba;
339 	struct lpfc_nodelist *ndlp = NULL, *next_ndlp = NULL;
340 	long timeout;
341 
342 	ndlp = lpfc_findnode_did(vport, Fabric_DID);
343 	if (ndlp && phba->link_state >= LPFC_LINK_UP) {
344 		vport->unreg_vpi_cmpl = VPORT_INVAL;
345 		timeout = msecs_to_jiffies(phba->fc_ratov * 2000);
346 		if (!lpfc_issue_els_npiv_logo(vport, ndlp))
347 			while (vport->unreg_vpi_cmpl == VPORT_INVAL && timeout)
348 				timeout = schedule_timeout(timeout);
349 	}
350 
351 	lpfc_sli_host_down(vport);
352 
353 	/* Mark all nodes for discovery so we can remove them by
354 	 * calling lpfc_cleanup_rpis(vport, 1)
355 	 */
356 	list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes, nlp_listp) {
357 		if (ndlp->nlp_state == NLP_STE_UNUSED_NODE)
358 			continue;
359 		lpfc_disc_state_machine(vport, ndlp, NULL,
360 					NLP_EVT_DEVICE_RECOVERY);
361 	}
362 	lpfc_cleanup_rpis(vport, 1);
363 
364 	lpfc_stop_vport_timers(vport);
365 	lpfc_unreg_all_rpis(vport);
366 	lpfc_unreg_default_rpis(vport);
367 	/*
368 	 * Completion of unreg_vpi (lpfc_mbx_cmpl_unreg_vpi) does the
369 	 * scsi_host_put() to release the vport.
370 	 */
371 	lpfc_mbx_unreg_vpi(vport);
372 
373 	lpfc_vport_set_state(vport, FC_VPORT_DISABLED);
374 	return VPORT_OK;
375 }
376 
377 int
378 enable_vport(struct fc_vport *fc_vport)
379 {
380 	struct lpfc_vport *vport = *(struct lpfc_vport **)fc_vport->dd_data;
381 	struct lpfc_hba   *phba = vport->phba;
382 	struct lpfc_nodelist *ndlp = NULL;
383 
384 	if ((phba->link_state < LPFC_LINK_UP) ||
385 	    (phba->fc_topology == TOPOLOGY_LOOP)) {
386 		lpfc_vport_set_state(vport, FC_VPORT_LINKDOWN);
387 		return VPORT_OK;
388 	}
389 
390 	vport->load_flag |= FC_LOADING;
391 	vport->fc_flag |= FC_VPORT_NEEDS_REG_VPI;
392 
393 	/* Use the Physical nodes Fabric NDLP to determine if the link is
394 	 * up and ready to FDISC.
395 	 */
396 	ndlp = lpfc_findnode_did(phba->pport, Fabric_DID);
397 	if (ndlp && ndlp->nlp_state == NLP_STE_UNMAPPED_NODE) {
398 		if (phba->link_flag & LS_NPIV_FAB_SUPPORTED) {
399 			lpfc_set_disctmo(vport);
400 			lpfc_initial_fdisc(vport);
401 		} else {
402 			lpfc_vport_set_state(vport, FC_VPORT_NO_FABRIC_SUPP);
403 			lpfc_printf_log(phba, KERN_ERR, LOG_ELS,
404 					"%d (%d):0264 No NPIV Fabric "
405 					"support\n",
406 					phba->brd_no, vport->vpi);
407 		}
408 	} else {
409 		lpfc_vport_set_state(vport, FC_VPORT_FAILED);
410 	}
411 
412 	return VPORT_OK;
413 }
414 
415 int
416 lpfc_vport_disable(struct fc_vport *fc_vport, bool disable)
417 {
418 	if (disable)
419 		return disable_vport(fc_vport);
420 	else
421 		return enable_vport(fc_vport);
422 }
423 
424 
425 int
426 lpfc_vport_delete(struct fc_vport *fc_vport)
427 {
428 	struct lpfc_nodelist *ndlp = NULL;
429 	struct lpfc_nodelist *next_ndlp;
430 	struct Scsi_Host *shost = (struct Scsi_Host *) fc_vport->shost;
431 	struct lpfc_vport *vport = *(struct lpfc_vport **)fc_vport->dd_data;
432 	struct lpfc_hba   *phba = vport->phba;
433 	long timeout;
434 	int rc = VPORT_ERROR;
435 
436 	/*
437 	 * This is a bit of a mess.  We want to ensure the shost doesn't get
438 	 * torn down until we're done with the embedded lpfc_vport structure.
439 	 *
440 	 * Beyond holding a reference for this function, we also need a
441 	 * reference for outstanding I/O requests we schedule during delete
442 	 * processing.  But once we scsi_remove_host() we can no longer obtain
443 	 * a reference through scsi_host_get().
444 	 *
445 	 * So we take two references here.  We release one reference at the
446 	 * bottom of the function -- after delinking the vport.  And we
447 	 * release the other at the completion of the unreg_vpi that get's
448 	 * initiated after we've disposed of all other resources associated
449 	 * with the port.
450 	 */
451 	if (!scsi_host_get(shost) || !scsi_host_get(shost))
452 		return VPORT_INVAL;
453 
454 	if (vport->port_type == LPFC_PHYSICAL_PORT) {
455 		lpfc_printf_log(phba, KERN_ERR, LOG_VPORT,
456 				"%d:1812 vport_delete failed: Cannot delete "
457 				"physical host\n", phba->brd_no);
458 		goto out;
459 	}
460 
461 	vport->load_flag |= FC_UNLOADING;
462 
463 	kfree(vport->vname);
464 	lpfc_debugfs_terminate(vport);
465 	fc_remove_host(lpfc_shost_from_vport(vport));
466 	scsi_remove_host(lpfc_shost_from_vport(vport));
467 
468 	ndlp = lpfc_findnode_did(phba->pport, Fabric_DID);
469 	if (ndlp && ndlp->nlp_state == NLP_STE_UNMAPPED_NODE &&
470 		phba->link_state >= LPFC_LINK_UP) {
471 
472 		/* First look for the Fabric ndlp */
473 		ndlp = lpfc_findnode_did(vport, Fabric_DID);
474 		if (!ndlp) {
475 			/* Cannot find existing Fabric ndlp, allocate one */
476 			ndlp = mempool_alloc(phba->nlp_mem_pool, GFP_KERNEL);
477 			if (!ndlp)
478 				goto skip_logo;
479 			lpfc_nlp_init(vport, ndlp, Fabric_DID);
480 		} else {
481 			lpfc_dequeue_node(vport, ndlp);
482 		}
483 		vport->unreg_vpi_cmpl = VPORT_INVAL;
484 		timeout = msecs_to_jiffies(phba->fc_ratov * 2000);
485 		if (!lpfc_issue_els_npiv_logo(vport, ndlp))
486 			while (vport->unreg_vpi_cmpl == VPORT_INVAL && timeout)
487 				timeout = schedule_timeout(timeout);
488 	}
489 
490 skip_logo:
491 	lpfc_sli_host_down(vport);
492 
493 	list_for_each_entry_safe(ndlp, next_ndlp, &vport->fc_nodes, nlp_listp) {
494 		lpfc_disc_state_machine(vport, ndlp, NULL,
495 					     NLP_EVT_DEVICE_RECOVERY);
496 		lpfc_disc_state_machine(vport, ndlp, NULL,
497 					     NLP_EVT_DEVICE_RM);
498 	}
499 
500 	lpfc_stop_vport_timers(vport);
501 	lpfc_unreg_all_rpis(vport);
502 	lpfc_unreg_default_rpis(vport);
503 	/*
504 	 * Completion of unreg_vpi (lpfc_mbx_cmpl_unreg_vpi) does the
505 	 * scsi_host_put() to release the vport.
506 	 */
507 	lpfc_mbx_unreg_vpi(vport);
508 
509 	lpfc_free_vpi(phba, vport->vpi);
510 	vport->work_port_events = 0;
511 	spin_lock_irq(&phba->hbalock);
512 	list_del_init(&vport->listentry);
513 	spin_unlock_irq(&phba->hbalock);
514 
515 	rc = VPORT_OK;
516 out:
517 	scsi_host_put(shost);
518 	return rc;
519 }
520 
521 
522 EXPORT_SYMBOL(lpfc_vport_create);
523 EXPORT_SYMBOL(lpfc_vport_delete);
524