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