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