drivers/s390/scsi/zfcp_aux.c

   1 /*
   2  * zfcp device driver
   3  *
   4  * Module interface and handling of zfcp data structures.
   5  *
   6  * Copyright IBM Corporation 2002, 2010
   7  */
   8
   9 /*
  10  * Driver authors:
  11  *            Martin Peschke (originator of the driver)
  12  *            Raimund Schroeder
  13  *            Aron Zeh
  14  *            Wolfgang Taphorn
  15  *            Stefan Bader
  16  *            Heiko Carstens (kernel 2.6 port of the driver)
  17  *            Andreas Herrmann
  18  *            Maxim Shchetynin
  19  *            Volker Sameske
  20  *            Ralph Wuerthner
  21  *            Michael Loehr
  22  *            Swen Schillig
  23  *            Christof Schmitt
  24  *            Martin Petermann
  25  *            Sven Schuetz
  26  */
  27
  28 #define KMSG_COMPONENT "zfcp"
  29 #define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
  30
  31 #include <linux/miscdevice.h>
  32 #include <linux/seq_file.h>
  33 #include <linux/slab.h>
  34 #include "zfcp_ext.h"
  35 #include "zfcp_fc.h"
  36 #include "zfcp_reqlist.h"
  37
  38 #define ZFCP_BUS_ID_SIZE        20
  39
  40 MODULE_AUTHOR("IBM Deutschland Entwicklung GmbH - linux390@de.ibm.com");
  41 MODULE_DESCRIPTION("FCP HBA driver");
  42 MODULE_LICENSE("GPL");
  43
  44 static char *init_device;
  45 module_param_named(device, init_device, charp, 0400);
  46 MODULE_PARM_DESC(device, "specify initial device");
  47
  48 static struct kmem_cache * __init zfcp_cache_hw_align(const char *name,
  49                                                       unsigned long size)
  50 {
  51         return kmem_cache_create(name, size, roundup_pow_of_two(size), 0, NULL);
  52 }
  53
  54 static void __init zfcp_init_device_configure(char *busid, u64 wwpn, u64 lun)
  55 {
  56         struct ccw_device *cdev;
  57         struct zfcp_adapter *adapter;
  58         struct zfcp_port *port;
  59
  60         cdev = get_ccwdev_by_busid(&zfcp_ccw_driver, busid);
  61         if (!cdev)
  62                 return;
  63
  64         if (ccw_device_set_online(cdev))
  65                 goto out_ccw_device;
  66
  67         adapter = zfcp_ccw_adapter_by_cdev(cdev);
  68         if (!adapter)
  69                 goto out_ccw_device;
  70
  71         port = zfcp_get_port_by_wwpn(adapter, wwpn);
  72         if (!port)
  73                 goto out_port;
  74         flush_work(&port->rport_work);
  75
  76         zfcp_unit_add(port, lun);
  77         put_device(&port->dev);
  78
  79 out_port:
  80         zfcp_ccw_adapter_put(adapter);
  81 out_ccw_device:
  82         put_device(&cdev->dev);
  83         return;
  84 }
  85
  86 static void __init zfcp_init_device_setup(char *devstr)
  87 {
  88         char *token;
  89         char *str, *str_saved;
  90         char busid[ZFCP_BUS_ID_SIZE];
  91         u64 wwpn, lun;
  92
  93         /* duplicate devstr and keep the original for sysfs presentation*/
  94         str_saved = kstrdup(devstr, GFP_KERNEL);
  95         str = str_saved;
  96         if (!str)
  97                 return;
  98
  99         token = strsep(&str, ",");
 100         if (!token || strlen(token) >= ZFCP_BUS_ID_SIZE)
 101                 goto err_out;
 102         strncpy(busid, token, ZFCP_BUS_ID_SIZE);
 103
 104         token = strsep(&str, ",");
 105         if (!token || strict_strtoull(token, 0, (unsigned long long *) &wwpn))
 106                 goto err_out;
 107
 108         token = strsep(&str, ",");
 109         if (!token || strict_strtoull(token, 0, (unsigned long long *) &lun))
 110                 goto err_out;
 111
 112         kfree(str_saved);
 113         zfcp_init_device_configure(busid, wwpn, lun);
 114         return;
 115
 116 err_out:
 117         kfree(str_saved);
 118         pr_err("%s is not a valid SCSI device\n", devstr);
 119 }
 120
 121 static int __init zfcp_module_init(void)
 122 {
 123         int retval = -ENOMEM;
 124
 125         zfcp_data.gpn_ft_cache = zfcp_cache_hw_align("zfcp_gpn",
 126                                         sizeof(struct zfcp_fc_gpn_ft_req));
 127         if (!zfcp_data.gpn_ft_cache)
 128                 goto out;
 129
 130         zfcp_data.qtcb_cache = zfcp_cache_hw_align("zfcp_qtcb",
 131                                         sizeof(struct fsf_qtcb));
 132         if (!zfcp_data.qtcb_cache)
 133                 goto out_qtcb_cache;
 134
 135         zfcp_data.sr_buffer_cache = zfcp_cache_hw_align("zfcp_sr",
 136                                         sizeof(struct fsf_status_read_buffer));
 137         if (!zfcp_data.sr_buffer_cache)
 138                 goto out_sr_cache;
 139
 140         zfcp_data.gid_pn_cache = zfcp_cache_hw_align("zfcp_gid",
 141                                         sizeof(struct zfcp_fc_gid_pn));
 142         if (!zfcp_data.gid_pn_cache)
 143                 goto out_gid_cache;
 144
 145         zfcp_data.adisc_cache = zfcp_cache_hw_align("zfcp_adisc",
 146                                         sizeof(struct zfcp_fc_els_adisc));
 147         if (!zfcp_data.adisc_cache)
 148                 goto out_adisc_cache;
 149
 150         zfcp_data.scsi_transport_template =
 151                 fc_attach_transport(&zfcp_transport_functions);
 152         if (!zfcp_data.scsi_transport_template)
 153                 goto out_transport;
 154         scsi_transport_reserve_device(zfcp_data.scsi_transport_template,
 155                                       sizeof(struct zfcp_scsi_dev));
 156
 157
 158         retval = misc_register(&zfcp_cfdc_misc);
 159         if (retval) {
 160                 pr_err("Registering the misc device zfcp_cfdc failed\n");
 161                 goto out_misc;
 162         }
 163
 164         retval = ccw_driver_register(&zfcp_ccw_driver);
 165         if (retval) {
 166                 pr_err("The zfcp device driver could not register with "
 167                        "the common I/O layer\n");
 168                 goto out_ccw_register;
 169         }
 170
 171         if (init_device)
 172                 zfcp_init_device_setup(init_device);
 173         return 0;
 174
 175 out_ccw_register:
 176         misc_deregister(&zfcp_cfdc_misc);
 177 out_misc:
 178         fc_release_transport(zfcp_data.scsi_transport_template);
 179 out_transport:
 180         kmem_cache_destroy(zfcp_data.adisc_cache);
 181 out_adisc_cache:
 182         kmem_cache_destroy(zfcp_data.gid_pn_cache);
 183 out_gid_cache:
 184         kmem_cache_destroy(zfcp_data.sr_buffer_cache);
 185 out_sr_cache:
 186         kmem_cache_destroy(zfcp_data.qtcb_cache);
 187 out_qtcb_cache:
 188         kmem_cache_destroy(zfcp_data.gpn_ft_cache);
 189 out:
 190         return retval;
 191 }
 192
 193 module_init(zfcp_module_init);
 194
 195 static void __exit zfcp_module_exit(void)
 196 {
 197         ccw_driver_unregister(&zfcp_ccw_driver);
 198         misc_deregister(&zfcp_cfdc_misc);
 199         fc_release_transport(zfcp_data.scsi_transport_template);
 200         kmem_cache_destroy(zfcp_data.adisc_cache);
 201         kmem_cache_destroy(zfcp_data.gid_pn_cache);
 202         kmem_cache_destroy(zfcp_data.sr_buffer_cache);
 203         kmem_cache_destroy(zfcp_data.qtcb_cache);
 204         kmem_cache_destroy(zfcp_data.gpn_ft_cache);
 205 }
 206
 207 module_exit(zfcp_module_exit);
 208
 209 /**
 210  * zfcp_get_port_by_wwpn - find port in port list of adapter by wwpn
 211  * @adapter: pointer to adapter to search for port
 212  * @wwpn: wwpn to search for
 213  *
 214  * Returns: pointer to zfcp_port or NULL
 215  */
 216 struct zfcp_port *zfcp_get_port_by_wwpn(struct zfcp_adapter *adapter,
 217                                         u64 wwpn)
 218 {
 219         unsigned long flags;
 220         struct zfcp_port *port;
 221
 222         read_lock_irqsave(&adapter->port_list_lock, flags);
 223         list_for_each_entry(port, &adapter->port_list, list)
 224                 if (port->wwpn == wwpn) {
 225                         if (!get_device(&port->dev))
 226                                 port = NULL;
 227                         read_unlock_irqrestore(&adapter->port_list_lock, flags);
 228                         return port;
 229                 }
 230         read_unlock_irqrestore(&adapter->port_list_lock, flags);
 231         return NULL;
 232 }
 233
 234 static int zfcp_allocate_low_mem_buffers(struct zfcp_adapter *adapter)
 235 {
 236         adapter->pool.erp_req =
 237                 mempool_create_kmalloc_pool(1, sizeof(struct zfcp_fsf_req));
 238         if (!adapter->pool.erp_req)
 239                 return -ENOMEM;
 240
 241         adapter->pool.gid_pn_req =
 242                 mempool_create_kmalloc_pool(1, sizeof(struct zfcp_fsf_req));
 243         if (!adapter->pool.gid_pn_req)
 244                 return -ENOMEM;
 245
 246         adapter->pool.scsi_req =
 247                 mempool_create_kmalloc_pool(1, sizeof(struct zfcp_fsf_req));
 248         if (!adapter->pool.scsi_req)
 249                 return -ENOMEM;
 250
 251         adapter->pool.scsi_abort =
 252                 mempool_create_kmalloc_pool(1, sizeof(struct zfcp_fsf_req));
 253         if (!adapter->pool.scsi_abort)
 254                 return -ENOMEM;
 255
 256         adapter->pool.status_read_req =
 257                 mempool_create_kmalloc_pool(FSF_STATUS_READS_RECOM,
 258                                             sizeof(struct zfcp_fsf_req));
 259         if (!adapter->pool.status_read_req)
 260                 return -ENOMEM;
 261
 262         adapter->pool.qtcb_pool =
 263                 mempool_create_slab_pool(4, zfcp_data.qtcb_cache);
 264         if (!adapter->pool.qtcb_pool)
 265                 return -ENOMEM;
 266
 267         adapter->pool.status_read_data =
 268                 mempool_create_slab_pool(FSF_STATUS_READS_RECOM,
 269                                          zfcp_data.sr_buffer_cache);
 270         if (!adapter->pool.status_read_data)
 271                 return -ENOMEM;
 272
 273         adapter->pool.gid_pn =
 274                 mempool_create_slab_pool(1, zfcp_data.gid_pn_cache);
 275         if (!adapter->pool.gid_pn)
 276                 return -ENOMEM;
 277
 278         return 0;
 279 }
 280
 281 static void zfcp_free_low_mem_buffers(struct zfcp_adapter *adapter)
 282 {
 283         if (adapter->pool.erp_req)
 284                 mempool_destroy(adapter->pool.erp_req);
 285         if (adapter->pool.scsi_req)
 286                 mempool_destroy(adapter->pool.scsi_req);
 287         if (adapter->pool.scsi_abort)
 288                 mempool_destroy(adapter->pool.scsi_abort);
 289         if (adapter->pool.qtcb_pool)
 290                 mempool_destroy(adapter->pool.qtcb_pool);
 291         if (adapter->pool.status_read_req)
 292                 mempool_destroy(adapter->pool.status_read_req);
 293         if (adapter->pool.status_read_data)
 294                 mempool_destroy(adapter->pool.status_read_data);
 295         if (adapter->pool.gid_pn)
 296                 mempool_destroy(adapter->pool.gid_pn);
 297 }
 298
 299 /**
 300  * zfcp_status_read_refill - refill the long running status_read_requests
 301  * @adapter: ptr to struct zfcp_adapter for which the buffers should be refilled
 302  *
 303  * Returns: 0 on success, 1 otherwise
 304  *
 305  * if there are 16 or more status_read requests missing an adapter_reopen
 306  * is triggered
 307  */
 308 int zfcp_status_read_refill(struct zfcp_adapter *adapter)
 309 {
 310         while (atomic_read(&adapter->stat_miss) > 0)
 311                 if (zfcp_fsf_status_read(adapter->qdio)) {
 312                         if (atomic_read(&adapter->stat_miss) >=
 313                             adapter->stat_read_buf_num) {
 314                                 zfcp_erp_adapter_reopen(adapter, 0, "axsref1");
 315                                 return 1;
 316                         }
 317                         break;
 318                 } else
 319                         atomic_dec(&adapter->stat_miss);
 320         return 0;
 321 }
 322
 323 static void _zfcp_status_read_scheduler(struct work_struct *work)
 324 {
 325         zfcp_status_read_refill(container_of(work, struct zfcp_adapter,
 326                                              stat_work));
 327 }
 328
 329 static void zfcp_print_sl(struct seq_file *m, struct service_level *sl)
 330 {
 331         struct zfcp_adapter *adapter =
 332                 container_of(sl, struct zfcp_adapter, service_level);
 333
 334         seq_printf(m, "zfcp: %s microcode level %x\n",
 335                    dev_name(&adapter->ccw_device->dev),
 336                    adapter->fsf_lic_version);
 337 }
 338
 339 static int zfcp_setup_adapter_work_queue(struct zfcp_adapter *adapter)
 340 {
 341         char name[TASK_COMM_LEN];
 342
 343         snprintf(name, sizeof(name), "zfcp_q_%s",
 344                  dev_name(&adapter->ccw_device->dev));
 345         adapter->work_queue = create_singlethread_workqueue(name);
 346
 347         if (adapter->work_queue)
 348                 return 0;
 349         return -ENOMEM;
 350 }
 351
 352 static void zfcp_destroy_adapter_work_queue(struct zfcp_adapter *adapter)
 353 {
 354         if (adapter->work_queue)
 355                 destroy_workqueue(adapter->work_queue);
 356         adapter->work_queue = NULL;
 357
 358 }
 359
 360 /**
 361  * zfcp_adapter_enqueue - enqueue a new adapter to the list
 362  * @ccw_device: pointer to the struct cc_device
 363  *
 364  * Returns:     struct zfcp_adapter*
 365  * Enqueues an adapter at the end of the adapter list in the driver data.
 366  * All adapter internal structures are set up.
 367  * Proc-fs entries are also created.
 368  */
 369 struct zfcp_adapter *zfcp_adapter_enqueue(struct ccw_device *ccw_device)
 370 {
 371         struct zfcp_adapter *adapter;
 372
 373         if (!get_device(&ccw_device->dev))
 374                 return ERR_PTR(-ENODEV);
 375
 376         adapter = kzalloc(sizeof(struct zfcp_adapter), GFP_KERNEL);
 377         if (!adapter) {
 378                 put_device(&ccw_device->dev);
 379                 return ERR_PTR(-ENOMEM);
 380         }
 381
 382         kref_init(&adapter->ref);
 383
 384         ccw_device->handler = NULL;
 385         adapter->ccw_device = ccw_device;
 386
 387         INIT_WORK(&adapter->stat_work, _zfcp_status_read_scheduler);
 388         INIT_WORK(&adapter->scan_work, zfcp_fc_scan_ports);
 389
 390         if (zfcp_qdio_setup(adapter))
 391                 goto failed;
 392
 393         if (zfcp_allocate_low_mem_buffers(adapter))
 394                 goto failed;
 395
 396         adapter->req_list = zfcp_reqlist_alloc();
 397         if (!adapter->req_list)
 398                 goto failed;
 399
 400         if (zfcp_dbf_adapter_register(adapter))
 401                 goto failed;
 402
 403         if (zfcp_setup_adapter_work_queue(adapter))
 404                 goto failed;
 405
 406         if (zfcp_fc_gs_setup(adapter))
 407                 goto failed;
 408
 409         rwlock_init(&adapter->port_list_lock);
 410         INIT_LIST_HEAD(&adapter->port_list);
 411
 412         INIT_LIST_HEAD(&adapter->events.list);
 413         INIT_WORK(&adapter->events.work, zfcp_fc_post_event);
 414         spin_lock_init(&adapter->events.list_lock);
 415
 416         init_waitqueue_head(&adapter->erp_ready_wq);
 417         init_waitqueue_head(&adapter->erp_done_wqh);
 418
 419         INIT_LIST_HEAD(&adapter->erp_ready_head);
 420         INIT_LIST_HEAD(&adapter->erp_running_head);
 421
 422         rwlock_init(&adapter->erp_lock);
 423         rwlock_init(&adapter->abort_lock);
 424
 425         if (zfcp_erp_thread_setup(adapter))
 426                 goto failed;
 427
 428         adapter->service_level.seq_print = zfcp_print_sl;
 429
 430         dev_set_drvdata(&ccw_device->dev, adapter);
 431
 432         if (sysfs_create_group(&ccw_device->dev.kobj,
 433                                &zfcp_sysfs_adapter_attrs))
 434                 goto failed;
 435
 436         /* report size limit per scatter-gather segment */
 437         adapter->dma_parms.max_segment_size = ZFCP_QDIO_SBALE_LEN;
 438         adapter->ccw_device->dev.dma_parms = &adapter->dma_parms;
 439
 440         if (!zfcp_adapter_scsi_register(adapter))
 441                 return adapter;
 442
 443 failed:
 444         zfcp_adapter_unregister(adapter);
 445         return ERR_PTR(-ENOMEM);
 446 }
 447
 448 void zfcp_adapter_unregister(struct zfcp_adapter *adapter)
 449 {
 450         struct ccw_device *cdev = adapter->ccw_device;
 451
 452         cancel_work_sync(&adapter->scan_work);
 453         cancel_work_sync(&adapter->stat_work);
 454         zfcp_destroy_adapter_work_queue(adapter);
 455
 456         zfcp_fc_wka_ports_force_offline(adapter->gs);
 457         zfcp_adapter_scsi_unregister(adapter);
 458         sysfs_remove_group(&cdev->dev.kobj, &zfcp_sysfs_adapter_attrs);
 459
 460         zfcp_erp_thread_kill(adapter);
 461         zfcp_dbf_adapter_unregister(adapter);
 462         zfcp_qdio_destroy(adapter->qdio);
 463
 464         zfcp_ccw_adapter_put(adapter); /* final put to release */
 465 }
 466
 467 /**
 468  * zfcp_adapter_release - remove the adapter from the resource list
 469  * @ref: pointer to struct kref
 470  * locks:       adapter list write lock is assumed to be held by caller
 471  */
 472 void zfcp_adapter_release(struct kref *ref)
 473 {
 474         struct zfcp_adapter *adapter = container_of(ref, struct zfcp_adapter,
 475                                                     ref);
 476         struct ccw_device *cdev = adapter->ccw_device;
 477
 478         dev_set_drvdata(&adapter->ccw_device->dev, NULL);
 479         zfcp_fc_gs_destroy(adapter);
 480         zfcp_free_low_mem_buffers(adapter);
 481         kfree(adapter->req_list);
 482         kfree(adapter->fc_stats);
 483         kfree(adapter->stats_reset_data);
 484         kfree(adapter);
 485         put_device(&cdev->dev);
 486 }
 487
 488 /**
 489  * zfcp_device_unregister - remove port, unit from system
 490  * @dev: reference to device which is to be removed
 491  * @grp: related reference to attribute group
 492  *
 493  * Helper function to unregister port, unit from system
 494  */
 495 void zfcp_device_unregister(struct device *dev,
 496                             const struct attribute_group *grp)
 497 {
 498         sysfs_remove_group(&dev->kobj, grp);
 499         device_unregister(dev);
 500 }
 501
 502 static void zfcp_port_release(struct device *dev)
 503 {
 504         struct zfcp_port *port = container_of(dev, struct zfcp_port, dev);
 505
 506         zfcp_ccw_adapter_put(port->adapter);
 507         kfree(port);
 508 }
 509
 510 /**
 511  * zfcp_port_enqueue - enqueue port to port list of adapter
 512  * @adapter: adapter where remote port is added
 513  * @wwpn: WWPN of the remote port to be enqueued
 514  * @status: initial status for the port
 515  * @d_id: destination id of the remote port to be enqueued
 516  * Returns: pointer to enqueued port on success, ERR_PTR on error
 517  *
 518  * All port internal structures are set up and the sysfs entry is generated.
 519  * d_id is used to enqueue ports with a well known address like the Directory
 520  * Service for nameserver lookup.
 521  */
 522 struct zfcp_port *zfcp_port_enqueue(struct zfcp_adapter *adapter, u64 wwpn,
 523                                      u32 status, u32 d_id)
 524 {
 525         struct zfcp_port *port;
 526         int retval = -ENOMEM;
 527
 528         kref_get(&adapter->ref);
 529
 530         port = zfcp_get_port_by_wwpn(adapter, wwpn);
 531         if (port) {
 532                 put_device(&port->dev);
 533                 retval = -EEXIST;
 534                 goto err_out;
 535         }
 536
 537         port = kzalloc(sizeof(struct zfcp_port), GFP_KERNEL);
 538         if (!port)
 539                 goto err_out;
 540
 541         rwlock_init(&port->unit_list_lock);
 542         INIT_LIST_HEAD(&port->unit_list);
 543
 544         INIT_WORK(&port->gid_pn_work, zfcp_fc_port_did_lookup);
 545         INIT_WORK(&port->test_link_work, zfcp_fc_link_test_work);
 546         INIT_WORK(&port->rport_work, zfcp_scsi_rport_work);
 547
 548         port->adapter = adapter;
 549         port->d_id = d_id;
 550         port->wwpn = wwpn;
 551         port->rport_task = RPORT_NONE;
 552         port->dev.parent = &adapter->ccw_device->dev;
 553         port->dev.release = zfcp_port_release;
 554
 555         if (dev_set_name(&port->dev, "0x%016llx", (unsigned long long)wwpn)) {
 556                 kfree(port);
 557                 goto err_out;
 558         }
 559         retval = -EINVAL;
 560
 561         if (device_register(&port->dev)) {
 562                 put_device(&port->dev);
 563                 goto err_out;
 564         }
 565
 566         if (sysfs_create_group(&port->dev.kobj,
 567                                &zfcp_sysfs_port_attrs))
 568                 goto err_out_put;
 569
 570         write_lock_irq(&adapter->port_list_lock);
 571         list_add_tail(&port->list, &adapter->port_list);
 572         write_unlock_irq(&adapter->port_list_lock);
 573
 574         atomic_set_mask(status | ZFCP_STATUS_COMMON_RUNNING, &port->status);
 575
 576         return port;
 577
 578 err_out_put:
 579         device_unregister(&port->dev);
 580 err_out:
 581         zfcp_ccw_adapter_put(adapter);
 582         return ERR_PTR(retval);
 583 }
 584
 585 /**
 586  * zfcp_sg_free_table - free memory used by scatterlists
 587  * @sg: pointer to scatterlist
 588  * @count: number of scatterlist which are to be free'ed
 589  * the scatterlist are expected to reference pages always
 590  */
 591 void zfcp_sg_free_table(struct scatterlist *sg, int count)
 592 {
 593         int i;
 594
 595         for (i = 0; i < count; i++, sg++)
 596                 if (sg)
 597                         free_page((unsigned long) sg_virt(sg));
 598                 else
 599                         break;
 600 }
 601
 602 /**
 603  * zfcp_sg_setup_table - init scatterlist and allocate, assign buffers
 604  * @sg: pointer to struct scatterlist
 605  * @count: number of scatterlists which should be assigned with buffers
 606  * of size page
 607  *
 608  * Returns: 0 on success, -ENOMEM otherwise
 609  */
 610 int zfcp_sg_setup_table(struct scatterlist *sg, int count)
 611 {
 612         void *addr;
 613         int i;
 614
 615         sg_init_table(sg, count);
 616         for (i = 0; i < count; i++, sg++) {
 617                 addr = (void *) get_zeroed_page(GFP_KERNEL);
 618                 if (!addr) {
 619                         zfcp_sg_free_table(sg, i);
 620                         return -ENOMEM;
 621                 }
 622                 sg_set_buf(sg, addr, PAGE_SIZE);
 623         }
 624         return 0;
 625 }