Linux-libre 2.6.32.42-gnu1
[librecmc/linux-libre.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 "zfcp_ext.h"
13
14 enum rscn_address_format {
15         RSCN_PORT_ADDRESS       = 0x0,
16         RSCN_AREA_ADDRESS       = 0x1,
17         RSCN_DOMAIN_ADDRESS     = 0x2,
18         RSCN_FABRIC_ADDRESS     = 0x3,
19 };
20
21 static u32 rscn_range_mask[] = {
22         [RSCN_PORT_ADDRESS]             = 0xFFFFFF,
23         [RSCN_AREA_ADDRESS]             = 0xFFFF00,
24         [RSCN_DOMAIN_ADDRESS]           = 0xFF0000,
25         [RSCN_FABRIC_ADDRESS]           = 0x000000,
26 };
27
28 struct gpn_ft_resp_acc {
29         u8 control;
30         u8 port_id[3];
31         u8 reserved[4];
32         u64 wwpn;
33 } __attribute__ ((packed));
34
35 #define ZFCP_CT_SIZE_ONE_PAGE   (PAGE_SIZE - sizeof(struct ct_hdr))
36 #define ZFCP_GPN_FT_ENTRIES     (ZFCP_CT_SIZE_ONE_PAGE \
37                                         / sizeof(struct gpn_ft_resp_acc))
38 #define ZFCP_GPN_FT_BUFFERS 4
39 #define ZFCP_GPN_FT_MAX_SIZE (ZFCP_GPN_FT_BUFFERS * PAGE_SIZE \
40                                 - sizeof(struct ct_hdr))
41 #define ZFCP_GPN_FT_MAX_ENTRIES ZFCP_GPN_FT_BUFFERS * (ZFCP_GPN_FT_ENTRIES + 1)
42
43 struct ct_iu_gpn_ft_resp {
44         struct ct_hdr header;
45         struct gpn_ft_resp_acc accept[ZFCP_GPN_FT_ENTRIES];
46 } __attribute__ ((packed));
47
48 struct zfcp_gpn_ft {
49         struct zfcp_send_ct ct;
50         struct scatterlist sg_req;
51         struct scatterlist sg_resp[ZFCP_GPN_FT_BUFFERS];
52 };
53
54 struct zfcp_fc_ns_handler_data {
55         struct completion done;
56         void (*handler)(unsigned long);
57         unsigned long handler_data;
58 };
59
60 static int zfcp_fc_wka_port_get(struct zfcp_wka_port *wka_port)
61 {
62         if (mutex_lock_interruptible(&wka_port->mutex))
63                 return -ERESTARTSYS;
64
65         if (wka_port->status == ZFCP_WKA_PORT_OFFLINE ||
66             wka_port->status == ZFCP_WKA_PORT_CLOSING) {
67                 wka_port->status = ZFCP_WKA_PORT_OPENING;
68                 if (zfcp_fsf_open_wka_port(wka_port))
69                         wka_port->status = ZFCP_WKA_PORT_OFFLINE;
70         }
71
72         mutex_unlock(&wka_port->mutex);
73
74         wait_event(wka_port->completion_wq,
75                    wka_port->status == ZFCP_WKA_PORT_ONLINE ||
76                    wka_port->status == ZFCP_WKA_PORT_OFFLINE);
77
78         if (wka_port->status == ZFCP_WKA_PORT_ONLINE) {
79                 atomic_inc(&wka_port->refcount);
80                 return 0;
81         }
82         return -EIO;
83 }
84
85 static void zfcp_fc_wka_port_offline(struct work_struct *work)
86 {
87         struct delayed_work *dw = to_delayed_work(work);
88         struct zfcp_wka_port *wka_port =
89                         container_of(dw, struct zfcp_wka_port, work);
90
91         mutex_lock(&wka_port->mutex);
92         if ((atomic_read(&wka_port->refcount) != 0) ||
93             (wka_port->status != ZFCP_WKA_PORT_ONLINE))
94                 goto out;
95
96         wka_port->status = ZFCP_WKA_PORT_CLOSING;
97         if (zfcp_fsf_close_wka_port(wka_port)) {
98                 wka_port->status = ZFCP_WKA_PORT_OFFLINE;
99                 wake_up(&wka_port->completion_wq);
100         }
101 out:
102         mutex_unlock(&wka_port->mutex);
103 }
104
105 static void zfcp_fc_wka_port_put(struct zfcp_wka_port *wka_port)
106 {
107         if (atomic_dec_return(&wka_port->refcount) != 0)
108                 return;
109         /* wait 10 milliseconds, other reqs might pop in */
110         schedule_delayed_work(&wka_port->work, HZ / 100);
111 }
112
113 static void zfcp_fc_wka_port_init(struct zfcp_wka_port *wka_port, u32 d_id,
114                                   struct zfcp_adapter *adapter)
115 {
116         init_waitqueue_head(&wka_port->completion_wq);
117
118         wka_port->adapter = adapter;
119         wka_port->d_id = d_id;
120
121         wka_port->status = ZFCP_WKA_PORT_OFFLINE;
122         atomic_set(&wka_port->refcount, 0);
123         mutex_init(&wka_port->mutex);
124         INIT_DELAYED_WORK(&wka_port->work, zfcp_fc_wka_port_offline);
125 }
126
127 static void zfcp_fc_wka_port_force_offline(struct zfcp_wka_port *wka)
128 {
129         cancel_delayed_work_sync(&wka->work);
130         mutex_lock(&wka->mutex);
131         wka->status = ZFCP_WKA_PORT_OFFLINE;
132         mutex_unlock(&wka->mutex);
133 }
134
135 void zfcp_fc_wka_ports_force_offline(struct zfcp_wka_ports *gs)
136 {
137         zfcp_fc_wka_port_force_offline(&gs->ms);
138         zfcp_fc_wka_port_force_offline(&gs->ts);
139         zfcp_fc_wka_port_force_offline(&gs->ds);
140         zfcp_fc_wka_port_force_offline(&gs->as);
141         zfcp_fc_wka_port_force_offline(&gs->ks);
142 }
143
144 static void _zfcp_fc_incoming_rscn(struct zfcp_fsf_req *fsf_req, u32 range,
145                                    struct fcp_rscn_element *elem)
146 {
147         unsigned long flags;
148         struct zfcp_port *port;
149
150         read_lock_irqsave(&zfcp_data.config_lock, flags);
151         list_for_each_entry(port, &fsf_req->adapter->port_list_head, list) {
152                 if ((port->d_id & range) == (elem->nport_did & range))
153                         zfcp_fc_test_link(port);
154                 if (!port->d_id)
155                         zfcp_erp_port_reopen(port,
156                                              ZFCP_STATUS_COMMON_ERP_FAILED,
157                                              "fcrscn1", NULL);
158         }
159
160         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
161 }
162
163 static void zfcp_fc_incoming_rscn(struct zfcp_fsf_req *fsf_req)
164 {
165         struct fsf_status_read_buffer *status_buffer = (void *)fsf_req->data;
166         struct fcp_rscn_head *fcp_rscn_head;
167         struct fcp_rscn_element *fcp_rscn_element;
168         u16 i;
169         u16 no_entries;
170         u32 range_mask;
171
172         fcp_rscn_head = (struct fcp_rscn_head *) status_buffer->payload.data;
173         fcp_rscn_element = (struct fcp_rscn_element *) fcp_rscn_head;
174
175         /* see FC-FS */
176         no_entries = fcp_rscn_head->payload_len /
177                         sizeof(struct fcp_rscn_element);
178
179         for (i = 1; i < no_entries; i++) {
180                 /* skip head and start with 1st element */
181                 fcp_rscn_element++;
182                 range_mask = rscn_range_mask[fcp_rscn_element->addr_format];
183                 _zfcp_fc_incoming_rscn(fsf_req, range_mask, fcp_rscn_element);
184         }
185         schedule_work(&fsf_req->adapter->scan_work);
186 }
187
188 static void zfcp_fc_incoming_wwpn(struct zfcp_fsf_req *req, u64 wwpn)
189 {
190         struct zfcp_adapter *adapter = req->adapter;
191         struct zfcp_port *port;
192         unsigned long flags;
193
194         read_lock_irqsave(&zfcp_data.config_lock, flags);
195         list_for_each_entry(port, &adapter->port_list_head, list)
196                 if (port->wwpn == wwpn)
197                         break;
198         read_unlock_irqrestore(&zfcp_data.config_lock, flags);
199
200         if (port && (port->wwpn == wwpn))
201                 zfcp_erp_port_forced_reopen(port, 0, "fciwwp1", req);
202 }
203
204 static void zfcp_fc_incoming_plogi(struct zfcp_fsf_req *req)
205 {
206         struct fsf_status_read_buffer *status_buffer =
207                 (struct fsf_status_read_buffer *)req->data;
208         struct fsf_plogi *els_plogi =
209                 (struct fsf_plogi *) status_buffer->payload.data;
210
211         zfcp_fc_incoming_wwpn(req, els_plogi->serv_param.wwpn);
212 }
213
214 static void zfcp_fc_incoming_logo(struct zfcp_fsf_req *req)
215 {
216         struct fsf_status_read_buffer *status_buffer =
217                 (struct fsf_status_read_buffer *)req->data;
218         struct fcp_logo *els_logo =
219                 (struct fcp_logo *) status_buffer->payload.data;
220
221         zfcp_fc_incoming_wwpn(req, els_logo->nport_wwpn);
222 }
223
224 /**
225  * zfcp_fc_incoming_els - handle incoming ELS
226  * @fsf_req - request which contains incoming ELS
227  */
228 void zfcp_fc_incoming_els(struct zfcp_fsf_req *fsf_req)
229 {
230         struct fsf_status_read_buffer *status_buffer =
231                 (struct fsf_status_read_buffer *) fsf_req->data;
232         unsigned int els_type = status_buffer->payload.data[0];
233
234         zfcp_dbf_san_incoming_els(fsf_req);
235         if (els_type == LS_PLOGI)
236                 zfcp_fc_incoming_plogi(fsf_req);
237         else if (els_type == LS_LOGO)
238                 zfcp_fc_incoming_logo(fsf_req);
239         else if (els_type == LS_RSCN)
240                 zfcp_fc_incoming_rscn(fsf_req);
241 }
242
243 static void zfcp_fc_ns_handler(unsigned long data)
244 {
245         struct zfcp_fc_ns_handler_data *compl_rec =
246                         (struct zfcp_fc_ns_handler_data *) data;
247
248         if (compl_rec->handler)
249                 compl_rec->handler(compl_rec->handler_data);
250
251         complete(&compl_rec->done);
252 }
253
254 static void zfcp_fc_ns_gid_pn_eval(unsigned long data)
255 {
256         struct zfcp_gid_pn_data *gid_pn = (struct zfcp_gid_pn_data *) data;
257         struct zfcp_send_ct *ct = &gid_pn->ct;
258         struct ct_iu_gid_pn_req *ct_iu_req = sg_virt(ct->req);
259         struct ct_iu_gid_pn_resp *ct_iu_resp = sg_virt(ct->resp);
260         struct zfcp_port *port = gid_pn->port;
261
262         if (ct->status)
263                 return;
264         if (ct_iu_resp->header.cmd_rsp_code != ZFCP_CT_ACCEPT)
265                 return;
266
267         /* paranoia */
268         if (ct_iu_req->wwpn != port->wwpn)
269                 return;
270         /* looks like a valid d_id */
271         port->d_id = ct_iu_resp->d_id & ZFCP_DID_MASK;
272 }
273
274 static int zfcp_fc_ns_gid_pn_request(struct zfcp_port *port,
275                                      struct zfcp_gid_pn_data *gid_pn)
276 {
277         struct zfcp_adapter *adapter = port->adapter;
278         struct zfcp_fc_ns_handler_data compl_rec;
279         int ret;
280
281         /* setup parameters for send generic command */
282         gid_pn->port = port;
283         gid_pn->ct.wka_port = &adapter->gs->ds;
284         gid_pn->ct.handler = zfcp_fc_ns_handler;
285         gid_pn->ct.handler_data = (unsigned long) &compl_rec;
286         gid_pn->ct.req = &gid_pn->req;
287         gid_pn->ct.resp = &gid_pn->resp;
288         sg_init_one(&gid_pn->req, &gid_pn->ct_iu_req,
289                     sizeof(struct ct_iu_gid_pn_req));
290         sg_init_one(&gid_pn->resp, &gid_pn->ct_iu_resp,
291                     sizeof(struct ct_iu_gid_pn_resp));
292
293         /* setup nameserver request */
294         gid_pn->ct_iu_req.header.revision = ZFCP_CT_REVISION;
295         gid_pn->ct_iu_req.header.gs_type = ZFCP_CT_DIRECTORY_SERVICE;
296         gid_pn->ct_iu_req.header.gs_subtype = ZFCP_CT_NAME_SERVER;
297         gid_pn->ct_iu_req.header.options = ZFCP_CT_SYNCHRONOUS;
298         gid_pn->ct_iu_req.header.cmd_rsp_code = ZFCP_CT_GID_PN;
299         gid_pn->ct_iu_req.header.max_res_size = ZFCP_CT_SIZE_ONE_PAGE / 4;
300         gid_pn->ct_iu_req.wwpn = port->wwpn;
301
302         init_completion(&compl_rec.done);
303         compl_rec.handler = zfcp_fc_ns_gid_pn_eval;
304         compl_rec.handler_data = (unsigned long) gid_pn;
305         ret = zfcp_fsf_send_ct(&gid_pn->ct, adapter->pool.gid_pn_req);
306         if (!ret)
307                 wait_for_completion(&compl_rec.done);
308         return ret;
309 }
310
311 /**
312  * zfcp_fc_ns_gid_pn_request - initiate GID_PN nameserver request
313  * @port: port where GID_PN request is needed
314  * return: -ENOMEM on error, 0 otherwise
315  */
316 static int zfcp_fc_ns_gid_pn(struct zfcp_port *port)
317 {
318         int ret;
319         struct zfcp_gid_pn_data *gid_pn;
320         struct zfcp_adapter *adapter = port->adapter;
321
322         gid_pn = mempool_alloc(adapter->pool.gid_pn_data, GFP_ATOMIC);
323         if (!gid_pn)
324                 return -ENOMEM;
325
326         memset(gid_pn, 0, sizeof(*gid_pn));
327
328         ret = zfcp_fc_wka_port_get(&adapter->gs->ds);
329         if (ret)
330                 goto out;
331
332         ret = zfcp_fc_ns_gid_pn_request(port, gid_pn);
333
334         zfcp_fc_wka_port_put(&adapter->gs->ds);
335 out:
336         mempool_free(gid_pn, adapter->pool.gid_pn_data);
337         return ret;
338 }
339
340 void zfcp_fc_port_did_lookup(struct work_struct *work)
341 {
342         int ret;
343         struct zfcp_port *port = container_of(work, struct zfcp_port,
344                                               gid_pn_work);
345
346         ret = zfcp_fc_ns_gid_pn(port);
347         if (ret) {
348                 /* could not issue gid_pn for some reason */
349                 zfcp_erp_adapter_reopen(port->adapter, 0, "fcgpn_1", NULL);
350                 goto out;
351         }
352
353         if (!port->d_id) {
354                 zfcp_erp_port_failed(port, "fcgpn_2", NULL);
355                 goto out;
356         }
357
358         zfcp_erp_port_reopen(port, 0, "fcgpn_3", NULL);
359 out:
360         zfcp_port_put(port);
361 }
362
363 /**
364  * zfcp_fc_trigger_did_lookup - trigger the d_id lookup using a GID_PN request
365  * @port: The zfcp_port to lookup the d_id for.
366  */
367 void zfcp_fc_trigger_did_lookup(struct zfcp_port *port)
368 {
369         zfcp_port_get(port);
370         if (!queue_work(port->adapter->work_queue, &port->gid_pn_work))
371                 zfcp_port_put(port);
372 }
373
374 /**
375  * zfcp_fc_plogi_evaluate - evaluate PLOGI playload
376  * @port: zfcp_port structure
377  * @plogi: plogi payload
378  *
379  * Evaluate PLOGI playload and copy important fields into zfcp_port structure
380  */
381 void zfcp_fc_plogi_evaluate(struct zfcp_port *port, struct fsf_plogi *plogi)
382 {
383         port->maxframe_size = plogi->serv_param.common_serv_param[7] |
384                 ((plogi->serv_param.common_serv_param[6] & 0x0F) << 8);
385         if (plogi->serv_param.class1_serv_param[0] & 0x80)
386                 port->supported_classes |= FC_COS_CLASS1;
387         if (plogi->serv_param.class2_serv_param[0] & 0x80)
388                 port->supported_classes |= FC_COS_CLASS2;
389         if (plogi->serv_param.class3_serv_param[0] & 0x80)
390                 port->supported_classes |= FC_COS_CLASS3;
391         if (plogi->serv_param.class4_serv_param[0] & 0x80)
392                 port->supported_classes |= FC_COS_CLASS4;
393 }
394
395 struct zfcp_els_adisc {
396         struct zfcp_send_els els;
397         struct scatterlist req;
398         struct scatterlist resp;
399         struct zfcp_ls_adisc ls_adisc;
400         struct zfcp_ls_adisc ls_adisc_acc;
401 };
402
403 static void zfcp_fc_adisc_handler(unsigned long data)
404 {
405         struct zfcp_els_adisc *adisc = (struct zfcp_els_adisc *) data;
406         struct zfcp_port *port = adisc->els.port;
407         struct zfcp_ls_adisc *ls_adisc = &adisc->ls_adisc_acc;
408
409         if (adisc->els.status) {
410                 /* request rejected or timed out */
411                 zfcp_erp_port_forced_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
412                                             "fcadh_1", NULL);
413                 goto out;
414         }
415
416         if (!port->wwnn)
417                 port->wwnn = ls_adisc->wwnn;
418
419         if ((port->wwpn != ls_adisc->wwpn) ||
420             !(atomic_read(&port->status) & ZFCP_STATUS_COMMON_OPEN)) {
421                 zfcp_erp_port_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
422                                      "fcadh_2", NULL);
423                 goto out;
424         }
425
426         /* port is good, unblock rport without going through erp */
427         zfcp_scsi_schedule_rport_register(port);
428  out:
429         atomic_clear_mask(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
430         zfcp_port_put(port);
431         kfree(adisc);
432 }
433
434 static int zfcp_fc_adisc(struct zfcp_port *port)
435 {
436         struct zfcp_els_adisc *adisc;
437         struct zfcp_adapter *adapter = port->adapter;
438
439         adisc = kzalloc(sizeof(struct zfcp_els_adisc), GFP_ATOMIC);
440         if (!adisc)
441                 return -ENOMEM;
442
443         adisc->els.req = &adisc->req;
444         adisc->els.resp = &adisc->resp;
445         sg_init_one(adisc->els.req, &adisc->ls_adisc,
446                     sizeof(struct zfcp_ls_adisc));
447         sg_init_one(adisc->els.resp, &adisc->ls_adisc_acc,
448                     sizeof(struct zfcp_ls_adisc));
449
450         adisc->els.adapter = adapter;
451         adisc->els.port = port;
452         adisc->els.d_id = port->d_id;
453         adisc->els.handler = zfcp_fc_adisc_handler;
454         adisc->els.handler_data = (unsigned long) adisc;
455         adisc->els.ls_code = adisc->ls_adisc.code = ZFCP_LS_ADISC;
456
457         /* acc. to FC-FS, hard_nport_id in ADISC should not be set for ports
458            without FC-AL-2 capability, so we don't set it */
459         adisc->ls_adisc.wwpn = fc_host_port_name(adapter->scsi_host);
460         adisc->ls_adisc.wwnn = fc_host_node_name(adapter->scsi_host);
461         adisc->ls_adisc.nport_id = fc_host_port_id(adapter->scsi_host);
462
463         return zfcp_fsf_send_els(&adisc->els);
464 }
465
466 void zfcp_fc_link_test_work(struct work_struct *work)
467 {
468         struct zfcp_port *port =
469                 container_of(work, struct zfcp_port, test_link_work);
470         int retval;
471
472         zfcp_port_get(port);
473         port->rport_task = RPORT_DEL;
474         zfcp_scsi_rport_work(&port->rport_work);
475
476         /* only issue one test command at one time per port */
477         if (atomic_read(&port->status) & ZFCP_STATUS_PORT_LINK_TEST)
478                 goto out;
479
480         atomic_set_mask(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
481
482         retval = zfcp_fc_adisc(port);
483         if (retval == 0)
484                 return;
485
486         /* send of ADISC was not possible */
487         atomic_clear_mask(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
488         zfcp_erp_port_forced_reopen(port, 0, "fcltwk1", NULL);
489
490 out:
491         zfcp_port_put(port);
492 }
493
494 /**
495  * zfcp_fc_test_link - lightweight link test procedure
496  * @port: port to be tested
497  *
498  * Test status of a link to a remote port using the ELS command ADISC.
499  * If there is a problem with the remote port, error recovery steps
500  * will be triggered.
501  */
502 void zfcp_fc_test_link(struct zfcp_port *port)
503 {
504         zfcp_port_get(port);
505         if (!queue_work(port->adapter->work_queue, &port->test_link_work))
506                 zfcp_port_put(port);
507 }
508
509 static void zfcp_free_sg_env(struct zfcp_gpn_ft *gpn_ft, int buf_num)
510 {
511         struct scatterlist *sg = &gpn_ft->sg_req;
512
513         kmem_cache_free(zfcp_data.gpn_ft_cache, sg_virt(sg));
514         zfcp_sg_free_table(gpn_ft->sg_resp, buf_num);
515
516         kfree(gpn_ft);
517 }
518
519 static struct zfcp_gpn_ft *zfcp_alloc_sg_env(int buf_num)
520 {
521         struct zfcp_gpn_ft *gpn_ft;
522         struct ct_iu_gpn_ft_req *req;
523
524         gpn_ft = kzalloc(sizeof(*gpn_ft), GFP_KERNEL);
525         if (!gpn_ft)
526                 return NULL;
527
528         req = kmem_cache_alloc(zfcp_data.gpn_ft_cache, GFP_KERNEL);
529         if (!req) {
530                 kfree(gpn_ft);
531                 gpn_ft = NULL;
532                 goto out;
533         }
534         sg_init_one(&gpn_ft->sg_req, req, sizeof(*req));
535
536         if (zfcp_sg_setup_table(gpn_ft->sg_resp, buf_num)) {
537                 zfcp_free_sg_env(gpn_ft, buf_num);
538                 gpn_ft = NULL;
539         }
540 out:
541         return gpn_ft;
542 }
543
544
545 static int zfcp_fc_send_gpn_ft(struct zfcp_gpn_ft *gpn_ft,
546                                struct zfcp_adapter *adapter, int max_bytes)
547 {
548         struct zfcp_send_ct *ct = &gpn_ft->ct;
549         struct ct_iu_gpn_ft_req *req = sg_virt(&gpn_ft->sg_req);
550         struct zfcp_fc_ns_handler_data compl_rec;
551         int ret;
552
553         /* prepare CT IU for GPN_FT */
554         req->header.revision = ZFCP_CT_REVISION;
555         req->header.gs_type = ZFCP_CT_DIRECTORY_SERVICE;
556         req->header.gs_subtype = ZFCP_CT_NAME_SERVER;
557         req->header.options = ZFCP_CT_SYNCHRONOUS;
558         req->header.cmd_rsp_code = ZFCP_CT_GPN_FT;
559         req->header.max_res_size = max_bytes / 4;
560         req->flags = 0;
561         req->domain_id_scope = 0;
562         req->area_id_scope = 0;
563         req->fc4_type = ZFCP_CT_SCSI_FCP;
564
565         /* prepare zfcp_send_ct */
566         ct->wka_port = &adapter->gs->ds;
567         ct->handler = zfcp_fc_ns_handler;
568         ct->handler_data = (unsigned long)&compl_rec;
569         ct->req = &gpn_ft->sg_req;
570         ct->resp = gpn_ft->sg_resp;
571
572         init_completion(&compl_rec.done);
573         compl_rec.handler = NULL;
574         ret = zfcp_fsf_send_ct(ct, NULL);
575         if (!ret)
576                 wait_for_completion(&compl_rec.done);
577         return ret;
578 }
579
580 static void zfcp_fc_validate_port(struct zfcp_port *port)
581 {
582         struct zfcp_adapter *adapter = port->adapter;
583
584         if (!(atomic_read(&port->status) & ZFCP_STATUS_COMMON_NOESC))
585                 return;
586
587         atomic_clear_mask(ZFCP_STATUS_COMMON_NOESC, &port->status);
588
589         if ((port->supported_classes != 0) ||
590             !list_empty(&port->unit_list_head)) {
591                 zfcp_port_put(port);
592                 return;
593         }
594         zfcp_erp_port_shutdown(port, 0, "fcpval1", NULL);
595         zfcp_erp_wait(adapter);
596         zfcp_port_put(port);
597         zfcp_port_dequeue(port);
598 }
599
600 static int zfcp_fc_eval_gpn_ft(struct zfcp_gpn_ft *gpn_ft, int max_entries)
601 {
602         struct zfcp_send_ct *ct = &gpn_ft->ct;
603         struct scatterlist *sg = gpn_ft->sg_resp;
604         struct ct_hdr *hdr = sg_virt(sg);
605         struct gpn_ft_resp_acc *acc = sg_virt(sg);
606         struct zfcp_adapter *adapter = ct->wka_port->adapter;
607         struct zfcp_port *port, *tmp;
608         u32 d_id;
609         int ret = 0, x, last = 0;
610
611         if (ct->status)
612                 return -EIO;
613
614         if (hdr->cmd_rsp_code != ZFCP_CT_ACCEPT) {
615                 if (hdr->reason_code == ZFCP_CT_UNABLE_TO_PERFORM_CMD)
616                         return -EAGAIN; /* might be a temporary condition */
617                 return -EIO;
618         }
619
620         if (hdr->max_res_size) {
621                 dev_warn(&adapter->ccw_device->dev,
622                          "The name server reported %d words residual data\n",
623                          hdr->max_res_size);
624                 return -E2BIG;
625         }
626
627         mutex_lock(&zfcp_data.config_mutex);
628
629         /* first entry is the header */
630         for (x = 1; x < max_entries && !last; x++) {
631                 if (x % (ZFCP_GPN_FT_ENTRIES + 1))
632                         acc++;
633                 else
634                         acc = sg_virt(++sg);
635
636                 last = acc->control & 0x80;
637                 d_id = acc->port_id[0] << 16 | acc->port_id[1] << 8 |
638                        acc->port_id[2];
639
640                 /* don't attach ports with a well known address */
641                 if ((d_id & ZFCP_DID_WKA) == ZFCP_DID_WKA)
642                         continue;
643                 /* skip the adapter's port and known remote ports */
644                 if (acc->wwpn == fc_host_port_name(adapter->scsi_host))
645                         continue;
646                 port = zfcp_get_port_by_wwpn(adapter, acc->wwpn);
647                 if (port)
648                         continue;
649
650                 port = zfcp_port_enqueue(adapter, acc->wwpn,
651                                          ZFCP_STATUS_COMMON_NOESC, d_id);
652                 if (IS_ERR(port))
653                         ret = PTR_ERR(port);
654                 else
655                         zfcp_erp_port_reopen(port, 0, "fcegpf1", NULL);
656         }
657
658         zfcp_erp_wait(adapter);
659         list_for_each_entry_safe(port, tmp, &adapter->port_list_head, list)
660                 zfcp_fc_validate_port(port);
661         mutex_unlock(&zfcp_data.config_mutex);
662         return ret;
663 }
664
665 /**
666  * zfcp_fc_scan_ports - scan remote ports and attach new ports
667  * @adapter: pointer to struct zfcp_adapter
668  */
669 int zfcp_fc_scan_ports(struct zfcp_adapter *adapter)
670 {
671         int ret, i;
672         struct zfcp_gpn_ft *gpn_ft;
673         int chain, max_entries, buf_num, max_bytes;
674
675         chain = adapter->adapter_features & FSF_FEATURE_ELS_CT_CHAINED_SBALS;
676         buf_num = chain ? ZFCP_GPN_FT_BUFFERS : 1;
677         max_entries = chain ? ZFCP_GPN_FT_MAX_ENTRIES : ZFCP_GPN_FT_ENTRIES;
678         max_bytes = chain ? ZFCP_GPN_FT_MAX_SIZE : ZFCP_CT_SIZE_ONE_PAGE;
679
680         if (fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPORT &&
681             fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPIV)
682                 return 0;
683
684         ret = zfcp_fc_wka_port_get(&adapter->gs->ds);
685         if (ret)
686                 return ret;
687
688         gpn_ft = zfcp_alloc_sg_env(buf_num);
689         if (!gpn_ft) {
690                 ret = -ENOMEM;
691                 goto out;
692         }
693
694         for (i = 0; i < 3; i++) {
695                 ret = zfcp_fc_send_gpn_ft(gpn_ft, adapter, max_bytes);
696                 if (!ret) {
697                         ret = zfcp_fc_eval_gpn_ft(gpn_ft, max_entries);
698                         if (ret == -EAGAIN)
699                                 ssleep(1);
700                         else
701                                 break;
702                 }
703         }
704         zfcp_free_sg_env(gpn_ft, buf_num);
705 out:
706         zfcp_fc_wka_port_put(&adapter->gs->ds);
707         return ret;
708 }
709
710
711 void _zfcp_fc_scan_ports_later(struct work_struct *work)
712 {
713         zfcp_fc_scan_ports(container_of(work, struct zfcp_adapter, scan_work));
714 }
715
716 struct zfcp_els_fc_job {
717         struct zfcp_send_els els;
718         struct fc_bsg_job *job;
719 };
720
721 static void zfcp_fc_generic_els_handler(unsigned long data)
722 {
723         struct zfcp_els_fc_job *els_fc_job = (struct zfcp_els_fc_job *) data;
724         struct fc_bsg_job *job = els_fc_job->job;
725         struct fc_bsg_reply *reply = job->reply;
726
727         if (els_fc_job->els.status) {
728                 /* request rejected or timed out */
729                 reply->reply_data.ctels_reply.status = FC_CTELS_STATUS_REJECT;
730                 goto out;
731         }
732
733         reply->reply_data.ctels_reply.status = FC_CTELS_STATUS_OK;
734         reply->reply_payload_rcv_len = job->reply_payload.payload_len;
735
736 out:
737         job->state_flags = FC_RQST_STATE_DONE;
738         job->job_done(job);
739         kfree(els_fc_job);
740 }
741
742 int zfcp_fc_execute_els_fc_job(struct fc_bsg_job *job)
743 {
744         struct zfcp_els_fc_job *els_fc_job;
745         struct fc_rport *rport = job->rport;
746         struct Scsi_Host *shost;
747         struct zfcp_adapter *adapter;
748         struct zfcp_port *port;
749         u8 *port_did;
750
751         shost = rport ? rport_to_shost(rport) : job->shost;
752         adapter = (struct zfcp_adapter *)shost->hostdata[0];
753
754         if (!(atomic_read(&adapter->status) & ZFCP_STATUS_COMMON_OPEN))
755                 return -EINVAL;
756
757         els_fc_job = kzalloc(sizeof(struct zfcp_els_fc_job), GFP_KERNEL);
758         if (!els_fc_job)
759                 return -ENOMEM;
760
761         els_fc_job->els.adapter = adapter;
762         if (rport) {
763                 read_lock_irq(&zfcp_data.config_lock);
764                 port = zfcp_get_port_by_wwpn(adapter, rport->port_name);
765                 if (port)
766                         els_fc_job->els.d_id = port->d_id;
767                 read_unlock_irq(&zfcp_data.config_lock);
768                 if (!port) {
769                         kfree(els_fc_job);
770                         return -EINVAL;
771                 }
772         } else {
773                 port_did = job->request->rqst_data.h_els.port_id;
774                 els_fc_job->els.d_id = (port_did[0] << 16) +
775                                         (port_did[1] << 8) + port_did[2];
776         }
777
778         els_fc_job->els.req = job->request_payload.sg_list;
779         els_fc_job->els.resp = job->reply_payload.sg_list;
780         els_fc_job->els.handler = zfcp_fc_generic_els_handler;
781         els_fc_job->els.handler_data = (unsigned long) els_fc_job;
782         els_fc_job->job = job;
783
784         return zfcp_fsf_send_els(&els_fc_job->els);
785 }
786
787 struct zfcp_ct_fc_job {
788         struct zfcp_send_ct ct;
789         struct fc_bsg_job *job;
790 };
791
792 static void zfcp_fc_generic_ct_handler(unsigned long data)
793 {
794         struct zfcp_ct_fc_job *ct_fc_job = (struct zfcp_ct_fc_job *) data;
795         struct fc_bsg_job *job = ct_fc_job->job;
796
797         job->reply->reply_data.ctels_reply.status = ct_fc_job->ct.status ?
798                                 FC_CTELS_STATUS_REJECT : FC_CTELS_STATUS_OK;
799         job->reply->reply_payload_rcv_len = job->reply_payload.payload_len;
800         job->state_flags = FC_RQST_STATE_DONE;
801         job->job_done(job);
802
803         zfcp_fc_wka_port_put(ct_fc_job->ct.wka_port);
804
805         kfree(ct_fc_job);
806 }
807
808 int zfcp_fc_execute_ct_fc_job(struct fc_bsg_job *job)
809 {
810         int ret;
811         u8 gs_type;
812         struct fc_rport *rport = job->rport;
813         struct Scsi_Host *shost;
814         struct zfcp_adapter *adapter;
815         struct zfcp_ct_fc_job *ct_fc_job;
816         u32 preamble_word1;
817
818         shost = rport ? rport_to_shost(rport) : job->shost;
819
820         adapter = (struct zfcp_adapter *)shost->hostdata[0];
821         if (!(atomic_read(&adapter->status) & ZFCP_STATUS_COMMON_OPEN))
822                 return -EINVAL;
823
824         ct_fc_job = kzalloc(sizeof(struct zfcp_ct_fc_job), GFP_KERNEL);
825         if (!ct_fc_job)
826                 return -ENOMEM;
827
828         preamble_word1 = job->request->rqst_data.r_ct.preamble_word1;
829         gs_type = (preamble_word1 & 0xff000000) >> 24;
830
831         switch (gs_type) {
832         case FC_FST_ALIAS:
833                 ct_fc_job->ct.wka_port = &adapter->gs->as;
834                 break;
835         case FC_FST_MGMT:
836                 ct_fc_job->ct.wka_port = &adapter->gs->ms;
837                 break;
838         case FC_FST_TIME:
839                 ct_fc_job->ct.wka_port = &adapter->gs->ts;
840                 break;
841         case FC_FST_DIR:
842                 ct_fc_job->ct.wka_port = &adapter->gs->ds;
843                 break;
844         default:
845                 kfree(ct_fc_job);
846                 return -EINVAL; /* no such service */
847         }
848
849         ret = zfcp_fc_wka_port_get(ct_fc_job->ct.wka_port);
850         if (ret) {
851                 kfree(ct_fc_job);
852                 return ret;
853         }
854
855         ct_fc_job->ct.req = job->request_payload.sg_list;
856         ct_fc_job->ct.resp = job->reply_payload.sg_list;
857         ct_fc_job->ct.handler = zfcp_fc_generic_ct_handler;
858         ct_fc_job->ct.handler_data = (unsigned long) ct_fc_job;
859         ct_fc_job->ct.completion = NULL;
860         ct_fc_job->job = job;
861
862         ret = zfcp_fsf_send_ct(&ct_fc_job->ct, NULL);
863         if (ret) {
864                 kfree(ct_fc_job);
865                 zfcp_fc_wka_port_put(ct_fc_job->ct.wka_port);
866         }
867         return ret;
868 }
869
870 int zfcp_fc_gs_setup(struct zfcp_adapter *adapter)
871 {
872         struct zfcp_wka_ports *wka_ports;
873
874         wka_ports = kzalloc(sizeof(struct zfcp_wka_ports), GFP_KERNEL);
875         if (!wka_ports)
876                 return -ENOMEM;
877
878         adapter->gs = wka_ports;
879         zfcp_fc_wka_port_init(&wka_ports->ms, FC_FID_MGMT_SERV, adapter);
880         zfcp_fc_wka_port_init(&wka_ports->ts, FC_FID_TIME_SERV, adapter);
881         zfcp_fc_wka_port_init(&wka_ports->ds, FC_FID_DIR_SERV, adapter);
882         zfcp_fc_wka_port_init(&wka_ports->as, FC_FID_ALIASES, adapter);
883         zfcp_fc_wka_port_init(&wka_ports->ks, FC_FID_SEC_KEY, adapter);
884
885         return 0;
886 }
887
888 void zfcp_fc_gs_destroy(struct zfcp_adapter *adapter)
889 {
890         kfree(adapter->gs);
891         adapter->gs = NULL;
892 }
893