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