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