drivers/infiniband/core/device.c

   1 /*
   2  * Copyright (c) 2004 Topspin Communications.  All rights reserved.
   3  * Copyright (c) 2005 Sun Microsystems, Inc. All rights reserved.
   4  *
   5  * This software is available to you under a choice of one of two
   6  * licenses.  You may choose to be licensed under the terms of the GNU
   7  * General Public License (GPL) Version 2, available from the file
   8  * COPYING in the main directory of this source tree, or the
   9  * OpenIB.org BSD license below:
  10  *
  11  *     Redistribution and use in source and binary forms, with or
  12  *     without modification, are permitted provided that the following
  13  *     conditions are met:
  14  *
  15  *      - Redistributions of source code must retain the above
  16  *        copyright notice, this list of conditions and the following
  17  *        disclaimer.
  18  *
  19  *      - Redistributions in binary form must reproduce the above
  20  *        copyright notice, this list of conditions and the following
  21  *        disclaimer in the documentation and/or other materials
  22  *        provided with the distribution.
  23  *
  24  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  25  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  26  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  27  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
  28  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
  29  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  30  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  31  * SOFTWARE.
  32  */
  33
  34 #include <linux/module.h>
  35 #include <linux/string.h>
  36 #include <linux/errno.h>
  37 #include <linux/kernel.h>
  38 #include <linux/slab.h>
  39 #include <linux/init.h>
  40 #include <linux/mutex.h>
  41 #include <linux/netdevice.h>
  42 #include <linux/security.h>
  43 #include <linux/notifier.h>
  44 #include <rdma/rdma_netlink.h>
  45 #include <rdma/ib_addr.h>
  46 #include <rdma/ib_cache.h>
  47
  48 #include "core_priv.h"
  49
  50 MODULE_AUTHOR("Roland Dreier");
  51 MODULE_DESCRIPTION("core kernel InfiniBand API");
  52 MODULE_LICENSE("Dual BSD/GPL");
  53
  54 struct ib_client_data {
  55         struct list_head  list;
  56         struct ib_client *client;
  57         void *            data;
  58         /* The device or client is going down. Do not call client or device
  59          * callbacks other than remove(). */
  60         bool              going_down;
  61 };
  62
  63 struct workqueue_struct *ib_comp_wq;
  64 struct workqueue_struct *ib_comp_unbound_wq;
  65 struct workqueue_struct *ib_wq;
  66 EXPORT_SYMBOL_GPL(ib_wq);
  67
  68 /* The device_list and client_list contain devices and clients after their
  69  * registration has completed, and the devices and clients are removed
  70  * during unregistration. */
  71 static LIST_HEAD(device_list);
  72 static LIST_HEAD(client_list);
  73
  74 /*
  75  * device_mutex and lists_rwsem protect access to both device_list and
  76  * client_list.  device_mutex protects writer access by device and client
  77  * registration / de-registration.  lists_rwsem protects reader access to
  78  * these lists.  Iterators of these lists must lock it for read, while updates
  79  * to the lists must be done with a write lock. A special case is when the
  80  * device_mutex is locked. In this case locking the lists for read access is
  81  * not necessary as the device_mutex implies it.
  82  *
  83  * lists_rwsem also protects access to the client data list.
  84  */
  85 static DEFINE_MUTEX(device_mutex);
  86 static DECLARE_RWSEM(lists_rwsem);
  87
  88 static int ib_security_change(struct notifier_block *nb, unsigned long event,
  89                               void *lsm_data);
  90 static void ib_policy_change_task(struct work_struct *work);
  91 static DECLARE_WORK(ib_policy_change_work, ib_policy_change_task);
  92
  93 static struct notifier_block ibdev_lsm_nb = {
  94         .notifier_call = ib_security_change,
  95 };
  96
  97 static int ib_device_check_mandatory(struct ib_device *device)
  98 {
  99 #define IB_MANDATORY_FUNC(x) { offsetof(struct ib_device, x), #x }
 100         static const struct {
 101                 size_t offset;
 102                 char  *name;
 103         } mandatory_table[] = {
 104                 IB_MANDATORY_FUNC(query_device),
 105                 IB_MANDATORY_FUNC(query_port),
 106                 IB_MANDATORY_FUNC(query_pkey),
 107                 IB_MANDATORY_FUNC(alloc_pd),
 108                 IB_MANDATORY_FUNC(dealloc_pd),
 109                 IB_MANDATORY_FUNC(create_qp),
 110                 IB_MANDATORY_FUNC(modify_qp),
 111                 IB_MANDATORY_FUNC(destroy_qp),
 112                 IB_MANDATORY_FUNC(post_send),
 113                 IB_MANDATORY_FUNC(post_recv),
 114                 IB_MANDATORY_FUNC(create_cq),
 115                 IB_MANDATORY_FUNC(destroy_cq),
 116                 IB_MANDATORY_FUNC(poll_cq),
 117                 IB_MANDATORY_FUNC(req_notify_cq),
 118                 IB_MANDATORY_FUNC(get_dma_mr),
 119                 IB_MANDATORY_FUNC(dereg_mr),
 120                 IB_MANDATORY_FUNC(get_port_immutable)
 121         };
 122         int i;
 123
 124         for (i = 0; i < ARRAY_SIZE(mandatory_table); ++i) {
 125                 if (!*(void **) ((void *) device + mandatory_table[i].offset)) {
 126                         pr_warn("Device %s is missing mandatory function %s\n",
 127                                 device->name, mandatory_table[i].name);
 128                         return -EINVAL;
 129                 }
 130         }
 131
 132         return 0;
 133 }
 134
 135 static struct ib_device *__ib_device_get_by_index(u32 index)
 136 {
 137         struct ib_device *device;
 138
 139         list_for_each_entry(device, &device_list, core_list)
 140                 if (device->index == index)
 141                         return device;
 142
 143         return NULL;
 144 }
 145
 146 /*
 147  * Caller is responsible to return refrerence count by calling put_device()
 148  */
 149 struct ib_device *ib_device_get_by_index(u32 index)
 150 {
 151         struct ib_device *device;
 152
 153         down_read(&lists_rwsem);
 154         device = __ib_device_get_by_index(index);
 155         if (device)
 156                 get_device(&device->dev);
 157
 158         up_read(&lists_rwsem);
 159         return device;
 160 }
 161
 162 static struct ib_device *__ib_device_get_by_name(const char *name)
 163 {
 164         struct ib_device *device;
 165
 166         list_for_each_entry(device, &device_list, core_list)
 167                 if (!strncmp(name, device->name, IB_DEVICE_NAME_MAX))
 168                         return device;
 169
 170         return NULL;
 171 }
 172
 173 static int alloc_name(char *name)
 174 {
 175         unsigned long *inuse;
 176         char buf[IB_DEVICE_NAME_MAX];
 177         struct ib_device *device;
 178         int i;
 179
 180         inuse = (unsigned long *) get_zeroed_page(GFP_KERNEL);
 181         if (!inuse)
 182                 return -ENOMEM;
 183
 184         list_for_each_entry(device, &device_list, core_list) {
 185                 if (!sscanf(device->name, name, &i))
 186                         continue;
 187                 if (i < 0 || i >= PAGE_SIZE * 8)
 188                         continue;
 189                 snprintf(buf, sizeof buf, name, i);
 190                 if (!strncmp(buf, device->name, IB_DEVICE_NAME_MAX))
 191                         set_bit(i, inuse);
 192         }
 193
 194         i = find_first_zero_bit(inuse, PAGE_SIZE * 8);
 195         free_page((unsigned long) inuse);
 196         snprintf(buf, sizeof buf, name, i);
 197
 198         if (__ib_device_get_by_name(buf))
 199                 return -ENFILE;
 200
 201         strlcpy(name, buf, IB_DEVICE_NAME_MAX);
 202         return 0;
 203 }
 204
 205 static void ib_device_release(struct device *device)
 206 {
 207         struct ib_device *dev = container_of(device, struct ib_device, dev);
 208
 209         WARN_ON(dev->reg_state == IB_DEV_REGISTERED);
 210         if (dev->reg_state == IB_DEV_UNREGISTERED) {
 211                 /*
 212                  * In IB_DEV_UNINITIALIZED state, cache or port table
 213                  * is not even created. Free cache and port table only when
 214                  * device reaches UNREGISTERED state.
 215                  */
 216                 ib_cache_release_one(dev);
 217                 kfree(dev->port_immutable);
 218         }
 219         kfree(dev);
 220 }
 221
 222 static int ib_device_uevent(struct device *device,
 223                             struct kobj_uevent_env *env)
 224 {
 225         struct ib_device *dev = container_of(device, struct ib_device, dev);
 226
 227         if (add_uevent_var(env, "NAME=%s", dev->name))
 228                 return -ENOMEM;
 229
 230         /*
 231          * It would be nice to pass the node GUID with the event...
 232          */
 233
 234         return 0;
 235 }
 236
 237 static struct class ib_class = {
 238         .name    = "infiniband",
 239         .dev_release = ib_device_release,
 240         .dev_uevent = ib_device_uevent,
 241 };
 242
 243 /**
 244  * ib_alloc_device - allocate an IB device struct
 245  * @size:size of structure to allocate
 246  *
 247  * Low-level drivers should use ib_alloc_device() to allocate &struct
 248  * ib_device.  @size is the size of the structure to be allocated,
 249  * including any private data used by the low-level driver.
 250  * ib_dealloc_device() must be used to free structures allocated with
 251  * ib_alloc_device().
 252  */
 253 struct ib_device *ib_alloc_device(size_t size)
 254 {
 255         struct ib_device *device;
 256
 257         if (WARN_ON(size < sizeof(struct ib_device)))
 258                 return NULL;
 259
 260         device = kzalloc(size, GFP_KERNEL);
 261         if (!device)
 262                 return NULL;
 263
 264         rdma_restrack_init(&device->res);
 265
 266         device->dev.class = &ib_class;
 267         device_initialize(&device->dev);
 268
 269         dev_set_drvdata(&device->dev, device);
 270
 271         INIT_LIST_HEAD(&device->event_handler_list);
 272         spin_lock_init(&device->event_handler_lock);
 273         spin_lock_init(&device->client_data_lock);
 274         INIT_LIST_HEAD(&device->client_data_list);
 275         INIT_LIST_HEAD(&device->port_list);
 276
 277         return device;
 278 }
 279 EXPORT_SYMBOL(ib_alloc_device);
 280
 281 /**
 282  * ib_dealloc_device - free an IB device struct
 283  * @device:structure to free
 284  *
 285  * Free a structure allocated with ib_alloc_device().
 286  */
 287 void ib_dealloc_device(struct ib_device *device)
 288 {
 289         WARN_ON(device->reg_state != IB_DEV_UNREGISTERED &&
 290                 device->reg_state != IB_DEV_UNINITIALIZED);
 291         rdma_restrack_clean(&device->res);
 292         put_device(&device->dev);
 293 }
 294 EXPORT_SYMBOL(ib_dealloc_device);
 295
 296 static int add_client_context(struct ib_device *device, struct ib_client *client)
 297 {
 298         struct ib_client_data *context;
 299         unsigned long flags;
 300
 301         context = kmalloc(sizeof *context, GFP_KERNEL);
 302         if (!context)
 303                 return -ENOMEM;
 304
 305         context->client = client;
 306         context->data   = NULL;
 307         context->going_down = false;
 308
 309         down_write(&lists_rwsem);
 310         spin_lock_irqsave(&device->client_data_lock, flags);
 311         list_add(&context->list, &device->client_data_list);
 312         spin_unlock_irqrestore(&device->client_data_lock, flags);
 313         up_write(&lists_rwsem);
 314
 315         return 0;
 316 }
 317
 318 static int verify_immutable(const struct ib_device *dev, u8 port)
 319 {
 320         return WARN_ON(!rdma_cap_ib_mad(dev, port) &&
 321                             rdma_max_mad_size(dev, port) != 0);
 322 }
 323
 324 static int read_port_immutable(struct ib_device *device)
 325 {
 326         int ret;
 327         u8 start_port = rdma_start_port(device);
 328         u8 end_port = rdma_end_port(device);
 329         u8 port;
 330
 331         /**
 332          * device->port_immutable is indexed directly by the port number to make
 333          * access to this data as efficient as possible.
 334          *
 335          * Therefore port_immutable is declared as a 1 based array with
 336          * potential empty slots at the beginning.
 337          */
 338         device->port_immutable = kcalloc(end_port + 1,
 339                                          sizeof(*device->port_immutable),
 340                                          GFP_KERNEL);
 341         if (!device->port_immutable)
 342                 return -ENOMEM;
 343
 344         for (port = start_port; port <= end_port; ++port) {
 345                 ret = device->get_port_immutable(device, port,
 346                                                  &device->port_immutable[port]);
 347                 if (ret)
 348                         return ret;
 349
 350                 if (verify_immutable(device, port))
 351                         return -EINVAL;
 352         }
 353         return 0;
 354 }
 355
 356 void ib_get_device_fw_str(struct ib_device *dev, char *str)
 357 {
 358         if (dev->get_dev_fw_str)
 359                 dev->get_dev_fw_str(dev, str);
 360         else
 361                 str[0] = '\0';
 362 }
 363 EXPORT_SYMBOL(ib_get_device_fw_str);
 364
 365 static int setup_port_pkey_list(struct ib_device *device)
 366 {
 367         int i;
 368
 369         /**
 370          * device->port_pkey_list is indexed directly by the port number,
 371          * Therefore it is declared as a 1 based array with potential empty
 372          * slots at the beginning.
 373          */
 374         device->port_pkey_list = kcalloc(rdma_end_port(device) + 1,
 375                                          sizeof(*device->port_pkey_list),
 376                                          GFP_KERNEL);
 377
 378         if (!device->port_pkey_list)
 379                 return -ENOMEM;
 380
 381         for (i = 0; i < (rdma_end_port(device) + 1); i++) {
 382                 spin_lock_init(&device->port_pkey_list[i].list_lock);
 383                 INIT_LIST_HEAD(&device->port_pkey_list[i].pkey_list);
 384         }
 385
 386         return 0;
 387 }
 388
 389 static void ib_policy_change_task(struct work_struct *work)
 390 {
 391         struct ib_device *dev;
 392
 393         down_read(&lists_rwsem);
 394         list_for_each_entry(dev, &device_list, core_list) {
 395                 int i;
 396
 397                 for (i = rdma_start_port(dev); i <= rdma_end_port(dev); i++) {
 398                         u64 sp;
 399                         int ret = ib_get_cached_subnet_prefix(dev,
 400                                                               i,
 401                                                               &sp);
 402
 403                         WARN_ONCE(ret,
 404                                   "ib_get_cached_subnet_prefix err: %d, this should never happen here\n",
 405                                   ret);
 406                         if (!ret)
 407                                 ib_security_cache_change(dev, i, sp);
 408                 }
 409         }
 410         up_read(&lists_rwsem);
 411 }
 412
 413 static int ib_security_change(struct notifier_block *nb, unsigned long event,
 414                               void *lsm_data)
 415 {
 416         if (event != LSM_POLICY_CHANGE)
 417                 return NOTIFY_DONE;
 418
 419         schedule_work(&ib_policy_change_work);
 420
 421         return NOTIFY_OK;
 422 }
 423
 424 /**
 425  *      __dev_new_index -       allocate an device index
 426  *
 427  *      Returns a suitable unique value for a new device interface
 428  *      number.  It assumes that there are less than 2^32-1 ib devices
 429  *      will be present in the system.
 430  */
 431 static u32 __dev_new_index(void)
 432 {
 433         /*
 434          * The device index to allow stable naming.
 435          * Similar to struct net -> ifindex.
 436          */
 437         static u32 index;
 438
 439         for (;;) {
 440                 if (!(++index))
 441                         index = 1;
 442
 443                 if (!__ib_device_get_by_index(index))
 444                         return index;
 445         }
 446 }
 447
 448 /**
 449  * ib_register_device - Register an IB device with IB core
 450  * @device:Device to register
 451  *
 452  * Low-level drivers use ib_register_device() to register their
 453  * devices with the IB core.  All registered clients will receive a
 454  * callback for each device that is added. @device must be allocated
 455  * with ib_alloc_device().
 456  */
 457 int ib_register_device(struct ib_device *device,
 458                        int (*port_callback)(struct ib_device *,
 459                                             u8, struct kobject *))
 460 {
 461         int ret;
 462         struct ib_client *client;
 463         struct ib_udata uhw = {.outlen = 0, .inlen = 0};
 464         struct device *parent = device->dev.parent;
 465
 466         WARN_ON_ONCE(device->dma_device);
 467         if (device->dev.dma_ops) {
 468                 /*
 469                  * The caller provided custom DMA operations. Copy the
 470                  * DMA-related fields that are used by e.g. dma_alloc_coherent()
 471                  * into device->dev.
 472                  */
 473                 device->dma_device = &device->dev;
 474                 if (!device->dev.dma_mask) {
 475                         if (parent)
 476                                 device->dev.dma_mask = parent->dma_mask;
 477                         else
 478                                 WARN_ON_ONCE(true);
 479                 }
 480                 if (!device->dev.coherent_dma_mask) {
 481                         if (parent)
 482                                 device->dev.coherent_dma_mask =
 483                                         parent->coherent_dma_mask;
 484                         else
 485                                 WARN_ON_ONCE(true);
 486                 }
 487         } else {
 488                 /*
 489                  * The caller did not provide custom DMA operations. Use the
 490                  * DMA mapping operations of the parent device.
 491                  */
 492                 WARN_ON_ONCE(!parent);
 493                 device->dma_device = parent;
 494         }
 495
 496         mutex_lock(&device_mutex);
 497
 498         if (strchr(device->name, '%')) {
 499                 ret = alloc_name(device->name);
 500                 if (ret)
 501                         goto out;
 502         }
 503
 504         if (ib_device_check_mandatory(device)) {
 505                 ret = -EINVAL;
 506                 goto out;
 507         }
 508
 509         ret = read_port_immutable(device);
 510         if (ret) {
 511                 pr_warn("Couldn't create per port immutable data %s\n",
 512                         device->name);
 513                 goto out;
 514         }
 515
 516         ret = setup_port_pkey_list(device);
 517         if (ret) {
 518                 pr_warn("Couldn't create per port_pkey_list\n");
 519                 goto out;
 520         }
 521
 522         ret = ib_cache_setup_one(device);
 523         if (ret) {
 524                 pr_warn("Couldn't set up InfiniBand P_Key/GID cache\n");
 525                 goto port_cleanup;
 526         }
 527
 528         ret = ib_device_register_rdmacg(device);
 529         if (ret) {
 530                 pr_warn("Couldn't register device with rdma cgroup\n");
 531                 goto cache_cleanup;
 532         }
 533
 534         memset(&device->attrs, 0, sizeof(device->attrs));
 535         ret = device->query_device(device, &device->attrs, &uhw);
 536         if (ret) {
 537                 pr_warn("Couldn't query the device attributes\n");
 538                 goto cg_cleanup;
 539         }
 540
 541         ret = ib_device_register_sysfs(device, port_callback);
 542         if (ret) {
 543                 pr_warn("Couldn't register device %s with driver model\n",
 544                         device->name);
 545                 goto cg_cleanup;
 546         }
 547
 548         device->reg_state = IB_DEV_REGISTERED;
 549
 550         list_for_each_entry(client, &client_list, list)
 551                 if (!add_client_context(device, client) && client->add)
 552                         client->add(device);
 553
 554         device->index = __dev_new_index();
 555         down_write(&lists_rwsem);
 556         list_add_tail(&device->core_list, &device_list);
 557         up_write(&lists_rwsem);
 558         mutex_unlock(&device_mutex);
 559         return 0;
 560
 561 cg_cleanup:
 562         ib_device_unregister_rdmacg(device);
 563 cache_cleanup:
 564         ib_cache_cleanup_one(device);
 565         ib_cache_release_one(device);
 566 port_cleanup:
 567         kfree(device->port_immutable);
 568 out:
 569         mutex_unlock(&device_mutex);
 570         return ret;
 571 }
 572 EXPORT_SYMBOL(ib_register_device);
 573
 574 /**
 575  * ib_unregister_device - Unregister an IB device
 576  * @device:Device to unregister
 577  *
 578  * Unregister an IB device.  All clients will receive a remove callback.
 579  */
 580 void ib_unregister_device(struct ib_device *device)
 581 {
 582         struct ib_client_data *context, *tmp;
 583         unsigned long flags;
 584
 585         mutex_lock(&device_mutex);
 586
 587         down_write(&lists_rwsem);
 588         list_del(&device->core_list);
 589         spin_lock_irqsave(&device->client_data_lock, flags);
 590         list_for_each_entry_safe(context, tmp, &device->client_data_list, list)
 591                 context->going_down = true;
 592         spin_unlock_irqrestore(&device->client_data_lock, flags);
 593         downgrade_write(&lists_rwsem);
 594
 595         list_for_each_entry_safe(context, tmp, &device->client_data_list,
 596                                  list) {
 597                 if (context->client->remove)
 598                         context->client->remove(device, context->data);
 599         }
 600         up_read(&lists_rwsem);
 601
 602         ib_device_unregister_sysfs(device);
 603         ib_device_unregister_rdmacg(device);
 604
 605         mutex_unlock(&device_mutex);
 606
 607         ib_cache_cleanup_one(device);
 608
 609         ib_security_destroy_port_pkey_list(device);
 610         kfree(device->port_pkey_list);
 611
 612         down_write(&lists_rwsem);
 613         spin_lock_irqsave(&device->client_data_lock, flags);
 614         list_for_each_entry_safe(context, tmp, &device->client_data_list, list)
 615                 kfree(context);
 616         spin_unlock_irqrestore(&device->client_data_lock, flags);
 617         up_write(&lists_rwsem);
 618
 619         device->reg_state = IB_DEV_UNREGISTERED;
 620 }
 621 EXPORT_SYMBOL(ib_unregister_device);
 622
 623 /**
 624  * ib_register_client - Register an IB client
 625  * @client:Client to register
 626  *
 627  * Upper level users of the IB drivers can use ib_register_client() to
 628  * register callbacks for IB device addition and removal.  When an IB
 629  * device is added, each registered client's add method will be called
 630  * (in the order the clients were registered), and when a device is
 631  * removed, each client's remove method will be called (in the reverse
 632  * order that clients were registered).  In addition, when
 633  * ib_register_client() is called, the client will receive an add
 634  * callback for all devices already registered.
 635  */
 636 int ib_register_client(struct ib_client *client)
 637 {
 638         struct ib_device *device;
 639
 640         mutex_lock(&device_mutex);
 641
 642         list_for_each_entry(device, &device_list, core_list)
 643                 if (!add_client_context(device, client) && client->add)
 644                         client->add(device);
 645
 646         down_write(&lists_rwsem);
 647         list_add_tail(&client->list, &client_list);
 648         up_write(&lists_rwsem);
 649
 650         mutex_unlock(&device_mutex);
 651
 652         return 0;
 653 }
 654 EXPORT_SYMBOL(ib_register_client);
 655
 656 /**
 657  * ib_unregister_client - Unregister an IB client
 658  * @client:Client to unregister
 659  *
 660  * Upper level users use ib_unregister_client() to remove their client
 661  * registration.  When ib_unregister_client() is called, the client
 662  * will receive a remove callback for each IB device still registered.
 663  */
 664 void ib_unregister_client(struct ib_client *client)
 665 {
 666         struct ib_client_data *context, *tmp;
 667         struct ib_device *device;
 668         unsigned long flags;
 669
 670         mutex_lock(&device_mutex);
 671
 672         down_write(&lists_rwsem);
 673         list_del(&client->list);
 674         up_write(&lists_rwsem);
 675
 676         list_for_each_entry(device, &device_list, core_list) {
 677                 struct ib_client_data *found_context = NULL;
 678
 679                 down_write(&lists_rwsem);
 680                 spin_lock_irqsave(&device->client_data_lock, flags);
 681                 list_for_each_entry_safe(context, tmp, &device->client_data_list, list)
 682                         if (context->client == client) {
 683                                 context->going_down = true;
 684                                 found_context = context;
 685                                 break;
 686                         }
 687                 spin_unlock_irqrestore(&device->client_data_lock, flags);
 688                 up_write(&lists_rwsem);
 689
 690                 if (client->remove)
 691                         client->remove(device, found_context ?
 692                                                found_context->data : NULL);
 693
 694                 if (!found_context) {
 695                         pr_warn("No client context found for %s/%s\n",
 696                                 device->name, client->name);
 697                         continue;
 698                 }
 699
 700                 down_write(&lists_rwsem);
 701                 spin_lock_irqsave(&device->client_data_lock, flags);
 702                 list_del(&found_context->list);
 703                 kfree(found_context);
 704                 spin_unlock_irqrestore(&device->client_data_lock, flags);
 705                 up_write(&lists_rwsem);
 706         }
 707
 708         mutex_unlock(&device_mutex);
 709 }
 710 EXPORT_SYMBOL(ib_unregister_client);
 711
 712 /**
 713  * ib_get_client_data - Get IB client context
 714  * @device:Device to get context for
 715  * @client:Client to get context for
 716  *
 717  * ib_get_client_data() returns client context set with
 718  * ib_set_client_data().
 719  */
 720 void *ib_get_client_data(struct ib_device *device, struct ib_client *client)
 721 {
 722         struct ib_client_data *context;
 723         void *ret = NULL;
 724         unsigned long flags;
 725
 726         spin_lock_irqsave(&device->client_data_lock, flags);
 727         list_for_each_entry(context, &device->client_data_list, list)
 728                 if (context->client == client) {
 729                         ret = context->data;
 730                         break;
 731                 }
 732         spin_unlock_irqrestore(&device->client_data_lock, flags);
 733
 734         return ret;
 735 }
 736 EXPORT_SYMBOL(ib_get_client_data);
 737
 738 /**
 739  * ib_set_client_data - Set IB client context
 740  * @device:Device to set context for
 741  * @client:Client to set context for
 742  * @data:Context to set
 743  *
 744  * ib_set_client_data() sets client context that can be retrieved with
 745  * ib_get_client_data().
 746  */
 747 void ib_set_client_data(struct ib_device *device, struct ib_client *client,
 748                         void *data)
 749 {
 750         struct ib_client_data *context;
 751         unsigned long flags;
 752
 753         spin_lock_irqsave(&device->client_data_lock, flags);
 754         list_for_each_entry(context, &device->client_data_list, list)
 755                 if (context->client == client) {
 756                         context->data = data;
 757                         goto out;
 758                 }
 759
 760         pr_warn("No client context found for %s/%s\n",
 761                 device->name, client->name);
 762
 763 out:
 764         spin_unlock_irqrestore(&device->client_data_lock, flags);
 765 }
 766 EXPORT_SYMBOL(ib_set_client_data);
 767
 768 /**
 769  * ib_register_event_handler - Register an IB event handler
 770  * @event_handler:Handler to register
 771  *
 772  * ib_register_event_handler() registers an event handler that will be
 773  * called back when asynchronous IB events occur (as defined in
 774  * chapter 11 of the InfiniBand Architecture Specification).  This
 775  * callback may occur in interrupt context.
 776  */
 777 void ib_register_event_handler(struct ib_event_handler *event_handler)
 778 {
 779         unsigned long flags;
 780
 781         spin_lock_irqsave(&event_handler->device->event_handler_lock, flags);
 782         list_add_tail(&event_handler->list,
 783                       &event_handler->device->event_handler_list);
 784         spin_unlock_irqrestore(&event_handler->device->event_handler_lock, flags);
 785 }
 786 EXPORT_SYMBOL(ib_register_event_handler);
 787
 788 /**
 789  * ib_unregister_event_handler - Unregister an event handler
 790  * @event_handler:Handler to unregister
 791  *
 792  * Unregister an event handler registered with
 793  * ib_register_event_handler().
 794  */
 795 void ib_unregister_event_handler(struct ib_event_handler *event_handler)
 796 {
 797         unsigned long flags;
 798
 799         spin_lock_irqsave(&event_handler->device->event_handler_lock, flags);
 800         list_del(&event_handler->list);
 801         spin_unlock_irqrestore(&event_handler->device->event_handler_lock, flags);
 802 }
 803 EXPORT_SYMBOL(ib_unregister_event_handler);
 804
 805 /**
 806  * ib_dispatch_event - Dispatch an asynchronous event
 807  * @event:Event to dispatch
 808  *
 809  * Low-level drivers must call ib_dispatch_event() to dispatch the
 810  * event to all registered event handlers when an asynchronous event
 811  * occurs.
 812  */
 813 void ib_dispatch_event(struct ib_event *event)
 814 {
 815         unsigned long flags;
 816         struct ib_event_handler *handler;
 817
 818         spin_lock_irqsave(&event->device->event_handler_lock, flags);
 819
 820         list_for_each_entry(handler, &event->device->event_handler_list, list)
 821                 handler->handler(handler, event);
 822
 823         spin_unlock_irqrestore(&event->device->event_handler_lock, flags);
 824 }
 825 EXPORT_SYMBOL(ib_dispatch_event);
 826
 827 /**
 828  * ib_query_port - Query IB port attributes
 829  * @device:Device to query
 830  * @port_num:Port number to query
 831  * @port_attr:Port attributes
 832  *
 833  * ib_query_port() returns the attributes of a port through the
 834  * @port_attr pointer.
 835  */
 836 int ib_query_port(struct ib_device *device,
 837                   u8 port_num,
 838                   struct ib_port_attr *port_attr)
 839 {
 840         union ib_gid gid;
 841         int err;
 842
 843         if (!rdma_is_port_valid(device, port_num))
 844                 return -EINVAL;
 845
 846         memset(port_attr, 0, sizeof(*port_attr));
 847         err = device->query_port(device, port_num, port_attr);
 848         if (err || port_attr->subnet_prefix)
 849                 return err;
 850
 851         if (rdma_port_get_link_layer(device, port_num) != IB_LINK_LAYER_INFINIBAND)
 852                 return 0;
 853
 854         err = device->query_gid(device, port_num, 0, &gid);
 855         if (err)
 856                 return err;
 857
 858         port_attr->subnet_prefix = be64_to_cpu(gid.global.subnet_prefix);
 859         return 0;
 860 }
 861 EXPORT_SYMBOL(ib_query_port);
 862
 863 /**
 864  * ib_enum_roce_netdev - enumerate all RoCE ports
 865  * @ib_dev : IB device we want to query
 866  * @filter: Should we call the callback?
 867  * @filter_cookie: Cookie passed to filter
 868  * @cb: Callback to call for each found RoCE ports
 869  * @cookie: Cookie passed back to the callback
 870  *
 871  * Enumerates all of the physical RoCE ports of ib_dev
 872  * which are related to netdevice and calls callback() on each
 873  * device for which filter() function returns non zero.
 874  */
 875 void ib_enum_roce_netdev(struct ib_device *ib_dev,
 876                          roce_netdev_filter filter,
 877                          void *filter_cookie,
 878                          roce_netdev_callback cb,
 879                          void *cookie)
 880 {
 881         u8 port;
 882
 883         for (port = rdma_start_port(ib_dev); port <= rdma_end_port(ib_dev);
 884              port++)
 885                 if (rdma_protocol_roce(ib_dev, port)) {
 886                         struct net_device *idev = NULL;
 887
 888                         if (ib_dev->get_netdev)
 889                                 idev = ib_dev->get_netdev(ib_dev, port);
 890
 891                         if (idev &&
 892                             idev->reg_state >= NETREG_UNREGISTERED) {
 893                                 dev_put(idev);
 894                                 idev = NULL;
 895                         }
 896
 897                         if (filter(ib_dev, port, idev, filter_cookie))
 898                                 cb(ib_dev, port, idev, cookie);
 899
 900                         if (idev)
 901                                 dev_put(idev);
 902                 }
 903 }
 904
 905 /**
 906  * ib_enum_all_roce_netdevs - enumerate all RoCE devices
 907  * @filter: Should we call the callback?
 908  * @filter_cookie: Cookie passed to filter
 909  * @cb: Callback to call for each found RoCE ports
 910  * @cookie: Cookie passed back to the callback
 911  *
 912  * Enumerates all RoCE devices' physical ports which are related
 913  * to netdevices and calls callback() on each device for which
 914  * filter() function returns non zero.
 915  */
 916 void ib_enum_all_roce_netdevs(roce_netdev_filter filter,
 917                               void *filter_cookie,
 918                               roce_netdev_callback cb,
 919                               void *cookie)
 920 {
 921         struct ib_device *dev;
 922
 923         down_read(&lists_rwsem);
 924         list_for_each_entry(dev, &device_list, core_list)
 925                 ib_enum_roce_netdev(dev, filter, filter_cookie, cb, cookie);
 926         up_read(&lists_rwsem);
 927 }
 928
 929 /**
 930  * ib_enum_all_devs - enumerate all ib_devices
 931  * @cb: Callback to call for each found ib_device
 932  *
 933  * Enumerates all ib_devices and calls callback() on each device.
 934  */
 935 int ib_enum_all_devs(nldev_callback nldev_cb, struct sk_buff *skb,
 936                      struct netlink_callback *cb)
 937 {
 938         struct ib_device *dev;
 939         unsigned int idx = 0;
 940         int ret = 0;
 941
 942         down_read(&lists_rwsem);
 943         list_for_each_entry(dev, &device_list, core_list) {
 944                 ret = nldev_cb(dev, skb, cb, idx);
 945                 if (ret)
 946                         break;
 947                 idx++;
 948         }
 949
 950         up_read(&lists_rwsem);
 951         return ret;
 952 }
 953
 954 /**
 955  * ib_query_pkey - Get P_Key table entry
 956  * @device:Device to query
 957  * @port_num:Port number to query
 958  * @index:P_Key table index to query
 959  * @pkey:Returned P_Key
 960  *
 961  * ib_query_pkey() fetches the specified P_Key table entry.
 962  */
 963 int ib_query_pkey(struct ib_device *device,
 964                   u8 port_num, u16 index, u16 *pkey)
 965 {
 966         return device->query_pkey(device, port_num, index, pkey);
 967 }
 968 EXPORT_SYMBOL(ib_query_pkey);
 969
 970 /**
 971  * ib_modify_device - Change IB device attributes
 972  * @device:Device to modify
 973  * @device_modify_mask:Mask of attributes to change
 974  * @device_modify:New attribute values
 975  *
 976  * ib_modify_device() changes a device's attributes as specified by
 977  * the @device_modify_mask and @device_modify structure.
 978  */
 979 int ib_modify_device(struct ib_device *device,
 980                      int device_modify_mask,
 981                      struct ib_device_modify *device_modify)
 982 {
 983         if (!device->modify_device)
 984                 return -ENOSYS;
 985
 986         return device->modify_device(device, device_modify_mask,
 987                                      device_modify);
 988 }
 989 EXPORT_SYMBOL(ib_modify_device);
 990
 991 /**
 992  * ib_modify_port - Modifies the attributes for the specified port.
 993  * @device: The device to modify.
 994  * @port_num: The number of the port to modify.
 995  * @port_modify_mask: Mask used to specify which attributes of the port
 996  *   to change.
 997  * @port_modify: New attribute values for the port.
 998  *
 999  * ib_modify_port() changes a port's attributes as specified by the
1000  * @port_modify_mask and @port_modify structure.
1001  */
1002 int ib_modify_port(struct ib_device *device,
1003                    u8 port_num, int port_modify_mask,
1004                    struct ib_port_modify *port_modify)
1005 {
1006         int rc;
1007
1008         if (!rdma_is_port_valid(device, port_num))
1009                 return -EINVAL;
1010
1011         if (device->modify_port)
1012                 rc = device->modify_port(device, port_num, port_modify_mask,
1013                                            port_modify);
1014         else
1015                 rc = rdma_protocol_roce(device, port_num) ? 0 : -ENOSYS;
1016         return rc;
1017 }
1018 EXPORT_SYMBOL(ib_modify_port);
1019
1020 /**
1021  * ib_find_gid - Returns the port number and GID table index where
1022  *   a specified GID value occurs. Its searches only for IB link layer.
1023  * @device: The device to query.
1024  * @gid: The GID value to search for.
1025  * @port_num: The port number of the device where the GID value was found.
1026  * @index: The index into the GID table where the GID was found.  This
1027  *   parameter may be NULL.
1028  */
1029 int ib_find_gid(struct ib_device *device, union ib_gid *gid,
1030                 u8 *port_num, u16 *index)
1031 {
1032         union ib_gid tmp_gid;
1033         int ret, port, i;
1034
1035         for (port = rdma_start_port(device); port <= rdma_end_port(device); ++port) {
1036                 if (!rdma_protocol_ib(device, port))
1037                         continue;
1038
1039                 for (i = 0; i < device->port_immutable[port].gid_tbl_len; ++i) {
1040                         ret = rdma_query_gid(device, port, i, &tmp_gid);
1041                         if (ret)
1042                                 continue;
1043
1044                         if (!memcmp(&tmp_gid, gid, sizeof *gid)) {
1045                                 *port_num = port;
1046                                 if (index)
1047                                         *index = i;
1048                                 return 0;
1049                         }
1050                 }
1051         }
1052
1053         return -ENOENT;
1054 }
1055 EXPORT_SYMBOL(ib_find_gid);
1056
1057 /**
1058  * ib_find_pkey - Returns the PKey table index where a specified
1059  *   PKey value occurs.
1060  * @device: The device to query.
1061  * @port_num: The port number of the device to search for the PKey.
1062  * @pkey: The PKey value to search for.
1063  * @index: The index into the PKey table where the PKey was found.
1064  */
1065 int ib_find_pkey(struct ib_device *device,
1066                  u8 port_num, u16 pkey, u16 *index)
1067 {
1068         int ret, i;
1069         u16 tmp_pkey;
1070         int partial_ix = -1;
1071
1072         for (i = 0; i < device->port_immutable[port_num].pkey_tbl_len; ++i) {
1073                 ret = ib_query_pkey(device, port_num, i, &tmp_pkey);
1074                 if (ret)
1075                         return ret;
1076                 if ((pkey & 0x7fff) == (tmp_pkey & 0x7fff)) {
1077                         /* if there is full-member pkey take it.*/
1078                         if (tmp_pkey & 0x8000) {
1079                                 *index = i;
1080                                 return 0;
1081                         }
1082                         if (partial_ix < 0)
1083                                 partial_ix = i;
1084                 }
1085         }
1086
1087         /*no full-member, if exists take the limited*/
1088         if (partial_ix >= 0) {
1089                 *index = partial_ix;
1090                 return 0;
1091         }
1092         return -ENOENT;
1093 }
1094 EXPORT_SYMBOL(ib_find_pkey);
1095
1096 /**
1097  * ib_get_net_dev_by_params() - Return the appropriate net_dev
1098  * for a received CM request
1099  * @dev:        An RDMA device on which the request has been received.
1100  * @port:       Port number on the RDMA device.
1101  * @pkey:       The Pkey the request came on.
1102  * @gid:        A GID that the net_dev uses to communicate.
1103  * @addr:       Contains the IP address that the request specified as its
1104  *              destination.
1105  */
1106 struct net_device *ib_get_net_dev_by_params(struct ib_device *dev,
1107                                             u8 port,
1108                                             u16 pkey,
1109                                             const union ib_gid *gid,
1110                                             const struct sockaddr *addr)
1111 {
1112         struct net_device *net_dev = NULL;
1113         struct ib_client_data *context;
1114
1115         if (!rdma_protocol_ib(dev, port))
1116                 return NULL;
1117
1118         down_read(&lists_rwsem);
1119
1120         list_for_each_entry(context, &dev->client_data_list, list) {
1121                 struct ib_client *client = context->client;
1122
1123                 if (context->going_down)
1124                         continue;
1125
1126                 if (client->get_net_dev_by_params) {
1127                         net_dev = client->get_net_dev_by_params(dev, port, pkey,
1128                                                                 gid, addr,
1129                                                                 context->data);
1130                         if (net_dev)
1131                                 break;
1132                 }
1133         }
1134
1135         up_read(&lists_rwsem);
1136
1137         return net_dev;
1138 }
1139 EXPORT_SYMBOL(ib_get_net_dev_by_params);
1140
1141 static const struct rdma_nl_cbs ibnl_ls_cb_table[RDMA_NL_LS_NUM_OPS] = {
1142         [RDMA_NL_LS_OP_RESOLVE] = {
1143                 .doit = ib_nl_handle_resolve_resp,
1144                 .flags = RDMA_NL_ADMIN_PERM,
1145         },
1146         [RDMA_NL_LS_OP_SET_TIMEOUT] = {
1147                 .doit = ib_nl_handle_set_timeout,
1148                 .flags = RDMA_NL_ADMIN_PERM,
1149         },
1150         [RDMA_NL_LS_OP_IP_RESOLVE] = {
1151                 .doit = ib_nl_handle_ip_res_resp,
1152                 .flags = RDMA_NL_ADMIN_PERM,
1153         },
1154 };
1155
1156 static int __init ib_core_init(void)
1157 {
1158         int ret;
1159
1160         ib_wq = alloc_workqueue("infiniband", 0, 0);
1161         if (!ib_wq)
1162                 return -ENOMEM;
1163
1164         ib_comp_wq = alloc_workqueue("ib-comp-wq",
1165                         WQ_HIGHPRI | WQ_MEM_RECLAIM | WQ_SYSFS, 0);
1166         if (!ib_comp_wq) {
1167                 ret = -ENOMEM;
1168                 goto err;
1169         }
1170
1171         ib_comp_unbound_wq =
1172                 alloc_workqueue("ib-comp-unb-wq",
1173                                 WQ_UNBOUND | WQ_HIGHPRI | WQ_MEM_RECLAIM |
1174                                 WQ_SYSFS, WQ_UNBOUND_MAX_ACTIVE);
1175         if (!ib_comp_unbound_wq) {
1176                 ret = -ENOMEM;
1177                 goto err_comp;
1178         }
1179
1180         ret = class_register(&ib_class);
1181         if (ret) {
1182                 pr_warn("Couldn't create InfiniBand device class\n");
1183                 goto err_comp_unbound;
1184         }
1185
1186         ret = rdma_nl_init();
1187         if (ret) {
1188                 pr_warn("Couldn't init IB netlink interface: err %d\n", ret);
1189                 goto err_sysfs;
1190         }
1191
1192         ret = addr_init();
1193         if (ret) {
1194                 pr_warn("Could't init IB address resolution\n");
1195                 goto err_ibnl;
1196         }
1197
1198         ret = ib_mad_init();
1199         if (ret) {
1200                 pr_warn("Couldn't init IB MAD\n");
1201                 goto err_addr;
1202         }
1203
1204         ret = ib_sa_init();
1205         if (ret) {
1206                 pr_warn("Couldn't init SA\n");
1207                 goto err_mad;
1208         }
1209
1210         ret = register_lsm_notifier(&ibdev_lsm_nb);
1211         if (ret) {
1212                 pr_warn("Couldn't register LSM notifier. ret %d\n", ret);
1213                 goto err_sa;
1214         }
1215
1216         nldev_init();
1217         rdma_nl_register(RDMA_NL_LS, ibnl_ls_cb_table);
1218         roce_gid_mgmt_init();
1219
1220         return 0;
1221
1222 err_sa:
1223         ib_sa_cleanup();
1224 err_mad:
1225         ib_mad_cleanup();
1226 err_addr:
1227         addr_cleanup();
1228 err_ibnl:
1229         rdma_nl_exit();
1230 err_sysfs:
1231         class_unregister(&ib_class);
1232 err_comp_unbound:
1233         destroy_workqueue(ib_comp_unbound_wq);
1234 err_comp:
1235         destroy_workqueue(ib_comp_wq);
1236 err:
1237         destroy_workqueue(ib_wq);
1238         return ret;
1239 }
1240
1241 static void __exit ib_core_cleanup(void)
1242 {
1243         roce_gid_mgmt_cleanup();
1244         nldev_exit();
1245         rdma_nl_unregister(RDMA_NL_LS);
1246         unregister_lsm_notifier(&ibdev_lsm_nb);
1247         ib_sa_cleanup();
1248         ib_mad_cleanup();
1249         addr_cleanup();
1250         rdma_nl_exit();
1251         class_unregister(&ib_class);
1252         destroy_workqueue(ib_comp_unbound_wq);
1253         destroy_workqueue(ib_comp_wq);
1254         /* Make sure that any pending umem accounting work is done. */
1255         destroy_workqueue(ib_wq);
1256 }
1257
1258 MODULE_ALIAS_RDMA_NETLINK(RDMA_NL_LS, 4);
1259
1260 subsys_initcall(ib_core_init);
1261 module_exit(ib_core_cleanup);