xref: /linux/drivers/s390/scsi/zfcp_fc.c (revision e5c86679d5e864947a52fb31e45a425dea3e7fa9)
1 /*
2  * zfcp device driver
3  *
4  * Fibre Channel related functions for the zfcp device driver.
5  *
6  * Copyright IBM Corp. 2008, 2010
7  */
8 
9 #define KMSG_COMPONENT "zfcp"
10 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
11 
12 #include <linux/types.h>
13 #include <linux/slab.h>
14 #include <linux/utsname.h>
15 #include <linux/random.h>
16 #include <linux/bsg-lib.h>
17 #include <scsi/fc/fc_els.h>
18 #include <scsi/libfc.h>
19 #include "zfcp_ext.h"
20 #include "zfcp_fc.h"
21 
22 struct kmem_cache *zfcp_fc_req_cache;
23 
24 static u32 zfcp_fc_rscn_range_mask[] = {
25 	[ELS_ADDR_FMT_PORT]		= 0xFFFFFF,
26 	[ELS_ADDR_FMT_AREA]		= 0xFFFF00,
27 	[ELS_ADDR_FMT_DOM]		= 0xFF0000,
28 	[ELS_ADDR_FMT_FAB]		= 0x000000,
29 };
30 
31 static bool no_auto_port_rescan;
32 module_param_named(no_auto_port_rescan, no_auto_port_rescan, bool, 0600);
33 MODULE_PARM_DESC(no_auto_port_rescan,
34 		 "no automatic port_rescan (default off)");
35 
36 static unsigned int port_scan_backoff = 500;
37 module_param(port_scan_backoff, uint, 0600);
38 MODULE_PARM_DESC(port_scan_backoff,
39 	"upper limit of port scan random backoff in msecs (default 500)");
40 
41 static unsigned int port_scan_ratelimit = 60000;
42 module_param(port_scan_ratelimit, uint, 0600);
43 MODULE_PARM_DESC(port_scan_ratelimit,
44 	"minimum interval between port scans in msecs (default 60000)");
45 
46 unsigned int zfcp_fc_port_scan_backoff(void)
47 {
48 	if (!port_scan_backoff)
49 		return 0;
50 	return get_random_int() % port_scan_backoff;
51 }
52 
53 static void zfcp_fc_port_scan_time(struct zfcp_adapter *adapter)
54 {
55 	unsigned long interval = msecs_to_jiffies(port_scan_ratelimit);
56 	unsigned long backoff = msecs_to_jiffies(zfcp_fc_port_scan_backoff());
57 
58 	adapter->next_port_scan = jiffies + interval + backoff;
59 }
60 
61 static void zfcp_fc_port_scan(struct zfcp_adapter *adapter)
62 {
63 	unsigned long now = jiffies;
64 	unsigned long next = adapter->next_port_scan;
65 	unsigned long delay = 0, max;
66 
67 	/* delay only needed within waiting period */
68 	if (time_before(now, next)) {
69 		delay = next - now;
70 		/* paranoia: never ever delay scans longer than specified */
71 		max = msecs_to_jiffies(port_scan_ratelimit + port_scan_backoff);
72 		delay = min(delay, max);
73 	}
74 
75 	queue_delayed_work(adapter->work_queue, &adapter->scan_work, delay);
76 }
77 
78 void zfcp_fc_conditional_port_scan(struct zfcp_adapter *adapter)
79 {
80 	if (no_auto_port_rescan)
81 		return;
82 
83 	zfcp_fc_port_scan(adapter);
84 }
85 
86 void zfcp_fc_inverse_conditional_port_scan(struct zfcp_adapter *adapter)
87 {
88 	if (!no_auto_port_rescan)
89 		return;
90 
91 	zfcp_fc_port_scan(adapter);
92 }
93 
94 /**
95  * zfcp_fc_post_event - post event to userspace via fc_transport
96  * @work: work struct with enqueued events
97  */
98 void zfcp_fc_post_event(struct work_struct *work)
99 {
100 	struct zfcp_fc_event *event = NULL, *tmp = NULL;
101 	LIST_HEAD(tmp_lh);
102 	struct zfcp_fc_events *events = container_of(work,
103 					struct zfcp_fc_events, work);
104 	struct zfcp_adapter *adapter = container_of(events, struct zfcp_adapter,
105 						events);
106 
107 	spin_lock_bh(&events->list_lock);
108 	list_splice_init(&events->list, &tmp_lh);
109 	spin_unlock_bh(&events->list_lock);
110 
111 	list_for_each_entry_safe(event, tmp, &tmp_lh, list) {
112 		fc_host_post_event(adapter->scsi_host, fc_get_event_number(),
113 				event->code, event->data);
114 		list_del(&event->list);
115 		kfree(event);
116 	}
117 
118 }
119 
120 /**
121  * zfcp_fc_enqueue_event - safely enqueue FC HBA API event from irq context
122  * @adapter: The adapter where to enqueue the event
123  * @event_code: The event code (as defined in fc_host_event_code in
124  *		scsi_transport_fc.h)
125  * @event_data: The event data (e.g. n_port page in case of els)
126  */
127 void zfcp_fc_enqueue_event(struct zfcp_adapter *adapter,
128 			enum fc_host_event_code event_code, u32 event_data)
129 {
130 	struct zfcp_fc_event *event;
131 
132 	event = kmalloc(sizeof(struct zfcp_fc_event), GFP_ATOMIC);
133 	if (!event)
134 		return;
135 
136 	event->code = event_code;
137 	event->data = event_data;
138 
139 	spin_lock(&adapter->events.list_lock);
140 	list_add_tail(&event->list, &adapter->events.list);
141 	spin_unlock(&adapter->events.list_lock);
142 
143 	queue_work(adapter->work_queue, &adapter->events.work);
144 }
145 
146 static int zfcp_fc_wka_port_get(struct zfcp_fc_wka_port *wka_port)
147 {
148 	if (mutex_lock_interruptible(&wka_port->mutex))
149 		return -ERESTARTSYS;
150 
151 	if (wka_port->status == ZFCP_FC_WKA_PORT_OFFLINE ||
152 	    wka_port->status == ZFCP_FC_WKA_PORT_CLOSING) {
153 		wka_port->status = ZFCP_FC_WKA_PORT_OPENING;
154 		if (zfcp_fsf_open_wka_port(wka_port))
155 			wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
156 	}
157 
158 	mutex_unlock(&wka_port->mutex);
159 
160 	wait_event(wka_port->completion_wq,
161 		   wka_port->status == ZFCP_FC_WKA_PORT_ONLINE ||
162 		   wka_port->status == ZFCP_FC_WKA_PORT_OFFLINE);
163 
164 	if (wka_port->status == ZFCP_FC_WKA_PORT_ONLINE) {
165 		atomic_inc(&wka_port->refcount);
166 		return 0;
167 	}
168 	return -EIO;
169 }
170 
171 static void zfcp_fc_wka_port_offline(struct work_struct *work)
172 {
173 	struct delayed_work *dw = to_delayed_work(work);
174 	struct zfcp_fc_wka_port *wka_port =
175 			container_of(dw, struct zfcp_fc_wka_port, work);
176 
177 	mutex_lock(&wka_port->mutex);
178 	if ((atomic_read(&wka_port->refcount) != 0) ||
179 	    (wka_port->status != ZFCP_FC_WKA_PORT_ONLINE))
180 		goto out;
181 
182 	wka_port->status = ZFCP_FC_WKA_PORT_CLOSING;
183 	if (zfcp_fsf_close_wka_port(wka_port)) {
184 		wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
185 		wake_up(&wka_port->completion_wq);
186 	}
187 out:
188 	mutex_unlock(&wka_port->mutex);
189 }
190 
191 static void zfcp_fc_wka_port_put(struct zfcp_fc_wka_port *wka_port)
192 {
193 	if (atomic_dec_return(&wka_port->refcount) != 0)
194 		return;
195 	/* wait 10 milliseconds, other reqs might pop in */
196 	schedule_delayed_work(&wka_port->work, HZ / 100);
197 }
198 
199 static void zfcp_fc_wka_port_init(struct zfcp_fc_wka_port *wka_port, u32 d_id,
200 				  struct zfcp_adapter *adapter)
201 {
202 	init_waitqueue_head(&wka_port->completion_wq);
203 
204 	wka_port->adapter = adapter;
205 	wka_port->d_id = d_id;
206 
207 	wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
208 	atomic_set(&wka_port->refcount, 0);
209 	mutex_init(&wka_port->mutex);
210 	INIT_DELAYED_WORK(&wka_port->work, zfcp_fc_wka_port_offline);
211 }
212 
213 static void zfcp_fc_wka_port_force_offline(struct zfcp_fc_wka_port *wka)
214 {
215 	cancel_delayed_work_sync(&wka->work);
216 	mutex_lock(&wka->mutex);
217 	wka->status = ZFCP_FC_WKA_PORT_OFFLINE;
218 	mutex_unlock(&wka->mutex);
219 }
220 
221 void zfcp_fc_wka_ports_force_offline(struct zfcp_fc_wka_ports *gs)
222 {
223 	if (!gs)
224 		return;
225 	zfcp_fc_wka_port_force_offline(&gs->ms);
226 	zfcp_fc_wka_port_force_offline(&gs->ts);
227 	zfcp_fc_wka_port_force_offline(&gs->ds);
228 	zfcp_fc_wka_port_force_offline(&gs->as);
229 }
230 
231 static void _zfcp_fc_incoming_rscn(struct zfcp_fsf_req *fsf_req, u32 range,
232 				   struct fc_els_rscn_page *page)
233 {
234 	unsigned long flags;
235 	struct zfcp_adapter *adapter = fsf_req->adapter;
236 	struct zfcp_port *port;
237 
238 	read_lock_irqsave(&adapter->port_list_lock, flags);
239 	list_for_each_entry(port, &adapter->port_list, list) {
240 		if ((port->d_id & range) == (ntoh24(page->rscn_fid) & range))
241 			zfcp_fc_test_link(port);
242 		if (!port->d_id)
243 			zfcp_erp_port_reopen(port,
244 					     ZFCP_STATUS_COMMON_ERP_FAILED,
245 					     "fcrscn1");
246 	}
247 	read_unlock_irqrestore(&adapter->port_list_lock, flags);
248 }
249 
250 static void zfcp_fc_incoming_rscn(struct zfcp_fsf_req *fsf_req)
251 {
252 	struct fsf_status_read_buffer *status_buffer = (void *)fsf_req->data;
253 	struct fc_els_rscn *head;
254 	struct fc_els_rscn_page *page;
255 	u16 i;
256 	u16 no_entries;
257 	unsigned int afmt;
258 
259 	head = (struct fc_els_rscn *) status_buffer->payload.data;
260 	page = (struct fc_els_rscn_page *) head;
261 
262 	/* see FC-FS */
263 	no_entries = head->rscn_plen / sizeof(struct fc_els_rscn_page);
264 
265 	for (i = 1; i < no_entries; i++) {
266 		/* skip head and start with 1st element */
267 		page++;
268 		afmt = page->rscn_page_flags & ELS_RSCN_ADDR_FMT_MASK;
269 		_zfcp_fc_incoming_rscn(fsf_req, zfcp_fc_rscn_range_mask[afmt],
270 				       page);
271 		zfcp_fc_enqueue_event(fsf_req->adapter, FCH_EVT_RSCN,
272 				      *(u32 *)page);
273 	}
274 	zfcp_fc_conditional_port_scan(fsf_req->adapter);
275 }
276 
277 static void zfcp_fc_incoming_wwpn(struct zfcp_fsf_req *req, u64 wwpn)
278 {
279 	unsigned long flags;
280 	struct zfcp_adapter *adapter = req->adapter;
281 	struct zfcp_port *port;
282 
283 	read_lock_irqsave(&adapter->port_list_lock, flags);
284 	list_for_each_entry(port, &adapter->port_list, list)
285 		if (port->wwpn == wwpn) {
286 			zfcp_erp_port_forced_reopen(port, 0, "fciwwp1");
287 			break;
288 		}
289 	read_unlock_irqrestore(&adapter->port_list_lock, flags);
290 }
291 
292 static void zfcp_fc_incoming_plogi(struct zfcp_fsf_req *req)
293 {
294 	struct fsf_status_read_buffer *status_buffer;
295 	struct fc_els_flogi *plogi;
296 
297 	status_buffer = (struct fsf_status_read_buffer *) req->data;
298 	plogi = (struct fc_els_flogi *) status_buffer->payload.data;
299 	zfcp_fc_incoming_wwpn(req, plogi->fl_wwpn);
300 }
301 
302 static void zfcp_fc_incoming_logo(struct zfcp_fsf_req *req)
303 {
304 	struct fsf_status_read_buffer *status_buffer =
305 		(struct fsf_status_read_buffer *)req->data;
306 	struct fc_els_logo *logo =
307 		(struct fc_els_logo *) status_buffer->payload.data;
308 
309 	zfcp_fc_incoming_wwpn(req, logo->fl_n_port_wwn);
310 }
311 
312 /**
313  * zfcp_fc_incoming_els - handle incoming ELS
314  * @fsf_req - request which contains incoming ELS
315  */
316 void zfcp_fc_incoming_els(struct zfcp_fsf_req *fsf_req)
317 {
318 	struct fsf_status_read_buffer *status_buffer =
319 		(struct fsf_status_read_buffer *) fsf_req->data;
320 	unsigned int els_type = status_buffer->payload.data[0];
321 
322 	zfcp_dbf_san_in_els("fciels1", fsf_req);
323 	if (els_type == ELS_PLOGI)
324 		zfcp_fc_incoming_plogi(fsf_req);
325 	else if (els_type == ELS_LOGO)
326 		zfcp_fc_incoming_logo(fsf_req);
327 	else if (els_type == ELS_RSCN)
328 		zfcp_fc_incoming_rscn(fsf_req);
329 }
330 
331 static void zfcp_fc_ns_gid_pn_eval(struct zfcp_fc_req *fc_req)
332 {
333 	struct zfcp_fsf_ct_els *ct_els = &fc_req->ct_els;
334 	struct zfcp_fc_gid_pn_rsp *gid_pn_rsp = &fc_req->u.gid_pn.rsp;
335 
336 	if (ct_els->status)
337 		return;
338 	if (gid_pn_rsp->ct_hdr.ct_cmd != FC_FS_ACC)
339 		return;
340 
341 	/* looks like a valid d_id */
342 	ct_els->port->d_id = ntoh24(gid_pn_rsp->gid_pn.fp_fid);
343 }
344 
345 static void zfcp_fc_complete(void *data)
346 {
347 	complete(data);
348 }
349 
350 static void zfcp_fc_ct_ns_init(struct fc_ct_hdr *ct_hdr, u16 cmd, u16 mr_size)
351 {
352 	ct_hdr->ct_rev = FC_CT_REV;
353 	ct_hdr->ct_fs_type = FC_FST_DIR;
354 	ct_hdr->ct_fs_subtype = FC_NS_SUBTYPE;
355 	ct_hdr->ct_cmd = cmd;
356 	ct_hdr->ct_mr_size = mr_size / 4;
357 }
358 
359 static int zfcp_fc_ns_gid_pn_request(struct zfcp_port *port,
360 				     struct zfcp_fc_req *fc_req)
361 {
362 	struct zfcp_adapter *adapter = port->adapter;
363 	DECLARE_COMPLETION_ONSTACK(completion);
364 	struct zfcp_fc_gid_pn_req *gid_pn_req = &fc_req->u.gid_pn.req;
365 	struct zfcp_fc_gid_pn_rsp *gid_pn_rsp = &fc_req->u.gid_pn.rsp;
366 	int ret;
367 
368 	/* setup parameters for send generic command */
369 	fc_req->ct_els.port = port;
370 	fc_req->ct_els.handler = zfcp_fc_complete;
371 	fc_req->ct_els.handler_data = &completion;
372 	fc_req->ct_els.req = &fc_req->sg_req;
373 	fc_req->ct_els.resp = &fc_req->sg_rsp;
374 	sg_init_one(&fc_req->sg_req, gid_pn_req, sizeof(*gid_pn_req));
375 	sg_init_one(&fc_req->sg_rsp, gid_pn_rsp, sizeof(*gid_pn_rsp));
376 
377 	zfcp_fc_ct_ns_init(&gid_pn_req->ct_hdr,
378 			   FC_NS_GID_PN, ZFCP_FC_CT_SIZE_PAGE);
379 	gid_pn_req->gid_pn.fn_wwpn = port->wwpn;
380 
381 	ret = zfcp_fsf_send_ct(&adapter->gs->ds, &fc_req->ct_els,
382 			       adapter->pool.gid_pn_req,
383 			       ZFCP_FC_CTELS_TMO);
384 	if (!ret) {
385 		wait_for_completion(&completion);
386 		zfcp_fc_ns_gid_pn_eval(fc_req);
387 	}
388 	return ret;
389 }
390 
391 /**
392  * zfcp_fc_ns_gid_pn - initiate GID_PN nameserver request
393  * @port: port where GID_PN request is needed
394  * return: -ENOMEM on error, 0 otherwise
395  */
396 static int zfcp_fc_ns_gid_pn(struct zfcp_port *port)
397 {
398 	int ret;
399 	struct zfcp_fc_req *fc_req;
400 	struct zfcp_adapter *adapter = port->adapter;
401 
402 	fc_req = mempool_alloc(adapter->pool.gid_pn, GFP_ATOMIC);
403 	if (!fc_req)
404 		return -ENOMEM;
405 
406 	memset(fc_req, 0, sizeof(*fc_req));
407 
408 	ret = zfcp_fc_wka_port_get(&adapter->gs->ds);
409 	if (ret)
410 		goto out;
411 
412 	ret = zfcp_fc_ns_gid_pn_request(port, fc_req);
413 
414 	zfcp_fc_wka_port_put(&adapter->gs->ds);
415 out:
416 	mempool_free(fc_req, adapter->pool.gid_pn);
417 	return ret;
418 }
419 
420 void zfcp_fc_port_did_lookup(struct work_struct *work)
421 {
422 	int ret;
423 	struct zfcp_port *port = container_of(work, struct zfcp_port,
424 					      gid_pn_work);
425 
426 	ret = zfcp_fc_ns_gid_pn(port);
427 	if (ret) {
428 		/* could not issue gid_pn for some reason */
429 		zfcp_erp_adapter_reopen(port->adapter, 0, "fcgpn_1");
430 		goto out;
431 	}
432 
433 	if (!port->d_id) {
434 		zfcp_erp_set_port_status(port, ZFCP_STATUS_COMMON_ERP_FAILED);
435 		goto out;
436 	}
437 
438 	zfcp_erp_port_reopen(port, 0, "fcgpn_3");
439 out:
440 	put_device(&port->dev);
441 }
442 
443 /**
444  * zfcp_fc_trigger_did_lookup - trigger the d_id lookup using a GID_PN request
445  * @port: The zfcp_port to lookup the d_id for.
446  */
447 void zfcp_fc_trigger_did_lookup(struct zfcp_port *port)
448 {
449 	get_device(&port->dev);
450 	if (!queue_work(port->adapter->work_queue, &port->gid_pn_work))
451 		put_device(&port->dev);
452 }
453 
454 /**
455  * zfcp_fc_plogi_evaluate - evaluate PLOGI playload
456  * @port: zfcp_port structure
457  * @plogi: plogi payload
458  *
459  * Evaluate PLOGI playload and copy important fields into zfcp_port structure
460  */
461 void zfcp_fc_plogi_evaluate(struct zfcp_port *port, struct fc_els_flogi *plogi)
462 {
463 	if (plogi->fl_wwpn != port->wwpn) {
464 		port->d_id = 0;
465 		dev_warn(&port->adapter->ccw_device->dev,
466 			 "A port opened with WWPN 0x%016Lx returned data that "
467 			 "identifies it as WWPN 0x%016Lx\n",
468 			 (unsigned long long) port->wwpn,
469 			 (unsigned long long) plogi->fl_wwpn);
470 		return;
471 	}
472 
473 	port->wwnn = plogi->fl_wwnn;
474 	port->maxframe_size = plogi->fl_csp.sp_bb_data;
475 
476 	if (plogi->fl_cssp[0].cp_class & FC_CPC_VALID)
477 		port->supported_classes |= FC_COS_CLASS1;
478 	if (plogi->fl_cssp[1].cp_class & FC_CPC_VALID)
479 		port->supported_classes |= FC_COS_CLASS2;
480 	if (plogi->fl_cssp[2].cp_class & FC_CPC_VALID)
481 		port->supported_classes |= FC_COS_CLASS3;
482 	if (plogi->fl_cssp[3].cp_class & FC_CPC_VALID)
483 		port->supported_classes |= FC_COS_CLASS4;
484 }
485 
486 static void zfcp_fc_adisc_handler(void *data)
487 {
488 	struct zfcp_fc_req *fc_req = data;
489 	struct zfcp_port *port = fc_req->ct_els.port;
490 	struct fc_els_adisc *adisc_resp = &fc_req->u.adisc.rsp;
491 
492 	if (fc_req->ct_els.status) {
493 		/* request rejected or timed out */
494 		zfcp_erp_port_forced_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
495 					    "fcadh_1");
496 		goto out;
497 	}
498 
499 	if (!port->wwnn)
500 		port->wwnn = adisc_resp->adisc_wwnn;
501 
502 	if ((port->wwpn != adisc_resp->adisc_wwpn) ||
503 	    !(atomic_read(&port->status) & ZFCP_STATUS_COMMON_OPEN)) {
504 		zfcp_erp_port_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
505 				     "fcadh_2");
506 		goto out;
507 	}
508 
509 	/* port is good, unblock rport without going through erp */
510 	zfcp_scsi_schedule_rport_register(port);
511  out:
512 	atomic_andnot(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
513 	put_device(&port->dev);
514 	kmem_cache_free(zfcp_fc_req_cache, fc_req);
515 }
516 
517 static int zfcp_fc_adisc(struct zfcp_port *port)
518 {
519 	struct zfcp_fc_req *fc_req;
520 	struct zfcp_adapter *adapter = port->adapter;
521 	struct Scsi_Host *shost = adapter->scsi_host;
522 	int ret;
523 
524 	fc_req = kmem_cache_zalloc(zfcp_fc_req_cache, GFP_ATOMIC);
525 	if (!fc_req)
526 		return -ENOMEM;
527 
528 	fc_req->ct_els.port = port;
529 	fc_req->ct_els.req = &fc_req->sg_req;
530 	fc_req->ct_els.resp = &fc_req->sg_rsp;
531 	sg_init_one(&fc_req->sg_req, &fc_req->u.adisc.req,
532 		    sizeof(struct fc_els_adisc));
533 	sg_init_one(&fc_req->sg_rsp, &fc_req->u.adisc.rsp,
534 		    sizeof(struct fc_els_adisc));
535 
536 	fc_req->ct_els.handler = zfcp_fc_adisc_handler;
537 	fc_req->ct_els.handler_data = fc_req;
538 
539 	/* acc. to FC-FS, hard_nport_id in ADISC should not be set for ports
540 	   without FC-AL-2 capability, so we don't set it */
541 	fc_req->u.adisc.req.adisc_wwpn = fc_host_port_name(shost);
542 	fc_req->u.adisc.req.adisc_wwnn = fc_host_node_name(shost);
543 	fc_req->u.adisc.req.adisc_cmd = ELS_ADISC;
544 	hton24(fc_req->u.adisc.req.adisc_port_id, fc_host_port_id(shost));
545 
546 	ret = zfcp_fsf_send_els(adapter, port->d_id, &fc_req->ct_els,
547 				ZFCP_FC_CTELS_TMO);
548 	if (ret)
549 		kmem_cache_free(zfcp_fc_req_cache, fc_req);
550 
551 	return ret;
552 }
553 
554 void zfcp_fc_link_test_work(struct work_struct *work)
555 {
556 	struct zfcp_port *port =
557 		container_of(work, struct zfcp_port, test_link_work);
558 	int retval;
559 
560 	get_device(&port->dev);
561 	port->rport_task = RPORT_DEL;
562 	zfcp_scsi_rport_work(&port->rport_work);
563 
564 	/* only issue one test command at one time per port */
565 	if (atomic_read(&port->status) & ZFCP_STATUS_PORT_LINK_TEST)
566 		goto out;
567 
568 	atomic_or(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
569 
570 	retval = zfcp_fc_adisc(port);
571 	if (retval == 0)
572 		return;
573 
574 	/* send of ADISC was not possible */
575 	atomic_andnot(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
576 	zfcp_erp_port_forced_reopen(port, 0, "fcltwk1");
577 
578 out:
579 	put_device(&port->dev);
580 }
581 
582 /**
583  * zfcp_fc_test_link - lightweight link test procedure
584  * @port: port to be tested
585  *
586  * Test status of a link to a remote port using the ELS command ADISC.
587  * If there is a problem with the remote port, error recovery steps
588  * will be triggered.
589  */
590 void zfcp_fc_test_link(struct zfcp_port *port)
591 {
592 	get_device(&port->dev);
593 	if (!queue_work(port->adapter->work_queue, &port->test_link_work))
594 		put_device(&port->dev);
595 }
596 
597 static struct zfcp_fc_req *zfcp_alloc_sg_env(int buf_num)
598 {
599 	struct zfcp_fc_req *fc_req;
600 
601 	fc_req = kmem_cache_zalloc(zfcp_fc_req_cache, GFP_KERNEL);
602 	if (!fc_req)
603 		return NULL;
604 
605 	if (zfcp_sg_setup_table(&fc_req->sg_rsp, buf_num)) {
606 		kmem_cache_free(zfcp_fc_req_cache, fc_req);
607 		return NULL;
608 	}
609 
610 	sg_init_one(&fc_req->sg_req, &fc_req->u.gpn_ft.req,
611 		    sizeof(struct zfcp_fc_gpn_ft_req));
612 
613 	return fc_req;
614 }
615 
616 static int zfcp_fc_send_gpn_ft(struct zfcp_fc_req *fc_req,
617 			       struct zfcp_adapter *adapter, int max_bytes)
618 {
619 	struct zfcp_fsf_ct_els *ct_els = &fc_req->ct_els;
620 	struct zfcp_fc_gpn_ft_req *req = &fc_req->u.gpn_ft.req;
621 	DECLARE_COMPLETION_ONSTACK(completion);
622 	int ret;
623 
624 	zfcp_fc_ct_ns_init(&req->ct_hdr, FC_NS_GPN_FT, max_bytes);
625 	req->gpn_ft.fn_fc4_type = FC_TYPE_FCP;
626 
627 	ct_els->handler = zfcp_fc_complete;
628 	ct_els->handler_data = &completion;
629 	ct_els->req = &fc_req->sg_req;
630 	ct_els->resp = &fc_req->sg_rsp;
631 
632 	ret = zfcp_fsf_send_ct(&adapter->gs->ds, ct_els, NULL,
633 			       ZFCP_FC_CTELS_TMO);
634 	if (!ret)
635 		wait_for_completion(&completion);
636 	return ret;
637 }
638 
639 static void zfcp_fc_validate_port(struct zfcp_port *port, struct list_head *lh)
640 {
641 	if (!(atomic_read(&port->status) & ZFCP_STATUS_COMMON_NOESC))
642 		return;
643 
644 	atomic_andnot(ZFCP_STATUS_COMMON_NOESC, &port->status);
645 
646 	if ((port->supported_classes != 0) ||
647 	    !list_empty(&port->unit_list))
648 		return;
649 
650 	list_move_tail(&port->list, lh);
651 }
652 
653 static int zfcp_fc_eval_gpn_ft(struct zfcp_fc_req *fc_req,
654 			       struct zfcp_adapter *adapter, int max_entries)
655 {
656 	struct zfcp_fsf_ct_els *ct_els = &fc_req->ct_els;
657 	struct scatterlist *sg = &fc_req->sg_rsp;
658 	struct fc_ct_hdr *hdr = sg_virt(sg);
659 	struct fc_gpn_ft_resp *acc = sg_virt(sg);
660 	struct zfcp_port *port, *tmp;
661 	unsigned long flags;
662 	LIST_HEAD(remove_lh);
663 	u32 d_id;
664 	int ret = 0, x, last = 0;
665 
666 	if (ct_els->status)
667 		return -EIO;
668 
669 	if (hdr->ct_cmd != FC_FS_ACC) {
670 		if (hdr->ct_reason == FC_BA_RJT_UNABLE)
671 			return -EAGAIN; /* might be a temporary condition */
672 		return -EIO;
673 	}
674 
675 	if (hdr->ct_mr_size) {
676 		dev_warn(&adapter->ccw_device->dev,
677 			 "The name server reported %d words residual data\n",
678 			 hdr->ct_mr_size);
679 		return -E2BIG;
680 	}
681 
682 	/* first entry is the header */
683 	for (x = 1; x < max_entries && !last; x++) {
684 		if (x % (ZFCP_FC_GPN_FT_ENT_PAGE + 1))
685 			acc++;
686 		else
687 			acc = sg_virt(++sg);
688 
689 		last = acc->fp_flags & FC_NS_FID_LAST;
690 		d_id = ntoh24(acc->fp_fid);
691 
692 		/* don't attach ports with a well known address */
693 		if (d_id >= FC_FID_WELL_KNOWN_BASE)
694 			continue;
695 		/* skip the adapter's port and known remote ports */
696 		if (acc->fp_wwpn == fc_host_port_name(adapter->scsi_host))
697 			continue;
698 
699 		port = zfcp_port_enqueue(adapter, acc->fp_wwpn,
700 					 ZFCP_STATUS_COMMON_NOESC, d_id);
701 		if (!IS_ERR(port))
702 			zfcp_erp_port_reopen(port, 0, "fcegpf1");
703 		else if (PTR_ERR(port) != -EEXIST)
704 			ret = PTR_ERR(port);
705 	}
706 
707 	zfcp_erp_wait(adapter);
708 	write_lock_irqsave(&adapter->port_list_lock, flags);
709 	list_for_each_entry_safe(port, tmp, &adapter->port_list, list)
710 		zfcp_fc_validate_port(port, &remove_lh);
711 	write_unlock_irqrestore(&adapter->port_list_lock, flags);
712 
713 	list_for_each_entry_safe(port, tmp, &remove_lh, list) {
714 		zfcp_erp_port_shutdown(port, 0, "fcegpf2");
715 		device_unregister(&port->dev);
716 	}
717 
718 	return ret;
719 }
720 
721 /**
722  * zfcp_fc_scan_ports - scan remote ports and attach new ports
723  * @work: reference to scheduled work
724  */
725 void zfcp_fc_scan_ports(struct work_struct *work)
726 {
727 	struct delayed_work *dw = to_delayed_work(work);
728 	struct zfcp_adapter *adapter = container_of(dw, struct zfcp_adapter,
729 						    scan_work);
730 	int ret, i;
731 	struct zfcp_fc_req *fc_req;
732 	int chain, max_entries, buf_num, max_bytes;
733 
734 	zfcp_fc_port_scan_time(adapter);
735 
736 	chain = adapter->adapter_features & FSF_FEATURE_ELS_CT_CHAINED_SBALS;
737 	buf_num = chain ? ZFCP_FC_GPN_FT_NUM_BUFS : 1;
738 	max_entries = chain ? ZFCP_FC_GPN_FT_MAX_ENT : ZFCP_FC_GPN_FT_ENT_PAGE;
739 	max_bytes = chain ? ZFCP_FC_GPN_FT_MAX_SIZE : ZFCP_FC_CT_SIZE_PAGE;
740 
741 	if (fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPORT &&
742 	    fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPIV)
743 		return;
744 
745 	if (zfcp_fc_wka_port_get(&adapter->gs->ds))
746 		return;
747 
748 	fc_req = zfcp_alloc_sg_env(buf_num);
749 	if (!fc_req)
750 		goto out;
751 
752 	for (i = 0; i < 3; i++) {
753 		ret = zfcp_fc_send_gpn_ft(fc_req, adapter, max_bytes);
754 		if (!ret) {
755 			ret = zfcp_fc_eval_gpn_ft(fc_req, adapter, max_entries);
756 			if (ret == -EAGAIN)
757 				ssleep(1);
758 			else
759 				break;
760 		}
761 	}
762 	zfcp_sg_free_table(&fc_req->sg_rsp, buf_num);
763 	kmem_cache_free(zfcp_fc_req_cache, fc_req);
764 out:
765 	zfcp_fc_wka_port_put(&adapter->gs->ds);
766 }
767 
768 static int zfcp_fc_gspn(struct zfcp_adapter *adapter,
769 			struct zfcp_fc_req *fc_req)
770 {
771 	DECLARE_COMPLETION_ONSTACK(completion);
772 	char devno[] = "DEVNO:";
773 	struct zfcp_fsf_ct_els *ct_els = &fc_req->ct_els;
774 	struct zfcp_fc_gspn_req *gspn_req = &fc_req->u.gspn.req;
775 	struct zfcp_fc_gspn_rsp *gspn_rsp = &fc_req->u.gspn.rsp;
776 	int ret;
777 
778 	zfcp_fc_ct_ns_init(&gspn_req->ct_hdr, FC_NS_GSPN_ID,
779 			   FC_SYMBOLIC_NAME_SIZE);
780 	hton24(gspn_req->gspn.fp_fid, fc_host_port_id(adapter->scsi_host));
781 
782 	sg_init_one(&fc_req->sg_req, gspn_req, sizeof(*gspn_req));
783 	sg_init_one(&fc_req->sg_rsp, gspn_rsp, sizeof(*gspn_rsp));
784 
785 	ct_els->handler = zfcp_fc_complete;
786 	ct_els->handler_data = &completion;
787 	ct_els->req = &fc_req->sg_req;
788 	ct_els->resp = &fc_req->sg_rsp;
789 
790 	ret = zfcp_fsf_send_ct(&adapter->gs->ds, ct_els, NULL,
791 			       ZFCP_FC_CTELS_TMO);
792 	if (ret)
793 		return ret;
794 
795 	wait_for_completion(&completion);
796 	if (ct_els->status)
797 		return ct_els->status;
798 
799 	if (fc_host_port_type(adapter->scsi_host) == FC_PORTTYPE_NPIV &&
800 	    !(strstr(gspn_rsp->gspn.fp_name, devno)))
801 		snprintf(fc_host_symbolic_name(adapter->scsi_host),
802 			 FC_SYMBOLIC_NAME_SIZE, "%s%s %s NAME: %s",
803 			 gspn_rsp->gspn.fp_name, devno,
804 			 dev_name(&adapter->ccw_device->dev),
805 			 init_utsname()->nodename);
806 	else
807 		strlcpy(fc_host_symbolic_name(adapter->scsi_host),
808 			gspn_rsp->gspn.fp_name, FC_SYMBOLIC_NAME_SIZE);
809 
810 	return 0;
811 }
812 
813 static void zfcp_fc_rspn(struct zfcp_adapter *adapter,
814 			 struct zfcp_fc_req *fc_req)
815 {
816 	DECLARE_COMPLETION_ONSTACK(completion);
817 	struct Scsi_Host *shost = adapter->scsi_host;
818 	struct zfcp_fsf_ct_els *ct_els = &fc_req->ct_els;
819 	struct zfcp_fc_rspn_req *rspn_req = &fc_req->u.rspn.req;
820 	struct fc_ct_hdr *rspn_rsp = &fc_req->u.rspn.rsp;
821 	int ret, len;
822 
823 	zfcp_fc_ct_ns_init(&rspn_req->ct_hdr, FC_NS_RSPN_ID,
824 			   FC_SYMBOLIC_NAME_SIZE);
825 	hton24(rspn_req->rspn.fr_fid.fp_fid, fc_host_port_id(shost));
826 	len = strlcpy(rspn_req->rspn.fr_name, fc_host_symbolic_name(shost),
827 		      FC_SYMBOLIC_NAME_SIZE);
828 	rspn_req->rspn.fr_name_len = len;
829 
830 	sg_init_one(&fc_req->sg_req, rspn_req, sizeof(*rspn_req));
831 	sg_init_one(&fc_req->sg_rsp, rspn_rsp, sizeof(*rspn_rsp));
832 
833 	ct_els->handler = zfcp_fc_complete;
834 	ct_els->handler_data = &completion;
835 	ct_els->req = &fc_req->sg_req;
836 	ct_els->resp = &fc_req->sg_rsp;
837 
838 	ret = zfcp_fsf_send_ct(&adapter->gs->ds, ct_els, NULL,
839 			       ZFCP_FC_CTELS_TMO);
840 	if (!ret)
841 		wait_for_completion(&completion);
842 }
843 
844 /**
845  * zfcp_fc_sym_name_update - Retrieve and update the symbolic port name
846  * @work: ns_up_work of the adapter where to update the symbolic port name
847  *
848  * Retrieve the current symbolic port name that may have been set by
849  * the hardware using the GSPN request and update the fc_host
850  * symbolic_name sysfs attribute. When running in NPIV mode (and hence
851  * the port name is unique for this system), update the symbolic port
852  * name to add Linux specific information and update the FC nameserver
853  * using the RSPN request.
854  */
855 void zfcp_fc_sym_name_update(struct work_struct *work)
856 {
857 	struct zfcp_adapter *adapter = container_of(work, struct zfcp_adapter,
858 						    ns_up_work);
859 	int ret;
860 	struct zfcp_fc_req *fc_req;
861 
862 	if (fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPORT &&
863 	    fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPIV)
864 		return;
865 
866 	fc_req = kmem_cache_zalloc(zfcp_fc_req_cache, GFP_KERNEL);
867 	if (!fc_req)
868 		return;
869 
870 	ret = zfcp_fc_wka_port_get(&adapter->gs->ds);
871 	if (ret)
872 		goto out_free;
873 
874 	ret = zfcp_fc_gspn(adapter, fc_req);
875 	if (ret || fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPIV)
876 		goto out_ds_put;
877 
878 	memset(fc_req, 0, sizeof(*fc_req));
879 	zfcp_fc_rspn(adapter, fc_req);
880 
881 out_ds_put:
882 	zfcp_fc_wka_port_put(&adapter->gs->ds);
883 out_free:
884 	kmem_cache_free(zfcp_fc_req_cache, fc_req);
885 }
886 
887 static void zfcp_fc_ct_els_job_handler(void *data)
888 {
889 	struct bsg_job *job = data;
890 	struct zfcp_fsf_ct_els *zfcp_ct_els = job->dd_data;
891 	struct fc_bsg_reply *jr = job->reply;
892 
893 	jr->reply_payload_rcv_len = job->reply_payload.payload_len;
894 	jr->reply_data.ctels_reply.status = FC_CTELS_STATUS_OK;
895 	jr->result = zfcp_ct_els->status ? -EIO : 0;
896 	bsg_job_done(job, jr->result, jr->reply_payload_rcv_len);
897 }
898 
899 static struct zfcp_fc_wka_port *zfcp_fc_job_wka_port(struct bsg_job *job)
900 {
901 	u32 preamble_word1;
902 	u8 gs_type;
903 	struct zfcp_adapter *adapter;
904 	struct fc_bsg_request *bsg_request = job->request;
905 	struct fc_rport *rport = fc_bsg_to_rport(job);
906 	struct Scsi_Host *shost;
907 
908 	preamble_word1 = bsg_request->rqst_data.r_ct.preamble_word1;
909 	gs_type = (preamble_word1 & 0xff000000) >> 24;
910 
911 	shost = rport ? rport_to_shost(rport) : fc_bsg_to_shost(job);
912 	adapter = (struct zfcp_adapter *) shost->hostdata[0];
913 
914 	switch (gs_type) {
915 	case FC_FST_ALIAS:
916 		return &adapter->gs->as;
917 	case FC_FST_MGMT:
918 		return &adapter->gs->ms;
919 	case FC_FST_TIME:
920 		return &adapter->gs->ts;
921 		break;
922 	case FC_FST_DIR:
923 		return &adapter->gs->ds;
924 		break;
925 	default:
926 		return NULL;
927 	}
928 }
929 
930 static void zfcp_fc_ct_job_handler(void *data)
931 {
932 	struct bsg_job *job = data;
933 	struct zfcp_fc_wka_port *wka_port;
934 
935 	wka_port = zfcp_fc_job_wka_port(job);
936 	zfcp_fc_wka_port_put(wka_port);
937 
938 	zfcp_fc_ct_els_job_handler(data);
939 }
940 
941 static int zfcp_fc_exec_els_job(struct bsg_job *job,
942 				struct zfcp_adapter *adapter)
943 {
944 	struct zfcp_fsf_ct_els *els = job->dd_data;
945 	struct fc_rport *rport = fc_bsg_to_rport(job);
946 	struct fc_bsg_request *bsg_request = job->request;
947 	struct zfcp_port *port;
948 	u32 d_id;
949 
950 	if (rport) {
951 		port = zfcp_get_port_by_wwpn(adapter, rport->port_name);
952 		if (!port)
953 			return -EINVAL;
954 
955 		d_id = port->d_id;
956 		put_device(&port->dev);
957 	} else
958 		d_id = ntoh24(bsg_request->rqst_data.h_els.port_id);
959 
960 	els->handler = zfcp_fc_ct_els_job_handler;
961 	return zfcp_fsf_send_els(adapter, d_id, els, job->req->timeout / HZ);
962 }
963 
964 static int zfcp_fc_exec_ct_job(struct bsg_job *job,
965 			       struct zfcp_adapter *adapter)
966 {
967 	int ret;
968 	struct zfcp_fsf_ct_els *ct = job->dd_data;
969 	struct zfcp_fc_wka_port *wka_port;
970 
971 	wka_port = zfcp_fc_job_wka_port(job);
972 	if (!wka_port)
973 		return -EINVAL;
974 
975 	ret = zfcp_fc_wka_port_get(wka_port);
976 	if (ret)
977 		return ret;
978 
979 	ct->handler = zfcp_fc_ct_job_handler;
980 	ret = zfcp_fsf_send_ct(wka_port, ct, NULL, job->req->timeout / HZ);
981 	if (ret)
982 		zfcp_fc_wka_port_put(wka_port);
983 
984 	return ret;
985 }
986 
987 int zfcp_fc_exec_bsg_job(struct bsg_job *job)
988 {
989 	struct Scsi_Host *shost;
990 	struct zfcp_adapter *adapter;
991 	struct zfcp_fsf_ct_els *ct_els = job->dd_data;
992 	struct fc_bsg_request *bsg_request = job->request;
993 	struct fc_rport *rport = fc_bsg_to_rport(job);
994 
995 	shost = rport ? rport_to_shost(rport) : fc_bsg_to_shost(job);
996 	adapter = (struct zfcp_adapter *)shost->hostdata[0];
997 
998 	if (!(atomic_read(&adapter->status) & ZFCP_STATUS_COMMON_OPEN))
999 		return -EINVAL;
1000 
1001 	ct_els->req = job->request_payload.sg_list;
1002 	ct_els->resp = job->reply_payload.sg_list;
1003 	ct_els->handler_data = job;
1004 
1005 	switch (bsg_request->msgcode) {
1006 	case FC_BSG_RPT_ELS:
1007 	case FC_BSG_HST_ELS_NOLOGIN:
1008 		return zfcp_fc_exec_els_job(job, adapter);
1009 	case FC_BSG_RPT_CT:
1010 	case FC_BSG_HST_CT:
1011 		return zfcp_fc_exec_ct_job(job, adapter);
1012 	default:
1013 		return -EINVAL;
1014 	}
1015 }
1016 
1017 int zfcp_fc_timeout_bsg_job(struct bsg_job *job)
1018 {
1019 	/* hardware tracks timeout, reset bsg timeout to not interfere */
1020 	return -EAGAIN;
1021 }
1022 
1023 int zfcp_fc_gs_setup(struct zfcp_adapter *adapter)
1024 {
1025 	struct zfcp_fc_wka_ports *wka_ports;
1026 
1027 	wka_ports = kzalloc(sizeof(struct zfcp_fc_wka_ports), GFP_KERNEL);
1028 	if (!wka_ports)
1029 		return -ENOMEM;
1030 
1031 	adapter->gs = wka_ports;
1032 	zfcp_fc_wka_port_init(&wka_ports->ms, FC_FID_MGMT_SERV, adapter);
1033 	zfcp_fc_wka_port_init(&wka_ports->ts, FC_FID_TIME_SERV, adapter);
1034 	zfcp_fc_wka_port_init(&wka_ports->ds, FC_FID_DIR_SERV, adapter);
1035 	zfcp_fc_wka_port_init(&wka_ports->as, FC_FID_ALIASES, adapter);
1036 
1037 	return 0;
1038 }
1039 
1040 void zfcp_fc_gs_destroy(struct zfcp_adapter *adapter)
1041 {
1042 	kfree(adapter->gs);
1043 	adapter->gs = NULL;
1044 }
1045 
1046