drivers/s390/scsi/zfcp_fc.c

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