drivers/infiniband/core/cache.c

   1 /*
   2  * Copyright (c) 2004 Topspin Communications.  All rights reserved.
   3  * Copyright (c) 2005 Intel Corporation. All rights reserved.
   4  * Copyright (c) 2005 Sun Microsystems, Inc. All rights reserved.
   5  * Copyright (c) 2005 Voltaire, Inc. All rights reserved.
   6  *
   7  * This software is available to you under a choice of one of two
   8  * licenses.  You may choose to be licensed under the terms of the GNU
   9  * General Public License (GPL) Version 2, available from the file
  10  * COPYING in the main directory of this source tree, or the
  11  * OpenIB.org BSD license below:
  12  *
  13  *     Redistribution and use in source and binary forms, with or
  14  *     without modification, are permitted provided that the following
  15  *     conditions are met:
  16  *
  17  *      - Redistributions of source code must retain the above
  18  *        copyright notice, this list of conditions and the following
  19  *        disclaimer.
  20  *
  21  *      - Redistributions in binary form must reproduce the above
  22  *        copyright notice, this list of conditions and the following
  23  *        disclaimer in the documentation and/or other materials
  24  *        provided with the distribution.
  25  *
  26  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  27  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  28  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  29  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
  30  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
  31  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  32  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  33  * SOFTWARE.
  34  *
  35  * $Id: cache.c 1349 2004-12-16 21:09:43Z roland $
  36  */
  37
  38 #include <linux/module.h>
  39 #include <linux/errno.h>
  40 #include <linux/slab.h>
  41
  42 #include <rdma/ib_cache.h>
  43
  44 #include "core_priv.h"
  45
  46 struct ib_pkey_cache {
  47         int             table_len;
  48         u16             table[0];
  49 };
  50
  51 struct ib_gid_cache {
  52         int             table_len;
  53         union ib_gid    table[0];
  54 };
  55
  56 struct ib_update_work {
  57         struct work_struct work;
  58         struct ib_device  *device;
  59         u8                 port_num;
  60 };
  61
  62 static inline int start_port(struct ib_device *device)
  63 {
  64         return (device->node_type == RDMA_NODE_IB_SWITCH) ? 0 : 1;
  65 }
  66
  67 static inline int end_port(struct ib_device *device)
  68 {
  69         return (device->node_type == RDMA_NODE_IB_SWITCH) ?
  70                 0 : device->phys_port_cnt;
  71 }
  72
  73 int ib_get_cached_gid(struct ib_device *device,
  74                       u8                port_num,
  75                       int               index,
  76                       union ib_gid     *gid)
  77 {
  78         struct ib_gid_cache *cache;
  79         unsigned long flags;
  80         int ret = 0;
  81
  82         if (port_num < start_port(device) || port_num > end_port(device))
  83                 return -EINVAL;
  84
  85         read_lock_irqsave(&device->cache.lock, flags);
  86
  87         cache = device->cache.gid_cache[port_num - start_port(device)];
  88
  89         if (index < 0 || index >= cache->table_len)
  90                 ret = -EINVAL;
  91         else
  92                 *gid = cache->table[index];
  93
  94         read_unlock_irqrestore(&device->cache.lock, flags);
  95
  96         return ret;
  97 }
  98 EXPORT_SYMBOL(ib_get_cached_gid);
  99
 100 int ib_find_cached_gid(struct ib_device *device,
 101                        union ib_gid     *gid,
 102                        u8               *port_num,
 103                        u16              *index)
 104 {
 105         struct ib_gid_cache *cache;
 106         unsigned long flags;
 107         int p, i;
 108         int ret = -ENOENT;
 109
 110         *port_num = -1;
 111         if (index)
 112                 *index = -1;
 113
 114         read_lock_irqsave(&device->cache.lock, flags);
 115
 116         for (p = 0; p <= end_port(device) - start_port(device); ++p) {
 117                 cache = device->cache.gid_cache[p];
 118                 for (i = 0; i < cache->table_len; ++i) {
 119                         if (!memcmp(gid, &cache->table[i], sizeof *gid)) {
 120                                 *port_num = p + start_port(device);
 121                                 if (index)
 122                                         *index = i;
 123                                 ret = 0;
 124                                 goto found;
 125                         }
 126                 }
 127         }
 128 found:
 129         read_unlock_irqrestore(&device->cache.lock, flags);
 130
 131         return ret;
 132 }
 133 EXPORT_SYMBOL(ib_find_cached_gid);
 134
 135 int ib_get_cached_pkey(struct ib_device *device,
 136                        u8                port_num,
 137                        int               index,
 138                        u16              *pkey)
 139 {
 140         struct ib_pkey_cache *cache;
 141         unsigned long flags;
 142         int ret = 0;
 143
 144         if (port_num < start_port(device) || port_num > end_port(device))
 145                 return -EINVAL;
 146
 147         read_lock_irqsave(&device->cache.lock, flags);
 148
 149         cache = device->cache.pkey_cache[port_num - start_port(device)];
 150
 151         if (index < 0 || index >= cache->table_len)
 152                 ret = -EINVAL;
 153         else
 154                 *pkey = cache->table[index];
 155
 156         read_unlock_irqrestore(&device->cache.lock, flags);
 157
 158         return ret;
 159 }
 160 EXPORT_SYMBOL(ib_get_cached_pkey);
 161
 162 int ib_find_cached_pkey(struct ib_device *device,
 163                         u8                port_num,
 164                         u16               pkey,
 165                         u16              *index)
 166 {
 167         struct ib_pkey_cache *cache;
 168         unsigned long flags;
 169         int i;
 170         int ret = -ENOENT;
 171
 172         if (port_num < start_port(device) || port_num > end_port(device))
 173                 return -EINVAL;
 174
 175         read_lock_irqsave(&device->cache.lock, flags);
 176
 177         cache = device->cache.pkey_cache[port_num - start_port(device)];
 178
 179         *index = -1;
 180
 181         for (i = 0; i < cache->table_len; ++i)
 182                 if ((cache->table[i] & 0x7fff) == (pkey & 0x7fff)) {
 183                         *index = i;
 184                         ret = 0;
 185                         break;
 186                 }
 187
 188         read_unlock_irqrestore(&device->cache.lock, flags);
 189
 190         return ret;
 191 }
 192 EXPORT_SYMBOL(ib_find_cached_pkey);
 193
 194 int ib_get_cached_lmc(struct ib_device *device,
 195                       u8                port_num,
 196                       u8                *lmc)
 197 {
 198         unsigned long flags;
 199         int ret = 0;
 200
 201         if (port_num < start_port(device) || port_num > end_port(device))
 202                 return -EINVAL;
 203
 204         read_lock_irqsave(&device->cache.lock, flags);
 205         *lmc = device->cache.lmc_cache[port_num - start_port(device)];
 206         read_unlock_irqrestore(&device->cache.lock, flags);
 207
 208         return ret;
 209 }
 210 EXPORT_SYMBOL(ib_get_cached_lmc);
 211
 212 static void ib_cache_update(struct ib_device *device,
 213                             u8                port)
 214 {
 215         struct ib_port_attr       *tprops = NULL;
 216         struct ib_pkey_cache      *pkey_cache = NULL, *old_pkey_cache;
 217         struct ib_gid_cache       *gid_cache = NULL, *old_gid_cache;
 218         int                        i;
 219         int                        ret;
 220
 221         tprops = kmalloc(sizeof *tprops, GFP_KERNEL);
 222         if (!tprops)
 223                 return;
 224
 225         ret = ib_query_port(device, port, tprops);
 226         if (ret) {
 227                 printk(KERN_WARNING "ib_query_port failed (%d) for %s\n",
 228                        ret, device->name);
 229                 goto err;
 230         }
 231
 232         pkey_cache = kmalloc(sizeof *pkey_cache + tprops->pkey_tbl_len *
 233                              sizeof *pkey_cache->table, GFP_KERNEL);
 234         if (!pkey_cache)
 235                 goto err;
 236
 237         pkey_cache->table_len = tprops->pkey_tbl_len;
 238
 239         gid_cache = kmalloc(sizeof *gid_cache + tprops->gid_tbl_len *
 240                             sizeof *gid_cache->table, GFP_KERNEL);
 241         if (!gid_cache)
 242                 goto err;
 243
 244         gid_cache->table_len = tprops->gid_tbl_len;
 245
 246         for (i = 0; i < pkey_cache->table_len; ++i) {
 247                 ret = ib_query_pkey(device, port, i, pkey_cache->table + i);
 248                 if (ret) {
 249                         printk(KERN_WARNING "ib_query_pkey failed (%d) for %s (index %d)\n",
 250                                ret, device->name, i);
 251                         goto err;
 252                 }
 253         }
 254
 255         for (i = 0; i < gid_cache->table_len; ++i) {
 256                 ret = ib_query_gid(device, port, i, gid_cache->table + i);
 257                 if (ret) {
 258                         printk(KERN_WARNING "ib_query_gid failed (%d) for %s (index %d)\n",
 259                                ret, device->name, i);
 260                         goto err;
 261                 }
 262         }
 263
 264         write_lock_irq(&device->cache.lock);
 265
 266         old_pkey_cache = device->cache.pkey_cache[port - start_port(device)];
 267         old_gid_cache  = device->cache.gid_cache [port - start_port(device)];
 268
 269         device->cache.pkey_cache[port - start_port(device)] = pkey_cache;
 270         device->cache.gid_cache [port - start_port(device)] = gid_cache;
 271
 272         device->cache.lmc_cache[port - start_port(device)] = tprops->lmc;
 273
 274         write_unlock_irq(&device->cache.lock);
 275
 276         kfree(old_pkey_cache);
 277         kfree(old_gid_cache);
 278         kfree(tprops);
 279         return;
 280
 281 err:
 282         kfree(pkey_cache);
 283         kfree(gid_cache);
 284         kfree(tprops);
 285 }
 286
 287 static void ib_cache_task(struct work_struct *_work)
 288 {
 289         struct ib_update_work *work =
 290                 container_of(_work, struct ib_update_work, work);
 291
 292         ib_cache_update(work->device, work->port_num);
 293         kfree(work);
 294 }
 295
 296 static void ib_cache_event(struct ib_event_handler *handler,
 297                            struct ib_event *event)
 298 {
 299         struct ib_update_work *work;
 300
 301         if (event->event == IB_EVENT_PORT_ERR    ||
 302             event->event == IB_EVENT_PORT_ACTIVE ||
 303             event->event == IB_EVENT_LID_CHANGE  ||
 304             event->event == IB_EVENT_PKEY_CHANGE ||
 305             event->event == IB_EVENT_SM_CHANGE   ||
 306             event->event == IB_EVENT_CLIENT_REREGISTER) {
 307                 work = kmalloc(sizeof *work, GFP_ATOMIC);
 308                 if (work) {
 309                         INIT_WORK(&work->work, ib_cache_task);
 310                         work->device   = event->device;
 311                         work->port_num = event->element.port_num;
 312                         schedule_work(&work->work);
 313                 }
 314         }
 315 }
 316
 317 static void ib_cache_setup_one(struct ib_device *device)
 318 {
 319         int p;
 320
 321         rwlock_init(&device->cache.lock);
 322
 323         device->cache.pkey_cache =
 324                 kmalloc(sizeof *device->cache.pkey_cache *
 325                         (end_port(device) - start_port(device) + 1), GFP_KERNEL);
 326         device->cache.gid_cache =
 327                 kmalloc(sizeof *device->cache.gid_cache *
 328                         (end_port(device) - start_port(device) + 1), GFP_KERNEL);
 329
 330         device->cache.lmc_cache = kmalloc(sizeof *device->cache.lmc_cache *
 331                                           (end_port(device) -
 332                                            start_port(device) + 1),
 333                                           GFP_KERNEL);
 334
 335         if (!device->cache.pkey_cache || !device->cache.gid_cache ||
 336             !device->cache.lmc_cache) {
 337                 printk(KERN_WARNING "Couldn't allocate cache "
 338                        "for %s\n", device->name);
 339                 goto err;
 340         }
 341
 342         for (p = 0; p <= end_port(device) - start_port(device); ++p) {
 343                 device->cache.pkey_cache[p] = NULL;
 344                 device->cache.gid_cache [p] = NULL;
 345                 ib_cache_update(device, p + start_port(device));
 346         }
 347
 348         INIT_IB_EVENT_HANDLER(&device->cache.event_handler,
 349                               device, ib_cache_event);
 350         if (ib_register_event_handler(&device->cache.event_handler))
 351                 goto err_cache;
 352
 353         return;
 354
 355 err_cache:
 356         for (p = 0; p <= end_port(device) - start_port(device); ++p) {
 357                 kfree(device->cache.pkey_cache[p]);
 358                 kfree(device->cache.gid_cache[p]);
 359         }
 360
 361 err:
 362         kfree(device->cache.pkey_cache);
 363         kfree(device->cache.gid_cache);
 364         kfree(device->cache.lmc_cache);
 365 }
 366
 367 static void ib_cache_cleanup_one(struct ib_device *device)
 368 {
 369         int p;
 370
 371         ib_unregister_event_handler(&device->cache.event_handler);
 372         flush_scheduled_work();
 373
 374         for (p = 0; p <= end_port(device) - start_port(device); ++p) {
 375                 kfree(device->cache.pkey_cache[p]);
 376                 kfree(device->cache.gid_cache[p]);
 377         }
 378
 379         kfree(device->cache.pkey_cache);
 380         kfree(device->cache.gid_cache);
 381         kfree(device->cache.lmc_cache);
 382 }
 383
 384 static struct ib_client cache_client = {
 385         .name   = "cache",
 386         .add    = ib_cache_setup_one,
 387         .remove = ib_cache_cleanup_one
 388 };
 389
 390 int __init ib_cache_setup(void)
 391 {
 392         return ib_register_client(&cache_client);
 393 }
 394
 395 void __exit ib_cache_cleanup(void)
 396 {
 397         ib_unregister_client(&cache_client);
 398 }