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         if (!ret) {
 263                 wait_for_completion(&completion);
 264                 zfcp_fc_ns_gid_pn_eval(gid_pn);
 265         }
 266         return ret;
 267 }
 268
 269 /**
 270  * zfcp_fc_ns_gid_pn_request - initiate GID_PN nameserver request
 271  * @port: port where GID_PN request is needed
 272  * return: -ENOMEM on error, 0 otherwise
 273  */
 274 static int zfcp_fc_ns_gid_pn(struct zfcp_port *port)
 275 {
 276         int ret;
 277         struct zfcp_fc_gid_pn *gid_pn;
 278         struct zfcp_adapter *adapter = port->adapter;
 279
 280         gid_pn = mempool_alloc(adapter->pool.gid_pn, GFP_ATOMIC);
 281         if (!gid_pn)
 282                 return -ENOMEM;
 283
 284         memset(gid_pn, 0, sizeof(*gid_pn));
 285
 286         ret = zfcp_fc_wka_port_get(&adapter->gs->ds);
 287         if (ret)
 288                 goto out;
 289
 290         ret = zfcp_fc_ns_gid_pn_request(port, gid_pn);
 291
 292         zfcp_fc_wka_port_put(&adapter->gs->ds);
 293 out:
 294         mempool_free(gid_pn, adapter->pool.gid_pn);
 295         return ret;
 296 }
 297
 298 void zfcp_fc_port_did_lookup(struct work_struct *work)
 299 {
 300         int ret;
 301         struct zfcp_port *port = container_of(work, struct zfcp_port,
 302                                               gid_pn_work);
 303
 304         ret = zfcp_fc_ns_gid_pn(port);
 305         if (ret) {
 306                 /* could not issue gid_pn for some reason */
 307                 zfcp_erp_adapter_reopen(port->adapter, 0, "fcgpn_1", NULL);
 308                 goto out;
 309         }
 310
 311         if (!port->d_id) {
 312                 zfcp_erp_port_failed(port, "fcgpn_2", NULL);
 313                 goto out;
 314         }
 315
 316         zfcp_erp_port_reopen(port, 0, "fcgpn_3", NULL);
 317 out:
 318         put_device(&port->sysfs_device);
 319 }
 320
 321 /**
 322  * zfcp_fc_trigger_did_lookup - trigger the d_id lookup using a GID_PN request
 323  * @port: The zfcp_port to lookup the d_id for.
 324  */
 325 void zfcp_fc_trigger_did_lookup(struct zfcp_port *port)
 326 {
 327         get_device(&port->sysfs_device);
 328         if (!queue_work(port->adapter->work_queue, &port->gid_pn_work))
 329                 put_device(&port->sysfs_device);
 330 }
 331
 332 /**
 333  * zfcp_fc_plogi_evaluate - evaluate PLOGI playload
 334  * @port: zfcp_port structure
 335  * @plogi: plogi payload
 336  *
 337  * Evaluate PLOGI playload and copy important fields into zfcp_port structure
 338  */
 339 void zfcp_fc_plogi_evaluate(struct zfcp_port *port, struct fc_els_flogi *plogi)
 340 {
 341         if (plogi->fl_wwpn != port->wwpn) {
 342                 port->d_id = 0;
 343                 dev_warn(&port->adapter->ccw_device->dev,
 344                          "A port opened with WWPN 0x%016Lx returned data that "
 345                          "identifies it as WWPN 0x%016Lx\n",
 346                          (unsigned long long) port->wwpn,
 347                          (unsigned long long) plogi->fl_wwpn);
 348                 return;
 349         }
 350
 351         port->wwnn = plogi->fl_wwnn;
 352         port->maxframe_size = plogi->fl_csp.sp_bb_data;
 353
 354         if (plogi->fl_cssp[0].cp_class & FC_CPC_VALID)
 355                 port->supported_classes |= FC_COS_CLASS1;
 356         if (plogi->fl_cssp[1].cp_class & FC_CPC_VALID)
 357                 port->supported_classes |= FC_COS_CLASS2;
 358         if (plogi->fl_cssp[2].cp_class & FC_CPC_VALID)
 359                 port->supported_classes |= FC_COS_CLASS3;
 360         if (plogi->fl_cssp[3].cp_class & FC_CPC_VALID)
 361                 port->supported_classes |= FC_COS_CLASS4;
 362 }
 363
 364 static void zfcp_fc_adisc_handler(void *data)
 365 {
 366         struct zfcp_fc_els_adisc *adisc = data;
 367         struct zfcp_port *port = adisc->els.port;
 368         struct fc_els_adisc *adisc_resp = &adisc->adisc_resp;
 369
 370         if (adisc->els.status) {
 371                 /* request rejected or timed out */
 372                 zfcp_erp_port_forced_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
 373                                             "fcadh_1", NULL);
 374                 goto out;
 375         }
 376
 377         if (!port->wwnn)
 378                 port->wwnn = adisc_resp->adisc_wwnn;
 379
 380         if ((port->wwpn != adisc_resp->adisc_wwpn) ||
 381             !(atomic_read(&port->status) & ZFCP_STATUS_COMMON_OPEN)) {
 382                 zfcp_erp_port_reopen(port, ZFCP_STATUS_COMMON_ERP_FAILED,
 383                                      "fcadh_2", NULL);
 384                 goto out;
 385         }
 386
 387         /* port is good, unblock rport without going through erp */
 388         zfcp_scsi_schedule_rport_register(port);
 389  out:
 390         atomic_clear_mask(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
 391         put_device(&port->sysfs_device);
 392         kmem_cache_free(zfcp_data.adisc_cache, adisc);
 393 }
 394
 395 static int zfcp_fc_adisc(struct zfcp_port *port)
 396 {
 397         struct zfcp_fc_els_adisc *adisc;
 398         struct zfcp_adapter *adapter = port->adapter;
 399         int ret;
 400
 401         adisc = kmem_cache_alloc(zfcp_data.adisc_cache, GFP_ATOMIC);
 402         if (!adisc)
 403                 return -ENOMEM;
 404
 405         adisc->els.port = port;
 406         adisc->els.req = &adisc->req;
 407         adisc->els.resp = &adisc->resp;
 408         sg_init_one(adisc->els.req, &adisc->adisc_req,
 409                     sizeof(struct fc_els_adisc));
 410         sg_init_one(adisc->els.resp, &adisc->adisc_resp,
 411                     sizeof(struct fc_els_adisc));
 412
 413         adisc->els.handler = zfcp_fc_adisc_handler;
 414         adisc->els.handler_data = adisc;
 415
 416         /* acc. to FC-FS, hard_nport_id in ADISC should not be set for ports
 417            without FC-AL-2 capability, so we don't set it */
 418         adisc->adisc_req.adisc_wwpn = fc_host_port_name(adapter->scsi_host);
 419         adisc->adisc_req.adisc_wwnn = fc_host_node_name(adapter->scsi_host);
 420         adisc->adisc_req.adisc_cmd = ELS_ADISC;
 421         hton24(adisc->adisc_req.adisc_port_id,
 422                fc_host_port_id(adapter->scsi_host));
 423
 424         ret = zfcp_fsf_send_els(adapter, port->d_id, &adisc->els);
 425         if (ret)
 426                 kmem_cache_free(zfcp_data.adisc_cache, adisc);
 427
 428         return ret;
 429 }
 430
 431 void zfcp_fc_link_test_work(struct work_struct *work)
 432 {
 433         struct zfcp_port *port =
 434                 container_of(work, struct zfcp_port, test_link_work);
 435         int retval;
 436
 437         get_device(&port->sysfs_device);
 438         port->rport_task = RPORT_DEL;
 439         zfcp_scsi_rport_work(&port->rport_work);
 440
 441         /* only issue one test command at one time per port */
 442         if (atomic_read(&port->status) & ZFCP_STATUS_PORT_LINK_TEST)
 443                 goto out;
 444
 445         atomic_set_mask(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
 446
 447         retval = zfcp_fc_adisc(port);
 448         if (retval == 0)
 449                 return;
 450
 451         /* send of ADISC was not possible */
 452         atomic_clear_mask(ZFCP_STATUS_PORT_LINK_TEST, &port->status);
 453         zfcp_erp_port_forced_reopen(port, 0, "fcltwk1", NULL);
 454
 455 out:
 456         put_device(&port->sysfs_device);
 457 }
 458
 459 /**
 460  * zfcp_fc_test_link - lightweight link test procedure
 461  * @port: port to be tested
 462  *
 463  * Test status of a link to a remote port using the ELS command ADISC.
 464  * If there is a problem with the remote port, error recovery steps
 465  * will be triggered.
 466  */
 467 void zfcp_fc_test_link(struct zfcp_port *port)
 468 {
 469         get_device(&port->sysfs_device);
 470         if (!queue_work(port->adapter->work_queue, &port->test_link_work))
 471                 put_device(&port->sysfs_device);
 472 }
 473
 474 static void zfcp_free_sg_env(struct zfcp_fc_gpn_ft *gpn_ft, int buf_num)
 475 {
 476         struct scatterlist *sg = &gpn_ft->sg_req;
 477
 478         kmem_cache_free(zfcp_data.gpn_ft_cache, sg_virt(sg));
 479         zfcp_sg_free_table(gpn_ft->sg_resp, buf_num);
 480
 481         kfree(gpn_ft);
 482 }
 483
 484 static struct zfcp_fc_gpn_ft *zfcp_alloc_sg_env(int buf_num)
 485 {
 486         struct zfcp_fc_gpn_ft *gpn_ft;
 487         struct zfcp_fc_gpn_ft_req *req;
 488
 489         gpn_ft = kzalloc(sizeof(*gpn_ft), GFP_KERNEL);
 490         if (!gpn_ft)
 491                 return NULL;
 492
 493         req = kmem_cache_alloc(zfcp_data.gpn_ft_cache, GFP_KERNEL);
 494         if (!req) {
 495                 kfree(gpn_ft);
 496                 gpn_ft = NULL;
 497                 goto out;
 498         }
 499         sg_init_one(&gpn_ft->sg_req, req, sizeof(*req));
 500
 501         if (zfcp_sg_setup_table(gpn_ft->sg_resp, buf_num)) {
 502                 zfcp_free_sg_env(gpn_ft, buf_num);
 503                 gpn_ft = NULL;
 504         }
 505 out:
 506         return gpn_ft;
 507 }
 508
 509
 510 static int zfcp_fc_send_gpn_ft(struct zfcp_fc_gpn_ft *gpn_ft,
 511                                struct zfcp_adapter *adapter, int max_bytes)
 512 {
 513         struct zfcp_fsf_ct_els *ct = &gpn_ft->ct;
 514         struct zfcp_fc_gpn_ft_req *req = sg_virt(&gpn_ft->sg_req);
 515         DECLARE_COMPLETION_ONSTACK(completion);
 516         int ret;
 517
 518         /* prepare CT IU for GPN_FT */
 519         req->ct_hdr.ct_rev = FC_CT_REV;
 520         req->ct_hdr.ct_fs_type = FC_FST_DIR;
 521         req->ct_hdr.ct_fs_subtype = FC_NS_SUBTYPE;
 522         req->ct_hdr.ct_options = 0;
 523         req->ct_hdr.ct_cmd = FC_NS_GPN_FT;
 524         req->ct_hdr.ct_mr_size = max_bytes / 4;
 525         req->gpn_ft.fn_domain_id_scope = 0;
 526         req->gpn_ft.fn_area_id_scope = 0;
 527         req->gpn_ft.fn_fc4_type = FC_TYPE_FCP;
 528
 529         /* prepare zfcp_send_ct */
 530         ct->handler = zfcp_fc_complete;
 531         ct->handler_data = &completion;
 532         ct->req = &gpn_ft->sg_req;
 533         ct->resp = gpn_ft->sg_resp;
 534
 535         ret = zfcp_fsf_send_ct(&adapter->gs->ds, ct, NULL);
 536         if (!ret)
 537                 wait_for_completion(&completion);
 538         return ret;
 539 }
 540
 541 static void zfcp_fc_validate_port(struct zfcp_port *port, struct list_head *lh)
 542 {
 543         if (!(atomic_read(&port->status) & ZFCP_STATUS_COMMON_NOESC))
 544                 return;
 545
 546         atomic_clear_mask(ZFCP_STATUS_COMMON_NOESC, &port->status);
 547
 548         if ((port->supported_classes != 0) ||
 549             !list_empty(&port->unit_list))
 550                 return;
 551
 552         list_move_tail(&port->list, lh);
 553 }
 554
 555 static int zfcp_fc_eval_gpn_ft(struct zfcp_fc_gpn_ft *gpn_ft,
 556                                struct zfcp_adapter *adapter, int max_entries)
 557 {
 558         struct zfcp_fsf_ct_els *ct = &gpn_ft->ct;
 559         struct scatterlist *sg = gpn_ft->sg_resp;
 560         struct fc_ct_hdr *hdr = sg_virt(sg);
 561         struct fc_gpn_ft_resp *acc = sg_virt(sg);
 562         struct zfcp_port *port, *tmp;
 563         unsigned long flags;
 564         LIST_HEAD(remove_lh);
 565         u32 d_id;
 566         int ret = 0, x, last = 0;
 567
 568         if (ct->status)
 569                 return -EIO;
 570
 571         if (hdr->ct_cmd != FC_FS_ACC) {
 572                 if (hdr->ct_reason == FC_BA_RJT_UNABLE)
 573                         return -EAGAIN; /* might be a temporary condition */
 574                 return -EIO;
 575         }
 576
 577         if (hdr->ct_mr_size) {
 578                 dev_warn(&adapter->ccw_device->dev,
 579                          "The name server reported %d words residual data\n",
 580                          hdr->ct_mr_size);
 581                 return -E2BIG;
 582         }
 583
 584         /* first entry is the header */
 585         for (x = 1; x < max_entries && !last; x++) {
 586                 if (x % (ZFCP_FC_GPN_FT_ENT_PAGE + 1))
 587                         acc++;
 588                 else
 589                         acc = sg_virt(++sg);
 590
 591                 last = acc->fp_flags & FC_NS_FID_LAST;
 592                 d_id = ntoh24(acc->fp_fid);
 593
 594                 /* don't attach ports with a well known address */
 595                 if (d_id >= FC_FID_WELL_KNOWN_BASE)
 596                         continue;
 597                 /* skip the adapter's port and known remote ports */
 598                 if (acc->fp_wwpn == fc_host_port_name(adapter->scsi_host))
 599                         continue;
 600
 601                 port = zfcp_port_enqueue(adapter, acc->fp_wwpn,
 602                                          ZFCP_STATUS_COMMON_NOESC, d_id);
 603                 if (!IS_ERR(port))
 604                         zfcp_erp_port_reopen(port, 0, "fcegpf1", NULL);
 605                 else if (PTR_ERR(port) != -EEXIST)
 606                         ret = PTR_ERR(port);
 607         }
 608
 609         zfcp_erp_wait(adapter);
 610         write_lock_irqsave(&adapter->port_list_lock, flags);
 611         list_for_each_entry_safe(port, tmp, &adapter->port_list, list)
 612                 zfcp_fc_validate_port(port, &remove_lh);
 613         write_unlock_irqrestore(&adapter->port_list_lock, flags);
 614
 615         list_for_each_entry_safe(port, tmp, &remove_lh, list) {
 616                 zfcp_erp_port_shutdown(port, 0, "fcegpf2", NULL);
 617                 zfcp_device_unregister(&port->sysfs_device,
 618                                        &zfcp_sysfs_port_attrs);
 619         }
 620
 621         return ret;
 622 }
 623
 624 /**
 625  * zfcp_fc_scan_ports - scan remote ports and attach new ports
 626  * @work: reference to scheduled work
 627  */
 628 void zfcp_fc_scan_ports(struct work_struct *work)
 629 {
 630         struct zfcp_adapter *adapter = container_of(work, struct zfcp_adapter,
 631                                                     scan_work);
 632         int ret, i;
 633         struct zfcp_fc_gpn_ft *gpn_ft;
 634         int chain, max_entries, buf_num, max_bytes;
 635
 636         chain = adapter->adapter_features & FSF_FEATURE_ELS_CT_CHAINED_SBALS;
 637         buf_num = chain ? ZFCP_FC_GPN_FT_NUM_BUFS : 1;
 638         max_entries = chain ? ZFCP_FC_GPN_FT_MAX_ENT : ZFCP_FC_GPN_FT_ENT_PAGE;
 639         max_bytes = chain ? ZFCP_FC_GPN_FT_MAX_SIZE : ZFCP_FC_CT_SIZE_PAGE;
 640
 641         if (fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPORT &&
 642             fc_host_port_type(adapter->scsi_host) != FC_PORTTYPE_NPIV)
 643                 return;
 644
 645         if (zfcp_fc_wka_port_get(&adapter->gs->ds))
 646                 return;
 647
 648         gpn_ft = zfcp_alloc_sg_env(buf_num);
 649         if (!gpn_ft)
 650                 goto out;
 651
 652         for (i = 0; i < 3; i++) {
 653                 ret = zfcp_fc_send_gpn_ft(gpn_ft, adapter, max_bytes);
 654                 if (!ret) {
 655                         ret = zfcp_fc_eval_gpn_ft(gpn_ft, adapter, max_entries);
 656                         if (ret == -EAGAIN)
 657                                 ssleep(1);
 658                         else
 659                                 break;
 660                 }
 661         }
 662         zfcp_free_sg_env(gpn_ft, buf_num);
 663 out:
 664         zfcp_fc_wka_port_put(&adapter->gs->ds);
 665 }
 666
 667 static void zfcp_fc_ct_els_job_handler(void *data)
 668 {
 669         struct fc_bsg_job *job = data;
 670         struct zfcp_fsf_ct_els *zfcp_ct_els = job->dd_data;
 671         int status = zfcp_ct_els->status;
 672         int reply_status;
 673
 674         reply_status = status ? FC_CTELS_STATUS_REJECT : FC_CTELS_STATUS_OK;
 675         job->reply->reply_data.ctels_reply.status = reply_status;
 676         job->reply->reply_payload_rcv_len = job->reply_payload.payload_len;
 677         job->job_done(job);
 678 }
 679
 680 static int zfcp_fc_exec_els_job(struct fc_bsg_job *job,
 681                                 struct zfcp_adapter *adapter)
 682 {
 683         struct zfcp_fsf_ct_els *els = job->dd_data;
 684         struct fc_rport *rport = job->rport;
 685         struct zfcp_port *port;
 686         u32 d_id;
 687
 688         if (rport) {
 689                 port = zfcp_get_port_by_wwpn(adapter, rport->port_name);
 690                 if (!port)
 691                         return -EINVAL;
 692
 693                 d_id = port->d_id;
 694                 put_device(&port->sysfs_device);
 695         } else
 696                 d_id = ntoh24(job->request->rqst_data.h_els.port_id);
 697
 698         return zfcp_fsf_send_els(adapter, d_id, els);
 699 }
 700
 701 static int zfcp_fc_exec_ct_job(struct fc_bsg_job *job,
 702                                struct zfcp_adapter *adapter)
 703 {
 704         int ret;
 705         u8 gs_type;
 706         struct zfcp_fsf_ct_els *ct = job->dd_data;
 707         struct zfcp_fc_wka_port *wka_port;
 708         u32 preamble_word1;
 709
 710         preamble_word1 = job->request->rqst_data.r_ct.preamble_word1;
 711         gs_type = (preamble_word1 & 0xff000000) >> 24;
 712
 713         switch (gs_type) {
 714         case FC_FST_ALIAS:
 715                 wka_port = &adapter->gs->as;
 716                 break;
 717         case FC_FST_MGMT:
 718                 wka_port = &adapter->gs->ms;
 719                 break;
 720         case FC_FST_TIME:
 721                 wka_port = &adapter->gs->ts;
 722                 break;
 723         case FC_FST_DIR:
 724                 wka_port = &adapter->gs->ds;
 725                 break;
 726         default:
 727                 return -EINVAL; /* no such service */
 728         }
 729
 730         ret = zfcp_fc_wka_port_get(wka_port);
 731         if (ret)
 732                 return ret;
 733
 734         ret = zfcp_fsf_send_ct(wka_port, ct, NULL);
 735         if (ret)
 736                 zfcp_fc_wka_port_put(wka_port);
 737
 738         return ret;
 739 }
 740
 741 int zfcp_fc_exec_bsg_job(struct fc_bsg_job *job)
 742 {
 743         struct Scsi_Host *shost;
 744         struct zfcp_adapter *adapter;
 745         struct zfcp_fsf_ct_els *ct_els = job->dd_data;
 746
 747         shost = job->rport ? rport_to_shost(job->rport) : job->shost;
 748         adapter = (struct zfcp_adapter *)shost->hostdata[0];
 749
 750         if (!(atomic_read(&adapter->status) & ZFCP_STATUS_COMMON_OPEN))
 751                 return -EINVAL;
 752
 753         ct_els->req = job->request_payload.sg_list;
 754         ct_els->resp = job->reply_payload.sg_list;
 755         ct_els->handler = zfcp_fc_ct_els_job_handler;
 756         ct_els->handler_data = job;
 757
 758         switch (job->request->msgcode) {
 759         case FC_BSG_RPT_ELS:
 760         case FC_BSG_HST_ELS_NOLOGIN:
 761                 return zfcp_fc_exec_els_job(job, adapter);
 762         case FC_BSG_RPT_CT:
 763         case FC_BSG_HST_CT:
 764                 return zfcp_fc_exec_ct_job(job, adapter);
 765         default:
 766                 return -EINVAL;
 767         }
 768 }
 769
 770 int zfcp_fc_gs_setup(struct zfcp_adapter *adapter)
 771 {
 772         struct zfcp_fc_wka_ports *wka_ports;
 773
 774         wka_ports = kzalloc(sizeof(struct zfcp_fc_wka_ports), GFP_KERNEL);
 775         if (!wka_ports)
 776                 return -ENOMEM;
 777
 778         adapter->gs = wka_ports;
 779         zfcp_fc_wka_port_init(&wka_ports->ms, FC_FID_MGMT_SERV, adapter);
 780         zfcp_fc_wka_port_init(&wka_ports->ts, FC_FID_TIME_SERV, adapter);
 781         zfcp_fc_wka_port_init(&wka_ports->ds, FC_FID_DIR_SERV, adapter);
 782         zfcp_fc_wka_port_init(&wka_ports->as, FC_FID_ALIASES, adapter);
 783
 784         return 0;
 785 }
 786
 787 void zfcp_fc_gs_destroy(struct zfcp_adapter *adapter)
 788 {
 789         kfree(adapter->gs);
 790         adapter->gs = NULL;
 791 }
 792