Merge branch 'for-rmk' of git://git.pengutronix.de/git/imx/linux-2.6
[cascardo/linux.git] / drivers / s390 / scsi / zfcp_fc.c
1 /*
2  * zfcp device driver
3  *
4  * Fibre Channel related functions for the zfcp device driver.
5  *
6  * Copyright IBM Corporation 2008, 2009
7  */
8
9 #define KMSG_COMPONENT "zfcp"
10 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
11
12 #include <linux/types.h>
13 #include <scsi/fc/fc_els.h>
14 #include <scsi/libfc.h>
15 #include "zfcp_ext.h"
16 #include "zfcp_fc.h"
17
18 static u32 zfcp_fc_rscn_range_mask[] = {
19         [ELS_ADDR_FMT_PORT]             = 0xFFFFFF,
20         [ELS_ADDR_FMT_AREA]             = 0xFFFF00,
21         [ELS_ADDR_FMT_DOM]              = 0xFF0000,
22         [ELS_ADDR_FMT_FAB]              = 0x000000,
23 };
24
25 static int zfcp_fc_wka_port_get(struct zfcp_fc_wka_port *wka_port)
26 {
27         if (mutex_lock_interruptible(&wka_port->mutex))
28                 return -ERESTARTSYS;
29
30         if (wka_port->status == ZFCP_FC_WKA_PORT_OFFLINE ||
31             wka_port->status == ZFCP_FC_WKA_PORT_CLOSING) {
32                 wka_port->status = ZFCP_FC_WKA_PORT_OPENING;
33                 if (zfcp_fsf_open_wka_port(wka_port))
34                         wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
35         }
36
37         mutex_unlock(&wka_port->mutex);
38
39         wait_event(wka_port->completion_wq,
40                    wka_port->status == ZFCP_FC_WKA_PORT_ONLINE ||
41                    wka_port->status == ZFCP_FC_WKA_PORT_OFFLINE);
42
43         if (wka_port->status == ZFCP_FC_WKA_PORT_ONLINE) {
44                 atomic_inc(&wka_port->refcount);
45                 return 0;
46         }
47         return -EIO;
48 }
49
50 static void zfcp_fc_wka_port_offline(struct work_struct *work)
51 {
52         struct delayed_work *dw = to_delayed_work(work);
53         struct zfcp_fc_wka_port *wka_port =
54                         container_of(dw, struct zfcp_fc_wka_port, work);
55
56         mutex_lock(&wka_port->mutex);
57         if ((atomic_read(&wka_port->refcount) != 0) ||
58             (wka_port->status != ZFCP_FC_WKA_PORT_ONLINE))
59                 goto out;
60
61         wka_port->status = ZFCP_FC_WKA_PORT_CLOSING;
62         if (zfcp_fsf_close_wka_port(wka_port)) {
63                 wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
64                 wake_up(&wka_port->completion_wq);
65         }
66 out:
67         mutex_unlock(&wka_port->mutex);
68 }
69
70 static void zfcp_fc_wka_port_put(struct zfcp_fc_wka_port *wka_port)
71 {
72         if (atomic_dec_return(&wka_port->refcount) != 0)
73                 return;
74         /* wait 10 milliseconds, other reqs might pop in */
75         schedule_delayed_work(&wka_port->work, HZ / 100);
76 }
77
78 static void zfcp_fc_wka_port_init(struct zfcp_fc_wka_port *wka_port, u32 d_id,
79                                   struct zfcp_adapter *adapter)
80 {
81         init_waitqueue_head(&wka_port->completion_wq);
82
83         wka_port->adapter = adapter;
84         wka_port->d_id = d_id;
85
86         wka_port->status = ZFCP_FC_WKA_PORT_OFFLINE;
87         atomic_set(&wka_port->refcount, 0);
88         mutex_init(&wka_port->mutex);
89         INIT_DELAYED_WORK(&wka_port->work, zfcp_fc_wka_port_offline);
90 }
91
92 static void zfcp_fc_wka_port_force_offline(struct zfcp_fc_wka_port *wka)
93 {
94         cancel_delayed_work_sync(&wka->work);
95         mutex_lock(&wka->mutex);
96         wka->status = ZFCP_FC_WKA_PORT_OFFLINE;
97         mutex_unlock(&wka->mutex);
98 }
99
100 void zfcp_fc_wka_ports_force_offline(struct zfcp_fc_wka_ports *gs)
101 {
102         if (!gs)
103                 return;
104         zfcp_fc_wka_port_force_offline(&gs->ms);
105         zfcp_fc_wka_port_force_offline(&gs->ts);
106         zfcp_fc_wka_port_force_offline(&gs->ds);
107         zfcp_fc_wka_port_force_offline(&gs->as);
108 }
109
110 static void _zfcp_fc_incoming_rscn(struct zfcp_fsf_req *fsf_req, u32 range,
111                                    struct fc_els_rscn_page *page)
112 {
113         unsigned long flags;
114         struct zfcp_adapter *adapter = fsf_req->adapter;
115         struct zfcp_port *port;
116
117         read_lock_irqsave(&adapter->port_list_lock, flags);
118         list_for_each_entry(port, &adapter->port_list, list) {
119                 if ((port->d_id & range) == (ntoh24(page->rscn_fid) & range))
120                         zfcp_fc_test_link(port);
121                 if (!port->d_id)
122                         zfcp_erp_port_reopen(port,
123                                              ZFCP_STATUS_COMMON_ERP_FAILED,
124                                              "fcrscn1", NULL);
125         }
126         read_unlock_irqrestore(&adapter->port_list_lock, flags);
127 }
128
129 static void zfcp_fc_incoming_rscn(struct zfcp_fsf_req *fsf_req)
130 {
131         struct fsf_status_read_buffer *status_buffer = (void *)fsf_req->data;
132         struct fc_els_rscn *head;
133         struct fc_els_rscn_page *page;
134         u16 i;
135         u16 no_entries;
136         unsigned int afmt;
137
138         head = (struct fc_els_rscn *) status_buffer->payload.data;
139         page = (struct fc_els_rscn_page *) head;
140
141         /* see FC-FS */
142         no_entries = head->rscn_plen / sizeof(struct fc_els_rscn_page);
143
144         for (i = 1; i < no_entries; i++) {
145                 /* skip head and start with 1st element */
146                 page++;
147                 afmt = page->rscn_page_flags & ELS_RSCN_ADDR_FMT_MASK;
148                 _zfcp_fc_incoming_rscn(fsf_req, zfcp_fc_rscn_range_mask[afmt],
149                                        page);
150         }
151         queue_work(fsf_req->adapter->work_queue, &fsf_req->adapter->scan_work);
152 }
153
154 static void zfcp_fc_incoming_wwpn(struct zfcp_fsf_req *req, u64 wwpn)
155 {
156         unsigned long flags;
157         struct zfcp_adapter *adapter = req->adapter;
158         struct zfcp_port *port;
159
160         read_lock_irqsave(&adapter->port_list_lock, flags);
161         list_for_each_entry(port, &adapter->port_list, list)
162                 if (port->wwpn == wwpn) {
163                         zfcp_erp_port_forced_reopen(port, 0, "fciwwp1", req);
164                         break;
165                 }
166         read_unlock_irqrestore(&adapter->port_list_lock, flags);
167 }
168
169 static void zfcp_fc_incoming_plogi(struct zfcp_fsf_req *req)
170 {
171         struct fsf_status_read_buffer *status_buffer;
172         struct fc_els_flogi *plogi;
173
174         status_buffer = (struct fsf_status_read_buffer *) req->data;
175         plogi = (struct fc_els_flogi *) status_buffer->payload.data;
176         zfcp_fc_incoming_wwpn(req, plogi->fl_wwpn);
177 }
178
179 static void zfcp_fc_incoming_logo(struct zfcp_fsf_req *req)
180 {
181         struct fsf_status_read_buffer *status_buffer =
182                 (struct fsf_status_read_buffer *)req->data;
183         struct fc_els_logo *logo =
184                 (struct fc_els_logo *) status_buffer->payload.data;
185
186         zfcp_fc_incoming_wwpn(req, logo->fl_n_port_wwn);
187 }
188
189 /**
190  * zfcp_fc_incoming_els - handle incoming ELS
191  * @fsf_req - request which contains incoming ELS
192  */
193 void zfcp_fc_incoming_els(struct zfcp_fsf_req *fsf_req)
194 {
195         struct fsf_status_read_buffer *status_buffer =
196                 (struct fsf_status_read_buffer *) fsf_req->data;
197         unsigned int els_type = status_buffer->payload.data[0];
198
199         zfcp_dbf_san_incoming_els(fsf_req);
200         if (els_type == ELS_PLOGI)
201                 zfcp_fc_incoming_plogi(fsf_req);
202         else if (els_type == ELS_LOGO)
203                 zfcp_fc_incoming_logo(fsf_req);
204         else if (els_type == ELS_RSCN)
205                 zfcp_fc_incoming_rscn(fsf_req);
206 }
207
208 static void zfcp_fc_ns_gid_pn_eval(void *data)
209 {
210         struct zfcp_fc_gid_pn *gid_pn = data;
211         struct zfcp_fsf_ct_els *ct = &gid_pn->ct;
212         struct zfcp_fc_gid_pn_req *gid_pn_req = sg_virt(ct->req);
213         struct zfcp_fc_gid_pn_resp *gid_pn_resp = sg_virt(ct->resp);
214         struct zfcp_port *port = gid_pn->port;
215
216         if (ct->status)
217                 return;
218         if (gid_pn_resp->ct_hdr.ct_cmd != FC_FS_ACC)
219                 return;
220
221         /* paranoia */
222         if (gid_pn_req->gid_pn.fn_wwpn != port->wwpn)
223                 return;
224         /* looks like a valid d_id */
225         port->d_id = ntoh24(gid_pn_resp->gid_pn.fp_fid);
226 }
227
228 static void zfcp_fc_complete(void *data)
229 {
230         complete(data);
231 }
232
233 static int zfcp_fc_ns_gid_pn_request(struct zfcp_port *port,
234                                      struct zfcp_fc_gid_pn *gid_pn)
235 {
236         struct zfcp_adapter *adapter = port->adapter;
237         DECLARE_COMPLETION_ONSTACK(completion);
238         int ret;
239
240         /* setup parameters for send generic command */
241         gid_pn->port = port;
242         gid_pn->ct.handler = zfcp_fc_complete;
243         gid_pn->ct.handler_data = &completion;
244         gid_pn->ct.req = &gid_pn->sg_req;
245         gid_pn->ct.resp = &gid_pn->sg_resp;
246         sg_init_one(&gid_pn->sg_req, &gid_pn->gid_pn_req,
247                     sizeof(struct zfcp_fc_gid_pn_req));
248         sg_init_one(&gid_pn->sg_resp, &gid_pn->gid_pn_resp,
249                     sizeof(struct zfcp_fc_gid_pn_resp));
250
251         /* setup nameserver request */
252         gid_pn->gid_pn_req.ct_hdr.ct_rev = FC_CT_REV;
253         gid_pn->gid_pn_req.ct_hdr.ct_fs_type = FC_FST_DIR;
254         gid_pn->gid_pn_req.ct_hdr.ct_fs_subtype = FC_NS_SUBTYPE;
255         gid_pn->gid_pn_req.ct_hdr.ct_options = 0;
256         gid_pn->gid_pn_req.ct_hdr.ct_cmd = FC_NS_GID_PN;
257         gid_pn->gid_pn_req.ct_hdr.ct_mr_size = ZFCP_FC_CT_SIZE_PAGE / 4;
258         gid_pn->gid_pn_req.gid_pn.fn_wwpn = port->wwpn;
259
260         ret = zfcp_fsf_send_ct(&adapter->gs->ds, &gid_pn->ct,
261                                adapter->pool.gid_pn_req,
262                                ZFCP_FC_CTELS_TMO);
263         if (!ret) {
264                 wait_for_completion(&completion);
265                 zfcp_fc_ns_gid_pn_eval(gid_pn);
266         }
267         return ret;
268 }
269
270 /**
271  * zfcp_fc_ns_gid_pn_request - initiate GID_PN nameserver request
272  * @port: port where GID_PN request is needed
273  * return: -ENOMEM on error, 0 otherwise
274  */
275 static int zfcp_fc_ns_gid_pn(struct zfcp_port *port)
276 {
277         int ret;
278         struct zfcp_fc_gid_pn *gid_pn;
279         struct zfcp_adapter *adapter = port->adapter;
280
281         gid_pn = mempool_alloc(adapter->pool.gid_pn, GFP_ATOMIC);
282         if (!gid_pn)
283                 return -ENOMEM;
284
285         memset(gid_pn, 0, sizeof(*gid_pn));
286
287         ret = zfcp_fc_wka_port_get(&adapter->gs->ds);
288         if (ret)
289                 goto out;
290
291         ret = zfcp_fc_ns_gid_pn_request(port, gid_pn);
292
293         zfcp_fc_wka_port_put(&adapter->gs->ds);
294 out:
295         mempool_free(gid_pn, adapter->pool.gid_pn);
296         return ret;
297 }
298
299 void zfcp_fc_port_did_lookup(struct work_struct *work)
300 {
301         int ret;
302         struct zfcp_port *port = container_of(work, struct zfcp_port,
303                                               gid_pn_work);
304
305         ret = zfcp_fc_ns_gid_pn(port);
306         if (ret) {
307                 /* could not issue gid_pn for some reason */
308                 zfcp_erp_adapter_reopen(port->adapter, 0, "fcgpn_1", NULL);
309                 goto out;
310         }
311
312         if (!port->d_id) {
313                 zfcp_erp_port_failed(port, "fcgpn_2", NULL);
314                 goto out;
315         }
316
317         zfcp_erp_port_reopen(port, 0, "fcgpn_3", NULL);
318 out:
319         put_device(&port->sysfs_device);
320 }
321
322 /**
323  * zfcp_fc_trigger_did_lookup - trigger the d_id lookup using a GID_PN request
324  * @port: The zfcp_port to lookup the d_id for.
325  */
326 void zfcp_fc_trigger_did_lookup(struct zfcp_port *port)
327 {
328         get_device(&port->sysfs_device);
329         if (!queue_work(port->adapter->work_queue, &port->gid_pn_work))
330                 put_device(&port->sysfs_device);
331 }
332
333 /**
334  * zfcp_fc_plogi_evaluate - evaluate PLOGI playload
335  * @port: zfcp_port structure
336  * @plogi: plogi payload
337  *
338  * Evaluate PLOGI playload and copy important fields into zfcp_port structure
339  */
340 void zfcp_fc_plogi_evaluate(struct zfcp_port *port, struct fc_els_flogi *plogi)
341 {
342         if (plogi->fl_wwpn != port->wwpn) {
343                 port->d_id = 0;
344                 dev_warn(&port->adapter->ccw_device->dev,
345                          "A port opened with WWPN 0x%016Lx returned data that "
346                          "identifies it as WWPN 0x%016Lx\n",
347                          (unsigned long long) port->wwpn,
348                          (unsigned long long) plogi->fl_wwpn);
349                 return;
350         }
351
352         port->wwnn = plogi->fl_wwnn;
353         port->maxframe_size = plogi->fl_csp.sp_bb_data;
354
355         if (plogi->fl_cssp[0].cp_class & FC_CPC_VALID)
356                 port->supported_classes |= FC_COS_CLASS1;
357         if (plogi->fl_cssp[1].cp_class & FC_CPC_VALID)
358                 port->supported_classes |= FC_COS_CLASS2;
359         if (plogi->fl_cssp[2].cp_class & FC_CPC_VALID)
360                 port->supported_classes |= FC_COS_CLASS3;
361         if (plogi->fl_cssp[3].cp_class & FC_CPC_VALID)
362                 port->supported_classes |= FC_COS_CLASS4;
363 }
364
365 static void zfcp_fc_adisc_handler(void *data)
366 {
367         struct zfcp_fc_els_adisc *adisc = data;
368         struct zfcp_port *port = adisc->els.port;
369         struct fc_els_adisc *adisc_resp = &adisc->adisc_resp;
370
371         if (adisc->els.status) {
372                 /* request rejected or timed out */
373                 zfcp_erp_port_forced_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
374                                             "fcadh_1", NULL);
375                 goto out;
376         }
377
378         if (!port->wwnn)
379                 port->wwnn = adisc_resp->adisc_wwnn;
380
381         if ((port->wwpn != adisc_resp->adisc_wwpn) ||
382             !(atomic_read(&port->status) & ZFCP_STATUS_COMMON_OPEN)) {
383                 zfcp_erp_port_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
384                                      "fcadh_2", NULL);
385                 goto out;
386         }
387
388         /* port is good, unblock rport without going through erp */
389         zfcp_scsi_schedule_rport_register(port);
390  out:
391         atomic_clear_mask(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
392         put_device(&port->sysfs_device);
393         kmem_cache_free(zfcp_data.adisc_cache, adisc);
394 }
395
396 static int zfcp_fc_adisc(struct zfcp_port *port)
397 {
398         struct zfcp_fc_els_adisc *adisc;
399         struct zfcp_adapter *adapter = port->adapter;
400         int ret;
401
402         adisc = kmem_cache_alloc(zfcp_data.adisc_cache, GFP_ATOMIC);
403         if (!adisc)
404                 return -ENOMEM;
405
406         adisc->els.port = port;
407         adisc->els.req = &adisc->req;
408         adisc->els.resp = &adisc->resp;
409         sg_init_one(adisc->els.req, &adisc->adisc_req,
410                     sizeof(struct fc_els_adisc));
411         sg_init_one(adisc->els.resp, &adisc->adisc_resp,
412                     sizeof(struct fc_els_adisc));
413
414         adisc->els.handler = zfcp_fc_adisc_handler;
415         adisc->els.handler_data = adisc;
416
417         /* acc. to FC-FS, hard_nport_id in ADISC should not be set for ports
418            without FC-AL-2 capability, so we don't set it */
419         adisc->adisc_req.adisc_wwpn = fc_host_port_name(adapter->scsi_host);
420         adisc->adisc_req.adisc_wwnn = fc_host_node_name(adapter->scsi_host);
421         adisc->adisc_req.adisc_cmd = ELS_ADISC;
422         hton24(adisc->adisc_req.adisc_port_id,
423                fc_host_port_id(adapter->scsi_host));
424
425         ret = zfcp_fsf_send_els(adapter, port->d_id, &adisc->els,
426                                 ZFCP_FC_CTELS_TMO);
427         if (ret)
428                 kmem_cache_free(zfcp_data.adisc_cache, adisc);
429
430         return ret;
431 }
432
433 void zfcp_fc_link_test_work(struct work_struct *work)
434 {
435         struct zfcp_port *port =
436                 container_of(work, struct zfcp_port, test_link_work);
437         int retval;
438
439         get_device(&port->sysfs_device);
440         port->rport_task = RPORT_DEL;
441         zfcp_scsi_rport_work(&port->rport_work);
442
443         /* only issue one test command at one time per port */
444         if (atomic_read(&port->status) & ZFCP_STATUS_PORT_LINK_TEST)
445                 goto out;
446
447         atomic_set_mask(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
448
449         retval = zfcp_fc_adisc(port);
450         if (retval == 0)
451                 return;
452
453         /* send of ADISC was not possible */
454         atomic_clear_mask(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
455         zfcp_erp_port_forced_reopen(port, 0, "fcltwk1", NULL);
456
457 out:
458         put_device(&port->sysfs_device);
459 }
460
461 /**
462  * zfcp_fc_test_link - lightweight link test procedure
463  * @port: port to be tested
464  *
465  * Test status of a link to a remote port using the ELS command ADISC.
466  * If there is a problem with the remote port, error recovery steps
467  * will be triggered.
468  */
469 void zfcp_fc_test_link(struct zfcp_port *port)
470 {
471         get_device(&port->sysfs_device);
472         if (!queue_work(port->adapter->work_queue, &port->test_link_work))
473                 put_device(&port->sysfs_device);
474 }
475
476 static void zfcp_free_sg_env(struct zfcp_fc_gpn_ft *gpn_ft, int buf_num)
477 {
478         struct scatterlist *sg = &gpn_ft->sg_req;
479
480         kmem_cache_free(zfcp_data.gpn_ft_cache, sg_virt(sg));
481         zfcp_sg_free_table(gpn_ft->sg_resp, buf_num);
482
483         kfree(gpn_ft);
484 }
485
486 static struct zfcp_fc_gpn_ft *zfcp_alloc_sg_env(int buf_num)
487 {
488         struct zfcp_fc_gpn_ft *gpn_ft;
489         struct zfcp_fc_gpn_ft_req *req;
490
491         gpn_ft = kzalloc(sizeof(*gpn_ft), GFP_KERNEL);
492         if (!gpn_ft)
493                 return NULL;
494
495         req = kmem_cache_alloc(zfcp_data.gpn_ft_cache, GFP_KERNEL);
496         if (!req) {
497                 kfree(gpn_ft);
498                 gpn_ft = NULL;
499                 goto out;
500         }
501         sg_init_one(&gpn_ft->sg_req, req, sizeof(*req));
502
503         if (zfcp_sg_setup_table(gpn_ft->sg_resp, buf_num)) {
504                 zfcp_free_sg_env(gpn_ft, buf_num);
505                 gpn_ft = NULL;
506         }
507 out:
508         return gpn_ft;
509 }
510
511
512 static int zfcp_fc_send_gpn_ft(struct zfcp_fc_gpn_ft *gpn_ft,
513                                struct zfcp_adapter *adapter, int max_bytes)
514 {
515         struct zfcp_fsf_ct_els *ct = &gpn_ft->ct;
516         struct zfcp_fc_gpn_ft_req *req = sg_virt(&gpn_ft->sg_req);
517         DECLARE_COMPLETION_ONSTACK(completion);
518         int ret;
519
520         /* prepare CT IU for GPN_FT */
521         req->ct_hdr.ct_rev = FC_CT_REV;
522         req->ct_hdr.ct_fs_type = FC_FST_DIR;
523         req->ct_hdr.ct_fs_subtype = FC_NS_SUBTYPE;
524         req->ct_hdr.ct_options = 0;
525         req->ct_hdr.ct_cmd = FC_NS_GPN_FT;
526         req->ct_hdr.ct_mr_size = max_bytes / 4;
527         req->gpn_ft.fn_domain_id_scope = 0;
528         req->gpn_ft.fn_area_id_scope = 0;
529         req->gpn_ft.fn_fc4_type = FC_TYPE_FCP;
530
531         /* prepare zfcp_send_ct */
532         ct->handler = zfcp_fc_complete;
533         ct->handler_data = &completion;
534         ct->req = &gpn_ft->sg_req;
535         ct->resp = gpn_ft->sg_resp;
536
537         ret = zfcp_fsf_send_ct(&adapter->gs->ds, ct, NULL,
538                                ZFCP_FC_CTELS_TMO);
539         if (!ret)
540                 wait_for_completion(&completion);
541         return ret;
542 }
543
544 static void zfcp_fc_validate_port(struct zfcp_port *port, struct list_head *lh)
545 {
546         if (!(atomic_read(&port->status) & ZFCP_STATUS_COMMON_NOESC))
547                 return;
548
549         atomic_clear_mask(ZFCP_STATUS_COMMON_NOESC, &port->status);
550
551         if ((port->supported_classes != 0) ||
552             !list_empty(&port->unit_list))
553                 return;
554
555         list_move_tail(&port->list, lh);
556 }
557
558 static int zfcp_fc_eval_gpn_ft(struct zfcp_fc_gpn_ft *gpn_ft,
559                                struct zfcp_adapter *adapter, int max_entries)
560 {
561         struct zfcp_fsf_ct_els *ct = &gpn_ft->ct;
562         struct scatterlist *sg = gpn_ft->sg_resp;
563         struct fc_ct_hdr *hdr = sg_virt(sg);
564         struct fc_gpn_ft_resp *acc = sg_virt(sg);
565         struct zfcp_port *port, *tmp;
566         unsigned long flags;
567         LIST_HEAD(remove_lh);
568         u32 d_id;
569         int ret = 0, x, last = 0;
570
571         if (ct->status)
572                 return -EIO;
573
574         if (hdr->ct_cmd != FC_FS_ACC) {
575                 if (hdr->ct_reason == FC_BA_RJT_UNABLE)
576                         return -EAGAIN; /* might be a temporary condition */
577                 return -EIO;
578         }
579
580         if (hdr->ct_mr_size) {
581                 dev_warn(&adapter->ccw_device->dev,
582                          "The name server reported %d words residual data\n",
583                          hdr->ct_mr_size);
584                 return -E2BIG;
585         }
586
587         /* first entry is the header */
588         for (x = 1; x < max_entries && !last; x++) {
589                 if (x % (ZFCP_FC_GPN_FT_ENT_PAGE + 1))
590                         acc++;
591                 else
592                         acc = sg_virt(++sg);
593
594                 last = acc->fp_flags & FC_NS_FID_LAST;
595                 d_id = ntoh24(acc->fp_fid);
596
597                 /* don't attach ports with a well known address */
598                 if (d_id >= FC_FID_WELL_KNOWN_BASE)
599                         continue;
600                 /* skip the adapter's port and known remote ports */
601                 if (acc->fp_wwpn == fc_host_port_name(adapter->scsi_host))
602                         continue;
603
604                 port = zfcp_port_enqueue(adapter, acc->fp_wwpn,
605                                          ZFCP_STATUS_COMMON_NOESC, d_id);
606                 if (!IS_ERR(port))
607                         zfcp_erp_port_reopen(port, 0, "fcegpf1", NULL);
608                 else if (PTR_ERR(port) != -EEXIST)
609                         ret = PTR_ERR(port);
610         }
611
612         zfcp_erp_wait(adapter);
613         write_lock_irqsave(&adapter->port_list_lock, flags);
614         list_for_each_entry_safe(port, tmp, &adapter->port_list, list)
615                 zfcp_fc_validate_port(port, &remove_lh);
616         write_unlock_irqrestore(&adapter->port_list_lock, flags);
617
618         list_for_each_entry_safe(port, tmp, &remove_lh, list) {
619                 zfcp_erp_port_shutdown(port, 0, "fcegpf2", NULL);
620                 zfcp_device_unregister(&port->sysfs_device,
621                                        &zfcp_sysfs_port_attrs);
622         }
623
624         return ret;
625 }
626
627 /**
628  * zfcp_fc_scan_ports - scan remote ports and attach new ports
629  * @work: reference to scheduled work
630  */
631 void zfcp_fc_scan_ports(struct work_struct *work)
632 {
633         struct zfcp_adapter *adapter = container_of(work, struct zfcp_adapter,
634                                                     scan_work);
635         int ret, i;
636         struct zfcp_fc_gpn_ft *gpn_ft;
637         int chain, max_entries, buf_num, max_bytes;
638
639         chain = adapter->adapter_features & FSF_FEATURE_ELS_CT_CHAINED_SBALS;
640         buf_num = chain ? ZFCP_FC_GPN_FT_NUM_BUFS : 1;
641         max_entries = chain ? ZFCP_FC_GPN_FT_MAX_ENT : ZFCP_FC_GPN_FT_ENT_PAGE;
642         max_bytes = chain ? ZFCP_FC_GPN_FT_MAX_SIZE : ZFCP_FC_CT_SIZE_PAGE;
643
644         if (fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPORT &&
645             fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPIV)
646                 return;
647
648         if (zfcp_fc_wka_port_get(&adapter->gs->ds))
649                 return;
650
651         gpn_ft = zfcp_alloc_sg_env(buf_num);
652         if (!gpn_ft)
653                 goto out;
654
655         for (i = 0; i < 3; i++) {
656                 ret = zfcp_fc_send_gpn_ft(gpn_ft, adapter, max_bytes);
657                 if (!ret) {
658                         ret = zfcp_fc_eval_gpn_ft(gpn_ft, adapter, max_entries);
659                         if (ret == -EAGAIN)
660                                 ssleep(1);
661                         else
662                                 break;
663                 }
664         }
665         zfcp_free_sg_env(gpn_ft, buf_num);
666 out:
667         zfcp_fc_wka_port_put(&adapter->gs->ds);
668 }
669
670 static void zfcp_fc_ct_els_job_handler(void *data)
671 {
672         struct fc_bsg_job *job = data;
673         struct zfcp_fsf_ct_els *zfcp_ct_els = job->dd_data;
674         int status = zfcp_ct_els->status;
675         int reply_status;
676
677         reply_status = status ? FC_CTELS_STATUS_REJECT : FC_CTELS_STATUS_OK;
678         job->reply->reply_data.ctels_reply.status = reply_status;
679         job->reply->reply_payload_rcv_len = job->reply_payload.payload_len;
680         job->job_done(job);
681 }
682
683 static struct zfcp_fc_wka_port *zfcp_fc_job_wka_port(struct fc_bsg_job *job)
684 {
685         u32 preamble_word1;
686         u8 gs_type;
687         struct zfcp_adapter *adapter;
688
689         preamble_word1 = job->request->rqst_data.r_ct.preamble_word1;
690         gs_type = (preamble_word1 & 0xff000000) >> 24;
691
692         adapter = (struct zfcp_adapter *) job->shost->hostdata[0];
693
694         switch (gs_type) {
695         case FC_FST_ALIAS:
696                 return &adapter->gs->as;
697         case FC_FST_MGMT:
698                 return &adapter->gs->ms;
699         case FC_FST_TIME:
700                 return &adapter->gs->ts;
701                 break;
702         case FC_FST_DIR:
703                 return &adapter->gs->ds;
704                 break;
705         default:
706                 return NULL;
707         }
708 }
709
710 static void zfcp_fc_ct_job_handler(void *data)
711 {
712         struct fc_bsg_job *job = data;
713         struct zfcp_fc_wka_port *wka_port;
714
715         wka_port = zfcp_fc_job_wka_port(job);
716         zfcp_fc_wka_port_put(wka_port);
717
718         zfcp_fc_ct_els_job_handler(data);
719 }
720
721 static int zfcp_fc_exec_els_job(struct fc_bsg_job *job,
722                                 struct zfcp_adapter *adapter)
723 {
724         struct zfcp_fsf_ct_els *els = job->dd_data;
725         struct fc_rport *rport = job->rport;
726         struct zfcp_port *port;
727         u32 d_id;
728
729         if (rport) {
730                 port = zfcp_get_port_by_wwpn(adapter, rport->port_name);
731                 if (!port)
732                         return -EINVAL;
733
734                 d_id = port->d_id;
735                 put_device(&port->sysfs_device);
736         } else
737                 d_id = ntoh24(job->request->rqst_data.h_els.port_id);
738
739         els->handler = zfcp_fc_ct_els_job_handler;
740         return zfcp_fsf_send_els(adapter, d_id, els, job->req->timeout / HZ);
741 }
742
743 static int zfcp_fc_exec_ct_job(struct fc_bsg_job *job,
744                                struct zfcp_adapter *adapter)
745 {
746         int ret;
747         struct zfcp_fsf_ct_els *ct = job->dd_data;
748         struct zfcp_fc_wka_port *wka_port;
749
750         wka_port = zfcp_fc_job_wka_port(job);
751         if (!wka_port)
752                 return -EINVAL;
753
754         ret = zfcp_fc_wka_port_get(wka_port);
755         if (ret)
756                 return ret;
757
758         ct->handler = zfcp_fc_ct_job_handler;
759         ret = zfcp_fsf_send_ct(wka_port, ct, NULL, job->req->timeout / HZ);
760         if (ret)
761                 zfcp_fc_wka_port_put(wka_port);
762
763         return ret;
764 }
765
766 int zfcp_fc_exec_bsg_job(struct fc_bsg_job *job)
767 {
768         struct Scsi_Host *shost;
769         struct zfcp_adapter *adapter;
770         struct zfcp_fsf_ct_els *ct_els = job->dd_data;
771
772         shost = job->rport ? rport_to_shost(job->rport) : job->shost;
773         adapter = (struct zfcp_adapter *)shost->hostdata[0];
774
775         if (!(atomic_read(&adapter->status) & ZFCP_STATUS_COMMON_OPEN))
776                 return -EINVAL;
777
778         ct_els->req = job->request_payload.sg_list;
779         ct_els->resp = job->reply_payload.sg_list;
780         ct_els->handler_data = job;
781
782         switch (job->request->msgcode) {
783         case FC_BSG_RPT_ELS:
784         case FC_BSG_HST_ELS_NOLOGIN:
785                 return zfcp_fc_exec_els_job(job, adapter);
786         case FC_BSG_RPT_CT:
787         case FC_BSG_HST_CT:
788                 return zfcp_fc_exec_ct_job(job, adapter);
789         default:
790                 return -EINVAL;
791         }
792 }
793
794 int zfcp_fc_timeout_bsg_job(struct fc_bsg_job *job)
795 {
796         /* hardware tracks timeout, reset bsg timeout to not interfere */
797         return -EAGAIN;
798 }
799
800 int zfcp_fc_gs_setup(struct zfcp_adapter *adapter)
801 {
802         struct zfcp_fc_wka_ports *wka_ports;
803
804         wka_ports = kzalloc(sizeof(struct zfcp_fc_wka_ports), GFP_KERNEL);
805         if (!wka_ports)
806                 return -ENOMEM;
807
808         adapter->gs = wka_ports;
809         zfcp_fc_wka_port_init(&wka_ports->ms, FC_FID_MGMT_SERV, adapter);
810         zfcp_fc_wka_port_init(&wka_ports->ts, FC_FID_TIME_SERV, adapter);
811         zfcp_fc_wka_port_init(&wka_ports->ds, FC_FID_DIR_SERV, adapter);
812         zfcp_fc_wka_port_init(&wka_ports->as, FC_FID_ALIASES, adapter);
813
814         return 0;
815 }
816
817 void zfcp_fc_gs_destroy(struct zfcp_adapter *adapter)
818 {
819         kfree(adapter->gs);
820         adapter->gs = NULL;
821 }
822